cyclone: regenerate the patch for scheme/base.c from scheme/base.sld

[Yorick Hardy <yorickhardy%gmail.com@localhost>]

Module Name:	pkgsrc-wip
Committed By:	Yorick Hardy <yorickhardy%gmail.com@localhost>
Pushed By:	yhardy
Date:		Sun Jul 23 01:36:02 2023 +0200
Changeset:	f8aa008ef8622976c335dcfe688d5a06ffec0f96

Modified Files:
	cyclone/distinfo
	cyclone/patches/patch-scheme_base.c

Log Message:
cyclone: regenerate the patch for scheme/base.c from scheme/base.sld

The previous patch was generated from the wrong directory, and broke
the compiler if some features were used.

To see a diff of this commit:
https://wip.pkgsrc.org/cgi-bin/gitweb.cgi?p=pkgsrc-wip.git;a=commitdiff;h=f8aa008ef8622976c335dcfe688d5a06ffec0f96

Please note that diffs are not public domain; they are subject to the
copyright notices on the relevant files.

diffstat:
 cyclone/distinfo                    |     2 +-
 cyclone/patches/patch-scheme_base.c | 59995 +++++++++++++++++-----------------
 2 files changed, 30141 insertions(+), 29856 deletions(-)

diffs:
diff --git a/cyclone/distinfo b/cyclone/distinfo
index 6ea614c9c3..55e21425fc 100644
--- a/cyclone/distinfo
+++ b/cyclone/distinfo
@@ -5,5 +5,5 @@ SHA512 (cyclone-bootstrap/v0.35.0.tar.gz) = 9aabae2bdcccdf6873780947c41a3230b80a
 Size (cyclone-bootstrap/v0.35.0.tar.gz) = 3955837 bytes
 SHA1 (patch-Makefile) = 3b1405ff54738ac53808f1f4e2e2a8d3f458f75d
 SHA1 (patch-Makefile.config) = 8838e7b3ac7b22452b798ab043ad94fe33ac4822
-SHA1 (patch-scheme_base.c) = 4d14cefb5e155e7cda6688740478329b118bce9b
+SHA1 (patch-scheme_base.c) = 69edfaef769af5c7f714f54e1fbaaa155437920f
 SHA1 (patch-scheme_base.sld) = b9aaeb494572eb4fddecf25d30eae7cafe77163f
diff --git a/cyclone/patches/patch-scheme_base.c b/cyclone/patches/patch-scheme_base.c
index 8bdb2d86e3..55e1fe5a9e 100644
--- a/cyclone/patches/patch-scheme_base.c
+++ b/cyclone/patches/patch-scheme_base.c
@@ -1513,522 +1513,522 @@ Make let-values be the same as let*-values, to work around
 -static void __lambda_5(void *data, object clo, int argc, object *args) ;/*object self_7312975, object k_734086*/
 -static void __lambda_6(void *data, object clo, int argc, object *args) ;/*object self_7312976, object r_734091*/
 -static void __lambda_7(void *data, object clo, int argc, object *args) ;/*object self_7312977, object r_734088*/
-+static void __lambda_1266(void *data, object clo, int argc, object *args) ;/*closure _,object k_737552*/
-+static void __lambda_1267(void *data, object clo, int argc, object *args) ;/*object self_7312927, object r_737554*/
-+static void __lambda_1268(void *data, object clo, int argc, object *args) ;/*object self_7312928, object r_737555*/
-+static void __lambda_1269(void *data, object clo, int argc, object *args) ;/*object self_7312929, object r_737574*/
-+static void __lambda_1270(void *data, object clo, int argc, object *args) ;/*object self_7312930, object r_737556*/
-+static void __lambda_1271(void *data, object clo, int argc, object *args) ;/*object self_7312931, object r_737572*/
-+static void __lambda_1272(void *data, object clo, int argc, object *args) ;/*object self_7312932, object r_737557*/
-+static void __lambda_1273(void *data, object clo, int argc, object *args) ;/*object self_7312933, object r_737570*/
-+static void __lambda_1274(void *data, object clo, int argc, object *args) ;/*object self_7312934, object r_737558*/
-+static void __lambda_1275(void *data, object clo, int argc, object *args) ;/*object self_7312935, object r_737559*/
-+static void __lambda_1276(void *data, object clo, int argc, object *args) ;/*object self_7312936, object r_737560*/
-+static void __lambda_1277(void *data, object clo, int argc, object *args) ;/*object self_7312937, object r_737561*/
-+static void __lambda_1278(void *data, object clo, int argc, object *args) ;/*object self_7312938, object r_737562*/
-+static void __lambda_1279(void *data, object clo, int argc, object *args) ;/*object self_7312939, object r_737563*/
-+static void __lambda_1280(void *data, object clo, int argc, object *args) ;/*object self_7312940, object r_737564*/
-+static void __lambda_1281(void *data, object clo, int argc, object *args) ;/*object self_7312941, object r_737565*/
-+static void __lambda_1282(void *data, object clo, int argc, object *args) ;/*object self_7312942, object r_737566*/
-+static void __lambda_1283(void *data, object clo, int argc, object *args) ;/*object self_7312943, object r_737567*/
-+static void __lambda_1284(void *data, object clo, int argc, object *args) ;/*object self_7312944, object r_737568*/
-+static void __lambda_1208(void *data, object clo, int argc, object *args) ;/*closure _,object k_737238, object expr_732312_732353_732445_733573, object rename_732313_732354_732446_733574, object compare_732314_732355_732447_733575*/
-+static void __lambda_1209(void *data, object clo, int argc, object *args) ;/*object self_7312869, object v_931_732321_732435_732495_733623*/
-+static void __lambda_1217(void *data, object clo, int argc, object *args) ;/*object self_7312870, object tmp_732357_732359_732448_733576*/
-+static void __lambda_1265(void *data, object clo, int argc, object *args) ;/*object self_7312871, object r_737239*/
-+static void __lambda_1218(void *data, object clo, int argc, object *args) ;/*object self_7312872, object k_737241*/
-+static void __lambda_1219(void *data, object clo, int argc, object *args) ;/*object self_7312873, object v_936_732326_732421_732486_733614*/
-+static void __lambda_1222(void *data, object clo, int argc, object *args) ;/*object self_7312874, object tmp_732361_732363_732449_733577*/
-+static void __lambda_1223(void *data, object clo, int argc, object *args) ;/*object self_7312875, object v_9313_732333_732382_732459_733587*/
-+static void __lambda_1256(void *data, object clo, int argc, object *args) ;/*object self_7312876, object tmp_732365_732367_732450_733578*/
-+static void __lambda_1257(void *data, object clo, int argc, object *args) ;/*object self_7312877, object v_9328_732348_732372_732452_733580*/
-+static void __lambda_1263(void *data, object clo, int argc, object *args) ;/*object self_7312878, object tmp_732369_732371_732451_733579*/
-+static void __lambda_1264(void *data, object clo, int argc, object *args) ;/*object self_7312879, object r_737245*/
-+static void __lambda_1258(void *data, object clo, int argc, object *args) ;/*object self_7312880, object k_737247*/
-+static void __lambda_1259(void *data, object clo, int argc, object *args) ;/*object self_7312881, object r_737256*/
-+static void __lambda_1260(void *data, object clo, int argc, object *args) ;/*object self_7312882, object r_737264*/
-+static void __lambda_1261(void *data, object clo, int argc, object *args) ;/*object self_7312883, object r_737274*/
-+static void __lambda_1262(void *data, object clo, int argc, object *args) ;/*object self_7312884, object r_737270_7311360_7311369_7311377*/
-+static void __lambda_1224(void *data, object clo, int argc, object *args) ;/*object self_7312885, object k_737286*/
-+static void __lambda_1225(void *data, object clo, int argc, object *args) ;/*object self_7312886, object var0_732387_732462_733590*/
-+static void __lambda_1226(void *data, object clo, int argc, object *args) ;/*object self_7312887, object ls_732316_732392_732465_733593, object i_732318_732393_732466_733594, object res_732317_732394_732467_733595*/
-+static void __lambda_1227(void *data, object clo, int argc, object *args) ;/*object self_7312888, object lp_9317_732337_732395_732468_733596*/
-+static void __lambda_1383(void *data, object clo, int argc, object *args) ;/*object self_7312889, object lp_9317_732337_732395_732468_733596*/
-+static void __lambda_1230(void *data, object clo, int argc, object *args) ;/*object self_7312890, object k_737298, object ls_732316_732396_732469_733597, object i_732318_732397_732470_733598, object res_732317_732398_732471_733599*/
-+static void __lambda_1231(void *data, object clo, int argc, object *args) ;/*object self_7312891, object r_737471_7311697*/
-+static void __lambda_1232(void *data, object clo, int argc, object *args) ;/*object self_7312892, object v_9318_732338_732399_732472_733600_7311698*/
-+static void __lambda_1233(void *data, object clo, int argc, object *args) ;/*object self_7312893, object r_737319_7311699*/
-+static void __lambda_1234(void *data, object clo, int argc, object *args) ;/*object self_7312894, object r_737440_7311700*/
-+static void __lambda_1235(void *data, object clo, int argc, object *args) ;/*object self_7312895, object r_737448_7311701*/
-+static void __lambda_1236(void *data, object clo, int argc, object *args) ;/*object self_7312896, object r_737458_7311702*/
-+static void __lambda_1237(void *data, object clo, int argc, object *args) ;/*object self_7312897, object r_737454_7310412_7310476_7310539_7311703*/
-+static void __lambda_1248(void *data, object clo, int argc, object *args) ;/*object self_7312898, object k_737385_7310449_7310513_7310576_7310637_7310697_7310756_7310814_7310871_7310927_7311714, object var1_732420_732485_733613_7310450_7310514_7310577_7310638_7310698_7310757_7310815_7310872_7310928_7311715*/
-+static void __lambda_1249(void *data, object clo, int argc, object *args) ;/*object self_7312899, object r_737386_7310451_7310515_7310578_7310639_7310699_7310758_7310816_7310873_7310929_7311716*/
-+static void __lambda_1250(void *data, object clo, int argc, object *args) ;/*object self_7312900, object r_737394_7310452_7310516_7310579_7310640_7310700_7310759_7310817_7310874_7310930_7311717*/
-+static void __lambda_1251(void *data, object clo, int argc, object *args) ;/*object self_7312901, object r_737425_7310453_7310517_7310580_7310641_7310701_7310760_7310818_7310875_7310931_7311718*/
-+static void __lambda_1252(void *data, object clo, int argc, object *args) ;/*object self_7312902, object r_737431_7310454_7310518_7310581_7310642_7310702_7310761_7310819_7310876_7310932_7311719*/
-+static void __lambda_1253(void *data, object clo, int argc, object *args) ;/*object self_7312903, object r_737407_7310460_7310524_7310587_7310648_7310708_7310767_7310825_7310882_7310938_7311205_7311223_7311240_7311256_7311271_7311720*/
-+static void __lambda_1254(void *data, object clo, int argc, object *args) ;/*object self_7312904, object r_737415_7310461_7310525_7310588_7310649_7310709_7310768_7310826_7310883_7310939_7311206_7311224_7311241_7311257_7311272_7311721*/
-+static void __lambda_1255(void *data, object clo, int argc, object *args) ;/*object self_7312905, object r_737403_7310467_7310531_7310594_7310655_7310715_7310774_7310832_7310889_7310945_7311212_7311230_7311247_7311263_7311278_7311290_7311301_7311311_7311320_7311328_7311722*/
-+static void __lambda_1238(void *data, object clo, int argc, object *args) ;/*object self_7312906, object r_737384_7310419_7310483_7310546_7310607_7310667_7310726_7310784_7310841_7310897_7311704*/
-+static void __lambda_1239(void *data, object clo, int argc, object *args) ;/*object self_7312907, object r_737325_7310420_7310484_7310547_7310608_7310668_7310727_7310785_7310842_7310898_7311705*/
-+static void __lambda_1240(void *data, object clo, int argc, object *args) ;/*object self_7312908, object r_737330_7310421_7310485_7310548_7310609_7310669_7310728_7310786_7310843_7310899_7311706*/
-+static void __lambda_1241(void *data, object clo, int argc, object *args) ;/*object self_7312909, object r_737338_7310422_7310486_7310549_7310610_7310670_7310729_7310787_7310844_7310900_7311707*/
-+static void __lambda_1242(void *data, object clo, int argc, object *args) ;/*object self_7312910, object r_737369_7310423_7310487_7310550_7310611_7310671_7310730_7310788_7310845_7310901_7311708*/
-+static void __lambda_1243(void *data, object clo, int argc, object *args) ;/*object self_7312911, object r_737375_7310424_7310488_7310551_7310612_7310672_7310731_7310789_7310846_7310902_7311709*/
-+static void __lambda_1244(void *data, object clo, int argc, object *args) ;/*object self_7312912, object r_737351_7310430_7310494_7310557_7310618_7310678_7310737_7310795_7310852_7310908_7310957_7310980_7311002_7311023_7311043_7311710*/
-+static void __lambda_1245(void *data, object clo, int argc, object *args) ;/*object self_7312913, object r_737359_7310431_7310495_7310558_7310619_7310679_7310738_7310796_7310853_7310909_7310958_7310981_7311003_7311024_7311044_7311711*/
-+static void __lambda_1246(void *data, object clo, int argc, object *args) ;/*object self_7312914, object r_737347_7310437_7310501_7310564_7310625_7310685_7310744_7310802_7310859_7310915_7310964_7310987_7311009_7311030_7311050_7311067_7311083_7311098_7311112_7311125_7311712*/
-+static void __lambda_1247(void *data, object clo, int argc, object *args) ;/*object self_7312915, object r_737323_7310446_7310510_7310573_7310634_7310694_7310753_7310811_7310868_7310924_7310973_7310996_7311018_7311039_7311059_7311076_7311092_7311107_7311121_7311134_7311145_7311155_7311164_7311172_7311179_7311185_7311190_7311194_7311713*/
-+static void __lambda_1228(void *data, object clo, int argc, object *args) ;/*object self_7312916, object r_737297*/
-+static void __lambda_1229(void *data, object clo, int argc, object *args) ;/*object self_7312917, object r_737296*/
-+static void __lambda_1220(void *data, object clo, int argc, object *args) ;/*object self_7312918, object k_737478*/
-+static void __lambda_1221(void *data, object clo, int argc, object *args) ;/*object self_7312919, object r_737491*/
-+static void __lambda_1210(void *data, object clo, int argc, object *args) ;/*object self_7312920, object k_737500*/
-+static void __lambda_1211(void *data, object clo, int argc, object *args) ;/*object self_7312921, object r_737510*/
-+static void __lambda_1212(void *data, object clo, int argc, object *args) ;/*object self_7312922, object r_737513*/
-+static void __lambda_1213(void *data, object clo, int argc, object *args) ;/*object self_7312923, object r_737519*/
-+static void __lambda_1214(void *data, object clo, int argc, object *args) ;/*object self_7312924, object r_737538*/
-+static void __lambda_1215(void *data, object clo, int argc, object *args) ;/*object self_7312925, object r_737528_7310322_7310335_7310347*/
-+static void __lambda_1216(void *data, object clo, int argc, object *args) ;/*object self_7312926, object r_737531_7310323_7310336_7310348*/
-+static void __lambda_1177(void *data, object clo, int argc, object *args) ;/*closure _,object k_737069, object expr_732245_733554, object rename_732246_733555, object compare_732247_733556*/
-+static void __lambda_1179(void *data, object clo, int argc, object *args) ;/*object self_7312839, object parent_732256_733559*/
-+static void __lambda_1180(void *data, object clo, int argc, object *args) ;/*object self_7312840, object _191define_732274_733565*/
-+static void __lambda_1181(void *data, object clo, int argc, object *args) ;/*object self_7312841, object _191lambda_732277_733566*/
-+static void __lambda_1182(void *data, object clo, int argc, object *args) ;/*object self_7312842, object _191let_732280_733567*/
-+static void __lambda_1183(void *data, object clo, int argc, object *args) ;/*object self_7312843, object _191register_732283_733568*/
-+static void __lambda_1184(void *data, object clo, int argc, object *args) ;/*object self_7312844, object _191slot_91set_67_732286_733569*/
-+static void __lambda_1185(void *data, object clo, int argc, object *args) ;/*object self_7312845, object _191type_191slot_191offset_732289_733570*/
-+static void __lambda_1187(void *data, object clo, int argc, object *args) ;/*object self_7312846, object r_737084*/
-+static void __lambda_1188(void *data, object clo, int argc, object *args) ;/*object self_7312847, object r_737085*/
-+static void __lambda_1189(void *data, object clo, int argc, object *args) ;/*object self_7312848, object r_737218*/
-+static void __lambda_1190(void *data, object clo, int argc, object *args) ;/*object self_7312849, object r_737197*/
-+static void __lambda_1205(void *data, object clo, int argc, object *args) ;/*object self_7312850, object k_737163, object f_732294_733571*/
-+static void __lambda_1206(void *data, object clo, int argc, object *args) ;/*object self_7312851, object r_737171*/
-+static void __lambda_1207(void *data, object clo, int argc, object *args) ;/*object self_7312852, object r_737173*/
-+static void __lambda_1191(void *data, object clo, int argc, object *args) ;/*object self_7312853, object r_737162*/
-+static void __lambda_1192(void *data, object clo, int argc, object *args) ;/*object self_7312854, object r_737091*/
-+static void __lambda_1202(void *data, object clo, int argc, object *args) ;/*object self_7312855, object k_737128, object f_732300_733572*/
-+static void __lambda_1203(void *data, object clo, int argc, object *args) ;/*object self_7312856, object r_737137*/
-+static void __lambda_1204(void *data, object clo, int argc, object *args) ;/*object self_7312857, object r_737139*/
-+static void __lambda_1193(void *data, object clo, int argc, object *args) ;/*object self_7312858, object r_737127*/
-+static void __lambda_1194(void *data, object clo, int argc, object *args) ;/*object self_7312859, object r_737093*/
-+static void __lambda_1195(void *data, object clo, int argc, object *args) ;/*object self_7312860, object r_737105*/
-+static void __lambda_1196(void *data, object clo, int argc, object *args) ;/*object self_7312861, object r_737113*/
-+static void __lambda_1197(void *data, object clo, int argc, object *args) ;/*object self_7312862, object r_737115*/
-+static void __lambda_1198(void *data, object clo, int argc, object *args) ;/*object self_7312863, object r_737114*/
-+static void __lambda_1199(void *data, object clo, int argc, object *args) ;/*object self_7312864, object r_737092*/
-+static void __lambda_1200(void *data, object clo, int argc, object *args) ;/*object self_7312865, object r_737090*/
-+static void __lambda_1201(void *data, object clo, int argc, object *args) ;/*object self_7312866, object r_737088*/
-+static void __lambda_1186(void *data, object clo, int argc, object *args) ;/*object self_7312867, object k_737224*/
-+static void __lambda_1178(void *data, object clo, int argc, object *args) ;/*object self_7312868, object k_737232*/
-+static void __lambda_1174(void *data, object clo, int argc, object *args) ;/*closure _,object k_737062, object obj_732241_733552, object rtype_732242_733553*/
-+static void __lambda_1175(void *data, object clo, int argc, object *args) ;/*object self_7312837, object r_737063*/
-+static void __lambda_1176(void *data, object clo, int argc, object *args) ;/*object self_7312838, object r_737064*/
++static void __lambda_1266(void *data, object clo, int argc, object *args) ;/*closure _,object k_737545*/
++static void __lambda_1267(void *data, object clo, int argc, object *args) ;/*object self_7312920, object r_737547*/
++static void __lambda_1268(void *data, object clo, int argc, object *args) ;/*object self_7312921, object r_737548*/
++static void __lambda_1269(void *data, object clo, int argc, object *args) ;/*object self_7312922, object r_737567*/
++static void __lambda_1270(void *data, object clo, int argc, object *args) ;/*object self_7312923, object r_737549*/
++static void __lambda_1271(void *data, object clo, int argc, object *args) ;/*object self_7312924, object r_737565*/
++static void __lambda_1272(void *data, object clo, int argc, object *args) ;/*object self_7312925, object r_737550*/
++static void __lambda_1273(void *data, object clo, int argc, object *args) ;/*object self_7312926, object r_737563*/
++static void __lambda_1274(void *data, object clo, int argc, object *args) ;/*object self_7312927, object r_737551*/
++static void __lambda_1275(void *data, object clo, int argc, object *args) ;/*object self_7312928, object r_737552*/
++static void __lambda_1276(void *data, object clo, int argc, object *args) ;/*object self_7312929, object r_737553*/
++static void __lambda_1277(void *data, object clo, int argc, object *args) ;/*object self_7312930, object r_737554*/
++static void __lambda_1278(void *data, object clo, int argc, object *args) ;/*object self_7312931, object r_737555*/
++static void __lambda_1279(void *data, object clo, int argc, object *args) ;/*object self_7312932, object r_737556*/
++static void __lambda_1280(void *data, object clo, int argc, object *args) ;/*object self_7312933, object r_737557*/
++static void __lambda_1281(void *data, object clo, int argc, object *args) ;/*object self_7312934, object r_737558*/
++static void __lambda_1282(void *data, object clo, int argc, object *args) ;/*object self_7312935, object r_737559*/
++static void __lambda_1283(void *data, object clo, int argc, object *args) ;/*object self_7312936, object r_737560*/
++static void __lambda_1284(void *data, object clo, int argc, object *args) ;/*object self_7312937, object r_737561*/
++static void __lambda_1208(void *data, object clo, int argc, object *args) ;/*closure _,object k_737231, object expr_732306_732346_732438_733566, object rename_732307_732347_732439_733567, object compare_732308_732348_732440_733568*/
++static void __lambda_1209(void *data, object clo, int argc, object *args) ;/*object self_7312862, object v_931_732314_732428_732488_733616*/
++static void __lambda_1217(void *data, object clo, int argc, object *args) ;/*object self_7312863, object tmp_732350_732352_732441_733569*/
++static void __lambda_1265(void *data, object clo, int argc, object *args) ;/*object self_7312864, object r_737232*/
++static void __lambda_1218(void *data, object clo, int argc, object *args) ;/*object self_7312865, object k_737234*/
++static void __lambda_1219(void *data, object clo, int argc, object *args) ;/*object self_7312866, object v_936_732319_732414_732479_733607*/
++static void __lambda_1222(void *data, object clo, int argc, object *args) ;/*object self_7312867, object tmp_732354_732356_732442_733570*/
++static void __lambda_1223(void *data, object clo, int argc, object *args) ;/*object self_7312868, object v_9313_732326_732375_732452_733580*/
++static void __lambda_1256(void *data, object clo, int argc, object *args) ;/*object self_7312869, object tmp_732358_732360_732443_733571*/
++static void __lambda_1257(void *data, object clo, int argc, object *args) ;/*object self_7312870, object v_9328_732341_732365_732445_733573*/
++static void __lambda_1263(void *data, object clo, int argc, object *args) ;/*object self_7312871, object tmp_732362_732364_732444_733572*/
++static void __lambda_1264(void *data, object clo, int argc, object *args) ;/*object self_7312872, object r_737238*/
++static void __lambda_1258(void *data, object clo, int argc, object *args) ;/*object self_7312873, object k_737240*/
++static void __lambda_1259(void *data, object clo, int argc, object *args) ;/*object self_7312874, object r_737249*/
++static void __lambda_1260(void *data, object clo, int argc, object *args) ;/*object self_7312875, object r_737257*/
++static void __lambda_1261(void *data, object clo, int argc, object *args) ;/*object self_7312876, object r_737267*/
++static void __lambda_1262(void *data, object clo, int argc, object *args) ;/*object self_7312877, object r_737263_7311353_7311362_7311370*/
++static void __lambda_1224(void *data, object clo, int argc, object *args) ;/*object self_7312878, object k_737279*/
++static void __lambda_1225(void *data, object clo, int argc, object *args) ;/*object self_7312879, object var0_732380_732455_733583*/
++static void __lambda_1226(void *data, object clo, int argc, object *args) ;/*object self_7312880, object ls_732310_732385_732458_733586, object i_732312_732386_732459_733587, object res_732311_732387_732460_733588*/
++static void __lambda_1227(void *data, object clo, int argc, object *args) ;/*object self_7312881, object lp_9317_732330_732388_732461_733589*/
++static void __lambda_1383(void *data, object clo, int argc, object *args) ;/*object self_7312882, object lp_9317_732330_732388_732461_733589*/
++static void __lambda_1230(void *data, object clo, int argc, object *args) ;/*object self_7312883, object k_737291, object ls_732310_732389_732462_733590, object i_732312_732390_732463_733591, object res_732311_732391_732464_733592*/
++static void __lambda_1231(void *data, object clo, int argc, object *args) ;/*object self_7312884, object r_737464_7311690*/
++static void __lambda_1232(void *data, object clo, int argc, object *args) ;/*object self_7312885, object v_9318_732331_732392_732465_733593_7311691*/
++static void __lambda_1233(void *data, object clo, int argc, object *args) ;/*object self_7312886, object r_737312_7311692*/
++static void __lambda_1234(void *data, object clo, int argc, object *args) ;/*object self_7312887, object r_737433_7311693*/
++static void __lambda_1235(void *data, object clo, int argc, object *args) ;/*object self_7312888, object r_737441_7311694*/
++static void __lambda_1236(void *data, object clo, int argc, object *args) ;/*object self_7312889, object r_737451_7311695*/
++static void __lambda_1237(void *data, object clo, int argc, object *args) ;/*object self_7312890, object r_737447_7310405_7310469_7310532_7311696*/
++static void __lambda_1248(void *data, object clo, int argc, object *args) ;/*object self_7312891, object k_737378_7310442_7310506_7310569_7310630_7310690_7310749_7310807_7310864_7310920_7311707, object var1_732413_732478_733606_7310443_7310507_7310570_7310631_7310691_7310750_7310808_7310865_7310921_7311708*/
++static void __lambda_1249(void *data, object clo, int argc, object *args) ;/*object self_7312892, object r_737379_7310444_7310508_7310571_7310632_7310692_7310751_7310809_7310866_7310922_7311709*/
++static void __lambda_1250(void *data, object clo, int argc, object *args) ;/*object self_7312893, object r_737387_7310445_7310509_7310572_7310633_7310693_7310752_7310810_7310867_7310923_7311710*/
++static void __lambda_1251(void *data, object clo, int argc, object *args) ;/*object self_7312894, object r_737418_7310446_7310510_7310573_7310634_7310694_7310753_7310811_7310868_7310924_7311711*/
++static void __lambda_1252(void *data, object clo, int argc, object *args) ;/*object self_7312895, object r_737424_7310447_7310511_7310574_7310635_7310695_7310754_7310812_7310869_7310925_7311712*/
++static void __lambda_1253(void *data, object clo, int argc, object *args) ;/*object self_7312896, object r_737400_7310453_7310517_7310580_7310641_7310701_7310760_7310818_7310875_7310931_7311198_7311216_7311233_7311249_7311264_7311713*/
++static void __lambda_1254(void *data, object clo, int argc, object *args) ;/*object self_7312897, object r_737408_7310454_7310518_7310581_7310642_7310702_7310761_7310819_7310876_7310932_7311199_7311217_7311234_7311250_7311265_7311714*/
++static void __lambda_1255(void *data, object clo, int argc, object *args) ;/*object self_7312898, object r_737396_7310460_7310524_7310587_7310648_7310708_7310767_7310825_7310882_7310938_7311205_7311223_7311240_7311256_7311271_7311283_7311294_7311304_7311313_7311321_7311715*/
++static void __lambda_1238(void *data, object clo, int argc, object *args) ;/*object self_7312899, object r_737377_7310412_7310476_7310539_7310600_7310660_7310719_7310777_7310834_7310890_7311697*/
++static void __lambda_1239(void *data, object clo, int argc, object *args) ;/*object self_7312900, object r_737318_7310413_7310477_7310540_7310601_7310661_7310720_7310778_7310835_7310891_7311698*/
++static void __lambda_1240(void *data, object clo, int argc, object *args) ;/*object self_7312901, object r_737323_7310414_7310478_7310541_7310602_7310662_7310721_7310779_7310836_7310892_7311699*/
++static void __lambda_1241(void *data, object clo, int argc, object *args) ;/*object self_7312902, object r_737331_7310415_7310479_7310542_7310603_7310663_7310722_7310780_7310837_7310893_7311700*/
++static void __lambda_1242(void *data, object clo, int argc, object *args) ;/*object self_7312903, object r_737362_7310416_7310480_7310543_7310604_7310664_7310723_7310781_7310838_7310894_7311701*/
++static void __lambda_1243(void *data, object clo, int argc, object *args) ;/*object self_7312904, object r_737368_7310417_7310481_7310544_7310605_7310665_7310724_7310782_7310839_7310895_7311702*/
++static void __lambda_1244(void *data, object clo, int argc, object *args) ;/*object self_7312905, object r_737344_7310423_7310487_7310550_7310611_7310671_7310730_7310788_7310845_7310901_7310950_7310973_7310995_7311016_7311036_7311703*/
++static void __lambda_1245(void *data, object clo, int argc, object *args) ;/*object self_7312906, object r_737352_7310424_7310488_7310551_7310612_7310672_7310731_7310789_7310846_7310902_7310951_7310974_7310996_7311017_7311037_7311704*/
++static void __lambda_1246(void *data, object clo, int argc, object *args) ;/*object self_7312907, object r_737340_7310430_7310494_7310557_7310618_7310678_7310737_7310795_7310852_7310908_7310957_7310980_7311002_7311023_7311043_7311060_7311076_7311091_7311105_7311118_7311705*/
++static void __lambda_1247(void *data, object clo, int argc, object *args) ;/*object self_7312908, object r_737316_7310439_7310503_7310566_7310627_7310687_7310746_7310804_7310861_7310917_7310966_7310989_7311011_7311032_7311052_7311069_7311085_7311100_7311114_7311127_7311138_7311148_7311157_7311165_7311172_7311178_7311183_7311187_7311706*/
++static void __lambda_1228(void *data, object clo, int argc, object *args) ;/*object self_7312909, object r_737290*/
++static void __lambda_1229(void *data, object clo, int argc, object *args) ;/*object self_7312910, object r_737289*/
++static void __lambda_1220(void *data, object clo, int argc, object *args) ;/*object self_7312911, object k_737471*/
++static void __lambda_1221(void *data, object clo, int argc, object *args) ;/*object self_7312912, object r_737484*/
++static void __lambda_1210(void *data, object clo, int argc, object *args) ;/*object self_7312913, object k_737493*/
++static void __lambda_1211(void *data, object clo, int argc, object *args) ;/*object self_7312914, object r_737503*/
++static void __lambda_1212(void *data, object clo, int argc, object *args) ;/*object self_7312915, object r_737506*/
++static void __lambda_1213(void *data, object clo, int argc, object *args) ;/*object self_7312916, object r_737512*/
++static void __lambda_1214(void *data, object clo, int argc, object *args) ;/*object self_7312917, object r_737531*/
++static void __lambda_1215(void *data, object clo, int argc, object *args) ;/*object self_7312918, object r_737521_7310315_7310328_7310340*/
++static void __lambda_1216(void *data, object clo, int argc, object *args) ;/*object self_7312919, object r_737524_7310316_7310329_7310341*/
++static void __lambda_1177(void *data, object clo, int argc, object *args) ;/*closure _,object k_737062, object expr_732239_733547, object rename_732240_733548, object compare_732241_733549*/
++static void __lambda_1179(void *data, object clo, int argc, object *args) ;/*object self_7312832, object parent_732250_733552*/
++static void __lambda_1180(void *data, object clo, int argc, object *args) ;/*object self_7312833, object _191define_732268_733558*/
++static void __lambda_1181(void *data, object clo, int argc, object *args) ;/*object self_7312834, object _191lambda_732271_733559*/
++static void __lambda_1182(void *data, object clo, int argc, object *args) ;/*object self_7312835, object _191let_732274_733560*/
++static void __lambda_1183(void *data, object clo, int argc, object *args) ;/*object self_7312836, object _191register_732277_733561*/
++static void __lambda_1184(void *data, object clo, int argc, object *args) ;/*object self_7312837, object _191slot_91set_67_732280_733562*/
++static void __lambda_1185(void *data, object clo, int argc, object *args) ;/*object self_7312838, object _191type_191slot_191offset_732283_733563*/
++static void __lambda_1187(void *data, object clo, int argc, object *args) ;/*object self_7312839, object r_737077*/
++static void __lambda_1188(void *data, object clo, int argc, object *args) ;/*object self_7312840, object r_737078*/
++static void __lambda_1189(void *data, object clo, int argc, object *args) ;/*object self_7312841, object r_737211*/
++static void __lambda_1190(void *data, object clo, int argc, object *args) ;/*object self_7312842, object r_737190*/
++static void __lambda_1205(void *data, object clo, int argc, object *args) ;/*object self_7312843, object k_737156, object f_732288_733564*/
++static void __lambda_1206(void *data, object clo, int argc, object *args) ;/*object self_7312844, object r_737164*/
++static void __lambda_1207(void *data, object clo, int argc, object *args) ;/*object self_7312845, object r_737166*/
++static void __lambda_1191(void *data, object clo, int argc, object *args) ;/*object self_7312846, object r_737155*/
++static void __lambda_1192(void *data, object clo, int argc, object *args) ;/*object self_7312847, object r_737084*/
++static void __lambda_1202(void *data, object clo, int argc, object *args) ;/*object self_7312848, object k_737121, object f_732294_733565*/
++static void __lambda_1203(void *data, object clo, int argc, object *args) ;/*object self_7312849, object r_737130*/
++static void __lambda_1204(void *data, object clo, int argc, object *args) ;/*object self_7312850, object r_737132*/
++static void __lambda_1193(void *data, object clo, int argc, object *args) ;/*object self_7312851, object r_737120*/
++static void __lambda_1194(void *data, object clo, int argc, object *args) ;/*object self_7312852, object r_737086*/
++static void __lambda_1195(void *data, object clo, int argc, object *args) ;/*object self_7312853, object r_737098*/
++static void __lambda_1196(void *data, object clo, int argc, object *args) ;/*object self_7312854, object r_737106*/
++static void __lambda_1197(void *data, object clo, int argc, object *args) ;/*object self_7312855, object r_737108*/
++static void __lambda_1198(void *data, object clo, int argc, object *args) ;/*object self_7312856, object r_737107*/
++static void __lambda_1199(void *data, object clo, int argc, object *args) ;/*object self_7312857, object r_737085*/
++static void __lambda_1200(void *data, object clo, int argc, object *args) ;/*object self_7312858, object r_737083*/
++static void __lambda_1201(void *data, object clo, int argc, object *args) ;/*object self_7312859, object r_737081*/
++static void __lambda_1186(void *data, object clo, int argc, object *args) ;/*object self_7312860, object k_737217*/
++static void __lambda_1178(void *data, object clo, int argc, object *args) ;/*object self_7312861, object k_737225*/
++static void __lambda_1174(void *data, object clo, int argc, object *args) ;/*closure _,object k_737055, object obj_732235_733545, object rtype_732236_733546*/
++static void __lambda_1175(void *data, object clo, int argc, object *args) ;/*object self_7312830, object r_737056*/
++static void __lambda_1176(void *data, object clo, int argc, object *args) ;/*object self_7312831, object r_737057*/
 +static void __lambda_1449(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object obj)*/
-+static void __lambda_1168(void *data, object clo, int argc, object *args) ;/*closure _,object k_737051, object e_732232_733545, object lst1_732233_733546*/
-+static void __lambda_1169(void *data, object clo, int argc, object *args) ;/*object self_7312831, object lis_732235_733547*/
-+static void __lambda_1170(void *data, object clo, int argc, object *args) ;/*object self_7312832, object lp_732237_733549*/
-+static void __lambda_1382(void *data, object clo, int argc, object *args) ;/*object self_7312833, object lp_732237_733549*/
-+static void __lambda_1173(void *data, object clo, int argc, object *args) ;/*object self_7312834, object k_737054, object lis_732238_733550, object n_732239_733551*/
-+static void __lambda_1171(void *data, object clo, int argc, object *args) ;/*object self_7312835, object r_737053*/
-+static void __lambda_1172(void *data, object clo, int argc, object *args) ;/*object self_7312836, object r_737052*/
-+static void __lambda_1164(void *data, object clo, int argc, object *args) ;/*closure _,object k_737043, object sym_732227_733540, object name_732228_733541, object idx_732229_733542*/
-+static void __lambda_1165(void *data, object clo, int argc, object *args) ;/*object self_7312828, object k_737044, object obj_732230_733543, object val_732231_733544*/
-+static void __lambda_1166(void *data, object clo, int argc, object *args) ;/*object self_7312829, object r_737048*/
-+static void __lambda_1167(void *data, object clo, int argc, object *args) ;/*object self_7312830, object r_737046*/
-+static void __lambda_1162(void *data, object clo, int argc, object *args) ;/*closure _,object k_737035, object sym_732223_733536, object name_732224_733537, object idx_732225_733538*/
-+static void __lambda_1163(void *data, object clo, int argc, object *args) ;/*object self_7312827, object k_737036, object obj_732226_733539*/
-+static void __lambda_1159(void *data, object clo, int argc, object *args) ;/*closure _,object k_737028, object name_732212_733532, object obj_732213_733533, object field_732214_733534*/
-+static void __lambda_1161(void *data, object clo, int argc, object *args) ;/*object self_7312825, object idx_732217_733535*/
-+static void __lambda_1160(void *data, object clo, int argc, object *args) ;/*object self_7312826, object k_737031*/
-+static void __lambda_1156(void *data, object clo, int argc, object *args) ;/*closure _,object k_737024, object name_732207_733527, object obj_732208_733528, object idx_732209_733529, object val_732210_733530*/
-+static void __lambda_1157(void *data, object clo, int argc, object *args) ;/*object self_7312823, object vec_732211_733531*/
-+static void __lambda_1158(void *data, object clo, int argc, object *args) ;/*object self_7312824, object r_737025*/
-+static void __lambda_1155(void *data, object clo, int argc, object *args) ;/*closure _,object k_737020, object name_732204_733524, object sym_732205_733525*/
-+static void __lambda_1150(void *data, object clo, int argc, object *args) ;/*closure _,object k_737009, object make_732194_733519, object name_732195_733520*/
-+static void __lambda_1151(void *data, object clo, int argc, object *args) ;/*object self_7312819, object k_737010, object args_732196_733521_raw, ...*/
-+static void __lambda_1152(void *data, object clo, int argc, object *args) ;/*object self_7312820, object field_91values_732202_733523*/
-+static void __lambda_1154(void *data, object clo, int argc, object *args) ;/*object self_7312821, object r_737013*/
-+static void __lambda_1153(void *data, object clo, int argc, object *args) ;/*object self_7312822, object k_737014*/
-+static void __lambda_1147(void *data, object clo, int argc, object *args) ;/*closure _,object k_737002, object make_732184_733514, object name_732185_733515*/
-+static void __lambda_1148(void *data, object clo, int argc, object *args) ;/*object self_7312817, object k_737003, object args_732186_733516_raw, ...*/
-+static void __lambda_1149(void *data, object clo, int argc, object *args) ;/*object self_7312818, object field_91values_732192_733518*/
-+static void __lambda_1144(void *data, object clo, int argc, object *args) ;/*closure _,object k_736996, object pred_732180_733511, object name_732181_733512*/
-+static void __lambda_1145(void *data, object clo, int argc, object *args) ;/*object self_7312815, object k_736997, object obj_732182_733513*/
-+static void __lambda_1146(void *data, object clo, int argc, object *args) ;/*object self_7312816, object r_736998*/
-+static void __lambda_1143(void *data, object clo, int argc, object *args) ;/*closure _,object k_736993, object name_732177_733508, object parent_732178_733509, object field_91tags_732179_733510*/
-+static void __lambda_1092(void *data, object clo, int argc, object *args) ;/*closure _,object k_736688, object expr_731818_731896_732071_733402, object rename_731819_731897_732072_733403, object compare_731820_731898_732073_733404*/
-+static void __lambda_1093(void *data, object clo, int argc, object *args) ;/*object self_7312765, object v_931_731827_732052_732165_733496*/
-+static void __lambda_1098(void *data, object clo, int argc, object *args) ;/*object self_7312766, object tmp_731900_731902_732074_733405*/
-+static void __lambda_1142(void *data, object clo, int argc, object *args) ;/*object self_7312767, object r_736689*/
-+static void __lambda_1099(void *data, object clo, int argc, object *args) ;/*object self_7312768, object k_736691*/
-+static void __lambda_1100(void *data, object clo, int argc, object *args) ;/*object self_7312769, object v_9310_731836_732030_732151_733482*/
-+static void __lambda_1109(void *data, object clo, int argc, object *args) ;/*object self_7312770, object tmp_731904_731906_732075_733406*/
-+static void __lambda_1110(void *data, object clo, int argc, object *args) ;/*object self_7312771, object v_9321_731847_732003_732133_733464*/
-+static void __lambda_1120(void *data, object clo, int argc, object *args) ;/*object self_7312772, object tmp_731908_731910_732076_733407*/
-+static void __lambda_1121(void *data, object clo, int argc, object *args) ;/*object self_7312773, object v_9334_731860_731989_732124_733455*/
-+static void __lambda_1124(void *data, object clo, int argc, object *args) ;/*object self_7312774, object tmp_731912_731914_732077_733408*/
-+static void __lambda_1125(void *data, object clo, int argc, object *args) ;/*object self_7312775, object v_9341_731867_731970_732111_733442*/
-+static void __lambda_1129(void *data, object clo, int argc, object *args) ;/*object self_7312776, object tmp_731916_731918_732078_733409*/
-+static void __lambda_1130(void *data, object clo, int argc, object *args) ;/*object self_7312777, object v_9350_731876_731951_732098_733429*/
-+static void __lambda_1134(void *data, object clo, int argc, object *args) ;/*object self_7312778, object tmp_731920_731922_732079_733410*/
-+static void __lambda_1135(void *data, object clo, int argc, object *args) ;/*object self_7312779, object v_9359_731885_731927_732081_733412*/
-+static void __lambda_1140(void *data, object clo, int argc, object *args) ;/*object self_7312780, object tmp_731924_731926_732080_733411*/
-+static void __lambda_1141(void *data, object clo, int argc, object *args) ;/*object self_7312781, object r_736698*/
-+static void __lambda_1136(void *data, object clo, int argc, object *args) ;/*object self_7312782, object k_736700*/
-+static void __lambda_1137(void *data, object clo, int argc, object *args) ;/*object self_7312783, object r_736719*/
-+static void __lambda_1138(void *data, object clo, int argc, object *args) ;/*object self_7312784, object r_736737*/
-+static void __lambda_1139(void *data, object clo, int argc, object *args) ;/*object self_7312785, object r_736730_7310274_7310283*/
-+static void __lambda_1131(void *data, object clo, int argc, object *args) ;/*object self_7312786, object k_736744*/
-+static void __lambda_1132(void *data, object clo, int argc, object *args) ;/*object self_7312787, object r_736760*/
-+static void __lambda_1133(void *data, object clo, int argc, object *args) ;/*object self_7312788, object r_736770*/
-+static void __lambda_1126(void *data, object clo, int argc, object *args) ;/*object self_7312789, object k_736777*/
-+static void __lambda_1127(void *data, object clo, int argc, object *args) ;/*object self_7312790, object r_736793*/
-+static void __lambda_1128(void *data, object clo, int argc, object *args) ;/*object self_7312791, object r_736801*/
-+static void __lambda_1122(void *data, object clo, int argc, object *args) ;/*object self_7312792, object k_736810*/
-+static void __lambda_1123(void *data, object clo, int argc, object *args) ;/*object self_7312793, object r_736823*/
-+static void __lambda_1111(void *data, object clo, int argc, object *args) ;/*object self_7312794, object k_736832*/
-+static void __lambda_1112(void *data, object clo, int argc, object *args) ;/*object self_7312795, object r_736901*/
-+static void __lambda_1113(void *data, object clo, int argc, object *args) ;/*object self_7312796, object r_736843*/
-+static void __lambda_1114(void *data, object clo, int argc, object *args) ;/*object self_7312797, object r_736855*/
-+static void __lambda_1115(void *data, object clo, int argc, object *args) ;/*object self_7312798, object r_736894*/
-+static void __lambda_1116(void *data, object clo, int argc, object *args) ;/*object self_7312799, object r_736864_7310093_7310111_7310128*/
-+static void __lambda_1117(void *data, object clo, int argc, object *args) ;/*object self_7312800, object r_736867_7310094_7310112_7310129*/
-+static void __lambda_1118(void *data, object clo, int argc, object *args) ;/*object self_7312801, object r_736885_7310095_7310113_7310130*/
-+static void __lambda_1119(void *data, object clo, int argc, object *args) ;/*object self_7312802, object r_736876_7310098_7310116_7310133_7310146_7310158*/
-+static void __lambda_1101(void *data, object clo, int argc, object *args) ;/*object self_7312803, object k_736904*/
-+static void __lambda_1102(void *data, object clo, int argc, object *args) ;/*object self_7312804, object r_736962*/
-+static void __lambda_1103(void *data, object clo, int argc, object *args) ;/*object self_7312805, object r_736915*/
-+static void __lambda_1104(void *data, object clo, int argc, object *args) ;/*object self_7312806, object r_736924*/
-+static void __lambda_1105(void *data, object clo, int argc, object *args) ;/*object self_7312807, object r_736955*/
-+static void __lambda_1106(void *data, object clo, int argc, object *args) ;/*object self_7312808, object r_736933_7310006_7310020_7310033*/
-+static void __lambda_1107(void *data, object clo, int argc, object *args) ;/*object self_7312809, object r_736936_7310007_7310021_7310034*/
-+static void __lambda_1108(void *data, object clo, int argc, object *args) ;/*object self_7312810, object r_736946_7310008_7310022_7310035*/
-+static void __lambda_1094(void *data, object clo, int argc, object *args) ;/*object self_7312811, object k_736965*/
-+static void __lambda_1095(void *data, object clo, int argc, object *args) ;/*object self_7312812, object r_736987*/
-+static void __lambda_1096(void *data, object clo, int argc, object *args) ;/*object self_7312813, object r_736973*/
-+static void __lambda_1097(void *data, object clo, int argc, object *args) ;/*object self_7312814, object r_736982*/
-+static void __lambda_1060(void *data, object clo, int argc, object *args) ;/*closure _,object k_736475, object expr_731760_731776_731799_733387, object rename_731761_731777_731800_733388, object compare_731762_731778_731801_733389*/
-+static void __lambda_1061(void *data, object clo, int argc, object *args) ;/*object self_7312734, object v_931_731769_731783_731803_733391*/
-+static void __lambda_1088(void *data, object clo, int argc, object *args) ;/*object self_7312735, object tmp_731780_731782_731802_733390*/
-+static void __lambda_1091(void *data, object clo, int argc, object *args) ;/*object self_7312736, object r_736476*/
-+static void __lambda_1089(void *data, object clo, int argc, object *args) ;/*object self_7312737, object k_736478*/
-+static void __lambda_1090(void *data, object clo, int argc, object *args) ;/*object self_7312738, object r_736479*/
-+static void __lambda_1062(void *data, object clo, int argc, object *args) ;/*object self_7312739, object k_736481*/
-+static void __lambda_1063(void *data, object clo, int argc, object *args) ;/*object self_7312740, object r_736497*/
-+static void __lambda_1064(void *data, object clo, int argc, object *args) ;/*object self_7312741, object r_736503*/
-+static void __lambda_1065(void *data, object clo, int argc, object *args) ;/*object self_7312742, object r_736680*/
-+static void __lambda_1066(void *data, object clo, int argc, object *args) ;/*object self_7312743, object r_736512_738058*/
-+static void __lambda_1067(void *data, object clo, int argc, object *args) ;/*object self_7312744, object r_736574_738059*/
-+static void __lambda_1068(void *data, object clo, int argc, object *args) ;/*object self_7312745, object r_736674_738060*/
-+static void __lambda_1069(void *data, object clo, int argc, object *args) ;/*object self_7312746, object r_736586_738062_738137*/
-+static void __lambda_1070(void *data, object clo, int argc, object *args) ;/*object self_7312747, object r_736592_738063_738138*/
-+static void __lambda_1071(void *data, object clo, int argc, object *args) ;/*object self_7312748, object r_736668_738064_738139*/
-+static void __lambda_1072(void *data, object clo, int argc, object *args) ;/*object self_7312749, object r_736601_738066_738141_738212*/
-+static void __lambda_1073(void *data, object clo, int argc, object *args) ;/*object self_7312750, object r_736607_738067_738142_738213*/
-+static void __lambda_1074(void *data, object clo, int argc, object *args) ;/*object self_7312751, object r_736616_738068_738143_738214*/
-+static void __lambda_1075(void *data, object clo, int argc, object *args) ;/*object self_7312752, object r_736661_738069_738144_738215*/
-+static void __lambda_1076(void *data, object clo, int argc, object *args) ;/*object self_7312753, object r_736625_738073_738148_738219_738285_738350_738414*/
-+static void __lambda_1077(void *data, object clo, int argc, object *args) ;/*object self_7312754, object r_736630_738074_738149_738220_738286_738351_738415*/
-+static void __lambda_1078(void *data, object clo, int argc, object *args) ;/*object self_7312755, object r_736636_738075_738150_738221_738287_738352_738416*/
-+static void __lambda_1079(void *data, object clo, int argc, object *args) ;/*object self_7312756, object r_736645_738076_738151_738222_738288_738353_738417*/
-+static void __lambda_1080(void *data, object clo, int argc, object *args) ;/*object self_7312757, object r_736648_738077_738152_738223_738289_738354_738418*/
-+static void __lambda_1081(void *data, object clo, int argc, object *args) ;/*object self_7312758, object r_736521_738104_738179_738250_738316_738381_738445_738503_738560_738616_738671_738725_738778_738830_738881_738931_738980_739028_739075_739121_739166_739210_739253_739295_739336_739376_739415_739453_739490_739526_739561_739595_739628*/
-+static void __lambda_1082(void *data, object clo, int argc, object *args) ;/*object self_7312759, object r_736530_738105_738180_738251_738317_738382_738446_738504_738561_738617_738672_738726_738779_738831_738882_738932_738981_739029_739076_739122_739167_739211_739254_739296_739337_739377_739416_739454_739491_739527_739562_739596_739629*/
-+static void __lambda_1083(void *data, object clo, int argc, object *args) ;/*object self_7312760, object r_736560_738106_738181_738252_738318_738383_738447_738505_738562_738618_738673_738727_738780_738832_738883_738933_738982_739030_739077_739123_739168_739212_739255_739297_739338_739378_739417_739455_739492_739528_739563_739597_739630*/
-+static void __lambda_1084(void *data, object clo, int argc, object *args) ;/*object self_7312761, object r_736566_738107_738182_738253_738319_738384_738448_738506_738563_738619_738674_738728_738781_738833_738884_738934_738983_739031_739078_739124_739169_739213_739256_739298_739339_739379_739418_739456_739493_739529_739564_739598_739631*/
-+static void __lambda_1085(void *data, object clo, int argc, object *args) ;/*object self_7312762, object r_736539_738113_738188_738259_738325_738390_738454_738512_738569_738625_738680_738734_738787_738839_738890_738940_738989_739037_739084_739130_739175_739219_739262_739304_739345_739385_739424_739462_739499_739535_739570_739604_739637_739665_739692_739718_739743_739767*/
-+static void __lambda_1086(void *data, object clo, int argc, object *args) ;/*object self_7312763, object r_736545_738114_738189_738260_738326_738391_738455_738513_738570_738626_738681_738735_738788_738840_738891_738941_738990_739038_739085_739131_739176_739220_739263_739305_739346_739386_739425_739463_739500_739536_739571_739605_739638_739666_739693_739719_739744_739768*/
-+static void __lambda_1087(void *data, object clo, int argc, object *args) ;/*object self_7312764, object r_736551_738115_738190_738261_738327_738392_738456_738514_738571_738627_738682_738736_738789_738841_738892_738942_738991_739039_739086_739132_739177_739221_739264_739306_739347_739387_739426_739464_739501_739537_739572_739606_739639_739667_739694_739720_739745_739769*/
-+static void __lambda_1052(void *data, object clo, int argc, object *args) ;/*closure _,object k_736450, object expr_731711_731725_731744_733375, object rename_731712_731726_731745_733376, object compare_731713_731727_731746_733377*/
-+static void __lambda_1053(void *data, object clo, int argc, object *args) ;/*object self_7312727, object v_931_731720_731732_731748_733379*/
-+static void __lambda_1056(void *data, object clo, int argc, object *args) ;/*object self_7312728, object tmp_731729_731731_731747_733378*/
-+static void __lambda_1059(void *data, object clo, int argc, object *args) ;/*object self_7312729, object r_736451*/
-+static void __lambda_1057(void *data, object clo, int argc, object *args) ;/*object self_7312730, object k_736453*/
-+static void __lambda_1058(void *data, object clo, int argc, object *args) ;/*object self_7312731, object r_736454*/
-+static void __lambda_1054(void *data, object clo, int argc, object *args) ;/*object self_7312732, object k_736456*/
-+static void __lambda_1055(void *data, object clo, int argc, object *args) ;/*object self_7312733, object r_736466*/
-+static void __lambda_1032(void *data, object clo, int argc, object *args) ;/*closure _,object k_736340, object expr_731576_731608_731669_733337, object rename_731577_731609_731670_733338, object compare_731578_731610_731671_733339*/
-+static void __lambda_1033(void *data, object clo, int argc, object *args) ;/*object self_7312708, object v_931_731585_731663_731703_733371*/
-+static void __lambda_1036(void *data, object clo, int argc, object *args) ;/*object self_7312709, object tmp_731612_731614_731672_733340*/
-+static void __lambda_1051(void *data, object clo, int argc, object *args) ;/*object self_7312710, object r_736341*/
-+static void __lambda_1037(void *data, object clo, int argc, object *args) ;/*object self_7312711, object k_736343*/
-+static void __lambda_1038(void *data, object clo, int argc, object *args) ;/*object self_7312712, object v_934_731588_731641_731688_733356*/
-+static void __lambda_1042(void *data, object clo, int argc, object *args) ;/*object self_7312713, object tmp_731616_731618_731673_733341*/
-+static void __lambda_1043(void *data, object clo, int argc, object *args) ;/*object self_7312714, object v_9315_731599_731623_731675_733343*/
-+static void __lambda_1049(void *data, object clo, int argc, object *args) ;/*object self_7312715, object tmp_731620_731622_731674_733342*/
-+static void __lambda_1050(void *data, object clo, int argc, object *args) ;/*object self_7312716, object r_736346*/
-+static void __lambda_1044(void *data, object clo, int argc, object *args) ;/*object self_7312717, object k_736348*/
-+static void __lambda_1045(void *data, object clo, int argc, object *args) ;/*object self_7312718, object r_736363*/
-+static void __lambda_1046(void *data, object clo, int argc, object *args) ;/*object self_7312719, object r_736386*/
-+static void __lambda_1047(void *data, object clo, int argc, object *args) ;/*object self_7312720, object r_736372_737982_737994_738005*/
-+static void __lambda_1048(void *data, object clo, int argc, object *args) ;/*object self_7312721, object r_736380_737983_737995_738006*/
-+static void __lambda_1039(void *data, object clo, int argc, object *args) ;/*object self_7312722, object k_736397*/
-+static void __lambda_1040(void *data, object clo, int argc, object *args) ;/*object self_7312723, object r_736416*/
-+static void __lambda_1041(void *data, object clo, int argc, object *args) ;/*object self_7312724, object r_736425_737943_737951_737958*/
-+static void __lambda_1034(void *data, object clo, int argc, object *args) ;/*object self_7312725, object k_736439*/
-+static void __lambda_1035(void *data, object clo, int argc, object *args) ;/*object self_7312726, object r_736445*/
-+static void __lambda_1011(void *data, object clo, int argc, object *args) ;/*closure _,object k_736289, object expr_731490_731511_731546_733311, object rename_731491_731512_731547_733312, object compare_731492_731513_731548_733313*/
-+static void __lambda_1012(void *data, object clo, int argc, object *args) ;/*object self_7312687, object v_931_731499_731518_731550_733315*/
-+static void __lambda_1028(void *data, object clo, int argc, object *args) ;/*object self_7312688, object tmp_731515_731517_731549_733314*/
-+static void __lambda_1031(void *data, object clo, int argc, object *args) ;/*object self_7312689, object r_736290*/
-+static void __lambda_1029(void *data, object clo, int argc, object *args) ;/*object self_7312690, object k_736292*/
-+static void __lambda_1030(void *data, object clo, int argc, object *args) ;/*object self_7312691, object r_736293*/
-+static void __lambda_1013(void *data, object clo, int argc, object *args) ;/*object self_7312692, object k_736295*/
-+static void __lambda_1014(void *data, object clo, int argc, object *args) ;/*object self_7312693, object w_933_731501_731522_731552_733317, object var_91ls5_731503_731523_731553_733318, object val_91ls6_731504_731524_731554_733319*/
-+static void __lambda_1015(void *data, object clo, int argc, object *args) ;/*object self_7312694, object lp_934_731502_731525_731555_733320*/
-+static void __lambda_1381(void *data, object clo, int argc, object *args) ;/*object self_7312695, object lp_934_731502_731525_731555_733320*/
-+static void __lambda_1018(void *data, object clo, int argc, object *args) ;/*object self_7312696, object k_736302, object w_933_731501_731526_731556_733321, object var_91ls5_731503_731527_731557_733322, object val_91ls6_731504_731528_731558_733323*/
-+static void __lambda_1019(void *data, object clo, int argc, object *args) ;/*object self_7312697, object r_736304_7311674*/
-+static void __lambda_1020(void *data, object clo, int argc, object *args) ;/*object self_7312698, object r_736305_7311675_7311686*/
-+static void __lambda_1021(void *data, object clo, int argc, object *args) ;/*object self_7312699, object var_731529_731559_733324_7311676_7311687, object val_731530_731560_733325_7311677_7311688*/
-+static void __lambda_1022(void *data, object clo, int argc, object *args) ;/*object self_7312700, object r_736308_7311678_7311689*/
-+static void __lambda_1026(void *data, object clo, int argc, object *args) ;/*object self_7312701, object k_736316_7311682_7311693, object var_731533_731563_733328_7311683_7311694, object val_731534_731564_733329_7311684_7311695*/
-+static void __lambda_1027(void *data, object clo, int argc, object *args) ;/*object self_7312702, object r_736317_7311685_7311696*/
-+static void __lambda_1023(void *data, object clo, int argc, object *args) ;/*object self_7312703, object r_736315_7311679_7311690*/
-+static void __lambda_1024(void *data, object clo, int argc, object *args) ;/*object self_7312704, object r_736314_7311680_7311691*/
-+static void __lambda_1025(void *data, object clo, int argc, object *args) ;/*object self_7312705, object r_736312_7311681_7311692*/
-+static void __lambda_1016(void *data, object clo, int argc, object *args) ;/*object self_7312706, object r_736301*/
-+static void __lambda_1017(void *data, object clo, int argc, object *args) ;/*object self_7312707, object r_736300*/
-+static void __lambda_796(void *data, object clo, int argc, object *args) ;/*closure _,object k_735831, object expr_731232_733168, object rename_731233_733169, object compare_731234_733170*/
-+static void __lambda_797(void *data, object clo, int argc, object *args) ;/*object self_7312455, object r_736286*/
-+static void __lambda_798(void *data, object clo, int argc, object *args) ;/*object self_7312456, object r_735832*/
-+static void __lambda_799(void *data, object clo, int argc, object *args) ;/*object self_7312457, object r_735833*/
-+static void __lambda_800(void *data, object clo, int argc, object *args) ;/*object self_7312458, object r_735834*/
-+static void __lambda_801(void *data, object clo, int argc, object *args) ;/*object self_7312459, object r_735835*/
-+static void __lambda_802(void *data, object clo, int argc, object *args) ;/*object self_7312460, object r_735836*/
-+static void __lambda_803(void *data, object clo, int argc, object *args) ;/*object self_7312461, object r_735837*/
-+static void __lambda_804(void *data, object clo, int argc, object *args) ;/*object self_7312462, object r_735838*/
-+static void __lambda_805(void *data, object clo, int argc, object *args) ;/*object self_7312463, object r_735839*/
-+static void __lambda_806(void *data, object clo, int argc, object *args) ;/*object self_7312464, object r_735840*/
-+static void __lambda_807(void *data, object clo, int argc, object *args) ;/*object self_7312465, object r_735841*/
-+static void __lambda_808(void *data, object clo, int argc, object *args) ;/*object self_7312466, object r_735842*/
-+static void __lambda_809(void *data, object clo, int argc, object *args) ;/*object self_7312467, object r_735843*/
-+static void __lambda_810(void *data, object clo, int argc, object *args) ;/*object self_7312468, object r_735844*/
-+static void __lambda_811(void *data, object clo, int argc, object *args) ;/*object self_7312469, object r_735845*/
-+static void __lambda_812(void *data, object clo, int argc, object *args) ;/*object self_7312470, object r_735846*/
-+static void __lambda_813(void *data, object clo, int argc, object *args) ;/*object self_7312471, object r_735847*/
-+static void __lambda_814(void *data, object clo, int argc, object *args) ;/*object self_7312472, object r_735848*/
-+static void __lambda_815(void *data, object clo, int argc, object *args) ;/*object self_7312473, object r_735849*/
-+static void __lambda_816(void *data, object clo, int argc, object *args) ;/*object self_7312474, object r_735850*/
-+static void __lambda_817(void *data, object clo, int argc, object *args) ;/*object self_7312475, object r_735851*/
-+static void __lambda_818(void *data, object clo, int argc, object *args) ;/*object self_7312476, object r_735852*/
-+static void __lambda_819(void *data, object clo, int argc, object *args) ;/*object self_7312477, object r_735853*/
-+static void __lambda_820(void *data, object clo, int argc, object *args) ;/*object self_7312478, object r_735854*/
-+static void __lambda_821(void *data, object clo, int argc, object *args) ;/*object self_7312479, object r_735855*/
-+static void __lambda_822(void *data, object clo, int argc, object *args) ;/*object self_7312480, object r_735856*/
-+static void __lambda_823(void *data, object clo, int argc, object *args) ;/*object self_7312481, object r_735857*/
-+static void __lambda_824(void *data, object clo, int argc, object *args) ;/*object self_7312482, object r_735858*/
-+static void __lambda_825(void *data, object clo, int argc, object *args) ;/*object self_7312483, object r_735859*/
-+static void __lambda_826(void *data, object clo, int argc, object *args) ;/*object self_7312484, object r_735860*/
-+static void __lambda_827(void *data, object clo, int argc, object *args) ;/*object self_7312485, object r_735861*/
-+static void __lambda_828(void *data, object clo, int argc, object *args) ;/*object self_7312486, object r_735862*/
-+static void __lambda_829(void *data, object clo, int argc, object *args) ;/*object self_7312487, object r_735863*/
-+static void __lambda_830(void *data, object clo, int argc, object *args) ;/*object self_7312488, object r_735864*/
-+static void __lambda_831(void *data, object clo, int argc, object *args) ;/*object self_7312489, object r_735865*/
-+static void __lambda_832(void *data, object clo, int argc, object *args) ;/*object self_7312490, object r_735866*/
-+static void __lambda_833(void *data, object clo, int argc, object *args) ;/*object self_7312491, object r_735867*/
-+static void __lambda_834(void *data, object clo, int argc, object *args) ;/*object self_7312492, object ellipsis_91specified_127_731235_733183, object count_731236_733184, object _191er_91macro_91transformer_731237_733185, object _191lambda_731238_733186, object _191let_731239_733187, object _191begin_731240_733188, object _191if_731241_733189, object _191and_731242_733190, object _191or_731243_733191, object _191eq_127_731244_733192, object _191equal_127_731245_733193, object _191car_731246_733194, object _191cdr_731247_733195, object _191cons_731248_733196, object _191pair_127_731249_733197, object _191null_127_731250_733198, object _191expr_731251_733199, object _191rename_731252_733200, object _191compare_731253_733201, object _191quote_731254_733202, object _191apply_731255_733203, object _191append_731256_733204, object _191map_731257_733205, object _191vector_127_731258_733206, object _191list_127_731259_733207, object _191len_731260_733208, object _191length_731261_
733209, object _191_91_731262_733210, object _191_125_123_731263_733211, object _191error_731264_733212, object _191ls_731265_733213, object _191res_731266_733214, object _191i_731267_733215, object _191reverse_731268_733216, object _191vector_91_125list_731269_733217, object _191list_91_125vector_731270_733218, object _191cons3_731271_733219*/
-+static void __lambda_1380(void *data, object clo, int argc, object *args) ;/*object self_7312493, object count_731236_733184*/
-+static void __lambda_835(void *data, object clo, int argc, object *args) ;/*object self_7312494, object ellipsis_733220, object lits_733221, object forms_733222, object next_91symbol_733223, object expand_91pattern_733224, object ellipsis_91escape_127_733225, object ellipsis_127_733226, object ellipsis_91depth_733227, object ellipsis_91tail_733228, object all_91vars_733229, object free_91vars_733230, object expand_91template_733231*/
-+static void __lambda_1379(void *data, object clo, int argc, object *args) ;/*object self_7312495, object ellipsis_733220*/
-+static void __lambda_1378(void *data, object clo, int argc, object *args) ;/*object self_7312496, object lits_733221*/
-+static void __lambda_1377(void *data, object clo, int argc, object *args) ;/*object self_7312497, object forms_733222*/
-+static void __lambda_1376(void *data, object clo, int argc, object *args) ;/*object self_7312498, object next_91symbol_733223*/
-+static void __lambda_1375(void *data, object clo, int argc, object *args) ;/*object self_7312499, object expand_91pattern_733224*/
-+static void __lambda_1374(void *data, object clo, int argc, object *args) ;/*object self_7312500, object ellipsis_91escape_127_733225*/
-+static void __lambda_1373(void *data, object clo, int argc, object *args) ;/*object self_7312501, object ellipsis_127_733226*/
-+static void __lambda_1372(void *data, object clo, int argc, object *args) ;/*object self_7312502, object ellipsis_91depth_733227*/
-+static void __lambda_1371(void *data, object clo, int argc, object *args) ;/*object self_7312503, object ellipsis_91tail_733228*/
-+static void __lambda_1370(void *data, object clo, int argc, object *args) ;/*object self_7312504, object all_91vars_733229*/
-+static void __lambda_1369(void *data, object clo, int argc, object *args) ;/*object self_7312505, object free_91vars_733230*/
-+static void __lambda_1368(void *data, object clo, int argc, object *args) ;/*object self_7312506, object expand_91template_733231*/
-+static void __lambda_836(void *data, object clo, int argc, object *args) ;/*object self_7312507, object r_736248*/
-+static void __lambda_837(void *data, object clo, int argc, object *args) ;/*object self_7312508, object r_735868*/
-+static void __lambda_839(void *data, object clo, int argc, object *args) ;/*object self_7312509, object r_736245*/
-+static void __lambda_840(void *data, object clo, int argc, object *args) ;/*object self_7312510, object r_735869*/
-+static void __lambda_842(void *data, object clo, int argc, object *args) ;/*object self_7312511, object r_736242*/
-+static void __lambda_843(void *data, object clo, int argc, object *args) ;/*object self_7312512, object r_735870*/
-+static void __lambda_1006(void *data, object clo, int argc, object *args) ;/*object self_7312513, object k_736236, object s_731272_733232*/
-+static void __lambda_1007(void *data, object clo, int argc, object *args) ;/*object self_7312514, object r_736241*/
-+static void __lambda_1008(void *data, object clo, int argc, object *args) ;/*object self_7312515, object r_736237*/
-+static void __lambda_1009(void *data, object clo, int argc, object *args) ;/*object self_7312516, object r_736240*/
-+static void __lambda_1010(void *data, object clo, int argc, object *args) ;/*object self_7312517, object r_736239*/
-+static void __lambda_844(void *data, object clo, int argc, object *args) ;/*object self_7312518, object r_736235*/
-+static void __lambda_845(void *data, object clo, int argc, object *args) ;/*object self_7312519, object r_735871*/
-+static void __lambda_944(void *data, object clo, int argc, object *args) ;/*object self_7312520, object k_736020, object pat_731273_733233, object tmpl_731274_733234*/
-+static void __lambda_1004(void *data, object clo, int argc, object *args) ;/*object self_7312521, object k_736233, object vars_731353_733264*/
-+static void __lambda_1005(void *data, object clo, int argc, object *args) ;/*object self_7312522, object r_736234*/
-+static void __lambda_945(void *data, object clo, int argc, object *args) ;/*object self_7312523, object r_736024*/
-+static void __lambda_946(void *data, object clo, int argc, object *args) ;/*object self_7312524, object p_731276_733235, object x_731277_733236, object vars_731279_733238, object k_731280_733239*/
-+static void __lambda_947(void *data, object clo, int argc, object *args) ;/*object self_7312525, object lp_731281_733240*/
-+static void __lambda_1367(void *data, object clo, int argc, object *args) ;/*object self_7312526, object lp_731281_733240*/
-+static void __lambda_950(void *data, object clo, int argc, object *args) ;/*object self_7312527, object k_736027, object p_731282_733241, object x_731283_733242, object dim_731284_733243, object vars_731285_733244, object k_731286_733245*/
-+static void __lambda_951(void *data, object clo, int argc, object *args) ;/*object self_7312528, object v_731287_733246*/
-+static void __lambda_1003(void *data, object clo, int argc, object *args) ;/*object self_7312529, object r_736030*/
-+static void __lambda_952(void *data, object clo, int argc, object *args) ;/*object self_7312530, object k_736031*/
-+static void __lambda_953(void *data, object clo, int argc, object *args) ;/*object self_7312531, object r_736032*/
-+static void __lambda_960(void *data, object clo, int argc, object *args) ;/*object self_7312538, object r_736045*/
-+static void __lambda_1002(void *data, object clo, int argc, object *args) ;/*object self_7312580, object r_736231*/
-+static void __lambda_1001(void *data, object clo, int argc, object *args) ;/*object self_7312579, object r_736229*/
-+static void __lambda_999(void *data, object clo, int argc, object *args) ;/*object self_7312577, object r_736225*/
-+static void __lambda_1000(void *data, object clo, int argc, object *args) ;/*object self_7312578, object r_736224*/
-+static void __lambda_998(void *data, object clo, int argc, object *args) ;/*object self_7312574, object k_736219, object vars_731345_733263*/
-+static void __lambda_996(void *data, object clo, int argc, object *args) ;/*object self_7312575, object r_736218*/
-+static void __lambda_997(void *data, object clo, int argc, object *args) ;/*object self_7312576, object r_736215*/
-+static void __lambda_961(void *data, object clo, int argc, object *args) ;/*object self_7312539, object r_736212*/
-+static void __lambda_994(void *data, object clo, int argc, object *args) ;/*object self_7312566, object k_736209, object x_731301_733248*/
-+static void __lambda_995(void *data, object clo, int argc, object *args) ;/*object self_7312567, object r_736210*/
-+static void __lambda_988(void *data, object clo, int argc, object *args) ;/*object self_7312568, object r_736207*/
-+static void __lambda_989(void *data, object clo, int argc, object *args) ;/*object self_7312569, object r_736208*/
-+static void __lambda_990(void *data, object clo, int argc, object *args) ;/*object self_7312570, object r_736102*/
-+static void __lambda_991(void *data, object clo, int argc, object *args) ;/*object self_7312571, object r_736104*/
-+static void __lambda_992(void *data, object clo, int argc, object *args) ;/*object self_7312572, object len_731304_733249, object _191lp_731305_733250*/
-+static void __lambda_993(void *data, object clo, int argc, object *args) ;/*object self_7312573, object r_736124*/
-+static void __lambda_962(void *data, object clo, int argc, object *args) ;/*object self_7312540, object r_736047*/
-+static void __lambda_964(void *data, object clo, int argc, object *args) ;/*object self_7312542, object w_731321_733251*/
-+static void __lambda_965(void *data, object clo, int argc, object *args) ;/*object self_7312543, object _191lp_731324_733252*/
-+static void __lambda_966(void *data, object clo, int argc, object *args) ;/*object self_7312544, object new_91vars_731327_733253*/
-+static void __lambda_985(void *data, object clo, int argc, object *args) ;/*object self_7312545, object k_736095, object x_731341_733262*/
-+static void __lambda_986(void *data, object clo, int argc, object *args) ;/*object self_7312546, object r_736097*/
-+static void __lambda_987(void *data, object clo, int argc, object *args) ;/*object self_7312547, object r_736096*/
-+static void __lambda_967(void *data, object clo, int argc, object *args) ;/*object self_7312548, object r_736094*/
-+static void __lambda_968(void *data, object clo, int argc, object *args) ;/*object self_7312549, object ls_91vars_731330_733254*/
-+static void __lambda_980(void *data, object clo, int argc, object *args) ;/*object self_7312550, object k_736087, object _191_731338_733259*/
-+static void __lambda_984(void *data, object clo, int argc, object *args) ;/*object self_7312551, object k_736092, object x_731339_733260, object l_731340_733261*/
-+static void __lambda_981(void *data, object clo, int argc, object *args) ;/*object self_7312552, object r_736091*/
-+static void __lambda_982(void *data, object clo, int argc, object *args) ;/*object self_7312553, object r_736090*/
-+static void __lambda_983(void *data, object clo, int argc, object *args) ;/*object self_7312554, object r_736088*/
-+static void __lambda_969(void *data, object clo, int argc, object *args) ;/*object self_7312555, object r_736086*/
-+static void __lambda_970(void *data, object clo, int argc, object *args) ;/*object self_7312556, object once_731333_733255*/
-+static void __lambda_979(void *data, object clo, int argc, object *args) ;/*object self_7312557, object k_736079, object x_731335_733256*/
-+static void __lambda_971(void *data, object clo, int argc, object *args) ;/*object self_7312558, object r_736078*/
-+static void __lambda_972(void *data, object clo, int argc, object *args) ;/*object self_7312559, object r_736077*/
-+static void __lambda_978(void *data, object clo, int argc, object *args) ;/*object self_7312560, object k_736073, object x_731336_733257, object l_731337_733258*/
-+static void __lambda_973(void *data, object clo, int argc, object *args) ;/*object self_7312561, object r_736072*/
-+static void __lambda_974(void *data, object clo, int argc, object *args) ;/*object self_7312562, object r_736069*/
-+static void __lambda_975(void *data, object clo, int argc, object *args) ;/*object self_7312563, object r_736071*/
-+static void __lambda_976(void *data, object clo, int argc, object *args) ;/*object self_7312564, object r_736070*/
-+static void __lambda_977(void *data, object clo, int argc, object *args) ;/*object self_7312565, object r_736066*/
-+static void __lambda_963(void *data, object clo, int argc, object *args) ;/*object self_7312541, object r_736051*/
-+static void __lambda_959(void *data, object clo, int argc, object *args) ;/*object self_7312532, object k_736044, object l_731291_733247*/
-+static void __lambda_954(void *data, object clo, int argc, object *args) ;/*object self_7312533, object r_736043*/
-+static void __lambda_955(void *data, object clo, int argc, object *args) ;/*object self_7312534, object r_736033*/
-+static void __lambda_958(void *data, object clo, int argc, object *args) ;/*object self_7312537, object r_736039*/
-+static void __lambda_956(void *data, object clo, int argc, object *args) ;/*object self_7312535, object r_736037*/
-+static void __lambda_957(void *data, object clo, int argc, object *args) ;/*object self_7312536, object r_736035*/
-+static void __lambda_948(void *data, object clo, int argc, object *args) ;/*object self_7312581, object r_736026*/
-+static void __lambda_949(void *data, object clo, int argc, object *args) ;/*object self_7312582, object r_736025*/
-+static void __lambda_846(void *data, object clo, int argc, object *args) ;/*object self_7312583, object r_736019*/
-+static void __lambda_847(void *data, object clo, int argc, object *args) ;/*object self_7312584, object r_735872*/
-+static void __lambda_943(void *data, object clo, int argc, object *args) ;/*object self_7312585, object k_736016, object x_731354_733265*/
-+static void __lambda_848(void *data, object clo, int argc, object *args) ;/*object self_7312586, object r_736015*/
-+static void __lambda_849(void *data, object clo, int argc, object *args) ;/*object self_7312587, object r_735873*/
-+static void __lambda_942(void *data, object clo, int argc, object *args) ;/*object self_7312588, object k_736010, object x_731356_733266*/
-+static void __lambda_850(void *data, object clo, int argc, object *args) ;/*object self_7312589, object r_736009*/
-+static void __lambda_851(void *data, object clo, int argc, object *args) ;/*object self_7312590, object r_735874*/
-+static void __lambda_939(void *data, object clo, int argc, object *args) ;/*object self_7312591, object k_736005, object x_731359_733267*/
-+static void __lambda_940(void *data, object clo, int argc, object *args) ;/*object self_7312592, object r_736006*/
-+static void __lambda_941(void *data, object clo, int argc, object *args) ;/*object self_7312593, object r_736007*/
-+static void __lambda_852(void *data, object clo, int argc, object *args) ;/*object self_7312594, object r_736004*/
-+static void __lambda_853(void *data, object clo, int argc, object *args) ;/*object self_7312595, object r_735875*/
-+static void __lambda_937(void *data, object clo, int argc, object *args) ;/*object self_7312596, object k_736001, object x_731360_733268*/
-+static void __lambda_938(void *data, object clo, int argc, object *args) ;/*object self_7312597, object r_736002*/
-+static void __lambda_854(void *data, object clo, int argc, object *args) ;/*object self_7312598, object r_736000*/
-+static void __lambda_855(void *data, object clo, int argc, object *args) ;/*object self_7312599, object r_735876*/
-+static void __lambda_923(void *data, object clo, int argc, object *args) ;/*object self_7312600, object k_735979, object x_731361_733269, object dim_731362_733270*/
-+static void __lambda_924(void *data, object clo, int argc, object *args) ;/*object self_7312601, object x_731364_733271, object dim_731365_733272, object vars_731366_733273*/
-+static void __lambda_925(void *data, object clo, int argc, object *args) ;/*object self_7312602, object lp_731367_733274*/
-+static void __lambda_1366(void *data, object clo, int argc, object *args) ;/*object self_7312603, object lp_731367_733274*/
-+static void __lambda_928(void *data, object clo, int argc, object *args) ;/*object self_7312604, object k_735983, object x_731368_733275, object dim_731369_733276, object vars_731370_733277*/
-+static void __lambda_929(void *data, object clo, int argc, object *args) ;/*object self_7312605, object r_735984*/
-+static void __lambda_933(void *data, object clo, int argc, object *args) ;/*object self_7312609, object r_735989*/
-+static void __lambda_936(void *data, object clo, int argc, object *args) ;/*object self_7312612, object r_735999*/
-+static void __lambda_935(void *data, object clo, int argc, object *args) ;/*object self_7312611, object r_735996*/
-+static void __lambda_934(void *data, object clo, int argc, object *args) ;/*object self_7312610, object r_735992*/
-+static void __lambda_932(void *data, object clo, int argc, object *args) ;/*object self_7312606, object k_735988, object lit_731374_733278*/
-+static void __lambda_930(void *data, object clo, int argc, object *args) ;/*object self_7312607, object r_735987*/
-+static void __lambda_931(void *data, object clo, int argc, object *args) ;/*object self_7312608, object r_735985*/
-+static void __lambda_926(void *data, object clo, int argc, object *args) ;/*object self_7312613, object r_735982*/
-+static void __lambda_927(void *data, object clo, int argc, object *args) ;/*object self_7312614, object r_735981*/
-+static void __lambda_856(void *data, object clo, int argc, object *args) ;/*object self_7312615, object r_735978*/
-+static void __lambda_857(void *data, object clo, int argc, object *args) ;/*object self_7312616, object r_735877*/
-+static void __lambda_909(void *data, object clo, int argc, object *args) ;/*object self_7312617, object k_735961, object x_731385_733279, object vars_731386_733280, object dim_731387_733281*/
-+static void __lambda_910(void *data, object clo, int argc, object *args) ;/*object self_7312618, object x_731389_733282, object free_731390_733283*/
-+static void __lambda_911(void *data, object clo, int argc, object *args) ;/*object self_7312619, object lp_731391_733284*/
-+static void __lambda_1365(void *data, object clo, int argc, object *args) ;/*object self_7312620, object lp_731391_733284*/
-+static void __lambda_914(void *data, object clo, int argc, object *args) ;/*object self_7312621, object k_735965, object x_731392_733285, object free_731393_733286*/
-+static void __lambda_915(void *data, object clo, int argc, object *args) ;/*object self_7312622, object r_735966*/
-+static void __lambda_922(void *data, object clo, int argc, object *args) ;/*object self_7312629, object r_735977*/
-+static void __lambda_921(void *data, object clo, int argc, object *args) ;/*object self_7312628, object r_735974*/
-+static void __lambda_920(void *data, object clo, int argc, object *args) ;/*object self_7312623, object r_735967*/
-+static void __lambda_916(void *data, object clo, int argc, object *args) ;/*object self_7312624, object k_735968*/
-+static void __lambda_917(void *data, object clo, int argc, object *args) ;/*object self_7312625, object r_735969*/
-+static void __lambda_918(void *data, object clo, int argc, object *args) ;/*object self_7312626, object tmp_731400_731402_733287*/
-+static void __lambda_919(void *data, object clo, int argc, object *args) ;/*object self_7312627, object cell_731403_733288*/
-+static void __lambda_912(void *data, object clo, int argc, object *args) ;/*object self_7312630, object r_735964*/
-+static void __lambda_913(void *data, object clo, int argc, object *args) ;/*object self_7312631, object r_735963*/
-+static void __lambda_858(void *data, object clo, int argc, object *args) ;/*object self_7312632, object r_735960*/
-+static void __lambda_859(void *data, object clo, int argc, object *args) ;/*object self_7312633, object r_735878*/
-+static void __lambda_867(void *data, object clo, int argc, object *args) ;/*object self_7312634, object k_735894, object tmpl_731412_733289, object vars_731413_733290*/
-+static void __lambda_868(void *data, object clo, int argc, object *args) ;/*object self_7312635, object t_731415_733291*/
-+static void __lambda_869(void *data, object clo, int argc, object *args) ;/*object self_7312636, object lp_731417_733293*/
-+static void __lambda_1364(void *data, object clo, int argc, object *args) ;/*object self_7312637, object lp_731417_733293*/
-+static void __lambda_872(void *data, object clo, int argc, object *args) ;/*object self_7312638, object k_735897, object t_731418_733294, object dim_731419_733295*/
-+static void __lambda_873(void *data, object clo, int argc, object *args) ;/*object self_7312639, object r_735898*/
-+static void __lambda_907(void *data, object clo, int argc, object *args) ;/*object self_7312674, object r_735957*/
-+static void __lambda_908(void *data, object clo, int argc, object *args) ;/*object self_7312675, object r_735956*/
-+static void __lambda_878(void *data, object clo, int argc, object *args) ;/*object self_7312644, object r_735907*/
-+static void __lambda_881(void *data, object clo, int argc, object *args) ;/*object self_7312647, object r_735914*/
-+static void __lambda_903(void *data, object clo, int argc, object *args) ;/*object self_7312670, object r_735950*/
-+static void __lambda_904(void *data, object clo, int argc, object *args) ;/*object self_7312671, object r_735953*/
-+static void __lambda_905(void *data, object clo, int argc, object *args) ;/*object self_7312672, object r_735951*/
-+static void __lambda_906(void *data, object clo, int argc, object *args) ;/*object self_7312673, object r_735952*/
-+static void __lambda_882(void *data, object clo, int argc, object *args) ;/*object self_7312648, object depth_731442_733299*/
-+static void __lambda_883(void *data, object clo, int argc, object *args) ;/*object self_7312649, object r_735949*/
-+static void __lambda_884(void *data, object clo, int argc, object *args) ;/*object self_7312650, object ell_91vars_731448_733301*/
-+static void __lambda_886(void *data, object clo, int argc, object *args) ;/*object self_7312651, object r_735919*/
-+static void __lambda_887(void *data, object clo, int argc, object *args) ;/*object self_7312652, object r_735943*/
-+static void __lambda_888(void *data, object clo, int argc, object *args) ;/*object self_7312653, object once_731460_733302*/
-+static void __lambda_893(void *data, object clo, int argc, object *args) ;/*object self_7312654, object nest_731463_733303*/
-+static void __lambda_894(void *data, object clo, int argc, object *args) ;/*object self_7312655, object d_731470_733305, object many_731471_733306*/
-+static void __lambda_895(void *data, object clo, int argc, object *args) ;/*object self_7312656, object lp_731417_731472_733307*/
-+static void __lambda_1363(void *data, object clo, int argc, object *args) ;/*object self_7312657, object lp_731417_731472_733307*/
-+static void __lambda_902(void *data, object clo, int argc, object *args) ;/*object self_7312658, object k_735930, object d_731473_733308, object many_731474_733309*/
-+static void __lambda_896(void *data, object clo, int argc, object *args) ;/*object self_7312659, object r_735929*/
-+static void __lambda_897(void *data, object clo, int argc, object *args) ;/*object self_7312660, object r_735928*/
-+static void __lambda_898(void *data, object clo, int argc, object *args) ;/*object self_7312661, object many_731466_733304*/
-+static void __lambda_899(void *data, object clo, int argc, object *args) ;/*object self_7312662, object r_735927*/
-+static void __lambda_900(void *data, object clo, int argc, object *args) ;/*object self_7312663, object r_735926*/
-+static void __lambda_901(void *data, object clo, int argc, object *args) ;/*object self_7312664, object r_735925*/
-+static void __lambda_889(void *data, object clo, int argc, object *args) ;/*object self_7312665, object k_735934*/
-+static void __lambda_892(void *data, object clo, int argc, object *args) ;/*object self_7312666, object r_735935*/
-+static void __lambda_890(void *data, object clo, int argc, object *args) ;/*object self_7312667, object k_735938*/
-+static void __lambda_891(void *data, object clo, int argc, object *args) ;/*object self_7312668, object r_735940*/
-+static void __lambda_885(void *data, object clo, int argc, object *args) ;/*object self_7312669, object k_735944*/
-+static void __lambda_880(void *data, object clo, int argc, object *args) ;/*object self_7312645, object r_735908*/
-+static void __lambda_879(void *data, object clo, int argc, object *args) ;/*object self_7312646, object k_735909*/
-+static void __lambda_877(void *data, object clo, int argc, object *args) ;/*object self_7312640, object k_735904, object v_731430_733298*/
-+static void __lambda_874(void *data, object clo, int argc, object *args) ;/*object self_7312641, object r_735903*/
-+static void __lambda_875(void *data, object clo, int argc, object *args) ;/*object self_7312642, object tmp_731425_731427_733296*/
-+static void __lambda_876(void *data, object clo, int argc, object *args) ;/*object self_7312643, object cell_731428_733297*/
-+static void __lambda_870(void *data, object clo, int argc, object *args) ;/*object self_7312676, object r_735896*/
-+static void __lambda_871(void *data, object clo, int argc, object *args) ;/*object self_7312677, object r_735895*/
-+static void __lambda_860(void *data, object clo, int argc, object *args) ;/*object self_7312678, object r_735893*/
-+static void __lambda_861(void *data, object clo, int argc, object *args) ;/*object self_7312679, object r_735879*/
-+static void __lambda_866(void *data, object clo, int argc, object *args) ;/*object self_7312680, object k_735890, object clause_731485_733310*/
-+static void __lambda_862(void *data, object clo, int argc, object *args) ;/*object self_7312681, object r_735889*/
-+static void __lambda_863(void *data, object clo, int argc, object *args) ;/*object self_7312682, object r_735885*/
-+static void __lambda_864(void *data, object clo, int argc, object *args) ;/*object self_7312683, object r_735888*/
-+static void __lambda_865(void *data, object clo, int argc, object *args) ;/*object self_7312684, object r_735884*/
-+static void __lambda_841(void *data, object clo, int argc, object *args) ;/*object self_7312685, object k_736243*/
-+static void __lambda_838(void *data, object clo, int argc, object *args) ;/*object self_7312686, object k_736246*/
-+static void __lambda_795(void *data, object clo, int argc, object *args) ;/*closure _,object k_735828, object kar_731229_733165, object kdr_731230_733166, object source_731231_733167*/
-+static void __lambda_793(void *data, object clo, int argc, object *args) ;/*closure _,object k_735824, object pred_731221_733162, object ls_731222_733163*/
-+static void __lambda_794(void *data, object clo, int argc, object *args) ;/*object self_7312454, object tmp_731225_731227_733164*/
-+static void __lambda_791(void *data, object clo, int argc, object *args) ;/*closure _,object k_735817, object pred_731218_733160, object ls_731219_733161*/
-+static void __lambda_792(void *data, object clo, int argc, object *args) ;/*object self_7312453, object r_735819*/
++static void __lambda_1168(void *data, object clo, int argc, object *args) ;/*closure _,object k_737044, object e_732226_733538, object lst1_732227_733539*/
++static void __lambda_1169(void *data, object clo, int argc, object *args) ;/*object self_7312824, object lis_732229_733540*/
++static void __lambda_1170(void *data, object clo, int argc, object *args) ;/*object self_7312825, object lp_732231_733542*/
++static void __lambda_1382(void *data, object clo, int argc, object *args) ;/*object self_7312826, object lp_732231_733542*/
++static void __lambda_1173(void *data, object clo, int argc, object *args) ;/*object self_7312827, object k_737047, object lis_732232_733543, object n_732233_733544*/
++static void __lambda_1171(void *data, object clo, int argc, object *args) ;/*object self_7312828, object r_737046*/
++static void __lambda_1172(void *data, object clo, int argc, object *args) ;/*object self_7312829, object r_737045*/
++static void __lambda_1164(void *data, object clo, int argc, object *args) ;/*closure _,object k_737036, object sym_732221_733533, object name_732222_733534, object idx_732223_733535*/
++static void __lambda_1165(void *data, object clo, int argc, object *args) ;/*object self_7312821, object k_737037, object obj_732224_733536, object val_732225_733537*/
++static void __lambda_1166(void *data, object clo, int argc, object *args) ;/*object self_7312822, object r_737041*/
++static void __lambda_1167(void *data, object clo, int argc, object *args) ;/*object self_7312823, object r_737039*/
++static void __lambda_1162(void *data, object clo, int argc, object *args) ;/*closure _,object k_737028, object sym_732217_733529, object name_732218_733530, object idx_732219_733531*/
++static void __lambda_1163(void *data, object clo, int argc, object *args) ;/*object self_7312820, object k_737029, object obj_732220_733532*/
++static void __lambda_1159(void *data, object clo, int argc, object *args) ;/*closure _,object k_737021, object name_732206_733525, object obj_732207_733526, object field_732208_733527*/
++static void __lambda_1161(void *data, object clo, int argc, object *args) ;/*object self_7312818, object idx_732211_733528*/
++static void __lambda_1160(void *data, object clo, int argc, object *args) ;/*object self_7312819, object k_737024*/
++static void __lambda_1156(void *data, object clo, int argc, object *args) ;/*closure _,object k_737017, object name_732201_733520, object obj_732202_733521, object idx_732203_733522, object val_732204_733523*/
++static void __lambda_1157(void *data, object clo, int argc, object *args) ;/*object self_7312816, object vec_732205_733524*/
++static void __lambda_1158(void *data, object clo, int argc, object *args) ;/*object self_7312817, object r_737018*/
++static void __lambda_1155(void *data, object clo, int argc, object *args) ;/*closure _,object k_737013, object name_732198_733517, object sym_732199_733518*/
++static void __lambda_1150(void *data, object clo, int argc, object *args) ;/*closure _,object k_737002, object make_732188_733512, object name_732189_733513*/
++static void __lambda_1151(void *data, object clo, int argc, object *args) ;/*object self_7312812, object k_737003, object args_732190_733514_raw, ...*/
++static void __lambda_1152(void *data, object clo, int argc, object *args) ;/*object self_7312813, object field_91values_732196_733516*/
++static void __lambda_1154(void *data, object clo, int argc, object *args) ;/*object self_7312814, object r_737006*/
++static void __lambda_1153(void *data, object clo, int argc, object *args) ;/*object self_7312815, object k_737007*/
++static void __lambda_1147(void *data, object clo, int argc, object *args) ;/*closure _,object k_736995, object make_732178_733507, object name_732179_733508*/
++static void __lambda_1148(void *data, object clo, int argc, object *args) ;/*object self_7312810, object k_736996, object args_732180_733509_raw, ...*/
++static void __lambda_1149(void *data, object clo, int argc, object *args) ;/*object self_7312811, object field_91values_732186_733511*/
++static void __lambda_1144(void *data, object clo, int argc, object *args) ;/*closure _,object k_736989, object pred_732174_733504, object name_732175_733505*/
++static void __lambda_1145(void *data, object clo, int argc, object *args) ;/*object self_7312808, object k_736990, object obj_732176_733506*/
++static void __lambda_1146(void *data, object clo, int argc, object *args) ;/*object self_7312809, object r_736991*/
++static void __lambda_1143(void *data, object clo, int argc, object *args) ;/*closure _,object k_736986, object name_732171_733501, object parent_732172_733502, object field_91tags_732173_733503*/
++static void __lambda_1092(void *data, object clo, int argc, object *args) ;/*closure _,object k_736681, object expr_731813_731890_732065_733395, object rename_731814_731891_732066_733396, object compare_731815_731892_732067_733397*/
++static void __lambda_1093(void *data, object clo, int argc, object *args) ;/*object self_7312758, object v_931_731821_732046_732159_733489*/
++static void __lambda_1098(void *data, object clo, int argc, object *args) ;/*object self_7312759, object tmp_731894_731896_732068_733398*/
++static void __lambda_1142(void *data, object clo, int argc, object *args) ;/*object self_7312760, object r_736682*/
++static void __lambda_1099(void *data, object clo, int argc, object *args) ;/*object self_7312761, object k_736684*/
++static void __lambda_1100(void *data, object clo, int argc, object *args) ;/*object self_7312762, object v_9310_731830_732024_732145_733475*/
++static void __lambda_1109(void *data, object clo, int argc, object *args) ;/*object self_7312763, object tmp_731898_731900_732069_733399*/
++static void __lambda_1110(void *data, object clo, int argc, object *args) ;/*object self_7312764, object v_9321_731841_731997_732127_733457*/
++static void __lambda_1120(void *data, object clo, int argc, object *args) ;/*object self_7312765, object tmp_731902_731904_732070_733400*/
++static void __lambda_1121(void *data, object clo, int argc, object *args) ;/*object self_7312766, object v_9334_731854_731983_732118_733448*/
++static void __lambda_1124(void *data, object clo, int argc, object *args) ;/*object self_7312767, object tmp_731906_731908_732071_733401*/
++static void __lambda_1125(void *data, object clo, int argc, object *args) ;/*object self_7312768, object v_9341_731861_731964_732105_733435*/
++static void __lambda_1129(void *data, object clo, int argc, object *args) ;/*object self_7312769, object tmp_731910_731912_732072_733402*/
++static void __lambda_1130(void *data, object clo, int argc, object *args) ;/*object self_7312770, object v_9350_731870_731945_732092_733422*/
++static void __lambda_1134(void *data, object clo, int argc, object *args) ;/*object self_7312771, object tmp_731914_731916_732073_733403*/
++static void __lambda_1135(void *data, object clo, int argc, object *args) ;/*object self_7312772, object v_9359_731879_731921_732075_733405*/
++static void __lambda_1140(void *data, object clo, int argc, object *args) ;/*object self_7312773, object tmp_731918_731920_732074_733404*/
++static void __lambda_1141(void *data, object clo, int argc, object *args) ;/*object self_7312774, object r_736691*/
++static void __lambda_1136(void *data, object clo, int argc, object *args) ;/*object self_7312775, object k_736693*/
++static void __lambda_1137(void *data, object clo, int argc, object *args) ;/*object self_7312776, object r_736712*/
++static void __lambda_1138(void *data, object clo, int argc, object *args) ;/*object self_7312777, object r_736730*/
++static void __lambda_1139(void *data, object clo, int argc, object *args) ;/*object self_7312778, object r_736723_7310267_7310276*/
++static void __lambda_1131(void *data, object clo, int argc, object *args) ;/*object self_7312779, object k_736737*/
++static void __lambda_1132(void *data, object clo, int argc, object *args) ;/*object self_7312780, object r_736753*/
++static void __lambda_1133(void *data, object clo, int argc, object *args) ;/*object self_7312781, object r_736763*/
++static void __lambda_1126(void *data, object clo, int argc, object *args) ;/*object self_7312782, object k_736770*/
++static void __lambda_1127(void *data, object clo, int argc, object *args) ;/*object self_7312783, object r_736786*/
++static void __lambda_1128(void *data, object clo, int argc, object *args) ;/*object self_7312784, object r_736794*/
++static void __lambda_1122(void *data, object clo, int argc, object *args) ;/*object self_7312785, object k_736803*/
++static void __lambda_1123(void *data, object clo, int argc, object *args) ;/*object self_7312786, object r_736816*/
++static void __lambda_1111(void *data, object clo, int argc, object *args) ;/*object self_7312787, object k_736825*/
++static void __lambda_1112(void *data, object clo, int argc, object *args) ;/*object self_7312788, object r_736894*/
++static void __lambda_1113(void *data, object clo, int argc, object *args) ;/*object self_7312789, object r_736836*/
++static void __lambda_1114(void *data, object clo, int argc, object *args) ;/*object self_7312790, object r_736848*/
++static void __lambda_1115(void *data, object clo, int argc, object *args) ;/*object self_7312791, object r_736887*/
++static void __lambda_1116(void *data, object clo, int argc, object *args) ;/*object self_7312792, object r_736857_7310086_7310104_7310121*/
++static void __lambda_1117(void *data, object clo, int argc, object *args) ;/*object self_7312793, object r_736860_7310087_7310105_7310122*/
++static void __lambda_1118(void *data, object clo, int argc, object *args) ;/*object self_7312794, object r_736878_7310088_7310106_7310123*/
++static void __lambda_1119(void *data, object clo, int argc, object *args) ;/*object self_7312795, object r_736869_7310091_7310109_7310126_7310139_7310151*/
++static void __lambda_1101(void *data, object clo, int argc, object *args) ;/*object self_7312796, object k_736897*/
++static void __lambda_1102(void *data, object clo, int argc, object *args) ;/*object self_7312797, object r_736955*/
++static void __lambda_1103(void *data, object clo, int argc, object *args) ;/*object self_7312798, object r_736908*/
++static void __lambda_1104(void *data, object clo, int argc, object *args) ;/*object self_7312799, object r_736917*/
++static void __lambda_1105(void *data, object clo, int argc, object *args) ;/*object self_7312800, object r_736948*/
++static void __lambda_1106(void *data, object clo, int argc, object *args) ;/*object self_7312801, object r_736926_739999_7310013_7310026*/
++static void __lambda_1107(void *data, object clo, int argc, object *args) ;/*object self_7312802, object r_736929_7310000_7310014_7310027*/
++static void __lambda_1108(void *data, object clo, int argc, object *args) ;/*object self_7312803, object r_736939_7310001_7310015_7310028*/
++static void __lambda_1094(void *data, object clo, int argc, object *args) ;/*object self_7312804, object k_736958*/
++static void __lambda_1095(void *data, object clo, int argc, object *args) ;/*object self_7312805, object r_736980*/
++static void __lambda_1096(void *data, object clo, int argc, object *args) ;/*object self_7312806, object r_736966*/
++static void __lambda_1097(void *data, object clo, int argc, object *args) ;/*object self_7312807, object r_736975*/
++static void __lambda_1060(void *data, object clo, int argc, object *args) ;/*closure _,object k_736468, object expr_731756_731771_731794_733380, object rename_731757_731772_731795_733381, object compare_731758_731773_731796_733382*/
++static void __lambda_1061(void *data, object clo, int argc, object *args) ;/*object self_7312727, object v_931_731764_731778_731798_733384*/
++static void __lambda_1088(void *data, object clo, int argc, object *args) ;/*object self_7312728, object tmp_731775_731777_731797_733383*/
++static void __lambda_1091(void *data, object clo, int argc, object *args) ;/*object self_7312729, object r_736469*/
++static void __lambda_1089(void *data, object clo, int argc, object *args) ;/*object self_7312730, object k_736471*/
++static void __lambda_1090(void *data, object clo, int argc, object *args) ;/*object self_7312731, object r_736472*/
++static void __lambda_1062(void *data, object clo, int argc, object *args) ;/*object self_7312732, object k_736474*/
++static void __lambda_1063(void *data, object clo, int argc, object *args) ;/*object self_7312733, object r_736490*/
++static void __lambda_1064(void *data, object clo, int argc, object *args) ;/*object self_7312734, object r_736496*/
++static void __lambda_1065(void *data, object clo, int argc, object *args) ;/*object self_7312735, object r_736673*/
++static void __lambda_1066(void *data, object clo, int argc, object *args) ;/*object self_7312736, object r_736505_738051*/
++static void __lambda_1067(void *data, object clo, int argc, object *args) ;/*object self_7312737, object r_736567_738052*/
++static void __lambda_1068(void *data, object clo, int argc, object *args) ;/*object self_7312738, object r_736667_738053*/
++static void __lambda_1069(void *data, object clo, int argc, object *args) ;/*object self_7312739, object r_736579_738055_738130*/
++static void __lambda_1070(void *data, object clo, int argc, object *args) ;/*object self_7312740, object r_736585_738056_738131*/
++static void __lambda_1071(void *data, object clo, int argc, object *args) ;/*object self_7312741, object r_736661_738057_738132*/
++static void __lambda_1072(void *data, object clo, int argc, object *args) ;/*object self_7312742, object r_736594_738059_738134_738205*/
++static void __lambda_1073(void *data, object clo, int argc, object *args) ;/*object self_7312743, object r_736600_738060_738135_738206*/
++static void __lambda_1074(void *data, object clo, int argc, object *args) ;/*object self_7312744, object r_736609_738061_738136_738207*/
++static void __lambda_1075(void *data, object clo, int argc, object *args) ;/*object self_7312745, object r_736654_738062_738137_738208*/
++static void __lambda_1076(void *data, object clo, int argc, object *args) ;/*object self_7312746, object r_736618_738066_738141_738212_738278_738343_738407*/
++static void __lambda_1077(void *data, object clo, int argc, object *args) ;/*object self_7312747, object r_736623_738067_738142_738213_738279_738344_738408*/
++static void __lambda_1078(void *data, object clo, int argc, object *args) ;/*object self_7312748, object r_736629_738068_738143_738214_738280_738345_738409*/
++static void __lambda_1079(void *data, object clo, int argc, object *args) ;/*object self_7312749, object r_736638_738069_738144_738215_738281_738346_738410*/
++static void __lambda_1080(void *data, object clo, int argc, object *args) ;/*object self_7312750, object r_736641_738070_738145_738216_738282_738347_738411*/
++static void __lambda_1081(void *data, object clo, int argc, object *args) ;/*object self_7312751, object r_736514_738097_738172_738243_738309_738374_738438_738496_738553_738609_738664_738718_738771_738823_738874_738924_738973_739021_739068_739114_739159_739203_739246_739288_739329_739369_739408_739446_739483_739519_739554_739588_739621*/
++static void __lambda_1082(void *data, object clo, int argc, object *args) ;/*object self_7312752, object r_736523_738098_738173_738244_738310_738375_738439_738497_738554_738610_738665_738719_738772_738824_738875_738925_738974_739022_739069_739115_739160_739204_739247_739289_739330_739370_739409_739447_739484_739520_739555_739589_739622*/
++static void __lambda_1083(void *data, object clo, int argc, object *args) ;/*object self_7312753, object r_736553_738099_738174_738245_738311_738376_738440_738498_738555_738611_738666_738720_738773_738825_738876_738926_738975_739023_739070_739116_739161_739205_739248_739290_739331_739371_739410_739448_739485_739521_739556_739590_739623*/
++static void __lambda_1084(void *data, object clo, int argc, object *args) ;/*object self_7312754, object r_736559_738100_738175_738246_738312_738377_738441_738499_738556_738612_738667_738721_738774_738826_738877_738927_738976_739024_739071_739117_739162_739206_739249_739291_739332_739372_739411_739449_739486_739522_739557_739591_739624*/
++static void __lambda_1085(void *data, object clo, int argc, object *args) ;/*object self_7312755, object r_736532_738106_738181_738252_738318_738383_738447_738505_738562_738618_738673_738727_738780_738832_738883_738933_738982_739030_739077_739123_739168_739212_739255_739297_739338_739378_739417_739455_739492_739528_739563_739597_739630_739658_739685_739711_739736_739760*/
++static void __lambda_1086(void *data, object clo, int argc, object *args) ;/*object self_7312756, object r_736538_738107_738182_738253_738319_738384_738448_738506_738563_738619_738674_738728_738781_738833_738884_738934_738983_739031_739078_739124_739169_739213_739256_739298_739339_739379_739418_739456_739493_739529_739564_739598_739631_739659_739686_739712_739737_739761*/
++static void __lambda_1087(void *data, object clo, int argc, object *args) ;/*object self_7312757, object r_736544_738108_738183_738254_738320_738385_738449_738507_738564_738620_738675_738729_738782_738834_738885_738935_738984_739032_739079_739125_739170_739214_739257_739299_739340_739380_739419_739457_739494_739530_739565_739599_739632_739660_739687_739713_739738_739762*/
++static void __lambda_1052(void *data, object clo, int argc, object *args) ;/*closure _,object k_736443, object expr_731708_731721_731740_733368, object rename_731709_731722_731741_733369, object compare_731710_731723_731742_733370*/
++static void __lambda_1053(void *data, object clo, int argc, object *args) ;/*object self_7312720, object v_931_731716_731728_731744_733372*/
++static void __lambda_1056(void *data, object clo, int argc, object *args) ;/*object self_7312721, object tmp_731725_731727_731743_733371*/
++static void __lambda_1059(void *data, object clo, int argc, object *args) ;/*object self_7312722, object r_736444*/
++static void __lambda_1057(void *data, object clo, int argc, object *args) ;/*object self_7312723, object k_736446*/
++static void __lambda_1058(void *data, object clo, int argc, object *args) ;/*object self_7312724, object r_736447*/
++static void __lambda_1054(void *data, object clo, int argc, object *args) ;/*object self_7312725, object k_736449*/
++static void __lambda_1055(void *data, object clo, int argc, object *args) ;/*object self_7312726, object r_736459*/
++static void __lambda_1032(void *data, object clo, int argc, object *args) ;/*closure _,object k_736333, object expr_731574_731605_731666_733330, object rename_731575_731606_731667_733331, object compare_731576_731607_731668_733332*/
++static void __lambda_1033(void *data, object clo, int argc, object *args) ;/*object self_7312701, object v_931_731582_731660_731700_733364*/
++static void __lambda_1036(void *data, object clo, int argc, object *args) ;/*object self_7312702, object tmp_731609_731611_731669_733333*/
++static void __lambda_1051(void *data, object clo, int argc, object *args) ;/*object self_7312703, object r_736334*/
++static void __lambda_1037(void *data, object clo, int argc, object *args) ;/*object self_7312704, object k_736336*/
++static void __lambda_1038(void *data, object clo, int argc, object *args) ;/*object self_7312705, object v_934_731585_731638_731685_733349*/
++static void __lambda_1042(void *data, object clo, int argc, object *args) ;/*object self_7312706, object tmp_731613_731615_731670_733334*/
++static void __lambda_1043(void *data, object clo, int argc, object *args) ;/*object self_7312707, object v_9315_731596_731620_731672_733336*/
++static void __lambda_1049(void *data, object clo, int argc, object *args) ;/*object self_7312708, object tmp_731617_731619_731671_733335*/
++static void __lambda_1050(void *data, object clo, int argc, object *args) ;/*object self_7312709, object r_736339*/
++static void __lambda_1044(void *data, object clo, int argc, object *args) ;/*object self_7312710, object k_736341*/
++static void __lambda_1045(void *data, object clo, int argc, object *args) ;/*object self_7312711, object r_736356*/
++static void __lambda_1046(void *data, object clo, int argc, object *args) ;/*object self_7312712, object r_736379*/
++static void __lambda_1047(void *data, object clo, int argc, object *args) ;/*object self_7312713, object r_736365_737975_737987_737998*/
++static void __lambda_1048(void *data, object clo, int argc, object *args) ;/*object self_7312714, object r_736373_737976_737988_737999*/
++static void __lambda_1039(void *data, object clo, int argc, object *args) ;/*object self_7312715, object k_736390*/
++static void __lambda_1040(void *data, object clo, int argc, object *args) ;/*object self_7312716, object r_736409*/
++static void __lambda_1041(void *data, object clo, int argc, object *args) ;/*object self_7312717, object r_736418_737936_737944_737951*/
++static void __lambda_1034(void *data, object clo, int argc, object *args) ;/*object self_7312718, object k_736432*/
++static void __lambda_1035(void *data, object clo, int argc, object *args) ;/*object self_7312719, object r_736438*/
++static void __lambda_1011(void *data, object clo, int argc, object *args) ;/*closure _,object k_736282, object expr_731489_731509_731544_733304, object rename_731490_731510_731545_733305, object compare_731491_731511_731546_733306*/
++static void __lambda_1012(void *data, object clo, int argc, object *args) ;/*object self_7312680, object v_931_731497_731516_731548_733308*/
++static void __lambda_1028(void *data, object clo, int argc, object *args) ;/*object self_7312681, object tmp_731513_731515_731547_733307*/
++static void __lambda_1031(void *data, object clo, int argc, object *args) ;/*object self_7312682, object r_736283*/
++static void __lambda_1029(void *data, object clo, int argc, object *args) ;/*object self_7312683, object k_736285*/
++static void __lambda_1030(void *data, object clo, int argc, object *args) ;/*object self_7312684, object r_736286*/
++static void __lambda_1013(void *data, object clo, int argc, object *args) ;/*object self_7312685, object k_736288*/
++static void __lambda_1014(void *data, object clo, int argc, object *args) ;/*object self_7312686, object w_933_731499_731520_731550_733310, object var_91ls5_731501_731521_731551_733311, object val_91ls6_731502_731522_731552_733312*/
++static void __lambda_1015(void *data, object clo, int argc, object *args) ;/*object self_7312687, object lp_934_731500_731523_731553_733313*/
++static void __lambda_1381(void *data, object clo, int argc, object *args) ;/*object self_7312688, object lp_934_731500_731523_731553_733313*/
++static void __lambda_1018(void *data, object clo, int argc, object *args) ;/*object self_7312689, object k_736295, object w_933_731499_731524_731554_733314, object var_91ls5_731501_731525_731555_733315, object val_91ls6_731502_731526_731556_733316*/
++static void __lambda_1019(void *data, object clo, int argc, object *args) ;/*object self_7312690, object r_736297_7311667*/
++static void __lambda_1020(void *data, object clo, int argc, object *args) ;/*object self_7312691, object r_736298_7311668_7311679*/
++static void __lambda_1021(void *data, object clo, int argc, object *args) ;/*object self_7312692, object var_731527_731557_733317_7311669_7311680, object val_731528_731558_733318_7311670_7311681*/
++static void __lambda_1022(void *data, object clo, int argc, object *args) ;/*object self_7312693, object r_736301_7311671_7311682*/
++static void __lambda_1026(void *data, object clo, int argc, object *args) ;/*object self_7312694, object k_736309_7311675_7311686, object var_731531_731561_733321_7311676_7311687, object val_731532_731562_733322_7311677_7311688*/
++static void __lambda_1027(void *data, object clo, int argc, object *args) ;/*object self_7312695, object r_736310_7311678_7311689*/
++static void __lambda_1023(void *data, object clo, int argc, object *args) ;/*object self_7312696, object r_736308_7311672_7311683*/
++static void __lambda_1024(void *data, object clo, int argc, object *args) ;/*object self_7312697, object r_736307_7311673_7311684*/
++static void __lambda_1025(void *data, object clo, int argc, object *args) ;/*object self_7312698, object r_736305_7311674_7311685*/
++static void __lambda_1016(void *data, object clo, int argc, object *args) ;/*object self_7312699, object r_736294*/
++static void __lambda_1017(void *data, object clo, int argc, object *args) ;/*object self_7312700, object r_736293*/
++static void __lambda_796(void *data, object clo, int argc, object *args) ;/*closure _,object k_735824, object expr_731231_733161, object rename_731232_733162, object compare_731233_733163*/
++static void __lambda_797(void *data, object clo, int argc, object *args) ;/*object self_7312448, object r_736279*/
++static void __lambda_798(void *data, object clo, int argc, object *args) ;/*object self_7312449, object r_735825*/
++static void __lambda_799(void *data, object clo, int argc, object *args) ;/*object self_7312450, object r_735826*/
++static void __lambda_800(void *data, object clo, int argc, object *args) ;/*object self_7312451, object r_735827*/
++static void __lambda_801(void *data, object clo, int argc, object *args) ;/*object self_7312452, object r_735828*/
++static void __lambda_802(void *data, object clo, int argc, object *args) ;/*object self_7312453, object r_735829*/
++static void __lambda_803(void *data, object clo, int argc, object *args) ;/*object self_7312454, object r_735830*/
++static void __lambda_804(void *data, object clo, int argc, object *args) ;/*object self_7312455, object r_735831*/
++static void __lambda_805(void *data, object clo, int argc, object *args) ;/*object self_7312456, object r_735832*/
++static void __lambda_806(void *data, object clo, int argc, object *args) ;/*object self_7312457, object r_735833*/
++static void __lambda_807(void *data, object clo, int argc, object *args) ;/*object self_7312458, object r_735834*/
++static void __lambda_808(void *data, object clo, int argc, object *args) ;/*object self_7312459, object r_735835*/
++static void __lambda_809(void *data, object clo, int argc, object *args) ;/*object self_7312460, object r_735836*/
++static void __lambda_810(void *data, object clo, int argc, object *args) ;/*object self_7312461, object r_735837*/
++static void __lambda_811(void *data, object clo, int argc, object *args) ;/*object self_7312462, object r_735838*/
++static void __lambda_812(void *data, object clo, int argc, object *args) ;/*object self_7312463, object r_735839*/
++static void __lambda_813(void *data, object clo, int argc, object *args) ;/*object self_7312464, object r_735840*/
++static void __lambda_814(void *data, object clo, int argc, object *args) ;/*object self_7312465, object r_735841*/
++static void __lambda_815(void *data, object clo, int argc, object *args) ;/*object self_7312466, object r_735842*/
++static void __lambda_816(void *data, object clo, int argc, object *args) ;/*object self_7312467, object r_735843*/
++static void __lambda_817(void *data, object clo, int argc, object *args) ;/*object self_7312468, object r_735844*/
++static void __lambda_818(void *data, object clo, int argc, object *args) ;/*object self_7312469, object r_735845*/
++static void __lambda_819(void *data, object clo, int argc, object *args) ;/*object self_7312470, object r_735846*/
++static void __lambda_820(void *data, object clo, int argc, object *args) ;/*object self_7312471, object r_735847*/
++static void __lambda_821(void *data, object clo, int argc, object *args) ;/*object self_7312472, object r_735848*/
++static void __lambda_822(void *data, object clo, int argc, object *args) ;/*object self_7312473, object r_735849*/
++static void __lambda_823(void *data, object clo, int argc, object *args) ;/*object self_7312474, object r_735850*/
++static void __lambda_824(void *data, object clo, int argc, object *args) ;/*object self_7312475, object r_735851*/
++static void __lambda_825(void *data, object clo, int argc, object *args) ;/*object self_7312476, object r_735852*/
++static void __lambda_826(void *data, object clo, int argc, object *args) ;/*object self_7312477, object r_735853*/
++static void __lambda_827(void *data, object clo, int argc, object *args) ;/*object self_7312478, object r_735854*/
++static void __lambda_828(void *data, object clo, int argc, object *args) ;/*object self_7312479, object r_735855*/
++static void __lambda_829(void *data, object clo, int argc, object *args) ;/*object self_7312480, object r_735856*/
++static void __lambda_830(void *data, object clo, int argc, object *args) ;/*object self_7312481, object r_735857*/
++static void __lambda_831(void *data, object clo, int argc, object *args) ;/*object self_7312482, object r_735858*/
++static void __lambda_832(void *data, object clo, int argc, object *args) ;/*object self_7312483, object r_735859*/
++static void __lambda_833(void *data, object clo, int argc, object *args) ;/*object self_7312484, object r_735860*/
++static void __lambda_834(void *data, object clo, int argc, object *args) ;/*object self_7312485, object ellipsis_91specified_127_731234_733176, object count_731235_733177, object _191er_91macro_91transformer_731236_733178, object _191lambda_731237_733179, object _191let_731238_733180, object _191begin_731239_733181, object _191if_731240_733182, object _191and_731241_733183, object _191or_731242_733184, object _191eq_127_731243_733185, object _191equal_127_731244_733186, object _191car_731245_733187, object _191cdr_731246_733188, object _191cons_731247_733189, object _191pair_127_731248_733190, object _191null_127_731249_733191, object _191expr_731250_733192, object _191rename_731251_733193, object _191compare_731252_733194, object _191quote_731253_733195, object _191apply_731254_733196, object _191append_731255_733197, object _191map_731256_733198, object _191vector_127_731257_733199, object _191list_127_731258_733200, object _191len_731259_733201, object _191length_731260_
733202, object _191_91_731261_733203, object _191_125_123_731262_733204, object _191error_731263_733205, object _191ls_731264_733206, object _191res_731265_733207, object _191i_731266_733208, object _191reverse_731267_733209, object _191vector_91_125list_731268_733210, object _191list_91_125vector_731269_733211, object _191cons3_731270_733212*/
++static void __lambda_1380(void *data, object clo, int argc, object *args) ;/*object self_7312486, object count_731235_733177*/
++static void __lambda_835(void *data, object clo, int argc, object *args) ;/*object self_7312487, object ellipsis_733213, object lits_733214, object forms_733215, object next_91symbol_733216, object expand_91pattern_733217, object ellipsis_91escape_127_733218, object ellipsis_127_733219, object ellipsis_91depth_733220, object ellipsis_91tail_733221, object all_91vars_733222, object free_91vars_733223, object expand_91template_733224*/
++static void __lambda_1379(void *data, object clo, int argc, object *args) ;/*object self_7312488, object ellipsis_733213*/
++static void __lambda_1378(void *data, object clo, int argc, object *args) ;/*object self_7312489, object lits_733214*/
++static void __lambda_1377(void *data, object clo, int argc, object *args) ;/*object self_7312490, object forms_733215*/
++static void __lambda_1376(void *data, object clo, int argc, object *args) ;/*object self_7312491, object next_91symbol_733216*/
++static void __lambda_1375(void *data, object clo, int argc, object *args) ;/*object self_7312492, object expand_91pattern_733217*/
++static void __lambda_1374(void *data, object clo, int argc, object *args) ;/*object self_7312493, object ellipsis_91escape_127_733218*/
++static void __lambda_1373(void *data, object clo, int argc, object *args) ;/*object self_7312494, object ellipsis_127_733219*/
++static void __lambda_1372(void *data, object clo, int argc, object *args) ;/*object self_7312495, object ellipsis_91depth_733220*/
++static void __lambda_1371(void *data, object clo, int argc, object *args) ;/*object self_7312496, object ellipsis_91tail_733221*/
++static void __lambda_1370(void *data, object clo, int argc, object *args) ;/*object self_7312497, object all_91vars_733222*/
++static void __lambda_1369(void *data, object clo, int argc, object *args) ;/*object self_7312498, object free_91vars_733223*/
++static void __lambda_1368(void *data, object clo, int argc, object *args) ;/*object self_7312499, object expand_91template_733224*/
++static void __lambda_836(void *data, object clo, int argc, object *args) ;/*object self_7312500, object r_736241*/
++static void __lambda_837(void *data, object clo, int argc, object *args) ;/*object self_7312501, object r_735861*/
++static void __lambda_839(void *data, object clo, int argc, object *args) ;/*object self_7312502, object r_736238*/
++static void __lambda_840(void *data, object clo, int argc, object *args) ;/*object self_7312503, object r_735862*/
++static void __lambda_842(void *data, object clo, int argc, object *args) ;/*object self_7312504, object r_736235*/
++static void __lambda_843(void *data, object clo, int argc, object *args) ;/*object self_7312505, object r_735863*/
++static void __lambda_1006(void *data, object clo, int argc, object *args) ;/*object self_7312506, object k_736229, object s_731271_733225*/
++static void __lambda_1007(void *data, object clo, int argc, object *args) ;/*object self_7312507, object r_736234*/
++static void __lambda_1008(void *data, object clo, int argc, object *args) ;/*object self_7312508, object r_736230*/
++static void __lambda_1009(void *data, object clo, int argc, object *args) ;/*object self_7312509, object r_736233*/
++static void __lambda_1010(void *data, object clo, int argc, object *args) ;/*object self_7312510, object r_736232*/
++static void __lambda_844(void *data, object clo, int argc, object *args) ;/*object self_7312511, object r_736228*/
++static void __lambda_845(void *data, object clo, int argc, object *args) ;/*object self_7312512, object r_735864*/
++static void __lambda_944(void *data, object clo, int argc, object *args) ;/*object self_7312513, object k_736013, object pat_731272_733226, object tmpl_731273_733227*/
++static void __lambda_1004(void *data, object clo, int argc, object *args) ;/*object self_7312514, object k_736226, object vars_731352_733257*/
++static void __lambda_1005(void *data, object clo, int argc, object *args) ;/*object self_7312515, object r_736227*/
++static void __lambda_945(void *data, object clo, int argc, object *args) ;/*object self_7312516, object r_736017*/
++static void __lambda_946(void *data, object clo, int argc, object *args) ;/*object self_7312517, object p_731275_733228, object x_731276_733229, object vars_731278_733231, object k_731279_733232*/
++static void __lambda_947(void *data, object clo, int argc, object *args) ;/*object self_7312518, object lp_731280_733233*/
++static void __lambda_1367(void *data, object clo, int argc, object *args) ;/*object self_7312519, object lp_731280_733233*/
++static void __lambda_950(void *data, object clo, int argc, object *args) ;/*object self_7312520, object k_736020, object p_731281_733234, object x_731282_733235, object dim_731283_733236, object vars_731284_733237, object k_731285_733238*/
++static void __lambda_951(void *data, object clo, int argc, object *args) ;/*object self_7312521, object v_731286_733239*/
++static void __lambda_1003(void *data, object clo, int argc, object *args) ;/*object self_7312522, object r_736023*/
++static void __lambda_952(void *data, object clo, int argc, object *args) ;/*object self_7312523, object k_736024*/
++static void __lambda_953(void *data, object clo, int argc, object *args) ;/*object self_7312524, object r_736025*/
++static void __lambda_960(void *data, object clo, int argc, object *args) ;/*object self_7312531, object r_736038*/
++static void __lambda_1002(void *data, object clo, int argc, object *args) ;/*object self_7312573, object r_736224*/
++static void __lambda_1001(void *data, object clo, int argc, object *args) ;/*object self_7312572, object r_736222*/
++static void __lambda_999(void *data, object clo, int argc, object *args) ;/*object self_7312570, object r_736218*/
++static void __lambda_1000(void *data, object clo, int argc, object *args) ;/*object self_7312571, object r_736217*/
++static void __lambda_998(void *data, object clo, int argc, object *args) ;/*object self_7312567, object k_736212, object vars_731344_733256*/
++static void __lambda_996(void *data, object clo, int argc, object *args) ;/*object self_7312568, object r_736211*/
++static void __lambda_997(void *data, object clo, int argc, object *args) ;/*object self_7312569, object r_736208*/
++static void __lambda_961(void *data, object clo, int argc, object *args) ;/*object self_7312532, object r_736205*/
++static void __lambda_994(void *data, object clo, int argc, object *args) ;/*object self_7312559, object k_736202, object x_731300_733241*/
++static void __lambda_995(void *data, object clo, int argc, object *args) ;/*object self_7312560, object r_736203*/
++static void __lambda_988(void *data, object clo, int argc, object *args) ;/*object self_7312561, object r_736200*/
++static void __lambda_989(void *data, object clo, int argc, object *args) ;/*object self_7312562, object r_736201*/
++static void __lambda_990(void *data, object clo, int argc, object *args) ;/*object self_7312563, object r_736095*/
++static void __lambda_991(void *data, object clo, int argc, object *args) ;/*object self_7312564, object r_736097*/
++static void __lambda_992(void *data, object clo, int argc, object *args) ;/*object self_7312565, object len_731303_733242, object _191lp_731304_733243*/
++static void __lambda_993(void *data, object clo, int argc, object *args) ;/*object self_7312566, object r_736117*/
++static void __lambda_962(void *data, object clo, int argc, object *args) ;/*object self_7312533, object r_736040*/
++static void __lambda_964(void *data, object clo, int argc, object *args) ;/*object self_7312535, object w_731320_733244*/
++static void __lambda_965(void *data, object clo, int argc, object *args) ;/*object self_7312536, object _191lp_731323_733245*/
++static void __lambda_966(void *data, object clo, int argc, object *args) ;/*object self_7312537, object new_91vars_731326_733246*/
++static void __lambda_985(void *data, object clo, int argc, object *args) ;/*object self_7312538, object k_736088, object x_731340_733255*/
++static void __lambda_986(void *data, object clo, int argc, object *args) ;/*object self_7312539, object r_736090*/
++static void __lambda_987(void *data, object clo, int argc, object *args) ;/*object self_7312540, object r_736089*/
++static void __lambda_967(void *data, object clo, int argc, object *args) ;/*object self_7312541, object r_736087*/
++static void __lambda_968(void *data, object clo, int argc, object *args) ;/*object self_7312542, object ls_91vars_731329_733247*/
++static void __lambda_980(void *data, object clo, int argc, object *args) ;/*object self_7312543, object k_736080, object _191_731337_733252*/
++static void __lambda_984(void *data, object clo, int argc, object *args) ;/*object self_7312544, object k_736085, object x_731338_733253, object l_731339_733254*/
++static void __lambda_981(void *data, object clo, int argc, object *args) ;/*object self_7312545, object r_736084*/
++static void __lambda_982(void *data, object clo, int argc, object *args) ;/*object self_7312546, object r_736083*/
++static void __lambda_983(void *data, object clo, int argc, object *args) ;/*object self_7312547, object r_736081*/
++static void __lambda_969(void *data, object clo, int argc, object *args) ;/*object self_7312548, object r_736079*/
++static void __lambda_970(void *data, object clo, int argc, object *args) ;/*object self_7312549, object once_731332_733248*/
++static void __lambda_979(void *data, object clo, int argc, object *args) ;/*object self_7312550, object k_736072, object x_731334_733249*/
++static void __lambda_971(void *data, object clo, int argc, object *args) ;/*object self_7312551, object r_736071*/
++static void __lambda_972(void *data, object clo, int argc, object *args) ;/*object self_7312552, object r_736070*/
++static void __lambda_978(void *data, object clo, int argc, object *args) ;/*object self_7312553, object k_736066, object x_731335_733250, object l_731336_733251*/
++static void __lambda_973(void *data, object clo, int argc, object *args) ;/*object self_7312554, object r_736065*/
++static void __lambda_974(void *data, object clo, int argc, object *args) ;/*object self_7312555, object r_736062*/
++static void __lambda_975(void *data, object clo, int argc, object *args) ;/*object self_7312556, object r_736064*/
++static void __lambda_976(void *data, object clo, int argc, object *args) ;/*object self_7312557, object r_736063*/
++static void __lambda_977(void *data, object clo, int argc, object *args) ;/*object self_7312558, object r_736059*/
++static void __lambda_963(void *data, object clo, int argc, object *args) ;/*object self_7312534, object r_736044*/
++static void __lambda_959(void *data, object clo, int argc, object *args) ;/*object self_7312525, object k_736037, object l_731290_733240*/
++static void __lambda_954(void *data, object clo, int argc, object *args) ;/*object self_7312526, object r_736036*/
++static void __lambda_955(void *data, object clo, int argc, object *args) ;/*object self_7312527, object r_736026*/
++static void __lambda_958(void *data, object clo, int argc, object *args) ;/*object self_7312530, object r_736032*/
++static void __lambda_956(void *data, object clo, int argc, object *args) ;/*object self_7312528, object r_736030*/
++static void __lambda_957(void *data, object clo, int argc, object *args) ;/*object self_7312529, object r_736028*/
++static void __lambda_948(void *data, object clo, int argc, object *args) ;/*object self_7312574, object r_736019*/
++static void __lambda_949(void *data, object clo, int argc, object *args) ;/*object self_7312575, object r_736018*/
++static void __lambda_846(void *data, object clo, int argc, object *args) ;/*object self_7312576, object r_736012*/
++static void __lambda_847(void *data, object clo, int argc, object *args) ;/*object self_7312577, object r_735865*/
++static void __lambda_943(void *data, object clo, int argc, object *args) ;/*object self_7312578, object k_736009, object x_731353_733258*/
++static void __lambda_848(void *data, object clo, int argc, object *args) ;/*object self_7312579, object r_736008*/
++static void __lambda_849(void *data, object clo, int argc, object *args) ;/*object self_7312580, object r_735866*/
++static void __lambda_942(void *data, object clo, int argc, object *args) ;/*object self_7312581, object k_736003, object x_731355_733259*/
++static void __lambda_850(void *data, object clo, int argc, object *args) ;/*object self_7312582, object r_736002*/
++static void __lambda_851(void *data, object clo, int argc, object *args) ;/*object self_7312583, object r_735867*/
++static void __lambda_939(void *data, object clo, int argc, object *args) ;/*object self_7312584, object k_735998, object x_731358_733260*/
++static void __lambda_940(void *data, object clo, int argc, object *args) ;/*object self_7312585, object r_735999*/
++static void __lambda_941(void *data, object clo, int argc, object *args) ;/*object self_7312586, object r_736000*/
++static void __lambda_852(void *data, object clo, int argc, object *args) ;/*object self_7312587, object r_735997*/
++static void __lambda_853(void *data, object clo, int argc, object *args) ;/*object self_7312588, object r_735868*/
++static void __lambda_937(void *data, object clo, int argc, object *args) ;/*object self_7312589, object k_735994, object x_731359_733261*/
++static void __lambda_938(void *data, object clo, int argc, object *args) ;/*object self_7312590, object r_735995*/
++static void __lambda_854(void *data, object clo, int argc, object *args) ;/*object self_7312591, object r_735993*/
++static void __lambda_855(void *data, object clo, int argc, object *args) ;/*object self_7312592, object r_735869*/
++static void __lambda_923(void *data, object clo, int argc, object *args) ;/*object self_7312593, object k_735972, object x_731360_733262, object dim_731361_733263*/
++static void __lambda_924(void *data, object clo, int argc, object *args) ;/*object self_7312594, object x_731363_733264, object dim_731364_733265, object vars_731365_733266*/
++static void __lambda_925(void *data, object clo, int argc, object *args) ;/*object self_7312595, object lp_731366_733267*/
++static void __lambda_1366(void *data, object clo, int argc, object *args) ;/*object self_7312596, object lp_731366_733267*/
++static void __lambda_928(void *data, object clo, int argc, object *args) ;/*object self_7312597, object k_735976, object x_731367_733268, object dim_731368_733269, object vars_731369_733270*/
++static void __lambda_929(void *data, object clo, int argc, object *args) ;/*object self_7312598, object r_735977*/
++static void __lambda_933(void *data, object clo, int argc, object *args) ;/*object self_7312602, object r_735982*/
++static void __lambda_936(void *data, object clo, int argc, object *args) ;/*object self_7312605, object r_735992*/
++static void __lambda_935(void *data, object clo, int argc, object *args) ;/*object self_7312604, object r_735989*/
++static void __lambda_934(void *data, object clo, int argc, object *args) ;/*object self_7312603, object r_735985*/
++static void __lambda_932(void *data, object clo, int argc, object *args) ;/*object self_7312599, object k_735981, object lit_731373_733271*/
++static void __lambda_930(void *data, object clo, int argc, object *args) ;/*object self_7312600, object r_735980*/
++static void __lambda_931(void *data, object clo, int argc, object *args) ;/*object self_7312601, object r_735978*/
++static void __lambda_926(void *data, object clo, int argc, object *args) ;/*object self_7312606, object r_735975*/
++static void __lambda_927(void *data, object clo, int argc, object *args) ;/*object self_7312607, object r_735974*/
++static void __lambda_856(void *data, object clo, int argc, object *args) ;/*object self_7312608, object r_735971*/
++static void __lambda_857(void *data, object clo, int argc, object *args) ;/*object self_7312609, object r_735870*/
++static void __lambda_909(void *data, object clo, int argc, object *args) ;/*object self_7312610, object k_735954, object x_731384_733272, object vars_731385_733273, object dim_731386_733274*/
++static void __lambda_910(void *data, object clo, int argc, object *args) ;/*object self_7312611, object x_731388_733275, object free_731389_733276*/
++static void __lambda_911(void *data, object clo, int argc, object *args) ;/*object self_7312612, object lp_731390_733277*/
++static void __lambda_1365(void *data, object clo, int argc, object *args) ;/*object self_7312613, object lp_731390_733277*/
++static void __lambda_914(void *data, object clo, int argc, object *args) ;/*object self_7312614, object k_735958, object x_731391_733278, object free_731392_733279*/
++static void __lambda_915(void *data, object clo, int argc, object *args) ;/*object self_7312615, object r_735959*/
++static void __lambda_922(void *data, object clo, int argc, object *args) ;/*object self_7312622, object r_735970*/
++static void __lambda_921(void *data, object clo, int argc, object *args) ;/*object self_7312621, object r_735967*/
++static void __lambda_920(void *data, object clo, int argc, object *args) ;/*object self_7312616, object r_735960*/
++static void __lambda_916(void *data, object clo, int argc, object *args) ;/*object self_7312617, object k_735961*/
++static void __lambda_917(void *data, object clo, int argc, object *args) ;/*object self_7312618, object r_735962*/
++static void __lambda_918(void *data, object clo, int argc, object *args) ;/*object self_7312619, object tmp_731399_731401_733280*/
++static void __lambda_919(void *data, object clo, int argc, object *args) ;/*object self_7312620, object cell_731402_733281*/
++static void __lambda_912(void *data, object clo, int argc, object *args) ;/*object self_7312623, object r_735957*/
++static void __lambda_913(void *data, object clo, int argc, object *args) ;/*object self_7312624, object r_735956*/
++static void __lambda_858(void *data, object clo, int argc, object *args) ;/*object self_7312625, object r_735953*/
++static void __lambda_859(void *data, object clo, int argc, object *args) ;/*object self_7312626, object r_735871*/
++static void __lambda_867(void *data, object clo, int argc, object *args) ;/*object self_7312627, object k_735887, object tmpl_731411_733282, object vars_731412_733283*/
++static void __lambda_868(void *data, object clo, int argc, object *args) ;/*object self_7312628, object t_731414_733284*/
++static void __lambda_869(void *data, object clo, int argc, object *args) ;/*object self_7312629, object lp_731416_733286*/
++static void __lambda_1364(void *data, object clo, int argc, object *args) ;/*object self_7312630, object lp_731416_733286*/
++static void __lambda_872(void *data, object clo, int argc, object *args) ;/*object self_7312631, object k_735890, object t_731417_733287, object dim_731418_733288*/
++static void __lambda_873(void *data, object clo, int argc, object *args) ;/*object self_7312632, object r_735891*/
++static void __lambda_907(void *data, object clo, int argc, object *args) ;/*object self_7312667, object r_735950*/
++static void __lambda_908(void *data, object clo, int argc, object *args) ;/*object self_7312668, object r_735949*/
++static void __lambda_878(void *data, object clo, int argc, object *args) ;/*object self_7312637, object r_735900*/
++static void __lambda_881(void *data, object clo, int argc, object *args) ;/*object self_7312640, object r_735907*/
++static void __lambda_903(void *data, object clo, int argc, object *args) ;/*object self_7312663, object r_735943*/
++static void __lambda_904(void *data, object clo, int argc, object *args) ;/*object self_7312664, object r_735946*/
++static void __lambda_905(void *data, object clo, int argc, object *args) ;/*object self_7312665, object r_735944*/
++static void __lambda_906(void *data, object clo, int argc, object *args) ;/*object self_7312666, object r_735945*/
++static void __lambda_882(void *data, object clo, int argc, object *args) ;/*object self_7312641, object depth_731441_733292*/
++static void __lambda_883(void *data, object clo, int argc, object *args) ;/*object self_7312642, object r_735942*/
++static void __lambda_884(void *data, object clo, int argc, object *args) ;/*object self_7312643, object ell_91vars_731447_733294*/
++static void __lambda_886(void *data, object clo, int argc, object *args) ;/*object self_7312644, object r_735912*/
++static void __lambda_887(void *data, object clo, int argc, object *args) ;/*object self_7312645, object r_735936*/
++static void __lambda_888(void *data, object clo, int argc, object *args) ;/*object self_7312646, object once_731459_733295*/
++static void __lambda_893(void *data, object clo, int argc, object *args) ;/*object self_7312647, object nest_731462_733296*/
++static void __lambda_894(void *data, object clo, int argc, object *args) ;/*object self_7312648, object d_731469_733298, object many_731470_733299*/
++static void __lambda_895(void *data, object clo, int argc, object *args) ;/*object self_7312649, object lp_731416_731471_733300*/
++static void __lambda_1363(void *data, object clo, int argc, object *args) ;/*object self_7312650, object lp_731416_731471_733300*/
++static void __lambda_902(void *data, object clo, int argc, object *args) ;/*object self_7312651, object k_735923, object d_731472_733301, object many_731473_733302*/
++static void __lambda_896(void *data, object clo, int argc, object *args) ;/*object self_7312652, object r_735922*/
++static void __lambda_897(void *data, object clo, int argc, object *args) ;/*object self_7312653, object r_735921*/
++static void __lambda_898(void *data, object clo, int argc, object *args) ;/*object self_7312654, object many_731465_733297*/
++static void __lambda_899(void *data, object clo, int argc, object *args) ;/*object self_7312655, object r_735920*/
++static void __lambda_900(void *data, object clo, int argc, object *args) ;/*object self_7312656, object r_735919*/
++static void __lambda_901(void *data, object clo, int argc, object *args) ;/*object self_7312657, object r_735918*/
++static void __lambda_889(void *data, object clo, int argc, object *args) ;/*object self_7312658, object k_735927*/
++static void __lambda_892(void *data, object clo, int argc, object *args) ;/*object self_7312659, object r_735928*/
++static void __lambda_890(void *data, object clo, int argc, object *args) ;/*object self_7312660, object k_735931*/
++static void __lambda_891(void *data, object clo, int argc, object *args) ;/*object self_7312661, object r_735933*/
++static void __lambda_885(void *data, object clo, int argc, object *args) ;/*object self_7312662, object k_735937*/
++static void __lambda_880(void *data, object clo, int argc, object *args) ;/*object self_7312638, object r_735901*/
++static void __lambda_879(void *data, object clo, int argc, object *args) ;/*object self_7312639, object k_735902*/
++static void __lambda_877(void *data, object clo, int argc, object *args) ;/*object self_7312633, object k_735897, object v_731429_733291*/
++static void __lambda_874(void *data, object clo, int argc, object *args) ;/*object self_7312634, object r_735896*/
++static void __lambda_875(void *data, object clo, int argc, object *args) ;/*object self_7312635, object tmp_731424_731426_733289*/
++static void __lambda_876(void *data, object clo, int argc, object *args) ;/*object self_7312636, object cell_731427_733290*/
++static void __lambda_870(void *data, object clo, int argc, object *args) ;/*object self_7312669, object r_735889*/
++static void __lambda_871(void *data, object clo, int argc, object *args) ;/*object self_7312670, object r_735888*/
++static void __lambda_860(void *data, object clo, int argc, object *args) ;/*object self_7312671, object r_735886*/
++static void __lambda_861(void *data, object clo, int argc, object *args) ;/*object self_7312672, object r_735872*/
++static void __lambda_866(void *data, object clo, int argc, object *args) ;/*object self_7312673, object k_735883, object clause_731484_733303*/
++static void __lambda_862(void *data, object clo, int argc, object *args) ;/*object self_7312674, object r_735882*/
++static void __lambda_863(void *data, object clo, int argc, object *args) ;/*object self_7312675, object r_735878*/
++static void __lambda_864(void *data, object clo, int argc, object *args) ;/*object self_7312676, object r_735881*/
++static void __lambda_865(void *data, object clo, int argc, object *args) ;/*object self_7312677, object r_735877*/
++static void __lambda_841(void *data, object clo, int argc, object *args) ;/*object self_7312678, object k_736236*/
++static void __lambda_838(void *data, object clo, int argc, object *args) ;/*object self_7312679, object k_736239*/
++static void __lambda_795(void *data, object clo, int argc, object *args) ;/*closure _,object k_735821, object kar_731228_733158, object kdr_731229_733159, object source_731230_733160*/
++static void __lambda_793(void *data, object clo, int argc, object *args) ;/*closure _,object k_735817, object pred_731220_733155, object ls_731221_733156*/
++static void __lambda_794(void *data, object clo, int argc, object *args) ;/*object self_7312447, object tmp_731224_731226_733157*/
++static void __lambda_791(void *data, object clo, int argc, object *args) ;/*closure _,object k_735810, object pred_731217_733153, object ls_731218_733154*/
++static void __lambda_792(void *data, object clo, int argc, object *args) ;/*object self_7312446, object r_735812*/
 +static void __lambda_1448(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object bv)*/
 +static void __lambda_1447(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object port)*/
 +static void __lambda_1446(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object port)*/
@@ -2045,56 +2045,56 @@ Make let-values be the same as let*-values, to work around
 +static object __lambda_1435(void *data, object ptr) ;
 +static void __lambda_1434(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k)*/
 +static void __lambda_1433(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object z1, object z2)*/
-+static object __lambda_1432(void *data, object ptr,object z_731217_733159) ;
-+static void __lambda_790(void *data, object clo, int argc, object *args) ;/*closure _,object k_735810, object z_731217_733159*/
-+static void __lambda_787(void *data, object clo, int argc, object *args) ;/*closure _,object k_735805, object n_731215_733157, object m_731216_733158*/
-+static void __lambda_788(void *data, object clo, int argc, object *args) ;/*object self_7312451, object r_735806*/
-+static void __lambda_789(void *data, object clo, int argc, object *args) ;/*object self_7312452, object r_735807*/
-+static void __lambda_785(void *data, object clo, int argc, object *args) ;/*closure _,object k_735800, object n_731213_733155, object m_731214_733156*/
-+static void __lambda_786(void *data, object clo, int argc, object *args) ;/*object self_7312450, object r_735802*/
-+static void __lambda_784(void *data, object clo, int argc, object *args) ;/*closure _,object k_735792, object n_731209_733152, object m_731210_733153*/
-+static void __lambda_781(void *data, object clo, int argc, object *args) ;/*closure _,object k_735787, object n_731207_733150, object m_731208_733151*/
-+static void __lambda_782(void *data, object clo, int argc, object *args) ;/*object self_7312448, object r_735788*/
-+static void __lambda_783(void *data, object clo, int argc, object *args) ;/*object self_7312449, object r_735789*/
-+static object __lambda_1431(void *data, object ptr,object x_731205_733148, object y_731206_733149) ;
-+static void __lambda_780(void *data, object clo, int argc, object *args) ;/*closure _,object k_735779, object x_731205_733148, object y_731206_733149*/
++static object __lambda_1432(void *data, object ptr,object z_731216_733152) ;
++static void __lambda_790(void *data, object clo, int argc, object *args) ;/*closure _,object k_735803, object z_731216_733152*/
++static void __lambda_787(void *data, object clo, int argc, object *args) ;/*closure _,object k_735798, object n_731214_733150, object m_731215_733151*/
++static void __lambda_788(void *data, object clo, int argc, object *args) ;/*object self_7312444, object r_735799*/
++static void __lambda_789(void *data, object clo, int argc, object *args) ;/*object self_7312445, object r_735800*/
++static void __lambda_785(void *data, object clo, int argc, object *args) ;/*closure _,object k_735793, object n_731212_733148, object m_731213_733149*/
++static void __lambda_786(void *data, object clo, int argc, object *args) ;/*object self_7312443, object r_735795*/
++static void __lambda_784(void *data, object clo, int argc, object *args) ;/*closure _,object k_735785, object n_731208_733145, object m_731209_733146*/
++static void __lambda_781(void *data, object clo, int argc, object *args) ;/*closure _,object k_735780, object n_731206_733143, object m_731207_733144*/
++static void __lambda_782(void *data, object clo, int argc, object *args) ;/*object self_7312441, object r_735781*/
++static void __lambda_783(void *data, object clo, int argc, object *args) ;/*object self_7312442, object r_735782*/
++static object __lambda_1431(void *data, object ptr,object x_731204_733141, object y_731205_733142) ;
++static void __lambda_780(void *data, object clo, int argc, object *args) ;/*closure _,object k_735772, object x_731204_733141, object y_731205_733142*/
 +static void __lambda_1430(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object n)*/
 +static void __lambda_1429(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object n)*/
-+static void __lambda_779(void *data, object clo, int argc, object *args) ;/*closure _,object k_735772, object nums_731204_733147_raw, ...*/
-+static void __lambda_777(void *data, object clo, int argc, object *args) ;/*closure _,object k_735766, object a_731202_733145, object b_731203_733146*/
-+static void __lambda_778(void *data, object clo, int argc, object *args) ;/*object self_7312447, object r_735769*/
-+static void __lambda_776(void *data, object clo, int argc, object *args) ;/*closure _,object k_735759, object nums_731201_733144_raw, ...*/
-+static void __lambda_774(void *data, object clo, int argc, object *args) ;/*closure _,object k_735754, object a_731199_733142, object b_731200_733143*/
-+static void __lambda_775(void *data, object clo, int argc, object *args) ;/*object self_7312446, object r_735756*/
-+static void __lambda_771(void *data, object clo, int argc, object *args) ;/*closure _,object k_735744, object first_731195_733138, object rest_731196_733139_raw, ...*/
-+static void __lambda_773(void *data, object clo, int argc, object *args) ;/*object self_7312444, object k_735746, object old_731197_733140, object new_731198_733141*/
-+static void __lambda_772(void *data, object clo, int argc, object *args) ;/*object self_7312445, object r_735745*/
-+static void __lambda_768(void *data, object clo, int argc, object *args) ;/*closure _,object k_735738, object first_731191_733134, object rest_731192_733135_raw, ...*/
-+static void __lambda_770(void *data, object clo, int argc, object *args) ;/*object self_7312442, object k_735740, object old_731193_733136, object new_731194_733137*/
-+static void __lambda_769(void *data, object clo, int argc, object *args) ;/*object self_7312443, object r_735739*/
++static void __lambda_779(void *data, object clo, int argc, object *args) ;/*closure _,object k_735765, object nums_731203_733140_raw, ...*/
++static void __lambda_777(void *data, object clo, int argc, object *args) ;/*closure _,object k_735759, object a_731201_733138, object b_731202_733139*/
++static void __lambda_778(void *data, object clo, int argc, object *args) ;/*object self_7312440, object r_735762*/
++static void __lambda_776(void *data, object clo, int argc, object *args) ;/*closure _,object k_735752, object nums_731200_733137_raw, ...*/
++static void __lambda_774(void *data, object clo, int argc, object *args) ;/*closure _,object k_735747, object a_731198_733135, object b_731199_733136*/
++static void __lambda_775(void *data, object clo, int argc, object *args) ;/*object self_7312439, object r_735749*/
++static void __lambda_771(void *data, object clo, int argc, object *args) ;/*closure _,object k_735737, object first_731194_733131, object rest_731195_733132_raw, ...*/
++static void __lambda_773(void *data, object clo, int argc, object *args) ;/*object self_7312437, object k_735739, object old_731196_733133, object new_731197_733134*/
++static void __lambda_772(void *data, object clo, int argc, object *args) ;/*object self_7312438, object r_735738*/
++static void __lambda_768(void *data, object clo, int argc, object *args) ;/*closure _,object k_735731, object first_731190_733127, object rest_731191_733128_raw, ...*/
++static void __lambda_770(void *data, object clo, int argc, object *args) ;/*object self_7312435, object k_735733, object old_731192_733129, object new_731193_733130*/
++static void __lambda_769(void *data, object clo, int argc, object *args) ;/*object self_7312436, object r_735732*/
 +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 void __lambda_767(void *data, object clo, int argc, object *args) ;/*closure _,object k_735732, object num_731190_733133*/
++static void __lambda_767(void *data, object clo, int argc, object *args) ;/*closure _,object k_735725, object num_731189_733126*/
 +static object __lambda_1426(void *data, object ptr, object num) ;
 +static void __lambda_1425(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object num)*/
 +static object __lambda_1424(void *data, object ptr, object num) ;
 +static void __lambda_1423(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object num)*/
 +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_761(void *data, object clo, int argc, object *args) ;/*closure _,object k_735715, object k_731180_733130*/
-+static void __lambda_763(void *data, object clo, int argc, object *args) ;/*object self_7312437, object r_735716*/
-+static void __lambda_766(void *data, object clo, int argc, object *args) ;/*object self_7312438, object s_731185_733131*/
-+static void __lambda_764(void *data, object clo, int argc, object *args) ;/*object self_7312439, object k_735720*/
-+static void __lambda_765(void *data, object clo, int argc, object *args) ;/*object self_7312440, object r_735721*/
-+static void __lambda_762(void *data, object clo, int argc, object *args) ;/*object self_7312441, object k_735724*/
++static void __lambda_761(void *data, object clo, int argc, object *args) ;/*closure _,object k_735708, object k_731179_733123*/
++static void __lambda_763(void *data, object clo, int argc, object *args) ;/*object self_7312430, object r_735709*/
++static void __lambda_766(void *data, object clo, int argc, object *args) ;/*object self_7312431, object s_731184_733124*/
++static void __lambda_764(void *data, object clo, int argc, object *args) ;/*object self_7312432, object k_735713*/
++static void __lambda_765(void *data, object clo, int argc, object *args) ;/*object self_7312433, object r_735714*/
++static void __lambda_762(void *data, object clo, int argc, object *args) ;/*object self_7312434, object k_735717*/
 +static void __lambda_1420(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object obj)*/
 +static void __lambda_1419(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object obj)*/
-+static void __lambda_759(void *data, object clo, int argc, object *args) ;/*closure _,object k_735711, object num_731179_733129*/
-+static void __lambda_760(void *data, object clo, int argc, object *args) ;/*object self_7312436, object r_735712*/
-+static void __lambda_757(void *data, object clo, int argc, object *args) ;/*closure _,object k_735707, object num_731178_733128*/
-+static void __lambda_758(void *data, object clo, int argc, object *args) ;/*object self_7312435, object r_735708*/
-+static void __lambda_755(void *data, object clo, int argc, object *args) ;/*closure _,object k_735700, object a_731175_733125, object b_731176_733126*/
-+static void __lambda_756(void *data, object clo, int argc, object *args) ;/*object self_7312434, object res_731177_733127*/
++static void __lambda_759(void *data, object clo, int argc, object *args) ;/*closure _,object k_735704, object num_731178_733122*/
++static void __lambda_760(void *data, object clo, int argc, object *args) ;/*object self_7312429, object r_735705*/
++static void __lambda_757(void *data, object clo, int argc, object *args) ;/*closure _,object k_735700, object num_731177_733121*/
++static void __lambda_758(void *data, object clo, int argc, object *args) ;/*object self_7312428, object r_735701*/
++static void __lambda_755(void *data, object clo, int argc, object *args) ;/*closure _,object k_735693, object a_731174_733118, object b_731175_733119*/
++static void __lambda_756(void *data, object clo, int argc, object *args) ;/*object self_7312427, object res_731176_733120*/
 +static void __lambda_1418(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object num1, object num2)*/
 +static void __lambda_1417(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object num)*/
 +static object __lambda_1416(void *data, object ptr, object z) ;
@@ -2107,870 +2107,869 @@ Make let-values be the same as let*-values, to work around
 +static void __lambda_1409(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object z)*/
 +static object __lambda_1408(void *data, object ptr, object z) ;
 +static void __lambda_1407(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object z)*/
-+static void __lambda_749(void *data, object clo, int argc, object *args) ;/*closure _,object k_735688, object pred_731162_733120, object lst_731163_733121*/
-+static void __lambda_750(void *data, object clo, int argc, object *args) ;/*object self_7312428, object l_731165_733122*/
-+static void __lambda_751(void *data, object clo, int argc, object *args) ;/*object self_7312429, object every_85_731166_733123*/
-+static void __lambda_1362(void *data, object clo, int argc, object *args) ;/*object self_7312430, object every_85_731166_733123*/
-+static void __lambda_754(void *data, object clo, int argc, object *args) ;/*object self_7312431, object k_735692, object l_731167_733124*/
-+static void __lambda_752(void *data, object clo, int argc, object *args) ;/*object self_7312432, object r_735691*/
-+static void __lambda_753(void *data, object clo, int argc, object *args) ;/*object self_7312433, object r_735690*/
-+static void __lambda_743(void *data, object clo, int argc, object *args) ;/*closure _,object k_735678, object pred_731149_733115, object lst_731150_733116*/
-+static void __lambda_744(void *data, object clo, int argc, object *args) ;/*object self_7312422, object l_731152_733117*/
-+static void __lambda_745(void *data, object clo, int argc, object *args) ;/*object self_7312423, object any_85_731153_733118*/
-+static void __lambda_1361(void *data, object clo, int argc, object *args) ;/*object self_7312424, object any_85_731153_733118*/
-+static void __lambda_748(void *data, object clo, int argc, object *args) ;/*object self_7312425, object k_735682, object l_731154_733119*/
-+static void __lambda_746(void *data, object clo, int argc, object *args) ;/*object self_7312426, object r_735681*/
-+static void __lambda_747(void *data, object clo, int argc, object *args) ;/*object self_7312427, object r_735680*/
-+static void __lambda_729(void *data, object clo, int argc, object *args) ;/*closure _,object k_735655, object reason_731133_733105, object expr_731134_733106, object args_731135_733107_raw, ...*/
-+static void __lambda_730(void *data, object clo, int argc, object *args) ;/*object self_7312408, object reason_95line_91loc_127_733109*/
-+static void __lambda_1360(void *data, object clo, int argc, object *args) ;/*object self_7312409, object reason_95line_91loc_127_733109*/
-+static void __lambda_741(void *data, object clo, int argc, object *args) ;/*object self_7312410, object k_735673, object reason_731136_733111*/
-+static void __lambda_742(void *data, object clo, int argc, object *args) ;/*object self_7312411, object r_735675*/
-+static void __lambda_731(void *data, object clo, int argc, object *args) ;/*object self_7312412, object r_735672*/
-+static void __lambda_732(void *data, object clo, int argc, object *args) ;/*object self_7312413, object r_735656*/
-+static void __lambda_733(void *data, object clo, int argc, object *args) ;/*object self_7312414, object found_731140_733112*/
-+static void __lambda_740(void *data, object clo, int argc, object *args) ;/*object self_7312415, object msg_731146_733114*/
-+static void __lambda_734(void *data, object clo, int argc, object *args) ;/*object self_7312416, object k_735662*/
-+static void __lambda_737(void *data, object clo, int argc, object *args) ;/*object self_7312417, object r_735663*/
-+static void __lambda_738(void *data, object clo, int argc, object *args) ;/*object self_7312418, object r_735664*/
-+static void __lambda_739(void *data, object clo, int argc, object *args) ;/*object self_7312419, object r_735665*/
-+static void __lambda_735(void *data, object clo, int argc, object *args) ;/*object self_7312420, object k_735669*/
-+static void __lambda_736(void *data, object clo, int argc, object *args) ;/*object self_7312421, object r_735670*/
++static void __lambda_749(void *data, object clo, int argc, object *args) ;/*closure _,object k_735681, object pred_731161_733113, object lst_731162_733114*/
++static void __lambda_750(void *data, object clo, int argc, object *args) ;/*object self_7312421, object l_731164_733115*/
++static void __lambda_751(void *data, object clo, int argc, object *args) ;/*object self_7312422, object every_85_731165_733116*/
++static void __lambda_1362(void *data, object clo, int argc, object *args) ;/*object self_7312423, object every_85_731165_733116*/
++static void __lambda_754(void *data, object clo, int argc, object *args) ;/*object self_7312424, object k_735685, object l_731166_733117*/
++static void __lambda_752(void *data, object clo, int argc, object *args) ;/*object self_7312425, object r_735684*/
++static void __lambda_753(void *data, object clo, int argc, object *args) ;/*object self_7312426, object r_735683*/
++static void __lambda_743(void *data, object clo, int argc, object *args) ;/*closure _,object k_735671, object pred_731148_733108, object lst_731149_733109*/
++static void __lambda_744(void *data, object clo, int argc, object *args) ;/*object self_7312415, object l_731151_733110*/
++static void __lambda_745(void *data, object clo, int argc, object *args) ;/*object self_7312416, object any_85_731152_733111*/
++static void __lambda_1361(void *data, object clo, int argc, object *args) ;/*object self_7312417, object any_85_731152_733111*/
++static void __lambda_748(void *data, object clo, int argc, object *args) ;/*object self_7312418, object k_735675, object l_731153_733112*/
++static void __lambda_746(void *data, object clo, int argc, object *args) ;/*object self_7312419, object r_735674*/
++static void __lambda_747(void *data, object clo, int argc, object *args) ;/*object self_7312420, object r_735673*/
++static void __lambda_729(void *data, object clo, int argc, object *args) ;/*closure _,object k_735648, object reason_731132_733098, object expr_731133_733099, object args_731134_733100_raw, ...*/
++static void __lambda_730(void *data, object clo, int argc, object *args) ;/*object self_7312401, object reason_95line_91loc_127_733102*/
++static void __lambda_1360(void *data, object clo, int argc, object *args) ;/*object self_7312402, object reason_95line_91loc_127_733102*/
++static void __lambda_741(void *data, object clo, int argc, object *args) ;/*object self_7312403, object k_735666, object reason_731135_733104*/
++static void __lambda_742(void *data, object clo, int argc, object *args) ;/*object self_7312404, object r_735668*/
++static void __lambda_731(void *data, object clo, int argc, object *args) ;/*object self_7312405, object r_735665*/
++static void __lambda_732(void *data, object clo, int argc, object *args) ;/*object self_7312406, object r_735649*/
++static void __lambda_733(void *data, object clo, int argc, object *args) ;/*object self_7312407, object found_731139_733105*/
++static void __lambda_740(void *data, object clo, int argc, object *args) ;/*object self_7312408, object msg_731145_733107*/
++static void __lambda_734(void *data, object clo, int argc, object *args) ;/*object self_7312409, object k_735655*/
++static void __lambda_737(void *data, object clo, int argc, object *args) ;/*object self_7312410, object r_735656*/
++static void __lambda_738(void *data, object clo, int argc, object *args) ;/*object self_7312411, object r_735657*/
++static void __lambda_739(void *data, object clo, int argc, object *args) ;/*object self_7312412, object r_735658*/
++static void __lambda_735(void *data, object clo, int argc, object *args) ;/*object self_7312413, object k_735662*/
++static void __lambda_736(void *data, object clo, int argc, object *args) ;/*object self_7312414, object r_735663*/
 +static void __lambda_1406(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k)*/
 +static void __lambda_1405(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object h)*/
-+static void __lambda_717(void *data, object clo, int argc, object *args) ;/*closure _,object k_735637, object handler_731125_733098, object thunk_731126_733099*/
-+static void __lambda_724(void *data, object clo, int argc, object *args) ;/*object self_7312395, object k_735643, object obj_731129_733102*/
-+static void __lambda_725(void *data, object clo, int argc, object *args) ;/*object self_7312396, object result_731130_733103, object continuable_127_731131_733104*/
-+static void __lambda_1359(void *data, object clo, int argc, object *args) ;/*object self_7312397, object result_731130_733103*/
-+static void __lambda_726(void *data, object clo, int argc, object *args) ;/*object self_7312398, object r_735645*/
-+static void __lambda_727(void *data, object clo, int argc, object *args) ;/*object self_7312399, object r_735647*/
-+static void __lambda_728(void *data, object clo, int argc, object *args) ;/*object self_7312400, object r_735646*/
-+static void __lambda_718(void *data, object clo, int argc, object *args) ;/*object self_7312401, object r_735638*/
-+static void __lambda_719(void *data, object clo, int argc, object *args) ;/*object self_7312402, object result_731127_733100, object my_91handler_731128_733101*/
-+static void __lambda_1358(void *data, object clo, int argc, object *args) ;/*object self_7312403, object result_731127_733100*/
-+static void __lambda_720(void *data, object clo, int argc, object *args) ;/*object self_7312404, object r_735639*/
-+static void __lambda_721(void *data, object clo, int argc, object *args) ;/*object self_7312405, object r_735642*/
-+static void __lambda_722(void *data, object clo, int argc, object *args) ;/*object self_7312406, object r_735640*/
-+static void __lambda_723(void *data, object clo, int argc, object *args) ;/*object self_7312407, object r_735641*/
-+static void __lambda_716(void *data, object clo, int argc, object *args) ;/*closure _,object k_735596, object exp_731119_733095, object rename_731120_733096, object compare_731121_733097*/
-+static void __lambda_715(void *data, object clo, int argc, object *args) ;/*closure _,object k_735587, object obj_731118_733094*/
-+static void __lambda_714(void *data, object clo, int argc, object *args) ;/*closure _,object k_735578, object obj_731117_733093*/
-+static void __lambda_713(void *data, object clo, int argc, object *args) ;/*closure _,object k_735574, object msg_731115_733091, object args_731116_733092_raw, ...*/
-+static void __lambda_712(void *data, object clo, int argc, object *args) ;/*closure _,object k_735565, object x_731113_733090*/
-+static void __lambda_694(void *data, object clo, int argc, object *args) ;/*closure _,object k_735529, object init_731086_733080, object o_731087_733081_raw, ...*/
-+static void __lambda_697(void *data, object clo, int argc, object *args) ;/*object self_7312377, object converter_731090_733082*/
-+static void __lambda_698(void *data, object clo, int argc, object *args) ;/*object self_7312378, object value_731093_733083*/
-+static void __lambda_699(void *data, object clo, int argc, object *args) ;/*object self_7312379, object key_731096_733084*/
-+static void __lambda_1357(void *data, object clo, int argc, object *args) ;/*object self_7312380, object key_731096_733084*/
-+static void __lambda_700(void *data, object clo, int argc, object *args) ;/*object self_7312381, object r_735532*/
-+static void __lambda_701(void *data, object clo, int argc, object *args) ;/*object self_7312382, object r_735553*/
-+static void __lambda_702(void *data, object clo, int argc, object *args) ;/*object self_7312383, object r_735533*/
-+static void __lambda_703(void *data, object clo, int argc, object *args) ;/*object self_7312384, object r_735534*/
-+static void __lambda_704(void *data, object clo, int argc, object *args) ;/*object self_7312385, object k_735535, object args_731098_733085_raw, ...*/
-+static void __lambda_709(void *data, object clo, int argc, object *args) ;/*object self_7312390, object r_735547*/
-+static void __lambda_710(void *data, object clo, int argc, object *args) ;/*object self_7312391, object cell_731111_733088*/
-+static void __lambda_711(void *data, object clo, int argc, object *args) ;/*object self_7312392, object r_735545*/
-+static void __lambda_707(void *data, object clo, int argc, object *args) ;/*object self_7312388, object r_735542*/
-+static void __lambda_708(void *data, object clo, int argc, object *args) ;/*object self_7312389, object cell_731106_733087*/
-+static void __lambda_705(void *data, object clo, int argc, object *args) ;/*object self_7312386, object pobj_731102_733086*/
-+static void __lambda_706(void *data, object clo, int argc, object *args) ;/*object self_7312387, object r_735538*/
-+static void __lambda_695(void *data, object clo, int argc, object *args) ;/*object self_7312393, object k_735554*/
-+static void __lambda_696(void *data, object clo, int argc, object *args) ;/*object self_7312394, object k_735556, object x_731112_733089*/
++static void __lambda_717(void *data, object clo, int argc, object *args) ;/*closure _,object k_735630, object handler_731124_733091, object thunk_731125_733092*/
++static void __lambda_724(void *data, object clo, int argc, object *args) ;/*object self_7312388, object k_735636, object obj_731128_733095*/
++static void __lambda_725(void *data, object clo, int argc, object *args) ;/*object self_7312389, object result_731129_733096, object continuable_127_731130_733097*/
++static void __lambda_1359(void *data, object clo, int argc, object *args) ;/*object self_7312390, object result_731129_733096*/
++static void __lambda_726(void *data, object clo, int argc, object *args) ;/*object self_7312391, object r_735638*/
++static void __lambda_727(void *data, object clo, int argc, object *args) ;/*object self_7312392, object r_735640*/
++static void __lambda_728(void *data, object clo, int argc, object *args) ;/*object self_7312393, object r_735639*/
++static void __lambda_718(void *data, object clo, int argc, object *args) ;/*object self_7312394, object r_735631*/
++static void __lambda_719(void *data, object clo, int argc, object *args) ;/*object self_7312395, object result_731126_733093, object my_91handler_731127_733094*/
++static void __lambda_1358(void *data, object clo, int argc, object *args) ;/*object self_7312396, object result_731126_733093*/
++static void __lambda_720(void *data, object clo, int argc, object *args) ;/*object self_7312397, object r_735632*/
++static void __lambda_721(void *data, object clo, int argc, object *args) ;/*object self_7312398, object r_735635*/
++static void __lambda_722(void *data, object clo, int argc, object *args) ;/*object self_7312399, object r_735633*/
++static void __lambda_723(void *data, object clo, int argc, object *args) ;/*object self_7312400, object r_735634*/
++static void __lambda_716(void *data, object clo, int argc, object *args) ;/*closure _,object k_735589, object exp_731118_733088, object rename_731119_733089, object compare_731120_733090*/
++static void __lambda_715(void *data, object clo, int argc, object *args) ;/*closure _,object k_735580, object obj_731117_733087*/
++static void __lambda_714(void *data, object clo, int argc, object *args) ;/*closure _,object k_735571, object obj_731116_733086*/
++static void __lambda_713(void *data, object clo, int argc, object *args) ;/*closure _,object k_735567, object msg_731114_733084, object args_731115_733085_raw, ...*/
++static void __lambda_712(void *data, object clo, int argc, object *args) ;/*closure _,object k_735558, object x_731112_733083*/
++static void __lambda_694(void *data, object clo, int argc, object *args) ;/*closure _,object k_735522, object init_731085_733073, object o_731086_733074_raw, ...*/
++static void __lambda_697(void *data, object clo, int argc, object *args) ;/*object self_7312370, object converter_731089_733075*/
++static void __lambda_698(void *data, object clo, int argc, object *args) ;/*object self_7312371, object value_731092_733076*/
++static void __lambda_699(void *data, object clo, int argc, object *args) ;/*object self_7312372, object key_731095_733077*/
++static void __lambda_1357(void *data, object clo, int argc, object *args) ;/*object self_7312373, object key_731095_733077*/
++static void __lambda_700(void *data, object clo, int argc, object *args) ;/*object self_7312374, object r_735525*/
++static void __lambda_701(void *data, object clo, int argc, object *args) ;/*object self_7312375, object r_735546*/
++static void __lambda_702(void *data, object clo, int argc, object *args) ;/*object self_7312376, object r_735526*/
++static void __lambda_703(void *data, object clo, int argc, object *args) ;/*object self_7312377, object r_735527*/
++static void __lambda_704(void *data, object clo, int argc, object *args) ;/*object self_7312378, object k_735528, object args_731097_733078_raw, ...*/
++static void __lambda_709(void *data, object clo, int argc, object *args) ;/*object self_7312383, object r_735540*/
++static void __lambda_710(void *data, object clo, int argc, object *args) ;/*object self_7312384, object cell_731110_733081*/
++static void __lambda_711(void *data, object clo, int argc, object *args) ;/*object self_7312385, object r_735538*/
++static void __lambda_707(void *data, object clo, int argc, object *args) ;/*object self_7312381, object r_735535*/
++static void __lambda_708(void *data, object clo, int argc, object *args) ;/*object self_7312382, object cell_731105_733080*/
++static void __lambda_705(void *data, object clo, int argc, object *args) ;/*object self_7312379, object pobj_731101_733079*/
++static void __lambda_706(void *data, object clo, int argc, object *args) ;/*object self_7312380, object r_735531*/
++static void __lambda_695(void *data, object clo, int argc, object *args) ;/*object self_7312386, object k_735547*/
++static void __lambda_696(void *data, object clo, int argc, object *args) ;/*object self_7312387, object k_735549, object x_731111_733082*/
 +static void __lambda_1404(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object obj)*/
 +static void __lambda_1403(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k)*/
-+static void __lambda_623(void *data, object clo, int argc, object *args) ;/*closure _,object k_735215, object expr_73761_73828_73979_732973, object rename_73762_73829_73980_732974, object compare_73763_73830_73981_732975*/
-+static void __lambda_624(void *data, object clo, int argc, object *args) ;/*object self_7312305, object v_931_73770_73905_731029_733023*/
-+static void __lambda_668(void *data, object clo, int argc, object *args) ;/*object self_7312306, object tmp_73832_73834_73982_732976*/
-+static void __lambda_693(void *data, object clo, int argc, object *args) ;/*object self_7312307, object r_735216*/
-+static void __lambda_669(void *data, object clo, int argc, object *args) ;/*object self_7312308, object k_735218*/
-+static void __lambda_670(void *data, object clo, int argc, object *args) ;/*object self_7312309, object v_9330_73799_73871_731007_733001*/
-+static void __lambda_676(void *data, object clo, int argc, object *args) ;/*object self_7312310, object tmp_73836_73838_73983_732977*/
-+static void __lambda_677(void *data, object clo, int argc, object *args) ;/*object self_7312311, object v_9347_73816_73843_73985_732979*/
-+static void __lambda_691(void *data, object clo, int argc, object *args) ;/*object self_7312312, object tmp_73840_73842_73984_732978*/
-+static void __lambda_692(void *data, object clo, int argc, object *args) ;/*object self_7312313, object r_735221*/
-+static void __lambda_678(void *data, object clo, int argc, object *args) ;/*object self_7312314, object k_735223*/
-+static void __lambda_679(void *data, object clo, int argc, object *args) ;/*object self_7312315, object w_9349_73818_73847_73987_732981, object param_91ls51_73820_73848_73988_732982, object value_91ls52_73821_73849_73989_732983*/
-+static void __lambda_680(void *data, object clo, int argc, object *args) ;/*object self_7312316, object lp_9350_73819_73850_73990_732984*/
-+static void __lambda_1356(void *data, object clo, int argc, object *args) ;/*object self_7312317, object lp_9350_73819_73850_73990_732984*/
-+static void __lambda_683(void *data, object clo, int argc, object *args) ;/*object self_7312318, object k_735230, object w_9349_73818_73851_73991_732985, object param_91ls51_73820_73852_73992_732986, object value_91ls52_73821_73853_73993_732987*/
-+static void __lambda_684(void *data, object clo, int argc, object *args) ;/*object self_7312319, object r_735232_7311655*/
-+static void __lambda_685(void *data, object clo, int argc, object *args) ;/*object self_7312320, object r_735233_7311656_7311665*/
-+static void __lambda_686(void *data, object clo, int argc, object *args) ;/*object self_7312321, object param_73854_73994_732988_7311657_7311666, object value_73855_73995_732989_7311658_7311667*/
-+static void __lambda_687(void *data, object clo, int argc, object *args) ;/*object self_7312322, object r_735236_7311659_7311668*/
-+static void __lambda_690(void *data, object clo, int argc, object *args) ;/*object self_7312323, object k_735251_737913_7311662_7311671, object param_73858_73998_732992_737914_7311663_7311672, object value_73859_73999_732993_737915_7311664_7311673*/
-+static void __lambda_688(void *data, object clo, int argc, object *args) ;/*object self_7312324, object r_735250_737906_7311660_7311669*/
-+static void __lambda_689(void *data, object clo, int argc, object *args) ;/*object self_7312325, object r_735245_737907_7311661_7311670*/
-+static void __lambda_681(void *data, object clo, int argc, object *args) ;/*object self_7312326, object r_735229*/
-+static void __lambda_682(void *data, object clo, int argc, object *args) ;/*object self_7312327, object r_735228*/
-+static void __lambda_671(void *data, object clo, int argc, object *args) ;/*object self_7312328, object k_735272*/
-+static void __lambda_672(void *data, object clo, int argc, object *args) ;/*object self_7312329, object r_735302*/
-+static void __lambda_673(void *data, object clo, int argc, object *args) ;/*object self_7312330, object r_735321_737825*/
-+static void __lambda_674(void *data, object clo, int argc, object *args) ;/*object self_7312331, object r_735324_737826*/
-+static void __lambda_675(void *data, object clo, int argc, object *args) ;/*object self_7312332, object r_735327_737827*/
-+static void __lambda_625(void *data, object clo, int argc, object *args) ;/*object self_7312333, object k_735337*/
-+static void __lambda_626(void *data, object clo, int argc, object *args) ;/*object self_7312334, object v_935_73774_73913_731033_733027*/
-+static void __lambda_627(void *data, object clo, int argc, object *args) ;/*object self_7312335, object w_937_73776_73917_731035_733029, object param_91ls9_73778_73918_731036_733030, object value_91ls10_73779_73919_731037_733031, object p_91ls11_73780_73920_731038_733032, object old_91ls12_73781_73921_731039_733033, object new_91ls13_73782_73922_731040_733034*/
-+static void __lambda_628(void *data, object clo, int argc, object *args) ;/*object self_7312336, object lp_938_73777_73923_731041_733035*/
-+static void __lambda_1355(void *data, object clo, int argc, object *args) ;/*object self_7312337, object lp_938_73777_73923_731041_733035*/
-+static void __lambda_631(void *data, object clo, int argc, object *args) ;/*object self_7312338, object k_735355, object w_937_73776_73924_731042_733036, object param_91ls9_73778_73925_731043_733037, object value_91ls10_73779_73926_731044_733038, object p_91ls11_73780_73927_731045_733039, object old_91ls12_73781_73928_731046_733040, object new_91ls13_73782_73929_731047_733041*/
-+static void __lambda_632(void *data, object clo, int argc, object *args) ;/*object self_7312339, object r_735357_7311410*/
-+static void __lambda_633(void *data, object clo, int argc, object *args) ;/*object self_7312340, object r_735358_7311411_7311461*/
-+static void __lambda_634(void *data, object clo, int argc, object *args) ;/*object self_7312341, object r_735359_7311412_7311462_7311511*/
-+static void __lambda_635(void *data, object clo, int argc, object *args) ;/*object self_7312342, object r_735360_7311413_7311463_7311512_7311560*/
-+static void __lambda_636(void *data, object clo, int argc, object *args) ;/*object self_7312343, object r_735361_7311414_7311464_7311513_7311561_7311608*/
-+static void __lambda_637(void *data, object clo, int argc, object *args) ;/*object self_7312344, object param_73930_731048_733042_7311415_7311465_7311514_7311562_7311609, object value_73931_731049_733043_7311416_7311466_7311515_7311563_7311610, object p_73932_731050_733044_7311417_7311467_7311516_7311564_7311611, object old_73933_731051_733045_7311418_7311468_7311517_7311565_7311612, object new_73934_731052_733046_7311419_7311469_7311518_7311566_7311613*/
-+static void __lambda_638(void *data, object clo, int argc, object *args) ;/*object self_7312345, object r_735372_7311420_7311470_7311519_7311567_7311614*/
-+static void __lambda_667(void *data, object clo, int argc, object *args) ;/*object self_7312346, object k_735495_7311458_7311508_7311557_7311605_7311652, object p_73945_731059_733053_7311459_7311509_7311558_7311606_7311653, object param_73946_731060_733054_7311460_7311510_7311559_7311607_7311654*/
-+static void __lambda_639(void *data, object clo, int argc, object *args) ;/*object self_7312347, object r_735494_7311421_7311471_7311520_7311568_7311615*/
-+static void __lambda_640(void *data, object clo, int argc, object *args) ;/*object self_7312348, object r_735375_7311422_7311472_7311521_7311569_7311616*/
-+static void __lambda_641(void *data, object clo, int argc, object *args) ;/*object self_7312349, object r_735381_7311423_7311473_7311522_7311570_7311617*/
-+static void __lambda_666(void *data, object clo, int argc, object *args) ;/*object self_7312350, object k_735485_7311455_7311505_7311554_7311602_7311649, object old_73947_731061_733055_7311456_7311506_7311555_7311603_7311650, object p_73948_731062_733056_7311457_7311507_7311556_7311604_7311651*/
-+static void __lambda_642(void *data, object clo, int argc, object *args) ;/*object self_7312351, object r_735484_7311424_7311474_7311523_7311571_7311618*/
-+static void __lambda_643(void *data, object clo, int argc, object *args) ;/*object self_7312352, object r_735457_7311425_7311475_7311524_7311572_7311619*/
-+static void __lambda_663(void *data, object clo, int argc, object *args) ;/*object self_7312353, object k_735460_7311449_7311499_7311548_7311596_7311643, object new_73949_731063_733057_7311450_7311500_7311549_7311597_7311644, object p_73950_731064_733058_7311451_7311501_7311550_7311598_7311645, object value_73951_731065_733059_7311452_7311502_7311551_7311599_7311646*/
-+static void __lambda_664(void *data, object clo, int argc, object *args) ;/*object self_7312354, object r_735476_7311453_7311503_7311552_7311600_7311647*/
-+static void __lambda_665(void *data, object clo, int argc, object *args) ;/*object self_7312355, object r_735479_7311454_7311504_7311553_7311601_7311648*/
-+static void __lambda_644(void *data, object clo, int argc, object *args) ;/*object self_7312356, object r_735459_7311426_7311476_7311525_7311573_7311620*/
-+static void __lambda_645(void *data, object clo, int argc, object *args) ;/*object self_7312357, object r_735458_7311427_7311477_7311526_7311574_7311621*/
-+static void __lambda_646(void *data, object clo, int argc, object *args) ;/*object self_7312358, object r_735384_7311428_7311478_7311527_7311575_7311622*/
-+static void __lambda_647(void *data, object clo, int argc, object *args) ;/*object self_7312359, object r_735390_7311429_7311479_7311528_7311576_7311623*/
-+static void __lambda_648(void *data, object clo, int argc, object *args) ;/*object self_7312360, object r_735432_7311430_7311480_7311529_7311577_7311624*/
-+static void __lambda_660(void *data, object clo, int argc, object *args) ;/*object self_7312361, object k_735439_7311444_7311494_7311543_7311591_7311638, object p_73952_731066_733060_7311445_7311495_7311544_7311592_7311639, object new_73953_731067_733061_7311446_7311496_7311545_7311593_7311640*/
-+static void __lambda_661(void *data, object clo, int argc, object *args) ;/*object self_7312362, object r_735447_7311447_7311497_7311546_7311594_7311641*/
-+static void __lambda_662(void *data, object clo, int argc, object *args) ;/*object self_7312363, object r_735450_7311448_7311498_7311547_7311595_7311642*/
-+static void __lambda_649(void *data, object clo, int argc, object *args) ;/*object self_7312364, object r_735438_7311431_7311481_7311530_7311578_7311625*/
-+static void __lambda_650(void *data, object clo, int argc, object *args) ;/*object self_7312365, object r_735436_7311432_7311482_7311531_7311579_7311626*/
-+static void __lambda_651(void *data, object clo, int argc, object *args) ;/*object self_7312366, object r_735433_737586_7311433_7311483_7311532_7311580_7311627*/
-+static void __lambda_652(void *data, object clo, int argc, object *args) ;/*object self_7312367, object r_735426_737588_737616_7311434_7311484_7311533_7311581_7311628*/
-+static void __lambda_653(void *data, object clo, int argc, object *args) ;/*object self_7312368, object r_735402_737591_737619_737645_737670_7311435_7311485_7311534_7311582_7311629*/
-+static void __lambda_657(void *data, object clo, int argc, object *args) ;/*object self_7312369, object k_735409_737606_737634_737660_737685_7311439_7311489_7311538_7311586_7311633, object p_73954_731068_733062_737607_737635_737661_737686_7311440_7311490_7311539_7311587_7311634, object old_73955_731069_733063_737608_737636_737662_737687_7311441_7311491_7311540_7311588_7311635*/
-+static void __lambda_658(void *data, object clo, int argc, object *args) ;/*object self_7312370, object r_735417_737609_737637_737663_737688_7311442_7311492_7311541_7311589_7311636*/
-+static void __lambda_659(void *data, object clo, int argc, object *args) ;/*object self_7312371, object r_735420_737610_737638_737664_737689_7311443_7311493_7311542_7311590_7311637*/
-+static void __lambda_654(void *data, object clo, int argc, object *args) ;/*object self_7312372, object r_735408_737592_737620_737646_737671_7311436_7311486_7311535_7311583_7311630*/
-+static void __lambda_655(void *data, object clo, int argc, object *args) ;/*object self_7312373, object r_735406_737593_737621_737647_737672_7311437_7311487_7311536_7311584_7311631*/
-+static void __lambda_656(void *data, object clo, int argc, object *args) ;/*object self_7312374, object r_735403_737594_737622_737648_737673_737694_7311438_7311488_7311537_7311585_7311632*/
-+static void __lambda_629(void *data, object clo, int argc, object *args) ;/*object self_7312375, object r_735354*/
-+static void __lambda_630(void *data, object clo, int argc, object *args) ;/*object self_7312376, object r_735353*/
++static void __lambda_623(void *data, object clo, int argc, object *args) ;/*closure _,object k_735208, object expr_73761_73827_73978_732966, object rename_73762_73828_73979_732967, object compare_73763_73829_73980_732968*/
++static void __lambda_624(void *data, object clo, int argc, object *args) ;/*object self_7312298, object v_931_73769_73904_731028_733016*/
++static void __lambda_668(void *data, object clo, int argc, object *args) ;/*object self_7312299, object tmp_73831_73833_73981_732969*/
++static void __lambda_693(void *data, object clo, int argc, object *args) ;/*object self_7312300, object r_735209*/
++static void __lambda_669(void *data, object clo, int argc, object *args) ;/*object self_7312301, object k_735211*/
++static void __lambda_670(void *data, object clo, int argc, object *args) ;/*object self_7312302, object v_9330_73798_73870_731006_732994*/
++static void __lambda_676(void *data, object clo, int argc, object *args) ;/*object self_7312303, object tmp_73835_73837_73982_732970*/
++static void __lambda_677(void *data, object clo, int argc, object *args) ;/*object self_7312304, object v_9347_73815_73842_73984_732972*/
++static void __lambda_691(void *data, object clo, int argc, object *args) ;/*object self_7312305, object tmp_73839_73841_73983_732971*/
++static void __lambda_692(void *data, object clo, int argc, object *args) ;/*object self_7312306, object r_735214*/
++static void __lambda_678(void *data, object clo, int argc, object *args) ;/*object self_7312307, object k_735216*/
++static void __lambda_679(void *data, object clo, int argc, object *args) ;/*object self_7312308, object w_9349_73817_73846_73986_732974, object param_91ls51_73819_73847_73987_732975, object value_91ls52_73820_73848_73988_732976*/
++static void __lambda_680(void *data, object clo, int argc, object *args) ;/*object self_7312309, object lp_9350_73818_73849_73989_732977*/
++static void __lambda_1356(void *data, object clo, int argc, object *args) ;/*object self_7312310, object lp_9350_73818_73849_73989_732977*/
++static void __lambda_683(void *data, object clo, int argc, object *args) ;/*object self_7312311, object k_735223, object w_9349_73817_73850_73990_732978, object param_91ls51_73819_73851_73991_732979, object value_91ls52_73820_73852_73992_732980*/
++static void __lambda_684(void *data, object clo, int argc, object *args) ;/*object self_7312312, object r_735225_7311648*/
++static void __lambda_685(void *data, object clo, int argc, object *args) ;/*object self_7312313, object r_735226_7311649_7311658*/
++static void __lambda_686(void *data, object clo, int argc, object *args) ;/*object self_7312314, object param_73853_73993_732981_7311650_7311659, object value_73854_73994_732982_7311651_7311660*/
++static void __lambda_687(void *data, object clo, int argc, object *args) ;/*object self_7312315, object r_735229_7311652_7311661*/
++static void __lambda_690(void *data, object clo, int argc, object *args) ;/*object self_7312316, object k_735244_737906_7311655_7311664, object param_73857_73997_732985_737907_7311656_7311665, object value_73858_73998_732986_737908_7311657_7311666*/
++static void __lambda_688(void *data, object clo, int argc, object *args) ;/*object self_7312317, object r_735243_737899_7311653_7311662*/
++static void __lambda_689(void *data, object clo, int argc, object *args) ;/*object self_7312318, object r_735238_737900_7311654_7311663*/
++static void __lambda_681(void *data, object clo, int argc, object *args) ;/*object self_7312319, object r_735222*/
++static void __lambda_682(void *data, object clo, int argc, object *args) ;/*object self_7312320, object r_735221*/
++static void __lambda_671(void *data, object clo, int argc, object *args) ;/*object self_7312321, object k_735265*/
++static void __lambda_672(void *data, object clo, int argc, object *args) ;/*object self_7312322, object r_735295*/
++static void __lambda_673(void *data, object clo, int argc, object *args) ;/*object self_7312323, object r_735314_737818*/
++static void __lambda_674(void *data, object clo, int argc, object *args) ;/*object self_7312324, object r_735317_737819*/
++static void __lambda_675(void *data, object clo, int argc, object *args) ;/*object self_7312325, object r_735320_737820*/
++static void __lambda_625(void *data, object clo, int argc, object *args) ;/*object self_7312326, object k_735330*/
++static void __lambda_626(void *data, object clo, int argc, object *args) ;/*object self_7312327, object v_935_73773_73912_731032_733020*/
++static void __lambda_627(void *data, object clo, int argc, object *args) ;/*object self_7312328, object w_937_73775_73916_731034_733022, object param_91ls9_73777_73917_731035_733023, object value_91ls10_73778_73918_731036_733024, object p_91ls11_73779_73919_731037_733025, object old_91ls12_73780_73920_731038_733026, object new_91ls13_73781_73921_731039_733027*/
++static void __lambda_628(void *data, object clo, int argc, object *args) ;/*object self_7312329, object lp_938_73776_73922_731040_733028*/
++static void __lambda_1355(void *data, object clo, int argc, object *args) ;/*object self_7312330, object lp_938_73776_73922_731040_733028*/
++static void __lambda_631(void *data, object clo, int argc, object *args) ;/*object self_7312331, object k_735348, object w_937_73775_73923_731041_733029, object param_91ls9_73777_73924_731042_733030, object value_91ls10_73778_73925_731043_733031, object p_91ls11_73779_73926_731044_733032, object old_91ls12_73780_73927_731045_733033, object new_91ls13_73781_73928_731046_733034*/
++static void __lambda_632(void *data, object clo, int argc, object *args) ;/*object self_7312332, object r_735350_7311403*/
++static void __lambda_633(void *data, object clo, int argc, object *args) ;/*object self_7312333, object r_735351_7311404_7311454*/
++static void __lambda_634(void *data, object clo, int argc, object *args) ;/*object self_7312334, object r_735352_7311405_7311455_7311504*/
++static void __lambda_635(void *data, object clo, int argc, object *args) ;/*object self_7312335, object r_735353_7311406_7311456_7311505_7311553*/
++static void __lambda_636(void *data, object clo, int argc, object *args) ;/*object self_7312336, object r_735354_7311407_7311457_7311506_7311554_7311601*/
++static void __lambda_637(void *data, object clo, int argc, object *args) ;/*object self_7312337, object param_73929_731047_733035_7311408_7311458_7311507_7311555_7311602, object value_73930_731048_733036_7311409_7311459_7311508_7311556_7311603, object p_73931_731049_733037_7311410_7311460_7311509_7311557_7311604, object old_73932_731050_733038_7311411_7311461_7311510_7311558_7311605, object new_73933_731051_733039_7311412_7311462_7311511_7311559_7311606*/
++static void __lambda_638(void *data, object clo, int argc, object *args) ;/*object self_7312338, object r_735365_7311413_7311463_7311512_7311560_7311607*/
++static void __lambda_667(void *data, object clo, int argc, object *args) ;/*object self_7312339, object k_735488_7311451_7311501_7311550_7311598_7311645, object p_73944_731058_733046_7311452_7311502_7311551_7311599_7311646, object param_73945_731059_733047_7311453_7311503_7311552_7311600_7311647*/
++static void __lambda_639(void *data, object clo, int argc, object *args) ;/*object self_7312340, object r_735487_7311414_7311464_7311513_7311561_7311608*/
++static void __lambda_640(void *data, object clo, int argc, object *args) ;/*object self_7312341, object r_735368_7311415_7311465_7311514_7311562_7311609*/
++static void __lambda_641(void *data, object clo, int argc, object *args) ;/*object self_7312342, object r_735374_7311416_7311466_7311515_7311563_7311610*/
++static void __lambda_666(void *data, object clo, int argc, object *args) ;/*object self_7312343, object k_735478_7311448_7311498_7311547_7311595_7311642, object old_73946_731060_733048_7311449_7311499_7311548_7311596_7311643, object p_73947_731061_733049_7311450_7311500_7311549_7311597_7311644*/
++static void __lambda_642(void *data, object clo, int argc, object *args) ;/*object self_7312344, object r_735477_7311417_7311467_7311516_7311564_7311611*/
++static void __lambda_643(void *data, object clo, int argc, object *args) ;/*object self_7312345, object r_735450_7311418_7311468_7311517_7311565_7311612*/
++static void __lambda_663(void *data, object clo, int argc, object *args) ;/*object self_7312346, object k_735453_7311442_7311492_7311541_7311589_7311636, object new_73948_731062_733050_7311443_7311493_7311542_7311590_7311637, object p_73949_731063_733051_7311444_7311494_7311543_7311591_7311638, object value_73950_731064_733052_7311445_7311495_7311544_7311592_7311639*/
++static void __lambda_664(void *data, object clo, int argc, object *args) ;/*object self_7312347, object r_735469_7311446_7311496_7311545_7311593_7311640*/
++static void __lambda_665(void *data, object clo, int argc, object *args) ;/*object self_7312348, object r_735472_7311447_7311497_7311546_7311594_7311641*/
++static void __lambda_644(void *data, object clo, int argc, object *args) ;/*object self_7312349, object r_735452_7311419_7311469_7311518_7311566_7311613*/
++static void __lambda_645(void *data, object clo, int argc, object *args) ;/*object self_7312350, object r_735451_7311420_7311470_7311519_7311567_7311614*/
++static void __lambda_646(void *data, object clo, int argc, object *args) ;/*object self_7312351, object r_735377_7311421_7311471_7311520_7311568_7311615*/
++static void __lambda_647(void *data, object clo, int argc, object *args) ;/*object self_7312352, object r_735383_7311422_7311472_7311521_7311569_7311616*/
++static void __lambda_648(void *data, object clo, int argc, object *args) ;/*object self_7312353, object r_735425_7311423_7311473_7311522_7311570_7311617*/
++static void __lambda_660(void *data, object clo, int argc, object *args) ;/*object self_7312354, object k_735432_7311437_7311487_7311536_7311584_7311631, object p_73951_731065_733053_7311438_7311488_7311537_7311585_7311632, object new_73952_731066_733054_7311439_7311489_7311538_7311586_7311633*/
++static void __lambda_661(void *data, object clo, int argc, object *args) ;/*object self_7312355, object r_735440_7311440_7311490_7311539_7311587_7311634*/
++static void __lambda_662(void *data, object clo, int argc, object *args) ;/*object self_7312356, object r_735443_7311441_7311491_7311540_7311588_7311635*/
++static void __lambda_649(void *data, object clo, int argc, object *args) ;/*object self_7312357, object r_735431_7311424_7311474_7311523_7311571_7311618*/
++static void __lambda_650(void *data, object clo, int argc, object *args) ;/*object self_7312358, object r_735429_7311425_7311475_7311524_7311572_7311619*/
++static void __lambda_651(void *data, object clo, int argc, object *args) ;/*object self_7312359, object r_735426_737579_7311426_7311476_7311525_7311573_7311620*/
++static void __lambda_652(void *data, object clo, int argc, object *args) ;/*object self_7312360, object r_735419_737581_737609_7311427_7311477_7311526_7311574_7311621*/
++static void __lambda_653(void *data, object clo, int argc, object *args) ;/*object self_7312361, object r_735395_737584_737612_737638_737663_7311428_7311478_7311527_7311575_7311622*/
++static void __lambda_657(void *data, object clo, int argc, object *args) ;/*object self_7312362, object k_735402_737599_737627_737653_737678_7311432_7311482_7311531_7311579_7311626, object p_73953_731067_733055_737600_737628_737654_737679_7311433_7311483_7311532_7311580_7311627, object old_73954_731068_733056_737601_737629_737655_737680_7311434_7311484_7311533_7311581_7311628*/
++static void __lambda_658(void *data, object clo, int argc, object *args) ;/*object self_7312363, object r_735410_737602_737630_737656_737681_7311435_7311485_7311534_7311582_7311629*/
++static void __lambda_659(void *data, object clo, int argc, object *args) ;/*object self_7312364, object r_735413_737603_737631_737657_737682_7311436_7311486_7311535_7311583_7311630*/
++static void __lambda_654(void *data, object clo, int argc, object *args) ;/*object self_7312365, object r_735401_737585_737613_737639_737664_7311429_7311479_7311528_7311576_7311623*/
++static void __lambda_655(void *data, object clo, int argc, object *args) ;/*object self_7312366, object r_735399_737586_737614_737640_737665_7311430_7311480_7311529_7311577_7311624*/
++static void __lambda_656(void *data, object clo, int argc, object *args) ;/*object self_7312367, object r_735396_737587_737615_737641_737666_737687_7311431_7311481_7311530_7311578_7311625*/
++static void __lambda_629(void *data, object clo, int argc, object *args) ;/*object self_7312368, object r_735347*/
++static void __lambda_630(void *data, object clo, int argc, object *args) ;/*object self_7312369, object r_735346*/
 +static void __lambda_1402(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object count, object fill)*/
-+static void __lambda_622(void *data, object clo, int argc, object *args) ;/*closure _,object k_735209, object k_73755_732971, object fill_73756_732972_raw, ...*/
-+static void __lambda_621(void *data, object clo, int argc, object *args) ;/*closure _,object k_735206, object chars_73754_732970_raw, ...*/
-+static void __lambda_614(void *data, object clo, int argc, object *args) ;/*closure _,object k_735196, object type_127_73748_732965, object obj_73749_732966, object objs_73750_732967*/
-+static void __lambda_615(void *data, object clo, int argc, object *args) ;/*object self_7312299, object r_735197*/
-+static void __lambda_617(void *data, object clo, int argc, object *args) ;/*object self_7312300, object k_735199, object return_73752_732968*/
-+static void __lambda_620(void *data, object clo, int argc, object *args) ;/*object self_7312301, object k_735202, object o_73753_732969*/
-+static void __lambda_618(void *data, object clo, int argc, object *args) ;/*object self_7312302, object r_735201*/
-+static void __lambda_619(void *data, object clo, int argc, object *args) ;/*object self_7312303, object r_735200*/
-+static void __lambda_616(void *data, object clo, int argc, object *args) ;/*object self_7312304, object r_735198*/
-+static void __lambda_613(void *data, object clo, int argc, object *args) ;/*closure _,object k_735192, object sym1_73745_732962, object sym2_73746_732963, object syms_73747_732964_raw, ...*/
-+static void __lambda_612(void *data, object clo, int argc, object *args) ;/*closure _,object k_735188, object b1_73742_732959, object b2_73743_732960, object bs_73744_732961_raw, ...*/
-+static void __lambda_599(void *data, object clo, int argc, object *args) ;/*closure _,object k_735167, object vec_73730_732951, object fill_73731_732952, object opts_73732_732953_raw, ...*/
-+static void __lambda_600(void *data, object clo, int argc, object *args) ;/*object self_7312283, object len_73733_732954, object start_73734_732955, object end_73735_732956, object loop_73736_732957*/
-+static void __lambda_1354(void *data, object clo, int argc, object *args) ;/*object self_7312284, object len_73733_732954*/
-+static void __lambda_1353(void *data, object clo, int argc, object *args) ;/*object self_7312285, object start_73734_732955*/
-+static void __lambda_1352(void *data, object clo, int argc, object *args) ;/*object self_7312286, object end_73735_732956*/
-+static void __lambda_1351(void *data, object clo, int argc, object *args) ;/*object self_7312287, object loop_73736_732957*/
-+static void __lambda_601(void *data, object clo, int argc, object *args) ;/*object self_7312288, object r_735185*/
-+static void __lambda_602(void *data, object clo, int argc, object *args) ;/*object self_7312289, object r_735168*/
-+static void __lambda_603(void *data, object clo, int argc, object *args) ;/*object self_7312290, object r_735169*/
-+static void __lambda_605(void *data, object clo, int argc, object *args) ;/*object self_7312291, object r_735177*/
-+static void __lambda_606(void *data, object clo, int argc, object *args) ;/*object self_7312292, object r_735170*/
-+static void __lambda_609(void *data, object clo, int argc, object *args) ;/*object self_7312293, object k_735173, object i_73737_732958*/
-+static void __lambda_610(void *data, object clo, int argc, object *args) ;/*object self_7312294, object r_735174*/
-+static void __lambda_611(void *data, object clo, int argc, object *args) ;/*object self_7312295, object r_735175*/
-+static void __lambda_607(void *data, object clo, int argc, object *args) ;/*object self_7312296, object r_735172*/
-+static void __lambda_608(void *data, object clo, int argc, object *args) ;/*object self_7312297, object r_735171*/
-+static void __lambda_604(void *data, object clo, int argc, object *args) ;/*object self_7312298, object k_735178*/
-+static void __lambda_588(void *data, object clo, int argc, object *args) ;/*closure _,object k_735144, object to_73716_732941, object at_73717_732942, object from_73718_732943, object opts_73719_732944_raw, ...*/
-+static void __lambda_589(void *data, object clo, int argc, object *args) ;/*object self_7312269, object len_73720_732945, object start_73721_732946, object end_73722_732947, object loop_73723_732948*/
-+static void __lambda_1350(void *data, object clo, int argc, object *args) ;/*object self_7312270, object len_73720_732945*/
-+static void __lambda_1349(void *data, object clo, int argc, object *args) ;/*object self_7312271, object start_73721_732946*/
-+static void __lambda_1348(void *data, object clo, int argc, object *args) ;/*object self_7312272, object end_73722_732947*/
-+static void __lambda_1347(void *data, object clo, int argc, object *args) ;/*object self_7312273, object loop_73723_732948*/
-+static void __lambda_590(void *data, object clo, int argc, object *args) ;/*object self_7312274, object r_735145*/
-+static void __lambda_591(void *data, object clo, int argc, object *args) ;/*object self_7312275, object r_735146*/
-+static void __lambda_593(void *data, object clo, int argc, object *args) ;/*object self_7312276, object r_735156*/
-+static void __lambda_594(void *data, object clo, int argc, object *args) ;/*object self_7312277, object r_735147*/
-+static void __lambda_597(void *data, object clo, int argc, object *args) ;/*object self_7312278, object k_735150, object i_91at_73724_732949, object i_91from_73725_732950*/
-+static void __lambda_598(void *data, object clo, int argc, object *args) ;/*object self_7312279, object r_735152*/
-+static void __lambda_595(void *data, object clo, int argc, object *args) ;/*object self_7312280, object r_735149*/
-+static void __lambda_596(void *data, object clo, int argc, object *args) ;/*object self_7312281, object r_735148*/
-+static void __lambda_592(void *data, object clo, int argc, object *args) ;/*object self_7312282, object k_735157*/
-+static void __lambda_575(void *data, object clo, int argc, object *args) ;/*closure _,object k_735119, object vec_73704_732933, object opts_73705_732934_raw, ...*/
-+static void __lambda_576(void *data, object clo, int argc, object *args) ;/*object self_7312253, object len_73706_732935, object start_73707_732936, object end_73708_732937, object loop_73709_732938*/
-+static void __lambda_1346(void *data, object clo, int argc, object *args) ;/*object self_7312254, object len_73706_732935*/
-+static void __lambda_1345(void *data, object clo, int argc, object *args) ;/*object self_7312255, object start_73707_732936*/
-+static void __lambda_1344(void *data, object clo, int argc, object *args) ;/*object self_7312256, object end_73708_732937*/
-+static void __lambda_1343(void *data, object clo, int argc, object *args) ;/*object self_7312257, object loop_73709_732938*/
-+static void __lambda_577(void *data, object clo, int argc, object *args) ;/*object self_7312258, object r_735120*/
-+static void __lambda_578(void *data, object clo, int argc, object *args) ;/*object self_7312259, object r_735121*/
-+static void __lambda_580(void *data, object clo, int argc, object *args) ;/*object self_7312260, object r_735133*/
-+static void __lambda_581(void *data, object clo, int argc, object *args) ;/*object self_7312261, object r_735122*/
-+static void __lambda_586(void *data, object clo, int argc, object *args) ;/*object self_7312262, object k_735127, object i_73710_732939, object new_91vec_73711_732940*/
-+static void __lambda_587(void *data, object clo, int argc, object *args) ;/*object self_7312263, object r_735129*/
-+static void __lambda_582(void *data, object clo, int argc, object *args) ;/*object self_7312264, object r_735126*/
-+static void __lambda_583(void *data, object clo, int argc, object *args) ;/*object self_7312265, object r_735123*/
-+static void __lambda_584(void *data, object clo, int argc, object *args) ;/*object self_7312266, object r_735125*/
-+static void __lambda_585(void *data, object clo, int argc, object *args) ;/*object self_7312267, object r_735124*/
-+static void __lambda_579(void *data, object clo, int argc, object *args) ;/*object self_7312268, object k_735134*/
-+static void __lambda_572(void *data, object clo, int argc, object *args) ;/*closure _,object k_735114, object vecs_73703_732932_raw, ...*/
-+static void __lambda_573(void *data, object clo, int argc, object *args) ;/*object self_7312251, object r_735116*/
-+static void __lambda_574(void *data, object clo, int argc, object *args) ;/*object self_7312252, object r_735115*/
-+static void __lambda_569(void *data, object clo, int argc, object *args) ;/*closure _,object k_735107, object func_73697_732929, object vec1_73698_732930, object vecs_73699_732931_raw, ...*/
-+static void __lambda_570(void *data, object clo, int argc, object *args) ;/*object self_7312249, object r_735110*/
-+static void __lambda_571(void *data, object clo, int argc, object *args) ;/*object self_7312250, object r_735111*/
-+static void __lambda_565(void *data, object clo, int argc, object *args) ;/*closure _,object k_735099, object func_73691_732926, object vec1_73692_732927, object vecs_73693_732928_raw, ...*/
-+static void __lambda_566(void *data, object clo, int argc, object *args) ;/*object self_7312246, object r_735103*/
-+static void __lambda_567(void *data, object clo, int argc, object *args) ;/*object self_7312247, object r_735104*/
-+static void __lambda_568(void *data, object clo, int argc, object *args) ;/*object self_7312248, object r_735100*/
-+static void __lambda_562(void *data, object clo, int argc, object *args) ;/*closure _,object k_735092, object func_73685_732923, object str1_73686_732924, object strs_73687_732925_raw, ...*/
-+static void __lambda_563(void *data, object clo, int argc, object *args) ;/*object self_7312244, object r_735095*/
-+static void __lambda_564(void *data, object clo, int argc, object *args) ;/*object self_7312245, object r_735096*/
-+static void __lambda_558(void *data, object clo, int argc, object *args) ;/*closure _,object k_735084, object func_73679_732920, object str1_73680_732921, object strs_73681_732922_raw, ...*/
-+static void __lambda_559(void *data, object clo, int argc, object *args) ;/*object self_7312241, object r_735088*/
-+static void __lambda_560(void *data, object clo, int argc, object *args) ;/*object self_7312242, object r_735089*/
-+static void __lambda_561(void *data, object clo, int argc, object *args) ;/*object self_7312243, object r_735085*/
-+static void __lambda_546(void *data, object clo, int argc, object *args) ;/*closure _,object k_735063, object str_73667_732912, object fill_73668_732913, object opts_73669_732914_raw, ...*/
-+static void __lambda_547(void *data, object clo, int argc, object *args) ;/*object self_7312226, object len_73670_732915, object start_73671_732916, object end_73672_732917, object loop_73673_732918*/
-+static void __lambda_1342(void *data, object clo, int argc, object *args) ;/*object self_7312227, object len_73670_732915*/
-+static void __lambda_1341(void *data, object clo, int argc, object *args) ;/*object self_7312228, object start_73671_732916*/
-+static void __lambda_1340(void *data, object clo, int argc, object *args) ;/*object self_7312229, object end_73672_732917*/
-+static void __lambda_1339(void *data, object clo, int argc, object *args) ;/*object self_7312230, object loop_73673_732918*/
-+static void __lambda_548(void *data, object clo, int argc, object *args) ;/*object self_7312231, object r_735081*/
-+static void __lambda_549(void *data, object clo, int argc, object *args) ;/*object self_7312232, object r_735064*/
-+static void __lambda_550(void *data, object clo, int argc, object *args) ;/*object self_7312233, object r_735065*/
-+static void __lambda_552(void *data, object clo, int argc, object *args) ;/*object self_7312234, object r_735073*/
-+static void __lambda_553(void *data, object clo, int argc, object *args) ;/*object self_7312235, object r_735066*/
-+static void __lambda_556(void *data, object clo, int argc, object *args) ;/*object self_7312236, object k_735069, object i_73674_732919*/
-+static void __lambda_557(void *data, object clo, int argc, object *args) ;/*object self_7312237, object r_735070*/
-+static void __lambda_554(void *data, object clo, int argc, object *args) ;/*object self_7312238, object r_735068*/
-+static void __lambda_555(void *data, object clo, int argc, object *args) ;/*object self_7312239, object r_735067*/
-+static void __lambda_551(void *data, object clo, int argc, object *args) ;/*object self_7312240, object k_735074*/
-+static void __lambda_536(void *data, object clo, int argc, object *args) ;/*closure _,object k_735040, object to_73653_732902, object at_73654_732903, object from_73655_732904, object opts_73656_732905_raw, ...*/
-+static void __lambda_537(void *data, object clo, int argc, object *args) ;/*object self_7312213, object len_73657_732906, object start_73658_732907, object end_73659_732908, object loop_73660_732909*/
-+static void __lambda_1338(void *data, object clo, int argc, object *args) ;/*object self_7312214, object len_73657_732906*/
-+static void __lambda_1337(void *data, object clo, int argc, object *args) ;/*object self_7312215, object start_73658_732907*/
-+static void __lambda_1336(void *data, object clo, int argc, object *args) ;/*object self_7312216, object end_73659_732908*/
-+static void __lambda_1335(void *data, object clo, int argc, object *args) ;/*object self_7312217, object loop_73660_732909*/
-+static void __lambda_538(void *data, object clo, int argc, object *args) ;/*object self_7312218, object r_735041*/
-+static void __lambda_539(void *data, object clo, int argc, object *args) ;/*object self_7312219, object r_735042*/
-+static void __lambda_541(void *data, object clo, int argc, object *args) ;/*object self_7312220, object r_735052*/
-+static void __lambda_542(void *data, object clo, int argc, object *args) ;/*object self_7312221, object r_735043*/
-+static void __lambda_545(void *data, object clo, int argc, object *args) ;/*object self_7312222, object k_735046, object i_91at_73661_732910, object i_91from_73662_732911*/
-+static void __lambda_543(void *data, object clo, int argc, object *args) ;/*object self_7312223, object r_735045*/
-+static void __lambda_544(void *data, object clo, int argc, object *args) ;/*object self_7312224, object r_735044*/
-+static void __lambda_540(void *data, object clo, int argc, object *args) ;/*object self_7312225, object k_735053*/
-+static void __lambda_529(void *data, object clo, int argc, object *args) ;/*closure _,object k_735025, object str_73648_732897, object opts_73649_732898_raw, ...*/
-+static void __lambda_530(void *data, object clo, int argc, object *args) ;/*object self_7312204, object len_73650_732899, object start_73651_732900, object end_73652_732901*/
-+static void __lambda_1334(void *data, object clo, int argc, object *args) ;/*object self_7312205, object len_73650_732899*/
-+static void __lambda_1333(void *data, object clo, int argc, object *args) ;/*object self_7312206, object start_73651_732900*/
-+static void __lambda_1332(void *data, object clo, int argc, object *args) ;/*object self_7312207, object end_73652_732901*/
-+static void __lambda_531(void *data, object clo, int argc, object *args) ;/*object self_7312208, object r_735026*/
-+static void __lambda_532(void *data, object clo, int argc, object *args) ;/*object self_7312209, object r_735027*/
-+static void __lambda_534(void *data, object clo, int argc, object *args) ;/*object self_7312210, object r_735029*/
-+static void __lambda_535(void *data, object clo, int argc, object *args) ;/*object self_7312211, object r_735028*/
-+static void __lambda_533(void *data, object clo, int argc, object *args) ;/*object self_7312212, object k_735030*/
-+static void __lambda_527(void *data, object clo, int argc, object *args) ;/*closure _,object k_735020, object str_73646_732895, object opts_73647_732896_raw, ...*/
-+static void __lambda_528(void *data, object clo, int argc, object *args) ;/*object self_7312203, object r_735021*/
-+static void __lambda_517(void *data, object clo, int argc, object *args) ;/*closure _,object k_734997, object str_73638_732887, object opts_73639_732888_raw, ...*/
-+static void __lambda_518(void *data, object clo, int argc, object *args) ;/*object self_7312190, object len_73640_732889, object start_73641_732890, object end_73642_732891, object loop_73643_732892*/
-+static void __lambda_1331(void *data, object clo, int argc, object *args) ;/*object self_7312191, object len_73640_732889*/
-+static void __lambda_1330(void *data, object clo, int argc, object *args) ;/*object self_7312192, object start_73641_732890*/
-+static void __lambda_1329(void *data, object clo, int argc, object *args) ;/*object self_7312193, object end_73642_732891*/
-+static void __lambda_1328(void *data, object clo, int argc, object *args) ;/*object self_7312194, object loop_73643_732892*/
-+static void __lambda_519(void *data, object clo, int argc, object *args) ;/*object self_7312195, object r_734998*/
-+static void __lambda_520(void *data, object clo, int argc, object *args) ;/*object self_7312196, object r_734999*/
-+static void __lambda_522(void *data, object clo, int argc, object *args) ;/*object self_7312197, object r_735009*/
-+static void __lambda_523(void *data, object clo, int argc, object *args) ;/*object self_7312198, object r_735000*/
-+static void __lambda_526(void *data, object clo, int argc, object *args) ;/*object self_7312199, object k_735004, object i_73644_732893, object lst_73645_732894*/
-+static void __lambda_524(void *data, object clo, int argc, object *args) ;/*object self_7312200, object r_735003*/
-+static void __lambda_525(void *data, object clo, int argc, object *args) ;/*object self_7312201, object r_735001*/
-+static void __lambda_521(void *data, object clo, int argc, object *args) ;/*object self_7312202, object k_735010*/
-+static void __lambda_515(void *data, object clo, int argc, object *args) ;/*closure _,object k_734992, object vec_73635_732884, object opts_73636_732885_raw, ...*/
-+static void __lambda_516(void *data, object clo, int argc, object *args) ;/*object self_7312189, object lst_73637_732886*/
-+static void __lambda_508(void *data, object clo, int argc, object *args) ;/*closure _,object k_734977, object str_73630_732879, object opts_73631_732880_raw, ...*/
-+static void __lambda_509(void *data, object clo, int argc, object *args) ;/*object self_7312180, object len_73632_732881, object start_73633_732882, object end_73634_732883*/
-+static void __lambda_1327(void *data, object clo, int argc, object *args) ;/*object self_7312181, object len_73632_732881*/
-+static void __lambda_1326(void *data, object clo, int argc, object *args) ;/*object self_7312182, object start_73633_732882*/
-+static void __lambda_1325(void *data, object clo, int argc, object *args) ;/*object self_7312183, object end_73634_732883*/
-+static void __lambda_510(void *data, object clo, int argc, object *args) ;/*object self_7312184, object r_734978*/
-+static void __lambda_511(void *data, object clo, int argc, object *args) ;/*object self_7312185, object r_734979*/
-+static void __lambda_513(void *data, object clo, int argc, object *args) ;/*object self_7312186, object r_734981*/
-+static void __lambda_514(void *data, object clo, int argc, object *args) ;/*object self_7312187, object r_734980*/
-+static void __lambda_512(void *data, object clo, int argc, object *args) ;/*object self_7312188, object k_734982*/
-+static void __lambda_501(void *data, object clo, int argc, object *args) ;/*closure _,object k_734962, object bv_73625_732874, object opts_73626_732875_raw, ...*/
-+static void __lambda_502(void *data, object clo, int argc, object *args) ;/*object self_7312171, object len_73627_732876, object start_73628_732877, object end_73629_732878*/
-+static void __lambda_1324(void *data, object clo, int argc, object *args) ;/*object self_7312172, object len_73627_732876*/
-+static void __lambda_1323(void *data, object clo, int argc, object *args) ;/*object self_7312173, object start_73628_732877*/
-+static void __lambda_1322(void *data, object clo, int argc, object *args) ;/*object self_7312174, object end_73629_732878*/
-+static void __lambda_503(void *data, object clo, int argc, object *args) ;/*object self_7312175, object r_734963*/
-+static void __lambda_504(void *data, object clo, int argc, object *args) ;/*object self_7312176, object r_734964*/
-+static void __lambda_506(void *data, object clo, int argc, object *args) ;/*object self_7312177, object r_734966*/
-+static void __lambda_507(void *data, object clo, int argc, object *args) ;/*object self_7312178, object r_734965*/
-+static void __lambda_505(void *data, object clo, int argc, object *args) ;/*object self_7312179, object k_734967*/
-+static void __lambda_480(void *data, object clo, int argc, object *args) ;/*closure _,object k_734925, object to_73590_732855, object at_73591_732856, object from_73592_732857, object o_73593_732858_raw, ...*/
-+static void __lambda_484(void *data, object clo, int argc, object *args) ;/*object self_7312149, object end_73599_732860*/
-+static void __lambda_485(void *data, object clo, int argc, object *args) ;/*object self_7312150, object r_734952*/
-+static void __lambda_486(void *data, object clo, int argc, object *args) ;/*object self_7312151, object limit_73602_732861*/
-+static void __lambda_494(void *data, object clo, int argc, object *args) ;/*object self_7312160, object i_73618_732868, object j_73619_732869*/
-+static void __lambda_495(void *data, object clo, int argc, object *args) ;/*object self_7312161, object lp_73614_73620_732870*/
-+static void __lambda_1321(void *data, object clo, int argc, object *args) ;/*object self_7312162, object lp_73614_73620_732870*/
-+static void __lambda_498(void *data, object clo, int argc, object *args) ;/*object self_7312163, object k_734942, object i_73621_732871, object j_73622_732872*/
-+static void __lambda_499(void *data, object clo, int argc, object *args) ;/*object self_7312164, object r_734947*/
-+static void __lambda_500(void *data, object clo, int argc, object *args) ;/*object self_7312165, object r_734944*/
-+static void __lambda_496(void *data, object clo, int argc, object *args) ;/*object self_7312166, object r_734941*/
-+static void __lambda_497(void *data, object clo, int argc, object *args) ;/*object self_7312167, object r_734940*/
-+static void __lambda_487(void *data, object clo, int argc, object *args) ;/*object self_7312152, object i_73608_732862, object j_73609_732863*/
-+static void __lambda_488(void *data, object clo, int argc, object *args) ;/*object self_7312153, object lp_73604_73610_732864*/
-+static void __lambda_1320(void *data, object clo, int argc, object *args) ;/*object self_7312154, object lp_73604_73610_732864*/
-+static void __lambda_491(void *data, object clo, int argc, object *args) ;/*object self_7312155, object k_734932, object i_73611_732865, object j_73612_732866*/
-+static void __lambda_492(void *data, object clo, int argc, object *args) ;/*object self_7312156, object r_734937*/
-+static void __lambda_493(void *data, object clo, int argc, object *args) ;/*object self_7312157, object r_734934*/
-+static void __lambda_489(void *data, object clo, int argc, object *args) ;/*object self_7312158, object r_734931*/
-+static void __lambda_490(void *data, object clo, int argc, object *args) ;/*object self_7312159, object r_734930*/
-+static void __lambda_481(void *data, object clo, int argc, object *args) ;/*object self_7312168, object k_734953*/
-+static void __lambda_483(void *data, object clo, int argc, object *args) ;/*object self_7312169, object r_734954*/
-+static void __lambda_482(void *data, object clo, int argc, object *args) ;/*object self_7312170, object k_734955*/
-+static void __lambda_473(void *data, object clo, int argc, object *args) ;/*closure _,object k_734910, object bv_73585_732850, object opts_73586_732851_raw, ...*/
-+static void __lambda_474(void *data, object clo, int argc, object *args) ;/*object self_7312140, object len_73587_732852, object start_73588_732853, object end_73589_732854*/
-+static void __lambda_1319(void *data, object clo, int argc, object *args) ;/*object self_7312141, object len_73587_732852*/
-+static void __lambda_1318(void *data, object clo, int argc, object *args) ;/*object self_7312142, object start_73588_732853*/
-+static void __lambda_1317(void *data, object clo, int argc, object *args) ;/*object self_7312143, object end_73589_732854*/
-+static void __lambda_475(void *data, object clo, int argc, object *args) ;/*object self_7312144, object r_734911*/
-+static void __lambda_476(void *data, object clo, int argc, object *args) ;/*object self_7312145, object r_734912*/
-+static void __lambda_478(void *data, object clo, int argc, object *args) ;/*object self_7312146, object r_734914*/
-+static void __lambda_479(void *data, object clo, int argc, object *args) ;/*object self_7312147, object r_734913*/
-+static void __lambda_477(void *data, object clo, int argc, object *args) ;/*object self_7312148, object k_734915*/
-+static void __lambda_463(void *data, object clo, int argc, object *args) ;/*closure _,object k_734887, object vec_73577_732842, object opts_73578_732843_raw, ...*/
-+static void __lambda_464(void *data, object clo, int argc, object *args) ;/*object self_7312127, object len_73579_732844, object start_73580_732845, object end_73581_732846, object loop_73582_732847*/
-+static void __lambda_1316(void *data, object clo, int argc, object *args) ;/*object self_7312128, object len_73579_732844*/
-+static void __lambda_1315(void *data, object clo, int argc, object *args) ;/*object self_7312129, object start_73580_732845*/
-+static void __lambda_1314(void *data, object clo, int argc, object *args) ;/*object self_7312130, object end_73581_732846*/
-+static void __lambda_1313(void *data, object clo, int argc, object *args) ;/*object self_7312131, object loop_73582_732847*/
-+static void __lambda_465(void *data, object clo, int argc, object *args) ;/*object self_7312132, object r_734888*/
-+static void __lambda_466(void *data, object clo, int argc, object *args) ;/*object self_7312133, object r_734889*/
-+static void __lambda_468(void *data, object clo, int argc, object *args) ;/*object self_7312134, object r_734899*/
-+static void __lambda_469(void *data, object clo, int argc, object *args) ;/*object self_7312135, object r_734890*/
-+static void __lambda_472(void *data, object clo, int argc, object *args) ;/*object self_7312136, object k_734894, object i_73583_732848, object lst_73584_732849*/
-+static void __lambda_470(void *data, object clo, int argc, object *args) ;/*object self_7312137, object r_734893*/
-+static void __lambda_471(void *data, object clo, int argc, object *args) ;/*object self_7312138, object r_734891*/
-+static void __lambda_467(void *data, object clo, int argc, object *args) ;/*object self_7312139, object k_734900*/
-+static void __lambda_462(void *data, object clo, int argc, object *args) ;/*closure _,object k_734884, object objs_73576_732841_raw, ...*/
-+static void __lambda_461(void *data, object clo, int argc, object *args) ;/*closure _,object k_734880, object lst_73575_732840*/
-+static void __lambda_459(void *data, object clo, int argc, object *args) ;/*closure _,object k_734876, object lst_73571_732836, object k_73572_732837, object obj_73573_732838*/
-+static void __lambda_460(void *data, object clo, int argc, object *args) ;/*object self_7312126, object kth_73574_732839*/
-+static void __lambda_457(void *data, object clo, int argc, object *args) ;/*closure _,object k_734872, object lst_73569_732834, object k_73570_732835*/
-+static void __lambda_458(void *data, object clo, int argc, object *args) ;/*object self_7312125, object r_734873*/
-+static void __lambda_456(void *data, object clo, int argc, object *args) ;/*closure _,object k_734866, object lst_73567_732832, object k_73568_732833*/
-+static void __lambda_444(void *data, object clo, int argc, object *args) ;/*closure _,object k_734845, object f_73558_732824, object lis1_73559_732825, object lists_73560_732826_raw, ...*/
-+static void __lambda_455(void *data, object clo, int argc, object *args) ;/*object self_7312124, object r_734860*/
-+static void __lambda_445(void *data, object clo, int argc, object *args) ;/*object self_7312113, object lists_73562_732827*/
-+static void __lambda_446(void *data, object clo, int argc, object *args) ;/*object self_7312114, object recur_73563_732828*/
-+static void __lambda_1312(void *data, object clo, int argc, object *args) ;/*object self_7312115, object recur_73563_732828*/
-+static void __lambda_449(void *data, object clo, int argc, object *args) ;/*object self_7312116, object k_734851, object lists_73564_732829*/
-+static void __lambda_454(void *data, object clo, int argc, object *args) ;/*object self_7312117, object k_734857*/
-+static void __lambda_450(void *data, object clo, int argc, object *args) ;/*object self_7312118, object r_734852*/
-+static void __lambda_452(void *data, object clo, int argc, object *args) ;/*object self_7312119, object k_734854, object cars_73565_732830, object cdrs_73566_732831*/
-+static void __lambda_453(void *data, object clo, int argc, object *args) ;/*object self_7312120, object r_734856*/
-+static void __lambda_451(void *data, object clo, int argc, object *args) ;/*object self_7312121, object r_734853*/
-+static void __lambda_447(void *data, object clo, int argc, object *args) ;/*object self_7312122, object r_734850*/
-+static void __lambda_448(void *data, object clo, int argc, object *args) ;/*object self_7312123, object r_734849*/
-+static void __lambda_442(void *data, object clo, int argc, object *args) ;/*closure _,object k_734834, object f_73551_732820, object lst1_73552_732821, object lst2_73553_732822*/
-+static void __lambda_443(void *data, object clo, int argc, object *args) ;/*object self_7312112, object r_734836*/
-+static void __lambda_440(void *data, object clo, int argc, object *args) ;/*closure _,object k_734827, object f_73549_732818, object lst_73550_732819*/
-+static void __lambda_441(void *data, object clo, int argc, object *args) ;/*object self_7312111, object r_734829*/
-+static void __lambda_437(void *data, object clo, int argc, object *args) ;/*closure _,object k_734815, object f_73542_732814, object lst1_73543_732815, object lst2_73544_732816*/
-+static void __lambda_438(void *data, object clo, int argc, object *args) ;/*object self_7312109, object r_734817*/
-+static void __lambda_439(void *data, object clo, int argc, object *args) ;/*object self_7312110, object r_734818*/
-+static void __lambda_434(void *data, object clo, int argc, object *args) ;/*closure _,object k_734807, object f_73540_732812, object lst_73541_732813*/
-+static void __lambda_435(void *data, object clo, int argc, object *args) ;/*object self_7312107, object r_734809*/
-+static void __lambda_436(void *data, object clo, int argc, object *args) ;/*object self_7312108, object r_734810*/
-+static void __lambda_419(void *data, object clo, int argc, object *args) ;/*closure _,object k_734788, object f_73528_732801, object lis1_73529_732802, object lists_73530_732803_raw, ...*/
-+static void __lambda_432(void *data, object clo, int argc, object *args) ;/*object self_7312104, object k_734803, object x_73538_732810, object y_73539_732811*/
-+static void __lambda_433(void *data, object clo, int argc, object *args) ;/*object self_7312105, object r_734804*/
-+static void __lambda_431(void *data, object clo, int argc, object *args) ;/*object self_7312106, object r_734801*/
-+static void __lambda_420(void *data, object clo, int argc, object *args) ;/*object self_7312092, object lists_73532_732804*/
-+static void __lambda_421(void *data, object clo, int argc, object *args) ;/*object self_7312093, object recur_73533_732805*/
-+static void __lambda_1311(void *data, object clo, int argc, object *args) ;/*object self_7312094, object recur_73533_732805*/
-+static void __lambda_424(void *data, object clo, int argc, object *args) ;/*object self_7312095, object k_734793, object lists_73534_732806*/
-+static void __lambda_430(void *data, object clo, int argc, object *args) ;/*object self_7312096, object k_734800*/
-+static void __lambda_425(void *data, object clo, int argc, object *args) ;/*object self_7312097, object r_734794*/
-+static void __lambda_427(void *data, object clo, int argc, object *args) ;/*object self_7312098, object k_734796, object cars_73535_732807, object cdrs_73536_732808*/
-+static void __lambda_428(void *data, object clo, int argc, object *args) ;/*object self_7312099, object x_73537_732809*/
-+static void __lambda_429(void *data, object clo, int argc, object *args) ;/*object self_7312100, object r_734799*/
-+static void __lambda_426(void *data, object clo, int argc, object *args) ;/*object self_7312101, object r_734795*/
-+static void __lambda_422(void *data, object clo, int argc, object *args) ;/*object self_7312102, object r_734792*/
-+static void __lambda_423(void *data, object clo, int argc, object *args) ;/*object self_7312103, object r_734791*/
-+static void __lambda_399(void *data, object clo, int argc, object *args) ;/*closure _,object k_734760, object lists_73516_732790*/
-+static void __lambda_401(void *data, object clo, int argc, object *args) ;/*object self_7312072, object k_734762, object abort_73517_732791*/
-+static void __lambda_402(void *data, object clo, int argc, object *args) ;/*object self_7312073, object lists_73519_732792*/
-+static void __lambda_403(void *data, object clo, int argc, object *args) ;/*object self_7312074, object recur_73520_732793*/
-+static void __lambda_1310(void *data, object clo, int argc, object *args) ;/*object self_7312075, object recur_73520_732793*/
-+static void __lambda_406(void *data, object clo, int argc, object *args) ;/*object self_7312076, object k_734765, object lists_73521_732794*/
-+static void __lambda_418(void *data, object clo, int argc, object *args) ;/*object self_7312077, object k_734783*/
-+static void __lambda_407(void *data, object clo, int argc, object *args) ;/*object self_7312078, object r_734767*/
-+static void __lambda_409(void *data, object clo, int argc, object *args) ;/*object self_7312079, object k_734769, object list_73522_732795, object other_91lists_73523_732796*/
-+static void __lambda_417(void *data, object clo, int argc, object *args) ;/*object self_7312080, object k_734782*/
-+static void __lambda_410(void *data, object clo, int argc, object *args) ;/*object self_7312081, object r_734773*/
-+static void __lambda_412(void *data, object clo, int argc, object *args) ;/*object self_7312082, object k_734775, object a_73524_732797, object d_73525_732798*/
-+static void __lambda_416(void *data, object clo, int argc, object *args) ;/*object self_7312083, object k_734781*/
-+static void __lambda_413(void *data, object clo, int argc, object *args) ;/*object self_7312084, object r_734776*/
-+static void __lambda_415(void *data, object clo, int argc, object *args) ;/*object self_7312085, object k_734778, object cars_73526_732799, object cdrs_73527_732800*/
-+static void __lambda_414(void *data, object clo, int argc, object *args) ;/*object self_7312086, object r_734777*/
-+static void __lambda_411(void *data, object clo, int argc, object *args) ;/*object self_7312087, object r_734774*/
-+static void __lambda_408(void *data, object clo, int argc, object *args) ;/*object self_7312088, object r_734768*/
-+static void __lambda_404(void *data, object clo, int argc, object *args) ;/*object self_7312089, object r_734764*/
-+static void __lambda_405(void *data, object clo, int argc, object *args) ;/*object self_7312090, object r_734763*/
-+static void __lambda_400(void *data, object clo, int argc, object *args) ;/*object self_7312091, object r_734761*/
-+static void __lambda_398(void *data, object clo, int argc, object *args) ;/*closure _,object k_734755, object pair_73515_732789*/
-+static void __lambda_397(void *data, object clo, int argc, object *args) ;/*closure _,object k_734736, object expr_73506_732783, object rename_73507_732784, object compare_73508_732785*/
-+static void __lambda_390(void *data, object clo, int argc, object *args) ;/*closure _,object k_734724, object ls_73499_732777*/
-+static void __lambda_391(void *data, object clo, int argc, object *args) ;/*object self_7312065, object ls_73501_732778, object res_73502_732779*/
-+static void __lambda_392(void *data, object clo, int argc, object *args) ;/*object self_7312066, object lp_73503_732780*/
-+static void __lambda_1309(void *data, object clo, int argc, object *args) ;/*object self_7312067, object lp_73503_732780*/
-+static void __lambda_395(void *data, object clo, int argc, object *args) ;/*object self_7312068, object k_734728, object ls_73504_732781, object res_73505_732782*/
-+static void __lambda_396(void *data, object clo, int argc, object *args) ;/*object self_7312069, object r_734733_7311409*/
-+static void __lambda_393(void *data, object clo, int argc, object *args) ;/*object self_7312070, object r_734727*/
-+static void __lambda_394(void *data, object clo, int argc, object *args) ;/*object self_7312071, object r_734726*/
-+static void __lambda_383(void *data, object clo, int argc, object *args) ;/*closure _,object k_734711, object k_73493_732771, object fill_73494_732772_raw, ...*/
-+static void __lambda_384(void *data, object clo, int argc, object *args) ;/*object self_7312057, object x_73495_732773, object make_73496_732774*/
-+static void __lambda_1308(void *data, object clo, int argc, object *args) ;/*object self_7312058, object x_73495_732773*/
-+static void __lambda_1307(void *data, object clo, int argc, object *args) ;/*object self_7312059, object make_73496_732774*/
-+static void __lambda_385(void *data, object clo, int argc, object *args) ;/*object self_7312060, object r_734712*/
-+static void __lambda_388(void *data, object clo, int argc, object *args) ;/*object self_7312061, object k_734715, object n_73497_732775, object obj_73498_732776*/
-+static void __lambda_389(void *data, object clo, int argc, object *args) ;/*object self_7312062, object r_734717*/
-+static void __lambda_386(void *data, object clo, int argc, object *args) ;/*object self_7312063, object r_734714*/
-+static void __lambda_387(void *data, object clo, int argc, object *args) ;/*object self_7312064, object r_734713*/
-+static void __lambda_382(void *data, object clo, int argc, object *args) ;/*closure _,object k_734708, object objs_73492_732770_raw, ...*/
-+static void __lambda_373(void *data, object clo, int argc, object *args) ;/*closure _,object k_734693, object lst_73485_732760_raw, ...*/
-+static void __lambda_374(void *data, object clo, int argc, object *args) ;/*object self_7312048, object append_912_732762*/
-+static void __lambda_1306(void *data, object clo, int argc, object *args) ;/*object self_7312049, object append_912_732762*/
-+static void __lambda_379(void *data, object clo, int argc, object *args) ;/*object self_7312050, object k_734703, object inlist_73486_732764, object alist_73487_732765*/
-+static void __lambda_381(void *data, object clo, int argc, object *args) ;/*object self_7312051, object k_734705, object ap_73488_732766, object in_73489_732767*/
-+static void __lambda_380(void *data, object clo, int argc, object *args) ;/*object self_7312052, object r_734704*/
-+static void __lambda_375(void *data, object clo, int argc, object *args) ;/*object self_7312053, object r_734702*/
-+static void __lambda_376(void *data, object clo, int argc, object *args) ;/*object self_7312054, object r_734694*/
-+static void __lambda_378(void *data, object clo, int argc, object *args) ;/*object self_7312055, object k_734700, object a_73490_732768, object b_73491_732769*/
-+static void __lambda_377(void *data, object clo, int argc, object *args) ;/*object self_7312056, object r_734697*/
-+static object __lambda_1401(void *data, object ptr,object n_73484_732759) ;
-+static void __lambda_372(void *data, object clo, int argc, object *args) ;/*closure _,object k_734690, object n_73484_732759*/
-+static object __lambda_1400(void *data, object ptr,object n_73483_732758) ;
-+static void __lambda_371(void *data, object clo, int argc, object *args) ;/*closure _,object k_734687, object n_73483_732758*/
-+static object __lambda_1399(void *data, object ptr,object n_73482_732757) ;
-+static void __lambda_370(void *data, object clo, int argc, object *args) ;/*closure _,object k_734684, object n_73482_732757*/
++static void __lambda_622(void *data, object clo, int argc, object *args) ;/*closure _,object k_735202, object k_73755_732964, object fill_73756_732965_raw, ...*/
++static void __lambda_621(void *data, object clo, int argc, object *args) ;/*closure _,object k_735199, object chars_73754_732963_raw, ...*/
++static void __lambda_614(void *data, object clo, int argc, object *args) ;/*closure _,object k_735189, object type_127_73748_732958, object obj_73749_732959, object objs_73750_732960*/
++static void __lambda_615(void *data, object clo, int argc, object *args) ;/*object self_7312292, object r_735190*/
++static void __lambda_617(void *data, object clo, int argc, object *args) ;/*object self_7312293, object k_735192, object return_73752_732961*/
++static void __lambda_620(void *data, object clo, int argc, object *args) ;/*object self_7312294, object k_735195, object o_73753_732962*/
++static void __lambda_618(void *data, object clo, int argc, object *args) ;/*object self_7312295, object r_735194*/
++static void __lambda_619(void *data, object clo, int argc, object *args) ;/*object self_7312296, object r_735193*/
++static void __lambda_616(void *data, object clo, int argc, object *args) ;/*object self_7312297, object r_735191*/
++static void __lambda_613(void *data, object clo, int argc, object *args) ;/*closure _,object k_735185, object sym1_73745_732955, object sym2_73746_732956, object syms_73747_732957_raw, ...*/
++static void __lambda_612(void *data, object clo, int argc, object *args) ;/*closure _,object k_735181, object b1_73742_732952, object b2_73743_732953, object bs_73744_732954_raw, ...*/
++static void __lambda_599(void *data, object clo, int argc, object *args) ;/*closure _,object k_735160, object vec_73730_732944, object fill_73731_732945, object opts_73732_732946_raw, ...*/
++static void __lambda_600(void *data, object clo, int argc, object *args) ;/*object self_7312276, object len_73733_732947, object start_73734_732948, object end_73735_732949, object loop_73736_732950*/
++static void __lambda_1354(void *data, object clo, int argc, object *args) ;/*object self_7312277, object len_73733_732947*/
++static void __lambda_1353(void *data, object clo, int argc, object *args) ;/*object self_7312278, object start_73734_732948*/
++static void __lambda_1352(void *data, object clo, int argc, object *args) ;/*object self_7312279, object end_73735_732949*/
++static void __lambda_1351(void *data, object clo, int argc, object *args) ;/*object self_7312280, object loop_73736_732950*/
++static void __lambda_601(void *data, object clo, int argc, object *args) ;/*object self_7312281, object r_735178*/
++static void __lambda_602(void *data, object clo, int argc, object *args) ;/*object self_7312282, object r_735161*/
++static void __lambda_603(void *data, object clo, int argc, object *args) ;/*object self_7312283, object r_735162*/
++static void __lambda_605(void *data, object clo, int argc, object *args) ;/*object self_7312284, object r_735170*/
++static void __lambda_606(void *data, object clo, int argc, object *args) ;/*object self_7312285, object r_735163*/
++static void __lambda_609(void *data, object clo, int argc, object *args) ;/*object self_7312286, object k_735166, object i_73737_732951*/
++static void __lambda_610(void *data, object clo, int argc, object *args) ;/*object self_7312287, object r_735167*/
++static void __lambda_611(void *data, object clo, int argc, object *args) ;/*object self_7312288, object r_735168*/
++static void __lambda_607(void *data, object clo, int argc, object *args) ;/*object self_7312289, object r_735165*/
++static void __lambda_608(void *data, object clo, int argc, object *args) ;/*object self_7312290, object r_735164*/
++static void __lambda_604(void *data, object clo, int argc, object *args) ;/*object self_7312291, object k_735171*/
++static void __lambda_588(void *data, object clo, int argc, object *args) ;/*closure _,object k_735137, object to_73716_732934, object at_73717_732935, object from_73718_732936, object opts_73719_732937_raw, ...*/
++static void __lambda_589(void *data, object clo, int argc, object *args) ;/*object self_7312262, object len_73720_732938, object start_73721_732939, object end_73722_732940, object loop_73723_732941*/
++static void __lambda_1350(void *data, object clo, int argc, object *args) ;/*object self_7312263, object len_73720_732938*/
++static void __lambda_1349(void *data, object clo, int argc, object *args) ;/*object self_7312264, object start_73721_732939*/
++static void __lambda_1348(void *data, object clo, int argc, object *args) ;/*object self_7312265, object end_73722_732940*/
++static void __lambda_1347(void *data, object clo, int argc, object *args) ;/*object self_7312266, object loop_73723_732941*/
++static void __lambda_590(void *data, object clo, int argc, object *args) ;/*object self_7312267, object r_735138*/
++static void __lambda_591(void *data, object clo, int argc, object *args) ;/*object self_7312268, object r_735139*/
++static void __lambda_593(void *data, object clo, int argc, object *args) ;/*object self_7312269, object r_735149*/
++static void __lambda_594(void *data, object clo, int argc, object *args) ;/*object self_7312270, object r_735140*/
++static void __lambda_597(void *data, object clo, int argc, object *args) ;/*object self_7312271, object k_735143, object i_91at_73724_732942, object i_91from_73725_732943*/
++static void __lambda_598(void *data, object clo, int argc, object *args) ;/*object self_7312272, object r_735145*/
++static void __lambda_595(void *data, object clo, int argc, object *args) ;/*object self_7312273, object r_735142*/
++static void __lambda_596(void *data, object clo, int argc, object *args) ;/*object self_7312274, object r_735141*/
++static void __lambda_592(void *data, object clo, int argc, object *args) ;/*object self_7312275, object k_735150*/
++static void __lambda_575(void *data, object clo, int argc, object *args) ;/*closure _,object k_735112, object vec_73704_732926, object opts_73705_732927_raw, ...*/
++static void __lambda_576(void *data, object clo, int argc, object *args) ;/*object self_7312246, object len_73706_732928, object start_73707_732929, object end_73708_732930, object loop_73709_732931*/
++static void __lambda_1346(void *data, object clo, int argc, object *args) ;/*object self_7312247, object len_73706_732928*/
++static void __lambda_1345(void *data, object clo, int argc, object *args) ;/*object self_7312248, object start_73707_732929*/
++static void __lambda_1344(void *data, object clo, int argc, object *args) ;/*object self_7312249, object end_73708_732930*/
++static void __lambda_1343(void *data, object clo, int argc, object *args) ;/*object self_7312250, object loop_73709_732931*/
++static void __lambda_577(void *data, object clo, int argc, object *args) ;/*object self_7312251, object r_735113*/
++static void __lambda_578(void *data, object clo, int argc, object *args) ;/*object self_7312252, object r_735114*/
++static void __lambda_580(void *data, object clo, int argc, object *args) ;/*object self_7312253, object r_735126*/
++static void __lambda_581(void *data, object clo, int argc, object *args) ;/*object self_7312254, object r_735115*/
++static void __lambda_586(void *data, object clo, int argc, object *args) ;/*object self_7312255, object k_735120, object i_73710_732932, object new_91vec_73711_732933*/
++static void __lambda_587(void *data, object clo, int argc, object *args) ;/*object self_7312256, object r_735122*/
++static void __lambda_582(void *data, object clo, int argc, object *args) ;/*object self_7312257, object r_735119*/
++static void __lambda_583(void *data, object clo, int argc, object *args) ;/*object self_7312258, object r_735116*/
++static void __lambda_584(void *data, object clo, int argc, object *args) ;/*object self_7312259, object r_735118*/
++static void __lambda_585(void *data, object clo, int argc, object *args) ;/*object self_7312260, object r_735117*/
++static void __lambda_579(void *data, object clo, int argc, object *args) ;/*object self_7312261, object k_735127*/
++static void __lambda_572(void *data, object clo, int argc, object *args) ;/*closure _,object k_735107, object vecs_73703_732925_raw, ...*/
++static void __lambda_573(void *data, object clo, int argc, object *args) ;/*object self_7312244, object r_735109*/
++static void __lambda_574(void *data, object clo, int argc, object *args) ;/*object self_7312245, object r_735108*/
++static void __lambda_569(void *data, object clo, int argc, object *args) ;/*closure _,object k_735100, object func_73697_732922, object vec1_73698_732923, object vecs_73699_732924_raw, ...*/
++static void __lambda_570(void *data, object clo, int argc, object *args) ;/*object self_7312242, object r_735103*/
++static void __lambda_571(void *data, object clo, int argc, object *args) ;/*object self_7312243, object r_735104*/
++static void __lambda_565(void *data, object clo, int argc, object *args) ;/*closure _,object k_735092, object func_73691_732919, object vec1_73692_732920, object vecs_73693_732921_raw, ...*/
++static void __lambda_566(void *data, object clo, int argc, object *args) ;/*object self_7312239, object r_735096*/
++static void __lambda_567(void *data, object clo, int argc, object *args) ;/*object self_7312240, object r_735097*/
++static void __lambda_568(void *data, object clo, int argc, object *args) ;/*object self_7312241, object r_735093*/
++static void __lambda_562(void *data, object clo, int argc, object *args) ;/*closure _,object k_735085, object func_73685_732916, object str1_73686_732917, object strs_73687_732918_raw, ...*/
++static void __lambda_563(void *data, object clo, int argc, object *args) ;/*object self_7312237, object r_735088*/
++static void __lambda_564(void *data, object clo, int argc, object *args) ;/*object self_7312238, object r_735089*/
++static void __lambda_558(void *data, object clo, int argc, object *args) ;/*closure _,object k_735077, object func_73679_732913, object str1_73680_732914, object strs_73681_732915_raw, ...*/
++static void __lambda_559(void *data, object clo, int argc, object *args) ;/*object self_7312234, object r_735081*/
++static void __lambda_560(void *data, object clo, int argc, object *args) ;/*object self_7312235, object r_735082*/
++static void __lambda_561(void *data, object clo, int argc, object *args) ;/*object self_7312236, object r_735078*/
++static void __lambda_546(void *data, object clo, int argc, object *args) ;/*closure _,object k_735056, object str_73667_732905, object fill_73668_732906, object opts_73669_732907_raw, ...*/
++static void __lambda_547(void *data, object clo, int argc, object *args) ;/*object self_7312219, object len_73670_732908, object start_73671_732909, object end_73672_732910, object loop_73673_732911*/
++static void __lambda_1342(void *data, object clo, int argc, object *args) ;/*object self_7312220, object len_73670_732908*/
++static void __lambda_1341(void *data, object clo, int argc, object *args) ;/*object self_7312221, object start_73671_732909*/
++static void __lambda_1340(void *data, object clo, int argc, object *args) ;/*object self_7312222, object end_73672_732910*/
++static void __lambda_1339(void *data, object clo, int argc, object *args) ;/*object self_7312223, object loop_73673_732911*/
++static void __lambda_548(void *data, object clo, int argc, object *args) ;/*object self_7312224, object r_735074*/
++static void __lambda_549(void *data, object clo, int argc, object *args) ;/*object self_7312225, object r_735057*/
++static void __lambda_550(void *data, object clo, int argc, object *args) ;/*object self_7312226, object r_735058*/
++static void __lambda_552(void *data, object clo, int argc, object *args) ;/*object self_7312227, object r_735066*/
++static void __lambda_553(void *data, object clo, int argc, object *args) ;/*object self_7312228, object r_735059*/
++static void __lambda_556(void *data, object clo, int argc, object *args) ;/*object self_7312229, object k_735062, object i_73674_732912*/
++static void __lambda_557(void *data, object clo, int argc, object *args) ;/*object self_7312230, object r_735063*/
++static void __lambda_554(void *data, object clo, int argc, object *args) ;/*object self_7312231, object r_735061*/
++static void __lambda_555(void *data, object clo, int argc, object *args) ;/*object self_7312232, object r_735060*/
++static void __lambda_551(void *data, object clo, int argc, object *args) ;/*object self_7312233, object k_735067*/
++static void __lambda_536(void *data, object clo, int argc, object *args) ;/*closure _,object k_735033, object to_73653_732895, object at_73654_732896, object from_73655_732897, object opts_73656_732898_raw, ...*/
++static void __lambda_537(void *data, object clo, int argc, object *args) ;/*object self_7312206, object len_73657_732899, object start_73658_732900, object end_73659_732901, object loop_73660_732902*/
++static void __lambda_1338(void *data, object clo, int argc, object *args) ;/*object self_7312207, object len_73657_732899*/
++static void __lambda_1337(void *data, object clo, int argc, object *args) ;/*object self_7312208, object start_73658_732900*/
++static void __lambda_1336(void *data, object clo, int argc, object *args) ;/*object self_7312209, object end_73659_732901*/
++static void __lambda_1335(void *data, object clo, int argc, object *args) ;/*object self_7312210, object loop_73660_732902*/
++static void __lambda_538(void *data, object clo, int argc, object *args) ;/*object self_7312211, object r_735034*/
++static void __lambda_539(void *data, object clo, int argc, object *args) ;/*object self_7312212, object r_735035*/
++static void __lambda_541(void *data, object clo, int argc, object *args) ;/*object self_7312213, object r_735045*/
++static void __lambda_542(void *data, object clo, int argc, object *args) ;/*object self_7312214, object r_735036*/
++static void __lambda_545(void *data, object clo, int argc, object *args) ;/*object self_7312215, object k_735039, object i_91at_73661_732903, object i_91from_73662_732904*/
++static void __lambda_543(void *data, object clo, int argc, object *args) ;/*object self_7312216, object r_735038*/
++static void __lambda_544(void *data, object clo, int argc, object *args) ;/*object self_7312217, object r_735037*/
++static void __lambda_540(void *data, object clo, int argc, object *args) ;/*object self_7312218, object k_735046*/
++static void __lambda_529(void *data, object clo, int argc, object *args) ;/*closure _,object k_735018, object str_73648_732890, object opts_73649_732891_raw, ...*/
++static void __lambda_530(void *data, object clo, int argc, object *args) ;/*object self_7312197, object len_73650_732892, object start_73651_732893, object end_73652_732894*/
++static void __lambda_1334(void *data, object clo, int argc, object *args) ;/*object self_7312198, object len_73650_732892*/
++static void __lambda_1333(void *data, object clo, int argc, object *args) ;/*object self_7312199, object start_73651_732893*/
++static void __lambda_1332(void *data, object clo, int argc, object *args) ;/*object self_7312200, object end_73652_732894*/
++static void __lambda_531(void *data, object clo, int argc, object *args) ;/*object self_7312201, object r_735019*/
++static void __lambda_532(void *data, object clo, int argc, object *args) ;/*object self_7312202, object r_735020*/
++static void __lambda_534(void *data, object clo, int argc, object *args) ;/*object self_7312203, object r_735022*/
++static void __lambda_535(void *data, object clo, int argc, object *args) ;/*object self_7312204, object r_735021*/
++static void __lambda_533(void *data, object clo, int argc, object *args) ;/*object self_7312205, object k_735023*/
++static void __lambda_527(void *data, object clo, int argc, object *args) ;/*closure _,object k_735013, object str_73646_732888, object opts_73647_732889_raw, ...*/
++static void __lambda_528(void *data, object clo, int argc, object *args) ;/*object self_7312196, object r_735014*/
++static void __lambda_517(void *data, object clo, int argc, object *args) ;/*closure _,object k_734990, object str_73638_732880, object opts_73639_732881_raw, ...*/
++static void __lambda_518(void *data, object clo, int argc, object *args) ;/*object self_7312183, object len_73640_732882, object start_73641_732883, object end_73642_732884, object loop_73643_732885*/
++static void __lambda_1331(void *data, object clo, int argc, object *args) ;/*object self_7312184, object len_73640_732882*/
++static void __lambda_1330(void *data, object clo, int argc, object *args) ;/*object self_7312185, object start_73641_732883*/
++static void __lambda_1329(void *data, object clo, int argc, object *args) ;/*object self_7312186, object end_73642_732884*/
++static void __lambda_1328(void *data, object clo, int argc, object *args) ;/*object self_7312187, object loop_73643_732885*/
++static void __lambda_519(void *data, object clo, int argc, object *args) ;/*object self_7312188, object r_734991*/
++static void __lambda_520(void *data, object clo, int argc, object *args) ;/*object self_7312189, object r_734992*/
++static void __lambda_522(void *data, object clo, int argc, object *args) ;/*object self_7312190, object r_735002*/
++static void __lambda_523(void *data, object clo, int argc, object *args) ;/*object self_7312191, object r_734993*/
++static void __lambda_526(void *data, object clo, int argc, object *args) ;/*object self_7312192, object k_734997, object i_73644_732886, object lst_73645_732887*/
++static void __lambda_524(void *data, object clo, int argc, object *args) ;/*object self_7312193, object r_734996*/
++static void __lambda_525(void *data, object clo, int argc, object *args) ;/*object self_7312194, object r_734994*/
++static void __lambda_521(void *data, object clo, int argc, object *args) ;/*object self_7312195, object k_735003*/
++static void __lambda_515(void *data, object clo, int argc, object *args) ;/*closure _,object k_734985, object vec_73635_732877, object opts_73636_732878_raw, ...*/
++static void __lambda_516(void *data, object clo, int argc, object *args) ;/*object self_7312182, object lst_73637_732879*/
++static void __lambda_508(void *data, object clo, int argc, object *args) ;/*closure _,object k_734970, object str_73630_732872, object opts_73631_732873_raw, ...*/
++static void __lambda_509(void *data, object clo, int argc, object *args) ;/*object self_7312173, object len_73632_732874, object start_73633_732875, object end_73634_732876*/
++static void __lambda_1327(void *data, object clo, int argc, object *args) ;/*object self_7312174, object len_73632_732874*/
++static void __lambda_1326(void *data, object clo, int argc, object *args) ;/*object self_7312175, object start_73633_732875*/
++static void __lambda_1325(void *data, object clo, int argc, object *args) ;/*object self_7312176, object end_73634_732876*/
++static void __lambda_510(void *data, object clo, int argc, object *args) ;/*object self_7312177, object r_734971*/
++static void __lambda_511(void *data, object clo, int argc, object *args) ;/*object self_7312178, object r_734972*/
++static void __lambda_513(void *data, object clo, int argc, object *args) ;/*object self_7312179, object r_734974*/
++static void __lambda_514(void *data, object clo, int argc, object *args) ;/*object self_7312180, object r_734973*/
++static void __lambda_512(void *data, object clo, int argc, object *args) ;/*object self_7312181, object k_734975*/
++static void __lambda_501(void *data, object clo, int argc, object *args) ;/*closure _,object k_734955, object bv_73625_732867, object opts_73626_732868_raw, ...*/
++static void __lambda_502(void *data, object clo, int argc, object *args) ;/*object self_7312164, object len_73627_732869, object start_73628_732870, object end_73629_732871*/
++static void __lambda_1324(void *data, object clo, int argc, object *args) ;/*object self_7312165, object len_73627_732869*/
++static void __lambda_1323(void *data, object clo, int argc, object *args) ;/*object self_7312166, object start_73628_732870*/
++static void __lambda_1322(void *data, object clo, int argc, object *args) ;/*object self_7312167, object end_73629_732871*/
++static void __lambda_503(void *data, object clo, int argc, object *args) ;/*object self_7312168, object r_734956*/
++static void __lambda_504(void *data, object clo, int argc, object *args) ;/*object self_7312169, object r_734957*/
++static void __lambda_506(void *data, object clo, int argc, object *args) ;/*object self_7312170, object r_734959*/
++static void __lambda_507(void *data, object clo, int argc, object *args) ;/*object self_7312171, object r_734958*/
++static void __lambda_505(void *data, object clo, int argc, object *args) ;/*object self_7312172, object k_734960*/
++static void __lambda_480(void *data, object clo, int argc, object *args) ;/*closure _,object k_734918, object to_73590_732848, object at_73591_732849, object from_73592_732850, object o_73593_732851_raw, ...*/
++static void __lambda_484(void *data, object clo, int argc, object *args) ;/*object self_7312142, object end_73599_732853*/
++static void __lambda_485(void *data, object clo, int argc, object *args) ;/*object self_7312143, object r_734945*/
++static void __lambda_486(void *data, object clo, int argc, object *args) ;/*object self_7312144, object limit_73602_732854*/
++static void __lambda_494(void *data, object clo, int argc, object *args) ;/*object self_7312153, object i_73618_732861, object j_73619_732862*/
++static void __lambda_495(void *data, object clo, int argc, object *args) ;/*object self_7312154, object lp_73614_73620_732863*/
++static void __lambda_1321(void *data, object clo, int argc, object *args) ;/*object self_7312155, object lp_73614_73620_732863*/
++static void __lambda_498(void *data, object clo, int argc, object *args) ;/*object self_7312156, object k_734935, object i_73621_732864, object j_73622_732865*/
++static void __lambda_499(void *data, object clo, int argc, object *args) ;/*object self_7312157, object r_734940*/
++static void __lambda_500(void *data, object clo, int argc, object *args) ;/*object self_7312158, object r_734937*/
++static void __lambda_496(void *data, object clo, int argc, object *args) ;/*object self_7312159, object r_734934*/
++static void __lambda_497(void *data, object clo, int argc, object *args) ;/*object self_7312160, object r_734933*/
++static void __lambda_487(void *data, object clo, int argc, object *args) ;/*object self_7312145, object i_73608_732855, object j_73609_732856*/
++static void __lambda_488(void *data, object clo, int argc, object *args) ;/*object self_7312146, object lp_73604_73610_732857*/
++static void __lambda_1320(void *data, object clo, int argc, object *args) ;/*object self_7312147, object lp_73604_73610_732857*/
++static void __lambda_491(void *data, object clo, int argc, object *args) ;/*object self_7312148, object k_734925, object i_73611_732858, object j_73612_732859*/
++static void __lambda_492(void *data, object clo, int argc, object *args) ;/*object self_7312149, object r_734930*/
++static void __lambda_493(void *data, object clo, int argc, object *args) ;/*object self_7312150, object r_734927*/
++static void __lambda_489(void *data, object clo, int argc, object *args) ;/*object self_7312151, object r_734924*/
++static void __lambda_490(void *data, object clo, int argc, object *args) ;/*object self_7312152, object r_734923*/
++static void __lambda_481(void *data, object clo, int argc, object *args) ;/*object self_7312161, object k_734946*/
++static void __lambda_483(void *data, object clo, int argc, object *args) ;/*object self_7312162, object r_734947*/
++static void __lambda_482(void *data, object clo, int argc, object *args) ;/*object self_7312163, object k_734948*/
++static void __lambda_473(void *data, object clo, int argc, object *args) ;/*closure _,object k_734903, object bv_73585_732843, object opts_73586_732844_raw, ...*/
++static void __lambda_474(void *data, object clo, int argc, object *args) ;/*object self_7312133, object len_73587_732845, object start_73588_732846, object end_73589_732847*/
++static void __lambda_1319(void *data, object clo, int argc, object *args) ;/*object self_7312134, object len_73587_732845*/
++static void __lambda_1318(void *data, object clo, int argc, object *args) ;/*object self_7312135, object start_73588_732846*/
++static void __lambda_1317(void *data, object clo, int argc, object *args) ;/*object self_7312136, object end_73589_732847*/
++static void __lambda_475(void *data, object clo, int argc, object *args) ;/*object self_7312137, object r_734904*/
++static void __lambda_476(void *data, object clo, int argc, object *args) ;/*object self_7312138, object r_734905*/
++static void __lambda_478(void *data, object clo, int argc, object *args) ;/*object self_7312139, object r_734907*/
++static void __lambda_479(void *data, object clo, int argc, object *args) ;/*object self_7312140, object r_734906*/
++static void __lambda_477(void *data, object clo, int argc, object *args) ;/*object self_7312141, object k_734908*/
++static void __lambda_463(void *data, object clo, int argc, object *args) ;/*closure _,object k_734880, object vec_73577_732835, object opts_73578_732836_raw, ...*/
++static void __lambda_464(void *data, object clo, int argc, object *args) ;/*object self_7312120, object len_73579_732837, object start_73580_732838, object end_73581_732839, object loop_73582_732840*/
++static void __lambda_1316(void *data, object clo, int argc, object *args) ;/*object self_7312121, object len_73579_732837*/
++static void __lambda_1315(void *data, object clo, int argc, object *args) ;/*object self_7312122, object start_73580_732838*/
++static void __lambda_1314(void *data, object clo, int argc, object *args) ;/*object self_7312123, object end_73581_732839*/
++static void __lambda_1313(void *data, object clo, int argc, object *args) ;/*object self_7312124, object loop_73582_732840*/
++static void __lambda_465(void *data, object clo, int argc, object *args) ;/*object self_7312125, object r_734881*/
++static void __lambda_466(void *data, object clo, int argc, object *args) ;/*object self_7312126, object r_734882*/
++static void __lambda_468(void *data, object clo, int argc, object *args) ;/*object self_7312127, object r_734892*/
++static void __lambda_469(void *data, object clo, int argc, object *args) ;/*object self_7312128, object r_734883*/
++static void __lambda_472(void *data, object clo, int argc, object *args) ;/*object self_7312129, object k_734887, object i_73583_732841, object lst_73584_732842*/
++static void __lambda_470(void *data, object clo, int argc, object *args) ;/*object self_7312130, object r_734886*/
++static void __lambda_471(void *data, object clo, int argc, object *args) ;/*object self_7312131, object r_734884*/
++static void __lambda_467(void *data, object clo, int argc, object *args) ;/*object self_7312132, object k_734893*/
++static void __lambda_462(void *data, object clo, int argc, object *args) ;/*closure _,object k_734877, object objs_73576_732834_raw, ...*/
++static void __lambda_461(void *data, object clo, int argc, object *args) ;/*closure _,object k_734873, object lst_73575_732833*/
++static void __lambda_459(void *data, object clo, int argc, object *args) ;/*closure _,object k_734869, object lst_73571_732829, object k_73572_732830, object obj_73573_732831*/
++static void __lambda_460(void *data, object clo, int argc, object *args) ;/*object self_7312119, object kth_73574_732832*/
++static void __lambda_457(void *data, object clo, int argc, object *args) ;/*closure _,object k_734865, object lst_73569_732827, object k_73570_732828*/
++static void __lambda_458(void *data, object clo, int argc, object *args) ;/*object self_7312118, object r_734866*/
++static void __lambda_456(void *data, object clo, int argc, object *args) ;/*closure _,object k_734859, object lst_73567_732825, object k_73568_732826*/
++static void __lambda_444(void *data, object clo, int argc, object *args) ;/*closure _,object k_734838, object f_73558_732817, object lis1_73559_732818, object lists_73560_732819_raw, ...*/
++static void __lambda_455(void *data, object clo, int argc, object *args) ;/*object self_7312117, object r_734853*/
++static void __lambda_445(void *data, object clo, int argc, object *args) ;/*object self_7312106, object lists_73562_732820*/
++static void __lambda_446(void *data, object clo, int argc, object *args) ;/*object self_7312107, object recur_73563_732821*/
++static void __lambda_1312(void *data, object clo, int argc, object *args) ;/*object self_7312108, object recur_73563_732821*/
++static void __lambda_449(void *data, object clo, int argc, object *args) ;/*object self_7312109, object k_734844, object lists_73564_732822*/
++static void __lambda_454(void *data, object clo, int argc, object *args) ;/*object self_7312110, object k_734850*/
++static void __lambda_450(void *data, object clo, int argc, object *args) ;/*object self_7312111, object r_734845*/
++static void __lambda_452(void *data, object clo, int argc, object *args) ;/*object self_7312112, object k_734847, object cars_73565_732823, object cdrs_73566_732824*/
++static void __lambda_453(void *data, object clo, int argc, object *args) ;/*object self_7312113, object r_734849*/
++static void __lambda_451(void *data, object clo, int argc, object *args) ;/*object self_7312114, object r_734846*/
++static void __lambda_447(void *data, object clo, int argc, object *args) ;/*object self_7312115, object r_734843*/
++static void __lambda_448(void *data, object clo, int argc, object *args) ;/*object self_7312116, object r_734842*/
++static void __lambda_442(void *data, object clo, int argc, object *args) ;/*closure _,object k_734827, object f_73551_732813, object lst1_73552_732814, object lst2_73553_732815*/
++static void __lambda_443(void *data, object clo, int argc, object *args) ;/*object self_7312105, object r_734829*/
++static void __lambda_440(void *data, object clo, int argc, object *args) ;/*closure _,object k_734820, object f_73549_732811, object lst_73550_732812*/
++static void __lambda_441(void *data, object clo, int argc, object *args) ;/*object self_7312104, object r_734822*/
++static void __lambda_437(void *data, object clo, int argc, object *args) ;/*closure _,object k_734808, object f_73542_732807, object lst1_73543_732808, object lst2_73544_732809*/
++static void __lambda_438(void *data, object clo, int argc, object *args) ;/*object self_7312102, object r_734810*/
++static void __lambda_439(void *data, object clo, int argc, object *args) ;/*object self_7312103, object r_734811*/
++static void __lambda_434(void *data, object clo, int argc, object *args) ;/*closure _,object k_734800, object f_73540_732805, object lst_73541_732806*/
++static void __lambda_435(void *data, object clo, int argc, object *args) ;/*object self_7312100, object r_734802*/
++static void __lambda_436(void *data, object clo, int argc, object *args) ;/*object self_7312101, object r_734803*/
++static void __lambda_419(void *data, object clo, int argc, object *args) ;/*closure _,object k_734781, object f_73528_732794, object lis1_73529_732795, object lists_73530_732796_raw, ...*/
++static void __lambda_432(void *data, object clo, int argc, object *args) ;/*object self_7312097, object k_734796, object x_73538_732803, object y_73539_732804*/
++static void __lambda_433(void *data, object clo, int argc, object *args) ;/*object self_7312098, object r_734797*/
++static void __lambda_431(void *data, object clo, int argc, object *args) ;/*object self_7312099, object r_734794*/
++static void __lambda_420(void *data, object clo, int argc, object *args) ;/*object self_7312085, object lists_73532_732797*/
++static void __lambda_421(void *data, object clo, int argc, object *args) ;/*object self_7312086, object recur_73533_732798*/
++static void __lambda_1311(void *data, object clo, int argc, object *args) ;/*object self_7312087, object recur_73533_732798*/
++static void __lambda_424(void *data, object clo, int argc, object *args) ;/*object self_7312088, object k_734786, object lists_73534_732799*/
++static void __lambda_430(void *data, object clo, int argc, object *args) ;/*object self_7312089, object k_734793*/
++static void __lambda_425(void *data, object clo, int argc, object *args) ;/*object self_7312090, object r_734787*/
++static void __lambda_427(void *data, object clo, int argc, object *args) ;/*object self_7312091, object k_734789, object cars_73535_732800, object cdrs_73536_732801*/
++static void __lambda_428(void *data, object clo, int argc, object *args) ;/*object self_7312092, object x_73537_732802*/
++static void __lambda_429(void *data, object clo, int argc, object *args) ;/*object self_7312093, object r_734792*/
++static void __lambda_426(void *data, object clo, int argc, object *args) ;/*object self_7312094, object r_734788*/
++static void __lambda_422(void *data, object clo, int argc, object *args) ;/*object self_7312095, object r_734785*/
++static void __lambda_423(void *data, object clo, int argc, object *args) ;/*object self_7312096, object r_734784*/
++static void __lambda_399(void *data, object clo, int argc, object *args) ;/*closure _,object k_734753, object lists_73516_732783*/
++static void __lambda_401(void *data, object clo, int argc, object *args) ;/*object self_7312065, object k_734755, object abort_73517_732784*/
++static void __lambda_402(void *data, object clo, int argc, object *args) ;/*object self_7312066, object lists_73519_732785*/
++static void __lambda_403(void *data, object clo, int argc, object *args) ;/*object self_7312067, object recur_73520_732786*/
++static void __lambda_1310(void *data, object clo, int argc, object *args) ;/*object self_7312068, object recur_73520_732786*/
++static void __lambda_406(void *data, object clo, int argc, object *args) ;/*object self_7312069, object k_734758, object lists_73521_732787*/
++static void __lambda_418(void *data, object clo, int argc, object *args) ;/*object self_7312070, object k_734776*/
++static void __lambda_407(void *data, object clo, int argc, object *args) ;/*object self_7312071, object r_734760*/
++static void __lambda_409(void *data, object clo, int argc, object *args) ;/*object self_7312072, object k_734762, object list_73522_732788, object other_91lists_73523_732789*/
++static void __lambda_417(void *data, object clo, int argc, object *args) ;/*object self_7312073, object k_734775*/
++static void __lambda_410(void *data, object clo, int argc, object *args) ;/*object self_7312074, object r_734766*/
++static void __lambda_412(void *data, object clo, int argc, object *args) ;/*object self_7312075, object k_734768, object a_73524_732790, object d_73525_732791*/
++static void __lambda_416(void *data, object clo, int argc, object *args) ;/*object self_7312076, object k_734774*/
++static void __lambda_413(void *data, object clo, int argc, object *args) ;/*object self_7312077, object r_734769*/
++static void __lambda_415(void *data, object clo, int argc, object *args) ;/*object self_7312078, object k_734771, object cars_73526_732792, object cdrs_73527_732793*/
++static void __lambda_414(void *data, object clo, int argc, object *args) ;/*object self_7312079, object r_734770*/
++static void __lambda_411(void *data, object clo, int argc, object *args) ;/*object self_7312080, object r_734767*/
++static void __lambda_408(void *data, object clo, int argc, object *args) ;/*object self_7312081, object r_734761*/
++static void __lambda_404(void *data, object clo, int argc, object *args) ;/*object self_7312082, object r_734757*/
++static void __lambda_405(void *data, object clo, int argc, object *args) ;/*object self_7312083, object r_734756*/
++static void __lambda_400(void *data, object clo, int argc, object *args) ;/*object self_7312084, object r_734754*/
++static void __lambda_398(void *data, object clo, int argc, object *args) ;/*closure _,object k_734748, object pair_73515_732782*/
++static void __lambda_397(void *data, object clo, int argc, object *args) ;/*closure _,object k_734729, object expr_73506_732776, object rename_73507_732777, object compare_73508_732778*/
++static void __lambda_390(void *data, object clo, int argc, object *args) ;/*closure _,object k_734717, object ls_73499_732770*/
++static void __lambda_391(void *data, object clo, int argc, object *args) ;/*object self_7312058, object ls_73501_732771, object res_73502_732772*/
++static void __lambda_392(void *data, object clo, int argc, object *args) ;/*object self_7312059, object lp_73503_732773*/
++static void __lambda_1309(void *data, object clo, int argc, object *args) ;/*object self_7312060, object lp_73503_732773*/
++static void __lambda_395(void *data, object clo, int argc, object *args) ;/*object self_7312061, object k_734721, object ls_73504_732774, object res_73505_732775*/
++static void __lambda_396(void *data, object clo, int argc, object *args) ;/*object self_7312062, object r_734726_7311402*/
++static void __lambda_393(void *data, object clo, int argc, object *args) ;/*object self_7312063, object r_734720*/
++static void __lambda_394(void *data, object clo, int argc, object *args) ;/*object self_7312064, object r_734719*/
++static void __lambda_383(void *data, object clo, int argc, object *args) ;/*closure _,object k_734704, object k_73493_732764, object fill_73494_732765_raw, ...*/
++static void __lambda_384(void *data, object clo, int argc, object *args) ;/*object self_7312050, object x_73495_732766, object make_73496_732767*/
++static void __lambda_1308(void *data, object clo, int argc, object *args) ;/*object self_7312051, object x_73495_732766*/
++static void __lambda_1307(void *data, object clo, int argc, object *args) ;/*object self_7312052, object make_73496_732767*/
++static void __lambda_385(void *data, object clo, int argc, object *args) ;/*object self_7312053, object r_734705*/
++static void __lambda_388(void *data, object clo, int argc, object *args) ;/*object self_7312054, object k_734708, object n_73497_732768, object obj_73498_732769*/
++static void __lambda_389(void *data, object clo, int argc, object *args) ;/*object self_7312055, object r_734710*/
++static void __lambda_386(void *data, object clo, int argc, object *args) ;/*object self_7312056, object r_734707*/
++static void __lambda_387(void *data, object clo, int argc, object *args) ;/*object self_7312057, object r_734706*/
++static void __lambda_382(void *data, object clo, int argc, object *args) ;/*closure _,object k_734701, object objs_73492_732763_raw, ...*/
++static void __lambda_373(void *data, object clo, int argc, object *args) ;/*closure _,object k_734686, object lst_73485_732753_raw, ...*/
++static void __lambda_374(void *data, object clo, int argc, object *args) ;/*object self_7312041, object append_912_732755*/
++static void __lambda_1306(void *data, object clo, int argc, object *args) ;/*object self_7312042, object append_912_732755*/
++static void __lambda_379(void *data, object clo, int argc, object *args) ;/*object self_7312043, object k_734696, object inlist_73486_732757, object alist_73487_732758*/
++static void __lambda_381(void *data, object clo, int argc, object *args) ;/*object self_7312044, object k_734698, object ap_73488_732759, object in_73489_732760*/
++static void __lambda_380(void *data, object clo, int argc, object *args) ;/*object self_7312045, object r_734697*/
++static void __lambda_375(void *data, object clo, int argc, object *args) ;/*object self_7312046, object r_734695*/
++static void __lambda_376(void *data, object clo, int argc, object *args) ;/*object self_7312047, object r_734687*/
++static void __lambda_378(void *data, object clo, int argc, object *args) ;/*object self_7312048, object k_734693, object a_73490_732761, object b_73491_732762*/
++static void __lambda_377(void *data, object clo, int argc, object *args) ;/*object self_7312049, object r_734690*/
++static object __lambda_1401(void *data, object ptr,object n_73484_732752) ;
++static void __lambda_372(void *data, object clo, int argc, object *args) ;/*closure _,object k_734683, object n_73484_732752*/
++static object __lambda_1400(void *data, object ptr,object n_73483_732751) ;
++static void __lambda_371(void *data, object clo, int argc, object *args) ;/*closure _,object k_734680, object n_73483_732751*/
++static object __lambda_1399(void *data, object ptr,object n_73482_732750) ;
++static void __lambda_370(void *data, object clo, int argc, object *args) ;/*closure _,object k_734677, object n_73482_732750*/
 +static object __lambda_1398(void *data, object ptr, object o) ;
 +static void __lambda_1397(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object o)*/
-+static object __lambda_1396(void *data, object ptr,object x_73481_732756) ;
-+static void __lambda_369(void *data, object clo, int argc, object *args) ;/*closure _,object k_734681, object x_73481_732756*/
-+static void __lambda_368(void *data, object clo, int argc, object *args) ;/*closure _,object k_734677, object port_73480_732755_raw, ...*/
-+static void __lambda_366(void *data, object clo, int argc, object *args) ;/*closure _,object k_734671, object char_73478_732753, object port_73479_732754_raw, ...*/
-+static void __lambda_367(void *data, object clo, int argc, object *args) ;/*object self_7312047, object r_734673*/
++static object __lambda_1396(void *data, object ptr,object x_73481_732749) ;
++static void __lambda_369(void *data, object clo, int argc, object *args) ;/*closure _,object k_734674, object x_73481_732749*/
++static void __lambda_368(void *data, object clo, int argc, object *args) ;/*closure _,object k_734670, object port_73480_732748_raw, ...*/
++static void __lambda_366(void *data, object clo, int argc, object *args) ;/*closure _,object k_734664, object char_73478_732746, object port_73479_732747_raw, ...*/
++static void __lambda_367(void *data, object clo, int argc, object *args) ;/*object self_7312040, object r_734666*/
 +static object __lambda_1395(void *data, object ptr, object bv, object port, object start, object end) ;
 +static void __lambda_1394(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_356(void *data, object clo, int argc, object *args) ;/*closure _,object k_734651, object vec_73472_732747, object opts_73473_732748_raw, ...*/
-+static void __lambda_357(void *data, object clo, int argc, object *args) ;/*object self_7312034, object len_73474_732749, object port_73475_732750, object start_73476_732751, object end_73477_732752*/
-+static void __lambda_1305(void *data, object clo, int argc, object *args) ;/*object self_7312035, object len_73474_732749*/
-+static void __lambda_1304(void *data, object clo, int argc, object *args) ;/*object self_7312036, object port_73475_732750*/
-+static void __lambda_1303(void *data, object clo, int argc, object *args) ;/*object self_7312037, object start_73476_732751*/
-+static void __lambda_1302(void *data, object clo, int argc, object *args) ;/*object self_7312038, object end_73477_732752*/
-+static void __lambda_358(void *data, object clo, int argc, object *args) ;/*object self_7312039, object r_734652*/
-+static void __lambda_360(void *data, object clo, int argc, object *args) ;/*object self_7312040, object r_734664*/
-+static void __lambda_361(void *data, object clo, int argc, object *args) ;/*object self_7312041, object r_734653*/
-+static void __lambda_362(void *data, object clo, int argc, object *args) ;/*object self_7312042, object r_734654*/
-+static void __lambda_364(void *data, object clo, int argc, object *args) ;/*object self_7312043, object r_734656*/
-+static void __lambda_365(void *data, object clo, int argc, object *args) ;/*object self_7312044, object r_734655*/
-+static void __lambda_363(void *data, object clo, int argc, object *args) ;/*object self_7312045, object k_734657*/
-+static void __lambda_359(void *data, object clo, int argc, object *args) ;/*object self_7312046, object k_734665*/
-+static void __lambda_339(void *data, object clo, int argc, object *args) ;/*closure _,object k_734620, object vec_73444_732736, object o_73445_732737_raw, ...*/
-+static void __lambda_341(void *data, object clo, int argc, object *args) ;/*object self_7312017, object in_73448_732738*/
-+static void __lambda_343(void *data, object clo, int argc, object *args) ;/*object self_7312018, object start_73454_732740*/
-+static void __lambda_347(void *data, object clo, int argc, object *args) ;/*object self_7312019, object end_73457_732741*/
-+static void __lambda_348(void *data, object clo, int argc, object *args) ;/*object self_7312020, object res_73459_732742*/
-+static void __lambda_349(void *data, object clo, int argc, object *args) ;/*object self_7312021, object len_73464_732743*/
-+static void __lambda_350(void *data, object clo, int argc, object *args) ;/*object self_7312022, object lp_73465_73469_732745*/
-+static void __lambda_1301(void *data, object clo, int argc, object *args) ;/*object self_7312023, object lp_73465_73469_732745*/
-+static void __lambda_353(void *data, object clo, int argc, object *args) ;/*object self_7312024, object k_734631, object i_73470_732746*/
-+static void __lambda_354(void *data, object clo, int argc, object *args) ;/*object self_7312025, object r_734636*/
-+static void __lambda_355(void *data, object clo, int argc, object *args) ;/*object self_7312026, object r_734633*/
-+static void __lambda_351(void *data, object clo, int argc, object *args) ;/*object self_7312027, object r_734630*/
-+static void __lambda_352(void *data, object clo, int argc, object *args) ;/*object self_7312028, object r_734629*/
-+static void __lambda_344(void *data, object clo, int argc, object *args) ;/*object self_7312029, object k_734638*/
-+static void __lambda_346(void *data, object clo, int argc, object *args) ;/*object self_7312030, object r_734639*/
-+static void __lambda_345(void *data, object clo, int argc, object *args) ;/*object self_7312031, object k_734640*/
-+static void __lambda_342(void *data, object clo, int argc, object *args) ;/*object self_7312032, object k_734643*/
-+static void __lambda_340(void *data, object clo, int argc, object *args) ;/*object self_7312033, object k_734647*/
-+static void __lambda_327(void *data, object clo, int argc, object *args) ;/*closure _,object k_734602, object k_73433_732729, object _191port_73434_732730_raw, ...*/
-+static void __lambda_328(void *data, object clo, int argc, object *args) ;/*object self_7312003, object port_73435_732731, object bv_73436_732732, object loop_73437_732733*/
-+static void __lambda_1300(void *data, object clo, int argc, object *args) ;/*object self_7312004, object port_73435_732731*/
-+static void __lambda_1299(void *data, object clo, int argc, object *args) ;/*object self_7312005, object bv_73436_732732*/
-+static void __lambda_1298(void *data, object clo, int argc, object *args) ;/*object self_7312006, object loop_73437_732733*/
-+static void __lambda_330(void *data, object clo, int argc, object *args) ;/*object self_7312007, object r_734615*/
-+static void __lambda_331(void *data, object clo, int argc, object *args) ;/*object self_7312008, object r_734603*/
-+static void __lambda_332(void *data, object clo, int argc, object *args) ;/*object self_7312009, object r_734614*/
-+static void __lambda_333(void *data, object clo, int argc, object *args) ;/*object self_7312010, object r_734604*/
-+static void __lambda_336(void *data, object clo, int argc, object *args) ;/*object self_7312011, object k_734607, object n_73438_732734*/
-+static void __lambda_337(void *data, object clo, int argc, object *args) ;/*object self_7312012, object b_73439_732735*/
-+static void __lambda_338(void *data, object clo, int argc, object *args) ;/*object self_7312013, object r_734612*/
-+static void __lambda_334(void *data, object clo, int argc, object *args) ;/*object self_7312014, object r_734606*/
-+static void __lambda_335(void *data, object clo, int argc, object *args) ;/*object self_7312015, object r_734605*/
-+static void __lambda_329(void *data, object clo, int argc, object *args) ;/*object self_7312016, object k_734616*/
-+static void __lambda_323(void *data, object clo, int argc, object *args) ;/*closure _,object k_734587, object str_73422_732725, object opts_73423_732726_raw, ...*/
-+static void __lambda_325(void *data, object clo, int argc, object *args) ;/*object self_7312001, object start_73431_732727, object end_73432_732728*/
-+static void __lambda_326(void *data, object clo, int argc, object *args) ;/*object self_7312002, object r_734594*/
-+static void __lambda_324(void *data, object clo, int argc, object *args) ;/*object self_7312000, object r_734589*/
-+static void __lambda_322(void *data, object clo, int argc, object *args) ;/*closure _,object k_734584, object str_73420_732723, object port_73421_732724*/
-+static void __lambda_320(void *data, object clo, int argc, object *args) ;/*closure _,object k_734580, object str_73419_732722*/
-+static void __lambda_321(void *data, object clo, int argc, object *args) ;/*object self_7311999, object r_734581*/
-+static void __lambda_318(void *data, object clo, int argc, object *args) ;/*closure _,object k_734574, object port_73418_732721_raw, ...*/
-+static void __lambda_319(void *data, object clo, int argc, object *args) ;/*object self_7311998, object r_734576*/
-+static void __lambda_316(void *data, object clo, int argc, object *args) ;/*closure _,object k_734569, object obj_73416_732720*/
-+static void __lambda_317(void *data, object clo, int argc, object *args) ;/*object self_7311997, object r_734571_7311407*/
-+static void __lambda_315(void *data, object clo, int argc, object *args) ;/*closure _,object k_734565, object obj_73414_732719*/
++static void __lambda_356(void *data, object clo, int argc, object *args) ;/*closure _,object k_734644, object vec_73472_732740, object opts_73473_732741_raw, ...*/
++static void __lambda_357(void *data, object clo, int argc, object *args) ;/*object self_7312027, object len_73474_732742, object port_73475_732743, object start_73476_732744, object end_73477_732745*/
++static void __lambda_1305(void *data, object clo, int argc, object *args) ;/*object self_7312028, object len_73474_732742*/
++static void __lambda_1304(void *data, object clo, int argc, object *args) ;/*object self_7312029, object port_73475_732743*/
++static void __lambda_1303(void *data, object clo, int argc, object *args) ;/*object self_7312030, object start_73476_732744*/
++static void __lambda_1302(void *data, object clo, int argc, object *args) ;/*object self_7312031, object end_73477_732745*/
++static void __lambda_358(void *data, object clo, int argc, object *args) ;/*object self_7312032, object r_734645*/
++static void __lambda_360(void *data, object clo, int argc, object *args) ;/*object self_7312033, object r_734657*/
++static void __lambda_361(void *data, object clo, int argc, object *args) ;/*object self_7312034, object r_734646*/
++static void __lambda_362(void *data, object clo, int argc, object *args) ;/*object self_7312035, object r_734647*/
++static void __lambda_364(void *data, object clo, int argc, object *args) ;/*object self_7312036, object r_734649*/
++static void __lambda_365(void *data, object clo, int argc, object *args) ;/*object self_7312037, object r_734648*/
++static void __lambda_363(void *data, object clo, int argc, object *args) ;/*object self_7312038, object k_734650*/
++static void __lambda_359(void *data, object clo, int argc, object *args) ;/*object self_7312039, object k_734658*/
++static void __lambda_339(void *data, object clo, int argc, object *args) ;/*closure _,object k_734613, object vec_73444_732729, object o_73445_732730_raw, ...*/
++static void __lambda_341(void *data, object clo, int argc, object *args) ;/*object self_7312010, object in_73448_732731*/
++static void __lambda_343(void *data, object clo, int argc, object *args) ;/*object self_7312011, object start_73454_732733*/
++static void __lambda_347(void *data, object clo, int argc, object *args) ;/*object self_7312012, object end_73457_732734*/
++static void __lambda_348(void *data, object clo, int argc, object *args) ;/*object self_7312013, object res_73459_732735*/
++static void __lambda_349(void *data, object clo, int argc, object *args) ;/*object self_7312014, object len_73464_732736*/
++static void __lambda_350(void *data, object clo, int argc, object *args) ;/*object self_7312015, object lp_73465_73469_732738*/
++static void __lambda_1301(void *data, object clo, int argc, object *args) ;/*object self_7312016, object lp_73465_73469_732738*/
++static void __lambda_353(void *data, object clo, int argc, object *args) ;/*object self_7312017, object k_734624, object i_73470_732739*/
++static void __lambda_354(void *data, object clo, int argc, object *args) ;/*object self_7312018, object r_734629*/
++static void __lambda_355(void *data, object clo, int argc, object *args) ;/*object self_7312019, object r_734626*/
++static void __lambda_351(void *data, object clo, int argc, object *args) ;/*object self_7312020, object r_734623*/
++static void __lambda_352(void *data, object clo, int argc, object *args) ;/*object self_7312021, object r_734622*/
++static void __lambda_344(void *data, object clo, int argc, object *args) ;/*object self_7312022, object k_734631*/
++static void __lambda_346(void *data, object clo, int argc, object *args) ;/*object self_7312023, object r_734632*/
++static void __lambda_345(void *data, object clo, int argc, object *args) ;/*object self_7312024, object k_734633*/
++static void __lambda_342(void *data, object clo, int argc, object *args) ;/*object self_7312025, object k_734636*/
++static void __lambda_340(void *data, object clo, int argc, object *args) ;/*object self_7312026, object k_734640*/
++static void __lambda_327(void *data, object clo, int argc, object *args) ;/*closure _,object k_734595, object k_73433_732722, object _191port_73434_732723_raw, ...*/
++static void __lambda_328(void *data, object clo, int argc, object *args) ;/*object self_7311996, object port_73435_732724, object bv_73436_732725, object loop_73437_732726*/
++static void __lambda_1300(void *data, object clo, int argc, object *args) ;/*object self_7311997, object port_73435_732724*/
++static void __lambda_1299(void *data, object clo, int argc, object *args) ;/*object self_7311998, object bv_73436_732725*/
++static void __lambda_1298(void *data, object clo, int argc, object *args) ;/*object self_7311999, object loop_73437_732726*/
++static void __lambda_330(void *data, object clo, int argc, object *args) ;/*object self_7312000, object r_734608*/
++static void __lambda_331(void *data, object clo, int argc, object *args) ;/*object self_7312001, object r_734596*/
++static void __lambda_332(void *data, object clo, int argc, object *args) ;/*object self_7312002, object r_734607*/
++static void __lambda_333(void *data, object clo, int argc, object *args) ;/*object self_7312003, object r_734597*/
++static void __lambda_336(void *data, object clo, int argc, object *args) ;/*object self_7312004, object k_734600, object n_73438_732727*/
++static void __lambda_337(void *data, object clo, int argc, object *args) ;/*object self_7312005, object b_73439_732728*/
++static void __lambda_338(void *data, object clo, int argc, object *args) ;/*object self_7312006, object r_734605*/
++static void __lambda_334(void *data, object clo, int argc, object *args) ;/*object self_7312007, object r_734599*/
++static void __lambda_335(void *data, object clo, int argc, object *args) ;/*object self_7312008, object r_734598*/
++static void __lambda_329(void *data, object clo, int argc, object *args) ;/*object self_7312009, object k_734609*/
++static void __lambda_323(void *data, object clo, int argc, object *args) ;/*closure _,object k_734580, object str_73422_732718, object opts_73423_732719_raw, ...*/
++static void __lambda_325(void *data, object clo, int argc, object *args) ;/*object self_7311994, object start_73431_732720, object end_73432_732721*/
++static void __lambda_326(void *data, object clo, int argc, object *args) ;/*object self_7311995, object r_734587*/
++static void __lambda_324(void *data, object clo, int argc, object *args) ;/*object self_7311993, object r_734582*/
++static void __lambda_322(void *data, object clo, int argc, object *args) ;/*closure _,object k_734577, object str_73420_732716, object port_73421_732717*/
++static void __lambda_320(void *data, object clo, int argc, object *args) ;/*closure _,object k_734573, object str_73419_732715*/
++static void __lambda_321(void *data, object clo, int argc, object *args) ;/*object self_7311992, object r_734574*/
++static void __lambda_318(void *data, object clo, int argc, object *args) ;/*closure _,object k_734567, object port_73418_732714_raw, ...*/
++static void __lambda_319(void *data, object clo, int argc, object *args) ;/*object self_7311991, object r_734569*/
++static void __lambda_316(void *data, object clo, int argc, object *args) ;/*closure _,object k_734562, object obj_73416_732713*/
++static void __lambda_317(void *data, object clo, int argc, object *args) ;/*object self_7311990, object r_734564_7311400*/
++static void __lambda_315(void *data, object clo, int argc, object *args) ;/*closure _,object k_734558, object obj_73414_732712*/
 +static void __lambda_1393(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object obj)*/
-+static void __lambda_303(void *data, object clo, int argc, object *args) ;/*closure _,object k_734543, object k_73396_732709, object opts_73397_732710_raw, ...*/
-+static void __lambda_305(void *data, object clo, int argc, object *args) ;/*object self_7311985, object port_73398_732711*/
-+static void __lambda_306(void *data, object clo, int argc, object *args) ;/*object self_7311986, object r_734560*/
-+static void __lambda_307(void *data, object clo, int argc, object *args) ;/*object self_7311987, object acc_73400_732712, object i_73401_732713*/
-+static void __lambda_308(void *data, object clo, int argc, object *args) ;/*object self_7311988, object loop_73403_732715*/
-+static void __lambda_1297(void *data, object clo, int argc, object *args) ;/*object self_7311989, object loop_73403_732715*/
-+static void __lambda_311(void *data, object clo, int argc, object *args) ;/*object self_7311990, object k_734549, object acc_73404_732716, object i_73405_732717, object chr_73406_732718*/
-+static void __lambda_314(void *data, object clo, int argc, object *args) ;/*object self_7311993, object r_734558_737583*/
-+static void __lambda_313(void *data, object clo, int argc, object *args) ;/*object self_7311992, object r_734553_737580_7311406*/
-+static void __lambda_312(void *data, object clo, int argc, object *args) ;/*object self_7311991, object r_734551_7311405*/
-+static void __lambda_309(void *data, object clo, int argc, object *args) ;/*object self_7311994, object r_734548*/
-+static void __lambda_310(void *data, object clo, int argc, object *args) ;/*object self_7311995, object r_734547*/
-+static void __lambda_304(void *data, object clo, int argc, object *args) ;/*object self_7311996, object k_734561*/
-+static void __lambda_301(void *data, object clo, int argc, object *args) ;/*closure _,object k_734537, object port_73395_732708_raw, ...*/
-+static void __lambda_302(void *data, object clo, int argc, object *args) ;/*object self_7311984, object r_734539*/
-+static void __lambda_299(void *data, object clo, int argc, object *args) ;/*closure _,object k_734531, object port_73394_732707_raw, ...*/
-+static void __lambda_300(void *data, object clo, int argc, object *args) ;/*object self_7311983, object r_734533*/
-+static void __lambda_297(void *data, object clo, int argc, object *args) ;/*closure _,object k_734525, object port_73393_732706_raw, ...*/
-+static void __lambda_298(void *data, object clo, int argc, object *args) ;/*object self_7311982, object r_734527*/
-+static void __lambda_295(void *data, object clo, int argc, object *args) ;/*closure _,object k_734519, object port_73392_732705_raw, ...*/
-+static void __lambda_296(void *data, object clo, int argc, object *args) ;/*object self_7311981, object r_734521*/
++static void __lambda_303(void *data, object clo, int argc, object *args) ;/*closure _,object k_734536, object k_73396_732702, object opts_73397_732703_raw, ...*/
++static void __lambda_305(void *data, object clo, int argc, object *args) ;/*object self_7311978, object port_73398_732704*/
++static void __lambda_306(void *data, object clo, int argc, object *args) ;/*object self_7311979, object r_734553*/
++static void __lambda_307(void *data, object clo, int argc, object *args) ;/*object self_7311980, object acc_73400_732705, object i_73401_732706*/
++static void __lambda_308(void *data, object clo, int argc, object *args) ;/*object self_7311981, object loop_73403_732708*/
++static void __lambda_1297(void *data, object clo, int argc, object *args) ;/*object self_7311982, object loop_73403_732708*/
++static void __lambda_311(void *data, object clo, int argc, object *args) ;/*object self_7311983, object k_734542, object acc_73404_732709, object i_73405_732710, object chr_73406_732711*/
++static void __lambda_314(void *data, object clo, int argc, object *args) ;/*object self_7311986, object r_734551_737576*/
++static void __lambda_313(void *data, object clo, int argc, object *args) ;/*object self_7311985, object r_734546_737573_7311399*/
++static void __lambda_312(void *data, object clo, int argc, object *args) ;/*object self_7311984, object r_734544_7311398*/
++static void __lambda_309(void *data, object clo, int argc, object *args) ;/*object self_7311987, object r_734541*/
++static void __lambda_310(void *data, object clo, int argc, object *args) ;/*object self_7311988, object r_734540*/
++static void __lambda_304(void *data, object clo, int argc, object *args) ;/*object self_7311989, object k_734554*/
++static void __lambda_301(void *data, object clo, int argc, object *args) ;/*closure _,object k_734530, object port_73395_732701_raw, ...*/
++static void __lambda_302(void *data, object clo, int argc, object *args) ;/*object self_7311977, object r_734532*/
++static void __lambda_299(void *data, object clo, int argc, object *args) ;/*closure _,object k_734524, object port_73394_732700_raw, ...*/
++static void __lambda_300(void *data, object clo, int argc, object *args) ;/*object self_7311976, object r_734526*/
++static void __lambda_297(void *data, object clo, int argc, object *args) ;/*closure _,object k_734518, object port_73393_732699_raw, ...*/
++static void __lambda_298(void *data, object clo, int argc, object *args) ;/*object self_7311975, object r_734520*/
++static void __lambda_295(void *data, object clo, int argc, object *args) ;/*closure _,object k_734512, object port_73392_732698_raw, ...*/
++static void __lambda_296(void *data, object clo, int argc, object *args) ;/*object self_7311974, object r_734514*/
 +static void __lambda_1392(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_734513, object chr_73390_732703, object port_73391_732704_raw, ...*/
-+static void __lambda_294(void *data, object clo, int argc, object *args) ;/*object self_7311980, object r_734515*/
-+static void __lambda_291(void *data, object clo, int argc, object *args) ;/*closure _,object k_734507, object port_73389_732702_raw, ...*/
-+static void __lambda_292(void *data, object clo, int argc, object *args) ;/*object self_7311979, object r_734509*/
-+static void __lambda_289(void *data, object clo, int argc, object *args) ;/*closure _,object k_734501, object port_73388_732701_raw, ...*/
-+static void __lambda_290(void *data, object clo, int argc, object *args) ;/*object self_7311978, object r_734503*/
++static void __lambda_293(void *data, object clo, int argc, object *args) ;/*closure _,object k_734506, object chr_73390_732696, object port_73391_732697_raw, ...*/
++static void __lambda_294(void *data, object clo, int argc, object *args) ;/*object self_7311973, object r_734508*/
++static void __lambda_291(void *data, object clo, int argc, object *args) ;/*closure _,object k_734500, object port_73389_732695_raw, ...*/
++static void __lambda_292(void *data, object clo, int argc, object *args) ;/*object self_7311972, object r_734502*/
++static void __lambda_289(void *data, object clo, int argc, object *args) ;/*closure _,object k_734494, object port_73388_732694_raw, ...*/
++static void __lambda_290(void *data, object clo, int argc, object *args) ;/*object self_7311971, object r_734496*/
 +static void __lambda_1391(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object chr, object port)*/
 +static void __lambda_1390(void *data, object clo, int argc, object *args) ;/*(void *data, int argc, closure _, object k, object port)*/
 +static void __lambda_1389(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_734494, object func_73385_732698, object end_73386_732699, object lst_73387_732700*/
-+static void __lambda_288(void *data, object clo, int argc, object *args) ;/*object self_7311977, object r_734497*/
-+static void __lambda_285(void *data, object clo, int argc, object *args) ;/*closure _,object k_734487, object func_73382_732695, object accum_73383_732696, object lst_73384_732697*/
-+static void __lambda_286(void *data, object clo, int argc, object *args) ;/*object self_7311976, object r_734489*/
-+static void __lambda_284(void *data, object clo, int argc, object *args) ;/*closure _,object k_734482, object obj_73379_732692, object alist_73380_732693, object compare_73381_732694_raw, ...*/
-+static void __lambda_281(void *data, object clo, int argc, object *args) ;/*closure _,object k_734471, object obj_73368_732689, object lst_73369_732690, object cmp_127_73370_732691*/
-+static void __lambda_283(void *data, object clo, int argc, object *args) ;/*object self_7311974, object r_734473*/
-+static void __lambda_282(void *data, object clo, int argc, object *args) ;/*object self_7311975, object k_734475*/
-+static void __lambda_280(void *data, object clo, int argc, object *args) ;/*closure _,object k_734466, object obj_73365_732686, object lst_73366_732687, object compare_73367_732688_raw, ...*/
-+static void __lambda_278(void *data, object clo, int argc, object *args) ;/*closure _,object k_734459, object obj_73355_732683, object lst_73356_732684, object cmp_91proc_73357_732685*/
-+static void __lambda_279(void *data, object clo, int argc, object *args) ;/*object self_7311973, object r_734461*/
-+static object __lambda_1388(void *data, object ptr,object str1_73353_732681, object str2_73354_732682) ;
-+static void __lambda_277(void *data, object clo, int argc, object *args) ;/*closure _,object k_734455, object str1_73353_732681, object str2_73354_732682*/
-+static object __lambda_1387(void *data, object ptr,object str1_73351_732679, object str2_73352_732680) ;
-+static void __lambda_276(void *data, object clo, int argc, object *args) ;/*closure _,object k_734451, object str1_73351_732679, object str2_73352_732680*/
-+static object __lambda_1386(void *data, object ptr,object str1_73349_732677, object str2_73350_732678) ;
-+static void __lambda_275(void *data, object clo, int argc, object *args) ;/*closure _,object k_734447, object str1_73349_732677, object str2_73350_732678*/
-+static object __lambda_1385(void *data, object ptr,object str1_73347_732675, object str2_73348_732676) ;
-+static void __lambda_274(void *data, object clo, int argc, object *args) ;/*closure _,object k_734443, object str1_73347_732675, object str2_73348_732676*/
-+static object __lambda_1384(void *data, object ptr,object str1_73345_732673, object str2_73346_732674) ;
-+static void __lambda_273(void *data, object clo, int argc, object *args) ;/*closure _,object k_734439, object str1_73345_732673, object str2_73346_732674*/
-+static void __lambda_272(void *data, object clo, int argc, object *args) ;/*closure _,object k_734435, object str1_73342_732670, object str2_73343_732671, object strs_73344_732672_raw, ...*/
-+static void __lambda_271(void *data, object clo, int argc, object *args) ;/*closure _,object k_734431, object str1_73339_732667, object str2_73340_732668, object strs_73341_732669_raw, ...*/
-+static void __lambda_270(void *data, object clo, int argc, object *args) ;/*closure _,object k_734427, object str1_73336_732664, object str2_73337_732665, object strs_73338_732666_raw, ...*/
-+static void __lambda_269(void *data, object clo, int argc, object *args) ;/*closure _,object k_734423, object str1_73333_732661, object str2_73334_732662, object strs_73335_732663_raw, ...*/
-+static void __lambda_268(void *data, object clo, int argc, object *args) ;/*closure _,object k_734419, object str1_73330_732658, object str2_73331_732659, object strs_73332_732660_raw, ...*/
-+static void __lambda_267(void *data, object clo, int argc, object *args) ;/*closure _,object k_734415, object c1_73327_732655, object c2_73328_732656, object cs_73329_732657_raw, ...*/
-+static void __lambda_266(void *data, object clo, int argc, object *args) ;/*closure _,object k_734411, object c1_73324_732652, object c2_73325_732653, object cs_73326_732654_raw, ...*/
-+static void __lambda_265(void *data, object clo, int argc, object *args) ;/*closure _,object k_734407, object c1_73321_732649, object c2_73322_732650, object cs_73323_732651_raw, ...*/
-+static void __lambda_264(void *data, object clo, int argc, object *args) ;/*closure _,object k_734403, object c1_73318_732646, object c2_73319_732647, object cs_73320_732648_raw, ...*/
-+static void __lambda_263(void *data, object clo, int argc, object *args) ;/*closure _,object k_734399, object c1_73315_732643, object c2_73316_732644, object cs_73317_732645_raw, ...*/
-+static void __lambda_260(void *data, object clo, int argc, object *args) ;/*closure _,object k_734392, object cmp_73310_732638, object c_73311_732639, object cs_73312_732640*/
-+static void __lambda_262(void *data, object clo, int argc, object *args) ;/*object self_7311971, object k_734394, object x_73313_732641, object y_73314_732642*/
-+static void __lambda_261(void *data, object clo, int argc, object *args) ;/*object self_7311972, object r_734393*/
-+static void __lambda_258(void *data, object clo, int argc, object *args) ;/*closure _,object k_734384, object cmp_73300_732635, object x_73301_732636, object lst_73302_732637*/
-+static void __lambda_259(void *data, object clo, int argc, object *args) ;/*object self_7311970, object r_734386*/
-+static void __lambda_256(void *data, object clo, int argc, object *args) ;/*closure _,object k_734379, object port_73297_732632, object proc_73298_732633*/
-+static void __lambda_257(void *data, object clo, int argc, object *args) ;/*object self_7311969, object result_73299_732634*/
-+static void __lambda_252(void *data, object clo, int argc, object *args) ;/*closure _,object k_734373, object before_73293_732628, object thunk_73294_732629, object after_73295_732630*/
-+static void __lambda_253(void *data, object clo, int argc, object *args) ;/*object self_7311966, object r_734374*/
-+static void __lambda_254(void *data, object clo, int argc, object *args) ;/*object self_7311967, object result_73296_732631*/
-+static void __lambda_255(void *data, object clo, int argc, object *args) ;/*object self_7311968, object r_734376*/
-+static void __lambda_250(void *data, object clo, int argc, object *args) ;/*closure _,object k_734361, object producer_73289_732625, object consumer_73290_732626*/
-+static void __lambda_251(void *data, object clo, int argc, object *args) ;/*object self_7311965, object x_73291_732627*/
-+static void __lambda_249(void *data, object clo, int argc, object *args) ;/*closure _,object k_734351, object args_73287_732624_raw, ...*/
-+static void __lambda_248(void *data, object clo, int argc, object *args) ;/*closure _,object k_734345, object expr_73284_732621, object rename_73285_732622, object compare_73286_732623*/
-+static void __lambda_213(void *data, object clo, int argc, object *args) ;/*closure _,object k_734257, object expr_73254_732613, object rename_73255_732614, object compare_73256_732615*/
-+static void __lambda_214(void *data, object clo, int argc, object *args) ;/*object self_7311930, object qq_732617*/
-+static void __lambda_1296(void *data, object clo, int argc, object *args) ;/*object self_7311931, object qq_732617*/
-+static void __lambda_217(void *data, object clo, int argc, object *args) ;/*object self_7311932, object k_734261, object x_73257_732619, object d_73258_732620*/
-+static void __lambda_247(void *data, object clo, int argc, object *args) ;/*object self_7311962, object r_734339*/
-+static void __lambda_244(void *data, object clo, int argc, object *args) ;/*object self_7311959, object r_734334*/
-+static void __lambda_245(void *data, object clo, int argc, object *args) ;/*object self_7311960, object r_734336*/
-+static void __lambda_246(void *data, object clo, int argc, object *args) ;/*object self_7311961, object r_734335*/
-+static void __lambda_218(void *data, object clo, int argc, object *args) ;/*object self_7311933, object r_734330*/
-+static void __lambda_219(void *data, object clo, int argc, object *args) ;/*object self_7311934, object r_734263*/
-+static void __lambda_223(void *data, object clo, int argc, object *args) ;/*object self_7311938, object r_734327*/
-+static void __lambda_224(void *data, object clo, int argc, object *args) ;/*object self_7311939, object r_734274*/
-+static void __lambda_231(void *data, object clo, int argc, object *args) ;/*object self_7311946, object r_734324*/
-+static void __lambda_232(void *data, object clo, int argc, object *args) ;/*object self_7311947, object r_734291*/
-+static void __lambda_238(void *data, object clo, int argc, object *args) ;/*object self_7311951, object r_734301*/
-+static void __lambda_241(void *data, object clo, int argc, object *args) ;/*object self_7311954, object r_734311*/
-+static void __lambda_242(void *data, object clo, int argc, object *args) ;/*object self_7311955, object r_734312*/
-+static void __lambda_243(void *data, object clo, int argc, object *args) ;/*object self_7311956, object r_734313*/
-+static void __lambda_239(void *data, object clo, int argc, object *args) ;/*object self_7311952, object r_734304*/
-+static void __lambda_240(void *data, object clo, int argc, object *args) ;/*object self_7311953, object r_734306*/
-+static void __lambda_236(void *data, object clo, int argc, object *args) ;/*object self_7311957, object k_734317*/
-+static void __lambda_237(void *data, object clo, int argc, object *args) ;/*object self_7311958, object r_734320*/
-+static void __lambda_233(void *data, object clo, int argc, object *args) ;/*object self_7311948, object r_734292*/
-+static void __lambda_234(void *data, object clo, int argc, object *args) ;/*object self_7311949, object r_734297*/
-+static void __lambda_235(void *data, object clo, int argc, object *args) ;/*object self_7311950, object r_734294*/
-+static void __lambda_228(void *data, object clo, int argc, object *args) ;/*object self_7311943, object r_734282*/
-+static void __lambda_229(void *data, object clo, int argc, object *args) ;/*object self_7311944, object r_734287*/
-+static void __lambda_230(void *data, object clo, int argc, object *args) ;/*object self_7311945, object r_734284*/
-+static void __lambda_225(void *data, object clo, int argc, object *args) ;/*object self_7311940, object r_734276*/
-+static void __lambda_226(void *data, object clo, int argc, object *args) ;/*object self_7311941, object r_734277*/
-+static void __lambda_227(void *data, object clo, int argc, object *args) ;/*object self_7311942, object r_734278*/
-+static void __lambda_220(void *data, object clo, int argc, object *args) ;/*object self_7311935, object r_734265*/
-+static void __lambda_221(void *data, object clo, int argc, object *args) ;/*object self_7311936, object r_734270*/
-+static void __lambda_222(void *data, object clo, int argc, object *args) ;/*object self_7311937, object r_734267*/
-+static void __lambda_215(void *data, object clo, int argc, object *args) ;/*object self_7311963, object r_734260*/
-+static void __lambda_216(void *data, object clo, int argc, object *args) ;/*object self_7311964, object r_734258*/
-+static void __lambda_189(void *data, object clo, int argc, object *args) ;/*closure _,object k_734178, object expr_73227_732605, object rename_73228_732606, object compare_73229_732607*/
-+static void __lambda_190(void *data, object clo, int argc, object *args) ;/*object self_7311907, object r_734235*/
-+static void __lambda_191(void *data, object clo, int argc, object *args) ;/*object self_7311908, object r_734241*/
-+static void __lambda_210(void *data, object clo, int argc, object *args) ;/*object self_7311909, object k_734245, object x_73253_732612*/
-+static void __lambda_211(void *data, object clo, int argc, object *args) ;/*object self_7311910, object r_734251*/
-+static void __lambda_212(void *data, object clo, int argc, object *args) ;/*object self_7311911, object r_734250*/
-+static void __lambda_192(void *data, object clo, int argc, object *args) ;/*object self_7311912, object r_734243*/
-+static void __lambda_193(void *data, object clo, int argc, object *args) ;/*object self_7311913, object r_734242*/
-+static void __lambda_194(void *data, object clo, int argc, object *args) ;/*object self_7311914, object r_734236*/
-+static void __lambda_195(void *data, object clo, int argc, object *args) ;/*object self_7311915, object body_73232_732608*/
-+static void __lambda_204(void *data, object clo, int argc, object *args) ;/*object self_7311916, object wrap_73238_732610*/
-+static void __lambda_205(void *data, object clo, int argc, object *args) ;/*object self_7311917, object r_734182*/
-+static void __lambda_206(void *data, object clo, int argc, object *args) ;/*object self_7311918, object r_734184*/
-+static void __lambda_209(void *data, object clo, int argc, object *args) ;/*object self_7311919, object k_734191, object x_73243_732611*/
-+static void __lambda_207(void *data, object clo, int argc, object *args) ;/*object self_7311920, object r_734189*/
-+static void __lambda_208(void *data, object clo, int argc, object *args) ;/*object self_7311921, object r_734186*/
-+static void __lambda_196(void *data, object clo, int argc, object *args) ;/*object self_7311922, object k_734196*/
-+static void __lambda_202(void *data, object clo, int argc, object *args) ;/*object self_7311928, object r_734222*/
-+static void __lambda_203(void *data, object clo, int argc, object *args) ;/*object self_7311929, object r_734229*/
-+static void __lambda_197(void *data, object clo, int argc, object *args) ;/*object self_7311923, object r_734198*/
-+static void __lambda_198(void *data, object clo, int argc, object *args) ;/*object self_7311924, object r_734216*/
-+static void __lambda_199(void *data, object clo, int argc, object *args) ;/*object self_7311925, object r_734204*/
-+static void __lambda_200(void *data, object clo, int argc, object *args) ;/*object self_7311926, object r_734206*/
-+static void __lambda_201(void *data, object clo, int argc, object *args) ;/*object self_7311927, object r_734208*/
-+static void __lambda_182(void *data, object clo, int argc, object *args) ;/*closure _,object k_734151, object exp_73221_732602, object rename_73222_732603, object compare_73223_732604*/
-+static void __lambda_185(void *data, object clo, int argc, object *args) ;/*object self_7311901, object r_734152*/
-+static void __lambda_188(void *data, object clo, int argc, object *args) ;/*object self_7311902, object r_734153*/
-+static void __lambda_186(void *data, object clo, int argc, object *args) ;/*object self_7311903, object k_734170*/
-+static void __lambda_187(void *data, object clo, int argc, object *args) ;/*object self_7311904, object r_734172*/
-+static void __lambda_183(void *data, object clo, int argc, object *args) ;/*object self_7311905, object k_734173*/
-+static void __lambda_184(void *data, object clo, int argc, object *args) ;/*object self_7311906, object r_734175*/
-+static void __lambda_175(void *data, object clo, int argc, object *args) ;/*closure _,object k_734128, object exp_73215_732599, object rename_73216_732600, object compare_73217_732601*/
-+static void __lambda_178(void *data, object clo, int argc, object *args) ;/*object self_7311895, object r_734129*/
-+static void __lambda_181(void *data, object clo, int argc, object *args) ;/*object self_7311896, object r_734130*/
-+static void __lambda_179(void *data, object clo, int argc, object *args) ;/*object self_7311897, object k_734143*/
-+static void __lambda_180(void *data, object clo, int argc, object *args) ;/*object self_7311898, object r_734145*/
-+static void __lambda_176(void *data, object clo, int argc, object *args) ;/*object self_7311899, object k_734146*/
-+static void __lambda_177(void *data, object clo, int argc, object *args) ;/*object self_7311900, object r_734148*/
-+static void __lambda_142(void *data, object clo, int argc, object *args) ;/*closure _,object k_734017, object expr_73172_732583, object rename_73173_732584, object compare_73174_732585*/
-+static void __lambda_143(void *data, object clo, int argc, object *args) ;/*object self_7311860, object agg_91cond_732589, object body_732590, object clause_732591*/
-+static void __lambda_1295(void *data, object clo, int argc, object *args) ;/*object self_7311861, object agg_91cond_732589*/
-+static void __lambda_1294(void *data, object clo, int argc, object *args) ;/*object self_7311862, object body_732590*/
-+static void __lambda_1293(void *data, object clo, int argc, object *args) ;/*object self_7311863, object clause_732591*/
-+static void __lambda_170(void *data, object clo, int argc, object *args) ;/*object self_7311864, object k_734112, object exprs_73175_732595*/
-+static void __lambda_171(void *data, object clo, int argc, object *args) ;/*object self_7311865, object r_734123*/
-+static void __lambda_172(void *data, object clo, int argc, object *args) ;/*object self_7311866, object r_734115*/
-+static void __lambda_174(void *data, object clo, int argc, object *args) ;/*object self_7311868, object r_734121*/
-+static void __lambda_173(void *data, object clo, int argc, object *args) ;/*object self_7311867, object r_734118*/
-+static void __lambda_144(void *data, object clo, int argc, object *args) ;/*object self_7311869, object r_734111*/
-+static void __lambda_145(void *data, object clo, int argc, object *args) ;/*object self_7311870, object r_734018*/
-+static void __lambda_166(void *data, object clo, int argc, object *args) ;/*object self_7311871, object k_734091, object tmp_91sym_73189_732596, object lis_73190_732597*/
-+static void __lambda_167(void *data, object clo, int argc, object *args) ;/*object self_7311872, object r_734106*/
-+static void __lambda_168(void *data, object clo, int argc, object *args) ;/*object self_7311873, object r_734102*/
-+static void __lambda_169(void *data, object clo, int argc, object *args) ;/*object self_7311874, object r_734098*/
-+static void __lambda_146(void *data, object clo, int argc, object *args) ;/*object self_7311875, object r_734090*/
-+static void __lambda_147(void *data, object clo, int argc, object *args) ;/*object self_7311876, object r_734019*/
-+static void __lambda_152(void *data, object clo, int argc, object *args) ;/*object self_7311877, object k_734036, object ls_73194_732598*/
-+static void __lambda_153(void *data, object clo, int argc, object *args) ;/*object self_7311878, object r_734087*/
-+static void __lambda_154(void *data, object clo, int argc, object *args) ;/*object self_7311879, object r_734038*/
-+static void __lambda_161(void *data, object clo, int argc, object *args) ;/*object self_7311886, object r_734066*/
-+static void __lambda_162(void *data, object clo, int argc, object *args) ;/*object self_7311887, object r_734076*/
-+static void __lambda_163(void *data, object clo, int argc, object *args) ;/*object self_7311888, object r_734068*/
-+static void __lambda_164(void *data, object clo, int argc, object *args) ;/*object self_7311889, object r_734070*/
-+static void __lambda_165(void *data, object clo, int argc, object *args) ;/*object self_7311890, object r_734072*/
-+static void __lambda_155(void *data, object clo, int argc, object *args) ;/*object self_7311880, object r_734041*/
-+static void __lambda_156(void *data, object clo, int argc, object *args) ;/*object self_7311881, object r_734051*/
-+static void __lambda_157(void *data, object clo, int argc, object *args) ;/*object self_7311882, object r_734053*/
-+static void __lambda_158(void *data, object clo, int argc, object *args) ;/*object self_7311883, object r_734057*/
-+static void __lambda_159(void *data, object clo, int argc, object *args) ;/*object self_7311884, object r_734045*/
-+static void __lambda_160(void *data, object clo, int argc, object *args) ;/*object self_7311885, object r_734047*/
-+static void __lambda_148(void *data, object clo, int argc, object *args) ;/*object self_7311891, object r_734035*/
-+static void __lambda_149(void *data, object clo, int argc, object *args) ;/*object self_7311892, object r_734020*/
-+static void __lambda_150(void *data, object clo, int argc, object *args) ;/*object self_7311893, object r_734030*/
-+static void __lambda_151(void *data, object clo, int argc, object *args) ;/*object self_7311894, object r_734025*/
-+static void __lambda_121(void *data, object clo, int argc, object *args) ;/*closure _,object k_733953, object expr_73168_732579, object rename_73169_732580, object compare_73170_732581*/
-+static void __lambda_122(void *data, object clo, int argc, object *args) ;/*object self_7311840, object r_734014*/
-+static void __lambda_123(void *data, object clo, int argc, object *args) ;/*object self_7311841, object cl_73171_732582*/
-+static void __lambda_124(void *data, object clo, int argc, object *args) ;/*object self_7311842, object r_734011*/
-+static void __lambda_125(void *data, object clo, int argc, object *args) ;/*object self_7311843, object r_733956*/
-+static void __lambda_130(void *data, object clo, int argc, object *args) ;/*object self_7311846, object r_733965*/
-+static void __lambda_139(void *data, object clo, int argc, object *args) ;/*object self_7311855, object r_733991*/
-+static void __lambda_140(void *data, object clo, int argc, object *args) ;/*object self_7311856, object r_733999*/
-+static void __lambda_141(void *data, object clo, int argc, object *args) ;/*object self_7311857, object r_733995*/
-+static void __lambda_131(void *data, object clo, int argc, object *args) ;/*object self_7311847, object r_733968*/
-+static void __lambda_132(void *data, object clo, int argc, object *args) ;/*object self_7311848, object r_733988*/
-+static void __lambda_133(void *data, object clo, int argc, object *args) ;/*object self_7311849, object r_733971*/
-+static void __lambda_134(void *data, object clo, int argc, object *args) ;/*object self_7311850, object r_733972*/
-+static void __lambda_137(void *data, object clo, int argc, object *args) ;/*object self_7311851, object r_733973*/
-+static void __lambda_138(void *data, object clo, int argc, object *args) ;/*object self_7311852, object r_733975*/
-+static void __lambda_135(void *data, object clo, int argc, object *args) ;/*object self_7311853, object k_733978*/
-+static void __lambda_136(void *data, object clo, int argc, object *args) ;/*object self_7311854, object r_733982*/
-+static void __lambda_128(void *data, object clo, int argc, object *args) ;/*object self_7311858, object k_734005*/
-+static void __lambda_129(void *data, object clo, int argc, object *args) ;/*object self_7311859, object r_734007*/
-+static void __lambda_126(void *data, object clo, int argc, object *args) ;/*object self_7311844, object r_733964*/
-+static void __lambda_127(void *data, object clo, int argc, object *args) ;/*object self_7311845, object r_733959*/
-+static void __lambda_84(void *data, object clo, int argc, object *args) ;/*closure _,object k_733854, object expr_7388_732544, object rename_7389_732545, object compare_7390_732546*/
-+static void __lambda_85(void *data, object clo, int argc, object *args) ;/*object self_7311799, object _191lib_117import_91_125filename_732551, object _191lib_117import_91_125library_91name_732552, object _191library_91exists_127_732553, object check_732554*/
-+static void __lambda_1292(void *data, object clo, int argc, object *args) ;/*object self_7311800, object _191lib_117import_91_125filename_732551*/
-+static void __lambda_1291(void *data, object clo, int argc, object *args) ;/*object self_7311801, object _191lib_117import_91_125library_91name_732552*/
-+static void __lambda_1290(void *data, object clo, int argc, object *args) ;/*object self_7311802, object _191library_91exists_127_732553*/
-+static void __lambda_1289(void *data, object clo, int argc, object *args) ;/*object self_7311803, object check_732554*/
-+static void __lambda_118(void *data, object clo, int argc, object *args) ;/*object self_7311804, object k_733945, object import_7391_732559, object ext_7392_732560_raw, ...*/
-+static void __lambda_119(void *data, object clo, int argc, object *args) ;/*object self_7311805, object r_733947*/
-+static void __lambda_120(void *data, object clo, int argc, object *args) ;/*object self_7311806, object r_733946*/
-+static void __lambda_86(void *data, object clo, int argc, object *args) ;/*object self_7311807, object r_733944*/
-+static void __lambda_87(void *data, object clo, int argc, object *args) ;/*object self_7311808, object r_733855*/
-+static void __lambda_106(void *data, object clo, int argc, object *args) ;/*object self_7311809, object k_733917, object import_7393_732561, object ext_7394_732562_raw, ...*/
-+static void __lambda_115(void *data, object clo, int argc, object *args) ;/*object self_7311810, object k_733937, object i_73113_732568*/
-+static void __lambda_117(void *data, object clo, int argc, object *args) ;/*object self_7311811, object r_733938*/
-+static void __lambda_116(void *data, object clo, int argc, object *args) ;/*object self_7311812, object k_733939*/
-+static void __lambda_107(void *data, object clo, int argc, object *args) ;/*object self_7311813, object r_733936*/
-+static void __lambda_108(void *data, object clo, int argc, object *args) ;/*object self_7311814, object r_733935*/
-+static void __lambda_109(void *data, object clo, int argc, object *args) ;/*object self_7311815, object r_733934*/
-+static void __lambda_110(void *data, object clo, int argc, object *args) ;/*object self_7311816, object filename_85_73100_732564*/
-+static void __lambda_111(void *data, object clo, int argc, object *args) ;/*object self_7311817, object filename_73103_732565*/
-+static void __lambda_113(void *data, object clo, int argc, object *args) ;/*object self_7311818, object r_733921*/
-+static void __lambda_114(void *data, object clo, int argc, object *args) ;/*object self_7311819, object r_733922*/
-+static void __lambda_112(void *data, object clo, int argc, object *args) ;/*object self_7311820, object k_733925*/
-+static void __lambda_88(void *data, object clo, int argc, object *args) ;/*object self_7311821, object r_733916*/
-+static void __lambda_89(void *data, object clo, int argc, object *args) ;/*object self_7311822, object r_733856*/
-+static void __lambda_105(void *data, object clo, int argc, object *args) ;/*object self_7311823, object k_733900, object import_73121_732569*/
-+static void __lambda_90(void *data, object clo, int argc, object *args) ;/*object self_7311824, object r_733899*/
-+static void __lambda_91(void *data, object clo, int argc, object *args) ;/*object self_7311825, object r_733857*/
-+static void __lambda_102(void *data, object clo, int argc, object *args) ;/*object self_7311826, object k_733882, object x_73139_732573*/
-+static void __lambda_104(void *data, object clo, int argc, object *args) ;/*object self_7311828, object r_733898*/
-+static void __lambda_103(void *data, object clo, int argc, object *args) ;/*object self_7311827, object r_733890*/
-+static void __lambda_92(void *data, object clo, int argc, object *args) ;/*object self_7311829, object r_733881*/
-+static void __lambda_93(void *data, object clo, int argc, object *args) ;/*object self_7311830, object r_733858*/
-+static void __lambda_94(void *data, object clo, int argc, object *args) ;/*object self_7311831, object ls_73145_732575*/
-+static void __lambda_95(void *data, object clo, int argc, object *args) ;/*object self_7311832, object expand_73146_732576*/
-+static void __lambda_1288(void *data, object clo, int argc, object *args) ;/*object self_7311833, object expand_73146_732576*/
-+static void __lambda_98(void *data, object clo, int argc, object *args) ;/*object self_7311834, object k_733862, object ls_73147_732577*/
-+static void __lambda_100(void *data, object clo, int argc, object *args) ;/*object self_7311836, object r_733871*/
-+static void __lambda_101(void *data, object clo, int argc, object *args) ;/*object self_7311837, object r_733872*/
-+static void __lambda_99(void *data, object clo, int argc, object *args) ;/*object self_7311835, object r_733867*/
-+static void __lambda_96(void *data, object clo, int argc, object *args) ;/*object self_7311838, object r_733861*/
-+static void __lambda_97(void *data, object clo, int argc, object *args) ;/*object self_7311839, object r_733860*/
-+static void __lambda_75(void *data, object clo, int argc, object *args) ;/*closure _,object k_733835, object exp_7373_732533, object rename_7374_732534, object compare_7375_732535*/
-+static void __lambda_76(void *data, object clo, int argc, object *args) ;/*object self_7311789, object dummy_91bind_732538, object singlet_127_732539*/
-+static void __lambda_1287(void *data, object clo, int argc, object *args) ;/*object self_7311790, object dummy_91bind_732538*/
-+static void __lambda_1286(void *data, object clo, int argc, object *args) ;/*object self_7311791, object singlet_127_732539*/
-+static void __lambda_83(void *data, object clo, int argc, object *args) ;/*object self_7311792, object k_733849, object l_7376_732542*/
-+static void __lambda_77(void *data, object clo, int argc, object *args) ;/*object self_7311793, object r_733848*/
-+static void __lambda_78(void *data, object clo, int argc, object *args) ;/*object self_7311794, object r_733836*/
-+static void __lambda_81(void *data, object clo, int argc, object *args) ;/*object self_7311795, object k_733840, object exps_7378_732543*/
-+static void __lambda_82(void *data, object clo, int argc, object *args) ;/*object self_7311796, object r_733841*/
-+static void __lambda_79(void *data, object clo, int argc, object *args) ;/*object self_7311797, object r_733839*/
-+static void __lambda_80(void *data, object clo, int argc, object *args) ;/*object self_7311798, object r_733837*/
-+static void __lambda_58(void *data, object clo, int argc, object *args) ;/*closure _,object k_733804, object exp_7346_732520, object rename_7347_732521, object compare_7348_732522*/
-+static void __lambda_60(void *data, object clo, int argc, object *args) ;/*object self_7311773, object k_733806, object k_7349_732523*/
-+static void __lambda_73(void *data, object clo, int argc, object *args) ;/*object self_7311774, object k_733831, object obj_7350_732524*/
-+static void __lambda_74(void *data, object clo, int argc, object *args) ;/*object self_7311775, object r_733832*/
-+static void __lambda_61(void *data, object clo, int argc, object *args) ;/*object self_7311776, object r_733807*/
-+static void __lambda_63(void *data, object clo, int argc, object *args) ;/*object self_7311777, object k_733809*/
-+static void __lambda_72(void *data, object clo, int argc, object *args) ;/*object self_7311778, object k_733829, object b_7372_732532*/
-+static void __lambda_64(void *data, object clo, int argc, object *args) ;/*object self_7311779, object r_733828*/
-+static void __lambda_65(void *data, object clo, int argc, object *args) ;/*object self_7311780, object namings_7357_732527*/
-+static void __lambda_66(void *data, object clo, int argc, object *args) ;/*object self_7311781, object names_7360_732528*/
-+static void __lambda_71(void *data, object clo, int argc, object *args) ;/*object self_7311782, object k_733825, object binding_7371_732531*/
-+static void __lambda_67(void *data, object clo, int argc, object *args) ;/*object self_7311783, object r_733824*/
-+static void __lambda_68(void *data, object clo, int argc, object *args) ;/*object self_7311784, object sets_7363_732529*/
-+static void __lambda_69(void *data, object clo, int argc, object *args) ;/*object self_7311785, object args_7366_732530*/
-+static void __lambda_70(void *data, object clo, int argc, object *args) ;/*object self_7311786, object r_733821*/
-+static void __lambda_62(void *data, object clo, int argc, object *args) ;/*object self_7311787, object r_733808*/
-+static void __lambda_59(void *data, object clo, int argc, object *args) ;/*object self_7311788, object r_733805*/
-+static void __lambda_43(void *data, object clo, int argc, object *args) ;/*closure _,object k_733759, object expr_7336_732516, object rename_7337_732517, object compare_7338_732518*/
-+static void __lambda_46(void *data, object clo, int argc, object *args) ;/*object self_7311759, object r_733760*/
-+static void __lambda_49(void *data, object clo, int argc, object *args) ;/*object self_7311760, object r_733761*/
-+static void __lambda_50(void *data, object clo, int argc, object *args) ;/*object self_7311761, object r_733795*/
-+static void __lambda_55(void *data, object clo, int argc, object *args) ;/*object self_7311763, object r_733768*/
-+static void __lambda_56(void *data, object clo, int argc, object *args) ;/*object self_7311764, object r_733769*/
-+static void __lambda_57(void *data, object clo, int argc, object *args) ;/*object self_7311765, object r_733775*/
-+static void __lambda_52(void *data, object clo, int argc, object *args) ;/*object self_7311766, object k_733785*/
-+static void __lambda_54(void *data, object clo, int argc, object *args) ;/*object self_7311767, object k_733789, object x_7342_732519*/
-+static void __lambda_53(void *data, object clo, int argc, object *args) ;/*object self_7311768, object r_733787*/
-+static void __lambda_51(void *data, object clo, int argc, object *args) ;/*object self_7311762, object r_733763*/
-+static void __lambda_47(void *data, object clo, int argc, object *args) ;/*object self_7311769, object k_733796*/
-+static void __lambda_48(void *data, object clo, int argc, object *args) ;/*object self_7311770, object r_733798*/
-+static void __lambda_44(void *data, object clo, int argc, object *args) ;/*object self_7311771, object k_733799*/
-+static void __lambda_45(void *data, object clo, int argc, object *args) ;/*object self_7311772, object r_733801*/
-+static void __lambda_24(void *data, object clo, int argc, object *args) ;/*closure _,object k_733698, object expr_7323_732509, object rename_7324_732510, object compare_7325_732511*/
-+static void __lambda_27(void *data, object clo, int argc, object *args) ;/*object self_7311741, object r_733699*/
-+static void __lambda_30(void *data, object clo, int argc, object *args) ;/*object self_7311742, object r_733700*/
-+static void __lambda_32(void *data, object clo, int argc, object *args) ;/*object self_7311743, object r_733702*/
-+static void __lambda_42(void *data, object clo, int argc, object *args) ;/*object self_7311744, object k_733740, object x_7327_732513*/
-+static void __lambda_33(void *data, object clo, int argc, object *args) ;/*object self_7311745, object r_733739*/
-+static void __lambda_34(void *data, object clo, int argc, object *args) ;/*object self_7311746, object r_733703*/
-+static void __lambda_35(void *data, object clo, int argc, object *args) ;/*object self_7311747, object r_733704*/
-+static void __lambda_36(void *data, object clo, int argc, object *args) ;/*object self_7311748, object r_733705*/
-+static void __lambda_37(void *data, object clo, int argc, object *args) ;/*object self_7311749, object vars_7328_732514, object vals_7329_732515*/
-+static void __lambda_41(void *data, object clo, int argc, object *args) ;/*object self_7311753, object r_733734*/
-+static void __lambda_38(void *data, object clo, int argc, object *args) ;/*object self_7311750, object r_733708*/
-+static void __lambda_39(void *data, object clo, int argc, object *args) ;/*object self_7311751, object r_733713*/
-+static void __lambda_40(void *data, object clo, int argc, object *args) ;/*object self_7311752, object r_733726*/
-+static void __lambda_31(void *data, object clo, int argc, object *args) ;/*object self_7311754, object k_733745*/
-+static void __lambda_28(void *data, object clo, int argc, object *args) ;/*object self_7311755, object k_733751*/
-+static void __lambda_29(void *data, object clo, int argc, object *args) ;/*object self_7311756, object r_733753*/
-+static void __lambda_25(void *data, object clo, int argc, object *args) ;/*object self_7311757, object k_733754*/
-+static void __lambda_26(void *data, object clo, int argc, object *args) ;/*object self_7311758, object r_733756*/
-+static void __lambda_17(void *data, object clo, int argc, object *args) ;/*closure _,object k_733673, object expr_7313_732506, object rename_7314_732507, object compare_7315_732508*/
-+static void __lambda_18(void *data, object clo, int argc, object *args) ;/*object self_7311735, object r_733676*/
-+static void __lambda_19(void *data, object clo, int argc, object *args) ;/*object self_7311736, object r_733690*/
-+static void __lambda_20(void *data, object clo, int argc, object *args) ;/*object self_7311737, object r_733679*/
-+static void __lambda_21(void *data, object clo, int argc, object *args) ;/*object self_7311738, object r_733680*/
-+static void __lambda_22(void *data, object clo, int argc, object *args) ;/*object self_7311739, object r_733681*/
-+static void __lambda_23(void *data, object clo, int argc, object *args) ;/*object self_7311740, object r_733683*/
-+static void __lambda_14(void *data, object clo, int argc, object *args) ;/*closure _,object k_733659, object expr_733_732503, object rename_734_732504, object compare_735_732505*/
-+static void __lambda_15(void *data, object clo, int argc, object *args) ;/*object self_7311733, object r_733662*/
-+static void __lambda_16(void *data, object clo, int argc, object *args) ;/*object self_7311734, object r_733665*/
-+static void __lambda_13(void *data, object clo, int argc, object *args) ;/*closure _,object k_733656*/
-+static void __lambda_11(void *data, object clo, int argc, object *args) ;/*closure _,object k_733652, object sym_732_732502*/
-+static void __lambda_12(void *data, object clo, int argc, object *args) ;/*object self_7311732, object r_733653*/
-+static void __lambda_3(void *data, object clo, int argc, object *args) ;/*closure _,object k_733631*/
-+static void __lambda_4(void *data, object clo, int argc, object *args) ;/*object self_7311724, object feats_731_732501*/
-+static void __lambda_1285(void *data, object clo, int argc, object *args) ;/*object self_7311725, object feats_731_732501*/
-+static void __lambda_8(void *data, object clo, int argc, object *args) ;/*object self_7311726, object r_733632*/
-+static void __lambda_9(void *data, object clo, int argc, object *args) ;/*object self_7311727, object r_733640*/
-+static void __lambda_10(void *data, object clo, int argc, object *args) ;/*object self_7311728, object r_733638*/
-+static void __lambda_5(void *data, object clo, int argc, object *args) ;/*object self_7311729, object k_733641*/
-+static void __lambda_6(void *data, object clo, int argc, object *args) ;/*object self_7311730, object r_733646*/
-+static void __lambda_7(void *data, object clo, int argc, object *args) ;/*object self_7311731, object r_733643*/
++static void __lambda_287(void *data, object clo, int argc, object *args) ;/*closure _,object k_734487, object func_73385_732691, object end_73386_732692, object lst_73387_732693*/
++static void __lambda_288(void *data, object clo, int argc, object *args) ;/*object self_7311970, object r_734490*/
++static void __lambda_285(void *data, object clo, int argc, object *args) ;/*closure _,object k_734480, object func_73382_732688, object accum_73383_732689, object lst_73384_732690*/
++static void __lambda_286(void *data, object clo, int argc, object *args) ;/*object self_7311969, object r_734482*/
++static void __lambda_284(void *data, object clo, int argc, object *args) ;/*closure _,object k_734475, object obj_73379_732685, object alist_73380_732686, object compare_73381_732687_raw, ...*/
++static void __lambda_281(void *data, object clo, int argc, object *args) ;/*closure _,object k_734464, object obj_73368_732682, object lst_73369_732683, object cmp_127_73370_732684*/
++static void __lambda_283(void *data, object clo, int argc, object *args) ;/*object self_7311967, object r_734466*/
++static void __lambda_282(void *data, object clo, int argc, object *args) ;/*object self_7311968, object k_734468*/
++static void __lambda_280(void *data, object clo, int argc, object *args) ;/*closure _,object k_734459, object obj_73365_732679, object lst_73366_732680, object compare_73367_732681_raw, ...*/
++static void __lambda_278(void *data, object clo, int argc, object *args) ;/*closure _,object k_734452, object obj_73355_732676, object lst_73356_732677, object cmp_91proc_73357_732678*/
++static void __lambda_279(void *data, object clo, int argc, object *args) ;/*object self_7311966, object r_734454*/
++static object __lambda_1388(void *data, object ptr,object str1_73353_732674, object str2_73354_732675) ;
++static void __lambda_277(void *data, object clo, int argc, object *args) ;/*closure _,object k_734448, object str1_73353_732674, object str2_73354_732675*/
++static object __lambda_1387(void *data, object ptr,object str1_73351_732672, object str2_73352_732673) ;
++static void __lambda_276(void *data, object clo, int argc, object *args) ;/*closure _,object k_734444, object str1_73351_732672, object str2_73352_732673*/
++static object __lambda_1386(void *data, object ptr,object str1_73349_732670, object str2_73350_732671) ;
++static void __lambda_275(void *data, object clo, int argc, object *args) ;/*closure _,object k_734440, object str1_73349_732670, object str2_73350_732671*/
++static object __lambda_1385(void *data, object ptr,object str1_73347_732668, object str2_73348_732669) ;
++static void __lambda_274(void *data, object clo, int argc, object *args) ;/*closure _,object k_734436, object str1_73347_732668, object str2_73348_732669*/
++static object __lambda_1384(void *data, object ptr,object str1_73345_732666, object str2_73346_732667) ;
++static void __lambda_273(void *data, object clo, int argc, object *args) ;/*closure _,object k_734432, object str1_73345_732666, object str2_73346_732667*/
++static void __lambda_272(void *data, object clo, int argc, object *args) ;/*closure _,object k_734428, object str1_73342_732663, object str2_73343_732664, object strs_73344_732665_raw, ...*/
++static void __lambda_271(void *data, object clo, int argc, object *args) ;/*closure _,object k_734424, object str1_73339_732660, object str2_73340_732661, object strs_73341_732662_raw, ...*/
++static void __lambda_270(void *data, object clo, int argc, object *args) ;/*closure _,object k_734420, object str1_73336_732657, object str2_73337_732658, object strs_73338_732659_raw, ...*/
++static void __lambda_269(void *data, object clo, int argc, object *args) ;/*closure _,object k_734416, object str1_73333_732654, object str2_73334_732655, object strs_73335_732656_raw, ...*/
++static void __lambda_268(void *data, object clo, int argc, object *args) ;/*closure _,object k_734412, object str1_73330_732651, object str2_73331_732652, object strs_73332_732653_raw, ...*/
++static void __lambda_267(void *data, object clo, int argc, object *args) ;/*closure _,object k_734408, object c1_73327_732648, object c2_73328_732649, object cs_73329_732650_raw, ...*/
++static void __lambda_266(void *data, object clo, int argc, object *args) ;/*closure _,object k_734404, object c1_73324_732645, object c2_73325_732646, object cs_73326_732647_raw, ...*/
++static void __lambda_265(void *data, object clo, int argc, object *args) ;/*closure _,object k_734400, object c1_73321_732642, object c2_73322_732643, object cs_73323_732644_raw, ...*/
++static void __lambda_264(void *data, object clo, int argc, object *args) ;/*closure _,object k_734396, object c1_73318_732639, object c2_73319_732640, object cs_73320_732641_raw, ...*/
++static void __lambda_263(void *data, object clo, int argc, object *args) ;/*closure _,object k_734392, object c1_73315_732636, object c2_73316_732637, object cs_73317_732638_raw, ...*/
++static void __lambda_260(void *data, object clo, int argc, object *args) ;/*closure _,object k_734385, object cmp_73310_732631, object c_73311_732632, object cs_73312_732633*/
++static void __lambda_262(void *data, object clo, int argc, object *args) ;/*object self_7311964, object k_734387, object x_73313_732634, object y_73314_732635*/
++static void __lambda_261(void *data, object clo, int argc, object *args) ;/*object self_7311965, object r_734386*/
++static void __lambda_258(void *data, object clo, int argc, object *args) ;/*closure _,object k_734377, object cmp_73300_732628, object x_73301_732629, object lst_73302_732630*/
++static void __lambda_259(void *data, object clo, int argc, object *args) ;/*object self_7311963, object r_734379*/
++static void __lambda_256(void *data, object clo, int argc, object *args) ;/*closure _,object k_734372, object port_73297_732625, object proc_73298_732626*/
++static void __lambda_257(void *data, object clo, int argc, object *args) ;/*object self_7311962, object result_73299_732627*/
++static void __lambda_252(void *data, object clo, int argc, object *args) ;/*closure _,object k_734366, object before_73293_732621, object thunk_73294_732622, object after_73295_732623*/
++static void __lambda_253(void *data, object clo, int argc, object *args) ;/*object self_7311959, object r_734367*/
++static void __lambda_254(void *data, object clo, int argc, object *args) ;/*object self_7311960, object result_73296_732624*/
++static void __lambda_255(void *data, object clo, int argc, object *args) ;/*object self_7311961, object r_734369*/
++static void __lambda_250(void *data, object clo, int argc, object *args) ;/*closure _,object k_734354, object producer_73289_732618, object consumer_73290_732619*/
++static void __lambda_251(void *data, object clo, int argc, object *args) ;/*object self_7311958, object x_73291_732620*/
++static void __lambda_249(void *data, object clo, int argc, object *args) ;/*closure _,object k_734344, object args_73287_732617_raw, ...*/
++static void __lambda_248(void *data, object clo, int argc, object *args) ;/*closure _,object k_734338, object expr_73284_732614, object rename_73285_732615, object compare_73286_732616*/
++static void __lambda_213(void *data, object clo, int argc, object *args) ;/*closure _,object k_734250, object expr_73254_732606, object rename_73255_732607, object compare_73256_732608*/
++static void __lambda_214(void *data, object clo, int argc, object *args) ;/*object self_7311923, object qq_732610*/
++static void __lambda_1296(void *data, object clo, int argc, object *args) ;/*object self_7311924, object qq_732610*/
++static void __lambda_217(void *data, object clo, int argc, object *args) ;/*object self_7311925, object k_734254, object x_73257_732612, object d_73258_732613*/
++static void __lambda_247(void *data, object clo, int argc, object *args) ;/*object self_7311955, object r_734332*/
++static void __lambda_244(void *data, object clo, int argc, object *args) ;/*object self_7311952, object r_734327*/
++static void __lambda_245(void *data, object clo, int argc, object *args) ;/*object self_7311953, object r_734329*/
++static void __lambda_246(void *data, object clo, int argc, object *args) ;/*object self_7311954, object r_734328*/
++static void __lambda_218(void *data, object clo, int argc, object *args) ;/*object self_7311926, object r_734323*/
++static void __lambda_219(void *data, object clo, int argc, object *args) ;/*object self_7311927, object r_734256*/
++static void __lambda_223(void *data, object clo, int argc, object *args) ;/*object self_7311931, object r_734320*/
++static void __lambda_224(void *data, object clo, int argc, object *args) ;/*object self_7311932, object r_734267*/
++static void __lambda_231(void *data, object clo, int argc, object *args) ;/*object self_7311939, object r_734317*/
++static void __lambda_232(void *data, object clo, int argc, object *args) ;/*object self_7311940, object r_734284*/
++static void __lambda_238(void *data, object clo, int argc, object *args) ;/*object self_7311944, object r_734294*/
++static void __lambda_241(void *data, object clo, int argc, object *args) ;/*object self_7311947, object r_734304*/
++static void __lambda_242(void *data, object clo, int argc, object *args) ;/*object self_7311948, object r_734305*/
++static void __lambda_243(void *data, object clo, int argc, object *args) ;/*object self_7311949, object r_734306*/
++static void __lambda_239(void *data, object clo, int argc, object *args) ;/*object self_7311945, object r_734297*/
++static void __lambda_240(void *data, object clo, int argc, object *args) ;/*object self_7311946, object r_734299*/
++static void __lambda_236(void *data, object clo, int argc, object *args) ;/*object self_7311950, object k_734310*/
++static void __lambda_237(void *data, object clo, int argc, object *args) ;/*object self_7311951, object r_734313*/
++static void __lambda_233(void *data, object clo, int argc, object *args) ;/*object self_7311941, object r_734285*/
++static void __lambda_234(void *data, object clo, int argc, object *args) ;/*object self_7311942, object r_734290*/
++static void __lambda_235(void *data, object clo, int argc, object *args) ;/*object self_7311943, object r_734287*/
++static void __lambda_228(void *data, object clo, int argc, object *args) ;/*object self_7311936, object r_734275*/
++static void __lambda_229(void *data, object clo, int argc, object *args) ;/*object self_7311937, object r_734280*/
++static void __lambda_230(void *data, object clo, int argc, object *args) ;/*object self_7311938, object r_734277*/
++static void __lambda_225(void *data, object clo, int argc, object *args) ;/*object self_7311933, object r_734269*/
++static void __lambda_226(void *data, object clo, int argc, object *args) ;/*object self_7311934, object r_734270*/
++static void __lambda_227(void *data, object clo, int argc, object *args) ;/*object self_7311935, object r_734271*/
++static void __lambda_220(void *data, object clo, int argc, object *args) ;/*object self_7311928, object r_734258*/
++static void __lambda_221(void *data, object clo, int argc, object *args) ;/*object self_7311929, object r_734263*/
++static void __lambda_222(void *data, object clo, int argc, object *args) ;/*object self_7311930, object r_734260*/
++static void __lambda_215(void *data, object clo, int argc, object *args) ;/*object self_7311956, object r_734253*/
++static void __lambda_216(void *data, object clo, int argc, object *args) ;/*object self_7311957, object r_734251*/
++static void __lambda_189(void *data, object clo, int argc, object *args) ;/*closure _,object k_734171, object expr_73227_732598, object rename_73228_732599, object compare_73229_732600*/
++static void __lambda_190(void *data, object clo, int argc, object *args) ;/*object self_7311900, object r_734228*/
++static void __lambda_191(void *data, object clo, int argc, object *args) ;/*object self_7311901, object r_734234*/
++static void __lambda_210(void *data, object clo, int argc, object *args) ;/*object self_7311902, object k_734238, object x_73253_732605*/
++static void __lambda_211(void *data, object clo, int argc, object *args) ;/*object self_7311903, object r_734244*/
++static void __lambda_212(void *data, object clo, int argc, object *args) ;/*object self_7311904, object r_734243*/
++static void __lambda_192(void *data, object clo, int argc, object *args) ;/*object self_7311905, object r_734236*/
++static void __lambda_193(void *data, object clo, int argc, object *args) ;/*object self_7311906, object r_734235*/
++static void __lambda_194(void *data, object clo, int argc, object *args) ;/*object self_7311907, object r_734229*/
++static void __lambda_195(void *data, object clo, int argc, object *args) ;/*object self_7311908, object body_73232_732601*/
++static void __lambda_204(void *data, object clo, int argc, object *args) ;/*object self_7311909, object wrap_73238_732603*/
++static void __lambda_205(void *data, object clo, int argc, object *args) ;/*object self_7311910, object r_734175*/
++static void __lambda_206(void *data, object clo, int argc, object *args) ;/*object self_7311911, object r_734177*/
++static void __lambda_209(void *data, object clo, int argc, object *args) ;/*object self_7311912, object k_734184, object x_73243_732604*/
++static void __lambda_207(void *data, object clo, int argc, object *args) ;/*object self_7311913, object r_734182*/
++static void __lambda_208(void *data, object clo, int argc, object *args) ;/*object self_7311914, object r_734179*/
++static void __lambda_196(void *data, object clo, int argc, object *args) ;/*object self_7311915, object k_734189*/
++static void __lambda_202(void *data, object clo, int argc, object *args) ;/*object self_7311921, object r_734215*/
++static void __lambda_203(void *data, object clo, int argc, object *args) ;/*object self_7311922, object r_734222*/
++static void __lambda_197(void *data, object clo, int argc, object *args) ;/*object self_7311916, object r_734191*/
++static void __lambda_198(void *data, object clo, int argc, object *args) ;/*object self_7311917, object r_734209*/
++static void __lambda_199(void *data, object clo, int argc, object *args) ;/*object self_7311918, object r_734197*/
++static void __lambda_200(void *data, object clo, int argc, object *args) ;/*object self_7311919, object r_734199*/
++static void __lambda_201(void *data, object clo, int argc, object *args) ;/*object self_7311920, object r_734201*/
++static void __lambda_182(void *data, object clo, int argc, object *args) ;/*closure _,object k_734144, object exp_73221_732595, object rename_73222_732596, object compare_73223_732597*/
++static void __lambda_185(void *data, object clo, int argc, object *args) ;/*object self_7311894, object r_734145*/
++static void __lambda_188(void *data, object clo, int argc, object *args) ;/*object self_7311895, object r_734146*/
++static void __lambda_186(void *data, object clo, int argc, object *args) ;/*object self_7311896, object k_734163*/
++static void __lambda_187(void *data, object clo, int argc, object *args) ;/*object self_7311897, object r_734165*/
++static void __lambda_183(void *data, object clo, int argc, object *args) ;/*object self_7311898, object k_734166*/
++static void __lambda_184(void *data, object clo, int argc, object *args) ;/*object self_7311899, object r_734168*/
++static void __lambda_175(void *data, object clo, int argc, object *args) ;/*closure _,object k_734121, object exp_73215_732592, object rename_73216_732593, object compare_73217_732594*/
++static void __lambda_178(void *data, object clo, int argc, object *args) ;/*object self_7311888, object r_734122*/
++static void __lambda_181(void *data, object clo, int argc, object *args) ;/*object self_7311889, object r_734123*/
++static void __lambda_179(void *data, object clo, int argc, object *args) ;/*object self_7311890, object k_734136*/
++static void __lambda_180(void *data, object clo, int argc, object *args) ;/*object self_7311891, object r_734138*/
++static void __lambda_176(void *data, object clo, int argc, object *args) ;/*object self_7311892, object k_734139*/
++static void __lambda_177(void *data, object clo, int argc, object *args) ;/*object self_7311893, object r_734141*/
++static void __lambda_142(void *data, object clo, int argc, object *args) ;/*closure _,object k_734010, object expr_73172_732576, object rename_73173_732577, object compare_73174_732578*/
++static void __lambda_143(void *data, object clo, int argc, object *args) ;/*object self_7311853, object agg_91cond_732582, object body_732583, object clause_732584*/
++static void __lambda_1295(void *data, object clo, int argc, object *args) ;/*object self_7311854, object agg_91cond_732582*/
++static void __lambda_1294(void *data, object clo, int argc, object *args) ;/*object self_7311855, object body_732583*/
++static void __lambda_1293(void *data, object clo, int argc, object *args) ;/*object self_7311856, object clause_732584*/
++static void __lambda_170(void *data, object clo, int argc, object *args) ;/*object self_7311857, object k_734105, object exprs_73175_732588*/
++static void __lambda_171(void *data, object clo, int argc, object *args) ;/*object self_7311858, object r_734116*/
++static void __lambda_172(void *data, object clo, int argc, object *args) ;/*object self_7311859, object r_734108*/
++static void __lambda_174(void *data, object clo, int argc, object *args) ;/*object self_7311861, object r_734114*/
++static void __lambda_173(void *data, object clo, int argc, object *args) ;/*object self_7311860, object r_734111*/
++static void __lambda_144(void *data, object clo, int argc, object *args) ;/*object self_7311862, object r_734104*/
++static void __lambda_145(void *data, object clo, int argc, object *args) ;/*object self_7311863, object r_734011*/
++static void __lambda_166(void *data, object clo, int argc, object *args) ;/*object self_7311864, object k_734084, object tmp_91sym_73189_732589, object lis_73190_732590*/
++static void __lambda_167(void *data, object clo, int argc, object *args) ;/*object self_7311865, object r_734099*/
++static void __lambda_168(void *data, object clo, int argc, object *args) ;/*object self_7311866, object r_734095*/
++static void __lambda_169(void *data, object clo, int argc, object *args) ;/*object self_7311867, object r_734091*/
++static void __lambda_146(void *data, object clo, int argc, object *args) ;/*object self_7311868, object r_734083*/
++static void __lambda_147(void *data, object clo, int argc, object *args) ;/*object self_7311869, object r_734012*/
++static void __lambda_152(void *data, object clo, int argc, object *args) ;/*object self_7311870, object k_734029, object ls_73194_732591*/
++static void __lambda_153(void *data, object clo, int argc, object *args) ;/*object self_7311871, object r_734080*/
++static void __lambda_154(void *data, object clo, int argc, object *args) ;/*object self_7311872, object r_734031*/
++static void __lambda_161(void *data, object clo, int argc, object *args) ;/*object self_7311879, object r_734059*/
++static void __lambda_162(void *data, object clo, int argc, object *args) ;/*object self_7311880, object r_734069*/
++static void __lambda_163(void *data, object clo, int argc, object *args) ;/*object self_7311881, object r_734061*/
++static void __lambda_164(void *data, object clo, int argc, object *args) ;/*object self_7311882, object r_734063*/
++static void __lambda_165(void *data, object clo, int argc, object *args) ;/*object self_7311883, object r_734065*/
++static void __lambda_155(void *data, object clo, int argc, object *args) ;/*object self_7311873, object r_734034*/
++static void __lambda_156(void *data, object clo, int argc, object *args) ;/*object self_7311874, object r_734044*/
++static void __lambda_157(void *data, object clo, int argc, object *args) ;/*object self_7311875, object r_734046*/
++static void __lambda_158(void *data, object clo, int argc, object *args) ;/*object self_7311876, object r_734050*/
++static void __lambda_159(void *data, object clo, int argc, object *args) ;/*object self_7311877, object r_734038*/
++static void __lambda_160(void *data, object clo, int argc, object *args) ;/*object self_7311878, object r_734040*/
++static void __lambda_148(void *data, object clo, int argc, object *args) ;/*object self_7311884, object r_734028*/
++static void __lambda_149(void *data, object clo, int argc, object *args) ;/*object self_7311885, object r_734013*/
++static void __lambda_150(void *data, object clo, int argc, object *args) ;/*object self_7311886, object r_734023*/
++static void __lambda_151(void *data, object clo, int argc, object *args) ;/*object self_7311887, object r_734018*/
++static void __lambda_121(void *data, object clo, int argc, object *args) ;/*closure _,object k_733946, object expr_73168_732572, object rename_73169_732573, object compare_73170_732574*/
++static void __lambda_122(void *data, object clo, int argc, object *args) ;/*object self_7311833, object r_734007*/
++static void __lambda_123(void *data, object clo, int argc, object *args) ;/*object self_7311834, object cl_73171_732575*/
++static void __lambda_124(void *data, object clo, int argc, object *args) ;/*object self_7311835, object r_734004*/
++static void __lambda_125(void *data, object clo, int argc, object *args) ;/*object self_7311836, object r_733949*/
++static void __lambda_130(void *data, object clo, int argc, object *args) ;/*object self_7311839, object r_733958*/
++static void __lambda_139(void *data, object clo, int argc, object *args) ;/*object self_7311848, object r_733984*/
++static void __lambda_140(void *data, object clo, int argc, object *args) ;/*object self_7311849, object r_733992*/
++static void __lambda_141(void *data, object clo, int argc, object *args) ;/*object self_7311850, object r_733988*/
++static void __lambda_131(void *data, object clo, int argc, object *args) ;/*object self_7311840, object r_733961*/
++static void __lambda_132(void *data, object clo, int argc, object *args) ;/*object self_7311841, object r_733981*/
++static void __lambda_133(void *data, object clo, int argc, object *args) ;/*object self_7311842, object r_733964*/
++static void __lambda_134(void *data, object clo, int argc, object *args) ;/*object self_7311843, object r_733965*/
++static void __lambda_137(void *data, object clo, int argc, object *args) ;/*object self_7311844, object r_733966*/
++static void __lambda_138(void *data, object clo, int argc, object *args) ;/*object self_7311845, object r_733968*/
++static void __lambda_135(void *data, object clo, int argc, object *args) ;/*object self_7311846, object k_733971*/
++static void __lambda_136(void *data, object clo, int argc, object *args) ;/*object self_7311847, object r_733975*/
++static void __lambda_128(void *data, object clo, int argc, object *args) ;/*object self_7311851, object k_733998*/
++static void __lambda_129(void *data, object clo, int argc, object *args) ;/*object self_7311852, object r_734000*/
++static void __lambda_126(void *data, object clo, int argc, object *args) ;/*object self_7311837, object r_733957*/
++static void __lambda_127(void *data, object clo, int argc, object *args) ;/*object self_7311838, object r_733952*/
++static void __lambda_84(void *data, object clo, int argc, object *args) ;/*closure _,object k_733847, object expr_7388_732537, object rename_7389_732538, object compare_7390_732539*/
++static void __lambda_85(void *data, object clo, int argc, object *args) ;/*object self_7311792, object _191lib_117import_91_125filename_732544, object _191lib_117import_91_125library_91name_732545, object _191library_91exists_127_732546, object check_732547*/
++static void __lambda_1292(void *data, object clo, int argc, object *args) ;/*object self_7311793, object _191lib_117import_91_125filename_732544*/
++static void __lambda_1291(void *data, object clo, int argc, object *args) ;/*object self_7311794, object _191lib_117import_91_125library_91name_732545*/
++static void __lambda_1290(void *data, object clo, int argc, object *args) ;/*object self_7311795, object _191library_91exists_127_732546*/
++static void __lambda_1289(void *data, object clo, int argc, object *args) ;/*object self_7311796, object check_732547*/
++static void __lambda_118(void *data, object clo, int argc, object *args) ;/*object self_7311797, object k_733938, object import_7391_732552, object ext_7392_732553_raw, ...*/
++static void __lambda_119(void *data, object clo, int argc, object *args) ;/*object self_7311798, object r_733940*/
++static void __lambda_120(void *data, object clo, int argc, object *args) ;/*object self_7311799, object r_733939*/
++static void __lambda_86(void *data, object clo, int argc, object *args) ;/*object self_7311800, object r_733937*/
++static void __lambda_87(void *data, object clo, int argc, object *args) ;/*object self_7311801, object r_733848*/
++static void __lambda_106(void *data, object clo, int argc, object *args) ;/*object self_7311802, object k_733910, object import_7393_732554, object ext_7394_732555_raw, ...*/
++static void __lambda_115(void *data, object clo, int argc, object *args) ;/*object self_7311803, object k_733930, object i_73113_732561*/
++static void __lambda_117(void *data, object clo, int argc, object *args) ;/*object self_7311804, object r_733931*/
++static void __lambda_116(void *data, object clo, int argc, object *args) ;/*object self_7311805, object k_733932*/
++static void __lambda_107(void *data, object clo, int argc, object *args) ;/*object self_7311806, object r_733929*/
++static void __lambda_108(void *data, object clo, int argc, object *args) ;/*object self_7311807, object r_733928*/
++static void __lambda_109(void *data, object clo, int argc, object *args) ;/*object self_7311808, object r_733927*/
++static void __lambda_110(void *data, object clo, int argc, object *args) ;/*object self_7311809, object filename_85_73100_732557*/
++static void __lambda_111(void *data, object clo, int argc, object *args) ;/*object self_7311810, object filename_73103_732558*/
++static void __lambda_113(void *data, object clo, int argc, object *args) ;/*object self_7311811, object r_733914*/
++static void __lambda_114(void *data, object clo, int argc, object *args) ;/*object self_7311812, object r_733915*/
++static void __lambda_112(void *data, object clo, int argc, object *args) ;/*object self_7311813, object k_733918*/
++static void __lambda_88(void *data, object clo, int argc, object *args) ;/*object self_7311814, object r_733909*/
++static void __lambda_89(void *data, object clo, int argc, object *args) ;/*object self_7311815, object r_733849*/
++static void __lambda_105(void *data, object clo, int argc, object *args) ;/*object self_7311816, object k_733893, object import_73121_732562*/
++static void __lambda_90(void *data, object clo, int argc, object *args) ;/*object self_7311817, object r_733892*/
++static void __lambda_91(void *data, object clo, int argc, object *args) ;/*object self_7311818, object r_733850*/
++static void __lambda_102(void *data, object clo, int argc, object *args) ;/*object self_7311819, object k_733875, object x_73139_732566*/
++static void __lambda_104(void *data, object clo, int argc, object *args) ;/*object self_7311821, object r_733891*/
++static void __lambda_103(void *data, object clo, int argc, object *args) ;/*object self_7311820, object r_733883*/
++static void __lambda_92(void *data, object clo, int argc, object *args) ;/*object self_7311822, object r_733874*/
++static void __lambda_93(void *data, object clo, int argc, object *args) ;/*object self_7311823, object r_733851*/
++static void __lambda_94(void *data, object clo, int argc, object *args) ;/*object self_7311824, object ls_73145_732568*/
++static void __lambda_95(void *data, object clo, int argc, object *args) ;/*object self_7311825, object expand_73146_732569*/
++static void __lambda_1288(void *data, object clo, int argc, object *args) ;/*object self_7311826, object expand_73146_732569*/
++static void __lambda_98(void *data, object clo, int argc, object *args) ;/*object self_7311827, object k_733855, object ls_73147_732570*/
++static void __lambda_100(void *data, object clo, int argc, object *args) ;/*object self_7311829, object r_733864*/
++static void __lambda_101(void *data, object clo, int argc, object *args) ;/*object self_7311830, object r_733865*/
++static void __lambda_99(void *data, object clo, int argc, object *args) ;/*object self_7311828, object r_733860*/
++static void __lambda_96(void *data, object clo, int argc, object *args) ;/*object self_7311831, object r_733854*/
++static void __lambda_97(void *data, object clo, int argc, object *args) ;/*object self_7311832, object r_733853*/
++static void __lambda_75(void *data, object clo, int argc, object *args) ;/*closure _,object k_733828, object exp_7373_732526, object rename_7374_732527, object compare_7375_732528*/
++static void __lambda_76(void *data, object clo, int argc, object *args) ;/*object self_7311782, object dummy_91bind_732531, object singlet_127_732532*/
++static void __lambda_1287(void *data, object clo, int argc, object *args) ;/*object self_7311783, object dummy_91bind_732531*/
++static void __lambda_1286(void *data, object clo, int argc, object *args) ;/*object self_7311784, object singlet_127_732532*/
++static void __lambda_83(void *data, object clo, int argc, object *args) ;/*object self_7311785, object k_733842, object l_7376_732535*/
++static void __lambda_77(void *data, object clo, int argc, object *args) ;/*object self_7311786, object r_733841*/
++static void __lambda_78(void *data, object clo, int argc, object *args) ;/*object self_7311787, object r_733829*/
++static void __lambda_81(void *data, object clo, int argc, object *args) ;/*object self_7311788, object k_733833, object exps_7378_732536*/
++static void __lambda_82(void *data, object clo, int argc, object *args) ;/*object self_7311789, object r_733834*/
++static void __lambda_79(void *data, object clo, int argc, object *args) ;/*object self_7311790, object r_733832*/
++static void __lambda_80(void *data, object clo, int argc, object *args) ;/*object self_7311791, object r_733830*/
++static void __lambda_58(void *data, object clo, int argc, object *args) ;/*closure _,object k_733797, object exp_7346_732513, object rename_7347_732514, object compare_7348_732515*/
++static void __lambda_60(void *data, object clo, int argc, object *args) ;/*object self_7311766, object k_733799, object k_7349_732516*/
++static void __lambda_73(void *data, object clo, int argc, object *args) ;/*object self_7311767, object k_733824, object obj_7350_732517*/
++static void __lambda_74(void *data, object clo, int argc, object *args) ;/*object self_7311768, object r_733825*/
++static void __lambda_61(void *data, object clo, int argc, object *args) ;/*object self_7311769, object r_733800*/
++static void __lambda_63(void *data, object clo, int argc, object *args) ;/*object self_7311770, object k_733802*/
++static void __lambda_72(void *data, object clo, int argc, object *args) ;/*object self_7311771, object k_733822, object b_7372_732525*/
++static void __lambda_64(void *data, object clo, int argc, object *args) ;/*object self_7311772, object r_733821*/
++static void __lambda_65(void *data, object clo, int argc, object *args) ;/*object self_7311773, object namings_7357_732520*/
++static void __lambda_66(void *data, object clo, int argc, object *args) ;/*object self_7311774, object names_7360_732521*/
++static void __lambda_71(void *data, object clo, int argc, object *args) ;/*object self_7311775, object k_733818, object binding_7371_732524*/
++static void __lambda_67(void *data, object clo, int argc, object *args) ;/*object self_7311776, object r_733817*/
++static void __lambda_68(void *data, object clo, int argc, object *args) ;/*object self_7311777, object sets_7363_732522*/
++static void __lambda_69(void *data, object clo, int argc, object *args) ;/*object self_7311778, object args_7366_732523*/
++static void __lambda_70(void *data, object clo, int argc, object *args) ;/*object self_7311779, object r_733814*/
++static void __lambda_62(void *data, object clo, int argc, object *args) ;/*object self_7311780, object r_733801*/
++static void __lambda_59(void *data, object clo, int argc, object *args) ;/*object self_7311781, object r_733798*/
++static void __lambda_43(void *data, object clo, int argc, object *args) ;/*closure _,object k_733752, object expr_7336_732509, object rename_7337_732510, object compare_7338_732511*/
++static void __lambda_46(void *data, object clo, int argc, object *args) ;/*object self_7311752, object r_733753*/
++static void __lambda_49(void *data, object clo, int argc, object *args) ;/*object self_7311753, object r_733754*/
++static void __lambda_50(void *data, object clo, int argc, object *args) ;/*object self_7311754, object r_733788*/
++static void __lambda_55(void *data, object clo, int argc, object *args) ;/*object self_7311756, object r_733761*/
++static void __lambda_56(void *data, object clo, int argc, object *args) ;/*object self_7311757, object r_733762*/
++static void __lambda_57(void *data, object clo, int argc, object *args) ;/*object self_7311758, object r_733768*/
++static void __lambda_52(void *data, object clo, int argc, object *args) ;/*object self_7311759, object k_733778*/
++static void __lambda_54(void *data, object clo, int argc, object *args) ;/*object self_7311760, object k_733782, object x_7342_732512*/
++static void __lambda_53(void *data, object clo, int argc, object *args) ;/*object self_7311761, object r_733780*/
++static void __lambda_51(void *data, object clo, int argc, object *args) ;/*object self_7311755, object r_733756*/
++static void __lambda_47(void *data, object clo, int argc, object *args) ;/*object self_7311762, object k_733789*/
++static void __lambda_48(void *data, object clo, int argc, object *args) ;/*object self_7311763, object r_733791*/
++static void __lambda_44(void *data, object clo, int argc, object *args) ;/*object self_7311764, object k_733792*/
++static void __lambda_45(void *data, object clo, int argc, object *args) ;/*object self_7311765, object r_733794*/
++static void __lambda_24(void *data, object clo, int argc, object *args) ;/*closure _,object k_733691, object expr_7323_732502, object rename_7324_732503, object compare_7325_732504*/
++static void __lambda_27(void *data, object clo, int argc, object *args) ;/*object self_7311734, object r_733692*/
++static void __lambda_30(void *data, object clo, int argc, object *args) ;/*object self_7311735, object r_733693*/
++static void __lambda_32(void *data, object clo, int argc, object *args) ;/*object self_7311736, object r_733695*/
++static void __lambda_42(void *data, object clo, int argc, object *args) ;/*object self_7311737, object k_733733, object x_7327_732506*/
++static void __lambda_33(void *data, object clo, int argc, object *args) ;/*object self_7311738, object r_733732*/
++static void __lambda_34(void *data, object clo, int argc, object *args) ;/*object self_7311739, object r_733696*/
++static void __lambda_35(void *data, object clo, int argc, object *args) ;/*object self_7311740, object r_733697*/
++static void __lambda_36(void *data, object clo, int argc, object *args) ;/*object self_7311741, object r_733698*/
++static void __lambda_37(void *data, object clo, int argc, object *args) ;/*object self_7311742, object vars_7328_732507, object vals_7329_732508*/
++static void __lambda_41(void *data, object clo, int argc, object *args) ;/*object self_7311746, object r_733727*/
++static void __lambda_38(void *data, object clo, int argc, object *args) ;/*object self_7311743, object r_733701*/
++static void __lambda_39(void *data, object clo, int argc, object *args) ;/*object self_7311744, object r_733706*/
++static void __lambda_40(void *data, object clo, int argc, object *args) ;/*object self_7311745, object r_733719*/
++static void __lambda_31(void *data, object clo, int argc, object *args) ;/*object self_7311747, object k_733738*/
++static void __lambda_28(void *data, object clo, int argc, object *args) ;/*object self_7311748, object k_733744*/
++static void __lambda_29(void *data, object clo, int argc, object *args) ;/*object self_7311749, object r_733746*/
++static void __lambda_25(void *data, object clo, int argc, object *args) ;/*object self_7311750, object k_733747*/
++static void __lambda_26(void *data, object clo, int argc, object *args) ;/*object self_7311751, object r_733749*/
++static void __lambda_17(void *data, object clo, int argc, object *args) ;/*closure _,object k_733666, object expr_7313_732499, object rename_7314_732500, object compare_7315_732501*/
++static void __lambda_18(void *data, object clo, int argc, object *args) ;/*object self_7311728, object r_733669*/
++static void __lambda_19(void *data, object clo, int argc, object *args) ;/*object self_7311729, object r_733683*/
++static void __lambda_20(void *data, object clo, int argc, object *args) ;/*object self_7311730, object r_733672*/
++static void __lambda_21(void *data, object clo, int argc, object *args) ;/*object self_7311731, object r_733673*/
++static void __lambda_22(void *data, object clo, int argc, object *args) ;/*object self_7311732, object r_733674*/
++static void __lambda_23(void *data, object clo, int argc, object *args) ;/*object self_7311733, object r_733676*/
++static void __lambda_14(void *data, object clo, int argc, object *args) ;/*closure _,object k_733652, object expr_733_732496, object rename_734_732497, object compare_735_732498*/
++static void __lambda_15(void *data, object clo, int argc, object *args) ;/*object self_7311726, object r_733655*/
++static void __lambda_16(void *data, object clo, int argc, object *args) ;/*object self_7311727, object r_733658*/
++static void __lambda_13(void *data, object clo, int argc, object *args) ;/*closure _,object k_733649*/
++static void __lambda_11(void *data, object clo, int argc, object *args) ;/*closure _,object k_733645, object sym_732_732495*/
++static void __lambda_12(void *data, object clo, int argc, object *args) ;/*object self_7311725, object r_733646*/
++static void __lambda_3(void *data, object clo, int argc, object *args) ;/*closure _,object k_733624*/
++static void __lambda_4(void *data, object clo, int argc, object *args) ;/*object self_7311717, object feats_731_732494*/
++static void __lambda_1285(void *data, object clo, int argc, object *args) ;/*object self_7311718, object feats_731_732494*/
++static void __lambda_8(void *data, object clo, int argc, object *args) ;/*object self_7311719, object r_733625*/
++static void __lambda_9(void *data, object clo, int argc, object *args) ;/*object self_7311720, object r_733633*/
++static void __lambda_10(void *data, object clo, int argc, object *args) ;/*object self_7311721, object r_733631*/
++static void __lambda_5(void *data, object clo, int argc, object *args) ;/*object self_7311722, object k_733634*/
++static void __lambda_6(void *data, object clo, int argc, object *args) ;/*object self_7311723, object r_733639*/
++static void __lambda_7(void *data, object clo, int argc, object *args) ;/*object self_7311724, object r_733636*/
  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_7312969, object _191, object result*/
-+static void __lambda_2(void *data, object clo, int argc, object *args) ;/*object self_7311723, object _191, object result*/
++static void __lambda_2(void *data, object clo, int argc, object *args) ;/*object self_7311716, object _191, object result*/
  
 -static void __lambda_1313(void *data, object _, int argc, object *args) /* closure _,object k_738320 */
-+static void __lambda_1266(void *data, object _, int argc, object *args) /* closure _,object k_737552 */
++static void __lambda_1266(void *data, object _, int argc, object *args) /* closure _,object k_737545 */
   {
 -object k_738320 = args[0];
--  Cyc_st_add(data, "scheme/base.sld:lib-init:schemebase");
-+object k_737552 = args[0];
-+  Cyc_st_add(data, "base.sld:lib-init:schemebase");
++object k_737545 = args[0];
+   Cyc_st_add(data, "scheme/base.sld:lib-init:schemebase");
  
 -closureN_type c_7328506;
 -object e_7328617 [1];
@@ -2982,38 +2981,38 @@ Make let-values be the same as let*-values, to work around
 -c_7328506.num_elements = 1;
 -c_7328506.elements = (object *)e_7328617;
 -c_7328506.elements[0] = k_738320;
-+closureN_type c_7326054;
-+object e_7326165 [1];
-+c_7326054.hdr.mark = gc_color_red;
-+ c_7326054.hdr.grayed = 0;
-+c_7326054.tag = closureN_tag;
-+ c_7326054.fn = (function_type)__lambda_1267;
-+c_7326054.num_args = 1;
-+c_7326054.num_elements = 1;
-+c_7326054.elements = (object *)e_7326165;
-+c_7326054.elements[0] = k_737552;
++closureN_type c_7326047;
++object e_7326158 [1];
++c_7326047.hdr.mark = gc_color_red;
++ c_7326047.hdr.grayed = 0;
++c_7326047.tag = closureN_tag;
++ c_7326047.fn = (function_type)__lambda_1267;
++c_7326047.num_args = 1;
++c_7326047.num_elements = 1;
++c_7326047.elements = (object *)e_7326158;
++c_7326047.elements[0] = k_737545;
  
  
 -make_pair(c_7328624,quote_posix,NULL);c_7328624.hdr.immutable = 1;
-+make_pair(c_7326172,quote_posix,NULL);c_7326172.hdr.immutable = 1;
++make_pair(c_7326165,quote_posix,NULL);c_7326165.hdr.immutable = 1;
  
 -make_pair(c_7328623,quote_full_91unicode,&c_7328624);c_7328623.hdr.immutable = 1;
-+make_pair(c_7326171,quote_full_91unicode,&c_7326172);c_7326171.hdr.immutable = 1;
++make_pair(c_7326164,quote_full_91unicode,&c_7326165);c_7326164.hdr.immutable = 1;
  
 -make_pair(c_7328622,quote_ieee_91float,&c_7328623);c_7328622.hdr.immutable = 1;
-+make_pair(c_7326170,quote_ieee_91float,&c_7326171);c_7326170.hdr.immutable = 1;
++make_pair(c_7326163,quote_ieee_91float,&c_7326164);c_7326163.hdr.immutable = 1;
  
 -make_pair(c_7328621,quote_r7rs,&c_7328622);c_7328621.hdr.immutable = 1;
-+make_pair(c_7326169,quote_r7rs,&c_7326170);c_7326169.hdr.immutable = 1;
++make_pair(c_7326162,quote_r7rs,&c_7326163);c_7326162.hdr.immutable = 1;
  
 -object c_7328620 = global_set_cps_id(data,(closure)&c_7328506,"__glo__85other_91features_85_scheme_base", __glo__85other_91features_85_scheme_base, &c_7328621);
 -return_closcall1(data,(closure)&c_7328506,  c_7328620);; 
-+object c_7326168 = global_set_cps_id(data,(closure)&c_7326054,"__glo__85other_91features_85_scheme_base", __glo__85other_91features_85_scheme_base, &c_7326169);
-+return_closcall1(data,(closure)&c_7326054,  c_7326168);; 
++object c_7326161 = global_set_cps_id(data,(closure)&c_7326047,"__glo__85other_91features_85_scheme_base", __glo__85other_91features_85_scheme_base, &c_7326162);
++return_closcall1(data,(closure)&c_7326047,  c_7326161);; 
  }
  
 -static void __lambda_1314(void *data, object self_7314220, int argc, object *args) /* object self_7314220, object r_738322 */
-+static void __lambda_1267(void *data, object self_7312927, int argc, object *args) /* object self_7312927, object r_737554 */
++static void __lambda_1267(void *data, object self_7312920, int argc, object *args) /* object self_7312920, object r_737547 */
   {
  
    
@@ -3027,26 +3026,26 @@ Make let-values be the same as let*-values, to work around
 -c_7328508.num_elements = 1;
 -c_7328508.elements = (object *)e_7328613;
 -c_7328508.elements[0] = ((closureN)self_7314220)->elements[0];
-+closureN_type c_7326056;
-+object e_7326161 [1];
-+c_7326056.hdr.mark = gc_color_red;
-+ c_7326056.hdr.grayed = 0;
-+c_7326056.tag = closureN_tag;
-+ c_7326056.fn = (function_type)__lambda_1268;
-+c_7326056.num_args = 1;
-+c_7326056.num_elements = 1;
-+c_7326056.elements = (object *)e_7326161;
-+c_7326056.elements[0] = ((closureN)self_7312927)->elements[0];
++closureN_type c_7326049;
++object e_7326154 [1];
++c_7326049.hdr.mark = gc_color_red;
++ c_7326049.hdr.grayed = 0;
++c_7326049.tag = closureN_tag;
++ c_7326049.fn = (function_type)__lambda_1268;
++c_7326049.num_args = 1;
++c_7326049.num_elements = 1;
++c_7326049.elements = (object *)e_7326154;
++c_7326049.elements[0] = ((closureN)self_7312920)->elements[0];
  
  
 -object c_7328616 = global_set_cps_id(data,(closure)&c_7328508,"__glo_call_91with_91current_91continuation_scheme_base", __glo_call_91with_91current_91continuation_scheme_base, __glo_call_95cc_scheme_base);
 -return_closcall1(data,(closure)&c_7328508,  c_7328616);; 
-+object c_7326164 = global_set_cps_id(data,(closure)&c_7326056,"__glo_call_91with_91current_91continuation_scheme_base", __glo_call_91with_91current_91continuation_scheme_base, __glo_call_95cc_scheme_base);
-+return_closcall1(data,(closure)&c_7326056,  c_7326164);; 
++object c_7326157 = global_set_cps_id(data,(closure)&c_7326049,"__glo_call_91with_91current_91continuation_scheme_base", __glo_call_91with_91current_91continuation_scheme_base, __glo_call_95cc_scheme_base);
++return_closcall1(data,(closure)&c_7326049,  c_7326157);; 
  }
  
 -static void __lambda_1315(void *data, object self_7314221, int argc, object *args) /* object self_7314221, object r_738323 */
-+static void __lambda_1268(void *data, object self_7312928, int argc, object *args) /* object self_7312928, object r_737555 */
++static void __lambda_1268(void *data, object self_7312921, int argc, object *args) /* object self_7312921, object r_737548 */
   {
  
    
@@ -3060,29 +3059,29 @@ Make let-values be the same as let*-values, to work around
 -c_7328510.num_elements = 1;
 -c_7328510.elements = (object *)e_7328609;
 -c_7328510.elements[0] = ((closureN)self_7314221)->elements[0];
-+closureN_type c_7326058;
-+object e_7326157 [1];
-+c_7326058.hdr.mark = gc_color_red;
-+ c_7326058.hdr.grayed = 0;
-+c_7326058.tag = closureN_tag;
-+ c_7326058.fn = (function_type)__lambda_1269;
-+c_7326058.num_args = 1;
-+c_7326058.num_elements = 1;
-+c_7326058.elements = (object *)e_7326157;
-+c_7326058.elements[0] = ((closureN)self_7312928)->elements[0];
++closureN_type c_7326051;
++object e_7326150 [1];
++c_7326051.hdr.mark = gc_color_red;
++ c_7326051.hdr.grayed = 0;
++c_7326051.tag = closureN_tag;
++ c_7326051.fn = (function_type)__lambda_1269;
++c_7326051.num_args = 1;
++c_7326051.num_elements = 1;
++c_7326051.elements = (object *)e_7326150;
++c_7326051.elements[0] = ((closureN)self_7312921)->elements[0];
  
  
 -port_type c_7328612 = Cyc_stdout();
 -return_direct_with_clo2(data,  __glo_make_91parameter_scheme_base, (((closure)  __glo_make_91parameter_scheme_base)->fn),  &c_7328510, &c_7328612);; 
-+port_type c_7326160 = Cyc_stdout();
-+return_direct_with_clo2(data,  __glo_make_91parameter_scheme_base, (((closure)  __glo_make_91parameter_scheme_base)->fn),  &c_7326058, &c_7326160);; 
++port_type c_7326153 = Cyc_stdout();
++return_direct_with_clo2(data,  __glo_make_91parameter_scheme_base, (((closure)  __glo_make_91parameter_scheme_base)->fn),  &c_7326051, &c_7326153);; 
  }
  
 -static void __lambda_1316(void *data, object self_7314222, int argc, object *args) /* object self_7314222, object r_738342 */
-+static void __lambda_1269(void *data, object self_7312929, int argc, object *args) /* object self_7312929, object r_737574 */
++static void __lambda_1269(void *data, object self_7312922, int argc, object *args) /* object self_7312922, object r_737567 */
   {
 - object r_738342 = args[0];
-+ object r_737574 = args[0];
++ object r_737567 = args[0];
    
 -closureN_type c_7328512;
 -object e_7328605 [1];
@@ -3094,26 +3093,26 @@ Make let-values be the same as let*-values, to work around
 -c_7328512.num_elements = 1;
 -c_7328512.elements = (object *)e_7328605;
 -c_7328512.elements[0] = ((closureN)self_7314222)->elements[0];
-+closureN_type c_7326060;
-+object e_7326153 [1];
-+c_7326060.hdr.mark = gc_color_red;
-+ c_7326060.hdr.grayed = 0;
-+c_7326060.tag = closureN_tag;
-+ c_7326060.fn = (function_type)__lambda_1270;
-+c_7326060.num_args = 1;
-+c_7326060.num_elements = 1;
-+c_7326060.elements = (object *)e_7326153;
-+c_7326060.elements[0] = ((closureN)self_7312929)->elements[0];
++closureN_type c_7326053;
++object e_7326146 [1];
++c_7326053.hdr.mark = gc_color_red;
++ c_7326053.hdr.grayed = 0;
++c_7326053.tag = closureN_tag;
++ c_7326053.fn = (function_type)__lambda_1270;
++c_7326053.num_args = 1;
++c_7326053.num_elements = 1;
++c_7326053.elements = (object *)e_7326146;
++c_7326053.elements[0] = ((closureN)self_7312922)->elements[0];
  
  
 -object c_7328608 = global_set_cps_id(data,(closure)&c_7328512,"__glo_current_91output_91port_scheme_base", __glo_current_91output_91port_scheme_base, r_738342);
 -return_closcall1(data,(closure)&c_7328512,  c_7328608);; 
-+object c_7326156 = global_set_cps_id(data,(closure)&c_7326060,"__glo_current_91output_91port_scheme_base", __glo_current_91output_91port_scheme_base, r_737574);
-+return_closcall1(data,(closure)&c_7326060,  c_7326156);; 
++object c_7326149 = global_set_cps_id(data,(closure)&c_7326053,"__glo_current_91output_91port_scheme_base", __glo_current_91output_91port_scheme_base, r_737567);
++return_closcall1(data,(closure)&c_7326053,  c_7326149);; 
  }
  
 -static void __lambda_1317(void *data, object self_7314223, int argc, object *args) /* object self_7314223, object r_738324 */
-+static void __lambda_1270(void *data, object self_7312930, int argc, object *args) /* object self_7312930, object r_737556 */
++static void __lambda_1270(void *data, object self_7312923, int argc, object *args) /* object self_7312923, object r_737549 */
   {
  
    
@@ -3127,29 +3126,29 @@ Make let-values be the same as let*-values, to work around
 -c_7328514.num_elements = 1;
 -c_7328514.elements = (object *)e_7328601;
 -c_7328514.elements[0] = ((closureN)self_7314223)->elements[0];
-+closureN_type c_7326062;
-+object e_7326149 [1];
-+c_7326062.hdr.mark = gc_color_red;
-+ c_7326062.hdr.grayed = 0;
-+c_7326062.tag = closureN_tag;
-+ c_7326062.fn = (function_type)__lambda_1271;
-+c_7326062.num_args = 1;
-+c_7326062.num_elements = 1;
-+c_7326062.elements = (object *)e_7326149;
-+c_7326062.elements[0] = ((closureN)self_7312930)->elements[0];
++closureN_type c_7326055;
++object e_7326142 [1];
++c_7326055.hdr.mark = gc_color_red;
++ c_7326055.hdr.grayed = 0;
++c_7326055.tag = closureN_tag;
++ c_7326055.fn = (function_type)__lambda_1271;
++c_7326055.num_args = 1;
++c_7326055.num_elements = 1;
++c_7326055.elements = (object *)e_7326142;
++c_7326055.elements[0] = ((closureN)self_7312923)->elements[0];
  
  
 -port_type c_7328604 = Cyc_stdin();
 -return_direct_with_clo2(data,  __glo_make_91parameter_scheme_base, (((closure)  __glo_make_91parameter_scheme_base)->fn),  &c_7328514, &c_7328604);; 
-+port_type c_7326152 = Cyc_stdin();
-+return_direct_with_clo2(data,  __glo_make_91parameter_scheme_base, (((closure)  __glo_make_91parameter_scheme_base)->fn),  &c_7326062, &c_7326152);; 
++port_type c_7326145 = Cyc_stdin();
++return_direct_with_clo2(data,  __glo_make_91parameter_scheme_base, (((closure)  __glo_make_91parameter_scheme_base)->fn),  &c_7326055, &c_7326145);; 
  }
  
 -static void __lambda_1318(void *data, object self_7314224, int argc, object *args) /* object self_7314224, object r_738340 */
-+static void __lambda_1271(void *data, object self_7312931, int argc, object *args) /* object self_7312931, object r_737572 */
++static void __lambda_1271(void *data, object self_7312924, int argc, object *args) /* object self_7312924, object r_737565 */
   {
 - object r_738340 = args[0];
-+ object r_737572 = args[0];
++ object r_737565 = args[0];
    
 -closureN_type c_7328516;
 -object e_7328597 [1];
@@ -3161,26 +3160,26 @@ Make let-values be the same as let*-values, to work around
 -c_7328516.num_elements = 1;
 -c_7328516.elements = (object *)e_7328597;
 -c_7328516.elements[0] = ((closureN)self_7314224)->elements[0];
-+closureN_type c_7326064;
-+object e_7326145 [1];
-+c_7326064.hdr.mark = gc_color_red;
-+ c_7326064.hdr.grayed = 0;
-+c_7326064.tag = closureN_tag;
-+ c_7326064.fn = (function_type)__lambda_1272;
-+c_7326064.num_args = 1;
-+c_7326064.num_elements = 1;
-+c_7326064.elements = (object *)e_7326145;
-+c_7326064.elements[0] = ((closureN)self_7312931)->elements[0];
++closureN_type c_7326057;
++object e_7326138 [1];
++c_7326057.hdr.mark = gc_color_red;
++ c_7326057.hdr.grayed = 0;
++c_7326057.tag = closureN_tag;
++ c_7326057.fn = (function_type)__lambda_1272;
++c_7326057.num_args = 1;
++c_7326057.num_elements = 1;
++c_7326057.elements = (object *)e_7326138;
++c_7326057.elements[0] = ((closureN)self_7312924)->elements[0];
  
  
 -object c_7328600 = global_set_cps_id(data,(closure)&c_7328516,"__glo_current_91input_91port_scheme_base", __glo_current_91input_91port_scheme_base, r_738340);
 -return_closcall1(data,(closure)&c_7328516,  c_7328600);; 
-+object c_7326148 = global_set_cps_id(data,(closure)&c_7326064,"__glo_current_91input_91port_scheme_base", __glo_current_91input_91port_scheme_base, r_737572);
-+return_closcall1(data,(closure)&c_7326064,  c_7326148);; 
++object c_7326141 = global_set_cps_id(data,(closure)&c_7326057,"__glo_current_91input_91port_scheme_base", __glo_current_91input_91port_scheme_base, r_737565);
++return_closcall1(data,(closure)&c_7326057,  c_7326141);; 
  }
  
 -static void __lambda_1319(void *data, object self_7314225, int argc, object *args) /* object self_7314225, object r_738325 */
-+static void __lambda_1272(void *data, object self_7312932, int argc, object *args) /* object self_7312932, object r_737557 */
++static void __lambda_1272(void *data, object self_7312925, int argc, object *args) /* object self_7312925, object r_737550 */
   {
  
    
@@ -3194,29 +3193,29 @@ Make let-values be the same as let*-values, to work around
 -c_7328518.num_elements = 1;
 -c_7328518.elements = (object *)e_7328593;
 -c_7328518.elements[0] = ((closureN)self_7314225)->elements[0];
-+closureN_type c_7326066;
-+object e_7326141 [1];
-+c_7326066.hdr.mark = gc_color_red;
-+ c_7326066.hdr.grayed = 0;
-+c_7326066.tag = closureN_tag;
-+ c_7326066.fn = (function_type)__lambda_1273;
-+c_7326066.num_args = 1;
-+c_7326066.num_elements = 1;
-+c_7326066.elements = (object *)e_7326141;
-+c_7326066.elements[0] = ((closureN)self_7312932)->elements[0];
++closureN_type c_7326059;
++object e_7326134 [1];
++c_7326059.hdr.mark = gc_color_red;
++ c_7326059.hdr.grayed = 0;
++c_7326059.tag = closureN_tag;
++ c_7326059.fn = (function_type)__lambda_1273;
++c_7326059.num_args = 1;
++c_7326059.num_elements = 1;
++c_7326059.elements = (object *)e_7326134;
++c_7326059.elements[0] = ((closureN)self_7312925)->elements[0];
  
  
 -port_type c_7328596 = Cyc_stderr();
 -return_direct_with_clo2(data,  __glo_make_91parameter_scheme_base, (((closure)  __glo_make_91parameter_scheme_base)->fn),  &c_7328518, &c_7328596);; 
-+port_type c_7326144 = Cyc_stderr();
-+return_direct_with_clo2(data,  __glo_make_91parameter_scheme_base, (((closure)  __glo_make_91parameter_scheme_base)->fn),  &c_7326066, &c_7326144);; 
++port_type c_7326137 = Cyc_stderr();
++return_direct_with_clo2(data,  __glo_make_91parameter_scheme_base, (((closure)  __glo_make_91parameter_scheme_base)->fn),  &c_7326059, &c_7326137);; 
  }
  
 -static void __lambda_1320(void *data, object self_7314226, int argc, object *args) /* object self_7314226, object r_738338 */
-+static void __lambda_1273(void *data, object self_7312933, int argc, object *args) /* object self_7312933, object r_737570 */
++static void __lambda_1273(void *data, object self_7312926, int argc, object *args) /* object self_7312926, object r_737563 */
   {
 - object r_738338 = args[0];
-+ object r_737570 = args[0];
++ object r_737563 = args[0];
    
 -closureN_type c_7328520;
 -object e_7328589 [1];
@@ -3228,26 +3227,26 @@ Make let-values be the same as let*-values, to work around
 -c_7328520.num_elements = 1;
 -c_7328520.elements = (object *)e_7328589;
 -c_7328520.elements[0] = ((closureN)self_7314226)->elements[0];
-+closureN_type c_7326068;
-+object e_7326137 [1];
-+c_7326068.hdr.mark = gc_color_red;
-+ c_7326068.hdr.grayed = 0;
-+c_7326068.tag = closureN_tag;
-+ c_7326068.fn = (function_type)__lambda_1274;
-+c_7326068.num_args = 1;
-+c_7326068.num_elements = 1;
-+c_7326068.elements = (object *)e_7326137;
-+c_7326068.elements[0] = ((closureN)self_7312933)->elements[0];
++closureN_type c_7326061;
++object e_7326130 [1];
++c_7326061.hdr.mark = gc_color_red;
++ c_7326061.hdr.grayed = 0;
++c_7326061.tag = closureN_tag;
++ c_7326061.fn = (function_type)__lambda_1274;
++c_7326061.num_args = 1;
++c_7326061.num_elements = 1;
++c_7326061.elements = (object *)e_7326130;
++c_7326061.elements[0] = ((closureN)self_7312926)->elements[0];
  
  
 -object c_7328592 = global_set_cps_id(data,(closure)&c_7328520,"__glo_current_91error_91port_scheme_base", __glo_current_91error_91port_scheme_base, r_738338);
 -return_closcall1(data,(closure)&c_7328520,  c_7328592);; 
-+object c_7326140 = global_set_cps_id(data,(closure)&c_7326068,"__glo_current_91error_91port_scheme_base", __glo_current_91error_91port_scheme_base, r_737570);
-+return_closcall1(data,(closure)&c_7326068,  c_7326140);; 
++object c_7326133 = global_set_cps_id(data,(closure)&c_7326061,"__glo_current_91error_91port_scheme_base", __glo_current_91error_91port_scheme_base, r_737563);
++return_closcall1(data,(closure)&c_7326061,  c_7326133);; 
  }
  
 -static void __lambda_1321(void *data, object self_7314227, int argc, object *args) /* object self_7314227, object r_738326 */
-+static void __lambda_1274(void *data, object self_7312934, int argc, object *args) /* object self_7312934, object r_737558 */
++static void __lambda_1274(void *data, object self_7312927, int argc, object *args) /* object self_7312927, object r_737551 */
   {
  
    
@@ -3261,26 +3260,26 @@ Make let-values be the same as let*-values, to work around
 -c_7328522.num_elements = 1;
 -c_7328522.elements = (object *)e_7328585;
 -c_7328522.elements[0] = ((closureN)self_7314227)->elements[0];
-+closureN_type c_7326070;
-+object e_7326133 [1];
-+c_7326070.hdr.mark = gc_color_red;
-+ c_7326070.hdr.grayed = 0;
-+c_7326070.tag = closureN_tag;
-+ c_7326070.fn = (function_type)__lambda_1275;
-+c_7326070.num_args = 1;
-+c_7326070.num_elements = 1;
-+c_7326070.elements = (object *)e_7326133;
-+c_7326070.elements[0] = ((closureN)self_7312934)->elements[0];
++closureN_type c_7326063;
++object e_7326126 [1];
++c_7326063.hdr.mark = gc_color_red;
++ c_7326063.hdr.grayed = 0;
++c_7326063.tag = closureN_tag;
++ c_7326063.fn = (function_type)__lambda_1275;
++c_7326063.num_args = 1;
++c_7326063.num_elements = 1;
++c_7326063.elements = (object *)e_7326126;
++c_7326063.elements[0] = ((closureN)self_7312927)->elements[0];
  
  
 -object c_7328588 = global_set_cps_id(data,(closure)&c_7328522,"__glo_error_91object_91message_scheme_base", __glo_error_91object_91message_scheme_base, primitive_car);
 -return_closcall1(data,(closure)&c_7328522,  c_7328588);; 
-+object c_7326136 = global_set_cps_id(data,(closure)&c_7326070,"__glo_error_91object_91message_scheme_base", __glo_error_91object_91message_scheme_base, primitive_car);
-+return_closcall1(data,(closure)&c_7326070,  c_7326136);; 
++object c_7326129 = global_set_cps_id(data,(closure)&c_7326063,"__glo_error_91object_91message_scheme_base", __glo_error_91object_91message_scheme_base, primitive_car);
++return_closcall1(data,(closure)&c_7326063,  c_7326129);; 
  }
  
 -static void __lambda_1322(void *data, object self_7314228, int argc, object *args) /* object self_7314228, object r_738327 */
-+static void __lambda_1275(void *data, object self_7312935, int argc, object *args) /* object self_7312935, object r_737559 */
++static void __lambda_1275(void *data, object self_7312928, int argc, object *args) /* object self_7312928, object r_737552 */
   {
  
    
@@ -3294,26 +3293,26 @@ Make let-values be the same as let*-values, to work around
 -c_7328524.num_elements = 1;
 -c_7328524.elements = (object *)e_7328581;
 -c_7328524.elements[0] = ((closureN)self_7314228)->elements[0];
-+closureN_type c_7326072;
-+object e_7326129 [1];
-+c_7326072.hdr.mark = gc_color_red;
-+ c_7326072.hdr.grayed = 0;
-+c_7326072.tag = closureN_tag;
-+ c_7326072.fn = (function_type)__lambda_1276;
-+c_7326072.num_args = 1;
-+c_7326072.num_elements = 1;
-+c_7326072.elements = (object *)e_7326129;
-+c_7326072.elements[0] = ((closureN)self_7312935)->elements[0];
++closureN_type c_7326065;
++object e_7326122 [1];
++c_7326065.hdr.mark = gc_color_red;
++ c_7326065.hdr.grayed = 0;
++c_7326065.tag = closureN_tag;
++ c_7326065.fn = (function_type)__lambda_1276;
++c_7326065.num_args = 1;
++c_7326065.num_elements = 1;
++c_7326065.elements = (object *)e_7326122;
++c_7326065.elements[0] = ((closureN)self_7312928)->elements[0];
  
  
 -object c_7328584 = global_set_cps_id(data,(closure)&c_7328524,"__glo_error_91object_91irritants_scheme_base", __glo_error_91object_91irritants_scheme_base, primitive_cdr);
 -return_closcall1(data,(closure)&c_7328524,  c_7328584);; 
-+object c_7326132 = global_set_cps_id(data,(closure)&c_7326072,"__glo_error_91object_91irritants_scheme_base", __glo_error_91object_91irritants_scheme_base, primitive_cdr);
-+return_closcall1(data,(closure)&c_7326072,  c_7326132);; 
++object c_7326125 = global_set_cps_id(data,(closure)&c_7326065,"__glo_error_91object_91irritants_scheme_base", __glo_error_91object_91irritants_scheme_base, primitive_cdr);
++return_closcall1(data,(closure)&c_7326065,  c_7326125);; 
  }
  
 -static void __lambda_1323(void *data, object self_7314229, int argc, object *args) /* object self_7314229, object r_738328 */
-+static void __lambda_1276(void *data, object self_7312936, int argc, object *args) /* object self_7312936, object r_737560 */
++static void __lambda_1276(void *data, object self_7312929, int argc, object *args) /* object self_7312929, object r_737553 */
   {
  
    
@@ -3327,26 +3326,26 @@ Make let-values be the same as let*-values, to work around
 -c_7328526.num_elements = 1;
 -c_7328526.elements = (object *)e_7328577;
 -c_7328526.elements[0] = ((closureN)self_7314229)->elements[0];
-+closureN_type c_7326074;
-+object e_7326125 [1];
-+c_7326074.hdr.mark = gc_color_red;
-+ c_7326074.hdr.grayed = 0;
-+c_7326074.tag = closureN_tag;
-+ c_7326074.fn = (function_type)__lambda_1277;
-+c_7326074.num_args = 1;
-+c_7326074.num_elements = 1;
-+c_7326074.elements = (object *)e_7326125;
-+c_7326074.elements[0] = ((closureN)self_7312936)->elements[0];
++closureN_type c_7326067;
++object e_7326118 [1];
++c_7326067.hdr.mark = gc_color_red;
++ c_7326067.hdr.grayed = 0;
++c_7326067.tag = closureN_tag;
++ c_7326067.fn = (function_type)__lambda_1277;
++c_7326067.num_args = 1;
++c_7326067.num_elements = 1;
++c_7326067.elements = (object *)e_7326118;
++c_7326067.elements[0] = ((closureN)self_7312929)->elements[0];
  
  
 -object c_7328580 = global_set_cps_id(data,(closure)&c_7328526,"__glo_exact_scheme_base", __glo_exact_scheme_base, __glo_truncate_scheme_base);
 -return_closcall1(data,(closure)&c_7328526,  c_7328580);; 
-+object c_7326128 = global_set_cps_id(data,(closure)&c_7326074,"__glo_exact_scheme_base", __glo_exact_scheme_base, __glo_truncate_scheme_base);
-+return_closcall1(data,(closure)&c_7326074,  c_7326128);; 
++object c_7326121 = global_set_cps_id(data,(closure)&c_7326067,"__glo_exact_scheme_base", __glo_exact_scheme_base, __glo_truncate_scheme_base);
++return_closcall1(data,(closure)&c_7326067,  c_7326121);; 
  }
  
 -static void __lambda_1324(void *data, object self_7314230, int argc, object *args) /* object self_7314230, object r_738329 */
-+static void __lambda_1277(void *data, object self_7312937, int argc, object *args) /* object self_7312937, object r_737561 */
++static void __lambda_1277(void *data, object self_7312930, int argc, object *args) /* object self_7312930, object r_737554 */
   {
  
    
@@ -3360,26 +3359,26 @@ Make let-values be the same as let*-values, to work around
 -c_7328528.num_elements = 1;
 -c_7328528.elements = (object *)e_7328573;
 -c_7328528.elements[0] = ((closureN)self_7314230)->elements[0];
-+closureN_type c_7326076;
-+object e_7326121 [1];
-+c_7326076.hdr.mark = gc_color_red;
-+ c_7326076.hdr.grayed = 0;
-+c_7326076.tag = closureN_tag;
-+ c_7326076.fn = (function_type)__lambda_1278;
-+c_7326076.num_args = 1;
-+c_7326076.num_elements = 1;
-+c_7326076.elements = (object *)e_7326121;
-+c_7326076.elements[0] = ((closureN)self_7312937)->elements[0];
++closureN_type c_7326069;
++object e_7326114 [1];
++c_7326069.hdr.mark = gc_color_red;
++ c_7326069.hdr.grayed = 0;
++c_7326069.tag = closureN_tag;
++ c_7326069.fn = (function_type)__lambda_1278;
++c_7326069.num_args = 1;
++c_7326069.num_elements = 1;
++c_7326069.elements = (object *)e_7326114;
++c_7326069.elements[0] = ((closureN)self_7312930)->elements[0];
  
  
 -object c_7328576 = global_set_cps_id(data,(closure)&c_7328528,"__glo_rational_127_scheme_base", __glo_rational_127_scheme_base, primitive_number_127);
 -return_closcall1(data,(closure)&c_7328528,  c_7328576);; 
-+object c_7326124 = global_set_cps_id(data,(closure)&c_7326076,"__glo_rational_127_scheme_base", __glo_rational_127_scheme_base, primitive_number_127);
-+return_closcall1(data,(closure)&c_7326076,  c_7326124);; 
++object c_7326117 = global_set_cps_id(data,(closure)&c_7326069,"__glo_rational_127_scheme_base", __glo_rational_127_scheme_base, primitive_number_127);
++return_closcall1(data,(closure)&c_7326069,  c_7326117);; 
  }
  
 -static void __lambda_1325(void *data, object self_7314231, int argc, object *args) /* object self_7314231, object r_738330 */
-+static void __lambda_1278(void *data, object self_7312938, int argc, object *args) /* object self_7312938, object r_737562 */
++static void __lambda_1278(void *data, object self_7312931, int argc, object *args) /* object self_7312931, object r_737555 */
   {
  
    
@@ -3393,26 +3392,26 @@ Make let-values be the same as let*-values, to work around
 -c_7328530.num_elements = 1;
 -c_7328530.elements = (object *)e_7328569;
 -c_7328530.elements[0] = ((closureN)self_7314231)->elements[0];
-+closureN_type c_7326078;
-+object e_7326117 [1];
-+c_7326078.hdr.mark = gc_color_red;
-+ c_7326078.hdr.grayed = 0;
-+c_7326078.tag = closureN_tag;
-+ c_7326078.fn = (function_type)__lambda_1279;
-+c_7326078.num_args = 1;
-+c_7326078.num_elements = 1;
-+c_7326078.elements = (object *)e_7326117;
-+c_7326078.elements[0] = ((closureN)self_7312938)->elements[0];
++closureN_type c_7326071;
++object e_7326110 [1];
++c_7326071.hdr.mark = gc_color_red;
++ c_7326071.hdr.grayed = 0;
++c_7326071.tag = closureN_tag;
++ c_7326071.fn = (function_type)__lambda_1279;
++c_7326071.num_args = 1;
++c_7326071.num_elements = 1;
++c_7326071.elements = (object *)e_7326110;
++c_7326071.elements[0] = ((closureN)self_7312931)->elements[0];
  
  
 -object c_7328572 = global_set_cps_id(data,(closure)&c_7328530,"__glo_gcd_scheme_base", __glo_gcd_scheme_base, __glo_gcd_95entry_scheme_base);
 -return_closcall1(data,(closure)&c_7328530,  c_7328572);; 
-+object c_7326120 = global_set_cps_id(data,(closure)&c_7326078,"__glo_gcd_scheme_base", __glo_gcd_scheme_base, __glo_gcd_95entry_scheme_base);
-+return_closcall1(data,(closure)&c_7326078,  c_7326120);; 
++object c_7326113 = global_set_cps_id(data,(closure)&c_7326071,"__glo_gcd_scheme_base", __glo_gcd_scheme_base, __glo_gcd_95entry_scheme_base);
++return_closcall1(data,(closure)&c_7326071,  c_7326113);; 
  }
  
 -static void __lambda_1326(void *data, object self_7314232, int argc, object *args) /* object self_7314232, object r_738331 */
-+static void __lambda_1279(void *data, object self_7312939, int argc, object *args) /* object self_7312939, object r_737563 */
++static void __lambda_1279(void *data, object self_7312932, int argc, object *args) /* object self_7312932, object r_737556 */
   {
  
    
@@ -3426,26 +3425,26 @@ Make let-values be the same as let*-values, to work around
 -c_7328532.num_elements = 1;
 -c_7328532.elements = (object *)e_7328565;
 -c_7328532.elements[0] = ((closureN)self_7314232)->elements[0];
-+closureN_type c_7326080;
-+object e_7326113 [1];
-+c_7326080.hdr.mark = gc_color_red;
-+ c_7326080.hdr.grayed = 0;
-+c_7326080.tag = closureN_tag;
-+ c_7326080.fn = (function_type)__lambda_1280;
-+c_7326080.num_args = 1;
-+c_7326080.num_elements = 1;
-+c_7326080.elements = (object *)e_7326113;
-+c_7326080.elements[0] = ((closureN)self_7312939)->elements[0];
++closureN_type c_7326073;
++object e_7326106 [1];
++c_7326073.hdr.mark = gc_color_red;
++ c_7326073.hdr.grayed = 0;
++c_7326073.tag = closureN_tag;
++ c_7326073.fn = (function_type)__lambda_1280;
++c_7326073.num_args = 1;
++c_7326073.num_elements = 1;
++c_7326073.elements = (object *)e_7326106;
++c_7326073.elements[0] = ((closureN)self_7312932)->elements[0];
  
  
 -object c_7328568 = global_set_cps_id(data,(closure)&c_7328532,"__glo_lcm_scheme_base", __glo_lcm_scheme_base, __glo_lcm_95entry_scheme_base);
 -return_closcall1(data,(closure)&c_7328532,  c_7328568);; 
-+object c_7326116 = global_set_cps_id(data,(closure)&c_7326080,"__glo_lcm_scheme_base", __glo_lcm_scheme_base, __glo_lcm_95entry_scheme_base);
-+return_closcall1(data,(closure)&c_7326080,  c_7326116);; 
++object c_7326109 = global_set_cps_id(data,(closure)&c_7326073,"__glo_lcm_scheme_base", __glo_lcm_scheme_base, __glo_lcm_95entry_scheme_base);
++return_closcall1(data,(closure)&c_7326073,  c_7326109);; 
  }
  
 -static void __lambda_1327(void *data, object self_7314233, int argc, object *args) /* object self_7314233, object r_738332 */
-+static void __lambda_1280(void *data, object self_7312940, int argc, object *args) /* object self_7312940, object r_737564 */
++static void __lambda_1280(void *data, object self_7312933, int argc, object *args) /* object self_7312933, object r_737557 */
   {
  
    
@@ -3459,26 +3458,26 @@ Make let-values be the same as let*-values, to work around
 -c_7328534.num_elements = 1;
 -c_7328534.elements = (object *)e_7328561;
 -c_7328534.elements[0] = ((closureN)self_7314233)->elements[0];
-+closureN_type c_7326082;
-+object e_7326109 [1];
-+c_7326082.hdr.mark = gc_color_red;
-+ c_7326082.hdr.grayed = 0;
-+c_7326082.tag = closureN_tag;
-+ c_7326082.fn = (function_type)__lambda_1281;
-+c_7326082.num_args = 1;
-+c_7326082.num_elements = 1;
-+c_7326082.elements = (object *)e_7326109;
-+c_7326082.elements[0] = ((closureN)self_7312940)->elements[0];
++closureN_type c_7326075;
++object e_7326102 [1];
++c_7326075.hdr.mark = gc_color_red;
++ c_7326075.hdr.grayed = 0;
++c_7326075.tag = closureN_tag;
++ c_7326075.fn = (function_type)__lambda_1281;
++c_7326075.num_args = 1;
++c_7326075.num_elements = 1;
++c_7326075.elements = (object *)e_7326102;
++c_7326075.elements[0] = ((closureN)self_7312933)->elements[0];
  
  
 -object c_7328564 = global_set_cps_id(data,(closure)&c_7328534,"__glo_truncate_91quotient_scheme_base", __glo_truncate_91quotient_scheme_base, __glo_quotient_scheme_base);
 -return_closcall1(data,(closure)&c_7328534,  c_7328564);; 
-+object c_7326112 = global_set_cps_id(data,(closure)&c_7326082,"__glo_truncate_91quotient_scheme_base", __glo_truncate_91quotient_scheme_base, __glo_quotient_scheme_base);
-+return_closcall1(data,(closure)&c_7326082,  c_7326112);; 
++object c_7326105 = global_set_cps_id(data,(closure)&c_7326075,"__glo_truncate_91quotient_scheme_base", __glo_truncate_91quotient_scheme_base, __glo_quotient_scheme_base);
++return_closcall1(data,(closure)&c_7326075,  c_7326105);; 
  }
  
 -static void __lambda_1328(void *data, object self_7314234, int argc, object *args) /* object self_7314234, object r_738333 */
-+static void __lambda_1281(void *data, object self_7312941, int argc, object *args) /* object self_7312941, object r_737565 */
++static void __lambda_1281(void *data, object self_7312934, int argc, object *args) /* object self_7312934, object r_737558 */
   {
  
    
@@ -3492,26 +3491,26 @@ Make let-values be the same as let*-values, to work around
 -c_7328536.num_elements = 1;
 -c_7328536.elements = (object *)e_7328557;
 -c_7328536.elements[0] = ((closureN)self_7314234)->elements[0];
-+closureN_type c_7326084;
-+object e_7326105 [1];
-+c_7326084.hdr.mark = gc_color_red;
-+ c_7326084.hdr.grayed = 0;
-+c_7326084.tag = closureN_tag;
-+ c_7326084.fn = (function_type)__lambda_1282;
-+c_7326084.num_args = 1;
-+c_7326084.num_elements = 1;
-+c_7326084.elements = (object *)e_7326105;
-+c_7326084.elements[0] = ((closureN)self_7312941)->elements[0];
++closureN_type c_7326077;
++object e_7326098 [1];
++c_7326077.hdr.mark = gc_color_red;
++ c_7326077.hdr.grayed = 0;
++c_7326077.tag = closureN_tag;
++ c_7326077.fn = (function_type)__lambda_1282;
++c_7326077.num_args = 1;
++c_7326077.num_elements = 1;
++c_7326077.elements = (object *)e_7326098;
++c_7326077.elements[0] = ((closureN)self_7312934)->elements[0];
  
  
 -object c_7328560 = global_set_cps_id(data,(closure)&c_7328536,"__glo_truncate_91remainder_scheme_base", __glo_truncate_91remainder_scheme_base, __glo_remainder_scheme_base);
 -return_closcall1(data,(closure)&c_7328536,  c_7328560);; 
-+object c_7326108 = global_set_cps_id(data,(closure)&c_7326084,"__glo_truncate_91remainder_scheme_base", __glo_truncate_91remainder_scheme_base, __glo_remainder_scheme_base);
-+return_closcall1(data,(closure)&c_7326084,  c_7326108);; 
++object c_7326101 = global_set_cps_id(data,(closure)&c_7326077,"__glo_truncate_91remainder_scheme_base", __glo_truncate_91remainder_scheme_base, __glo_remainder_scheme_base);
++return_closcall1(data,(closure)&c_7326077,  c_7326101);; 
  }
  
 -static void __lambda_1329(void *data, object self_7314235, int argc, object *args) /* object self_7314235, object r_738334 */
-+static void __lambda_1282(void *data, object self_7312942, int argc, object *args) /* object self_7312942, object r_737566 */
++static void __lambda_1282(void *data, object self_7312935, int argc, object *args) /* object self_7312935, object r_737559 */
   {
  
    
@@ -3525,26 +3524,26 @@ Make let-values be the same as let*-values, to work around
 -c_7328538.num_elements = 1;
 -c_7328538.elements = (object *)e_7328553;
 -c_7328538.elements[0] = ((closureN)self_7314235)->elements[0];
-+closureN_type c_7326086;
-+object e_7326101 [1];
-+c_7326086.hdr.mark = gc_color_red;
-+ c_7326086.hdr.grayed = 0;
-+c_7326086.tag = closureN_tag;
-+ c_7326086.fn = (function_type)__lambda_1283;
-+c_7326086.num_args = 1;
-+c_7326086.num_elements = 1;
-+c_7326086.elements = (object *)e_7326101;
-+c_7326086.elements[0] = ((closureN)self_7312942)->elements[0];
++closureN_type c_7326079;
++object e_7326094 [1];
++c_7326079.hdr.mark = gc_color_red;
++ c_7326079.hdr.grayed = 0;
++c_7326079.tag = closureN_tag;
++ c_7326079.fn = (function_type)__lambda_1283;
++c_7326079.num_args = 1;
++c_7326079.num_elements = 1;
++c_7326079.elements = (object *)e_7326094;
++c_7326079.elements[0] = ((closureN)self_7312935)->elements[0];
  
  
 -object c_7328556 = global_set_cps_id(data,(closure)&c_7328538,"__glo_open_91output_91bytevector_scheme_base", __glo_open_91output_91bytevector_scheme_base, __glo_open_91output_91string_scheme_base);
 -return_closcall1(data,(closure)&c_7328538,  c_7328556);; 
-+object c_7326104 = global_set_cps_id(data,(closure)&c_7326086,"__glo_open_91output_91bytevector_scheme_base", __glo_open_91output_91bytevector_scheme_base, __glo_open_91output_91string_scheme_base);
-+return_closcall1(data,(closure)&c_7326086,  c_7326104);; 
++object c_7326097 = global_set_cps_id(data,(closure)&c_7326079,"__glo_open_91output_91bytevector_scheme_base", __glo_open_91output_91bytevector_scheme_base, __glo_open_91output_91string_scheme_base);
++return_closcall1(data,(closure)&c_7326079,  c_7326097);; 
  }
  
 -static void __lambda_1330(void *data, object self_7314236, int argc, object *args) /* object self_7314236, object r_738335 */
-+static void __lambda_1283(void *data, object self_7312943, int argc, object *args) /* object self_7312943, object r_737567 */
++static void __lambda_1283(void *data, object self_7312936, int argc, object *args) /* object self_7312936, object r_737560 */
   {
  
    
@@ -3558,47 +3557,46 @@ Make let-values be the same as let*-values, to work around
 -c_7328540.num_elements = 1;
 -c_7328540.elements = (object *)e_7328549;
 -c_7328540.elements[0] = ((closureN)self_7314236)->elements[0];
-+closureN_type c_7326088;
-+object e_7326097 [1];
-+c_7326088.hdr.mark = gc_color_red;
-+ c_7326088.hdr.grayed = 0;
-+c_7326088.tag = closureN_tag;
-+ c_7326088.fn = (function_type)__lambda_1284;
-+c_7326088.num_args = 1;
-+c_7326088.num_elements = 1;
-+c_7326088.elements = (object *)e_7326097;
-+c_7326088.elements[0] = ((closureN)self_7312943)->elements[0];
++closureN_type c_7326081;
++object e_7326090 [1];
++c_7326081.hdr.mark = gc_color_red;
++ c_7326081.hdr.grayed = 0;
++c_7326081.tag = closureN_tag;
++ c_7326081.fn = (function_type)__lambda_1284;
++c_7326081.num_args = 1;
++c_7326081.num_elements = 1;
++c_7326081.elements = (object *)e_7326090;
++c_7326081.elements[0] = ((closureN)self_7312936)->elements[0];
  
  
 -object c_7328552 = global_set_cps_id(data,(closure)&c_7328540,"__glo_identifier_127_scheme_base", __glo_identifier_127_scheme_base, primitive_symbol_127);
 -return_closcall1(data,(closure)&c_7328540,  c_7328552);; 
-+object c_7326100 = global_set_cps_id(data,(closure)&c_7326088,"__glo_identifier_127_scheme_base", __glo_identifier_127_scheme_base, primitive_symbol_127);
-+return_closcall1(data,(closure)&c_7326088,  c_7326100);; 
++object c_7326093 = global_set_cps_id(data,(closure)&c_7326081,"__glo_identifier_127_scheme_base", __glo_identifier_127_scheme_base, primitive_symbol_127);
++return_closcall1(data,(closure)&c_7326081,  c_7326093);; 
  }
  
 -static void __lambda_1331(void *data, object self_7314237, int argc, object *args) /* object self_7314237, object r_738336 */
-+static void __lambda_1284(void *data, object self_7312944, int argc, object *args) /* object self_7312944, object r_737568 */
++static void __lambda_1284(void *data, object self_7312937, int argc, object *args) /* object self_7312937, object r_737561 */
   {
  
    
 -complex_num_type local_7328548; 
-+complex_num_type local_7326096; 
++complex_num_type local_7326089; 
  
 -object c_7328545 = global_set_cps_id(data,  ((closureN)self_7314237)->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_7328548));
 -return_direct_with_clo1(data,  ((closureN)self_7314237)->elements[0], (((closure)  ((closureN)self_7314237)->elements[0])->fn),  c_7328545);; 
-+object c_7326093 = global_set_cps_id(data,  ((closureN)self_7312944)->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_7326096));
-+return_direct_with_clo1(data,  ((closureN)self_7312944)->elements[0], (((closure)  ((closureN)self_7312944)->elements[0])->fn),  c_7326093);; 
++object c_7326086 = global_set_cps_id(data,  ((closureN)self_7312937)->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_7326089));
++return_direct_with_clo1(data,  ((closureN)self_7312937)->elements[0], (((closure)  ((closureN)self_7312937)->elements[0])->fn),  c_7326086);; 
  }
  
 -static void __lambda_1255(void *data, object _, int argc, object *args) /* closure _,object k_738006, object expr_732653_732693_732785_734018, object rename_732654_732694_732786_734019, object compare_732655_732695_732787_734020 */
-+static void __lambda_1208(void *data, object _, int argc, object *args) /* closure _,object k_737238, object expr_732312_732353_732445_733573, object rename_732313_732354_732446_733574, object compare_732314_732355_732447_733575 */
++static void __lambda_1208(void *data, object _, int argc, object *args) /* closure _,object k_737231, object expr_732306_732346_732438_733566, object rename_732307_732347_732439_733567, object compare_732308_732348_732440_733568 */
   {
 -object k_738006 = args[0]; object expr_732653_732693_732785_734018 = args[1]; object rename_732654_732694_732786_734019 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:define-values");
-+object k_737238 = args[0]; object expr_732312_732353_732445_733573 = args[1]; object rename_732313_732354_732446_733574 = args[2];
-+  Cyc_st_add(data, "base.sld:define-values");
++object k_737231 = args[0]; object expr_732306_732346_732438_733566 = args[1]; object rename_732307_732347_732439_733567 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:define-values");
  
 -closureN_type c_7327764;
 -object e_7328501 [3];
@@ -3612,31 +3610,28 @@ Make let-values be the same as let*-values, to work around
 -c_7327764.elements[0] = expr_732653_732693_732785_734018;
 -c_7327764.elements[1] = k_738006;
 -c_7327764.elements[2] = rename_732654_732694_732786_734019;
-+closureN_type c_7325312;
-+object e_7326049 [3];
-+c_7325312.hdr.mark = gc_color_red;
-+ c_7325312.hdr.grayed = 0;
-+c_7325312.tag = closureN_tag;
-+ c_7325312.fn = (function_type)__lambda_1209;
-+c_7325312.num_args = 1;
-+c_7325312.num_elements = 3;
-+c_7325312.elements = (object *)e_7326049;
-+c_7325312.elements[0] = expr_732312_732353_732445_733573;
-+c_7325312.elements[1] = k_737238;
-+c_7325312.elements[2] = rename_732313_732354_732446_733574;
- 
- 
- 
+-
+-
+-
 -return_direct_with_clo1(data,(closure)&c_7327764,__lambda_1256,  Cyc_cdr(data, expr_732653_732693_732785_734018));; 
-+return_direct_with_clo1(data,(closure)&c_7325312,__lambda_1209,  Cyc_cdr(data, expr_732312_732353_732445_733573));; 
- }
+-}
++closureN_type c_7325305;
++object e_7326042 [3];
++c_7325305.hdr.mark = gc_color_red;
++ c_7325305.hdr.grayed = 0;
++c_7325305.tag = closureN_tag;
++ c_7325305.fn = (function_type)__lambda_1209;
++c_7325305.num_args = 1;
++c_7325305.num_elements = 3;
++c_7325305.elements = (object *)e_7326042;
++c_7325305.elements[0] = expr_732306_732346_732438_733566;
++c_7325305.elements[1] = k_737231;
++c_7325305.elements[2] = rename_732307_732347_732439_733567;
  
 -static void __lambda_1256(void *data, object self_7314162, int argc, object *args) /* object self_7314162, object v_931_732661_732775_732835_734068 */
-+static void __lambda_1209(void *data, object self_7312869, int argc, object *args) /* object self_7312869, object v_931_732321_732435_732495_733623 */
-  {
+- {
 - object v_931_732661_732775_732835_734068 = args[0];
-+ object v_931_732321_732435_732495_733623 = args[0];
-   
+-  
 -closureN_type c_7327766;
 -object e_7327866 [2];
 -c_7327766.hdr.mark = gc_color_red;
@@ -3648,17 +3643,6 @@ Make let-values be the same as let*-values, to work around
 -c_7327766.elements = (object *)e_7327866;
 -c_7327766.elements[0] = ((closureN)self_7314162)->elements[2];
 -c_7327766.elements[1] = v_931_732661_732775_732835_734068;
-+closureN_type c_7325314;
-+object e_7325414 [2];
-+c_7325314.hdr.mark = gc_color_red;
-+ c_7325314.hdr.grayed = 0;
-+c_7325314.tag = closureN_tag;
-+ c_7325314.fn = (function_type)__lambda_1210;
-+c_7325314.num_args = 0;
-+c_7325314.num_elements = 2;
-+c_7325314.elements = (object *)e_7325414;
-+c_7325314.elements[0] = ((closureN)self_7312869)->elements[2];
-+c_7325314.elements[1] = v_931_732321_732435_732495_733623;
  
  
 -closureN_type c_7327867;
@@ -3673,28 +3657,48 @@ Make let-values be the same as let*-values, to work around
 -c_7327867.elements[0] = ((closureN)self_7314162)->elements[0];
 -c_7327867.elements[1] = ((closureN)self_7314162)->elements[1];
 -c_7327867.elements[2] = ((closureN)self_7314162)->elements[2];
-+closureN_type c_7325415;
-+object e_7326048 [3];
-+c_7325415.hdr.mark = gc_color_red;
-+ c_7325415.hdr.grayed = 0;
-+c_7325415.tag = closureN_tag;
-+ c_7325415.fn = (function_type)__lambda_1217;
-+c_7325415.num_args = 1;
-+c_7325415.num_elements = 3;
-+c_7325415.elements = (object *)e_7326048;
-+c_7325415.elements[0] = ((closureN)self_7312869)->elements[0];
-+c_7325415.elements[1] = ((closureN)self_7312869)->elements[1];
-+c_7325415.elements[2] = ((closureN)self_7312869)->elements[2];
++return_direct_with_clo1(data,(closure)&c_7325305,__lambda_1209,  Cyc_cdr(data, expr_732306_732346_732438_733566));; 
++}
++
++static void __lambda_1209(void *data, object self_7312862, int argc, object *args) /* object self_7312862, object v_931_732314_732428_732488_733616 */
++ {
++ object v_931_732314_732428_732488_733616 = args[0];
++  
++closureN_type c_7325307;
++object e_7325407 [2];
++c_7325307.hdr.mark = gc_color_red;
++ c_7325307.hdr.grayed = 0;
++c_7325307.tag = closureN_tag;
++ c_7325307.fn = (function_type)__lambda_1210;
++c_7325307.num_args = 0;
++c_7325307.num_elements = 2;
++c_7325307.elements = (object *)e_7325407;
++c_7325307.elements[0] = ((closureN)self_7312862)->elements[2];
++c_7325307.elements[1] = v_931_732314_732428_732488_733616;
++
++
++closureN_type c_7325408;
++object e_7326041 [3];
++c_7325408.hdr.mark = gc_color_red;
++ c_7325408.hdr.grayed = 0;
++c_7325408.tag = closureN_tag;
++ c_7325408.fn = (function_type)__lambda_1217;
++c_7325408.num_args = 1;
++c_7325408.num_elements = 3;
++c_7325408.elements = (object *)e_7326041;
++c_7325408.elements[0] = ((closureN)self_7312862)->elements[0];
++c_7325408.elements[1] = ((closureN)self_7312862)->elements[1];
++c_7325408.elements[2] = ((closureN)self_7312862)->elements[2];
  
 -return_direct_with_clo1(data,(closure)&c_7327766,__lambda_1257,  &c_7327867);; 
-+return_direct_with_clo1(data,(closure)&c_7325314,__lambda_1210,  &c_7325415);; 
++return_direct_with_clo1(data,(closure)&c_7325307,__lambda_1210,  &c_7325408);; 
  }
  
 -static void __lambda_1264(void *data, object self_7314163, int argc, object *args) /* object self_7314163, object tmp_732697_732699_732788_734021 */
-+static void __lambda_1217(void *data, object self_7312870, int argc, object *args) /* object self_7312870, object tmp_732357_732359_732448_733576 */
++static void __lambda_1217(void *data, object self_7312863, int argc, object *args) /* object self_7312863, object tmp_732350_732352_732441_733569 */
   {
 - object tmp_732697_732699_732788_734021 = args[0];
-+ object tmp_732357_732359_732448_733576 = args[0];
++ object tmp_732350_732352_732441_733569 = args[0];
    
 -closureN_type c_7327869;
 -object e_7328493 [3];
@@ -3708,20 +3712,8 @@ Make let-values be the same as let*-values, to work around
 -c_7327869.elements[0] = ((closureN)self_7314163)->elements[0];
 -c_7327869.elements[1] = ((closureN)self_7314163)->elements[2];
 -c_7327869.elements[2] = tmp_732697_732699_732788_734021;
-+closureN_type c_7325417;
-+object e_7326041 [3];
-+c_7325417.hdr.mark = gc_color_red;
-+ c_7325417.hdr.grayed = 0;
-+c_7325417.tag = closureN_tag;
-+ c_7325417.fn = (function_type)__lambda_1218;
-+c_7325417.num_args = 0;
-+c_7325417.num_elements = 3;
-+c_7325417.elements = (object *)e_7326041;
-+c_7325417.elements[0] = ((closureN)self_7312870)->elements[0];
-+c_7325417.elements[1] = ((closureN)self_7312870)->elements[2];
-+c_7325417.elements[2] = tmp_732357_732359_732448_733576;
- 
- 
+-
+-
 -closureN_type c_7328494;
 -object e_7328499 [1];
 -c_7328494.hdr.mark = gc_color_red;
@@ -3732,41 +3724,55 @@ Make let-values be the same as let*-values, to work around
 -c_7328494.num_elements = 1;
 -c_7328494.elements = (object *)e_7328499;
 -c_7328494.elements[0] = ((closureN)self_7314163)->elements[1];
-+closureN_type c_7326042;
-+object e_7326047 [1];
-+c_7326042.hdr.mark = gc_color_red;
-+ c_7326042.hdr.grayed = 0;
-+c_7326042.tag = closureN_tag;
-+ c_7326042.fn = (function_type)__lambda_1265;
-+c_7326042.num_args = 1;
-+c_7326042.num_elements = 1;
-+c_7326042.elements = (object *)e_7326047;
-+c_7326042.elements[0] = ((closureN)self_7312870)->elements[1];
++closureN_type c_7325410;
++object e_7326034 [3];
++c_7325410.hdr.mark = gc_color_red;
++ c_7325410.hdr.grayed = 0;
++c_7325410.tag = closureN_tag;
++ c_7325410.fn = (function_type)__lambda_1218;
++c_7325410.num_args = 0;
++c_7325410.num_elements = 3;
++c_7325410.elements = (object *)e_7326034;
++c_7325410.elements[0] = ((closureN)self_7312863)->elements[0];
++c_7325410.elements[1] = ((closureN)self_7312863)->elements[2];
++c_7325410.elements[2] = tmp_732350_732352_732441_733569;
++
++
++closureN_type c_7326035;
++object e_7326040 [1];
++c_7326035.hdr.mark = gc_color_red;
++ c_7326035.hdr.grayed = 0;
++c_7326035.tag = closureN_tag;
++ c_7326035.fn = (function_type)__lambda_1265;
++c_7326035.num_args = 1;
++c_7326035.num_elements = 1;
++c_7326035.elements = (object *)e_7326040;
++c_7326035.elements[0] = ((closureN)self_7312863)->elements[1];
  
 -return_direct_with_clo1(data,(closure)&c_7327869,__lambda_1265,  &c_7328494);; 
-+return_direct_with_clo1(data,(closure)&c_7325417,__lambda_1218,  &c_7326042);; 
++return_direct_with_clo1(data,(closure)&c_7325410,__lambda_1218,  &c_7326035);; 
  }
  
 -static void __lambda_1312(void *data, object self_7314164, int argc, object *args) /* object self_7314164, object r_738007 */
-+static void __lambda_1265(void *data, object self_7312871, int argc, object *args) /* object self_7312871, object r_737239 */
++static void __lambda_1265(void *data, object self_7312864, int argc, object *args) /* object self_7312864, object r_737232 */
   {
 - object r_738007 = args[0];
-+ object r_737239 = args[0];
++ object r_737232 = args[0];
    
  
 -return_direct_with_clo1(data,  ((closureN)self_7314164)->elements[0], (((closure)  ((closureN)self_7314164)->elements[0])->fn),  Cyc_car(data, r_738007));; 
-+return_direct_with_clo1(data,  ((closureN)self_7312871)->elements[0], (((closure)  ((closureN)self_7312871)->elements[0])->fn),  Cyc_car(data, r_737239));; 
++return_direct_with_clo1(data,  ((closureN)self_7312864)->elements[0], (((closure)  ((closureN)self_7312864)->elements[0])->fn),  Cyc_car(data, r_737232));; 
  }
  
 -static void __lambda_1265(void *data, object self_7314165, int argc, object *args) /* object self_7314165, object k_738009 */
-+static void __lambda_1218(void *data, object self_7312872, int argc, object *args) /* object self_7312872, object k_737241 */
++static void __lambda_1218(void *data, object self_7312865, int argc, object *args) /* object self_7312865, object k_737234 */
   {
 - object k_738009 = args[0];
 -  if( (boolean_f != ((closureN)self_7314165)->elements[2]) ){ 
 -  return_direct_with_clo1(data,  k_738009, (((closure)  k_738009)->fn),  ((closureN)self_7314165)->elements[2]);
-+ object k_737241 = args[0];
-+  if( (boolean_f != ((closureN)self_7312872)->elements[2]) ){ 
-+  return_direct_with_clo1(data,  k_737241, (((closure)  k_737241)->fn),  ((closureN)self_7312872)->elements[2]);
++ object k_737234 = args[0];
++  if( (boolean_f != ((closureN)self_7312865)->elements[2]) ){ 
++  return_direct_with_clo1(data,  k_737234, (((closure)  k_737234)->fn),  ((closureN)self_7312865)->elements[2]);
  } else { 
    
 -closureN_type c_7327874;
@@ -3781,31 +3787,31 @@ Make let-values be the same as let*-values, to work around
 -c_7327874.elements[0] = ((closureN)self_7314165)->elements[0];
 -c_7327874.elements[1] = k_738009;
 -c_7327874.elements[2] = ((closureN)self_7314165)->elements[1];
-+closureN_type c_7325422;
-+object e_7326037 [3];
-+c_7325422.hdr.mark = gc_color_red;
-+ c_7325422.hdr.grayed = 0;
-+c_7325422.tag = closureN_tag;
-+ c_7325422.fn = (function_type)__lambda_1219;
-+c_7325422.num_args = 1;
-+c_7325422.num_elements = 3;
-+c_7325422.elements = (object *)e_7326037;
-+c_7325422.elements[0] = ((closureN)self_7312872)->elements[0];
-+c_7325422.elements[1] = k_737241;
-+c_7325422.elements[2] = ((closureN)self_7312872)->elements[1];
++closureN_type c_7325415;
++object e_7326030 [3];
++c_7325415.hdr.mark = gc_color_red;
++ c_7325415.hdr.grayed = 0;
++c_7325415.tag = closureN_tag;
++ c_7325415.fn = (function_type)__lambda_1219;
++c_7325415.num_args = 1;
++c_7325415.num_elements = 3;
++c_7325415.elements = (object *)e_7326030;
++c_7325415.elements[0] = ((closureN)self_7312865)->elements[0];
++c_7325415.elements[1] = k_737234;
++c_7325415.elements[2] = ((closureN)self_7312865)->elements[1];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7327874,__lambda_1266,  Cyc_cdr(data, ((closureN)self_7314165)->elements[0]));}
-+return_direct_with_clo1(data,(closure)&c_7325422,__lambda_1219,  Cyc_cdr(data, ((closureN)self_7312872)->elements[0]));}
++return_direct_with_clo1(data,(closure)&c_7325415,__lambda_1219,  Cyc_cdr(data, ((closureN)self_7312865)->elements[0]));}
  ;; 
  }
  
 -static void __lambda_1266(void *data, object self_7314166, int argc, object *args) /* object self_7314166, object v_936_732666_732761_732826_734059 */
-+static void __lambda_1219(void *data, object self_7312873, int argc, object *args) /* object self_7312873, object v_936_732326_732421_732486_733614 */
++static void __lambda_1219(void *data, object self_7312866, int argc, object *args) /* object self_7312866, object v_936_732319_732414_732479_733607 */
   {
 - object v_936_732666_732761_732826_734059 = args[0];
-+ object v_936_732326_732421_732486_733614 = args[0];
++ object v_936_732319_732414_732479_733607 = args[0];
    
 -closureN_type c_7327876;
 -object e_7327937 [2];
@@ -3818,17 +3824,17 @@ Make let-values be the same as let*-values, to work around
 -c_7327876.elements = (object *)e_7327937;
 -c_7327876.elements[0] = ((closureN)self_7314166)->elements[2];
 -c_7327876.elements[1] = v_936_732666_732761_732826_734059;
-+closureN_type c_7325424;
-+object e_7325485 [2];
-+c_7325424.hdr.mark = gc_color_red;
-+ c_7325424.hdr.grayed = 0;
-+c_7325424.tag = closureN_tag;
-+ c_7325424.fn = (function_type)__lambda_1220;
-+c_7325424.num_args = 0;
-+c_7325424.num_elements = 2;
-+c_7325424.elements = (object *)e_7325485;
-+c_7325424.elements[0] = ((closureN)self_7312873)->elements[2];
-+c_7325424.elements[1] = v_936_732326_732421_732486_733614;
++closureN_type c_7325417;
++object e_7325478 [2];
++c_7325417.hdr.mark = gc_color_red;
++ c_7325417.hdr.grayed = 0;
++c_7325417.tag = closureN_tag;
++ c_7325417.fn = (function_type)__lambda_1220;
++c_7325417.num_args = 0;
++c_7325417.num_elements = 2;
++c_7325417.elements = (object *)e_7325478;
++c_7325417.elements[0] = ((closureN)self_7312866)->elements[2];
++c_7325417.elements[1] = v_936_732319_732414_732479_733607;
  
  
 -closureN_type c_7327938;
@@ -3843,32 +3849,32 @@ Make let-values be the same as let*-values, to work around
 -c_7327938.elements[0] = ((closureN)self_7314166)->elements[0];
 -c_7327938.elements[1] = ((closureN)self_7314166)->elements[1];
 -c_7327938.elements[2] = ((closureN)self_7314166)->elements[2];
-+closureN_type c_7325486;
-+object e_7326036 [3];
-+c_7325486.hdr.mark = gc_color_red;
-+ c_7325486.hdr.grayed = 0;
-+c_7325486.tag = closureN_tag;
-+ c_7325486.fn = (function_type)__lambda_1222;
-+c_7325486.num_args = 1;
-+c_7325486.num_elements = 3;
-+c_7325486.elements = (object *)e_7326036;
-+c_7325486.elements[0] = ((closureN)self_7312873)->elements[0];
-+c_7325486.elements[1] = ((closureN)self_7312873)->elements[1];
-+c_7325486.elements[2] = ((closureN)self_7312873)->elements[2];
++closureN_type c_7325479;
++object e_7326029 [3];
++c_7325479.hdr.mark = gc_color_red;
++ c_7325479.hdr.grayed = 0;
++c_7325479.tag = closureN_tag;
++ c_7325479.fn = (function_type)__lambda_1222;
++c_7325479.num_args = 1;
++c_7325479.num_elements = 3;
++c_7325479.elements = (object *)e_7326029;
++c_7325479.elements[0] = ((closureN)self_7312866)->elements[0];
++c_7325479.elements[1] = ((closureN)self_7312866)->elements[1];
++c_7325479.elements[2] = ((closureN)self_7312866)->elements[2];
  
 -return_direct_with_clo1(data,(closure)&c_7327876,__lambda_1267,  &c_7327938);; 
-+return_direct_with_clo1(data,(closure)&c_7325424,__lambda_1220,  &c_7325486);; 
++return_direct_with_clo1(data,(closure)&c_7325417,__lambda_1220,  &c_7325479);; 
  }
  
 -static void __lambda_1269(void *data, object self_7314167, int argc, object *args) /* object self_7314167, object tmp_732701_732703_732789_734022 */
-+static void __lambda_1222(void *data, object self_7312874, int argc, object *args) /* object self_7312874, object tmp_732361_732363_732449_733577 */
++static void __lambda_1222(void *data, object self_7312867, int argc, object *args) /* object self_7312867, object tmp_732354_732356_732442_733570 */
   {
 - object tmp_732701_732703_732789_734022 = args[0];
 -  if( (boolean_f != tmp_732701_732703_732789_734022) ){ 
 -  return_direct_with_clo1(data,  ((closureN)self_7314167)->elements[1], (((closure)  ((closureN)self_7314167)->elements[1])->fn),  tmp_732701_732703_732789_734022);
-+ object tmp_732361_732363_732449_733577 = args[0];
-+  if( (boolean_f != tmp_732361_732363_732449_733577) ){ 
-+  return_direct_with_clo1(data,  ((closureN)self_7312874)->elements[1], (((closure)  ((closureN)self_7312874)->elements[1])->fn),  tmp_732361_732363_732449_733577);
++ object tmp_732354_732356_732442_733570 = args[0];
++  if( (boolean_f != tmp_732354_732356_732442_733570) ){ 
++  return_direct_with_clo1(data,  ((closureN)self_7312867)->elements[1], (((closure)  ((closureN)self_7312867)->elements[1])->fn),  tmp_732354_732356_732442_733570);
  } else { 
    
 -closureN_type c_7327942;
@@ -3883,31 +3889,31 @@ Make let-values be the same as let*-values, to work around
 -c_7327942.elements[0] = ((closureN)self_7314167)->elements[0];
 -c_7327942.elements[1] = ((closureN)self_7314167)->elements[1];
 -c_7327942.elements[2] = ((closureN)self_7314167)->elements[2];
-+closureN_type c_7325490;
-+object e_7326032 [3];
-+c_7325490.hdr.mark = gc_color_red;
-+ c_7325490.hdr.grayed = 0;
-+c_7325490.tag = closureN_tag;
-+ c_7325490.fn = (function_type)__lambda_1223;
-+c_7325490.num_args = 1;
-+c_7325490.num_elements = 3;
-+c_7325490.elements = (object *)e_7326032;
-+c_7325490.elements[0] = ((closureN)self_7312874)->elements[0];
-+c_7325490.elements[1] = ((closureN)self_7312874)->elements[1];
-+c_7325490.elements[2] = ((closureN)self_7312874)->elements[2];
++closureN_type c_7325483;
++object e_7326025 [3];
++c_7325483.hdr.mark = gc_color_red;
++ c_7325483.hdr.grayed = 0;
++c_7325483.tag = closureN_tag;
++ c_7325483.fn = (function_type)__lambda_1223;
++c_7325483.num_args = 1;
++c_7325483.num_elements = 3;
++c_7325483.elements = (object *)e_7326025;
++c_7325483.elements[0] = ((closureN)self_7312867)->elements[0];
++c_7325483.elements[1] = ((closureN)self_7312867)->elements[1];
++c_7325483.elements[2] = ((closureN)self_7312867)->elements[2];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7327942,__lambda_1270,  Cyc_cdr(data, ((closureN)self_7314167)->elements[0]));}
-+return_direct_with_clo1(data,(closure)&c_7325490,__lambda_1223,  Cyc_cdr(data, ((closureN)self_7312874)->elements[0]));}
++return_direct_with_clo1(data,(closure)&c_7325483,__lambda_1223,  Cyc_cdr(data, ((closureN)self_7312867)->elements[0]));}
  ;; 
  }
  
 -static void __lambda_1270(void *data, object self_7314168, int argc, object *args) /* object self_7314168, object v_9313_732673_732722_732799_734032 */
-+static void __lambda_1223(void *data, object self_7312875, int argc, object *args) /* object self_7312875, object v_9313_732333_732382_732459_733587 */
++static void __lambda_1223(void *data, object self_7312868, int argc, object *args) /* object self_7312868, object v_9313_732326_732375_732452_733580 */
   {
 - object v_9313_732673_732722_732799_734032 = args[0];
-+ object v_9313_732333_732382_732459_733587 = args[0];
++ object v_9313_732326_732375_732452_733580 = args[0];
    
 -closureN_type c_7327944;
 -object e_7328379 [2];
@@ -3920,17 +3926,17 @@ Make let-values be the same as let*-values, to work around
 -c_7327944.elements = (object *)e_7328379;
 -c_7327944.elements[0] = ((closureN)self_7314168)->elements[2];
 -c_7327944.elements[1] = v_9313_732673_732722_732799_734032;
-+closureN_type c_7325492;
-+object e_7325927 [2];
-+c_7325492.hdr.mark = gc_color_red;
-+ c_7325492.hdr.grayed = 0;
-+c_7325492.tag = closureN_tag;
-+ c_7325492.fn = (function_type)__lambda_1224;
-+c_7325492.num_args = 0;
-+c_7325492.num_elements = 2;
-+c_7325492.elements = (object *)e_7325927;
-+c_7325492.elements[0] = ((closureN)self_7312875)->elements[2];
-+c_7325492.elements[1] = v_9313_732333_732382_732459_733587;
++closureN_type c_7325485;
++object e_7325920 [2];
++c_7325485.hdr.mark = gc_color_red;
++ c_7325485.hdr.grayed = 0;
++c_7325485.tag = closureN_tag;
++ c_7325485.fn = (function_type)__lambda_1224;
++c_7325485.num_args = 0;
++c_7325485.num_elements = 2;
++c_7325485.elements = (object *)e_7325920;
++c_7325485.elements[0] = ((closureN)self_7312868)->elements[2];
++c_7325485.elements[1] = v_9313_732326_732375_732452_733580;
  
  
 -closureN_type c_7328380;
@@ -3945,32 +3951,32 @@ Make let-values be the same as let*-values, to work around
 -c_7328380.elements[0] = ((closureN)self_7314168)->elements[0];
 -c_7328380.elements[1] = ((closureN)self_7314168)->elements[1];
 -c_7328380.elements[2] = ((closureN)self_7314168)->elements[2];
-+closureN_type c_7325928;
-+object e_7326031 [3];
-+c_7325928.hdr.mark = gc_color_red;
-+ c_7325928.hdr.grayed = 0;
-+c_7325928.tag = closureN_tag;
-+ c_7325928.fn = (function_type)__lambda_1256;
-+c_7325928.num_args = 1;
-+c_7325928.num_elements = 3;
-+c_7325928.elements = (object *)e_7326031;
-+c_7325928.elements[0] = ((closureN)self_7312875)->elements[0];
-+c_7325928.elements[1] = ((closureN)self_7312875)->elements[1];
-+c_7325928.elements[2] = ((closureN)self_7312875)->elements[2];
++closureN_type c_7325921;
++object e_7326024 [3];
++c_7325921.hdr.mark = gc_color_red;
++ c_7325921.hdr.grayed = 0;
++c_7325921.tag = closureN_tag;
++ c_7325921.fn = (function_type)__lambda_1256;
++c_7325921.num_args = 1;
++c_7325921.num_elements = 3;
++c_7325921.elements = (object *)e_7326024;
++c_7325921.elements[0] = ((closureN)self_7312868)->elements[0];
++c_7325921.elements[1] = ((closureN)self_7312868)->elements[1];
++c_7325921.elements[2] = ((closureN)self_7312868)->elements[2];
  
 -return_direct_with_clo1(data,(closure)&c_7327944,__lambda_1271,  &c_7328380);; 
-+return_direct_with_clo1(data,(closure)&c_7325492,__lambda_1224,  &c_7325928);; 
++return_direct_with_clo1(data,(closure)&c_7325485,__lambda_1224,  &c_7325921);; 
  }
  
 -static void __lambda_1303(void *data, object self_7314169, int argc, object *args) /* object self_7314169, object tmp_732705_732707_732790_734023 */
-+static void __lambda_1256(void *data, object self_7312876, int argc, object *args) /* object self_7312876, object tmp_732365_732367_732450_733578 */
++static void __lambda_1256(void *data, object self_7312869, int argc, object *args) /* object self_7312869, object tmp_732358_732360_732443_733571 */
   {
 - object tmp_732705_732707_732790_734023 = args[0];
 -  if( (boolean_f != tmp_732705_732707_732790_734023) ){ 
 -  return_direct_with_clo1(data,  ((closureN)self_7314169)->elements[1], (((closure)  ((closureN)self_7314169)->elements[1])->fn),  tmp_732705_732707_732790_734023);
-+ object tmp_732365_732367_732450_733578 = args[0];
-+  if( (boolean_f != tmp_732365_732367_732450_733578) ){ 
-+  return_direct_with_clo1(data,  ((closureN)self_7312876)->elements[1], (((closure)  ((closureN)self_7312876)->elements[1])->fn),  tmp_732365_732367_732450_733578);
++ object tmp_732358_732360_732443_733571 = args[0];
++  if( (boolean_f != tmp_732358_732360_732443_733571) ){ 
++  return_direct_with_clo1(data,  ((closureN)self_7312869)->elements[1], (((closure)  ((closureN)self_7312869)->elements[1])->fn),  tmp_732358_732360_732443_733571);
  } else { 
    
 -closureN_type c_7328384;
@@ -3985,31 +3991,31 @@ Make let-values be the same as let*-values, to work around
 -c_7328384.elements[0] = ((closureN)self_7314169)->elements[0];
 -c_7328384.elements[1] = ((closureN)self_7314169)->elements[1];
 -c_7328384.elements[2] = ((closureN)self_7314169)->elements[2];
-+closureN_type c_7325932;
-+object e_7326027 [3];
-+c_7325932.hdr.mark = gc_color_red;
-+ c_7325932.hdr.grayed = 0;
-+c_7325932.tag = closureN_tag;
-+ c_7325932.fn = (function_type)__lambda_1257;
-+c_7325932.num_args = 1;
-+c_7325932.num_elements = 3;
-+c_7325932.elements = (object *)e_7326027;
-+c_7325932.elements[0] = ((closureN)self_7312876)->elements[0];
-+c_7325932.elements[1] = ((closureN)self_7312876)->elements[1];
-+c_7325932.elements[2] = ((closureN)self_7312876)->elements[2];
++closureN_type c_7325925;
++object e_7326020 [3];
++c_7325925.hdr.mark = gc_color_red;
++ c_7325925.hdr.grayed = 0;
++c_7325925.tag = closureN_tag;
++ c_7325925.fn = (function_type)__lambda_1257;
++c_7325925.num_args = 1;
++c_7325925.num_elements = 3;
++c_7325925.elements = (object *)e_7326020;
++c_7325925.elements[0] = ((closureN)self_7312869)->elements[0];
++c_7325925.elements[1] = ((closureN)self_7312869)->elements[1];
++c_7325925.elements[2] = ((closureN)self_7312869)->elements[2];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7328384,__lambda_1304,  Cyc_cdr(data, ((closureN)self_7314169)->elements[0]));}
-+return_direct_with_clo1(data,(closure)&c_7325932,__lambda_1257,  Cyc_cdr(data, ((closureN)self_7312876)->elements[0]));}
++return_direct_with_clo1(data,(closure)&c_7325925,__lambda_1257,  Cyc_cdr(data, ((closureN)self_7312869)->elements[0]));}
  ;; 
  }
  
 -static void __lambda_1304(void *data, object self_7314170, int argc, object *args) /* object self_7314170, object v_9328_732688_732712_732792_734025 */
-+static void __lambda_1257(void *data, object self_7312877, int argc, object *args) /* object self_7312877, object v_9328_732348_732372_732452_733580 */
++static void __lambda_1257(void *data, object self_7312870, int argc, object *args) /* object self_7312870, object v_9328_732341_732365_732445_733573 */
   {
 - object v_9328_732688_732712_732792_734025 = args[0];
-+ object v_9328_732348_732372_732452_733580 = args[0];
++ object v_9328_732341_732365_732445_733573 = args[0];
    
 -closureN_type c_7328386;
 -object e_7328464 [2];
@@ -4022,18 +4028,18 @@ Make let-values be the same as let*-values, to work around
 -c_7328386.elements = (object *)e_7328464;
 -c_7328386.elements[0] = ((closureN)self_7314170)->elements[2];
 -c_7328386.elements[1] = v_9328_732688_732712_732792_734025;
--
-+closureN_type c_7325934;
-+object e_7326012 [2];
-+c_7325934.hdr.mark = gc_color_red;
-+ c_7325934.hdr.grayed = 0;
-+c_7325934.tag = closureN_tag;
-+ c_7325934.fn = (function_type)__lambda_1258;
-+c_7325934.num_args = 0;
-+c_7325934.num_elements = 2;
-+c_7325934.elements = (object *)e_7326012;
-+c_7325934.elements[0] = ((closureN)self_7312877)->elements[2];
-+c_7325934.elements[1] = v_9328_732348_732372_732452_733580;
++closureN_type c_7325927;
++object e_7326005 [2];
++c_7325927.hdr.mark = gc_color_red;
++ c_7325927.hdr.grayed = 0;
++c_7325927.tag = closureN_tag;
++ c_7325927.fn = (function_type)__lambda_1258;
++c_7325927.num_args = 0;
++c_7325927.num_elements = 2;
++c_7325927.elements = (object *)e_7326005;
++c_7325927.elements[0] = ((closureN)self_7312870)->elements[2];
++c_7325927.elements[1] = v_9328_732341_732365_732445_733573;
+ 
  
 -closureN_type c_7328465;
 -object e_7328478 [2];
@@ -4046,35 +4052,31 @@ Make let-values be the same as let*-values, to work around
 -c_7328465.elements = (object *)e_7328478;
 -c_7328465.elements[0] = ((closureN)self_7314170)->elements[0];
 -c_7328465.elements[1] = ((closureN)self_7314170)->elements[1];
--
++closureN_type c_7326006;
++object e_7326019 [2];
++c_7326006.hdr.mark = gc_color_red;
++ c_7326006.hdr.grayed = 0;
++c_7326006.tag = closureN_tag;
++ c_7326006.fn = (function_type)__lambda_1263;
++c_7326006.num_args = 1;
++c_7326006.num_elements = 2;
++c_7326006.elements = (object *)e_7326019;
++c_7326006.elements[0] = ((closureN)self_7312870)->elements[0];
++c_7326006.elements[1] = ((closureN)self_7312870)->elements[1];
+ 
 -return_direct_with_clo1(data,(closure)&c_7328386,__lambda_1305,  &c_7328465);; 
--}
++return_direct_with_clo1(data,(closure)&c_7325927,__lambda_1258,  &c_7326006);; 
+ }
  
 -static void __lambda_1310(void *data, object self_7314171, int argc, object *args) /* object self_7314171, object tmp_732709_732711_732791_734024 */
-- {
++static void __lambda_1263(void *data, object self_7312871, int argc, object *args) /* object self_7312871, object tmp_732362_732364_732444_733572 */
+  {
 - object tmp_732709_732711_732791_734024 = args[0];
 -  if( (boolean_f != tmp_732709_732711_732791_734024) ){ 
 -  return_direct_with_clo1(data,  ((closureN)self_7314171)->elements[1], (((closure)  ((closureN)self_7314171)->elements[1])->fn),  tmp_732709_732711_732791_734024);
-+closureN_type c_7326013;
-+object e_7326026 [2];
-+c_7326013.hdr.mark = gc_color_red;
-+ c_7326013.hdr.grayed = 0;
-+c_7326013.tag = closureN_tag;
-+ c_7326013.fn = (function_type)__lambda_1263;
-+c_7326013.num_args = 1;
-+c_7326013.num_elements = 2;
-+c_7326013.elements = (object *)e_7326026;
-+c_7326013.elements[0] = ((closureN)self_7312877)->elements[0];
-+c_7326013.elements[1] = ((closureN)self_7312877)->elements[1];
-+
-+return_direct_with_clo1(data,(closure)&c_7325934,__lambda_1258,  &c_7326013);; 
-+}
-+
-+static void __lambda_1263(void *data, object self_7312878, int argc, object *args) /* object self_7312878, object tmp_732369_732371_732451_733579 */
-+ {
-+ object tmp_732369_732371_732451_733579 = args[0];
-+  if( (boolean_f != tmp_732369_732371_732451_733579) ){ 
-+  return_direct_with_clo1(data,  ((closureN)self_7312878)->elements[1], (((closure)  ((closureN)self_7312878)->elements[1])->fn),  tmp_732369_732371_732451_733579);
++ object tmp_732362_732364_732444_733572 = args[0];
++  if( (boolean_f != tmp_732362_732364_732444_733572) ){ 
++  return_direct_with_clo1(data,  ((closureN)self_7312871)->elements[1], (((closure)  ((closureN)self_7312871)->elements[1])->fn),  tmp_732362_732364_732444_733572);
  } else { 
    
 -closureN_type c_7328469;
@@ -4087,54 +4089,54 @@ Make let-values be the same as let*-values, to work around
 -c_7328469.num_elements = 1;
 -c_7328469.elements = (object *)e_7328475;
 -c_7328469.elements[0] = ((closureN)self_7314171)->elements[1];
-+closureN_type c_7326017;
-+object e_7326023 [1];
-+c_7326017.hdr.mark = gc_color_red;
-+ c_7326017.hdr.grayed = 0;
-+c_7326017.tag = closureN_tag;
-+ c_7326017.fn = (function_type)__lambda_1264;
-+c_7326017.num_args = 1;
-+c_7326017.num_elements = 1;
-+c_7326017.elements = (object *)e_7326023;
-+c_7326017.elements[0] = ((closureN)self_7312878)->elements[1];
++closureN_type c_7326010;
++object e_7326016 [1];
++c_7326010.hdr.mark = gc_color_red;
++ c_7326010.hdr.grayed = 0;
++c_7326010.tag = closureN_tag;
++ c_7326010.fn = (function_type)__lambda_1264;
++c_7326010.num_args = 1;
++c_7326010.num_elements = 1;
++c_7326010.elements = (object *)e_7326016;
++c_7326010.elements[0] = ((closureN)self_7312871)->elements[1];
  
  
 -make_utf8_string_with_len(c_7328476, "no expansion for", 16, 16);
 -return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_7328469, &c_7328476, ((closureN)self_7314171)->elements[0]);}
-+make_utf8_string_with_len(c_7326024, "no expansion for", 16, 16);
-+return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_7326017, &c_7326024, ((closureN)self_7312878)->elements[0]);}
++make_utf8_string_with_len(c_7326017, "no expansion for", 16, 16);
++return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_7326010, &c_7326017, ((closureN)self_7312871)->elements[0]);}
  ;; 
  }
  
 -static void __lambda_1311(void *data, object self_7314172, int argc, object *args) /* object self_7314172, object r_738013 */
-+static void __lambda_1264(void *data, object self_7312879, int argc, object *args) /* object self_7312879, object r_737245 */
++static void __lambda_1264(void *data, object self_7312872, int argc, object *args) /* object self_7312872, object r_737238 */
   {
 - object r_738013 = args[0];
-+ object r_737245 = args[0];
++ object r_737238 = args[0];
    
 -pair_type local_7328474; 
 -return_direct_with_clo1(data,  ((closureN)self_7314172)->elements[0], (((closure)  ((closureN)self_7314172)->elements[0])->fn),  set_pair_as_expr(&local_7328474, r_738013, boolean_f));; 
-+pair_type local_7326022; 
-+return_direct_with_clo1(data,  ((closureN)self_7312879)->elements[0], (((closure)  ((closureN)self_7312879)->elements[0])->fn),  set_pair_as_expr(&local_7326022, r_737245, boolean_f));; 
++pair_type local_7326015; 
++return_direct_with_clo1(data,  ((closureN)self_7312872)->elements[0], (((closure)  ((closureN)self_7312872)->elements[0])->fn),  set_pair_as_expr(&local_7326015, r_737238, boolean_f));; 
  }
  
 -static void __lambda_1305(void *data, object self_7314173, int argc, object *args) /* object self_7314173, object k_738015 */
-+static void __lambda_1258(void *data, object self_7312880, int argc, object *args) /* object self_7312880, object k_737247 */
++static void __lambda_1258(void *data, object self_7312873, int argc, object *args) /* object self_7312873, object k_737240 */
   {
 - object k_738015 = args[0];
-+ object k_737247 = args[0];
++ object k_737240 = args[0];
      
 -if( (boolean_f != Cyc_is_pair(((closureN)self_7314173)->elements[1])) ){ 
-+if( (boolean_f != Cyc_is_pair(((closureN)self_7312880)->elements[1])) ){ 
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312873)->elements[1])) ){ 
      
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314173)->elements[1]))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312880)->elements[1]))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312873)->elements[1]))) ){ 
      
    
    
 -if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314173)->elements[1])))) ){ 
-+if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312880)->elements[1])))) ){ 
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312873)->elements[1])))) ){ 
    
 -closureN_type c_7328404;
 -object e_7328460 [3];
@@ -4148,40 +4150,40 @@ Make let-values be the same as let*-values, to work around
 -c_7328404.elements[0] = k_738015;
 -c_7328404.elements[1] = ((closureN)self_7314173)->elements[0];
 -c_7328404.elements[2] = ((closureN)self_7314173)->elements[1];
-+closureN_type c_7325952;
-+object e_7326008 [3];
-+c_7325952.hdr.mark = gc_color_red;
-+ c_7325952.hdr.grayed = 0;
-+c_7325952.tag = closureN_tag;
-+ c_7325952.fn = (function_type)__lambda_1259;
-+c_7325952.num_args = 1;
-+c_7325952.num_elements = 3;
-+c_7325952.elements = (object *)e_7326008;
-+c_7325952.elements[0] = k_737247;
-+c_7325952.elements[1] = ((closureN)self_7312880)->elements[0];
-+c_7325952.elements[2] = ((closureN)self_7312880)->elements[1];
++closureN_type c_7325945;
++object e_7326001 [3];
++c_7325945.hdr.mark = gc_color_red;
++ c_7325945.hdr.grayed = 0;
++c_7325945.tag = closureN_tag;
++ c_7325945.fn = (function_type)__lambda_1259;
++c_7325945.num_args = 1;
++c_7325945.num_elements = 3;
++c_7325945.elements = (object *)e_7326001;
++c_7325945.elements[0] = k_737240;
++c_7325945.elements[1] = ((closureN)self_7312873)->elements[0];
++c_7325945.elements[2] = ((closureN)self_7312873)->elements[1];
  
 -return_closcall2(data,  ((closureN)self_7314173)->elements[0],  &c_7328404, quote_define);
-+return_closcall2(data,  ((closureN)self_7312880)->elements[0],  &c_7325952, quote_define);
++return_closcall2(data,  ((closureN)self_7312873)->elements[0],  &c_7325945, quote_define);
  } else { 
 -  return_direct_with_clo1(data,  k_738015, (((closure)  k_738015)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_737247, (((closure)  k_737247)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_737240, (((closure)  k_737240)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_738015, (((closure)  k_738015)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_737247, (((closure)  k_737247)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_737240, (((closure)  k_737240)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_738015, (((closure)  k_738015)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_737247, (((closure)  k_737247)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_737240, (((closure)  k_737240)->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_1306(void *data, object self_7314174, int argc, object *args) /* object self_7314174, object r_738024 */
-+static void __lambda_1259(void *data, object self_7312881, int argc, object *args) /* object self_7312881, object r_737256 */
++static void __lambda_1259(void *data, object self_7312874, int argc, object *args) /* object self_7312874, object r_737249 */
   {
 - object r_738024 = args[0];
-+ object r_737256 = args[0];
++ object r_737249 = args[0];
    
 -closureN_type c_7328407;
 -object e_7328459 [4];
@@ -4196,29 +4198,29 @@ Make let-values be the same as let*-values, to work around
 -c_7328407.elements[1] = r_738024;
 -c_7328407.elements[2] = ((closureN)self_7314174)->elements[1];
 -c_7328407.elements[3] = ((closureN)self_7314174)->elements[2];
-+closureN_type c_7325955;
-+object e_7326007 [4];
-+c_7325955.hdr.mark = gc_color_red;
-+ c_7325955.hdr.grayed = 0;
-+c_7325955.tag = closureN_tag;
-+ c_7325955.fn = (function_type)__lambda_1260;
-+c_7325955.num_args = 1;
-+c_7325955.num_elements = 4;
-+c_7325955.elements = (object *)e_7326007;
-+c_7325955.elements[0] = ((closureN)self_7312881)->elements[0];
-+c_7325955.elements[1] = r_737256;
-+c_7325955.elements[2] = ((closureN)self_7312881)->elements[1];
-+c_7325955.elements[3] = ((closureN)self_7312881)->elements[2];
++closureN_type c_7325948;
++object e_7326000 [4];
++c_7325948.hdr.mark = gc_color_red;
++ c_7325948.hdr.grayed = 0;
++c_7325948.tag = closureN_tag;
++ c_7325948.fn = (function_type)__lambda_1260;
++c_7325948.num_args = 1;
++c_7325948.num_elements = 4;
++c_7325948.elements = (object *)e_7326000;
++c_7325948.elements[0] = ((closureN)self_7312874)->elements[0];
++c_7325948.elements[1] = r_737249;
++c_7325948.elements[2] = ((closureN)self_7312874)->elements[1];
++c_7325948.elements[3] = ((closureN)self_7312874)->elements[2];
  
 -return_closcall2(data,  ((closureN)self_7314174)->elements[1],  &c_7328407, quote_call_91with_91values);; 
-+return_closcall2(data,  ((closureN)self_7312881)->elements[1],  &c_7325955, quote_call_91with_91values);; 
++return_closcall2(data,  ((closureN)self_7312874)->elements[1],  &c_7325948, quote_call_91with_91values);; 
  }
  
 -static void __lambda_1307(void *data, object self_7314175, int argc, object *args) /* object self_7314175, object r_738032 */
-+static void __lambda_1260(void *data, object self_7312882, int argc, object *args) /* object self_7312882, object r_737264 */
++static void __lambda_1260(void *data, object self_7312875, int argc, object *args) /* object self_7312875, object r_737257 */
   {
 - object r_738032 = args[0];
-+ object r_737264 = args[0];
++ object r_737257 = args[0];
    
 -closureN_type c_7328410;
 -object e_7328458 [5];
@@ -4234,30 +4236,30 @@ Make let-values be the same as let*-values, to work around
 -c_7328410.elements[2] = r_738032;
 -c_7328410.elements[3] = ((closureN)self_7314175)->elements[2];
 -c_7328410.elements[4] = ((closureN)self_7314175)->elements[3];
-+closureN_type c_7325958;
-+object e_7326006 [5];
-+c_7325958.hdr.mark = gc_color_red;
-+ c_7325958.hdr.grayed = 0;
-+c_7325958.tag = closureN_tag;
-+ c_7325958.fn = (function_type)__lambda_1261;
-+c_7325958.num_args = 1;
-+c_7325958.num_elements = 5;
-+c_7325958.elements = (object *)e_7326006;
-+c_7325958.elements[0] = ((closureN)self_7312882)->elements[0];
-+c_7325958.elements[1] = ((closureN)self_7312882)->elements[1];
-+c_7325958.elements[2] = r_737264;
-+c_7325958.elements[3] = ((closureN)self_7312882)->elements[2];
-+c_7325958.elements[4] = ((closureN)self_7312882)->elements[3];
++closureN_type c_7325951;
++object e_7325999 [5];
++c_7325951.hdr.mark = gc_color_red;
++ c_7325951.hdr.grayed = 0;
++c_7325951.tag = closureN_tag;
++ c_7325951.fn = (function_type)__lambda_1261;
++c_7325951.num_args = 1;
++c_7325951.num_elements = 5;
++c_7325951.elements = (object *)e_7325999;
++c_7325951.elements[0] = ((closureN)self_7312875)->elements[0];
++c_7325951.elements[1] = ((closureN)self_7312875)->elements[1];
++c_7325951.elements[2] = r_737257;
++c_7325951.elements[3] = ((closureN)self_7312875)->elements[2];
++c_7325951.elements[4] = ((closureN)self_7312875)->elements[3];
  
 -return_closcall2(data,  ((closureN)self_7314175)->elements[2],  &c_7328410, quote_lambda);; 
-+return_closcall2(data,  ((closureN)self_7312882)->elements[2],  &c_7325958, quote_lambda);; 
++return_closcall2(data,  ((closureN)self_7312875)->elements[2],  &c_7325951, quote_lambda);; 
  }
  
 -static void __lambda_1308(void *data, object self_7314176, int argc, object *args) /* object self_7314176, object r_738042 */
-+static void __lambda_1261(void *data, object self_7312883, int argc, object *args) /* object self_7312883, object r_737274 */
++static void __lambda_1261(void *data, object self_7312876, int argc, object *args) /* object self_7312876, object r_737267 */
   {
 - object r_738042 = args[0];
-+ object r_737274 = args[0];
++ object r_737267 = args[0];
    
 -closureN_type c_7328413;
 -object e_7328457 [5];
@@ -4273,59 +4275,59 @@ Make let-values be the same as let*-values, to work around
 -c_7328413.elements[2] = ((closureN)self_7314176)->elements[2];
 -c_7328413.elements[3] = r_738042;
 -c_7328413.elements[4] = ((closureN)self_7314176)->elements[4];
-+closureN_type c_7325961;
-+object e_7326005 [5];
-+c_7325961.hdr.mark = gc_color_red;
-+ c_7325961.hdr.grayed = 0;
-+c_7325961.tag = closureN_tag;
-+ c_7325961.fn = (function_type)__lambda_1262;
-+c_7325961.num_args = 1;
-+c_7325961.num_elements = 5;
-+c_7325961.elements = (object *)e_7326005;
-+c_7325961.elements[0] = ((closureN)self_7312883)->elements[0];
-+c_7325961.elements[1] = ((closureN)self_7312883)->elements[1];
-+c_7325961.elements[2] = ((closureN)self_7312883)->elements[2];
-+c_7325961.elements[3] = r_737274;
-+c_7325961.elements[4] = ((closureN)self_7312883)->elements[4];
++closureN_type c_7325954;
++object e_7325998 [5];
++c_7325954.hdr.mark = gc_color_red;
++ c_7325954.hdr.grayed = 0;
++c_7325954.tag = closureN_tag;
++ c_7325954.fn = (function_type)__lambda_1262;
++c_7325954.num_args = 1;
++c_7325954.num_elements = 5;
++c_7325954.elements = (object *)e_7325998;
++c_7325954.elements[0] = ((closureN)self_7312876)->elements[0];
++c_7325954.elements[1] = ((closureN)self_7312876)->elements[1];
++c_7325954.elements[2] = ((closureN)self_7312876)->elements[2];
++c_7325954.elements[3] = r_737267;
++c_7325954.elements[4] = ((closureN)self_7312876)->elements[4];
  
 -return_closcall2(data,  ((closureN)self_7314176)->elements[3],  &c_7328413, quote__list);; 
-+return_closcall2(data,  ((closureN)self_7312883)->elements[3],  &c_7325961, quote__list);; 
++return_closcall2(data,  ((closureN)self_7312876)->elements[3],  &c_7325954, quote__list);; 
  }
  
 -static void __lambda_1309(void *data, object self_7314177, int argc, object *args) /* object self_7314177, object r_738038_7312606_7312615_7312623 */
-+static void __lambda_1262(void *data, object self_7312884, int argc, object *args) /* object self_7312884, object r_737270_7311360_7311369_7311377 */
++static void __lambda_1262(void *data, object self_7312877, int argc, object *args) /* object self_7312877, object r_737263_7311353_7311362_7311370 */
   {
 - object r_738038_7312606_7312615_7312623 = args[0];
-+ object r_737270_7311360_7311369_7311377 = args[0];
++ object r_737263_7311353_7311362_7311370 = args[0];
    
 -pair_type local_7328418; 
-+pair_type local_7325966; 
++pair_type local_7325959; 
  
 -pair_type local_7328421; 
-+pair_type local_7325969; 
++pair_type local_7325962; 
  
 -pair_type local_7328425; 
-+pair_type local_7325973; 
++pair_type local_7325966; 
  
  
  
 -pair_type local_7328431; 
-+pair_type local_7325979; 
++pair_type local_7325972; 
  
 -pair_type local_7328434; 
-+pair_type local_7325982; 
++pair_type local_7325975; 
  
 -pair_type local_7328438; 
-+pair_type local_7325986; 
++pair_type local_7325979; 
  
 -pair_type local_7328441; 
-+pair_type local_7325989; 
++pair_type local_7325982; 
  
 -pair_type local_7328445; 
-+pair_type local_7325993; 
++pair_type local_7325986; 
  
 -pair_type local_7328448; 
-+pair_type local_7325996; 
++pair_type local_7325989; 
  
  
  
@@ -4333,22 +4335,22 @@ Make let-values be the same as let*-values, to work around
  
 -pair_type local_7328456; 
 -return_direct_with_clo1(data,  ((closureN)self_7314177)->elements[0], (((closure)  ((closureN)self_7314177)->elements[0])->fn),  set_pair_as_expr(&local_7328418, set_pair_as_expr(&local_7328421, ((closureN)self_7314177)->elements[1], set_pair_as_expr(&local_7328425, Cyc_car(data, ((closureN)self_7314177)->elements[4]), set_pair_as_expr(&local_7328431, set_pair_as_expr(&local_7328434, ((closureN)self_7314177)->elements[2], set_pair_as_expr(&local_7328438, set_pair_as_expr(&local_7328441, ((closureN)self_7314177)->elements[3], set_pair_as_expr(&local_7328445, NULL, set_pair_as_expr(&local_7328448, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314177)->elements[4])), NULL))), set_pair_as_expr(&local_7328456, r_738038_7312606_7312615_7312623, NULL))), NULL))), boolean_f));; 
-+pair_type local_7326004; 
-+return_direct_with_clo1(data,  ((closureN)self_7312884)->elements[0], (((closure)  ((closureN)self_7312884)->elements[0])->fn),  set_pair_as_expr(&local_7325966, set_pair_as_expr(&local_7325969, ((closureN)self_7312884)->elements[1], set_pair_as_expr(&local_7325973, Cyc_car(data, ((closureN)self_7312884)->elements[4]), set_pair_as_expr(&local_7325979, set_pair_as_expr(&local_7325982, ((closureN)self_7312884)->elements[2], set_pair_as_expr(&local_7325986, set_pair_as_expr(&local_7325989, ((closureN)self_7312884)->elements[3], set_pair_as_expr(&local_7325993, NULL, set_pair_as_expr(&local_7325996, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312884)->elements[4])), NULL))), set_pair_as_expr(&local_7326004, r_737270_7311360_7311369_7311377, NULL))), NULL))), boolean_f));; 
++pair_type local_7325997; 
++return_direct_with_clo1(data,  ((closureN)self_7312877)->elements[0], (((closure)  ((closureN)self_7312877)->elements[0])->fn),  set_pair_as_expr(&local_7325959, set_pair_as_expr(&local_7325962, ((closureN)self_7312877)->elements[1], set_pair_as_expr(&local_7325966, Cyc_car(data, ((closureN)self_7312877)->elements[4]), set_pair_as_expr(&local_7325972, set_pair_as_expr(&local_7325975, ((closureN)self_7312877)->elements[2], set_pair_as_expr(&local_7325979, set_pair_as_expr(&local_7325982, ((closureN)self_7312877)->elements[3], set_pair_as_expr(&local_7325986, NULL, set_pair_as_expr(&local_7325989, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312877)->elements[4])), NULL))), set_pair_as_expr(&local_7325997, r_737263_7311353_7311362_7311370, NULL))), NULL))), boolean_f));; 
  }
  
 -static void __lambda_1271(void *data, object self_7314178, int argc, object *args) /* object self_7314178, object k_738054 */
-+static void __lambda_1224(void *data, object self_7312885, int argc, object *args) /* object self_7312885, object k_737286 */
++static void __lambda_1224(void *data, object self_7312878, int argc, object *args) /* object self_7312878, object k_737279 */
   {
 - object k_738054 = args[0];
-+ object k_737286 = args[0];
++ object k_737279 = args[0];
      
 -if( (boolean_f != Cyc_is_pair(((closureN)self_7314178)->elements[1])) ){ 
-+if( (boolean_f != Cyc_is_pair(((closureN)self_7312885)->elements[1])) ){ 
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312878)->elements[1])) ){ 
      
    
 -if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7314178)->elements[1]))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7312885)->elements[1]))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7312878)->elements[1]))) ){ 
    
 -closureN_type c_7327954;
 -object e_7328371 [3];
@@ -4362,46 +4364,46 @@ Make let-values be the same as let*-values, to work around
 -c_7327954.elements[0] = k_738054;
 -c_7327954.elements[1] = ((closureN)self_7314178)->elements[0];
 -c_7327954.elements[2] = ((closureN)self_7314178)->elements[1];
-+closureN_type c_7325502;
-+object e_7325919 [3];
-+c_7325502.hdr.mark = gc_color_red;
-+ c_7325502.hdr.grayed = 0;
-+c_7325502.tag = closureN_tag;
-+ c_7325502.fn = (function_type)__lambda_1225;
-+c_7325502.num_args = 1;
-+c_7325502.num_elements = 3;
-+c_7325502.elements = (object *)e_7325919;
-+c_7325502.elements[0] = k_737286;
-+c_7325502.elements[1] = ((closureN)self_7312885)->elements[0];
-+c_7325502.elements[2] = ((closureN)self_7312885)->elements[1];
++closureN_type c_7325495;
++object e_7325912 [3];
++c_7325495.hdr.mark = gc_color_red;
++ c_7325495.hdr.grayed = 0;
++c_7325495.tag = closureN_tag;
++ c_7325495.fn = (function_type)__lambda_1225;
++c_7325495.num_args = 1;
++c_7325495.num_elements = 3;
++c_7325495.elements = (object *)e_7325912;
++c_7325495.elements[0] = k_737279;
++c_7325495.elements[1] = ((closureN)self_7312878)->elements[0];
++c_7325495.elements[2] = ((closureN)self_7312878)->elements[1];
  
  
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7327954,__lambda_1272,  Cyc_car(data, Cyc_car(data, ((closureN)self_7314178)->elements[1])));
-+return_direct_with_clo1(data,(closure)&c_7325502,__lambda_1225,  Cyc_car(data, Cyc_car(data, ((closureN)self_7312885)->elements[1])));
++return_direct_with_clo1(data,(closure)&c_7325495,__lambda_1225,  Cyc_car(data, Cyc_car(data, ((closureN)self_7312878)->elements[1])));
  } else { 
 -  return_direct_with_clo1(data,  k_738054, (((closure)  k_738054)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_737286, (((closure)  k_737286)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_737279, (((closure)  k_737279)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_738054, (((closure)  k_738054)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_737286, (((closure)  k_737286)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_737279, (((closure)  k_737279)->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_1272(void *data, object self_7314179, int argc, object *args) /* object self_7314179, object var0_732727_732802_734035 */
-+static void __lambda_1225(void *data, object self_7312886, int argc, object *args) /* object self_7312886, object var0_732387_732462_733590 */
++static void __lambda_1225(void *data, object self_7312879, int argc, object *args) /* object self_7312879, object var0_732380_732455_733583 */
   {
 - object var0_732727_732802_734035 = args[0];
-+ object var0_732387_732462_733590 = args[0];
++ object var0_732380_732455_733583 = args[0];
      
    
    
    
 -if( (boolean_f != Cyc_num_fast_gte_op(data, Cyc_length(data, Cyc_cdr(data, Cyc_car(data, ((closureN)self_7314179)->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_7312886)->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_7312879)->elements[2]))), obj_int2obj(1))) ){ 
    
 -closureN_type c_7327965;
 -object e_7328353 [4];
@@ -4416,19 +4418,19 @@ Make let-values be the same as let*-values, to work around
 -c_7327965.elements[1] = ((closureN)self_7314179)->elements[1];
 -c_7327965.elements[2] = ((closureN)self_7314179)->elements[2];
 -c_7327965.elements[3] = var0_732727_732802_734035;
-+closureN_type c_7325513;
-+object e_7325901 [4];
-+c_7325513.hdr.mark = gc_color_red;
-+ c_7325513.hdr.grayed = 0;
-+c_7325513.tag = closureN_tag;
-+ c_7325513.fn = (function_type)__lambda_1226;
-+c_7325513.num_args = 3;
-+c_7325513.num_elements = 4;
-+c_7325513.elements = (object *)e_7325901;
-+c_7325513.elements[0] = ((closureN)self_7312886)->elements[0];
-+c_7325513.elements[1] = ((closureN)self_7312886)->elements[1];
-+c_7325513.elements[2] = ((closureN)self_7312886)->elements[2];
-+c_7325513.elements[3] = var0_732387_732462_733590;
++closureN_type c_7325506;
++object e_7325894 [4];
++c_7325506.hdr.mark = gc_color_red;
++ c_7325506.hdr.grayed = 0;
++c_7325506.tag = closureN_tag;
++ c_7325506.fn = (function_type)__lambda_1226;
++c_7325506.num_args = 3;
++c_7325506.num_elements = 4;
++c_7325506.elements = (object *)e_7325894;
++c_7325506.elements[0] = ((closureN)self_7312879)->elements[0];
++c_7325506.elements[1] = ((closureN)self_7312879)->elements[1];
++c_7325506.elements[2] = ((closureN)self_7312879)->elements[2];
++c_7325506.elements[3] = var0_732380_732455_733583;
  
  
  
@@ -4436,7 +4438,7 @@ Make let-values be the same as let*-values, to work around
  
  
 -complex_num_type local_7328361; 
-+complex_num_type local_7325909; 
++complex_num_type local_7325902; 
  
  
  
@@ -4444,18 +4446,18 @@ Make let-values be the same as let*-values, to work around
  
  
 -return_direct_with_clo3(data,(closure)&c_7327965,__lambda_1273,  Cyc_cdr(data, Cyc_car(data, ((closureN)self_7314179)->elements[2])), Cyc_fast_sub(data,&local_7328361, Cyc_length(data, Cyc_cdr(data, Cyc_car(data, ((closureN)self_7314179)->elements[2]))), obj_int2obj(1)), NULL);
-+return_direct_with_clo3(data,(closure)&c_7325513,__lambda_1226,  Cyc_cdr(data, Cyc_car(data, ((closureN)self_7312886)->elements[2])), Cyc_fast_sub(data,&local_7325909, Cyc_length(data, Cyc_cdr(data, Cyc_car(data, ((closureN)self_7312886)->elements[2]))), obj_int2obj(1)), NULL);
++return_direct_with_clo3(data,(closure)&c_7325506,__lambda_1226,  Cyc_cdr(data, Cyc_car(data, ((closureN)self_7312879)->elements[2])), Cyc_fast_sub(data,&local_7325902, Cyc_length(data, Cyc_cdr(data, Cyc_car(data, ((closureN)self_7312879)->elements[2]))), obj_int2obj(1)), NULL);
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7314179)->elements[0], (((closure)  ((closureN)self_7314179)->elements[0])->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  ((closureN)self_7312886)->elements[0], (((closure)  ((closureN)self_7312886)->elements[0])->fn),  boolean_f);}
++  return_direct_with_clo1(data,  ((closureN)self_7312879)->elements[0], (((closure)  ((closureN)self_7312879)->elements[0])->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_1273(void *data, object self_7314180, int argc, object *args) /* object self_7314180, object ls_732657_732732_732805_734038, object i_732659_732733_732806_734039, object res_732658_732734_732807_734040 */
-+static void __lambda_1226(void *data, object self_7312887, int argc, object *args) /* object self_7312887, object ls_732316_732392_732465_733593, object i_732318_732393_732466_733594, object res_732317_732394_732467_733595 */
++static void __lambda_1226(void *data, object self_7312880, int argc, object *args) /* object self_7312880, object ls_732310_732385_732458_733586, object i_732312_732386_732459_733587, object res_732311_732387_732460_733588 */
   {
 - object ls_732657_732732_732805_734038 = args[0]; object i_732659_732733_732806_734039 = args[1]; object res_732658_732734_732807_734040 = args[2];
-+ object ls_732316_732392_732465_733593 = args[0]; object i_732318_732393_732466_733594 = args[1]; object res_732317_732394_732467_733595 = args[2];
++ object ls_732310_732385_732458_733586 = args[0]; object i_732312_732386_732459_733587 = args[1]; object res_732311_732387_732460_733588 = args[2];
    
 -closureN_type c_7327967;
 -object e_7328352 [7];
@@ -4473,32 +4475,32 @@ Make let-values be the same as let*-values, to work around
 -c_7327967.elements[4] = res_732658_732734_732807_734040;
 -c_7327967.elements[5] = ((closureN)self_7314180)->elements[2];
 -c_7327967.elements[6] = ((closureN)self_7314180)->elements[3];
-+closureN_type c_7325515;
-+object e_7325900 [7];
-+c_7325515.hdr.mark = gc_color_red;
-+ c_7325515.hdr.grayed = 0;
-+c_7325515.tag = closureN_tag;
-+ c_7325515.fn = (function_type)__lambda_1227;
-+c_7325515.num_args = 1;
-+c_7325515.num_elements = 7;
-+c_7325515.elements = (object *)e_7325900;
-+c_7325515.elements[0] = i_732318_732393_732466_733594;
-+c_7325515.elements[1] = ((closureN)self_7312887)->elements[0];
-+c_7325515.elements[2] = ls_732316_732392_732465_733593;
-+c_7325515.elements[3] = ((closureN)self_7312887)->elements[1];
-+c_7325515.elements[4] = res_732317_732394_732467_733595;
-+c_7325515.elements[5] = ((closureN)self_7312887)->elements[2];
-+c_7325515.elements[6] = ((closureN)self_7312887)->elements[3];
++closureN_type c_7325508;
++object e_7325893 [7];
++c_7325508.hdr.mark = gc_color_red;
++ c_7325508.hdr.grayed = 0;
++c_7325508.tag = closureN_tag;
++ c_7325508.fn = (function_type)__lambda_1227;
++c_7325508.num_args = 1;
++c_7325508.num_elements = 7;
++c_7325508.elements = (object *)e_7325893;
++c_7325508.elements[0] = i_732312_732386_732459_733587;
++c_7325508.elements[1] = ((closureN)self_7312880)->elements[0];
++c_7325508.elements[2] = ls_732310_732385_732458_733586;
++c_7325508.elements[3] = ((closureN)self_7312880)->elements[1];
++c_7325508.elements[4] = res_732311_732387_732460_733588;
++c_7325508.elements[5] = ((closureN)self_7312880)->elements[2];
++c_7325508.elements[6] = ((closureN)self_7312880)->elements[3];
  
 -return_direct_with_clo1(data,(closure)&c_7327967,__lambda_1274,  boolean_f);; 
-+return_direct_with_clo1(data,(closure)&c_7325515,__lambda_1227,  boolean_f);; 
++return_direct_with_clo1(data,(closure)&c_7325508,__lambda_1227,  boolean_f);; 
  }
  
 -static void __lambda_1274(void *data, object self_7314181, int argc, object *args) /* object self_7314181, object lp_9317_732677_732735_732808_734041 */
-+static void __lambda_1227(void *data, object self_7312888, int argc, object *args) /* object self_7312888, object lp_9317_732337_732395_732468_733596 */
++static void __lambda_1227(void *data, object self_7312881, int argc, object *args) /* object self_7312881, object lp_9317_732330_732388_732461_733589 */
   {
 - object lp_9317_732677_732735_732808_734041 = args[0];
-+ object lp_9317_732337_732395_732468_733596 = args[0];
++ object lp_9317_732330_732388_732461_733589 = args[0];
    
 -closureN_type c_7327969;
 -object e_7328348 [7];
@@ -4516,35 +4518,35 @@ Make let-values be the same as let*-values, to work around
 -c_7327969.elements[4] = ((closureN)self_7314181)->elements[4];
 -c_7327969.elements[5] = ((closureN)self_7314181)->elements[5];
 -c_7327969.elements[6] = ((closureN)self_7314181)->elements[6];
-+closureN_type c_7325517;
-+object e_7325896 [7];
-+c_7325517.hdr.mark = gc_color_red;
-+ c_7325517.hdr.grayed = 0;
-+c_7325517.tag = closureN_tag;
-+ c_7325517.fn = (function_type)__lambda_1383;
-+c_7325517.num_args = 1;
-+c_7325517.num_elements = 7;
-+c_7325517.elements = (object *)e_7325896;
-+c_7325517.elements[0] = ((closureN)self_7312888)->elements[0];
-+c_7325517.elements[1] = ((closureN)self_7312888)->elements[1];
-+c_7325517.elements[2] = ((closureN)self_7312888)->elements[2];
-+c_7325517.elements[3] = ((closureN)self_7312888)->elements[3];
-+c_7325517.elements[4] = ((closureN)self_7312888)->elements[4];
-+c_7325517.elements[5] = ((closureN)self_7312888)->elements[5];
-+c_7325517.elements[6] = ((closureN)self_7312888)->elements[6];
++closureN_type c_7325510;
++object e_7325889 [7];
++c_7325510.hdr.mark = gc_color_red;
++ c_7325510.hdr.grayed = 0;
++c_7325510.tag = closureN_tag;
++ c_7325510.fn = (function_type)__lambda_1383;
++c_7325510.num_args = 1;
++c_7325510.num_elements = 7;
++c_7325510.elements = (object *)e_7325889;
++c_7325510.elements[0] = ((closureN)self_7312881)->elements[0];
++c_7325510.elements[1] = ((closureN)self_7312881)->elements[1];
++c_7325510.elements[2] = ((closureN)self_7312881)->elements[2];
++c_7325510.elements[3] = ((closureN)self_7312881)->elements[3];
++c_7325510.elements[4] = ((closureN)self_7312881)->elements[4];
++c_7325510.elements[5] = ((closureN)self_7312881)->elements[5];
++c_7325510.elements[6] = ((closureN)self_7312881)->elements[6];
  
  
 -pair_type local_7328351; 
 -return_direct_with_clo1(data,(closure)&c_7327969,__lambda_1430,  set_cell_as_expr(&local_7328351, lp_9317_732677_732735_732808_734041));; 
-+pair_type local_7325899; 
-+return_direct_with_clo1(data,(closure)&c_7325517,__lambda_1383,  set_cell_as_expr(&local_7325899, lp_9317_732337_732395_732468_733596));; 
++pair_type local_7325892; 
++return_direct_with_clo1(data,(closure)&c_7325510,__lambda_1383,  set_cell_as_expr(&local_7325892, lp_9317_732330_732388_732461_733589));; 
  }
  
 -static void __lambda_1430(void *data, object self_7314182, int argc, object *args) /* object self_7314182, object lp_9317_732677_732735_732808_734041 */
-+static void __lambda_1383(void *data, object self_7312889, int argc, object *args) /* object self_7312889, object lp_9317_732337_732395_732468_733596 */
++static void __lambda_1383(void *data, object self_7312882, int argc, object *args) /* object self_7312882, object lp_9317_732330_732388_732461_733589 */
   {
 - object lp_9317_732677_732735_732808_734041 = args[0];
-+ object lp_9317_732337_732395_732468_733596 = args[0];
++ object lp_9317_732330_732388_732461_733589 = args[0];
    
 -closureN_type c_7327971;
 -object e_7327986 [5];
@@ -4560,20 +4562,20 @@ Make let-values be the same as let*-values, to work around
 -c_7327971.elements[2] = lp_9317_732677_732735_732808_734041;
 -c_7327971.elements[3] = ((closureN)self_7314182)->elements[2];
 -c_7327971.elements[4] = ((closureN)self_7314182)->elements[4];
-+closureN_type c_7325519;
-+object e_7325534 [5];
-+c_7325519.hdr.mark = gc_color_red;
-+ c_7325519.hdr.grayed = 0;
-+c_7325519.tag = closureN_tag;
-+ c_7325519.fn = (function_type)__lambda_1228;
-+c_7325519.num_args = 1;
-+c_7325519.num_elements = 5;
-+c_7325519.elements = (object *)e_7325534;
-+c_7325519.elements[0] = ((closureN)self_7312889)->elements[0];
-+c_7325519.elements[1] = ((closureN)self_7312889)->elements[1];
-+c_7325519.elements[2] = lp_9317_732337_732395_732468_733596;
-+c_7325519.elements[3] = ((closureN)self_7312889)->elements[2];
-+c_7325519.elements[4] = ((closureN)self_7312889)->elements[4];
++closureN_type c_7325512;
++object e_7325527 [5];
++c_7325512.hdr.mark = gc_color_red;
++ c_7325512.hdr.grayed = 0;
++c_7325512.tag = closureN_tag;
++ c_7325512.fn = (function_type)__lambda_1228;
++c_7325512.num_args = 1;
++c_7325512.num_elements = 5;
++c_7325512.elements = (object *)e_7325527;
++c_7325512.elements[0] = ((closureN)self_7312882)->elements[0];
++c_7325512.elements[1] = ((closureN)self_7312882)->elements[1];
++c_7325512.elements[2] = lp_9317_732330_732388_732461_733589;
++c_7325512.elements[3] = ((closureN)self_7312882)->elements[2];
++c_7325512.elements[4] = ((closureN)self_7312882)->elements[4];
  
  
 -closureN_type c_7327987;
@@ -4589,32 +4591,32 @@ Make let-values be the same as let*-values, to work around
 -c_7327987.elements[1] = ((closureN)self_7314182)->elements[3];
 -c_7327987.elements[2] = ((closureN)self_7314182)->elements[5];
 -c_7327987.elements[3] = ((closureN)self_7314182)->elements[6];
-+closureN_type c_7325535;
-+object e_7325895 [4];
-+c_7325535.hdr.mark = gc_color_red;
-+ c_7325535.hdr.grayed = 0;
-+c_7325535.tag = closureN_tag;
-+ c_7325535.fn = (function_type)__lambda_1230;
-+c_7325535.num_args = 3;
-+c_7325535.num_elements = 4;
-+c_7325535.elements = (object *)e_7325895;
-+c_7325535.elements[0] = lp_9317_732337_732395_732468_733596;
-+c_7325535.elements[1] = ((closureN)self_7312889)->elements[3];
-+c_7325535.elements[2] = ((closureN)self_7312889)->elements[5];
-+c_7325535.elements[3] = ((closureN)self_7312889)->elements[6];
++closureN_type c_7325528;
++object e_7325888 [4];
++c_7325528.hdr.mark = gc_color_red;
++ c_7325528.hdr.grayed = 0;
++c_7325528.tag = closureN_tag;
++ c_7325528.fn = (function_type)__lambda_1230;
++c_7325528.num_args = 3;
++c_7325528.num_elements = 4;
++c_7325528.elements = (object *)e_7325888;
++c_7325528.elements[0] = lp_9317_732330_732388_732461_733589;
++c_7325528.elements[1] = ((closureN)self_7312882)->elements[3];
++c_7325528.elements[2] = ((closureN)self_7312882)->elements[5];
++c_7325528.elements[3] = ((closureN)self_7312882)->elements[6];
  
 -return_direct_with_clo1(data,(closure)&c_7327971,__lambda_1275,  &c_7327987);; 
-+return_direct_with_clo1(data,(closure)&c_7325519,__lambda_1228,  &c_7325535);; 
++return_direct_with_clo1(data,(closure)&c_7325512,__lambda_1228,  &c_7325528);; 
  }
  
 -static void __lambda_1277(void *data, object self_7314183, int argc, object *args) /* object self_7314183, object k_738066, object ls_732657_732736_732809_734042, object i_732659_732737_732810_734043, object res_732658_732738_732811_734044 */
-+static void __lambda_1230(void *data, object self_7312890, int argc, object *args) /* object self_7312890, object k_737298, object ls_732316_732396_732469_733597, object i_732318_732397_732470_733598, object res_732317_732398_732471_733599 */
++static void __lambda_1230(void *data, object self_7312883, int argc, object *args) /* object self_7312883, object k_737291, object ls_732310_732389_732462_733590, object i_732312_732390_732463_733591, object res_732311_732391_732464_733592 */
   {
 - object k_738066 = args[0]; object ls_732657_732736_732809_734042 = args[1]; object i_732659_732737_732810_734043 = args[2]; object res_732658_732738_732811_734044 = args[3];
-+ object k_737298 = args[0]; object ls_732316_732396_732469_733597 = args[1]; object i_732318_732397_732470_733598 = args[2]; object res_732317_732398_732471_733599 = args[3];
++ object k_737291 = args[0]; object ls_732310_732389_732462_733590 = args[1]; object i_732312_732390_732463_733591 = args[2]; object res_732311_732391_732464_733592 = args[3];
      
 -if( (boolean_f != Cyc_num_fast_gte_op(data, obj_int2obj(0), i_732659_732737_732810_734043)) ){ 
-+if( (boolean_f != Cyc_num_fast_gte_op(data, obj_int2obj(0), i_732318_732397_732470_733598)) ){ 
++if( (boolean_f != Cyc_num_fast_gte_op(data, obj_int2obj(0), i_732312_732390_732463_733591)) ){ 
    
 -closureN_type c_7327991;
 -object e_7328332 [5];
@@ -4630,23 +4632,23 @@ Make let-values be the same as let*-values, to work around
 -c_7327991.elements[2] = ((closureN)self_7314183)->elements[1];
 -c_7327991.elements[3] = ((closureN)self_7314183)->elements[2];
 -c_7327991.elements[4] = ((closureN)self_7314183)->elements[3];
-+closureN_type c_7325539;
-+object e_7325880 [5];
-+c_7325539.hdr.mark = gc_color_red;
-+ c_7325539.hdr.grayed = 0;
-+c_7325539.tag = closureN_tag;
-+ c_7325539.fn = (function_type)__lambda_1231;
-+c_7325539.num_args = 1;
-+c_7325539.num_elements = 5;
-+c_7325539.elements = (object *)e_7325880;
-+c_7325539.elements[0] = k_737298;
-+c_7325539.elements[1] = ls_732316_732396_732469_733597;
-+c_7325539.elements[2] = ((closureN)self_7312890)->elements[1];
-+c_7325539.elements[3] = ((closureN)self_7312890)->elements[2];
-+c_7325539.elements[4] = ((closureN)self_7312890)->elements[3];
++closureN_type c_7325532;
++object e_7325873 [5];
++c_7325532.hdr.mark = gc_color_red;
++ c_7325532.hdr.grayed = 0;
++c_7325532.tag = closureN_tag;
++ c_7325532.fn = (function_type)__lambda_1231;
++c_7325532.num_args = 1;
++c_7325532.num_elements = 5;
++c_7325532.elements = (object *)e_7325873;
++c_7325532.elements[0] = k_737291;
++c_7325532.elements[1] = ls_732310_732389_732462_733590;
++c_7325532.elements[2] = ((closureN)self_7312883)->elements[1];
++c_7325532.elements[3] = ((closureN)self_7312883)->elements[2];
++c_7325532.elements[4] = ((closureN)self_7312883)->elements[3];
  
 -return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7327991, primitive_cons, NULL, res_732658_732738_732811_734044);
-+return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7325539, primitive_cons, NULL, res_732317_732398_732471_733599);
++return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7325532, primitive_cons, NULL, res_732311_732391_732464_733592);
  } else { 
    
  
@@ -4654,22 +4656,22 @@ Make let-values be the same as let*-values, to work around
  
  
 -complex_num_type local_7328341; 
-+complex_num_type local_7325889; 
++complex_num_type local_7325882; 
  
 -pair_type local_7328344; 
-+pair_type local_7325892; 
++pair_type local_7325885; 
  
  
 -return_closcall4(data,  car(((closureN)self_7314183)->elements[0]),  k_738066, Cyc_cdr(data, ls_732657_732736_732809_734042), Cyc_fast_sub(data,&local_7328341, i_732659_732737_732810_734043, obj_int2obj(1)), set_pair_as_expr(&local_7328344, Cyc_car(data, ls_732657_732736_732809_734042), res_732658_732738_732811_734044));}
-+return_closcall4(data,  car(((closureN)self_7312890)->elements[0]),  k_737298, Cyc_cdr(data, ls_732316_732396_732469_733597), Cyc_fast_sub(data,&local_7325889, i_732318_732397_732470_733598, obj_int2obj(1)), set_pair_as_expr(&local_7325892, Cyc_car(data, ls_732316_732396_732469_733597), res_732317_732398_732471_733599));}
++return_closcall4(data,  car(((closureN)self_7312883)->elements[0]),  k_737291, Cyc_cdr(data, ls_732310_732389_732462_733590), Cyc_fast_sub(data,&local_7325882, i_732312_732390_732463_733591, obj_int2obj(1)), set_pair_as_expr(&local_7325885, Cyc_car(data, ls_732310_732389_732462_733590), res_732311_732391_732464_733592));}
  ;; 
  }
  
 -static void __lambda_1278(void *data, object self_7314184, int argc, object *args) /* object self_7314184, object r_738239_7312943 */
-+static void __lambda_1231(void *data, object self_7312891, int argc, object *args) /* object self_7312891, object r_737471_7311697 */
++static void __lambda_1231(void *data, object self_7312884, int argc, object *args) /* object self_7312884, object r_737464_7311690 */
   {
 - object r_738239_7312943 = args[0];
-+ object r_737471_7311697 = args[0];
++ object r_737464_7311690 = args[0];
    
 -closureN_type c_7327993;
 -object e_7328324 [4];
@@ -4684,72 +4686,72 @@ Make let-values be the same as let*-values, to work around
 -c_7327993.elements[1] = ((closureN)self_7314184)->elements[2];
 -c_7327993.elements[2] = ((closureN)self_7314184)->elements[3];
 -c_7327993.elements[3] = ((closureN)self_7314184)->elements[4];
-+closureN_type c_7325541;
-+object e_7325872 [4];
-+c_7325541.hdr.mark = gc_color_red;
-+ c_7325541.hdr.grayed = 0;
-+c_7325541.tag = closureN_tag;
-+ c_7325541.fn = (function_type)__lambda_1232;
-+c_7325541.num_args = 1;
-+c_7325541.num_elements = 4;
-+c_7325541.elements = (object *)e_7325872;
-+c_7325541.elements[0] = ((closureN)self_7312891)->elements[0];
-+c_7325541.elements[1] = ((closureN)self_7312891)->elements[2];
-+c_7325541.elements[2] = ((closureN)self_7312891)->elements[3];
-+c_7325541.elements[3] = ((closureN)self_7312891)->elements[4];
++closureN_type c_7325534;
++object e_7325865 [4];
++c_7325534.hdr.mark = gc_color_red;
++ c_7325534.hdr.grayed = 0;
++c_7325534.tag = closureN_tag;
++ c_7325534.fn = (function_type)__lambda_1232;
++c_7325534.num_args = 1;
++c_7325534.num_elements = 4;
++c_7325534.elements = (object *)e_7325865;
++c_7325534.elements[0] = ((closureN)self_7312884)->elements[0];
++c_7325534.elements[1] = ((closureN)self_7312884)->elements[2];
++c_7325534.elements[2] = ((closureN)self_7312884)->elements[3];
++c_7325534.elements[3] = ((closureN)self_7312884)->elements[4];
  
  
 -pair_type local_7328327; 
-+pair_type local_7325875; 
++pair_type local_7325868; 
  
 -pair_type local_7328331; 
 -return_direct_with_clo1(data,(closure)&c_7327993,__lambda_1279,  set_pair_as_expr(&local_7328327, ((closureN)self_7314184)->elements[1], set_pair_as_expr(&local_7328331, r_738239_7312943, NULL)));; 
-+pair_type local_7325879; 
-+return_direct_with_clo1(data,(closure)&c_7325541,__lambda_1232,  set_pair_as_expr(&local_7325875, ((closureN)self_7312891)->elements[1], set_pair_as_expr(&local_7325879, r_737471_7311697, NULL)));; 
++pair_type local_7325872; 
++return_direct_with_clo1(data,(closure)&c_7325534,__lambda_1232,  set_pair_as_expr(&local_7325868, ((closureN)self_7312884)->elements[1], set_pair_as_expr(&local_7325872, r_737464_7311690, NULL)));; 
  }
  
 -static void __lambda_1279(void *data, object self_7314185, int argc, object *args) /* object self_7314185, object v_9318_732678_732739_732812_734045_7312944 */
-+static void __lambda_1232(void *data, object self_7312892, int argc, object *args) /* object self_7312892, object v_9318_732338_732399_732472_733600_7311698 */
++static void __lambda_1232(void *data, object self_7312885, int argc, object *args) /* object self_7312885, object v_9318_732331_732392_732465_733593_7311691 */
   {
 - object v_9318_732678_732739_732812_734045_7312944 = args[0];
-+ object v_9318_732338_732399_732472_733600_7311698 = args[0];
++ object v_9318_732331_732392_732465_733593_7311691 = args[0];
      
 -if( (boolean_f != Cyc_is_pair(v_9318_732678_732739_732812_734045_7312944)) ){ 
-+if( (boolean_f != Cyc_is_pair(v_9318_732338_732399_732472_733600_7311698)) ){ 
++if( (boolean_f != Cyc_is_pair(v_9318_732331_732392_732465_733593_7311691)) ){ 
      
    
 -if( (boolean_f != Cyc_is_pair(Cyc_car(data, v_9318_732678_732739_732812_734045_7312944))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_car(data, v_9318_732338_732399_732472_733600_7311698))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, v_9318_732331_732392_732465_733593_7311691))) ){ 
      
    
    
 -if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, v_9318_732678_732739_732812_734045_7312944)))) ){ 
-+if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, v_9318_732338_732399_732472_733600_7311698)))) ){ 
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, v_9318_732331_732392_732465_733593_7311691)))) ){ 
      
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, v_9318_732678_732739_732812_734045_7312944))) ){ 
 -    complex_num_type local_7328012; 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, v_9318_732338_732399_732472_733600_7311698))) ){ 
-+    complex_num_type local_7325560; 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, v_9318_732331_732392_732465_733593_7311691))) ){ 
++    complex_num_type local_7325553; 
    
    
  if( (boolean_f != ((inline_function_type)
 -                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7328012, Cyc_car(data, Cyc_cdr(data, v_9318_732678_732739_732812_734045_7312944)))) ){ 
-+                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7325560, Cyc_car(data, Cyc_cdr(data, v_9318_732338_732399_732472_733600_7311698)))) ){ 
++                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7325553, Cyc_car(data, Cyc_cdr(data, v_9318_732331_732392_732465_733593_7311691)))) ){ 
      
    
    
 -if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, v_9318_732678_732739_732812_734045_7312944)))) ){ 
-+if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, v_9318_732338_732399_732472_733600_7311698)))) ){ 
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, v_9318_732331_732392_732465_733593_7311691)))) ){ 
      
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314185)->elements[2]))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312892)->elements[2]))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312885)->elements[2]))) ){ 
      
    
    
 -if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314185)->elements[2])))) ){ 
-+if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312892)->elements[2])))) ){ 
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312885)->elements[2])))) ){ 
    
 -closureN_type c_7328037;
 -object e_7328307 [5];
@@ -4765,62 +4767,62 @@ Make let-values be the same as let*-values, to work around
 -c_7328037.elements[2] = ((closureN)self_7314185)->elements[2];
 -c_7328037.elements[3] = v_9318_732678_732739_732812_734045_7312944;
 -c_7328037.elements[4] = ((closureN)self_7314185)->elements[3];
-+closureN_type c_7325585;
-+object e_7325855 [5];
-+c_7325585.hdr.mark = gc_color_red;
-+ c_7325585.hdr.grayed = 0;
-+c_7325585.tag = closureN_tag;
-+ c_7325585.fn = (function_type)__lambda_1233;
-+c_7325585.num_args = 1;
-+c_7325585.num_elements = 5;
-+c_7325585.elements = (object *)e_7325855;
-+c_7325585.elements[0] = ((closureN)self_7312892)->elements[0];
-+c_7325585.elements[1] = ((closureN)self_7312892)->elements[1];
-+c_7325585.elements[2] = ((closureN)self_7312892)->elements[2];
-+c_7325585.elements[3] = v_9318_732338_732399_732472_733600_7311698;
-+c_7325585.elements[4] = ((closureN)self_7312892)->elements[3];
++closureN_type c_7325578;
++object e_7325848 [5];
++c_7325578.hdr.mark = gc_color_red;
++ c_7325578.hdr.grayed = 0;
++c_7325578.tag = closureN_tag;
++ c_7325578.fn = (function_type)__lambda_1233;
++c_7325578.num_args = 1;
++c_7325578.num_elements = 5;
++c_7325578.elements = (object *)e_7325848;
++c_7325578.elements[0] = ((closureN)self_7312885)->elements[0];
++c_7325578.elements[1] = ((closureN)self_7312885)->elements[1];
++c_7325578.elements[2] = ((closureN)self_7312885)->elements[2];
++c_7325578.elements[3] = v_9318_732331_732392_732465_733593_7311691;
++c_7325578.elements[4] = ((closureN)self_7312885)->elements[3];
  
 -return_closcall2(data,  ((closureN)self_7314185)->elements[1],  &c_7328037, quote_begin);
-+return_closcall2(data,  ((closureN)self_7312892)->elements[1],  &c_7325585, quote_begin);
++return_closcall2(data,  ((closureN)self_7312885)->elements[1],  &c_7325578, quote_begin);
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7314185)->elements[0], (((closure)  ((closureN)self_7314185)->elements[0])->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  ((closureN)self_7312892)->elements[0], (((closure)  ((closureN)self_7312892)->elements[0])->fn),  boolean_f);}
++  return_direct_with_clo1(data,  ((closureN)self_7312885)->elements[0], (((closure)  ((closureN)self_7312885)->elements[0])->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7314185)->elements[0], (((closure)  ((closureN)self_7314185)->elements[0])->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  ((closureN)self_7312892)->elements[0], (((closure)  ((closureN)self_7312892)->elements[0])->fn),  boolean_f);}
++  return_direct_with_clo1(data,  ((closureN)self_7312885)->elements[0], (((closure)  ((closureN)self_7312885)->elements[0])->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7314185)->elements[0], (((closure)  ((closureN)self_7314185)->elements[0])->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  ((closureN)self_7312892)->elements[0], (((closure)  ((closureN)self_7312892)->elements[0])->fn),  boolean_f);}
++  return_direct_with_clo1(data,  ((closureN)self_7312885)->elements[0], (((closure)  ((closureN)self_7312885)->elements[0])->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7314185)->elements[0], (((closure)  ((closureN)self_7314185)->elements[0])->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  ((closureN)self_7312892)->elements[0], (((closure)  ((closureN)self_7312892)->elements[0])->fn),  boolean_f);}
++  return_direct_with_clo1(data,  ((closureN)self_7312885)->elements[0], (((closure)  ((closureN)self_7312885)->elements[0])->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7314185)->elements[0], (((closure)  ((closureN)self_7314185)->elements[0])->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  ((closureN)self_7312892)->elements[0], (((closure)  ((closureN)self_7312892)->elements[0])->fn),  boolean_f);}
++  return_direct_with_clo1(data,  ((closureN)self_7312885)->elements[0], (((closure)  ((closureN)self_7312885)->elements[0])->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7314185)->elements[0], (((closure)  ((closureN)self_7314185)->elements[0])->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  ((closureN)self_7312892)->elements[0], (((closure)  ((closureN)self_7312892)->elements[0])->fn),  boolean_f);}
++  return_direct_with_clo1(data,  ((closureN)self_7312885)->elements[0], (((closure)  ((closureN)self_7312885)->elements[0])->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7314185)->elements[0], (((closure)  ((closureN)self_7314185)->elements[0])->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  ((closureN)self_7312892)->elements[0], (((closure)  ((closureN)self_7312892)->elements[0])->fn),  boolean_f);}
++  return_direct_with_clo1(data,  ((closureN)self_7312885)->elements[0], (((closure)  ((closureN)self_7312885)->elements[0])->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7314185)->elements[0], (((closure)  ((closureN)self_7314185)->elements[0])->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  ((closureN)self_7312892)->elements[0], (((closure)  ((closureN)self_7312892)->elements[0])->fn),  boolean_f);}
++  return_direct_with_clo1(data,  ((closureN)self_7312885)->elements[0], (((closure)  ((closureN)self_7312885)->elements[0])->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_1280(void *data, object self_7314186, int argc, object *args) /* object self_7314186, object r_738087_7312945 */
-+static void __lambda_1233(void *data, object self_7312893, int argc, object *args) /* object self_7312893, object r_737319_7311699 */
++static void __lambda_1233(void *data, object self_7312886, int argc, object *args) /* object self_7312886, object r_737312_7311692 */
   {
 - object r_738087_7312945 = args[0];
-+ object r_737319_7311699 = args[0];
++ object r_737312_7311692 = args[0];
    
 -closureN_type c_7328040;
 -object e_7328306 [6];
@@ -4837,31 +4839,31 @@ Make let-values be the same as let*-values, to work around
 -c_7328040.elements[3] = ((closureN)self_7314186)->elements[2];
 -c_7328040.elements[4] = ((closureN)self_7314186)->elements[3];
 -c_7328040.elements[5] = ((closureN)self_7314186)->elements[4];
-+closureN_type c_7325588;
-+object e_7325854 [6];
-+c_7325588.hdr.mark = gc_color_red;
-+ c_7325588.hdr.grayed = 0;
-+c_7325588.tag = closureN_tag;
-+ c_7325588.fn = (function_type)__lambda_1234;
-+c_7325588.num_args = 1;
-+c_7325588.num_elements = 6;
-+c_7325588.elements = (object *)e_7325854;
-+c_7325588.elements[0] = ((closureN)self_7312893)->elements[0];
-+c_7325588.elements[1] = r_737319_7311699;
-+c_7325588.elements[2] = ((closureN)self_7312893)->elements[1];
-+c_7325588.elements[3] = ((closureN)self_7312893)->elements[2];
-+c_7325588.elements[4] = ((closureN)self_7312893)->elements[3];
-+c_7325588.elements[5] = ((closureN)self_7312893)->elements[4];
++closureN_type c_7325581;
++object e_7325847 [6];
++c_7325581.hdr.mark = gc_color_red;
++ c_7325581.hdr.grayed = 0;
++c_7325581.tag = closureN_tag;
++ c_7325581.fn = (function_type)__lambda_1234;
++c_7325581.num_args = 1;
++c_7325581.num_elements = 6;
++c_7325581.elements = (object *)e_7325847;
++c_7325581.elements[0] = ((closureN)self_7312886)->elements[0];
++c_7325581.elements[1] = r_737312_7311692;
++c_7325581.elements[2] = ((closureN)self_7312886)->elements[1];
++c_7325581.elements[3] = ((closureN)self_7312886)->elements[2];
++c_7325581.elements[4] = ((closureN)self_7312886)->elements[3];
++c_7325581.elements[5] = ((closureN)self_7312886)->elements[4];
  
 -return_closcall2(data,  ((closureN)self_7314186)->elements[1],  &c_7328040, quote_define);; 
-+return_closcall2(data,  ((closureN)self_7312893)->elements[1],  &c_7325588, quote_define);; 
++return_closcall2(data,  ((closureN)self_7312886)->elements[1],  &c_7325581, quote_define);; 
  }
  
 -static void __lambda_1281(void *data, object self_7314187, int argc, object *args) /* object self_7314187, object r_738208_7312946 */
-+static void __lambda_1234(void *data, object self_7312894, int argc, object *args) /* object self_7312894, object r_737440_7311700 */
++static void __lambda_1234(void *data, object self_7312887, int argc, object *args) /* object self_7312887, object r_737433_7311693 */
   {
 - object r_738208_7312946 = args[0];
-+ object r_737440_7311700 = args[0];
++ object r_737433_7311693 = args[0];
    
 -closureN_type c_7328043;
 -object e_7328305 [7];
@@ -4879,32 +4881,32 @@ Make let-values be the same as let*-values, to work around
 -c_7328043.elements[4] = ((closureN)self_7314187)->elements[3];
 -c_7328043.elements[5] = ((closureN)self_7314187)->elements[4];
 -c_7328043.elements[6] = ((closureN)self_7314187)->elements[5];
-+closureN_type c_7325591;
-+object e_7325853 [7];
-+c_7325591.hdr.mark = gc_color_red;
-+ c_7325591.hdr.grayed = 0;
-+c_7325591.tag = closureN_tag;
-+ c_7325591.fn = (function_type)__lambda_1235;
-+c_7325591.num_args = 1;
-+c_7325591.num_elements = 7;
-+c_7325591.elements = (object *)e_7325853;
-+c_7325591.elements[0] = ((closureN)self_7312894)->elements[0];
-+c_7325591.elements[1] = ((closureN)self_7312894)->elements[1];
-+c_7325591.elements[2] = r_737440_7311700;
-+c_7325591.elements[3] = ((closureN)self_7312894)->elements[2];
-+c_7325591.elements[4] = ((closureN)self_7312894)->elements[3];
-+c_7325591.elements[5] = ((closureN)self_7312894)->elements[4];
-+c_7325591.elements[6] = ((closureN)self_7312894)->elements[5];
++closureN_type c_7325584;
++object e_7325846 [7];
++c_7325584.hdr.mark = gc_color_red;
++ c_7325584.hdr.grayed = 0;
++c_7325584.tag = closureN_tag;
++ c_7325584.fn = (function_type)__lambda_1235;
++c_7325584.num_args = 1;
++c_7325584.num_elements = 7;
++c_7325584.elements = (object *)e_7325846;
++c_7325584.elements[0] = ((closureN)self_7312887)->elements[0];
++c_7325584.elements[1] = ((closureN)self_7312887)->elements[1];
++c_7325584.elements[2] = r_737433_7311693;
++c_7325584.elements[3] = ((closureN)self_7312887)->elements[2];
++c_7325584.elements[4] = ((closureN)self_7312887)->elements[3];
++c_7325584.elements[5] = ((closureN)self_7312887)->elements[4];
++c_7325584.elements[6] = ((closureN)self_7312887)->elements[5];
  
 -return_closcall2(data,  ((closureN)self_7314187)->elements[2],  &c_7328043, quote_call_91with_91values);; 
-+return_closcall2(data,  ((closureN)self_7312894)->elements[2],  &c_7325591, quote_call_91with_91values);; 
++return_closcall2(data,  ((closureN)self_7312887)->elements[2],  &c_7325584, quote_call_91with_91values);; 
  }
  
 -static void __lambda_1282(void *data, object self_7314188, int argc, object *args) /* object self_7314188, object r_738216_7312947 */
-+static void __lambda_1235(void *data, object self_7312895, int argc, object *args) /* object self_7312895, object r_737448_7311701 */
++static void __lambda_1235(void *data, object self_7312888, int argc, object *args) /* object self_7312888, object r_737441_7311694 */
   {
 - object r_738216_7312947 = args[0];
-+ object r_737448_7311701 = args[0];
++ object r_737441_7311694 = args[0];
    
 -closureN_type c_7328046;
 -object e_7328304 [8];
@@ -4923,33 +4925,33 @@ Make let-values be the same as let*-values, to work around
 -c_7328046.elements[5] = ((closureN)self_7314188)->elements[4];
 -c_7328046.elements[6] = ((closureN)self_7314188)->elements[5];
 -c_7328046.elements[7] = ((closureN)self_7314188)->elements[6];
-+closureN_type c_7325594;
-+object e_7325852 [8];
-+c_7325594.hdr.mark = gc_color_red;
-+ c_7325594.hdr.grayed = 0;
-+c_7325594.tag = closureN_tag;
-+ c_7325594.fn = (function_type)__lambda_1236;
-+c_7325594.num_args = 1;
-+c_7325594.num_elements = 8;
-+c_7325594.elements = (object *)e_7325852;
-+c_7325594.elements[0] = ((closureN)self_7312895)->elements[0];
-+c_7325594.elements[1] = ((closureN)self_7312895)->elements[1];
-+c_7325594.elements[2] = ((closureN)self_7312895)->elements[2];
-+c_7325594.elements[3] = r_737448_7311701;
-+c_7325594.elements[4] = ((closureN)self_7312895)->elements[3];
-+c_7325594.elements[5] = ((closureN)self_7312895)->elements[4];
-+c_7325594.elements[6] = ((closureN)self_7312895)->elements[5];
-+c_7325594.elements[7] = ((closureN)self_7312895)->elements[6];
++closureN_type c_7325587;
++object e_7325845 [8];
++c_7325587.hdr.mark = gc_color_red;
++ c_7325587.hdr.grayed = 0;
++c_7325587.tag = closureN_tag;
++ c_7325587.fn = (function_type)__lambda_1236;
++c_7325587.num_args = 1;
++c_7325587.num_elements = 8;
++c_7325587.elements = (object *)e_7325845;
++c_7325587.elements[0] = ((closureN)self_7312888)->elements[0];
++c_7325587.elements[1] = ((closureN)self_7312888)->elements[1];
++c_7325587.elements[2] = ((closureN)self_7312888)->elements[2];
++c_7325587.elements[3] = r_737441_7311694;
++c_7325587.elements[4] = ((closureN)self_7312888)->elements[3];
++c_7325587.elements[5] = ((closureN)self_7312888)->elements[4];
++c_7325587.elements[6] = ((closureN)self_7312888)->elements[5];
++c_7325587.elements[7] = ((closureN)self_7312888)->elements[6];
  
 -return_closcall2(data,  ((closureN)self_7314188)->elements[3],  &c_7328046, quote_lambda);; 
-+return_closcall2(data,  ((closureN)self_7312895)->elements[3],  &c_7325594, quote_lambda);; 
++return_closcall2(data,  ((closureN)self_7312888)->elements[3],  &c_7325587, quote_lambda);; 
  }
  
 -static void __lambda_1283(void *data, object self_7314189, int argc, object *args) /* object self_7314189, object r_738226_7312948 */
-+static void __lambda_1236(void *data, object self_7312896, int argc, object *args) /* object self_7312896, object r_737458_7311702 */
++static void __lambda_1236(void *data, object self_7312889, int argc, object *args) /* object self_7312889, object r_737451_7311695 */
   {
 - object r_738226_7312948 = args[0];
-+ object r_737458_7311702 = args[0];
++ object r_737451_7311695 = args[0];
    
 -closureN_type c_7328049;
 -object e_7328303 [9];
@@ -4969,34 +4971,34 @@ Make let-values be the same as let*-values, to work around
 -c_7328049.elements[6] = ((closureN)self_7314189)->elements[5];
 -c_7328049.elements[7] = ((closureN)self_7314189)->elements[6];
 -c_7328049.elements[8] = ((closureN)self_7314189)->elements[7];
-+closureN_type c_7325597;
-+object e_7325851 [9];
-+c_7325597.hdr.mark = gc_color_red;
-+ c_7325597.hdr.grayed = 0;
-+c_7325597.tag = closureN_tag;
-+ c_7325597.fn = (function_type)__lambda_1237;
-+c_7325597.num_args = 1;
-+c_7325597.num_elements = 9;
-+c_7325597.elements = (object *)e_7325851;
-+c_7325597.elements[0] = ((closureN)self_7312896)->elements[0];
-+c_7325597.elements[1] = ((closureN)self_7312896)->elements[1];
-+c_7325597.elements[2] = ((closureN)self_7312896)->elements[2];
-+c_7325597.elements[3] = ((closureN)self_7312896)->elements[3];
-+c_7325597.elements[4] = r_737458_7311702;
-+c_7325597.elements[5] = ((closureN)self_7312896)->elements[4];
-+c_7325597.elements[6] = ((closureN)self_7312896)->elements[5];
-+c_7325597.elements[7] = ((closureN)self_7312896)->elements[6];
-+c_7325597.elements[8] = ((closureN)self_7312896)->elements[7];
++closureN_type c_7325590;
++object e_7325844 [9];
++c_7325590.hdr.mark = gc_color_red;
++ c_7325590.hdr.grayed = 0;
++c_7325590.tag = closureN_tag;
++ c_7325590.fn = (function_type)__lambda_1237;
++c_7325590.num_args = 1;
++c_7325590.num_elements = 9;
++c_7325590.elements = (object *)e_7325844;
++c_7325590.elements[0] = ((closureN)self_7312889)->elements[0];
++c_7325590.elements[1] = ((closureN)self_7312889)->elements[1];
++c_7325590.elements[2] = ((closureN)self_7312889)->elements[2];
++c_7325590.elements[3] = ((closureN)self_7312889)->elements[3];
++c_7325590.elements[4] = r_737451_7311695;
++c_7325590.elements[5] = ((closureN)self_7312889)->elements[4];
++c_7325590.elements[6] = ((closureN)self_7312889)->elements[5];
++c_7325590.elements[7] = ((closureN)self_7312889)->elements[6];
++c_7325590.elements[8] = ((closureN)self_7312889)->elements[7];
  
 -return_closcall2(data,  ((closureN)self_7314189)->elements[4],  &c_7328049, quote__list);; 
-+return_closcall2(data,  ((closureN)self_7312896)->elements[4],  &c_7325597, quote__list);; 
++return_closcall2(data,  ((closureN)self_7312889)->elements[4],  &c_7325590, quote__list);; 
  }
  
 -static void __lambda_1284(void *data, object self_7314190, int argc, object *args) /* object self_7314190, object r_738222_7311658_7311722_7311785_7312949 */
-+static void __lambda_1237(void *data, object self_7312897, int argc, object *args) /* object self_7312897, object r_737454_7310412_7310476_7310539_7311703 */
++static void __lambda_1237(void *data, object self_7312890, int argc, object *args) /* object self_7312890, object r_737447_7310405_7310469_7310532_7311696 */
   {
 - object r_738222_7311658_7311722_7311785_7312949 = args[0];
-+ object r_737454_7310412_7310476_7310539_7311703 = args[0];
++ object r_737447_7310405_7310469_7310532_7311696 = args[0];
    
 -closureN_type c_7328051;
 -object e_7328209 [10];
@@ -5017,25 +5019,25 @@ Make let-values be the same as let*-values, to work around
 -c_7328051.elements[7] = ((closureN)self_7314190)->elements[6];
 -c_7328051.elements[8] = ((closureN)self_7314190)->elements[7];
 -c_7328051.elements[9] = ((closureN)self_7314190)->elements[8];
-+closureN_type c_7325599;
-+object e_7325757 [10];
-+c_7325599.hdr.mark = gc_color_red;
-+ c_7325599.hdr.grayed = 0;
-+c_7325599.tag = closureN_tag;
-+ c_7325599.fn = (function_type)__lambda_1238;
-+c_7325599.num_args = 1;
-+c_7325599.num_elements = 10;
-+c_7325599.elements = (object *)e_7325757;
-+c_7325599.elements[0] = ((closureN)self_7312897)->elements[0];
-+c_7325599.elements[1] = ((closureN)self_7312897)->elements[1];
-+c_7325599.elements[2] = ((closureN)self_7312897)->elements[2];
-+c_7325599.elements[3] = ((closureN)self_7312897)->elements[3];
-+c_7325599.elements[4] = r_737454_7310412_7310476_7310539_7311703;
-+c_7325599.elements[5] = ((closureN)self_7312897)->elements[4];
-+c_7325599.elements[6] = ((closureN)self_7312897)->elements[5];
-+c_7325599.elements[7] = ((closureN)self_7312897)->elements[6];
-+c_7325599.elements[8] = ((closureN)self_7312897)->elements[7];
-+c_7325599.elements[9] = ((closureN)self_7312897)->elements[8];
++closureN_type c_7325592;
++object e_7325750 [10];
++c_7325592.hdr.mark = gc_color_red;
++ c_7325592.hdr.grayed = 0;
++c_7325592.tag = closureN_tag;
++ c_7325592.fn = (function_type)__lambda_1238;
++c_7325592.num_args = 1;
++c_7325592.num_elements = 10;
++c_7325592.elements = (object *)e_7325750;
++c_7325592.elements[0] = ((closureN)self_7312890)->elements[0];
++c_7325592.elements[1] = ((closureN)self_7312890)->elements[1];
++c_7325592.elements[2] = ((closureN)self_7312890)->elements[2];
++c_7325592.elements[3] = ((closureN)self_7312890)->elements[3];
++c_7325592.elements[4] = r_737447_7310405_7310469_7310532_7311696;
++c_7325592.elements[5] = ((closureN)self_7312890)->elements[4];
++c_7325592.elements[6] = ((closureN)self_7312890)->elements[5];
++c_7325592.elements[7] = ((closureN)self_7312890)->elements[6];
++c_7325592.elements[8] = ((closureN)self_7312890)->elements[7];
++c_7325592.elements[9] = ((closureN)self_7312890)->elements[8];
  
  
 -closureN_type c_7328210;
@@ -5049,27 +5051,27 @@ Make let-values be the same as let*-values, to work around
 -c_7328210.elements = (object *)e_7328302;
 -c_7328210.elements[0] = ((closureN)self_7314190)->elements[5];
 -c_7328210.elements[1] = ((closureN)self_7314190)->elements[8];
-+closureN_type c_7325758;
-+object e_7325850 [2];
-+c_7325758.hdr.mark = gc_color_red;
-+ c_7325758.hdr.grayed = 0;
-+c_7325758.tag = closureN_tag;
-+ c_7325758.fn = (function_type)__lambda_1248;
-+c_7325758.num_args = 1;
-+c_7325758.num_elements = 2;
-+c_7325758.elements = (object *)e_7325850;
-+c_7325758.elements[0] = ((closureN)self_7312897)->elements[5];
-+c_7325758.elements[1] = ((closureN)self_7312897)->elements[8];
++closureN_type c_7325751;
++object e_7325843 [2];
++c_7325751.hdr.mark = gc_color_red;
++ c_7325751.hdr.grayed = 0;
++c_7325751.tag = closureN_tag;
++ c_7325751.fn = (function_type)__lambda_1248;
++c_7325751.num_args = 1;
++c_7325751.num_elements = 2;
++c_7325751.elements = (object *)e_7325843;
++c_7325751.elements[0] = ((closureN)self_7312890)->elements[5];
++c_7325751.elements[1] = ((closureN)self_7312890)->elements[8];
  
 -return_direct_with_clo1(data,(closure)&c_7328051,__lambda_1285,  &c_7328210);; 
-+return_direct_with_clo1(data,(closure)&c_7325599,__lambda_1238,  &c_7325758);; 
++return_direct_with_clo1(data,(closure)&c_7325592,__lambda_1238,  &c_7325751);; 
  }
  
 -static void __lambda_1295(void *data, object self_7314191, int argc, object *args) /* object self_7314191, object k_738153_7311695_7311759_7311822_7311883_7311943_7312002_7312060_7312117_7312173_7312960, object var1_732760_732825_734058_7311696_7311760_7311823_7311884_7311944_7312003_7312061_7312118_7312174_7312961 */
-+static void __lambda_1248(void *data, object self_7312898, int argc, object *args) /* object self_7312898, object k_737385_7310449_7310513_7310576_7310637_7310697_7310756_7310814_7310871_7310927_7311714, object var1_732420_732485_733613_7310450_7310514_7310577_7310638_7310698_7310757_7310815_7310872_7310928_7311715 */
++static void __lambda_1248(void *data, object self_7312891, int argc, object *args) /* object self_7312891, object k_737378_7310442_7310506_7310569_7310630_7310690_7310749_7310807_7310864_7310920_7311707, object var1_732413_732478_733606_7310443_7310507_7310570_7310631_7310691_7310750_7310808_7310865_7310921_7311708 */
   {
 - object k_738153_7311695_7311759_7311822_7311883_7311943_7312002_7312060_7312117_7312173_7312960 = args[0]; object var1_732760_732825_734058_7311696_7311760_7311823_7311884_7311944_7312003_7312061_7312118_7312174_7312961 = args[1];
-+ object k_737385_7310449_7310513_7310576_7310637_7310697_7310756_7310814_7310871_7310927_7311714 = args[0]; object var1_732420_732485_733613_7310450_7310514_7310577_7310638_7310698_7310757_7310815_7310872_7310928_7311715 = args[1];
++ object k_737378_7310442_7310506_7310569_7310630_7310690_7310749_7310807_7310864_7310920_7311707 = args[0]; object var1_732413_732478_733606_7310443_7310507_7310570_7310631_7310691_7310750_7310808_7310865_7310921_7311708 = args[1];
    
 -closureN_type c_7328213;
 -object e_7328301 [4];
@@ -5084,29 +5086,29 @@ Make let-values be the same as let*-values, to work around
 -c_7328213.elements[1] = ((closureN)self_7314191)->elements[0];
 -c_7328213.elements[2] = ((closureN)self_7314191)->elements[1];
 -c_7328213.elements[3] = var1_732760_732825_734058_7311696_7311760_7311823_7311884_7311944_7312003_7312061_7312118_7312174_7312961;
-+closureN_type c_7325761;
-+object e_7325849 [4];
-+c_7325761.hdr.mark = gc_color_red;
-+ c_7325761.hdr.grayed = 0;
-+c_7325761.tag = closureN_tag;
-+ c_7325761.fn = (function_type)__lambda_1249;
-+c_7325761.num_args = 1;
-+c_7325761.num_elements = 4;
-+c_7325761.elements = (object *)e_7325849;
-+c_7325761.elements[0] = k_737385_7310449_7310513_7310576_7310637_7310697_7310756_7310814_7310871_7310927_7311714;
-+c_7325761.elements[1] = ((closureN)self_7312898)->elements[0];
-+c_7325761.elements[2] = ((closureN)self_7312898)->elements[1];
-+c_7325761.elements[3] = var1_732420_732485_733613_7310450_7310514_7310577_7310638_7310698_7310757_7310815_7310872_7310928_7311715;
++closureN_type c_7325754;
++object e_7325842 [4];
++c_7325754.hdr.mark = gc_color_red;
++ c_7325754.hdr.grayed = 0;
++c_7325754.tag = closureN_tag;
++ c_7325754.fn = (function_type)__lambda_1249;
++c_7325754.num_args = 1;
++c_7325754.num_elements = 4;
++c_7325754.elements = (object *)e_7325842;
++c_7325754.elements[0] = k_737378_7310442_7310506_7310569_7310630_7310690_7310749_7310807_7310864_7310920_7311707;
++c_7325754.elements[1] = ((closureN)self_7312891)->elements[0];
++c_7325754.elements[2] = ((closureN)self_7312891)->elements[1];
++c_7325754.elements[3] = var1_732413_732478_733606_7310443_7310507_7310570_7310631_7310691_7310750_7310808_7310865_7310921_7311708;
  
 -return_closcall2(data,  ((closureN)self_7314191)->elements[0],  &c_7328213, quote_define);; 
-+return_closcall2(data,  ((closureN)self_7312898)->elements[0],  &c_7325761, quote_define);; 
++return_closcall2(data,  ((closureN)self_7312891)->elements[0],  &c_7325754, quote_define);; 
  }
  
 -static void __lambda_1296(void *data, object self_7314192, int argc, object *args) /* object self_7314192, object r_738154_7311697_7311761_7311824_7311885_7311945_7312004_7312062_7312119_7312175_7312962 */
-+static void __lambda_1249(void *data, object self_7312899, int argc, object *args) /* object self_7312899, object r_737386_7310451_7310515_7310578_7310639_7310699_7310758_7310816_7310873_7310929_7311716 */
++static void __lambda_1249(void *data, object self_7312892, int argc, object *args) /* object self_7312892, object r_737379_7310444_7310508_7310571_7310632_7310692_7310751_7310809_7310866_7310922_7311709 */
   {
 - object r_738154_7311697_7311761_7311824_7311885_7311945_7312004_7312062_7312119_7312175_7312962 = args[0];
-+ object r_737386_7310451_7310515_7310578_7310639_7310699_7310758_7310816_7310873_7310929_7311716 = args[0];
++ object r_737379_7310444_7310508_7310571_7310632_7310692_7310751_7310809_7310866_7310922_7311709 = args[0];
    
 -closureN_type c_7328216;
 -object e_7328300 [5];
@@ -5122,30 +5124,30 @@ Make let-values be the same as let*-values, to work around
 -c_7328216.elements[2] = ((closureN)self_7314192)->elements[1];
 -c_7328216.elements[3] = ((closureN)self_7314192)->elements[2];
 -c_7328216.elements[4] = ((closureN)self_7314192)->elements[3];
-+closureN_type c_7325764;
-+object e_7325848 [5];
-+c_7325764.hdr.mark = gc_color_red;
-+ c_7325764.hdr.grayed = 0;
-+c_7325764.tag = closureN_tag;
-+ c_7325764.fn = (function_type)__lambda_1250;
-+c_7325764.num_args = 1;
-+c_7325764.num_elements = 5;
-+c_7325764.elements = (object *)e_7325848;
-+c_7325764.elements[0] = ((closureN)self_7312899)->elements[0];
-+c_7325764.elements[1] = r_737386_7310451_7310515_7310578_7310639_7310699_7310758_7310816_7310873_7310929_7311716;
-+c_7325764.elements[2] = ((closureN)self_7312899)->elements[1];
-+c_7325764.elements[3] = ((closureN)self_7312899)->elements[2];
-+c_7325764.elements[4] = ((closureN)self_7312899)->elements[3];
++closureN_type c_7325757;
++object e_7325841 [5];
++c_7325757.hdr.mark = gc_color_red;
++ c_7325757.hdr.grayed = 0;
++c_7325757.tag = closureN_tag;
++ c_7325757.fn = (function_type)__lambda_1250;
++c_7325757.num_args = 1;
++c_7325757.num_elements = 5;
++c_7325757.elements = (object *)e_7325841;
++c_7325757.elements[0] = ((closureN)self_7312892)->elements[0];
++c_7325757.elements[1] = r_737379_7310444_7310508_7310571_7310632_7310692_7310751_7310809_7310866_7310922_7311709;
++c_7325757.elements[2] = ((closureN)self_7312892)->elements[1];
++c_7325757.elements[3] = ((closureN)self_7312892)->elements[2];
++c_7325757.elements[4] = ((closureN)self_7312892)->elements[3];
  
 -return_closcall2(data,  ((closureN)self_7314192)->elements[1],  &c_7328216, quote_let);; 
-+return_closcall2(data,  ((closureN)self_7312899)->elements[1],  &c_7325764, quote_let);; 
++return_closcall2(data,  ((closureN)self_7312892)->elements[1],  &c_7325757, quote_let);; 
  }
  
 -static void __lambda_1297(void *data, object self_7314193, int argc, object *args) /* object self_7314193, object r_738162_7311698_7311762_7311825_7311886_7311946_7312005_7312063_7312120_7312176_7312963 */
-+static void __lambda_1250(void *data, object self_7312900, int argc, object *args) /* object self_7312900, object r_737394_7310452_7310516_7310579_7310640_7310700_7310759_7310817_7310874_7310930_7311717 */
++static void __lambda_1250(void *data, object self_7312893, int argc, object *args) /* object self_7312893, object r_737387_7310445_7310509_7310572_7310633_7310693_7310752_7310810_7310867_7310923_7311710 */
   {
 - object r_738162_7311698_7311762_7311825_7311886_7311946_7312005_7312063_7312120_7312176_7312963 = args[0];
-+ object r_737394_7310452_7310516_7310579_7310640_7310700_7310759_7310817_7310874_7310930_7311717 = args[0];
++ object r_737387_7310445_7310509_7310572_7310633_7310693_7310752_7310810_7310867_7310923_7311710 = args[0];
    
 -closureN_type c_7328219;
 -object e_7328299 [6];
@@ -5162,31 +5164,31 @@ Make let-values be the same as let*-values, to work around
 -c_7328219.elements[3] = ((closureN)self_7314193)->elements[2];
 -c_7328219.elements[4] = ((closureN)self_7314193)->elements[3];
 -c_7328219.elements[5] = ((closureN)self_7314193)->elements[4];
-+closureN_type c_7325767;
-+object e_7325847 [6];
-+c_7325767.hdr.mark = gc_color_red;
-+ c_7325767.hdr.grayed = 0;
-+c_7325767.tag = closureN_tag;
-+ c_7325767.fn = (function_type)__lambda_1251;
-+c_7325767.num_args = 1;
-+c_7325767.num_elements = 6;
-+c_7325767.elements = (object *)e_7325847;
-+c_7325767.elements[0] = ((closureN)self_7312900)->elements[0];
-+c_7325767.elements[1] = ((closureN)self_7312900)->elements[1];
-+c_7325767.elements[2] = r_737394_7310452_7310516_7310579_7310640_7310700_7310759_7310817_7310874_7310930_7311717;
-+c_7325767.elements[3] = ((closureN)self_7312900)->elements[2];
-+c_7325767.elements[4] = ((closureN)self_7312900)->elements[3];
-+c_7325767.elements[5] = ((closureN)self_7312900)->elements[4];
++closureN_type c_7325760;
++object e_7325840 [6];
++c_7325760.hdr.mark = gc_color_red;
++ c_7325760.hdr.grayed = 0;
++c_7325760.tag = closureN_tag;
++ c_7325760.fn = (function_type)__lambda_1251;
++c_7325760.num_args = 1;
++c_7325760.num_elements = 6;
++c_7325760.elements = (object *)e_7325840;
++c_7325760.elements[0] = ((closureN)self_7312893)->elements[0];
++c_7325760.elements[1] = ((closureN)self_7312893)->elements[1];
++c_7325760.elements[2] = r_737387_7310445_7310509_7310572_7310633_7310693_7310752_7310810_7310867_7310923_7311710;
++c_7325760.elements[3] = ((closureN)self_7312893)->elements[2];
++c_7325760.elements[4] = ((closureN)self_7312893)->elements[3];
++c_7325760.elements[5] = ((closureN)self_7312893)->elements[4];
  
 -return_closcall2(data,  ((closureN)self_7314193)->elements[2],  &c_7328219, quote_v);; 
-+return_closcall2(data,  ((closureN)self_7312900)->elements[2],  &c_7325767, quote_v);; 
++return_closcall2(data,  ((closureN)self_7312893)->elements[2],  &c_7325760, quote_v);; 
  }
  
 -static void __lambda_1298(void *data, object self_7314194, int argc, object *args) /* object self_7314194, object r_738193_7311699_7311763_7311826_7311887_7311947_7312006_7312064_7312121_7312177_7312964 */
-+static void __lambda_1251(void *data, object self_7312901, int argc, object *args) /* object self_7312901, object r_737425_7310453_7310517_7310580_7310641_7310701_7310760_7310818_7310875_7310931_7311718 */
++static void __lambda_1251(void *data, object self_7312894, int argc, object *args) /* object self_7312894, object r_737418_7310446_7310510_7310573_7310634_7310694_7310753_7310811_7310868_7310924_7311711 */
   {
 - object r_738193_7311699_7311763_7311826_7311887_7311947_7312006_7312064_7312121_7312177_7312964 = args[0];
-+ object r_737425_7310453_7310517_7310580_7310641_7310701_7310760_7310818_7310875_7310931_7311718 = args[0];
++ object r_737418_7310446_7310510_7310573_7310634_7310694_7310753_7310811_7310868_7310924_7311711 = args[0];
    
 -closureN_type c_7328222;
 -object e_7328298 [7];
@@ -5204,32 +5206,32 @@ Make let-values be the same as let*-values, to work around
 -c_7328222.elements[4] = ((closureN)self_7314194)->elements[3];
 -c_7328222.elements[5] = ((closureN)self_7314194)->elements[4];
 -c_7328222.elements[6] = ((closureN)self_7314194)->elements[5];
-+closureN_type c_7325770;
-+object e_7325846 [7];
-+c_7325770.hdr.mark = gc_color_red;
-+ c_7325770.hdr.grayed = 0;
-+c_7325770.tag = closureN_tag;
-+ c_7325770.fn = (function_type)__lambda_1252;
-+c_7325770.num_args = 1;
-+c_7325770.num_elements = 7;
-+c_7325770.elements = (object *)e_7325846;
-+c_7325770.elements[0] = ((closureN)self_7312901)->elements[0];
-+c_7325770.elements[1] = ((closureN)self_7312901)->elements[1];
-+c_7325770.elements[2] = ((closureN)self_7312901)->elements[2];
-+c_7325770.elements[3] = r_737425_7310453_7310517_7310580_7310641_7310701_7310760_7310818_7310875_7310931_7311718;
-+c_7325770.elements[4] = ((closureN)self_7312901)->elements[3];
-+c_7325770.elements[5] = ((closureN)self_7312901)->elements[4];
-+c_7325770.elements[6] = ((closureN)self_7312901)->elements[5];
++closureN_type c_7325763;
++object e_7325839 [7];
++c_7325763.hdr.mark = gc_color_red;
++ c_7325763.hdr.grayed = 0;
++c_7325763.tag = closureN_tag;
++ c_7325763.fn = (function_type)__lambda_1252;
++c_7325763.num_args = 1;
++c_7325763.num_elements = 7;
++c_7325763.elements = (object *)e_7325839;
++c_7325763.elements[0] = ((closureN)self_7312894)->elements[0];
++c_7325763.elements[1] = ((closureN)self_7312894)->elements[1];
++c_7325763.elements[2] = ((closureN)self_7312894)->elements[2];
++c_7325763.elements[3] = r_737418_7310446_7310510_7310573_7310634_7310694_7310753_7310811_7310868_7310924_7311711;
++c_7325763.elements[4] = ((closureN)self_7312894)->elements[3];
++c_7325763.elements[5] = ((closureN)self_7312894)->elements[4];
++c_7325763.elements[6] = ((closureN)self_7312894)->elements[5];
  
 -return_closcall2(data,  ((closureN)self_7314194)->elements[3],  &c_7328222, quote_cadr);; 
-+return_closcall2(data,  ((closureN)self_7312901)->elements[3],  &c_7325770, quote_cadr);; 
++return_closcall2(data,  ((closureN)self_7312894)->elements[3],  &c_7325763, quote_cadr);; 
  }
  
 -static void __lambda_1299(void *data, object self_7314195, int argc, object *args) /* object self_7314195, object r_738199_7311700_7311764_7311827_7311888_7311948_7312007_7312065_7312122_7312178_7312965 */
-+static void __lambda_1252(void *data, object self_7312902, int argc, object *args) /* object self_7312902, object r_737431_7310454_7310518_7310581_7310642_7310702_7310761_7310819_7310876_7310932_7311719 */
++static void __lambda_1252(void *data, object self_7312895, int argc, object *args) /* object self_7312895, object r_737424_7310447_7310511_7310574_7310635_7310695_7310754_7310812_7310869_7310925_7311712 */
   {
 - object r_738199_7311700_7311764_7311827_7311888_7311948_7312007_7312065_7312122_7312178_7312965 = args[0];
-+ object r_737431_7310454_7310518_7310581_7310642_7310702_7310761_7310819_7310876_7310932_7311719 = args[0];
++ object r_737424_7310447_7310511_7310574_7310635_7310695_7310754_7310812_7310869_7310925_7311712 = args[0];
    
 -closureN_type c_7328225;
 -object e_7328297 [8];
@@ -5248,33 +5250,33 @@ Make let-values be the same as let*-values, to work around
 -c_7328225.elements[5] = ((closureN)self_7314195)->elements[4];
 -c_7328225.elements[6] = ((closureN)self_7314195)->elements[5];
 -c_7328225.elements[7] = ((closureN)self_7314195)->elements[6];
-+closureN_type c_7325773;
-+object e_7325845 [8];
-+c_7325773.hdr.mark = gc_color_red;
-+ c_7325773.hdr.grayed = 0;
-+c_7325773.tag = closureN_tag;
-+ c_7325773.fn = (function_type)__lambda_1253;
-+c_7325773.num_args = 1;
-+c_7325773.num_elements = 8;
-+c_7325773.elements = (object *)e_7325845;
-+c_7325773.elements[0] = ((closureN)self_7312902)->elements[0];
-+c_7325773.elements[1] = ((closureN)self_7312902)->elements[1];
-+c_7325773.elements[2] = ((closureN)self_7312902)->elements[2];
-+c_7325773.elements[3] = ((closureN)self_7312902)->elements[3];
-+c_7325773.elements[4] = r_737431_7310454_7310518_7310581_7310642_7310702_7310761_7310819_7310876_7310932_7311719;
-+c_7325773.elements[5] = ((closureN)self_7312902)->elements[4];
-+c_7325773.elements[6] = ((closureN)self_7312902)->elements[5];
-+c_7325773.elements[7] = ((closureN)self_7312902)->elements[6];
++closureN_type c_7325766;
++object e_7325838 [8];
++c_7325766.hdr.mark = gc_color_red;
++ c_7325766.hdr.grayed = 0;
++c_7325766.tag = closureN_tag;
++ c_7325766.fn = (function_type)__lambda_1253;
++c_7325766.num_args = 1;
++c_7325766.num_elements = 8;
++c_7325766.elements = (object *)e_7325838;
++c_7325766.elements[0] = ((closureN)self_7312895)->elements[0];
++c_7325766.elements[1] = ((closureN)self_7312895)->elements[1];
++c_7325766.elements[2] = ((closureN)self_7312895)->elements[2];
++c_7325766.elements[3] = ((closureN)self_7312895)->elements[3];
++c_7325766.elements[4] = r_737424_7310447_7310511_7310574_7310635_7310695_7310754_7310812_7310869_7310925_7311712;
++c_7325766.elements[5] = ((closureN)self_7312895)->elements[4];
++c_7325766.elements[6] = ((closureN)self_7312895)->elements[5];
++c_7325766.elements[7] = ((closureN)self_7312895)->elements[6];
  
 -return_closcall2(data,  ((closureN)self_7314195)->elements[4],  &c_7328225, quote_set_91cdr_67);; 
-+return_closcall2(data,  ((closureN)self_7312902)->elements[4],  &c_7325773, quote_set_91cdr_67);; 
++return_closcall2(data,  ((closureN)self_7312895)->elements[4],  &c_7325766, quote_set_91cdr_67);; 
  }
  
 -static void __lambda_1300(void *data, object self_7314196, int argc, object *args) /* object self_7314196, object r_738175_7311706_7311770_7311833_7311894_7311954_7312013_7312071_7312128_7312184_7312451_7312469_7312486_7312502_7312517_7312966 */
-+static void __lambda_1253(void *data, object self_7312903, int argc, object *args) /* object self_7312903, object r_737407_7310460_7310524_7310587_7310648_7310708_7310767_7310825_7310882_7310938_7311205_7311223_7311240_7311256_7311271_7311720 */
++static void __lambda_1253(void *data, object self_7312896, int argc, object *args) /* object self_7312896, object r_737400_7310453_7310517_7310580_7310641_7310701_7310760_7310818_7310875_7310931_7311198_7311216_7311233_7311249_7311264_7311713 */
   {
 - object r_738175_7311706_7311770_7311833_7311894_7311954_7312013_7312071_7312128_7312184_7312451_7312469_7312486_7312502_7312517_7312966 = args[0];
-+ object r_737407_7310460_7310524_7310587_7310648_7310708_7310767_7310825_7310882_7310938_7311205_7311223_7311240_7311256_7311271_7311720 = args[0];
++ object r_737400_7310453_7310517_7310580_7310641_7310701_7310760_7310818_7310875_7310931_7311198_7311216_7311233_7311249_7311264_7311713 = args[0];
    
 -closureN_type c_7328228;
 -object e_7328296 [9];
@@ -5294,34 +5296,34 @@ Make let-values be the same as let*-values, to work around
 -c_7328228.elements[6] = ((closureN)self_7314196)->elements[5];
 -c_7328228.elements[7] = ((closureN)self_7314196)->elements[6];
 -c_7328228.elements[8] = ((closureN)self_7314196)->elements[7];
-+closureN_type c_7325776;
-+object e_7325844 [9];
-+c_7325776.hdr.mark = gc_color_red;
-+ c_7325776.hdr.grayed = 0;
-+c_7325776.tag = closureN_tag;
-+ c_7325776.fn = (function_type)__lambda_1254;
-+c_7325776.num_args = 1;
-+c_7325776.num_elements = 9;
-+c_7325776.elements = (object *)e_7325844;
-+c_7325776.elements[0] = ((closureN)self_7312903)->elements[0];
-+c_7325776.elements[1] = ((closureN)self_7312903)->elements[1];
-+c_7325776.elements[2] = ((closureN)self_7312903)->elements[2];
-+c_7325776.elements[3] = r_737407_7310460_7310524_7310587_7310648_7310708_7310767_7310825_7310882_7310938_7311205_7311223_7311240_7311256_7311271_7311720;
-+c_7325776.elements[4] = ((closureN)self_7312903)->elements[3];
-+c_7325776.elements[5] = ((closureN)self_7312903)->elements[4];
-+c_7325776.elements[6] = ((closureN)self_7312903)->elements[5];
-+c_7325776.elements[7] = ((closureN)self_7312903)->elements[6];
-+c_7325776.elements[8] = ((closureN)self_7312903)->elements[7];
++closureN_type c_7325769;
++object e_7325837 [9];
++c_7325769.hdr.mark = gc_color_red;
++ c_7325769.hdr.grayed = 0;
++c_7325769.tag = closureN_tag;
++ c_7325769.fn = (function_type)__lambda_1254;
++c_7325769.num_args = 1;
++c_7325769.num_elements = 9;
++c_7325769.elements = (object *)e_7325837;
++c_7325769.elements[0] = ((closureN)self_7312896)->elements[0];
++c_7325769.elements[1] = ((closureN)self_7312896)->elements[1];
++c_7325769.elements[2] = ((closureN)self_7312896)->elements[2];
++c_7325769.elements[3] = r_737400_7310453_7310517_7310580_7310641_7310701_7310760_7310818_7310875_7310931_7311198_7311216_7311233_7311249_7311264_7311713;
++c_7325769.elements[4] = ((closureN)self_7312896)->elements[3];
++c_7325769.elements[5] = ((closureN)self_7312896)->elements[4];
++c_7325769.elements[6] = ((closureN)self_7312896)->elements[5];
++c_7325769.elements[7] = ((closureN)self_7312896)->elements[6];
++c_7325769.elements[8] = ((closureN)self_7312896)->elements[7];
  
 -return_closcall2(data,  ((closureN)self_7314196)->elements[5],  &c_7328228, quote_cddr);; 
-+return_closcall2(data,  ((closureN)self_7312903)->elements[5],  &c_7325776, quote_cddr);; 
++return_closcall2(data,  ((closureN)self_7312896)->elements[5],  &c_7325769, quote_cddr);; 
  }
  
 -static void __lambda_1301(void *data, object self_7314197, int argc, object *args) /* object self_7314197, object r_738183_7311707_7311771_7311834_7311895_7311955_7312014_7312072_7312129_7312185_7312452_7312470_7312487_7312503_7312518_7312967 */
-+static void __lambda_1254(void *data, object self_7312904, int argc, object *args) /* object self_7312904, object r_737415_7310461_7310525_7310588_7310649_7310709_7310768_7310826_7310883_7310939_7311206_7311224_7311241_7311257_7311272_7311721 */
++static void __lambda_1254(void *data, object self_7312897, int argc, object *args) /* object self_7312897, object r_737408_7310454_7310518_7310581_7310642_7310702_7310761_7310819_7310876_7310932_7311199_7311217_7311234_7311250_7311265_7311714 */
   {
 - object r_738183_7311707_7311771_7311834_7311895_7311955_7312014_7312072_7312129_7312185_7312452_7312470_7312487_7312503_7312518_7312967 = args[0];
-+ object r_737415_7310461_7310525_7310588_7310649_7310709_7310768_7310826_7310883_7310939_7311206_7311224_7311241_7311257_7311272_7311721 = args[0];
++ object r_737408_7310454_7310518_7310581_7310642_7310702_7310761_7310819_7310876_7310932_7311199_7311217_7311234_7311250_7311265_7311714 = args[0];
    
 -closureN_type c_7328231;
 -object e_7328295 [9];
@@ -5341,94 +5343,94 @@ Make let-values be the same as let*-values, to work around
 -c_7328231.elements[6] = ((closureN)self_7314197)->elements[5];
 -c_7328231.elements[7] = ((closureN)self_7314197)->elements[7];
 -c_7328231.elements[8] = ((closureN)self_7314197)->elements[8];
-+closureN_type c_7325779;
-+object e_7325843 [9];
-+c_7325779.hdr.mark = gc_color_red;
-+ c_7325779.hdr.grayed = 0;
-+c_7325779.tag = closureN_tag;
-+ c_7325779.fn = (function_type)__lambda_1255;
-+c_7325779.num_args = 1;
-+c_7325779.num_elements = 9;
-+c_7325779.elements = (object *)e_7325843;
-+c_7325779.elements[0] = ((closureN)self_7312904)->elements[0];
-+c_7325779.elements[1] = ((closureN)self_7312904)->elements[1];
-+c_7325779.elements[2] = ((closureN)self_7312904)->elements[2];
-+c_7325779.elements[3] = ((closureN)self_7312904)->elements[3];
-+c_7325779.elements[4] = r_737415_7310461_7310525_7310588_7310649_7310709_7310768_7310826_7310883_7310939_7311206_7311224_7311241_7311257_7311272_7311721;
-+c_7325779.elements[5] = ((closureN)self_7312904)->elements[4];
-+c_7325779.elements[6] = ((closureN)self_7312904)->elements[5];
-+c_7325779.elements[7] = ((closureN)self_7312904)->elements[7];
-+c_7325779.elements[8] = ((closureN)self_7312904)->elements[8];
++closureN_type c_7325772;
++object e_7325836 [9];
++c_7325772.hdr.mark = gc_color_red;
++ c_7325772.hdr.grayed = 0;
++c_7325772.tag = closureN_tag;
++ c_7325772.fn = (function_type)__lambda_1255;
++c_7325772.num_args = 1;
++c_7325772.num_elements = 9;
++c_7325772.elements = (object *)e_7325836;
++c_7325772.elements[0] = ((closureN)self_7312897)->elements[0];
++c_7325772.elements[1] = ((closureN)self_7312897)->elements[1];
++c_7325772.elements[2] = ((closureN)self_7312897)->elements[2];
++c_7325772.elements[3] = ((closureN)self_7312897)->elements[3];
++c_7325772.elements[4] = r_737408_7310454_7310518_7310581_7310642_7310702_7310761_7310819_7310876_7310932_7311199_7311217_7311234_7311250_7311265_7311714;
++c_7325772.elements[5] = ((closureN)self_7312897)->elements[4];
++c_7325772.elements[6] = ((closureN)self_7312897)->elements[5];
++c_7325772.elements[7] = ((closureN)self_7312897)->elements[7];
++c_7325772.elements[8] = ((closureN)self_7312897)->elements[8];
  
 -return_closcall2(data,  ((closureN)self_7314197)->elements[6],  &c_7328231, quote_v);; 
-+return_closcall2(data,  ((closureN)self_7312904)->elements[6],  &c_7325779, quote_v);; 
++return_closcall2(data,  ((closureN)self_7312897)->elements[6],  &c_7325772, quote_v);; 
  }
  
 -static void __lambda_1302(void *data, object self_7314198, int argc, object *args) /* object self_7314198, object r_738171_7311713_7311777_7311840_7311901_7311961_7312020_7312078_7312135_7312191_7312458_7312476_7312493_7312509_7312524_7312536_7312547_7312557_7312566_7312574_7312968 */
-+static void __lambda_1255(void *data, object self_7312905, int argc, object *args) /* object self_7312905, object r_737403_7310467_7310531_7310594_7310655_7310715_7310774_7310832_7310889_7310945_7311212_7311230_7311247_7311263_7311278_7311290_7311301_7311311_7311320_7311328_7311722 */
++static void __lambda_1255(void *data, object self_7312898, int argc, object *args) /* object self_7312898, object r_737396_7310460_7310524_7310587_7310648_7310708_7310767_7310825_7310882_7310938_7311205_7311223_7311240_7311256_7311271_7311283_7311294_7311304_7311313_7311321_7311715 */
   {
 - object r_738171_7311713_7311777_7311840_7311901_7311961_7312020_7312078_7312135_7312191_7312458_7312476_7312493_7312509_7312524_7312536_7312547_7312557_7312566_7312574_7312968 = args[0];
-+ object r_737403_7310467_7310531_7310594_7310655_7310715_7310774_7310832_7310889_7310945_7311212_7311230_7311247_7311263_7311278_7311290_7311301_7311311_7311320_7311328_7311722 = args[0];
++ object r_737396_7310460_7310524_7310587_7310648_7310708_7310767_7310825_7310882_7310938_7311205_7311223_7311240_7311256_7311271_7311283_7311294_7311304_7311313_7311321_7311715 = args[0];
    
 -pair_type local_7328236; 
-+pair_type local_7325784; 
++pair_type local_7325777; 
  
 -pair_type local_7328240; 
-+pair_type local_7325788; 
++pair_type local_7325781; 
  
 -pair_type local_7328244; 
-+pair_type local_7325792; 
++pair_type local_7325785; 
  
 -pair_type local_7328247; 
-+pair_type local_7325795; 
++pair_type local_7325788; 
  
 -pair_type local_7328251; 
-+pair_type local_7325799; 
++pair_type local_7325792; 
  
 -pair_type local_7328254; 
-+pair_type local_7325802; 
++pair_type local_7325795; 
  
 -pair_type local_7328257; 
-+pair_type local_7325805; 
++pair_type local_7325798; 
  
 -pair_type local_7328261; 
-+pair_type local_7325809; 
++pair_type local_7325802; 
  
 -pair_type local_7328264; 
-+pair_type local_7325812; 
++pair_type local_7325805; 
  
 -pair_type local_7328268; 
-+pair_type local_7325816; 
++pair_type local_7325809; 
  
 -pair_type local_7328272; 
-+pair_type local_7325820; 
++pair_type local_7325813; 
  
 -pair_type local_7328275; 
-+pair_type local_7325823; 
++pair_type local_7325816; 
  
 -pair_type local_7328279; 
-+pair_type local_7325827; 
++pair_type local_7325820; 
  
 -pair_type local_7328283; 
-+pair_type local_7325831; 
++pair_type local_7325824; 
  
 -pair_type local_7328286; 
-+pair_type local_7325834; 
++pair_type local_7325827; 
  
 -pair_type local_7328290; 
-+pair_type local_7325838; 
++pair_type local_7325831; 
  
 -pair_type local_7328294; 
 -return_direct_with_clo1(data,  ((closureN)self_7314198)->elements[0], (((closure)  ((closureN)self_7314198)->elements[0])->fn),  set_pair_as_expr(&local_7328236, ((closureN)self_7314198)->elements[1], set_pair_as_expr(&local_7328240, ((closureN)self_7314198)->elements[8], set_pair_as_expr(&local_7328244, set_pair_as_expr(&local_7328247, ((closureN)self_7314198)->elements[2], set_pair_as_expr(&local_7328251, set_pair_as_expr(&local_7328254, set_pair_as_expr(&local_7328257, ((closureN)self_7314198)->elements[5], set_pair_as_expr(&local_7328261, set_pair_as_expr(&local_7328264, ((closureN)self_7314198)->elements[6], set_pair_as_expr(&local_7328268, ((closureN)self_7314198)->elements[7], NULL)), NULL)), NULL), set_pair_as_expr(&local_7328272, set_pair_as_expr(&local_7328275, ((closureN)self_7314198)->elements[3], set_pair_as_expr(&local_7328279, ((closureN)self_7314198)->elements[7], set_pair_as_expr(&local_7328283, set_pair_as_expr(&local_7328286, ((closureN)self_7314198)->ele
ments[4], set_pair_as_expr(&local_7328290, ((closureN)self_7314198)->elements[7], NULL)), NULL))), set_pair_as_expr(&local_7328294, r_738171_7311713_7311777_7311840_7311901_7311961_7312020_7312078_7312135_7312191_7312458_7312476_7312493_7312509_7312524_7312536_7312547_7312557_7312566_7312574_7312968, NULL)))), NULL))));; 
-+pair_type local_7325842; 
-+return_direct_with_clo1(data,  ((closureN)self_7312905)->elements[0], (((closure)  ((closureN)self_7312905)->elements[0])->fn),  set_pair_as_expr(&local_7325784, ((closureN)self_7312905)->elements[1], set_pair_as_expr(&local_7325788, ((closureN)self_7312905)->elements[8], set_pair_as_expr(&local_7325792, set_pair_as_expr(&local_7325795, ((closureN)self_7312905)->elements[2], set_pair_as_expr(&local_7325799, set_pair_as_expr(&local_7325802, set_pair_as_expr(&local_7325805, ((closureN)self_7312905)->elements[5], set_pair_as_expr(&local_7325809, set_pair_as_expr(&local_7325812, ((closureN)self_7312905)->elements[6], set_pair_as_expr(&local_7325816, ((closureN)self_7312905)->elements[7], NULL)), NULL)), NULL), set_pair_as_expr(&local_7325820, set_pair_as_expr(&local_7325823, ((closureN)self_7312905)->elements[3], set_pair_as_expr(&local_7325827, ((closureN)self_7312905)->elements[7], set_pair_as_expr(&local_7325831, set_pair_as_expr(&local_7325834, ((closureN)self_7312905)->ele
ments[4], set_pair_as_expr(&local_7325838, ((closureN)self_7312905)->elements[7], NULL)), NULL))), set_pair_as_expr(&local_7325842, r_737403_7310467_7310531_7310594_7310655_7310715_7310774_7310832_7310889_7310945_7311212_7311230_7311247_7311263_7311278_7311290_7311301_7311311_7311320_7311328_7311722, NULL)))), NULL))));; 
++pair_type local_7325835; 
++return_direct_with_clo1(data,  ((closureN)self_7312898)->elements[0], (((closure)  ((closureN)self_7312898)->elements[0])->fn),  set_pair_as_expr(&local_7325777, ((closureN)self_7312898)->elements[1], set_pair_as_expr(&local_7325781, ((closureN)self_7312898)->elements[8], set_pair_as_expr(&local_7325785, set_pair_as_expr(&local_7325788, ((closureN)self_7312898)->elements[2], set_pair_as_expr(&local_7325792, set_pair_as_expr(&local_7325795, set_pair_as_expr(&local_7325798, ((closureN)self_7312898)->elements[5], set_pair_as_expr(&local_7325802, set_pair_as_expr(&local_7325805, ((closureN)self_7312898)->elements[6], set_pair_as_expr(&local_7325809, ((closureN)self_7312898)->elements[7], NULL)), NULL)), NULL), set_pair_as_expr(&local_7325813, set_pair_as_expr(&local_7325816, ((closureN)self_7312898)->elements[3], set_pair_as_expr(&local_7325820, ((closureN)self_7312898)->elements[7], set_pair_as_expr(&local_7325824, set_pair_as_expr(&local_7325827, ((closureN)self_7312898)->ele
ments[4], set_pair_as_expr(&local_7325831, ((closureN)self_7312898)->elements[7], NULL)), NULL))), set_pair_as_expr(&local_7325835, r_737396_7310460_7310524_7310587_7310648_7310708_7310767_7310825_7310882_7310938_7311205_7311223_7311240_7311256_7311271_7311283_7311294_7311304_7311313_7311321_7311715, NULL)))), NULL))));; 
  }
  
 -static void __lambda_1285(void *data, object self_7314199, int argc, object *args) /* object self_7314199, object r_738152_7311665_7311729_7311792_7311853_7311913_7311972_7312030_7312087_7312143_7312950 */
-+static void __lambda_1238(void *data, object self_7312906, int argc, object *args) /* object self_7312906, object r_737384_7310419_7310483_7310546_7310607_7310667_7310726_7310784_7310841_7310897_7311704 */
++static void __lambda_1238(void *data, object self_7312899, int argc, object *args) /* object self_7312899, object r_737377_7310412_7310476_7310539_7310600_7310660_7310719_7310777_7310834_7310890_7311697 */
   {
 - object r_738152_7311665_7311729_7311792_7311853_7311913_7311972_7312030_7312087_7312143_7312950 = args[0];
-+ object r_737384_7310419_7310483_7310546_7310607_7310667_7310726_7310784_7310841_7310897_7311704 = args[0];
++ object r_737377_7310412_7310476_7310539_7310600_7310660_7310719_7310777_7310834_7310890_7311697 = args[0];
    
 -closureN_type c_7328053;
 -object e_7328203 [10];
@@ -5449,39 +5451,39 @@ Make let-values be the same as let*-values, to work around
 -c_7328053.elements[7] = ((closureN)self_7314199)->elements[7];
 -c_7328053.elements[8] = ((closureN)self_7314199)->elements[8];
 -c_7328053.elements[9] = ((closureN)self_7314199)->elements[9];
-+closureN_type c_7325601;
-+object e_7325751 [10];
-+c_7325601.hdr.mark = gc_color_red;
-+ c_7325601.hdr.grayed = 0;
-+c_7325601.tag = closureN_tag;
-+ c_7325601.fn = (function_type)__lambda_1239;
-+c_7325601.num_args = 1;
-+c_7325601.num_elements = 10;
-+c_7325601.elements = (object *)e_7325751;
-+c_7325601.elements[0] = ((closureN)self_7312906)->elements[0];
-+c_7325601.elements[1] = ((closureN)self_7312906)->elements[1];
-+c_7325601.elements[2] = ((closureN)self_7312906)->elements[2];
-+c_7325601.elements[3] = ((closureN)self_7312906)->elements[3];
-+c_7325601.elements[4] = ((closureN)self_7312906)->elements[4];
-+c_7325601.elements[5] = ((closureN)self_7312906)->elements[5];
-+c_7325601.elements[6] = ((closureN)self_7312906)->elements[6];
-+c_7325601.elements[7] = ((closureN)self_7312906)->elements[7];
-+c_7325601.elements[8] = ((closureN)self_7312906)->elements[8];
-+c_7325601.elements[9] = ((closureN)self_7312906)->elements[9];
++closureN_type c_7325594;
++object e_7325744 [10];
++c_7325594.hdr.mark = gc_color_red;
++ c_7325594.hdr.grayed = 0;
++c_7325594.tag = closureN_tag;
++ c_7325594.fn = (function_type)__lambda_1239;
++c_7325594.num_args = 1;
++c_7325594.num_elements = 10;
++c_7325594.elements = (object *)e_7325744;
++c_7325594.elements[0] = ((closureN)self_7312899)->elements[0];
++c_7325594.elements[1] = ((closureN)self_7312899)->elements[1];
++c_7325594.elements[2] = ((closureN)self_7312899)->elements[2];
++c_7325594.elements[3] = ((closureN)self_7312899)->elements[3];
++c_7325594.elements[4] = ((closureN)self_7312899)->elements[4];
++c_7325594.elements[5] = ((closureN)self_7312899)->elements[5];
++c_7325594.elements[6] = ((closureN)self_7312899)->elements[6];
++c_7325594.elements[7] = ((closureN)self_7312899)->elements[7];
++c_7325594.elements[8] = ((closureN)self_7312899)->elements[8];
++c_7325594.elements[9] = ((closureN)self_7312899)->elements[9];
  
  
  
  
  
 -return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7328053, r_738152_7311665_7311729_7311792_7311853_7311913_7311972_7312030_7312087_7312143_7312950, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314199)->elements[8])));; 
-+return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7325601, r_737384_7310419_7310483_7310546_7310607_7310667_7310726_7310784_7310841_7310897_7311704, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312906)->elements[8])));; 
++return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7325594, r_737377_7310412_7310476_7310539_7310600_7310660_7310719_7310777_7310834_7310890_7311697, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312899)->elements[8])));; 
  }
  
 -static void __lambda_1286(void *data, object self_7314200, int argc, object *args) /* object self_7314200, object r_738093_7311666_7311730_7311793_7311854_7311914_7311973_7312031_7312088_7312144_7312951 */
-+static void __lambda_1239(void *data, object self_7312907, int argc, object *args) /* object self_7312907, object r_737325_7310420_7310484_7310547_7310608_7310668_7310727_7310785_7310842_7310898_7311705 */
++static void __lambda_1239(void *data, object self_7312900, int argc, object *args) /* object self_7312900, object r_737318_7310413_7310477_7310540_7310601_7310661_7310720_7310778_7310835_7310891_7311698 */
   {
 - object r_738093_7311666_7311730_7311793_7311854_7311914_7311973_7312031_7312088_7312144_7312951 = args[0];
-+ object r_737325_7310420_7310484_7310547_7310608_7310668_7310727_7310785_7310842_7310898_7311705 = args[0];
++ object r_737318_7310413_7310477_7310540_7310601_7310661_7310720_7310778_7310835_7310891_7311698 = args[0];
    
 -closureN_type c_7328056;
 -object e_7328202 [11];
@@ -5503,36 +5505,36 @@ Make let-values be the same as let*-values, to work around
 -c_7328056.elements[8] = ((closureN)self_7314200)->elements[7];
 -c_7328056.elements[9] = ((closureN)self_7314200)->elements[8];
 -c_7328056.elements[10] = ((closureN)self_7314200)->elements[9];
-+closureN_type c_7325604;
-+object e_7325750 [11];
-+c_7325604.hdr.mark = gc_color_red;
-+ c_7325604.hdr.grayed = 0;
-+c_7325604.tag = closureN_tag;
-+ c_7325604.fn = (function_type)__lambda_1240;
-+c_7325604.num_args = 1;
-+c_7325604.num_elements = 11;
-+c_7325604.elements = (object *)e_7325750;
-+c_7325604.elements[0] = ((closureN)self_7312907)->elements[0];
-+c_7325604.elements[1] = ((closureN)self_7312907)->elements[1];
-+c_7325604.elements[2] = r_737325_7310420_7310484_7310547_7310608_7310668_7310727_7310785_7310842_7310898_7311705;
-+c_7325604.elements[3] = ((closureN)self_7312907)->elements[2];
-+c_7325604.elements[4] = ((closureN)self_7312907)->elements[3];
-+c_7325604.elements[5] = ((closureN)self_7312907)->elements[4];
-+c_7325604.elements[6] = ((closureN)self_7312907)->elements[5];
-+c_7325604.elements[7] = ((closureN)self_7312907)->elements[6];
-+c_7325604.elements[8] = ((closureN)self_7312907)->elements[7];
-+c_7325604.elements[9] = ((closureN)self_7312907)->elements[8];
-+c_7325604.elements[10] = ((closureN)self_7312907)->elements[9];
++closureN_type c_7325597;
++object e_7325743 [11];
++c_7325597.hdr.mark = gc_color_red;
++ c_7325597.hdr.grayed = 0;
++c_7325597.tag = closureN_tag;
++ c_7325597.fn = (function_type)__lambda_1240;
++c_7325597.num_args = 1;
++c_7325597.num_elements = 11;
++c_7325597.elements = (object *)e_7325743;
++c_7325597.elements[0] = ((closureN)self_7312900)->elements[0];
++c_7325597.elements[1] = ((closureN)self_7312900)->elements[1];
++c_7325597.elements[2] = r_737318_7310413_7310477_7310540_7310601_7310661_7310720_7310778_7310835_7310891_7311698;
++c_7325597.elements[3] = ((closureN)self_7312900)->elements[2];
++c_7325597.elements[4] = ((closureN)self_7312900)->elements[3];
++c_7325597.elements[5] = ((closureN)self_7312900)->elements[4];
++c_7325597.elements[6] = ((closureN)self_7312900)->elements[5];
++c_7325597.elements[7] = ((closureN)self_7312900)->elements[6];
++c_7325597.elements[8] = ((closureN)self_7312900)->elements[7];
++c_7325597.elements[9] = ((closureN)self_7312900)->elements[8];
++c_7325597.elements[10] = ((closureN)self_7312900)->elements[9];
  
 -return_closcall2(data,  ((closureN)self_7314200)->elements[6],  &c_7328056, quote_define);; 
-+return_closcall2(data,  ((closureN)self_7312907)->elements[6],  &c_7325604, quote_define);; 
++return_closcall2(data,  ((closureN)self_7312900)->elements[6],  &c_7325597, quote_define);; 
  }
  
 -static void __lambda_1287(void *data, object self_7314201, int argc, object *args) /* object self_7314201, object r_738098_7311667_7311731_7311794_7311855_7311915_7311974_7312032_7312089_7312145_7312952 */
-+static void __lambda_1240(void *data, object self_7312908, int argc, object *args) /* object self_7312908, object r_737330_7310421_7310485_7310548_7310609_7310669_7310728_7310786_7310843_7310899_7311706 */
++static void __lambda_1240(void *data, object self_7312901, int argc, object *args) /* object self_7312901, object r_737323_7310414_7310478_7310541_7310602_7310662_7310721_7310779_7310836_7310892_7311699 */
   {
 - object r_738098_7311667_7311731_7311794_7311855_7311915_7311974_7312032_7312089_7312145_7312952 = args[0];
-+ object r_737330_7310421_7310485_7310548_7310609_7310669_7310728_7310786_7310843_7310899_7311706 = args[0];
++ object r_737323_7310414_7310478_7310541_7310602_7310662_7310721_7310779_7310836_7310892_7311699 = args[0];
    
 -closureN_type c_7328059;
 -object e_7328201 [12];
@@ -5555,37 +5557,37 @@ Make let-values be the same as let*-values, to work around
 -c_7328059.elements[9] = ((closureN)self_7314201)->elements[8];
 -c_7328059.elements[10] = ((closureN)self_7314201)->elements[9];
 -c_7328059.elements[11] = ((closureN)self_7314201)->elements[10];
-+closureN_type c_7325607;
-+object e_7325749 [12];
-+c_7325607.hdr.mark = gc_color_red;
-+ c_7325607.hdr.grayed = 0;
-+c_7325607.tag = closureN_tag;
-+ c_7325607.fn = (function_type)__lambda_1241;
-+c_7325607.num_args = 1;
-+c_7325607.num_elements = 12;
-+c_7325607.elements = (object *)e_7325749;
-+c_7325607.elements[0] = ((closureN)self_7312908)->elements[0];
-+c_7325607.elements[1] = ((closureN)self_7312908)->elements[1];
-+c_7325607.elements[2] = ((closureN)self_7312908)->elements[2];
-+c_7325607.elements[3] = r_737330_7310421_7310485_7310548_7310609_7310669_7310728_7310786_7310843_7310899_7311706;
-+c_7325607.elements[4] = ((closureN)self_7312908)->elements[3];
-+c_7325607.elements[5] = ((closureN)self_7312908)->elements[4];
-+c_7325607.elements[6] = ((closureN)self_7312908)->elements[5];
-+c_7325607.elements[7] = ((closureN)self_7312908)->elements[6];
-+c_7325607.elements[8] = ((closureN)self_7312908)->elements[7];
-+c_7325607.elements[9] = ((closureN)self_7312908)->elements[8];
-+c_7325607.elements[10] = ((closureN)self_7312908)->elements[9];
-+c_7325607.elements[11] = ((closureN)self_7312908)->elements[10];
++closureN_type c_7325600;
++object e_7325742 [12];
++c_7325600.hdr.mark = gc_color_red;
++ c_7325600.hdr.grayed = 0;
++c_7325600.tag = closureN_tag;
++ c_7325600.fn = (function_type)__lambda_1241;
++c_7325600.num_args = 1;
++c_7325600.num_elements = 12;
++c_7325600.elements = (object *)e_7325742;
++c_7325600.elements[0] = ((closureN)self_7312901)->elements[0];
++c_7325600.elements[1] = ((closureN)self_7312901)->elements[1];
++c_7325600.elements[2] = ((closureN)self_7312901)->elements[2];
++c_7325600.elements[3] = r_737323_7310414_7310478_7310541_7310602_7310662_7310721_7310779_7310836_7310892_7311699;
++c_7325600.elements[4] = ((closureN)self_7312901)->elements[3];
++c_7325600.elements[5] = ((closureN)self_7312901)->elements[4];
++c_7325600.elements[6] = ((closureN)self_7312901)->elements[5];
++c_7325600.elements[7] = ((closureN)self_7312901)->elements[6];
++c_7325600.elements[8] = ((closureN)self_7312901)->elements[7];
++c_7325600.elements[9] = ((closureN)self_7312901)->elements[8];
++c_7325600.elements[10] = ((closureN)self_7312901)->elements[9];
++c_7325600.elements[11] = ((closureN)self_7312901)->elements[10];
  
 -return_closcall2(data,  ((closureN)self_7314201)->elements[7],  &c_7328059, quote_let);; 
-+return_closcall2(data,  ((closureN)self_7312908)->elements[7],  &c_7325607, quote_let);; 
++return_closcall2(data,  ((closureN)self_7312901)->elements[7],  &c_7325600, quote_let);; 
  }
  
 -static void __lambda_1288(void *data, object self_7314202, int argc, object *args) /* object self_7314202, object r_738106_7311668_7311732_7311795_7311856_7311916_7311975_7312033_7312090_7312146_7312953 */
-+static void __lambda_1241(void *data, object self_7312909, int argc, object *args) /* object self_7312909, object r_737338_7310422_7310486_7310549_7310610_7310670_7310729_7310787_7310844_7310900_7311707 */
++static void __lambda_1241(void *data, object self_7312902, int argc, object *args) /* object self_7312902, object r_737331_7310415_7310479_7310542_7310603_7310663_7310722_7310780_7310837_7310893_7311700 */
   {
 - object r_738106_7311668_7311732_7311795_7311856_7311916_7311975_7312033_7312090_7312146_7312953 = args[0];
-+ object r_737338_7310422_7310486_7310549_7310610_7310670_7310729_7310787_7310844_7310900_7311707 = args[0];
++ object r_737331_7310415_7310479_7310542_7310603_7310663_7310722_7310780_7310837_7310893_7311700 = args[0];
    
 -closureN_type c_7328062;
 -object e_7328200 [13];
@@ -5609,38 +5611,38 @@ Make let-values be the same as let*-values, to work around
 -c_7328062.elements[10] = ((closureN)self_7314202)->elements[9];
 -c_7328062.elements[11] = ((closureN)self_7314202)->elements[10];
 -c_7328062.elements[12] = ((closureN)self_7314202)->elements[11];
-+closureN_type c_7325610;
-+object e_7325748 [13];
-+c_7325610.hdr.mark = gc_color_red;
-+ c_7325610.hdr.grayed = 0;
-+c_7325610.tag = closureN_tag;
-+ c_7325610.fn = (function_type)__lambda_1242;
-+c_7325610.num_args = 1;
-+c_7325610.num_elements = 13;
-+c_7325610.elements = (object *)e_7325748;
-+c_7325610.elements[0] = ((closureN)self_7312909)->elements[0];
-+c_7325610.elements[1] = ((closureN)self_7312909)->elements[1];
-+c_7325610.elements[2] = ((closureN)self_7312909)->elements[2];
-+c_7325610.elements[3] = ((closureN)self_7312909)->elements[3];
-+c_7325610.elements[4] = r_737338_7310422_7310486_7310549_7310610_7310670_7310729_7310787_7310844_7310900_7311707;
-+c_7325610.elements[5] = ((closureN)self_7312909)->elements[4];
-+c_7325610.elements[6] = ((closureN)self_7312909)->elements[5];
-+c_7325610.elements[7] = ((closureN)self_7312909)->elements[6];
-+c_7325610.elements[8] = ((closureN)self_7312909)->elements[7];
-+c_7325610.elements[9] = ((closureN)self_7312909)->elements[8];
-+c_7325610.elements[10] = ((closureN)self_7312909)->elements[9];
-+c_7325610.elements[11] = ((closureN)self_7312909)->elements[10];
-+c_7325610.elements[12] = ((closureN)self_7312909)->elements[11];
++closureN_type c_7325603;
++object e_7325741 [13];
++c_7325603.hdr.mark = gc_color_red;
++ c_7325603.hdr.grayed = 0;
++c_7325603.tag = closureN_tag;
++ c_7325603.fn = (function_type)__lambda_1242;
++c_7325603.num_args = 1;
++c_7325603.num_elements = 13;
++c_7325603.elements = (object *)e_7325741;
++c_7325603.elements[0] = ((closureN)self_7312902)->elements[0];
++c_7325603.elements[1] = ((closureN)self_7312902)->elements[1];
++c_7325603.elements[2] = ((closureN)self_7312902)->elements[2];
++c_7325603.elements[3] = ((closureN)self_7312902)->elements[3];
++c_7325603.elements[4] = r_737331_7310415_7310479_7310542_7310603_7310663_7310722_7310780_7310837_7310893_7311700;
++c_7325603.elements[5] = ((closureN)self_7312902)->elements[4];
++c_7325603.elements[6] = ((closureN)self_7312902)->elements[5];
++c_7325603.elements[7] = ((closureN)self_7312902)->elements[6];
++c_7325603.elements[8] = ((closureN)self_7312902)->elements[7];
++c_7325603.elements[9] = ((closureN)self_7312902)->elements[8];
++c_7325603.elements[10] = ((closureN)self_7312902)->elements[9];
++c_7325603.elements[11] = ((closureN)self_7312902)->elements[10];
++c_7325603.elements[12] = ((closureN)self_7312902)->elements[11];
  
 -return_closcall2(data,  ((closureN)self_7314202)->elements[8],  &c_7328062, quote_v);; 
-+return_closcall2(data,  ((closureN)self_7312909)->elements[8],  &c_7325610, quote_v);; 
++return_closcall2(data,  ((closureN)self_7312902)->elements[8],  &c_7325603, quote_v);; 
  }
  
 -static void __lambda_1289(void *data, object self_7314203, int argc, object *args) /* object self_7314203, object r_738137_7311669_7311733_7311796_7311857_7311917_7311976_7312034_7312091_7312147_7312954 */
-+static void __lambda_1242(void *data, object self_7312910, int argc, object *args) /* object self_7312910, object r_737369_7310423_7310487_7310550_7310611_7310671_7310730_7310788_7310845_7310901_7311708 */
++static void __lambda_1242(void *data, object self_7312903, int argc, object *args) /* object self_7312903, object r_737362_7310416_7310480_7310543_7310604_7310664_7310723_7310781_7310838_7310894_7311701 */
   {
 - object r_738137_7311669_7311733_7311796_7311857_7311917_7311976_7312034_7312091_7312147_7312954 = args[0];
-+ object r_737369_7310423_7310487_7310550_7310611_7310671_7310730_7310788_7310845_7310901_7311708 = args[0];
++ object r_737362_7310416_7310480_7310543_7310604_7310664_7310723_7310781_7310838_7310894_7311701 = args[0];
    
 -closureN_type c_7328065;
 -object e_7328199 [14];
@@ -5665,39 +5667,39 @@ Make let-values be the same as let*-values, to work around
 -c_7328065.elements[11] = ((closureN)self_7314203)->elements[10];
 -c_7328065.elements[12] = ((closureN)self_7314203)->elements[11];
 -c_7328065.elements[13] = ((closureN)self_7314203)->elements[12];
-+closureN_type c_7325613;
-+object e_7325747 [14];
-+c_7325613.hdr.mark = gc_color_red;
-+ c_7325613.hdr.grayed = 0;
-+c_7325613.tag = closureN_tag;
-+ c_7325613.fn = (function_type)__lambda_1243;
-+c_7325613.num_args = 1;
-+c_7325613.num_elements = 14;
-+c_7325613.elements = (object *)e_7325747;
-+c_7325613.elements[0] = ((closureN)self_7312910)->elements[0];
-+c_7325613.elements[1] = ((closureN)self_7312910)->elements[1];
-+c_7325613.elements[2] = ((closureN)self_7312910)->elements[2];
-+c_7325613.elements[3] = ((closureN)self_7312910)->elements[3];
-+c_7325613.elements[4] = ((closureN)self_7312910)->elements[4];
-+c_7325613.elements[5] = r_737369_7310423_7310487_7310550_7310611_7310671_7310730_7310788_7310845_7310901_7311708;
-+c_7325613.elements[6] = ((closureN)self_7312910)->elements[5];
-+c_7325613.elements[7] = ((closureN)self_7312910)->elements[6];
-+c_7325613.elements[8] = ((closureN)self_7312910)->elements[7];
-+c_7325613.elements[9] = ((closureN)self_7312910)->elements[8];
-+c_7325613.elements[10] = ((closureN)self_7312910)->elements[9];
-+c_7325613.elements[11] = ((closureN)self_7312910)->elements[10];
-+c_7325613.elements[12] = ((closureN)self_7312910)->elements[11];
-+c_7325613.elements[13] = ((closureN)self_7312910)->elements[12];
++closureN_type c_7325606;
++object e_7325740 [14];
++c_7325606.hdr.mark = gc_color_red;
++ c_7325606.hdr.grayed = 0;
++c_7325606.tag = closureN_tag;
++ c_7325606.fn = (function_type)__lambda_1243;
++c_7325606.num_args = 1;
++c_7325606.num_elements = 14;
++c_7325606.elements = (object *)e_7325740;
++c_7325606.elements[0] = ((closureN)self_7312903)->elements[0];
++c_7325606.elements[1] = ((closureN)self_7312903)->elements[1];
++c_7325606.elements[2] = ((closureN)self_7312903)->elements[2];
++c_7325606.elements[3] = ((closureN)self_7312903)->elements[3];
++c_7325606.elements[4] = ((closureN)self_7312903)->elements[4];
++c_7325606.elements[5] = r_737362_7310416_7310480_7310543_7310604_7310664_7310723_7310781_7310838_7310894_7311701;
++c_7325606.elements[6] = ((closureN)self_7312903)->elements[5];
++c_7325606.elements[7] = ((closureN)self_7312903)->elements[6];
++c_7325606.elements[8] = ((closureN)self_7312903)->elements[7];
++c_7325606.elements[9] = ((closureN)self_7312903)->elements[8];
++c_7325606.elements[10] = ((closureN)self_7312903)->elements[9];
++c_7325606.elements[11] = ((closureN)self_7312903)->elements[10];
++c_7325606.elements[12] = ((closureN)self_7312903)->elements[11];
++c_7325606.elements[13] = ((closureN)self_7312903)->elements[12];
  
 -return_closcall2(data,  ((closureN)self_7314203)->elements[9],  &c_7328065, quote_cadr);; 
-+return_closcall2(data,  ((closureN)self_7312910)->elements[9],  &c_7325613, quote_cadr);; 
++return_closcall2(data,  ((closureN)self_7312903)->elements[9],  &c_7325606, quote_cadr);; 
  }
  
 -static void __lambda_1290(void *data, object self_7314204, int argc, object *args) /* object self_7314204, object r_738143_7311670_7311734_7311797_7311858_7311918_7311977_7312035_7312092_7312148_7312955 */
-+static void __lambda_1243(void *data, object self_7312911, int argc, object *args) /* object self_7312911, object r_737375_7310424_7310488_7310551_7310612_7310672_7310731_7310789_7310846_7310902_7311709 */
++static void __lambda_1243(void *data, object self_7312904, int argc, object *args) /* object self_7312904, object r_737368_7310417_7310481_7310544_7310605_7310665_7310724_7310782_7310839_7310895_7311702 */
   {
 - object r_738143_7311670_7311734_7311797_7311858_7311918_7311977_7312035_7312092_7312148_7312955 = args[0];
-+ object r_737375_7310424_7310488_7310551_7310612_7310672_7310731_7310789_7310846_7310902_7311709 = args[0];
++ object r_737368_7310417_7310481_7310544_7310605_7310665_7310724_7310782_7310839_7310895_7311702 = args[0];
    
 -closureN_type c_7328068;
 -object e_7328198 [15];
@@ -5723,40 +5725,40 @@ Make let-values be the same as let*-values, to work around
 -c_7328068.elements[12] = ((closureN)self_7314204)->elements[11];
 -c_7328068.elements[13] = ((closureN)self_7314204)->elements[12];
 -c_7328068.elements[14] = ((closureN)self_7314204)->elements[13];
-+closureN_type c_7325616;
-+object e_7325746 [15];
-+c_7325616.hdr.mark = gc_color_red;
-+ c_7325616.hdr.grayed = 0;
-+c_7325616.tag = closureN_tag;
-+ c_7325616.fn = (function_type)__lambda_1244;
-+c_7325616.num_args = 1;
-+c_7325616.num_elements = 15;
-+c_7325616.elements = (object *)e_7325746;
-+c_7325616.elements[0] = ((closureN)self_7312911)->elements[0];
-+c_7325616.elements[1] = ((closureN)self_7312911)->elements[1];
-+c_7325616.elements[2] = ((closureN)self_7312911)->elements[2];
-+c_7325616.elements[3] = ((closureN)self_7312911)->elements[3];
-+c_7325616.elements[4] = ((closureN)self_7312911)->elements[4];
-+c_7325616.elements[5] = ((closureN)self_7312911)->elements[5];
-+c_7325616.elements[6] = r_737375_7310424_7310488_7310551_7310612_7310672_7310731_7310789_7310846_7310902_7311709;
-+c_7325616.elements[7] = ((closureN)self_7312911)->elements[6];
-+c_7325616.elements[8] = ((closureN)self_7312911)->elements[7];
-+c_7325616.elements[9] = ((closureN)self_7312911)->elements[8];
-+c_7325616.elements[10] = ((closureN)self_7312911)->elements[9];
-+c_7325616.elements[11] = ((closureN)self_7312911)->elements[10];
-+c_7325616.elements[12] = ((closureN)self_7312911)->elements[11];
-+c_7325616.elements[13] = ((closureN)self_7312911)->elements[12];
-+c_7325616.elements[14] = ((closureN)self_7312911)->elements[13];
++closureN_type c_7325609;
++object e_7325739 [15];
++c_7325609.hdr.mark = gc_color_red;
++ c_7325609.hdr.grayed = 0;
++c_7325609.tag = closureN_tag;
++ c_7325609.fn = (function_type)__lambda_1244;
++c_7325609.num_args = 1;
++c_7325609.num_elements = 15;
++c_7325609.elements = (object *)e_7325739;
++c_7325609.elements[0] = ((closureN)self_7312904)->elements[0];
++c_7325609.elements[1] = ((closureN)self_7312904)->elements[1];
++c_7325609.elements[2] = ((closureN)self_7312904)->elements[2];
++c_7325609.elements[3] = ((closureN)self_7312904)->elements[3];
++c_7325609.elements[4] = ((closureN)self_7312904)->elements[4];
++c_7325609.elements[5] = ((closureN)self_7312904)->elements[5];
++c_7325609.elements[6] = r_737368_7310417_7310481_7310544_7310605_7310665_7310724_7310782_7310839_7310895_7311702;
++c_7325609.elements[7] = ((closureN)self_7312904)->elements[6];
++c_7325609.elements[8] = ((closureN)self_7312904)->elements[7];
++c_7325609.elements[9] = ((closureN)self_7312904)->elements[8];
++c_7325609.elements[10] = ((closureN)self_7312904)->elements[9];
++c_7325609.elements[11] = ((closureN)self_7312904)->elements[10];
++c_7325609.elements[12] = ((closureN)self_7312904)->elements[11];
++c_7325609.elements[13] = ((closureN)self_7312904)->elements[12];
++c_7325609.elements[14] = ((closureN)self_7312904)->elements[13];
  
 -return_closcall2(data,  ((closureN)self_7314204)->elements[10],  &c_7328068, quote_set_67);; 
-+return_closcall2(data,  ((closureN)self_7312911)->elements[10],  &c_7325616, quote_set_67);; 
++return_closcall2(data,  ((closureN)self_7312904)->elements[10],  &c_7325609, quote_set_67);; 
  }
  
 -static void __lambda_1291(void *data, object self_7314205, int argc, object *args) /* object self_7314205, object r_738119_7311676_7311740_7311803_7311864_7311924_7311983_7312041_7312098_7312154_7312203_7312226_7312248_7312269_7312289_7312956 */
-+static void __lambda_1244(void *data, object self_7312912, int argc, object *args) /* object self_7312912, object r_737351_7310430_7310494_7310557_7310618_7310678_7310737_7310795_7310852_7310908_7310957_7310980_7311002_7311023_7311043_7311710 */
++static void __lambda_1244(void *data, object self_7312905, int argc, object *args) /* object self_7312905, object r_737344_7310423_7310487_7310550_7310611_7310671_7310730_7310788_7310845_7310901_7310950_7310973_7310995_7311016_7311036_7311703 */
   {
 - object r_738119_7311676_7311740_7311803_7311864_7311924_7311983_7312041_7312098_7312154_7312203_7312226_7312248_7312269_7312289_7312956 = args[0];
-+ object r_737351_7310430_7310494_7310557_7310618_7310678_7310737_7310795_7310852_7310908_7310957_7310980_7311002_7311023_7311043_7311710 = args[0];
++ object r_737344_7310423_7310487_7310550_7310611_7310671_7310730_7310788_7310845_7310901_7310950_7310973_7310995_7311016_7311036_7311703 = args[0];
    
 -closureN_type c_7328071;
 -object e_7328197 [16];
@@ -5783,41 +5785,41 @@ Make let-values be the same as let*-values, to work around
 -c_7328071.elements[13] = ((closureN)self_7314205)->elements[12];
 -c_7328071.elements[14] = ((closureN)self_7314205)->elements[13];
 -c_7328071.elements[15] = ((closureN)self_7314205)->elements[14];
-+closureN_type c_7325619;
-+object e_7325745 [16];
-+c_7325619.hdr.mark = gc_color_red;
-+ c_7325619.hdr.grayed = 0;
-+c_7325619.tag = closureN_tag;
-+ c_7325619.fn = (function_type)__lambda_1245;
-+c_7325619.num_args = 1;
-+c_7325619.num_elements = 16;
-+c_7325619.elements = (object *)e_7325745;
-+c_7325619.elements[0] = ((closureN)self_7312912)->elements[0];
-+c_7325619.elements[1] = ((closureN)self_7312912)->elements[1];
-+c_7325619.elements[2] = ((closureN)self_7312912)->elements[2];
-+c_7325619.elements[3] = ((closureN)self_7312912)->elements[3];
-+c_7325619.elements[4] = ((closureN)self_7312912)->elements[4];
-+c_7325619.elements[5] = r_737351_7310430_7310494_7310557_7310618_7310678_7310737_7310795_7310852_7310908_7310957_7310980_7311002_7311023_7311043_7311710;
-+c_7325619.elements[6] = ((closureN)self_7312912)->elements[5];
-+c_7325619.elements[7] = ((closureN)self_7312912)->elements[6];
-+c_7325619.elements[8] = ((closureN)self_7312912)->elements[7];
-+c_7325619.elements[9] = ((closureN)self_7312912)->elements[8];
-+c_7325619.elements[10] = ((closureN)self_7312912)->elements[9];
-+c_7325619.elements[11] = ((closureN)self_7312912)->elements[10];
-+c_7325619.elements[12] = ((closureN)self_7312912)->elements[11];
-+c_7325619.elements[13] = ((closureN)self_7312912)->elements[12];
-+c_7325619.elements[14] = ((closureN)self_7312912)->elements[13];
-+c_7325619.elements[15] = ((closureN)self_7312912)->elements[14];
++closureN_type c_7325612;
++object e_7325738 [16];
++c_7325612.hdr.mark = gc_color_red;
++ c_7325612.hdr.grayed = 0;
++c_7325612.tag = closureN_tag;
++ c_7325612.fn = (function_type)__lambda_1245;
++c_7325612.num_args = 1;
++c_7325612.num_elements = 16;
++c_7325612.elements = (object *)e_7325738;
++c_7325612.elements[0] = ((closureN)self_7312905)->elements[0];
++c_7325612.elements[1] = ((closureN)self_7312905)->elements[1];
++c_7325612.elements[2] = ((closureN)self_7312905)->elements[2];
++c_7325612.elements[3] = ((closureN)self_7312905)->elements[3];
++c_7325612.elements[4] = ((closureN)self_7312905)->elements[4];
++c_7325612.elements[5] = r_737344_7310423_7310487_7310550_7310611_7310671_7310730_7310788_7310845_7310901_7310950_7310973_7310995_7311016_7311036_7311703;
++c_7325612.elements[6] = ((closureN)self_7312905)->elements[5];
++c_7325612.elements[7] = ((closureN)self_7312905)->elements[6];
++c_7325612.elements[8] = ((closureN)self_7312905)->elements[7];
++c_7325612.elements[9] = ((closureN)self_7312905)->elements[8];
++c_7325612.elements[10] = ((closureN)self_7312905)->elements[9];
++c_7325612.elements[11] = ((closureN)self_7312905)->elements[10];
++c_7325612.elements[12] = ((closureN)self_7312905)->elements[11];
++c_7325612.elements[13] = ((closureN)self_7312905)->elements[12];
++c_7325612.elements[14] = ((closureN)self_7312905)->elements[13];
++c_7325612.elements[15] = ((closureN)self_7312905)->elements[14];
  
 -return_closcall2(data,  ((closureN)self_7314205)->elements[11],  &c_7328071, quote_car);; 
-+return_closcall2(data,  ((closureN)self_7312912)->elements[11],  &c_7325619, quote_car);; 
++return_closcall2(data,  ((closureN)self_7312905)->elements[11],  &c_7325612, quote_car);; 
  }
  
 -static void __lambda_1292(void *data, object self_7314206, int argc, object *args) /* object self_7314206, object r_738127_7311677_7311741_7311804_7311865_7311925_7311984_7312042_7312099_7312155_7312204_7312227_7312249_7312270_7312290_7312957 */
-+static void __lambda_1245(void *data, object self_7312913, int argc, object *args) /* object self_7312913, object r_737359_7310431_7310495_7310558_7310619_7310679_7310738_7310796_7310853_7310909_7310958_7310981_7311003_7311024_7311044_7311711 */
++static void __lambda_1245(void *data, object self_7312906, int argc, object *args) /* object self_7312906, object r_737352_7310424_7310488_7310551_7310612_7310672_7310731_7310789_7310846_7310902_7310951_7310974_7310996_7311017_7311037_7311704 */
   {
 - object r_738127_7311677_7311741_7311804_7311865_7311925_7311984_7312042_7312099_7312155_7312204_7312227_7312249_7312270_7312290_7312957 = args[0];
-+ object r_737359_7310431_7310495_7310558_7310619_7310679_7310738_7310796_7310853_7310909_7310958_7310981_7311003_7311024_7311044_7311711 = args[0];
++ object r_737352_7310424_7310488_7310551_7310612_7310672_7310731_7310789_7310846_7310902_7310951_7310974_7310996_7311017_7311037_7311704 = args[0];
    
 -closureN_type c_7328074;
 -object e_7328196 [16];
@@ -5844,41 +5846,41 @@ Make let-values be the same as let*-values, to work around
 -c_7328074.elements[13] = ((closureN)self_7314206)->elements[13];
 -c_7328074.elements[14] = ((closureN)self_7314206)->elements[14];
 -c_7328074.elements[15] = ((closureN)self_7314206)->elements[15];
-+closureN_type c_7325622;
-+object e_7325744 [16];
-+c_7325622.hdr.mark = gc_color_red;
-+ c_7325622.hdr.grayed = 0;
-+c_7325622.tag = closureN_tag;
-+ c_7325622.fn = (function_type)__lambda_1246;
-+c_7325622.num_args = 1;
-+c_7325622.num_elements = 16;
-+c_7325622.elements = (object *)e_7325744;
-+c_7325622.elements[0] = ((closureN)self_7312913)->elements[0];
-+c_7325622.elements[1] = ((closureN)self_7312913)->elements[1];
-+c_7325622.elements[2] = ((closureN)self_7312913)->elements[2];
-+c_7325622.elements[3] = ((closureN)self_7312913)->elements[3];
-+c_7325622.elements[4] = ((closureN)self_7312913)->elements[4];
-+c_7325622.elements[5] = ((closureN)self_7312913)->elements[5];
-+c_7325622.elements[6] = r_737359_7310431_7310495_7310558_7310619_7310679_7310738_7310796_7310853_7310909_7310958_7310981_7311003_7311024_7311044_7311711;
-+c_7325622.elements[7] = ((closureN)self_7312913)->elements[6];
-+c_7325622.elements[8] = ((closureN)self_7312913)->elements[7];
-+c_7325622.elements[9] = ((closureN)self_7312913)->elements[8];
-+c_7325622.elements[10] = ((closureN)self_7312913)->elements[9];
-+c_7325622.elements[11] = ((closureN)self_7312913)->elements[10];
-+c_7325622.elements[12] = ((closureN)self_7312913)->elements[11];
-+c_7325622.elements[13] = ((closureN)self_7312913)->elements[13];
-+c_7325622.elements[14] = ((closureN)self_7312913)->elements[14];
-+c_7325622.elements[15] = ((closureN)self_7312913)->elements[15];
++closureN_type c_7325615;
++object e_7325737 [16];
++c_7325615.hdr.mark = gc_color_red;
++ c_7325615.hdr.grayed = 0;
++c_7325615.tag = closureN_tag;
++ c_7325615.fn = (function_type)__lambda_1246;
++c_7325615.num_args = 1;
++c_7325615.num_elements = 16;
++c_7325615.elements = (object *)e_7325737;
++c_7325615.elements[0] = ((closureN)self_7312906)->elements[0];
++c_7325615.elements[1] = ((closureN)self_7312906)->elements[1];
++c_7325615.elements[2] = ((closureN)self_7312906)->elements[2];
++c_7325615.elements[3] = ((closureN)self_7312906)->elements[3];
++c_7325615.elements[4] = ((closureN)self_7312906)->elements[4];
++c_7325615.elements[5] = ((closureN)self_7312906)->elements[5];
++c_7325615.elements[6] = r_737352_7310424_7310488_7310551_7310612_7310672_7310731_7310789_7310846_7310902_7310951_7310974_7310996_7311017_7311037_7311704;
++c_7325615.elements[7] = ((closureN)self_7312906)->elements[6];
++c_7325615.elements[8] = ((closureN)self_7312906)->elements[7];
++c_7325615.elements[9] = ((closureN)self_7312906)->elements[8];
++c_7325615.elements[10] = ((closureN)self_7312906)->elements[9];
++c_7325615.elements[11] = ((closureN)self_7312906)->elements[10];
++c_7325615.elements[12] = ((closureN)self_7312906)->elements[11];
++c_7325615.elements[13] = ((closureN)self_7312906)->elements[13];
++c_7325615.elements[14] = ((closureN)self_7312906)->elements[14];
++c_7325615.elements[15] = ((closureN)self_7312906)->elements[15];
  
 -return_closcall2(data,  ((closureN)self_7314206)->elements[12],  &c_7328074, quote_v);; 
-+return_closcall2(data,  ((closureN)self_7312913)->elements[12],  &c_7325622, quote_v);; 
++return_closcall2(data,  ((closureN)self_7312906)->elements[12],  &c_7325615, quote_v);; 
  }
  
 -static void __lambda_1293(void *data, object self_7314207, int argc, object *args) /* object self_7314207, object r_738115_7311683_7311747_7311810_7311871_7311931_7311990_7312048_7312105_7312161_7312210_7312233_7312255_7312276_7312296_7312313_7312329_7312344_7312358_7312371_7312958 */
-+static void __lambda_1246(void *data, object self_7312914, int argc, object *args) /* object self_7312914, object r_737347_7310437_7310501_7310564_7310625_7310685_7310744_7310802_7310859_7310915_7310964_7310987_7311009_7311030_7311050_7311067_7311083_7311098_7311112_7311125_7311712 */
++static void __lambda_1246(void *data, object self_7312907, int argc, object *args) /* object self_7312907, object r_737340_7310430_7310494_7310557_7310618_7310678_7310737_7310795_7310852_7310908_7310957_7310980_7311002_7311023_7311043_7311060_7311076_7311091_7311105_7311118_7311705 */
   {
 - object r_738115_7311683_7311747_7311810_7311871_7311931_7311990_7312048_7312105_7312161_7312210_7312233_7312255_7312276_7312296_7312313_7312329_7312344_7312358_7312371_7312958 = args[0];
-+ object r_737347_7310437_7310501_7310564_7310625_7310685_7310744_7310802_7310859_7310915_7310964_7310987_7311009_7311030_7311050_7311067_7311083_7311098_7311112_7311125_7311712 = args[0];
++ object r_737340_7310430_7310494_7310557_7310618_7310678_7310737_7310795_7310852_7310908_7310957_7310980_7311002_7311023_7311043_7311060_7311076_7311091_7311105_7311118_7311705 = args[0];
    
 -closureN_type c_7328076;
 -object e_7328126 [8];
@@ -5897,124 +5899,124 @@ Make let-values be the same as let*-values, to work around
 -c_7328076.elements[5] = ((closureN)self_7314207)->elements[12];
 -c_7328076.elements[6] = ((closureN)self_7314207)->elements[13];
 -c_7328076.elements[7] = ((closureN)self_7314207)->elements[15];
-+closureN_type c_7325624;
-+object e_7325674 [8];
-+c_7325624.hdr.mark = gc_color_red;
-+ c_7325624.hdr.grayed = 0;
-+c_7325624.tag = closureN_tag;
-+ c_7325624.fn = (function_type)__lambda_1247;
-+c_7325624.num_args = 1;
-+c_7325624.num_elements = 8;
-+c_7325624.elements = (object *)e_7325674;
-+c_7325624.elements[0] = ((closureN)self_7312914)->elements[0];
-+c_7325624.elements[1] = ((closureN)self_7312914)->elements[1];
-+c_7325624.elements[2] = ((closureN)self_7312914)->elements[9];
-+c_7325624.elements[3] = ((closureN)self_7312914)->elements[10];
-+c_7325624.elements[4] = ((closureN)self_7312914)->elements[11];
-+c_7325624.elements[5] = ((closureN)self_7312914)->elements[12];
-+c_7325624.elements[6] = ((closureN)self_7312914)->elements[13];
-+c_7325624.elements[7] = ((closureN)self_7312914)->elements[15];
++closureN_type c_7325617;
++object e_7325667 [8];
++c_7325617.hdr.mark = gc_color_red;
++ c_7325617.hdr.grayed = 0;
++c_7325617.tag = closureN_tag;
++ c_7325617.fn = (function_type)__lambda_1247;
++c_7325617.num_args = 1;
++c_7325617.num_elements = 8;
++c_7325617.elements = (object *)e_7325667;
++c_7325617.elements[0] = ((closureN)self_7312907)->elements[0];
++c_7325617.elements[1] = ((closureN)self_7312907)->elements[1];
++c_7325617.elements[2] = ((closureN)self_7312907)->elements[9];
++c_7325617.elements[3] = ((closureN)self_7312907)->elements[10];
++c_7325617.elements[4] = ((closureN)self_7312907)->elements[11];
++c_7325617.elements[5] = ((closureN)self_7312907)->elements[12];
++c_7325617.elements[6] = ((closureN)self_7312907)->elements[13];
++c_7325617.elements[7] = ((closureN)self_7312907)->elements[15];
  
  
 -pair_type local_7328130; 
-+pair_type local_7325678; 
++pair_type local_7325671; 
  
 -pair_type local_7328133; 
-+pair_type local_7325681; 
++pair_type local_7325674; 
  
 -pair_type local_7328137; 
-+pair_type local_7325685; 
++pair_type local_7325678; 
  
  
  
  
  
 -pair_type local_7328145; 
-+pair_type local_7325693; 
++pair_type local_7325686; 
  
 -pair_type local_7328148; 
-+pair_type local_7325696; 
++pair_type local_7325689; 
  
 -pair_type local_7328152; 
-+pair_type local_7325700; 
++pair_type local_7325693; 
  
 -pair_type local_7328155; 
-+pair_type local_7325703; 
++pair_type local_7325696; 
  
 -pair_type local_7328158; 
-+pair_type local_7325706; 
++pair_type local_7325699; 
  
 -pair_type local_7328162; 
-+pair_type local_7325710; 
++pair_type local_7325703; 
  
 -pair_type local_7328165; 
-+pair_type local_7325713; 
++pair_type local_7325706; 
  
 -pair_type local_7328169; 
-+pair_type local_7325717; 
++pair_type local_7325710; 
  
 -pair_type local_7328173; 
-+pair_type local_7325721; 
++pair_type local_7325714; 
  
 -pair_type local_7328176; 
-+pair_type local_7325724; 
++pair_type local_7325717; 
  
 -pair_type local_7328180; 
-+pair_type local_7325728; 
++pair_type local_7325721; 
  
 -pair_type local_7328184; 
-+pair_type local_7325732; 
++pair_type local_7325725; 
  
 -pair_type local_7328187; 
-+pair_type local_7325735; 
++pair_type local_7325728; 
  
 -pair_type local_7328191; 
-+pair_type local_7325739; 
++pair_type local_7325732; 
  
 -pair_type local_7328195; 
 -return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7328076, ((closureN)self_7314207)->elements[2], set_pair_as_expr(&local_7328130, set_pair_as_expr(&local_7328133, ((closureN)self_7314207)->elements[3], set_pair_as_expr(&local_7328137, Cyc_car(data, Cyc_car(data, ((closureN)self_7314207)->elements[14])), set_pair_as_expr(&local_7328145, set_pair_as_expr(&local_7328148, ((closureN)self_7314207)->elements[4], set_pair_as_expr(&local_7328152, set_pair_as_expr(&local_7328155, set_pair_as_expr(&local_7328158, ((closureN)self_7314207)->elements[7], set_pair_as_expr(&local_7328162, set_pair_as_expr(&local_7328165, ((closureN)self_7314207)->elements[8], set_pair_as_expr(&local_7328169, ((closureN)self_7314207)->elements[15], NULL)), NULL)), NULL), set_pair_as_expr(&local_7328173, set_pair_as_expr(&local_7328176, ((closureN)self_7314207)->elements[5], set_pair_as_expr(&local_7328180, ((closureN)self_7314207)->elements[15], set_
pair_as_expr(&local_7328184, set_pair_as_expr(&local_7328187, ((closureN)self_7314207)->elements[6], set_pair_as_expr(&local_7328191, ((closureN)self_7314207)->elements[15], NULL)), NULL))), set_pair_as_expr(&local_7328195, r_738115_7311683_7311747_7311810_7311871_7311931_7311990_7312048_7312105_7312161_7312210_7312233_7312255_7312276_7312296_7312313_7312329_7312344_7312358_7312371_7312958, NULL)))), NULL))), NULL));; 
-+pair_type local_7325743; 
-+return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7325624, ((closureN)self_7312914)->elements[2], set_pair_as_expr(&local_7325678, set_pair_as_expr(&local_7325681, ((closureN)self_7312914)->elements[3], set_pair_as_expr(&local_7325685, Cyc_car(data, Cyc_car(data, ((closureN)self_7312914)->elements[14])), set_pair_as_expr(&local_7325693, set_pair_as_expr(&local_7325696, ((closureN)self_7312914)->elements[4], set_pair_as_expr(&local_7325700, set_pair_as_expr(&local_7325703, set_pair_as_expr(&local_7325706, ((closureN)self_7312914)->elements[7], set_pair_as_expr(&local_7325710, set_pair_as_expr(&local_7325713, ((closureN)self_7312914)->elements[8], set_pair_as_expr(&local_7325717, ((closureN)self_7312914)->elements[15], NULL)), NULL)), NULL), set_pair_as_expr(&local_7325721, set_pair_as_expr(&local_7325724, ((closureN)self_7312914)->elements[5], set_pair_as_expr(&local_7325728, ((closureN)self_7312914)->elements[15], set_
pair_as_expr(&local_7325732, set_pair_as_expr(&local_7325735, ((closureN)self_7312914)->elements[6], set_pair_as_expr(&local_7325739, ((closureN)self_7312914)->elements[15], NULL)), NULL))), set_pair_as_expr(&local_7325743, r_737347_7310437_7310501_7310564_7310625_7310685_7310744_7310802_7310859_7310915_7310964_7310987_7311009_7311030_7311050_7311067_7311083_7311098_7311112_7311125_7311712, NULL)))), NULL))), NULL));; 
++pair_type local_7325736; 
++return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7325617, ((closureN)self_7312907)->elements[2], set_pair_as_expr(&local_7325671, set_pair_as_expr(&local_7325674, ((closureN)self_7312907)->elements[3], set_pair_as_expr(&local_7325678, Cyc_car(data, Cyc_car(data, ((closureN)self_7312907)->elements[14])), set_pair_as_expr(&local_7325686, set_pair_as_expr(&local_7325689, ((closureN)self_7312907)->elements[4], set_pair_as_expr(&local_7325693, set_pair_as_expr(&local_7325696, set_pair_as_expr(&local_7325699, ((closureN)self_7312907)->elements[7], set_pair_as_expr(&local_7325703, set_pair_as_expr(&local_7325706, ((closureN)self_7312907)->elements[8], set_pair_as_expr(&local_7325710, ((closureN)self_7312907)->elements[15], NULL)), NULL)), NULL), set_pair_as_expr(&local_7325714, set_pair_as_expr(&local_7325717, ((closureN)self_7312907)->elements[5], set_pair_as_expr(&local_7325721, ((closureN)self_7312907)->elements[15], set_
pair_as_expr(&local_7325725, set_pair_as_expr(&local_7325728, ((closureN)self_7312907)->elements[6], set_pair_as_expr(&local_7325732, ((closureN)self_7312907)->elements[15], NULL)), NULL))), set_pair_as_expr(&local_7325736, r_737340_7310430_7310494_7310557_7310618_7310678_7310737_7310795_7310852_7310908_7310957_7310980_7311002_7311023_7311043_7311060_7311076_7311091_7311105_7311118_7311705, NULL)))), NULL))), NULL));; 
  }
  
 -static void __lambda_1294(void *data, object self_7314208, int argc, object *args) /* object self_7314208, object r_738091_7311692_7311756_7311819_7311880_7311940_7311999_7312057_7312114_7312170_7312219_7312242_7312264_7312285_7312305_7312322_7312338_7312353_7312367_7312380_7312391_7312401_7312410_7312418_7312425_7312431_7312436_7312440_7312959 */
-+static void __lambda_1247(void *data, object self_7312915, int argc, object *args) /* object self_7312915, object r_737323_7310446_7310510_7310573_7310634_7310694_7310753_7310811_7310868_7310924_7310973_7310996_7311018_7311039_7311059_7311076_7311092_7311107_7311121_7311134_7311145_7311155_7311164_7311172_7311179_7311185_7311190_7311194_7311713 */
++static void __lambda_1247(void *data, object self_7312908, int argc, object *args) /* object self_7312908, object r_737316_7310439_7310503_7310566_7310627_7310687_7310746_7310804_7310861_7310917_7310966_7310989_7311011_7311032_7311052_7311069_7311085_7311100_7311114_7311127_7311138_7311148_7311157_7311165_7311172_7311178_7311183_7311187_7311706 */
   {
 - object r_738091_7311692_7311756_7311819_7311880_7311940_7311999_7312057_7312114_7312170_7312219_7312242_7312264_7312285_7312305_7312322_7312338_7312353_7312367_7312380_7312391_7312401_7312410_7312418_7312425_7312431_7312436_7312440_7312959 = args[0];
-+ object r_737323_7310446_7310510_7310573_7310634_7310694_7310753_7310811_7310868_7310924_7310973_7310996_7311018_7311039_7311059_7311076_7311092_7311107_7311121_7311134_7311145_7311155_7311164_7311172_7311179_7311185_7311190_7311194_7311713 = args[0];
++ object r_737316_7310439_7310503_7310566_7310627_7310687_7310746_7310804_7310861_7310917_7310966_7310989_7311011_7311032_7311052_7311069_7311085_7311100_7311114_7311127_7311138_7311148_7311157_7311165_7311172_7311178_7311183_7311187_7311706 = args[0];
    
 -pair_type local_7328081; 
-+pair_type local_7325629; 
++pair_type local_7325622; 
  
 -pair_type local_7328084; 
-+pair_type local_7325632; 
++pair_type local_7325625; 
  
 -pair_type local_7328088; 
-+pair_type local_7325636; 
++pair_type local_7325629; 
  
 -pair_type local_7328091; 
-+pair_type local_7325639; 
++pair_type local_7325632; 
  
 -pair_type local_7328095; 
-+pair_type local_7325643; 
++pair_type local_7325636; 
  
 -pair_type local_7328099; 
-+pair_type local_7325647; 
++pair_type local_7325640; 
  
 -pair_type local_7328102; 
-+pair_type local_7325650; 
++pair_type local_7325643; 
  
 -pair_type local_7328106; 
-+pair_type local_7325654; 
++pair_type local_7325647; 
  
 -pair_type local_7328109; 
-+pair_type local_7325657; 
++pair_type local_7325650; 
  
 -pair_type local_7328113; 
-+pair_type local_7325661; 
++pair_type local_7325654; 
  
 -pair_type local_7328116; 
-+pair_type local_7325664; 
++pair_type local_7325657; 
  
  
  
@@ -6022,15 +6024,15 @@ Make let-values be the same as let*-values, to work around
  
 -pair_type local_7328124; 
 -return_direct_with_clo1(data,  ((closureN)self_7314208)->elements[0], (((closure)  ((closureN)self_7314208)->elements[0])->fn),  set_pair_as_expr(&local_7328081, set_pair_as_expr(&local_7328084, ((closureN)self_7314208)->elements[1], set_pair_as_expr(&local_7328088, set_pair_as_expr(&local_7328091, ((closureN)self_7314208)->elements[2], set_pair_as_expr(&local_7328095, ((closureN)self_7314208)->elements[7], set_pair_as_expr(&local_7328099, set_pair_as_expr(&local_7328102, ((closureN)self_7314208)->elements[3], set_pair_as_expr(&local_7328106, set_pair_as_expr(&local_7328109, ((closureN)self_7314208)->elements[5], set_pair_as_expr(&local_7328113, NULL, set_pair_as_expr(&local_7328116, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314208)->elements[6])), NULL))), set_pair_as_expr(&local_7328124, ((closureN)self_7314208)->elements[4], NULL))), NULL))), r_738091_7311692_7311756_7311819_7311880_7311940_7311999_7312057_7312114_7312170_7312219_7312242_7312264_7312285_7312305_731232
2_7312338_7312353_7312367_7312380_7312391_7312401_7312410_7312418_7312425_7312431_7312436_7312440_7312959)), boolean_f));; 
-+pair_type local_7325672; 
-+return_direct_with_clo1(data,  ((closureN)self_7312915)->elements[0], (((closure)  ((closureN)self_7312915)->elements[0])->fn),  set_pair_as_expr(&local_7325629, set_pair_as_expr(&local_7325632, ((closureN)self_7312915)->elements[1], set_pair_as_expr(&local_7325636, set_pair_as_expr(&local_7325639, ((closureN)self_7312915)->elements[2], set_pair_as_expr(&local_7325643, ((closureN)self_7312915)->elements[7], set_pair_as_expr(&local_7325647, set_pair_as_expr(&local_7325650, ((closureN)self_7312915)->elements[3], set_pair_as_expr(&local_7325654, set_pair_as_expr(&local_7325657, ((closureN)self_7312915)->elements[5], set_pair_as_expr(&local_7325661, NULL, set_pair_as_expr(&local_7325664, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312915)->elements[6])), NULL))), set_pair_as_expr(&local_7325672, ((closureN)self_7312915)->elements[4], NULL))), NULL))), r_737323_7310446_7310510_7310573_7310634_7310694_7310753_7310811_7310868_7310924_7310973_7310996_7311018_7311039_7311059_731107
6_7311092_7311107_7311121_7311134_7311145_7311155_7311164_7311172_7311179_7311185_7311190_7311194_7311713)), boolean_f));; 
++pair_type local_7325665; 
++return_direct_with_clo1(data,  ((closureN)self_7312908)->elements[0], (((closure)  ((closureN)self_7312908)->elements[0])->fn),  set_pair_as_expr(&local_7325622, set_pair_as_expr(&local_7325625, ((closureN)self_7312908)->elements[1], set_pair_as_expr(&local_7325629, set_pair_as_expr(&local_7325632, ((closureN)self_7312908)->elements[2], set_pair_as_expr(&local_7325636, ((closureN)self_7312908)->elements[7], set_pair_as_expr(&local_7325640, set_pair_as_expr(&local_7325643, ((closureN)self_7312908)->elements[3], set_pair_as_expr(&local_7325647, set_pair_as_expr(&local_7325650, ((closureN)self_7312908)->elements[5], set_pair_as_expr(&local_7325654, NULL, set_pair_as_expr(&local_7325657, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312908)->elements[6])), NULL))), set_pair_as_expr(&local_7325665, ((closureN)self_7312908)->elements[4], NULL))), NULL))), r_737316_7310439_7310503_7310566_7310627_7310687_7310746_7310804_7310861_7310917_7310966_7310989_7311011_7311032_7311052_731106
9_7311085_7311100_7311114_7311127_7311138_7311148_7311157_7311165_7311172_7311178_7311183_7311187_7311706)), boolean_f));; 
  }
  
 -static void __lambda_1275(void *data, object self_7314209, int argc, object *args) /* object self_7314209, object r_738065 */
-+static void __lambda_1228(void *data, object self_7312916, int argc, object *args) /* object self_7312916, object r_737297 */
++static void __lambda_1228(void *data, object self_7312909, int argc, object *args) /* object self_7312909, object r_737290 */
   {
 - object r_738065 = args[0];
-+ object r_737297 = args[0];
++ object r_737290 = args[0];
    
 -closureN_type c_7327973;
 -object e_7327982 [5];
@@ -6046,63 +6048,63 @@ Make let-values be the same as let*-values, to work around
 -c_7327973.elements[2] = ((closureN)self_7314209)->elements[2];
 -c_7327973.elements[3] = ((closureN)self_7314209)->elements[3];
 -c_7327973.elements[4] = ((closureN)self_7314209)->elements[4];
-+closureN_type c_7325521;
-+object e_7325530 [5];
-+c_7325521.hdr.mark = gc_color_red;
-+ c_7325521.hdr.grayed = 0;
-+c_7325521.tag = closureN_tag;
-+ c_7325521.fn = (function_type)__lambda_1229;
-+c_7325521.num_args = 1;
-+c_7325521.num_elements = 5;
-+c_7325521.elements = (object *)e_7325530;
-+c_7325521.elements[0] = ((closureN)self_7312916)->elements[0];
-+c_7325521.elements[1] = ((closureN)self_7312916)->elements[1];
-+c_7325521.elements[2] = ((closureN)self_7312916)->elements[2];
-+c_7325521.elements[3] = ((closureN)self_7312916)->elements[3];
-+c_7325521.elements[4] = ((closureN)self_7312916)->elements[4];
++closureN_type c_7325514;
++object e_7325523 [5];
++c_7325514.hdr.mark = gc_color_red;
++ c_7325514.hdr.grayed = 0;
++c_7325514.tag = closureN_tag;
++ c_7325514.fn = (function_type)__lambda_1229;
++c_7325514.num_args = 1;
++c_7325514.num_elements = 5;
++c_7325514.elements = (object *)e_7325523;
++c_7325514.elements[0] = ((closureN)self_7312909)->elements[0];
++c_7325514.elements[1] = ((closureN)self_7312909)->elements[1];
++c_7325514.elements[2] = ((closureN)self_7312909)->elements[2];
++c_7325514.elements[3] = ((closureN)self_7312909)->elements[3];
++c_7325514.elements[4] = ((closureN)self_7312909)->elements[4];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7327973,__lambda_1276,  Cyc_set_cell(data, ((closureN)self_7314209)->elements[2], r_738065));; 
-+return_direct_with_clo1(data,(closure)&c_7325521,__lambda_1229,  Cyc_set_cell(data, ((closureN)self_7312916)->elements[2], r_737297));; 
++return_direct_with_clo1(data,(closure)&c_7325514,__lambda_1229,  Cyc_set_cell(data, ((closureN)self_7312909)->elements[2], r_737290));; 
  }
  
 -static void __lambda_1276(void *data, object self_7314210, int argc, object *args) /* object self_7314210, object r_738064 */
-+static void __lambda_1229(void *data, object self_7312917, int argc, object *args) /* object self_7312917, object r_737296 */
++static void __lambda_1229(void *data, object self_7312910, int argc, object *args) /* object self_7312910, object r_737289 */
   {
  
    
  
 -return_closcall4(data,  car(((closureN)self_7314210)->elements[2]),  ((closureN)self_7314210)->elements[1], ((closureN)self_7314210)->elements[3], ((closureN)self_7314210)->elements[0], ((closureN)self_7314210)->elements[4]);; 
-+return_closcall4(data,  car(((closureN)self_7312917)->elements[2]),  ((closureN)self_7312917)->elements[1], ((closureN)self_7312917)->elements[3], ((closureN)self_7312917)->elements[0], ((closureN)self_7312917)->elements[4]);; 
++return_closcall4(data,  car(((closureN)self_7312910)->elements[2]),  ((closureN)self_7312910)->elements[1], ((closureN)self_7312910)->elements[3], ((closureN)self_7312910)->elements[0], ((closureN)self_7312910)->elements[4]);; 
  }
  
 -static void __lambda_1267(void *data, object self_7314211, int argc, object *args) /* object self_7314211, object k_738246 */
-+static void __lambda_1220(void *data, object self_7312918, int argc, object *args) /* object self_7312918, object k_737478 */
++static void __lambda_1220(void *data, object self_7312911, int argc, object *args) /* object self_7312911, object k_737471 */
   {
 - object k_738246 = args[0];
-+ object k_737478 = args[0];
++ object k_737471 = args[0];
      
 -if( (boolean_f != Cyc_is_pair(((closureN)self_7314211)->elements[1])) ){ 
-+if( (boolean_f != Cyc_is_pair(((closureN)self_7312918)->elements[1])) ){ 
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312911)->elements[1])) ){ 
      
    
 -if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7314211)->elements[1]))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7312918)->elements[1]))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7312911)->elements[1]))) ){ 
      
    
    
 -if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, ((closureN)self_7314211)->elements[1])))) ){ 
-+if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, ((closureN)self_7312918)->elements[1])))) ){ 
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, ((closureN)self_7312911)->elements[1])))) ){ 
      
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314211)->elements[1]))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312918)->elements[1]))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312911)->elements[1]))) ){ 
      
    
    
 -if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314211)->elements[1])))) ){ 
-+if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312918)->elements[1])))) ){ 
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312911)->elements[1])))) ){ 
    
 -closureN_type c_7327906;
 -object e_7327931 [2];
@@ -6115,92 +6117,92 @@ Make let-values be the same as let*-values, to work around
 -c_7327906.elements = (object *)e_7327931;
 -c_7327906.elements[0] = k_738246;
 -c_7327906.elements[1] = ((closureN)self_7314211)->elements[1];
-+closureN_type c_7325454;
-+object e_7325479 [2];
-+c_7325454.hdr.mark = gc_color_red;
-+ c_7325454.hdr.grayed = 0;
-+c_7325454.tag = closureN_tag;
-+ c_7325454.fn = (function_type)__lambda_1221;
-+c_7325454.num_args = 1;
-+c_7325454.num_elements = 2;
-+c_7325454.elements = (object *)e_7325479;
-+c_7325454.elements[0] = k_737478;
-+c_7325454.elements[1] = ((closureN)self_7312918)->elements[1];
++closureN_type c_7325447;
++object e_7325472 [2];
++c_7325447.hdr.mark = gc_color_red;
++ c_7325447.hdr.grayed = 0;
++c_7325447.tag = closureN_tag;
++ c_7325447.fn = (function_type)__lambda_1221;
++c_7325447.num_args = 1;
++c_7325447.num_elements = 2;
++c_7325447.elements = (object *)e_7325472;
++c_7325447.elements[0] = k_737471;
++c_7325447.elements[1] = ((closureN)self_7312911)->elements[1];
  
 -return_closcall2(data,  ((closureN)self_7314211)->elements[0],  &c_7327906, quote_define);
-+return_closcall2(data,  ((closureN)self_7312918)->elements[0],  &c_7325454, quote_define);
++return_closcall2(data,  ((closureN)self_7312911)->elements[0],  &c_7325447, quote_define);
  } else { 
 -  return_direct_with_clo1(data,  k_738246, (((closure)  k_738246)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_737478, (((closure)  k_737478)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_737471, (((closure)  k_737471)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_738246, (((closure)  k_738246)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_737478, (((closure)  k_737478)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_737471, (((closure)  k_737471)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_738246, (((closure)  k_738246)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_737478, (((closure)  k_737478)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_737471, (((closure)  k_737471)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_738246, (((closure)  k_738246)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_737478, (((closure)  k_737478)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_737471, (((closure)  k_737471)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_738246, (((closure)  k_738246)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_737478, (((closure)  k_737478)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_737471, (((closure)  k_737471)->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_1268(void *data, object self_7314212, int argc, object *args) /* object self_7314212, object r_738259 */
-+static void __lambda_1221(void *data, object self_7312919, int argc, object *args) /* object self_7312919, object r_737491 */
++static void __lambda_1221(void *data, object self_7312912, int argc, object *args) /* object self_7312912, object r_737484 */
   {
 - object r_738259 = args[0];
-+ object r_737491 = args[0];
++ object r_737484 = args[0];
    
 -pair_type local_7327911; 
-+pair_type local_7325459; 
++pair_type local_7325452; 
  
 -pair_type local_7327914; 
-+pair_type local_7325462; 
++pair_type local_7325455; 
  
 -pair_type local_7327917; 
-+pair_type local_7325465; 
++pair_type local_7325458; 
  
  
  
  
  
 -pair_type local_7327925; 
-+pair_type local_7325473; 
++pair_type local_7325466; 
  
  
  
  
 -return_direct_with_clo1(data,  ((closureN)self_7314212)->elements[0], (((closure)  ((closureN)self_7314212)->elements[0])->fn),  set_pair_as_expr(&local_7327911, set_pair_as_expr(&local_7327914, r_738259, set_pair_as_expr(&local_7327917, Cyc_car(data, Cyc_car(data, ((closureN)self_7314212)->elements[1])), set_pair_as_expr(&local_7327925, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314212)->elements[1])), NULL))), boolean_f));; 
-+return_direct_with_clo1(data,  ((closureN)self_7312919)->elements[0], (((closure)  ((closureN)self_7312919)->elements[0])->fn),  set_pair_as_expr(&local_7325459, set_pair_as_expr(&local_7325462, r_737491, set_pair_as_expr(&local_7325465, Cyc_car(data, Cyc_car(data, ((closureN)self_7312919)->elements[1])), set_pair_as_expr(&local_7325473, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312919)->elements[1])), NULL))), boolean_f));; 
++return_direct_with_clo1(data,  ((closureN)self_7312912)->elements[0], (((closure)  ((closureN)self_7312912)->elements[0])->fn),  set_pair_as_expr(&local_7325452, set_pair_as_expr(&local_7325455, r_737484, set_pair_as_expr(&local_7325458, Cyc_car(data, Cyc_car(data, ((closureN)self_7312912)->elements[1])), set_pair_as_expr(&local_7325466, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312912)->elements[1])), NULL))), boolean_f));; 
  }
  
 -static void __lambda_1257(void *data, object self_7314213, int argc, object *args) /* object self_7314213, object k_738268 */
-+static void __lambda_1210(void *data, object self_7312920, int argc, object *args) /* object self_7312920, object k_737500 */
++static void __lambda_1210(void *data, object self_7312913, int argc, object *args) /* object self_7312913, object k_737493 */
   {
 - object k_738268 = args[0];
-+ object k_737500 = args[0];
++ object k_737493 = args[0];
      
 -if( (boolean_f != Cyc_is_pair(((closureN)self_7314213)->elements[1])) ){ 
-+if( (boolean_f != Cyc_is_pair(((closureN)self_7312920)->elements[1])) ){ 
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312913)->elements[1])) ){ 
      
    
 -if( (boolean_f != Cyc_is_null(Cyc_car(data, ((closureN)self_7314213)->elements[1]))) ){ 
-+if( (boolean_f != Cyc_is_null(Cyc_car(data, ((closureN)self_7312920)->elements[1]))) ){ 
++if( (boolean_f != Cyc_is_null(Cyc_car(data, ((closureN)self_7312913)->elements[1]))) ){ 
      
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314213)->elements[1]))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312920)->elements[1]))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312913)->elements[1]))) ){ 
      
    
    
 -if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314213)->elements[1])))) ){ 
-+if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312920)->elements[1])))) ){ 
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312913)->elements[1])))) ){ 
    
 -closureN_type c_7327789;
 -object e_7327861 [3];
@@ -6214,44 +6216,44 @@ Make let-values be the same as let*-values, to work around
 -c_7327789.elements[0] = k_738268;
 -c_7327789.elements[1] = ((closureN)self_7314213)->elements[0];
 -c_7327789.elements[2] = ((closureN)self_7314213)->elements[1];
-+closureN_type c_7325337;
-+object e_7325409 [3];
-+c_7325337.hdr.mark = gc_color_red;
-+ c_7325337.hdr.grayed = 0;
-+c_7325337.tag = closureN_tag;
-+ c_7325337.fn = (function_type)__lambda_1211;
-+c_7325337.num_args = 1;
-+c_7325337.num_elements = 3;
-+c_7325337.elements = (object *)e_7325409;
-+c_7325337.elements[0] = k_737500;
-+c_7325337.elements[1] = ((closureN)self_7312920)->elements[0];
-+c_7325337.elements[2] = ((closureN)self_7312920)->elements[1];
++closureN_type c_7325330;
++object e_7325402 [3];
++c_7325330.hdr.mark = gc_color_red;
++ c_7325330.hdr.grayed = 0;
++c_7325330.tag = closureN_tag;
++ c_7325330.fn = (function_type)__lambda_1211;
++c_7325330.num_args = 1;
++c_7325330.num_elements = 3;
++c_7325330.elements = (object *)e_7325402;
++c_7325330.elements[0] = k_737493;
++c_7325330.elements[1] = ((closureN)self_7312913)->elements[0];
++c_7325330.elements[2] = ((closureN)self_7312913)->elements[1];
  
 -return_closcall2(data,  ((closureN)self_7314213)->elements[0],  &c_7327789, quote_define);
-+return_closcall2(data,  ((closureN)self_7312920)->elements[0],  &c_7325337, quote_define);
++return_closcall2(data,  ((closureN)self_7312913)->elements[0],  &c_7325330, quote_define);
  } else { 
 -  return_direct_with_clo1(data,  k_738268, (((closure)  k_738268)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_737500, (((closure)  k_737500)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_737493, (((closure)  k_737493)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_738268, (((closure)  k_738268)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_737500, (((closure)  k_737500)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_737493, (((closure)  k_737493)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_738268, (((closure)  k_738268)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_737500, (((closure)  k_737500)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_737493, (((closure)  k_737493)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_738268, (((closure)  k_738268)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_737500, (((closure)  k_737500)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_737493, (((closure)  k_737493)->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_1258(void *data, object self_7314214, int argc, object *args) /* object self_7314214, object r_738278 */
-+static void __lambda_1211(void *data, object self_7312921, int argc, object *args) /* object self_7312921, object r_737510 */
++static void __lambda_1211(void *data, object self_7312914, int argc, object *args) /* object self_7312914, object r_737503 */
   {
 - object r_738278 = args[0];
-+ object r_737510 = args[0];
++ object r_737503 = args[0];
    
 -closureN_type c_7327792;
 -object e_7327860 [4];
@@ -6266,29 +6268,29 @@ Make let-values be the same as let*-values, to work around
 -c_7327792.elements[1] = r_738278;
 -c_7327792.elements[2] = ((closureN)self_7314214)->elements[1];
 -c_7327792.elements[3] = ((closureN)self_7314214)->elements[2];
-+closureN_type c_7325340;
-+object e_7325408 [4];
-+c_7325340.hdr.mark = gc_color_red;
-+ c_7325340.hdr.grayed = 0;
-+c_7325340.tag = closureN_tag;
-+ c_7325340.fn = (function_type)__lambda_1212;
-+c_7325340.num_args = 1;
-+c_7325340.num_elements = 4;
-+c_7325340.elements = (object *)e_7325408;
-+c_7325340.elements[0] = ((closureN)self_7312921)->elements[0];
-+c_7325340.elements[1] = r_737510;
-+c_7325340.elements[2] = ((closureN)self_7312921)->elements[1];
-+c_7325340.elements[3] = ((closureN)self_7312921)->elements[2];
++closureN_type c_7325333;
++object e_7325401 [4];
++c_7325333.hdr.mark = gc_color_red;
++ c_7325333.hdr.grayed = 0;
++c_7325333.tag = closureN_tag;
++ c_7325333.fn = (function_type)__lambda_1212;
++c_7325333.num_args = 1;
++c_7325333.num_elements = 4;
++c_7325333.elements = (object *)e_7325401;
++c_7325333.elements[0] = ((closureN)self_7312914)->elements[0];
++c_7325333.elements[1] = r_737503;
++c_7325333.elements[2] = ((closureN)self_7312914)->elements[1];
++c_7325333.elements[3] = ((closureN)self_7312914)->elements[2];
  
 -return_closcall2(data,  ((closureN)self_7314214)->elements[1],  &c_7327792, quote_dummy);; 
-+return_closcall2(data,  ((closureN)self_7312921)->elements[1],  &c_7325340, quote_dummy);; 
++return_closcall2(data,  ((closureN)self_7312914)->elements[1],  &c_7325333, quote_dummy);; 
  }
  
 -static void __lambda_1259(void *data, object self_7314215, int argc, object *args) /* object self_7314215, object r_738281 */
-+static void __lambda_1212(void *data, object self_7312922, int argc, object *args) /* object self_7312922, object r_737513 */
++static void __lambda_1212(void *data, object self_7312915, int argc, object *args) /* object self_7312915, object r_737506 */
   {
 - object r_738281 = args[0];
-+ object r_737513 = args[0];
++ object r_737506 = args[0];
    
 -closureN_type c_7327795;
 -object e_7327859 [5];
@@ -6304,30 +6306,30 @@ Make let-values be the same as let*-values, to work around
 -c_7327795.elements[2] = r_738281;
 -c_7327795.elements[3] = ((closureN)self_7314215)->elements[2];
 -c_7327795.elements[4] = ((closureN)self_7314215)->elements[3];
-+closureN_type c_7325343;
-+object e_7325407 [5];
-+c_7325343.hdr.mark = gc_color_red;
-+ c_7325343.hdr.grayed = 0;
-+c_7325343.tag = closureN_tag;
-+ c_7325343.fn = (function_type)__lambda_1213;
-+c_7325343.num_args = 1;
-+c_7325343.num_elements = 5;
-+c_7325343.elements = (object *)e_7325407;
-+c_7325343.elements[0] = ((closureN)self_7312922)->elements[0];
-+c_7325343.elements[1] = ((closureN)self_7312922)->elements[1];
-+c_7325343.elements[2] = r_737513;
-+c_7325343.elements[3] = ((closureN)self_7312922)->elements[2];
-+c_7325343.elements[4] = ((closureN)self_7312922)->elements[3];
++closureN_type c_7325336;
++object e_7325400 [5];
++c_7325336.hdr.mark = gc_color_red;
++ c_7325336.hdr.grayed = 0;
++c_7325336.tag = closureN_tag;
++ c_7325336.fn = (function_type)__lambda_1213;
++c_7325336.num_args = 1;
++c_7325336.num_elements = 5;
++c_7325336.elements = (object *)e_7325400;
++c_7325336.elements[0] = ((closureN)self_7312915)->elements[0];
++c_7325336.elements[1] = ((closureN)self_7312915)->elements[1];
++c_7325336.elements[2] = r_737506;
++c_7325336.elements[3] = ((closureN)self_7312915)->elements[2];
++c_7325336.elements[4] = ((closureN)self_7312915)->elements[3];
  
 -return_closcall2(data,  ((closureN)self_7314215)->elements[2],  &c_7327795, quote_call_91with_91values);; 
-+return_closcall2(data,  ((closureN)self_7312922)->elements[2],  &c_7325343, quote_call_91with_91values);; 
++return_closcall2(data,  ((closureN)self_7312915)->elements[2],  &c_7325336, quote_call_91with_91values);; 
  }
  
 -static void __lambda_1260(void *data, object self_7314216, int argc, object *args) /* object self_7314216, object r_738287 */
-+static void __lambda_1213(void *data, object self_7312923, int argc, object *args) /* object self_7312923, object r_737519 */
++static void __lambda_1213(void *data, object self_7312916, int argc, object *args) /* object self_7312916, object r_737512 */
   {
 - object r_738287 = args[0];
-+ object r_737519 = args[0];
++ object r_737512 = args[0];
    
 -closureN_type c_7327798;
 -object e_7327858 [6];
@@ -6344,31 +6346,31 @@ Make let-values be the same as let*-values, to work around
 -c_7327798.elements[3] = r_738287;
 -c_7327798.elements[4] = ((closureN)self_7314216)->elements[3];
 -c_7327798.elements[5] = ((closureN)self_7314216)->elements[4];
-+closureN_type c_7325346;
-+object e_7325406 [6];
-+c_7325346.hdr.mark = gc_color_red;
-+ c_7325346.hdr.grayed = 0;
-+c_7325346.tag = closureN_tag;
-+ c_7325346.fn = (function_type)__lambda_1214;
-+c_7325346.num_args = 1;
-+c_7325346.num_elements = 6;
-+c_7325346.elements = (object *)e_7325406;
-+c_7325346.elements[0] = ((closureN)self_7312923)->elements[0];
-+c_7325346.elements[1] = ((closureN)self_7312923)->elements[1];
-+c_7325346.elements[2] = ((closureN)self_7312923)->elements[2];
-+c_7325346.elements[3] = r_737519;
-+c_7325346.elements[4] = ((closureN)self_7312923)->elements[3];
-+c_7325346.elements[5] = ((closureN)self_7312923)->elements[4];
++closureN_type c_7325339;
++object e_7325399 [6];
++c_7325339.hdr.mark = gc_color_red;
++ c_7325339.hdr.grayed = 0;
++c_7325339.tag = closureN_tag;
++ c_7325339.fn = (function_type)__lambda_1214;
++c_7325339.num_args = 1;
++c_7325339.num_elements = 6;
++c_7325339.elements = (object *)e_7325399;
++c_7325339.elements[0] = ((closureN)self_7312916)->elements[0];
++c_7325339.elements[1] = ((closureN)self_7312916)->elements[1];
++c_7325339.elements[2] = ((closureN)self_7312916)->elements[2];
++c_7325339.elements[3] = r_737512;
++c_7325339.elements[4] = ((closureN)self_7312916)->elements[3];
++c_7325339.elements[5] = ((closureN)self_7312916)->elements[4];
  
 -return_closcall2(data,  ((closureN)self_7314216)->elements[3],  &c_7327798, quote_lambda);; 
-+return_closcall2(data,  ((closureN)self_7312923)->elements[3],  &c_7325346, quote_lambda);; 
++return_closcall2(data,  ((closureN)self_7312916)->elements[3],  &c_7325339, quote_lambda);; 
  }
  
 -static void __lambda_1261(void *data, object self_7314217, int argc, object *args) /* object self_7314217, object r_738306 */
-+static void __lambda_1214(void *data, object self_7312924, int argc, object *args) /* object self_7312924, object r_737538 */
++static void __lambda_1214(void *data, object self_7312917, int argc, object *args) /* object self_7312917, object r_737531 */
   {
 - object r_738306 = args[0];
-+ object r_737538 = args[0];
++ object r_737531 = args[0];
    
 -closureN_type c_7327801;
 -object e_7327857 [7];
@@ -6386,32 +6388,32 @@ Make let-values be the same as let*-values, to work around
 -c_7327801.elements[4] = r_738306;
 -c_7327801.elements[5] = ((closureN)self_7314217)->elements[4];
 -c_7327801.elements[6] = ((closureN)self_7314217)->elements[5];
-+closureN_type c_7325349;
-+object e_7325405 [7];
-+c_7325349.hdr.mark = gc_color_red;
-+ c_7325349.hdr.grayed = 0;
-+c_7325349.tag = closureN_tag;
-+ c_7325349.fn = (function_type)__lambda_1215;
-+c_7325349.num_args = 1;
-+c_7325349.num_elements = 7;
-+c_7325349.elements = (object *)e_7325405;
-+c_7325349.elements[0] = ((closureN)self_7312924)->elements[0];
-+c_7325349.elements[1] = ((closureN)self_7312924)->elements[1];
-+c_7325349.elements[2] = ((closureN)self_7312924)->elements[2];
-+c_7325349.elements[3] = ((closureN)self_7312924)->elements[3];
-+c_7325349.elements[4] = r_737538;
-+c_7325349.elements[5] = ((closureN)self_7312924)->elements[4];
-+c_7325349.elements[6] = ((closureN)self_7312924)->elements[5];
++closureN_type c_7325342;
++object e_7325398 [7];
++c_7325342.hdr.mark = gc_color_red;
++ c_7325342.hdr.grayed = 0;
++c_7325342.tag = closureN_tag;
++ c_7325342.fn = (function_type)__lambda_1215;
++c_7325342.num_args = 1;
++c_7325342.num_elements = 7;
++c_7325342.elements = (object *)e_7325398;
++c_7325342.elements[0] = ((closureN)self_7312917)->elements[0];
++c_7325342.elements[1] = ((closureN)self_7312917)->elements[1];
++c_7325342.elements[2] = ((closureN)self_7312917)->elements[2];
++c_7325342.elements[3] = ((closureN)self_7312917)->elements[3];
++c_7325342.elements[4] = r_737531;
++c_7325342.elements[5] = ((closureN)self_7312917)->elements[4];
++c_7325342.elements[6] = ((closureN)self_7312917)->elements[5];
  
 -return_closcall2(data,  ((closureN)self_7314217)->elements[4],  &c_7327801, quote_lambda);; 
-+return_closcall2(data,  ((closureN)self_7312924)->elements[4],  &c_7325349, quote_lambda);; 
++return_closcall2(data,  ((closureN)self_7312917)->elements[4],  &c_7325342, quote_lambda);; 
  }
  
 -static void __lambda_1262(void *data, object self_7314218, int argc, object *args) /* object self_7314218, object r_738296_7311568_7311581_7311593 */
-+static void __lambda_1215(void *data, object self_7312925, int argc, object *args) /* object self_7312925, object r_737528_7310322_7310335_7310347 */
++static void __lambda_1215(void *data, object self_7312918, int argc, object *args) /* object self_7312918, object r_737521_7310315_7310328_7310340 */
   {
 - object r_738296_7311568_7311581_7311593 = args[0];
-+ object r_737528_7310322_7310335_7310347 = args[0];
++ object r_737521_7310315_7310328_7310340 = args[0];
    
 -closureN_type c_7327804;
 -object e_7327856 [7];
@@ -6429,100 +6431,99 @@ Make let-values be the same as let*-values, to work around
 -c_7327804.elements[4] = r_738296_7311568_7311581_7311593;
 -c_7327804.elements[5] = ((closureN)self_7314218)->elements[4];
 -c_7327804.elements[6] = ((closureN)self_7314218)->elements[6];
-+closureN_type c_7325352;
-+object e_7325404 [7];
-+c_7325352.hdr.mark = gc_color_red;
-+ c_7325352.hdr.grayed = 0;
-+c_7325352.tag = closureN_tag;
-+ c_7325352.fn = (function_type)__lambda_1216;
-+c_7325352.num_args = 1;
-+c_7325352.num_elements = 7;
-+c_7325352.elements = (object *)e_7325404;
-+c_7325352.elements[0] = ((closureN)self_7312925)->elements[0];
-+c_7325352.elements[1] = ((closureN)self_7312925)->elements[1];
-+c_7325352.elements[2] = ((closureN)self_7312925)->elements[2];
-+c_7325352.elements[3] = ((closureN)self_7312925)->elements[3];
-+c_7325352.elements[4] = r_737528_7310322_7310335_7310347;
-+c_7325352.elements[5] = ((closureN)self_7312925)->elements[4];
-+c_7325352.elements[6] = ((closureN)self_7312925)->elements[6];
++closureN_type c_7325345;
++object e_7325397 [7];
++c_7325345.hdr.mark = gc_color_red;
++ c_7325345.hdr.grayed = 0;
++c_7325345.tag = closureN_tag;
++ c_7325345.fn = (function_type)__lambda_1216;
++c_7325345.num_args = 1;
++c_7325345.num_elements = 7;
++c_7325345.elements = (object *)e_7325397;
++c_7325345.elements[0] = ((closureN)self_7312918)->elements[0];
++c_7325345.elements[1] = ((closureN)self_7312918)->elements[1];
++c_7325345.elements[2] = ((closureN)self_7312918)->elements[2];
++c_7325345.elements[3] = ((closureN)self_7312918)->elements[3];
++c_7325345.elements[4] = r_737521_7310315_7310328_7310340;
++c_7325345.elements[5] = ((closureN)self_7312918)->elements[4];
++c_7325345.elements[6] = ((closureN)self_7312918)->elements[6];
  
 -return_closcall2(data,  ((closureN)self_7314218)->elements[5],  &c_7327804, quote_args);; 
-+return_closcall2(data,  ((closureN)self_7312925)->elements[5],  &c_7325352, quote_args);; 
++return_closcall2(data,  ((closureN)self_7312918)->elements[5],  &c_7325345, quote_args);; 
  }
  
 -static void __lambda_1263(void *data, object self_7314219, int argc, object *args) /* object self_7314219, object r_738299_7311569_7311582_7311594 */
-+static void __lambda_1216(void *data, object self_7312926, int argc, object *args) /* object self_7312926, object r_737531_7310323_7310336_7310348 */
++static void __lambda_1216(void *data, object self_7312919, int argc, object *args) /* object self_7312919, object r_737524_7310316_7310329_7310341 */
   {
 - object r_738299_7311569_7311582_7311594 = args[0];
-+ object r_737531_7310323_7310336_7310348 = args[0];
++ object r_737524_7310316_7310329_7310341 = args[0];
    
 -pair_type local_7327809; 
-+pair_type local_7325357; 
++pair_type local_7325350; 
  
 -pair_type local_7327812; 
-+pair_type local_7325360; 
++pair_type local_7325353; 
  
 -pair_type local_7327816; 
-+pair_type local_7325364; 
++pair_type local_7325357; 
  
 -pair_type local_7327820; 
-+pair_type local_7325368; 
++pair_type local_7325361; 
  
 -pair_type local_7327823; 
-+pair_type local_7325371; 
++pair_type local_7325364; 
  
 -pair_type local_7327827; 
-+pair_type local_7325375; 
++pair_type local_7325368; 
  
 -pair_type local_7327830; 
-+pair_type local_7325378; 
++pair_type local_7325371; 
  
 -pair_type local_7327834; 
-+pair_type local_7325382; 
++pair_type local_7325375; 
  
 -pair_type local_7327837; 
-+pair_type local_7325385; 
++pair_type local_7325378; 
  
  
  
  
  
 -pair_type local_7327845; 
-+pair_type local_7325393; 
++pair_type local_7325386; 
  
 -pair_type local_7327848; 
-+pair_type local_7325396; 
++pair_type local_7325389; 
  
 -pair_type local_7327852; 
-+pair_type local_7325400; 
++pair_type local_7325393; 
  
 -pair_type local_7327855; 
 -return_direct_with_clo1(data,  ((closureN)self_7314219)->elements[0], (((closure)  ((closureN)self_7314219)->elements[0])->fn),  set_pair_as_expr(&local_7327809, set_pair_as_expr(&local_7327812, ((closureN)self_7314219)->elements[1], set_pair_as_expr(&local_7327816, ((closureN)self_7314219)->elements[2], set_pair_as_expr(&local_7327820, set_pair_as_expr(&local_7327823, ((closureN)self_7314219)->elements[3], set_pair_as_expr(&local_7327827, set_pair_as_expr(&local_7327830, ((closureN)self_7314219)->elements[5], set_pair_as_expr(&local_7327834, NULL, set_pair_as_expr(&local_7327837, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314219)->elements[6])), NULL))), set_pair_as_expr(&local_7327845, set_pair_as_expr(&local_7327848, ((closureN)self_7314219)->elements[4], set_pair_as_expr(&local_7327852, r_738299_7311569_7311582_7311594, set_pair_as_expr(&local_7327855, boolean_f, NULL))), NULL))), NULL))), boolean_f));; 
-+pair_type local_7325403; 
-+return_direct_with_clo1(data,  ((closureN)self_7312926)->elements[0], (((closure)  ((closureN)self_7312926)->elements[0])->fn),  set_pair_as_expr(&local_7325357, set_pair_as_expr(&local_7325360, ((closureN)self_7312926)->elements[1], set_pair_as_expr(&local_7325364, ((closureN)self_7312926)->elements[2], set_pair_as_expr(&local_7325368, set_pair_as_expr(&local_7325371, ((closureN)self_7312926)->elements[3], set_pair_as_expr(&local_7325375, set_pair_as_expr(&local_7325378, ((closureN)self_7312926)->elements[5], set_pair_as_expr(&local_7325382, NULL, set_pair_as_expr(&local_7325385, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312926)->elements[6])), NULL))), set_pair_as_expr(&local_7325393, set_pair_as_expr(&local_7325396, ((closureN)self_7312926)->elements[4], set_pair_as_expr(&local_7325400, r_737531_7310323_7310336_7310348, set_pair_as_expr(&local_7325403, boolean_f, NULL))), NULL))), NULL))), boolean_f));; 
++pair_type local_7325396; 
++return_direct_with_clo1(data,  ((closureN)self_7312919)->elements[0], (((closure)  ((closureN)self_7312919)->elements[0])->fn),  set_pair_as_expr(&local_7325350, set_pair_as_expr(&local_7325353, ((closureN)self_7312919)->elements[1], set_pair_as_expr(&local_7325357, ((closureN)self_7312919)->elements[2], set_pair_as_expr(&local_7325361, set_pair_as_expr(&local_7325364, ((closureN)self_7312919)->elements[3], set_pair_as_expr(&local_7325368, set_pair_as_expr(&local_7325371, ((closureN)self_7312919)->elements[5], set_pair_as_expr(&local_7325375, NULL, set_pair_as_expr(&local_7325378, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312919)->elements[6])), NULL))), set_pair_as_expr(&local_7325386, set_pair_as_expr(&local_7325389, ((closureN)self_7312919)->elements[4], set_pair_as_expr(&local_7325393, r_737524_7310316_7310329_7310341, set_pair_as_expr(&local_7325396, boolean_f, NULL))), NULL))), NULL))), boolean_f));; 
  }
  
 -static void __lambda_1224(void *data, object _, int argc, object *args) /* closure _,object k_737837, object expr_732586_733999, object rename_732587_734000, object compare_732588_734001 */
-+static void __lambda_1177(void *data, object _, int argc, object *args) /* closure _,object k_737069, object expr_732245_733554, object rename_732246_733555, object compare_732247_733556 */
++static void __lambda_1177(void *data, object _, int argc, object *args) /* closure _,object k_737062, object expr_732239_733547, object rename_732240_733548, object compare_732241_733549 */
   {
 -object k_737837 = args[0]; object expr_732586_733999 = args[1]; object rename_732587_734000 = args[2];
 -  object name_732594_734003;
--  Cyc_st_add(data, "scheme/base.sld:define-record-type");
-+object k_737069 = args[0]; object expr_732245_733554 = args[1]; object rename_732246_733555 = args[2];
-+  object name_732253_733558;
-+  Cyc_st_add(data, "base.sld:define-record-type");
++object k_737062 = args[0]; object expr_732239_733547 = args[1]; object rename_732240_733548 = args[2];
++  object name_732247_733551;
+   Cyc_st_add(data, "scheme/base.sld:define-record-type");
    
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cadr(data, expr_732586_733999))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_cadr(data, expr_732245_733554))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_cadr(data, expr_732239_733547))) ){ 
    
    
 -  name_732594_734003 = Cyc_car(data, Cyc_cadr(data, expr_732586_733999));
-+  name_732253_733558 = Cyc_car(data, Cyc_cadr(data, expr_732245_733554));
++  name_732247_733551 = Cyc_car(data, Cyc_cadr(data, expr_732239_733547));
  } else { 
    
 -  name_732594_734003 = Cyc_cadr(data, expr_732586_733999);}
-+  name_732253_733558 = Cyc_cadr(data, expr_732245_733554);}
++  name_732247_733551 = Cyc_cadr(data, expr_732239_733547);}
  ;
 -closureN_type c_7327314;
 -object e_7327327 [1];
@@ -6534,16 +6535,16 @@ Make let-values be the same as let*-values, to work around
 -c_7327314.num_elements = 1;
 -c_7327314.elements = (object *)e_7327327;
 -c_7327314.elements[0] = expr_732586_733999;
-+closureN_type c_7324862;
-+object e_7324875 [1];
-+c_7324862.hdr.mark = gc_color_red;
-+ c_7324862.hdr.grayed = 0;
-+c_7324862.tag = closureN_tag;
-+ c_7324862.fn = (function_type)__lambda_1178;
-+c_7324862.num_args = 0;
-+c_7324862.num_elements = 1;
-+c_7324862.elements = (object *)e_7324875;
-+c_7324862.elements[0] = expr_732245_733554;
++closureN_type c_7324855;
++object e_7324868 [1];
++c_7324855.hdr.mark = gc_color_red;
++ c_7324855.hdr.grayed = 0;
++c_7324855.tag = closureN_tag;
++ c_7324855.fn = (function_type)__lambda_1178;
++c_7324855.num_args = 0;
++c_7324855.num_elements = 1;
++c_7324855.elements = (object *)e_7324868;
++c_7324855.elements[0] = expr_732239_733547;
  
  
 -closureN_type c_7327328;
@@ -6559,29 +6560,29 @@ Make let-values be the same as let*-values, to work around
 -c_7327328.elements[1] = k_737837;
 -c_7327328.elements[2] = name_732594_734003;
 -c_7327328.elements[3] = rename_732587_734000;
-+closureN_type c_7324876;
-+object e_7325309 [4];
-+c_7324876.hdr.mark = gc_color_red;
-+ c_7324876.hdr.grayed = 0;
-+c_7324876.tag = closureN_tag;
-+ c_7324876.fn = (function_type)__lambda_1179;
-+c_7324876.num_args = 1;
-+c_7324876.num_elements = 4;
-+c_7324876.elements = (object *)e_7325309;
-+c_7324876.elements[0] = expr_732245_733554;
-+c_7324876.elements[1] = k_737069;
-+c_7324876.elements[2] = name_732253_733558;
-+c_7324876.elements[3] = rename_732246_733555;
++closureN_type c_7324869;
++object e_7325302 [4];
++c_7324869.hdr.mark = gc_color_red;
++ c_7324869.hdr.grayed = 0;
++c_7324869.tag = closureN_tag;
++ c_7324869.fn = (function_type)__lambda_1179;
++c_7324869.num_args = 1;
++c_7324869.num_elements = 4;
++c_7324869.elements = (object *)e_7325302;
++c_7324869.elements[0] = expr_732239_733547;
++c_7324869.elements[1] = k_737062;
++c_7324869.elements[2] = name_732247_733551;
++c_7324869.elements[3] = rename_732240_733548;
  
 -return_direct_with_clo1(data,(closure)&c_7327314,__lambda_1225,  &c_7327328);; 
-+return_direct_with_clo1(data,(closure)&c_7324862,__lambda_1178,  &c_7324876);; 
++return_direct_with_clo1(data,(closure)&c_7324855,__lambda_1178,  &c_7324869);; 
  }
  
 -static void __lambda_1226(void *data, object self_7314132, int argc, object *args) /* object self_7314132, object parent_732597_734004 */
-+static void __lambda_1179(void *data, object self_7312839, int argc, object *args) /* object self_7312839, object parent_732256_733559 */
++static void __lambda_1179(void *data, object self_7312832, int argc, object *args) /* object self_7312832, object parent_732250_733552 */
   {
 - object parent_732597_734004 = args[0];
-+ object parent_732256_733559 = args[0];
++ object parent_732250_733552 = args[0];
    
 -closureN_type c_7327331;
 -object e_7327760 [5];
@@ -6597,30 +6598,30 @@ Make let-values be the same as let*-values, to work around
 -c_7327331.elements[2] = ((closureN)self_7314132)->elements[2];
 -c_7327331.elements[3] = parent_732597_734004;
 -c_7327331.elements[4] = ((closureN)self_7314132)->elements[3];
-+closureN_type c_7324879;
-+object e_7325308 [5];
-+c_7324879.hdr.mark = gc_color_red;
-+ c_7324879.hdr.grayed = 0;
-+c_7324879.tag = closureN_tag;
-+ c_7324879.fn = (function_type)__lambda_1180;
-+c_7324879.num_args = 1;
-+c_7324879.num_elements = 5;
-+c_7324879.elements = (object *)e_7325308;
-+c_7324879.elements[0] = ((closureN)self_7312839)->elements[0];
-+c_7324879.elements[1] = ((closureN)self_7312839)->elements[1];
-+c_7324879.elements[2] = ((closureN)self_7312839)->elements[2];
-+c_7324879.elements[3] = parent_732256_733559;
-+c_7324879.elements[4] = ((closureN)self_7312839)->elements[3];
++closureN_type c_7324872;
++object e_7325301 [5];
++c_7324872.hdr.mark = gc_color_red;
++ c_7324872.hdr.grayed = 0;
++c_7324872.tag = closureN_tag;
++ c_7324872.fn = (function_type)__lambda_1180;
++c_7324872.num_args = 1;
++c_7324872.num_elements = 5;
++c_7324872.elements = (object *)e_7325301;
++c_7324872.elements[0] = ((closureN)self_7312832)->elements[0];
++c_7324872.elements[1] = ((closureN)self_7312832)->elements[1];
++c_7324872.elements[2] = ((closureN)self_7312832)->elements[2];
++c_7324872.elements[3] = parent_732250_733552;
++c_7324872.elements[4] = ((closureN)self_7312832)->elements[3];
  
 -return_closcall2(data,  ((closureN)self_7314132)->elements[3],  &c_7327331, quote_define);; 
-+return_closcall2(data,  ((closureN)self_7312839)->elements[3],  &c_7324879, quote_define);; 
++return_closcall2(data,  ((closureN)self_7312832)->elements[3],  &c_7324872, quote_define);; 
  }
  
 -static void __lambda_1227(void *data, object self_7314133, int argc, object *args) /* object self_7314133, object _191define_732615_734010 */
-+static void __lambda_1180(void *data, object self_7312840, int argc, object *args) /* object self_7312840, object _191define_732274_733565 */
++static void __lambda_1180(void *data, object self_7312833, int argc, object *args) /* object self_7312833, object _191define_732268_733558 */
   {
 - object _191define_732615_734010 = args[0];
-+ object _191define_732274_733565 = args[0];
++ object _191define_732268_733558 = args[0];
    
 -closureN_type c_7327334;
 -object e_7327759 [6];
@@ -6637,31 +6638,31 @@ Make let-values be the same as let*-values, to work around
 -c_7327334.elements[3] = ((closureN)self_7314133)->elements[2];
 -c_7327334.elements[4] = ((closureN)self_7314133)->elements[3];
 -c_7327334.elements[5] = ((closureN)self_7314133)->elements[4];
-+closureN_type c_7324882;
-+object e_7325307 [6];
-+c_7324882.hdr.mark = gc_color_red;
-+ c_7324882.hdr.grayed = 0;
-+c_7324882.tag = closureN_tag;
-+ c_7324882.fn = (function_type)__lambda_1181;
-+c_7324882.num_args = 1;
-+c_7324882.num_elements = 6;
-+c_7324882.elements = (object *)e_7325307;
-+c_7324882.elements[0] = _191define_732274_733565;
-+c_7324882.elements[1] = ((closureN)self_7312840)->elements[0];
-+c_7324882.elements[2] = ((closureN)self_7312840)->elements[1];
-+c_7324882.elements[3] = ((closureN)self_7312840)->elements[2];
-+c_7324882.elements[4] = ((closureN)self_7312840)->elements[3];
-+c_7324882.elements[5] = ((closureN)self_7312840)->elements[4];
++closureN_type c_7324875;
++object e_7325300 [6];
++c_7324875.hdr.mark = gc_color_red;
++ c_7324875.hdr.grayed = 0;
++c_7324875.tag = closureN_tag;
++ c_7324875.fn = (function_type)__lambda_1181;
++c_7324875.num_args = 1;
++c_7324875.num_elements = 6;
++c_7324875.elements = (object *)e_7325300;
++c_7324875.elements[0] = _191define_732268_733558;
++c_7324875.elements[1] = ((closureN)self_7312833)->elements[0];
++c_7324875.elements[2] = ((closureN)self_7312833)->elements[1];
++c_7324875.elements[3] = ((closureN)self_7312833)->elements[2];
++c_7324875.elements[4] = ((closureN)self_7312833)->elements[3];
++c_7324875.elements[5] = ((closureN)self_7312833)->elements[4];
  
 -return_closcall2(data,  ((closureN)self_7314133)->elements[4],  &c_7327334, quote_lambda);; 
-+return_closcall2(data,  ((closureN)self_7312840)->elements[4],  &c_7324882, quote_lambda);; 
++return_closcall2(data,  ((closureN)self_7312833)->elements[4],  &c_7324875, quote_lambda);; 
  }
  
 -static void __lambda_1228(void *data, object self_7314134, int argc, object *args) /* object self_7314134, object _191lambda_732618_734011 */
-+static void __lambda_1181(void *data, object self_7312841, int argc, object *args) /* object self_7312841, object _191lambda_732277_733566 */
++static void __lambda_1181(void *data, object self_7312834, int argc, object *args) /* object self_7312834, object _191lambda_732271_733559 */
   {
 - object _191lambda_732618_734011 = args[0];
-+ object _191lambda_732277_733566 = args[0];
++ object _191lambda_732271_733559 = args[0];
    
 -closureN_type c_7327337;
 -object e_7327758 [7];
@@ -6679,29 +6680,29 @@ Make let-values be the same as let*-values, to work around
 -c_7327337.elements[4] = ((closureN)self_7314134)->elements[3];
 -c_7327337.elements[5] = ((closureN)self_7314134)->elements[4];
 -c_7327337.elements[6] = ((closureN)self_7314134)->elements[5];
-+closureN_type c_7324885;
-+object e_7325306 [7];
-+c_7324885.hdr.mark = gc_color_red;
-+ c_7324885.hdr.grayed = 0;
-+c_7324885.tag = closureN_tag;
-+ c_7324885.fn = (function_type)__lambda_1182;
-+c_7324885.num_args = 1;
-+c_7324885.num_elements = 7;
-+c_7324885.elements = (object *)e_7325306;
-+c_7324885.elements[0] = ((closureN)self_7312841)->elements[0];
-+c_7324885.elements[1] = _191lambda_732277_733566;
-+c_7324885.elements[2] = ((closureN)self_7312841)->elements[1];
-+c_7324885.elements[3] = ((closureN)self_7312841)->elements[2];
-+c_7324885.elements[4] = ((closureN)self_7312841)->elements[3];
-+c_7324885.elements[5] = ((closureN)self_7312841)->elements[4];
-+c_7324885.elements[6] = ((closureN)self_7312841)->elements[5];
++closureN_type c_7324878;
++object e_7325299 [7];
++c_7324878.hdr.mark = gc_color_red;
++ c_7324878.hdr.grayed = 0;
++c_7324878.tag = closureN_tag;
++ c_7324878.fn = (function_type)__lambda_1182;
++c_7324878.num_args = 1;
++c_7324878.num_elements = 7;
++c_7324878.elements = (object *)e_7325299;
++c_7324878.elements[0] = ((closureN)self_7312834)->elements[0];
++c_7324878.elements[1] = _191lambda_732271_733559;
++c_7324878.elements[2] = ((closureN)self_7312834)->elements[1];
++c_7324878.elements[3] = ((closureN)self_7312834)->elements[2];
++c_7324878.elements[4] = ((closureN)self_7312834)->elements[3];
++c_7324878.elements[5] = ((closureN)self_7312834)->elements[4];
++c_7324878.elements[6] = ((closureN)self_7312834)->elements[5];
  
 -return_closcall2(data,  ((closureN)self_7314134)->elements[5],  &c_7327337, quote_let);; 
-+return_closcall2(data,  ((closureN)self_7312841)->elements[5],  &c_7324885, quote_let);; 
++return_closcall2(data,  ((closureN)self_7312834)->elements[5],  &c_7324878, quote_let);; 
  }
  
 -static void __lambda_1229(void *data, object self_7314135, int argc, object *args) /* object self_7314135, object _191let_732621_734012 */
-+static void __lambda_1182(void *data, object self_7312842, int argc, object *args) /* object self_7312842, object _191let_732280_733567 */
++static void __lambda_1182(void *data, object self_7312835, int argc, object *args) /* object self_7312835, object _191let_732274_733560 */
   {
  
    
@@ -6721,32 +6722,32 @@ Make let-values be the same as let*-values, to work around
 -c_7327340.elements[4] = ((closureN)self_7314135)->elements[4];
 -c_7327340.elements[5] = ((closureN)self_7314135)->elements[5];
 -c_7327340.elements[6] = ((closureN)self_7314135)->elements[6];
-+closureN_type c_7324888;
-+object e_7325305 [7];
-+c_7324888.hdr.mark = gc_color_red;
-+ c_7324888.hdr.grayed = 0;
-+c_7324888.tag = closureN_tag;
-+ c_7324888.fn = (function_type)__lambda_1183;
-+c_7324888.num_args = 1;
-+c_7324888.num_elements = 7;
-+c_7324888.elements = (object *)e_7325305;
-+c_7324888.elements[0] = ((closureN)self_7312842)->elements[0];
-+c_7324888.elements[1] = ((closureN)self_7312842)->elements[1];
-+c_7324888.elements[2] = ((closureN)self_7312842)->elements[2];
-+c_7324888.elements[3] = ((closureN)self_7312842)->elements[3];
-+c_7324888.elements[4] = ((closureN)self_7312842)->elements[4];
-+c_7324888.elements[5] = ((closureN)self_7312842)->elements[5];
-+c_7324888.elements[6] = ((closureN)self_7312842)->elements[6];
++closureN_type c_7324881;
++object e_7325298 [7];
++c_7324881.hdr.mark = gc_color_red;
++ c_7324881.hdr.grayed = 0;
++c_7324881.tag = closureN_tag;
++ c_7324881.fn = (function_type)__lambda_1183;
++c_7324881.num_args = 1;
++c_7324881.num_elements = 7;
++c_7324881.elements = (object *)e_7325298;
++c_7324881.elements[0] = ((closureN)self_7312835)->elements[0];
++c_7324881.elements[1] = ((closureN)self_7312835)->elements[1];
++c_7324881.elements[2] = ((closureN)self_7312835)->elements[2];
++c_7324881.elements[3] = ((closureN)self_7312835)->elements[3];
++c_7324881.elements[4] = ((closureN)self_7312835)->elements[4];
++c_7324881.elements[5] = ((closureN)self_7312835)->elements[5];
++c_7324881.elements[6] = ((closureN)self_7312835)->elements[6];
  
 -return_closcall2(data,  ((closureN)self_7314135)->elements[6],  &c_7327340, quote_register_91simple_91type);; 
-+return_closcall2(data,  ((closureN)self_7312842)->elements[6],  &c_7324888, quote_register_91simple_91type);; 
++return_closcall2(data,  ((closureN)self_7312835)->elements[6],  &c_7324881, quote_register_91simple_91type);; 
  }
  
 -static void __lambda_1230(void *data, object self_7314136, int argc, object *args) /* object self_7314136, object _191register_732624_734013 */
-+static void __lambda_1183(void *data, object self_7312843, int argc, object *args) /* object self_7312843, object _191register_732283_733568 */
++static void __lambda_1183(void *data, object self_7312836, int argc, object *args) /* object self_7312836, object _191register_732277_733561 */
   {
 - object _191register_732624_734013 = args[0];
-+ object _191register_732283_733568 = args[0];
++ object _191register_732277_733561 = args[0];
    
 -closureN_type c_7327343;
 -object e_7327756 [8];
@@ -6765,30 +6766,30 @@ Make let-values be the same as let*-values, to work around
 -c_7327343.elements[5] = ((closureN)self_7314136)->elements[4];
 -c_7327343.elements[6] = ((closureN)self_7314136)->elements[5];
 -c_7327343.elements[7] = ((closureN)self_7314136)->elements[6];
-+closureN_type c_7324891;
-+object e_7325304 [8];
-+c_7324891.hdr.mark = gc_color_red;
-+ c_7324891.hdr.grayed = 0;
-+c_7324891.tag = closureN_tag;
-+ c_7324891.fn = (function_type)__lambda_1184;
-+c_7324891.num_args = 1;
-+c_7324891.num_elements = 8;
-+c_7324891.elements = (object *)e_7325304;
-+c_7324891.elements[0] = ((closureN)self_7312843)->elements[0];
-+c_7324891.elements[1] = ((closureN)self_7312843)->elements[1];
-+c_7324891.elements[2] = _191register_732283_733568;
-+c_7324891.elements[3] = ((closureN)self_7312843)->elements[2];
-+c_7324891.elements[4] = ((closureN)self_7312843)->elements[3];
-+c_7324891.elements[5] = ((closureN)self_7312843)->elements[4];
-+c_7324891.elements[6] = ((closureN)self_7312843)->elements[5];
-+c_7324891.elements[7] = ((closureN)self_7312843)->elements[6];
++closureN_type c_7324884;
++object e_7325297 [8];
++c_7324884.hdr.mark = gc_color_red;
++ c_7324884.hdr.grayed = 0;
++c_7324884.tag = closureN_tag;
++ c_7324884.fn = (function_type)__lambda_1184;
++c_7324884.num_args = 1;
++c_7324884.num_elements = 8;
++c_7324884.elements = (object *)e_7325297;
++c_7324884.elements[0] = ((closureN)self_7312836)->elements[0];
++c_7324884.elements[1] = ((closureN)self_7312836)->elements[1];
++c_7324884.elements[2] = _191register_732277_733561;
++c_7324884.elements[3] = ((closureN)self_7312836)->elements[2];
++c_7324884.elements[4] = ((closureN)self_7312836)->elements[3];
++c_7324884.elements[5] = ((closureN)self_7312836)->elements[4];
++c_7324884.elements[6] = ((closureN)self_7312836)->elements[5];
++c_7324884.elements[7] = ((closureN)self_7312836)->elements[6];
  
 -return_closcall2(data,  ((closureN)self_7314136)->elements[6],  &c_7327343, quote_slot_91set_67);; 
-+return_closcall2(data,  ((closureN)self_7312843)->elements[6],  &c_7324891, quote_slot_91set_67);; 
++return_closcall2(data,  ((closureN)self_7312836)->elements[6],  &c_7324884, quote_slot_91set_67);; 
  }
  
 -static void __lambda_1231(void *data, object self_7314137, int argc, object *args) /* object self_7314137, object _191slot_91set_67_732627_734014 */
-+static void __lambda_1184(void *data, object self_7312844, int argc, object *args) /* object self_7312844, object _191slot_91set_67_732286_733569 */
++static void __lambda_1184(void *data, object self_7312837, int argc, object *args) /* object self_7312837, object _191slot_91set_67_732280_733562 */
   {
  
    
@@ -6809,33 +6810,33 @@ Make let-values be the same as let*-values, to work around
 -c_7327346.elements[5] = ((closureN)self_7314137)->elements[5];
 -c_7327346.elements[6] = ((closureN)self_7314137)->elements[6];
 -c_7327346.elements[7] = ((closureN)self_7314137)->elements[7];
-+closureN_type c_7324894;
-+object e_7325303 [8];
-+c_7324894.hdr.mark = gc_color_red;
-+ c_7324894.hdr.grayed = 0;
-+c_7324894.tag = closureN_tag;
-+ c_7324894.fn = (function_type)__lambda_1185;
-+c_7324894.num_args = 1;
-+c_7324894.num_elements = 8;
-+c_7324894.elements = (object *)e_7325303;
-+c_7324894.elements[0] = ((closureN)self_7312844)->elements[0];
-+c_7324894.elements[1] = ((closureN)self_7312844)->elements[1];
-+c_7324894.elements[2] = ((closureN)self_7312844)->elements[2];
-+c_7324894.elements[3] = ((closureN)self_7312844)->elements[3];
-+c_7324894.elements[4] = ((closureN)self_7312844)->elements[4];
-+c_7324894.elements[5] = ((closureN)self_7312844)->elements[5];
-+c_7324894.elements[6] = ((closureN)self_7312844)->elements[6];
-+c_7324894.elements[7] = ((closureN)self_7312844)->elements[7];
++closureN_type c_7324887;
++object e_7325296 [8];
++c_7324887.hdr.mark = gc_color_red;
++ c_7324887.hdr.grayed = 0;
++c_7324887.tag = closureN_tag;
++ c_7324887.fn = (function_type)__lambda_1185;
++c_7324887.num_args = 1;
++c_7324887.num_elements = 8;
++c_7324887.elements = (object *)e_7325296;
++c_7324887.elements[0] = ((closureN)self_7312837)->elements[0];
++c_7324887.elements[1] = ((closureN)self_7312837)->elements[1];
++c_7324887.elements[2] = ((closureN)self_7312837)->elements[2];
++c_7324887.elements[3] = ((closureN)self_7312837)->elements[3];
++c_7324887.elements[4] = ((closureN)self_7312837)->elements[4];
++c_7324887.elements[5] = ((closureN)self_7312837)->elements[5];
++c_7324887.elements[6] = ((closureN)self_7312837)->elements[6];
++c_7324887.elements[7] = ((closureN)self_7312837)->elements[7];
  
 -return_closcall2(data,  ((closureN)self_7314137)->elements[7],  &c_7327346, quote_type_91slot_91offset);; 
-+return_closcall2(data,  ((closureN)self_7312844)->elements[7],  &c_7324894, quote_type_91slot_91offset);; 
++return_closcall2(data,  ((closureN)self_7312837)->elements[7],  &c_7324887, quote_type_91slot_91offset);; 
  }
  
 -static void __lambda_1232(void *data, object self_7314138, int argc, object *args) /* object self_7314138, object _191type_191slot_191offset_732630_734015 */
-+static void __lambda_1185(void *data, object self_7312845, int argc, object *args) /* object self_7312845, object _191type_191slot_191offset_732289_733570 */
++static void __lambda_1185(void *data, object self_7312838, int argc, object *args) /* object self_7312838, object _191type_191slot_191offset_732283_733563 */
   {
 - object _191type_191slot_191offset_732630_734015 = args[0];
-+ object _191type_191slot_191offset_732289_733570 = args[0];
++ object _191type_191slot_191offset_732283_733563 = args[0];
    
 -closureN_type c_7327348;
 -object e_7327361 [2];
@@ -6848,17 +6849,17 @@ Make let-values be the same as let*-values, to work around
 -c_7327348.elements = (object *)e_7327361;
 -c_7327348.elements[0] = ((closureN)self_7314138)->elements[3];
 -c_7327348.elements[1] = ((closureN)self_7314138)->elements[5];
-+closureN_type c_7324896;
-+object e_7324909 [2];
-+c_7324896.hdr.mark = gc_color_red;
-+ c_7324896.hdr.grayed = 0;
-+c_7324896.tag = closureN_tag;
-+ c_7324896.fn = (function_type)__lambda_1186;
-+c_7324896.num_args = 0;
-+c_7324896.num_elements = 2;
-+c_7324896.elements = (object *)e_7324909;
-+c_7324896.elements[0] = ((closureN)self_7312845)->elements[3];
-+c_7324896.elements[1] = ((closureN)self_7312845)->elements[5];
++closureN_type c_7324889;
++object e_7324902 [2];
++c_7324889.hdr.mark = gc_color_red;
++ c_7324889.hdr.grayed = 0;
++c_7324889.tag = closureN_tag;
++ c_7324889.fn = (function_type)__lambda_1186;
++c_7324889.num_args = 0;
++c_7324889.num_elements = 2;
++c_7324889.elements = (object *)e_7324902;
++c_7324889.elements[0] = ((closureN)self_7312838)->elements[3];
++c_7324889.elements[1] = ((closureN)self_7312838)->elements[5];
  
  
 -closureN_type c_7327362;
@@ -6879,31 +6880,31 @@ Make let-values be the same as let*-values, to work around
 -c_7327362.elements[6] = ((closureN)self_7314138)->elements[5];
 -c_7327362.elements[7] = ((closureN)self_7314138)->elements[6];
 -c_7327362.elements[8] = ((closureN)self_7314138)->elements[7];
-+closureN_type c_7324910;
-+object e_7325302 [9];
-+c_7324910.hdr.mark = gc_color_red;
-+ c_7324910.hdr.grayed = 0;
-+c_7324910.tag = closureN_tag;
-+ c_7324910.fn = (function_type)__lambda_1187;
-+c_7324910.num_args = 1;
-+c_7324910.num_elements = 9;
-+c_7324910.elements = (object *)e_7325302;
-+c_7324910.elements[0] = ((closureN)self_7312845)->elements[0];
-+c_7324910.elements[1] = ((closureN)self_7312845)->elements[1];
-+c_7324910.elements[2] = ((closureN)self_7312845)->elements[2];
-+c_7324910.elements[3] = _191type_191slot_191offset_732289_733570;
-+c_7324910.elements[4] = ((closureN)self_7312845)->elements[3];
-+c_7324910.elements[5] = ((closureN)self_7312845)->elements[4];
-+c_7324910.elements[6] = ((closureN)self_7312845)->elements[5];
-+c_7324910.elements[7] = ((closureN)self_7312845)->elements[6];
-+c_7324910.elements[8] = ((closureN)self_7312845)->elements[7];
++closureN_type c_7324903;
++object e_7325295 [9];
++c_7324903.hdr.mark = gc_color_red;
++ c_7324903.hdr.grayed = 0;
++c_7324903.tag = closureN_tag;
++ c_7324903.fn = (function_type)__lambda_1187;
++c_7324903.num_args = 1;
++c_7324903.num_elements = 9;
++c_7324903.elements = (object *)e_7325295;
++c_7324903.elements[0] = ((closureN)self_7312838)->elements[0];
++c_7324903.elements[1] = ((closureN)self_7312838)->elements[1];
++c_7324903.elements[2] = ((closureN)self_7312838)->elements[2];
++c_7324903.elements[3] = _191type_191slot_191offset_732283_733563;
++c_7324903.elements[4] = ((closureN)self_7312838)->elements[3];
++c_7324903.elements[5] = ((closureN)self_7312838)->elements[4];
++c_7324903.elements[6] = ((closureN)self_7312838)->elements[5];
++c_7324903.elements[7] = ((closureN)self_7312838)->elements[6];
++c_7324903.elements[8] = ((closureN)self_7312838)->elements[7];
  
 -return_direct_with_clo1(data,(closure)&c_7327348,__lambda_1233,  &c_7327362);; 
-+return_direct_with_clo1(data,(closure)&c_7324896,__lambda_1186,  &c_7324910);; 
++return_direct_with_clo1(data,(closure)&c_7324889,__lambda_1186,  &c_7324903);; 
  }
  
 -static void __lambda_1234(void *data, object self_7314139, int argc, object *args) /* object self_7314139, object r_737852 */
-+static void __lambda_1187(void *data, object self_7312846, int argc, object *args) /* object self_7312846, object r_737084 */
++static void __lambda_1187(void *data, object self_7312839, int argc, object *args) /* object self_7312839, object r_737077 */
   {
  
    
@@ -6925,34 +6926,34 @@ Make let-values be the same as let*-values, to work around
 -c_7327365.elements[6] = ((closureN)self_7314139)->elements[6];
 -c_7327365.elements[7] = ((closureN)self_7314139)->elements[7];
 -c_7327365.elements[8] = ((closureN)self_7314139)->elements[8];
-+closureN_type c_7324913;
-+object e_7325301 [9];
-+c_7324913.hdr.mark = gc_color_red;
-+ c_7324913.hdr.grayed = 0;
-+c_7324913.tag = closureN_tag;
-+ c_7324913.fn = (function_type)__lambda_1188;
-+c_7324913.num_args = 1;
-+c_7324913.num_elements = 9;
-+c_7324913.elements = (object *)e_7325301;
-+c_7324913.elements[0] = ((closureN)self_7312846)->elements[0];
-+c_7324913.elements[1] = ((closureN)self_7312846)->elements[1];
-+c_7324913.elements[2] = ((closureN)self_7312846)->elements[2];
-+c_7324913.elements[3] = ((closureN)self_7312846)->elements[3];
-+c_7324913.elements[4] = ((closureN)self_7312846)->elements[4];
-+c_7324913.elements[5] = ((closureN)self_7312846)->elements[5];
-+c_7324913.elements[6] = ((closureN)self_7312846)->elements[6];
-+c_7324913.elements[7] = ((closureN)self_7312846)->elements[7];
-+c_7324913.elements[8] = ((closureN)self_7312846)->elements[8];
++closureN_type c_7324906;
++object e_7325294 [9];
++c_7324906.hdr.mark = gc_color_red;
++ c_7324906.hdr.grayed = 0;
++c_7324906.tag = closureN_tag;
++ c_7324906.fn = (function_type)__lambda_1188;
++c_7324906.num_args = 1;
++c_7324906.num_elements = 9;
++c_7324906.elements = (object *)e_7325294;
++c_7324906.elements[0] = ((closureN)self_7312839)->elements[0];
++c_7324906.elements[1] = ((closureN)self_7312839)->elements[1];
++c_7324906.elements[2] = ((closureN)self_7312839)->elements[2];
++c_7324906.elements[3] = ((closureN)self_7312839)->elements[3];
++c_7324906.elements[4] = ((closureN)self_7312839)->elements[4];
++c_7324906.elements[5] = ((closureN)self_7312839)->elements[5];
++c_7324906.elements[6] = ((closureN)self_7312839)->elements[6];
++c_7324906.elements[7] = ((closureN)self_7312839)->elements[7];
++c_7324906.elements[8] = ((closureN)self_7312839)->elements[8];
  
 -return_closcall2(data,  ((closureN)self_7314139)->elements[8],  &c_7327365, quote_begin);; 
-+return_closcall2(data,  ((closureN)self_7312846)->elements[8],  &c_7324913, quote_begin);; 
++return_closcall2(data,  ((closureN)self_7312839)->elements[8],  &c_7324906, quote_begin);; 
  }
  
 -static void __lambda_1235(void *data, object self_7314140, int argc, object *args) /* object self_7314140, object r_737853 */
-+static void __lambda_1188(void *data, object self_7312847, int argc, object *args) /* object self_7312847, object r_737085 */
++static void __lambda_1188(void *data, object self_7312840, int argc, object *args) /* object self_7312840, object r_737078 */
   {
 - object r_737853 = args[0];
-+ object r_737085 = args[0];
++ object r_737078 = args[0];
    
 -closureN_type c_7327367;
 -object e_7327747 [10];
@@ -6973,39 +6974,39 @@ Make let-values be the same as let*-values, to work around
 -c_7327367.elements[7] = ((closureN)self_7314140)->elements[7];
 -c_7327367.elements[8] = r_737853;
 -c_7327367.elements[9] = ((closureN)self_7314140)->elements[8];
-+closureN_type c_7324915;
-+object e_7325295 [10];
-+c_7324915.hdr.mark = gc_color_red;
-+ c_7324915.hdr.grayed = 0;
-+c_7324915.tag = closureN_tag;
-+ c_7324915.fn = (function_type)__lambda_1189;
-+c_7324915.num_args = 1;
-+c_7324915.num_elements = 10;
-+c_7324915.elements = (object *)e_7325295;
-+c_7324915.elements[0] = ((closureN)self_7312847)->elements[0];
-+c_7324915.elements[1] = ((closureN)self_7312847)->elements[1];
-+c_7324915.elements[2] = ((closureN)self_7312847)->elements[2];
-+c_7324915.elements[3] = ((closureN)self_7312847)->elements[3];
-+c_7324915.elements[4] = ((closureN)self_7312847)->elements[4];
-+c_7324915.elements[5] = ((closureN)self_7312847)->elements[5];
-+c_7324915.elements[6] = ((closureN)self_7312847)->elements[6];
-+c_7324915.elements[7] = ((closureN)self_7312847)->elements[7];
-+c_7324915.elements[8] = r_737085;
-+c_7324915.elements[9] = ((closureN)self_7312847)->elements[8];
++closureN_type c_7324908;
++object e_7325288 [10];
++c_7324908.hdr.mark = gc_color_red;
++ c_7324908.hdr.grayed = 0;
++c_7324908.tag = closureN_tag;
++ c_7324908.fn = (function_type)__lambda_1189;
++c_7324908.num_args = 1;
++c_7324908.num_elements = 10;
++c_7324908.elements = (object *)e_7325288;
++c_7324908.elements[0] = ((closureN)self_7312840)->elements[0];
++c_7324908.elements[1] = ((closureN)self_7312840)->elements[1];
++c_7324908.elements[2] = ((closureN)self_7312840)->elements[2];
++c_7324908.elements[3] = ((closureN)self_7312840)->elements[3];
++c_7324908.elements[4] = ((closureN)self_7312840)->elements[4];
++c_7324908.elements[5] = ((closureN)self_7312840)->elements[5];
++c_7324908.elements[6] = ((closureN)self_7312840)->elements[6];
++c_7324908.elements[7] = ((closureN)self_7312840)->elements[7];
++c_7324908.elements[8] = r_737078;
++c_7324908.elements[9] = ((closureN)self_7312840)->elements[8];
  
  
  
  
  
 -return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7327367, primitive_car, Cyc_cddr(data, Cyc_cddr(data, ((closureN)self_7314140)->elements[4])));; 
-+return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7324915, primitive_car, Cyc_cddr(data, Cyc_cddr(data, ((closureN)self_7312847)->elements[4])));; 
++return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7324908, primitive_car, Cyc_cddr(data, Cyc_cddr(data, ((closureN)self_7312840)->elements[4])));; 
  }
  
 -static void __lambda_1236(void *data, object self_7314141, int argc, object *args) /* object self_7314141, object r_737986 */
-+static void __lambda_1189(void *data, object self_7312848, int argc, object *args) /* object self_7312848, object r_737218 */
++static void __lambda_1189(void *data, object self_7312841, int argc, object *args) /* object self_7312841, object r_737211 */
   {
 - object r_737986 = args[0];
-+ object r_737218 = args[0];
++ object r_737211 = args[0];
    
 -closureN_type c_7327370;
 -object e_7327746 [11];
@@ -7027,36 +7028,36 @@ Make let-values be the same as let*-values, to work around
 -c_7327370.elements[8] = ((closureN)self_7314141)->elements[8];
 -c_7327370.elements[9] = r_737986;
 -c_7327370.elements[10] = ((closureN)self_7314141)->elements[9];
-+closureN_type c_7324918;
-+object e_7325294 [11];
-+c_7324918.hdr.mark = gc_color_red;
-+ c_7324918.hdr.grayed = 0;
-+c_7324918.tag = closureN_tag;
-+ c_7324918.fn = (function_type)__lambda_1190;
-+c_7324918.num_args = 1;
-+c_7324918.num_elements = 11;
-+c_7324918.elements = (object *)e_7325294;
-+c_7324918.elements[0] = ((closureN)self_7312848)->elements[0];
-+c_7324918.elements[1] = ((closureN)self_7312848)->elements[1];
-+c_7324918.elements[2] = ((closureN)self_7312848)->elements[2];
-+c_7324918.elements[3] = ((closureN)self_7312848)->elements[3];
-+c_7324918.elements[4] = ((closureN)self_7312848)->elements[4];
-+c_7324918.elements[5] = ((closureN)self_7312848)->elements[5];
-+c_7324918.elements[6] = ((closureN)self_7312848)->elements[6];
-+c_7324918.elements[7] = ((closureN)self_7312848)->elements[7];
-+c_7324918.elements[8] = ((closureN)self_7312848)->elements[8];
-+c_7324918.elements[9] = r_737218;
-+c_7324918.elements[10] = ((closureN)self_7312848)->elements[9];
++closureN_type c_7324911;
++object e_7325287 [11];
++c_7324911.hdr.mark = gc_color_red;
++ c_7324911.hdr.grayed = 0;
++c_7324911.tag = closureN_tag;
++ c_7324911.fn = (function_type)__lambda_1190;
++c_7324911.num_args = 1;
++c_7324911.num_elements = 11;
++c_7324911.elements = (object *)e_7325287;
++c_7324911.elements[0] = ((closureN)self_7312841)->elements[0];
++c_7324911.elements[1] = ((closureN)self_7312841)->elements[1];
++c_7324911.elements[2] = ((closureN)self_7312841)->elements[2];
++c_7324911.elements[3] = ((closureN)self_7312841)->elements[3];
++c_7324911.elements[4] = ((closureN)self_7312841)->elements[4];
++c_7324911.elements[5] = ((closureN)self_7312841)->elements[5];
++c_7324911.elements[6] = ((closureN)self_7312841)->elements[6];
++c_7324911.elements[7] = ((closureN)self_7312841)->elements[7];
++c_7324911.elements[8] = ((closureN)self_7312841)->elements[8];
++c_7324911.elements[9] = r_737211;
++c_7324911.elements[10] = ((closureN)self_7312841)->elements[9];
  
 -return_closcall2(data,  ((closureN)self_7314141)->elements[9],  &c_7327370, quote_make_91type_91predicate);; 
-+return_closcall2(data,  ((closureN)self_7312848)->elements[9],  &c_7324918, quote_make_91type_91predicate);; 
++return_closcall2(data,  ((closureN)self_7312841)->elements[9],  &c_7324911, quote_make_91type_91predicate);; 
  }
  
 -static void __lambda_1237(void *data, object self_7314142, int argc, object *args) /* object self_7314142, object r_737965 */
-+static void __lambda_1190(void *data, object self_7312849, int argc, object *args) /* object self_7312849, object r_737197 */
++static void __lambda_1190(void *data, object self_7312842, int argc, object *args) /* object self_7312842, object r_737190 */
   {
 - object r_737965 = args[0];
-+ object r_737197 = args[0];
++ object r_737190 = args[0];
    
 -closureN_type c_7327372;
 -object e_7327667 [12];
@@ -7079,27 +7080,27 @@ Make let-values be the same as let*-values, to work around
 -c_7327372.elements[9] = r_737965;
 -c_7327372.elements[10] = ((closureN)self_7314142)->elements[9];
 -c_7327372.elements[11] = ((closureN)self_7314142)->elements[10];
-+closureN_type c_7324920;
-+object e_7325215 [12];
-+c_7324920.hdr.mark = gc_color_red;
-+ c_7324920.hdr.grayed = 0;
-+c_7324920.tag = closureN_tag;
-+ c_7324920.fn = (function_type)__lambda_1191;
-+c_7324920.num_args = 1;
-+c_7324920.num_elements = 12;
-+c_7324920.elements = (object *)e_7325215;
-+c_7324920.elements[0] = ((closureN)self_7312849)->elements[0];
-+c_7324920.elements[1] = ((closureN)self_7312849)->elements[1];
-+c_7324920.elements[2] = ((closureN)self_7312849)->elements[2];
-+c_7324920.elements[3] = ((closureN)self_7312849)->elements[3];
-+c_7324920.elements[4] = ((closureN)self_7312849)->elements[4];
-+c_7324920.elements[5] = ((closureN)self_7312849)->elements[5];
-+c_7324920.elements[6] = ((closureN)self_7312849)->elements[6];
-+c_7324920.elements[7] = ((closureN)self_7312849)->elements[7];
-+c_7324920.elements[8] = ((closureN)self_7312849)->elements[8];
-+c_7324920.elements[9] = r_737197;
-+c_7324920.elements[10] = ((closureN)self_7312849)->elements[9];
-+c_7324920.elements[11] = ((closureN)self_7312849)->elements[10];
++closureN_type c_7324913;
++object e_7325208 [12];
++c_7324913.hdr.mark = gc_color_red;
++ c_7324913.hdr.grayed = 0;
++c_7324913.tag = closureN_tag;
++ c_7324913.fn = (function_type)__lambda_1191;
++c_7324913.num_args = 1;
++c_7324913.num_elements = 12;
++c_7324913.elements = (object *)e_7325208;
++c_7324913.elements[0] = ((closureN)self_7312842)->elements[0];
++c_7324913.elements[1] = ((closureN)self_7312842)->elements[1];
++c_7324913.elements[2] = ((closureN)self_7312842)->elements[2];
++c_7324913.elements[3] = ((closureN)self_7312842)->elements[3];
++c_7324913.elements[4] = ((closureN)self_7312842)->elements[4];
++c_7324913.elements[5] = ((closureN)self_7312842)->elements[5];
++c_7324913.elements[6] = ((closureN)self_7312842)->elements[6];
++c_7324913.elements[7] = ((closureN)self_7312842)->elements[7];
++c_7324913.elements[8] = ((closureN)self_7312842)->elements[8];
++c_7324913.elements[9] = r_737190;
++c_7324913.elements[10] = ((closureN)self_7312842)->elements[9];
++c_7324913.elements[11] = ((closureN)self_7312842)->elements[10];
  
  
 -closureN_type c_7327668;
@@ -7115,36 +7116,36 @@ Make let-values be the same as let*-values, to work around
 -c_7327668.elements[1] = ((closureN)self_7314142)->elements[3];
 -c_7327668.elements[2] = ((closureN)self_7314142)->elements[6];
 -c_7327668.elements[3] = ((closureN)self_7314142)->elements[10];
-+closureN_type c_7325216;
-+object e_7325293 [4];
-+c_7325216.hdr.mark = gc_color_red;
-+ c_7325216.hdr.grayed = 0;
-+c_7325216.tag = closureN_tag;
-+ c_7325216.fn = (function_type)__lambda_1205;
-+c_7325216.num_args = 1;
-+c_7325216.num_elements = 4;
-+c_7325216.elements = (object *)e_7325293;
-+c_7325216.elements[0] = ((closureN)self_7312849)->elements[0];
-+c_7325216.elements[1] = ((closureN)self_7312849)->elements[3];
-+c_7325216.elements[2] = ((closureN)self_7312849)->elements[6];
-+c_7325216.elements[3] = ((closureN)self_7312849)->elements[10];
++closureN_type c_7325209;
++object e_7325286 [4];
++c_7325209.hdr.mark = gc_color_red;
++ c_7325209.hdr.grayed = 0;
++c_7325209.tag = closureN_tag;
++ c_7325209.fn = (function_type)__lambda_1205;
++c_7325209.num_args = 1;
++c_7325209.num_elements = 4;
++c_7325209.elements = (object *)e_7325286;
++c_7325209.elements[0] = ((closureN)self_7312842)->elements[0];
++c_7325209.elements[1] = ((closureN)self_7312842)->elements[3];
++c_7325209.elements[2] = ((closureN)self_7312842)->elements[6];
++c_7325209.elements[3] = ((closureN)self_7312842)->elements[10];
  
 -return_direct_with_clo1(data,(closure)&c_7327372,__lambda_1238,  &c_7327668);; 
-+return_direct_with_clo1(data,(closure)&c_7324920,__lambda_1191,  &c_7325216);; 
++return_direct_with_clo1(data,(closure)&c_7324913,__lambda_1191,  &c_7325209);; 
  }
  
 -static void __lambda_1252(void *data, object self_7314143, int argc, object *args) /* object self_7314143, object k_737931, object f_732635_734016 */
-+static void __lambda_1205(void *data, object self_7312850, int argc, object *args) /* object self_7312850, object k_737163, object f_732294_733571 */
++static void __lambda_1205(void *data, object self_7312843, int argc, object *args) /* object self_7312843, object k_737156, object f_732288_733564 */
   {
 - object k_737931 = args[0]; object f_732635_734016 = args[1];
-+ object k_737163 = args[0]; object f_732294_733571 = args[1];
++ object k_737156 = args[0]; object f_732288_733564 = args[1];
      
 -if( (boolean_f != Cyc_is_pair(f_732635_734016)) ){ 
-+if( (boolean_f != Cyc_is_pair(f_732294_733571)) ){ 
++if( (boolean_f != Cyc_is_pair(f_732288_733564)) ){ 
      
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, f_732635_734016))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, f_732294_733571))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, f_732288_733564))) ){ 
    
 -closureN_type c_7327677;
 -object e_7327742 [5];
@@ -7160,38 +7161,38 @@ Make let-values be the same as let*-values, to work around
 -c_7327677.elements[2] = f_732635_734016;
 -c_7327677.elements[3] = k_737931;
 -c_7327677.elements[4] = ((closureN)self_7314143)->elements[2];
-+closureN_type c_7325225;
-+object e_7325290 [5];
-+c_7325225.hdr.mark = gc_color_red;
-+ c_7325225.hdr.grayed = 0;
-+c_7325225.tag = closureN_tag;
-+ c_7325225.fn = (function_type)__lambda_1206;
-+c_7325225.num_args = 1;
-+c_7325225.num_elements = 5;
-+c_7325225.elements = (object *)e_7325290;
-+c_7325225.elements[0] = ((closureN)self_7312850)->elements[0];
-+c_7325225.elements[1] = ((closureN)self_7312850)->elements[1];
-+c_7325225.elements[2] = f_732294_733571;
-+c_7325225.elements[3] = k_737163;
-+c_7325225.elements[4] = ((closureN)self_7312850)->elements[2];
++closureN_type c_7325218;
++object e_7325283 [5];
++c_7325218.hdr.mark = gc_color_red;
++ c_7325218.hdr.grayed = 0;
++c_7325218.tag = closureN_tag;
++ c_7325218.fn = (function_type)__lambda_1206;
++c_7325218.num_args = 1;
++c_7325218.num_elements = 5;
++c_7325218.elements = (object *)e_7325283;
++c_7325218.elements[0] = ((closureN)self_7312843)->elements[0];
++c_7325218.elements[1] = ((closureN)self_7312843)->elements[1];
++c_7325218.elements[2] = f_732288_733564;
++c_7325218.elements[3] = k_737156;
++c_7325218.elements[4] = ((closureN)self_7312843)->elements[2];
  
 -return_closcall2(data,  ((closureN)self_7314143)->elements[3],  &c_7327677, quote_make_91getter);
-+return_closcall2(data,  ((closureN)self_7312850)->elements[3],  &c_7325225, quote_make_91getter);
++return_closcall2(data,  ((closureN)self_7312843)->elements[3],  &c_7325218, quote_make_91getter);
  } else { 
 -  return_direct_with_clo1(data,  k_737931, (((closure)  k_737931)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_737163, (((closure)  k_737163)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_737156, (((closure)  k_737156)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_737931, (((closure)  k_737931)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_737163, (((closure)  k_737163)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_737156, (((closure)  k_737156)->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_1253(void *data, object self_7314144, int argc, object *args) /* object self_7314144, object r_737939 */
-+static void __lambda_1206(void *data, object self_7312851, int argc, object *args) /* object self_7312851, object r_737171 */
++static void __lambda_1206(void *data, object self_7312844, int argc, object *args) /* object self_7312844, object r_737164 */
   {
 - object r_737939 = args[0];
-+ object r_737171 = args[0];
++ object r_737164 = args[0];
    
 -closureN_type c_7327679;
 -object e_7327735 [6];
@@ -7208,91 +7209,91 @@ Make let-values be the same as let*-values, to work around
 -c_7327679.elements[3] = ((closureN)self_7314144)->elements[3];
 -c_7327679.elements[4] = ((closureN)self_7314144)->elements[4];
 -c_7327679.elements[5] = r_737939;
-+closureN_type c_7325227;
-+object e_7325283 [6];
-+c_7325227.hdr.mark = gc_color_red;
-+ c_7325227.hdr.grayed = 0;
-+c_7325227.tag = closureN_tag;
-+ c_7325227.fn = (function_type)__lambda_1207;
-+c_7325227.num_args = 1;
-+c_7325227.num_elements = 6;
-+c_7325227.elements = (object *)e_7325283;
-+c_7325227.elements[0] = ((closureN)self_7312851)->elements[0];
-+c_7325227.elements[1] = ((closureN)self_7312851)->elements[1];
-+c_7325227.elements[2] = ((closureN)self_7312851)->elements[2];
-+c_7325227.elements[3] = ((closureN)self_7312851)->elements[3];
-+c_7325227.elements[4] = ((closureN)self_7312851)->elements[4];
-+c_7325227.elements[5] = r_737171;
++closureN_type c_7325220;
++object e_7325276 [6];
++c_7325220.hdr.mark = gc_color_red;
++ c_7325220.hdr.grayed = 0;
++c_7325220.tag = closureN_tag;
++ c_7325220.fn = (function_type)__lambda_1207;
++c_7325220.num_args = 1;
++c_7325220.num_elements = 6;
++c_7325220.elements = (object *)e_7325276;
++c_7325220.elements[0] = ((closureN)self_7312844)->elements[0];
++c_7325220.elements[1] = ((closureN)self_7312844)->elements[1];
++c_7325220.elements[2] = ((closureN)self_7312844)->elements[2];
++c_7325220.elements[3] = ((closureN)self_7312844)->elements[3];
++c_7325220.elements[4] = ((closureN)self_7312844)->elements[4];
++c_7325220.elements[5] = r_737164;
  
  
  
  
 -object c_7327738 = Cyc_symbol2string(data,(closure)&c_7327679,Cyc_cadr(data, ((closureN)self_7314144)->elements[2]));
 -return_closcall1(data,(closure)&c_7327679,  c_7327738);; 
-+object c_7325286 = Cyc_symbol2string(data,(closure)&c_7325227,Cyc_cadr(data, ((closureN)self_7312851)->elements[2]));
-+return_closcall1(data,(closure)&c_7325227,  c_7325286);; 
++object c_7325279 = Cyc_symbol2string(data,(closure)&c_7325220,Cyc_cadr(data, ((closureN)self_7312844)->elements[2]));
++return_closcall1(data,(closure)&c_7325220,  c_7325279);; 
  }
  
 -static void __lambda_1254(void *data, object self_7314145, int argc, object *args) /* object self_7314145, object r_737941 */
-+static void __lambda_1207(void *data, object self_7312852, int argc, object *args) /* object self_7312852, object r_737173 */
++static void __lambda_1207(void *data, object self_7312845, int argc, object *args) /* object self_7312845, object r_737166 */
   {
 - object r_737941 = args[0];
-+ object r_737173 = args[0];
++ object r_737166 = args[0];
    
 -pair_type local_7327684; 
-+pair_type local_7325232; 
++pair_type local_7325225; 
  
 -pair_type local_7327688; 
-+pair_type local_7325236; 
++pair_type local_7325229; 
  
  
  
 -pair_type local_7327694; 
-+pair_type local_7325242; 
++pair_type local_7325235; 
  
 -pair_type local_7327697; 
-+pair_type local_7325245; 
++pair_type local_7325238; 
  
 -pair_type local_7327701; 
-+pair_type local_7325249; 
++pair_type local_7325242; 
  
 -pair_type local_7327704; 
-+pair_type local_7325252; 
++pair_type local_7325245; 
  
 -pair_type local_7327707; 
-+pair_type local_7325255; 
++pair_type local_7325248; 
  
 -pair_type local_7327710; 
-+pair_type local_7325258; 
++pair_type local_7325251; 
  
 -pair_type local_7327714; 
-+pair_type local_7325262; 
++pair_type local_7325255; 
  
 -pair_type local_7327717; 
-+pair_type local_7325265; 
++pair_type local_7325258; 
  
 -pair_type local_7327721; 
-+pair_type local_7325269; 
++pair_type local_7325262; 
  
 -pair_type local_7327725; 
-+pair_type local_7325273; 
++pair_type local_7325266; 
  
 -pair_type local_7327728; 
-+pair_type local_7325276; 
++pair_type local_7325269; 
  
 -pair_type local_7327731; 
-+pair_type local_7325279; 
++pair_type local_7325272; 
  
  
 -return_direct_with_clo1(data,  ((closureN)self_7314145)->elements[3], (((closure)  ((closureN)self_7314145)->elements[3])->fn),  set_pair_as_expr(&local_7327684, ((closureN)self_7314145)->elements[0], set_pair_as_expr(&local_7327688, Cyc_cadr(data, ((closureN)self_7314145)->elements[2]), set_pair_as_expr(&local_7327694, set_pair_as_expr(&local_7327697, ((closureN)self_7314145)->elements[5], set_pair_as_expr(&local_7327701, r_737941, set_pair_as_expr(&local_7327704, set_pair_as_expr(&local_7327707, quote_quote, set_pair_as_expr(&local_7327710, ((closureN)self_7314145)->elements[4], NULL)), set_pair_as_expr(&local_7327714, set_pair_as_expr(&local_7327717, ((closureN)self_7314145)->elements[1], set_pair_as_expr(&local_7327721, ((closureN)self_7314145)->elements[4], set_pair_as_expr(&local_7327725, set_pair_as_expr(&local_7327728, quote_quote, set_pair_as_expr(&local_7327731, Cyc_car(data, ((closureN)self_7314145)->elements[2]), NULL)), NULL))), NULL)))), NULL))));; 
-+return_direct_with_clo1(data,  ((closureN)self_7312852)->elements[3], (((closure)  ((closureN)self_7312852)->elements[3])->fn),  set_pair_as_expr(&local_7325232, ((closureN)self_7312852)->elements[0], set_pair_as_expr(&local_7325236, Cyc_cadr(data, ((closureN)self_7312852)->elements[2]), set_pair_as_expr(&local_7325242, set_pair_as_expr(&local_7325245, ((closureN)self_7312852)->elements[5], set_pair_as_expr(&local_7325249, r_737173, set_pair_as_expr(&local_7325252, set_pair_as_expr(&local_7325255, quote_quote, set_pair_as_expr(&local_7325258, ((closureN)self_7312852)->elements[4], NULL)), set_pair_as_expr(&local_7325262, set_pair_as_expr(&local_7325265, ((closureN)self_7312852)->elements[1], set_pair_as_expr(&local_7325269, ((closureN)self_7312852)->elements[4], set_pair_as_expr(&local_7325273, set_pair_as_expr(&local_7325276, quote_quote, set_pair_as_expr(&local_7325279, Cyc_car(data, ((closureN)self_7312852)->elements[2]), NULL)), NULL))), NULL)))), NULL))));; 
++return_direct_with_clo1(data,  ((closureN)self_7312845)->elements[3], (((closure)  ((closureN)self_7312845)->elements[3])->fn),  set_pair_as_expr(&local_7325225, ((closureN)self_7312845)->elements[0], set_pair_as_expr(&local_7325229, Cyc_cadr(data, ((closureN)self_7312845)->elements[2]), set_pair_as_expr(&local_7325235, set_pair_as_expr(&local_7325238, ((closureN)self_7312845)->elements[5], set_pair_as_expr(&local_7325242, r_737166, set_pair_as_expr(&local_7325245, set_pair_as_expr(&local_7325248, quote_quote, set_pair_as_expr(&local_7325251, ((closureN)self_7312845)->elements[4], NULL)), set_pair_as_expr(&local_7325255, set_pair_as_expr(&local_7325258, ((closureN)self_7312845)->elements[1], set_pair_as_expr(&local_7325262, ((closureN)self_7312845)->elements[4], set_pair_as_expr(&local_7325266, set_pair_as_expr(&local_7325269, quote_quote, set_pair_as_expr(&local_7325272, Cyc_car(data, ((closureN)self_7312845)->elements[2]), NULL)), NULL))), NULL)))), NULL))));; 
  }
  
 -static void __lambda_1238(void *data, object self_7314146, int argc, object *args) /* object self_7314146, object r_737930 */
-+static void __lambda_1191(void *data, object self_7312853, int argc, object *args) /* object self_7312853, object r_737162 */
++static void __lambda_1191(void *data, object self_7312846, int argc, object *args) /* object self_7312846, object r_737155 */
   {
 - object r_737930 = args[0];
-+ object r_737162 = args[0];
++ object r_737155 = args[0];
    
 -closureN_type c_7327374;
 -object e_7327661 [12];
@@ -7315,41 +7316,41 @@ Make let-values be the same as let*-values, to work around
 -c_7327374.elements[9] = ((closureN)self_7314146)->elements[9];
 -c_7327374.elements[10] = ((closureN)self_7314146)->elements[10];
 -c_7327374.elements[11] = ((closureN)self_7314146)->elements[11];
-+closureN_type c_7324922;
-+object e_7325209 [12];
-+c_7324922.hdr.mark = gc_color_red;
-+ c_7324922.hdr.grayed = 0;
-+c_7324922.tag = closureN_tag;
-+ c_7324922.fn = (function_type)__lambda_1192;
-+c_7324922.num_args = 1;
-+c_7324922.num_elements = 12;
-+c_7324922.elements = (object *)e_7325209;
-+c_7324922.elements[0] = ((closureN)self_7312853)->elements[0];
-+c_7324922.elements[1] = ((closureN)self_7312853)->elements[1];
-+c_7324922.elements[2] = ((closureN)self_7312853)->elements[2];
-+c_7324922.elements[3] = ((closureN)self_7312853)->elements[3];
-+c_7324922.elements[4] = ((closureN)self_7312853)->elements[4];
-+c_7324922.elements[5] = ((closureN)self_7312853)->elements[5];
-+c_7324922.elements[6] = ((closureN)self_7312853)->elements[6];
-+c_7324922.elements[7] = ((closureN)self_7312853)->elements[7];
-+c_7324922.elements[8] = ((closureN)self_7312853)->elements[8];
-+c_7324922.elements[9] = ((closureN)self_7312853)->elements[9];
-+c_7324922.elements[10] = ((closureN)self_7312853)->elements[10];
-+c_7324922.elements[11] = ((closureN)self_7312853)->elements[11];
++closureN_type c_7324915;
++object e_7325202 [12];
++c_7324915.hdr.mark = gc_color_red;
++ c_7324915.hdr.grayed = 0;
++c_7324915.tag = closureN_tag;
++ c_7324915.fn = (function_type)__lambda_1192;
++c_7324915.num_args = 1;
++c_7324915.num_elements = 12;
++c_7324915.elements = (object *)e_7325202;
++c_7324915.elements[0] = ((closureN)self_7312846)->elements[0];
++c_7324915.elements[1] = ((closureN)self_7312846)->elements[1];
++c_7324915.elements[2] = ((closureN)self_7312846)->elements[2];
++c_7324915.elements[3] = ((closureN)self_7312846)->elements[3];
++c_7324915.elements[4] = ((closureN)self_7312846)->elements[4];
++c_7324915.elements[5] = ((closureN)self_7312846)->elements[5];
++c_7324915.elements[6] = ((closureN)self_7312846)->elements[6];
++c_7324915.elements[7] = ((closureN)self_7312846)->elements[7];
++c_7324915.elements[8] = ((closureN)self_7312846)->elements[8];
++c_7324915.elements[9] = ((closureN)self_7312846)->elements[9];
++c_7324915.elements[10] = ((closureN)self_7312846)->elements[10];
++c_7324915.elements[11] = ((closureN)self_7312846)->elements[11];
  
  
  
  
  
 -return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7327374, r_737930, Cyc_cddr(data, Cyc_cddr(data, ((closureN)self_7314146)->elements[4])));; 
-+return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7324922, r_737162, Cyc_cddr(data, Cyc_cddr(data, ((closureN)self_7312853)->elements[4])));; 
++return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7324915, r_737155, Cyc_cddr(data, Cyc_cddr(data, ((closureN)self_7312846)->elements[4])));; 
  }
  
 -static void __lambda_1239(void *data, object self_7314147, int argc, object *args) /* object self_7314147, object r_737859 */
-+static void __lambda_1192(void *data, object self_7312854, int argc, object *args) /* object self_7312854, object r_737091 */
++static void __lambda_1192(void *data, object self_7312847, int argc, object *args) /* object self_7312847, object r_737084 */
   {
 - object r_737859 = args[0];
-+ object r_737091 = args[0];
++ object r_737084 = args[0];
    
 -closureN_type c_7327376;
 -object e_7327573 [12];
@@ -7372,27 +7373,27 @@ Make let-values be the same as let*-values, to work around
 -c_7327376.elements[9] = ((closureN)self_7314147)->elements[9];
 -c_7327376.elements[10] = ((closureN)self_7314147)->elements[10];
 -c_7327376.elements[11] = ((closureN)self_7314147)->elements[11];
-+closureN_type c_7324924;
-+object e_7325121 [12];
-+c_7324924.hdr.mark = gc_color_red;
-+ c_7324924.hdr.grayed = 0;
-+c_7324924.tag = closureN_tag;
-+ c_7324924.fn = (function_type)__lambda_1193;
-+c_7324924.num_args = 1;
-+c_7324924.num_elements = 12;
-+c_7324924.elements = (object *)e_7325121;
-+c_7324924.elements[0] = ((closureN)self_7312854)->elements[0];
-+c_7324924.elements[1] = ((closureN)self_7312854)->elements[1];
-+c_7324924.elements[2] = ((closureN)self_7312854)->elements[2];
-+c_7324924.elements[3] = ((closureN)self_7312854)->elements[4];
-+c_7324924.elements[4] = ((closureN)self_7312854)->elements[5];
-+c_7324924.elements[5] = ((closureN)self_7312854)->elements[6];
-+c_7324924.elements[6] = ((closureN)self_7312854)->elements[7];
-+c_7324924.elements[7] = ((closureN)self_7312854)->elements[8];
-+c_7324924.elements[8] = r_737091;
-+c_7324924.elements[9] = ((closureN)self_7312854)->elements[9];
-+c_7324924.elements[10] = ((closureN)self_7312854)->elements[10];
-+c_7324924.elements[11] = ((closureN)self_7312854)->elements[11];
++closureN_type c_7324917;
++object e_7325114 [12];
++c_7324917.hdr.mark = gc_color_red;
++ c_7324917.hdr.grayed = 0;
++c_7324917.tag = closureN_tag;
++ c_7324917.fn = (function_type)__lambda_1193;
++c_7324917.num_args = 1;
++c_7324917.num_elements = 12;
++c_7324917.elements = (object *)e_7325114;
++c_7324917.elements[0] = ((closureN)self_7312847)->elements[0];
++c_7324917.elements[1] = ((closureN)self_7312847)->elements[1];
++c_7324917.elements[2] = ((closureN)self_7312847)->elements[2];
++c_7324917.elements[3] = ((closureN)self_7312847)->elements[4];
++c_7324917.elements[4] = ((closureN)self_7312847)->elements[5];
++c_7324917.elements[5] = ((closureN)self_7312847)->elements[6];
++c_7324917.elements[6] = ((closureN)self_7312847)->elements[7];
++c_7324917.elements[7] = ((closureN)self_7312847)->elements[8];
++c_7324917.elements[8] = r_737084;
++c_7324917.elements[9] = ((closureN)self_7312847)->elements[9];
++c_7324917.elements[10] = ((closureN)self_7312847)->elements[10];
++c_7324917.elements[11] = ((closureN)self_7312847)->elements[11];
  
  
 -closureN_type c_7327574;
@@ -7408,40 +7409,40 @@ Make let-values be the same as let*-values, to work around
 -c_7327574.elements[1] = ((closureN)self_7314147)->elements[3];
 -c_7327574.elements[2] = ((closureN)self_7314147)->elements[6];
 -c_7327574.elements[3] = ((closureN)self_7314147)->elements[11];
-+closureN_type c_7325122;
-+object e_7325208 [4];
-+c_7325122.hdr.mark = gc_color_red;
-+ c_7325122.hdr.grayed = 0;
-+c_7325122.tag = closureN_tag;
-+ c_7325122.fn = (function_type)__lambda_1202;
-+c_7325122.num_args = 1;
-+c_7325122.num_elements = 4;
-+c_7325122.elements = (object *)e_7325208;
-+c_7325122.elements[0] = ((closureN)self_7312854)->elements[0];
-+c_7325122.elements[1] = ((closureN)self_7312854)->elements[3];
-+c_7325122.elements[2] = ((closureN)self_7312854)->elements[6];
-+c_7325122.elements[3] = ((closureN)self_7312854)->elements[11];
++closureN_type c_7325115;
++object e_7325201 [4];
++c_7325115.hdr.mark = gc_color_red;
++ c_7325115.hdr.grayed = 0;
++c_7325115.tag = closureN_tag;
++ c_7325115.fn = (function_type)__lambda_1202;
++c_7325115.num_args = 1;
++c_7325115.num_elements = 4;
++c_7325115.elements = (object *)e_7325201;
++c_7325115.elements[0] = ((closureN)self_7312847)->elements[0];
++c_7325115.elements[1] = ((closureN)self_7312847)->elements[3];
++c_7325115.elements[2] = ((closureN)self_7312847)->elements[6];
++c_7325115.elements[3] = ((closureN)self_7312847)->elements[11];
  
 -return_direct_with_clo1(data,(closure)&c_7327376,__lambda_1240,  &c_7327574);; 
-+return_direct_with_clo1(data,(closure)&c_7324924,__lambda_1193,  &c_7325122);; 
++return_direct_with_clo1(data,(closure)&c_7324917,__lambda_1193,  &c_7325115);; 
  }
  
 -static void __lambda_1249(void *data, object self_7314148, int argc, object *args) /* object self_7314148, object k_737896, object f_732641_734017 */
-+static void __lambda_1202(void *data, object self_7312855, int argc, object *args) /* object self_7312855, object k_737128, object f_732300_733572 */
++static void __lambda_1202(void *data, object self_7312848, int argc, object *args) /* object self_7312848, object k_737121, object f_732294_733565 */
   {
 - object k_737896 = args[0]; object f_732641_734017 = args[1];
-+ object k_737128 = args[0]; object f_732300_733572 = args[1];
++ object k_737121 = args[0]; object f_732294_733565 = args[1];
      
 -if( (boolean_f != Cyc_is_pair(f_732641_734017)) ){ 
-+if( (boolean_f != Cyc_is_pair(f_732300_733572)) ){ 
++if( (boolean_f != Cyc_is_pair(f_732294_733565)) ){ 
      
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, f_732641_734017))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, f_732300_733572))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, f_732294_733565))) ){ 
      
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cddr(data, f_732641_734017))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_cddr(data, f_732300_733572))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_cddr(data, f_732294_733565))) ){ 
    
 -closureN_type c_7327587;
 -object e_7327656 [5];
@@ -7457,42 +7458,42 @@ Make let-values be the same as let*-values, to work around
 -c_7327587.elements[2] = f_732641_734017;
 -c_7327587.elements[3] = k_737896;
 -c_7327587.elements[4] = ((closureN)self_7314148)->elements[2];
-+closureN_type c_7325135;
-+object e_7325204 [5];
-+c_7325135.hdr.mark = gc_color_red;
-+ c_7325135.hdr.grayed = 0;
-+c_7325135.tag = closureN_tag;
-+ c_7325135.fn = (function_type)__lambda_1203;
-+c_7325135.num_args = 1;
-+c_7325135.num_elements = 5;
-+c_7325135.elements = (object *)e_7325204;
-+c_7325135.elements[0] = ((closureN)self_7312855)->elements[0];
-+c_7325135.elements[1] = ((closureN)self_7312855)->elements[1];
-+c_7325135.elements[2] = f_732300_733572;
-+c_7325135.elements[3] = k_737128;
-+c_7325135.elements[4] = ((closureN)self_7312855)->elements[2];
++closureN_type c_7325128;
++object e_7325197 [5];
++c_7325128.hdr.mark = gc_color_red;
++ c_7325128.hdr.grayed = 0;
++c_7325128.tag = closureN_tag;
++ c_7325128.fn = (function_type)__lambda_1203;
++c_7325128.num_args = 1;
++c_7325128.num_elements = 5;
++c_7325128.elements = (object *)e_7325197;
++c_7325128.elements[0] = ((closureN)self_7312848)->elements[0];
++c_7325128.elements[1] = ((closureN)self_7312848)->elements[1];
++c_7325128.elements[2] = f_732294_733565;
++c_7325128.elements[3] = k_737121;
++c_7325128.elements[4] = ((closureN)self_7312848)->elements[2];
  
 -return_closcall2(data,  ((closureN)self_7314148)->elements[3],  &c_7327587, quote_make_91setter);
-+return_closcall2(data,  ((closureN)self_7312855)->elements[3],  &c_7325135, quote_make_91setter);
++return_closcall2(data,  ((closureN)self_7312848)->elements[3],  &c_7325128, quote_make_91setter);
  } else { 
 -  return_direct_with_clo1(data,  k_737896, (((closure)  k_737896)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_737128, (((closure)  k_737128)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_737121, (((closure)  k_737121)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_737896, (((closure)  k_737896)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_737128, (((closure)  k_737128)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_737121, (((closure)  k_737121)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_737896, (((closure)  k_737896)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_737128, (((closure)  k_737128)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_737121, (((closure)  k_737121)->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_1250(void *data, object self_7314149, int argc, object *args) /* object self_7314149, object r_737905 */
-+static void __lambda_1203(void *data, object self_7312856, int argc, object *args) /* object self_7312856, object r_737137 */
++static void __lambda_1203(void *data, object self_7312849, int argc, object *args) /* object self_7312849, object r_737130 */
   {
 - object r_737905 = args[0];
-+ object r_737137 = args[0];
++ object r_737130 = args[0];
    
 -closureN_type c_7327589;
 -object e_7327647 [6];
@@ -7509,21 +7510,21 @@ Make let-values be the same as let*-values, to work around
 -c_7327589.elements[3] = ((closureN)self_7314149)->elements[3];
 -c_7327589.elements[4] = ((closureN)self_7314149)->elements[4];
 -c_7327589.elements[5] = r_737905;
-+closureN_type c_7325137;
-+object e_7325195 [6];
-+c_7325137.hdr.mark = gc_color_red;
-+ c_7325137.hdr.grayed = 0;
-+c_7325137.tag = closureN_tag;
-+ c_7325137.fn = (function_type)__lambda_1204;
-+c_7325137.num_args = 1;
-+c_7325137.num_elements = 6;
-+c_7325137.elements = (object *)e_7325195;
-+c_7325137.elements[0] = ((closureN)self_7312856)->elements[0];
-+c_7325137.elements[1] = ((closureN)self_7312856)->elements[1];
-+c_7325137.elements[2] = ((closureN)self_7312856)->elements[2];
-+c_7325137.elements[3] = ((closureN)self_7312856)->elements[3];
-+c_7325137.elements[4] = ((closureN)self_7312856)->elements[4];
-+c_7325137.elements[5] = r_737137;
++closureN_type c_7325130;
++object e_7325188 [6];
++c_7325130.hdr.mark = gc_color_red;
++ c_7325130.hdr.grayed = 0;
++c_7325130.tag = closureN_tag;
++ c_7325130.fn = (function_type)__lambda_1204;
++c_7325130.num_args = 1;
++c_7325130.num_elements = 6;
++c_7325130.elements = (object *)e_7325188;
++c_7325130.elements[0] = ((closureN)self_7312849)->elements[0];
++c_7325130.elements[1] = ((closureN)self_7312849)->elements[1];
++c_7325130.elements[2] = ((closureN)self_7312849)->elements[2];
++c_7325130.elements[3] = ((closureN)self_7312849)->elements[3];
++c_7325130.elements[4] = ((closureN)self_7312849)->elements[4];
++c_7325130.elements[5] = r_737130;
  
  
  
@@ -7532,72 +7533,72 @@ Make let-values be the same as let*-values, to work around
  
 -object c_7327650 = Cyc_symbol2string(data,(closure)&c_7327589,Cyc_car(data, Cyc_cddr(data, ((closureN)self_7314149)->elements[2])));
 -return_closcall1(data,(closure)&c_7327589,  c_7327650);; 
-+object c_7325198 = Cyc_symbol2string(data,(closure)&c_7325137,Cyc_car(data, Cyc_cddr(data, ((closureN)self_7312856)->elements[2])));
-+return_closcall1(data,(closure)&c_7325137,  c_7325198);; 
++object c_7325191 = Cyc_symbol2string(data,(closure)&c_7325130,Cyc_car(data, Cyc_cddr(data, ((closureN)self_7312849)->elements[2])));
++return_closcall1(data,(closure)&c_7325130,  c_7325191);; 
  }
  
 -static void __lambda_1251(void *data, object self_7314150, int argc, object *args) /* object self_7314150, object r_737907 */
-+static void __lambda_1204(void *data, object self_7312857, int argc, object *args) /* object self_7312857, object r_737139 */
++static void __lambda_1204(void *data, object self_7312850, int argc, object *args) /* object self_7312850, object r_737132 */
   {
 - object r_737907 = args[0];
-+ object r_737139 = args[0];
++ object r_737132 = args[0];
    
 -pair_type local_7327594; 
-+pair_type local_7325142; 
++pair_type local_7325135; 
  
 -pair_type local_7327598; 
-+pair_type local_7325146; 
++pair_type local_7325139; 
  
  
  
  
  
 -pair_type local_7327606; 
-+pair_type local_7325154; 
++pair_type local_7325147; 
  
 -pair_type local_7327609; 
-+pair_type local_7325157; 
++pair_type local_7325150; 
  
 -pair_type local_7327613; 
-+pair_type local_7325161; 
++pair_type local_7325154; 
  
 -pair_type local_7327616; 
-+pair_type local_7325164; 
++pair_type local_7325157; 
  
 -pair_type local_7327619; 
-+pair_type local_7325167; 
++pair_type local_7325160; 
  
 -pair_type local_7327622; 
-+pair_type local_7325170; 
++pair_type local_7325163; 
  
 -pair_type local_7327626; 
-+pair_type local_7325174; 
++pair_type local_7325167; 
  
 -pair_type local_7327629; 
-+pair_type local_7325177; 
++pair_type local_7325170; 
  
 -pair_type local_7327633; 
-+pair_type local_7325181; 
++pair_type local_7325174; 
  
 -pair_type local_7327637; 
-+pair_type local_7325185; 
++pair_type local_7325178; 
  
 -pair_type local_7327640; 
-+pair_type local_7325188; 
++pair_type local_7325181; 
  
 -pair_type local_7327643; 
-+pair_type local_7325191; 
++pair_type local_7325184; 
  
  
 -return_direct_with_clo1(data,  ((closureN)self_7314150)->elements[3], (((closure)  ((closureN)self_7314150)->elements[3])->fn),  set_pair_as_expr(&local_7327594, ((closureN)self_7314150)->elements[0], set_pair_as_expr(&local_7327598, Cyc_car(data, Cyc_cddr(data, ((closureN)self_7314150)->elements[2])), set_pair_as_expr(&local_7327606, set_pair_as_expr(&local_7327609, ((closureN)self_7314150)->elements[5], set_pair_as_expr(&local_7327613, r_737907, set_pair_as_expr(&local_7327616, set_pair_as_expr(&local_7327619, quote_quote, set_pair_as_expr(&local_7327622, ((closureN)self_7314150)->elements[4], NULL)), set_pair_as_expr(&local_7327626, set_pair_as_expr(&local_7327629, ((closureN)self_7314150)->elements[1], set_pair_as_expr(&local_7327633, ((closureN)self_7314150)->elements[4], set_pair_as_expr(&local_7327637, set_pair_as_expr(&local_7327640, quote_quote, set_pair_as_expr(&local_7327643, Cyc_car(data, ((closureN)self_7314150)->elements[2]), NULL)), NULL))), NULL)))), NULL)))
);; 
-+return_direct_with_clo1(data,  ((closureN)self_7312857)->elements[3], (((closure)  ((closureN)self_7312857)->elements[3])->fn),  set_pair_as_expr(&local_7325142, ((closureN)self_7312857)->elements[0], set_pair_as_expr(&local_7325146, Cyc_car(data, Cyc_cddr(data, ((closureN)self_7312857)->elements[2])), set_pair_as_expr(&local_7325154, set_pair_as_expr(&local_7325157, ((closureN)self_7312857)->elements[5], set_pair_as_expr(&local_7325161, r_737139, set_pair_as_expr(&local_7325164, set_pair_as_expr(&local_7325167, quote_quote, set_pair_as_expr(&local_7325170, ((closureN)self_7312857)->elements[4], NULL)), set_pair_as_expr(&local_7325174, set_pair_as_expr(&local_7325177, ((closureN)self_7312857)->elements[1], set_pair_as_expr(&local_7325181, ((closureN)self_7312857)->elements[4], set_pair_as_expr(&local_7325185, set_pair_as_expr(&local_7325188, quote_quote, set_pair_as_expr(&local_7325191, Cyc_car(data, ((closureN)self_7312857)->elements[2]), NULL)), NULL))), NULL)))), NULL)))
);; 
++return_direct_with_clo1(data,  ((closureN)self_7312850)->elements[3], (((closure)  ((closureN)self_7312850)->elements[3])->fn),  set_pair_as_expr(&local_7325135, ((closureN)self_7312850)->elements[0], set_pair_as_expr(&local_7325139, Cyc_car(data, Cyc_cddr(data, ((closureN)self_7312850)->elements[2])), set_pair_as_expr(&local_7325147, set_pair_as_expr(&local_7325150, ((closureN)self_7312850)->elements[5], set_pair_as_expr(&local_7325154, r_737132, set_pair_as_expr(&local_7325157, set_pair_as_expr(&local_7325160, quote_quote, set_pair_as_expr(&local_7325163, ((closureN)self_7312850)->elements[4], NULL)), set_pair_as_expr(&local_7325167, set_pair_as_expr(&local_7325170, ((closureN)self_7312850)->elements[1], set_pair_as_expr(&local_7325174, ((closureN)self_7312850)->elements[4], set_pair_as_expr(&local_7325178, set_pair_as_expr(&local_7325181, quote_quote, set_pair_as_expr(&local_7325184, Cyc_car(data, ((closureN)self_7312850)->elements[2]), NULL)), NULL))), NULL)))), NULL)))
);; 
  }
  
 -static void __lambda_1240(void *data, object self_7314151, int argc, object *args) /* object self_7314151, object r_737895 */
-+static void __lambda_1193(void *data, object self_7312858, int argc, object *args) /* object self_7312858, object r_737127 */
++static void __lambda_1193(void *data, object self_7312851, int argc, object *args) /* object self_7312851, object r_737120 */
   {
 - object r_737895 = args[0];
-+ object r_737127 = args[0];
++ object r_737120 = args[0];
    
 -closureN_type c_7327378;
 -object e_7327567 [12];
@@ -7620,41 +7621,41 @@ Make let-values be the same as let*-values, to work around
 -c_7327378.elements[9] = ((closureN)self_7314151)->elements[9];
 -c_7327378.elements[10] = ((closureN)self_7314151)->elements[10];
 -c_7327378.elements[11] = ((closureN)self_7314151)->elements[11];
-+closureN_type c_7324926;
-+object e_7325115 [12];
-+c_7324926.hdr.mark = gc_color_red;
-+ c_7324926.hdr.grayed = 0;
-+c_7324926.tag = closureN_tag;
-+ c_7324926.fn = (function_type)__lambda_1194;
-+c_7324926.num_args = 1;
-+c_7324926.num_elements = 12;
-+c_7324926.elements = (object *)e_7325115;
-+c_7324926.elements[0] = ((closureN)self_7312858)->elements[0];
-+c_7324926.elements[1] = ((closureN)self_7312858)->elements[1];
-+c_7324926.elements[2] = ((closureN)self_7312858)->elements[2];
-+c_7324926.elements[3] = ((closureN)self_7312858)->elements[3];
-+c_7324926.elements[4] = ((closureN)self_7312858)->elements[4];
-+c_7324926.elements[5] = ((closureN)self_7312858)->elements[5];
-+c_7324926.elements[6] = ((closureN)self_7312858)->elements[6];
-+c_7324926.elements[7] = ((closureN)self_7312858)->elements[7];
-+c_7324926.elements[8] = ((closureN)self_7312858)->elements[8];
-+c_7324926.elements[9] = ((closureN)self_7312858)->elements[9];
-+c_7324926.elements[10] = ((closureN)self_7312858)->elements[10];
-+c_7324926.elements[11] = ((closureN)self_7312858)->elements[11];
++closureN_type c_7324919;
++object e_7325108 [12];
++c_7324919.hdr.mark = gc_color_red;
++ c_7324919.hdr.grayed = 0;
++c_7324919.tag = closureN_tag;
++ c_7324919.fn = (function_type)__lambda_1194;
++c_7324919.num_args = 1;
++c_7324919.num_elements = 12;
++c_7324919.elements = (object *)e_7325108;
++c_7324919.elements[0] = ((closureN)self_7312851)->elements[0];
++c_7324919.elements[1] = ((closureN)self_7312851)->elements[1];
++c_7324919.elements[2] = ((closureN)self_7312851)->elements[2];
++c_7324919.elements[3] = ((closureN)self_7312851)->elements[3];
++c_7324919.elements[4] = ((closureN)self_7312851)->elements[4];
++c_7324919.elements[5] = ((closureN)self_7312851)->elements[5];
++c_7324919.elements[6] = ((closureN)self_7312851)->elements[6];
++c_7324919.elements[7] = ((closureN)self_7312851)->elements[7];
++c_7324919.elements[8] = ((closureN)self_7312851)->elements[8];
++c_7324919.elements[9] = ((closureN)self_7312851)->elements[9];
++c_7324919.elements[10] = ((closureN)self_7312851)->elements[10];
++c_7324919.elements[11] = ((closureN)self_7312851)->elements[11];
  
  
  
  
  
 -return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7327378, r_737895, Cyc_cddr(data, Cyc_cddr(data, ((closureN)self_7314151)->elements[3])));; 
-+return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7324926, r_737127, Cyc_cddr(data, Cyc_cddr(data, ((closureN)self_7312858)->elements[3])));; 
++return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7324919, r_737120, Cyc_cddr(data, Cyc_cddr(data, ((closureN)self_7312851)->elements[3])));; 
  }
  
 -static void __lambda_1241(void *data, object self_7314152, int argc, object *args) /* object self_7314152, object r_737861 */
-+static void __lambda_1194(void *data, object self_7312859, int argc, object *args) /* object self_7312859, object r_737093 */
++static void __lambda_1194(void *data, object self_7312852, int argc, object *args) /* object self_7312852, object r_737086 */
   {
 - object r_737861 = args[0];
-+ object r_737093 = args[0];
++ object r_737086 = args[0];
    
 -closureN_type c_7327381;
 -object e_7327566 [13];
@@ -7678,38 +7679,38 @@ Make let-values be the same as let*-values, to work around
 -c_7327381.elements[10] = ((closureN)self_7314152)->elements[9];
 -c_7327381.elements[11] = ((closureN)self_7314152)->elements[10];
 -c_7327381.elements[12] = ((closureN)self_7314152)->elements[11];
-+closureN_type c_7324929;
-+object e_7325114 [13];
-+c_7324929.hdr.mark = gc_color_red;
-+ c_7324929.hdr.grayed = 0;
-+c_7324929.tag = closureN_tag;
-+ c_7324929.fn = (function_type)__lambda_1195;
-+c_7324929.num_args = 1;
-+c_7324929.num_elements = 13;
-+c_7324929.elements = (object *)e_7325114;
-+c_7324929.elements[0] = ((closureN)self_7312859)->elements[0];
-+c_7324929.elements[1] = ((closureN)self_7312859)->elements[1];
-+c_7324929.elements[2] = ((closureN)self_7312859)->elements[2];
-+c_7324929.elements[3] = ((closureN)self_7312859)->elements[3];
-+c_7324929.elements[4] = ((closureN)self_7312859)->elements[4];
-+c_7324929.elements[5] = ((closureN)self_7312859)->elements[5];
-+c_7324929.elements[6] = ((closureN)self_7312859)->elements[6];
-+c_7324929.elements[7] = ((closureN)self_7312859)->elements[7];
-+c_7324929.elements[8] = ((closureN)self_7312859)->elements[8];
-+c_7324929.elements[9] = r_737093;
-+c_7324929.elements[10] = ((closureN)self_7312859)->elements[9];
-+c_7324929.elements[11] = ((closureN)self_7312859)->elements[10];
-+c_7324929.elements[12] = ((closureN)self_7312859)->elements[11];
++closureN_type c_7324922;
++object e_7325107 [13];
++c_7324922.hdr.mark = gc_color_red;
++ c_7324922.hdr.grayed = 0;
++c_7324922.tag = closureN_tag;
++ c_7324922.fn = (function_type)__lambda_1195;
++c_7324922.num_args = 1;
++c_7324922.num_elements = 13;
++c_7324922.elements = (object *)e_7325107;
++c_7324922.elements[0] = ((closureN)self_7312852)->elements[0];
++c_7324922.elements[1] = ((closureN)self_7312852)->elements[1];
++c_7324922.elements[2] = ((closureN)self_7312852)->elements[2];
++c_7324922.elements[3] = ((closureN)self_7312852)->elements[3];
++c_7324922.elements[4] = ((closureN)self_7312852)->elements[4];
++c_7324922.elements[5] = ((closureN)self_7312852)->elements[5];
++c_7324922.elements[6] = ((closureN)self_7312852)->elements[6];
++c_7324922.elements[7] = ((closureN)self_7312852)->elements[7];
++c_7324922.elements[8] = ((closureN)self_7312852)->elements[8];
++c_7324922.elements[9] = r_737086;
++c_7324922.elements[10] = ((closureN)self_7312852)->elements[9];
++c_7324922.elements[11] = ((closureN)self_7312852)->elements[10];
++c_7324922.elements[12] = ((closureN)self_7312852)->elements[11];
  
 -return_closcall2(data,  ((closureN)self_7314152)->elements[11],  &c_7327381, quote_vector);; 
-+return_closcall2(data,  ((closureN)self_7312859)->elements[11],  &c_7324929, quote_vector);; 
++return_closcall2(data,  ((closureN)self_7312852)->elements[11],  &c_7324922, quote_vector);; 
  }
  
 -static void __lambda_1242(void *data, object self_7314153, int argc, object *args) /* object self_7314153, object r_737873 */
-+static void __lambda_1195(void *data, object self_7312860, int argc, object *args) /* object self_7312860, object r_737105 */
++static void __lambda_1195(void *data, object self_7312853, int argc, object *args) /* object self_7312853, object r_737098 */
   {
 - object r_737873 = args[0];
-+ object r_737105 = args[0];
++ object r_737098 = args[0];
    
 -closureN_type c_7327384;
 -object e_7327565 [13];
@@ -7733,38 +7734,38 @@ Make let-values be the same as let*-values, to work around
 -c_7327384.elements[10] = r_737873;
 -c_7327384.elements[11] = ((closureN)self_7314153)->elements[10];
 -c_7327384.elements[12] = ((closureN)self_7314153)->elements[11];
-+closureN_type c_7324932;
-+object e_7325113 [13];
-+c_7324932.hdr.mark = gc_color_red;
-+ c_7324932.hdr.grayed = 0;
-+c_7324932.tag = closureN_tag;
-+ c_7324932.fn = (function_type)__lambda_1196;
-+c_7324932.num_args = 1;
-+c_7324932.num_elements = 13;
-+c_7324932.elements = (object *)e_7325113;
-+c_7324932.elements[0] = ((closureN)self_7312860)->elements[0];
-+c_7324932.elements[1] = ((closureN)self_7312860)->elements[1];
-+c_7324932.elements[2] = ((closureN)self_7312860)->elements[2];
-+c_7324932.elements[3] = ((closureN)self_7312860)->elements[3];
-+c_7324932.elements[4] = ((closureN)self_7312860)->elements[4];
-+c_7324932.elements[5] = ((closureN)self_7312860)->elements[5];
-+c_7324932.elements[6] = ((closureN)self_7312860)->elements[6];
-+c_7324932.elements[7] = ((closureN)self_7312860)->elements[7];
-+c_7324932.elements[8] = ((closureN)self_7312860)->elements[8];
-+c_7324932.elements[9] = ((closureN)self_7312860)->elements[9];
-+c_7324932.elements[10] = r_737105;
-+c_7324932.elements[11] = ((closureN)self_7312860)->elements[10];
-+c_7324932.elements[12] = ((closureN)self_7312860)->elements[11];
++closureN_type c_7324925;
++object e_7325106 [13];
++c_7324925.hdr.mark = gc_color_red;
++ c_7324925.hdr.grayed = 0;
++c_7324925.tag = closureN_tag;
++ c_7324925.fn = (function_type)__lambda_1196;
++c_7324925.num_args = 1;
++c_7324925.num_elements = 13;
++c_7324925.elements = (object *)e_7325106;
++c_7324925.elements[0] = ((closureN)self_7312853)->elements[0];
++c_7324925.elements[1] = ((closureN)self_7312853)->elements[1];
++c_7324925.elements[2] = ((closureN)self_7312853)->elements[2];
++c_7324925.elements[3] = ((closureN)self_7312853)->elements[3];
++c_7324925.elements[4] = ((closureN)self_7312853)->elements[4];
++c_7324925.elements[5] = ((closureN)self_7312853)->elements[5];
++c_7324925.elements[6] = ((closureN)self_7312853)->elements[6];
++c_7324925.elements[7] = ((closureN)self_7312853)->elements[7];
++c_7324925.elements[8] = ((closureN)self_7312853)->elements[8];
++c_7324925.elements[9] = ((closureN)self_7312853)->elements[9];
++c_7324925.elements[10] = r_737098;
++c_7324925.elements[11] = ((closureN)self_7312853)->elements[10];
++c_7324925.elements[12] = ((closureN)self_7312853)->elements[11];
  
 -return_closcall2(data,  ((closureN)self_7314153)->elements[12],  &c_7327384, quote_vector);; 
-+return_closcall2(data,  ((closureN)self_7312860)->elements[12],  &c_7324932, quote_vector);; 
++return_closcall2(data,  ((closureN)self_7312853)->elements[12],  &c_7324925, quote_vector);; 
  }
  
 -static void __lambda_1243(void *data, object self_7314154, int argc, object *args) /* object self_7314154, object r_737881 */
-+static void __lambda_1196(void *data, object self_7312861, int argc, object *args) /* object self_7312861, object r_737113 */
++static void __lambda_1196(void *data, object self_7312854, int argc, object *args) /* object self_7312854, object r_737106 */
   {
 - object r_737881 = args[0];
-+ object r_737113 = args[0];
++ object r_737106 = args[0];
    
 -closureN_type c_7327386;
 -object e_7327549 [14];
@@ -7789,33 +7790,33 @@ Make let-values be the same as let*-values, to work around
 -c_7327386.elements[11] = r_737881;
 -c_7327386.elements[12] = ((closureN)self_7314154)->elements[11];
 -c_7327386.elements[13] = ((closureN)self_7314154)->elements[12];
-+closureN_type c_7324934;
-+object e_7325097 [14];
-+c_7324934.hdr.mark = gc_color_red;
-+ c_7324934.hdr.grayed = 0;
-+c_7324934.tag = closureN_tag;
-+ c_7324934.fn = (function_type)__lambda_1197;
-+c_7324934.num_args = 1;
-+c_7324934.num_elements = 14;
-+c_7324934.elements = (object *)e_7325097;
-+c_7324934.elements[0] = ((closureN)self_7312861)->elements[0];
-+c_7324934.elements[1] = ((closureN)self_7312861)->elements[1];
-+c_7324934.elements[2] = ((closureN)self_7312861)->elements[2];
-+c_7324934.elements[3] = ((closureN)self_7312861)->elements[3];
-+c_7324934.elements[4] = ((closureN)self_7312861)->elements[4];
-+c_7324934.elements[5] = ((closureN)self_7312861)->elements[5];
-+c_7324934.elements[6] = ((closureN)self_7312861)->elements[6];
-+c_7324934.elements[7] = ((closureN)self_7312861)->elements[7];
-+c_7324934.elements[8] = ((closureN)self_7312861)->elements[8];
-+c_7324934.elements[9] = ((closureN)self_7312861)->elements[9];
-+c_7324934.elements[10] = ((closureN)self_7312861)->elements[10];
-+c_7324934.elements[11] = r_737113;
-+c_7324934.elements[12] = ((closureN)self_7312861)->elements[11];
-+c_7324934.elements[13] = ((closureN)self_7312861)->elements[12];
++closureN_type c_7324927;
++object e_7325090 [14];
++c_7324927.hdr.mark = gc_color_red;
++ c_7324927.hdr.grayed = 0;
++c_7324927.tag = closureN_tag;
++ c_7324927.fn = (function_type)__lambda_1197;
++c_7324927.num_args = 1;
++c_7324927.num_elements = 14;
++c_7324927.elements = (object *)e_7325090;
++c_7324927.elements[0] = ((closureN)self_7312854)->elements[0];
++c_7324927.elements[1] = ((closureN)self_7312854)->elements[1];
++c_7324927.elements[2] = ((closureN)self_7312854)->elements[2];
++c_7324927.elements[3] = ((closureN)self_7312854)->elements[3];
++c_7324927.elements[4] = ((closureN)self_7312854)->elements[4];
++c_7324927.elements[5] = ((closureN)self_7312854)->elements[5];
++c_7324927.elements[6] = ((closureN)self_7312854)->elements[6];
++c_7324927.elements[7] = ((closureN)self_7312854)->elements[7];
++c_7324927.elements[8] = ((closureN)self_7312854)->elements[8];
++c_7324927.elements[9] = ((closureN)self_7312854)->elements[9];
++c_7324927.elements[10] = ((closureN)self_7312854)->elements[10];
++c_7324927.elements[11] = r_737106;
++c_7324927.elements[12] = ((closureN)self_7312854)->elements[11];
++c_7324927.elements[13] = ((closureN)self_7312854)->elements[12];
  
  
 -complex_num_type local_7327552; 
-+complex_num_type local_7325100; 
++complex_num_type local_7325093; 
  
  
  
@@ -7824,14 +7825,14 @@ Make let-values be the same as let*-values, to work around
  
  
 -return_direct_with_clo2(data,  __glo_make_91list_scheme_base, (((closure)  __glo_make_91list_scheme_base)->fn),  &c_7327386, Cyc_fast_sub(data,&local_7327552, Cyc_length(data, Cyc_cddddr(data, ((closureN)self_7314154)->elements[3])), Cyc_length(data, Cyc_cdar(data, Cyc_cddr(data, ((closureN)self_7314154)->elements[3])))));; 
-+return_direct_with_clo2(data,  __glo_make_91list_scheme_base, (((closure)  __glo_make_91list_scheme_base)->fn),  &c_7324934, Cyc_fast_sub(data,&local_7325100, Cyc_length(data, Cyc_cddddr(data, ((closureN)self_7312861)->elements[3])), Cyc_length(data, Cyc_cdar(data, Cyc_cddr(data, ((closureN)self_7312861)->elements[3])))));; 
++return_direct_with_clo2(data,  __glo_make_91list_scheme_base, (((closure)  __glo_make_91list_scheme_base)->fn),  &c_7324927, Cyc_fast_sub(data,&local_7325093, Cyc_length(data, Cyc_cddddr(data, ((closureN)self_7312854)->elements[3])), Cyc_length(data, Cyc_cdar(data, Cyc_cddr(data, ((closureN)self_7312854)->elements[3])))));; 
  }
  
 -static void __lambda_1244(void *data, object self_7314155, int argc, object *args) /* object self_7314155, object r_737883 */
-+static void __lambda_1197(void *data, object self_7312862, int argc, object *args) /* object self_7312862, object r_737115 */
++static void __lambda_1197(void *data, object self_7312855, int argc, object *args) /* object self_7312855, object r_737108 */
   {
 - object r_737883 = args[0];
-+ object r_737115 = args[0];
++ object r_737108 = args[0];
    
 -closureN_type c_7327388;
 -object e_7327543 [14];
@@ -7856,43 +7857,43 @@ Make let-values be the same as let*-values, to work around
 -c_7327388.elements[11] = ((closureN)self_7314155)->elements[11];
 -c_7327388.elements[12] = ((closureN)self_7314155)->elements[12];
 -c_7327388.elements[13] = ((closureN)self_7314155)->elements[13];
-+closureN_type c_7324936;
-+object e_7325091 [14];
-+c_7324936.hdr.mark = gc_color_red;
-+ c_7324936.hdr.grayed = 0;
-+c_7324936.tag = closureN_tag;
-+ c_7324936.fn = (function_type)__lambda_1198;
-+c_7324936.num_args = 1;
-+c_7324936.num_elements = 14;
-+c_7324936.elements = (object *)e_7325091;
-+c_7324936.elements[0] = ((closureN)self_7312862)->elements[0];
-+c_7324936.elements[1] = ((closureN)self_7312862)->elements[1];
-+c_7324936.elements[2] = ((closureN)self_7312862)->elements[2];
-+c_7324936.elements[3] = ((closureN)self_7312862)->elements[3];
-+c_7324936.elements[4] = ((closureN)self_7312862)->elements[4];
-+c_7324936.elements[5] = ((closureN)self_7312862)->elements[5];
-+c_7324936.elements[6] = ((closureN)self_7312862)->elements[6];
-+c_7324936.elements[7] = ((closureN)self_7312862)->elements[7];
-+c_7324936.elements[8] = ((closureN)self_7312862)->elements[8];
-+c_7324936.elements[9] = ((closureN)self_7312862)->elements[9];
-+c_7324936.elements[10] = ((closureN)self_7312862)->elements[10];
-+c_7324936.elements[11] = ((closureN)self_7312862)->elements[11];
-+c_7324936.elements[12] = ((closureN)self_7312862)->elements[12];
-+c_7324936.elements[13] = ((closureN)self_7312862)->elements[13];
++closureN_type c_7324929;
++object e_7325084 [14];
++c_7324929.hdr.mark = gc_color_red;
++ c_7324929.hdr.grayed = 0;
++c_7324929.tag = closureN_tag;
++ c_7324929.fn = (function_type)__lambda_1198;
++c_7324929.num_args = 1;
++c_7324929.num_elements = 14;
++c_7324929.elements = (object *)e_7325084;
++c_7324929.elements[0] = ((closureN)self_7312855)->elements[0];
++c_7324929.elements[1] = ((closureN)self_7312855)->elements[1];
++c_7324929.elements[2] = ((closureN)self_7312855)->elements[2];
++c_7324929.elements[3] = ((closureN)self_7312855)->elements[3];
++c_7324929.elements[4] = ((closureN)self_7312855)->elements[4];
++c_7324929.elements[5] = ((closureN)self_7312855)->elements[5];
++c_7324929.elements[6] = ((closureN)self_7312855)->elements[6];
++c_7324929.elements[7] = ((closureN)self_7312855)->elements[7];
++c_7324929.elements[8] = ((closureN)self_7312855)->elements[8];
++c_7324929.elements[9] = ((closureN)self_7312855)->elements[9];
++c_7324929.elements[10] = ((closureN)self_7312855)->elements[10];
++c_7324929.elements[11] = ((closureN)self_7312855)->elements[11];
++c_7324929.elements[12] = ((closureN)self_7312855)->elements[12];
++c_7324929.elements[13] = ((closureN)self_7312855)->elements[13];
  
  
  
  
  
 -return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7327388, Cyc_cdar(data, Cyc_cddr(data, ((closureN)self_7314155)->elements[3])), r_737883);; 
-+return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7324936, Cyc_cdar(data, Cyc_cddr(data, ((closureN)self_7312862)->elements[3])), r_737115);; 
++return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7324929, Cyc_cdar(data, Cyc_cddr(data, ((closureN)self_7312855)->elements[3])), r_737108);; 
  }
  
 -static void __lambda_1245(void *data, object self_7314156, int argc, object *args) /* object self_7314156, object r_737882 */
-+static void __lambda_1198(void *data, object self_7312863, int argc, object *args) /* object self_7312863, object r_737114 */
++static void __lambda_1198(void *data, object self_7312856, int argc, object *args) /* object self_7312856, object r_737107 */
   {
 - object r_737882 = args[0];
-+ object r_737114 = args[0];
++ object r_737107 = args[0];
    
 -closureN_type c_7327390;
 -object e_7327481 [10];
@@ -7913,88 +7914,88 @@ Make let-values be the same as let*-values, to work around
 -c_7327390.elements[7] = ((closureN)self_7314156)->elements[8];
 -c_7327390.elements[8] = ((closureN)self_7314156)->elements[12];
 -c_7327390.elements[9] = ((closureN)self_7314156)->elements[13];
-+closureN_type c_7324938;
-+object e_7325029 [10];
-+c_7324938.hdr.mark = gc_color_red;
-+ c_7324938.hdr.grayed = 0;
-+c_7324938.tag = closureN_tag;
-+ c_7324938.fn = (function_type)__lambda_1199;
-+c_7324938.num_args = 1;
-+c_7324938.num_elements = 10;
-+c_7324938.elements = (object *)e_7325029;
-+c_7324938.elements[0] = ((closureN)self_7312863)->elements[0];
-+c_7324938.elements[1] = ((closureN)self_7312863)->elements[2];
-+c_7324938.elements[2] = ((closureN)self_7312863)->elements[3];
-+c_7324938.elements[3] = ((closureN)self_7312863)->elements[4];
-+c_7324938.elements[4] = ((closureN)self_7312863)->elements[5];
-+c_7324938.elements[5] = ((closureN)self_7312863)->elements[6];
-+c_7324938.elements[6] = ((closureN)self_7312863)->elements[7];
-+c_7324938.elements[7] = ((closureN)self_7312863)->elements[8];
-+c_7324938.elements[8] = ((closureN)self_7312863)->elements[12];
-+c_7324938.elements[9] = ((closureN)self_7312863)->elements[13];
++closureN_type c_7324931;
++object e_7325022 [10];
++c_7324931.hdr.mark = gc_color_red;
++ c_7324931.hdr.grayed = 0;
++c_7324931.tag = closureN_tag;
++ c_7324931.fn = (function_type)__lambda_1199;
++c_7324931.num_args = 1;
++c_7324931.num_elements = 10;
++c_7324931.elements = (object *)e_7325022;
++c_7324931.elements[0] = ((closureN)self_7312856)->elements[0];
++c_7324931.elements[1] = ((closureN)self_7312856)->elements[2];
++c_7324931.elements[2] = ((closureN)self_7312856)->elements[3];
++c_7324931.elements[3] = ((closureN)self_7312856)->elements[4];
++c_7324931.elements[4] = ((closureN)self_7312856)->elements[5];
++c_7324931.elements[5] = ((closureN)self_7312856)->elements[6];
++c_7324931.elements[6] = ((closureN)self_7312856)->elements[7];
++c_7324931.elements[7] = ((closureN)self_7312856)->elements[8];
++c_7324931.elements[8] = ((closureN)self_7312856)->elements[12];
++c_7324931.elements[9] = ((closureN)self_7312856)->elements[13];
  
  
 -pair_type local_7327485; 
-+pair_type local_7325033; 
++pair_type local_7325026; 
  
 -pair_type local_7327488; 
-+pair_type local_7325036; 
++pair_type local_7325029; 
  
 -pair_type local_7327492; 
-+pair_type local_7325040; 
++pair_type local_7325033; 
  
  
  
  
  
 -pair_type local_7327500; 
-+pair_type local_7325048; 
++pair_type local_7325041; 
  
 -pair_type local_7327503; 
-+pair_type local_7325051; 
++pair_type local_7325044; 
  
 -pair_type local_7327507; 
-+pair_type local_7325055; 
++pair_type local_7325048; 
  
  
  
  
  
 -pair_type local_7327515; 
-+pair_type local_7325063; 
++pair_type local_7325056; 
  
 -pair_type local_7327518; 
-+pair_type local_7325066; 
++pair_type local_7325059; 
  
 -pair_type local_7327522; 
-+pair_type local_7325070; 
++pair_type local_7325063; 
  
 -pair_type local_7327525; 
-+pair_type local_7325073; 
++pair_type local_7325066; 
  
 -pair_type local_7327528; 
-+pair_type local_7325076; 
++pair_type local_7325069; 
  
 -pair_type local_7327531; 
-+pair_type local_7325079; 
++pair_type local_7325072; 
  
 -pair_type local_7327534; 
-+pair_type local_7325082; 
++pair_type local_7325075; 
  
 -pair_type local_7327538; 
-+pair_type local_7325086; 
++pair_type local_7325079; 
  
 -pair_type local_7327541; 
 -return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7327390, ((closureN)self_7314156)->elements[9], set_pair_as_expr(&local_7327485, set_pair_as_expr(&local_7327488, ((closureN)self_7314156)->elements[0], set_pair_as_expr(&local_7327492, Cyc_caar(data, Cyc_cddr(data, ((closureN)self_7314156)->elements[3])), set_pair_as_expr(&local_7327500, set_pair_as_expr(&local_7327503, ((closureN)self_7314156)->elements[1], set_pair_as_expr(&local_7327507, Cyc_cdar(data, Cyc_cddr(data, ((closureN)self_7314156)->elements[3])), set_pair_as_expr(&local_7327515, set_pair_as_expr(&local_7327518, ((closureN)self_7314156)->elements[10], set_pair_as_expr(&local_7327522, set_pair_as_expr(&local_7327525, quote_make_91record_91marker, NULL), set_pair_as_expr(&local_7327528, set_pair_as_expr(&local_7327531, quote_quote, set_pair_as_expr(&local_7327534, ((closureN)self_7314156)->elements[5], NULL)), set_pair_as_expr(&local_7327538, set_pair_as_exp
r(&local_7327541, ((closureN)self_7314156)->elements[11], r_737882), NULL)))), NULL))), NULL))), NULL));; 
-+pair_type local_7325089; 
-+return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7324938, ((closureN)self_7312863)->elements[9], set_pair_as_expr(&local_7325033, set_pair_as_expr(&local_7325036, ((closureN)self_7312863)->elements[0], set_pair_as_expr(&local_7325040, Cyc_caar(data, Cyc_cddr(data, ((closureN)self_7312863)->elements[3])), set_pair_as_expr(&local_7325048, set_pair_as_expr(&local_7325051, ((closureN)self_7312863)->elements[1], set_pair_as_expr(&local_7325055, Cyc_cdar(data, Cyc_cddr(data, ((closureN)self_7312863)->elements[3])), set_pair_as_expr(&local_7325063, set_pair_as_expr(&local_7325066, ((closureN)self_7312863)->elements[10], set_pair_as_expr(&local_7325070, set_pair_as_expr(&local_7325073, quote_make_91record_91marker, NULL), set_pair_as_expr(&local_7325076, set_pair_as_expr(&local_7325079, quote_quote, set_pair_as_expr(&local_7325082, ((closureN)self_7312863)->elements[5], NULL)), set_pair_as_expr(&local_7325086, set_pair_as_exp
r(&local_7325089, ((closureN)self_7312863)->elements[11], r_737114), NULL)))), NULL))), NULL))), NULL));; 
++pair_type local_7325082; 
++return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7324931, ((closureN)self_7312856)->elements[9], set_pair_as_expr(&local_7325026, set_pair_as_expr(&local_7325029, ((closureN)self_7312856)->elements[0], set_pair_as_expr(&local_7325033, Cyc_caar(data, Cyc_cddr(data, ((closureN)self_7312856)->elements[3])), set_pair_as_expr(&local_7325041, set_pair_as_expr(&local_7325044, ((closureN)self_7312856)->elements[1], set_pair_as_expr(&local_7325048, Cyc_cdar(data, Cyc_cddr(data, ((closureN)self_7312856)->elements[3])), set_pair_as_expr(&local_7325056, set_pair_as_expr(&local_7325059, ((closureN)self_7312856)->elements[10], set_pair_as_expr(&local_7325063, set_pair_as_expr(&local_7325066, quote_make_91record_91marker, NULL), set_pair_as_expr(&local_7325069, set_pair_as_expr(&local_7325072, quote_quote, set_pair_as_expr(&local_7325075, ((closureN)self_7312856)->elements[5], NULL)), set_pair_as_expr(&local_7325079, set_pair_as_exp
r(&local_7325082, ((closureN)self_7312856)->elements[11], r_737107), NULL)))), NULL))), NULL))), NULL));; 
  }
  
 -static void __lambda_1246(void *data, object self_7314157, int argc, object *args) /* object self_7314157, object r_737860 */
-+static void __lambda_1199(void *data, object self_7312864, int argc, object *args) /* object self_7312864, object r_737092 */
++static void __lambda_1199(void *data, object self_7312857, int argc, object *args) /* object self_7312857, object r_737085 */
   {
 - object r_737860 = args[0];
-+ object r_737092 = args[0];
++ object r_737085 = args[0];
    
 -closureN_type c_7327392;
 -object e_7327479 [9];
@@ -8014,34 +8015,34 @@ Make let-values be the same as let*-values, to work around
 -c_7327392.elements[6] = ((closureN)self_7314157)->elements[6];
 -c_7327392.elements[7] = ((closureN)self_7314157)->elements[8];
 -c_7327392.elements[8] = ((closureN)self_7314157)->elements[9];
-+closureN_type c_7324940;
-+object e_7325027 [9];
-+c_7324940.hdr.mark = gc_color_red;
-+ c_7324940.hdr.grayed = 0;
-+c_7324940.tag = closureN_tag;
-+ c_7324940.fn = (function_type)__lambda_1200;
-+c_7324940.num_args = 1;
-+c_7324940.num_elements = 9;
-+c_7324940.elements = (object *)e_7325027;
-+c_7324940.elements[0] = ((closureN)self_7312864)->elements[0];
-+c_7324940.elements[1] = ((closureN)self_7312864)->elements[1];
-+c_7324940.elements[2] = ((closureN)self_7312864)->elements[2];
-+c_7324940.elements[3] = ((closureN)self_7312864)->elements[3];
-+c_7324940.elements[4] = ((closureN)self_7312864)->elements[4];
-+c_7324940.elements[5] = ((closureN)self_7312864)->elements[5];
-+c_7324940.elements[6] = ((closureN)self_7312864)->elements[6];
-+c_7324940.elements[7] = ((closureN)self_7312864)->elements[8];
-+c_7324940.elements[8] = ((closureN)self_7312864)->elements[9];
++closureN_type c_7324933;
++object e_7325020 [9];
++c_7324933.hdr.mark = gc_color_red;
++ c_7324933.hdr.grayed = 0;
++c_7324933.tag = closureN_tag;
++ c_7324933.fn = (function_type)__lambda_1200;
++c_7324933.num_args = 1;
++c_7324933.num_elements = 9;
++c_7324933.elements = (object *)e_7325020;
++c_7324933.elements[0] = ((closureN)self_7312857)->elements[0];
++c_7324933.elements[1] = ((closureN)self_7312857)->elements[1];
++c_7324933.elements[2] = ((closureN)self_7312857)->elements[2];
++c_7324933.elements[3] = ((closureN)self_7312857)->elements[3];
++c_7324933.elements[4] = ((closureN)self_7312857)->elements[4];
++c_7324933.elements[5] = ((closureN)self_7312857)->elements[5];
++c_7324933.elements[6] = ((closureN)self_7312857)->elements[6];
++c_7324933.elements[7] = ((closureN)self_7312857)->elements[8];
++c_7324933.elements[8] = ((closureN)self_7312857)->elements[9];
  
 -return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7327392, ((closureN)self_7314157)->elements[7], r_737860);; 
-+return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7324940, ((closureN)self_7312864)->elements[7], r_737092);; 
++return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7324933, ((closureN)self_7312857)->elements[7], r_737085);; 
  }
  
 -static void __lambda_1247(void *data, object self_7314158, int argc, object *args) /* object self_7314158, object r_737858 */
-+static void __lambda_1200(void *data, object self_7312865, int argc, object *args) /* object self_7312865, object r_737090 */
++static void __lambda_1200(void *data, object self_7312858, int argc, object *args) /* object self_7312858, object r_737083 */
   {
 - object r_737858 = args[0];
-+ object r_737090 = args[0];
++ object r_737083 = args[0];
    
 -closureN_type c_7327394;
 -object e_7327443 [7];
@@ -8059,155 +8060,154 @@ Make let-values be the same as let*-values, to work around
 -c_7327394.elements[4] = ((closureN)self_7314158)->elements[5];
 -c_7327394.elements[5] = ((closureN)self_7314158)->elements[6];
 -c_7327394.elements[6] = ((closureN)self_7314158)->elements[8];
-+closureN_type c_7324942;
-+object e_7324991 [7];
-+c_7324942.hdr.mark = gc_color_red;
-+ c_7324942.hdr.grayed = 0;
-+c_7324942.tag = closureN_tag;
-+ c_7324942.fn = (function_type)__lambda_1201;
-+c_7324942.num_args = 1;
-+c_7324942.num_elements = 7;
-+c_7324942.elements = (object *)e_7324991;
-+c_7324942.elements[0] = ((closureN)self_7312865)->elements[0];
-+c_7324942.elements[1] = ((closureN)self_7312865)->elements[1];
-+c_7324942.elements[2] = ((closureN)self_7312865)->elements[3];
-+c_7324942.elements[3] = ((closureN)self_7312865)->elements[4];
-+c_7324942.elements[4] = ((closureN)self_7312865)->elements[5];
-+c_7324942.elements[5] = ((closureN)self_7312865)->elements[6];
-+c_7324942.elements[6] = ((closureN)self_7312865)->elements[8];
++closureN_type c_7324935;
++object e_7324984 [7];
++c_7324935.hdr.mark = gc_color_red;
++ c_7324935.hdr.grayed = 0;
++c_7324935.tag = closureN_tag;
++ c_7324935.fn = (function_type)__lambda_1201;
++c_7324935.num_args = 1;
++c_7324935.num_elements = 7;
++c_7324935.elements = (object *)e_7324984;
++c_7324935.elements[0] = ((closureN)self_7312858)->elements[0];
++c_7324935.elements[1] = ((closureN)self_7312858)->elements[1];
++c_7324935.elements[2] = ((closureN)self_7312858)->elements[3];
++c_7324935.elements[3] = ((closureN)self_7312858)->elements[4];
++c_7324935.elements[4] = ((closureN)self_7312858)->elements[5];
++c_7324935.elements[5] = ((closureN)self_7312858)->elements[6];
++c_7324935.elements[6] = ((closureN)self_7312858)->elements[8];
  
  
 -pair_type local_7327446; 
-+pair_type local_7324994; 
++pair_type local_7324987; 
  
 -pair_type local_7327449; 
-+pair_type local_7324997; 
++pair_type local_7324990; 
  
 -pair_type local_7327453; 
-+pair_type local_7325001; 
++pair_type local_7324994; 
  
  
  
  
  
 -pair_type local_7327461; 
-+pair_type local_7325009; 
++pair_type local_7325002; 
  
 -pair_type local_7327464; 
-+pair_type local_7325012; 
++pair_type local_7325005; 
  
 -pair_type local_7327468; 
-+pair_type local_7325016; 
++pair_type local_7325009; 
  
 -pair_type local_7327471; 
-+pair_type local_7325019; 
++pair_type local_7325012; 
  
 -pair_type local_7327474; 
-+pair_type local_7325022; 
++pair_type local_7325015; 
  
 -pair_type local_7327477; 
 -return_direct_with_clo1(data,(closure)&c_7327394,__lambda_1248,  set_pair_as_expr(&local_7327446, set_pair_as_expr(&local_7327449, ((closureN)self_7314158)->elements[0], set_pair_as_expr(&local_7327453, Cyc_cadr(data, Cyc_cddr(data, ((closureN)self_7314158)->elements[2])), set_pair_as_expr(&local_7327461, set_pair_as_expr(&local_7327464, ((closureN)self_7314158)->elements[7], set_pair_as_expr(&local_7327468, obj_int2obj(0), set_pair_as_expr(&local_7327471, set_pair_as_expr(&local_7327474, quote_quote, set_pair_as_expr(&local_7327477, ((closureN)self_7314158)->elements[4], NULL)), NULL))), NULL))), r_737858));; 
-+pair_type local_7325025; 
-+return_direct_with_clo1(data,(closure)&c_7324942,__lambda_1201,  set_pair_as_expr(&local_7324994, set_pair_as_expr(&local_7324997, ((closureN)self_7312865)->elements[0], set_pair_as_expr(&local_7325001, Cyc_cadr(data, Cyc_cddr(data, ((closureN)self_7312865)->elements[2])), set_pair_as_expr(&local_7325009, set_pair_as_expr(&local_7325012, ((closureN)self_7312865)->elements[7], set_pair_as_expr(&local_7325016, obj_int2obj(0), set_pair_as_expr(&local_7325019, set_pair_as_expr(&local_7325022, quote_quote, set_pair_as_expr(&local_7325025, ((closureN)self_7312865)->elements[4], NULL)), NULL))), NULL))), r_737090));; 
++pair_type local_7325018; 
++return_direct_with_clo1(data,(closure)&c_7324935,__lambda_1201,  set_pair_as_expr(&local_7324987, set_pair_as_expr(&local_7324990, ((closureN)self_7312858)->elements[0], set_pair_as_expr(&local_7324994, Cyc_cadr(data, Cyc_cddr(data, ((closureN)self_7312858)->elements[2])), set_pair_as_expr(&local_7325002, set_pair_as_expr(&local_7325005, ((closureN)self_7312858)->elements[7], set_pair_as_expr(&local_7325009, obj_int2obj(0), set_pair_as_expr(&local_7325012, set_pair_as_expr(&local_7325015, quote_quote, set_pair_as_expr(&local_7325018, ((closureN)self_7312858)->elements[4], NULL)), NULL))), NULL))), r_737083));; 
  }
  
 -static void __lambda_1248(void *data, object self_7314159, int argc, object *args) /* object self_7314159, object r_737856 */
-+static void __lambda_1201(void *data, object self_7312866, int argc, object *args) /* object self_7312866, object r_737088 */
++static void __lambda_1201(void *data, object self_7312859, int argc, object *args) /* object self_7312859, object r_737081 */
   {
 - object r_737856 = args[0];
-+ object r_737088 = args[0];
++ object r_737081 = args[0];
    
 -pair_type local_7327399; 
-+pair_type local_7324947; 
++pair_type local_7324940; 
  
 -pair_type local_7327403; 
-+pair_type local_7324951; 
++pair_type local_7324944; 
  
 -pair_type local_7327406; 
-+pair_type local_7324954; 
++pair_type local_7324947; 
  
 -pair_type local_7327410; 
-+pair_type local_7324958; 
++pair_type local_7324951; 
  
 -pair_type local_7327414; 
-+pair_type local_7324962; 
++pair_type local_7324955; 
  
 -pair_type local_7327417; 
-+pair_type local_7324965; 
++pair_type local_7324958; 
  
 -pair_type local_7327421; 
-+pair_type local_7324969; 
++pair_type local_7324962; 
  
 -pair_type local_7327424; 
-+pair_type local_7324972; 
++pair_type local_7324965; 
  
 -pair_type local_7327427; 
-+pair_type local_7324975; 
++pair_type local_7324968; 
  
 -pair_type local_7327431; 
-+pair_type local_7324979; 
++pair_type local_7324972; 
  
 -pair_type local_7327435; 
-+pair_type local_7324983; 
++pair_type local_7324976; 
  
 -pair_type local_7327438; 
-+pair_type local_7324986; 
++pair_type local_7324979; 
  
 -pair_type local_7327441; 
 -return_direct_with_clo1(data,  ((closureN)self_7314159)->elements[2], (((closure)  ((closureN)self_7314159)->elements[2])->fn),  set_pair_as_expr(&local_7327399, ((closureN)self_7314159)->elements[5], set_pair_as_expr(&local_7327403, set_pair_as_expr(&local_7327406, ((closureN)self_7314159)->elements[0], set_pair_as_expr(&local_7327410, ((closureN)self_7314159)->elements[3], set_pair_as_expr(&local_7327414, set_pair_as_expr(&local_7327417, ((closureN)self_7314159)->elements[1], set_pair_as_expr(&local_7327421, set_pair_as_expr(&local_7327424, quote_quote, set_pair_as_expr(&local_7327427, ((closureN)self_7314159)->elements[3], NULL)), set_pair_as_expr(&local_7327431, ((closureN)self_7314159)->elements[4], set_pair_as_expr(&local_7327435, set_pair_as_expr(&local_7327438, quote_quote, set_pair_as_expr(&local_7327441, ((closureN)self_7314159)->elements[6], NULL)), NULL)))), NULL))), r_737856)));; 
-+pair_type local_7324989; 
-+return_direct_with_clo1(data,  ((closureN)self_7312866)->elements[2], (((closure)  ((closureN)self_7312866)->elements[2])->fn),  set_pair_as_expr(&local_7324947, ((closureN)self_7312866)->elements[5], set_pair_as_expr(&local_7324951, set_pair_as_expr(&local_7324954, ((closureN)self_7312866)->elements[0], set_pair_as_expr(&local_7324958, ((closureN)self_7312866)->elements[3], set_pair_as_expr(&local_7324962, set_pair_as_expr(&local_7324965, ((closureN)self_7312866)->elements[1], set_pair_as_expr(&local_7324969, set_pair_as_expr(&local_7324972, quote_quote, set_pair_as_expr(&local_7324975, ((closureN)self_7312866)->elements[3], NULL)), set_pair_as_expr(&local_7324979, ((closureN)self_7312866)->elements[4], set_pair_as_expr(&local_7324983, set_pair_as_expr(&local_7324986, quote_quote, set_pair_as_expr(&local_7324989, ((closureN)self_7312866)->elements[6], NULL)), NULL)))), NULL))), r_737088)));; 
++pair_type local_7324982; 
++return_direct_with_clo1(data,  ((closureN)self_7312859)->elements[2], (((closure)  ((closureN)self_7312859)->elements[2])->fn),  set_pair_as_expr(&local_7324940, ((closureN)self_7312859)->elements[5], set_pair_as_expr(&local_7324944, set_pair_as_expr(&local_7324947, ((closureN)self_7312859)->elements[0], set_pair_as_expr(&local_7324951, ((closureN)self_7312859)->elements[3], set_pair_as_expr(&local_7324955, set_pair_as_expr(&local_7324958, ((closureN)self_7312859)->elements[1], set_pair_as_expr(&local_7324962, set_pair_as_expr(&local_7324965, quote_quote, set_pair_as_expr(&local_7324968, ((closureN)self_7312859)->elements[3], NULL)), set_pair_as_expr(&local_7324972, ((closureN)self_7312859)->elements[4], set_pair_as_expr(&local_7324976, set_pair_as_expr(&local_7324979, quote_quote, set_pair_as_expr(&local_7324982, ((closureN)self_7312859)->elements[6], NULL)), NULL)))), NULL))), r_737081)));; 
  }
  
 -static void __lambda_1233(void *data, object self_7314160, int argc, object *args) /* object self_7314160, object k_737992 */
-+static void __lambda_1186(void *data, object self_7312867, int argc, object *args) /* object self_7312867, object k_737224 */
++static void __lambda_1186(void *data, object self_7312860, int argc, object *args) /* object self_7312860, object k_737217 */
   {
 - object k_737992 = args[0];
-+ object k_737224 = args[0];
++ object k_737217 = args[0];
      
    
    
 -if( (boolean_f != Cyc_eq(((closureN)self_7314160)->elements[1], Cyc_caar(data, Cyc_cddr(data, ((closureN)self_7314160)->elements[0])))) ){ 
-+if( (boolean_f != Cyc_eq(((closureN)self_7312867)->elements[1], Cyc_caar(data, Cyc_cddr(data, ((closureN)self_7312867)->elements[0])))) ){ 
++if( (boolean_f != Cyc_eq(((closureN)self_7312860)->elements[1], Cyc_caar(data, Cyc_cddr(data, ((closureN)self_7312860)->elements[0])))) ){ 
    
 -make_utf8_string_with_len(c_7327358, "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_737992, &c_7327358, ((closureN)self_7314160)->elements[1]);
-+make_utf8_string_with_len(c_7324906, "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_737224, &c_7324906, ((closureN)self_7312867)->elements[1]);
++make_utf8_string_with_len(c_7324899, "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_737217, &c_7324899, ((closureN)self_7312860)->elements[1]);
  } else { 
 -  return_direct_with_clo1(data,  k_737992, (((closure)  k_737992)->fn),  Cyc_VOID);}
-+  return_direct_with_clo1(data,  k_737224, (((closure)  k_737224)->fn),  Cyc_VOID);}
++  return_direct_with_clo1(data,  k_737217, (((closure)  k_737217)->fn),  Cyc_VOID);}
  ;; 
  }
  
 -static void __lambda_1225(void *data, object self_7314161, int argc, object *args) /* object self_7314161, object k_738000 */
-+static void __lambda_1178(void *data, object self_7312868, int argc, object *args) /* object self_7312868, object k_737232 */
++static void __lambda_1178(void *data, object self_7312861, int argc, object *args) /* object self_7312861, object k_737225 */
   {
 - object k_738000 = args[0];
-+ object k_737232 = args[0];
++ object k_737225 = args[0];
      
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cadr(data, ((closureN)self_7314161)->elements[0]))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_cadr(data, ((closureN)self_7312868)->elements[0]))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_cadr(data, ((closureN)self_7312861)->elements[0]))) ){ 
    
  
  
  
 -return_direct_with_clo1(data,  k_738000,__lambda_1226,  Cyc_cadr(data, Cyc_cadr(data, ((closureN)self_7314161)->elements[0])));
-+return_direct_with_clo1(data,  k_737232,__lambda_1179,  Cyc_cadr(data, Cyc_cadr(data, ((closureN)self_7312868)->elements[0])));
++return_direct_with_clo1(data,  k_737225,__lambda_1179,  Cyc_cadr(data, Cyc_cadr(data, ((closureN)self_7312861)->elements[0])));
  } else { 
 -  return_direct_with_clo1(data,  k_738000,__lambda_1226,  boolean_f);}
-+  return_direct_with_clo1(data,  k_737232,__lambda_1179,  boolean_f);}
++  return_direct_with_clo1(data,  k_737225,__lambda_1179,  boolean_f);}
  ;; 
  }
  
 -static void __lambda_1221(void *data, object _, int argc, object *args) /* closure _,object k_737830, object obj_732582_733997, object rtype_732583_733998 */
-+static void __lambda_1174(void *data, object _, int argc, object *args) /* closure _,object k_737062, object obj_732241_733552, object rtype_732242_733553 */
++static void __lambda_1174(void *data, object _, int argc, object *args) /* closure _,object k_737055, object obj_732235_733545, object rtype_732236_733546 */
   {
 -object k_737830 = args[0]; object obj_732582_733997 = args[1]; object rtype_732583_733998 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:is-a?");
-+object k_737062 = args[0]; object obj_732241_733552 = args[1]; object rtype_732242_733553 = args[2];
-+  Cyc_st_add(data, "base.sld:is-a?");
++object k_737055 = args[0]; object obj_732235_733545 = args[1]; object rtype_732236_733546 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:is-a?");
  
 -closureN_type c_7327279;
 -object e_7327298 [3];
@@ -8221,30 +8221,30 @@ Make let-values be the same as let*-values, to work around
 -c_7327279.elements[0] = k_737830;
 -c_7327279.elements[1] = obj_732582_733997;
 -c_7327279.elements[2] = rtype_732583_733998;
-+closureN_type c_7324827;
-+object e_7324846 [3];
-+c_7324827.hdr.mark = gc_color_red;
-+ c_7324827.hdr.grayed = 0;
-+c_7324827.tag = closureN_tag;
-+ c_7324827.fn = (function_type)__lambda_1175;
-+c_7324827.num_args = 1;
-+c_7324827.num_elements = 3;
-+c_7324827.elements = (object *)e_7324846;
-+c_7324827.elements[0] = k_737062;
-+c_7324827.elements[1] = obj_732241_733552;
-+c_7324827.elements[2] = rtype_732242_733553;
++closureN_type c_7324820;
++object e_7324839 [3];
++c_7324820.hdr.mark = gc_color_red;
++ c_7324820.hdr.grayed = 0;
++c_7324820.tag = closureN_tag;
++ c_7324820.fn = (function_type)__lambda_1175;
++c_7324820.num_args = 1;
++c_7324820.num_elements = 3;
++c_7324820.elements = (object *)e_7324839;
++c_7324820.elements[0] = k_737055;
++c_7324820.elements[1] = obj_732235_733545;
++c_7324820.elements[2] = rtype_732236_733546;
  
 -return_direct_with_clo2(data,  __glo_record_127_scheme_base, (((closure)  __glo_record_127_scheme_base)->fn),  &c_7327279, obj_732582_733997);; 
-+return_direct_with_clo2(data,  __glo_record_127_scheme_base, (((closure)  __glo_record_127_scheme_base)->fn),  &c_7324827, obj_732241_733552);; 
++return_direct_with_clo2(data,  __glo_record_127_scheme_base, (((closure)  __glo_record_127_scheme_base)->fn),  &c_7324820, obj_732235_733545);; 
  }
  
 -static void __lambda_1222(void *data, object self_7314130, int argc, object *args) /* object self_7314130, object r_737831 */
-+static void __lambda_1175(void *data, object self_7312837, int argc, object *args) /* object self_7312837, object r_737063 */
++static void __lambda_1175(void *data, object self_7312830, int argc, object *args) /* object self_7312830, object r_737056 */
   {
 - object r_737831 = args[0];
 -  if( (boolean_f != r_737831) ){ 
-+ object r_737063 = args[0];
-+  if( (boolean_f != r_737063) ){ 
++ object r_737056 = args[0];
++  if( (boolean_f != r_737056) ){ 
    
 -closureN_type c_7327281;
 -object e_7327294 [3];
@@ -8258,34 +8258,34 @@ Make let-values be the same as let*-values, to work around
 -c_7327281.elements[0] = ((closureN)self_7314130)->elements[0];
 -c_7327281.elements[1] = ((closureN)self_7314130)->elements[1];
 -c_7327281.elements[2] = ((closureN)self_7314130)->elements[2];
-+closureN_type c_7324829;
-+object e_7324842 [3];
-+c_7324829.hdr.mark = gc_color_red;
-+ c_7324829.hdr.grayed = 0;
-+c_7324829.tag = closureN_tag;
-+ c_7324829.fn = (function_type)__lambda_1176;
-+c_7324829.num_args = 1;
-+c_7324829.num_elements = 3;
-+c_7324829.elements = (object *)e_7324842;
-+c_7324829.elements[0] = ((closureN)self_7312837)->elements[0];
-+c_7324829.elements[1] = ((closureN)self_7312837)->elements[1];
-+c_7324829.elements[2] = ((closureN)self_7312837)->elements[2];
++closureN_type c_7324822;
++object e_7324835 [3];
++c_7324822.hdr.mark = gc_color_red;
++ c_7324822.hdr.grayed = 0;
++c_7324822.tag = closureN_tag;
++ c_7324822.fn = (function_type)__lambda_1176;
++c_7324822.num_args = 1;
++c_7324822.num_elements = 3;
++c_7324822.elements = (object *)e_7324835;
++c_7324822.elements[0] = ((closureN)self_7312830)->elements[0];
++c_7324822.elements[1] = ((closureN)self_7312830)->elements[1];
++c_7324822.elements[2] = ((closureN)self_7312830)->elements[2];
  
 -return_direct_with_clo2(data,  __glo_record_127_scheme_base, (((closure)  __glo_record_127_scheme_base)->fn),  &c_7327281, ((closureN)self_7314130)->elements[2]);
-+return_direct_with_clo2(data,  __glo_record_127_scheme_base, (((closure)  __glo_record_127_scheme_base)->fn),  &c_7324829, ((closureN)self_7312837)->elements[2]);
++return_direct_with_clo2(data,  __glo_record_127_scheme_base, (((closure)  __glo_record_127_scheme_base)->fn),  &c_7324822, ((closureN)self_7312830)->elements[2]);
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7314130)->elements[0], (((closure)  ((closureN)self_7314130)->elements[0])->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  ((closureN)self_7312837)->elements[0], (((closure)  ((closureN)self_7312837)->elements[0])->fn),  boolean_f);}
++  return_direct_with_clo1(data,  ((closureN)self_7312830)->elements[0], (((closure)  ((closureN)self_7312830)->elements[0])->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_1223(void *data, object self_7314131, int argc, object *args) /* object self_7314131, object r_737832 */
-+static void __lambda_1176(void *data, object self_7312838, int argc, object *args) /* object self_7312838, object r_737064 */
++static void __lambda_1176(void *data, object self_7312831, int argc, object *args) /* object self_7312831, object r_737057 */
   {
 - object r_737832 = args[0];
 -  if( (boolean_f != r_737832) ){ 
-+ object r_737064 = args[0];
-+  if( (boolean_f != r_737064) ){ 
++ object r_737057 = args[0];
++  if( (boolean_f != r_737057) ){ 
    
  
  
@@ -8293,22 +8293,21 @@ Make let-values be the same as let*-values, to work around
  
  
 -return_direct_with_clo1(data,  ((closureN)self_7314131)->elements[0], (((closure)  ((closureN)self_7314131)->elements[0])->fn),  equalp(Cyc_vector_ref(data, ((closureN)self_7314131)->elements[1], obj_int2obj(1)), Cyc_vector_ref(data, ((closureN)self_7314131)->elements[2], obj_int2obj(1))));
-+return_direct_with_clo1(data,  ((closureN)self_7312838)->elements[0], (((closure)  ((closureN)self_7312838)->elements[0])->fn),  equalp(Cyc_vector_ref(data, ((closureN)self_7312838)->elements[1], obj_int2obj(1)), Cyc_vector_ref(data, ((closureN)self_7312838)->elements[2], obj_int2obj(1))));
++return_direct_with_clo1(data,  ((closureN)self_7312831)->elements[0], (((closure)  ((closureN)self_7312831)->elements[0])->fn),  equalp(Cyc_vector_ref(data, ((closureN)self_7312831)->elements[1], obj_int2obj(1)), Cyc_vector_ref(data, ((closureN)self_7312831)->elements[2], obj_int2obj(1))));
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7314131)->elements[0], (((closure)  ((closureN)self_7314131)->elements[0])->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  ((closureN)self_7312838)->elements[0], (((closure)  ((closureN)self_7312838)->elements[0])->fn),  boolean_f);}
++  return_direct_with_clo1(data,  ((closureN)self_7312831)->elements[0], (((closure)  ((closureN)self_7312831)->elements[0])->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_1496(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_1215(void *data, object _, int argc, object *args) /* closure _,object k_737819, object e_732573_733990, object lst1_732574_733991 */
 +static void __lambda_1449(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_1168(void *data, object _, int argc, object *args) /* closure _,object k_737051, object e_732232_733545, object lst1_732233_733546 */
++static void __lambda_1168(void *data, object _, int argc, object *args) /* closure _,object k_737044, object e_732226_733538, object lst1_732227_733539 */
   {
 -object k_737819 = args[0]; object e_732573_733990 = args[1]; object lst1_732574_733991 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:_list-index");
-+object k_737051 = args[0]; object e_732232_733545 = args[1]; object lst1_732233_733546 = args[2];
-+  Cyc_st_add(data, "base.sld:_list-index");
++object k_737044 = args[0]; object e_732226_733538 = args[1]; object lst1_732227_733539 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:_list-index");
  
 -closureN_type c_7327230;
 -object e_7327275 [2];
@@ -8321,28 +8320,14 @@ Make let-values be the same as let*-values, to work around
 -c_7327230.elements = (object *)e_7327275;
 -c_7327230.elements[0] = e_732573_733990;
 -c_7327230.elements[1] = k_737819;
-+closureN_type c_7324778;
-+object e_7324823 [2];
-+c_7324778.hdr.mark = gc_color_red;
-+ c_7324778.hdr.grayed = 0;
-+c_7324778.tag = closureN_tag;
-+ c_7324778.fn = (function_type)__lambda_1169;
-+c_7324778.num_args = 1;
-+c_7324778.num_elements = 2;
-+c_7324778.elements = (object *)e_7324823;
-+c_7324778.elements[0] = e_732232_733545;
-+c_7324778.elements[1] = k_737051;
- 
+-
 -return_direct_with_clo1(data,(closure)&c_7327230,__lambda_1216,  lst1_732574_733991);; 
-+return_direct_with_clo1(data,(closure)&c_7324778,__lambda_1169,  lst1_732233_733546);; 
- }
- 
+-}
+-
 -static void __lambda_1216(void *data, object self_7314124, int argc, object *args) /* object self_7314124, object lis_732576_733992 */
-+static void __lambda_1169(void *data, object self_7312831, int argc, object *args) /* object self_7312831, object lis_732235_733547 */
-  {
+- {
 - object lis_732576_733992 = args[0];
-+ object lis_732235_733547 = args[0];
-   
+-  
 -closureN_type c_7327232;
 -object e_7327274 [3];
 -c_7327232.hdr.mark = gc_color_red;
@@ -8355,28 +8340,47 @@ Make let-values be the same as let*-values, to work around
 -c_7327232.elements[0] = ((closureN)self_7314124)->elements[0];
 -c_7327232.elements[1] = ((closureN)self_7314124)->elements[1];
 -c_7327232.elements[2] = lis_732576_733992;
-+closureN_type c_7324780;
-+object e_7324822 [3];
-+c_7324780.hdr.mark = gc_color_red;
-+ c_7324780.hdr.grayed = 0;
-+c_7324780.tag = closureN_tag;
-+ c_7324780.fn = (function_type)__lambda_1170;
-+c_7324780.num_args = 1;
-+c_7324780.num_elements = 3;
-+c_7324780.elements = (object *)e_7324822;
-+c_7324780.elements[0] = ((closureN)self_7312831)->elements[0];
-+c_7324780.elements[1] = ((closureN)self_7312831)->elements[1];
-+c_7324780.elements[2] = lis_732235_733547;
++closureN_type c_7324771;
++object e_7324816 [2];
++c_7324771.hdr.mark = gc_color_red;
++ c_7324771.hdr.grayed = 0;
++c_7324771.tag = closureN_tag;
++ c_7324771.fn = (function_type)__lambda_1169;
++c_7324771.num_args = 1;
++c_7324771.num_elements = 2;
++c_7324771.elements = (object *)e_7324816;
++c_7324771.elements[0] = e_732226_733538;
++c_7324771.elements[1] = k_737044;
++
++return_direct_with_clo1(data,(closure)&c_7324771,__lambda_1169,  lst1_732227_733539);; 
++}
++
++static void __lambda_1169(void *data, object self_7312824, int argc, object *args) /* object self_7312824, object lis_732229_733540 */
++ {
++ object lis_732229_733540 = args[0];
++  
++closureN_type c_7324773;
++object e_7324815 [3];
++c_7324773.hdr.mark = gc_color_red;
++ c_7324773.hdr.grayed = 0;
++c_7324773.tag = closureN_tag;
++ c_7324773.fn = (function_type)__lambda_1170;
++c_7324773.num_args = 1;
++c_7324773.num_elements = 3;
++c_7324773.elements = (object *)e_7324815;
++c_7324773.elements[0] = ((closureN)self_7312824)->elements[0];
++c_7324773.elements[1] = ((closureN)self_7312824)->elements[1];
++c_7324773.elements[2] = lis_732229_733540;
  
 -return_direct_with_clo1(data,(closure)&c_7327232,__lambda_1217,  boolean_f);; 
-+return_direct_with_clo1(data,(closure)&c_7324780,__lambda_1170,  boolean_f);; 
++return_direct_with_clo1(data,(closure)&c_7324773,__lambda_1170,  boolean_f);; 
  }
  
 -static void __lambda_1217(void *data, object self_7314125, int argc, object *args) /* object self_7314125, object lp_732578_733994 */
-+static void __lambda_1170(void *data, object self_7312832, int argc, object *args) /* object self_7312832, object lp_732237_733549 */
++static void __lambda_1170(void *data, object self_7312825, int argc, object *args) /* object self_7312825, object lp_732231_733542 */
   {
 - object lp_732578_733994 = args[0];
-+ object lp_732237_733549 = args[0];
++ object lp_732231_733542 = args[0];
    
 -closureN_type c_7327234;
 -object e_7327270 [3];
@@ -8390,31 +8394,31 @@ Make let-values be the same as let*-values, to work around
 -c_7327234.elements[0] = ((closureN)self_7314125)->elements[0];
 -c_7327234.elements[1] = ((closureN)self_7314125)->elements[1];
 -c_7327234.elements[2] = ((closureN)self_7314125)->elements[2];
-+closureN_type c_7324782;
-+object e_7324818 [3];
-+c_7324782.hdr.mark = gc_color_red;
-+ c_7324782.hdr.grayed = 0;
-+c_7324782.tag = closureN_tag;
-+ c_7324782.fn = (function_type)__lambda_1382;
-+c_7324782.num_args = 1;
-+c_7324782.num_elements = 3;
-+c_7324782.elements = (object *)e_7324818;
-+c_7324782.elements[0] = ((closureN)self_7312832)->elements[0];
-+c_7324782.elements[1] = ((closureN)self_7312832)->elements[1];
-+c_7324782.elements[2] = ((closureN)self_7312832)->elements[2];
++closureN_type c_7324775;
++object e_7324811 [3];
++c_7324775.hdr.mark = gc_color_red;
++ c_7324775.hdr.grayed = 0;
++c_7324775.tag = closureN_tag;
++ c_7324775.fn = (function_type)__lambda_1382;
++c_7324775.num_args = 1;
++c_7324775.num_elements = 3;
++c_7324775.elements = (object *)e_7324811;
++c_7324775.elements[0] = ((closureN)self_7312825)->elements[0];
++c_7324775.elements[1] = ((closureN)self_7312825)->elements[1];
++c_7324775.elements[2] = ((closureN)self_7312825)->elements[2];
  
  
 -pair_type local_7327273; 
 -return_direct_with_clo1(data,(closure)&c_7327234,__lambda_1429,  set_cell_as_expr(&local_7327273, lp_732578_733994));; 
-+pair_type local_7324821; 
-+return_direct_with_clo1(data,(closure)&c_7324782,__lambda_1382,  set_cell_as_expr(&local_7324821, lp_732237_733549));; 
++pair_type local_7324814; 
++return_direct_with_clo1(data,(closure)&c_7324775,__lambda_1382,  set_cell_as_expr(&local_7324814, lp_732231_733542));; 
  }
  
 -static void __lambda_1429(void *data, object self_7314126, int argc, object *args) /* object self_7314126, object lp_732578_733994 */
-+static void __lambda_1382(void *data, object self_7312833, int argc, object *args) /* object self_7312833, object lp_732237_733549 */
++static void __lambda_1382(void *data, object self_7312826, int argc, object *args) /* object self_7312826, object lp_732231_733542 */
   {
 - object lp_732578_733994 = args[0];
-+ object lp_732237_733549 = args[0];
++ object lp_732231_733542 = args[0];
    
 -closureN_type c_7327236;
 -object e_7327249 [3];
@@ -8428,18 +8432,18 @@ Make let-values be the same as let*-values, to work around
 -c_7327236.elements[0] = ((closureN)self_7314126)->elements[1];
 -c_7327236.elements[1] = ((closureN)self_7314126)->elements[2];
 -c_7327236.elements[2] = lp_732578_733994;
-+closureN_type c_7324784;
-+object e_7324797 [3];
-+c_7324784.hdr.mark = gc_color_red;
-+ c_7324784.hdr.grayed = 0;
-+c_7324784.tag = closureN_tag;
-+ c_7324784.fn = (function_type)__lambda_1171;
-+c_7324784.num_args = 1;
-+c_7324784.num_elements = 3;
-+c_7324784.elements = (object *)e_7324797;
-+c_7324784.elements[0] = ((closureN)self_7312833)->elements[1];
-+c_7324784.elements[1] = ((closureN)self_7312833)->elements[2];
-+c_7324784.elements[2] = lp_732237_733549;
++closureN_type c_7324777;
++object e_7324790 [3];
++c_7324777.hdr.mark = gc_color_red;
++ c_7324777.hdr.grayed = 0;
++c_7324777.tag = closureN_tag;
++ c_7324777.fn = (function_type)__lambda_1171;
++c_7324777.num_args = 1;
++c_7324777.num_elements = 3;
++c_7324777.elements = (object *)e_7324790;
++c_7324777.elements[0] = ((closureN)self_7312826)->elements[1];
++c_7324777.elements[1] = ((closureN)self_7312826)->elements[2];
++c_7324777.elements[2] = lp_732231_733542;
  
  
 -closureN_type c_7327250;
@@ -8453,39 +8457,39 @@ Make let-values be the same as let*-values, to work around
 -c_7327250.elements = (object *)e_7327269;
 -c_7327250.elements[0] = ((closureN)self_7314126)->elements[0];
 -c_7327250.elements[1] = lp_732578_733994;
-+closureN_type c_7324798;
-+object e_7324817 [2];
-+c_7324798.hdr.mark = gc_color_red;
-+ c_7324798.hdr.grayed = 0;
-+c_7324798.tag = closureN_tag;
-+ c_7324798.fn = (function_type)__lambda_1173;
-+c_7324798.num_args = 2;
-+c_7324798.num_elements = 2;
-+c_7324798.elements = (object *)e_7324817;
-+c_7324798.elements[0] = ((closureN)self_7312833)->elements[0];
-+c_7324798.elements[1] = lp_732237_733549;
++closureN_type c_7324791;
++object e_7324810 [2];
++c_7324791.hdr.mark = gc_color_red;
++ c_7324791.hdr.grayed = 0;
++c_7324791.tag = closureN_tag;
++ c_7324791.fn = (function_type)__lambda_1173;
++c_7324791.num_args = 2;
++c_7324791.num_elements = 2;
++c_7324791.elements = (object *)e_7324810;
++c_7324791.elements[0] = ((closureN)self_7312826)->elements[0];
++c_7324791.elements[1] = lp_732231_733542;
  
 -return_direct_with_clo1(data,(closure)&c_7327236,__lambda_1218,  &c_7327250);; 
-+return_direct_with_clo1(data,(closure)&c_7324784,__lambda_1171,  &c_7324798);; 
++return_direct_with_clo1(data,(closure)&c_7324777,__lambda_1171,  &c_7324791);; 
  }
  
 -static void __lambda_1220(void *data, object self_7314127, int argc, object *args) /* object self_7314127, object k_737822, object lis_732579_733995, object n_732580_733996 */
-+static void __lambda_1173(void *data, object self_7312834, int argc, object *args) /* object self_7312834, object k_737054, object lis_732238_733550, object n_732239_733551 */
++static void __lambda_1173(void *data, object self_7312827, int argc, object *args) /* object self_7312827, object k_737047, object lis_732232_733543, object n_732233_733544 */
   {
 - object k_737822 = args[0]; object lis_732579_733995 = args[1]; object n_732580_733996 = args[2];
-+ object k_737054 = args[0]; object lis_732238_733550 = args[1]; object n_732239_733551 = args[2];
++ object k_737047 = args[0]; object lis_732232_733543 = args[1]; object n_732233_733544 = args[2];
      
 -if( (boolean_f != Cyc_is_null(lis_732579_733995)) ){ 
 -  return_direct_with_clo1(data,  k_737822, (((closure)  k_737822)->fn),  boolean_f);
-+if( (boolean_f != Cyc_is_null(lis_732238_733550)) ){ 
-+  return_direct_with_clo1(data,  k_737054, (((closure)  k_737054)->fn),  boolean_f);
++if( (boolean_f != Cyc_is_null(lis_732232_733543)) ){ 
++  return_direct_with_clo1(data,  k_737047, (((closure)  k_737047)->fn),  boolean_f);
  } else { 
      
    
 -if( (boolean_f != Cyc_eq(((closureN)self_7314127)->elements[0], Cyc_car(data, lis_732579_733995))) ){ 
 -  return_direct_with_clo1(data,  k_737822, (((closure)  k_737822)->fn),  n_732580_733996);
-+if( (boolean_f != Cyc_eq(((closureN)self_7312834)->elements[0], Cyc_car(data, lis_732238_733550))) ){ 
-+  return_direct_with_clo1(data,  k_737054, (((closure)  k_737054)->fn),  n_732239_733551);
++if( (boolean_f != Cyc_eq(((closureN)self_7312827)->elements[0], Cyc_car(data, lis_732232_733543))) ){ 
++  return_direct_with_clo1(data,  k_737047, (((closure)  k_737047)->fn),  n_732233_733544);
  } else { 
    
  
@@ -8494,17 +8498,17 @@ Make let-values be the same as let*-values, to work around
  
 -complex_num_type local_7327268; 
 -return_closcall3(data,  car(((closureN)self_7314127)->elements[1]),  k_737822, Cyc_cdr(data, lis_732579_733995), Cyc_fast_sum(data,&local_7327268, n_732580_733996, obj_int2obj(1)));}
-+complex_num_type local_7324816; 
-+return_closcall3(data,  car(((closureN)self_7312834)->elements[1]),  k_737054, Cyc_cdr(data, lis_732238_733550), Cyc_fast_sum(data,&local_7324816, n_732239_733551, obj_int2obj(1)));}
++complex_num_type local_7324809; 
++return_closcall3(data,  car(((closureN)self_7312827)->elements[1]),  k_737047, Cyc_cdr(data, lis_732232_733543), Cyc_fast_sum(data,&local_7324809, n_732233_733544, obj_int2obj(1)));}
  ;}
  ;; 
  }
  
 -static void __lambda_1218(void *data, object self_7314128, int argc, object *args) /* object self_7314128, object r_737821 */
-+static void __lambda_1171(void *data, object self_7312835, int argc, object *args) /* object self_7312835, object r_737053 */
++static void __lambda_1171(void *data, object self_7312828, int argc, object *args) /* object self_7312828, object r_737046 */
   {
 - object r_737821 = args[0];
-+ object r_737053 = args[0];
++ object r_737046 = args[0];
    
 -closureN_type c_7327238;
 -object e_7327245 [3];
@@ -8518,42 +8522,41 @@ Make let-values be the same as let*-values, to work around
 -c_7327238.elements[0] = ((closureN)self_7314128)->elements[0];
 -c_7327238.elements[1] = ((closureN)self_7314128)->elements[1];
 -c_7327238.elements[2] = ((closureN)self_7314128)->elements[2];
-+closureN_type c_7324786;
-+object e_7324793 [3];
-+c_7324786.hdr.mark = gc_color_red;
-+ c_7324786.hdr.grayed = 0;
-+c_7324786.tag = closureN_tag;
-+ c_7324786.fn = (function_type)__lambda_1172;
-+c_7324786.num_args = 1;
-+c_7324786.num_elements = 3;
-+c_7324786.elements = (object *)e_7324793;
-+c_7324786.elements[0] = ((closureN)self_7312835)->elements[0];
-+c_7324786.elements[1] = ((closureN)self_7312835)->elements[1];
-+c_7324786.elements[2] = ((closureN)self_7312835)->elements[2];
++closureN_type c_7324779;
++object e_7324786 [3];
++c_7324779.hdr.mark = gc_color_red;
++ c_7324779.hdr.grayed = 0;
++c_7324779.tag = closureN_tag;
++ c_7324779.fn = (function_type)__lambda_1172;
++c_7324779.num_args = 1;
++c_7324779.num_elements = 3;
++c_7324779.elements = (object *)e_7324786;
++c_7324779.elements[0] = ((closureN)self_7312828)->elements[0];
++c_7324779.elements[1] = ((closureN)self_7312828)->elements[1];
++c_7324779.elements[2] = ((closureN)self_7312828)->elements[2];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7327238,__lambda_1219,  Cyc_set_cell(data, ((closureN)self_7314128)->elements[2], r_737821));; 
-+return_direct_with_clo1(data,(closure)&c_7324786,__lambda_1172,  Cyc_set_cell(data, ((closureN)self_7312835)->elements[2], r_737053));; 
++return_direct_with_clo1(data,(closure)&c_7324779,__lambda_1172,  Cyc_set_cell(data, ((closureN)self_7312828)->elements[2], r_737046));; 
  }
  
 -static void __lambda_1219(void *data, object self_7314129, int argc, object *args) /* object self_7314129, object r_737820 */
-+static void __lambda_1172(void *data, object self_7312836, int argc, object *args) /* object self_7312836, object r_737052 */
++static void __lambda_1172(void *data, object self_7312829, int argc, object *args) /* object self_7312829, object r_737045 */
   {
  
    
  
 -return_closcall3(data,  car(((closureN)self_7314129)->elements[2]),  ((closureN)self_7314129)->elements[0], ((closureN)self_7314129)->elements[1], obj_int2obj(0));; 
-+return_closcall3(data,  car(((closureN)self_7312836)->elements[2]),  ((closureN)self_7312836)->elements[0], ((closureN)self_7312836)->elements[1], obj_int2obj(0));; 
++return_closcall3(data,  car(((closureN)self_7312829)->elements[2]),  ((closureN)self_7312829)->elements[0], ((closureN)self_7312829)->elements[1], obj_int2obj(0));; 
  }
  
 -static void __lambda_1211(void *data, object _, int argc, object *args) /* closure _,object k_737811, object sym_732568_733985, object name_732569_733986, object idx_732570_733987 */
-+static void __lambda_1164(void *data, object _, int argc, object *args) /* closure _,object k_737043, object sym_732227_733540, object name_732228_733541, object idx_732229_733542 */
++static void __lambda_1164(void *data, object _, int argc, object *args) /* closure _,object k_737036, object sym_732221_733533, object name_732222_733534, object idx_732223_733535 */
   {
 -object k_737811 = args[0]; object name_732569_733986 = args[2]; object idx_732570_733987 = args[3];
--  Cyc_st_add(data, "scheme/base.sld:make-setter");
-+object k_737043 = args[0]; object name_732228_733541 = args[2]; object idx_732229_733542 = args[3];
-+  Cyc_st_add(data, "base.sld:make-setter");
++object k_737036 = args[0]; object name_732222_733534 = args[2]; object idx_732223_733535 = args[3];
+   Cyc_st_add(data, "scheme/base.sld:make-setter");
  
 -closureN_type c_7327200;
 -object e_7327227 [2];
@@ -8566,27 +8569,27 @@ Make let-values be the same as let*-values, to work around
 -c_7327200.elements = (object *)e_7327227;
 -c_7327200.elements[0] = idx_732570_733987;
 -c_7327200.elements[1] = name_732569_733986;
-+closureN_type c_7324748;
-+object e_7324775 [2];
-+c_7324748.hdr.mark = gc_color_red;
-+ c_7324748.hdr.grayed = 0;
-+c_7324748.tag = closureN_tag;
-+ c_7324748.fn = (function_type)__lambda_1165;
-+c_7324748.num_args = 2;
-+c_7324748.num_elements = 2;
-+c_7324748.elements = (object *)e_7324775;
-+c_7324748.elements[0] = idx_732229_733542;
-+c_7324748.elements[1] = name_732228_733541;
++closureN_type c_7324741;
++object e_7324768 [2];
++c_7324741.hdr.mark = gc_color_red;
++ c_7324741.hdr.grayed = 0;
++c_7324741.tag = closureN_tag;
++ c_7324741.fn = (function_type)__lambda_1165;
++c_7324741.num_args = 2;
++c_7324741.num_elements = 2;
++c_7324741.elements = (object *)e_7324768;
++c_7324741.elements[0] = idx_732223_733535;
++c_7324741.elements[1] = name_732222_733534;
  
 -return_direct_with_clo1(data,  k_737811, (((closure)  k_737811)->fn),  &c_7327200);; 
-+return_direct_with_clo1(data,  k_737043, (((closure)  k_737043)->fn),  &c_7324748);; 
++return_direct_with_clo1(data,  k_737036, (((closure)  k_737036)->fn),  &c_7324741);; 
  }
  
 -static void __lambda_1212(void *data, object self_7314121, int argc, object *args) /* object self_7314121, object k_737812, object obj_732571_733988, object val_732572_733989 */
-+static void __lambda_1165(void *data, object self_7312828, int argc, object *args) /* object self_7312828, object k_737044, object obj_732230_733543, object val_732231_733544 */
++static void __lambda_1165(void *data, object self_7312821, int argc, object *args) /* object self_7312821, object k_737037, object obj_732224_733536, object val_732225_733537 */
   {
 - object k_737812 = args[0]; object obj_732571_733988 = args[1]; object val_732572_733989 = args[2];
-+ object k_737044 = args[0]; object obj_732230_733543 = args[1]; object val_732231_733544 = args[2];
++ object k_737037 = args[0]; object obj_732224_733536 = args[1]; object val_732225_733537 = args[2];
    
 -closureN_type c_7327202;
 -object e_7327224 [5];
@@ -8602,35 +8605,35 @@ Make let-values be the same as let*-values, to work around
 -c_7327202.elements[2] = ((closureN)self_7314121)->elements[1];
 -c_7327202.elements[3] = obj_732571_733988;
 -c_7327202.elements[4] = val_732572_733989;
-+closureN_type c_7324750;
-+object e_7324772 [5];
-+c_7324750.hdr.mark = gc_color_red;
-+ c_7324750.hdr.grayed = 0;
-+c_7324750.tag = closureN_tag;
-+ c_7324750.fn = (function_type)__lambda_1166;
-+c_7324750.num_args = 1;
-+c_7324750.num_elements = 5;
-+c_7324750.elements = (object *)e_7324772;
-+c_7324750.elements[0] = ((closureN)self_7312828)->elements[0];
-+c_7324750.elements[1] = k_737044;
-+c_7324750.elements[2] = ((closureN)self_7312828)->elements[1];
-+c_7324750.elements[3] = obj_732230_733543;
-+c_7324750.elements[4] = val_732231_733544;
++closureN_type c_7324743;
++object e_7324765 [5];
++c_7324743.hdr.mark = gc_color_red;
++ c_7324743.hdr.grayed = 0;
++c_7324743.tag = closureN_tag;
++ c_7324743.fn = (function_type)__lambda_1166;
++c_7324743.num_args = 1;
++c_7324743.num_elements = 5;
++c_7324743.elements = (object *)e_7324765;
++c_7324743.elements[0] = ((closureN)self_7312821)->elements[0];
++c_7324743.elements[1] = k_737037;
++c_7324743.elements[2] = ((closureN)self_7312821)->elements[1];
++c_7324743.elements[3] = obj_732224_733536;
++c_7324743.elements[4] = val_732225_733537;
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7327202,__lambda_1213,  Cyc_vector_ref(data, obj_732571_733988, obj_int2obj(1)));; 
-+return_direct_with_clo1(data,(closure)&c_7324750,__lambda_1166,  Cyc_vector_ref(data, obj_732230_733543, obj_int2obj(1)));; 
++return_direct_with_clo1(data,(closure)&c_7324743,__lambda_1166,  Cyc_vector_ref(data, obj_732224_733536, obj_int2obj(1)));; 
  }
  
 -static void __lambda_1213(void *data, object self_7314122, int argc, object *args) /* object self_7314122, object r_737816 */
-+static void __lambda_1166(void *data, object self_7312829, int argc, object *args) /* object self_7312829, object r_737048 */
++static void __lambda_1166(void *data, object self_7312822, int argc, object *args) /* object self_7312822, object r_737041 */
   {
 - object r_737816 = args[0];
-+ object r_737048 = args[0];
++ object r_737041 = args[0];
      
 -if( (boolean_f != Cyc_eq(r_737816, ((closureN)self_7314122)->elements[2])) ){ 
-+if( (boolean_f != Cyc_eq(r_737048, ((closureN)self_7312829)->elements[2])) ){ 
++if( (boolean_f != Cyc_eq(r_737041, ((closureN)self_7312822)->elements[2])) ){ 
    
 -closureN_type c_7327207;
 -object e_7327215 [3];
@@ -8644,51 +8647,50 @@ Make let-values be the same as let*-values, to work around
 -c_7327207.elements[0] = ((closureN)self_7314122)->elements[0];
 -c_7327207.elements[1] = ((closureN)self_7314122)->elements[1];
 -c_7327207.elements[2] = ((closureN)self_7314122)->elements[4];
-+closureN_type c_7324755;
-+object e_7324763 [3];
-+c_7324755.hdr.mark = gc_color_red;
-+ c_7324755.hdr.grayed = 0;
-+c_7324755.tag = closureN_tag;
-+ c_7324755.fn = (function_type)__lambda_1167;
-+c_7324755.num_args = 1;
-+c_7324755.num_elements = 3;
-+c_7324755.elements = (object *)e_7324763;
-+c_7324755.elements[0] = ((closureN)self_7312829)->elements[0];
-+c_7324755.elements[1] = ((closureN)self_7312829)->elements[1];
-+c_7324755.elements[2] = ((closureN)self_7312829)->elements[4];
++closureN_type c_7324748;
++object e_7324756 [3];
++c_7324748.hdr.mark = gc_color_red;
++ c_7324748.hdr.grayed = 0;
++c_7324748.tag = closureN_tag;
++ c_7324748.fn = (function_type)__lambda_1167;
++c_7324748.num_args = 1;
++c_7324748.num_elements = 3;
++c_7324748.elements = (object *)e_7324756;
++c_7324748.elements[0] = ((closureN)self_7312822)->elements[0];
++c_7324748.elements[1] = ((closureN)self_7312822)->elements[1];
++c_7324748.elements[2] = ((closureN)self_7312822)->elements[4];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7327207,__lambda_1214,  Cyc_vector_ref(data, ((closureN)self_7314122)->elements[3], obj_int2obj(2)));
-+return_direct_with_clo1(data,(closure)&c_7324755,__lambda_1167,  Cyc_vector_ref(data, ((closureN)self_7312829)->elements[3], obj_int2obj(2)));
++return_direct_with_clo1(data,(closure)&c_7324748,__lambda_1167,  Cyc_vector_ref(data, ((closureN)self_7312822)->elements[3], obj_int2obj(2)));
  } else { 
    
 -make_utf8_string_with_len(c_7327221, "Invalid type", 12, 12);
 -return_direct_with_clo5(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_7314122)->elements[1], &c_7327221, ((closureN)self_7314122)->elements[3], quote_expected, ((closureN)self_7314122)->elements[2]);}
-+make_utf8_string_with_len(c_7324769, "Invalid type", 12, 12);
-+return_direct_with_clo5(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_7312829)->elements[1], &c_7324769, ((closureN)self_7312829)->elements[3], quote_expected, ((closureN)self_7312829)->elements[2]);}
++make_utf8_string_with_len(c_7324762, "Invalid type", 12, 12);
++return_direct_with_clo5(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_7312822)->elements[1], &c_7324762, ((closureN)self_7312822)->elements[3], quote_expected, ((closureN)self_7312822)->elements[2]);}
  ;; 
  }
  
 -static void __lambda_1214(void *data, object self_7314123, int argc, object *args) /* object self_7314123, object r_737814 */
-+static void __lambda_1167(void *data, object self_7312830, int argc, object *args) /* object self_7312830, object r_737046 */
++static void __lambda_1167(void *data, object self_7312823, int argc, object *args) /* object self_7312823, object r_737039 */
   {
 - object r_737814 = args[0];
-+ object r_737046 = args[0];
++ object r_737039 = args[0];
    
 -object c_7327212 = Cyc_vector_set_cps(data,  ((closureN)self_7314123)->elements[1],r_737814, ((closureN)self_7314123)->elements[0], ((closureN)self_7314123)->elements[2]);
 -return_direct_with_clo1(data,  ((closureN)self_7314123)->elements[1], (((closure)  ((closureN)self_7314123)->elements[1])->fn),  c_7327212);; 
-+object c_7324760 = Cyc_vector_set_cps(data,  ((closureN)self_7312830)->elements[1],r_737046, ((closureN)self_7312830)->elements[0], ((closureN)self_7312830)->elements[2]);
-+return_direct_with_clo1(data,  ((closureN)self_7312830)->elements[1], (((closure)  ((closureN)self_7312830)->elements[1])->fn),  c_7324760);; 
++object c_7324753 = Cyc_vector_set_cps(data,  ((closureN)self_7312823)->elements[1],r_737039, ((closureN)self_7312823)->elements[0], ((closureN)self_7312823)->elements[2]);
++return_direct_with_clo1(data,  ((closureN)self_7312823)->elements[1], (((closure)  ((closureN)self_7312823)->elements[1])->fn),  c_7324753);; 
  }
  
 -static void __lambda_1209(void *data, object _, int argc, object *args) /* closure _,object k_737803, object sym_732564_733981, object name_732565_733982, object idx_732566_733983 */
-+static void __lambda_1162(void *data, object _, int argc, object *args) /* closure _,object k_737035, object sym_732223_733536, object name_732224_733537, object idx_732225_733538 */
++static void __lambda_1162(void *data, object _, int argc, object *args) /* closure _,object k_737028, object sym_732217_733529, object name_732218_733530, object idx_732219_733531 */
   {
 -object k_737803 = args[0]; object name_732565_733982 = args[2]; object idx_732566_733983 = args[3];
--  Cyc_st_add(data, "scheme/base.sld:make-getter");
-+object k_737035 = args[0]; object name_732224_733537 = args[2]; object idx_732225_733538 = args[3];
-+  Cyc_st_add(data, "base.sld:make-getter");
++object k_737028 = args[0]; object name_732218_733530 = args[2]; object idx_732219_733531 = args[3];
+   Cyc_st_add(data, "scheme/base.sld:make-getter");
  
 -closureN_type c_7327182;
 -object e_7327197 [2];
@@ -8701,53 +8703,52 @@ Make let-values be the same as let*-values, to work around
 -c_7327182.elements = (object *)e_7327197;
 -c_7327182.elements[0] = idx_732566_733983;
 -c_7327182.elements[1] = name_732565_733982;
-+closureN_type c_7324730;
-+object e_7324745 [2];
-+c_7324730.hdr.mark = gc_color_red;
-+ c_7324730.hdr.grayed = 0;
-+c_7324730.tag = closureN_tag;
-+ c_7324730.fn = (function_type)__lambda_1163;
-+c_7324730.num_args = 1;
-+c_7324730.num_elements = 2;
-+c_7324730.elements = (object *)e_7324745;
-+c_7324730.elements[0] = idx_732225_733538;
-+c_7324730.elements[1] = name_732224_733537;
++closureN_type c_7324723;
++object e_7324738 [2];
++c_7324723.hdr.mark = gc_color_red;
++ c_7324723.hdr.grayed = 0;
++c_7324723.tag = closureN_tag;
++ c_7324723.fn = (function_type)__lambda_1163;
++c_7324723.num_args = 1;
++c_7324723.num_elements = 2;
++c_7324723.elements = (object *)e_7324738;
++c_7324723.elements[0] = idx_732219_733531;
++c_7324723.elements[1] = name_732218_733530;
  
 -return_direct_with_clo1(data,  k_737803, (((closure)  k_737803)->fn),  &c_7327182);; 
-+return_direct_with_clo1(data,  k_737035, (((closure)  k_737035)->fn),  &c_7324730);; 
++return_direct_with_clo1(data,  k_737028, (((closure)  k_737028)->fn),  &c_7324723);; 
  }
  
 -static void __lambda_1210(void *data, object self_7314120, int argc, object *args) /* object self_7314120, object k_737804, object obj_732567_733984 */
-+static void __lambda_1163(void *data, object self_7312827, int argc, object *args) /* object self_7312827, object k_737036, object obj_732226_733539 */
++static void __lambda_1163(void *data, object self_7312820, int argc, object *args) /* object self_7312820, object k_737029, object obj_732220_733532 */
   {
 - object k_737804 = args[0]; object obj_732567_733984 = args[1];
-+ object k_737036 = args[0]; object obj_732226_733539 = args[1];
++ object k_737029 = args[0]; object obj_732220_733532 = args[1];
      
    
 -if( (boolean_f != Cyc_eq(Cyc_vector_ref(data, obj_732567_733984, obj_int2obj(1)), ((closureN)self_7314120)->elements[1])) ){ 
-+if( (boolean_f != Cyc_eq(Cyc_vector_ref(data, obj_732226_733539, obj_int2obj(1)), ((closureN)self_7312827)->elements[1])) ){ 
++if( (boolean_f != Cyc_eq(Cyc_vector_ref(data, obj_732220_733532, obj_int2obj(1)), ((closureN)self_7312820)->elements[1])) ){ 
    
  
  
  
 -return_direct_with_clo1(data,  k_737804, (((closure)  k_737804)->fn),  Cyc_vector_ref(data, Cyc_vector_ref(data, obj_732567_733984, obj_int2obj(2)), ((closureN)self_7314120)->elements[0]));
-+return_direct_with_clo1(data,  k_737036, (((closure)  k_737036)->fn),  Cyc_vector_ref(data, Cyc_vector_ref(data, obj_732226_733539, obj_int2obj(2)), ((closureN)self_7312827)->elements[0]));
++return_direct_with_clo1(data,  k_737029, (((closure)  k_737029)->fn),  Cyc_vector_ref(data, Cyc_vector_ref(data, obj_732220_733532, obj_int2obj(2)), ((closureN)self_7312820)->elements[0]));
  } else { 
    
 -make_utf8_string_with_len(c_7327195, "Invalid type", 12, 12);
 -return_direct_with_clo5(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_737804, &c_7327195, obj_732567_733984, quote_expected, ((closureN)self_7314120)->elements[1]);}
-+make_utf8_string_with_len(c_7324743, "Invalid type", 12, 12);
-+return_direct_with_clo5(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_737036, &c_7324743, obj_732226_733539, quote_expected, ((closureN)self_7312827)->elements[1]);}
++make_utf8_string_with_len(c_7324736, "Invalid type", 12, 12);
++return_direct_with_clo5(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_737029, &c_7324736, obj_732220_733532, quote_expected, ((closureN)self_7312820)->elements[1]);}
  ;; 
  }
  
 -static void __lambda_1206(void *data, object _, int argc, object *args) /* closure _,object k_737796, object name_732553_733977, object obj_732554_733978, object field_732555_733979 */
-+static void __lambda_1159(void *data, object _, int argc, object *args) /* closure _,object k_737028, object name_732212_733532, object obj_732213_733533, object field_732214_733534 */
++static void __lambda_1159(void *data, object _, int argc, object *args) /* closure _,object k_737021, object name_732206_733525, object obj_732207_733526, object field_732208_733527 */
   {
 -object k_737796 = args[0]; object name_732553_733977 = args[1]; object obj_732554_733978 = args[2]; object field_732555_733979 = args[3];
--  Cyc_st_add(data, "scheme/base.sld:slot-ref");
-+object k_737028 = args[0]; object name_732212_733532 = args[1]; object obj_732213_733533 = args[2]; object field_732214_733534 = args[3];
-+  Cyc_st_add(data, "base.sld:slot-ref");
++object k_737021 = args[0]; object name_732206_733525 = args[1]; object obj_732207_733526 = args[2]; object field_732208_733527 = args[3];
+   Cyc_st_add(data, "scheme/base.sld:slot-ref");
  
 -closureN_type c_7327159;
 -object e_7327170 [2];
@@ -8760,17 +8761,17 @@ Make let-values be the same as let*-values, to work around
 -c_7327159.elements = (object *)e_7327170;
 -c_7327159.elements[0] = field_732555_733979;
 -c_7327159.elements[1] = name_732553_733977;
-+closureN_type c_7324707;
-+object e_7324718 [2];
-+c_7324707.hdr.mark = gc_color_red;
-+ c_7324707.hdr.grayed = 0;
-+c_7324707.tag = closureN_tag;
-+ c_7324707.fn = (function_type)__lambda_1160;
-+c_7324707.num_args = 0;
-+c_7324707.num_elements = 2;
-+c_7324707.elements = (object *)e_7324718;
-+c_7324707.elements[0] = field_732214_733534;
-+c_7324707.elements[1] = name_732212_733532;
++closureN_type c_7324700;
++object e_7324711 [2];
++c_7324700.hdr.mark = gc_color_red;
++ c_7324700.hdr.grayed = 0;
++c_7324700.tag = closureN_tag;
++ c_7324700.fn = (function_type)__lambda_1160;
++c_7324700.num_args = 0;
++c_7324700.num_elements = 2;
++c_7324700.elements = (object *)e_7324711;
++c_7324700.elements[0] = field_732208_733527;
++c_7324700.elements[1] = name_732206_733525;
  
  
 -closureN_type c_7327171;
@@ -8784,60 +8785,59 @@ Make let-values be the same as let*-values, to work around
 -c_7327171.elements = (object *)e_7327179;
 -c_7327171.elements[0] = k_737796;
 -c_7327171.elements[1] = obj_732554_733978;
-+closureN_type c_7324719;
-+object e_7324727 [2];
-+c_7324719.hdr.mark = gc_color_red;
-+ c_7324719.hdr.grayed = 0;
-+c_7324719.tag = closureN_tag;
-+ c_7324719.fn = (function_type)__lambda_1161;
-+c_7324719.num_args = 1;
-+c_7324719.num_elements = 2;
-+c_7324719.elements = (object *)e_7324727;
-+c_7324719.elements[0] = k_737028;
-+c_7324719.elements[1] = obj_732213_733533;
++closureN_type c_7324712;
++object e_7324720 [2];
++c_7324712.hdr.mark = gc_color_red;
++ c_7324712.hdr.grayed = 0;
++c_7324712.tag = closureN_tag;
++ c_7324712.fn = (function_type)__lambda_1161;
++c_7324712.num_args = 1;
++c_7324712.num_elements = 2;
++c_7324712.elements = (object *)e_7324720;
++c_7324712.elements[0] = k_737021;
++c_7324712.elements[1] = obj_732207_733526;
  
 -return_direct_with_clo1(data,(closure)&c_7327159,__lambda_1207,  &c_7327171);; 
-+return_direct_with_clo1(data,(closure)&c_7324707,__lambda_1160,  &c_7324719);; 
++return_direct_with_clo1(data,(closure)&c_7324700,__lambda_1160,  &c_7324712);; 
  }
  
 -static void __lambda_1208(void *data, object self_7314118, int argc, object *args) /* object self_7314118, object idx_732558_733980 */
-+static void __lambda_1161(void *data, object self_7312825, int argc, object *args) /* object self_7312825, object idx_732217_733535 */
++static void __lambda_1161(void *data, object self_7312818, int argc, object *args) /* object self_7312818, object idx_732211_733528 */
   {
 - object idx_732558_733980 = args[0];
-+ object idx_732217_733535 = args[0];
++ object idx_732211_733528 = args[0];
    
  
  
  
 -return_direct_with_clo1(data,  ((closureN)self_7314118)->elements[0], (((closure)  ((closureN)self_7314118)->elements[0])->fn),  Cyc_vector_ref(data, Cyc_vector_ref(data, ((closureN)self_7314118)->elements[1], obj_int2obj(2)), idx_732558_733980));; 
-+return_direct_with_clo1(data,  ((closureN)self_7312825)->elements[0], (((closure)  ((closureN)self_7312825)->elements[0])->fn),  Cyc_vector_ref(data, Cyc_vector_ref(data, ((closureN)self_7312825)->elements[1], obj_int2obj(2)), idx_732217_733535));; 
++return_direct_with_clo1(data,  ((closureN)self_7312818)->elements[0], (((closure)  ((closureN)self_7312818)->elements[0])->fn),  Cyc_vector_ref(data, Cyc_vector_ref(data, ((closureN)self_7312818)->elements[1], obj_int2obj(2)), idx_732211_733528));; 
  }
  
 -static void __lambda_1207(void *data, object self_7314119, int argc, object *args) /* object self_7314119, object k_737799 */
-+static void __lambda_1160(void *data, object self_7312826, int argc, object *args) /* object self_7312826, object k_737031 */
++static void __lambda_1160(void *data, object self_7312819, int argc, object *args) /* object self_7312819, object k_737024 */
   {
 - object k_737799 = args[0];
-+ object k_737031 = args[0];
++ object k_737024 = args[0];
      
 -if( (boolean_f != Cyc_is_symbol(((closureN)self_7314119)->elements[0])) ){ 
-+if( (boolean_f != Cyc_is_symbol(((closureN)self_7312826)->elements[0])) ){ 
++if( (boolean_f != Cyc_is_symbol(((closureN)self_7312819)->elements[0])) ){ 
    
  
 -return_direct_with_clo3(data,  __glo__191list_91index_scheme_base, (((closure)  __glo__191list_91index_scheme_base)->fn),  k_737799, ((closureN)self_7314119)->elements[0], Cyc_vector_ref(data, ((closureN)self_7314119)->elements[1], obj_int2obj(2)));
-+return_direct_with_clo3(data,  __glo__191list_91index_scheme_base, (((closure)  __glo__191list_91index_scheme_base)->fn),  k_737031, ((closureN)self_7312826)->elements[0], Cyc_vector_ref(data, ((closureN)self_7312826)->elements[1], obj_int2obj(2)));
++return_direct_with_clo3(data,  __glo__191list_91index_scheme_base, (((closure)  __glo__191list_91index_scheme_base)->fn),  k_737024, ((closureN)self_7312819)->elements[0], Cyc_vector_ref(data, ((closureN)self_7312819)->elements[1], obj_int2obj(2)));
  } else { 
 -  return_direct_with_clo1(data,  k_737799, (((closure)  k_737799)->fn),  ((closureN)self_7314119)->elements[0]);}
-+  return_direct_with_clo1(data,  k_737031, (((closure)  k_737031)->fn),  ((closureN)self_7312826)->elements[0]);}
++  return_direct_with_clo1(data,  k_737024, (((closure)  k_737024)->fn),  ((closureN)self_7312819)->elements[0]);}
  ;; 
  }
  
 -static void __lambda_1203(void *data, object _, int argc, object *args) /* closure _,object k_737792, object name_732548_733972, object obj_732549_733973, object idx_732550_733974, object val_732551_733975 */
-+static void __lambda_1156(void *data, object _, int argc, object *args) /* closure _,object k_737024, object name_732207_733527, object obj_732208_733528, object idx_732209_733529, object val_732210_733530 */
++static void __lambda_1156(void *data, object _, int argc, object *args) /* closure _,object k_737017, object name_732201_733520, object obj_732202_733521, object idx_732203_733522, object val_732204_733523 */
   {
 -object k_737792 = args[0]; object obj_732549_733973 = args[2]; object idx_732550_733974 = args[3]; object val_732551_733975 = args[4];
--  Cyc_st_add(data, "scheme/base.sld:slot-set!");
-+object k_737024 = args[0]; object obj_732208_733528 = args[2]; object idx_732209_733529 = args[3]; object val_732210_733530 = args[4];
-+  Cyc_st_add(data, "base.sld:slot-set!");
++object k_737017 = args[0]; object obj_732202_733521 = args[2]; object idx_732203_733522 = args[3]; object val_732204_733523 = args[4];
+   Cyc_st_add(data, "scheme/base.sld:slot-set!");
  
 -closureN_type c_7327143;
 -object e_7327156 [3];
@@ -8851,28 +8851,28 @@ Make let-values be the same as let*-values, to work around
 -c_7327143.elements[0] = idx_732550_733974;
 -c_7327143.elements[1] = k_737792;
 -c_7327143.elements[2] = val_732551_733975;
-+closureN_type c_7324691;
-+object e_7324704 [3];
-+c_7324691.hdr.mark = gc_color_red;
-+ c_7324691.hdr.grayed = 0;
-+c_7324691.tag = closureN_tag;
-+ c_7324691.fn = (function_type)__lambda_1157;
-+c_7324691.num_args = 1;
-+c_7324691.num_elements = 3;
-+c_7324691.elements = (object *)e_7324704;
-+c_7324691.elements[0] = idx_732209_733529;
-+c_7324691.elements[1] = k_737024;
-+c_7324691.elements[2] = val_732210_733530;
++closureN_type c_7324684;
++object e_7324697 [3];
++c_7324684.hdr.mark = gc_color_red;
++ c_7324684.hdr.grayed = 0;
++c_7324684.tag = closureN_tag;
++ c_7324684.fn = (function_type)__lambda_1157;
++c_7324684.num_args = 1;
++c_7324684.num_elements = 3;
++c_7324684.elements = (object *)e_7324697;
++c_7324684.elements[0] = idx_732203_733522;
++c_7324684.elements[1] = k_737017;
++c_7324684.elements[2] = val_732204_733523;
  
 -return_direct_with_clo1(data,(closure)&c_7327143,__lambda_1204,  obj_732549_733973);; 
-+return_direct_with_clo1(data,(closure)&c_7324691,__lambda_1157,  obj_732208_733528);; 
++return_direct_with_clo1(data,(closure)&c_7324684,__lambda_1157,  obj_732202_733521);; 
  }
  
 -static void __lambda_1204(void *data, object self_7314116, int argc, object *args) /* object self_7314116, object vec_732552_733976 */
-+static void __lambda_1157(void *data, object self_7312823, int argc, object *args) /* object self_7312823, object vec_732211_733531 */
++static void __lambda_1157(void *data, object self_7312816, int argc, object *args) /* object self_7312816, object vec_732205_733524 */
   {
 - object vec_732552_733976 = args[0];
-+ object vec_732211_733531 = args[0];
++ object vec_732205_733524 = args[0];
    
 -closureN_type c_7327145;
 -object e_7327153 [3];
@@ -8886,57 +8886,55 @@ Make let-values be the same as let*-values, to work around
 -c_7327145.elements[0] = ((closureN)self_7314116)->elements[0];
 -c_7327145.elements[1] = ((closureN)self_7314116)->elements[1];
 -c_7327145.elements[2] = ((closureN)self_7314116)->elements[2];
-+closureN_type c_7324693;
-+object e_7324701 [3];
-+c_7324693.hdr.mark = gc_color_red;
-+ c_7324693.hdr.grayed = 0;
-+c_7324693.tag = closureN_tag;
-+ c_7324693.fn = (function_type)__lambda_1158;
-+c_7324693.num_args = 1;
-+c_7324693.num_elements = 3;
-+c_7324693.elements = (object *)e_7324701;
-+c_7324693.elements[0] = ((closureN)self_7312823)->elements[0];
-+c_7324693.elements[1] = ((closureN)self_7312823)->elements[1];
-+c_7324693.elements[2] = ((closureN)self_7312823)->elements[2];
++closureN_type c_7324686;
++object e_7324694 [3];
++c_7324686.hdr.mark = gc_color_red;
++ c_7324686.hdr.grayed = 0;
++c_7324686.tag = closureN_tag;
++ c_7324686.fn = (function_type)__lambda_1158;
++c_7324686.num_args = 1;
++c_7324686.num_elements = 3;
++c_7324686.elements = (object *)e_7324694;
++c_7324686.elements[0] = ((closureN)self_7312816)->elements[0];
++c_7324686.elements[1] = ((closureN)self_7312816)->elements[1];
++c_7324686.elements[2] = ((closureN)self_7312816)->elements[2];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7327145,__lambda_1205,  Cyc_vector_ref(data, vec_732552_733976, obj_int2obj(2)));; 
-+return_direct_with_clo1(data,(closure)&c_7324693,__lambda_1158,  Cyc_vector_ref(data, vec_732211_733531, obj_int2obj(2)));; 
++return_direct_with_clo1(data,(closure)&c_7324686,__lambda_1158,  Cyc_vector_ref(data, vec_732205_733524, obj_int2obj(2)));; 
  }
  
 -static void __lambda_1205(void *data, object self_7314117, int argc, object *args) /* object self_7314117, object r_737793 */
-+static void __lambda_1158(void *data, object self_7312824, int argc, object *args) /* object self_7312824, object r_737025 */
++static void __lambda_1158(void *data, object self_7312817, int argc, object *args) /* object self_7312817, object r_737018 */
   {
 - object r_737793 = args[0];
-+ object r_737025 = args[0];
++ object r_737018 = args[0];
    
 -object c_7327150 = Cyc_vector_set_cps(data,  ((closureN)self_7314117)->elements[1],r_737793, ((closureN)self_7314117)->elements[0], ((closureN)self_7314117)->elements[2]);
 -return_direct_with_clo1(data,  ((closureN)self_7314117)->elements[1], (((closure)  ((closureN)self_7314117)->elements[1])->fn),  c_7327150);; 
-+object c_7324698 = Cyc_vector_set_cps(data,  ((closureN)self_7312824)->elements[1],r_737025, ((closureN)self_7312824)->elements[0], ((closureN)self_7312824)->elements[2]);
-+return_direct_with_clo1(data,  ((closureN)self_7312824)->elements[1], (((closure)  ((closureN)self_7312824)->elements[1])->fn),  c_7324698);; 
++object c_7324691 = Cyc_vector_set_cps(data,  ((closureN)self_7312817)->elements[1],r_737018, ((closureN)self_7312817)->elements[0], ((closureN)self_7312817)->elements[2]);
++return_direct_with_clo1(data,  ((closureN)self_7312817)->elements[1], (((closure)  ((closureN)self_7312817)->elements[1])->fn),  c_7324691);; 
  }
  
 -static void __lambda_1202(void *data, object _, int argc, object *args) /* closure _,object k_737788, object name_732545_733969, object sym_732546_733970 */
-+static void __lambda_1155(void *data, object _, int argc, object *args) /* closure _,object k_737020, object name_732204_733524, object sym_732205_733525 */
++static void __lambda_1155(void *data, object _, int argc, object *args) /* closure _,object k_737013, object name_732198_733517, object sym_732199_733518 */
   {
 -object k_737788 = args[0]; object name_732545_733969 = args[1]; object sym_732546_733970 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:type-slot-offset");
-+object k_737020 = args[0]; object name_732204_733524 = args[1]; object sym_732205_733525 = args[2];
-+  Cyc_st_add(data, "base.sld:type-slot-offset");
++object k_737013 = args[0]; object name_732198_733517 = args[1]; object sym_732199_733518 = 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_737788, sym_732546_733970, Cyc_vector_ref(data, name_732545_733969, obj_int2obj(2)));; 
-+return_direct_with_clo3(data,  __glo__191list_91index_scheme_base, (((closure)  __glo__191list_91index_scheme_base)->fn),  k_737020, sym_732205_733525, Cyc_vector_ref(data, name_732204_733524, obj_int2obj(2)));; 
++return_direct_with_clo3(data,  __glo__191list_91index_scheme_base, (((closure)  __glo__191list_91index_scheme_base)->fn),  k_737013, sym_732199_733518, Cyc_vector_ref(data, name_732198_733517, obj_int2obj(2)));; 
  }
  
 -static void __lambda_1197(void *data, object _, int argc, object *args) /* closure _,object k_737777, object make_732535_733964, object name_732536_733965 */
-+static void __lambda_1150(void *data, object _, int argc, object *args) /* closure _,object k_737009, object make_732194_733519, object name_732195_733520 */
++static void __lambda_1150(void *data, object _, int argc, object *args) /* closure _,object k_737002, object make_732188_733512, object name_732189_733513 */
   {
 -object k_737777 = args[0]; object name_732536_733965 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:make-constructor/args");
-+object k_737009 = args[0]; object name_732195_733520 = args[2];
-+  Cyc_st_add(data, "base.sld:make-constructor/args");
++object k_737002 = args[0]; object name_732189_733513 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:make-constructor/args");
  
 -closureN_type c_7327103;
 -object e_7327136 [1];
@@ -8948,28 +8946,28 @@ Make let-values be the same as let*-values, to work around
 -c_7327103.num_elements = 1;
 -c_7327103.elements = (object *)e_7327136;
 -c_7327103.elements[0] = name_732536_733965;
-+closureN_type c_7324651;
-+object e_7324684 [1];
-+c_7324651.hdr.mark = gc_color_red;
-+ c_7324651.hdr.grayed = 0;
-+c_7324651.tag = closureN_tag;
-+ c_7324651.fn = (function_type)__lambda_1151;
-+c_7324651.num_args = 0;
-+c_7324651.num_elements = 1;
-+c_7324651.elements = (object *)e_7324684;
-+c_7324651.elements[0] = name_732195_733520;
++closureN_type c_7324644;
++object e_7324677 [1];
++c_7324644.hdr.mark = gc_color_red;
++ c_7324644.hdr.grayed = 0;
++c_7324644.tag = closureN_tag;
++ c_7324644.fn = (function_type)__lambda_1151;
++c_7324644.num_args = 0;
++c_7324644.num_elements = 1;
++c_7324644.elements = (object *)e_7324677;
++c_7324644.elements[0] = name_732189_733513;
  
 -return_direct_with_clo1(data,  k_737777, (((closure)  k_737777)->fn),  &c_7327103);; 
-+return_direct_with_clo1(data,  k_737009, (((closure)  k_737009)->fn),  &c_7324651);; 
++return_direct_with_clo1(data,  k_737002, (((closure)  k_737002)->fn),  &c_7324644);; 
  }
  
 -static void __lambda_1198(void *data, object self_7314112, int argc, object *args) /* object self_7314112, object k_737778, object args_732537_733966_raw, ... */
-+static void __lambda_1151(void *data, object self_7312819, int argc, object *args) /* object self_7312819, object k_737010, object args_732196_733521_raw, ... */
++static void __lambda_1151(void *data, object self_7312812, int argc, object *args) /* object self_7312812, object k_737003, object args_732190_733514_raw, ... */
   {
 - object k_737778 = args[0];
 -load_varargs(args_732537_733966, args, 1, argc - 1);
-+ object k_737010 = args[0];
-+load_varargs(args_732196_733521, args, 1, argc - 1);
++ object k_737003 = args[0];
++load_varargs(args_732190_733514, args, 1, argc - 1);
    
 -closureN_type c_7327105;
 -object e_7327132 [3];
@@ -8983,31 +8981,31 @@ Make let-values be the same as let*-values, to work around
 -c_7327105.elements[0] = args_732537_733966;
 -c_7327105.elements[1] = k_737778;
 -c_7327105.elements[2] = ((closureN)self_7314112)->elements[0];
-+closureN_type c_7324653;
-+object e_7324680 [3];
-+c_7324653.hdr.mark = gc_color_red;
-+ c_7324653.hdr.grayed = 0;
-+c_7324653.tag = closureN_tag;
-+ c_7324653.fn = (function_type)__lambda_1152;
-+c_7324653.num_args = 1;
-+c_7324653.num_elements = 3;
-+c_7324653.elements = (object *)e_7324680;
-+c_7324653.elements[0] = args_732196_733521;
-+c_7324653.elements[1] = k_737010;
-+c_7324653.elements[2] = ((closureN)self_7312819)->elements[0];
++closureN_type c_7324646;
++object e_7324673 [3];
++c_7324646.hdr.mark = gc_color_red;
++ c_7324646.hdr.grayed = 0;
++c_7324646.tag = closureN_tag;
++ c_7324646.fn = (function_type)__lambda_1152;
++c_7324646.num_args = 1;
++c_7324646.num_elements = 3;
++c_7324646.elements = (object *)e_7324673;
++c_7324646.elements[0] = args_732190_733514;
++c_7324646.elements[1] = k_737003;
++c_7324646.elements[2] = ((closureN)self_7312812)->elements[0];
  
  
 -object c_7327135 = Cyc_list2vector(data,(closure)&c_7327105,args_732537_733966);
 -return_closcall1(data,(closure)&c_7327105,  c_7327135);; 
-+object c_7324683 = Cyc_list2vector(data,(closure)&c_7324653,args_732196_733521);
-+return_closcall1(data,(closure)&c_7324653,  c_7324683);; 
++object c_7324676 = Cyc_list2vector(data,(closure)&c_7324646,args_732190_733514);
++return_closcall1(data,(closure)&c_7324646,  c_7324676);; 
  }
  
 -static void __lambda_1199(void *data, object self_7314113, int argc, object *args) /* object self_7314113, object field_91values_732543_733968 */
-+static void __lambda_1152(void *data, object self_7312820, int argc, object *args) /* object self_7312820, object field_91values_732202_733523 */
++static void __lambda_1152(void *data, object self_7312813, int argc, object *args) /* object self_7312813, object field_91values_732196_733516 */
   {
 - object field_91values_732543_733968 = args[0];
-+ object field_91values_732202_733523 = args[0];
++ object field_91values_732196_733516 = args[0];
    
 -closureN_type c_7327107;
 -object e_7327122 [3];
@@ -9021,18 +9019,18 @@ Make let-values be the same as let*-values, to work around
 -c_7327107.elements[0] = ((closureN)self_7314113)->elements[0];
 -c_7327107.elements[1] = field_91values_732543_733968;
 -c_7327107.elements[2] = ((closureN)self_7314113)->elements[2];
-+closureN_type c_7324655;
-+object e_7324670 [3];
-+c_7324655.hdr.mark = gc_color_red;
-+ c_7324655.hdr.grayed = 0;
-+c_7324655.tag = closureN_tag;
-+ c_7324655.fn = (function_type)__lambda_1153;
-+c_7324655.num_args = 0;
-+c_7324655.num_elements = 3;
-+c_7324655.elements = (object *)e_7324670;
-+c_7324655.elements[0] = ((closureN)self_7312820)->elements[0];
-+c_7324655.elements[1] = field_91values_732202_733523;
-+c_7324655.elements[2] = ((closureN)self_7312820)->elements[2];
++closureN_type c_7324648;
++object e_7324663 [3];
++c_7324648.hdr.mark = gc_color_red;
++ c_7324648.hdr.grayed = 0;
++c_7324648.tag = closureN_tag;
++ c_7324648.fn = (function_type)__lambda_1153;
++c_7324648.num_args = 0;
++c_7324648.num_elements = 3;
++c_7324648.elements = (object *)e_7324663;
++c_7324648.elements[0] = ((closureN)self_7312813)->elements[0];
++c_7324648.elements[1] = field_91values_732196_733516;
++c_7324648.elements[2] = ((closureN)self_7312813)->elements[2];
  
  
 -closureN_type c_7327123;
@@ -9047,63 +9045,62 @@ Make let-values be the same as let*-values, to work around
 -c_7327123.elements[0] = field_91values_732543_733968;
 -c_7327123.elements[1] = ((closureN)self_7314113)->elements[1];
 -c_7327123.elements[2] = ((closureN)self_7314113)->elements[2];
-+closureN_type c_7324671;
-+object e_7324679 [3];
-+c_7324671.hdr.mark = gc_color_red;
-+ c_7324671.hdr.grayed = 0;
-+c_7324671.tag = closureN_tag;
-+ c_7324671.fn = (function_type)__lambda_1154;
-+c_7324671.num_args = 1;
-+c_7324671.num_elements = 3;
-+c_7324671.elements = (object *)e_7324679;
-+c_7324671.elements[0] = field_91values_732202_733523;
-+c_7324671.elements[1] = ((closureN)self_7312820)->elements[1];
-+c_7324671.elements[2] = ((closureN)self_7312820)->elements[2];
++closureN_type c_7324664;
++object e_7324672 [3];
++c_7324664.hdr.mark = gc_color_red;
++ c_7324664.hdr.grayed = 0;
++c_7324664.tag = closureN_tag;
++ c_7324664.fn = (function_type)__lambda_1154;
++c_7324664.num_args = 1;
++c_7324664.num_elements = 3;
++c_7324664.elements = (object *)e_7324672;
++c_7324664.elements[0] = field_91values_732196_733516;
++c_7324664.elements[1] = ((closureN)self_7312813)->elements[1];
++c_7324664.elements[2] = ((closureN)self_7312813)->elements[2];
  
 -return_direct_with_clo1(data,(closure)&c_7327107,__lambda_1200,  &c_7327123);; 
-+return_direct_with_clo1(data,(closure)&c_7324655,__lambda_1153,  &c_7324671);; 
++return_direct_with_clo1(data,(closure)&c_7324648,__lambda_1153,  &c_7324664);; 
  }
  
 -static void __lambda_1201(void *data, object self_7314114, int argc, object *args) /* object self_7314114, object r_737781 */
-+static void __lambda_1154(void *data, object self_7312821, int argc, object *args) /* object self_7312821, object r_737013 */
++static void __lambda_1154(void *data, object self_7312814, int argc, object *args) /* object self_7312814, object r_737006 */
   {
  
    
 -vector_3_type local_7327128; 
 -return_direct_with_clo1(data,  ((closureN)self_7314114)->elements[1], (((closure)  ((closureN)self_7314114)->elements[1])->fn),  Cyc_fast_vector_3(&local_7327128, __glo_record_91marker_scheme_base, ((closureN)self_7314114)->elements[2], ((closureN)self_7314114)->elements[0]));; 
-+vector_3_type local_7324676; 
-+return_direct_with_clo1(data,  ((closureN)self_7312821)->elements[1], (((closure)  ((closureN)self_7312821)->elements[1])->fn),  Cyc_fast_vector_3(&local_7324676, __glo_record_91marker_scheme_base, ((closureN)self_7312821)->elements[2], ((closureN)self_7312821)->elements[0]));; 
++vector_3_type local_7324669; 
++return_direct_with_clo1(data,  ((closureN)self_7312814)->elements[1], (((closure)  ((closureN)self_7312814)->elements[1])->fn),  Cyc_fast_vector_3(&local_7324669, __glo_record_91marker_scheme_base, ((closureN)self_7312814)->elements[2], ((closureN)self_7312814)->elements[0]));; 
  }
  
 -static void __lambda_1200(void *data, object self_7314115, int argc, object *args) /* object self_7314115, object k_737782 */
-+static void __lambda_1153(void *data, object self_7312822, int argc, object *args) /* object self_7312822, object k_737014 */
++static void __lambda_1153(void *data, object self_7312815, int argc, object *args) /* object self_7312815, object k_737007 */
   {
 - object k_737782 = args[0];
-+ object k_737014 = args[0];
++ object k_737007 = args[0];
      
    
    
    
 -if( (boolean_f != equalp(Cyc_length(data, Cyc_vector_ref(data, ((closureN)self_7314115)->elements[2], obj_int2obj(2))), Cyc_vector_length(data, ((closureN)self_7314115)->elements[1]))) ){ 
 -  return_direct_with_clo1(data,  k_737782, (((closure)  k_737782)->fn),  Cyc_VOID);
-+if( (boolean_f != equalp(Cyc_length(data, Cyc_vector_ref(data, ((closureN)self_7312822)->elements[2], obj_int2obj(2))), Cyc_vector_length(data, ((closureN)self_7312822)->elements[1]))) ){ 
-+  return_direct_with_clo1(data,  k_737014, (((closure)  k_737014)->fn),  Cyc_VOID);
++if( (boolean_f != equalp(Cyc_length(data, Cyc_vector_ref(data, ((closureN)self_7312815)->elements[2], obj_int2obj(2))), Cyc_vector_length(data, ((closureN)self_7312815)->elements[1]))) ){ 
++  return_direct_with_clo1(data,  k_737007, (((closure)  k_737007)->fn),  Cyc_VOID);
  } else { 
    
 -make_utf8_string_with_len(c_7327120, "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_737782, &c_7327120, ((closureN)self_7314115)->elements[0]);}
-+make_utf8_string_with_len(c_7324668, "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_737014, &c_7324668, ((closureN)self_7312822)->elements[0]);}
++make_utf8_string_with_len(c_7324661, "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_737007, &c_7324661, ((closureN)self_7312815)->elements[0]);}
  ;; 
  }
  
 -static void __lambda_1194(void *data, object _, int argc, object *args) /* closure _,object k_737770, object make_732525_733959, object name_732526_733960 */
-+static void __lambda_1147(void *data, object _, int argc, object *args) /* closure _,object k_737002, object make_732184_733514, object name_732185_733515 */
++static void __lambda_1147(void *data, object _, int argc, object *args) /* closure _,object k_736995, object make_732178_733507, object name_732179_733508 */
   {
 -object k_737770 = args[0]; object name_732526_733960 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:make-constructor");
-+object k_737002 = args[0]; object name_732185_733515 = args[2];
-+  Cyc_st_add(data, "base.sld:make-constructor");
++object k_736995 = args[0]; object name_732179_733508 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:make-constructor");
  
 -closureN_type c_7327082;
 -object e_7327100 [1];
@@ -9115,28 +9112,28 @@ Make let-values be the same as let*-values, to work around
 -c_7327082.num_elements = 1;
 -c_7327082.elements = (object *)e_7327100;
 -c_7327082.elements[0] = name_732526_733960;
-+closureN_type c_7324630;
-+object e_7324648 [1];
-+c_7324630.hdr.mark = gc_color_red;
-+ c_7324630.hdr.grayed = 0;
-+c_7324630.tag = closureN_tag;
-+ c_7324630.fn = (function_type)__lambda_1148;
-+c_7324630.num_args = 0;
-+c_7324630.num_elements = 1;
-+c_7324630.elements = (object *)e_7324648;
-+c_7324630.elements[0] = name_732185_733515;
++closureN_type c_7324623;
++object e_7324641 [1];
++c_7324623.hdr.mark = gc_color_red;
++ c_7324623.hdr.grayed = 0;
++c_7324623.tag = closureN_tag;
++ c_7324623.fn = (function_type)__lambda_1148;
++c_7324623.num_args = 0;
++c_7324623.num_elements = 1;
++c_7324623.elements = (object *)e_7324641;
++c_7324623.elements[0] = name_732179_733508;
  
 -return_direct_with_clo1(data,  k_737770, (((closure)  k_737770)->fn),  &c_7327082);; 
-+return_direct_with_clo1(data,  k_737002, (((closure)  k_737002)->fn),  &c_7324630);; 
++return_direct_with_clo1(data,  k_736995, (((closure)  k_736995)->fn),  &c_7324623);; 
  }
  
 -static void __lambda_1195(void *data, object self_7314110, int argc, object *args) /* object self_7314110, object k_737771, object args_732527_733961_raw, ... */
-+static void __lambda_1148(void *data, object self_7312817, int argc, object *args) /* object self_7312817, object k_737003, object args_732186_733516_raw, ... */
++static void __lambda_1148(void *data, object self_7312810, int argc, object *args) /* object self_7312810, object k_736996, object args_732180_733509_raw, ... */
   {
 - object k_737771 = args[0];
 -load_varargs(args_732527_733961, args, 1, argc - 1);
-+ object k_737003 = args[0];
-+load_varargs(args_732186_733516, args, 1, argc - 1);
++ object k_736996 = args[0];
++load_varargs(args_732180_733509, args, 1, argc - 1);
    
 -closureN_type c_7327084;
 -object e_7327091 [2];
@@ -9149,17 +9146,17 @@ Make let-values be the same as let*-values, to work around
 -c_7327084.elements = (object *)e_7327091;
 -c_7327084.elements[0] = k_737771;
 -c_7327084.elements[1] = ((closureN)self_7314110)->elements[0];
-+closureN_type c_7324632;
-+object e_7324639 [2];
-+c_7324632.hdr.mark = gc_color_red;
-+ c_7324632.hdr.grayed = 0;
-+c_7324632.tag = closureN_tag;
-+ c_7324632.fn = (function_type)__lambda_1149;
-+c_7324632.num_args = 1;
-+c_7324632.num_elements = 2;
-+c_7324632.elements = (object *)e_7324639;
-+c_7324632.elements[0] = k_737003;
-+c_7324632.elements[1] = ((closureN)self_7312817)->elements[0];
++closureN_type c_7324625;
++object e_7324632 [2];
++c_7324625.hdr.mark = gc_color_red;
++ c_7324625.hdr.grayed = 0;
++c_7324625.tag = closureN_tag;
++ c_7324625.fn = (function_type)__lambda_1149;
++c_7324625.num_args = 1;
++c_7324625.num_elements = 2;
++c_7324625.elements = (object *)e_7324632;
++c_7324625.elements[0] = k_736996;
++c_7324625.elements[1] = ((closureN)self_7312810)->elements[0];
  
  
  
@@ -9168,29 +9165,28 @@ Make let-values be the same as let*-values, to work around
  
 -object c_7327094 = Cyc_make_vector(data,(closure)&c_7327084,2,Cyc_length(data, Cyc_vector_ref(data, ((closureN)self_7314110)->elements[0], obj_int2obj(2))), boolean_f);
 -return_closcall1(data,(closure)&c_7327084,  c_7327094);; 
-+object c_7324642 = Cyc_make_vector(data,(closure)&c_7324632,2,Cyc_length(data, Cyc_vector_ref(data, ((closureN)self_7312817)->elements[0], obj_int2obj(2))), boolean_f);
-+return_closcall1(data,(closure)&c_7324632,  c_7324642);; 
++object c_7324635 = Cyc_make_vector(data,(closure)&c_7324625,2,Cyc_length(data, Cyc_vector_ref(data, ((closureN)self_7312810)->elements[0], obj_int2obj(2))), boolean_f);
++return_closcall1(data,(closure)&c_7324625,  c_7324635);; 
  }
  
 -static void __lambda_1196(void *data, object self_7314111, int argc, object *args) /* object self_7314111, object field_91values_732533_733963 */
-+static void __lambda_1149(void *data, object self_7312818, int argc, object *args) /* object self_7312818, object field_91values_732192_733518 */
++static void __lambda_1149(void *data, object self_7312811, int argc, object *args) /* object self_7312811, object field_91values_732186_733511 */
   {
 - object field_91values_732533_733963 = args[0];
-+ object field_91values_732192_733518 = args[0];
++ object field_91values_732186_733511 = args[0];
    
 -vector_3_type local_7327089; 
 -return_direct_with_clo1(data,  ((closureN)self_7314111)->elements[0], (((closure)  ((closureN)self_7314111)->elements[0])->fn),  Cyc_fast_vector_3(&local_7327089, __glo_record_91marker_scheme_base, ((closureN)self_7314111)->elements[1], field_91values_732533_733963));; 
-+vector_3_type local_7324637; 
-+return_direct_with_clo1(data,  ((closureN)self_7312818)->elements[0], (((closure)  ((closureN)self_7312818)->elements[0])->fn),  Cyc_fast_vector_3(&local_7324637, __glo_record_91marker_scheme_base, ((closureN)self_7312818)->elements[1], field_91values_732192_733518));; 
++vector_3_type local_7324630; 
++return_direct_with_clo1(data,  ((closureN)self_7312811)->elements[0], (((closure)  ((closureN)self_7312811)->elements[0])->fn),  Cyc_fast_vector_3(&local_7324630, __glo_record_91marker_scheme_base, ((closureN)self_7312811)->elements[1], field_91values_732186_733511));; 
  }
  
 -static void __lambda_1191(void *data, object _, int argc, object *args) /* closure _,object k_737764, object pred_732521_733956, object name_732522_733957 */
-+static void __lambda_1144(void *data, object _, int argc, object *args) /* closure _,object k_736996, object pred_732180_733511, object name_732181_733512 */
++static void __lambda_1144(void *data, object _, int argc, object *args) /* closure _,object k_736989, object pred_732174_733504, object name_732175_733505 */
   {
 -object k_737764 = args[0]; object name_732522_733957 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:make-type-predicate");
-+object k_736996 = args[0]; object name_732181_733512 = args[2];
-+  Cyc_st_add(data, "base.sld:make-type-predicate");
++object k_736989 = args[0]; object name_732175_733505 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:make-type-predicate");
  
 -closureN_type c_7327065;
 -object e_7327079 [1];
@@ -9202,26 +9198,26 @@ Make let-values be the same as let*-values, to work around
 -c_7327065.num_elements = 1;
 -c_7327065.elements = (object *)e_7327079;
 -c_7327065.elements[0] = name_732522_733957;
-+closureN_type c_7324613;
-+object e_7324627 [1];
-+c_7324613.hdr.mark = gc_color_red;
-+ c_7324613.hdr.grayed = 0;
-+c_7324613.tag = closureN_tag;
-+ c_7324613.fn = (function_type)__lambda_1145;
-+c_7324613.num_args = 1;
-+c_7324613.num_elements = 1;
-+c_7324613.elements = (object *)e_7324627;
-+c_7324613.elements[0] = name_732181_733512;
++closureN_type c_7324606;
++object e_7324620 [1];
++c_7324606.hdr.mark = gc_color_red;
++ c_7324606.hdr.grayed = 0;
++c_7324606.tag = closureN_tag;
++ c_7324606.fn = (function_type)__lambda_1145;
++c_7324606.num_args = 1;
++c_7324606.num_elements = 1;
++c_7324606.elements = (object *)e_7324620;
++c_7324606.elements[0] = name_732175_733505;
  
 -return_direct_with_clo1(data,  k_737764, (((closure)  k_737764)->fn),  &c_7327065);; 
-+return_direct_with_clo1(data,  k_736996, (((closure)  k_736996)->fn),  &c_7324613);; 
++return_direct_with_clo1(data,  k_736989, (((closure)  k_736989)->fn),  &c_7324606);; 
  }
  
 -static void __lambda_1192(void *data, object self_7314108, int argc, object *args) /* object self_7314108, object k_737765, object obj_732523_733958 */
-+static void __lambda_1145(void *data, object self_7312815, int argc, object *args) /* object self_7312815, object k_736997, object obj_732182_733513 */
++static void __lambda_1145(void *data, object self_7312808, int argc, object *args) /* object self_7312808, object k_736990, object obj_732176_733506 */
   {
 - object k_737765 = args[0]; object obj_732523_733958 = args[1];
-+ object k_736997 = args[0]; object obj_732182_733513 = args[1];
++ object k_736990 = args[0]; object obj_732176_733506 = args[1];
    
 -closureN_type c_7327067;
 -object e_7327078 [3];
@@ -9235,63 +9231,61 @@ Make let-values be the same as let*-values, to work around
 -c_7327067.elements[0] = k_737765;
 -c_7327067.elements[1] = ((closureN)self_7314108)->elements[0];
 -c_7327067.elements[2] = obj_732523_733958;
-+closureN_type c_7324615;
-+object e_7324626 [3];
-+c_7324615.hdr.mark = gc_color_red;
-+ c_7324615.hdr.grayed = 0;
-+c_7324615.tag = closureN_tag;
-+ c_7324615.fn = (function_type)__lambda_1146;
-+c_7324615.num_args = 1;
-+c_7324615.num_elements = 3;
-+c_7324615.elements = (object *)e_7324626;
-+c_7324615.elements[0] = k_736997;
-+c_7324615.elements[1] = ((closureN)self_7312815)->elements[0];
-+c_7324615.elements[2] = obj_732182_733513;
++closureN_type c_7324608;
++object e_7324619 [3];
++c_7324608.hdr.mark = gc_color_red;
++ c_7324608.hdr.grayed = 0;
++c_7324608.tag = closureN_tag;
++ c_7324608.fn = (function_type)__lambda_1146;
++c_7324608.num_args = 1;
++c_7324608.num_elements = 3;
++c_7324608.elements = (object *)e_7324619;
++c_7324608.elements[0] = k_736990;
++c_7324608.elements[1] = ((closureN)self_7312808)->elements[0];
++c_7324608.elements[2] = obj_732176_733506;
  
 -return_direct_with_clo2(data,  __glo_record_127_scheme_base, (((closure)  __glo_record_127_scheme_base)->fn),  &c_7327067, obj_732523_733958);; 
-+return_direct_with_clo2(data,  __glo_record_127_scheme_base, (((closure)  __glo_record_127_scheme_base)->fn),  &c_7324615, obj_732182_733513);; 
++return_direct_with_clo2(data,  __glo_record_127_scheme_base, (((closure)  __glo_record_127_scheme_base)->fn),  &c_7324608, obj_732176_733506);; 
  }
  
 -static void __lambda_1193(void *data, object self_7314109, int argc, object *args) /* object self_7314109, object r_737766 */
-+static void __lambda_1146(void *data, object self_7312816, int argc, object *args) /* object self_7312816, object r_736998 */
++static void __lambda_1146(void *data, object self_7312809, int argc, object *args) /* object self_7312809, object r_736991 */
   {
 - object r_737766 = args[0];
 -  if( (boolean_f != r_737766) ){ 
-+ object r_736998 = args[0];
-+  if( (boolean_f != r_736998) ){ 
++ object r_736991 = args[0];
++  if( (boolean_f != r_736991) ){ 
    
  
  
  
 -return_direct_with_clo1(data,  ((closureN)self_7314109)->elements[0], (((closure)  ((closureN)self_7314109)->elements[0])->fn),  equalp(Cyc_vector_ref(data, ((closureN)self_7314109)->elements[2], obj_int2obj(1)), ((closureN)self_7314109)->elements[1]));
-+return_direct_with_clo1(data,  ((closureN)self_7312816)->elements[0], (((closure)  ((closureN)self_7312816)->elements[0])->fn),  equalp(Cyc_vector_ref(data, ((closureN)self_7312816)->elements[2], obj_int2obj(1)), ((closureN)self_7312816)->elements[1]));
++return_direct_with_clo1(data,  ((closureN)self_7312809)->elements[0], (((closure)  ((closureN)self_7312809)->elements[0])->fn),  equalp(Cyc_vector_ref(data, ((closureN)self_7312809)->elements[2], obj_int2obj(1)), ((closureN)self_7312809)->elements[1]));
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7314109)->elements[0], (((closure)  ((closureN)self_7314109)->elements[0])->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  ((closureN)self_7312816)->elements[0], (((closure)  ((closureN)self_7312816)->elements[0])->fn),  boolean_f);}
++  return_direct_with_clo1(data,  ((closureN)self_7312809)->elements[0], (((closure)  ((closureN)self_7312809)->elements[0])->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_1190(void *data, object _, int argc, object *args) /* closure _,object k_737761, object name_732518_733953, object parent_732519_733954, object field_91tags_732520_733955 */
-+static void __lambda_1143(void *data, object _, int argc, object *args) /* closure _,object k_736993, object name_732177_733508, object parent_732178_733509, object field_91tags_732179_733510 */
++static void __lambda_1143(void *data, object _, int argc, object *args) /* closure _,object k_736986, object name_732171_733501, object parent_732172_733502, object field_91tags_732173_733503 */
   {
 -object k_737761 = args[0]; object name_732518_733953 = args[1]; object field_91tags_732520_733955 = args[3];
--  Cyc_st_add(data, "scheme/base.sld:register-simple-type");
-+object k_736993 = args[0]; object name_732177_733508 = args[1]; object field_91tags_732179_733510 = args[3];
-+  Cyc_st_add(data, "base.sld:register-simple-type");
++object k_736986 = args[0]; object name_732171_733501 = args[1]; object field_91tags_732173_733503 = args[3];
+   Cyc_st_add(data, "scheme/base.sld:register-simple-type");
  
 -vector_3_type local_7327062; 
 -return_direct_with_clo1(data,  k_737761, (((closure)  k_737761)->fn),  Cyc_fast_vector_3(&local_7327062, __glo_record_91marker_scheme_base, name_732518_733953, field_91tags_732520_733955));; 
-+vector_3_type local_7324610; 
-+return_direct_with_clo1(data,  k_736993, (((closure)  k_736993)->fn),  Cyc_fast_vector_3(&local_7324610, __glo_record_91marker_scheme_base, name_732177_733508, field_91tags_732179_733510));; 
++vector_3_type local_7324603; 
++return_direct_with_clo1(data,  k_736986, (((closure)  k_736986)->fn),  Cyc_fast_vector_3(&local_7324603, __glo_record_91marker_scheme_base, name_732171_733501, field_91tags_732173_733503));; 
  }
  
 -static void __lambda_1139(void *data, object _, int argc, object *args) /* closure _,object k_737456, object expr_732160_732237_732412_733847, object rename_732161_732238_732413_733848, object compare_732162_732239_732414_733849 */
-+static void __lambda_1092(void *data, object _, int argc, object *args) /* closure _,object k_736688, object expr_731818_731896_732071_733402, object rename_731819_731897_732072_733403, object compare_731820_731898_732073_733404 */
++static void __lambda_1092(void *data, object _, int argc, object *args) /* closure _,object k_736681, object expr_731813_731890_732065_733395, object rename_731814_731891_732066_733396, object compare_731815_731892_732067_733397 */
   {
 -object k_737456 = args[0]; object expr_732160_732237_732412_733847 = args[1]; object rename_732161_732238_732413_733848 = args[2]; object compare_732162_732239_732414_733849 = args[3];
--  Cyc_st_add(data, "scheme/base.sld:guard-aux");
-+object k_736688 = args[0]; object expr_731818_731896_732071_733402 = args[1]; object rename_731819_731897_732072_733403 = args[2]; object compare_731820_731898_732073_733404 = args[3];
-+  Cyc_st_add(data, "base.sld:guard-aux");
++object k_736681 = args[0]; object expr_731813_731890_732065_733395 = args[1]; object rename_731814_731891_732066_733396 = args[2]; object compare_731815_731892_732067_733397 = args[3];
+   Cyc_st_add(data, "scheme/base.sld:guard-aux");
  
 -closureN_type c_7326039;
 -object e_7327055 [4];
@@ -9306,31 +9300,31 @@ Make let-values be the same as let*-values, to work around
 -c_7326039.elements[1] = expr_732160_732237_732412_733847;
 -c_7326039.elements[2] = k_737456;
 -c_7326039.elements[3] = rename_732161_732238_732413_733848;
-+closureN_type c_7323587;
-+object e_7324603 [4];
-+c_7323587.hdr.mark = gc_color_red;
-+ c_7323587.hdr.grayed = 0;
-+c_7323587.tag = closureN_tag;
-+ c_7323587.fn = (function_type)__lambda_1093;
-+c_7323587.num_args = 1;
-+c_7323587.num_elements = 4;
-+c_7323587.elements = (object *)e_7324603;
-+c_7323587.elements[0] = compare_731820_731898_732073_733404;
-+c_7323587.elements[1] = expr_731818_731896_732071_733402;
-+c_7323587.elements[2] = k_736688;
-+c_7323587.elements[3] = rename_731819_731897_732072_733403;
++closureN_type c_7323580;
++object e_7324596 [4];
++c_7323580.hdr.mark = gc_color_red;
++ c_7323580.hdr.grayed = 0;
++c_7323580.tag = closureN_tag;
++ c_7323580.fn = (function_type)__lambda_1093;
++c_7323580.num_args = 1;
++c_7323580.num_elements = 4;
++c_7323580.elements = (object *)e_7324596;
++c_7323580.elements[0] = compare_731815_731892_732067_733397;
++c_7323580.elements[1] = expr_731813_731890_732065_733395;
++c_7323580.elements[2] = k_736681;
++c_7323580.elements[3] = rename_731814_731891_732066_733396;
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7326039,__lambda_1140,  Cyc_cdr(data, expr_732160_732237_732412_733847));; 
-+return_direct_with_clo1(data,(closure)&c_7323587,__lambda_1093,  Cyc_cdr(data, expr_731818_731896_732071_733402));; 
++return_direct_with_clo1(data,(closure)&c_7323580,__lambda_1093,  Cyc_cdr(data, expr_731813_731890_732065_733395));; 
  }
  
 -static void __lambda_1140(void *data, object self_7314058, int argc, object *args) /* object self_7314058, object v_931_732168_732393_732506_733941 */
-+static void __lambda_1093(void *data, object self_7312765, int argc, object *args) /* object self_7312765, object v_931_731827_732052_732165_733496 */
++static void __lambda_1093(void *data, object self_7312758, int argc, object *args) /* object self_7312758, object v_931_731821_732046_732159_733489 */
   {
 - object v_931_732168_732393_732506_733941 = args[0];
-+ object v_931_731827_732052_732165_733496 = args[0];
++ object v_931_731821_732046_732159_733489 = args[0];
    
 -closureN_type c_7326041;
 -object e_7326148 [3];
@@ -9344,18 +9338,18 @@ Make let-values be the same as let*-values, to work around
 -c_7326041.elements[0] = ((closureN)self_7314058)->elements[0];
 -c_7326041.elements[1] = ((closureN)self_7314058)->elements[3];
 -c_7326041.elements[2] = v_931_732168_732393_732506_733941;
-+closureN_type c_7323589;
-+object e_7323696 [3];
-+c_7323589.hdr.mark = gc_color_red;
-+ c_7323589.hdr.grayed = 0;
-+c_7323589.tag = closureN_tag;
-+ c_7323589.fn = (function_type)__lambda_1094;
-+c_7323589.num_args = 0;
-+c_7323589.num_elements = 3;
-+c_7323589.elements = (object *)e_7323696;
-+c_7323589.elements[0] = ((closureN)self_7312765)->elements[0];
-+c_7323589.elements[1] = ((closureN)self_7312765)->elements[3];
-+c_7323589.elements[2] = v_931_731827_732052_732165_733496;
++closureN_type c_7323582;
++object e_7323689 [3];
++c_7323582.hdr.mark = gc_color_red;
++ c_7323582.hdr.grayed = 0;
++c_7323582.tag = closureN_tag;
++ c_7323582.fn = (function_type)__lambda_1094;
++c_7323582.num_args = 0;
++c_7323582.num_elements = 3;
++c_7323582.elements = (object *)e_7323689;
++c_7323582.elements[0] = ((closureN)self_7312758)->elements[0];
++c_7323582.elements[1] = ((closureN)self_7312758)->elements[3];
++c_7323582.elements[2] = v_931_731821_732046_732159_733489;
  
  
 -closureN_type c_7326149;
@@ -9371,29 +9365,29 @@ Make let-values be the same as let*-values, to work around
 -c_7326149.elements[1] = ((closureN)self_7314058)->elements[1];
 -c_7326149.elements[2] = ((closureN)self_7314058)->elements[2];
 -c_7326149.elements[3] = ((closureN)self_7314058)->elements[3];
-+closureN_type c_7323697;
-+object e_7324602 [4];
-+c_7323697.hdr.mark = gc_color_red;
-+ c_7323697.hdr.grayed = 0;
-+c_7323697.tag = closureN_tag;
-+ c_7323697.fn = (function_type)__lambda_1098;
-+c_7323697.num_args = 1;
-+c_7323697.num_elements = 4;
-+c_7323697.elements = (object *)e_7324602;
-+c_7323697.elements[0] = ((closureN)self_7312765)->elements[0];
-+c_7323697.elements[1] = ((closureN)self_7312765)->elements[1];
-+c_7323697.elements[2] = ((closureN)self_7312765)->elements[2];
-+c_7323697.elements[3] = ((closureN)self_7312765)->elements[3];
++closureN_type c_7323690;
++object e_7324595 [4];
++c_7323690.hdr.mark = gc_color_red;
++ c_7323690.hdr.grayed = 0;
++c_7323690.tag = closureN_tag;
++ c_7323690.fn = (function_type)__lambda_1098;
++c_7323690.num_args = 1;
++c_7323690.num_elements = 4;
++c_7323690.elements = (object *)e_7324595;
++c_7323690.elements[0] = ((closureN)self_7312758)->elements[0];
++c_7323690.elements[1] = ((closureN)self_7312758)->elements[1];
++c_7323690.elements[2] = ((closureN)self_7312758)->elements[2];
++c_7323690.elements[3] = ((closureN)self_7312758)->elements[3];
  
 -return_direct_with_clo1(data,(closure)&c_7326041,__lambda_1141,  &c_7326149);; 
-+return_direct_with_clo1(data,(closure)&c_7323589,__lambda_1094,  &c_7323697);; 
++return_direct_with_clo1(data,(closure)&c_7323582,__lambda_1094,  &c_7323690);; 
  }
  
 -static void __lambda_1145(void *data, object self_7314059, int argc, object *args) /* object self_7314059, object tmp_732241_732243_732415_733850 */
-+static void __lambda_1098(void *data, object self_7312766, int argc, object *args) /* object self_7312766, object tmp_731900_731902_732074_733405 */
++static void __lambda_1098(void *data, object self_7312759, int argc, object *args) /* object self_7312759, object tmp_731894_731896_732068_733398 */
   {
 - object tmp_732241_732243_732415_733850 = args[0];
-+ object tmp_731900_731902_732074_733405 = args[0];
++ object tmp_731894_731896_732068_733398 = args[0];
    
 -closureN_type c_7326151;
 -object e_7327047 [4];
@@ -9408,19 +9402,19 @@ Make let-values be the same as let*-values, to work around
 -c_7326151.elements[1] = ((closureN)self_7314059)->elements[1];
 -c_7326151.elements[2] = ((closureN)self_7314059)->elements[3];
 -c_7326151.elements[3] = tmp_732241_732243_732415_733850;
-+closureN_type c_7323699;
-+object e_7324595 [4];
-+c_7323699.hdr.mark = gc_color_red;
-+ c_7323699.hdr.grayed = 0;
-+c_7323699.tag = closureN_tag;
-+ c_7323699.fn = (function_type)__lambda_1099;
-+c_7323699.num_args = 0;
-+c_7323699.num_elements = 4;
-+c_7323699.elements = (object *)e_7324595;
-+c_7323699.elements[0] = ((closureN)self_7312766)->elements[0];
-+c_7323699.elements[1] = ((closureN)self_7312766)->elements[1];
-+c_7323699.elements[2] = ((closureN)self_7312766)->elements[3];
-+c_7323699.elements[3] = tmp_731900_731902_732074_733405;
++closureN_type c_7323692;
++object e_7324588 [4];
++c_7323692.hdr.mark = gc_color_red;
++ c_7323692.hdr.grayed = 0;
++c_7323692.tag = closureN_tag;
++ c_7323692.fn = (function_type)__lambda_1099;
++c_7323692.num_args = 0;
++c_7323692.num_elements = 4;
++c_7323692.elements = (object *)e_7324588;
++c_7323692.elements[0] = ((closureN)self_7312759)->elements[0];
++c_7323692.elements[1] = ((closureN)self_7312759)->elements[1];
++c_7323692.elements[2] = ((closureN)self_7312759)->elements[3];
++c_7323692.elements[3] = tmp_731894_731896_732068_733398;
  
  
 -closureN_type c_7327048;
@@ -9433,41 +9427,41 @@ Make let-values be the same as let*-values, to work around
 -c_7327048.num_elements = 1;
 -c_7327048.elements = (object *)e_7327053;
 -c_7327048.elements[0] = ((closureN)self_7314059)->elements[2];
-+closureN_type c_7324596;
-+object e_7324601 [1];
-+c_7324596.hdr.mark = gc_color_red;
-+ c_7324596.hdr.grayed = 0;
-+c_7324596.tag = closureN_tag;
-+ c_7324596.fn = (function_type)__lambda_1142;
-+c_7324596.num_args = 1;
-+c_7324596.num_elements = 1;
-+c_7324596.elements = (object *)e_7324601;
-+c_7324596.elements[0] = ((closureN)self_7312766)->elements[2];
++closureN_type c_7324589;
++object e_7324594 [1];
++c_7324589.hdr.mark = gc_color_red;
++ c_7324589.hdr.grayed = 0;
++c_7324589.tag = closureN_tag;
++ c_7324589.fn = (function_type)__lambda_1142;
++c_7324589.num_args = 1;
++c_7324589.num_elements = 1;
++c_7324589.elements = (object *)e_7324594;
++c_7324589.elements[0] = ((closureN)self_7312759)->elements[2];
  
 -return_direct_with_clo1(data,(closure)&c_7326151,__lambda_1146,  &c_7327048);; 
-+return_direct_with_clo1(data,(closure)&c_7323699,__lambda_1099,  &c_7324596);; 
++return_direct_with_clo1(data,(closure)&c_7323692,__lambda_1099,  &c_7324589);; 
  }
  
 -static void __lambda_1189(void *data, object self_7314060, int argc, object *args) /* object self_7314060, object r_737457 */
-+static void __lambda_1142(void *data, object self_7312767, int argc, object *args) /* object self_7312767, object r_736689 */
++static void __lambda_1142(void *data, object self_7312760, int argc, object *args) /* object self_7312760, object r_736682 */
   {
 - object r_737457 = args[0];
-+ object r_736689 = args[0];
++ object r_736682 = args[0];
    
  
 -return_direct_with_clo1(data,  ((closureN)self_7314060)->elements[0], (((closure)  ((closureN)self_7314060)->elements[0])->fn),  Cyc_car(data, r_737457));; 
-+return_direct_with_clo1(data,  ((closureN)self_7312767)->elements[0], (((closure)  ((closureN)self_7312767)->elements[0])->fn),  Cyc_car(data, r_736689));; 
++return_direct_with_clo1(data,  ((closureN)self_7312760)->elements[0], (((closure)  ((closureN)self_7312760)->elements[0])->fn),  Cyc_car(data, r_736682));; 
  }
  
 -static void __lambda_1146(void *data, object self_7314061, int argc, object *args) /* object self_7314061, object k_737459 */
-+static void __lambda_1099(void *data, object self_7312768, int argc, object *args) /* object self_7312768, object k_736691 */
++static void __lambda_1099(void *data, object self_7312761, int argc, object *args) /* object self_7312761, object k_736684 */
   {
 - object k_737459 = args[0];
 -  if( (boolean_f != ((closureN)self_7314061)->elements[3]) ){ 
 -  return_direct_with_clo1(data,  k_737459, (((closure)  k_737459)->fn),  ((closureN)self_7314061)->elements[3]);
-+ object k_736691 = args[0];
-+  if( (boolean_f != ((closureN)self_7312768)->elements[3]) ){ 
-+  return_direct_with_clo1(data,  k_736691, (((closure)  k_736691)->fn),  ((closureN)self_7312768)->elements[3]);
++ object k_736684 = args[0];
++  if( (boolean_f != ((closureN)self_7312761)->elements[3]) ){ 
++  return_direct_with_clo1(data,  k_736684, (((closure)  k_736684)->fn),  ((closureN)self_7312761)->elements[3]);
  } else { 
    
 -closureN_type c_7326156;
@@ -9483,32 +9477,32 @@ Make let-values be the same as let*-values, to work around
 -c_7326156.elements[1] = ((closureN)self_7314061)->elements[1];
 -c_7326156.elements[2] = k_737459;
 -c_7326156.elements[3] = ((closureN)self_7314061)->elements[2];
-+closureN_type c_7323704;
-+object e_7324591 [4];
-+c_7323704.hdr.mark = gc_color_red;
-+ c_7323704.hdr.grayed = 0;
-+c_7323704.tag = closureN_tag;
-+ c_7323704.fn = (function_type)__lambda_1100;
-+c_7323704.num_args = 1;
-+c_7323704.num_elements = 4;
-+c_7323704.elements = (object *)e_7324591;
-+c_7323704.elements[0] = ((closureN)self_7312768)->elements[0];
-+c_7323704.elements[1] = ((closureN)self_7312768)->elements[1];
-+c_7323704.elements[2] = k_736691;
-+c_7323704.elements[3] = ((closureN)self_7312768)->elements[2];
++closureN_type c_7323697;
++object e_7324584 [4];
++c_7323697.hdr.mark = gc_color_red;
++ c_7323697.hdr.grayed = 0;
++c_7323697.tag = closureN_tag;
++ c_7323697.fn = (function_type)__lambda_1100;
++c_7323697.num_args = 1;
++c_7323697.num_elements = 4;
++c_7323697.elements = (object *)e_7324584;
++c_7323697.elements[0] = ((closureN)self_7312761)->elements[0];
++c_7323697.elements[1] = ((closureN)self_7312761)->elements[1];
++c_7323697.elements[2] = k_736684;
++c_7323697.elements[3] = ((closureN)self_7312761)->elements[2];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7326156,__lambda_1147,  Cyc_cdr(data, ((closureN)self_7314061)->elements[1]));}
-+return_direct_with_clo1(data,(closure)&c_7323704,__lambda_1100,  Cyc_cdr(data, ((closureN)self_7312768)->elements[1]));}
++return_direct_with_clo1(data,(closure)&c_7323697,__lambda_1100,  Cyc_cdr(data, ((closureN)self_7312761)->elements[1]));}
  ;; 
  }
  
 -static void __lambda_1147(void *data, object self_7314062, int argc, object *args) /* object self_7314062, object v_9310_732177_732371_732492_733927 */
-+static void __lambda_1100(void *data, object self_7312769, int argc, object *args) /* object self_7312769, object v_9310_731836_732030_732151_733482 */
++static void __lambda_1100(void *data, object self_7312762, int argc, object *args) /* object self_7312762, object v_9310_731830_732024_732145_733475 */
   {
 - object v_9310_732177_732371_732492_733927 = args[0];
-+ object v_9310_731836_732030_732151_733482 = args[0];
++ object v_9310_731830_732024_732145_733475 = args[0];
    
 -closureN_type c_7326158;
 -object e_7326329 [3];
@@ -9522,18 +9516,18 @@ Make let-values be the same as let*-values, to work around
 -c_7326158.elements[0] = ((closureN)self_7314062)->elements[0];
 -c_7326158.elements[1] = ((closureN)self_7314062)->elements[3];
 -c_7326158.elements[2] = v_9310_732177_732371_732492_733927;
-+closureN_type c_7323706;
-+object e_7323877 [3];
-+c_7323706.hdr.mark = gc_color_red;
-+ c_7323706.hdr.grayed = 0;
-+c_7323706.tag = closureN_tag;
-+ c_7323706.fn = (function_type)__lambda_1101;
-+c_7323706.num_args = 0;
-+c_7323706.num_elements = 3;
-+c_7323706.elements = (object *)e_7323877;
-+c_7323706.elements[0] = ((closureN)self_7312769)->elements[0];
-+c_7323706.elements[1] = ((closureN)self_7312769)->elements[3];
-+c_7323706.elements[2] = v_9310_731836_732030_732151_733482;
++closureN_type c_7323699;
++object e_7323870 [3];
++c_7323699.hdr.mark = gc_color_red;
++ c_7323699.hdr.grayed = 0;
++c_7323699.tag = closureN_tag;
++ c_7323699.fn = (function_type)__lambda_1101;
++c_7323699.num_args = 0;
++c_7323699.num_elements = 3;
++c_7323699.elements = (object *)e_7323870;
++c_7323699.elements[0] = ((closureN)self_7312762)->elements[0];
++c_7323699.elements[1] = ((closureN)self_7312762)->elements[3];
++c_7323699.elements[2] = v_9310_731830_732024_732145_733475;
  
  
 -closureN_type c_7326330;
@@ -9549,33 +9543,33 @@ Make let-values be the same as let*-values, to work around
 -c_7326330.elements[1] = ((closureN)self_7314062)->elements[1];
 -c_7326330.elements[2] = ((closureN)self_7314062)->elements[2];
 -c_7326330.elements[3] = ((closureN)self_7314062)->elements[3];
-+closureN_type c_7323878;
-+object e_7324590 [4];
-+c_7323878.hdr.mark = gc_color_red;
-+ c_7323878.hdr.grayed = 0;
-+c_7323878.tag = closureN_tag;
-+ c_7323878.fn = (function_type)__lambda_1109;
-+c_7323878.num_args = 1;
-+c_7323878.num_elements = 4;
-+c_7323878.elements = (object *)e_7324590;
-+c_7323878.elements[0] = ((closureN)self_7312769)->elements[0];
-+c_7323878.elements[1] = ((closureN)self_7312769)->elements[1];
-+c_7323878.elements[2] = ((closureN)self_7312769)->elements[2];
-+c_7323878.elements[3] = ((closureN)self_7312769)->elements[3];
++closureN_type c_7323871;
++object e_7324583 [4];
++c_7323871.hdr.mark = gc_color_red;
++ c_7323871.hdr.grayed = 0;
++c_7323871.tag = closureN_tag;
++ c_7323871.fn = (function_type)__lambda_1109;
++c_7323871.num_args = 1;
++c_7323871.num_elements = 4;
++c_7323871.elements = (object *)e_7324583;
++c_7323871.elements[0] = ((closureN)self_7312762)->elements[0];
++c_7323871.elements[1] = ((closureN)self_7312762)->elements[1];
++c_7323871.elements[2] = ((closureN)self_7312762)->elements[2];
++c_7323871.elements[3] = ((closureN)self_7312762)->elements[3];
  
 -return_direct_with_clo1(data,(closure)&c_7326158,__lambda_1148,  &c_7326330);; 
-+return_direct_with_clo1(data,(closure)&c_7323706,__lambda_1101,  &c_7323878);; 
++return_direct_with_clo1(data,(closure)&c_7323699,__lambda_1101,  &c_7323871);; 
  }
  
 -static void __lambda_1156(void *data, object self_7314063, int argc, object *args) /* object self_7314063, object tmp_732245_732247_732416_733851 */
-+static void __lambda_1109(void *data, object self_7312770, int argc, object *args) /* object self_7312770, object tmp_731904_731906_732075_733406 */
++static void __lambda_1109(void *data, object self_7312763, int argc, object *args) /* object self_7312763, object tmp_731898_731900_732069_733399 */
   {
 - object tmp_732245_732247_732416_733851 = args[0];
 -  if( (boolean_f != tmp_732245_732247_732416_733851) ){ 
 -  return_direct_with_clo1(data,  ((closureN)self_7314063)->elements[2], (((closure)  ((closureN)self_7314063)->elements[2])->fn),  tmp_732245_732247_732416_733851);
-+ object tmp_731904_731906_732075_733406 = args[0];
-+  if( (boolean_f != tmp_731904_731906_732075_733406) ){ 
-+  return_direct_with_clo1(data,  ((closureN)self_7312770)->elements[2], (((closure)  ((closureN)self_7312770)->elements[2])->fn),  tmp_731904_731906_732075_733406);
++ object tmp_731898_731900_732069_733399 = args[0];
++  if( (boolean_f != tmp_731898_731900_732069_733399) ){ 
++  return_direct_with_clo1(data,  ((closureN)self_7312763)->elements[2], (((closure)  ((closureN)self_7312763)->elements[2])->fn),  tmp_731898_731900_732069_733399);
  } else { 
    
 -closureN_type c_7326334;
@@ -9591,32 +9585,32 @@ Make let-values be the same as let*-values, to work around
 -c_7326334.elements[1] = ((closureN)self_7314063)->elements[1];
 -c_7326334.elements[2] = ((closureN)self_7314063)->elements[2];
 -c_7326334.elements[3] = ((closureN)self_7314063)->elements[3];
-+closureN_type c_7323882;
-+object e_7324586 [4];
-+c_7323882.hdr.mark = gc_color_red;
-+ c_7323882.hdr.grayed = 0;
-+c_7323882.tag = closureN_tag;
-+ c_7323882.fn = (function_type)__lambda_1110;
-+c_7323882.num_args = 1;
-+c_7323882.num_elements = 4;
-+c_7323882.elements = (object *)e_7324586;
-+c_7323882.elements[0] = ((closureN)self_7312770)->elements[0];
-+c_7323882.elements[1] = ((closureN)self_7312770)->elements[1];
-+c_7323882.elements[2] = ((closureN)self_7312770)->elements[2];
-+c_7323882.elements[3] = ((closureN)self_7312770)->elements[3];
++closureN_type c_7323875;
++object e_7324579 [4];
++c_7323875.hdr.mark = gc_color_red;
++ c_7323875.hdr.grayed = 0;
++c_7323875.tag = closureN_tag;
++ c_7323875.fn = (function_type)__lambda_1110;
++c_7323875.num_args = 1;
++c_7323875.num_elements = 4;
++c_7323875.elements = (object *)e_7324579;
++c_7323875.elements[0] = ((closureN)self_7312763)->elements[0];
++c_7323875.elements[1] = ((closureN)self_7312763)->elements[1];
++c_7323875.elements[2] = ((closureN)self_7312763)->elements[2];
++c_7323875.elements[3] = ((closureN)self_7312763)->elements[3];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7326334,__lambda_1157,  Cyc_cdr(data, ((closureN)self_7314063)->elements[1]));}
-+return_direct_with_clo1(data,(closure)&c_7323882,__lambda_1110,  Cyc_cdr(data, ((closureN)self_7312770)->elements[1]));}
++return_direct_with_clo1(data,(closure)&c_7323875,__lambda_1110,  Cyc_cdr(data, ((closureN)self_7312763)->elements[1]));}
  ;; 
  }
  
 -static void __lambda_1157(void *data, object self_7314064, int argc, object *args) /* object self_7314064, object v_9321_732188_732344_732474_733909 */
-+static void __lambda_1110(void *data, object self_7312771, int argc, object *args) /* object self_7312771, object v_9321_731847_732003_732133_733464 */
++static void __lambda_1110(void *data, object self_7312764, int argc, object *args) /* object self_7312764, object v_9321_731841_731997_732127_733457 */
   {
 - object v_9321_732188_732344_732474_733909 = args[0];
-+ object v_9321_731847_732003_732133_733464 = args[0];
++ object v_9321_731841_731997_732127_733457 = args[0];
    
 -closureN_type c_7326336;
 -object e_7326547 [3];
@@ -9630,18 +9624,18 @@ Make let-values be the same as let*-values, to work around
 -c_7326336.elements[0] = ((closureN)self_7314064)->elements[0];
 -c_7326336.elements[1] = ((closureN)self_7314064)->elements[3];
 -c_7326336.elements[2] = v_9321_732188_732344_732474_733909;
-+closureN_type c_7323884;
-+object e_7324095 [3];
-+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 = 0;
-+c_7323884.num_elements = 3;
-+c_7323884.elements = (object *)e_7324095;
-+c_7323884.elements[0] = ((closureN)self_7312771)->elements[0];
-+c_7323884.elements[1] = ((closureN)self_7312771)->elements[3];
-+c_7323884.elements[2] = v_9321_731847_732003_732133_733464;
++closureN_type c_7323877;
++object e_7324088 [3];
++c_7323877.hdr.mark = gc_color_red;
++ c_7323877.hdr.grayed = 0;
++c_7323877.tag = closureN_tag;
++ c_7323877.fn = (function_type)__lambda_1111;
++c_7323877.num_args = 0;
++c_7323877.num_elements = 3;
++c_7323877.elements = (object *)e_7324088;
++c_7323877.elements[0] = ((closureN)self_7312764)->elements[0];
++c_7323877.elements[1] = ((closureN)self_7312764)->elements[3];
++c_7323877.elements[2] = v_9321_731841_731997_732127_733457;
  
  
 -closureN_type c_7326548;
@@ -9656,32 +9650,32 @@ Make let-values be the same as let*-values, to work around
 -c_7326548.elements[0] = ((closureN)self_7314064)->elements[1];
 -c_7326548.elements[1] = ((closureN)self_7314064)->elements[2];
 -c_7326548.elements[2] = ((closureN)self_7314064)->elements[3];
-+closureN_type c_7324096;
-+object e_7324585 [3];
-+c_7324096.hdr.mark = gc_color_red;
-+ c_7324096.hdr.grayed = 0;
-+c_7324096.tag = closureN_tag;
-+ c_7324096.fn = (function_type)__lambda_1120;
-+c_7324096.num_args = 1;
-+c_7324096.num_elements = 3;
-+c_7324096.elements = (object *)e_7324585;
-+c_7324096.elements[0] = ((closureN)self_7312771)->elements[1];
-+c_7324096.elements[1] = ((closureN)self_7312771)->elements[2];
-+c_7324096.elements[2] = ((closureN)self_7312771)->elements[3];
++closureN_type c_7324089;
++object e_7324578 [3];
++c_7324089.hdr.mark = gc_color_red;
++ c_7324089.hdr.grayed = 0;
++c_7324089.tag = closureN_tag;
++ c_7324089.fn = (function_type)__lambda_1120;
++c_7324089.num_args = 1;
++c_7324089.num_elements = 3;
++c_7324089.elements = (object *)e_7324578;
++c_7324089.elements[0] = ((closureN)self_7312764)->elements[1];
++c_7324089.elements[1] = ((closureN)self_7312764)->elements[2];
++c_7324089.elements[2] = ((closureN)self_7312764)->elements[3];
  
 -return_direct_with_clo1(data,(closure)&c_7326336,__lambda_1158,  &c_7326548);; 
-+return_direct_with_clo1(data,(closure)&c_7323884,__lambda_1111,  &c_7324096);; 
++return_direct_with_clo1(data,(closure)&c_7323877,__lambda_1111,  &c_7324089);; 
  }
  
 -static void __lambda_1167(void *data, object self_7314065, int argc, object *args) /* object self_7314065, object tmp_732249_732251_732417_733852 */
-+static void __lambda_1120(void *data, object self_7312772, int argc, object *args) /* object self_7312772, object tmp_731908_731910_732076_733407 */
++static void __lambda_1120(void *data, object self_7312765, int argc, object *args) /* object self_7312765, object tmp_731902_731904_732070_733400 */
   {
 - object tmp_732249_732251_732417_733852 = args[0];
 -  if( (boolean_f != tmp_732249_732251_732417_733852) ){ 
 -  return_direct_with_clo1(data,  ((closureN)self_7314065)->elements[1], (((closure)  ((closureN)self_7314065)->elements[1])->fn),  tmp_732249_732251_732417_733852);
-+ object tmp_731908_731910_732076_733407 = args[0];
-+  if( (boolean_f != tmp_731908_731910_732076_733407) ){ 
-+  return_direct_with_clo1(data,  ((closureN)self_7312772)->elements[1], (((closure)  ((closureN)self_7312772)->elements[1])->fn),  tmp_731908_731910_732076_733407);
++ object tmp_731902_731904_732070_733400 = args[0];
++  if( (boolean_f != tmp_731902_731904_732070_733400) ){ 
++  return_direct_with_clo1(data,  ((closureN)self_7312765)->elements[1], (((closure)  ((closureN)self_7312765)->elements[1])->fn),  tmp_731902_731904_732070_733400);
  } else { 
    
 -closureN_type c_7326552;
@@ -9696,31 +9690,31 @@ Make let-values be the same as let*-values, to work around
 -c_7326552.elements[0] = ((closureN)self_7314065)->elements[0];
 -c_7326552.elements[1] = ((closureN)self_7314065)->elements[1];
 -c_7326552.elements[2] = ((closureN)self_7314065)->elements[2];
-+closureN_type c_7324100;
-+object e_7324581 [3];
-+c_7324100.hdr.mark = gc_color_red;
-+ c_7324100.hdr.grayed = 0;
-+c_7324100.tag = closureN_tag;
-+ c_7324100.fn = (function_type)__lambda_1121;
-+c_7324100.num_args = 1;
-+c_7324100.num_elements = 3;
-+c_7324100.elements = (object *)e_7324581;
-+c_7324100.elements[0] = ((closureN)self_7312772)->elements[0];
-+c_7324100.elements[1] = ((closureN)self_7312772)->elements[1];
-+c_7324100.elements[2] = ((closureN)self_7312772)->elements[2];
++closureN_type c_7324093;
++object e_7324574 [3];
++c_7324093.hdr.mark = gc_color_red;
++ c_7324093.hdr.grayed = 0;
++c_7324093.tag = closureN_tag;
++ c_7324093.fn = (function_type)__lambda_1121;
++c_7324093.num_args = 1;
++c_7324093.num_elements = 3;
++c_7324093.elements = (object *)e_7324574;
++c_7324093.elements[0] = ((closureN)self_7312765)->elements[0];
++c_7324093.elements[1] = ((closureN)self_7312765)->elements[1];
++c_7324093.elements[2] = ((closureN)self_7312765)->elements[2];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7326552,__lambda_1168,  Cyc_cdr(data, ((closureN)self_7314065)->elements[0]));}
-+return_direct_with_clo1(data,(closure)&c_7324100,__lambda_1121,  Cyc_cdr(data, ((closureN)self_7312772)->elements[0]));}
++return_direct_with_clo1(data,(closure)&c_7324093,__lambda_1121,  Cyc_cdr(data, ((closureN)self_7312765)->elements[0]));}
  ;; 
  }
  
 -static void __lambda_1168(void *data, object self_7314066, int argc, object *args) /* object self_7314066, object v_9334_732201_732330_732465_733900 */
-+static void __lambda_1121(void *data, object self_7312773, int argc, object *args) /* object self_7312773, object v_9334_731860_731989_732124_733455 */
++static void __lambda_1121(void *data, object self_7312766, int argc, object *args) /* object self_7312766, object v_9334_731854_731983_732118_733448 */
   {
 - object v_9334_732201_732330_732465_733900 = args[0];
-+ object v_9334_731860_731989_732124_733455 = args[0];
++ object v_9334_731854_731983_732118_733448 = args[0];
    
 -closureN_type c_7326554;
 -object e_7326619 [2];
@@ -9733,17 +9727,17 @@ Make let-values be the same as let*-values, to work around
 -c_7326554.elements = (object *)e_7326619;
 -c_7326554.elements[0] = ((closureN)self_7314066)->elements[2];
 -c_7326554.elements[1] = v_9334_732201_732330_732465_733900;
-+closureN_type c_7324102;
-+object e_7324167 [2];
-+c_7324102.hdr.mark = gc_color_red;
-+ c_7324102.hdr.grayed = 0;
-+c_7324102.tag = closureN_tag;
-+ c_7324102.fn = (function_type)__lambda_1122;
-+c_7324102.num_args = 0;
-+c_7324102.num_elements = 2;
-+c_7324102.elements = (object *)e_7324167;
-+c_7324102.elements[0] = ((closureN)self_7312773)->elements[2];
-+c_7324102.elements[1] = v_9334_731860_731989_732124_733455;
++closureN_type c_7324095;
++object e_7324160 [2];
++c_7324095.hdr.mark = gc_color_red;
++ c_7324095.hdr.grayed = 0;
++c_7324095.tag = closureN_tag;
++ c_7324095.fn = (function_type)__lambda_1122;
++c_7324095.num_args = 0;
++c_7324095.num_elements = 2;
++c_7324095.elements = (object *)e_7324160;
++c_7324095.elements[0] = ((closureN)self_7312766)->elements[2];
++c_7324095.elements[1] = v_9334_731854_731983_732118_733448;
  
  
 -closureN_type c_7326620;
@@ -9758,32 +9752,32 @@ Make let-values be the same as let*-values, to work around
 -c_7326620.elements[0] = ((closureN)self_7314066)->elements[0];
 -c_7326620.elements[1] = ((closureN)self_7314066)->elements[1];
 -c_7326620.elements[2] = ((closureN)self_7314066)->elements[2];
-+closureN_type c_7324168;
-+object e_7324580 [3];
-+c_7324168.hdr.mark = gc_color_red;
-+ c_7324168.hdr.grayed = 0;
-+c_7324168.tag = closureN_tag;
-+ c_7324168.fn = (function_type)__lambda_1124;
-+c_7324168.num_args = 1;
-+c_7324168.num_elements = 3;
-+c_7324168.elements = (object *)e_7324580;
-+c_7324168.elements[0] = ((closureN)self_7312773)->elements[0];
-+c_7324168.elements[1] = ((closureN)self_7312773)->elements[1];
-+c_7324168.elements[2] = ((closureN)self_7312773)->elements[2];
++closureN_type c_7324161;
++object e_7324573 [3];
++c_7324161.hdr.mark = gc_color_red;
++ c_7324161.hdr.grayed = 0;
++c_7324161.tag = closureN_tag;
++ c_7324161.fn = (function_type)__lambda_1124;
++c_7324161.num_args = 1;
++c_7324161.num_elements = 3;
++c_7324161.elements = (object *)e_7324573;
++c_7324161.elements[0] = ((closureN)self_7312766)->elements[0];
++c_7324161.elements[1] = ((closureN)self_7312766)->elements[1];
++c_7324161.elements[2] = ((closureN)self_7312766)->elements[2];
  
 -return_direct_with_clo1(data,(closure)&c_7326554,__lambda_1169,  &c_7326620);; 
-+return_direct_with_clo1(data,(closure)&c_7324102,__lambda_1122,  &c_7324168);; 
++return_direct_with_clo1(data,(closure)&c_7324095,__lambda_1122,  &c_7324161);; 
  }
  
 -static void __lambda_1171(void *data, object self_7314067, int argc, object *args) /* object self_7314067, object tmp_732253_732255_732418_733853 */
-+static void __lambda_1124(void *data, object self_7312774, int argc, object *args) /* object self_7312774, object tmp_731912_731914_732077_733408 */
++static void __lambda_1124(void *data, object self_7312767, int argc, object *args) /* object self_7312767, object tmp_731906_731908_732071_733401 */
   {
 - object tmp_732253_732255_732418_733853 = args[0];
 -  if( (boolean_f != tmp_732253_732255_732418_733853) ){ 
 -  return_direct_with_clo1(data,  ((closureN)self_7314067)->elements[1], (((closure)  ((closureN)self_7314067)->elements[1])->fn),  tmp_732253_732255_732418_733853);
-+ object tmp_731912_731914_732077_733408 = args[0];
-+  if( (boolean_f != tmp_731912_731914_732077_733408) ){ 
-+  return_direct_with_clo1(data,  ((closureN)self_7312774)->elements[1], (((closure)  ((closureN)self_7312774)->elements[1])->fn),  tmp_731912_731914_732077_733408);
++ object tmp_731906_731908_732071_733401 = args[0];
++  if( (boolean_f != tmp_731906_731908_732071_733401) ){ 
++  return_direct_with_clo1(data,  ((closureN)self_7312767)->elements[1], (((closure)  ((closureN)self_7312767)->elements[1])->fn),  tmp_731906_731908_732071_733401);
  } else { 
    
 -closureN_type c_7326624;
@@ -9798,31 +9792,31 @@ Make let-values be the same as let*-values, to work around
 -c_7326624.elements[0] = ((closureN)self_7314067)->elements[0];
 -c_7326624.elements[1] = ((closureN)self_7314067)->elements[1];
 -c_7326624.elements[2] = ((closureN)self_7314067)->elements[2];
-+closureN_type c_7324172;
-+object e_7324576 [3];
-+c_7324172.hdr.mark = gc_color_red;
-+ c_7324172.hdr.grayed = 0;
-+c_7324172.tag = closureN_tag;
-+ c_7324172.fn = (function_type)__lambda_1125;
-+c_7324172.num_args = 1;
-+c_7324172.num_elements = 3;
-+c_7324172.elements = (object *)e_7324576;
-+c_7324172.elements[0] = ((closureN)self_7312774)->elements[0];
-+c_7324172.elements[1] = ((closureN)self_7312774)->elements[1];
-+c_7324172.elements[2] = ((closureN)self_7312774)->elements[2];
++closureN_type c_7324165;
++object e_7324569 [3];
++c_7324165.hdr.mark = gc_color_red;
++ c_7324165.hdr.grayed = 0;
++c_7324165.tag = closureN_tag;
++ c_7324165.fn = (function_type)__lambda_1125;
++c_7324165.num_args = 1;
++c_7324165.num_elements = 3;
++c_7324165.elements = (object *)e_7324569;
++c_7324165.elements[0] = ((closureN)self_7312767)->elements[0];
++c_7324165.elements[1] = ((closureN)self_7312767)->elements[1];
++c_7324165.elements[2] = ((closureN)self_7312767)->elements[2];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7326624,__lambda_1172,  Cyc_cdr(data, ((closureN)self_7314067)->elements[0]));}
-+return_direct_with_clo1(data,(closure)&c_7324172,__lambda_1125,  Cyc_cdr(data, ((closureN)self_7312774)->elements[0]));}
++return_direct_with_clo1(data,(closure)&c_7324165,__lambda_1125,  Cyc_cdr(data, ((closureN)self_7312767)->elements[0]));}
  ;; 
  }
  
 -static void __lambda_1172(void *data, object self_7314068, int argc, object *args) /* object self_7314068, object v_9341_732208_732311_732452_733887 */
-+static void __lambda_1125(void *data, object self_7312775, int argc, object *args) /* object self_7312775, object v_9341_731867_731970_732111_733442 */
++static void __lambda_1125(void *data, object self_7312768, int argc, object *args) /* object self_7312768, object v_9341_731861_731964_732105_733435 */
   {
 - object v_9341_732208_732311_732452_733887 = args[0];
-+ object v_9341_731867_731970_732111_733442 = args[0];
++ object v_9341_731861_731964_732105_733435 = args[0];
    
 -closureN_type c_7326626;
 -object e_7326730 [2];
@@ -9835,17 +9829,17 @@ Make let-values be the same as let*-values, to work around
 -c_7326626.elements = (object *)e_7326730;
 -c_7326626.elements[0] = ((closureN)self_7314068)->elements[2];
 -c_7326626.elements[1] = v_9341_732208_732311_732452_733887;
-+closureN_type c_7324174;
-+object e_7324278 [2];
-+c_7324174.hdr.mark = gc_color_red;
-+ c_7324174.hdr.grayed = 0;
-+c_7324174.tag = closureN_tag;
-+ c_7324174.fn = (function_type)__lambda_1126;
-+c_7324174.num_args = 0;
-+c_7324174.num_elements = 2;
-+c_7324174.elements = (object *)e_7324278;
-+c_7324174.elements[0] = ((closureN)self_7312775)->elements[2];
-+c_7324174.elements[1] = v_9341_731867_731970_732111_733442;
++closureN_type c_7324167;
++object e_7324271 [2];
++c_7324167.hdr.mark = gc_color_red;
++ c_7324167.hdr.grayed = 0;
++c_7324167.tag = closureN_tag;
++ c_7324167.fn = (function_type)__lambda_1126;
++c_7324167.num_args = 0;
++c_7324167.num_elements = 2;
++c_7324167.elements = (object *)e_7324271;
++c_7324167.elements[0] = ((closureN)self_7312768)->elements[2];
++c_7324167.elements[1] = v_9341_731861_731964_732105_733435;
  
  
 -closureN_type c_7326731;
@@ -9860,32 +9854,32 @@ Make let-values be the same as let*-values, to work around
 -c_7326731.elements[0] = ((closureN)self_7314068)->elements[0];
 -c_7326731.elements[1] = ((closureN)self_7314068)->elements[1];
 -c_7326731.elements[2] = ((closureN)self_7314068)->elements[2];
-+closureN_type c_7324279;
-+object e_7324575 [3];
-+c_7324279.hdr.mark = gc_color_red;
-+ c_7324279.hdr.grayed = 0;
-+c_7324279.tag = closureN_tag;
-+ c_7324279.fn = (function_type)__lambda_1129;
-+c_7324279.num_args = 1;
-+c_7324279.num_elements = 3;
-+c_7324279.elements = (object *)e_7324575;
-+c_7324279.elements[0] = ((closureN)self_7312775)->elements[0];
-+c_7324279.elements[1] = ((closureN)self_7312775)->elements[1];
-+c_7324279.elements[2] = ((closureN)self_7312775)->elements[2];
++closureN_type c_7324272;
++object e_7324568 [3];
++c_7324272.hdr.mark = gc_color_red;
++ c_7324272.hdr.grayed = 0;
++c_7324272.tag = closureN_tag;
++ c_7324272.fn = (function_type)__lambda_1129;
++c_7324272.num_args = 1;
++c_7324272.num_elements = 3;
++c_7324272.elements = (object *)e_7324568;
++c_7324272.elements[0] = ((closureN)self_7312768)->elements[0];
++c_7324272.elements[1] = ((closureN)self_7312768)->elements[1];
++c_7324272.elements[2] = ((closureN)self_7312768)->elements[2];
  
 -return_direct_with_clo1(data,(closure)&c_7326626,__lambda_1173,  &c_7326731);; 
-+return_direct_with_clo1(data,(closure)&c_7324174,__lambda_1126,  &c_7324279);; 
++return_direct_with_clo1(data,(closure)&c_7324167,__lambda_1126,  &c_7324272);; 
  }
  
 -static void __lambda_1176(void *data, object self_7314069, int argc, object *args) /* object self_7314069, object tmp_732257_732259_732419_733854 */
-+static void __lambda_1129(void *data, object self_7312776, int argc, object *args) /* object self_7312776, object tmp_731916_731918_732078_733409 */
++static void __lambda_1129(void *data, object self_7312769, int argc, object *args) /* object self_7312769, object tmp_731910_731912_732072_733402 */
   {
 - object tmp_732257_732259_732419_733854 = args[0];
 -  if( (boolean_f != tmp_732257_732259_732419_733854) ){ 
 -  return_direct_with_clo1(data,  ((closureN)self_7314069)->elements[1], (((closure)  ((closureN)self_7314069)->elements[1])->fn),  tmp_732257_732259_732419_733854);
-+ object tmp_731916_731918_732078_733409 = args[0];
-+  if( (boolean_f != tmp_731916_731918_732078_733409) ){ 
-+  return_direct_with_clo1(data,  ((closureN)self_7312776)->elements[1], (((closure)  ((closureN)self_7312776)->elements[1])->fn),  tmp_731916_731918_732078_733409);
++ object tmp_731910_731912_732072_733402 = args[0];
++  if( (boolean_f != tmp_731910_731912_732072_733402) ){ 
++  return_direct_with_clo1(data,  ((closureN)self_7312769)->elements[1], (((closure)  ((closureN)self_7312769)->elements[1])->fn),  tmp_731910_731912_732072_733402);
  } else { 
    
 -closureN_type c_7326735;
@@ -9900,31 +9894,31 @@ Make let-values be the same as let*-values, to work around
 -c_7326735.elements[0] = ((closureN)self_7314069)->elements[0];
 -c_7326735.elements[1] = ((closureN)self_7314069)->elements[1];
 -c_7326735.elements[2] = ((closureN)self_7314069)->elements[2];
-+closureN_type c_7324283;
-+object e_7324571 [3];
-+c_7324283.hdr.mark = gc_color_red;
-+ c_7324283.hdr.grayed = 0;
-+c_7324283.tag = closureN_tag;
-+ c_7324283.fn = (function_type)__lambda_1130;
-+c_7324283.num_args = 1;
-+c_7324283.num_elements = 3;
-+c_7324283.elements = (object *)e_7324571;
-+c_7324283.elements[0] = ((closureN)self_7312776)->elements[0];
-+c_7324283.elements[1] = ((closureN)self_7312776)->elements[1];
-+c_7324283.elements[2] = ((closureN)self_7312776)->elements[2];
++closureN_type c_7324276;
++object e_7324564 [3];
++c_7324276.hdr.mark = gc_color_red;
++ c_7324276.hdr.grayed = 0;
++c_7324276.tag = closureN_tag;
++ c_7324276.fn = (function_type)__lambda_1130;
++c_7324276.num_args = 1;
++c_7324276.num_elements = 3;
++c_7324276.elements = (object *)e_7324564;
++c_7324276.elements[0] = ((closureN)self_7312769)->elements[0];
++c_7324276.elements[1] = ((closureN)self_7312769)->elements[1];
++c_7324276.elements[2] = ((closureN)self_7312769)->elements[2];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7326735,__lambda_1177,  Cyc_cdr(data, ((closureN)self_7314069)->elements[0]));}
-+return_direct_with_clo1(data,(closure)&c_7324283,__lambda_1130,  Cyc_cdr(data, ((closureN)self_7312776)->elements[0]));}
++return_direct_with_clo1(data,(closure)&c_7324276,__lambda_1130,  Cyc_cdr(data, ((closureN)self_7312769)->elements[0]));}
  ;; 
  }
  
 -static void __lambda_1177(void *data, object self_7314070, int argc, object *args) /* object self_7314070, object v_9350_732217_732292_732439_733874 */
-+static void __lambda_1130(void *data, object self_7312777, int argc, object *args) /* object self_7312777, object v_9350_731876_731951_732098_733429 */
++static void __lambda_1130(void *data, object self_7312770, int argc, object *args) /* object self_7312770, object v_9350_731870_731945_732092_733422 */
   {
 - object v_9350_732217_732292_732439_733874 = args[0];
-+ object v_9350_731876_731951_732098_733429 = args[0];
++ object v_9350_731870_731945_732092_733422 = args[0];
    
 -closureN_type c_7326737;
 -object e_7326847 [2];
@@ -9937,17 +9931,17 @@ Make let-values be the same as let*-values, to work around
 -c_7326737.elements = (object *)e_7326847;
 -c_7326737.elements[0] = ((closureN)self_7314070)->elements[2];
 -c_7326737.elements[1] = v_9350_732217_732292_732439_733874;
-+closureN_type c_7324285;
-+object e_7324395 [2];
-+c_7324285.hdr.mark = gc_color_red;
-+ c_7324285.hdr.grayed = 0;
-+c_7324285.tag = closureN_tag;
-+ c_7324285.fn = (function_type)__lambda_1131;
-+c_7324285.num_args = 0;
-+c_7324285.num_elements = 2;
-+c_7324285.elements = (object *)e_7324395;
-+c_7324285.elements[0] = ((closureN)self_7312777)->elements[2];
-+c_7324285.elements[1] = v_9350_731876_731951_732098_733429;
++closureN_type c_7324278;
++object e_7324388 [2];
++c_7324278.hdr.mark = gc_color_red;
++ c_7324278.hdr.grayed = 0;
++c_7324278.tag = closureN_tag;
++ c_7324278.fn = (function_type)__lambda_1131;
++c_7324278.num_args = 0;
++c_7324278.num_elements = 2;
++c_7324278.elements = (object *)e_7324388;
++c_7324278.elements[0] = ((closureN)self_7312770)->elements[2];
++c_7324278.elements[1] = v_9350_731870_731945_732092_733422;
  
  
 -closureN_type c_7326848;
@@ -9962,32 +9956,32 @@ Make let-values be the same as let*-values, to work around
 -c_7326848.elements[0] = ((closureN)self_7314070)->elements[0];
 -c_7326848.elements[1] = ((closureN)self_7314070)->elements[1];
 -c_7326848.elements[2] = ((closureN)self_7314070)->elements[2];
-+closureN_type c_7324396;
-+object e_7324570 [3];
-+c_7324396.hdr.mark = gc_color_red;
-+ c_7324396.hdr.grayed = 0;
-+c_7324396.tag = closureN_tag;
-+ c_7324396.fn = (function_type)__lambda_1134;
-+c_7324396.num_args = 1;
-+c_7324396.num_elements = 3;
-+c_7324396.elements = (object *)e_7324570;
-+c_7324396.elements[0] = ((closureN)self_7312777)->elements[0];
-+c_7324396.elements[1] = ((closureN)self_7312777)->elements[1];
-+c_7324396.elements[2] = ((closureN)self_7312777)->elements[2];
++closureN_type c_7324389;
++object e_7324563 [3];
++c_7324389.hdr.mark = gc_color_red;
++ c_7324389.hdr.grayed = 0;
++c_7324389.tag = closureN_tag;
++ c_7324389.fn = (function_type)__lambda_1134;
++c_7324389.num_args = 1;
++c_7324389.num_elements = 3;
++c_7324389.elements = (object *)e_7324563;
++c_7324389.elements[0] = ((closureN)self_7312770)->elements[0];
++c_7324389.elements[1] = ((closureN)self_7312770)->elements[1];
++c_7324389.elements[2] = ((closureN)self_7312770)->elements[2];
  
 -return_direct_with_clo1(data,(closure)&c_7326737,__lambda_1178,  &c_7326848);; 
-+return_direct_with_clo1(data,(closure)&c_7324285,__lambda_1131,  &c_7324396);; 
++return_direct_with_clo1(data,(closure)&c_7324278,__lambda_1131,  &c_7324389);; 
  }
  
 -static void __lambda_1181(void *data, object self_7314071, int argc, object *args) /* object self_7314071, object tmp_732261_732263_732420_733855 */
-+static void __lambda_1134(void *data, object self_7312778, int argc, object *args) /* object self_7312778, object tmp_731920_731922_732079_733410 */
++static void __lambda_1134(void *data, object self_7312771, int argc, object *args) /* object self_7312771, object tmp_731914_731916_732073_733403 */
   {
 - object tmp_732261_732263_732420_733855 = args[0];
 -  if( (boolean_f != tmp_732261_732263_732420_733855) ){ 
 -  return_direct_with_clo1(data,  ((closureN)self_7314071)->elements[1], (((closure)  ((closureN)self_7314071)->elements[1])->fn),  tmp_732261_732263_732420_733855);
-+ object tmp_731920_731922_732079_733410 = args[0];
-+  if( (boolean_f != tmp_731920_731922_732079_733410) ){ 
-+  return_direct_with_clo1(data,  ((closureN)self_7312778)->elements[1], (((closure)  ((closureN)self_7312778)->elements[1])->fn),  tmp_731920_731922_732079_733410);
++ object tmp_731914_731916_732073_733403 = args[0];
++  if( (boolean_f != tmp_731914_731916_732073_733403) ){ 
++  return_direct_with_clo1(data,  ((closureN)self_7312771)->elements[1], (((closure)  ((closureN)self_7312771)->elements[1])->fn),  tmp_731914_731916_732073_733403);
  } else { 
    
 -closureN_type c_7326852;
@@ -10002,31 +9996,31 @@ Make let-values be the same as let*-values, to work around
 -c_7326852.elements[0] = ((closureN)self_7314071)->elements[0];
 -c_7326852.elements[1] = ((closureN)self_7314071)->elements[1];
 -c_7326852.elements[2] = ((closureN)self_7314071)->elements[2];
-+closureN_type c_7324400;
-+object e_7324566 [3];
-+c_7324400.hdr.mark = gc_color_red;
-+ c_7324400.hdr.grayed = 0;
-+c_7324400.tag = closureN_tag;
-+ c_7324400.fn = (function_type)__lambda_1135;
-+c_7324400.num_args = 1;
-+c_7324400.num_elements = 3;
-+c_7324400.elements = (object *)e_7324566;
-+c_7324400.elements[0] = ((closureN)self_7312778)->elements[0];
-+c_7324400.elements[1] = ((closureN)self_7312778)->elements[1];
-+c_7324400.elements[2] = ((closureN)self_7312778)->elements[2];
++closureN_type c_7324393;
++object e_7324559 [3];
++c_7324393.hdr.mark = gc_color_red;
++ c_7324393.hdr.grayed = 0;
++c_7324393.tag = closureN_tag;
++ c_7324393.fn = (function_type)__lambda_1135;
++c_7324393.num_args = 1;
++c_7324393.num_elements = 3;
++c_7324393.elements = (object *)e_7324559;
++c_7324393.elements[0] = ((closureN)self_7312771)->elements[0];
++c_7324393.elements[1] = ((closureN)self_7312771)->elements[1];
++c_7324393.elements[2] = ((closureN)self_7312771)->elements[2];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7326852,__lambda_1182,  Cyc_cdr(data, ((closureN)self_7314071)->elements[0]));}
-+return_direct_with_clo1(data,(closure)&c_7324400,__lambda_1135,  Cyc_cdr(data, ((closureN)self_7312778)->elements[0]));}
++return_direct_with_clo1(data,(closure)&c_7324393,__lambda_1135,  Cyc_cdr(data, ((closureN)self_7312771)->elements[0]));}
  ;; 
  }
  
 -static void __lambda_1182(void *data, object self_7314072, int argc, object *args) /* object self_7314072, object v_9359_732226_732268_732422_733857 */
-+static void __lambda_1135(void *data, object self_7312779, int argc, object *args) /* object self_7312779, object v_9359_731885_731927_732081_733412 */
++static void __lambda_1135(void *data, object self_7312772, int argc, object *args) /* object self_7312772, object v_9359_731879_731921_732075_733405 */
   {
 - object v_9359_732226_732268_732422_733857 = args[0];
-+ object v_9359_731885_731927_732081_733412 = args[0];
++ object v_9359_731879_731921_732075_733405 = args[0];
    
 -closureN_type c_7326854;
 -object e_7327003 [2];
@@ -10039,17 +10033,17 @@ Make let-values be the same as let*-values, to work around
 -c_7326854.elements = (object *)e_7327003;
 -c_7326854.elements[0] = ((closureN)self_7314072)->elements[2];
 -c_7326854.elements[1] = v_9359_732226_732268_732422_733857;
-+closureN_type c_7324402;
-+object e_7324551 [2];
-+c_7324402.hdr.mark = gc_color_red;
-+ c_7324402.hdr.grayed = 0;
-+c_7324402.tag = closureN_tag;
-+ c_7324402.fn = (function_type)__lambda_1136;
-+c_7324402.num_args = 0;
-+c_7324402.num_elements = 2;
-+c_7324402.elements = (object *)e_7324551;
-+c_7324402.elements[0] = ((closureN)self_7312779)->elements[2];
-+c_7324402.elements[1] = v_9359_731885_731927_732081_733412;
++closureN_type c_7324395;
++object e_7324544 [2];
++c_7324395.hdr.mark = gc_color_red;
++ c_7324395.hdr.grayed = 0;
++c_7324395.tag = closureN_tag;
++ c_7324395.fn = (function_type)__lambda_1136;
++c_7324395.num_args = 0;
++c_7324395.num_elements = 2;
++c_7324395.elements = (object *)e_7324544;
++c_7324395.elements[0] = ((closureN)self_7312772)->elements[2];
++c_7324395.elements[1] = v_9359_731879_731921_732075_733405;
  
  
 -closureN_type c_7327004;
@@ -10063,31 +10057,31 @@ Make let-values be the same as let*-values, to work around
 -c_7327004.elements = (object *)e_7327017;
 -c_7327004.elements[0] = ((closureN)self_7314072)->elements[0];
 -c_7327004.elements[1] = ((closureN)self_7314072)->elements[1];
-+closureN_type c_7324552;
-+object e_7324565 [2];
-+c_7324552.hdr.mark = gc_color_red;
-+ c_7324552.hdr.grayed = 0;
-+c_7324552.tag = closureN_tag;
-+ c_7324552.fn = (function_type)__lambda_1140;
-+c_7324552.num_args = 1;
-+c_7324552.num_elements = 2;
-+c_7324552.elements = (object *)e_7324565;
-+c_7324552.elements[0] = ((closureN)self_7312779)->elements[0];
-+c_7324552.elements[1] = ((closureN)self_7312779)->elements[1];
++closureN_type c_7324545;
++object e_7324558 [2];
++c_7324545.hdr.mark = gc_color_red;
++ c_7324545.hdr.grayed = 0;
++c_7324545.tag = closureN_tag;
++ c_7324545.fn = (function_type)__lambda_1140;
++c_7324545.num_args = 1;
++c_7324545.num_elements = 2;
++c_7324545.elements = (object *)e_7324558;
++c_7324545.elements[0] = ((closureN)self_7312772)->elements[0];
++c_7324545.elements[1] = ((closureN)self_7312772)->elements[1];
  
 -return_direct_with_clo1(data,(closure)&c_7326854,__lambda_1183,  &c_7327004);; 
-+return_direct_with_clo1(data,(closure)&c_7324402,__lambda_1136,  &c_7324552);; 
++return_direct_with_clo1(data,(closure)&c_7324395,__lambda_1136,  &c_7324545);; 
  }
  
 -static void __lambda_1187(void *data, object self_7314073, int argc, object *args) /* object self_7314073, object tmp_732265_732267_732421_733856 */
-+static void __lambda_1140(void *data, object self_7312780, int argc, object *args) /* object self_7312780, object tmp_731924_731926_732080_733411 */
++static void __lambda_1140(void *data, object self_7312773, int argc, object *args) /* object self_7312773, object tmp_731918_731920_732074_733404 */
   {
 - object tmp_732265_732267_732421_733856 = args[0];
 -  if( (boolean_f != tmp_732265_732267_732421_733856) ){ 
 -  return_direct_with_clo1(data,  ((closureN)self_7314073)->elements[1], (((closure)  ((closureN)self_7314073)->elements[1])->fn),  tmp_732265_732267_732421_733856);
-+ object tmp_731924_731926_732080_733411 = args[0];
-+  if( (boolean_f != tmp_731924_731926_732080_733411) ){ 
-+  return_direct_with_clo1(data,  ((closureN)self_7312780)->elements[1], (((closure)  ((closureN)self_7312780)->elements[1])->fn),  tmp_731924_731926_732080_733411);
++ object tmp_731918_731920_732074_733404 = args[0];
++  if( (boolean_f != tmp_731918_731920_732074_733404) ){ 
++  return_direct_with_clo1(data,  ((closureN)self_7312773)->elements[1], (((closure)  ((closureN)self_7312773)->elements[1])->fn),  tmp_731918_731920_732074_733404);
  } else { 
    
 -closureN_type c_7327008;
@@ -10100,82 +10094,82 @@ Make let-values be the same as let*-values, to work around
 -c_7327008.num_elements = 1;
 -c_7327008.elements = (object *)e_7327014;
 -c_7327008.elements[0] = ((closureN)self_7314073)->elements[1];
-+closureN_type c_7324556;
-+object e_7324562 [1];
-+c_7324556.hdr.mark = gc_color_red;
-+ c_7324556.hdr.grayed = 0;
-+c_7324556.tag = closureN_tag;
-+ c_7324556.fn = (function_type)__lambda_1141;
-+c_7324556.num_args = 1;
-+c_7324556.num_elements = 1;
-+c_7324556.elements = (object *)e_7324562;
-+c_7324556.elements[0] = ((closureN)self_7312780)->elements[1];
++closureN_type c_7324549;
++object e_7324555 [1];
++c_7324549.hdr.mark = gc_color_red;
++ c_7324549.hdr.grayed = 0;
++c_7324549.tag = closureN_tag;
++ c_7324549.fn = (function_type)__lambda_1141;
++c_7324549.num_args = 1;
++c_7324549.num_elements = 1;
++c_7324549.elements = (object *)e_7324555;
++c_7324549.elements[0] = ((closureN)self_7312773)->elements[1];
  
  
 -make_utf8_string_with_len(c_7327015, "no expansion for", 16, 16);
 -return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_7327008, &c_7327015, ((closureN)self_7314073)->elements[0]);}
-+make_utf8_string_with_len(c_7324563, "no expansion for", 16, 16);
-+return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_7324556, &c_7324563, ((closureN)self_7312780)->elements[0]);}
++make_utf8_string_with_len(c_7324556, "no expansion for", 16, 16);
++return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_7324549, &c_7324556, ((closureN)self_7312773)->elements[0]);}
  ;; 
  }
  
 -static void __lambda_1188(void *data, object self_7314074, int argc, object *args) /* object self_7314074, object r_737466 */
-+static void __lambda_1141(void *data, object self_7312781, int argc, object *args) /* object self_7312781, object r_736698 */
++static void __lambda_1141(void *data, object self_7312774, int argc, object *args) /* object self_7312774, object r_736691 */
   {
 - object r_737466 = args[0];
-+ object r_736698 = args[0];
++ object r_736691 = args[0];
    
 -pair_type local_7327013; 
 -return_direct_with_clo1(data,  ((closureN)self_7314074)->elements[0], (((closure)  ((closureN)self_7314074)->elements[0])->fn),  set_pair_as_expr(&local_7327013, r_737466, boolean_f));; 
-+pair_type local_7324561; 
-+return_direct_with_clo1(data,  ((closureN)self_7312781)->elements[0], (((closure)  ((closureN)self_7312781)->elements[0])->fn),  set_pair_as_expr(&local_7324561, r_736698, boolean_f));; 
++pair_type local_7324554; 
++return_direct_with_clo1(data,  ((closureN)self_7312774)->elements[0], (((closure)  ((closureN)self_7312774)->elements[0])->fn),  set_pair_as_expr(&local_7324554, r_736691, boolean_f));; 
  }
  
 -static void __lambda_1183(void *data, object self_7314075, int argc, object *args) /* object self_7314075, object k_737468 */
-+static void __lambda_1136(void *data, object self_7312782, int argc, object *args) /* object self_7312782, object k_736700 */
++static void __lambda_1136(void *data, object self_7312775, int argc, object *args) /* object self_7312775, object k_736693 */
   {
 - object k_737468 = args[0];
-+ object k_736700 = args[0];
++ object k_736693 = args[0];
      
 -if( (boolean_f != Cyc_is_pair(((closureN)self_7314075)->elements[1])) ){ 
-+if( (boolean_f != Cyc_is_pair(((closureN)self_7312782)->elements[1])) ){ 
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312775)->elements[1])) ){ 
      
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314075)->elements[1]))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312782)->elements[1]))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312775)->elements[1]))) ){ 
      
    
    
 -if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314075)->elements[1])))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312782)->elements[1])))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312775)->elements[1])))) ){ 
      
    
    
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314075)->elements[1]))))) ){ 
 -    complex_num_type local_7326881; 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312782)->elements[1]))))) ){ 
-+    complex_num_type local_7324429; 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312775)->elements[1]))))) ){ 
++    complex_num_type local_7324422; 
    
    
    
    
  if( (boolean_f != ((inline_function_type)
 -                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7326881, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314075)->elements[1])))))) ){ 
-+                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7324429, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312782)->elements[1])))))) ){ 
++                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7324422, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312775)->elements[1])))))) ){ 
      
    
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314075)->elements[1])))) ){ 
 -    complex_num_type local_7326900; 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312782)->elements[1])))) ){ 
-+    complex_num_type local_7324448; 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312775)->elements[1])))) ){ 
++    complex_num_type local_7324441; 
    
    
    
  if( (boolean_f != ((inline_function_type)
 -                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7326900, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314075)->elements[1]))))) ){ 
-+                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7324448, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312782)->elements[1]))))) ){ 
++                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7324441, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312775)->elements[1]))))) ){ 
    
 -closureN_type c_7326910;
 -object e_7326995 [3];
@@ -10189,56 +10183,56 @@ Make let-values be the same as let*-values, to work around
 -c_7326910.elements[0] = k_737468;
 -c_7326910.elements[1] = ((closureN)self_7314075)->elements[0];
 -c_7326910.elements[2] = ((closureN)self_7314075)->elements[1];
-+closureN_type c_7324458;
-+object e_7324543 [3];
-+c_7324458.hdr.mark = gc_color_red;
-+ c_7324458.hdr.grayed = 0;
-+c_7324458.tag = closureN_tag;
-+ c_7324458.fn = (function_type)__lambda_1137;
-+c_7324458.num_args = 1;
-+c_7324458.num_elements = 3;
-+c_7324458.elements = (object *)e_7324543;
-+c_7324458.elements[0] = k_736700;
-+c_7324458.elements[1] = ((closureN)self_7312782)->elements[0];
-+c_7324458.elements[2] = ((closureN)self_7312782)->elements[1];
++closureN_type c_7324451;
++object e_7324536 [3];
++c_7324451.hdr.mark = gc_color_red;
++ c_7324451.hdr.grayed = 0;
++c_7324451.tag = closureN_tag;
++ c_7324451.fn = (function_type)__lambda_1137;
++c_7324451.num_args = 1;
++c_7324451.num_elements = 3;
++c_7324451.elements = (object *)e_7324536;
++c_7324451.elements[0] = k_736693;
++c_7324451.elements[1] = ((closureN)self_7312775)->elements[0];
++c_7324451.elements[2] = ((closureN)self_7312775)->elements[1];
  
 -return_closcall2(data,  ((closureN)self_7314075)->elements[0],  &c_7326910, quote__if);
-+return_closcall2(data,  ((closureN)self_7312782)->elements[0],  &c_7324458, quote__if);
++return_closcall2(data,  ((closureN)self_7312775)->elements[0],  &c_7324451, quote__if);
  } else { 
 -  return_direct_with_clo1(data,  k_737468, (((closure)  k_737468)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736700, (((closure)  k_736700)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736693, (((closure)  k_736693)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_737468, (((closure)  k_737468)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736700, (((closure)  k_736700)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736693, (((closure)  k_736693)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_737468, (((closure)  k_737468)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736700, (((closure)  k_736700)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736693, (((closure)  k_736693)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_737468, (((closure)  k_737468)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736700, (((closure)  k_736700)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736693, (((closure)  k_736693)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_737468, (((closure)  k_737468)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736700, (((closure)  k_736700)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736693, (((closure)  k_736693)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_737468, (((closure)  k_737468)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736700, (((closure)  k_736700)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736693, (((closure)  k_736693)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_737468, (((closure)  k_737468)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736700, (((closure)  k_736700)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736693, (((closure)  k_736693)->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_1184(void *data, object self_7314076, int argc, object *args) /* object self_7314076, object r_737487 */
-+static void __lambda_1137(void *data, object self_7312783, int argc, object *args) /* object self_7312783, object r_736719 */
++static void __lambda_1137(void *data, object self_7312776, int argc, object *args) /* object self_7312776, object r_736712 */
   {
 - object r_737487 = args[0];
-+ object r_736719 = args[0];
++ object r_736712 = args[0];
    
 -closureN_type c_7326913;
 -object e_7326994 [4];
@@ -10253,29 +10247,29 @@ Make let-values be the same as let*-values, to work around
 -c_7326913.elements[1] = r_737487;
 -c_7326913.elements[2] = ((closureN)self_7314076)->elements[1];
 -c_7326913.elements[3] = ((closureN)self_7314076)->elements[2];
-+closureN_type c_7324461;
-+object e_7324542 [4];
-+c_7324461.hdr.mark = gc_color_red;
-+ c_7324461.hdr.grayed = 0;
-+c_7324461.tag = closureN_tag;
-+ c_7324461.fn = (function_type)__lambda_1138;
-+c_7324461.num_args = 1;
-+c_7324461.num_elements = 4;
-+c_7324461.elements = (object *)e_7324542;
-+c_7324461.elements[0] = ((closureN)self_7312783)->elements[0];
-+c_7324461.elements[1] = r_736719;
-+c_7324461.elements[2] = ((closureN)self_7312783)->elements[1];
-+c_7324461.elements[3] = ((closureN)self_7312783)->elements[2];
++closureN_type c_7324454;
++object e_7324535 [4];
++c_7324454.hdr.mark = gc_color_red;
++ c_7324454.hdr.grayed = 0;
++c_7324454.tag = closureN_tag;
++ c_7324454.fn = (function_type)__lambda_1138;
++c_7324454.num_args = 1;
++c_7324454.num_elements = 4;
++c_7324454.elements = (object *)e_7324535;
++c_7324454.elements[0] = ((closureN)self_7312776)->elements[0];
++c_7324454.elements[1] = r_736712;
++c_7324454.elements[2] = ((closureN)self_7312776)->elements[1];
++c_7324454.elements[3] = ((closureN)self_7312776)->elements[2];
  
 -return_closcall2(data,  ((closureN)self_7314076)->elements[1],  &c_7326913, quote_begin);; 
-+return_closcall2(data,  ((closureN)self_7312783)->elements[1],  &c_7324461, quote_begin);; 
++return_closcall2(data,  ((closureN)self_7312776)->elements[1],  &c_7324454, quote_begin);; 
  }
  
 -static void __lambda_1185(void *data, object self_7314077, int argc, object *args) /* object self_7314077, object r_737505 */
-+static void __lambda_1138(void *data, object self_7312784, int argc, object *args) /* object self_7312784, object r_736737 */
++static void __lambda_1138(void *data, object self_7312777, int argc, object *args) /* object self_7312777, object r_736730 */
   {
 - object r_737505 = args[0];
-+ object r_736737 = args[0];
++ object r_736730 = args[0];
    
 -closureN_type c_7326916;
 -object e_7326993 [4];
@@ -10290,38 +10284,38 @@ Make let-values be the same as let*-values, to work around
 -c_7326916.elements[1] = ((closureN)self_7314077)->elements[1];
 -c_7326916.elements[2] = r_737505;
 -c_7326916.elements[3] = ((closureN)self_7314077)->elements[3];
-+closureN_type c_7324464;
-+object e_7324541 [4];
-+c_7324464.hdr.mark = gc_color_red;
-+ c_7324464.hdr.grayed = 0;
-+c_7324464.tag = closureN_tag;
-+ c_7324464.fn = (function_type)__lambda_1139;
-+c_7324464.num_args = 1;
-+c_7324464.num_elements = 4;
-+c_7324464.elements = (object *)e_7324541;
-+c_7324464.elements[0] = ((closureN)self_7312784)->elements[0];
-+c_7324464.elements[1] = ((closureN)self_7312784)->elements[1];
-+c_7324464.elements[2] = r_736737;
-+c_7324464.elements[3] = ((closureN)self_7312784)->elements[3];
++closureN_type c_7324457;
++object e_7324534 [4];
++c_7324457.hdr.mark = gc_color_red;
++ c_7324457.hdr.grayed = 0;
++c_7324457.tag = closureN_tag;
++ c_7324457.fn = (function_type)__lambda_1139;
++c_7324457.num_args = 1;
++c_7324457.num_elements = 4;
++c_7324457.elements = (object *)e_7324534;
++c_7324457.elements[0] = ((closureN)self_7312777)->elements[0];
++c_7324457.elements[1] = ((closureN)self_7312777)->elements[1];
++c_7324457.elements[2] = r_736730;
++c_7324457.elements[3] = ((closureN)self_7312777)->elements[3];
  
 -return_closcall2(data,  ((closureN)self_7314077)->elements[2],  &c_7326916, quote_guard_91aux);; 
-+return_closcall2(data,  ((closureN)self_7312784)->elements[2],  &c_7324464, quote_guard_91aux);; 
++return_closcall2(data,  ((closureN)self_7312777)->elements[2],  &c_7324457, quote_guard_91aux);; 
  }
  
 -static void __lambda_1186(void *data, object self_7314078, int argc, object *args) /* object self_7314078, object r_737498_7311520_7311529 */
-+static void __lambda_1139(void *data, object self_7312785, int argc, object *args) /* object self_7312785, object r_736730_7310274_7310283 */
++static void __lambda_1139(void *data, object self_7312778, int argc, object *args) /* object self_7312778, object r_736723_7310267_7310276 */
   {
 - object r_737498_7311520_7311529 = args[0];
-+ object r_736730_7310274_7310283 = args[0];
++ object r_736723_7310267_7310276 = args[0];
    
 -pair_type local_7326921; 
-+pair_type local_7324469; 
++pair_type local_7324462; 
  
 -pair_type local_7326924; 
-+pair_type local_7324472; 
++pair_type local_7324465; 
  
 -pair_type local_7326928; 
-+pair_type local_7324476; 
++pair_type local_7324469; 
  
  
  
@@ -10330,13 +10324,13 @@ Make let-values be the same as let*-values, to work around
  
  
 -pair_type local_7326938; 
-+pair_type local_7324486; 
++pair_type local_7324479; 
  
 -pair_type local_7326941; 
-+pair_type local_7324489; 
++pair_type local_7324482; 
  
 -pair_type local_7326945; 
-+pair_type local_7324493; 
++pair_type local_7324486; 
  
  
  
@@ -10345,18 +10339,18 @@ Make let-values be the same as let*-values, to work around
  
  
 -pair_type local_7326966; 
-+pair_type local_7324514; 
++pair_type local_7324507; 
  
 -pair_type local_7326969; 
-+pair_type local_7324517; 
++pair_type local_7324510; 
  
 -pair_type local_7326972; 
-+pair_type local_7324520; 
++pair_type local_7324513; 
  
  
  
 -pair_type local_7326978; 
-+pair_type local_7324526; 
++pair_type local_7324519; 
  
  
  
@@ -10365,46 +10359,46 @@ Make let-values be the same as let*-values, to work around
  
  
 -return_direct_with_clo1(data,  ((closureN)self_7314078)->elements[0], (((closure)  ((closureN)self_7314078)->elements[0])->fn),  set_pair_as_expr(&local_7326921, set_pair_as_expr(&local_7326924, ((closureN)self_7314078)->elements[1], set_pair_as_expr(&local_7326928, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314078)->elements[3]))), set_pair_as_expr(&local_7326938, set_pair_as_expr(&local_7326941, ((closureN)self_7314078)->elements[2], set_pair_as_expr(&local_7326945, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314078)->elements[3])))), Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314078)->elements[3])))))), set_pair_as_expr(&local_7326966, set_pair_as_expr(&local_7326969, r_737498_7311520_7311529, set_pair_as_expr(&local_7326972, Cyc_car(data, ((closureN)self_7314078)->elements[3]), set_pair_as_expr(&local_7326978, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314078)->elements[3]))), Cyc
_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314078)->elements[3])))))), NULL)))), boolean_f));; 
-+return_direct_with_clo1(data,  ((closureN)self_7312785)->elements[0], (((closure)  ((closureN)self_7312785)->elements[0])->fn),  set_pair_as_expr(&local_7324469, set_pair_as_expr(&local_7324472, ((closureN)self_7312785)->elements[1], set_pair_as_expr(&local_7324476, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312785)->elements[3]))), set_pair_as_expr(&local_7324486, set_pair_as_expr(&local_7324489, ((closureN)self_7312785)->elements[2], set_pair_as_expr(&local_7324493, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312785)->elements[3])))), Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312785)->elements[3])))))), set_pair_as_expr(&local_7324514, set_pair_as_expr(&local_7324517, r_736730_7310274_7310283, set_pair_as_expr(&local_7324520, Cyc_car(data, ((closureN)self_7312785)->elements[3]), set_pair_as_expr(&local_7324526, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312785)->elements[3]))), Cyc
_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312785)->elements[3])))))), NULL)))), boolean_f));; 
++return_direct_with_clo1(data,  ((closureN)self_7312778)->elements[0], (((closure)  ((closureN)self_7312778)->elements[0])->fn),  set_pair_as_expr(&local_7324462, set_pair_as_expr(&local_7324465, ((closureN)self_7312778)->elements[1], set_pair_as_expr(&local_7324469, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312778)->elements[3]))), set_pair_as_expr(&local_7324479, set_pair_as_expr(&local_7324482, ((closureN)self_7312778)->elements[2], set_pair_as_expr(&local_7324486, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312778)->elements[3])))), Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312778)->elements[3])))))), set_pair_as_expr(&local_7324507, set_pair_as_expr(&local_7324510, r_736723_7310267_7310276, set_pair_as_expr(&local_7324513, Cyc_car(data, ((closureN)self_7312778)->elements[3]), set_pair_as_expr(&local_7324519, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312778)->elements[3]))), Cyc
_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312778)->elements[3])))))), NULL)))), boolean_f));; 
  }
  
 -static void __lambda_1178(void *data, object self_7314079, int argc, object *args) /* object self_7314079, object k_737512 */
-+static void __lambda_1131(void *data, object self_7312786, int argc, object *args) /* object self_7312786, object k_736744 */
++static void __lambda_1131(void *data, object self_7312779, int argc, object *args) /* object self_7312779, object k_736737 */
   {
 - object k_737512 = args[0];
-+ object k_736744 = args[0];
++ object k_736737 = args[0];
      
 -if( (boolean_f != Cyc_is_pair(((closureN)self_7314079)->elements[1])) ){ 
-+if( (boolean_f != Cyc_is_pair(((closureN)self_7312786)->elements[1])) ){ 
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312779)->elements[1])) ){ 
      
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314079)->elements[1]))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312786)->elements[1]))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312779)->elements[1]))) ){ 
      
    
    
 -if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314079)->elements[1])))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312786)->elements[1])))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312779)->elements[1])))) ){ 
      
    
    
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314079)->elements[1]))))) ){ 
 -    complex_num_type local_7326764; 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312786)->elements[1]))))) ){ 
-+    complex_num_type local_7324312; 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312779)->elements[1]))))) ){ 
++    complex_num_type local_7324305; 
    
    
    
    
  if( (boolean_f != ((inline_function_type)
 -                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7326764, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314079)->elements[1])))))) ){ 
-+                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7324312, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312786)->elements[1])))))) ){ 
++                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7324305, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312779)->elements[1])))))) ){ 
      
    
    
 -if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314079)->elements[1])))) ){ 
-+if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312786)->elements[1])))) ){ 
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312779)->elements[1])))) ){ 
    
 -closureN_type c_7326783;
 -object e_7326840 [3];
@@ -10418,52 +10412,52 @@ Make let-values be the same as let*-values, to work around
 -c_7326783.elements[0] = k_737512;
 -c_7326783.elements[1] = ((closureN)self_7314079)->elements[0];
 -c_7326783.elements[2] = ((closureN)self_7314079)->elements[1];
-+closureN_type c_7324331;
-+object e_7324388 [3];
-+c_7324331.hdr.mark = gc_color_red;
-+ c_7324331.hdr.grayed = 0;
-+c_7324331.tag = closureN_tag;
-+ c_7324331.fn = (function_type)__lambda_1132;
-+c_7324331.num_args = 1;
-+c_7324331.num_elements = 3;
-+c_7324331.elements = (object *)e_7324388;
-+c_7324331.elements[0] = k_736744;
-+c_7324331.elements[1] = ((closureN)self_7312786)->elements[0];
-+c_7324331.elements[2] = ((closureN)self_7312786)->elements[1];
++closureN_type c_7324324;
++object e_7324381 [3];
++c_7324324.hdr.mark = gc_color_red;
++ c_7324324.hdr.grayed = 0;
++c_7324324.tag = closureN_tag;
++ c_7324324.fn = (function_type)__lambda_1132;
++c_7324324.num_args = 1;
++c_7324324.num_elements = 3;
++c_7324324.elements = (object *)e_7324381;
++c_7324324.elements[0] = k_736737;
++c_7324324.elements[1] = ((closureN)self_7312779)->elements[0];
++c_7324324.elements[2] = ((closureN)self_7312779)->elements[1];
  
 -return_closcall2(data,  ((closureN)self_7314079)->elements[0],  &c_7326783, quote__if);
-+return_closcall2(data,  ((closureN)self_7312786)->elements[0],  &c_7324331, quote__if);
++return_closcall2(data,  ((closureN)self_7312779)->elements[0],  &c_7324324, quote__if);
  } else { 
 -  return_direct_with_clo1(data,  k_737512, (((closure)  k_737512)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736744, (((closure)  k_736744)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736737, (((closure)  k_736737)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_737512, (((closure)  k_737512)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736744, (((closure)  k_736744)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736737, (((closure)  k_736737)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_737512, (((closure)  k_737512)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736744, (((closure)  k_736744)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736737, (((closure)  k_736737)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_737512, (((closure)  k_737512)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736744, (((closure)  k_736744)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736737, (((closure)  k_736737)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_737512, (((closure)  k_737512)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736744, (((closure)  k_736744)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736737, (((closure)  k_736737)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_737512, (((closure)  k_737512)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736744, (((closure)  k_736744)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736737, (((closure)  k_736737)->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_1179(void *data, object self_7314080, int argc, object *args) /* object self_7314080, object r_737528 */
-+static void __lambda_1132(void *data, object self_7312787, int argc, object *args) /* object self_7312787, object r_736760 */
++static void __lambda_1132(void *data, object self_7312780, int argc, object *args) /* object self_7312780, object r_736753 */
   {
 - object r_737528 = args[0];
-+ object r_736760 = args[0];
++ object r_736753 = args[0];
    
 -closureN_type c_7326786;
 -object e_7326839 [3];
@@ -10477,37 +10471,37 @@ Make let-values be the same as let*-values, to work around
 -c_7326786.elements[0] = ((closureN)self_7314080)->elements[0];
 -c_7326786.elements[1] = r_737528;
 -c_7326786.elements[2] = ((closureN)self_7314080)->elements[2];
-+closureN_type c_7324334;
-+object e_7324387 [3];
-+c_7324334.hdr.mark = gc_color_red;
-+ c_7324334.hdr.grayed = 0;
-+c_7324334.tag = closureN_tag;
-+ c_7324334.fn = (function_type)__lambda_1133;
-+c_7324334.num_args = 1;
-+c_7324334.num_elements = 3;
-+c_7324334.elements = (object *)e_7324387;
-+c_7324334.elements[0] = ((closureN)self_7312787)->elements[0];
-+c_7324334.elements[1] = r_736760;
-+c_7324334.elements[2] = ((closureN)self_7312787)->elements[2];
++closureN_type c_7324327;
++object e_7324380 [3];
++c_7324327.hdr.mark = gc_color_red;
++ c_7324327.hdr.grayed = 0;
++c_7324327.tag = closureN_tag;
++ c_7324327.fn = (function_type)__lambda_1133;
++c_7324327.num_args = 1;
++c_7324327.num_elements = 3;
++c_7324327.elements = (object *)e_7324380;
++c_7324327.elements[0] = ((closureN)self_7312780)->elements[0];
++c_7324327.elements[1] = r_736753;
++c_7324327.elements[2] = ((closureN)self_7312780)->elements[2];
  
 -return_closcall2(data,  ((closureN)self_7314080)->elements[1],  &c_7326786, quote_begin);; 
-+return_closcall2(data,  ((closureN)self_7312787)->elements[1],  &c_7324334, quote_begin);; 
++return_closcall2(data,  ((closureN)self_7312780)->elements[1],  &c_7324327, quote_begin);; 
  }
  
 -static void __lambda_1180(void *data, object self_7314081, int argc, object *args) /* object self_7314081, object r_737538 */
-+static void __lambda_1133(void *data, object self_7312788, int argc, object *args) /* object self_7312788, object r_736770 */
++static void __lambda_1133(void *data, object self_7312781, int argc, object *args) /* object self_7312781, object r_736763 */
   {
 - object r_737538 = args[0];
-+ object r_736770 = args[0];
++ object r_736763 = args[0];
    
 -pair_type local_7326791; 
-+pair_type local_7324339; 
++pair_type local_7324332; 
  
 -pair_type local_7326794; 
-+pair_type local_7324342; 
++pair_type local_7324335; 
  
 -pair_type local_7326798; 
-+pair_type local_7324346; 
++pair_type local_7324339; 
  
  
  
@@ -10516,13 +10510,13 @@ Make let-values be the same as let*-values, to work around
  
  
 -pair_type local_7326808; 
-+pair_type local_7324356; 
++pair_type local_7324349; 
  
 -pair_type local_7326811; 
-+pair_type local_7324359; 
++pair_type local_7324352; 
  
 -pair_type local_7326814; 
-+pair_type local_7324362; 
++pair_type local_7324355; 
  
  
  
@@ -10531,49 +10525,49 @@ Make let-values be the same as let*-values, to work around
  
  
 -pair_type local_7326835; 
-+pair_type local_7324383; 
++pair_type local_7324376; 
  
  
 -return_direct_with_clo1(data,  ((closureN)self_7314081)->elements[0], (((closure)  ((closureN)self_7314081)->elements[0])->fn),  set_pair_as_expr(&local_7326791, set_pair_as_expr(&local_7326794, ((closureN)self_7314081)->elements[1], set_pair_as_expr(&local_7326798, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314081)->elements[2]))), set_pair_as_expr(&local_7326808, set_pair_as_expr(&local_7326811, r_737538, set_pair_as_expr(&local_7326814, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314081)->elements[2])))), Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314081)->elements[2])))))), set_pair_as_expr(&local_7326835, Cyc_car(data, ((closureN)self_7314081)->elements[2]), NULL)))), boolean_f));; 
-+return_direct_with_clo1(data,  ((closureN)self_7312788)->elements[0], (((closure)  ((closureN)self_7312788)->elements[0])->fn),  set_pair_as_expr(&local_7324339, set_pair_as_expr(&local_7324342, ((closureN)self_7312788)->elements[1], set_pair_as_expr(&local_7324346, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312788)->elements[2]))), set_pair_as_expr(&local_7324356, set_pair_as_expr(&local_7324359, r_736770, set_pair_as_expr(&local_7324362, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312788)->elements[2])))), Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312788)->elements[2])))))), set_pair_as_expr(&local_7324383, Cyc_car(data, ((closureN)self_7312788)->elements[2]), NULL)))), boolean_f));; 
++return_direct_with_clo1(data,  ((closureN)self_7312781)->elements[0], (((closure)  ((closureN)self_7312781)->elements[0])->fn),  set_pair_as_expr(&local_7324332, set_pair_as_expr(&local_7324335, ((closureN)self_7312781)->elements[1], set_pair_as_expr(&local_7324339, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312781)->elements[2]))), set_pair_as_expr(&local_7324349, set_pair_as_expr(&local_7324352, r_736763, set_pair_as_expr(&local_7324355, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312781)->elements[2])))), Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312781)->elements[2])))))), set_pair_as_expr(&local_7324376, Cyc_car(data, ((closureN)self_7312781)->elements[2]), NULL)))), boolean_f));; 
  }
  
 -static void __lambda_1173(void *data, object self_7314082, int argc, object *args) /* object self_7314082, object k_737545 */
-+static void __lambda_1126(void *data, object self_7312789, int argc, object *args) /* object self_7312789, object k_736777 */
++static void __lambda_1126(void *data, object self_7312782, int argc, object *args) /* object self_7312782, object k_736770 */
   {
 - object k_737545 = args[0];
-+ object k_736777 = args[0];
++ object k_736770 = args[0];
      
 -if( (boolean_f != Cyc_is_pair(((closureN)self_7314082)->elements[1])) ){ 
-+if( (boolean_f != Cyc_is_pair(((closureN)self_7312789)->elements[1])) ){ 
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312782)->elements[1])) ){ 
      
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314082)->elements[1]))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312789)->elements[1]))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312782)->elements[1]))) ){ 
      
    
    
 -if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314082)->elements[1])))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312789)->elements[1])))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312782)->elements[1])))) ){ 
      
    
    
    
 -if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314082)->elements[1]))))) ){ 
-+if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312789)->elements[1]))))) ){ 
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312782)->elements[1]))))) ){ 
      
    
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314082)->elements[1])))) ){ 
 -    complex_num_type local_7326660; 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312789)->elements[1])))) ){ 
-+    complex_num_type local_7324208; 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312782)->elements[1])))) ){ 
++    complex_num_type local_7324201; 
    
    
    
  if( (boolean_f != ((inline_function_type)
 -                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7326660, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314082)->elements[1]))))) ){ 
-+                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7324208, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312789)->elements[1]))))) ){ 
++                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7324201, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312782)->elements[1]))))) ){ 
    
 -closureN_type c_7326670;
 -object e_7326723 [3];
@@ -10587,52 +10581,52 @@ Make let-values be the same as let*-values, to work around
 -c_7326670.elements[0] = k_737545;
 -c_7326670.elements[1] = ((closureN)self_7314082)->elements[0];
 -c_7326670.elements[2] = ((closureN)self_7314082)->elements[1];
-+closureN_type c_7324218;
-+object e_7324271 [3];
-+c_7324218.hdr.mark = gc_color_red;
-+ c_7324218.hdr.grayed = 0;
-+c_7324218.tag = closureN_tag;
-+ c_7324218.fn = (function_type)__lambda_1127;
-+c_7324218.num_args = 1;
-+c_7324218.num_elements = 3;
-+c_7324218.elements = (object *)e_7324271;
-+c_7324218.elements[0] = k_736777;
-+c_7324218.elements[1] = ((closureN)self_7312789)->elements[0];
-+c_7324218.elements[2] = ((closureN)self_7312789)->elements[1];
++closureN_type c_7324211;
++object e_7324264 [3];
++c_7324211.hdr.mark = gc_color_red;
++ c_7324211.hdr.grayed = 0;
++c_7324211.tag = closureN_tag;
++ c_7324211.fn = (function_type)__lambda_1127;
++c_7324211.num_args = 1;
++c_7324211.num_elements = 3;
++c_7324211.elements = (object *)e_7324264;
++c_7324211.elements[0] = k_736770;
++c_7324211.elements[1] = ((closureN)self_7312782)->elements[0];
++c_7324211.elements[2] = ((closureN)self_7312782)->elements[1];
  
 -return_closcall2(data,  ((closureN)self_7314082)->elements[0],  &c_7326670, quote_or);
-+return_closcall2(data,  ((closureN)self_7312789)->elements[0],  &c_7324218, quote_or);
++return_closcall2(data,  ((closureN)self_7312782)->elements[0],  &c_7324211, quote_or);
  } else { 
 -  return_direct_with_clo1(data,  k_737545, (((closure)  k_737545)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736777, (((closure)  k_736777)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736770, (((closure)  k_736770)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_737545, (((closure)  k_737545)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736777, (((closure)  k_736777)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736770, (((closure)  k_736770)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_737545, (((closure)  k_737545)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736777, (((closure)  k_736777)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736770, (((closure)  k_736770)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_737545, (((closure)  k_737545)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736777, (((closure)  k_736777)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736770, (((closure)  k_736770)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_737545, (((closure)  k_737545)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736777, (((closure)  k_736777)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736770, (((closure)  k_736770)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_737545, (((closure)  k_737545)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736777, (((closure)  k_736777)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736770, (((closure)  k_736770)->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_1174(void *data, object self_7314083, int argc, object *args) /* object self_7314083, object r_737561 */
-+static void __lambda_1127(void *data, object self_7312790, int argc, object *args) /* object self_7312790, object r_736793 */
++static void __lambda_1127(void *data, object self_7312783, int argc, object *args) /* object self_7312783, object r_736786 */
   {
 - object r_737561 = args[0];
-+ object r_736793 = args[0];
++ object r_736786 = args[0];
    
 -closureN_type c_7326673;
 -object e_7326722 [3];
@@ -10646,37 +10640,37 @@ Make let-values be the same as let*-values, to work around
 -c_7326673.elements[0] = ((closureN)self_7314083)->elements[0];
 -c_7326673.elements[1] = r_737561;
 -c_7326673.elements[2] = ((closureN)self_7314083)->elements[2];
-+closureN_type c_7324221;
-+object e_7324270 [3];
-+c_7324221.hdr.mark = gc_color_red;
-+ c_7324221.hdr.grayed = 0;
-+c_7324221.tag = closureN_tag;
-+ c_7324221.fn = (function_type)__lambda_1128;
-+c_7324221.num_args = 1;
-+c_7324221.num_elements = 3;
-+c_7324221.elements = (object *)e_7324270;
-+c_7324221.elements[0] = ((closureN)self_7312790)->elements[0];
-+c_7324221.elements[1] = r_736793;
-+c_7324221.elements[2] = ((closureN)self_7312790)->elements[2];
++closureN_type c_7324214;
++object e_7324263 [3];
++c_7324214.hdr.mark = gc_color_red;
++ c_7324214.hdr.grayed = 0;
++c_7324214.tag = closureN_tag;
++ c_7324214.fn = (function_type)__lambda_1128;
++c_7324214.num_args = 1;
++c_7324214.num_elements = 3;
++c_7324214.elements = (object *)e_7324263;
++c_7324214.elements[0] = ((closureN)self_7312783)->elements[0];
++c_7324214.elements[1] = r_736786;
++c_7324214.elements[2] = ((closureN)self_7312783)->elements[2];
  
 -return_closcall2(data,  ((closureN)self_7314083)->elements[1],  &c_7326673, quote_guard_91aux);; 
-+return_closcall2(data,  ((closureN)self_7312790)->elements[1],  &c_7324221, quote_guard_91aux);; 
++return_closcall2(data,  ((closureN)self_7312783)->elements[1],  &c_7324214, quote_guard_91aux);; 
  }
  
 -static void __lambda_1175(void *data, object self_7314084, int argc, object *args) /* object self_7314084, object r_737569 */
-+static void __lambda_1128(void *data, object self_7312791, int argc, object *args) /* object self_7312791, object r_736801 */
++static void __lambda_1128(void *data, object self_7312784, int argc, object *args) /* object self_7312784, object r_736794 */
   {
 - object r_737569 = args[0];
-+ object r_736801 = args[0];
++ object r_736794 = args[0];
    
 -pair_type local_7326678; 
-+pair_type local_7324226; 
++pair_type local_7324219; 
  
 -pair_type local_7326681; 
-+pair_type local_7324229; 
++pair_type local_7324222; 
  
 -pair_type local_7326685; 
-+pair_type local_7324233; 
++pair_type local_7324226; 
  
  
  
@@ -10685,18 +10679,18 @@ Make let-values be the same as let*-values, to work around
  
  
 -pair_type local_7326695; 
-+pair_type local_7324243; 
++pair_type local_7324236; 
  
 -pair_type local_7326698; 
-+pair_type local_7324246; 
++pair_type local_7324239; 
  
 -pair_type local_7326701; 
-+pair_type local_7324249; 
++pair_type local_7324242; 
  
  
  
 -pair_type local_7326707; 
-+pair_type local_7324255; 
++pair_type local_7324248; 
  
  
  
@@ -10705,37 +10699,37 @@ Make let-values be the same as let*-values, to work around
  
  
 -return_direct_with_clo1(data,  ((closureN)self_7314084)->elements[0], (((closure)  ((closureN)self_7314084)->elements[0])->fn),  set_pair_as_expr(&local_7326678, set_pair_as_expr(&local_7326681, ((closureN)self_7314084)->elements[1], set_pair_as_expr(&local_7326685, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314084)->elements[2]))), set_pair_as_expr(&local_7326695, set_pair_as_expr(&local_7326698, r_737569, set_pair_as_expr(&local_7326701, Cyc_car(data, ((closureN)self_7314084)->elements[2]), set_pair_as_expr(&local_7326707, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314084)->elements[2]))), Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314084)->elements[2])))))), NULL))), boolean_f));; 
-+return_direct_with_clo1(data,  ((closureN)self_7312791)->elements[0], (((closure)  ((closureN)self_7312791)->elements[0])->fn),  set_pair_as_expr(&local_7324226, set_pair_as_expr(&local_7324229, ((closureN)self_7312791)->elements[1], set_pair_as_expr(&local_7324233, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312791)->elements[2]))), set_pair_as_expr(&local_7324243, set_pair_as_expr(&local_7324246, r_736801, set_pair_as_expr(&local_7324249, Cyc_car(data, ((closureN)self_7312791)->elements[2]), set_pair_as_expr(&local_7324255, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312791)->elements[2]))), Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312791)->elements[2])))))), NULL))), boolean_f));; 
++return_direct_with_clo1(data,  ((closureN)self_7312784)->elements[0], (((closure)  ((closureN)self_7312784)->elements[0])->fn),  set_pair_as_expr(&local_7324219, set_pair_as_expr(&local_7324222, ((closureN)self_7312784)->elements[1], set_pair_as_expr(&local_7324226, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312784)->elements[2]))), set_pair_as_expr(&local_7324236, set_pair_as_expr(&local_7324239, r_736794, set_pair_as_expr(&local_7324242, Cyc_car(data, ((closureN)self_7312784)->elements[2]), set_pair_as_expr(&local_7324248, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312784)->elements[2]))), Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312784)->elements[2])))))), NULL))), boolean_f));; 
  }
  
 -static void __lambda_1169(void *data, object self_7314085, int argc, object *args) /* object self_7314085, object k_737578 */
-+static void __lambda_1122(void *data, object self_7312792, int argc, object *args) /* object self_7312792, object k_736810 */
++static void __lambda_1122(void *data, object self_7312785, int argc, object *args) /* object self_7312785, object k_736803 */
   {
 - object k_737578 = args[0];
-+ object k_736810 = args[0];
++ object k_736803 = args[0];
      
 -if( (boolean_f != Cyc_is_pair(((closureN)self_7314085)->elements[1])) ){ 
-+if( (boolean_f != Cyc_is_pair(((closureN)self_7312792)->elements[1])) ){ 
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312785)->elements[1])) ){ 
      
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314085)->elements[1]))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312792)->elements[1]))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312785)->elements[1]))) ){ 
      
    
    
 -if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314085)->elements[1])))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312792)->elements[1])))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312785)->elements[1])))) ){ 
      
    
    
    
 -if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314085)->elements[1]))))) ){ 
-+if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312792)->elements[1]))))) ){ 
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312785)->elements[1]))))) ){ 
      
    
    
 -if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314085)->elements[1])))) ){ 
-+if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312792)->elements[1])))) ){ 
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312785)->elements[1])))) ){ 
    
 -closureN_type c_7326588;
 -object e_7326613 [2];
@@ -10748,56 +10742,56 @@ Make let-values be the same as let*-values, to work around
 -c_7326588.elements = (object *)e_7326613;
 -c_7326588.elements[0] = k_737578;
 -c_7326588.elements[1] = ((closureN)self_7314085)->elements[1];
-+closureN_type c_7324136;
-+object e_7324161 [2];
-+c_7324136.hdr.mark = gc_color_red;
-+ c_7324136.hdr.grayed = 0;
-+c_7324136.tag = closureN_tag;
-+ c_7324136.fn = (function_type)__lambda_1123;
-+c_7324136.num_args = 1;
-+c_7324136.num_elements = 2;
-+c_7324136.elements = (object *)e_7324161;
-+c_7324136.elements[0] = k_736810;
-+c_7324136.elements[1] = ((closureN)self_7312792)->elements[1];
++closureN_type c_7324129;
++object e_7324154 [2];
++c_7324129.hdr.mark = gc_color_red;
++ c_7324129.hdr.grayed = 0;
++c_7324129.tag = closureN_tag;
++ c_7324129.fn = (function_type)__lambda_1123;
++c_7324129.num_args = 1;
++c_7324129.num_elements = 2;
++c_7324129.elements = (object *)e_7324154;
++c_7324129.elements[0] = k_736803;
++c_7324129.elements[1] = ((closureN)self_7312785)->elements[1];
  
 -return_closcall2(data,  ((closureN)self_7314085)->elements[0],  &c_7326588, quote_or);
-+return_closcall2(data,  ((closureN)self_7312792)->elements[0],  &c_7324136, quote_or);
++return_closcall2(data,  ((closureN)self_7312785)->elements[0],  &c_7324129, quote_or);
  } else { 
 -  return_direct_with_clo1(data,  k_737578, (((closure)  k_737578)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736810, (((closure)  k_736810)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736803, (((closure)  k_736803)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_737578, (((closure)  k_737578)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736810, (((closure)  k_736810)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736803, (((closure)  k_736803)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_737578, (((closure)  k_737578)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736810, (((closure)  k_736810)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736803, (((closure)  k_736803)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_737578, (((closure)  k_737578)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736810, (((closure)  k_736810)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736803, (((closure)  k_736803)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_737578, (((closure)  k_737578)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736810, (((closure)  k_736810)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736803, (((closure)  k_736803)->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_1170(void *data, object self_7314086, int argc, object *args) /* object self_7314086, object r_737591 */
-+static void __lambda_1123(void *data, object self_7312793, int argc, object *args) /* object self_7312793, object r_736823 */
++static void __lambda_1123(void *data, object self_7312786, int argc, object *args) /* object self_7312786, object r_736816 */
   {
 - object r_737591 = args[0];
-+ object r_736823 = args[0];
++ object r_736816 = args[0];
    
 -pair_type local_7326593; 
-+pair_type local_7324141; 
++pair_type local_7324134; 
  
 -pair_type local_7326596; 
-+pair_type local_7324144; 
++pair_type local_7324137; 
  
 -pair_type local_7326599; 
-+pair_type local_7324147; 
++pair_type local_7324140; 
  
  
  
@@ -10806,36 +10800,36 @@ Make let-values be the same as let*-values, to work around
  
  
 -pair_type local_7326609; 
-+pair_type local_7324157; 
++pair_type local_7324150; 
  
  
 -return_direct_with_clo1(data,  ((closureN)self_7314086)->elements[0], (((closure)  ((closureN)self_7314086)->elements[0])->fn),  set_pair_as_expr(&local_7326593, set_pair_as_expr(&local_7326596, r_737591, set_pair_as_expr(&local_7326599, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314086)->elements[1]))), set_pair_as_expr(&local_7326609, Cyc_car(data, ((closureN)self_7314086)->elements[1]), NULL))), boolean_f));; 
-+return_direct_with_clo1(data,  ((closureN)self_7312793)->elements[0], (((closure)  ((closureN)self_7312793)->elements[0])->fn),  set_pair_as_expr(&local_7324141, set_pair_as_expr(&local_7324144, r_736823, set_pair_as_expr(&local_7324147, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312793)->elements[1]))), set_pair_as_expr(&local_7324157, Cyc_car(data, ((closureN)self_7312793)->elements[1]), NULL))), boolean_f));; 
++return_direct_with_clo1(data,  ((closureN)self_7312786)->elements[0], (((closure)  ((closureN)self_7312786)->elements[0])->fn),  set_pair_as_expr(&local_7324134, set_pair_as_expr(&local_7324137, r_736816, set_pair_as_expr(&local_7324140, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312786)->elements[1]))), set_pair_as_expr(&local_7324150, Cyc_car(data, ((closureN)self_7312786)->elements[1]), NULL))), boolean_f));; 
  }
  
 -static void __lambda_1158(void *data, object self_7314087, int argc, object *args) /* object self_7314087, object k_737600 */
-+static void __lambda_1111(void *data, object self_7312794, int argc, object *args) /* object self_7312794, object k_736832 */
++static void __lambda_1111(void *data, object self_7312787, int argc, object *args) /* object self_7312787, object k_736825 */
   {
 - object k_737600 = args[0];
-+ object k_736832 = args[0];
++ object k_736825 = args[0];
      
 -if( (boolean_f != Cyc_is_pair(((closureN)self_7314087)->elements[2])) ){ 
-+if( (boolean_f != Cyc_is_pair(((closureN)self_7312794)->elements[2])) ){ 
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312787)->elements[2])) ){ 
      
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314087)->elements[2]))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312794)->elements[2]))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312787)->elements[2]))) ){ 
      
    
    
 -if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314087)->elements[2])))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312794)->elements[2])))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312787)->elements[2])))) ){ 
      
    
    
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314087)->elements[2]))))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312794)->elements[2]))))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312787)->elements[2]))))) ){ 
    
 -closureN_type c_7326363;
 -object e_7326542 [4];
@@ -10850,45 +10844,45 @@ Make let-values be the same as let*-values, to work around
 -c_7326363.elements[1] = k_737600;
 -c_7326363.elements[2] = ((closureN)self_7314087)->elements[1];
 -c_7326363.elements[3] = ((closureN)self_7314087)->elements[2];
-+closureN_type c_7323911;
-+object e_7324090 [4];
-+c_7323911.hdr.mark = gc_color_red;
-+ c_7323911.hdr.grayed = 0;
-+c_7323911.tag = closureN_tag;
-+ c_7323911.fn = (function_type)__lambda_1112;
-+c_7323911.num_args = 1;
-+c_7323911.num_elements = 4;
-+c_7323911.elements = (object *)e_7324090;
-+c_7323911.elements[0] = ((closureN)self_7312794)->elements[0];
-+c_7323911.elements[1] = k_736832;
-+c_7323911.elements[2] = ((closureN)self_7312794)->elements[1];
-+c_7323911.elements[3] = ((closureN)self_7312794)->elements[2];
++closureN_type c_7323904;
++object e_7324083 [4];
++c_7323904.hdr.mark = gc_color_red;
++ c_7323904.hdr.grayed = 0;
++c_7323904.tag = closureN_tag;
++ c_7323904.fn = (function_type)__lambda_1112;
++c_7323904.num_args = 1;
++c_7323904.num_elements = 4;
++c_7323904.elements = (object *)e_7324083;
++c_7323904.elements[0] = ((closureN)self_7312787)->elements[0];
++c_7323904.elements[1] = k_736825;
++c_7323904.elements[2] = ((closureN)self_7312787)->elements[1];
++c_7323904.elements[3] = ((closureN)self_7312787)->elements[2];
  
 -return_closcall2(data,  ((closureN)self_7314087)->elements[1],  &c_7326363, quote__123_125);
-+return_closcall2(data,  ((closureN)self_7312794)->elements[1],  &c_7323911, quote__123_125);
++return_closcall2(data,  ((closureN)self_7312787)->elements[1],  &c_7323904, quote__123_125);
  } else { 
 -  return_direct_with_clo1(data,  k_737600, (((closure)  k_737600)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736832, (((closure)  k_736832)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736825, (((closure)  k_736825)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_737600, (((closure)  k_737600)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736832, (((closure)  k_736832)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736825, (((closure)  k_736825)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_737600, (((closure)  k_737600)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736832, (((closure)  k_736832)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736825, (((closure)  k_736825)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_737600, (((closure)  k_737600)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736832, (((closure)  k_736832)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736825, (((closure)  k_736825)->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_1159(void *data, object self_7314088, int argc, object *args) /* object self_7314088, object r_737669 */
-+static void __lambda_1112(void *data, object self_7312795, int argc, object *args) /* object self_7312795, object r_736901 */
++static void __lambda_1112(void *data, object self_7312788, int argc, object *args) /* object self_7312788, object r_736894 */
   {
 - object r_737669 = args[0];
-+ object r_736901 = args[0];
++ object r_736894 = args[0];
    
 -closureN_type c_7326366;
 -object e_7326532 [3];
@@ -10902,18 +10896,18 @@ Make let-values be the same as let*-values, to work around
 -c_7326366.elements[0] = ((closureN)self_7314088)->elements[1];
 -c_7326366.elements[1] = ((closureN)self_7314088)->elements[2];
 -c_7326366.elements[2] = ((closureN)self_7314088)->elements[3];
-+closureN_type c_7323914;
-+object e_7324080 [3];
-+c_7323914.hdr.mark = gc_color_red;
-+ c_7323914.hdr.grayed = 0;
-+c_7323914.tag = closureN_tag;
-+ c_7323914.fn = (function_type)__lambda_1113;
-+c_7323914.num_args = 1;
-+c_7323914.num_elements = 3;
-+c_7323914.elements = (object *)e_7324080;
-+c_7323914.elements[0] = ((closureN)self_7312795)->elements[1];
-+c_7323914.elements[1] = ((closureN)self_7312795)->elements[2];
-+c_7323914.elements[2] = ((closureN)self_7312795)->elements[3];
++closureN_type c_7323907;
++object e_7324073 [3];
++c_7323907.hdr.mark = gc_color_red;
++ c_7323907.hdr.grayed = 0;
++c_7323907.tag = closureN_tag;
++ c_7323907.fn = (function_type)__lambda_1113;
++c_7323907.num_args = 1;
++c_7323907.num_elements = 3;
++c_7323907.elements = (object *)e_7324073;
++c_7323907.elements[0] = ((closureN)self_7312788)->elements[1];
++c_7323907.elements[1] = ((closureN)self_7312788)->elements[2];
++c_7323907.elements[2] = ((closureN)self_7312788)->elements[3];
  
  
  
@@ -10922,23 +10916,23 @@ Make let-values be the same as let*-values, to work around
  
  
 -return_closcall3(data,  ((closureN)self_7314088)->elements[0],  &c_7326366, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314088)->elements[3])))), r_737669);; 
-+return_closcall3(data,  ((closureN)self_7312795)->elements[0],  &c_7323914, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312795)->elements[3])))), r_736901);; 
++return_closcall3(data,  ((closureN)self_7312788)->elements[0],  &c_7323907, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312788)->elements[3])))), r_736894);; 
  }
  
 -static void __lambda_1160(void *data, object self_7314089, int argc, object *args) /* object self_7314089, object r_737611 */
-+static void __lambda_1113(void *data, object self_7312796, int argc, object *args) /* object self_7312796, object r_736843 */
++static void __lambda_1113(void *data, object self_7312789, int argc, object *args) /* object self_7312789, object r_736836 */
   {
 - object r_737611 = args[0];
 -  if( (boolean_f != r_737611) ){ 
-+ object r_736843 = args[0];
-+  if( (boolean_f != r_736843) ){ 
++ object r_736836 = args[0];
++  if( (boolean_f != r_736836) ){ 
      
    
    
    
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314089)->elements[2])))))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312796)->elements[2])))))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312789)->elements[2])))))) ){ 
      
    
    
@@ -10946,20 +10940,20 @@ Make let-values be the same as let*-values, to work around
    
    
 -if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314089)->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_7312796)->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_7312789)->elements[2]))))))) ){ 
      
    
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314089)->elements[2])))) ){ 
 -    complex_num_type local_7326400; 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312796)->elements[2])))) ){ 
-+    complex_num_type local_7323948; 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312789)->elements[2])))) ){ 
++    complex_num_type local_7323941; 
    
    
    
  if( (boolean_f != ((inline_function_type)
 -                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7326400, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314089)->elements[2]))))) ){ 
-+                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7323948, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312796)->elements[2]))))) ){ 
++                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7323941, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312789)->elements[2]))))) ){ 
    
 -closureN_type c_7326410;
 -object e_7326521 [3];
@@ -10973,49 +10967,47 @@ Make let-values be the same as let*-values, to work around
 -c_7326410.elements[0] = ((closureN)self_7314089)->elements[0];
 -c_7326410.elements[1] = ((closureN)self_7314089)->elements[1];
 -c_7326410.elements[2] = ((closureN)self_7314089)->elements[2];
-+closureN_type c_7323958;
-+object e_7324069 [3];
-+c_7323958.hdr.mark = gc_color_red;
-+ c_7323958.hdr.grayed = 0;
-+c_7323958.tag = closureN_tag;
-+ c_7323958.fn = (function_type)__lambda_1114;
-+c_7323958.num_args = 1;
-+c_7323958.num_elements = 3;
-+c_7323958.elements = (object *)e_7324069;
-+c_7323958.elements[0] = ((closureN)self_7312796)->elements[0];
-+c_7323958.elements[1] = ((closureN)self_7312796)->elements[1];
-+c_7323958.elements[2] = ((closureN)self_7312796)->elements[2];
++closureN_type c_7323951;
++object e_7324062 [3];
++c_7323951.hdr.mark = gc_color_red;
++ c_7323951.hdr.grayed = 0;
++c_7323951.tag = closureN_tag;
++ c_7323951.fn = (function_type)__lambda_1114;
++c_7323951.num_args = 1;
++c_7323951.num_elements = 3;
++c_7323951.elements = (object *)e_7324062;
++c_7323951.elements[0] = ((closureN)self_7312789)->elements[0];
++c_7323951.elements[1] = ((closureN)self_7312789)->elements[1];
++c_7323951.elements[2] = ((closureN)self_7312789)->elements[2];
  
 -return_closcall2(data,  ((closureN)self_7314089)->elements[1],  &c_7326410, quote_let);
-+return_closcall2(data,  ((closureN)self_7312796)->elements[1],  &c_7323958, quote_let);
++return_closcall2(data,  ((closureN)self_7312789)->elements[1],  &c_7323951, quote_let);
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7314089)->elements[0], (((closure)  ((closureN)self_7314089)->elements[0])->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  ((closureN)self_7312796)->elements[0], (((closure)  ((closureN)self_7312796)->elements[0])->fn),  boolean_f);}
++  return_direct_with_clo1(data,  ((closureN)self_7312789)->elements[0], (((closure)  ((closureN)self_7312789)->elements[0])->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7314089)->elements[0], (((closure)  ((closureN)self_7314089)->elements[0])->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  ((closureN)self_7312796)->elements[0], (((closure)  ((closureN)self_7312796)->elements[0])->fn),  boolean_f);}
++  return_direct_with_clo1(data,  ((closureN)self_7312789)->elements[0], (((closure)  ((closureN)self_7312789)->elements[0])->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7314089)->elements[0], (((closure)  ((closureN)self_7314089)->elements[0])->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  ((closureN)self_7312796)->elements[0], (((closure)  ((closureN)self_7312796)->elements[0])->fn),  boolean_f);}
++  return_direct_with_clo1(data,  ((closureN)self_7312789)->elements[0], (((closure)  ((closureN)self_7312789)->elements[0])->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7314089)->elements[0], (((closure)  ((closureN)self_7314089)->elements[0])->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  ((closureN)self_7312796)->elements[0], (((closure)  ((closureN)self_7312796)->elements[0])->fn),  boolean_f);}
++  return_direct_with_clo1(data,  ((closureN)self_7312789)->elements[0], (((closure)  ((closureN)self_7312789)->elements[0])->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7314089)->elements[0], (((closure)  ((closureN)self_7314089)->elements[0])->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  ((closureN)self_7312796)->elements[0], (((closure)  ((closureN)self_7312796)->elements[0])->fn),  boolean_f);}
++  return_direct_with_clo1(data,  ((closureN)self_7312789)->elements[0], (((closure)  ((closureN)self_7312789)->elements[0])->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_1161(void *data, object self_7314090, int argc, object *args) /* object self_7314090, object r_737623 */
-+static void __lambda_1114(void *data, object self_7312797, int argc, object *args) /* object self_7312797, object r_736855 */
-  {
+- {
 - object r_737623 = args[0];
-+ object r_736855 = args[0];
-   
+-  
 -closureN_type c_7326413;
 -object e_7326520 [4];
 -c_7326413.hdr.mark = gc_color_red;
@@ -11029,29 +11021,15 @@ Make let-values be the same as let*-values, to work around
 -c_7326413.elements[1] = r_737623;
 -c_7326413.elements[2] = ((closureN)self_7314090)->elements[1];
 -c_7326413.elements[3] = ((closureN)self_7314090)->elements[2];
-+closureN_type c_7323961;
-+object e_7324068 [4];
-+c_7323961.hdr.mark = gc_color_red;
-+ c_7323961.hdr.grayed = 0;
-+c_7323961.tag = closureN_tag;
-+ c_7323961.fn = (function_type)__lambda_1115;
-+c_7323961.num_args = 1;
-+c_7323961.num_elements = 4;
-+c_7323961.elements = (object *)e_7324068;
-+c_7323961.elements[0] = ((closureN)self_7312797)->elements[0];
-+c_7323961.elements[1] = r_736855;
-+c_7323961.elements[2] = ((closureN)self_7312797)->elements[1];
-+c_7323961.elements[3] = ((closureN)self_7312797)->elements[2];
- 
+-
 -return_closcall2(data,  ((closureN)self_7314090)->elements[1],  &c_7326413, quote_temp);; 
-+return_closcall2(data,  ((closureN)self_7312797)->elements[1],  &c_7323961, quote_temp);; 
- }
- 
+-}
+-
 -static void __lambda_1162(void *data, object self_7314091, int argc, object *args) /* object self_7314091, object r_737662 */
-+static void __lambda_1115(void *data, object self_7312798, int argc, object *args) /* object self_7312798, object r_736894 */
++static void __lambda_1114(void *data, object self_7312790, int argc, object *args) /* object self_7312790, object r_736848 */
   {
 - object r_737662 = args[0];
-+ object r_736894 = args[0];
++ object r_736848 = args[0];
    
 -closureN_type c_7326416;
 -object e_7326519 [5];
@@ -11067,30 +11045,29 @@ Make let-values be the same as let*-values, to work around
 -c_7326416.elements[2] = r_737662;
 -c_7326416.elements[3] = ((closureN)self_7314091)->elements[2];
 -c_7326416.elements[4] = ((closureN)self_7314091)->elements[3];
-+closureN_type c_7323964;
-+object e_7324067 [5];
-+c_7323964.hdr.mark = gc_color_red;
-+ c_7323964.hdr.grayed = 0;
-+c_7323964.tag = closureN_tag;
-+ c_7323964.fn = (function_type)__lambda_1116;
-+c_7323964.num_args = 1;
-+c_7323964.num_elements = 5;
-+c_7323964.elements = (object *)e_7324067;
-+c_7323964.elements[0] = ((closureN)self_7312798)->elements[0];
-+c_7323964.elements[1] = ((closureN)self_7312798)->elements[1];
-+c_7323964.elements[2] = r_736894;
-+c_7323964.elements[3] = ((closureN)self_7312798)->elements[2];
-+c_7323964.elements[4] = ((closureN)self_7312798)->elements[3];
++closureN_type c_7323954;
++object e_7324061 [4];
++c_7323954.hdr.mark = gc_color_red;
++ c_7323954.hdr.grayed = 0;
++c_7323954.tag = closureN_tag;
++ c_7323954.fn = (function_type)__lambda_1115;
++c_7323954.num_args = 1;
++c_7323954.num_elements = 4;
++c_7323954.elements = (object *)e_7324061;
++c_7323954.elements[0] = ((closureN)self_7312790)->elements[0];
++c_7323954.elements[1] = r_736848;
++c_7323954.elements[2] = ((closureN)self_7312790)->elements[1];
++c_7323954.elements[3] = ((closureN)self_7312790)->elements[2];
  
 -return_closcall2(data,  ((closureN)self_7314091)->elements[2],  &c_7326416, quote__if);; 
-+return_closcall2(data,  ((closureN)self_7312798)->elements[2],  &c_7323964, quote__if);; 
++return_closcall2(data,  ((closureN)self_7312790)->elements[1],  &c_7323954, quote_temp);; 
  }
  
 -static void __lambda_1163(void *data, object self_7314092, int argc, object *args) /* object self_7314092, object r_737632_7311339_7311357_7311374 */
-+static void __lambda_1116(void *data, object self_7312799, int argc, object *args) /* object self_7312799, object r_736864_7310093_7310111_7310128 */
++static void __lambda_1115(void *data, object self_7312791, int argc, object *args) /* object self_7312791, object r_736887 */
   {
 - object r_737632_7311339_7311357_7311374 = args[0];
-+ object r_736864_7310093_7310111_7310128 = args[0];
++ object r_736887 = args[0];
    
 -closureN_type c_7326419;
 -object e_7326518 [6];
@@ -11107,31 +11084,30 @@ Make let-values be the same as let*-values, to work around
 -c_7326419.elements[3] = ((closureN)self_7314092)->elements[2];
 -c_7326419.elements[4] = ((closureN)self_7314092)->elements[3];
 -c_7326419.elements[5] = ((closureN)self_7314092)->elements[4];
-+closureN_type c_7323967;
-+object e_7324066 [6];
-+c_7323967.hdr.mark = gc_color_red;
-+ c_7323967.hdr.grayed = 0;
-+c_7323967.tag = closureN_tag;
-+ c_7323967.fn = (function_type)__lambda_1117;
-+c_7323967.num_args = 1;
-+c_7323967.num_elements = 6;
-+c_7323967.elements = (object *)e_7324066;
-+c_7323967.elements[0] = ((closureN)self_7312799)->elements[0];
-+c_7323967.elements[1] = ((closureN)self_7312799)->elements[1];
-+c_7323967.elements[2] = r_736864_7310093_7310111_7310128;
-+c_7323967.elements[3] = ((closureN)self_7312799)->elements[2];
-+c_7323967.elements[4] = ((closureN)self_7312799)->elements[3];
-+c_7323967.elements[5] = ((closureN)self_7312799)->elements[4];
++closureN_type c_7323957;
++object e_7324060 [5];
++c_7323957.hdr.mark = gc_color_red;
++ c_7323957.hdr.grayed = 0;
++c_7323957.tag = closureN_tag;
++ c_7323957.fn = (function_type)__lambda_1116;
++c_7323957.num_args = 1;
++c_7323957.num_elements = 5;
++c_7323957.elements = (object *)e_7324060;
++c_7323957.elements[0] = ((closureN)self_7312791)->elements[0];
++c_7323957.elements[1] = ((closureN)self_7312791)->elements[1];
++c_7323957.elements[2] = r_736887;
++c_7323957.elements[3] = ((closureN)self_7312791)->elements[2];
++c_7323957.elements[4] = ((closureN)self_7312791)->elements[3];
  
 -return_closcall2(data,  ((closureN)self_7314092)->elements[3],  &c_7326419, quote_temp);; 
-+return_closcall2(data,  ((closureN)self_7312799)->elements[3],  &c_7323967, quote_temp);; 
++return_closcall2(data,  ((closureN)self_7312791)->elements[2],  &c_7323957, quote__if);; 
  }
  
 -static void __lambda_1164(void *data, object self_7314093, int argc, object *args) /* object self_7314093, object r_737635_7311340_7311358_7311375 */
-+static void __lambda_1117(void *data, object self_7312800, int argc, object *args) /* object self_7312800, object r_736867_7310094_7310112_7310129 */
++static void __lambda_1116(void *data, object self_7312792, int argc, object *args) /* object self_7312792, object r_736857_7310086_7310104_7310121 */
   {
 - object r_737635_7311340_7311358_7311375 = args[0];
-+ object r_736867_7310094_7310112_7310129 = args[0];
++ object r_736857_7310086_7310104_7310121 = args[0];
    
 -closureN_type c_7326422;
 -object e_7326517 [7];
@@ -11149,32 +11125,31 @@ Make let-values be the same as let*-values, to work around
 -c_7326422.elements[4] = ((closureN)self_7314093)->elements[3];
 -c_7326422.elements[5] = ((closureN)self_7314093)->elements[4];
 -c_7326422.elements[6] = ((closureN)self_7314093)->elements[5];
-+closureN_type c_7323970;
-+object e_7324065 [7];
-+c_7323970.hdr.mark = gc_color_red;
-+ c_7323970.hdr.grayed = 0;
-+c_7323970.tag = closureN_tag;
-+ c_7323970.fn = (function_type)__lambda_1118;
-+c_7323970.num_args = 1;
-+c_7323970.num_elements = 7;
-+c_7323970.elements = (object *)e_7324065;
-+c_7323970.elements[0] = ((closureN)self_7312800)->elements[0];
-+c_7323970.elements[1] = ((closureN)self_7312800)->elements[1];
-+c_7323970.elements[2] = ((closureN)self_7312800)->elements[2];
-+c_7323970.elements[3] = r_736867_7310094_7310112_7310129;
-+c_7323970.elements[4] = ((closureN)self_7312800)->elements[3];
-+c_7323970.elements[5] = ((closureN)self_7312800)->elements[4];
-+c_7323970.elements[6] = ((closureN)self_7312800)->elements[5];
++closureN_type c_7323960;
++object e_7324059 [6];
++c_7323960.hdr.mark = gc_color_red;
++ c_7323960.hdr.grayed = 0;
++c_7323960.tag = closureN_tag;
++ c_7323960.fn = (function_type)__lambda_1117;
++c_7323960.num_args = 1;
++c_7323960.num_elements = 6;
++c_7323960.elements = (object *)e_7324059;
++c_7323960.elements[0] = ((closureN)self_7312792)->elements[0];
++c_7323960.elements[1] = ((closureN)self_7312792)->elements[1];
++c_7323960.elements[2] = r_736857_7310086_7310104_7310121;
++c_7323960.elements[3] = ((closureN)self_7312792)->elements[2];
++c_7323960.elements[4] = ((closureN)self_7312792)->elements[3];
++c_7323960.elements[5] = ((closureN)self_7312792)->elements[4];
  
 -return_closcall2(data,  ((closureN)self_7314093)->elements[4],  &c_7326422, quote_temp);; 
-+return_closcall2(data,  ((closureN)self_7312800)->elements[4],  &c_7323970, quote_temp);; 
++return_closcall2(data,  ((closureN)self_7312792)->elements[3],  &c_7323960, quote_temp);; 
  }
  
 -static void __lambda_1165(void *data, object self_7314094, int argc, object *args) /* object self_7314094, object r_737653_7311341_7311359_7311376 */
-+static void __lambda_1118(void *data, object self_7312801, int argc, object *args) /* object self_7312801, object r_736885_7310095_7310113_7310130 */
++static void __lambda_1117(void *data, object self_7312793, int argc, object *args) /* object self_7312793, object r_736860_7310087_7310105_7310122 */
   {
 - object r_737653_7311341_7311359_7311376 = args[0];
-+ object r_736885_7310095_7310113_7310130 = args[0];
++ object r_736860_7310087_7310105_7310122 = args[0];
    
 -closureN_type c_7326425;
 -object e_7326516 [7];
@@ -11192,50 +11167,74 @@ Make let-values be the same as let*-values, to work around
 -c_7326425.elements[4] = r_737653_7311341_7311359_7311376;
 -c_7326425.elements[5] = ((closureN)self_7314094)->elements[4];
 -c_7326425.elements[6] = ((closureN)self_7314094)->elements[6];
-+closureN_type c_7323973;
-+object e_7324064 [7];
-+c_7323973.hdr.mark = gc_color_red;
-+ c_7323973.hdr.grayed = 0;
-+c_7323973.tag = closureN_tag;
-+ c_7323973.fn = (function_type)__lambda_1119;
-+c_7323973.num_args = 1;
-+c_7323973.num_elements = 7;
-+c_7323973.elements = (object *)e_7324064;
-+c_7323973.elements[0] = ((closureN)self_7312801)->elements[0];
-+c_7323973.elements[1] = ((closureN)self_7312801)->elements[1];
-+c_7323973.elements[2] = ((closureN)self_7312801)->elements[2];
-+c_7323973.elements[3] = ((closureN)self_7312801)->elements[3];
-+c_7323973.elements[4] = r_736885_7310095_7310113_7310130;
-+c_7323973.elements[5] = ((closureN)self_7312801)->elements[4];
-+c_7323973.elements[6] = ((closureN)self_7312801)->elements[6];
++closureN_type c_7323963;
++object e_7324058 [7];
++c_7323963.hdr.mark = gc_color_red;
++ c_7323963.hdr.grayed = 0;
++c_7323963.tag = closureN_tag;
++ c_7323963.fn = (function_type)__lambda_1118;
++c_7323963.num_args = 1;
++c_7323963.num_elements = 7;
++c_7323963.elements = (object *)e_7324058;
++c_7323963.elements[0] = ((closureN)self_7312793)->elements[0];
++c_7323963.elements[1] = ((closureN)self_7312793)->elements[1];
++c_7323963.elements[2] = ((closureN)self_7312793)->elements[2];
++c_7323963.elements[3] = r_736860_7310087_7310105_7310122;
++c_7323963.elements[4] = ((closureN)self_7312793)->elements[3];
++c_7323963.elements[5] = ((closureN)self_7312793)->elements[4];
++c_7323963.elements[6] = ((closureN)self_7312793)->elements[5];
++
++return_closcall2(data,  ((closureN)self_7312793)->elements[4],  &c_7323963, quote_temp);; 
++}
++
++static void __lambda_1118(void *data, object self_7312794, int argc, object *args) /* object self_7312794, object r_736878_7310088_7310106_7310123 */
++ {
++ object r_736878_7310088_7310106_7310123 = args[0];
++  
++closureN_type c_7323966;
++object e_7324057 [7];
++c_7323966.hdr.mark = gc_color_red;
++ c_7323966.hdr.grayed = 0;
++c_7323966.tag = closureN_tag;
++ c_7323966.fn = (function_type)__lambda_1119;
++c_7323966.num_args = 1;
++c_7323966.num_elements = 7;
++c_7323966.elements = (object *)e_7324057;
++c_7323966.elements[0] = ((closureN)self_7312794)->elements[0];
++c_7323966.elements[1] = ((closureN)self_7312794)->elements[1];
++c_7323966.elements[2] = ((closureN)self_7312794)->elements[2];
++c_7323966.elements[3] = ((closureN)self_7312794)->elements[3];
++c_7323966.elements[4] = r_736878_7310088_7310106_7310123;
++c_7323966.elements[5] = ((closureN)self_7312794)->elements[4];
++c_7323966.elements[6] = ((closureN)self_7312794)->elements[6];
  
 -return_closcall2(data,  ((closureN)self_7314094)->elements[5],  &c_7326425, quote_guard_91aux);; 
-+return_closcall2(data,  ((closureN)self_7312801)->elements[5],  &c_7323973, quote_guard_91aux);; 
++return_closcall2(data,  ((closureN)self_7312794)->elements[5],  &c_7323966, quote_guard_91aux);; 
  }
  
 -static void __lambda_1166(void *data, object self_7314095, int argc, object *args) /* object self_7314095, object r_737644_7311344_7311362_7311379_7311392_7311404 */
-+static void __lambda_1119(void *data, object self_7312802, int argc, object *args) /* object self_7312802, object r_736876_7310098_7310116_7310133_7310146_7310158 */
++static void __lambda_1119(void *data, object self_7312795, int argc, object *args) /* object self_7312795, object r_736869_7310091_7310109_7310126_7310139_7310151 */
   {
 - object r_737644_7311344_7311362_7311379_7311392_7311404 = args[0];
-+ object r_736876_7310098_7310116_7310133_7310146_7310158 = args[0];
++ object r_736869_7310091_7310109_7310126_7310139_7310151 = args[0];
    
 -pair_type local_7326430; 
-+pair_type local_7323978; 
++pair_type local_7323971; 
  
 -pair_type local_7326433; 
-+pair_type local_7323981; 
++pair_type local_7323974; 
  
 -pair_type local_7326437; 
-+pair_type local_7323985; 
++pair_type local_7323978; 
  
 -pair_type local_7326440; 
-+pair_type local_7323988; 
++pair_type local_7323981; 
  
 -pair_type local_7326443; 
-+pair_type local_7323991; 
++pair_type local_7323984; 
  
 -pair_type local_7326447; 
-+pair_type local_7323995; 
++pair_type local_7323988; 
  
  
  
@@ -11244,19 +11243,19 @@ Make let-values be the same as let*-values, to work around
  
  
 -pair_type local_7326457; 
-+pair_type local_7324005; 
++pair_type local_7323998; 
  
 -pair_type local_7326460; 
-+pair_type local_7324008; 
++pair_type local_7324001; 
  
 -pair_type local_7326464; 
-+pair_type local_7324012; 
++pair_type local_7324005; 
  
 -pair_type local_7326468; 
-+pair_type local_7324016; 
++pair_type local_7324009; 
  
 -pair_type local_7326471; 
-+pair_type local_7324019; 
++pair_type local_7324012; 
  
  
  
@@ -11265,21 +11264,21 @@ Make let-values be the same as let*-values, to work around
  
  
 -pair_type local_7326485; 
-+pair_type local_7324033; 
++pair_type local_7324026; 
  
 -pair_type local_7326489; 
-+pair_type local_7324037; 
++pair_type local_7324030; 
  
 -pair_type local_7326492; 
-+pair_type local_7324040; 
++pair_type local_7324033; 
  
 -pair_type local_7326495; 
-+pair_type local_7324043; 
++pair_type local_7324036; 
  
  
  
 -pair_type local_7326501; 
-+pair_type local_7324049; 
++pair_type local_7324042; 
  
  
  
@@ -11288,32 +11287,32 @@ Make let-values be the same as let*-values, to work around
  
  
 -return_direct_with_clo1(data,  ((closureN)self_7314095)->elements[0], (((closure)  ((closureN)self_7314095)->elements[0])->fn),  set_pair_as_expr(&local_7326430, set_pair_as_expr(&local_7326433, ((closureN)self_7314095)->elements[1], set_pair_as_expr(&local_7326437, set_pair_as_expr(&local_7326440, set_pair_as_expr(&local_7326443, ((closureN)self_7314095)->elements[5], set_pair_as_expr(&local_7326447, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314095)->elements[6]))), NULL)), NULL), set_pair_as_expr(&local_7326457, set_pair_as_expr(&local_7326460, ((closureN)self_7314095)->elements[2], set_pair_as_expr(&local_7326464, ((closureN)self_7314095)->elements[3], set_pair_as_expr(&local_7326468, set_pair_as_expr(&local_7326471, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314095)->elements[6]))))), set_pair_as_expr(&local_7326485, ((closureN)self_7314095)->elements[4], NULL)), set_pair_as_expr(&local_7326489, set_pair_as_ex
pr(&local_7326492, r_737644_7311344_7311362_7311379_7311392_7311404, set_pair_as_expr(&local_7326495, Cyc_car(data, ((closureN)self_7314095)->elements[6]), set_pair_as_expr(&local_7326501, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314095)->elements[6]))), Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314095)->elements[6])))))), NULL)))), 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_7323978, set_pair_as_expr(&local_7323981, ((closureN)self_7312802)->elements[1], set_pair_as_expr(&local_7323985, set_pair_as_expr(&local_7323988, set_pair_as_expr(&local_7323991, ((closureN)self_7312802)->elements[5], set_pair_as_expr(&local_7323995, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312802)->elements[6]))), NULL)), NULL), set_pair_as_expr(&local_7324005, set_pair_as_expr(&local_7324008, ((closureN)self_7312802)->elements[2], set_pair_as_expr(&local_7324012, ((closureN)self_7312802)->elements[3], set_pair_as_expr(&local_7324016, set_pair_as_expr(&local_7324019, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312802)->elements[6]))))), set_pair_as_expr(&local_7324033, ((closureN)self_7312802)->elements[4], NULL)), set_pair_as_expr(&local_7324037, set_pair_as_ex
pr(&local_7324040, r_736876_7310098_7310116_7310133_7310146_7310158, set_pair_as_expr(&local_7324043, Cyc_car(data, ((closureN)self_7312802)->elements[6]), set_pair_as_expr(&local_7324049, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312802)->elements[6]))), Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312802)->elements[6])))))), NULL)))), NULL))), boolean_f));; 
++return_direct_with_clo1(data,  ((closureN)self_7312795)->elements[0], (((closure)  ((closureN)self_7312795)->elements[0])->fn),  set_pair_as_expr(&local_7323971, set_pair_as_expr(&local_7323974, ((closureN)self_7312795)->elements[1], set_pair_as_expr(&local_7323978, set_pair_as_expr(&local_7323981, set_pair_as_expr(&local_7323984, ((closureN)self_7312795)->elements[5], set_pair_as_expr(&local_7323988, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312795)->elements[6]))), NULL)), NULL), set_pair_as_expr(&local_7323998, set_pair_as_expr(&local_7324001, ((closureN)self_7312795)->elements[2], set_pair_as_expr(&local_7324005, ((closureN)self_7312795)->elements[3], set_pair_as_expr(&local_7324009, set_pair_as_expr(&local_7324012, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312795)->elements[6]))))), set_pair_as_expr(&local_7324026, ((closureN)self_7312795)->elements[4], NULL)), set_pair_as_expr(&local_7324030, set_pair_as_ex
pr(&local_7324033, r_736869_7310091_7310109_7310126_7310139_7310151, set_pair_as_expr(&local_7324036, Cyc_car(data, ((closureN)self_7312795)->elements[6]), set_pair_as_expr(&local_7324042, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312795)->elements[6]))), Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312795)->elements[6])))))), NULL)))), NULL))), boolean_f));; 
  }
  
 -static void __lambda_1148(void *data, object self_7314096, int argc, object *args) /* object self_7314096, object k_737672 */
-+static void __lambda_1101(void *data, object self_7312803, int argc, object *args) /* object self_7312803, object k_736904 */
++static void __lambda_1101(void *data, object self_7312796, int argc, object *args) /* object self_7312796, object k_736897 */
   {
 - object k_737672 = args[0];
-+ object k_736904 = args[0];
++ object k_736897 = args[0];
      
 -if( (boolean_f != Cyc_is_pair(((closureN)self_7314096)->elements[2])) ){ 
-+if( (boolean_f != Cyc_is_pair(((closureN)self_7312803)->elements[2])) ){ 
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312796)->elements[2])) ){ 
      
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314096)->elements[2]))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312803)->elements[2]))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312796)->elements[2]))) ){ 
      
    
    
 -if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314096)->elements[2])))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312803)->elements[2])))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312796)->elements[2])))) ){ 
      
    
    
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314096)->elements[2]))))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312803)->elements[2]))))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312796)->elements[2]))))) ){ 
    
 -closureN_type c_7326185;
 -object e_7326324 [4];
@@ -11328,45 +11327,45 @@ Make let-values be the same as let*-values, to work around
 -c_7326185.elements[1] = k_737672;
 -c_7326185.elements[2] = ((closureN)self_7314096)->elements[1];
 -c_7326185.elements[3] = ((closureN)self_7314096)->elements[2];
-+closureN_type c_7323733;
-+object e_7323872 [4];
-+c_7323733.hdr.mark = gc_color_red;
-+ c_7323733.hdr.grayed = 0;
-+c_7323733.tag = closureN_tag;
-+ c_7323733.fn = (function_type)__lambda_1102;
-+c_7323733.num_args = 1;
-+c_7323733.num_elements = 4;
-+c_7323733.elements = (object *)e_7323872;
-+c_7323733.elements[0] = ((closureN)self_7312803)->elements[0];
-+c_7323733.elements[1] = k_736904;
-+c_7323733.elements[2] = ((closureN)self_7312803)->elements[1];
-+c_7323733.elements[3] = ((closureN)self_7312803)->elements[2];
++closureN_type c_7323726;
++object e_7323865 [4];
++c_7323726.hdr.mark = gc_color_red;
++ c_7323726.hdr.grayed = 0;
++c_7323726.tag = closureN_tag;
++ c_7323726.fn = (function_type)__lambda_1102;
++c_7323726.num_args = 1;
++c_7323726.num_elements = 4;
++c_7323726.elements = (object *)e_7323865;
++c_7323726.elements[0] = ((closureN)self_7312796)->elements[0];
++c_7323726.elements[1] = k_736897;
++c_7323726.elements[2] = ((closureN)self_7312796)->elements[1];
++c_7323726.elements[3] = ((closureN)self_7312796)->elements[2];
  
 -return_closcall2(data,  ((closureN)self_7314096)->elements[1],  &c_7326185, quote__123_125);
-+return_closcall2(data,  ((closureN)self_7312803)->elements[1],  &c_7323733, quote__123_125);
++return_closcall2(data,  ((closureN)self_7312796)->elements[1],  &c_7323726, quote__123_125);
  } else { 
 -  return_direct_with_clo1(data,  k_737672, (((closure)  k_737672)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736904, (((closure)  k_736904)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736897, (((closure)  k_736897)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_737672, (((closure)  k_737672)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736904, (((closure)  k_736904)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736897, (((closure)  k_736897)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_737672, (((closure)  k_737672)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736904, (((closure)  k_736904)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736897, (((closure)  k_736897)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_737672, (((closure)  k_737672)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736904, (((closure)  k_736904)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736897, (((closure)  k_736897)->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_1149(void *data, object self_7314097, int argc, object *args) /* object self_7314097, object r_737730 */
-+static void __lambda_1102(void *data, object self_7312804, int argc, object *args) /* object self_7312804, object r_736962 */
++static void __lambda_1102(void *data, object self_7312797, int argc, object *args) /* object self_7312797, object r_736955 */
   {
 - object r_737730 = args[0];
-+ object r_736962 = args[0];
++ object r_736955 = args[0];
    
 -closureN_type c_7326188;
 -object e_7326314 [3];
@@ -11380,18 +11379,18 @@ Make let-values be the same as let*-values, to work around
 -c_7326188.elements[0] = ((closureN)self_7314097)->elements[1];
 -c_7326188.elements[1] = ((closureN)self_7314097)->elements[2];
 -c_7326188.elements[2] = ((closureN)self_7314097)->elements[3];
-+closureN_type c_7323736;
-+object e_7323862 [3];
-+c_7323736.hdr.mark = gc_color_red;
-+ c_7323736.hdr.grayed = 0;
-+c_7323736.tag = closureN_tag;
-+ c_7323736.fn = (function_type)__lambda_1103;
-+c_7323736.num_args = 1;
-+c_7323736.num_elements = 3;
-+c_7323736.elements = (object *)e_7323862;
-+c_7323736.elements[0] = ((closureN)self_7312804)->elements[1];
-+c_7323736.elements[1] = ((closureN)self_7312804)->elements[2];
-+c_7323736.elements[2] = ((closureN)self_7312804)->elements[3];
++closureN_type c_7323729;
++object e_7323855 [3];
++c_7323729.hdr.mark = gc_color_red;
++ c_7323729.hdr.grayed = 0;
++c_7323729.tag = closureN_tag;
++ c_7323729.fn = (function_type)__lambda_1103;
++c_7323729.num_args = 1;
++c_7323729.num_elements = 3;
++c_7323729.elements = (object *)e_7323855;
++c_7323729.elements[0] = ((closureN)self_7312797)->elements[1];
++c_7323729.elements[1] = ((closureN)self_7312797)->elements[2];
++c_7323729.elements[2] = ((closureN)self_7312797)->elements[3];
  
  
  
@@ -11400,23 +11399,23 @@ Make let-values be the same as let*-values, to work around
  
  
 -return_closcall3(data,  ((closureN)self_7314097)->elements[0],  &c_7326188, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314097)->elements[3])))), r_737730);; 
-+return_closcall3(data,  ((closureN)self_7312804)->elements[0],  &c_7323736, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312804)->elements[3])))), r_736962);; 
++return_closcall3(data,  ((closureN)self_7312797)->elements[0],  &c_7323729, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312797)->elements[3])))), r_736955);; 
  }
  
 -static void __lambda_1150(void *data, object self_7314098, int argc, object *args) /* object self_7314098, object r_737683 */
-+static void __lambda_1103(void *data, object self_7312805, int argc, object *args) /* object self_7312805, object r_736915 */
++static void __lambda_1103(void *data, object self_7312798, int argc, object *args) /* object self_7312798, object r_736908 */
   {
 - object r_737683 = args[0];
 -  if( (boolean_f != r_737683) ){ 
-+ object r_736915 = args[0];
-+  if( (boolean_f != r_736915) ){ 
++ object r_736908 = args[0];
++  if( (boolean_f != r_736908) ){ 
      
    
    
    
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314098)->elements[2])))))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312805)->elements[2])))))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312798)->elements[2])))))) ){ 
      
    
    
@@ -11424,12 +11423,12 @@ Make let-values be the same as let*-values, to work around
    
    
 -if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314098)->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_7312805)->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_7312798)->elements[2]))))))) ){ 
      
    
    
 -if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314098)->elements[2])))) ){ 
-+if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312805)->elements[2])))) ){ 
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312798)->elements[2])))) ){ 
    
 -closureN_type c_7326222;
 -object e_7326305 [3];
@@ -11443,44 +11442,44 @@ Make let-values be the same as let*-values, to work around
 -c_7326222.elements[0] = ((closureN)self_7314098)->elements[0];
 -c_7326222.elements[1] = ((closureN)self_7314098)->elements[1];
 -c_7326222.elements[2] = ((closureN)self_7314098)->elements[2];
-+closureN_type c_7323770;
-+object e_7323853 [3];
-+c_7323770.hdr.mark = gc_color_red;
-+ c_7323770.hdr.grayed = 0;
-+c_7323770.tag = closureN_tag;
-+ c_7323770.fn = (function_type)__lambda_1104;
-+c_7323770.num_args = 1;
-+c_7323770.num_elements = 3;
-+c_7323770.elements = (object *)e_7323853;
-+c_7323770.elements[0] = ((closureN)self_7312805)->elements[0];
-+c_7323770.elements[1] = ((closureN)self_7312805)->elements[1];
-+c_7323770.elements[2] = ((closureN)self_7312805)->elements[2];
++closureN_type c_7323763;
++object e_7323846 [3];
++c_7323763.hdr.mark = gc_color_red;
++ c_7323763.hdr.grayed = 0;
++c_7323763.tag = closureN_tag;
++ c_7323763.fn = (function_type)__lambda_1104;
++c_7323763.num_args = 1;
++c_7323763.num_elements = 3;
++c_7323763.elements = (object *)e_7323846;
++c_7323763.elements[0] = ((closureN)self_7312798)->elements[0];
++c_7323763.elements[1] = ((closureN)self_7312798)->elements[1];
++c_7323763.elements[2] = ((closureN)self_7312798)->elements[2];
  
 -return_closcall2(data,  ((closureN)self_7314098)->elements[1],  &c_7326222, quote_let);
-+return_closcall2(data,  ((closureN)self_7312805)->elements[1],  &c_7323770, quote_let);
++return_closcall2(data,  ((closureN)self_7312798)->elements[1],  &c_7323763, quote_let);
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7314098)->elements[0], (((closure)  ((closureN)self_7314098)->elements[0])->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  ((closureN)self_7312805)->elements[0], (((closure)  ((closureN)self_7312805)->elements[0])->fn),  boolean_f);}
++  return_direct_with_clo1(data,  ((closureN)self_7312798)->elements[0], (((closure)  ((closureN)self_7312798)->elements[0])->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7314098)->elements[0], (((closure)  ((closureN)self_7314098)->elements[0])->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  ((closureN)self_7312805)->elements[0], (((closure)  ((closureN)self_7312805)->elements[0])->fn),  boolean_f);}
++  return_direct_with_clo1(data,  ((closureN)self_7312798)->elements[0], (((closure)  ((closureN)self_7312798)->elements[0])->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7314098)->elements[0], (((closure)  ((closureN)self_7314098)->elements[0])->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  ((closureN)self_7312805)->elements[0], (((closure)  ((closureN)self_7312805)->elements[0])->fn),  boolean_f);}
++  return_direct_with_clo1(data,  ((closureN)self_7312798)->elements[0], (((closure)  ((closureN)self_7312798)->elements[0])->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7314098)->elements[0], (((closure)  ((closureN)self_7314098)->elements[0])->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  ((closureN)self_7312805)->elements[0], (((closure)  ((closureN)self_7312805)->elements[0])->fn),  boolean_f);}
++  return_direct_with_clo1(data,  ((closureN)self_7312798)->elements[0], (((closure)  ((closureN)self_7312798)->elements[0])->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_1151(void *data, object self_7314099, int argc, object *args) /* object self_7314099, object r_737692 */
-+static void __lambda_1104(void *data, object self_7312806, int argc, object *args) /* object self_7312806, object r_736924 */
++static void __lambda_1104(void *data, object self_7312799, int argc, object *args) /* object self_7312799, object r_736917 */
   {
 - object r_737692 = args[0];
-+ object r_736924 = args[0];
++ object r_736917 = args[0];
    
 -closureN_type c_7326225;
 -object e_7326304 [4];
@@ -11495,29 +11494,29 @@ Make let-values be the same as let*-values, to work around
 -c_7326225.elements[1] = r_737692;
 -c_7326225.elements[2] = ((closureN)self_7314099)->elements[1];
 -c_7326225.elements[3] = ((closureN)self_7314099)->elements[2];
-+closureN_type c_7323773;
-+object e_7323852 [4];
-+c_7323773.hdr.mark = gc_color_red;
-+ c_7323773.hdr.grayed = 0;
-+c_7323773.tag = closureN_tag;
-+ c_7323773.fn = (function_type)__lambda_1105;
-+c_7323773.num_args = 1;
-+c_7323773.num_elements = 4;
-+c_7323773.elements = (object *)e_7323852;
-+c_7323773.elements[0] = ((closureN)self_7312806)->elements[0];
-+c_7323773.elements[1] = r_736924;
-+c_7323773.elements[2] = ((closureN)self_7312806)->elements[1];
-+c_7323773.elements[3] = ((closureN)self_7312806)->elements[2];
++closureN_type c_7323766;
++object e_7323845 [4];
++c_7323766.hdr.mark = gc_color_red;
++ c_7323766.hdr.grayed = 0;
++c_7323766.tag = closureN_tag;
++ c_7323766.fn = (function_type)__lambda_1105;
++c_7323766.num_args = 1;
++c_7323766.num_elements = 4;
++c_7323766.elements = (object *)e_7323845;
++c_7323766.elements[0] = ((closureN)self_7312799)->elements[0];
++c_7323766.elements[1] = r_736917;
++c_7323766.elements[2] = ((closureN)self_7312799)->elements[1];
++c_7323766.elements[3] = ((closureN)self_7312799)->elements[2];
  
 -return_closcall2(data,  ((closureN)self_7314099)->elements[1],  &c_7326225, quote_temp);; 
-+return_closcall2(data,  ((closureN)self_7312806)->elements[1],  &c_7323773, quote_temp);; 
++return_closcall2(data,  ((closureN)self_7312799)->elements[1],  &c_7323766, quote_temp);; 
  }
  
 -static void __lambda_1152(void *data, object self_7314100, int argc, object *args) /* object self_7314100, object r_737723 */
-+static void __lambda_1105(void *data, object self_7312807, int argc, object *args) /* object self_7312807, object r_736955 */
++static void __lambda_1105(void *data, object self_7312800, int argc, object *args) /* object self_7312800, object r_736948 */
   {
 - object r_737723 = args[0];
-+ object r_736955 = args[0];
++ object r_736948 = args[0];
    
 -closureN_type c_7326228;
 -object e_7326303 [5];
@@ -11533,30 +11532,30 @@ Make let-values be the same as let*-values, to work around
 -c_7326228.elements[2] = r_737723;
 -c_7326228.elements[3] = ((closureN)self_7314100)->elements[2];
 -c_7326228.elements[4] = ((closureN)self_7314100)->elements[3];
-+closureN_type c_7323776;
-+object e_7323851 [5];
-+c_7323776.hdr.mark = gc_color_red;
-+ c_7323776.hdr.grayed = 0;
-+c_7323776.tag = closureN_tag;
-+ c_7323776.fn = (function_type)__lambda_1106;
-+c_7323776.num_args = 1;
-+c_7323776.num_elements = 5;
-+c_7323776.elements = (object *)e_7323851;
-+c_7323776.elements[0] = ((closureN)self_7312807)->elements[0];
-+c_7323776.elements[1] = ((closureN)self_7312807)->elements[1];
-+c_7323776.elements[2] = r_736955;
-+c_7323776.elements[3] = ((closureN)self_7312807)->elements[2];
-+c_7323776.elements[4] = ((closureN)self_7312807)->elements[3];
++closureN_type c_7323769;
++object e_7323844 [5];
++c_7323769.hdr.mark = gc_color_red;
++ c_7323769.hdr.grayed = 0;
++c_7323769.tag = closureN_tag;
++ c_7323769.fn = (function_type)__lambda_1106;
++c_7323769.num_args = 1;
++c_7323769.num_elements = 5;
++c_7323769.elements = (object *)e_7323844;
++c_7323769.elements[0] = ((closureN)self_7312800)->elements[0];
++c_7323769.elements[1] = ((closureN)self_7312800)->elements[1];
++c_7323769.elements[2] = r_736948;
++c_7323769.elements[3] = ((closureN)self_7312800)->elements[2];
++c_7323769.elements[4] = ((closureN)self_7312800)->elements[3];
  
 -return_closcall2(data,  ((closureN)self_7314100)->elements[2],  &c_7326228, quote__if);; 
-+return_closcall2(data,  ((closureN)self_7312807)->elements[2],  &c_7323776, quote__if);; 
++return_closcall2(data,  ((closureN)self_7312800)->elements[2],  &c_7323769, quote__if);; 
  }
  
 -static void __lambda_1153(void *data, object self_7314101, int argc, object *args) /* object self_7314101, object r_737701_7311252_7311266_7311279 */
-+static void __lambda_1106(void *data, object self_7312808, int argc, object *args) /* object self_7312808, object r_736933_7310006_7310020_7310033 */
++static void __lambda_1106(void *data, object self_7312801, int argc, object *args) /* object self_7312801, object r_736926_739999_7310013_7310026 */
   {
 - object r_737701_7311252_7311266_7311279 = args[0];
-+ object r_736933_7310006_7310020_7310033 = args[0];
++ object r_736926_739999_7310013_7310026 = args[0];
    
 -closureN_type c_7326231;
 -object e_7326302 [6];
@@ -11573,31 +11572,31 @@ Make let-values be the same as let*-values, to work around
 -c_7326231.elements[3] = ((closureN)self_7314101)->elements[2];
 -c_7326231.elements[4] = ((closureN)self_7314101)->elements[3];
 -c_7326231.elements[5] = ((closureN)self_7314101)->elements[4];
-+closureN_type c_7323779;
-+object e_7323850 [6];
-+c_7323779.hdr.mark = gc_color_red;
-+ c_7323779.hdr.grayed = 0;
-+c_7323779.tag = closureN_tag;
-+ c_7323779.fn = (function_type)__lambda_1107;
-+c_7323779.num_args = 1;
-+c_7323779.num_elements = 6;
-+c_7323779.elements = (object *)e_7323850;
-+c_7323779.elements[0] = ((closureN)self_7312808)->elements[0];
-+c_7323779.elements[1] = ((closureN)self_7312808)->elements[1];
-+c_7323779.elements[2] = r_736933_7310006_7310020_7310033;
-+c_7323779.elements[3] = ((closureN)self_7312808)->elements[2];
-+c_7323779.elements[4] = ((closureN)self_7312808)->elements[3];
-+c_7323779.elements[5] = ((closureN)self_7312808)->elements[4];
++closureN_type c_7323772;
++object e_7323843 [6];
++c_7323772.hdr.mark = gc_color_red;
++ c_7323772.hdr.grayed = 0;
++c_7323772.tag = closureN_tag;
++ c_7323772.fn = (function_type)__lambda_1107;
++c_7323772.num_args = 1;
++c_7323772.num_elements = 6;
++c_7323772.elements = (object *)e_7323843;
++c_7323772.elements[0] = ((closureN)self_7312801)->elements[0];
++c_7323772.elements[1] = ((closureN)self_7312801)->elements[1];
++c_7323772.elements[2] = r_736926_739999_7310013_7310026;
++c_7323772.elements[3] = ((closureN)self_7312801)->elements[2];
++c_7323772.elements[4] = ((closureN)self_7312801)->elements[3];
++c_7323772.elements[5] = ((closureN)self_7312801)->elements[4];
  
 -return_closcall2(data,  ((closureN)self_7314101)->elements[3],  &c_7326231, quote_temp);; 
-+return_closcall2(data,  ((closureN)self_7312808)->elements[3],  &c_7323779, quote_temp);; 
++return_closcall2(data,  ((closureN)self_7312801)->elements[3],  &c_7323772, quote_temp);; 
  }
  
 -static void __lambda_1154(void *data, object self_7314102, int argc, object *args) /* object self_7314102, object r_737704_7311253_7311267_7311280 */
-+static void __lambda_1107(void *data, object self_7312809, int argc, object *args) /* object self_7312809, object r_736936_7310007_7310021_7310034 */
++static void __lambda_1107(void *data, object self_7312802, int argc, object *args) /* object self_7312802, object r_736929_7310000_7310014_7310027 */
   {
 - object r_737704_7311253_7311267_7311280 = args[0];
-+ object r_736936_7310007_7310021_7310034 = args[0];
++ object r_736929_7310000_7310014_7310027 = args[0];
    
 -closureN_type c_7326234;
 -object e_7326301 [6];
@@ -11614,49 +11613,49 @@ Make let-values be the same as let*-values, to work around
 -c_7326234.elements[3] = r_737704_7311253_7311267_7311280;
 -c_7326234.elements[4] = ((closureN)self_7314102)->elements[3];
 -c_7326234.elements[5] = ((closureN)self_7314102)->elements[5];
-+closureN_type c_7323782;
-+object e_7323849 [6];
-+c_7323782.hdr.mark = gc_color_red;
-+ c_7323782.hdr.grayed = 0;
-+c_7323782.tag = closureN_tag;
-+ c_7323782.fn = (function_type)__lambda_1108;
-+c_7323782.num_args = 1;
-+c_7323782.num_elements = 6;
-+c_7323782.elements = (object *)e_7323849;
-+c_7323782.elements[0] = ((closureN)self_7312809)->elements[0];
-+c_7323782.elements[1] = ((closureN)self_7312809)->elements[1];
-+c_7323782.elements[2] = ((closureN)self_7312809)->elements[2];
-+c_7323782.elements[3] = r_736936_7310007_7310021_7310034;
-+c_7323782.elements[4] = ((closureN)self_7312809)->elements[3];
-+c_7323782.elements[5] = ((closureN)self_7312809)->elements[5];
++closureN_type c_7323775;
++object e_7323842 [6];
++c_7323775.hdr.mark = gc_color_red;
++ c_7323775.hdr.grayed = 0;
++c_7323775.tag = closureN_tag;
++ c_7323775.fn = (function_type)__lambda_1108;
++c_7323775.num_args = 1;
++c_7323775.num_elements = 6;
++c_7323775.elements = (object *)e_7323842;
++c_7323775.elements[0] = ((closureN)self_7312802)->elements[0];
++c_7323775.elements[1] = ((closureN)self_7312802)->elements[1];
++c_7323775.elements[2] = ((closureN)self_7312802)->elements[2];
++c_7323775.elements[3] = r_736929_7310000_7310014_7310027;
++c_7323775.elements[4] = ((closureN)self_7312802)->elements[3];
++c_7323775.elements[5] = ((closureN)self_7312802)->elements[5];
  
 -return_closcall2(data,  ((closureN)self_7314102)->elements[4],  &c_7326234, quote_temp);; 
-+return_closcall2(data,  ((closureN)self_7312809)->elements[4],  &c_7323782, quote_temp);; 
++return_closcall2(data,  ((closureN)self_7312802)->elements[4],  &c_7323775, quote_temp);; 
  }
  
 -static void __lambda_1155(void *data, object self_7314103, int argc, object *args) /* object self_7314103, object r_737714_7311254_7311268_7311281 */
-+static void __lambda_1108(void *data, object self_7312810, int argc, object *args) /* object self_7312810, object r_736946_7310008_7310022_7310035 */
++static void __lambda_1108(void *data, object self_7312803, int argc, object *args) /* object self_7312803, object r_736939_7310001_7310015_7310028 */
   {
 - object r_737714_7311254_7311268_7311281 = args[0];
-+ object r_736946_7310008_7310022_7310035 = args[0];
++ object r_736939_7310001_7310015_7310028 = args[0];
    
 -pair_type local_7326239; 
-+pair_type local_7323787; 
++pair_type local_7323780; 
  
 -pair_type local_7326242; 
-+pair_type local_7323790; 
++pair_type local_7323783; 
  
 -pair_type local_7326246; 
-+pair_type local_7323794; 
++pair_type local_7323787; 
  
 -pair_type local_7326249; 
-+pair_type local_7323797; 
++pair_type local_7323790; 
  
 -pair_type local_7326252; 
-+pair_type local_7323800; 
++pair_type local_7323793; 
  
 -pair_type local_7326256; 
-+pair_type local_7323804; 
++pair_type local_7323797; 
  
  
  
@@ -11665,19 +11664,19 @@ Make let-values be the same as let*-values, to work around
  
  
 -pair_type local_7326266; 
-+pair_type local_7323814; 
++pair_type local_7323807; 
  
 -pair_type local_7326269; 
-+pair_type local_7323817; 
++pair_type local_7323810; 
  
 -pair_type local_7326273; 
-+pair_type local_7323821; 
++pair_type local_7323814; 
  
 -pair_type local_7326277; 
-+pair_type local_7323825; 
++pair_type local_7323818; 
  
 -pair_type local_7326280; 
-+pair_type local_7323828; 
++pair_type local_7323821; 
  
  
  
@@ -11686,35 +11685,35 @@ Make let-values be the same as let*-values, to work around
  
  
 -pair_type local_7326294; 
-+pair_type local_7323842; 
++pair_type local_7323835; 
  
 -pair_type local_7326297; 
-+pair_type local_7323845; 
++pair_type local_7323838; 
  
  
 -return_direct_with_clo1(data,  ((closureN)self_7314103)->elements[0], (((closure)  ((closureN)self_7314103)->elements[0])->fn),  set_pair_as_expr(&local_7326239, set_pair_as_expr(&local_7326242, ((closureN)self_7314103)->elements[1], set_pair_as_expr(&local_7326246, set_pair_as_expr(&local_7326249, set_pair_as_expr(&local_7326252, ((closureN)self_7314103)->elements[4], set_pair_as_expr(&local_7326256, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314103)->elements[5]))), NULL)), NULL), set_pair_as_expr(&local_7326266, set_pair_as_expr(&local_7326269, ((closureN)self_7314103)->elements[2], set_pair_as_expr(&local_7326273, ((closureN)self_7314103)->elements[3], set_pair_as_expr(&local_7326277, set_pair_as_expr(&local_7326280, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314103)->elements[5]))))), set_pair_as_expr(&local_7326294, r_737714_7311254_7311268_7311281, NULL)), set_pair_as_expr(&local_7326297, Cyc_car(data, ((clo
sureN)self_7314103)->elements[5]), NULL)))), NULL))), boolean_f));; 
-+return_direct_with_clo1(data,  ((closureN)self_7312810)->elements[0], (((closure)  ((closureN)self_7312810)->elements[0])->fn),  set_pair_as_expr(&local_7323787, set_pair_as_expr(&local_7323790, ((closureN)self_7312810)->elements[1], set_pair_as_expr(&local_7323794, set_pair_as_expr(&local_7323797, set_pair_as_expr(&local_7323800, ((closureN)self_7312810)->elements[4], set_pair_as_expr(&local_7323804, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312810)->elements[5]))), NULL)), NULL), set_pair_as_expr(&local_7323814, set_pair_as_expr(&local_7323817, ((closureN)self_7312810)->elements[2], set_pair_as_expr(&local_7323821, ((closureN)self_7312810)->elements[3], set_pair_as_expr(&local_7323825, set_pair_as_expr(&local_7323828, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312810)->elements[5]))))), set_pair_as_expr(&local_7323842, r_736946_7310008_7310022_7310035, NULL)), set_pair_as_expr(&local_7323845, Cyc_car(data, ((clo
sureN)self_7312810)->elements[5]), NULL)))), NULL))), boolean_f));; 
++return_direct_with_clo1(data,  ((closureN)self_7312803)->elements[0], (((closure)  ((closureN)self_7312803)->elements[0])->fn),  set_pair_as_expr(&local_7323780, set_pair_as_expr(&local_7323783, ((closureN)self_7312803)->elements[1], set_pair_as_expr(&local_7323787, set_pair_as_expr(&local_7323790, set_pair_as_expr(&local_7323793, ((closureN)self_7312803)->elements[4], set_pair_as_expr(&local_7323797, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312803)->elements[5]))), NULL)), NULL), set_pair_as_expr(&local_7323807, set_pair_as_expr(&local_7323810, ((closureN)self_7312803)->elements[2], set_pair_as_expr(&local_7323814, ((closureN)self_7312803)->elements[3], set_pair_as_expr(&local_7323818, set_pair_as_expr(&local_7323821, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312803)->elements[5]))))), set_pair_as_expr(&local_7323835, r_736939_7310001_7310015_7310028, NULL)), set_pair_as_expr(&local_7323838, Cyc_car(data, ((clo
sureN)self_7312803)->elements[5]), NULL)))), NULL))), boolean_f));; 
  }
  
 -static void __lambda_1141(void *data, object self_7314104, int argc, object *args) /* object self_7314104, object k_737733 */
-+static void __lambda_1094(void *data, object self_7312811, int argc, object *args) /* object self_7312811, object k_736965 */
++static void __lambda_1094(void *data, object self_7312804, int argc, object *args) /* object self_7312804, object k_736958 */
   {
 - object k_737733 = args[0];
-+ object k_736965 = args[0];
++ object k_736958 = args[0];
      
 -if( (boolean_f != Cyc_is_pair(((closureN)self_7314104)->elements[2])) ){ 
-+if( (boolean_f != Cyc_is_pair(((closureN)self_7312811)->elements[2])) ){ 
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312804)->elements[2])) ){ 
    
 -  Cyc_car(data, ((closureN)self_7314104)->elements[2]);  
-+  Cyc_car(data, ((closureN)self_7312811)->elements[2]);  
++  Cyc_car(data, ((closureN)self_7312804)->elements[2]);  
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314104)->elements[2]))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312811)->elements[2]))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312804)->elements[2]))) ){ 
      
    
    
 -if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314104)->elements[2])))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312811)->elements[2])))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312804)->elements[2])))) ){ 
    
 -closureN_type c_7326060;
 -object e_7326141 [4];
@@ -11729,41 +11728,41 @@ Make let-values be the same as let*-values, to work around
 -c_7326060.elements[1] = k_737733;
 -c_7326060.elements[2] = ((closureN)self_7314104)->elements[1];
 -c_7326060.elements[3] = ((closureN)self_7314104)->elements[2];
-+closureN_type c_7323608;
-+object e_7323689 [4];
-+c_7323608.hdr.mark = gc_color_red;
-+ c_7323608.hdr.grayed = 0;
-+c_7323608.tag = closureN_tag;
-+ c_7323608.fn = (function_type)__lambda_1095;
-+c_7323608.num_args = 1;
-+c_7323608.num_elements = 4;
-+c_7323608.elements = (object *)e_7323689;
-+c_7323608.elements[0] = ((closureN)self_7312811)->elements[0];
-+c_7323608.elements[1] = k_736965;
-+c_7323608.elements[2] = ((closureN)self_7312811)->elements[1];
-+c_7323608.elements[3] = ((closureN)self_7312811)->elements[2];
++closureN_type c_7323601;
++object e_7323682 [4];
++c_7323601.hdr.mark = gc_color_red;
++ c_7323601.hdr.grayed = 0;
++c_7323601.tag = closureN_tag;
++ c_7323601.fn = (function_type)__lambda_1095;
++c_7323601.num_args = 1;
++c_7323601.num_elements = 4;
++c_7323601.elements = (object *)e_7323682;
++c_7323601.elements[0] = ((closureN)self_7312804)->elements[0];
++c_7323601.elements[1] = k_736958;
++c_7323601.elements[2] = ((closureN)self_7312804)->elements[1];
++c_7323601.elements[3] = ((closureN)self_7312804)->elements[2];
  
 -return_closcall2(data,  ((closureN)self_7314104)->elements[1],  &c_7326060, quote__else);
-+return_closcall2(data,  ((closureN)self_7312811)->elements[1],  &c_7323608, quote__else);
++return_closcall2(data,  ((closureN)self_7312804)->elements[1],  &c_7323601, quote__else);
  } else { 
 -  return_direct_with_clo1(data,  k_737733, (((closure)  k_737733)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736965, (((closure)  k_736965)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736958, (((closure)  k_736958)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_737733, (((closure)  k_737733)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736965, (((closure)  k_736965)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736958, (((closure)  k_736958)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_737733, (((closure)  k_737733)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736965, (((closure)  k_736965)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736958, (((closure)  k_736958)->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_1142(void *data, object self_7314105, int argc, object *args) /* object self_7314105, object r_737755 */
-+static void __lambda_1095(void *data, object self_7312812, int argc, object *args) /* object self_7312812, object r_736987 */
++static void __lambda_1095(void *data, object self_7312805, int argc, object *args) /* object self_7312805, object r_736980 */
   {
 - object r_737755 = args[0];
-+ object r_736987 = args[0];
++ object r_736980 = args[0];
    
 -closureN_type c_7326063;
 -object e_7326133 [3];
@@ -11777,56 +11776,56 @@ Make let-values be the same as let*-values, to work around
 -c_7326063.elements[0] = ((closureN)self_7314105)->elements[1];
 -c_7326063.elements[1] = ((closureN)self_7314105)->elements[2];
 -c_7326063.elements[2] = ((closureN)self_7314105)->elements[3];
-+closureN_type c_7323611;
-+object e_7323681 [3];
-+c_7323611.hdr.mark = gc_color_red;
-+ c_7323611.hdr.grayed = 0;
-+c_7323611.tag = closureN_tag;
-+ c_7323611.fn = (function_type)__lambda_1096;
-+c_7323611.num_args = 1;
-+c_7323611.num_elements = 3;
-+c_7323611.elements = (object *)e_7323681;
-+c_7323611.elements[0] = ((closureN)self_7312812)->elements[1];
-+c_7323611.elements[1] = ((closureN)self_7312812)->elements[2];
-+c_7323611.elements[2] = ((closureN)self_7312812)->elements[3];
++closureN_type c_7323604;
++object e_7323674 [3];
++c_7323604.hdr.mark = gc_color_red;
++ c_7323604.hdr.grayed = 0;
++c_7323604.tag = closureN_tag;
++ c_7323604.fn = (function_type)__lambda_1096;
++c_7323604.num_args = 1;
++c_7323604.num_elements = 3;
++c_7323604.elements = (object *)e_7323674;
++c_7323604.elements[0] = ((closureN)self_7312805)->elements[1];
++c_7323604.elements[1] = ((closureN)self_7312805)->elements[2];
++c_7323604.elements[2] = ((closureN)self_7312805)->elements[3];
  
  
  
-@@ -7747,71 +7698,66 @@ c_7326063.elements[2] = ((closureN)self_
+@@ -7747,66 +7698,66 @@ c_7326063.elements[2] = ((closureN)self_
  
  
  
 -return_closcall3(data,  ((closureN)self_7314105)->elements[0],  &c_7326063, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314105)->elements[3]))), r_737755);; 
-+return_closcall3(data,  ((closureN)self_7312812)->elements[0],  &c_7323611, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312812)->elements[3]))), r_736987);; 
++return_closcall3(data,  ((closureN)self_7312805)->elements[0],  &c_7323604, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312805)->elements[3]))), r_736980);; 
  }
  
 -static void __lambda_1143(void *data, object self_7314106, int argc, object *args) /* object self_7314106, object r_737741 */
-+static void __lambda_1096(void *data, object self_7312813, int argc, object *args) /* object self_7312813, object r_736973 */
++static void __lambda_1096(void *data, object self_7312806, int argc, object *args) /* object self_7312806, object r_736966 */
   {
 - object r_737741 = args[0];
 -  if( (boolean_f != r_737741) ){ 
-+ object r_736973 = args[0];
-+  if( (boolean_f != r_736973) ){ 
++ object r_736966 = args[0];
++  if( (boolean_f != r_736966) ){ 
      
    
    
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314106)->elements[2]))))) ){ 
 -    complex_num_type local_7326075; 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312813)->elements[2]))))) ){ 
-+    complex_num_type local_7323623; 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312806)->elements[2]))))) ){ 
++    complex_num_type local_7323616; 
    
    
    
    
  if( (boolean_f != ((inline_function_type)
 -                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7326075, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314106)->elements[2])))))) ){ 
-+                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7323623, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312813)->elements[2])))))) ){ 
++                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7323616, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312806)->elements[2])))))) ){ 
      
    
    
 -if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314106)->elements[2])))) ){ 
-+if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312813)->elements[2])))) ){ 
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312806)->elements[2])))) ){ 
    
 -closureN_type c_7326094;
 -object e_7326124 [2];
@@ -11839,71 +11838,69 @@ Make let-values be the same as let*-values, to work around
 -c_7326094.elements = (object *)e_7326124;
 -c_7326094.elements[0] = ((closureN)self_7314106)->elements[0];
 -c_7326094.elements[1] = ((closureN)self_7314106)->elements[2];
-+closureN_type c_7323642;
-+object e_7323672 [2];
-+c_7323642.hdr.mark = gc_color_red;
-+ c_7323642.hdr.grayed = 0;
-+c_7323642.tag = closureN_tag;
-+ c_7323642.fn = (function_type)__lambda_1097;
-+c_7323642.num_args = 1;
-+c_7323642.num_elements = 2;
-+c_7323642.elements = (object *)e_7323672;
-+c_7323642.elements[0] = ((closureN)self_7312813)->elements[0];
-+c_7323642.elements[1] = ((closureN)self_7312813)->elements[2];
++closureN_type c_7323635;
++object e_7323665 [2];
++c_7323635.hdr.mark = gc_color_red;
++ c_7323635.hdr.grayed = 0;
++c_7323635.tag = closureN_tag;
++ c_7323635.fn = (function_type)__lambda_1097;
++c_7323635.num_args = 1;
++c_7323635.num_elements = 2;
++c_7323635.elements = (object *)e_7323665;
++c_7323635.elements[0] = ((closureN)self_7312806)->elements[0];
++c_7323635.elements[1] = ((closureN)self_7312806)->elements[2];
  
 -return_closcall2(data,  ((closureN)self_7314106)->elements[1],  &c_7326094, quote_begin);
-+return_closcall2(data,  ((closureN)self_7312813)->elements[1],  &c_7323642, quote_begin);
++return_closcall2(data,  ((closureN)self_7312806)->elements[1],  &c_7323635, quote_begin);
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7314106)->elements[0], (((closure)  ((closureN)self_7314106)->elements[0])->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  ((closureN)self_7312813)->elements[0], (((closure)  ((closureN)self_7312813)->elements[0])->fn),  boolean_f);}
++  return_direct_with_clo1(data,  ((closureN)self_7312806)->elements[0], (((closure)  ((closureN)self_7312806)->elements[0])->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7314106)->elements[0], (((closure)  ((closureN)self_7314106)->elements[0])->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  ((closureN)self_7312813)->elements[0], (((closure)  ((closureN)self_7312813)->elements[0])->fn),  boolean_f);}
++  return_direct_with_clo1(data,  ((closureN)self_7312806)->elements[0], (((closure)  ((closureN)self_7312806)->elements[0])->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7314106)->elements[0], (((closure)  ((closureN)self_7314106)->elements[0])->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  ((closureN)self_7312813)->elements[0], (((closure)  ((closureN)self_7312813)->elements[0])->fn),  boolean_f);}
++  return_direct_with_clo1(data,  ((closureN)self_7312806)->elements[0], (((closure)  ((closureN)self_7312806)->elements[0])->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7314106)->elements[0], (((closure)  ((closureN)self_7314106)->elements[0])->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  ((closureN)self_7312813)->elements[0], (((closure)  ((closureN)self_7312813)->elements[0])->fn),  boolean_f);}
++  return_direct_with_clo1(data,  ((closureN)self_7312806)->elements[0], (((closure)  ((closureN)self_7312806)->elements[0])->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_1144(void *data, object self_7314107, int argc, object *args) /* object self_7314107, object r_737750 */
-+static void __lambda_1097(void *data, object self_7312814, int argc, object *args) /* object self_7312814, object r_736982 */
++static void __lambda_1097(void *data, object self_7312807, int argc, object *args) /* object self_7312807, object r_736975 */
   {
 - object r_737750 = args[0];
-+ object r_736982 = args[0];
++ object r_736975 = args[0];
    
 -pair_type local_7326099; 
--
--pair_type local_7326102; 
--
--pair_type local_7326105; 
--
--
--
-+pair_type local_7323647; 
++pair_type local_7323640; 
  
-+pair_type local_7323650; 
+-pair_type local_7326102; 
++pair_type local_7323643; 
  
-+pair_type local_7323653; 
+-pair_type local_7326105; 
++pair_type local_7323646; 
  
  
  
-@@ -7823,1082 +7769,1087 @@ pair_type local_7326105; 
+@@ -7823,1082 +7774,1082 @@ pair_type local_7326105; 
  
  
  
 -return_direct_with_clo1(data,  ((closureN)self_7314107)->elements[0], (((closure)  ((closureN)self_7314107)->elements[0])->fn),  set_pair_as_expr(&local_7326099, set_pair_as_expr(&local_7326102, r_737750, set_pair_as_expr(&local_7326105, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314107)->elements[1])))), Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314107)->elements[1])))))), boolean_f));; 
--}
++return_direct_with_clo1(data,  ((closureN)self_7312807)->elements[0], (((closure)  ((closureN)self_7312807)->elements[0])->fn),  set_pair_as_expr(&local_7323640, set_pair_as_expr(&local_7323643, r_736975, set_pair_as_expr(&local_7323646, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312807)->elements[1])))), Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312807)->elements[1])))))), boolean_f));; 
+ }
  
 -static void __lambda_1107(void *data, object _, int argc, object *args) /* closure _,object k_737243, object expr_732103_732118_732141_733832, object rename_732104_732119_732142_733833, object compare_732105_732120_732143_733834 */
-- {
++static void __lambda_1060(void *data, object _, int argc, object *args) /* closure _,object k_736468, object expr_731756_731771_731794_733380, object rename_731757_731772_731795_733381, object compare_731758_731773_731796_733382 */
+  {
 -object k_737243 = args[0]; object expr_732103_732118_732141_733832 = args[1]; object rename_732104_732119_732142_733833 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:guard");
++object k_736468 = args[0]; object expr_731756_731771_731794_733380 = args[1]; object rename_731757_731772_731795_733381 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:guard");
  
 -closureN_type c_7325652;
 -object e_7326034 [3];
@@ -11917,16 +11914,14 @@ Make let-values be the same as let*-values, to work around
 -c_7325652.elements[0] = expr_732103_732118_732141_733832;
 -c_7325652.elements[1] = k_737243;
 -c_7325652.elements[2] = rename_732104_732119_732142_733833;
- 
- 
- 
+-
+-
+-
 -return_direct_with_clo1(data,(closure)&c_7325652,__lambda_1108,  Cyc_cdr(data, expr_732103_732118_732141_733832));; 
-+return_direct_with_clo1(data,  ((closureN)self_7312814)->elements[0], (((closure)  ((closureN)self_7312814)->elements[0])->fn),  set_pair_as_expr(&local_7323647, set_pair_as_expr(&local_7323650, r_736982, set_pair_as_expr(&local_7323653, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312814)->elements[1])))), Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312814)->elements[1])))))), boolean_f));; 
- }
- 
+-}
+-
 -static void __lambda_1108(void *data, object self_7314027, int argc, object *args) /* object self_7314027, object v_931_732111_732125_732145_733836 */
-+static void __lambda_1060(void *data, object _, int argc, object *args) /* closure _,object k_736475, object expr_731760_731776_731799_733387, object rename_731761_731777_731800_733388, object compare_731762_731778_731801_733389 */
-  {
+- {
 - object v_931_732111_732125_732145_733836 = args[0];
 -  
 -closureN_type c_7325654;
@@ -11953,9 +11948,7 @@ Make let-values be the same as let*-values, to work around
 -c_7326010.elements = (object *)e_7326033;
 -c_7326010.elements[0] = ((closureN)self_7314027)->elements[0];
 -c_7326010.elements[1] = ((closureN)self_7314027)->elements[1];
-+object k_736475 = args[0]; object expr_731760_731776_731799_733387 = args[1]; object rename_731761_731777_731800_733388 = args[2];
-+  Cyc_st_add(data, "base.sld:guard");
- 
+-
 -return_direct_with_clo1(data,(closure)&c_7325654,__lambda_1109,  &c_7326010);; 
 -}
 -
@@ -11974,73 +11967,8 @@ Make let-values be the same as let*-values, to work around
 -c_7326012.elements = (object *)e_7326026;
 -c_7326012.elements[0] = ((closureN)self_7314028)->elements[0];
 -c_7326012.elements[1] = tmp_732122_732124_732144_733835;
-+closureN_type c_7323200;
-+object e_7323582 [3];
-+c_7323200.hdr.mark = gc_color_red;
-+ c_7323200.hdr.grayed = 0;
-+c_7323200.tag = closureN_tag;
-+ c_7323200.fn = (function_type)__lambda_1061;
-+c_7323200.num_args = 1;
-+c_7323200.num_elements = 3;
-+c_7323200.elements = (object *)e_7323582;
-+c_7323200.elements[0] = expr_731760_731776_731799_733387;
-+c_7323200.elements[1] = k_736475;
-+c_7323200.elements[2] = rename_731761_731777_731800_733388;
-+
-+
-+
-+return_direct_with_clo1(data,(closure)&c_7323200,__lambda_1061,  Cyc_cdr(data, expr_731760_731776_731799_733387));; 
-+}
-+
-+static void __lambda_1061(void *data, object self_7312734, int argc, object *args) /* object self_7312734, object v_931_731769_731783_731803_733391 */
-+ {
-+ object v_931_731769_731783_731803_733391 = args[0];
-+  
-+closureN_type c_7323202;
-+object e_7323557 [2];
-+c_7323202.hdr.mark = gc_color_red;
-+ c_7323202.hdr.grayed = 0;
-+c_7323202.tag = closureN_tag;
-+ c_7323202.fn = (function_type)__lambda_1062;
-+c_7323202.num_args = 0;
-+c_7323202.num_elements = 2;
-+c_7323202.elements = (object *)e_7323557;
-+c_7323202.elements[0] = ((closureN)self_7312734)->elements[2];
-+c_7323202.elements[1] = v_931_731769_731783_731803_733391;
-+
-+
-+closureN_type c_7323558;
-+object e_7323581 [2];
-+c_7323558.hdr.mark = gc_color_red;
-+ c_7323558.hdr.grayed = 0;
-+c_7323558.tag = closureN_tag;
-+ c_7323558.fn = (function_type)__lambda_1088;
-+c_7323558.num_args = 1;
-+c_7323558.num_elements = 2;
-+c_7323558.elements = (object *)e_7323581;
-+c_7323558.elements[0] = ((closureN)self_7312734)->elements[0];
-+c_7323558.elements[1] = ((closureN)self_7312734)->elements[1];
-+
-+return_direct_with_clo1(data,(closure)&c_7323202,__lambda_1062,  &c_7323558);; 
-+}
-+
-+static void __lambda_1088(void *data, object self_7312735, int argc, object *args) /* object self_7312735, object tmp_731780_731782_731802_733390 */
-+ {
-+ object tmp_731780_731782_731802_733390 = args[0];
-+  
-+closureN_type c_7323560;
-+object e_7323574 [2];
-+c_7323560.hdr.mark = gc_color_red;
-+ c_7323560.hdr.grayed = 0;
-+c_7323560.tag = closureN_tag;
-+ c_7323560.fn = (function_type)__lambda_1089;
-+c_7323560.num_args = 0;
-+c_7323560.num_elements = 2;
-+c_7323560.elements = (object *)e_7323574;
-+c_7323560.elements[0] = ((closureN)self_7312735)->elements[0];
-+c_7323560.elements[1] = tmp_731780_731782_731802_733390;
- 
- 
+-
+-
 -closureN_type c_7326027;
 -object e_7326032 [1];
 -c_7326027.hdr.mark = gc_color_red;
@@ -12051,41 +11979,108 @@ Make let-values be the same as let*-values, to work around
 -c_7326027.num_elements = 1;
 -c_7326027.elements = (object *)e_7326032;
 -c_7326027.elements[0] = ((closureN)self_7314028)->elements[1];
-+closureN_type c_7323575;
-+object e_7323580 [1];
-+c_7323575.hdr.mark = gc_color_red;
-+ c_7323575.hdr.grayed = 0;
-+c_7323575.tag = closureN_tag;
-+ c_7323575.fn = (function_type)__lambda_1091;
-+c_7323575.num_args = 1;
-+c_7323575.num_elements = 1;
-+c_7323575.elements = (object *)e_7323580;
-+c_7323575.elements[0] = ((closureN)self_7312735)->elements[1];
++closureN_type c_7323193;
++object e_7323575 [3];
++c_7323193.hdr.mark = gc_color_red;
++ c_7323193.hdr.grayed = 0;
++c_7323193.tag = closureN_tag;
++ c_7323193.fn = (function_type)__lambda_1061;
++c_7323193.num_args = 1;
++c_7323193.num_elements = 3;
++c_7323193.elements = (object *)e_7323575;
++c_7323193.elements[0] = expr_731756_731771_731794_733380;
++c_7323193.elements[1] = k_736468;
++c_7323193.elements[2] = rename_731757_731772_731795_733381;
++
++
++
++return_direct_with_clo1(data,(closure)&c_7323193,__lambda_1061,  Cyc_cdr(data, expr_731756_731771_731794_733380));; 
++}
++
++static void __lambda_1061(void *data, object self_7312727, int argc, object *args) /* object self_7312727, object v_931_731764_731778_731798_733384 */
++ {
++ object v_931_731764_731778_731798_733384 = args[0];
++  
++closureN_type c_7323195;
++object e_7323550 [2];
++c_7323195.hdr.mark = gc_color_red;
++ c_7323195.hdr.grayed = 0;
++c_7323195.tag = closureN_tag;
++ c_7323195.fn = (function_type)__lambda_1062;
++c_7323195.num_args = 0;
++c_7323195.num_elements = 2;
++c_7323195.elements = (object *)e_7323550;
++c_7323195.elements[0] = ((closureN)self_7312727)->elements[2];
++c_7323195.elements[1] = v_931_731764_731778_731798_733384;
++
++
++closureN_type c_7323551;
++object e_7323574 [2];
++c_7323551.hdr.mark = gc_color_red;
++ c_7323551.hdr.grayed = 0;
++c_7323551.tag = closureN_tag;
++ c_7323551.fn = (function_type)__lambda_1088;
++c_7323551.num_args = 1;
++c_7323551.num_elements = 2;
++c_7323551.elements = (object *)e_7323574;
++c_7323551.elements[0] = ((closureN)self_7312727)->elements[0];
++c_7323551.elements[1] = ((closureN)self_7312727)->elements[1];
++
++return_direct_with_clo1(data,(closure)&c_7323195,__lambda_1062,  &c_7323551);; 
++}
++
++static void __lambda_1088(void *data, object self_7312728, int argc, object *args) /* object self_7312728, object tmp_731775_731777_731797_733383 */
++ {
++ object tmp_731775_731777_731797_733383 = args[0];
++  
++closureN_type c_7323553;
++object e_7323567 [2];
++c_7323553.hdr.mark = gc_color_red;
++ c_7323553.hdr.grayed = 0;
++c_7323553.tag = closureN_tag;
++ c_7323553.fn = (function_type)__lambda_1089;
++c_7323553.num_args = 0;
++c_7323553.num_elements = 2;
++c_7323553.elements = (object *)e_7323567;
++c_7323553.elements[0] = ((closureN)self_7312728)->elements[0];
++c_7323553.elements[1] = tmp_731775_731777_731797_733383;
++
++
++closureN_type c_7323568;
++object e_7323573 [1];
++c_7323568.hdr.mark = gc_color_red;
++ c_7323568.hdr.grayed = 0;
++c_7323568.tag = closureN_tag;
++ c_7323568.fn = (function_type)__lambda_1091;
++c_7323568.num_args = 1;
++c_7323568.num_elements = 1;
++c_7323568.elements = (object *)e_7323573;
++c_7323568.elements[0] = ((closureN)self_7312728)->elements[1];
  
 -return_direct_with_clo1(data,(closure)&c_7326012,__lambda_1136,  &c_7326027);; 
-+return_direct_with_clo1(data,(closure)&c_7323560,__lambda_1089,  &c_7323575);; 
++return_direct_with_clo1(data,(closure)&c_7323553,__lambda_1089,  &c_7323568);; 
  }
  
 -static void __lambda_1138(void *data, object self_7314029, int argc, object *args) /* object self_7314029, object r_737244 */
-+static void __lambda_1091(void *data, object self_7312736, int argc, object *args) /* object self_7312736, object r_736476 */
++static void __lambda_1091(void *data, object self_7312729, int argc, object *args) /* object self_7312729, object r_736469 */
   {
 - object r_737244 = args[0];
-+ object r_736476 = args[0];
++ object r_736469 = args[0];
    
  
 -return_direct_with_clo1(data,  ((closureN)self_7314029)->elements[0], (((closure)  ((closureN)self_7314029)->elements[0])->fn),  Cyc_car(data, r_737244));; 
-+return_direct_with_clo1(data,  ((closureN)self_7312736)->elements[0], (((closure)  ((closureN)self_7312736)->elements[0])->fn),  Cyc_car(data, r_736476));; 
++return_direct_with_clo1(data,  ((closureN)self_7312729)->elements[0], (((closure)  ((closureN)self_7312729)->elements[0])->fn),  Cyc_car(data, r_736469));; 
  }
  
 -static void __lambda_1136(void *data, object self_7314030, int argc, object *args) /* object self_7314030, object k_737246 */
-+static void __lambda_1089(void *data, object self_7312737, int argc, object *args) /* object self_7312737, object k_736478 */
++static void __lambda_1089(void *data, object self_7312730, int argc, object *args) /* object self_7312730, object k_736471 */
   {
 - object k_737246 = args[0];
 -  if( (boolean_f != ((closureN)self_7314030)->elements[1]) ){ 
 -  return_direct_with_clo1(data,  k_737246, (((closure)  k_737246)->fn),  ((closureN)self_7314030)->elements[1]);
-+ object k_736478 = args[0];
-+  if( (boolean_f != ((closureN)self_7312737)->elements[1]) ){ 
-+  return_direct_with_clo1(data,  k_736478, (((closure)  k_736478)->fn),  ((closureN)self_7312737)->elements[1]);
++ object k_736471 = args[0];
++  if( (boolean_f != ((closureN)self_7312730)->elements[1]) ){ 
++  return_direct_with_clo1(data,  k_736471, (((closure)  k_736471)->fn),  ((closureN)self_7312730)->elements[1]);
  } else { 
    
 -closureN_type c_7326017;
@@ -12098,67 +12093,67 @@ Make let-values be the same as let*-values, to work around
 -c_7326017.num_elements = 1;
 -c_7326017.elements = (object *)e_7326023;
 -c_7326017.elements[0] = k_737246;
-+closureN_type c_7323565;
-+object e_7323571 [1];
-+c_7323565.hdr.mark = gc_color_red;
-+ c_7323565.hdr.grayed = 0;
-+c_7323565.tag = closureN_tag;
-+ c_7323565.fn = (function_type)__lambda_1090;
-+c_7323565.num_args = 1;
-+c_7323565.num_elements = 1;
-+c_7323565.elements = (object *)e_7323571;
-+c_7323565.elements[0] = k_736478;
++closureN_type c_7323558;
++object e_7323564 [1];
++c_7323558.hdr.mark = gc_color_red;
++ c_7323558.hdr.grayed = 0;
++c_7323558.tag = closureN_tag;
++ c_7323558.fn = (function_type)__lambda_1090;
++c_7323558.num_args = 1;
++c_7323558.num_elements = 1;
++c_7323558.elements = (object *)e_7323564;
++c_7323558.elements[0] = k_736471;
  
  
 -make_utf8_string_with_len(c_7326024, "no expansion for", 16, 16);
 -return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_7326017, &c_7326024, ((closureN)self_7314030)->elements[0]);}
-+make_utf8_string_with_len(c_7323572, "no expansion for", 16, 16);
-+return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_7323565, &c_7323572, ((closureN)self_7312737)->elements[0]);}
++make_utf8_string_with_len(c_7323565, "no expansion for", 16, 16);
++return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_7323558, &c_7323565, ((closureN)self_7312730)->elements[0]);}
  ;; 
  }
  
 -static void __lambda_1137(void *data, object self_7314031, int argc, object *args) /* object self_7314031, object r_737247 */
-+static void __lambda_1090(void *data, object self_7312738, int argc, object *args) /* object self_7312738, object r_736479 */
++static void __lambda_1090(void *data, object self_7312731, int argc, object *args) /* object self_7312731, object r_736472 */
   {
 - object r_737247 = args[0];
-+ object r_736479 = args[0];
++ object r_736472 = args[0];
    
 -pair_type local_7326022; 
 -return_direct_with_clo1(data,  ((closureN)self_7314031)->elements[0], (((closure)  ((closureN)self_7314031)->elements[0])->fn),  set_pair_as_expr(&local_7326022, r_737247, boolean_f));; 
-+pair_type local_7323570; 
-+return_direct_with_clo1(data,  ((closureN)self_7312738)->elements[0], (((closure)  ((closureN)self_7312738)->elements[0])->fn),  set_pair_as_expr(&local_7323570, r_736479, boolean_f));; 
++pair_type local_7323563; 
++return_direct_with_clo1(data,  ((closureN)self_7312731)->elements[0], (((closure)  ((closureN)self_7312731)->elements[0])->fn),  set_pair_as_expr(&local_7323563, r_736472, boolean_f));; 
  }
  
 -static void __lambda_1109(void *data, object self_7314032, int argc, object *args) /* object self_7314032, object k_737249 */
-+static void __lambda_1062(void *data, object self_7312739, int argc, object *args) /* object self_7312739, object k_736481 */
++static void __lambda_1062(void *data, object self_7312732, int argc, object *args) /* object self_7312732, object k_736474 */
   {
 - object k_737249 = args[0];
-+ object k_736481 = args[0];
++ object k_736474 = args[0];
      
 -if( (boolean_f != Cyc_is_pair(((closureN)self_7314032)->elements[1])) ){ 
-+if( (boolean_f != Cyc_is_pair(((closureN)self_7312739)->elements[1])) ){ 
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312732)->elements[1])) ){ 
      
    
 -if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7314032)->elements[1]))) ){ 
 -    complex_num_type local_7325665; 
-+if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7312739)->elements[1]))) ){ 
-+    complex_num_type local_7323213; 
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7312732)->elements[1]))) ){ 
++    complex_num_type local_7323206; 
    
    
  if( (boolean_f != ((inline_function_type)
 -                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7325665, Cyc_cdr(data, Cyc_car(data, ((closureN)self_7314032)->elements[1])))) ){ 
-+                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7323213, Cyc_cdr(data, Cyc_car(data, ((closureN)self_7312739)->elements[1])))) ){ 
++                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7323206, Cyc_cdr(data, Cyc_car(data, ((closureN)self_7312732)->elements[1])))) ){ 
      
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7314032)->elements[1]))) ){ 
 -    complex_num_type local_7325678; 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312739)->elements[1]))) ){ 
-+    complex_num_type local_7323226; 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312732)->elements[1]))) ){ 
++    complex_num_type local_7323219; 
    
    
  if( (boolean_f != ((inline_function_type)
 -                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7325678, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314032)->elements[1])))) ){ 
-+                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7323226, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312739)->elements[1])))) ){ 
++                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7323219, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312732)->elements[1])))) ){ 
    
 -closureN_type c_7325686;
 -object e_7326003 [3];
@@ -12923,44 +12918,14 @@ Make let-values be the same as let*-values, to work around
 -c_7325755.elements[23] = ((closureN)self_7314055)->elements[22];
 -c_7325755.elements[24] = ((closureN)self_7314055)->elements[23];
 -c_7325755.elements[25] = ((closureN)self_7314055)->elements[24];
-+closureN_type c_7323234;
-+object e_7323551 [3];
-+c_7323234.hdr.mark = gc_color_red;
-+ c_7323234.hdr.grayed = 0;
-+c_7323234.tag = closureN_tag;
-+ c_7323234.fn = (function_type)__lambda_1063;
-+c_7323234.num_args = 1;
-+c_7323234.num_elements = 3;
-+c_7323234.elements = (object *)e_7323551;
-+c_7323234.elements[0] = k_736481;
-+c_7323234.elements[1] = ((closureN)self_7312739)->elements[0];
-+c_7323234.elements[2] = ((closureN)self_7312739)->elements[1];
- 
+-
 -return_closcall2(data,  ((closureN)self_7314055)->elements[23],  &c_7325755, quote_lambda);; 
-+return_closcall2(data,  ((closureN)self_7312739)->elements[0],  &c_7323234, quote_call_91with_91current_91continuation);
-+} else { 
-+  return_direct_with_clo1(data,  k_736481, (((closure)  k_736481)->fn),  boolean_f);}
-+;
-+} else { 
-+  return_direct_with_clo1(data,  k_736481, (((closure)  k_736481)->fn),  boolean_f);}
-+;
-+} else { 
-+  return_direct_with_clo1(data,  k_736481, (((closure)  k_736481)->fn),  boolean_f);}
-+;
-+} else { 
-+  return_direct_with_clo1(data,  k_736481, (((closure)  k_736481)->fn),  boolean_f);}
-+;
-+} else { 
-+  return_direct_with_clo1(data,  k_736481, (((closure)  k_736481)->fn),  boolean_f);}
-+;; 
- }
- 
+-}
+-
 -static void __lambda_1133(void *data, object self_7314056, int argc, object *args) /* object self_7314056, object r_737313_739360_739435_739506_739572_739637_739701_739759_739816_739872_739927_739981_7310034_7310086_7310137_7310187_7310236_7310284_7310331_7310377_7310422_7310466_7310509_7310551_7310592_7310632_7310671_7310709_7310746_7310782_7310817_7310851_7310884_7310912_7310939_7310965_7310990_7311014 */
-+static void __lambda_1063(void *data, object self_7312740, int argc, object *args) /* object self_7312740, object r_736497 */
-  {
+- {
 - object r_737313_739360_739435_739506_739572_739637_739701_739759_739816_739872_739927_739981_7310034_7310086_7310137_7310187_7310236_7310284_7310331_7310377_7310422_7310466_7310509_7310551_7310592_7310632_7310671_7310709_7310746_7310782_7310817_7310851_7310884_7310912_7310939_7310965_7310990_7311014 = args[0];
-+ object r_736497 = args[0];
-   
+-  
 -closureN_type c_7325758;
 -object e_7325979 [26];
 -c_7325758.hdr.mark = gc_color_red;
@@ -12996,30 +12961,14 @@ Make let-values be the same as let*-values, to work around
 -c_7325758.elements[23] = ((closureN)self_7314056)->elements[22];
 -c_7325758.elements[24] = ((closureN)self_7314056)->elements[23];
 -c_7325758.elements[25] = ((closureN)self_7314056)->elements[25];
-+closureN_type c_7323237;
-+object e_7323550 [4];
-+c_7323237.hdr.mark = gc_color_red;
-+ c_7323237.hdr.grayed = 0;
-+c_7323237.tag = closureN_tag;
-+ c_7323237.fn = (function_type)__lambda_1064;
-+c_7323237.num_args = 1;
-+c_7323237.num_elements = 4;
-+c_7323237.elements = (object *)e_7323550;
-+c_7323237.elements[0] = ((closureN)self_7312740)->elements[0];
-+c_7323237.elements[1] = r_736497;
-+c_7323237.elements[2] = ((closureN)self_7312740)->elements[1];
-+c_7323237.elements[3] = ((closureN)self_7312740)->elements[2];
- 
+-
 -return_closcall2(data,  ((closureN)self_7314056)->elements[24],  &c_7325758, quote_res);; 
-+return_closcall2(data,  ((closureN)self_7312740)->elements[1],  &c_7323237, quote_lambda);; 
- }
- 
+-}
+-
 -static void __lambda_1134(void *data, object self_7314057, int argc, object *args) /* object self_7314057, object r_737319_739361_739436_739507_739573_739638_739702_739760_739817_739873_739928_739982_7310035_7310087_7310138_7310188_7310237_7310285_7310332_7310378_7310423_7310467_7310510_7310552_7310593_7310633_7310672_7310710_7310747_7310783_7310818_7310852_7310885_7310913_7310940_7310966_7310991_7311015 */
-+static void __lambda_1064(void *data, object self_7312741, int argc, object *args) /* object self_7312741, object r_736503 */
-  {
+- {
 - object r_737319_739361_739436_739507_739573_739638_739702_739760_739817_739873_739928_739982_7310035_7310087_7310138_7310188_7310237_7310285_7310332_7310378_7310423_7310467_7310510_7310552_7310593_7310633_7310672_7310710_7310747_7310783_7310818_7310852_7310885_7310913_7310940_7310966_7310991_7311015 = args[0];
-+ object r_736503 = args[0];
-   
+-  
 -pair_type local_7325763; 
 -
 -pair_type local_7325766; 
@@ -13039,21 +12988,7 @@ Make let-values be the same as let*-values, to work around
 -pair_type local_7325790; 
 -
 -pair_type local_7325794; 
-+closureN_type c_7323240;
-+object e_7323549 [5];
-+c_7323240.hdr.mark = gc_color_red;
-+ c_7323240.hdr.grayed = 0;
-+c_7323240.tag = closureN_tag;
-+ c_7323240.fn = (function_type)__lambda_1065;
-+c_7323240.num_args = 1;
-+c_7323240.num_elements = 5;
-+c_7323240.elements = (object *)e_7323549;
-+c_7323240.elements[0] = ((closureN)self_7312741)->elements[0];
-+c_7323240.elements[1] = ((closureN)self_7312741)->elements[1];
-+c_7323240.elements[2] = r_736503;
-+c_7323240.elements[3] = ((closureN)self_7312741)->elements[2];
-+c_7323240.elements[4] = ((closureN)self_7312741)->elements[3];
- 
+-
 -pair_type local_7325797; 
 -
 -pair_type local_7325801; 
@@ -13069,755 +13004,829 @@ Make let-values be the same as let*-values, to work around
 -pair_type local_7325818; 
 -
 -pair_type local_7325821; 
--
++closureN_type c_7323227;
++object e_7323544 [3];
++c_7323227.hdr.mark = gc_color_red;
++ c_7323227.hdr.grayed = 0;
++c_7323227.tag = closureN_tag;
++ c_7323227.fn = (function_type)__lambda_1063;
++c_7323227.num_args = 1;
++c_7323227.num_elements = 3;
++c_7323227.elements = (object *)e_7323544;
++c_7323227.elements[0] = k_736474;
++c_7323227.elements[1] = ((closureN)self_7312732)->elements[0];
++c_7323227.elements[2] = ((closureN)self_7312732)->elements[1];
+ 
 -pair_type local_7325825; 
--
--pair_type local_7325828; 
-+return_closcall2(data,  ((closureN)self_7312741)->elements[2],  &c_7323240, quote_guard_91k);; 
++return_closcall2(data,  ((closureN)self_7312732)->elements[0],  &c_7323227, quote_call_91with_91current_91continuation);
++} else { 
++  return_direct_with_clo1(data,  k_736474, (((closure)  k_736474)->fn),  boolean_f);}
++;
++} else { 
++  return_direct_with_clo1(data,  k_736474, (((closure)  k_736474)->fn),  boolean_f);}
++;
++} else { 
++  return_direct_with_clo1(data,  k_736474, (((closure)  k_736474)->fn),  boolean_f);}
++;
++} else { 
++  return_direct_with_clo1(data,  k_736474, (((closure)  k_736474)->fn),  boolean_f);}
++;
++} else { 
++  return_direct_with_clo1(data,  k_736474, (((closure)  k_736474)->fn),  boolean_f);}
++;; 
 +}
  
+-pair_type local_7325828; 
++static void __lambda_1063(void *data, object self_7312733, int argc, object *args) /* object self_7312733, object r_736490 */
++ {
++ object r_736490 = args[0];
++  
++closureN_type c_7323230;
++object e_7323543 [4];
++c_7323230.hdr.mark = gc_color_red;
++ c_7323230.hdr.grayed = 0;
++c_7323230.tag = closureN_tag;
++ c_7323230.fn = (function_type)__lambda_1064;
++c_7323230.num_args = 1;
++c_7323230.num_elements = 4;
++c_7323230.elements = (object *)e_7323543;
++c_7323230.elements[0] = ((closureN)self_7312733)->elements[0];
++c_7323230.elements[1] = r_736490;
++c_7323230.elements[2] = ((closureN)self_7312733)->elements[1];
++c_7323230.elements[3] = ((closureN)self_7312733)->elements[2];
+ 
 -pair_type local_7325832; 
-+static void __lambda_1065(void *data, object self_7312742, int argc, object *args) /* object self_7312742, object r_736680 */
++return_closcall2(data,  ((closureN)self_7312733)->elements[1],  &c_7323230, quote_lambda);; 
++}
+ 
+-pair_type local_7325835; 
++static void __lambda_1064(void *data, object self_7312734, int argc, object *args) /* object self_7312734, object r_736496 */
++ {
++ object r_736496 = args[0];
++  
++closureN_type c_7323233;
++object e_7323542 [5];
++c_7323233.hdr.mark = gc_color_red;
++ c_7323233.hdr.grayed = 0;
++c_7323233.tag = closureN_tag;
++ c_7323233.fn = (function_type)__lambda_1065;
++c_7323233.num_args = 1;
++c_7323233.num_elements = 5;
++c_7323233.elements = (object *)e_7323542;
++c_7323233.elements[0] = ((closureN)self_7312734)->elements[0];
++c_7323233.elements[1] = ((closureN)self_7312734)->elements[1];
++c_7323233.elements[2] = r_736496;
++c_7323233.elements[3] = ((closureN)self_7312734)->elements[2];
++c_7323233.elements[4] = ((closureN)self_7312734)->elements[3];
++
++return_closcall2(data,  ((closureN)self_7312734)->elements[2],  &c_7323233, quote_guard_91k);; 
++}
++
++static void __lambda_1065(void *data, object self_7312735, int argc, object *args) /* object self_7312735, object r_736673 */
 + {
-+ object r_736680 = args[0];
++ object r_736673 = args[0];
 +  
-+closureN_type c_7323243;
-+object e_7323548 [6];
-+c_7323243.hdr.mark = gc_color_red;
-+ c_7323243.hdr.grayed = 0;
-+c_7323243.tag = closureN_tag;
-+ c_7323243.fn = (function_type)__lambda_1066;
-+c_7323243.num_args = 1;
-+c_7323243.num_elements = 6;
-+c_7323243.elements = (object *)e_7323548;
-+c_7323243.elements[0] = ((closureN)self_7312742)->elements[0];
-+c_7323243.elements[1] = ((closureN)self_7312742)->elements[1];
-+c_7323243.elements[2] = ((closureN)self_7312742)->elements[2];
-+c_7323243.elements[3] = r_736680;
-+c_7323243.elements[4] = ((closureN)self_7312742)->elements[3];
-+c_7323243.elements[5] = ((closureN)self_7312742)->elements[4];
-+
-+return_closcall2(data,  ((closureN)self_7312742)->elements[3],  &c_7323243, quote_with_91exception_91handler);; 
++closureN_type c_7323236;
++object e_7323541 [6];
++c_7323236.hdr.mark = gc_color_red;
++ c_7323236.hdr.grayed = 0;
++c_7323236.tag = closureN_tag;
++ c_7323236.fn = (function_type)__lambda_1066;
++c_7323236.num_args = 1;
++c_7323236.num_elements = 6;
++c_7323236.elements = (object *)e_7323541;
++c_7323236.elements[0] = ((closureN)self_7312735)->elements[0];
++c_7323236.elements[1] = ((closureN)self_7312735)->elements[1];
++c_7323236.elements[2] = ((closureN)self_7312735)->elements[2];
++c_7323236.elements[3] = r_736673;
++c_7323236.elements[4] = ((closureN)self_7312735)->elements[3];
++c_7323236.elements[5] = ((closureN)self_7312735)->elements[4];
++
++return_closcall2(data,  ((closureN)self_7312735)->elements[3],  &c_7323236, quote_with_91exception_91handler);; 
 +}
 +
-+static void __lambda_1066(void *data, object self_7312743, int argc, object *args) /* object self_7312743, object r_736512_738058 */
++static void __lambda_1066(void *data, object self_7312736, int argc, object *args) /* object self_7312736, object r_736505_738051 */
 + {
-+ object r_736512_738058 = args[0];
++ object r_736505_738051 = args[0];
 +  
-+closureN_type c_7323246;
-+object e_7323547 [7];
-+c_7323246.hdr.mark = gc_color_red;
-+ c_7323246.hdr.grayed = 0;
-+c_7323246.tag = closureN_tag;
-+ c_7323246.fn = (function_type)__lambda_1067;
-+c_7323246.num_args = 1;
-+c_7323246.num_elements = 7;
-+c_7323246.elements = (object *)e_7323547;
-+c_7323246.elements[0] = ((closureN)self_7312743)->elements[0];
-+c_7323246.elements[1] = ((closureN)self_7312743)->elements[1];
-+c_7323246.elements[2] = ((closureN)self_7312743)->elements[2];
-+c_7323246.elements[3] = r_736512_738058;
-+c_7323246.elements[4] = ((closureN)self_7312743)->elements[3];
-+c_7323246.elements[5] = ((closureN)self_7312743)->elements[4];
-+c_7323246.elements[6] = ((closureN)self_7312743)->elements[5];
-+
-+return_closcall2(data,  ((closureN)self_7312743)->elements[4],  &c_7323246, quote_lambda);; 
++closureN_type c_7323239;
++object e_7323540 [7];
++c_7323239.hdr.mark = gc_color_red;
++ c_7323239.hdr.grayed = 0;
++c_7323239.tag = closureN_tag;
++ c_7323239.fn = (function_type)__lambda_1067;
++c_7323239.num_args = 1;
++c_7323239.num_elements = 7;
++c_7323239.elements = (object *)e_7323540;
++c_7323239.elements[0] = ((closureN)self_7312736)->elements[0];
++c_7323239.elements[1] = ((closureN)self_7312736)->elements[1];
++c_7323239.elements[2] = ((closureN)self_7312736)->elements[2];
++c_7323239.elements[3] = r_736505_738051;
++c_7323239.elements[4] = ((closureN)self_7312736)->elements[3];
++c_7323239.elements[5] = ((closureN)self_7312736)->elements[4];
++c_7323239.elements[6] = ((closureN)self_7312736)->elements[5];
++
++return_closcall2(data,  ((closureN)self_7312736)->elements[4],  &c_7323239, quote_lambda);; 
 +}
 +
-+static void __lambda_1067(void *data, object self_7312744, int argc, object *args) /* object self_7312744, object r_736574_738059 */
++static void __lambda_1067(void *data, object self_7312737, int argc, object *args) /* object self_7312737, object r_736567_738052 */
 + {
-+ object r_736574_738059 = args[0];
++ object r_736567_738052 = args[0];
 +  
-+closureN_type c_7323249;
-+object e_7323546 [8];
-+c_7323249.hdr.mark = gc_color_red;
-+ c_7323249.hdr.grayed = 0;
-+c_7323249.tag = closureN_tag;
-+ c_7323249.fn = (function_type)__lambda_1068;
-+c_7323249.num_args = 1;
-+c_7323249.num_elements = 8;
-+c_7323249.elements = (object *)e_7323546;
-+c_7323249.elements[0] = ((closureN)self_7312744)->elements[0];
-+c_7323249.elements[1] = ((closureN)self_7312744)->elements[1];
-+c_7323249.elements[2] = ((closureN)self_7312744)->elements[2];
-+c_7323249.elements[3] = ((closureN)self_7312744)->elements[3];
-+c_7323249.elements[4] = r_736574_738059;
-+c_7323249.elements[5] = ((closureN)self_7312744)->elements[4];
-+c_7323249.elements[6] = ((closureN)self_7312744)->elements[5];
-+c_7323249.elements[7] = ((closureN)self_7312744)->elements[6];
-+
-+return_closcall2(data,  ((closureN)self_7312744)->elements[5],  &c_7323249, quote_condition);; 
++closureN_type c_7323242;
++object e_7323539 [8];
++c_7323242.hdr.mark = gc_color_red;
++ c_7323242.hdr.grayed = 0;
++c_7323242.tag = closureN_tag;
++ c_7323242.fn = (function_type)__lambda_1068;
++c_7323242.num_args = 1;
++c_7323242.num_elements = 8;
++c_7323242.elements = (object *)e_7323539;
++c_7323242.elements[0] = ((closureN)self_7312737)->elements[0];
++c_7323242.elements[1] = ((closureN)self_7312737)->elements[1];
++c_7323242.elements[2] = ((closureN)self_7312737)->elements[2];
++c_7323242.elements[3] = ((closureN)self_7312737)->elements[3];
++c_7323242.elements[4] = r_736567_738052;
++c_7323242.elements[5] = ((closureN)self_7312737)->elements[4];
++c_7323242.elements[6] = ((closureN)self_7312737)->elements[5];
++c_7323242.elements[7] = ((closureN)self_7312737)->elements[6];
++
++return_closcall2(data,  ((closureN)self_7312737)->elements[5],  &c_7323242, quote_condition);; 
 +}
 +
-+static void __lambda_1068(void *data, object self_7312745, int argc, object *args) /* object self_7312745, object r_736674_738060 */
++static void __lambda_1068(void *data, object self_7312738, int argc, object *args) /* object self_7312738, object r_736667_738053 */
 + {
-+ object r_736674_738060 = args[0];
++ object r_736667_738053 = args[0];
 +  
-+closureN_type c_7323252;
-+object e_7323545 [9];
-+c_7323252.hdr.mark = gc_color_red;
-+ c_7323252.hdr.grayed = 0;
-+c_7323252.tag = closureN_tag;
-+ c_7323252.fn = (function_type)__lambda_1069;
-+c_7323252.num_args = 1;
-+c_7323252.num_elements = 9;
-+c_7323252.elements = (object *)e_7323545;
-+c_7323252.elements[0] = ((closureN)self_7312745)->elements[0];
-+c_7323252.elements[1] = ((closureN)self_7312745)->elements[1];
-+c_7323252.elements[2] = ((closureN)self_7312745)->elements[2];
-+c_7323252.elements[3] = ((closureN)self_7312745)->elements[3];
-+c_7323252.elements[4] = ((closureN)self_7312745)->elements[4];
-+c_7323252.elements[5] = r_736674_738060;
-+c_7323252.elements[6] = ((closureN)self_7312745)->elements[5];
-+c_7323252.elements[7] = ((closureN)self_7312745)->elements[6];
-+c_7323252.elements[8] = ((closureN)self_7312745)->elements[7];
-+
-+return_closcall2(data,  ((closureN)self_7312745)->elements[6],  &c_7323252, quote_call_91with_91current_91continuation);; 
++closureN_type c_7323245;
++object e_7323538 [9];
++c_7323245.hdr.mark = gc_color_red;
++ c_7323245.hdr.grayed = 0;
++c_7323245.tag = closureN_tag;
++ c_7323245.fn = (function_type)__lambda_1069;
++c_7323245.num_args = 1;
++c_7323245.num_elements = 9;
++c_7323245.elements = (object *)e_7323538;
++c_7323245.elements[0] = ((closureN)self_7312738)->elements[0];
++c_7323245.elements[1] = ((closureN)self_7312738)->elements[1];
++c_7323245.elements[2] = ((closureN)self_7312738)->elements[2];
++c_7323245.elements[3] = ((closureN)self_7312738)->elements[3];
++c_7323245.elements[4] = ((closureN)self_7312738)->elements[4];
++c_7323245.elements[5] = r_736667_738053;
++c_7323245.elements[6] = ((closureN)self_7312738)->elements[5];
++c_7323245.elements[7] = ((closureN)self_7312738)->elements[6];
++c_7323245.elements[8] = ((closureN)self_7312738)->elements[7];
++
++return_closcall2(data,  ((closureN)self_7312738)->elements[6],  &c_7323245, quote_call_91with_91current_91continuation);; 
 +}
 +
-+static void __lambda_1069(void *data, object self_7312746, int argc, object *args) /* object self_7312746, object r_736586_738062_738137 */
++static void __lambda_1069(void *data, object self_7312739, int argc, object *args) /* object self_7312739, object r_736579_738055_738130 */
 + {
-+ object r_736586_738062_738137 = args[0];
++ object r_736579_738055_738130 = args[0];
 +  
-+closureN_type c_7323255;
-+object e_7323544 [10];
-+c_7323255.hdr.mark = gc_color_red;
-+ c_7323255.hdr.grayed = 0;
-+c_7323255.tag = closureN_tag;
-+ c_7323255.fn = (function_type)__lambda_1070;
-+c_7323255.num_args = 1;
-+c_7323255.num_elements = 10;
-+c_7323255.elements = (object *)e_7323544;
-+c_7323255.elements[0] = ((closureN)self_7312746)->elements[0];
-+c_7323255.elements[1] = ((closureN)self_7312746)->elements[1];
-+c_7323255.elements[2] = ((closureN)self_7312746)->elements[2];
-+c_7323255.elements[3] = ((closureN)self_7312746)->elements[3];
-+c_7323255.elements[4] = ((closureN)self_7312746)->elements[4];
-+c_7323255.elements[5] = r_736586_738062_738137;
-+c_7323255.elements[6] = ((closureN)self_7312746)->elements[5];
-+c_7323255.elements[7] = ((closureN)self_7312746)->elements[6];
-+c_7323255.elements[8] = ((closureN)self_7312746)->elements[7];
-+c_7323255.elements[9] = ((closureN)self_7312746)->elements[8];
-+
-+return_closcall2(data,  ((closureN)self_7312746)->elements[7],  &c_7323255, quote_lambda);; 
++closureN_type c_7323248;
++object e_7323537 [10];
++c_7323248.hdr.mark = gc_color_red;
++ c_7323248.hdr.grayed = 0;
++c_7323248.tag = closureN_tag;
++ c_7323248.fn = (function_type)__lambda_1070;
++c_7323248.num_args = 1;
++c_7323248.num_elements = 10;
++c_7323248.elements = (object *)e_7323537;
++c_7323248.elements[0] = ((closureN)self_7312739)->elements[0];
++c_7323248.elements[1] = ((closureN)self_7312739)->elements[1];
++c_7323248.elements[2] = ((closureN)self_7312739)->elements[2];
++c_7323248.elements[3] = ((closureN)self_7312739)->elements[3];
++c_7323248.elements[4] = ((closureN)self_7312739)->elements[4];
++c_7323248.elements[5] = r_736579_738055_738130;
++c_7323248.elements[6] = ((closureN)self_7312739)->elements[5];
++c_7323248.elements[7] = ((closureN)self_7312739)->elements[6];
++c_7323248.elements[8] = ((closureN)self_7312739)->elements[7];
++c_7323248.elements[9] = ((closureN)self_7312739)->elements[8];
++
++return_closcall2(data,  ((closureN)self_7312739)->elements[7],  &c_7323248, quote_lambda);; 
 +}
 +
-+static void __lambda_1070(void *data, object self_7312747, int argc, object *args) /* object self_7312747, object r_736592_738063_738138 */
++static void __lambda_1070(void *data, object self_7312740, int argc, object *args) /* object self_7312740, object r_736585_738056_738131 */
 + {
-+ object r_736592_738063_738138 = args[0];
++ object r_736585_738056_738131 = args[0];
 +  
-+closureN_type c_7323258;
-+object e_7323543 [11];
-+c_7323258.hdr.mark = gc_color_red;
-+ c_7323258.hdr.grayed = 0;
-+c_7323258.tag = closureN_tag;
-+ c_7323258.fn = (function_type)__lambda_1071;
-+c_7323258.num_args = 1;
-+c_7323258.num_elements = 11;
-+c_7323258.elements = (object *)e_7323543;
-+c_7323258.elements[0] = ((closureN)self_7312747)->elements[0];
-+c_7323258.elements[1] = ((closureN)self_7312747)->elements[1];
-+c_7323258.elements[2] = ((closureN)self_7312747)->elements[2];
-+c_7323258.elements[3] = ((closureN)self_7312747)->elements[3];
-+c_7323258.elements[4] = ((closureN)self_7312747)->elements[4];
-+c_7323258.elements[5] = ((closureN)self_7312747)->elements[5];
-+c_7323258.elements[6] = r_736592_738063_738138;
-+c_7323258.elements[7] = ((closureN)self_7312747)->elements[6];
-+c_7323258.elements[8] = ((closureN)self_7312747)->elements[7];
-+c_7323258.elements[9] = ((closureN)self_7312747)->elements[8];
-+c_7323258.elements[10] = ((closureN)self_7312747)->elements[9];
-+
-+return_closcall2(data,  ((closureN)self_7312747)->elements[8],  &c_7323258, quote_handler_91k);; 
++closureN_type c_7323251;
++object e_7323536 [11];
++c_7323251.hdr.mark = gc_color_red;
++ c_7323251.hdr.grayed = 0;
++c_7323251.tag = closureN_tag;
++ c_7323251.fn = (function_type)__lambda_1071;
++c_7323251.num_args = 1;
++c_7323251.num_elements = 11;
++c_7323251.elements = (object *)e_7323536;
++c_7323251.elements[0] = ((closureN)self_7312740)->elements[0];
++c_7323251.elements[1] = ((closureN)self_7312740)->elements[1];
++c_7323251.elements[2] = ((closureN)self_7312740)->elements[2];
++c_7323251.elements[3] = ((closureN)self_7312740)->elements[3];
++c_7323251.elements[4] = ((closureN)self_7312740)->elements[4];
++c_7323251.elements[5] = ((closureN)self_7312740)->elements[5];
++c_7323251.elements[6] = r_736585_738056_738131;
++c_7323251.elements[7] = ((closureN)self_7312740)->elements[6];
++c_7323251.elements[8] = ((closureN)self_7312740)->elements[7];
++c_7323251.elements[9] = ((closureN)self_7312740)->elements[8];
++c_7323251.elements[10] = ((closureN)self_7312740)->elements[9];
++
++return_closcall2(data,  ((closureN)self_7312740)->elements[8],  &c_7323251, quote_handler_91k);; 
 +}
 +
-+static void __lambda_1071(void *data, object self_7312748, int argc, object *args) /* object self_7312748, object r_736668_738064_738139 */
++static void __lambda_1071(void *data, object self_7312741, int argc, object *args) /* object self_7312741, object r_736661_738057_738132 */
 + {
-+ object r_736668_738064_738139 = args[0];
++ object r_736661_738057_738132 = args[0];
 +  
-+closureN_type c_7323261;
-+object e_7323542 [12];
-+c_7323261.hdr.mark = gc_color_red;
-+ c_7323261.hdr.grayed = 0;
-+c_7323261.tag = closureN_tag;
-+ c_7323261.fn = (function_type)__lambda_1072;
-+c_7323261.num_args = 1;
-+c_7323261.num_elements = 12;
-+c_7323261.elements = (object *)e_7323542;
-+c_7323261.elements[0] = ((closureN)self_7312748)->elements[0];
-+c_7323261.elements[1] = ((closureN)self_7312748)->elements[1];
-+c_7323261.elements[2] = ((closureN)self_7312748)->elements[2];
-+c_7323261.elements[3] = ((closureN)self_7312748)->elements[3];
-+c_7323261.elements[4] = ((closureN)self_7312748)->elements[4];
-+c_7323261.elements[5] = ((closureN)self_7312748)->elements[5];
-+c_7323261.elements[6] = ((closureN)self_7312748)->elements[6];
-+c_7323261.elements[7] = r_736668_738064_738139;
-+c_7323261.elements[8] = ((closureN)self_7312748)->elements[7];
-+c_7323261.elements[9] = ((closureN)self_7312748)->elements[8];
-+c_7323261.elements[10] = ((closureN)self_7312748)->elements[9];
-+c_7323261.elements[11] = ((closureN)self_7312748)->elements[10];
-+
-+return_closcall2(data,  ((closureN)self_7312748)->elements[9],  &c_7323261, quote_guard_91k);; 
++closureN_type c_7323254;
++object e_7323535 [12];
++c_7323254.hdr.mark = gc_color_red;
++ c_7323254.hdr.grayed = 0;
++c_7323254.tag = closureN_tag;
++ c_7323254.fn = (function_type)__lambda_1072;
++c_7323254.num_args = 1;
++c_7323254.num_elements = 12;
++c_7323254.elements = (object *)e_7323535;
++c_7323254.elements[0] = ((closureN)self_7312741)->elements[0];
++c_7323254.elements[1] = ((closureN)self_7312741)->elements[1];
++c_7323254.elements[2] = ((closureN)self_7312741)->elements[2];
++c_7323254.elements[3] = ((closureN)self_7312741)->elements[3];
++c_7323254.elements[4] = ((closureN)self_7312741)->elements[4];
++c_7323254.elements[5] = ((closureN)self_7312741)->elements[5];
++c_7323254.elements[6] = ((closureN)self_7312741)->elements[6];
++c_7323254.elements[7] = r_736661_738057_738132;
++c_7323254.elements[8] = ((closureN)self_7312741)->elements[7];
++c_7323254.elements[9] = ((closureN)self_7312741)->elements[8];
++c_7323254.elements[10] = ((closureN)self_7312741)->elements[9];
++c_7323254.elements[11] = ((closureN)self_7312741)->elements[10];
++
++return_closcall2(data,  ((closureN)self_7312741)->elements[9],  &c_7323254, quote_guard_91k);; 
 +}
 +
-+static void __lambda_1072(void *data, object self_7312749, int argc, object *args) /* object self_7312749, object r_736601_738066_738141_738212 */
++static void __lambda_1072(void *data, object self_7312742, int argc, object *args) /* object self_7312742, object r_736594_738059_738134_738205 */
 + {
-+ object r_736601_738066_738141_738212 = args[0];
++ object r_736594_738059_738134_738205 = args[0];
 +  
-+closureN_type c_7323264;
-+object e_7323541 [13];
-+c_7323264.hdr.mark = gc_color_red;
-+ c_7323264.hdr.grayed = 0;
-+c_7323264.tag = closureN_tag;
-+ c_7323264.fn = (function_type)__lambda_1073;
-+c_7323264.num_args = 1;
-+c_7323264.num_elements = 13;
-+c_7323264.elements = (object *)e_7323541;
-+c_7323264.elements[0] = ((closureN)self_7312749)->elements[0];
-+c_7323264.elements[1] = ((closureN)self_7312749)->elements[1];
-+c_7323264.elements[2] = ((closureN)self_7312749)->elements[2];
-+c_7323264.elements[3] = ((closureN)self_7312749)->elements[3];
-+c_7323264.elements[4] = ((closureN)self_7312749)->elements[4];
-+c_7323264.elements[5] = ((closureN)self_7312749)->elements[5];
-+c_7323264.elements[6] = ((closureN)self_7312749)->elements[6];
-+c_7323264.elements[7] = r_736601_738066_738141_738212;
-+c_7323264.elements[8] = ((closureN)self_7312749)->elements[7];
-+c_7323264.elements[9] = ((closureN)self_7312749)->elements[8];
-+c_7323264.elements[10] = ((closureN)self_7312749)->elements[9];
-+c_7323264.elements[11] = ((closureN)self_7312749)->elements[10];
-+c_7323264.elements[12] = ((closureN)self_7312749)->elements[11];
-+
-+return_closcall2(data,  ((closureN)self_7312749)->elements[10],  &c_7323264, quote_lambda);; 
++closureN_type c_7323257;
++object e_7323534 [13];
++c_7323257.hdr.mark = gc_color_red;
++ c_7323257.hdr.grayed = 0;
++c_7323257.tag = closureN_tag;
++ c_7323257.fn = (function_type)__lambda_1073;
++c_7323257.num_args = 1;
++c_7323257.num_elements = 13;
++c_7323257.elements = (object *)e_7323534;
++c_7323257.elements[0] = ((closureN)self_7312742)->elements[0];
++c_7323257.elements[1] = ((closureN)self_7312742)->elements[1];
++c_7323257.elements[2] = ((closureN)self_7312742)->elements[2];
++c_7323257.elements[3] = ((closureN)self_7312742)->elements[3];
++c_7323257.elements[4] = ((closureN)self_7312742)->elements[4];
++c_7323257.elements[5] = ((closureN)self_7312742)->elements[5];
++c_7323257.elements[6] = ((closureN)self_7312742)->elements[6];
++c_7323257.elements[7] = r_736594_738059_738134_738205;
++c_7323257.elements[8] = ((closureN)self_7312742)->elements[7];
++c_7323257.elements[9] = ((closureN)self_7312742)->elements[8];
++c_7323257.elements[10] = ((closureN)self_7312742)->elements[9];
++c_7323257.elements[11] = ((closureN)self_7312742)->elements[10];
++c_7323257.elements[12] = ((closureN)self_7312742)->elements[11];
++
++return_closcall2(data,  ((closureN)self_7312742)->elements[10],  &c_7323257, quote_lambda);; 
 +}
 +
-+static void __lambda_1073(void *data, object self_7312750, int argc, object *args) /* object self_7312750, object r_736607_738067_738142_738213 */
++static void __lambda_1073(void *data, object self_7312743, int argc, object *args) /* object self_7312743, object r_736600_738060_738135_738206 */
 + {
-+ object r_736607_738067_738142_738213 = args[0];
++ object r_736600_738060_738135_738206 = args[0];
 +  
-+closureN_type c_7323267;
-+object e_7323540 [14];
-+c_7323267.hdr.mark = gc_color_red;
-+ c_7323267.hdr.grayed = 0;
-+c_7323267.tag = closureN_tag;
-+ c_7323267.fn = (function_type)__lambda_1074;
-+c_7323267.num_args = 1;
-+c_7323267.num_elements = 14;
-+c_7323267.elements = (object *)e_7323540;
-+c_7323267.elements[0] = ((closureN)self_7312750)->elements[0];
-+c_7323267.elements[1] = ((closureN)self_7312750)->elements[1];
-+c_7323267.elements[2] = ((closureN)self_7312750)->elements[2];
-+c_7323267.elements[3] = ((closureN)self_7312750)->elements[3];
-+c_7323267.elements[4] = ((closureN)self_7312750)->elements[4];
-+c_7323267.elements[5] = ((closureN)self_7312750)->elements[5];
-+c_7323267.elements[6] = ((closureN)self_7312750)->elements[6];
-+c_7323267.elements[7] = ((closureN)self_7312750)->elements[7];
-+c_7323267.elements[8] = r_736607_738067_738142_738213;
-+c_7323267.elements[9] = ((closureN)self_7312750)->elements[8];
-+c_7323267.elements[10] = ((closureN)self_7312750)->elements[9];
-+c_7323267.elements[11] = ((closureN)self_7312750)->elements[10];
-+c_7323267.elements[12] = ((closureN)self_7312750)->elements[11];
-+c_7323267.elements[13] = ((closureN)self_7312750)->elements[12];
-+
-+return_closcall2(data,  ((closureN)self_7312750)->elements[11],  &c_7323267, quote_let);; 
++closureN_type c_7323260;
++object e_7323533 [14];
++c_7323260.hdr.mark = gc_color_red;
++ c_7323260.hdr.grayed = 0;
++c_7323260.tag = closureN_tag;
++ c_7323260.fn = (function_type)__lambda_1074;
++c_7323260.num_args = 1;
++c_7323260.num_elements = 14;
++c_7323260.elements = (object *)e_7323533;
++c_7323260.elements[0] = ((closureN)self_7312743)->elements[0];
++c_7323260.elements[1] = ((closureN)self_7312743)->elements[1];
++c_7323260.elements[2] = ((closureN)self_7312743)->elements[2];
++c_7323260.elements[3] = ((closureN)self_7312743)->elements[3];
++c_7323260.elements[4] = ((closureN)self_7312743)->elements[4];
++c_7323260.elements[5] = ((closureN)self_7312743)->elements[5];
++c_7323260.elements[6] = ((closureN)self_7312743)->elements[6];
++c_7323260.elements[7] = ((closureN)self_7312743)->elements[7];
++c_7323260.elements[8] = r_736600_738060_738135_738206;
++c_7323260.elements[9] = ((closureN)self_7312743)->elements[8];
++c_7323260.elements[10] = ((closureN)self_7312743)->elements[9];
++c_7323260.elements[11] = ((closureN)self_7312743)->elements[10];
++c_7323260.elements[12] = ((closureN)self_7312743)->elements[11];
++c_7323260.elements[13] = ((closureN)self_7312743)->elements[12];
++
++return_closcall2(data,  ((closureN)self_7312743)->elements[11],  &c_7323260, quote_let);; 
 +}
 +
-+static void __lambda_1074(void *data, object self_7312751, int argc, object *args) /* object self_7312751, object r_736616_738068_738143_738214 */
++static void __lambda_1074(void *data, object self_7312744, int argc, object *args) /* object self_7312744, object r_736609_738061_738136_738207 */
 + {
-+ object r_736616_738068_738143_738214 = args[0];
++ object r_736609_738061_738136_738207 = args[0];
 +  
-+closureN_type c_7323270;
-+object e_7323539 [15];
-+c_7323270.hdr.mark = gc_color_red;
-+ c_7323270.hdr.grayed = 0;
-+c_7323270.tag = closureN_tag;
-+ c_7323270.fn = (function_type)__lambda_1075;
-+c_7323270.num_args = 1;
-+c_7323270.num_elements = 15;
-+c_7323270.elements = (object *)e_7323539;
-+c_7323270.elements[0] = ((closureN)self_7312751)->elements[0];
-+c_7323270.elements[1] = ((closureN)self_7312751)->elements[1];
-+c_7323270.elements[2] = ((closureN)self_7312751)->elements[2];
-+c_7323270.elements[3] = ((closureN)self_7312751)->elements[3];
-+c_7323270.elements[4] = ((closureN)self_7312751)->elements[4];
-+c_7323270.elements[5] = ((closureN)self_7312751)->elements[5];
-+c_7323270.elements[6] = ((closureN)self_7312751)->elements[6];
-+c_7323270.elements[7] = ((closureN)self_7312751)->elements[7];
-+c_7323270.elements[8] = ((closureN)self_7312751)->elements[8];
-+c_7323270.elements[9] = r_736616_738068_738143_738214;
-+c_7323270.elements[10] = ((closureN)self_7312751)->elements[9];
-+c_7323270.elements[11] = ((closureN)self_7312751)->elements[10];
-+c_7323270.elements[12] = ((closureN)self_7312751)->elements[11];
-+c_7323270.elements[13] = ((closureN)self_7312751)->elements[12];
-+c_7323270.elements[14] = ((closureN)self_7312751)->elements[13];
-+
-+return_closcall2(data,  ((closureN)self_7312751)->elements[12],  &c_7323270, quote_condition);; 
++closureN_type c_7323263;
++object e_7323532 [15];
++c_7323263.hdr.mark = gc_color_red;
++ c_7323263.hdr.grayed = 0;
++c_7323263.tag = closureN_tag;
++ c_7323263.fn = (function_type)__lambda_1075;
++c_7323263.num_args = 1;
++c_7323263.num_elements = 15;
++c_7323263.elements = (object *)e_7323532;
++c_7323263.elements[0] = ((closureN)self_7312744)->elements[0];
++c_7323263.elements[1] = ((closureN)self_7312744)->elements[1];
++c_7323263.elements[2] = ((closureN)self_7312744)->elements[2];
++c_7323263.elements[3] = ((closureN)self_7312744)->elements[3];
++c_7323263.elements[4] = ((closureN)self_7312744)->elements[4];
++c_7323263.elements[5] = ((closureN)self_7312744)->elements[5];
++c_7323263.elements[6] = ((closureN)self_7312744)->elements[6];
++c_7323263.elements[7] = ((closureN)self_7312744)->elements[7];
++c_7323263.elements[8] = ((closureN)self_7312744)->elements[8];
++c_7323263.elements[9] = r_736609_738061_738136_738207;
++c_7323263.elements[10] = ((closureN)self_7312744)->elements[9];
++c_7323263.elements[11] = ((closureN)self_7312744)->elements[10];
++c_7323263.elements[12] = ((closureN)self_7312744)->elements[11];
++c_7323263.elements[13] = ((closureN)self_7312744)->elements[12];
++c_7323263.elements[14] = ((closureN)self_7312744)->elements[13];
++
++return_closcall2(data,  ((closureN)self_7312744)->elements[12],  &c_7323263, quote_condition);; 
 +}
 +
-+static void __lambda_1075(void *data, object self_7312752, int argc, object *args) /* object self_7312752, object r_736661_738069_738144_738215 */
++static void __lambda_1075(void *data, object self_7312745, int argc, object *args) /* object self_7312745, object r_736654_738062_738137_738208 */
 + {
-+ object r_736661_738069_738144_738215 = args[0];
++ object r_736654_738062_738137_738208 = args[0];
 +  
-+closureN_type c_7323273;
-+object e_7323538 [16];
-+c_7323273.hdr.mark = gc_color_red;
-+ c_7323273.hdr.grayed = 0;
-+c_7323273.tag = closureN_tag;
-+ c_7323273.fn = (function_type)__lambda_1076;
-+c_7323273.num_args = 1;
-+c_7323273.num_elements = 16;
-+c_7323273.elements = (object *)e_7323538;
-+c_7323273.elements[0] = ((closureN)self_7312752)->elements[0];
-+c_7323273.elements[1] = ((closureN)self_7312752)->elements[1];
-+c_7323273.elements[2] = ((closureN)self_7312752)->elements[2];
-+c_7323273.elements[3] = ((closureN)self_7312752)->elements[3];
-+c_7323273.elements[4] = ((closureN)self_7312752)->elements[4];
-+c_7323273.elements[5] = ((closureN)self_7312752)->elements[5];
-+c_7323273.elements[6] = ((closureN)self_7312752)->elements[6];
-+c_7323273.elements[7] = ((closureN)self_7312752)->elements[7];
-+c_7323273.elements[8] = ((closureN)self_7312752)->elements[8];
-+c_7323273.elements[9] = ((closureN)self_7312752)->elements[9];
-+c_7323273.elements[10] = r_736661_738069_738144_738215;
-+c_7323273.elements[11] = ((closureN)self_7312752)->elements[10];
-+c_7323273.elements[12] = ((closureN)self_7312752)->elements[11];
-+c_7323273.elements[13] = ((closureN)self_7312752)->elements[12];
-+c_7323273.elements[14] = ((closureN)self_7312752)->elements[13];
-+c_7323273.elements[15] = ((closureN)self_7312752)->elements[14];
-+
-+return_closcall2(data,  ((closureN)self_7312752)->elements[13],  &c_7323273, quote_guard_91aux);; 
++closureN_type c_7323266;
++object e_7323531 [16];
++c_7323266.hdr.mark = gc_color_red;
++ c_7323266.hdr.grayed = 0;
++c_7323266.tag = closureN_tag;
++ c_7323266.fn = (function_type)__lambda_1076;
++c_7323266.num_args = 1;
++c_7323266.num_elements = 16;
++c_7323266.elements = (object *)e_7323531;
++c_7323266.elements[0] = ((closureN)self_7312745)->elements[0];
++c_7323266.elements[1] = ((closureN)self_7312745)->elements[1];
++c_7323266.elements[2] = ((closureN)self_7312745)->elements[2];
++c_7323266.elements[3] = ((closureN)self_7312745)->elements[3];
++c_7323266.elements[4] = ((closureN)self_7312745)->elements[4];
++c_7323266.elements[5] = ((closureN)self_7312745)->elements[5];
++c_7323266.elements[6] = ((closureN)self_7312745)->elements[6];
++c_7323266.elements[7] = ((closureN)self_7312745)->elements[7];
++c_7323266.elements[8] = ((closureN)self_7312745)->elements[8];
++c_7323266.elements[9] = ((closureN)self_7312745)->elements[9];
++c_7323266.elements[10] = r_736654_738062_738137_738208;
++c_7323266.elements[11] = ((closureN)self_7312745)->elements[10];
++c_7323266.elements[12] = ((closureN)self_7312745)->elements[11];
++c_7323266.elements[13] = ((closureN)self_7312745)->elements[12];
++c_7323266.elements[14] = ((closureN)self_7312745)->elements[13];
++c_7323266.elements[15] = ((closureN)self_7312745)->elements[14];
++
++return_closcall2(data,  ((closureN)self_7312745)->elements[13],  &c_7323266, quote_guard_91aux);; 
 +}
 +
-+static void __lambda_1076(void *data, object self_7312753, int argc, object *args) /* object self_7312753, object r_736625_738073_738148_738219_738285_738350_738414 */
++static void __lambda_1076(void *data, object self_7312746, int argc, object *args) /* object self_7312746, object r_736618_738066_738141_738212_738278_738343_738407 */
 + {
-+ object r_736625_738073_738148_738219_738285_738350_738414 = args[0];
++ object r_736618_738066_738141_738212_738278_738343_738407 = args[0];
 +  
-+closureN_type c_7323276;
-+object e_7323537 [17];
-+c_7323276.hdr.mark = gc_color_red;
-+ c_7323276.hdr.grayed = 0;
-+c_7323276.tag = closureN_tag;
-+ c_7323276.fn = (function_type)__lambda_1077;
-+c_7323276.num_args = 1;
-+c_7323276.num_elements = 17;
-+c_7323276.elements = (object *)e_7323537;
-+c_7323276.elements[0] = ((closureN)self_7312753)->elements[0];
-+c_7323276.elements[1] = ((closureN)self_7312753)->elements[1];
-+c_7323276.elements[2] = ((closureN)self_7312753)->elements[2];
-+c_7323276.elements[3] = ((closureN)self_7312753)->elements[3];
-+c_7323276.elements[4] = ((closureN)self_7312753)->elements[4];
-+c_7323276.elements[5] = ((closureN)self_7312753)->elements[5];
-+c_7323276.elements[6] = ((closureN)self_7312753)->elements[6];
-+c_7323276.elements[7] = ((closureN)self_7312753)->elements[7];
-+c_7323276.elements[8] = ((closureN)self_7312753)->elements[8];
-+c_7323276.elements[9] = ((closureN)self_7312753)->elements[9];
-+c_7323276.elements[10] = r_736625_738073_738148_738219_738285_738350_738414;
-+c_7323276.elements[11] = ((closureN)self_7312753)->elements[10];
-+c_7323276.elements[12] = ((closureN)self_7312753)->elements[11];
-+c_7323276.elements[13] = ((closureN)self_7312753)->elements[12];
-+c_7323276.elements[14] = ((closureN)self_7312753)->elements[13];
-+c_7323276.elements[15] = ((closureN)self_7312753)->elements[14];
-+c_7323276.elements[16] = ((closureN)self_7312753)->elements[15];
-+
-+return_closcall2(data,  ((closureN)self_7312753)->elements[14],  &c_7323276, quote_handler_91k);; 
++closureN_type c_7323269;
++object e_7323530 [17];
++c_7323269.hdr.mark = gc_color_red;
++ c_7323269.hdr.grayed = 0;
++c_7323269.tag = closureN_tag;
++ c_7323269.fn = (function_type)__lambda_1077;
++c_7323269.num_args = 1;
++c_7323269.num_elements = 17;
++c_7323269.elements = (object *)e_7323530;
++c_7323269.elements[0] = ((closureN)self_7312746)->elements[0];
++c_7323269.elements[1] = ((closureN)self_7312746)->elements[1];
++c_7323269.elements[2] = ((closureN)self_7312746)->elements[2];
++c_7323269.elements[3] = ((closureN)self_7312746)->elements[3];
++c_7323269.elements[4] = ((closureN)self_7312746)->elements[4];
++c_7323269.elements[5] = ((closureN)self_7312746)->elements[5];
++c_7323269.elements[6] = ((closureN)self_7312746)->elements[6];
++c_7323269.elements[7] = ((closureN)self_7312746)->elements[7];
++c_7323269.elements[8] = ((closureN)self_7312746)->elements[8];
++c_7323269.elements[9] = ((closureN)self_7312746)->elements[9];
++c_7323269.elements[10] = r_736618_738066_738141_738212_738278_738343_738407;
++c_7323269.elements[11] = ((closureN)self_7312746)->elements[10];
++c_7323269.elements[12] = ((closureN)self_7312746)->elements[11];
++c_7323269.elements[13] = ((closureN)self_7312746)->elements[12];
++c_7323269.elements[14] = ((closureN)self_7312746)->elements[13];
++c_7323269.elements[15] = ((closureN)self_7312746)->elements[14];
++c_7323269.elements[16] = ((closureN)self_7312746)->elements[15];
++
++return_closcall2(data,  ((closureN)self_7312746)->elements[14],  &c_7323269, quote_handler_91k);; 
 +}
 +
-+static void __lambda_1077(void *data, object self_7312754, int argc, object *args) /* object self_7312754, object r_736630_738074_738149_738220_738286_738351_738415 */
++static void __lambda_1077(void *data, object self_7312747, int argc, object *args) /* object self_7312747, object r_736623_738067_738142_738213_738279_738344_738408 */
 + {
-+ object r_736630_738074_738149_738220_738286_738351_738415 = args[0];
++ object r_736623_738067_738142_738213_738279_738344_738408 = args[0];
 +  
-+closureN_type c_7323279;
-+object e_7323536 [18];
-+c_7323279.hdr.mark = gc_color_red;
-+ c_7323279.hdr.grayed = 0;
-+c_7323279.tag = closureN_tag;
-+ c_7323279.fn = (function_type)__lambda_1078;
-+c_7323279.num_args = 1;
-+c_7323279.num_elements = 18;
-+c_7323279.elements = (object *)e_7323536;
-+c_7323279.elements[0] = ((closureN)self_7312754)->elements[0];
-+c_7323279.elements[1] = ((closureN)self_7312754)->elements[1];
-+c_7323279.elements[2] = ((closureN)self_7312754)->elements[2];
-+c_7323279.elements[3] = ((closureN)self_7312754)->elements[3];
-+c_7323279.elements[4] = ((closureN)self_7312754)->elements[4];
-+c_7323279.elements[5] = ((closureN)self_7312754)->elements[5];
-+c_7323279.elements[6] = ((closureN)self_7312754)->elements[6];
-+c_7323279.elements[7] = ((closureN)self_7312754)->elements[7];
-+c_7323279.elements[8] = ((closureN)self_7312754)->elements[8];
-+c_7323279.elements[9] = ((closureN)self_7312754)->elements[9];
-+c_7323279.elements[10] = ((closureN)self_7312754)->elements[10];
-+c_7323279.elements[11] = r_736630_738074_738149_738220_738286_738351_738415;
-+c_7323279.elements[12] = ((closureN)self_7312754)->elements[11];
-+c_7323279.elements[13] = ((closureN)self_7312754)->elements[12];
-+c_7323279.elements[14] = ((closureN)self_7312754)->elements[13];
-+c_7323279.elements[15] = ((closureN)self_7312754)->elements[14];
-+c_7323279.elements[16] = ((closureN)self_7312754)->elements[15];
-+c_7323279.elements[17] = ((closureN)self_7312754)->elements[16];
-+
-+return_closcall2(data,  ((closureN)self_7312754)->elements[15],  &c_7323279, quote_lambda);; 
++closureN_type c_7323272;
++object e_7323529 [18];
++c_7323272.hdr.mark = gc_color_red;
++ c_7323272.hdr.grayed = 0;
++c_7323272.tag = closureN_tag;
++ c_7323272.fn = (function_type)__lambda_1078;
++c_7323272.num_args = 1;
++c_7323272.num_elements = 18;
++c_7323272.elements = (object *)e_7323529;
++c_7323272.elements[0] = ((closureN)self_7312747)->elements[0];
++c_7323272.elements[1] = ((closureN)self_7312747)->elements[1];
++c_7323272.elements[2] = ((closureN)self_7312747)->elements[2];
++c_7323272.elements[3] = ((closureN)self_7312747)->elements[3];
++c_7323272.elements[4] = ((closureN)self_7312747)->elements[4];
++c_7323272.elements[5] = ((closureN)self_7312747)->elements[5];
++c_7323272.elements[6] = ((closureN)self_7312747)->elements[6];
++c_7323272.elements[7] = ((closureN)self_7312747)->elements[7];
++c_7323272.elements[8] = ((closureN)self_7312747)->elements[8];
++c_7323272.elements[9] = ((closureN)self_7312747)->elements[9];
++c_7323272.elements[10] = ((closureN)self_7312747)->elements[10];
++c_7323272.elements[11] = r_736623_738067_738142_738213_738279_738344_738408;
++c_7323272.elements[12] = ((closureN)self_7312747)->elements[11];
++c_7323272.elements[13] = ((closureN)self_7312747)->elements[12];
++c_7323272.elements[14] = ((closureN)self_7312747)->elements[13];
++c_7323272.elements[15] = ((closureN)self_7312747)->elements[14];
++c_7323272.elements[16] = ((closureN)self_7312747)->elements[15];
++c_7323272.elements[17] = ((closureN)self_7312747)->elements[16];
++
++return_closcall2(data,  ((closureN)self_7312747)->elements[15],  &c_7323272, quote_lambda);; 
 +}
 +
-+static void __lambda_1078(void *data, object self_7312755, int argc, object *args) /* object self_7312755, object r_736636_738075_738150_738221_738287_738352_738416 */
++static void __lambda_1078(void *data, object self_7312748, int argc, object *args) /* object self_7312748, object r_736629_738068_738143_738214_738280_738345_738409 */
 + {
-+ object r_736636_738075_738150_738221_738287_738352_738416 = args[0];
++ object r_736629_738068_738143_738214_738280_738345_738409 = args[0];
 +  
-+closureN_type c_7323282;
-+object e_7323535 [19];
-+c_7323282.hdr.mark = gc_color_red;
-+ c_7323282.hdr.grayed = 0;
-+c_7323282.tag = closureN_tag;
-+ c_7323282.fn = (function_type)__lambda_1079;
-+c_7323282.num_args = 1;
-+c_7323282.num_elements = 19;
-+c_7323282.elements = (object *)e_7323535;
-+c_7323282.elements[0] = ((closureN)self_7312755)->elements[0];
-+c_7323282.elements[1] = ((closureN)self_7312755)->elements[1];
-+c_7323282.elements[2] = ((closureN)self_7312755)->elements[2];
-+c_7323282.elements[3] = ((closureN)self_7312755)->elements[3];
-+c_7323282.elements[4] = ((closureN)self_7312755)->elements[4];
-+c_7323282.elements[5] = ((closureN)self_7312755)->elements[5];
-+c_7323282.elements[6] = ((closureN)self_7312755)->elements[6];
-+c_7323282.elements[7] = ((closureN)self_7312755)->elements[7];
-+c_7323282.elements[8] = ((closureN)self_7312755)->elements[8];
-+c_7323282.elements[9] = ((closureN)self_7312755)->elements[9];
-+c_7323282.elements[10] = ((closureN)self_7312755)->elements[10];
-+c_7323282.elements[11] = ((closureN)self_7312755)->elements[11];
-+c_7323282.elements[12] = r_736636_738075_738150_738221_738287_738352_738416;
-+c_7323282.elements[13] = ((closureN)self_7312755)->elements[12];
-+c_7323282.elements[14] = ((closureN)self_7312755)->elements[13];
-+c_7323282.elements[15] = ((closureN)self_7312755)->elements[14];
-+c_7323282.elements[16] = ((closureN)self_7312755)->elements[15];
-+c_7323282.elements[17] = ((closureN)self_7312755)->elements[16];
-+c_7323282.elements[18] = ((closureN)self_7312755)->elements[17];
-+
-+return_closcall2(data,  ((closureN)self_7312755)->elements[16],  &c_7323282, quote_raise_91continuable);; 
++closureN_type c_7323275;
++object e_7323528 [19];
++c_7323275.hdr.mark = gc_color_red;
++ c_7323275.hdr.grayed = 0;
++c_7323275.tag = closureN_tag;
++ c_7323275.fn = (function_type)__lambda_1079;
++c_7323275.num_args = 1;
++c_7323275.num_elements = 19;
++c_7323275.elements = (object *)e_7323528;
++c_7323275.elements[0] = ((closureN)self_7312748)->elements[0];
++c_7323275.elements[1] = ((closureN)self_7312748)->elements[1];
++c_7323275.elements[2] = ((closureN)self_7312748)->elements[2];
++c_7323275.elements[3] = ((closureN)self_7312748)->elements[3];
++c_7323275.elements[4] = ((closureN)self_7312748)->elements[4];
++c_7323275.elements[5] = ((closureN)self_7312748)->elements[5];
++c_7323275.elements[6] = ((closureN)self_7312748)->elements[6];
++c_7323275.elements[7] = ((closureN)self_7312748)->elements[7];
++c_7323275.elements[8] = ((closureN)self_7312748)->elements[8];
++c_7323275.elements[9] = ((closureN)self_7312748)->elements[9];
++c_7323275.elements[10] = ((closureN)self_7312748)->elements[10];
++c_7323275.elements[11] = ((closureN)self_7312748)->elements[11];
++c_7323275.elements[12] = r_736629_738068_738143_738214_738280_738345_738409;
++c_7323275.elements[13] = ((closureN)self_7312748)->elements[12];
++c_7323275.elements[14] = ((closureN)self_7312748)->elements[13];
++c_7323275.elements[15] = ((closureN)self_7312748)->elements[14];
++c_7323275.elements[16] = ((closureN)self_7312748)->elements[15];
++c_7323275.elements[17] = ((closureN)self_7312748)->elements[16];
++c_7323275.elements[18] = ((closureN)self_7312748)->elements[17];
++
++return_closcall2(data,  ((closureN)self_7312748)->elements[16],  &c_7323275, quote_raise_91continuable);; 
 +}
 +
-+static void __lambda_1079(void *data, object self_7312756, int argc, object *args) /* object self_7312756, object r_736645_738076_738151_738222_738288_738353_738417 */
++static void __lambda_1079(void *data, object self_7312749, int argc, object *args) /* object self_7312749, object r_736638_738069_738144_738215_738281_738346_738410 */
 + {
-+ object r_736645_738076_738151_738222_738288_738353_738417 = args[0];
++ object r_736638_738069_738144_738215_738281_738346_738410 = args[0];
 +  
-+closureN_type c_7323285;
-+object e_7323534 [20];
-+c_7323285.hdr.mark = gc_color_red;
-+ c_7323285.hdr.grayed = 0;
-+c_7323285.tag = closureN_tag;
-+ c_7323285.fn = (function_type)__lambda_1080;
-+c_7323285.num_args = 1;
-+c_7323285.num_elements = 20;
-+c_7323285.elements = (object *)e_7323534;
-+c_7323285.elements[0] = ((closureN)self_7312756)->elements[0];
-+c_7323285.elements[1] = ((closureN)self_7312756)->elements[1];
-+c_7323285.elements[2] = ((closureN)self_7312756)->elements[2];
-+c_7323285.elements[3] = ((closureN)self_7312756)->elements[3];
-+c_7323285.elements[4] = ((closureN)self_7312756)->elements[4];
-+c_7323285.elements[5] = ((closureN)self_7312756)->elements[5];
-+c_7323285.elements[6] = ((closureN)self_7312756)->elements[6];
-+c_7323285.elements[7] = ((closureN)self_7312756)->elements[7];
-+c_7323285.elements[8] = ((closureN)self_7312756)->elements[8];
-+c_7323285.elements[9] = ((closureN)self_7312756)->elements[9];
-+c_7323285.elements[10] = ((closureN)self_7312756)->elements[10];
-+c_7323285.elements[11] = ((closureN)self_7312756)->elements[11];
-+c_7323285.elements[12] = ((closureN)self_7312756)->elements[12];
-+c_7323285.elements[13] = r_736645_738076_738151_738222_738288_738353_738417;
-+c_7323285.elements[14] = ((closureN)self_7312756)->elements[13];
-+c_7323285.elements[15] = ((closureN)self_7312756)->elements[14];
-+c_7323285.elements[16] = ((closureN)self_7312756)->elements[15];
-+c_7323285.elements[17] = ((closureN)self_7312756)->elements[16];
-+c_7323285.elements[18] = ((closureN)self_7312756)->elements[17];
-+c_7323285.elements[19] = ((closureN)self_7312756)->elements[18];
-+
-+return_closcall2(data,  ((closureN)self_7312756)->elements[17],  &c_7323285, quote_condition);; 
++closureN_type c_7323278;
++object e_7323527 [20];
++c_7323278.hdr.mark = gc_color_red;
++ c_7323278.hdr.grayed = 0;
++c_7323278.tag = closureN_tag;
++ c_7323278.fn = (function_type)__lambda_1080;
++c_7323278.num_args = 1;
++c_7323278.num_elements = 20;
++c_7323278.elements = (object *)e_7323527;
++c_7323278.elements[0] = ((closureN)self_7312749)->elements[0];
++c_7323278.elements[1] = ((closureN)self_7312749)->elements[1];
++c_7323278.elements[2] = ((closureN)self_7312749)->elements[2];
++c_7323278.elements[3] = ((closureN)self_7312749)->elements[3];
++c_7323278.elements[4] = ((closureN)self_7312749)->elements[4];
++c_7323278.elements[5] = ((closureN)self_7312749)->elements[5];
++c_7323278.elements[6] = ((closureN)self_7312749)->elements[6];
++c_7323278.elements[7] = ((closureN)self_7312749)->elements[7];
++c_7323278.elements[8] = ((closureN)self_7312749)->elements[8];
++c_7323278.elements[9] = ((closureN)self_7312749)->elements[9];
++c_7323278.elements[10] = ((closureN)self_7312749)->elements[10];
++c_7323278.elements[11] = ((closureN)self_7312749)->elements[11];
++c_7323278.elements[12] = ((closureN)self_7312749)->elements[12];
++c_7323278.elements[13] = r_736638_738069_738144_738215_738281_738346_738410;
++c_7323278.elements[14] = ((closureN)self_7312749)->elements[13];
++c_7323278.elements[15] = ((closureN)self_7312749)->elements[14];
++c_7323278.elements[16] = ((closureN)self_7312749)->elements[15];
++c_7323278.elements[17] = ((closureN)self_7312749)->elements[16];
++c_7323278.elements[18] = ((closureN)self_7312749)->elements[17];
++c_7323278.elements[19] = ((closureN)self_7312749)->elements[18];
++
++return_closcall2(data,  ((closureN)self_7312749)->elements[17],  &c_7323278, quote_condition);; 
 +}
 +
-+static void __lambda_1080(void *data, object self_7312757, int argc, object *args) /* object self_7312757, object r_736648_738077_738152_738223_738289_738354_738418 */
++static void __lambda_1080(void *data, object self_7312750, int argc, object *args) /* object self_7312750, object r_736641_738070_738145_738216_738282_738347_738411 */
 + {
-+ object r_736648_738077_738152_738223_738289_738354_738418 = args[0];
++ object r_736641_738070_738145_738216_738282_738347_738411 = args[0];
 +  
-+closureN_type c_7323288;
-+object e_7323533 [21];
-+c_7323288.hdr.mark = gc_color_red;
-+ c_7323288.hdr.grayed = 0;
-+c_7323288.tag = closureN_tag;
-+ c_7323288.fn = (function_type)__lambda_1081;
-+c_7323288.num_args = 1;
-+c_7323288.num_elements = 21;
-+c_7323288.elements = (object *)e_7323533;
-+c_7323288.elements[0] = ((closureN)self_7312757)->elements[0];
-+c_7323288.elements[1] = ((closureN)self_7312757)->elements[1];
-+c_7323288.elements[2] = ((closureN)self_7312757)->elements[2];
-+c_7323288.elements[3] = ((closureN)self_7312757)->elements[3];
-+c_7323288.elements[4] = ((closureN)self_7312757)->elements[4];
-+c_7323288.elements[5] = ((closureN)self_7312757)->elements[5];
-+c_7323288.elements[6] = ((closureN)self_7312757)->elements[6];
-+c_7323288.elements[7] = ((closureN)self_7312757)->elements[7];
-+c_7323288.elements[8] = ((closureN)self_7312757)->elements[8];
-+c_7323288.elements[9] = ((closureN)self_7312757)->elements[9];
-+c_7323288.elements[10] = ((closureN)self_7312757)->elements[10];
-+c_7323288.elements[11] = ((closureN)self_7312757)->elements[11];
-+c_7323288.elements[12] = ((closureN)self_7312757)->elements[12];
-+c_7323288.elements[13] = ((closureN)self_7312757)->elements[13];
-+c_7323288.elements[14] = r_736648_738077_738152_738223_738289_738354_738418;
-+c_7323288.elements[15] = ((closureN)self_7312757)->elements[14];
-+c_7323288.elements[16] = ((closureN)self_7312757)->elements[15];
-+c_7323288.elements[17] = ((closureN)self_7312757)->elements[16];
-+c_7323288.elements[18] = ((closureN)self_7312757)->elements[17];
-+c_7323288.elements[19] = ((closureN)self_7312757)->elements[18];
-+c_7323288.elements[20] = ((closureN)self_7312757)->elements[19];
-+
-+return_closcall2(data,  ((closureN)self_7312757)->elements[18],  &c_7323288, quote_lambda);; 
++closureN_type c_7323281;
++object e_7323526 [21];
++c_7323281.hdr.mark = gc_color_red;
++ c_7323281.hdr.grayed = 0;
++c_7323281.tag = closureN_tag;
++ c_7323281.fn = (function_type)__lambda_1081;
++c_7323281.num_args = 1;
++c_7323281.num_elements = 21;
++c_7323281.elements = (object *)e_7323526;
++c_7323281.elements[0] = ((closureN)self_7312750)->elements[0];
++c_7323281.elements[1] = ((closureN)self_7312750)->elements[1];
++c_7323281.elements[2] = ((closureN)self_7312750)->elements[2];
++c_7323281.elements[3] = ((closureN)self_7312750)->elements[3];
++c_7323281.elements[4] = ((closureN)self_7312750)->elements[4];
++c_7323281.elements[5] = ((closureN)self_7312750)->elements[5];
++c_7323281.elements[6] = ((closureN)self_7312750)->elements[6];
++c_7323281.elements[7] = ((closureN)self_7312750)->elements[7];
++c_7323281.elements[8] = ((closureN)self_7312750)->elements[8];
++c_7323281.elements[9] = ((closureN)self_7312750)->elements[9];
++c_7323281.elements[10] = ((closureN)self_7312750)->elements[10];
++c_7323281.elements[11] = ((closureN)self_7312750)->elements[11];
++c_7323281.elements[12] = ((closureN)self_7312750)->elements[12];
++c_7323281.elements[13] = ((closureN)self_7312750)->elements[13];
++c_7323281.elements[14] = r_736641_738070_738145_738216_738282_738347_738411;
++c_7323281.elements[15] = ((closureN)self_7312750)->elements[14];
++c_7323281.elements[16] = ((closureN)self_7312750)->elements[15];
++c_7323281.elements[17] = ((closureN)self_7312750)->elements[16];
++c_7323281.elements[18] = ((closureN)self_7312750)->elements[17];
++c_7323281.elements[19] = ((closureN)self_7312750)->elements[18];
++c_7323281.elements[20] = ((closureN)self_7312750)->elements[19];
++
++return_closcall2(data,  ((closureN)self_7312750)->elements[18],  &c_7323281, quote_lambda);; 
 +}
 +
-+static void __lambda_1081(void *data, object self_7312758, int argc, object *args) /* object self_7312758, object r_736521_738104_738179_738250_738316_738381_738445_738503_738560_738616_738671_738725_738778_738830_738881_738931_738980_739028_739075_739121_739166_739210_739253_739295_739336_739376_739415_739453_739490_739526_739561_739595_739628 */
++static void __lambda_1081(void *data, object self_7312751, int argc, object *args) /* object self_7312751, object r_736514_738097_738172_738243_738309_738374_738438_738496_738553_738609_738664_738718_738771_738823_738874_738924_738973_739021_739068_739114_739159_739203_739246_739288_739329_739369_739408_739446_739483_739519_739554_739588_739621 */
 + {
-+ object r_736521_738104_738179_738250_738316_738381_738445_738503_738560_738616_738671_738725_738778_738830_738881_738931_738980_739028_739075_739121_739166_739210_739253_739295_739336_739376_739415_739453_739490_739526_739561_739595_739628 = args[0];
++ object r_736514_738097_738172_738243_738309_738374_738438_738496_738553_738609_738664_738718_738771_738823_738874_738924_738973_739021_739068_739114_739159_739203_739246_739288_739329_739369_739408_739446_739483_739519_739554_739588_739621 = args[0];
 +  
-+closureN_type c_7323291;
-+object e_7323532 [22];
-+c_7323291.hdr.mark = gc_color_red;
-+ c_7323291.hdr.grayed = 0;
-+c_7323291.tag = closureN_tag;
-+ c_7323291.fn = (function_type)__lambda_1082;
-+c_7323291.num_args = 1;
-+c_7323291.num_elements = 22;
-+c_7323291.elements = (object *)e_7323532;
-+c_7323291.elements[0] = ((closureN)self_7312758)->elements[0];
-+c_7323291.elements[1] = ((closureN)self_7312758)->elements[1];
-+c_7323291.elements[2] = ((closureN)self_7312758)->elements[2];
-+c_7323291.elements[3] = ((closureN)self_7312758)->elements[3];
-+c_7323291.elements[4] = r_736521_738104_738179_738250_738316_738381_738445_738503_738560_738616_738671_738725_738778_738830_738881_738931_738980_739028_739075_739121_739166_739210_739253_739295_739336_739376_739415_739453_739490_739526_739561_739595_739628;
-+c_7323291.elements[5] = ((closureN)self_7312758)->elements[4];
-+c_7323291.elements[6] = ((closureN)self_7312758)->elements[5];
-+c_7323291.elements[7] = ((closureN)self_7312758)->elements[6];
-+c_7323291.elements[8] = ((closureN)self_7312758)->elements[7];
-+c_7323291.elements[9] = ((closureN)self_7312758)->elements[8];
-+c_7323291.elements[10] = ((closureN)self_7312758)->elements[9];
-+c_7323291.elements[11] = ((closureN)self_7312758)->elements[10];
-+c_7323291.elements[12] = ((closureN)self_7312758)->elements[11];
-+c_7323291.elements[13] = ((closureN)self_7312758)->elements[12];
-+c_7323291.elements[14] = ((closureN)self_7312758)->elements[13];
-+c_7323291.elements[15] = ((closureN)self_7312758)->elements[14];
-+c_7323291.elements[16] = ((closureN)self_7312758)->elements[15];
-+c_7323291.elements[17] = ((closureN)self_7312758)->elements[16];
-+c_7323291.elements[18] = ((closureN)self_7312758)->elements[17];
-+c_7323291.elements[19] = ((closureN)self_7312758)->elements[18];
-+c_7323291.elements[20] = ((closureN)self_7312758)->elements[19];
-+c_7323291.elements[21] = ((closureN)self_7312758)->elements[20];
-+
-+return_closcall2(data,  ((closureN)self_7312758)->elements[19],  &c_7323291, quote_let);; 
++closureN_type c_7323284;
++object e_7323525 [22];
++c_7323284.hdr.mark = gc_color_red;
++ c_7323284.hdr.grayed = 0;
++c_7323284.tag = closureN_tag;
++ c_7323284.fn = (function_type)__lambda_1082;
++c_7323284.num_args = 1;
++c_7323284.num_elements = 22;
++c_7323284.elements = (object *)e_7323525;
++c_7323284.elements[0] = ((closureN)self_7312751)->elements[0];
++c_7323284.elements[1] = ((closureN)self_7312751)->elements[1];
++c_7323284.elements[2] = ((closureN)self_7312751)->elements[2];
++c_7323284.elements[3] = ((closureN)self_7312751)->elements[3];
++c_7323284.elements[4] = r_736514_738097_738172_738243_738309_738374_738438_738496_738553_738609_738664_738718_738771_738823_738874_738924_738973_739021_739068_739114_739159_739203_739246_739288_739329_739369_739408_739446_739483_739519_739554_739588_739621;
++c_7323284.elements[5] = ((closureN)self_7312751)->elements[4];
++c_7323284.elements[6] = ((closureN)self_7312751)->elements[5];
++c_7323284.elements[7] = ((closureN)self_7312751)->elements[6];
++c_7323284.elements[8] = ((closureN)self_7312751)->elements[7];
++c_7323284.elements[9] = ((closureN)self_7312751)->elements[8];
++c_7323284.elements[10] = ((closureN)self_7312751)->elements[9];
++c_7323284.elements[11] = ((closureN)self_7312751)->elements[10];
++c_7323284.elements[12] = ((closureN)self_7312751)->elements[11];
++c_7323284.elements[13] = ((closureN)self_7312751)->elements[12];
++c_7323284.elements[14] = ((closureN)self_7312751)->elements[13];
++c_7323284.elements[15] = ((closureN)self_7312751)->elements[14];
++c_7323284.elements[16] = ((closureN)self_7312751)->elements[15];
++c_7323284.elements[17] = ((closureN)self_7312751)->elements[16];
++c_7323284.elements[18] = ((closureN)self_7312751)->elements[17];
++c_7323284.elements[19] = ((closureN)self_7312751)->elements[18];
++c_7323284.elements[20] = ((closureN)self_7312751)->elements[19];
++c_7323284.elements[21] = ((closureN)self_7312751)->elements[20];
++
++return_closcall2(data,  ((closureN)self_7312751)->elements[19],  &c_7323284, quote_let);; 
 +}
 +
-+static void __lambda_1082(void *data, object self_7312759, int argc, object *args) /* object self_7312759, object r_736530_738105_738180_738251_738317_738382_738446_738504_738561_738617_738672_738726_738779_738831_738882_738932_738981_739029_739076_739122_739167_739211_739254_739296_739337_739377_739416_739454_739491_739527_739562_739596_739629 */
++static void __lambda_1082(void *data, object self_7312752, int argc, object *args) /* object self_7312752, object r_736523_738098_738173_738244_738310_738375_738439_738497_738554_738610_738665_738719_738772_738824_738875_738925_738974_739022_739069_739115_739160_739204_739247_739289_739330_739370_739409_739447_739484_739520_739555_739589_739622 */
 + {
-+ object r_736530_738105_738180_738251_738317_738382_738446_738504_738561_738617_738672_738726_738779_738831_738882_738932_738981_739029_739076_739122_739167_739211_739254_739296_739337_739377_739416_739454_739491_739527_739562_739596_739629 = args[0];
++ object r_736523_738098_738173_738244_738310_738375_738439_738497_738554_738610_738665_738719_738772_738824_738875_738925_738974_739022_739069_739115_739160_739204_739247_739289_739330_739370_739409_739447_739484_739520_739555_739589_739622 = args[0];
 +  
-+closureN_type c_7323294;
-+object e_7323531 [23];
-+c_7323294.hdr.mark = gc_color_red;
-+ c_7323294.hdr.grayed = 0;
-+c_7323294.tag = closureN_tag;
-+ c_7323294.fn = (function_type)__lambda_1083;
-+c_7323294.num_args = 1;
-+c_7323294.num_elements = 23;
-+c_7323294.elements = (object *)e_7323531;
-+c_7323294.elements[0] = ((closureN)self_7312759)->elements[0];
-+c_7323294.elements[1] = ((closureN)self_7312759)->elements[1];
-+c_7323294.elements[2] = ((closureN)self_7312759)->elements[2];
-+c_7323294.elements[3] = ((closureN)self_7312759)->elements[3];
-+c_7323294.elements[4] = ((closureN)self_7312759)->elements[4];
-+c_7323294.elements[5] = r_736530_738105_738180_738251_738317_738382_738446_738504_738561_738617_738672_738726_738779_738831_738882_738932_738981_739029_739076_739122_739167_739211_739254_739296_739337_739377_739416_739454_739491_739527_739562_739596_739629;
-+c_7323294.elements[6] = ((closureN)self_7312759)->elements[5];
-+c_7323294.elements[7] = ((closureN)self_7312759)->elements[6];
-+c_7323294.elements[8] = ((closureN)self_7312759)->elements[7];
-+c_7323294.elements[9] = ((closureN)self_7312759)->elements[8];
-+c_7323294.elements[10] = ((closureN)self_7312759)->elements[9];
-+c_7323294.elements[11] = ((closureN)self_7312759)->elements[10];
-+c_7323294.elements[12] = ((closureN)self_7312759)->elements[11];
-+c_7323294.elements[13] = ((closureN)self_7312759)->elements[12];
-+c_7323294.elements[14] = ((closureN)self_7312759)->elements[13];
-+c_7323294.elements[15] = ((closureN)self_7312759)->elements[14];
-+c_7323294.elements[16] = ((closureN)self_7312759)->elements[15];
-+c_7323294.elements[17] = ((closureN)self_7312759)->elements[16];
-+c_7323294.elements[18] = ((closureN)self_7312759)->elements[17];
-+c_7323294.elements[19] = ((closureN)self_7312759)->elements[18];
-+c_7323294.elements[20] = ((closureN)self_7312759)->elements[19];
-+c_7323294.elements[21] = ((closureN)self_7312759)->elements[20];
-+c_7323294.elements[22] = ((closureN)self_7312759)->elements[21];
-+
-+return_closcall2(data,  ((closureN)self_7312759)->elements[20],  &c_7323294, quote_res);; 
++closureN_type c_7323287;
++object e_7323524 [23];
++c_7323287.hdr.mark = gc_color_red;
++ c_7323287.hdr.grayed = 0;
++c_7323287.tag = closureN_tag;
++ c_7323287.fn = (function_type)__lambda_1083;
++c_7323287.num_args = 1;
++c_7323287.num_elements = 23;
++c_7323287.elements = (object *)e_7323524;
++c_7323287.elements[0] = ((closureN)self_7312752)->elements[0];
++c_7323287.elements[1] = ((closureN)self_7312752)->elements[1];
++c_7323287.elements[2] = ((closureN)self_7312752)->elements[2];
++c_7323287.elements[3] = ((closureN)self_7312752)->elements[3];
++c_7323287.elements[4] = ((closureN)self_7312752)->elements[4];
++c_7323287.elements[5] = r_736523_738098_738173_738244_738310_738375_738439_738497_738554_738610_738665_738719_738772_738824_738875_738925_738974_739022_739069_739115_739160_739204_739247_739289_739330_739370_739409_739447_739484_739520_739555_739589_739622;
++c_7323287.elements[6] = ((closureN)self_7312752)->elements[5];
++c_7323287.elements[7] = ((closureN)self_7312752)->elements[6];
++c_7323287.elements[8] = ((closureN)self_7312752)->elements[7];
++c_7323287.elements[9] = ((closureN)self_7312752)->elements[8];
++c_7323287.elements[10] = ((closureN)self_7312752)->elements[9];
++c_7323287.elements[11] = ((closureN)self_7312752)->elements[10];
++c_7323287.elements[12] = ((closureN)self_7312752)->elements[11];
++c_7323287.elements[13] = ((closureN)self_7312752)->elements[12];
++c_7323287.elements[14] = ((closureN)self_7312752)->elements[13];
++c_7323287.elements[15] = ((closureN)self_7312752)->elements[14];
++c_7323287.elements[16] = ((closureN)self_7312752)->elements[15];
++c_7323287.elements[17] = ((closureN)self_7312752)->elements[16];
++c_7323287.elements[18] = ((closureN)self_7312752)->elements[17];
++c_7323287.elements[19] = ((closureN)self_7312752)->elements[18];
++c_7323287.elements[20] = ((closureN)self_7312752)->elements[19];
++c_7323287.elements[21] = ((closureN)self_7312752)->elements[20];
++c_7323287.elements[22] = ((closureN)self_7312752)->elements[21];
++
++return_closcall2(data,  ((closureN)self_7312752)->elements[20],  &c_7323287, quote_res);; 
 +}
 +
-+static void __lambda_1083(void *data, object self_7312760, int argc, object *args) /* object self_7312760, object r_736560_738106_738181_738252_738318_738383_738447_738505_738562_738618_738673_738727_738780_738832_738883_738933_738982_739030_739077_739123_739168_739212_739255_739297_739338_739378_739417_739455_739492_739528_739563_739597_739630 */
++static void __lambda_1083(void *data, object self_7312753, int argc, object *args) /* object self_7312753, object r_736553_738099_738174_738245_738311_738376_738440_738498_738555_738611_738666_738720_738773_738825_738876_738926_738975_739023_739070_739116_739161_739205_739248_739290_739331_739371_739410_739448_739485_739521_739556_739590_739623 */
 + {
-+ object r_736560_738106_738181_738252_738318_738383_738447_738505_738562_738618_738673_738727_738780_738832_738883_738933_738982_739030_739077_739123_739168_739212_739255_739297_739338_739378_739417_739455_739492_739528_739563_739597_739630 = args[0];
++ object r_736553_738099_738174_738245_738311_738376_738440_738498_738555_738611_738666_738720_738773_738825_738876_738926_738975_739023_739070_739116_739161_739205_739248_739290_739331_739371_739410_739448_739485_739521_739556_739590_739623 = args[0];
 +  
-+closureN_type c_7323297;
-+object e_7323530 [24];
-+c_7323297.hdr.mark = gc_color_red;
-+ c_7323297.hdr.grayed = 0;
-+c_7323297.tag = closureN_tag;
-+ c_7323297.fn = (function_type)__lambda_1084;
-+c_7323297.num_args = 1;
-+c_7323297.num_elements = 24;
-+c_7323297.elements = (object *)e_7323530;
-+c_7323297.elements[0] = ((closureN)self_7312760)->elements[0];
-+c_7323297.elements[1] = ((closureN)self_7312760)->elements[1];
-+c_7323297.elements[2] = ((closureN)self_7312760)->elements[2];
-+c_7323297.elements[3] = ((closureN)self_7312760)->elements[3];
-+c_7323297.elements[4] = ((closureN)self_7312760)->elements[4];
-+c_7323297.elements[5] = ((closureN)self_7312760)->elements[5];
-+c_7323297.elements[6] = r_736560_738106_738181_738252_738318_738383_738447_738505_738562_738618_738673_738727_738780_738832_738883_738933_738982_739030_739077_739123_739168_739212_739255_739297_739338_739378_739417_739455_739492_739528_739563_739597_739630;
-+c_7323297.elements[7] = ((closureN)self_7312760)->elements[6];
-+c_7323297.elements[8] = ((closureN)self_7312760)->elements[7];
-+c_7323297.elements[9] = ((closureN)self_7312760)->elements[8];
-+c_7323297.elements[10] = ((closureN)self_7312760)->elements[9];
-+c_7323297.elements[11] = ((closureN)self_7312760)->elements[10];
-+c_7323297.elements[12] = ((closureN)self_7312760)->elements[11];
-+c_7323297.elements[13] = ((closureN)self_7312760)->elements[12];
-+c_7323297.elements[14] = ((closureN)self_7312760)->elements[13];
-+c_7323297.elements[15] = ((closureN)self_7312760)->elements[14];
-+c_7323297.elements[16] = ((closureN)self_7312760)->elements[15];
-+c_7323297.elements[17] = ((closureN)self_7312760)->elements[16];
-+c_7323297.elements[18] = ((closureN)self_7312760)->elements[17];
-+c_7323297.elements[19] = ((closureN)self_7312760)->elements[18];
-+c_7323297.elements[20] = ((closureN)self_7312760)->elements[19];
-+c_7323297.elements[21] = ((closureN)self_7312760)->elements[20];
-+c_7323297.elements[22] = ((closureN)self_7312760)->elements[21];
-+c_7323297.elements[23] = ((closureN)self_7312760)->elements[22];
-+
-+return_closcall2(data,  ((closureN)self_7312760)->elements[21],  &c_7323297, quote_begin);; 
++closureN_type c_7323290;
++object e_7323523 [24];
++c_7323290.hdr.mark = gc_color_red;
++ c_7323290.hdr.grayed = 0;
++c_7323290.tag = closureN_tag;
++ c_7323290.fn = (function_type)__lambda_1084;
++c_7323290.num_args = 1;
++c_7323290.num_elements = 24;
++c_7323290.elements = (object *)e_7323523;
++c_7323290.elements[0] = ((closureN)self_7312753)->elements[0];
++c_7323290.elements[1] = ((closureN)self_7312753)->elements[1];
++c_7323290.elements[2] = ((closureN)self_7312753)->elements[2];
++c_7323290.elements[3] = ((closureN)self_7312753)->elements[3];
++c_7323290.elements[4] = ((closureN)self_7312753)->elements[4];
++c_7323290.elements[5] = ((closureN)self_7312753)->elements[5];
++c_7323290.elements[6] = r_736553_738099_738174_738245_738311_738376_738440_738498_738555_738611_738666_738720_738773_738825_738876_738926_738975_739023_739070_739116_739161_739205_739248_739290_739331_739371_739410_739448_739485_739521_739556_739590_739623;
++c_7323290.elements[7] = ((closureN)self_7312753)->elements[6];
++c_7323290.elements[8] = ((closureN)self_7312753)->elements[7];
++c_7323290.elements[9] = ((closureN)self_7312753)->elements[8];
++c_7323290.elements[10] = ((closureN)self_7312753)->elements[9];
++c_7323290.elements[11] = ((closureN)self_7312753)->elements[10];
++c_7323290.elements[12] = ((closureN)self_7312753)->elements[11];
++c_7323290.elements[13] = ((closureN)self_7312753)->elements[12];
++c_7323290.elements[14] = ((closureN)self_7312753)->elements[13];
++c_7323290.elements[15] = ((closureN)self_7312753)->elements[14];
++c_7323290.elements[16] = ((closureN)self_7312753)->elements[15];
++c_7323290.elements[17] = ((closureN)self_7312753)->elements[16];
++c_7323290.elements[18] = ((closureN)self_7312753)->elements[17];
++c_7323290.elements[19] = ((closureN)self_7312753)->elements[18];
++c_7323290.elements[20] = ((closureN)self_7312753)->elements[19];
++c_7323290.elements[21] = ((closureN)self_7312753)->elements[20];
++c_7323290.elements[22] = ((closureN)self_7312753)->elements[21];
++c_7323290.elements[23] = ((closureN)self_7312753)->elements[22];
++
++return_closcall2(data,  ((closureN)self_7312753)->elements[21],  &c_7323290, quote_begin);; 
 +}
 +
-+static void __lambda_1084(void *data, object self_7312761, int argc, object *args) /* object self_7312761, object r_736566_738107_738182_738253_738319_738384_738448_738506_738563_738619_738674_738728_738781_738833_738884_738934_738983_739031_739078_739124_739169_739213_739256_739298_739339_739379_739418_739456_739493_739529_739564_739598_739631 */
++static void __lambda_1084(void *data, object self_7312754, int argc, object *args) /* object self_7312754, object r_736559_738100_738175_738246_738312_738377_738441_738499_738556_738612_738667_738721_738774_738826_738877_738927_738976_739024_739071_739117_739162_739206_739249_739291_739332_739372_739411_739449_739486_739522_739557_739591_739624 */
 + {
-+ object r_736566_738107_738182_738253_738319_738384_738448_738506_738563_738619_738674_738728_738781_738833_738884_738934_738983_739031_739078_739124_739169_739213_739256_739298_739339_739379_739418_739456_739493_739529_739564_739598_739631 = args[0];
++ object r_736559_738100_738175_738246_738312_738377_738441_738499_738556_738612_738667_738721_738774_738826_738877_738927_738976_739024_739071_739117_739162_739206_739249_739291_739332_739372_739411_739449_739486_739522_739557_739591_739624 = args[0];
 +  
-+closureN_type c_7323300;
-+object e_7323529 [25];
-+c_7323300.hdr.mark = gc_color_red;
-+ c_7323300.hdr.grayed = 0;
-+c_7323300.tag = closureN_tag;
-+ c_7323300.fn = (function_type)__lambda_1085;
-+c_7323300.num_args = 1;
-+c_7323300.num_elements = 25;
-+c_7323300.elements = (object *)e_7323529;
-+c_7323300.elements[0] = ((closureN)self_7312761)->elements[0];
-+c_7323300.elements[1] = ((closureN)self_7312761)->elements[1];
-+c_7323300.elements[2] = ((closureN)self_7312761)->elements[2];
-+c_7323300.elements[3] = ((closureN)self_7312761)->elements[3];
-+c_7323300.elements[4] = ((closureN)self_7312761)->elements[4];
-+c_7323300.elements[5] = ((closureN)self_7312761)->elements[5];
-+c_7323300.elements[6] = ((closureN)self_7312761)->elements[6];
-+c_7323300.elements[7] = r_736566_738107_738182_738253_738319_738384_738448_738506_738563_738619_738674_738728_738781_738833_738884_738934_738983_739031_739078_739124_739169_739213_739256_739298_739339_739379_739418_739456_739493_739529_739564_739598_739631;
-+c_7323300.elements[8] = ((closureN)self_7312761)->elements[7];
-+c_7323300.elements[9] = ((closureN)self_7312761)->elements[8];
-+c_7323300.elements[10] = ((closureN)self_7312761)->elements[9];
-+c_7323300.elements[11] = ((closureN)self_7312761)->elements[10];
-+c_7323300.elements[12] = ((closureN)self_7312761)->elements[11];
-+c_7323300.elements[13] = ((closureN)self_7312761)->elements[12];
-+c_7323300.elements[14] = ((closureN)self_7312761)->elements[13];
-+c_7323300.elements[15] = ((closureN)self_7312761)->elements[14];
-+c_7323300.elements[16] = ((closureN)self_7312761)->elements[15];
-+c_7323300.elements[17] = ((closureN)self_7312761)->elements[16];
-+c_7323300.elements[18] = ((closureN)self_7312761)->elements[17];
-+c_7323300.elements[19] = ((closureN)self_7312761)->elements[18];
-+c_7323300.elements[20] = ((closureN)self_7312761)->elements[19];
-+c_7323300.elements[21] = ((closureN)self_7312761)->elements[20];
-+c_7323300.elements[22] = ((closureN)self_7312761)->elements[21];
-+c_7323300.elements[23] = ((closureN)self_7312761)->elements[22];
-+c_7323300.elements[24] = ((closureN)self_7312761)->elements[23];
-+
-+return_closcall2(data,  ((closureN)self_7312761)->elements[22],  &c_7323300, quote_guard_91k);; 
++closureN_type c_7323293;
++object e_7323522 [25];
++c_7323293.hdr.mark = gc_color_red;
++ c_7323293.hdr.grayed = 0;
++c_7323293.tag = closureN_tag;
++ c_7323293.fn = (function_type)__lambda_1085;
++c_7323293.num_args = 1;
++c_7323293.num_elements = 25;
++c_7323293.elements = (object *)e_7323522;
++c_7323293.elements[0] = ((closureN)self_7312754)->elements[0];
++c_7323293.elements[1] = ((closureN)self_7312754)->elements[1];
++c_7323293.elements[2] = ((closureN)self_7312754)->elements[2];
++c_7323293.elements[3] = ((closureN)self_7312754)->elements[3];
++c_7323293.elements[4] = ((closureN)self_7312754)->elements[4];
++c_7323293.elements[5] = ((closureN)self_7312754)->elements[5];
++c_7323293.elements[6] = ((closureN)self_7312754)->elements[6];
++c_7323293.elements[7] = r_736559_738100_738175_738246_738312_738377_738441_738499_738556_738612_738667_738721_738774_738826_738877_738927_738976_739024_739071_739117_739162_739206_739249_739291_739332_739372_739411_739449_739486_739522_739557_739591_739624;
++c_7323293.elements[8] = ((closureN)self_7312754)->elements[7];
++c_7323293.elements[9] = ((closureN)self_7312754)->elements[8];
++c_7323293.elements[10] = ((closureN)self_7312754)->elements[9];
++c_7323293.elements[11] = ((closureN)self_7312754)->elements[10];
++c_7323293.elements[12] = ((closureN)self_7312754)->elements[11];
++c_7323293.elements[13] = ((closureN)self_7312754)->elements[12];
++c_7323293.elements[14] = ((closureN)self_7312754)->elements[13];
++c_7323293.elements[15] = ((closureN)self_7312754)->elements[14];
++c_7323293.elements[16] = ((closureN)self_7312754)->elements[15];
++c_7323293.elements[17] = ((closureN)self_7312754)->elements[16];
++c_7323293.elements[18] = ((closureN)self_7312754)->elements[17];
++c_7323293.elements[19] = ((closureN)self_7312754)->elements[18];
++c_7323293.elements[20] = ((closureN)self_7312754)->elements[19];
++c_7323293.elements[21] = ((closureN)self_7312754)->elements[20];
++c_7323293.elements[22] = ((closureN)self_7312754)->elements[21];
++c_7323293.elements[23] = ((closureN)self_7312754)->elements[22];
++c_7323293.elements[24] = ((closureN)self_7312754)->elements[23];
++
++return_closcall2(data,  ((closureN)self_7312754)->elements[22],  &c_7323293, quote_guard_91k);; 
 +}
 +
-+static void __lambda_1085(void *data, object self_7312762, int argc, object *args) /* object self_7312762, object r_736539_738113_738188_738259_738325_738390_738454_738512_738569_738625_738680_738734_738787_738839_738890_738940_738989_739037_739084_739130_739175_739219_739262_739304_739345_739385_739424_739462_739499_739535_739570_739604_739637_739665_739692_739718_739743_739767 */
++static void __lambda_1085(void *data, object self_7312755, int argc, object *args) /* object self_7312755, object r_736532_738106_738181_738252_738318_738383_738447_738505_738562_738618_738673_738727_738780_738832_738883_738933_738982_739030_739077_739123_739168_739212_739255_739297_739338_739378_739417_739455_739492_739528_739563_739597_739630_739658_739685_739711_739736_739760 */
 + {
-+ object r_736539_738113_738188_738259_738325_738390_738454_738512_738569_738625_738680_738734_738787_738839_738890_738940_738989_739037_739084_739130_739175_739219_739262_739304_739345_739385_739424_739462_739499_739535_739570_739604_739637_739665_739692_739718_739743_739767 = args[0];
++ object r_736532_738106_738181_738252_738318_738383_738447_738505_738562_738618_738673_738727_738780_738832_738883_738933_738982_739030_739077_739123_739168_739212_739255_739297_739338_739378_739417_739455_739492_739528_739563_739597_739630_739658_739685_739711_739736_739760 = args[0];
 +  
-+closureN_type c_7323303;
-+object e_7323528 [26];
-+c_7323303.hdr.mark = gc_color_red;
-+ c_7323303.hdr.grayed = 0;
-+c_7323303.tag = closureN_tag;
-+ c_7323303.fn = (function_type)__lambda_1086;
-+c_7323303.num_args = 1;
-+c_7323303.num_elements = 26;
-+c_7323303.elements = (object *)e_7323528;
-+c_7323303.elements[0] = ((closureN)self_7312762)->elements[0];
-+c_7323303.elements[1] = ((closureN)self_7312762)->elements[1];
-+c_7323303.elements[2] = ((closureN)self_7312762)->elements[2];
-+c_7323303.elements[3] = ((closureN)self_7312762)->elements[3];
-+c_7323303.elements[4] = ((closureN)self_7312762)->elements[4];
-+c_7323303.elements[5] = ((closureN)self_7312762)->elements[5];
-+c_7323303.elements[6] = r_736539_738113_738188_738259_738325_738390_738454_738512_738569_738625_738680_738734_738787_738839_738890_738940_738989_739037_739084_739130_739175_739219_739262_739304_739345_739385_739424_739462_739499_739535_739570_739604_739637_739665_739692_739718_739743_739767;
-+c_7323303.elements[7] = ((closureN)self_7312762)->elements[6];
-+c_7323303.elements[8] = ((closureN)self_7312762)->elements[7];
-+c_7323303.elements[9] = ((closureN)self_7312762)->elements[8];
-+c_7323303.elements[10] = ((closureN)self_7312762)->elements[9];
-+c_7323303.elements[11] = ((closureN)self_7312762)->elements[10];
-+c_7323303.elements[12] = ((closureN)self_7312762)->elements[11];
-+c_7323303.elements[13] = ((closureN)self_7312762)->elements[12];
-+c_7323303.elements[14] = ((closureN)self_7312762)->elements[13];
-+c_7323303.elements[15] = ((closureN)self_7312762)->elements[14];
-+c_7323303.elements[16] = ((closureN)self_7312762)->elements[15];
-+c_7323303.elements[17] = ((closureN)self_7312762)->elements[16];
-+c_7323303.elements[18] = ((closureN)self_7312762)->elements[17];
-+c_7323303.elements[19] = ((closureN)self_7312762)->elements[18];
-+c_7323303.elements[20] = ((closureN)self_7312762)->elements[19];
-+c_7323303.elements[21] = ((closureN)self_7312762)->elements[20];
-+c_7323303.elements[22] = ((closureN)self_7312762)->elements[21];
-+c_7323303.elements[23] = ((closureN)self_7312762)->elements[22];
-+c_7323303.elements[24] = ((closureN)self_7312762)->elements[23];
-+c_7323303.elements[25] = ((closureN)self_7312762)->elements[24];
-+
-+return_closcall2(data,  ((closureN)self_7312762)->elements[23],  &c_7323303, quote_lambda);; 
++closureN_type c_7323296;
++object e_7323521 [26];
++c_7323296.hdr.mark = gc_color_red;
++ c_7323296.hdr.grayed = 0;
++c_7323296.tag = closureN_tag;
++ c_7323296.fn = (function_type)__lambda_1086;
++c_7323296.num_args = 1;
++c_7323296.num_elements = 26;
++c_7323296.elements = (object *)e_7323521;
++c_7323296.elements[0] = ((closureN)self_7312755)->elements[0];
++c_7323296.elements[1] = ((closureN)self_7312755)->elements[1];
++c_7323296.elements[2] = ((closureN)self_7312755)->elements[2];
++c_7323296.elements[3] = ((closureN)self_7312755)->elements[3];
++c_7323296.elements[4] = ((closureN)self_7312755)->elements[4];
++c_7323296.elements[5] = ((closureN)self_7312755)->elements[5];
++c_7323296.elements[6] = r_736532_738106_738181_738252_738318_738383_738447_738505_738562_738618_738673_738727_738780_738832_738883_738933_738982_739030_739077_739123_739168_739212_739255_739297_739338_739378_739417_739455_739492_739528_739563_739597_739630_739658_739685_739711_739736_739760;
++c_7323296.elements[7] = ((closureN)self_7312755)->elements[6];
++c_7323296.elements[8] = ((closureN)self_7312755)->elements[7];
++c_7323296.elements[9] = ((closureN)self_7312755)->elements[8];
++c_7323296.elements[10] = ((closureN)self_7312755)->elements[9];
++c_7323296.elements[11] = ((closureN)self_7312755)->elements[10];
++c_7323296.elements[12] = ((closureN)self_7312755)->elements[11];
++c_7323296.elements[13] = ((closureN)self_7312755)->elements[12];
++c_7323296.elements[14] = ((closureN)self_7312755)->elements[13];
++c_7323296.elements[15] = ((closureN)self_7312755)->elements[14];
++c_7323296.elements[16] = ((closureN)self_7312755)->elements[15];
++c_7323296.elements[17] = ((closureN)self_7312755)->elements[16];
++c_7323296.elements[18] = ((closureN)self_7312755)->elements[17];
++c_7323296.elements[19] = ((closureN)self_7312755)->elements[18];
++c_7323296.elements[20] = ((closureN)self_7312755)->elements[19];
++c_7323296.elements[21] = ((closureN)self_7312755)->elements[20];
++c_7323296.elements[22] = ((closureN)self_7312755)->elements[21];
++c_7323296.elements[23] = ((closureN)self_7312755)->elements[22];
++c_7323296.elements[24] = ((closureN)self_7312755)->elements[23];
++c_7323296.elements[25] = ((closureN)self_7312755)->elements[24];
++
++return_closcall2(data,  ((closureN)self_7312755)->elements[23],  &c_7323296, quote_lambda);; 
 +}
 +
-+static void __lambda_1086(void *data, object self_7312763, int argc, object *args) /* object self_7312763, object r_736545_738114_738189_738260_738326_738391_738455_738513_738570_738626_738681_738735_738788_738840_738891_738941_738990_739038_739085_739131_739176_739220_739263_739305_739346_739386_739425_739463_739500_739536_739571_739605_739638_739666_739693_739719_739744_739768 */
++static void __lambda_1086(void *data, object self_7312756, int argc, object *args) /* object self_7312756, object r_736538_738107_738182_738253_738319_738384_738448_738506_738563_738619_738674_738728_738781_738833_738884_738934_738983_739031_739078_739124_739169_739213_739256_739298_739339_739379_739418_739456_739493_739529_739564_739598_739631_739659_739686_739712_739737_739761 */
 + {
-+ object r_736545_738114_738189_738260_738326_738391_738455_738513_738570_738626_738681_738735_738788_738840_738891_738941_738990_739038_739085_739131_739176_739220_739263_739305_739346_739386_739425_739463_739500_739536_739571_739605_739638_739666_739693_739719_739744_739768 = args[0];
++ object r_736538_738107_738182_738253_738319_738384_738448_738506_738563_738619_738674_738728_738781_738833_738884_738934_738983_739031_739078_739124_739169_739213_739256_739298_739339_739379_739418_739456_739493_739529_739564_739598_739631_739659_739686_739712_739737_739761 = args[0];
 +  
-+closureN_type c_7323306;
-+object e_7323527 [26];
-+c_7323306.hdr.mark = gc_color_red;
-+ c_7323306.hdr.grayed = 0;
-+c_7323306.tag = closureN_tag;
-+ c_7323306.fn = (function_type)__lambda_1087;
-+c_7323306.num_args = 1;
-+c_7323306.num_elements = 26;
-+c_7323306.elements = (object *)e_7323527;
-+c_7323306.elements[0] = ((closureN)self_7312763)->elements[0];
-+c_7323306.elements[1] = ((closureN)self_7312763)->elements[1];
-+c_7323306.elements[2] = ((closureN)self_7312763)->elements[2];
-+c_7323306.elements[3] = ((closureN)self_7312763)->elements[3];
-+c_7323306.elements[4] = ((closureN)self_7312763)->elements[4];
-+c_7323306.elements[5] = ((closureN)self_7312763)->elements[5];
-+c_7323306.elements[6] = ((closureN)self_7312763)->elements[6];
-+c_7323306.elements[7] = r_736545_738114_738189_738260_738326_738391_738455_738513_738570_738626_738681_738735_738788_738840_738891_738941_738990_739038_739085_739131_739176_739220_739263_739305_739346_739386_739425_739463_739500_739536_739571_739605_739638_739666_739693_739719_739744_739768;
-+c_7323306.elements[8] = ((closureN)self_7312763)->elements[7];
-+c_7323306.elements[9] = ((closureN)self_7312763)->elements[8];
-+c_7323306.elements[10] = ((closureN)self_7312763)->elements[9];
-+c_7323306.elements[11] = ((closureN)self_7312763)->elements[10];
-+c_7323306.elements[12] = ((closureN)self_7312763)->elements[11];
-+c_7323306.elements[13] = ((closureN)self_7312763)->elements[12];
-+c_7323306.elements[14] = ((closureN)self_7312763)->elements[13];
-+c_7323306.elements[15] = ((closureN)self_7312763)->elements[14];
-+c_7323306.elements[16] = ((closureN)self_7312763)->elements[15];
-+c_7323306.elements[17] = ((closureN)self_7312763)->elements[16];
-+c_7323306.elements[18] = ((closureN)self_7312763)->elements[17];
-+c_7323306.elements[19] = ((closureN)self_7312763)->elements[18];
-+c_7323306.elements[20] = ((closureN)self_7312763)->elements[19];
-+c_7323306.elements[21] = ((closureN)self_7312763)->elements[20];
-+c_7323306.elements[22] = ((closureN)self_7312763)->elements[21];
-+c_7323306.elements[23] = ((closureN)self_7312763)->elements[22];
-+c_7323306.elements[24] = ((closureN)self_7312763)->elements[23];
-+c_7323306.elements[25] = ((closureN)self_7312763)->elements[25];
-+
-+return_closcall2(data,  ((closureN)self_7312763)->elements[24],  &c_7323306, quote_res);; 
++closureN_type c_7323299;
++object e_7323520 [26];
++c_7323299.hdr.mark = gc_color_red;
++ c_7323299.hdr.grayed = 0;
++c_7323299.tag = closureN_tag;
++ c_7323299.fn = (function_type)__lambda_1087;
++c_7323299.num_args = 1;
++c_7323299.num_elements = 26;
++c_7323299.elements = (object *)e_7323520;
++c_7323299.elements[0] = ((closureN)self_7312756)->elements[0];
++c_7323299.elements[1] = ((closureN)self_7312756)->elements[1];
++c_7323299.elements[2] = ((closureN)self_7312756)->elements[2];
++c_7323299.elements[3] = ((closureN)self_7312756)->elements[3];
++c_7323299.elements[4] = ((closureN)self_7312756)->elements[4];
++c_7323299.elements[5] = ((closureN)self_7312756)->elements[5];
++c_7323299.elements[6] = ((closureN)self_7312756)->elements[6];
++c_7323299.elements[7] = r_736538_738107_738182_738253_738319_738384_738448_738506_738563_738619_738674_738728_738781_738833_738884_738934_738983_739031_739078_739124_739169_739213_739256_739298_739339_739379_739418_739456_739493_739529_739564_739598_739631_739659_739686_739712_739737_739761;
++c_7323299.elements[8] = ((closureN)self_7312756)->elements[7];
++c_7323299.elements[9] = ((closureN)self_7312756)->elements[8];
++c_7323299.elements[10] = ((closureN)self_7312756)->elements[9];
++c_7323299.elements[11] = ((closureN)self_7312756)->elements[10];
++c_7323299.elements[12] = ((closureN)self_7312756)->elements[11];
++c_7323299.elements[13] = ((closureN)self_7312756)->elements[12];
++c_7323299.elements[14] = ((closureN)self_7312756)->elements[13];
++c_7323299.elements[15] = ((closureN)self_7312756)->elements[14];
++c_7323299.elements[16] = ((closureN)self_7312756)->elements[15];
++c_7323299.elements[17] = ((closureN)self_7312756)->elements[16];
++c_7323299.elements[18] = ((closureN)self_7312756)->elements[17];
++c_7323299.elements[19] = ((closureN)self_7312756)->elements[18];
++c_7323299.elements[20] = ((closureN)self_7312756)->elements[19];
++c_7323299.elements[21] = ((closureN)self_7312756)->elements[20];
++c_7323299.elements[22] = ((closureN)self_7312756)->elements[21];
++c_7323299.elements[23] = ((closureN)self_7312756)->elements[22];
++c_7323299.elements[24] = ((closureN)self_7312756)->elements[23];
++c_7323299.elements[25] = ((closureN)self_7312756)->elements[25];
++
++return_closcall2(data,  ((closureN)self_7312756)->elements[24],  &c_7323299, quote_res);; 
 +}
 +
-+static void __lambda_1087(void *data, object self_7312764, int argc, object *args) /* object self_7312764, object r_736551_738115_738190_738261_738327_738392_738456_738514_738571_738627_738682_738736_738789_738841_738892_738942_738991_739039_739086_739132_739177_739221_739264_739306_739347_739387_739426_739464_739501_739537_739572_739606_739639_739667_739694_739720_739745_739769 */
++static void __lambda_1087(void *data, object self_7312757, int argc, object *args) /* object self_7312757, object r_736544_738108_738183_738254_738320_738385_738449_738507_738564_738620_738675_738729_738782_738834_738885_738935_738984_739032_739079_739125_739170_739214_739257_739299_739340_739380_739419_739457_739494_739530_739565_739599_739632_739660_739687_739713_739738_739762 */
 + {
-+ object r_736551_738115_738190_738261_738327_738392_738456_738514_738571_738627_738682_738736_738789_738841_738892_738942_738991_739039_739086_739132_739177_739221_739264_739306_739347_739387_739426_739464_739501_739537_739572_739606_739639_739667_739694_739720_739745_739769 = args[0];
++ object r_736544_738108_738183_738254_738320_738385_738449_738507_738564_738620_738675_738729_738782_738834_738885_738935_738984_739032_739079_739125_739170_739214_739257_739299_739340_739380_739419_739457_739494_739530_739565_739599_739632_739660_739687_739713_739738_739762 = args[0];
 +  
-+pair_type local_7323311; 
++pair_type local_7323304; 
++
++pair_type local_7323307; 
++
++pair_type local_7323310; 
 +
 +pair_type local_7323314; 
 +
@@ -13843,7 +13852,7 @@ Make let-values be the same as let*-values, to work around
 +
 +pair_type local_7323352; 
 +
-+pair_type local_7323356; 
++pair_type local_7323355; 
 +
 +pair_type local_7323359; 
 +
@@ -13856,109 +13865,104 @@ Make let-values be the same as let*-values, to work around
 +pair_type local_7323373; 
 +
 +pair_type local_7323376; 
-+
-+pair_type local_7323380; 
- 
--pair_type local_7325835; 
-+pair_type local_7323383; 
  
 -pair_type local_7325839; 
-+pair_type local_7323387; 
++pair_type local_7323380; 
  
 -pair_type local_7325842; 
-+pair_type local_7323390; 
++pair_type local_7323383; 
  
 -pair_type local_7325846; 
-+pair_type local_7323394; 
++pair_type local_7323387; 
  
 -pair_type local_7325849; 
-+pair_type local_7323397; 
++pair_type local_7323390; 
  
 -pair_type local_7325852; 
-+pair_type local_7323400; 
++pair_type local_7323393; 
  
 -pair_type local_7325856; 
-+pair_type local_7323404; 
++pair_type local_7323397; 
  
 -pair_type local_7325859; 
-+pair_type local_7323407; 
++pair_type local_7323400; 
  
 -pair_type local_7325862; 
-+pair_type local_7323410; 
++pair_type local_7323403; 
  
  
  
  
  
 -pair_type local_7325870; 
-+pair_type local_7323418; 
++pair_type local_7323411; 
  
 -pair_type local_7325874; 
-+pair_type local_7323422; 
++pair_type local_7323415; 
  
 -pair_type local_7325877; 
-+pair_type local_7323425; 
++pair_type local_7323418; 
  
 -pair_type local_7325881; 
-+pair_type local_7323429; 
++pair_type local_7323422; 
  
 -pair_type local_7325884; 
-+pair_type local_7323432; 
++pair_type local_7323425; 
  
 -pair_type local_7325888; 
-+pair_type local_7323436; 
++pair_type local_7323429; 
  
 -pair_type local_7325891; 
-+pair_type local_7323439; 
++pair_type local_7323432; 
  
 -pair_type local_7325895; 
-+pair_type local_7323443; 
++pair_type local_7323436; 
  
 -pair_type local_7325898; 
-+pair_type local_7323446; 
++pair_type local_7323439; 
  
 -pair_type local_7325901; 
-+pair_type local_7323449; 
++pair_type local_7323442; 
  
 -pair_type local_7325905; 
-+pair_type local_7323453; 
++pair_type local_7323446; 
  
  
  
  
  
 -pair_type local_7325914; 
-+pair_type local_7323462; 
++pair_type local_7323455; 
  
 -pair_type local_7325917; 
-+pair_type local_7323465; 
++pair_type local_7323458; 
  
 -pair_type local_7325921; 
-+pair_type local_7323469; 
++pair_type local_7323462; 
  
 -pair_type local_7325924; 
-+pair_type local_7323472; 
++pair_type local_7323465; 
  
 -pair_type local_7325927; 
-+pair_type local_7323475; 
++pair_type local_7323468; 
  
 -pair_type local_7325931; 
-+pair_type local_7323479; 
++pair_type local_7323472; 
  
 -pair_type local_7325934; 
-+pair_type local_7323482; 
++pair_type local_7323475; 
  
 -pair_type local_7325937; 
-+pair_type local_7323485; 
++pair_type local_7323478; 
  
 -pair_type local_7325941; 
-+pair_type local_7323489; 
++pair_type local_7323482; 
  
 -pair_type local_7325944; 
-+pair_type local_7323492; 
++pair_type local_7323485; 
  
 -pair_type local_7325948; 
-+pair_type local_7323496; 
++pair_type local_7323489; 
  
  
  
@@ -13967,33 +13971,32 @@ Make let-values be the same as let*-values, to work around
  
  
 -pair_type local_7325961; 
-+pair_type local_7323509; 
++pair_type local_7323502; 
  
 -pair_type local_7325964; 
-+pair_type local_7323512; 
++pair_type local_7323505; 
  
 -pair_type local_7325968; 
-+pair_type local_7323516; 
++pair_type local_7323509; 
  
 -pair_type local_7325971; 
-+pair_type local_7323519; 
++pair_type local_7323512; 
  
 -pair_type local_7325975; 
-+pair_type local_7323523; 
++pair_type local_7323516; 
  
 -pair_type local_7325978; 
 -return_direct_with_clo1(data,  ((closureN)self_7314057)->elements[0], (((closure)  ((closureN)self_7314057)->elements[0])->fn),  set_pair_as_expr(&local_7325763, set_pair_as_expr(&local_7325766, set_pair_as_expr(&local_7325769, ((closureN)self_7314057)->elements[1], set_pair_as_expr(&local_7325773, set_pair_as_expr(&local_7325776, ((closureN)self_7314057)->elements[2], set_pair_as_expr(&local_7325780, set_pair_as_expr(&local_7325783, ((closureN)self_7314057)->elements[24], NULL), set_pair_as_expr(&local_7325787, set_pair_as_expr(&local_7325790, ((closureN)self_7314057)->elements[3], set_pair_as_expr(&local_7325794, set_pair_as_expr(&local_7325797, ((closureN)self_7314057)->elements[10], set_pair_as_expr(&local_7325801, set_pair_as_expr(&local_7325804, ((closureN)self_7314057)->elements[23], NULL), set_pair_as_expr(&local_7325808, set_pair_as_expr(&local_7325811, set_pair_as_expr(&local_7325814, ((closureN)self_7314057)->elements[11], set_pair_as_expr(&local_7325818, set_pai
r_as_expr(&local_7325821, ((closureN)self_7314057)->elements[12], set_pair_as_expr(&local_7325825, set_pair_as_expr(&local_7325828, ((closureN)self_7314057)->elements[22], NULL), set_pair_as_expr(&local_7325832, set_pair_as_expr(&local_7325835, ((closureN)self_7314057)->elements[13], set_pair_as_expr(&local_7325839, set_pair_as_expr(&local_7325842, ((closureN)self_7314057)->elements[14], set_pair_as_expr(&local_7325846, NULL, set_pair_as_expr(&local_7325849, set_pair_as_expr(&local_7325852, ((closureN)self_7314057)->elements[15], set_pair_as_expr(&local_7325856, set_pair_as_expr(&local_7325859, set_pair_as_expr(&local_7325862, Cyc_car(data, Cyc_car(data, ((closureN)self_7314057)->elements[25])), set_pair_as_expr(&local_7325870, ((closureN)self_7314057)->elements[21], NULL)), NULL), set_pair_as_expr(&local_7325874, set_pair_as_expr(&local_7325877, ((closureN)self_7314057)->elements[16], set_pair_as_expr(&local_7325881, set_pair_as_expr(&local_7325884, ((closureN)self_7314057)->element
 s[17], set_pair_as_expr(&local_7325888, set_pair_as_expr(&local_7325891, ((closureN)self_7314057)->elements[18], set_pair_as_expr(&local_7325895, NULL, set_pair_as_expr(&local_7325898, set_pair_as_expr(&local_7325901, ((closureN)self_7314057)->elements[19], set_pair_as_expr(&local_7325905, ((closureN)self_7314057)->elements[20], NULL)), NULL))), NULL)), Cyc_cdr(data, Cyc_car(data, ((closureN)self_7314057)->elements[25])))), NULL))), NULL))), NULL)), NULL))), NULL)), NULL), NULL))), set_pair_as_expr(&local_7325914, set_pair_as_expr(&local_7325917, ((closureN)self_7314057)->elements[4], set_pair_as_expr(&local_7325921, NULL, set_pair_as_expr(&local_7325924, set_pair_as_expr(&local_7325927, ((closureN)self_7314057)->elements[5], set_pair_as_expr(&local_7325931, set_pair_as_expr(&local_7325934, set_pair_as_expr(&local_7325937, ((closureN)self_7314057)->elements[8], set_pair_as_expr(&local_7325941, set_pair_as_expr(&local_7325944, ((closureN)self_7314057)->elements[9], set_pair_as_expr(&
 local_7325948, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7314057)->elements[25])), Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7314057)->elements[25])))), NULL)), NULL), set_pair_as_expr(&local_7325961, set_pair_as_expr(&local_7325964, ((closureN)self_7314057)->elements[6], set_pair_as_expr(&local_7325968, set_pair_as_expr(&local_7325971, ((closureN)self_7314057)->elements[7], set_pair_as_expr(&local_7325975, NULL, set_pair_as_expr(&local_7325978, r_737319_739361_739436_739507_739573_739638_739702_739760_739817_739873_739928_739982_7310035_7310087_7310138_7310188_7310237_7310285_7310332_7310378_7310423_7310467_7310510_7310552_7310593_7310633_7310672_7310710_7310747_7310783_7310818_7310852_7310885_7310913_7310940_7310966_7310991_7311015, NULL))), NULL)), NULL))), NULL))), NULL))), NULL))), NULL)), NULL), boolean_f));; 
-+pair_type local_7323526; 
-+return_direct_with_clo1(data,  ((closureN)self_7312764)->elements[0], (((closure)  ((closureN)self_7312764)->elements[0])->fn),  set_pair_as_expr(&local_7323311, set_pair_as_expr(&local_7323314, set_pair_as_expr(&local_7323317, ((closureN)self_7312764)->elements[1], set_pair_as_expr(&local_7323321, set_pair_as_expr(&local_7323324, ((closureN)self_7312764)->elements[2], set_pair_as_expr(&local_7323328, set_pair_as_expr(&local_7323331, ((closureN)self_7312764)->elements[24], NULL), set_pair_as_expr(&local_7323335, set_pair_as_expr(&local_7323338, ((closureN)self_7312764)->elements[3], set_pair_as_expr(&local_7323342, set_pair_as_expr(&local_7323345, ((closureN)self_7312764)->elements[10], set_pair_as_expr(&local_7323349, set_pair_as_expr(&local_7323352, ((closureN)self_7312764)->elements[23], NULL), set_pair_as_expr(&local_7323356, set_pair_as_expr(&local_7323359, set_pair_as_expr(&local_7323362, ((closureN)self_7312764)->elements[11], set_pair_as_expr(&local_7323366, set_pai
r_as_expr(&local_7323369, ((closureN)self_7312764)->elements[12], set_pair_as_expr(&local_7323373, set_pair_as_expr(&local_7323376, ((closureN)self_7312764)->elements[22], NULL), set_pair_as_expr(&local_7323380, set_pair_as_expr(&local_7323383, ((closureN)self_7312764)->elements[13], set_pair_as_expr(&local_7323387, set_pair_as_expr(&local_7323390, ((closureN)self_7312764)->elements[14], set_pair_as_expr(&local_7323394, NULL, set_pair_as_expr(&local_7323397, set_pair_as_expr(&local_7323400, ((closureN)self_7312764)->elements[15], set_pair_as_expr(&local_7323404, set_pair_as_expr(&local_7323407, set_pair_as_expr(&local_7323410, Cyc_car(data, Cyc_car(data, ((closureN)self_7312764)->elements[25])), set_pair_as_expr(&local_7323418, ((closureN)self_7312764)->elements[21], NULL)), NULL), set_pair_as_expr(&local_7323422, set_pair_as_expr(&local_7323425, ((closureN)self_7312764)->elements[16], set_pair_as_expr(&local_7323429, set_pair_as_expr(&local_7323432, ((closureN)self_7312764)->element
 s[17], set_pair_as_expr(&local_7323436, set_pair_as_expr(&local_7323439, ((closureN)self_7312764)->elements[18], set_pair_as_expr(&local_7323443, NULL, set_pair_as_expr(&local_7323446, set_pair_as_expr(&local_7323449, ((closureN)self_7312764)->elements[19], set_pair_as_expr(&local_7323453, ((closureN)self_7312764)->elements[20], NULL)), NULL))), NULL)), Cyc_cdr(data, Cyc_car(data, ((closureN)self_7312764)->elements[25])))), NULL))), NULL))), NULL)), NULL))), NULL)), NULL), NULL))), set_pair_as_expr(&local_7323462, set_pair_as_expr(&local_7323465, ((closureN)self_7312764)->elements[4], set_pair_as_expr(&local_7323469, NULL, set_pair_as_expr(&local_7323472, set_pair_as_expr(&local_7323475, ((closureN)self_7312764)->elements[5], set_pair_as_expr(&local_7323479, set_pair_as_expr(&local_7323482, set_pair_as_expr(&local_7323485, ((closureN)self_7312764)->elements[8], set_pair_as_expr(&local_7323489, set_pair_as_expr(&local_7323492, ((closureN)self_7312764)->elements[9], set_pair_as_expr(&
 local_7323496, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312764)->elements[25])), Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312764)->elements[25])))), NULL)), NULL), set_pair_as_expr(&local_7323509, set_pair_as_expr(&local_7323512, ((closureN)self_7312764)->elements[6], set_pair_as_expr(&local_7323516, set_pair_as_expr(&local_7323519, ((closureN)self_7312764)->elements[7], set_pair_as_expr(&local_7323523, NULL, set_pair_as_expr(&local_7323526, r_736551_738115_738190_738261_738327_738392_738456_738514_738571_738627_738682_738736_738789_738841_738892_738942_738991_739039_739086_739132_739177_739221_739264_739306_739347_739387_739426_739464_739501_739537_739572_739606_739639_739667_739694_739720_739745_739769, NULL))), NULL)), NULL))), NULL))), NULL))), NULL))), NULL)), NULL), boolean_f));; 
++pair_type local_7323519; 
++return_direct_with_clo1(data,  ((closureN)self_7312757)->elements[0], (((closure)  ((closureN)self_7312757)->elements[0])->fn),  set_pair_as_expr(&local_7323304, set_pair_as_expr(&local_7323307, set_pair_as_expr(&local_7323310, ((closureN)self_7312757)->elements[1], set_pair_as_expr(&local_7323314, set_pair_as_expr(&local_7323317, ((closureN)self_7312757)->elements[2], set_pair_as_expr(&local_7323321, set_pair_as_expr(&local_7323324, ((closureN)self_7312757)->elements[24], NULL), set_pair_as_expr(&local_7323328, set_pair_as_expr(&local_7323331, ((closureN)self_7312757)->elements[3], set_pair_as_expr(&local_7323335, set_pair_as_expr(&local_7323338, ((closureN)self_7312757)->elements[10], set_pair_as_expr(&local_7323342, set_pair_as_expr(&local_7323345, ((closureN)self_7312757)->elements[23], NULL), set_pair_as_expr(&local_7323349, set_pair_as_expr(&local_7323352, set_pair_as_expr(&local_7323355, ((closureN)self_7312757)->elements[11], set_pair_as_expr(&local_7323359, set_pai
r_as_expr(&local_7323362, ((closureN)self_7312757)->elements[12], set_pair_as_expr(&local_7323366, set_pair_as_expr(&local_7323369, ((closureN)self_7312757)->elements[22], NULL), set_pair_as_expr(&local_7323373, set_pair_as_expr(&local_7323376, ((closureN)self_7312757)->elements[13], set_pair_as_expr(&local_7323380, set_pair_as_expr(&local_7323383, ((closureN)self_7312757)->elements[14], set_pair_as_expr(&local_7323387, NULL, set_pair_as_expr(&local_7323390, set_pair_as_expr(&local_7323393, ((closureN)self_7312757)->elements[15], set_pair_as_expr(&local_7323397, set_pair_as_expr(&local_7323400, set_pair_as_expr(&local_7323403, Cyc_car(data, Cyc_car(data, ((closureN)self_7312757)->elements[25])), set_pair_as_expr(&local_7323411, ((closureN)self_7312757)->elements[21], NULL)), NULL), set_pair_as_expr(&local_7323415, set_pair_as_expr(&local_7323418, ((closureN)self_7312757)->elements[16], set_pair_as_expr(&local_7323422, set_pair_as_expr(&local_7323425, ((closureN)self_7312757)->element
 s[17], set_pair_as_expr(&local_7323429, set_pair_as_expr(&local_7323432, ((closureN)self_7312757)->elements[18], set_pair_as_expr(&local_7323436, NULL, set_pair_as_expr(&local_7323439, set_pair_as_expr(&local_7323442, ((closureN)self_7312757)->elements[19], set_pair_as_expr(&local_7323446, ((closureN)self_7312757)->elements[20], NULL)), NULL))), NULL)), Cyc_cdr(data, Cyc_car(data, ((closureN)self_7312757)->elements[25])))), NULL))), NULL))), NULL)), NULL))), NULL)), NULL), NULL))), set_pair_as_expr(&local_7323455, set_pair_as_expr(&local_7323458, ((closureN)self_7312757)->elements[4], set_pair_as_expr(&local_7323462, NULL, set_pair_as_expr(&local_7323465, set_pair_as_expr(&local_7323468, ((closureN)self_7312757)->elements[5], set_pair_as_expr(&local_7323472, set_pair_as_expr(&local_7323475, set_pair_as_expr(&local_7323478, ((closureN)self_7312757)->elements[8], set_pair_as_expr(&local_7323482, set_pair_as_expr(&local_7323485, ((closureN)self_7312757)->elements[9], set_pair_as_expr(&
 local_7323489, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312757)->elements[25])), Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312757)->elements[25])))), NULL)), NULL), set_pair_as_expr(&local_7323502, set_pair_as_expr(&local_7323505, ((closureN)self_7312757)->elements[6], set_pair_as_expr(&local_7323509, set_pair_as_expr(&local_7323512, ((closureN)self_7312757)->elements[7], set_pair_as_expr(&local_7323516, NULL, set_pair_as_expr(&local_7323519, r_736544_738108_738183_738254_738320_738385_738449_738507_738564_738620_738675_738729_738782_738834_738885_738935_738984_739032_739079_739125_739170_739214_739257_739299_739340_739380_739419_739457_739494_739530_739565_739599_739632_739660_739687_739713_739738_739762, NULL))), NULL)), NULL))), NULL))), NULL))), NULL))), NULL)), NULL), boolean_f));; 
  }
  
 -static void __lambda_1052(void *data, object _, int argc, object *args) /* closure _,object k_736895, object expr_731708_731792_731982_733715, object rename_731709_731793_731983_733716, object compare_731710_731794_731984_733717 */
-+static void __lambda_1052(void *data, object _, int argc, object *args) /* closure _,object k_736450, object expr_731711_731725_731744_733375, object rename_731712_731726_731745_733376, object compare_731713_731727_731746_733377 */
++static void __lambda_1052(void *data, object _, int argc, object *args) /* closure _,object k_736443, object expr_731708_731721_731740_733368, object rename_731709_731722_731741_733369, object compare_731710_731723_731742_733370 */
   {
 -object k_736895 = args[0]; object expr_731708_731792_731982_733715 = args[1]; object rename_731709_731793_731983_733716 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:let-values");
-+object k_736450 = args[0]; object expr_731711_731725_731744_733375 = args[1]; object rename_731712_731726_731745_733376 = args[2];
-+  Cyc_st_add(data, "base.sld:let-values");
++object k_736443 = args[0]; object expr_731708_731721_731740_733368 = args[1]; object rename_731709_731722_731741_733369 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:let-values");
  
 -closureN_type c_7324403;
 -object e_7325647 [3];
@@ -14007,30 +14010,95 @@ Make let-values be the same as let*-values, to work around
 -c_7324403.elements[0] = expr_731708_731792_731982_733715;
 -c_7324403.elements[1] = k_736895;
 -c_7324403.elements[2] = rename_731709_731793_731983_733716;
-+closureN_type c_7323110;
-+object e_7323195 [3];
-+c_7323110.hdr.mark = gc_color_red;
-+ c_7323110.hdr.grayed = 0;
-+c_7323110.tag = closureN_tag;
-+ c_7323110.fn = (function_type)__lambda_1053;
-+c_7323110.num_args = 1;
-+c_7323110.num_elements = 3;
-+c_7323110.elements = (object *)e_7323195;
-+c_7323110.elements[0] = expr_731711_731725_731744_733375;
-+c_7323110.elements[1] = k_736450;
-+c_7323110.elements[2] = rename_731712_731726_731745_733376;
- 
- 
+-
++closureN_type c_7323103;
++object e_7323188 [3];
++c_7323103.hdr.mark = gc_color_red;
++ c_7323103.hdr.grayed = 0;
++c_7323103.tag = closureN_tag;
++ c_7323103.fn = (function_type)__lambda_1053;
++c_7323103.num_args = 1;
++c_7323103.num_elements = 3;
++c_7323103.elements = (object *)e_7323188;
++c_7323103.elements[0] = expr_731708_731721_731740_733368;
++c_7323103.elements[1] = k_736443;
++c_7323103.elements[2] = rename_731709_731722_731741_733369;
++
++
++
++return_direct_with_clo1(data,(closure)&c_7323103,__lambda_1053,  Cyc_cdr(data, expr_731708_731721_731740_733368));; 
++}
++
++static void __lambda_1053(void *data, object self_7312720, int argc, object *args) /* object self_7312720, object v_931_731716_731728_731744_733372 */
++ {
++ object v_931_731716_731728_731744_733372 = args[0];
++  
++closureN_type c_7323105;
++object e_7323163 [2];
++c_7323105.hdr.mark = gc_color_red;
++ c_7323105.hdr.grayed = 0;
++c_7323105.tag = closureN_tag;
++ c_7323105.fn = (function_type)__lambda_1054;
++c_7323105.num_args = 0;
++c_7323105.num_elements = 2;
++c_7323105.elements = (object *)e_7323163;
++c_7323105.elements[0] = ((closureN)self_7312720)->elements[2];
++c_7323105.elements[1] = v_931_731716_731728_731744_733372;
++
++
++closureN_type c_7323164;
++object e_7323187 [2];
++c_7323164.hdr.mark = gc_color_red;
++ c_7323164.hdr.grayed = 0;
++c_7323164.tag = closureN_tag;
++ c_7323164.fn = (function_type)__lambda_1056;
++c_7323164.num_args = 1;
++c_7323164.num_elements = 2;
++c_7323164.elements = (object *)e_7323187;
++c_7323164.elements[0] = ((closureN)self_7312720)->elements[0];
++c_7323164.elements[1] = ((closureN)self_7312720)->elements[1];
++
++return_direct_with_clo1(data,(closure)&c_7323105,__lambda_1054,  &c_7323164);; 
++}
++
++static void __lambda_1056(void *data, object self_7312721, int argc, object *args) /* object self_7312721, object tmp_731725_731727_731743_733371 */
++ {
++ object tmp_731725_731727_731743_733371 = args[0];
++  
++closureN_type c_7323166;
++object e_7323180 [2];
++c_7323166.hdr.mark = gc_color_red;
++ c_7323166.hdr.grayed = 0;
++c_7323166.tag = closureN_tag;
++ c_7323166.fn = (function_type)__lambda_1057;
++c_7323166.num_args = 0;
++c_7323166.num_elements = 2;
++c_7323166.elements = (object *)e_7323180;
++c_7323166.elements[0] = ((closureN)self_7312721)->elements[0];
++c_7323166.elements[1] = tmp_731725_731727_731743_733371;
++
++
++closureN_type c_7323181;
++object e_7323186 [1];
++c_7323181.hdr.mark = gc_color_red;
++ c_7323181.hdr.grayed = 0;
++c_7323181.tag = closureN_tag;
++ c_7323181.fn = (function_type)__lambda_1059;
++c_7323181.num_args = 1;
++c_7323181.num_elements = 1;
++c_7323181.elements = (object *)e_7323186;
++c_7323181.elements[0] = ((closureN)self_7312721)->elements[1];
  
+-
 -return_direct_with_clo1(data,(closure)&c_7324403,__lambda_1053,  Cyc_cdr(data, expr_731708_731792_731982_733715));; 
-+return_direct_with_clo1(data,(closure)&c_7323110,__lambda_1053,  Cyc_cdr(data, expr_731711_731725_731744_733375));; 
++return_direct_with_clo1(data,(closure)&c_7323166,__lambda_1057,  &c_7323181);; 
  }
  
 -static void __lambda_1053(void *data, object self_7313973, int argc, object *args) /* object self_7313973, object v_931_731716_731970_732091_733824 */
-+static void __lambda_1053(void *data, object self_7312727, int argc, object *args) /* object self_7312727, object v_931_731720_731732_731748_733379 */
++static void __lambda_1059(void *data, object self_7312722, int argc, object *args) /* object self_7312722, object r_736444 */
   {
 - object v_931_731716_731970_732091_733824 = args[0];
-+ object v_931_731720_731732_731748_733379 = args[0];
++ object r_736444 = args[0];
    
 -closureN_type c_7324405;
 -object e_7324487 [2];
@@ -14043,19 +14111,8 @@ Make let-values be the same as let*-values, to work around
 -c_7324405.elements = (object *)e_7324487;
 -c_7324405.elements[0] = ((closureN)self_7313973)->elements[2];
 -c_7324405.elements[1] = v_931_731716_731970_732091_733824;
-+closureN_type c_7323112;
-+object e_7323170 [2];
-+c_7323112.hdr.mark = gc_color_red;
-+ c_7323112.hdr.grayed = 0;
-+c_7323112.tag = closureN_tag;
-+ c_7323112.fn = (function_type)__lambda_1054;
-+c_7323112.num_args = 0;
-+c_7323112.num_elements = 2;
-+c_7323112.elements = (object *)e_7323170;
-+c_7323112.elements[0] = ((closureN)self_7312727)->elements[2];
-+c_7323112.elements[1] = v_931_731720_731732_731748_733379;
- 
  
+-
 -closureN_type c_7324488;
 -object e_7325646 [3];
 -c_7324488.hdr.mark = gc_color_red;
@@ -14068,27 +14125,19 @@ Make let-values be the same as let*-values, to work around
 -c_7324488.elements[0] = ((closureN)self_7313973)->elements[0];
 -c_7324488.elements[1] = ((closureN)self_7313973)->elements[1];
 -c_7324488.elements[2] = ((closureN)self_7313973)->elements[2];
-+closureN_type c_7323171;
-+object e_7323194 [2];
-+c_7323171.hdr.mark = gc_color_red;
-+ c_7323171.hdr.grayed = 0;
-+c_7323171.tag = closureN_tag;
-+ c_7323171.fn = (function_type)__lambda_1056;
-+c_7323171.num_args = 1;
-+c_7323171.num_elements = 2;
-+c_7323171.elements = (object *)e_7323194;
-+c_7323171.elements[0] = ((closureN)self_7312727)->elements[0];
-+c_7323171.elements[1] = ((closureN)self_7312727)->elements[1];
- 
+-
 -return_direct_with_clo1(data,(closure)&c_7324405,__lambda_1054,  &c_7324488);; 
-+return_direct_with_clo1(data,(closure)&c_7323112,__lambda_1054,  &c_7323171);; 
++return_direct_with_clo1(data,  ((closureN)self_7312722)->elements[0], (((closure)  ((closureN)self_7312722)->elements[0])->fn),  Cyc_car(data, r_736444));; 
  }
  
 -static void __lambda_1057(void *data, object self_7313974, int argc, object *args) /* object self_7313974, object tmp_731796_731798_731985_733718 */
-+static void __lambda_1056(void *data, object self_7312728, int argc, object *args) /* object self_7312728, object tmp_731729_731731_731747_733378 */
++static void __lambda_1057(void *data, object self_7312723, int argc, object *args) /* object self_7312723, object k_736446 */
   {
 - object tmp_731796_731798_731985_733718 = args[0];
-+ object tmp_731729_731731_731747_733378 = args[0];
++ object k_736446 = args[0];
++  if( (boolean_f != ((closureN)self_7312723)->elements[1]) ){ 
++  return_direct_with_clo1(data,  k_736446, (((closure)  k_736446)->fn),  ((closureN)self_7312723)->elements[1]);
++} else { 
    
 -closureN_type c_7324490;
 -object e_7325639 [3];
@@ -14103,7 +14152,17 @@ Make let-values be the same as let*-values, to work around
 -c_7324490.elements[1] = ((closureN)self_7313974)->elements[2];
 -c_7324490.elements[2] = tmp_731796_731798_731985_733718;
 -
--
++closureN_type c_7323171;
++object e_7323177 [1];
++c_7323171.hdr.mark = gc_color_red;
++ c_7323171.hdr.grayed = 0;
++c_7323171.tag = closureN_tag;
++ c_7323171.fn = (function_type)__lambda_1058;
++c_7323171.num_args = 1;
++c_7323171.num_elements = 1;
++c_7323171.elements = (object *)e_7323177;
++c_7323171.elements[0] = k_736446;
+ 
 -closureN_type c_7325640;
 -object e_7325645 [1];
 -c_7325640.hdr.mark = gc_color_red;
@@ -14114,55 +14173,36 @@ Make let-values be the same as let*-values, to work around
 -c_7325640.num_elements = 1;
 -c_7325640.elements = (object *)e_7325645;
 -c_7325640.elements[0] = ((closureN)self_7313974)->elements[1];
-+closureN_type c_7323173;
-+object e_7323187 [2];
-+c_7323173.hdr.mark = gc_color_red;
-+ c_7323173.hdr.grayed = 0;
-+c_7323173.tag = closureN_tag;
-+ c_7323173.fn = (function_type)__lambda_1057;
-+c_7323173.num_args = 0;
-+c_7323173.num_elements = 2;
-+c_7323173.elements = (object *)e_7323187;
-+c_7323173.elements[0] = ((closureN)self_7312728)->elements[0];
-+c_7323173.elements[1] = tmp_731729_731731_731747_733378;
-+
-+
-+closureN_type c_7323188;
-+object e_7323193 [1];
-+c_7323188.hdr.mark = gc_color_red;
-+ c_7323188.hdr.grayed = 0;
-+c_7323188.tag = closureN_tag;
-+ c_7323188.fn = (function_type)__lambda_1059;
-+c_7323188.num_args = 1;
-+c_7323188.num_elements = 1;
-+c_7323188.elements = (object *)e_7323193;
-+c_7323188.elements[0] = ((closureN)self_7312728)->elements[1];
  
 -return_direct_with_clo1(data,(closure)&c_7324490,__lambda_1058,  &c_7325640);; 
-+return_direct_with_clo1(data,(closure)&c_7323173,__lambda_1057,  &c_7323188);; 
++make_utf8_string_with_len(c_7323178, "no expansion for", 16, 16);
++return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_7323171, &c_7323178, ((closureN)self_7312723)->elements[0]);}
++;; 
  }
  
 -static void __lambda_1106(void *data, object self_7313975, int argc, object *args) /* object self_7313975, object r_736896 */
-+static void __lambda_1059(void *data, object self_7312729, int argc, object *args) /* object self_7312729, object r_736451 */
++static void __lambda_1058(void *data, object self_7312724, int argc, object *args) /* object self_7312724, object r_736447 */
   {
 - object r_736896 = args[0];
-+ object r_736451 = args[0];
++ object r_736447 = args[0];
    
- 
+-
 -return_direct_with_clo1(data,  ((closureN)self_7313975)->elements[0], (((closure)  ((closureN)self_7313975)->elements[0])->fn),  Cyc_car(data, r_736896));; 
-+return_direct_with_clo1(data,  ((closureN)self_7312729)->elements[0], (((closure)  ((closureN)self_7312729)->elements[0])->fn),  Cyc_car(data, r_736451));; 
++pair_type local_7323176; 
++return_direct_with_clo1(data,  ((closureN)self_7312724)->elements[0], (((closure)  ((closureN)self_7312724)->elements[0])->fn),  set_pair_as_expr(&local_7323176, r_736447, boolean_f));; 
  }
  
 -static void __lambda_1058(void *data, object self_7313976, int argc, object *args) /* object self_7313976, object k_736898 */
-+static void __lambda_1057(void *data, object self_7312730, int argc, object *args) /* object self_7312730, object k_736453 */
++static void __lambda_1054(void *data, object self_7312725, int argc, object *args) /* object self_7312725, object k_736449 */
   {
 - object k_736898 = args[0];
 -  if( (boolean_f != ((closureN)self_7313976)->elements[2]) ){ 
 -  return_direct_with_clo1(data,  k_736898, (((closure)  k_736898)->fn),  ((closureN)self_7313976)->elements[2]);
-+ object k_736453 = args[0];
-+  if( (boolean_f != ((closureN)self_7312730)->elements[1]) ){ 
-+  return_direct_with_clo1(data,  k_736453, (((closure)  k_736453)->fn),  ((closureN)self_7312730)->elements[1]);
- } else { 
+-} else { 
++ object k_736449 = args[0];
++    
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312725)->elements[1])) ){ 
++    complex_num_type local_7323111; 
    
 -closureN_type c_7324495;
 -object e_7325635 [3];
@@ -14176,30 +14216,52 @@ Make let-values be the same as let*-values, to work around
 -c_7324495.elements[0] = ((closureN)self_7313976)->elements[0];
 -c_7324495.elements[1] = k_736898;
 -c_7324495.elements[2] = ((closureN)self_7313976)->elements[1];
-+closureN_type c_7323178;
-+object e_7323184 [1];
-+c_7323178.hdr.mark = gc_color_red;
-+ c_7323178.hdr.grayed = 0;
-+c_7323178.tag = closureN_tag;
-+ c_7323178.fn = (function_type)__lambda_1058;
-+c_7323178.num_args = 1;
-+c_7323178.num_elements = 1;
-+c_7323178.elements = (object *)e_7323184;
-+c_7323178.elements[0] = k_736453;
- 
- 
 -
+-
++if( (boolean_f != ((inline_function_type)
++                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7323111, Cyc_car(data, ((closureN)self_7312725)->elements[1]))) ){ 
++    
++  
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312725)->elements[1]))) ){ 
++    complex_num_type local_7323122; 
++  
++  
++if( (boolean_f != ((inline_function_type)
++                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7323122, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312725)->elements[1])))) ){ 
++  
++closureN_type c_7323130;
++object e_7323158 [2];
++c_7323130.hdr.mark = gc_color_red;
++ c_7323130.hdr.grayed = 0;
++c_7323130.tag = closureN_tag;
++ c_7323130.fn = (function_type)__lambda_1055;
++c_7323130.num_args = 1;
++c_7323130.num_elements = 2;
++c_7323130.elements = (object *)e_7323158;
++c_7323130.elements[0] = k_736449;
++c_7323130.elements[1] = ((closureN)self_7312725)->elements[1];
+ 
 -return_direct_with_clo1(data,(closure)&c_7324495,__lambda_1059,  Cyc_cdr(data, ((closureN)self_7313976)->elements[0]));}
-+make_utf8_string_with_len(c_7323185, "no expansion for", 16, 16);
-+return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_7323178, &c_7323185, ((closureN)self_7312730)->elements[0]);}
++return_closcall2(data,  ((closureN)self_7312725)->elements[0],  &c_7323130, quote_let_85_91values);
++} else { 
++  return_direct_with_clo1(data,  k_736449, (((closure)  k_736449)->fn),  boolean_f);}
++;
++} else { 
++  return_direct_with_clo1(data,  k_736449, (((closure)  k_736449)->fn),  boolean_f);}
++;
++} else { 
++  return_direct_with_clo1(data,  k_736449, (((closure)  k_736449)->fn),  boolean_f);}
++;
++} else { 
++  return_direct_with_clo1(data,  k_736449, (((closure)  k_736449)->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_1059(void *data, object self_7313977, int argc, object *args) /* object self_7313977, object v_936_731721_731952_732080_733813 */
-+static void __lambda_1058(void *data, object self_7312731, int argc, object *args) /* object self_7312731, object r_736454 */
++static void __lambda_1055(void *data, object self_7312726, int argc, object *args) /* object self_7312726, object r_736459 */
   {
 - object v_936_731721_731952_732080_733813 = args[0];
-+ object r_736454 = args[0];
++ object r_736459 = args[0];
    
 -closureN_type c_7324497;
 -object e_7324587 [2];
@@ -14212,10 +14274,9 @@ Make let-values be the same as let*-values, to work around
 -c_7324497.elements = (object *)e_7324587;
 -c_7324497.elements[0] = ((closureN)self_7313977)->elements[2];
 -c_7324497.elements[1] = v_936_731721_731952_732080_733813;
--
-+pair_type local_7323183; 
-+return_direct_with_clo1(data,  ((closureN)self_7312731)->elements[0], (((closure)  ((closureN)self_7312731)->elements[0])->fn),  set_pair_as_expr(&local_7323183, r_736454, boolean_f));; 
-+}
++pair_type local_7323135; 
+ 
++pair_type local_7323138; 
  
 -closureN_type c_7324588;
 -object e_7325634 [3];
@@ -14229,61 +14290,18 @@ Make let-values be the same as let*-values, to work around
 -c_7324588.elements[0] = ((closureN)self_7313977)->elements[0];
 -c_7324588.elements[1] = ((closureN)self_7313977)->elements[1];
 -c_7324588.elements[2] = ((closureN)self_7313977)->elements[2];
-+static void __lambda_1054(void *data, object self_7312732, int argc, object *args) /* object self_7312732, object k_736456 */
-+ {
-+ object k_736456 = args[0];
-+    
-+if( (boolean_f != Cyc_is_pair(((closureN)self_7312732)->elements[1])) ){ 
-+    complex_num_type local_7323118; 
-+  
-+if( (boolean_f != ((inline_function_type)
-+                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7323118, Cyc_car(data, ((closureN)self_7312732)->elements[1]))) ){ 
-+    
-+  
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312732)->elements[1]))) ){ 
-+    complex_num_type local_7323129; 
-+  
-+  
-+if( (boolean_f != ((inline_function_type)
-+                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7323129, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312732)->elements[1])))) ){ 
-+  
-+closureN_type c_7323137;
-+object e_7323165 [2];
-+c_7323137.hdr.mark = gc_color_red;
-+ c_7323137.hdr.grayed = 0;
-+c_7323137.tag = closureN_tag;
-+ c_7323137.fn = (function_type)__lambda_1055;
-+c_7323137.num_args = 1;
-+c_7323137.num_elements = 2;
-+c_7323137.elements = (object *)e_7323165;
-+c_7323137.elements[0] = k_736456;
-+c_7323137.elements[1] = ((closureN)self_7312732)->elements[1];
++pair_type local_7323141; 
  
 -return_direct_with_clo1(data,(closure)&c_7324497,__lambda_1060,  &c_7324588);; 
-+return_closcall2(data,  ((closureN)self_7312732)->elements[0],  &c_7323137, quote_let_85_91values);
-+} else { 
-+  return_direct_with_clo1(data,  k_736456, (((closure)  k_736456)->fn),  boolean_f);}
-+;
-+} else { 
-+  return_direct_with_clo1(data,  k_736456, (((closure)  k_736456)->fn),  boolean_f);}
-+;
-+} else { 
-+  return_direct_with_clo1(data,  k_736456, (((closure)  k_736456)->fn),  boolean_f);}
-+;
-+} else { 
-+  return_direct_with_clo1(data,  k_736456, (((closure)  k_736456)->fn),  boolean_f);}
-+;; 
- }
+-}
  
 -static void __lambda_1062(void *data, object self_7313978, int argc, object *args) /* object self_7313978, object tmp_731800_731802_731986_733719 */
-+static void __lambda_1055(void *data, object self_7312733, int argc, object *args) /* object self_7312733, object r_736466 */
-  {
+- {
 - object tmp_731800_731802_731986_733719 = args[0];
 -  if( (boolean_f != tmp_731800_731802_731986_733719) ){ 
 -  return_direct_with_clo1(data,  ((closureN)self_7313978)->elements[1], (((closure)  ((closureN)self_7313978)->elements[1])->fn),  tmp_731800_731802_731986_733719);
 -} else { 
-+ object r_736466 = args[0];
-   
+-  
 -closureN_type c_7324592;
 -object e_7325630 [3];
 -c_7324592.hdr.mark = gc_color_red;
@@ -14296,31 +14314,18 @@ Make let-values be the same as let*-values, to work around
 -c_7324592.elements[0] = ((closureN)self_7313978)->elements[0];
 -c_7324592.elements[1] = ((closureN)self_7313978)->elements[1];
 -c_7324592.elements[2] = ((closureN)self_7313978)->elements[2];
-+pair_type local_7323142; 
++
++pair_type local_7323147; 
++
  
-+pair_type local_7323145; 
  
-+pair_type local_7323148; 
  
 -return_direct_with_clo1(data,(closure)&c_7324592,__lambda_1063,  Cyc_cdr(data, ((closureN)self_7313978)->elements[0]));}
 -;; 
-+
-+
-+pair_type local_7323154; 
-+
-+
-+
-+
-+
-+
-+
-+
-+return_direct_with_clo1(data,  ((closureN)self_7312733)->elements[0], (((closure)  ((closureN)self_7312733)->elements[0])->fn),  set_pair_as_expr(&local_7323142, set_pair_as_expr(&local_7323145, r_736466, set_pair_as_expr(&local_7323148, Cyc_car(data, ((closureN)self_7312733)->elements[1]), set_pair_as_expr(&local_7323154, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312733)->elements[1])), Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312733)->elements[1]))))), boolean_f));; 
- }
+-}
  
 -static void __lambda_1063(void *data, object self_7313979, int argc, object *args) /* object self_7313979, object v_9315_731730_731921_732060_733793 */
-+static void __lambda_1032(void *data, object _, int argc, object *args) /* closure _,object k_736340, object expr_731576_731608_731669_733337, object rename_731577_731609_731670_733338, object compare_731578_731610_731671_733339 */
-  {
+- {
 - object v_9315_731730_731921_732060_733793 = args[0];
 -  
 -closureN_type c_7324594;
@@ -14334,21 +14339,6 @@ Make let-values be the same as let*-values, to work around
 -c_7324594.elements = (object *)e_7324774;
 -c_7324594.elements[0] = ((closureN)self_7313979)->elements[2];
 -c_7324594.elements[1] = v_9315_731730_731921_732060_733793;
-+object k_736340 = args[0]; object expr_731576_731608_731669_733337 = args[1]; object rename_731577_731609_731670_733338 = args[2];
-+  Cyc_st_add(data, "base.sld:let*-values");
-+
-+closureN_type c_7322779;
-+object e_7323105 [3];
-+c_7322779.hdr.mark = gc_color_red;
-+ c_7322779.hdr.grayed = 0;
-+c_7322779.tag = closureN_tag;
-+ c_7322779.fn = (function_type)__lambda_1033;
-+c_7322779.num_args = 1;
-+c_7322779.num_elements = 3;
-+c_7322779.elements = (object *)e_7323105;
-+c_7322779.elements[0] = expr_731576_731608_731669_733337;
-+c_7322779.elements[1] = k_736340;
-+c_7322779.elements[2] = rename_731577_731609_731670_733338;
  
  
 -closureN_type c_7324775;
@@ -14365,18 +14355,17 @@ Make let-values be the same as let*-values, to work around
 -c_7324775.elements[2] = ((closureN)self_7313979)->elements[2];
  
 -return_direct_with_clo1(data,(closure)&c_7324594,__lambda_1064,  &c_7324775);; 
-+return_direct_with_clo1(data,(closure)&c_7322779,__lambda_1033,  Cyc_cdr(data, expr_731576_731608_731669_733337));; 
++return_direct_with_clo1(data,  ((closureN)self_7312726)->elements[0], (((closure)  ((closureN)self_7312726)->elements[0])->fn),  set_pair_as_expr(&local_7323135, set_pair_as_expr(&local_7323138, r_736459, set_pair_as_expr(&local_7323141, Cyc_car(data, ((closureN)self_7312726)->elements[1]), set_pair_as_expr(&local_7323147, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312726)->elements[1])), Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312726)->elements[1]))))), boolean_f));; 
  }
  
 -static void __lambda_1066(void *data, object self_7313980, int argc, object *args) /* object self_7313980, object tmp_731804_731806_731987_733720 */
-+static void __lambda_1033(void *data, object self_7312708, int argc, object *args) /* object self_7312708, object v_931_731585_731663_731703_733371 */
++static void __lambda_1032(void *data, object _, int argc, object *args) /* closure _,object k_736333, object expr_731574_731605_731666_733330, object rename_731575_731606_731667_733331, object compare_731576_731607_731668_733332 */
   {
 - object tmp_731804_731806_731987_733720 = args[0];
 -  if( (boolean_f != tmp_731804_731806_731987_733720) ){ 
 -  return_direct_with_clo1(data,  ((closureN)self_7313980)->elements[1], (((closure)  ((closureN)self_7313980)->elements[1])->fn),  tmp_731804_731806_731987_733720);
 -} else { 
-+ object v_931_731585_731663_731703_733371 = args[0];
-   
+-  
 -closureN_type c_7324779;
 -object e_7325625 [3];
 -c_7324779.hdr.mark = gc_color_red;
@@ -14389,42 +14378,99 @@ Make let-values be the same as let*-values, to work around
 -c_7324779.elements[0] = ((closureN)self_7313980)->elements[0];
 -c_7324779.elements[1] = ((closureN)self_7313980)->elements[1];
 -c_7324779.elements[2] = ((closureN)self_7313980)->elements[2];
-+closureN_type c_7322781;
-+object e_7322807 [2];
-+c_7322781.hdr.mark = gc_color_red;
-+ c_7322781.hdr.grayed = 0;
-+c_7322781.tag = closureN_tag;
-+ c_7322781.fn = (function_type)__lambda_1034;
-+c_7322781.num_args = 0;
-+c_7322781.num_elements = 2;
-+c_7322781.elements = (object *)e_7322807;
-+c_7322781.elements[0] = ((closureN)self_7312708)->elements[2];
-+c_7322781.elements[1] = v_931_731585_731663_731703_733371;
++object k_736333 = args[0]; object expr_731574_731605_731666_733330 = args[1]; object rename_731575_731606_731667_733331 = args[2];
++  Cyc_st_add(data, "scheme/base.sld:let*-values");
  
++closureN_type c_7322772;
++object e_7323098 [3];
++c_7322772.hdr.mark = gc_color_red;
++ c_7322772.hdr.grayed = 0;
++c_7322772.tag = closureN_tag;
++ c_7322772.fn = (function_type)__lambda_1033;
++c_7322772.num_args = 1;
++c_7322772.num_elements = 3;
++c_7322772.elements = (object *)e_7323098;
++c_7322772.elements[0] = expr_731574_731605_731666_733330;
++c_7322772.elements[1] = k_736333;
++c_7322772.elements[2] = rename_731575_731606_731667_733331;
++
++
++
++return_direct_with_clo1(data,(closure)&c_7322772,__lambda_1033,  Cyc_cdr(data, expr_731574_731605_731666_733330));; 
++}
++
++static void __lambda_1033(void *data, object self_7312701, int argc, object *args) /* object self_7312701, object v_931_731582_731660_731700_733364 */
++ {
++ object v_931_731582_731660_731700_733364 = args[0];
++  
++closureN_type c_7322774;
++object e_7322800 [2];
++c_7322774.hdr.mark = gc_color_red;
++ c_7322774.hdr.grayed = 0;
++c_7322774.tag = closureN_tag;
++ c_7322774.fn = (function_type)__lambda_1034;
++c_7322774.num_args = 0;
++c_7322774.num_elements = 2;
++c_7322774.elements = (object *)e_7322800;
++c_7322774.elements[0] = ((closureN)self_7312701)->elements[2];
++c_7322774.elements[1] = v_931_731582_731660_731700_733364;
++
++
++closureN_type c_7322801;
++object e_7323097 [3];
++c_7322801.hdr.mark = gc_color_red;
++ c_7322801.hdr.grayed = 0;
++c_7322801.tag = closureN_tag;
++ c_7322801.fn = (function_type)__lambda_1036;
++c_7322801.num_args = 1;
++c_7322801.num_elements = 3;
++c_7322801.elements = (object *)e_7323097;
++c_7322801.elements[0] = ((closureN)self_7312701)->elements[0];
++c_7322801.elements[1] = ((closureN)self_7312701)->elements[1];
++c_7322801.elements[2] = ((closureN)self_7312701)->elements[2];
++
++return_direct_with_clo1(data,(closure)&c_7322774,__lambda_1034,  &c_7322801);; 
++}
++
++static void __lambda_1036(void *data, object self_7312702, int argc, object *args) /* object self_7312702, object tmp_731609_731611_731669_733333 */
++ {
++ object tmp_731609_731611_731669_733333 = args[0];
++  
++closureN_type c_7322803;
++object e_7323090 [3];
++c_7322803.hdr.mark = gc_color_red;
++ c_7322803.hdr.grayed = 0;
++c_7322803.tag = closureN_tag;
++ c_7322803.fn = (function_type)__lambda_1037;
++c_7322803.num_args = 0;
++c_7322803.num_elements = 3;
++c_7322803.elements = (object *)e_7323090;
++c_7322803.elements[0] = ((closureN)self_7312702)->elements[0];
++c_7322803.elements[1] = ((closureN)self_7312702)->elements[2];
++c_7322803.elements[2] = tmp_731609_731611_731669_733333;
  
-+closureN_type c_7322808;
-+object e_7323104 [3];
-+c_7322808.hdr.mark = gc_color_red;
-+ c_7322808.hdr.grayed = 0;
-+c_7322808.tag = closureN_tag;
-+ c_7322808.fn = (function_type)__lambda_1036;
-+c_7322808.num_args = 1;
-+c_7322808.num_elements = 3;
-+c_7322808.elements = (object *)e_7323104;
-+c_7322808.elements[0] = ((closureN)self_7312708)->elements[0];
-+c_7322808.elements[1] = ((closureN)self_7312708)->elements[1];
-+c_7322808.elements[2] = ((closureN)self_7312708)->elements[2];
  
 -return_direct_with_clo1(data,(closure)&c_7324779,__lambda_1067,  Cyc_cdr(data, ((closureN)self_7313980)->elements[0]));}
 -;; 
-+return_direct_with_clo1(data,(closure)&c_7322781,__lambda_1034,  &c_7322808);; 
++closureN_type c_7323091;
++object e_7323096 [1];
++c_7323091.hdr.mark = gc_color_red;
++ c_7323091.hdr.grayed = 0;
++c_7323091.tag = closureN_tag;
++ c_7323091.fn = (function_type)__lambda_1051;
++c_7323091.num_args = 1;
++c_7323091.num_elements = 1;
++c_7323091.elements = (object *)e_7323096;
++c_7323091.elements[0] = ((closureN)self_7312702)->elements[1];
++
++return_direct_with_clo1(data,(closure)&c_7322803,__lambda_1037,  &c_7323091);; 
  }
  
 -static void __lambda_1067(void *data, object self_7313981, int argc, object *args) /* object self_7313981, object v_9330_731745_731891_732040_733773 */
-+static void __lambda_1036(void *data, object self_7312709, int argc, object *args) /* object self_7312709, object tmp_731612_731614_731672_733340 */
++static void __lambda_1051(void *data, object self_7312703, int argc, object *args) /* object self_7312703, object r_736334 */
   {
 - object v_9330_731745_731891_732040_733773 = args[0];
-+ object tmp_731612_731614_731672_733340 = args[0];
++ object r_736334 = args[0];
    
 -closureN_type c_7324781;
 -object e_7325007 [2];
@@ -14437,19 +14483,7 @@ Make let-values be the same as let*-values, to work around
 -c_7324781.elements = (object *)e_7325007;
 -c_7324781.elements[0] = ((closureN)self_7313981)->elements[2];
 -c_7324781.elements[1] = v_9330_731745_731891_732040_733773;
-+closureN_type c_7322810;
-+object e_7323097 [3];
-+c_7322810.hdr.mark = gc_color_red;
-+ c_7322810.hdr.grayed = 0;
-+c_7322810.tag = closureN_tag;
-+ c_7322810.fn = (function_type)__lambda_1037;
-+c_7322810.num_args = 0;
-+c_7322810.num_elements = 3;
-+c_7322810.elements = (object *)e_7323097;
-+c_7322810.elements[0] = ((closureN)self_7312709)->elements[0];
-+c_7322810.elements[1] = ((closureN)self_7312709)->elements[2];
-+c_7322810.elements[2] = tmp_731612_731614_731672_733340;
- 
+-
  
 -closureN_type c_7325008;
 -object e_7325624 [3];
@@ -14463,29 +14497,21 @@ Make let-values be the same as let*-values, to work around
 -c_7325008.elements[0] = ((closureN)self_7313981)->elements[0];
 -c_7325008.elements[1] = ((closureN)self_7313981)->elements[1];
 -c_7325008.elements[2] = ((closureN)self_7313981)->elements[2];
-+closureN_type c_7323098;
-+object e_7323103 [1];
-+c_7323098.hdr.mark = gc_color_red;
-+ c_7323098.hdr.grayed = 0;
-+c_7323098.tag = closureN_tag;
-+ c_7323098.fn = (function_type)__lambda_1051;
-+c_7323098.num_args = 1;
-+c_7323098.num_elements = 1;
-+c_7323098.elements = (object *)e_7323103;
-+c_7323098.elements[0] = ((closureN)self_7312709)->elements[1];
- 
+-
 -return_direct_with_clo1(data,(closure)&c_7324781,__lambda_1068,  &c_7325008);; 
-+return_direct_with_clo1(data,(closure)&c_7322810,__lambda_1037,  &c_7323098);; 
++return_direct_with_clo1(data,  ((closureN)self_7312703)->elements[0], (((closure)  ((closureN)self_7312703)->elements[0])->fn),  Cyc_car(data, r_736334));; 
  }
  
 -static void __lambda_1073(void *data, object self_7313982, int argc, object *args) /* object self_7313982, object tmp_731808_731810_731988_733721 */
-+static void __lambda_1051(void *data, object self_7312710, int argc, object *args) /* object self_7312710, object r_736341 */
++static void __lambda_1037(void *data, object self_7312704, int argc, object *args) /* object self_7312704, object k_736336 */
   {
 - object tmp_731808_731810_731988_733721 = args[0];
 -  if( (boolean_f != tmp_731808_731810_731988_733721) ){ 
 -  return_direct_with_clo1(data,  ((closureN)self_7313982)->elements[1], (((closure)  ((closureN)self_7313982)->elements[1])->fn),  tmp_731808_731810_731988_733721);
--} else { 
-+ object r_736341 = args[0];
++ object k_736336 = args[0];
++  if( (boolean_f != ((closureN)self_7312704)->elements[2]) ){ 
++  return_direct_with_clo1(data,  k_736336, (((closure)  k_736336)->fn),  ((closureN)self_7312704)->elements[2]);
+ } else { 
    
 -closureN_type c_7325012;
 -object e_7325620 [3];
@@ -14499,22 +14525,31 @@ Make let-values be the same as let*-values, to work around
 -c_7325012.elements[0] = ((closureN)self_7313982)->elements[0];
 -c_7325012.elements[1] = ((closureN)self_7313982)->elements[1];
 -c_7325012.elements[2] = ((closureN)self_7313982)->elements[2];
--
--
++closureN_type c_7322808;
++object e_7323086 [3];
++c_7322808.hdr.mark = gc_color_red;
++ c_7322808.hdr.grayed = 0;
++c_7322808.tag = closureN_tag;
++ c_7322808.fn = (function_type)__lambda_1038;
++c_7322808.num_args = 1;
++c_7322808.num_elements = 3;
++c_7322808.elements = (object *)e_7323086;
++c_7322808.elements[0] = ((closureN)self_7312704)->elements[0];
++c_7322808.elements[1] = k_736336;
++c_7322808.elements[2] = ((closureN)self_7312704)->elements[1];
+ 
+ 
  
 -return_direct_with_clo1(data,(closure)&c_7325012,__lambda_1074,  Cyc_cdr(data, ((closureN)self_7313982)->elements[0]));}
--;; 
-+return_direct_with_clo1(data,  ((closureN)self_7312710)->elements[0], (((closure)  ((closureN)self_7312710)->elements[0])->fn),  Cyc_car(data, r_736341));; 
++return_direct_with_clo1(data,(closure)&c_7322808,__lambda_1038,  Cyc_cdr(data, ((closureN)self_7312704)->elements[0]));}
+ ;; 
  }
  
 -static void __lambda_1074(void *data, object self_7313983, int argc, object *args) /* object self_7313983, object v_9345_731760_731853_732014_733747 */
-+static void __lambda_1037(void *data, object self_7312711, int argc, object *args) /* object self_7312711, object k_736343 */
++static void __lambda_1038(void *data, object self_7312705, int argc, object *args) /* object self_7312705, object v_934_731585_731638_731685_733349 */
   {
 - object v_9345_731760_731853_732014_733747 = args[0];
-+ object k_736343 = args[0];
-+  if( (boolean_f != ((closureN)self_7312711)->elements[2]) ){ 
-+  return_direct_with_clo1(data,  k_736343, (((closure)  k_736343)->fn),  ((closureN)self_7312711)->elements[2]);
-+} else { 
++ object v_934_731585_731638_731685_733349 = args[0];
    
 -closureN_type c_7325014;
 -object e_7325297 [2];
@@ -14527,18 +14562,17 @@ Make let-values be the same as let*-values, to work around
 -c_7325014.elements = (object *)e_7325297;
 -c_7325014.elements[0] = ((closureN)self_7313983)->elements[2];
 -c_7325014.elements[1] = v_9345_731760_731853_732014_733747;
-+closureN_type c_7322815;
-+object e_7323093 [3];
-+c_7322815.hdr.mark = gc_color_red;
-+ c_7322815.hdr.grayed = 0;
-+c_7322815.tag = closureN_tag;
-+ c_7322815.fn = (function_type)__lambda_1038;
-+c_7322815.num_args = 1;
-+c_7322815.num_elements = 3;
-+c_7322815.elements = (object *)e_7323093;
-+c_7322815.elements[0] = ((closureN)self_7312711)->elements[0];
-+c_7322815.elements[1] = k_736343;
-+c_7322815.elements[2] = ((closureN)self_7312711)->elements[1];
++closureN_type c_7322810;
++object e_7322937 [2];
++c_7322810.hdr.mark = gc_color_red;
++ c_7322810.hdr.grayed = 0;
++c_7322810.tag = closureN_tag;
++ c_7322810.fn = (function_type)__lambda_1039;
++c_7322810.num_args = 0;
++c_7322810.num_elements = 2;
++c_7322810.elements = (object *)e_7322937;
++c_7322810.elements[0] = ((closureN)self_7312705)->elements[2];
++c_7322810.elements[1] = v_934_731585_731638_731685_733349;
  
  
 -closureN_type c_7325298;
@@ -14553,54 +14587,32 @@ Make let-values be the same as let*-values, to work around
 -c_7325298.elements[0] = ((closureN)self_7313983)->elements[0];
 -c_7325298.elements[1] = ((closureN)self_7313983)->elements[1];
 -c_7325298.elements[2] = ((closureN)self_7313983)->elements[2];
++closureN_type c_7322938;
++object e_7323085 [3];
++c_7322938.hdr.mark = gc_color_red;
++ c_7322938.hdr.grayed = 0;
++c_7322938.tag = closureN_tag;
++ c_7322938.fn = (function_type)__lambda_1042;
++c_7322938.num_args = 1;
++c_7322938.num_elements = 3;
++c_7322938.elements = (object *)e_7323085;
++c_7322938.elements[0] = ((closureN)self_7312705)->elements[0];
++c_7322938.elements[1] = ((closureN)self_7312705)->elements[1];
++c_7322938.elements[2] = ((closureN)self_7312705)->elements[2];
  
 -return_direct_with_clo1(data,(closure)&c_7325014,__lambda_1075,  &c_7325298);; 
-+return_direct_with_clo1(data,(closure)&c_7322815,__lambda_1038,  Cyc_cdr(data, ((closureN)self_7312711)->elements[0]));}
-+;; 
++return_direct_with_clo1(data,(closure)&c_7322810,__lambda_1039,  &c_7322938);; 
  }
  
 -static void __lambda_1087(void *data, object self_7313984, int argc, object *args) /* object self_7313984, object tmp_731812_731814_731989_733722 */
-+static void __lambda_1038(void *data, object self_7312712, int argc, object *args) /* object self_7312712, object v_934_731588_731641_731688_733356 */
++static void __lambda_1042(void *data, object self_7312706, int argc, object *args) /* object self_7312706, object tmp_731613_731615_731670_733334 */
   {
 - object tmp_731812_731814_731989_733722 = args[0];
 -  if( (boolean_f != tmp_731812_731814_731989_733722) ){ 
 -  return_direct_with_clo1(data,  ((closureN)self_7313984)->elements[1], (((closure)  ((closureN)self_7313984)->elements[1])->fn),  tmp_731812_731814_731989_733722);
-+ object v_934_731588_731641_731688_733356 = args[0];
-+  
-+closureN_type c_7322817;
-+object e_7322944 [2];
-+c_7322817.hdr.mark = gc_color_red;
-+ c_7322817.hdr.grayed = 0;
-+c_7322817.tag = closureN_tag;
-+ c_7322817.fn = (function_type)__lambda_1039;
-+c_7322817.num_args = 0;
-+c_7322817.num_elements = 2;
-+c_7322817.elements = (object *)e_7322944;
-+c_7322817.elements[0] = ((closureN)self_7312712)->elements[2];
-+c_7322817.elements[1] = v_934_731588_731641_731688_733356;
-+
-+
-+closureN_type c_7322945;
-+object e_7323092 [3];
-+c_7322945.hdr.mark = gc_color_red;
-+ c_7322945.hdr.grayed = 0;
-+c_7322945.tag = closureN_tag;
-+ c_7322945.fn = (function_type)__lambda_1042;
-+c_7322945.num_args = 1;
-+c_7322945.num_elements = 3;
-+c_7322945.elements = (object *)e_7323092;
-+c_7322945.elements[0] = ((closureN)self_7312712)->elements[0];
-+c_7322945.elements[1] = ((closureN)self_7312712)->elements[1];
-+c_7322945.elements[2] = ((closureN)self_7312712)->elements[2];
-+
-+return_direct_with_clo1(data,(closure)&c_7322817,__lambda_1039,  &c_7322945);; 
-+}
-+
-+static void __lambda_1042(void *data, object self_7312713, int argc, object *args) /* object self_7312713, object tmp_731616_731618_731673_733341 */
-+ {
-+ object tmp_731616_731618_731673_733341 = args[0];
-+  if( (boolean_f != tmp_731616_731618_731673_733341) ){ 
-+  return_direct_with_clo1(data,  ((closureN)self_7312713)->elements[1], (((closure)  ((closureN)self_7312713)->elements[1])->fn),  tmp_731616_731618_731673_733341);
++ object tmp_731613_731615_731670_733334 = args[0];
++  if( (boolean_f != tmp_731613_731615_731670_733334) ){ 
++  return_direct_with_clo1(data,  ((closureN)self_7312706)->elements[1], (((closure)  ((closureN)self_7312706)->elements[1])->fn),  tmp_731613_731615_731670_733334);
  } else { 
    
 -closureN_type c_7325302;
@@ -14615,31 +14627,31 @@ Make let-values be the same as let*-values, to work around
 -c_7325302.elements[0] = ((closureN)self_7313984)->elements[0];
 -c_7325302.elements[1] = ((closureN)self_7313984)->elements[1];
 -c_7325302.elements[2] = ((closureN)self_7313984)->elements[2];
-+closureN_type c_7322949;
-+object e_7323088 [3];
-+c_7322949.hdr.mark = gc_color_red;
-+ c_7322949.hdr.grayed = 0;
-+c_7322949.tag = closureN_tag;
-+ c_7322949.fn = (function_type)__lambda_1043;
-+c_7322949.num_args = 1;
-+c_7322949.num_elements = 3;
-+c_7322949.elements = (object *)e_7323088;
-+c_7322949.elements[0] = ((closureN)self_7312713)->elements[0];
-+c_7322949.elements[1] = ((closureN)self_7312713)->elements[1];
-+c_7322949.elements[2] = ((closureN)self_7312713)->elements[2];
++closureN_type c_7322942;
++object e_7323081 [3];
++c_7322942.hdr.mark = gc_color_red;
++ c_7322942.hdr.grayed = 0;
++c_7322942.tag = closureN_tag;
++ c_7322942.fn = (function_type)__lambda_1043;
++c_7322942.num_args = 1;
++c_7322942.num_elements = 3;
++c_7322942.elements = (object *)e_7323081;
++c_7322942.elements[0] = ((closureN)self_7312706)->elements[0];
++c_7322942.elements[1] = ((closureN)self_7312706)->elements[1];
++c_7322942.elements[2] = ((closureN)self_7312706)->elements[2];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7325302,__lambda_1088,  Cyc_cdr(data, ((closureN)self_7313984)->elements[0]));}
-+return_direct_with_clo1(data,(closure)&c_7322949,__lambda_1043,  Cyc_cdr(data, ((closureN)self_7312713)->elements[0]));}
++return_direct_with_clo1(data,(closure)&c_7322942,__lambda_1043,  Cyc_cdr(data, ((closureN)self_7312706)->elements[0]));}
  ;; 
  }
  
 -static void __lambda_1088(void *data, object self_7313985, int argc, object *args) /* object self_7313985, object v_9362_731777_731819_731991_733724 */
-+static void __lambda_1043(void *data, object self_7312714, int argc, object *args) /* object self_7312714, object v_9315_731599_731623_731675_733343 */
++static void __lambda_1043(void *data, object self_7312707, int argc, object *args) /* object self_7312707, object v_9315_731596_731620_731672_733336 */
   {
 - object v_9362_731777_731819_731991_733724 = args[0];
-+ object v_9315_731599_731623_731675_733343 = args[0];
++ object v_9315_731596_731620_731672_733336 = args[0];
    
 -closureN_type c_7325304;
 -object e_7325600 [2];
@@ -14652,17 +14664,17 @@ Make let-values be the same as let*-values, to work around
 -c_7325304.elements = (object *)e_7325600;
 -c_7325304.elements[0] = ((closureN)self_7313985)->elements[2];
 -c_7325304.elements[1] = v_9362_731777_731819_731991_733724;
-+closureN_type c_7322951;
-+object e_7323073 [2];
-+c_7322951.hdr.mark = gc_color_red;
-+ c_7322951.hdr.grayed = 0;
-+c_7322951.tag = closureN_tag;
-+ c_7322951.fn = (function_type)__lambda_1044;
-+c_7322951.num_args = 0;
-+c_7322951.num_elements = 2;
-+c_7322951.elements = (object *)e_7323073;
-+c_7322951.elements[0] = ((closureN)self_7312714)->elements[2];
-+c_7322951.elements[1] = v_9315_731599_731623_731675_733343;
++closureN_type c_7322944;
++object e_7323066 [2];
++c_7322944.hdr.mark = gc_color_red;
++ c_7322944.hdr.grayed = 0;
++c_7322944.tag = closureN_tag;
++ c_7322944.fn = (function_type)__lambda_1044;
++c_7322944.num_args = 0;
++c_7322944.num_elements = 2;
++c_7322944.elements = (object *)e_7323066;
++c_7322944.elements[0] = ((closureN)self_7312707)->elements[2];
++c_7322944.elements[1] = v_9315_731596_731620_731672_733336;
  
  
 -closureN_type c_7325601;
@@ -14676,31 +14688,31 @@ Make let-values be the same as let*-values, to work around
 -c_7325601.elements = (object *)e_7325614;
 -c_7325601.elements[0] = ((closureN)self_7313985)->elements[0];
 -c_7325601.elements[1] = ((closureN)self_7313985)->elements[1];
-+closureN_type c_7323074;
-+object e_7323087 [2];
-+c_7323074.hdr.mark = gc_color_red;
-+ c_7323074.hdr.grayed = 0;
-+c_7323074.tag = closureN_tag;
-+ c_7323074.fn = (function_type)__lambda_1049;
-+c_7323074.num_args = 1;
-+c_7323074.num_elements = 2;
-+c_7323074.elements = (object *)e_7323087;
-+c_7323074.elements[0] = ((closureN)self_7312714)->elements[0];
-+c_7323074.elements[1] = ((closureN)self_7312714)->elements[1];
++closureN_type c_7323067;
++object e_7323080 [2];
++c_7323067.hdr.mark = gc_color_red;
++ c_7323067.hdr.grayed = 0;
++c_7323067.tag = closureN_tag;
++ c_7323067.fn = (function_type)__lambda_1049;
++c_7323067.num_args = 1;
++c_7323067.num_elements = 2;
++c_7323067.elements = (object *)e_7323080;
++c_7323067.elements[0] = ((closureN)self_7312707)->elements[0];
++c_7323067.elements[1] = ((closureN)self_7312707)->elements[1];
  
 -return_direct_with_clo1(data,(closure)&c_7325304,__lambda_1089,  &c_7325601);; 
-+return_direct_with_clo1(data,(closure)&c_7322951,__lambda_1044,  &c_7323074);; 
++return_direct_with_clo1(data,(closure)&c_7322944,__lambda_1044,  &c_7323067);; 
  }
  
 -static void __lambda_1104(void *data, object self_7313986, int argc, object *args) /* object self_7313986, object tmp_731816_731818_731990_733723 */
-+static void __lambda_1049(void *data, object self_7312715, int argc, object *args) /* object self_7312715, object tmp_731620_731622_731674_733342 */
++static void __lambda_1049(void *data, object self_7312708, int argc, object *args) /* object self_7312708, object tmp_731617_731619_731671_733335 */
   {
 - object tmp_731816_731818_731990_733723 = args[0];
 -  if( (boolean_f != tmp_731816_731818_731990_733723) ){ 
 -  return_direct_with_clo1(data,  ((closureN)self_7313986)->elements[1], (((closure)  ((closureN)self_7313986)->elements[1])->fn),  tmp_731816_731818_731990_733723);
-+ object tmp_731620_731622_731674_733342 = args[0];
-+  if( (boolean_f != tmp_731620_731622_731674_733342) ){ 
-+  return_direct_with_clo1(data,  ((closureN)self_7312715)->elements[1], (((closure)  ((closureN)self_7312715)->elements[1])->fn),  tmp_731620_731622_731674_733342);
++ object tmp_731617_731619_731671_733335 = args[0];
++  if( (boolean_f != tmp_731617_731619_731671_733335) ){ 
++  return_direct_with_clo1(data,  ((closureN)self_7312708)->elements[1], (((closure)  ((closureN)self_7312708)->elements[1])->fn),  tmp_731617_731619_731671_733335);
  } else { 
    
 -closureN_type c_7325605;
@@ -14713,62 +14725,59 @@ Make let-values be the same as let*-values, to work around
 -c_7325605.num_elements = 1;
 -c_7325605.elements = (object *)e_7325611;
 -c_7325605.elements[0] = ((closureN)self_7313986)->elements[1];
-+closureN_type c_7323078;
-+object e_7323084 [1];
-+c_7323078.hdr.mark = gc_color_red;
-+ c_7323078.hdr.grayed = 0;
-+c_7323078.tag = closureN_tag;
-+ c_7323078.fn = (function_type)__lambda_1050;
-+c_7323078.num_args = 1;
-+c_7323078.num_elements = 1;
-+c_7323078.elements = (object *)e_7323084;
-+c_7323078.elements[0] = ((closureN)self_7312715)->elements[1];
++closureN_type c_7323071;
++object e_7323077 [1];
++c_7323071.hdr.mark = gc_color_red;
++ c_7323071.hdr.grayed = 0;
++c_7323071.tag = closureN_tag;
++ c_7323071.fn = (function_type)__lambda_1050;
++c_7323071.num_args = 1;
++c_7323071.num_elements = 1;
++c_7323071.elements = (object *)e_7323077;
++c_7323071.elements[0] = ((closureN)self_7312708)->elements[1];
  
  
 -make_utf8_string_with_len(c_7325612, "no expansion for", 16, 16);
 -return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_7325605, &c_7325612, ((closureN)self_7313986)->elements[0]);}
-+make_utf8_string_with_len(c_7323085, "no expansion for", 16, 16);
-+return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_7323078, &c_7323085, ((closureN)self_7312715)->elements[0]);}
++make_utf8_string_with_len(c_7323078, "no expansion for", 16, 16);
++return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_7323071, &c_7323078, ((closureN)self_7312708)->elements[0]);}
  ;; 
  }
  
 -static void __lambda_1105(void *data, object self_7313987, int argc, object *args) /* object self_7313987, object r_736904 */
-+static void __lambda_1050(void *data, object self_7312716, int argc, object *args) /* object self_7312716, object r_736346 */
++static void __lambda_1050(void *data, object self_7312709, int argc, object *args) /* object self_7312709, object r_736339 */
   {
 - object r_736904 = args[0];
-+ object r_736346 = args[0];
++ object r_736339 = args[0];
    
 -pair_type local_7325610; 
 -return_direct_with_clo1(data,  ((closureN)self_7313987)->elements[0], (((closure)  ((closureN)self_7313987)->elements[0])->fn),  set_pair_as_expr(&local_7325610, r_736904, boolean_f));; 
-+pair_type local_7323083; 
-+return_direct_with_clo1(data,  ((closureN)self_7312716)->elements[0], (((closure)  ((closureN)self_7312716)->elements[0])->fn),  set_pair_as_expr(&local_7323083, r_736346, boolean_f));; 
++pair_type local_7323076; 
++return_direct_with_clo1(data,  ((closureN)self_7312709)->elements[0], (((closure)  ((closureN)self_7312709)->elements[0])->fn),  set_pair_as_expr(&local_7323076, r_736339, boolean_f));; 
  }
  
 -static void __lambda_1089(void *data, object self_7313988, int argc, object *args) /* object self_7313988, object k_736906 */
-+static void __lambda_1044(void *data, object self_7312717, int argc, object *args) /* object self_7312717, object k_736348 */
++static void __lambda_1044(void *data, object self_7312710, int argc, object *args) /* object self_7312710, object k_736341 */
   {
 - object k_736906 = args[0];
 -    
 -if( (boolean_f != Cyc_is_pair(((closureN)self_7313988)->elements[1])) ){ 
-+ object k_736348 = args[0];
++ object k_736341 = args[0];
      
 -  
 -  make_utf8_string_with_len(c_7325313, "mktmp", 5, 5);
 -if( (boolean_f != equalp(Cyc_car(data, ((closureN)self_7313988)->elements[1]), &c_7325313)) ){ 
-+if( (boolean_f != Cyc_is_pair(((closureN)self_7312717)->elements[1])) ){ 
-     
-   
+-    
+-  
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7313988)->elements[1]))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7312717)->elements[1]))) ){ 
-     
-   
-   
+-    
+-  
+-  
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313988)->elements[1])))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_car(data, ((closureN)self_7312717)->elements[1])))) ){ 
-     
-   
-   
-   
+-    
+-  
+-  
+-  
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313988)->elements[1]))))) ){ 
 -    complex_num_type local_7325337; 
 -  
@@ -14777,77 +14786,23 @@ Make let-values be the same as let*-values, to work around
 -  
 -if( (boolean_f != ((inline_function_type)
 -                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7325337, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313988)->elements[1])))))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7312717)->elements[1]))))) ){ 
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312710)->elements[1])) ){ 
      
    
+-  
+-  
+-  
+-if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313988)->elements[1])))))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7312710)->elements[1]))) ){ 
+     
    
    
-   
--if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313988)->elements[1])))))) ){ 
--    
 -  
 -  
 -  
-+if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7312717)->elements[1])))))) ){ 
-   
-+closureN_type c_7322989;
-+object e_7323067 [3];
-+c_7322989.hdr.mark = gc_color_red;
-+ c_7322989.hdr.grayed = 0;
-+c_7322989.tag = closureN_tag;
-+ c_7322989.fn = (function_type)__lambda_1045;
-+c_7322989.num_args = 1;
-+c_7322989.num_elements = 3;
-+c_7322989.elements = (object *)e_7323067;
-+c_7322989.elements[0] = k_736348;
-+c_7322989.elements[1] = ((closureN)self_7312717)->elements[0];
-+c_7322989.elements[2] = ((closureN)self_7312717)->elements[1];
-+
-+return_closcall2(data,  ((closureN)self_7312717)->elements[0],  &c_7322989, quote_call_91with_91values);
-+} else { 
-+  return_direct_with_clo1(data,  k_736348, (((closure)  k_736348)->fn),  boolean_f);}
-+;
-+} else { 
-+  return_direct_with_clo1(data,  k_736348, (((closure)  k_736348)->fn),  boolean_f);}
-+;
-+} else { 
-+  return_direct_with_clo1(data,  k_736348, (((closure)  k_736348)->fn),  boolean_f);}
-+;
-+} else { 
-+  return_direct_with_clo1(data,  k_736348, (((closure)  k_736348)->fn),  boolean_f);}
-+;
-+} else { 
-+  return_direct_with_clo1(data,  k_736348, (((closure)  k_736348)->fn),  boolean_f);}
-+;; 
-+}
-+
-+static void __lambda_1045(void *data, object self_7312718, int argc, object *args) /* object self_7312718, object r_736363 */
-+ {
-+ object r_736363 = args[0];
-   
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313988)->elements[1]))))))) ){ 
 -    complex_num_type local_7325373; 
-+closureN_type c_7322992;
-+object e_7323066 [4];
-+c_7322992.hdr.mark = gc_color_red;
-+ c_7322992.hdr.grayed = 0;
-+c_7322992.tag = closureN_tag;
-+ c_7322992.fn = (function_type)__lambda_1046;
-+c_7322992.num_args = 1;
-+c_7322992.num_elements = 4;
-+c_7322992.elements = (object *)e_7323066;
-+c_7322992.elements[0] = ((closureN)self_7312718)->elements[0];
-+c_7322992.elements[1] = r_736363;
-+c_7322992.elements[2] = ((closureN)self_7312718)->elements[1];
-+c_7322992.elements[3] = ((closureN)self_7312718)->elements[2];
-+
-+return_closcall2(data,  ((closureN)self_7312718)->elements[1],  &c_7322992, quote_lambda);; 
-+}
-+
-+static void __lambda_1046(void *data, object self_7312719, int argc, object *args) /* object self_7312719, object r_736386 */
-+ {
-+ object r_736386 = args[0];
-   
+-  
 -  
 -  
 -  
@@ -14855,20 +14810,23 @@ Make let-values be the same as let*-values, to work around
 -  
 -if( (boolean_f != ((inline_function_type)
 -                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7325373, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313988)->elements[1])))))))) ){ 
--    
--  
--  
--  
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_car(data, ((closureN)self_7312710)->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_7313988)->elements[1])))))))) ){ 
--    
--  
--  
--  
--  
--  
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7312710)->elements[1]))))) ){ 
+     
+   
+   
+   
+   
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7312710)->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_7313988)->elements[1]))))))))) ){ 
@@ -14885,7 +14843,19 @@ Make let-values be the same as let*-values, to work around
 -c_7325421.elements[0] = k_736906;
 -c_7325421.elements[1] = ((closureN)self_7313988)->elements[0];
 -c_7325421.elements[2] = ((closureN)self_7313988)->elements[1];
--
++closureN_type c_7322982;
++object e_7323060 [3];
++c_7322982.hdr.mark = gc_color_red;
++ c_7322982.hdr.grayed = 0;
++c_7322982.tag = closureN_tag;
++ c_7322982.fn = (function_type)__lambda_1045;
++c_7322982.num_args = 1;
++c_7322982.num_elements = 3;
++c_7322982.elements = (object *)e_7323060;
++c_7322982.elements[0] = k_736341;
++c_7322982.elements[1] = ((closureN)self_7312710)->elements[0];
++c_7322982.elements[2] = ((closureN)self_7312710)->elements[1];
+ 
 -return_closcall2(data,  ((closureN)self_7313988)->elements[0],  &c_7325421, quote_call_91with_91values);
 -} else { 
 -  return_direct_with_clo1(data,  k_736906, (((closure)  k_736906)->fn),  boolean_f);}
@@ -14896,19 +14866,24 @@ Make let-values be the same as let*-values, to work around
 -} else { 
 -  return_direct_with_clo1(data,  k_736906, (((closure)  k_736906)->fn),  boolean_f);}
 -;
--} else { 
++return_closcall2(data,  ((closureN)self_7312710)->elements[0],  &c_7322982, quote_call_91with_91values);
+ } else { 
 -  return_direct_with_clo1(data,  k_736906, (((closure)  k_736906)->fn),  boolean_f);}
--;
--} else { 
++  return_direct_with_clo1(data,  k_736341, (((closure)  k_736341)->fn),  boolean_f);}
+ ;
+ } else { 
 -  return_direct_with_clo1(data,  k_736906, (((closure)  k_736906)->fn),  boolean_f);}
--;
--} else { 
++  return_direct_with_clo1(data,  k_736341, (((closure)  k_736341)->fn),  boolean_f);}
+ ;
+ } else { 
 -  return_direct_with_clo1(data,  k_736906, (((closure)  k_736906)->fn),  boolean_f);}
--;
--} else { 
++  return_direct_with_clo1(data,  k_736341, (((closure)  k_736341)->fn),  boolean_f);}
+ ;
+ } else { 
 -  return_direct_with_clo1(data,  k_736906, (((closure)  k_736906)->fn),  boolean_f);}
--;
--} else { 
++  return_direct_with_clo1(data,  k_736341, (((closure)  k_736341)->fn),  boolean_f);}
+ ;
+ } else { 
 -  return_direct_with_clo1(data,  k_736906, (((closure)  k_736906)->fn),  boolean_f);}
 -;
 -} else { 
@@ -16623,13 +16598,16 @@ Make let-values be the same as let*-values, to work around
 -;
 -} else { 
 -  return_direct_with_clo1(data,  k_736793, (((closure)  k_736793)->fn),  boolean_f);}
--;; 
--}
--
++  return_direct_with_clo1(data,  k_736341, (((closure)  k_736341)->fn),  boolean_f);}
+ ;; 
+ }
+ 
 -static void __lambda_1045(void *data, object self_7313964, int argc, object *args) /* object self_7313964, object r_736808 */
-- {
++static void __lambda_1045(void *data, object self_7312711, int argc, object *args) /* object self_7312711, object r_736356 */
+  {
 - object r_736808 = args[0];
--  
++ object r_736356 = args[0];
+   
 -closureN_type c_7324285;
 -object e_7324359 [4];
 -c_7324285.hdr.mark = gc_color_red;
@@ -16643,14 +16621,30 @@ Make let-values be the same as let*-values, to work around
 -c_7324285.elements[1] = r_736808;
 -c_7324285.elements[2] = ((closureN)self_7313964)->elements[1];
 -c_7324285.elements[3] = ((closureN)self_7313964)->elements[2];
--
++closureN_type c_7322985;
++object e_7323059 [4];
++c_7322985.hdr.mark = gc_color_red;
++ c_7322985.hdr.grayed = 0;
++c_7322985.tag = closureN_tag;
++ c_7322985.fn = (function_type)__lambda_1046;
++c_7322985.num_args = 1;
++c_7322985.num_elements = 4;
++c_7322985.elements = (object *)e_7323059;
++c_7322985.elements[0] = ((closureN)self_7312711)->elements[0];
++c_7322985.elements[1] = r_736356;
++c_7322985.elements[2] = ((closureN)self_7312711)->elements[1];
++c_7322985.elements[3] = ((closureN)self_7312711)->elements[2];
+ 
 -return_closcall2(data,  ((closureN)self_7313964)->elements[1],  &c_7324285, quote_lambda);; 
--}
--
++return_closcall2(data,  ((closureN)self_7312711)->elements[1],  &c_7322985, quote_lambda);; 
+ }
+ 
 -static void __lambda_1046(void *data, object self_7313965, int argc, object *args) /* object self_7313965, object r_736831 */
-- {
++static void __lambda_1046(void *data, object self_7312712, int argc, object *args) /* object self_7312712, object r_736379 */
+  {
 - object r_736831 = args[0];
--  
++ object r_736379 = args[0];
+   
 -closureN_type c_7324288;
 -object e_7324358 [5];
 -c_7324288.hdr.mark = gc_color_red;
@@ -16665,30 +16659,30 @@ Make let-values be the same as let*-values, to work around
 -c_7324288.elements[2] = r_736831;
 -c_7324288.elements[3] = ((closureN)self_7313965)->elements[2];
 -c_7324288.elements[4] = ((closureN)self_7313965)->elements[3];
-+closureN_type c_7322995;
-+object e_7323065 [5];
-+c_7322995.hdr.mark = gc_color_red;
-+ c_7322995.hdr.grayed = 0;
-+c_7322995.tag = closureN_tag;
-+ c_7322995.fn = (function_type)__lambda_1047;
-+c_7322995.num_args = 1;
-+c_7322995.num_elements = 5;
-+c_7322995.elements = (object *)e_7323065;
-+c_7322995.elements[0] = ((closureN)self_7312719)->elements[0];
-+c_7322995.elements[1] = ((closureN)self_7312719)->elements[1];
-+c_7322995.elements[2] = r_736386;
-+c_7322995.elements[3] = ((closureN)self_7312719)->elements[2];
-+c_7322995.elements[4] = ((closureN)self_7312719)->elements[3];
++closureN_type c_7322988;
++object e_7323058 [5];
++c_7322988.hdr.mark = gc_color_red;
++ c_7322988.hdr.grayed = 0;
++c_7322988.tag = closureN_tag;
++ c_7322988.fn = (function_type)__lambda_1047;
++c_7322988.num_args = 1;
++c_7322988.num_elements = 5;
++c_7322988.elements = (object *)e_7323058;
++c_7322988.elements[0] = ((closureN)self_7312712)->elements[0];
++c_7322988.elements[1] = ((closureN)self_7312712)->elements[1];
++c_7322988.elements[2] = r_736379;
++c_7322988.elements[3] = ((closureN)self_7312712)->elements[2];
++c_7322988.elements[4] = ((closureN)self_7312712)->elements[3];
  
 -return_closcall2(data,  ((closureN)self_7313965)->elements[2],  &c_7324288, quote_lambda);; 
-+return_closcall2(data,  ((closureN)self_7312719)->elements[2],  &c_7322995, quote_lambda);; 
++return_closcall2(data,  ((closureN)self_7312712)->elements[2],  &c_7322988, quote_lambda);; 
  }
  
 -static void __lambda_1047(void *data, object self_7313966, int argc, object *args) /* object self_7313966, object r_736817_738750_738762_738773 */
-+static void __lambda_1047(void *data, object self_7312720, int argc, object *args) /* object self_7312720, object r_736372_737982_737994_738005 */
++static void __lambda_1047(void *data, object self_7312713, int argc, object *args) /* object self_7312713, object r_736365_737975_737987_737998 */
   {
 - object r_736817_738750_738762_738773 = args[0];
-+ object r_736372_737982_737994_738005 = args[0];
++ object r_736365_737975_737987_737998 = args[0];
    
 -closureN_type c_7324291;
 -object e_7324357 [5];
@@ -16704,48 +16698,48 @@ Make let-values be the same as let*-values, to work around
 -c_7324291.elements[2] = r_736817_738750_738762_738773;
 -c_7324291.elements[3] = ((closureN)self_7313966)->elements[2];
 -c_7324291.elements[4] = ((closureN)self_7313966)->elements[4];
-+closureN_type c_7322998;
-+object e_7323064 [5];
-+c_7322998.hdr.mark = gc_color_red;
-+ c_7322998.hdr.grayed = 0;
-+c_7322998.tag = closureN_tag;
-+ c_7322998.fn = (function_type)__lambda_1048;
-+c_7322998.num_args = 1;
-+c_7322998.num_elements = 5;
-+c_7322998.elements = (object *)e_7323064;
-+c_7322998.elements[0] = ((closureN)self_7312720)->elements[0];
-+c_7322998.elements[1] = ((closureN)self_7312720)->elements[1];
-+c_7322998.elements[2] = r_736372_737982_737994_738005;
-+c_7322998.elements[3] = ((closureN)self_7312720)->elements[2];
-+c_7322998.elements[4] = ((closureN)self_7312720)->elements[4];
++closureN_type c_7322991;
++object e_7323057 [5];
++c_7322991.hdr.mark = gc_color_red;
++ c_7322991.hdr.grayed = 0;
++c_7322991.tag = closureN_tag;
++ c_7322991.fn = (function_type)__lambda_1048;
++c_7322991.num_args = 1;
++c_7322991.num_elements = 5;
++c_7322991.elements = (object *)e_7323057;
++c_7322991.elements[0] = ((closureN)self_7312713)->elements[0];
++c_7322991.elements[1] = ((closureN)self_7312713)->elements[1];
++c_7322991.elements[2] = r_736365_737975_737987_737998;
++c_7322991.elements[3] = ((closureN)self_7312713)->elements[2];
++c_7322991.elements[4] = ((closureN)self_7312713)->elements[4];
  
 -return_closcall2(data,  ((closureN)self_7313966)->elements[3],  &c_7324291, quote_let_85_91values);; 
-+return_closcall2(data,  ((closureN)self_7312720)->elements[3],  &c_7322998, quote_let_85_91values);; 
++return_closcall2(data,  ((closureN)self_7312713)->elements[3],  &c_7322991, quote_let_85_91values);; 
  }
  
 -static void __lambda_1048(void *data, object self_7313967, int argc, object *args) /* object self_7313967, object r_736825_738751_738763_738774 */
-+static void __lambda_1048(void *data, object self_7312721, int argc, object *args) /* object self_7312721, object r_736380_737983_737995_738006 */
++static void __lambda_1048(void *data, object self_7312714, int argc, object *args) /* object self_7312714, object r_736373_737976_737988_737999 */
   {
 - object r_736825_738751_738763_738774 = args[0];
-+ object r_736380_737983_737995_738006 = args[0];
++ object r_736373_737976_737988_737999 = args[0];
    
 -pair_type local_7324296; 
-+pair_type local_7323003; 
++pair_type local_7322996; 
  
 -pair_type local_7324299; 
-+pair_type local_7323006; 
++pair_type local_7322999; 
  
 -pair_type local_7324303; 
-+pair_type local_7323010; 
++pair_type local_7323003; 
  
 -pair_type local_7324306; 
-+pair_type local_7323013; 
++pair_type local_7323006; 
  
 -pair_type local_7324310; 
-+pair_type local_7323017; 
++pair_type local_7323010; 
  
 -pair_type local_7324313; 
-+pair_type local_7323020; 
++pair_type local_7323013; 
  
  
  
@@ -16754,13 +16748,13 @@ Make let-values be the same as let*-values, to work around
  
  
 -pair_type local_7324325; 
-+pair_type local_7323032; 
++pair_type local_7323025; 
  
 -pair_type local_7324328; 
-+pair_type local_7323035; 
++pair_type local_7323028; 
  
 -pair_type local_7324332; 
-+pair_type local_7323039; 
++pair_type local_7323032; 
  
  
  
@@ -16769,13 +16763,13 @@ Make let-values be the same as let*-values, to work around
  
  
 -pair_type local_7324342; 
-+pair_type local_7323049; 
++pair_type local_7323042; 
  
 -pair_type local_7324345; 
-+pair_type local_7323052; 
++pair_type local_7323045; 
  
 -pair_type local_7324348; 
-+pair_type local_7323055; 
++pair_type local_7323048; 
  
  
  
@@ -16783,52 +16777,52 @@ Make let-values be the same as let*-values, to work around
  
  
 -return_direct_with_clo1(data,  ((closureN)self_7313967)->elements[0], (((closure)  ((closureN)self_7313967)->elements[0])->fn),  set_pair_as_expr(&local_7324296, set_pair_as_expr(&local_7324299, ((closureN)self_7313967)->elements[1], set_pair_as_expr(&local_7324303, set_pair_as_expr(&local_7324306, ((closureN)self_7313967)->elements[3], set_pair_as_expr(&local_7324310, NULL, set_pair_as_expr(&local_7324313, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7313967)->elements[4])))), NULL))), set_pair_as_expr(&local_7324325, set_pair_as_expr(&local_7324328, ((closureN)self_7313967)->elements[2], set_pair_as_expr(&local_7324332, Cyc_car(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7313967)->elements[4]))), set_pair_as_expr(&local_7324342, set_pair_as_expr(&local_7324345, r_736825_738751_738763_738774, set_pair_as_expr(&local_7324348, Cyc_cdr(data, Cyc_car(data, ((closureN)self_7313967)->elements[4])), Cyc_cdr(data, ((closureN)self_7313967)->elements
[4]))), NULL))), NULL))), boolean_f));; 
-+return_direct_with_clo1(data,  ((closureN)self_7312721)->elements[0], (((closure)  ((closureN)self_7312721)->elements[0])->fn),  set_pair_as_expr(&local_7323003, set_pair_as_expr(&local_7323006, ((closureN)self_7312721)->elements[1], set_pair_as_expr(&local_7323010, set_pair_as_expr(&local_7323013, ((closureN)self_7312721)->elements[3], set_pair_as_expr(&local_7323017, NULL, set_pair_as_expr(&local_7323020, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7312721)->elements[4])))), NULL))), set_pair_as_expr(&local_7323032, set_pair_as_expr(&local_7323035, ((closureN)self_7312721)->elements[2], set_pair_as_expr(&local_7323039, Cyc_car(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7312721)->elements[4]))), set_pair_as_expr(&local_7323049, set_pair_as_expr(&local_7323052, r_736380_737983_737995_738006, set_pair_as_expr(&local_7323055, Cyc_cdr(data, Cyc_car(data, ((closureN)self_7312721)->elements[4])), Cyc_cdr(data, ((closureN)self_7312721)->elements
[4]))), NULL))), NULL))), boolean_f));; 
++return_direct_with_clo1(data,  ((closureN)self_7312714)->elements[0], (((closure)  ((closureN)self_7312714)->elements[0])->fn),  set_pair_as_expr(&local_7322996, set_pair_as_expr(&local_7322999, ((closureN)self_7312714)->elements[1], set_pair_as_expr(&local_7323003, set_pair_as_expr(&local_7323006, ((closureN)self_7312714)->elements[3], set_pair_as_expr(&local_7323010, NULL, set_pair_as_expr(&local_7323013, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7312714)->elements[4])))), NULL))), set_pair_as_expr(&local_7323025, set_pair_as_expr(&local_7323028, ((closureN)self_7312714)->elements[2], set_pair_as_expr(&local_7323032, Cyc_car(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7312714)->elements[4]))), set_pair_as_expr(&local_7323042, set_pair_as_expr(&local_7323045, r_736373_737976_737988_737999, set_pair_as_expr(&local_7323048, Cyc_cdr(data, Cyc_car(data, ((closureN)self_7312714)->elements[4])), Cyc_cdr(data, ((closureN)self_7312714)->elements
[4]))), NULL))), NULL))), boolean_f));; 
  }
  
 -static void __lambda_1039(void *data, object self_7313968, int argc, object *args) /* object self_7313968, object k_736842 */
-+static void __lambda_1039(void *data, object self_7312722, int argc, object *args) /* object self_7312722, object k_736397 */
++static void __lambda_1039(void *data, object self_7312715, int argc, object *args) /* object self_7312715, object k_736390 */
   {
 - object k_736842 = args[0];
-+ object k_736397 = args[0];
++ object k_736390 = args[0];
      
 -if( (boolean_f != Cyc_is_pair(((closureN)self_7313968)->elements[1])) ){ 
-+if( (boolean_f != Cyc_is_pair(((closureN)self_7312722)->elements[1])) ){ 
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312715)->elements[1])) ){ 
      
    
 -if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7313968)->elements[1]))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7312722)->elements[1]))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7312715)->elements[1]))) ){ 
      
    
    
 -if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_car(data, ((closureN)self_7313968)->elements[1])))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_car(data, ((closureN)self_7312722)->elements[1])))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_car(data, ((closureN)self_7312715)->elements[1])))) ){ 
      
    
    
    
 -if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7313968)->elements[1]))))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7312722)->elements[1]))))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7312715)->elements[1]))))) ){ 
      
    
    
    
    
 -if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7313968)->elements[1])))))) ){ 
-+if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7312722)->elements[1])))))) ){ 
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7312715)->elements[1])))))) ){ 
      
    
    
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7313968)->elements[1]))))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7312722)->elements[1]))))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7312715)->elements[1]))))) ){ 
      
    
    
    
    
 -if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7313968)->elements[1])))))) ){ 
-+if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7312722)->elements[1])))))) ){ 
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7312715)->elements[1])))))) ){ 
    
 -closureN_type c_7324168;
 -object e_7324229 [3];
@@ -16842,56 +16836,56 @@ Make let-values be the same as let*-values, to work around
 -c_7324168.elements[0] = k_736842;
 -c_7324168.elements[1] = ((closureN)self_7313968)->elements[0];
 -c_7324168.elements[2] = ((closureN)self_7313968)->elements[1];
-+closureN_type c_7322875;
-+object e_7322936 [3];
-+c_7322875.hdr.mark = gc_color_red;
-+ c_7322875.hdr.grayed = 0;
-+c_7322875.tag = closureN_tag;
-+ c_7322875.fn = (function_type)__lambda_1040;
-+c_7322875.num_args = 1;
-+c_7322875.num_elements = 3;
-+c_7322875.elements = (object *)e_7322936;
-+c_7322875.elements[0] = k_736397;
-+c_7322875.elements[1] = ((closureN)self_7312722)->elements[0];
-+c_7322875.elements[2] = ((closureN)self_7312722)->elements[1];
++closureN_type c_7322868;
++object e_7322929 [3];
++c_7322868.hdr.mark = gc_color_red;
++ c_7322868.hdr.grayed = 0;
++c_7322868.tag = closureN_tag;
++ c_7322868.fn = (function_type)__lambda_1040;
++c_7322868.num_args = 1;
++c_7322868.num_elements = 3;
++c_7322868.elements = (object *)e_7322929;
++c_7322868.elements[0] = k_736390;
++c_7322868.elements[1] = ((closureN)self_7312715)->elements[0];
++c_7322868.elements[2] = ((closureN)self_7312715)->elements[1];
  
 -return_closcall2(data,  ((closureN)self_7313968)->elements[0],  &c_7324168, quote_let);
-+return_closcall2(data,  ((closureN)self_7312722)->elements[0],  &c_7322875, quote_let);
++return_closcall2(data,  ((closureN)self_7312715)->elements[0],  &c_7322868, quote_let);
  } else { 
 -  return_direct_with_clo1(data,  k_736842, (((closure)  k_736842)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736397, (((closure)  k_736397)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736390, (((closure)  k_736390)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_736842, (((closure)  k_736842)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736397, (((closure)  k_736397)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736390, (((closure)  k_736390)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_736842, (((closure)  k_736842)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736397, (((closure)  k_736397)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736390, (((closure)  k_736390)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_736842, (((closure)  k_736842)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736397, (((closure)  k_736397)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736390, (((closure)  k_736390)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_736842, (((closure)  k_736842)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736397, (((closure)  k_736397)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736390, (((closure)  k_736390)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_736842, (((closure)  k_736842)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736397, (((closure)  k_736397)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736390, (((closure)  k_736390)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_736842, (((closure)  k_736842)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736397, (((closure)  k_736397)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736390, (((closure)  k_736390)->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_1040(void *data, object self_7313969, int argc, object *args) /* object self_7313969, object r_736861 */
-+static void __lambda_1040(void *data, object self_7312723, int argc, object *args) /* object self_7312723, object r_736416 */
++static void __lambda_1040(void *data, object self_7312716, int argc, object *args) /* object self_7312716, object r_736409 */
   {
 - object r_736861 = args[0];
-+ object r_736416 = args[0];
++ object r_736409 = args[0];
    
 -closureN_type c_7324171;
 -object e_7324228 [3];
@@ -16905,43 +16899,43 @@ Make let-values be the same as let*-values, to work around
 -c_7324171.elements[0] = ((closureN)self_7313969)->elements[0];
 -c_7324171.elements[1] = r_736861;
 -c_7324171.elements[2] = ((closureN)self_7313969)->elements[2];
-+closureN_type c_7322878;
-+object e_7322935 [3];
-+c_7322878.hdr.mark = gc_color_red;
-+ c_7322878.hdr.grayed = 0;
-+c_7322878.tag = closureN_tag;
-+ c_7322878.fn = (function_type)__lambda_1041;
-+c_7322878.num_args = 1;
-+c_7322878.num_elements = 3;
-+c_7322878.elements = (object *)e_7322935;
-+c_7322878.elements[0] = ((closureN)self_7312723)->elements[0];
-+c_7322878.elements[1] = r_736416;
-+c_7322878.elements[2] = ((closureN)self_7312723)->elements[2];
++closureN_type c_7322871;
++object e_7322928 [3];
++c_7322871.hdr.mark = gc_color_red;
++ c_7322871.hdr.grayed = 0;
++c_7322871.tag = closureN_tag;
++ c_7322871.fn = (function_type)__lambda_1041;
++c_7322871.num_args = 1;
++c_7322871.num_elements = 3;
++c_7322871.elements = (object *)e_7322928;
++c_7322871.elements[0] = ((closureN)self_7312716)->elements[0];
++c_7322871.elements[1] = r_736409;
++c_7322871.elements[2] = ((closureN)self_7312716)->elements[2];
  
 -return_closcall2(data,  ((closureN)self_7313969)->elements[1],  &c_7324171, quote_let_85_91values);; 
-+return_closcall2(data,  ((closureN)self_7312723)->elements[1],  &c_7322878, quote_let_85_91values);; 
++return_closcall2(data,  ((closureN)self_7312716)->elements[1],  &c_7322871, quote_let_85_91values);; 
  }
  
 -static void __lambda_1041(void *data, object self_7313970, int argc, object *args) /* object self_7313970, object r_736870_738711_738719_738726 */
-+static void __lambda_1041(void *data, object self_7312724, int argc, object *args) /* object self_7312724, object r_736425_737943_737951_737958 */
++static void __lambda_1041(void *data, object self_7312717, int argc, object *args) /* object self_7312717, object r_736418_737936_737944_737951 */
   {
 - object r_736870_738711_738719_738726 = args[0];
-+ object r_736425_737943_737951_737958 = args[0];
++ object r_736418_737936_737944_737951 = args[0];
    
 -pair_type local_7324176; 
-+pair_type local_7322883; 
++pair_type local_7322876; 
  
 -pair_type local_7324179; 
-+pair_type local_7322886; 
++pair_type local_7322879; 
  
 -pair_type local_7324183; 
-+pair_type local_7322890; 
++pair_type local_7322883; 
  
 -pair_type local_7324186; 
-+pair_type local_7322893; 
++pair_type local_7322886; 
  
 -pair_type local_7324189; 
-+pair_type local_7322896; 
++pair_type local_7322889; 
  
  
  
@@ -16950,7 +16944,7 @@ Make let-values be the same as let*-values, to work around
  
  
 -pair_type local_7324201; 
-+pair_type local_7322908; 
++pair_type local_7322901; 
  
  
  
@@ -16959,13 +16953,13 @@ Make let-values be the same as let*-values, to work around
  
  
 -pair_type local_7324213; 
-+pair_type local_7322920; 
++pair_type local_7322913; 
  
 -pair_type local_7324216; 
-+pair_type local_7322923; 
++pair_type local_7322916; 
  
 -pair_type local_7324219; 
-+pair_type local_7322926; 
++pair_type local_7322919; 
  
  
  
@@ -16973,21 +16967,21 @@ Make let-values be the same as let*-values, to work around
  
  
 -return_direct_with_clo1(data,  ((closureN)self_7313970)->elements[0], (((closure)  ((closureN)self_7313970)->elements[0])->fn),  set_pair_as_expr(&local_7324176, set_pair_as_expr(&local_7324179, ((closureN)self_7313970)->elements[1], set_pair_as_expr(&local_7324183, set_pair_as_expr(&local_7324186, set_pair_as_expr(&local_7324189, Cyc_car(data, Cyc_car(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7313970)->elements[2])))), set_pair_as_expr(&local_7324201, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7313970)->elements[2])))), NULL)), NULL), set_pair_as_expr(&local_7324213, set_pair_as_expr(&local_7324216, r_736870_738711_738719_738726, set_pair_as_expr(&local_7324219, Cyc_cdr(data, Cyc_car(data, ((closureN)self_7313970)->elements[2])), Cyc_cdr(data, ((closureN)self_7313970)->elements[2]))), NULL))), boolean_f));; 
-+return_direct_with_clo1(data,  ((closureN)self_7312724)->elements[0], (((closure)  ((closureN)self_7312724)->elements[0])->fn),  set_pair_as_expr(&local_7322883, set_pair_as_expr(&local_7322886, ((closureN)self_7312724)->elements[1], set_pair_as_expr(&local_7322890, set_pair_as_expr(&local_7322893, set_pair_as_expr(&local_7322896, Cyc_car(data, Cyc_car(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7312724)->elements[2])))), set_pair_as_expr(&local_7322908, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7312724)->elements[2])))), NULL)), NULL), set_pair_as_expr(&local_7322920, set_pair_as_expr(&local_7322923, r_736425_737943_737951_737958, set_pair_as_expr(&local_7322926, Cyc_cdr(data, Cyc_car(data, ((closureN)self_7312724)->elements[2])), Cyc_cdr(data, ((closureN)self_7312724)->elements[2]))), NULL))), boolean_f));; 
++return_direct_with_clo1(data,  ((closureN)self_7312717)->elements[0], (((closure)  ((closureN)self_7312717)->elements[0])->fn),  set_pair_as_expr(&local_7322876, set_pair_as_expr(&local_7322879, ((closureN)self_7312717)->elements[1], set_pair_as_expr(&local_7322883, set_pair_as_expr(&local_7322886, set_pair_as_expr(&local_7322889, Cyc_car(data, Cyc_car(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7312717)->elements[2])))), set_pair_as_expr(&local_7322901, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7312717)->elements[2])))), NULL)), NULL), set_pair_as_expr(&local_7322913, set_pair_as_expr(&local_7322916, r_736418_737936_737944_737951, set_pair_as_expr(&local_7322919, Cyc_cdr(data, Cyc_car(data, ((closureN)self_7312717)->elements[2])), Cyc_cdr(data, ((closureN)self_7312717)->elements[2]))), NULL))), boolean_f));; 
  }
  
 -static void __lambda_1034(void *data, object self_7313971, int argc, object *args) /* object self_7313971, object k_736884 */
-+static void __lambda_1034(void *data, object self_7312725, int argc, object *args) /* object self_7312725, object k_736439 */
++static void __lambda_1034(void *data, object self_7312718, int argc, object *args) /* object self_7312718, object k_736432 */
   {
 - object k_736884 = args[0];
-+ object k_736439 = args[0];
++ object k_736432 = args[0];
      
 -if( (boolean_f != Cyc_is_pair(((closureN)self_7313971)->elements[1])) ){ 
-+if( (boolean_f != Cyc_is_pair(((closureN)self_7312725)->elements[1])) ){ 
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312718)->elements[1])) ){ 
      
    
 -if( (boolean_f != Cyc_is_null(Cyc_car(data, ((closureN)self_7313971)->elements[1]))) ){ 
-+if( (boolean_f != Cyc_is_null(Cyc_car(data, ((closureN)self_7312725)->elements[1]))) ){ 
++if( (boolean_f != Cyc_is_null(Cyc_car(data, ((closureN)self_7312718)->elements[1]))) ){ 
    
 -closureN_type c_7324085;
 -object e_7324097 [2];
@@ -17000,54 +16994,53 @@ Make let-values be the same as let*-values, to work around
 -c_7324085.elements = (object *)e_7324097;
 -c_7324085.elements[0] = k_736884;
 -c_7324085.elements[1] = ((closureN)self_7313971)->elements[1];
-+closureN_type c_7322792;
-+object e_7322804 [2];
-+c_7322792.hdr.mark = gc_color_red;
-+ c_7322792.hdr.grayed = 0;
-+c_7322792.tag = closureN_tag;
-+ c_7322792.fn = (function_type)__lambda_1035;
-+c_7322792.num_args = 1;
-+c_7322792.num_elements = 2;
-+c_7322792.elements = (object *)e_7322804;
-+c_7322792.elements[0] = k_736439;
-+c_7322792.elements[1] = ((closureN)self_7312725)->elements[1];
++closureN_type c_7322785;
++object e_7322797 [2];
++c_7322785.hdr.mark = gc_color_red;
++ c_7322785.hdr.grayed = 0;
++c_7322785.tag = closureN_tag;
++ c_7322785.fn = (function_type)__lambda_1035;
++c_7322785.num_args = 1;
++c_7322785.num_elements = 2;
++c_7322785.elements = (object *)e_7322797;
++c_7322785.elements[0] = k_736432;
++c_7322785.elements[1] = ((closureN)self_7312718)->elements[1];
  
 -return_closcall2(data,  ((closureN)self_7313971)->elements[0],  &c_7324085, quote_begin);
-+return_closcall2(data,  ((closureN)self_7312725)->elements[0],  &c_7322792, quote_begin);
++return_closcall2(data,  ((closureN)self_7312718)->elements[0],  &c_7322785, quote_begin);
  } else { 
 -  return_direct_with_clo1(data,  k_736884, (((closure)  k_736884)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736439, (((closure)  k_736439)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736432, (((closure)  k_736432)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_736884, (((closure)  k_736884)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736439, (((closure)  k_736439)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736432, (((closure)  k_736432)->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_1035(void *data, object self_7313972, int argc, object *args) /* object self_7313972, object r_736890 */
-+static void __lambda_1035(void *data, object self_7312726, int argc, object *args) /* object self_7312726, object r_736445 */
++static void __lambda_1035(void *data, object self_7312719, int argc, object *args) /* object self_7312719, object r_736438 */
   {
 - object r_736890 = args[0];
-+ object r_736445 = args[0];
++ object r_736438 = args[0];
    
 -pair_type local_7324090; 
-+pair_type local_7322797; 
++pair_type local_7322790; 
  
 -pair_type local_7324093; 
-+pair_type local_7322800; 
++pair_type local_7322793; 
  
  
 -return_direct_with_clo1(data,  ((closureN)self_7313972)->elements[0], (((closure)  ((closureN)self_7313972)->elements[0])->fn),  set_pair_as_expr(&local_7324090, set_pair_as_expr(&local_7324093, r_736890, Cyc_cdr(data, ((closureN)self_7313972)->elements[1])), boolean_f));; 
-+return_direct_with_clo1(data,  ((closureN)self_7312726)->elements[0], (((closure)  ((closureN)self_7312726)->elements[0])->fn),  set_pair_as_expr(&local_7322797, set_pair_as_expr(&local_7322800, r_736445, Cyc_cdr(data, ((closureN)self_7312726)->elements[1])), boolean_f));; 
++return_direct_with_clo1(data,  ((closureN)self_7312719)->elements[0], (((closure)  ((closureN)self_7312719)->elements[0])->fn),  set_pair_as_expr(&local_7322790, set_pair_as_expr(&local_7322793, r_736438, Cyc_cdr(data, ((closureN)self_7312719)->elements[1])), boolean_f));; 
  }
  
 -static void __lambda_1011(void *data, object _, int argc, object *args) /* closure _,object k_736734, object expr_731489_731509_731544_733651, object rename_731490_731510_731545_733652, object compare_731491_731511_731546_733653 */
-+static void __lambda_1011(void *data, object _, int argc, object *args) /* closure _,object k_736289, object expr_731490_731511_731546_733311, object rename_731491_731512_731547_733312, object compare_731492_731513_731548_733313 */
++static void __lambda_1011(void *data, object _, int argc, object *args) /* closure _,object k_736282, object expr_731489_731509_731544_733304, object rename_731490_731510_731545_733305, object compare_731491_731511_731546_733306 */
   {
 -object k_736734 = args[0]; object expr_731489_731509_731544_733651 = args[1]; object rename_731490_731510_731545_733652 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:letrec*");
-+object k_736289 = args[0]; object expr_731490_731511_731546_733311 = args[1]; object rename_731491_731512_731547_733312 = args[2];
-+  Cyc_st_add(data, "base.sld:letrec*");
++object k_736282 = args[0]; object expr_731489_731509_731544_733304 = args[1]; object rename_731490_731510_731545_733305 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:letrec*");
  
 -closureN_type c_7323893;
 -object e_7324067 [3];
@@ -17061,31 +17054,16 @@ Make let-values be the same as let*-values, to work around
 -c_7323893.elements[0] = expr_731489_731509_731544_733651;
 -c_7323893.elements[1] = k_736734;
 -c_7323893.elements[2] = rename_731490_731510_731545_733652;
-+closureN_type c_7322600;
-+object e_7322774 [3];
-+c_7322600.hdr.mark = gc_color_red;
-+ c_7322600.hdr.grayed = 0;
-+c_7322600.tag = closureN_tag;
-+ c_7322600.fn = (function_type)__lambda_1012;
-+c_7322600.num_args = 1;
-+c_7322600.num_elements = 3;
-+c_7322600.elements = (object *)e_7322774;
-+c_7322600.elements[0] = expr_731490_731511_731546_733311;
-+c_7322600.elements[1] = k_736289;
-+c_7322600.elements[2] = rename_731491_731512_731547_733312;
- 
- 
- 
+-
+-
+-
 -return_direct_with_clo1(data,(closure)&c_7323893,__lambda_1012,  Cyc_cdr(data, expr_731489_731509_731544_733651));; 
-+return_direct_with_clo1(data,(closure)&c_7322600,__lambda_1012,  Cyc_cdr(data, expr_731490_731511_731546_733311));; 
- }
- 
+-}
+-
 -static void __lambda_1012(void *data, object self_7313933, int argc, object *args) /* object self_7313933, object v_931_731497_731516_731548_733655 */
-+static void __lambda_1012(void *data, object self_7312687, int argc, object *args) /* object self_7312687, object v_931_731499_731518_731550_733315 */
-  {
+- {
 - object v_931_731497_731516_731548_733655 = args[0];
-+ object v_931_731499_731518_731550_733315 = args[0];
-   
+-  
 -closureN_type c_7323895;
 -object e_7324042 [2];
 -c_7323895.hdr.mark = gc_color_red;
@@ -17097,19 +17075,8 @@ Make let-values be the same as let*-values, to work around
 -c_7323895.elements = (object *)e_7324042;
 -c_7323895.elements[0] = ((closureN)self_7313933)->elements[2];
 -c_7323895.elements[1] = v_931_731497_731516_731548_733655;
-+closureN_type c_7322602;
-+object e_7322749 [2];
-+c_7322602.hdr.mark = gc_color_red;
-+ c_7322602.hdr.grayed = 0;
-+c_7322602.tag = closureN_tag;
-+ c_7322602.fn = (function_type)__lambda_1013;
-+c_7322602.num_args = 0;
-+c_7322602.num_elements = 2;
-+c_7322602.elements = (object *)e_7322749;
-+c_7322602.elements[0] = ((closureN)self_7312687)->elements[2];
-+c_7322602.elements[1] = v_931_731499_731518_731550_733315;
- 
- 
+-
+-
 -closureN_type c_7324043;
 -object e_7324066 [2];
 -c_7324043.hdr.mark = gc_color_red;
@@ -17121,28 +17088,14 @@ Make let-values be the same as let*-values, to work around
 -c_7324043.elements = (object *)e_7324066;
 -c_7324043.elements[0] = ((closureN)self_7313933)->elements[0];
 -c_7324043.elements[1] = ((closureN)self_7313933)->elements[1];
-+closureN_type c_7322750;
-+object e_7322773 [2];
-+c_7322750.hdr.mark = gc_color_red;
-+ c_7322750.hdr.grayed = 0;
-+c_7322750.tag = closureN_tag;
-+ c_7322750.fn = (function_type)__lambda_1028;
-+c_7322750.num_args = 1;
-+c_7322750.num_elements = 2;
-+c_7322750.elements = (object *)e_7322773;
-+c_7322750.elements[0] = ((closureN)self_7312687)->elements[0];
-+c_7322750.elements[1] = ((closureN)self_7312687)->elements[1];
- 
+-
 -return_direct_with_clo1(data,(closure)&c_7323895,__lambda_1013,  &c_7324043);; 
-+return_direct_with_clo1(data,(closure)&c_7322602,__lambda_1013,  &c_7322750);; 
- }
- 
+-}
+-
 -static void __lambda_1028(void *data, object self_7313934, int argc, object *args) /* object self_7313934, object tmp_731513_731515_731547_733654 */
-+static void __lambda_1028(void *data, object self_7312688, int argc, object *args) /* object self_7312688, object tmp_731515_731517_731549_733314 */
-  {
+- {
 - object tmp_731513_731515_731547_733654 = args[0];
-+ object tmp_731515_731517_731549_733314 = args[0];
-   
+-  
 -closureN_type c_7324045;
 -object e_7324059 [2];
 -c_7324045.hdr.mark = gc_color_red;
@@ -17154,19 +17107,8 @@ Make let-values be the same as let*-values, to work around
 -c_7324045.elements = (object *)e_7324059;
 -c_7324045.elements[0] = ((closureN)self_7313934)->elements[0];
 -c_7324045.elements[1] = tmp_731513_731515_731547_733654;
-+closureN_type c_7322752;
-+object e_7322766 [2];
-+c_7322752.hdr.mark = gc_color_red;
-+ c_7322752.hdr.grayed = 0;
-+c_7322752.tag = closureN_tag;
-+ c_7322752.fn = (function_type)__lambda_1029;
-+c_7322752.num_args = 0;
-+c_7322752.num_elements = 2;
-+c_7322752.elements = (object *)e_7322766;
-+c_7322752.elements[0] = ((closureN)self_7312688)->elements[0];
-+c_7322752.elements[1] = tmp_731515_731517_731549_733314;
- 
- 
+-
+-
 -closureN_type c_7324060;
 -object e_7324065 [1];
 -c_7324060.hdr.mark = gc_color_red;
@@ -17177,41 +17119,108 @@ Make let-values be the same as let*-values, to work around
 -c_7324060.num_elements = 1;
 -c_7324060.elements = (object *)e_7324065;
 -c_7324060.elements[0] = ((closureN)self_7313934)->elements[1];
-+closureN_type c_7322767;
-+object e_7322772 [1];
-+c_7322767.hdr.mark = gc_color_red;
-+ c_7322767.hdr.grayed = 0;
-+c_7322767.tag = closureN_tag;
-+ c_7322767.fn = (function_type)__lambda_1031;
-+c_7322767.num_args = 1;
-+c_7322767.num_elements = 1;
-+c_7322767.elements = (object *)e_7322772;
-+c_7322767.elements[0] = ((closureN)self_7312688)->elements[1];
++closureN_type c_7322593;
++object e_7322767 [3];
++c_7322593.hdr.mark = gc_color_red;
++ c_7322593.hdr.grayed = 0;
++c_7322593.tag = closureN_tag;
++ c_7322593.fn = (function_type)__lambda_1012;
++c_7322593.num_args = 1;
++c_7322593.num_elements = 3;
++c_7322593.elements = (object *)e_7322767;
++c_7322593.elements[0] = expr_731489_731509_731544_733304;
++c_7322593.elements[1] = k_736282;
++c_7322593.elements[2] = rename_731490_731510_731545_733305;
++
++
++
++return_direct_with_clo1(data,(closure)&c_7322593,__lambda_1012,  Cyc_cdr(data, expr_731489_731509_731544_733304));; 
++}
++
++static void __lambda_1012(void *data, object self_7312680, int argc, object *args) /* object self_7312680, object v_931_731497_731516_731548_733308 */
++ {
++ object v_931_731497_731516_731548_733308 = args[0];
++  
++closureN_type c_7322595;
++object e_7322742 [2];
++c_7322595.hdr.mark = gc_color_red;
++ c_7322595.hdr.grayed = 0;
++c_7322595.tag = closureN_tag;
++ c_7322595.fn = (function_type)__lambda_1013;
++c_7322595.num_args = 0;
++c_7322595.num_elements = 2;
++c_7322595.elements = (object *)e_7322742;
++c_7322595.elements[0] = ((closureN)self_7312680)->elements[2];
++c_7322595.elements[1] = v_931_731497_731516_731548_733308;
++
++
++closureN_type c_7322743;
++object e_7322766 [2];
++c_7322743.hdr.mark = gc_color_red;
++ c_7322743.hdr.grayed = 0;
++c_7322743.tag = closureN_tag;
++ c_7322743.fn = (function_type)__lambda_1028;
++c_7322743.num_args = 1;
++c_7322743.num_elements = 2;
++c_7322743.elements = (object *)e_7322766;
++c_7322743.elements[0] = ((closureN)self_7312680)->elements[0];
++c_7322743.elements[1] = ((closureN)self_7312680)->elements[1];
++
++return_direct_with_clo1(data,(closure)&c_7322595,__lambda_1013,  &c_7322743);; 
++}
++
++static void __lambda_1028(void *data, object self_7312681, int argc, object *args) /* object self_7312681, object tmp_731513_731515_731547_733307 */
++ {
++ object tmp_731513_731515_731547_733307 = args[0];
++  
++closureN_type c_7322745;
++object e_7322759 [2];
++c_7322745.hdr.mark = gc_color_red;
++ c_7322745.hdr.grayed = 0;
++c_7322745.tag = closureN_tag;
++ c_7322745.fn = (function_type)__lambda_1029;
++c_7322745.num_args = 0;
++c_7322745.num_elements = 2;
++c_7322745.elements = (object *)e_7322759;
++c_7322745.elements[0] = ((closureN)self_7312681)->elements[0];
++c_7322745.elements[1] = tmp_731513_731515_731547_733307;
++
++
++closureN_type c_7322760;
++object e_7322765 [1];
++c_7322760.hdr.mark = gc_color_red;
++ c_7322760.hdr.grayed = 0;
++c_7322760.tag = closureN_tag;
++ c_7322760.fn = (function_type)__lambda_1031;
++c_7322760.num_args = 1;
++c_7322760.num_elements = 1;
++c_7322760.elements = (object *)e_7322765;
++c_7322760.elements[0] = ((closureN)self_7312681)->elements[1];
  
 -return_direct_with_clo1(data,(closure)&c_7324045,__lambda_1029,  &c_7324060);; 
-+return_direct_with_clo1(data,(closure)&c_7322752,__lambda_1029,  &c_7322767);; 
++return_direct_with_clo1(data,(closure)&c_7322745,__lambda_1029,  &c_7322760);; 
  }
  
 -static void __lambda_1031(void *data, object self_7313935, int argc, object *args) /* object self_7313935, object r_736735 */
-+static void __lambda_1031(void *data, object self_7312689, int argc, object *args) /* object self_7312689, object r_736290 */
++static void __lambda_1031(void *data, object self_7312682, int argc, object *args) /* object self_7312682, object r_736283 */
   {
 - object r_736735 = args[0];
-+ object r_736290 = args[0];
++ object r_736283 = args[0];
    
  
 -return_direct_with_clo1(data,  ((closureN)self_7313935)->elements[0], (((closure)  ((closureN)self_7313935)->elements[0])->fn),  Cyc_car(data, r_736735));; 
-+return_direct_with_clo1(data,  ((closureN)self_7312689)->elements[0], (((closure)  ((closureN)self_7312689)->elements[0])->fn),  Cyc_car(data, r_736290));; 
++return_direct_with_clo1(data,  ((closureN)self_7312682)->elements[0], (((closure)  ((closureN)self_7312682)->elements[0])->fn),  Cyc_car(data, r_736283));; 
  }
  
 -static void __lambda_1029(void *data, object self_7313936, int argc, object *args) /* object self_7313936, object k_736737 */
-+static void __lambda_1029(void *data, object self_7312690, int argc, object *args) /* object self_7312690, object k_736292 */
++static void __lambda_1029(void *data, object self_7312683, int argc, object *args) /* object self_7312683, object k_736285 */
   {
 - object k_736737 = args[0];
 -  if( (boolean_f != ((closureN)self_7313936)->elements[1]) ){ 
 -  return_direct_with_clo1(data,  k_736737, (((closure)  k_736737)->fn),  ((closureN)self_7313936)->elements[1]);
-+ object k_736292 = args[0];
-+  if( (boolean_f != ((closureN)self_7312690)->elements[1]) ){ 
-+  return_direct_with_clo1(data,  k_736292, (((closure)  k_736292)->fn),  ((closureN)self_7312690)->elements[1]);
++ object k_736285 = args[0];
++  if( (boolean_f != ((closureN)self_7312683)->elements[1]) ){ 
++  return_direct_with_clo1(data,  k_736285, (((closure)  k_736285)->fn),  ((closureN)self_7312683)->elements[1]);
  } else { 
    
 -closureN_type c_7324050;
@@ -17224,45 +17233,45 @@ Make let-values be the same as let*-values, to work around
 -c_7324050.num_elements = 1;
 -c_7324050.elements = (object *)e_7324056;
 -c_7324050.elements[0] = k_736737;
-+closureN_type c_7322757;
-+object e_7322763 [1];
-+c_7322757.hdr.mark = gc_color_red;
-+ c_7322757.hdr.grayed = 0;
-+c_7322757.tag = closureN_tag;
-+ c_7322757.fn = (function_type)__lambda_1030;
-+c_7322757.num_args = 1;
-+c_7322757.num_elements = 1;
-+c_7322757.elements = (object *)e_7322763;
-+c_7322757.elements[0] = k_736292;
++closureN_type c_7322750;
++object e_7322756 [1];
++c_7322750.hdr.mark = gc_color_red;
++ c_7322750.hdr.grayed = 0;
++c_7322750.tag = closureN_tag;
++ c_7322750.fn = (function_type)__lambda_1030;
++c_7322750.num_args = 1;
++c_7322750.num_elements = 1;
++c_7322750.elements = (object *)e_7322756;
++c_7322750.elements[0] = k_736285;
  
  
 -make_utf8_string_with_len(c_7324057, "no expansion for", 16, 16);
 -return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_7324050, &c_7324057, ((closureN)self_7313936)->elements[0]);}
-+make_utf8_string_with_len(c_7322764, "no expansion for", 16, 16);
-+return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_7322757, &c_7322764, ((closureN)self_7312690)->elements[0]);}
++make_utf8_string_with_len(c_7322757, "no expansion for", 16, 16);
++return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_7322750, &c_7322757, ((closureN)self_7312683)->elements[0]);}
  ;; 
  }
  
 -static void __lambda_1030(void *data, object self_7313937, int argc, object *args) /* object self_7313937, object r_736738 */
-+static void __lambda_1030(void *data, object self_7312691, int argc, object *args) /* object self_7312691, object r_736293 */
++static void __lambda_1030(void *data, object self_7312684, int argc, object *args) /* object self_7312684, object r_736286 */
   {
 - object r_736738 = args[0];
-+ object r_736293 = args[0];
++ object r_736286 = args[0];
    
 -pair_type local_7324055; 
 -return_direct_with_clo1(data,  ((closureN)self_7313937)->elements[0], (((closure)  ((closureN)self_7313937)->elements[0])->fn),  set_pair_as_expr(&local_7324055, r_736738, boolean_f));; 
-+pair_type local_7322762; 
-+return_direct_with_clo1(data,  ((closureN)self_7312691)->elements[0], (((closure)  ((closureN)self_7312691)->elements[0])->fn),  set_pair_as_expr(&local_7322762, r_736293, boolean_f));; 
++pair_type local_7322755; 
++return_direct_with_clo1(data,  ((closureN)self_7312684)->elements[0], (((closure)  ((closureN)self_7312684)->elements[0])->fn),  set_pair_as_expr(&local_7322755, r_736286, boolean_f));; 
  }
  
 -static void __lambda_1013(void *data, object self_7313938, int argc, object *args) /* object self_7313938, object k_736740 */
-+static void __lambda_1013(void *data, object self_7312692, int argc, object *args) /* object self_7312692, object k_736295 */
++static void __lambda_1013(void *data, object self_7312685, int argc, object *args) /* object self_7312685, object k_736288 */
   {
 - object k_736740 = args[0];
-+ object k_736295 = args[0];
++ object k_736288 = args[0];
      
 -if( (boolean_f != Cyc_is_pair(((closureN)self_7313938)->elements[1])) ){ 
-+if( (boolean_f != Cyc_is_pair(((closureN)self_7312692)->elements[1])) ){ 
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312685)->elements[1])) ){ 
    
 -closureN_type c_7323900;
 -object e_7324037 [3];
@@ -17276,34 +17285,34 @@ Make let-values be the same as let*-values, to work around
 -c_7323900.elements[0] = k_736740;
 -c_7323900.elements[1] = ((closureN)self_7313938)->elements[0];
 -c_7323900.elements[2] = ((closureN)self_7313938)->elements[1];
-+closureN_type c_7322607;
-+object e_7322744 [3];
-+c_7322607.hdr.mark = gc_color_red;
-+ c_7322607.hdr.grayed = 0;
-+c_7322607.tag = closureN_tag;
-+ c_7322607.fn = (function_type)__lambda_1014;
-+c_7322607.num_args = 3;
-+c_7322607.num_elements = 3;
-+c_7322607.elements = (object *)e_7322744;
-+c_7322607.elements[0] = k_736295;
-+c_7322607.elements[1] = ((closureN)self_7312692)->elements[0];
-+c_7322607.elements[2] = ((closureN)self_7312692)->elements[1];
++closureN_type c_7322600;
++object e_7322737 [3];
++c_7322600.hdr.mark = gc_color_red;
++ c_7322600.hdr.grayed = 0;
++c_7322600.tag = closureN_tag;
++ c_7322600.fn = (function_type)__lambda_1014;
++c_7322600.num_args = 3;
++c_7322600.num_elements = 3;
++c_7322600.elements = (object *)e_7322737;
++c_7322600.elements[0] = k_736288;
++c_7322600.elements[1] = ((closureN)self_7312685)->elements[0];
++c_7322600.elements[2] = ((closureN)self_7312685)->elements[1];
  
  
  
 -return_direct_with_clo3(data,(closure)&c_7323900,__lambda_1014,  Cyc_car(data, ((closureN)self_7313938)->elements[1]), NULL, NULL);
-+return_direct_with_clo3(data,(closure)&c_7322607,__lambda_1014,  Cyc_car(data, ((closureN)self_7312692)->elements[1]), NULL, NULL);
++return_direct_with_clo3(data,(closure)&c_7322600,__lambda_1014,  Cyc_car(data, ((closureN)self_7312685)->elements[1]), NULL, NULL);
  } else { 
 -  return_direct_with_clo1(data,  k_736740, (((closure)  k_736740)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736295, (((closure)  k_736295)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736288, (((closure)  k_736288)->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_1014(void *data, object self_7313939, int argc, object *args) /* object self_7313939, object w_933_731499_731520_731550_733657, object var_91ls5_731501_731521_731551_733658, object val_91ls6_731502_731522_731552_733659 */
-+static void __lambda_1014(void *data, object self_7312693, int argc, object *args) /* object self_7312693, object w_933_731501_731522_731552_733317, object var_91ls5_731503_731523_731553_733318, object val_91ls6_731504_731524_731554_733319 */
++static void __lambda_1014(void *data, object self_7312686, int argc, object *args) /* object self_7312686, object w_933_731499_731520_731550_733310, object var_91ls5_731501_731521_731551_733311, object val_91ls6_731502_731522_731552_733312 */
   {
 - object w_933_731499_731520_731550_733657 = args[0]; object var_91ls5_731501_731521_731551_733658 = args[1]; object val_91ls6_731502_731522_731552_733659 = args[2];
-+ object w_933_731501_731522_731552_733317 = args[0]; object var_91ls5_731503_731523_731553_733318 = args[1]; object val_91ls6_731504_731524_731554_733319 = args[2];
++ object w_933_731499_731520_731550_733310 = args[0]; object var_91ls5_731501_731521_731551_733311 = args[1]; object val_91ls6_731502_731522_731552_733312 = args[2];
    
 -closureN_type c_7323902;
 -object e_7324036 [6];
@@ -17320,31 +17329,31 @@ Make let-values be the same as let*-values, to work around
 -c_7323902.elements[3] = val_91ls6_731502_731522_731552_733659;
 -c_7323902.elements[4] = var_91ls5_731501_731521_731551_733658;
 -c_7323902.elements[5] = w_933_731499_731520_731550_733657;
-+closureN_type c_7322609;
-+object e_7322743 [6];
-+c_7322609.hdr.mark = gc_color_red;
-+ c_7322609.hdr.grayed = 0;
-+c_7322609.tag = closureN_tag;
-+ c_7322609.fn = (function_type)__lambda_1015;
-+c_7322609.num_args = 1;
-+c_7322609.num_elements = 6;
-+c_7322609.elements = (object *)e_7322743;
-+c_7322609.elements[0] = ((closureN)self_7312693)->elements[0];
-+c_7322609.elements[1] = ((closureN)self_7312693)->elements[1];
-+c_7322609.elements[2] = ((closureN)self_7312693)->elements[2];
-+c_7322609.elements[3] = val_91ls6_731504_731524_731554_733319;
-+c_7322609.elements[4] = var_91ls5_731503_731523_731553_733318;
-+c_7322609.elements[5] = w_933_731501_731522_731552_733317;
++closureN_type c_7322602;
++object e_7322736 [6];
++c_7322602.hdr.mark = gc_color_red;
++ c_7322602.hdr.grayed = 0;
++c_7322602.tag = closureN_tag;
++ c_7322602.fn = (function_type)__lambda_1015;
++c_7322602.num_args = 1;
++c_7322602.num_elements = 6;
++c_7322602.elements = (object *)e_7322736;
++c_7322602.elements[0] = ((closureN)self_7312686)->elements[0];
++c_7322602.elements[1] = ((closureN)self_7312686)->elements[1];
++c_7322602.elements[2] = ((closureN)self_7312686)->elements[2];
++c_7322602.elements[3] = val_91ls6_731502_731522_731552_733312;
++c_7322602.elements[4] = var_91ls5_731501_731521_731551_733311;
++c_7322602.elements[5] = w_933_731499_731520_731550_733310;
  
 -return_direct_with_clo1(data,(closure)&c_7323902,__lambda_1015,  boolean_f);; 
-+return_direct_with_clo1(data,(closure)&c_7322609,__lambda_1015,  boolean_f);; 
++return_direct_with_clo1(data,(closure)&c_7322602,__lambda_1015,  boolean_f);; 
  }
  
 -static void __lambda_1015(void *data, object self_7313940, int argc, object *args) /* object self_7313940, object lp_934_731500_731523_731553_733660 */
-+static void __lambda_1015(void *data, object self_7312694, int argc, object *args) /* object self_7312694, object lp_934_731502_731525_731555_733320 */
++static void __lambda_1015(void *data, object self_7312687, int argc, object *args) /* object self_7312687, object lp_934_731500_731523_731553_733313 */
   {
 - object lp_934_731500_731523_731553_733660 = args[0];
-+ object lp_934_731502_731525_731555_733320 = args[0];
++ object lp_934_731500_731523_731553_733313 = args[0];
    
 -closureN_type c_7323904;
 -object e_7324032 [6];
@@ -17361,34 +17370,34 @@ Make let-values be the same as let*-values, to work around
 -c_7323904.elements[3] = ((closureN)self_7313940)->elements[3];
 -c_7323904.elements[4] = ((closureN)self_7313940)->elements[4];
 -c_7323904.elements[5] = ((closureN)self_7313940)->elements[5];
-+closureN_type c_7322611;
-+object e_7322739 [6];
-+c_7322611.hdr.mark = gc_color_red;
-+ c_7322611.hdr.grayed = 0;
-+c_7322611.tag = closureN_tag;
-+ c_7322611.fn = (function_type)__lambda_1381;
-+c_7322611.num_args = 1;
-+c_7322611.num_elements = 6;
-+c_7322611.elements = (object *)e_7322739;
-+c_7322611.elements[0] = ((closureN)self_7312694)->elements[0];
-+c_7322611.elements[1] = ((closureN)self_7312694)->elements[1];
-+c_7322611.elements[2] = ((closureN)self_7312694)->elements[2];
-+c_7322611.elements[3] = ((closureN)self_7312694)->elements[3];
-+c_7322611.elements[4] = ((closureN)self_7312694)->elements[4];
-+c_7322611.elements[5] = ((closureN)self_7312694)->elements[5];
++closureN_type c_7322604;
++object e_7322732 [6];
++c_7322604.hdr.mark = gc_color_red;
++ c_7322604.hdr.grayed = 0;
++c_7322604.tag = closureN_tag;
++ c_7322604.fn = (function_type)__lambda_1381;
++c_7322604.num_args = 1;
++c_7322604.num_elements = 6;
++c_7322604.elements = (object *)e_7322732;
++c_7322604.elements[0] = ((closureN)self_7312687)->elements[0];
++c_7322604.elements[1] = ((closureN)self_7312687)->elements[1];
++c_7322604.elements[2] = ((closureN)self_7312687)->elements[2];
++c_7322604.elements[3] = ((closureN)self_7312687)->elements[3];
++c_7322604.elements[4] = ((closureN)self_7312687)->elements[4];
++c_7322604.elements[5] = ((closureN)self_7312687)->elements[5];
  
  
 -pair_type local_7324035; 
 -return_direct_with_clo1(data,(closure)&c_7323904,__lambda_1428,  set_cell_as_expr(&local_7324035, lp_934_731500_731523_731553_733660));; 
-+pair_type local_7322742; 
-+return_direct_with_clo1(data,(closure)&c_7322611,__lambda_1381,  set_cell_as_expr(&local_7322742, lp_934_731502_731525_731555_733320));; 
++pair_type local_7322735; 
++return_direct_with_clo1(data,(closure)&c_7322604,__lambda_1381,  set_cell_as_expr(&local_7322735, lp_934_731500_731523_731553_733313));; 
  }
  
 -static void __lambda_1428(void *data, object self_7313941, int argc, object *args) /* object self_7313941, object lp_934_731500_731523_731553_733660 */
-+static void __lambda_1381(void *data, object self_7312695, int argc, object *args) /* object self_7312695, object lp_934_731502_731525_731555_733320 */
++static void __lambda_1381(void *data, object self_7312688, int argc, object *args) /* object self_7312688, object lp_934_731500_731523_731553_733313 */
   {
 - object lp_934_731500_731523_731553_733660 = args[0];
-+ object lp_934_731502_731525_731555_733320 = args[0];
++ object lp_934_731500_731523_731553_733313 = args[0];
    
 -closureN_type c_7323906;
 -object e_7323921 [5];
@@ -17404,20 +17413,20 @@ Make let-values be the same as let*-values, to work around
 -c_7323906.elements[2] = ((closureN)self_7313941)->elements[3];
 -c_7323906.elements[3] = ((closureN)self_7313941)->elements[4];
 -c_7323906.elements[4] = ((closureN)self_7313941)->elements[5];
-+closureN_type c_7322613;
-+object e_7322628 [5];
-+c_7322613.hdr.mark = gc_color_red;
-+ c_7322613.hdr.grayed = 0;
-+c_7322613.tag = closureN_tag;
-+ c_7322613.fn = (function_type)__lambda_1016;
-+c_7322613.num_args = 1;
-+c_7322613.num_elements = 5;
-+c_7322613.elements = (object *)e_7322628;
-+c_7322613.elements[0] = ((closureN)self_7312695)->elements[0];
-+c_7322613.elements[1] = lp_934_731502_731525_731555_733320;
-+c_7322613.elements[2] = ((closureN)self_7312695)->elements[3];
-+c_7322613.elements[3] = ((closureN)self_7312695)->elements[4];
-+c_7322613.elements[4] = ((closureN)self_7312695)->elements[5];
++closureN_type c_7322606;
++object e_7322621 [5];
++c_7322606.hdr.mark = gc_color_red;
++ c_7322606.hdr.grayed = 0;
++c_7322606.tag = closureN_tag;
++ c_7322606.fn = (function_type)__lambda_1016;
++c_7322606.num_args = 1;
++c_7322606.num_elements = 5;
++c_7322606.elements = (object *)e_7322621;
++c_7322606.elements[0] = ((closureN)self_7312688)->elements[0];
++c_7322606.elements[1] = lp_934_731500_731523_731553_733313;
++c_7322606.elements[2] = ((closureN)self_7312688)->elements[3];
++c_7322606.elements[3] = ((closureN)self_7312688)->elements[4];
++c_7322606.elements[4] = ((closureN)self_7312688)->elements[5];
  
  
 -closureN_type c_7323922;
@@ -17432,31 +17441,31 @@ Make let-values be the same as let*-values, to work around
 -c_7323922.elements[0] = lp_934_731500_731523_731553_733660;
 -c_7323922.elements[1] = ((closureN)self_7313941)->elements[1];
 -c_7323922.elements[2] = ((closureN)self_7313941)->elements[2];
-+closureN_type c_7322629;
-+object e_7322738 [3];
-+c_7322629.hdr.mark = gc_color_red;
-+ c_7322629.hdr.grayed = 0;
-+c_7322629.tag = closureN_tag;
-+ c_7322629.fn = (function_type)__lambda_1018;
-+c_7322629.num_args = 3;
-+c_7322629.num_elements = 3;
-+c_7322629.elements = (object *)e_7322738;
-+c_7322629.elements[0] = lp_934_731502_731525_731555_733320;
-+c_7322629.elements[1] = ((closureN)self_7312695)->elements[1];
-+c_7322629.elements[2] = ((closureN)self_7312695)->elements[2];
++closureN_type c_7322622;
++object e_7322731 [3];
++c_7322622.hdr.mark = gc_color_red;
++ c_7322622.hdr.grayed = 0;
++c_7322622.tag = closureN_tag;
++ c_7322622.fn = (function_type)__lambda_1018;
++c_7322622.num_args = 3;
++c_7322622.num_elements = 3;
++c_7322622.elements = (object *)e_7322731;
++c_7322622.elements[0] = lp_934_731500_731523_731553_733313;
++c_7322622.elements[1] = ((closureN)self_7312688)->elements[1];
++c_7322622.elements[2] = ((closureN)self_7312688)->elements[2];
  
 -return_direct_with_clo1(data,(closure)&c_7323906,__lambda_1016,  &c_7323922);; 
-+return_direct_with_clo1(data,(closure)&c_7322613,__lambda_1016,  &c_7322629);; 
++return_direct_with_clo1(data,(closure)&c_7322606,__lambda_1016,  &c_7322622);; 
  }
  
 -static void __lambda_1018(void *data, object self_7313942, int argc, object *args) /* object self_7313942, object k_736747, object w_933_731499_731524_731554_733661, object var_91ls5_731501_731525_731555_733662, object val_91ls6_731502_731526_731556_733663 */
-+static void __lambda_1018(void *data, object self_7312696, int argc, object *args) /* object self_7312696, object k_736302, object w_933_731501_731526_731556_733321, object var_91ls5_731503_731527_731557_733322, object val_91ls6_731504_731528_731558_733323 */
++static void __lambda_1018(void *data, object self_7312689, int argc, object *args) /* object self_7312689, object k_736295, object w_933_731499_731524_731554_733314, object var_91ls5_731501_731525_731555_733315, object val_91ls6_731502_731526_731556_733316 */
   {
 - object k_736747 = args[0]; object w_933_731499_731524_731554_733661 = args[1]; object var_91ls5_731501_731525_731555_733662 = args[2]; object val_91ls6_731502_731526_731556_733663 = args[3];
-+ object k_736302 = args[0]; object w_933_731501_731526_731556_733321 = args[1]; object var_91ls5_731503_731527_731557_733322 = args[2]; object val_91ls6_731504_731528_731558_733323 = args[3];
++ object k_736295 = args[0]; object w_933_731499_731524_731554_733314 = args[1]; object var_91ls5_731501_731525_731555_733315 = args[2]; object val_91ls6_731502_731526_731556_733316 = args[3];
      
 -if( (boolean_f != Cyc_is_null(w_933_731499_731524_731554_733661)) ){ 
-+if( (boolean_f != Cyc_is_null(w_933_731501_731526_731556_733321)) ){ 
++if( (boolean_f != Cyc_is_null(w_933_731499_731524_731554_733314)) ){ 
    
 -closureN_type c_7323926;
 -object e_7323984 [4];
@@ -17471,55 +17480,55 @@ Make let-values be the same as let*-values, to work around
 -c_7323926.elements[1] = ((closureN)self_7313942)->elements[1];
 -c_7323926.elements[2] = ((closureN)self_7313942)->elements[2];
 -c_7323926.elements[3] = val_91ls6_731502_731526_731556_733663;
-+closureN_type c_7322633;
-+object e_7322691 [4];
-+c_7322633.hdr.mark = gc_color_red;
-+ c_7322633.hdr.grayed = 0;
-+c_7322633.tag = closureN_tag;
-+ c_7322633.fn = (function_type)__lambda_1019;
-+c_7322633.num_args = 1;
-+c_7322633.num_elements = 4;
-+c_7322633.elements = (object *)e_7322691;
-+c_7322633.elements[0] = k_736302;
-+c_7322633.elements[1] = ((closureN)self_7312696)->elements[1];
-+c_7322633.elements[2] = ((closureN)self_7312696)->elements[2];
-+c_7322633.elements[3] = val_91ls6_731504_731528_731558_733323;
++closureN_type c_7322626;
++object e_7322684 [4];
++c_7322626.hdr.mark = gc_color_red;
++ c_7322626.hdr.grayed = 0;
++c_7322626.tag = closureN_tag;
++ c_7322626.fn = (function_type)__lambda_1019;
++c_7322626.num_args = 1;
++c_7322626.num_elements = 4;
++c_7322626.elements = (object *)e_7322684;
++c_7322626.elements[0] = k_736295;
++c_7322626.elements[1] = ((closureN)self_7312689)->elements[1];
++c_7322626.elements[2] = ((closureN)self_7312689)->elements[2];
++c_7322626.elements[3] = val_91ls6_731502_731526_731556_733316;
  
 -return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7323926, primitive_cons, NULL, var_91ls5_731501_731525_731555_733662);
-+return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7322633, primitive_cons, NULL, var_91ls5_731503_731527_731557_733322);
++return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7322626, primitive_cons, NULL, var_91ls5_731501_731525_731555_733315);
  } else { 
      
 -if( (boolean_f != Cyc_is_pair(w_933_731499_731524_731554_733661)) ){ 
-+if( (boolean_f != Cyc_is_pair(w_933_731501_731526_731556_733321)) ){ 
++if( (boolean_f != Cyc_is_pair(w_933_731499_731524_731554_733314)) ){ 
      
    
 -if( (boolean_f != Cyc_is_pair(Cyc_car(data, w_933_731499_731524_731554_733661))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_car(data, w_933_731501_731526_731556_733321))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, w_933_731499_731524_731554_733314))) ){ 
      
    
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, w_933_731499_731524_731554_733661)))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, w_933_731501_731526_731556_733321)))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, w_933_731499_731524_731554_733314)))) ){ 
      
    
    
    
 -if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_933_731499_731524_731554_733661))))) ){ 
-+if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_933_731501_731526_731556_733321))))) ){ 
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_933_731499_731524_731554_733314))))) ){ 
    
  
  
  
  
 -pair_type local_7324013; 
-+pair_type local_7322720; 
++pair_type local_7322713; 
  
  
  
  
  
 -pair_type local_7324020; 
-+pair_type local_7322727; 
++pair_type local_7322720; 
  
  
  
@@ -17527,31 +17536,31 @@ Make let-values be the same as let*-values, to work around
  
  
 -return_closcall4(data,  car(((closureN)self_7313942)->elements[0]),  k_736747, Cyc_cdr(data, w_933_731499_731524_731554_733661), set_pair_as_expr(&local_7324013, Cyc_car(data, Cyc_car(data, w_933_731499_731524_731554_733661)), var_91ls5_731501_731525_731555_733662), set_pair_as_expr(&local_7324020, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, w_933_731499_731524_731554_733661))), val_91ls6_731502_731526_731556_733663));
-+return_closcall4(data,  car(((closureN)self_7312696)->elements[0]),  k_736302, Cyc_cdr(data, w_933_731501_731526_731556_733321), set_pair_as_expr(&local_7322720, Cyc_car(data, Cyc_car(data, w_933_731501_731526_731556_733321)), var_91ls5_731503_731527_731557_733322), set_pair_as_expr(&local_7322727, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, w_933_731501_731526_731556_733321))), val_91ls6_731504_731528_731558_733323));
++return_closcall4(data,  car(((closureN)self_7312689)->elements[0]),  k_736295, Cyc_cdr(data, w_933_731499_731524_731554_733314), set_pair_as_expr(&local_7322713, Cyc_car(data, Cyc_car(data, w_933_731499_731524_731554_733314)), var_91ls5_731501_731525_731555_733315), set_pair_as_expr(&local_7322720, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, w_933_731499_731524_731554_733314))), val_91ls6_731502_731526_731556_733316));
  } else { 
 -  return_direct_with_clo1(data,  k_736747, (((closure)  k_736747)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736302, (((closure)  k_736302)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736295, (((closure)  k_736295)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_736747, (((closure)  k_736747)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736302, (((closure)  k_736302)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736295, (((closure)  k_736295)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_736747, (((closure)  k_736747)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736302, (((closure)  k_736302)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736295, (((closure)  k_736295)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_736747, (((closure)  k_736747)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_736302, (((closure)  k_736302)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_736295, (((closure)  k_736295)->fn),  boolean_f);}
  ;}
  ;; 
  }
  
 -static void __lambda_1019(void *data, object self_7313943, int argc, object *args) /* object self_7313943, object r_736749_7312920 */
-+static void __lambda_1019(void *data, object self_7312697, int argc, object *args) /* object self_7312697, object r_736304_7311674 */
++static void __lambda_1019(void *data, object self_7312690, int argc, object *args) /* object self_7312690, object r_736297_7311667 */
   {
 - object r_736749_7312920 = args[0];
-+ object r_736304_7311674 = args[0];
++ object r_736297_7311667 = args[0];
    
 -closureN_type c_7323928;
 -object e_7323982 [4];
@@ -17630,8 +17639,84 @@ Make let-values be the same as let*-values, to work around
 -c_7323935.elements[2] = ((closureN)self_7313946)->elements[2];
 -c_7323935.elements[3] = ((closureN)self_7313946)->elements[3];
 -c_7323935.elements[4] = ((closureN)self_7313946)->elements[4];
--
--
++closureN_type c_7322628;
++object e_7322682 [4];
++c_7322628.hdr.mark = gc_color_red;
++ c_7322628.hdr.grayed = 0;
++c_7322628.tag = closureN_tag;
++ c_7322628.fn = (function_type)__lambda_1020;
++c_7322628.num_args = 1;
++c_7322628.num_elements = 4;
++c_7322628.elements = (object *)e_7322682;
++c_7322628.elements[0] = ((closureN)self_7312690)->elements[0];
++c_7322628.elements[1] = r_736297_7311667;
++c_7322628.elements[2] = ((closureN)self_7312690)->elements[1];
++c_7322628.elements[3] = ((closureN)self_7312690)->elements[2];
++
++return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7322628, primitive_cons, NULL, ((closureN)self_7312690)->elements[3]);; 
++}
++
++static void __lambda_1020(void *data, object self_7312691, int argc, object *args) /* object self_7312691, object r_736298_7311668_7311679 */
++ {
++ object r_736298_7311668_7311679 = args[0];
++  
++closureN_type c_7322630;
++object e_7322680 [3];
++c_7322630.hdr.mark = gc_color_red;
++ c_7322630.hdr.grayed = 0;
++c_7322630.tag = closureN_tag;
++ c_7322630.fn = (function_type)__lambda_1021;
++c_7322630.num_args = 2;
++c_7322630.num_elements = 3;
++c_7322630.elements = (object *)e_7322680;
++c_7322630.elements[0] = ((closureN)self_7312691)->elements[0];
++c_7322630.elements[1] = ((closureN)self_7312691)->elements[2];
++c_7322630.elements[2] = ((closureN)self_7312691)->elements[3];
+ 
++return_direct_with_clo2(data,(closure)&c_7322630,__lambda_1021,  ((closureN)self_7312691)->elements[1], r_736298_7311668_7311679);; 
++}
++
++static void __lambda_1021(void *data, object self_7312692, int argc, object *args) /* object self_7312692, object var_731527_731557_733317_7311669_7311680, object val_731528_731558_733318_7311670_7311681 */
++ {
++ object var_731527_731557_733317_7311669_7311680 = args[0]; object val_731528_731558_733318_7311670_7311681 = args[1];
++  
++closureN_type c_7322633;
++object e_7322679 [5];
++c_7322633.hdr.mark = gc_color_red;
++ c_7322633.hdr.grayed = 0;
++c_7322633.tag = closureN_tag;
++ c_7322633.fn = (function_type)__lambda_1022;
++c_7322633.num_args = 1;
++c_7322633.num_elements = 5;
++c_7322633.elements = (object *)e_7322679;
++c_7322633.elements[0] = ((closureN)self_7312692)->elements[0];
++c_7322633.elements[1] = ((closureN)self_7312692)->elements[1];
++c_7322633.elements[2] = ((closureN)self_7312692)->elements[2];
++c_7322633.elements[3] = val_731528_731558_733318_7311670_7311681;
++c_7322633.elements[4] = var_731527_731557_733317_7311669_7311680;
++
++return_closcall2(data,  ((closureN)self_7312692)->elements[1],  &c_7322633, quote_let);; 
++}
++
++static void __lambda_1022(void *data, object self_7312693, int argc, object *args) /* object self_7312693, object r_736301_7311671_7311682 */
++ {
++ object r_736301_7311671_7311682 = args[0];
++  
++closureN_type c_7322635;
++object e_7322659 [5];
++c_7322635.hdr.mark = gc_color_red;
++ c_7322635.hdr.grayed = 0;
++c_7322635.tag = closureN_tag;
++ c_7322635.fn = (function_type)__lambda_1023;
++c_7322635.num_args = 1;
++c_7322635.num_elements = 5;
++c_7322635.elements = (object *)e_7322659;
++c_7322635.elements[0] = ((closureN)self_7312693)->elements[0];
++c_7322635.elements[1] = r_736301_7311671_7311682;
++c_7322635.elements[2] = ((closureN)self_7312693)->elements[2];
++c_7322635.elements[3] = ((closureN)self_7312693)->elements[3];
++c_7322635.elements[4] = ((closureN)self_7312693)->elements[4];
+ 
 -closureN_type c_7323960;
 -object e_7323978 [1];
 -c_7323960.hdr.mark = gc_color_red;
@@ -17642,14 +17727,28 @@ Make let-values be the same as let*-values, to work around
 -c_7323960.num_elements = 1;
 -c_7323960.elements = (object *)e_7323978;
 -c_7323960.elements[0] = ((closureN)self_7313946)->elements[1];
--
+ 
 -return_direct_with_clo1(data,(closure)&c_7323935,__lambda_1023,  &c_7323960);; 
--}
--
++closureN_type c_7322660;
++object e_7322678 [1];
++c_7322660.hdr.mark = gc_color_red;
++ c_7322660.hdr.grayed = 0;
++c_7322660.tag = closureN_tag;
++ c_7322660.fn = (function_type)__lambda_1026;
++c_7322660.num_args = 2;
++c_7322660.num_elements = 1;
++c_7322660.elements = (object *)e_7322678;
++c_7322660.elements[0] = ((closureN)self_7312693)->elements[1];
++
++return_direct_with_clo1(data,(closure)&c_7322635,__lambda_1023,  &c_7322660);; 
+ }
+ 
 -static void __lambda_1026(void *data, object self_7313947, int argc, object *args) /* object self_7313947, object k_736761_7312928_7312939, object var_731531_731561_733668_7312929_7312940, object val_731532_731562_733669_7312930_7312941 */
-- {
++static void __lambda_1026(void *data, object self_7312694, int argc, object *args) /* object self_7312694, object k_736309_7311675_7311686, object var_731531_731561_733321_7311676_7311687, object val_731532_731562_733322_7311677_7311688 */
+  {
 - object k_736761_7312928_7312939 = args[0]; object var_731531_731561_733668_7312929_7312940 = args[1]; object val_731532_731562_733669_7312930_7312941 = args[2];
--  
++ object k_736309_7311675_7311686 = args[0]; object var_731531_731561_733321_7311676_7311687 = args[1]; object val_731532_731562_733322_7311677_7311688 = args[2];
+   
 -closureN_type c_7323963;
 -object e_7323977 [3];
 -c_7323963.hdr.mark = gc_color_red;
@@ -17662,26 +17761,47 @@ Make let-values be the same as let*-values, to work around
 -c_7323963.elements[0] = k_736761_7312928_7312939;
 -c_7323963.elements[1] = val_731532_731562_733669_7312930_7312941;
 -c_7323963.elements[2] = var_731531_731561_733668_7312929_7312940;
--
++closureN_type c_7322663;
++object e_7322677 [3];
++c_7322663.hdr.mark = gc_color_red;
++ c_7322663.hdr.grayed = 0;
++c_7322663.tag = closureN_tag;
++ c_7322663.fn = (function_type)__lambda_1027;
++c_7322663.num_args = 1;
++c_7322663.num_elements = 3;
++c_7322663.elements = (object *)e_7322677;
++c_7322663.elements[0] = k_736309_7311675_7311686;
++c_7322663.elements[1] = val_731532_731562_733322_7311677_7311688;
++c_7322663.elements[2] = var_731531_731561_733321_7311676_7311687;
+ 
 -return_closcall2(data,  ((closureN)self_7313947)->elements[0],  &c_7323963, quote_define);; 
--}
--
++return_closcall2(data,  ((closureN)self_7312694)->elements[0],  &c_7322663, quote_define);; 
+ }
+ 
 -static void __lambda_1027(void *data, object self_7313948, int argc, object *args) /* object self_7313948, object r_736762_7312931_7312942 */
-- {
++static void __lambda_1027(void *data, object self_7312695, int argc, object *args) /* object self_7312695, object r_736310_7311678_7311689 */
+  {
 - object r_736762_7312931_7312942 = args[0];
--  
++ object r_736310_7311678_7311689 = args[0];
+   
 -pair_type local_7323968; 
--
++pair_type local_7322668; 
+ 
 -pair_type local_7323971; 
--
++pair_type local_7322671; 
+ 
 -pair_type local_7323975; 
 -return_direct_with_clo1(data,  ((closureN)self_7313948)->elements[0], (((closure)  ((closureN)self_7313948)->elements[0])->fn),  set_pair_as_expr(&local_7323968, r_736762_7312931_7312942, set_pair_as_expr(&local_7323971, ((closureN)self_7313948)->elements[2], set_pair_as_expr(&local_7323975, ((closureN)self_7313948)->elements[1], NULL))));; 
--}
--
++pair_type local_7322675; 
++return_direct_with_clo1(data,  ((closureN)self_7312695)->elements[0], (((closure)  ((closureN)self_7312695)->elements[0])->fn),  set_pair_as_expr(&local_7322668, r_736310_7311678_7311689, set_pair_as_expr(&local_7322671, ((closureN)self_7312695)->elements[2], set_pair_as_expr(&local_7322675, ((closureN)self_7312695)->elements[1], NULL))));; 
+ }
+ 
 -static void __lambda_1023(void *data, object self_7313949, int argc, object *args) /* object self_7313949, object r_736760_7312925_7312936 */
-- {
++static void __lambda_1023(void *data, object self_7312696, int argc, object *args) /* object self_7312696, object r_736308_7311672_7311683 */
+  {
 - object r_736760_7312925_7312936 = args[0];
--  
++ object r_736308_7311672_7311683 = args[0];
+   
 -closureN_type c_7323937;
 -object e_7323956 [3];
 -c_7323937.hdr.mark = gc_color_red;
@@ -17694,14 +17814,29 @@ Make let-values be the same as let*-values, to work around
 -c_7323937.elements[0] = ((closureN)self_7313949)->elements[0];
 -c_7323937.elements[1] = ((closureN)self_7313949)->elements[1];
 -c_7323937.elements[2] = ((closureN)self_7313949)->elements[2];
--
++closureN_type c_7322637;
++object e_7322656 [3];
++c_7322637.hdr.mark = gc_color_red;
++ c_7322637.hdr.grayed = 0;
++c_7322637.tag = closureN_tag;
++ c_7322637.fn = (function_type)__lambda_1024;
++c_7322637.num_args = 1;
++c_7322637.num_elements = 3;
++c_7322637.elements = (object *)e_7322656;
++c_7322637.elements[0] = ((closureN)self_7312696)->elements[0];
++c_7322637.elements[1] = ((closureN)self_7312696)->elements[1];
++c_7322637.elements[2] = ((closureN)self_7312696)->elements[2];
+ 
 -return_direct_with_clo4(data,  __glo_Cyc_91map_91loop_912_scheme_base, (((closure)  __glo_Cyc_91map_91loop_912_scheme_base)->fn),  &c_7323937, r_736760_7312925_7312936, ((closureN)self_7313949)->elements[4], ((closureN)self_7313949)->elements[3]);; 
--}
--
++return_direct_with_clo4(data,  __glo_Cyc_91map_91loop_912_scheme_base, (((closure)  __glo_Cyc_91map_91loop_912_scheme_base)->fn),  &c_7322637, r_736308_7311672_7311683, ((closureN)self_7312696)->elements[4], ((closureN)self_7312696)->elements[3]);; 
+ }
+ 
 -static void __lambda_1024(void *data, object self_7313950, int argc, object *args) /* object self_7313950, object r_736759_7312926_7312937 */
-- {
++static void __lambda_1024(void *data, object self_7312697, int argc, object *args) /* object self_7312697, object r_736307_7311673_7311684 */
+  {
 - object r_736759_7312926_7312937 = args[0];
--  
++ object r_736307_7311673_7311684 = args[0];
+   
 -closureN_type c_7323939;
 -object e_7323952 [2];
 -c_7323939.hdr.mark = gc_color_red;
@@ -17713,28 +17848,48 @@ Make let-values be the same as let*-values, to work around
 -c_7323939.elements = (object *)e_7323952;
 -c_7323939.elements[0] = ((closureN)self_7313950)->elements[0];
 -c_7323939.elements[1] = ((closureN)self_7313950)->elements[1];
--
--
--
++closureN_type c_7322639;
++object e_7322652 [2];
++c_7322639.hdr.mark = gc_color_red;
++ c_7322639.hdr.grayed = 0;
++c_7322639.tag = closureN_tag;
++ c_7322639.fn = (function_type)__lambda_1025;
++c_7322639.num_args = 1;
++c_7322639.num_elements = 2;
++c_7322639.elements = (object *)e_7322652;
++c_7322639.elements[0] = ((closureN)self_7312697)->elements[0];
++c_7322639.elements[1] = ((closureN)self_7312697)->elements[1];
+ 
+ 
+ 
 -return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7323939, r_736759_7312926_7312937, Cyc_cdr(data, ((closureN)self_7313950)->elements[2]));; 
--}
--
++return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7322639, r_736307_7311673_7311684, Cyc_cdr(data, ((closureN)self_7312697)->elements[2]));; 
+ }
+ 
 -static void __lambda_1025(void *data, object self_7313951, int argc, object *args) /* object self_7313951, object r_736757_7312927_7312938 */
-- {
++static void __lambda_1025(void *data, object self_7312698, int argc, object *args) /* object self_7312698, object r_736305_7311674_7311685 */
+  {
 - object r_736757_7312927_7312938 = args[0];
--  
++ object r_736305_7311674_7311685 = args[0];
+   
 -pair_type local_7323944; 
--
++pair_type local_7322644; 
+ 
 -pair_type local_7323947; 
--
++pair_type local_7322647; 
+ 
 -pair_type local_7323951; 
 -return_direct_with_clo1(data,  ((closureN)self_7313951)->elements[0], (((closure)  ((closureN)self_7313951)->elements[0])->fn),  set_pair_as_expr(&local_7323944, set_pair_as_expr(&local_7323947, ((closureN)self_7313951)->elements[1], set_pair_as_expr(&local_7323951, NULL, r_736757_7312927_7312938)), boolean_f));; 
--}
--
++pair_type local_7322651; 
++return_direct_with_clo1(data,  ((closureN)self_7312698)->elements[0], (((closure)  ((closureN)self_7312698)->elements[0])->fn),  set_pair_as_expr(&local_7322644, set_pair_as_expr(&local_7322647, ((closureN)self_7312698)->elements[1], set_pair_as_expr(&local_7322651, NULL, r_736305_7311674_7311685)), boolean_f));; 
+ }
+ 
 -static void __lambda_1016(void *data, object self_7313952, int argc, object *args) /* object self_7313952, object r_736746 */
-- {
++static void __lambda_1016(void *data, object self_7312699, int argc, object *args) /* object self_7312699, object r_736294 */
+  {
 - object r_736746 = args[0];
--  
++ object r_736294 = args[0];
+   
 -closureN_type c_7323908;
 -object e_7323917 [5];
 -c_7323908.hdr.mark = gc_color_red;
@@ -17749,25 +17904,44 @@ Make let-values be the same as let*-values, to work around
 -c_7323908.elements[2] = ((closureN)self_7313952)->elements[2];
 -c_7323908.elements[3] = ((closureN)self_7313952)->elements[3];
 -c_7323908.elements[4] = ((closureN)self_7313952)->elements[4];
--
--
--
++closureN_type c_7322608;
++object e_7322617 [5];
++c_7322608.hdr.mark = gc_color_red;
++ c_7322608.hdr.grayed = 0;
++c_7322608.tag = closureN_tag;
++ c_7322608.fn = (function_type)__lambda_1017;
++c_7322608.num_args = 1;
++c_7322608.num_elements = 5;
++c_7322608.elements = (object *)e_7322617;
++c_7322608.elements[0] = ((closureN)self_7312699)->elements[0];
++c_7322608.elements[1] = ((closureN)self_7312699)->elements[1];
++c_7322608.elements[2] = ((closureN)self_7312699)->elements[2];
++c_7322608.elements[3] = ((closureN)self_7312699)->elements[3];
++c_7322608.elements[4] = ((closureN)self_7312699)->elements[4];
+ 
+ 
+ 
 -return_direct_with_clo1(data,(closure)&c_7323908,__lambda_1017,  Cyc_set_cell(data, ((closureN)self_7313952)->elements[1], r_736746));; 
--}
--
++return_direct_with_clo1(data,(closure)&c_7322608,__lambda_1017,  Cyc_set_cell(data, ((closureN)self_7312699)->elements[1], r_736294));; 
+ }
+ 
 -static void __lambda_1017(void *data, object self_7313953, int argc, object *args) /* object self_7313953, object r_736745 */
-- {
--
--  
--
++static void __lambda_1017(void *data, object self_7312700, int argc, object *args) /* object self_7312700, object r_736293 */
+  {
+ 
+   
+ 
 -return_closcall4(data,  car(((closureN)self_7313953)->elements[1]),  ((closureN)self_7313953)->elements[0], ((closureN)self_7313953)->elements[4], ((closureN)self_7313953)->elements[3], ((closureN)self_7313953)->elements[2]);; 
--}
--
++return_closcall4(data,  car(((closureN)self_7312700)->elements[1]),  ((closureN)self_7312700)->elements[0], ((closureN)self_7312700)->elements[4], ((closureN)self_7312700)->elements[3], ((closureN)self_7312700)->elements[2]);; 
+ }
+ 
 -static void __lambda_796(void *data, object _, int argc, object *args) /* closure _,object k_736276, object expr_731231_733508, object rename_731232_733509, object compare_731233_733510 */
-- {
++static void __lambda_796(void *data, object _, int argc, object *args) /* closure _,object k_735824, object expr_731231_733161, object rename_731232_733162, object compare_731233_733163 */
+  {
 -object k_736276 = args[0]; object expr_731231_733508 = args[1]; object rename_731232_733509 = args[2]; object compare_731233_733510 = args[3];
--  Cyc_st_add(data, "scheme/base.sld:syntax-rules");
--
++object k_735824 = args[0]; object expr_731231_733161 = args[1]; object rename_731232_733162 = args[2]; object compare_731233_733163 = args[3];
+   Cyc_st_add(data, "scheme/base.sld:syntax-rules");
+ 
 -closureN_type c_7321791;
 -object e_7323888 [4];
 -c_7321791.hdr.mark = gc_color_red;
@@ -17849,14 +18023,31 @@ Make let-values be the same as let*-values, to work around
 -c_7321799.elements[3] = ((closureN)self_7313703)->elements[3];
 -c_7321799.elements[4] = r_736278;
 -c_7321799.elements[5] = ((closureN)self_7313703)->elements[4];
--
++closureN_type c_7320491;
++object e_7322588 [4];
++c_7320491.hdr.mark = gc_color_red;
++ c_7320491.hdr.grayed = 0;
++c_7320491.tag = closureN_tag;
++ c_7320491.fn = (function_type)__lambda_797;
++c_7320491.num_args = 1;
++c_7320491.num_elements = 4;
++c_7320491.elements = (object *)e_7322588;
++c_7320491.elements[0] = compare_731233_733163;
++c_7320491.elements[1] = expr_731231_733161;
++c_7320491.elements[2] = k_735824;
++c_7320491.elements[3] = rename_731232_733162;
++
++
+ 
 -return_closcall2(data,  ((closureN)self_7313703)->elements[4],  &c_7321799, quote_lambda);; 
--}
--
++return_direct_with_clo1(data,(closure)&c_7320491,__lambda_797,  Cyc_cadr(data, expr_731231_733161));; 
+ }
+ 
 -static void __lambda_800(void *data, object self_7313704, int argc, object *args) /* object self_7313704, object r_736279 */
-- {
-- object r_736279 = args[0];
--  
++static void __lambda_797(void *data, object self_7312448, int argc, object *args) /* object self_7312448, object r_736279 */
+  {
+  object r_736279 = args[0];
+   
 -closureN_type c_7321802;
 -object e_7323884 [7];
 -c_7321802.hdr.mark = gc_color_red;
@@ -17951,14 +18142,177 @@ Make let-values be the same as let*-values, to work around
 -c_7321811.elements[7] = ((closureN)self_7313707)->elements[7];
 -c_7321811.elements[8] = r_736282;
 -c_7321811.elements[9] = ((closureN)self_7313707)->elements[8];
--
++closureN_type c_7320493;
++object e_7322587 [4];
++c_7320493.hdr.mark = gc_color_red;
++ c_7320493.hdr.grayed = 0;
++c_7320493.tag = closureN_tag;
++ c_7320493.fn = (function_type)__lambda_798;
++c_7320493.num_args = 1;
++c_7320493.num_elements = 4;
++c_7320493.elements = (object *)e_7322587;
++c_7320493.elements[0] = ((closureN)self_7312448)->elements[0];
++c_7320493.elements[1] = ((closureN)self_7312448)->elements[1];
++c_7320493.elements[2] = ((closureN)self_7312448)->elements[2];
++c_7320493.elements[3] = ((closureN)self_7312448)->elements[3];
++
++return_direct_with_clo2(data,  __glo_identifier_127_scheme_base, (((closure)  __glo_identifier_127_scheme_base)->fn),  &c_7320493, r_736279);; 
++}
++
++static void __lambda_798(void *data, object self_7312449, int argc, object *args) /* object self_7312449, object r_735825 */
++ {
++ object r_735825 = args[0];
++  
++closureN_type c_7320496;
++object e_7322586 [5];
++c_7320496.hdr.mark = gc_color_red;
++ c_7320496.hdr.grayed = 0;
++c_7320496.tag = closureN_tag;
++ c_7320496.fn = (function_type)__lambda_799;
++c_7320496.num_args = 1;
++c_7320496.num_elements = 5;
++c_7320496.elements = (object *)e_7322586;
++c_7320496.elements[0] = ((closureN)self_7312449)->elements[0];
++c_7320496.elements[1] = ((closureN)self_7312449)->elements[1];
++c_7320496.elements[2] = ((closureN)self_7312449)->elements[2];
++c_7320496.elements[3] = r_735825;
++c_7320496.elements[4] = ((closureN)self_7312449)->elements[3];
++
++return_closcall2(data,  ((closureN)self_7312449)->elements[3],  &c_7320496, quote_er_91macro_91transformer);; 
++}
++
++static void __lambda_799(void *data, object self_7312450, int argc, object *args) /* object self_7312450, object r_735826 */
++ {
++ object r_735826 = args[0];
++  
++closureN_type c_7320499;
++object e_7322585 [6];
++c_7320499.hdr.mark = gc_color_red;
++ c_7320499.hdr.grayed = 0;
++c_7320499.tag = closureN_tag;
++ c_7320499.fn = (function_type)__lambda_800;
++c_7320499.num_args = 1;
++c_7320499.num_elements = 6;
++c_7320499.elements = (object *)e_7322585;
++c_7320499.elements[0] = ((closureN)self_7312450)->elements[0];
++c_7320499.elements[1] = ((closureN)self_7312450)->elements[1];
++c_7320499.elements[2] = ((closureN)self_7312450)->elements[2];
++c_7320499.elements[3] = ((closureN)self_7312450)->elements[3];
++c_7320499.elements[4] = r_735826;
++c_7320499.elements[5] = ((closureN)self_7312450)->elements[4];
++
++return_closcall2(data,  ((closureN)self_7312450)->elements[4],  &c_7320499, quote_lambda);; 
++}
++
++static void __lambda_800(void *data, object self_7312451, int argc, object *args) /* object self_7312451, object r_735827 */
++ {
++ object r_735827 = args[0];
++  
++closureN_type c_7320502;
++object e_7322584 [7];
++c_7320502.hdr.mark = gc_color_red;
++ c_7320502.hdr.grayed = 0;
++c_7320502.tag = closureN_tag;
++ c_7320502.fn = (function_type)__lambda_801;
++c_7320502.num_args = 1;
++c_7320502.num_elements = 7;
++c_7320502.elements = (object *)e_7322584;
++c_7320502.elements[0] = ((closureN)self_7312451)->elements[0];
++c_7320502.elements[1] = ((closureN)self_7312451)->elements[1];
++c_7320502.elements[2] = ((closureN)self_7312451)->elements[2];
++c_7320502.elements[3] = ((closureN)self_7312451)->elements[3];
++c_7320502.elements[4] = ((closureN)self_7312451)->elements[4];
++c_7320502.elements[5] = r_735827;
++c_7320502.elements[6] = ((closureN)self_7312451)->elements[5];
++
++return_closcall2(data,  ((closureN)self_7312451)->elements[5],  &c_7320502, quote_let);; 
++}
++
++static void __lambda_801(void *data, object self_7312452, int argc, object *args) /* object self_7312452, object r_735828 */
++ {
++ object r_735828 = args[0];
++  
++closureN_type c_7320505;
++object e_7322583 [8];
++c_7320505.hdr.mark = gc_color_red;
++ c_7320505.hdr.grayed = 0;
++c_7320505.tag = closureN_tag;
++ c_7320505.fn = (function_type)__lambda_802;
++c_7320505.num_args = 1;
++c_7320505.num_elements = 8;
++c_7320505.elements = (object *)e_7322583;
++c_7320505.elements[0] = ((closureN)self_7312452)->elements[0];
++c_7320505.elements[1] = ((closureN)self_7312452)->elements[1];
++c_7320505.elements[2] = ((closureN)self_7312452)->elements[2];
++c_7320505.elements[3] = ((closureN)self_7312452)->elements[3];
++c_7320505.elements[4] = ((closureN)self_7312452)->elements[4];
++c_7320505.elements[5] = ((closureN)self_7312452)->elements[5];
++c_7320505.elements[6] = r_735828;
++c_7320505.elements[7] = ((closureN)self_7312452)->elements[6];
++
++return_closcall2(data,  ((closureN)self_7312452)->elements[6],  &c_7320505, quote_begin);; 
++}
++
++static void __lambda_802(void *data, object self_7312453, int argc, object *args) /* object self_7312453, object r_735829 */
++ {
++ object r_735829 = args[0];
++  
++closureN_type c_7320508;
++object e_7322582 [9];
++c_7320508.hdr.mark = gc_color_red;
++ c_7320508.hdr.grayed = 0;
++c_7320508.tag = closureN_tag;
++ c_7320508.fn = (function_type)__lambda_803;
++c_7320508.num_args = 1;
++c_7320508.num_elements = 9;
++c_7320508.elements = (object *)e_7322582;
++c_7320508.elements[0] = ((closureN)self_7312453)->elements[0];
++c_7320508.elements[1] = ((closureN)self_7312453)->elements[1];
++c_7320508.elements[2] = ((closureN)self_7312453)->elements[2];
++c_7320508.elements[3] = ((closureN)self_7312453)->elements[3];
++c_7320508.elements[4] = ((closureN)self_7312453)->elements[4];
++c_7320508.elements[5] = ((closureN)self_7312453)->elements[5];
++c_7320508.elements[6] = ((closureN)self_7312453)->elements[6];
++c_7320508.elements[7] = r_735829;
++c_7320508.elements[8] = ((closureN)self_7312453)->elements[7];
++
++return_closcall2(data,  ((closureN)self_7312453)->elements[7],  &c_7320508, quote__if);; 
++}
++
++static void __lambda_803(void *data, object self_7312454, int argc, object *args) /* object self_7312454, object r_735830 */
++ {
++ object r_735830 = args[0];
++  
++closureN_type c_7320511;
++object e_7322581 [10];
++c_7320511.hdr.mark = gc_color_red;
++ c_7320511.hdr.grayed = 0;
++c_7320511.tag = closureN_tag;
++ c_7320511.fn = (function_type)__lambda_804;
++c_7320511.num_args = 1;
++c_7320511.num_elements = 10;
++c_7320511.elements = (object *)e_7322581;
++c_7320511.elements[0] = ((closureN)self_7312454)->elements[0];
++c_7320511.elements[1] = ((closureN)self_7312454)->elements[1];
++c_7320511.elements[2] = ((closureN)self_7312454)->elements[2];
++c_7320511.elements[3] = ((closureN)self_7312454)->elements[3];
++c_7320511.elements[4] = ((closureN)self_7312454)->elements[4];
++c_7320511.elements[5] = ((closureN)self_7312454)->elements[5];
++c_7320511.elements[6] = ((closureN)self_7312454)->elements[6];
++c_7320511.elements[7] = ((closureN)self_7312454)->elements[7];
++c_7320511.elements[8] = r_735830;
++c_7320511.elements[9] = ((closureN)self_7312454)->elements[8];
+ 
 -return_closcall2(data,  ((closureN)self_7313707)->elements[8],  &c_7321811, quote_and);; 
--}
--
++return_closcall2(data,  ((closureN)self_7312454)->elements[8],  &c_7320511, quote_and);; 
+ }
+ 
 -static void __lambda_804(void *data, object self_7313708, int argc, object *args) /* object self_7313708, object r_736283 */
-- {
++static void __lambda_804(void *data, object self_7312455, int argc, object *args) /* object self_7312455, object r_735831 */
+  {
 - object r_736283 = args[0];
--  
++ object r_735831 = args[0];
+   
 -closureN_type c_7321814;
 -object e_7323880 [11];
 -c_7321814.hdr.mark = gc_color_red;
@@ -18038,29 +18392,2710 @@ Make let-values be the same as let*-values, to work around
 -c_7321820.elements[10] = ((closureN)self_7313710)->elements[10];
 -c_7321820.elements[11] = r_736285;
 -c_7321820.elements[12] = ((closureN)self_7313710)->elements[11];
-+closureN_type c_7322635;
-+object e_7322689 [4];
-+c_7322635.hdr.mark = gc_color_red;
-+ c_7322635.hdr.grayed = 0;
-+c_7322635.tag = closureN_tag;
-+ c_7322635.fn = (function_type)__lambda_1020;
-+c_7322635.num_args = 1;
-+c_7322635.num_elements = 4;
-+c_7322635.elements = (object *)e_7322689;
-+c_7322635.elements[0] = ((closureN)self_7312697)->elements[0];
-+c_7322635.elements[1] = r_736304_7311674;
-+c_7322635.elements[2] = ((closureN)self_7312697)->elements[1];
-+c_7322635.elements[3] = ((closureN)self_7312697)->elements[2];
++closureN_type c_7320514;
++object e_7322580 [11];
++c_7320514.hdr.mark = gc_color_red;
++ c_7320514.hdr.grayed = 0;
++c_7320514.tag = closureN_tag;
++ c_7320514.fn = (function_type)__lambda_805;
++c_7320514.num_args = 1;
++c_7320514.num_elements = 11;
++c_7320514.elements = (object *)e_7322580;
++c_7320514.elements[0] = ((closureN)self_7312455)->elements[0];
++c_7320514.elements[1] = ((closureN)self_7312455)->elements[1];
++c_7320514.elements[2] = ((closureN)self_7312455)->elements[2];
++c_7320514.elements[3] = ((closureN)self_7312455)->elements[3];
++c_7320514.elements[4] = ((closureN)self_7312455)->elements[4];
++c_7320514.elements[5] = ((closureN)self_7312455)->elements[5];
++c_7320514.elements[6] = ((closureN)self_7312455)->elements[6];
++c_7320514.elements[7] = ((closureN)self_7312455)->elements[7];
++c_7320514.elements[8] = ((closureN)self_7312455)->elements[8];
++c_7320514.elements[9] = r_735831;
++c_7320514.elements[10] = ((closureN)self_7312455)->elements[9];
++
++return_closcall2(data,  ((closureN)self_7312455)->elements[9],  &c_7320514, quote_or);; 
++}
++
++static void __lambda_805(void *data, object self_7312456, int argc, object *args) /* object self_7312456, object r_735832 */
++ {
++ object r_735832 = args[0];
++  
++closureN_type c_7320517;
++object e_7322579 [12];
++c_7320517.hdr.mark = gc_color_red;
++ c_7320517.hdr.grayed = 0;
++c_7320517.tag = closureN_tag;
++ c_7320517.fn = (function_type)__lambda_806;
++c_7320517.num_args = 1;
++c_7320517.num_elements = 12;
++c_7320517.elements = (object *)e_7322579;
++c_7320517.elements[0] = ((closureN)self_7312456)->elements[0];
++c_7320517.elements[1] = ((closureN)self_7312456)->elements[1];
++c_7320517.elements[2] = ((closureN)self_7312456)->elements[2];
++c_7320517.elements[3] = ((closureN)self_7312456)->elements[3];
++c_7320517.elements[4] = ((closureN)self_7312456)->elements[4];
++c_7320517.elements[5] = ((closureN)self_7312456)->elements[5];
++c_7320517.elements[6] = ((closureN)self_7312456)->elements[6];
++c_7320517.elements[7] = ((closureN)self_7312456)->elements[7];
++c_7320517.elements[8] = ((closureN)self_7312456)->elements[8];
++c_7320517.elements[9] = ((closureN)self_7312456)->elements[9];
++c_7320517.elements[10] = r_735832;
++c_7320517.elements[11] = ((closureN)self_7312456)->elements[10];
++
++return_closcall2(data,  ((closureN)self_7312456)->elements[10],  &c_7320517, quote_eq_127);; 
++}
++
++static void __lambda_806(void *data, object self_7312457, int argc, object *args) /* object self_7312457, object r_735833 */
++ {
++ object r_735833 = args[0];
++  
++closureN_type c_7320520;
++object e_7322578 [13];
++c_7320520.hdr.mark = gc_color_red;
++ c_7320520.hdr.grayed = 0;
++c_7320520.tag = closureN_tag;
++ c_7320520.fn = (function_type)__lambda_807;
++c_7320520.num_args = 1;
++c_7320520.num_elements = 13;
++c_7320520.elements = (object *)e_7322578;
++c_7320520.elements[0] = ((closureN)self_7312457)->elements[0];
++c_7320520.elements[1] = ((closureN)self_7312457)->elements[1];
++c_7320520.elements[2] = ((closureN)self_7312457)->elements[2];
++c_7320520.elements[3] = ((closureN)self_7312457)->elements[3];
++c_7320520.elements[4] = ((closureN)self_7312457)->elements[4];
++c_7320520.elements[5] = ((closureN)self_7312457)->elements[5];
++c_7320520.elements[6] = ((closureN)self_7312457)->elements[6];
++c_7320520.elements[7] = ((closureN)self_7312457)->elements[7];
++c_7320520.elements[8] = ((closureN)self_7312457)->elements[8];
++c_7320520.elements[9] = ((closureN)self_7312457)->elements[9];
++c_7320520.elements[10] = ((closureN)self_7312457)->elements[10];
++c_7320520.elements[11] = r_735833;
++c_7320520.elements[12] = ((closureN)self_7312457)->elements[11];
++
++return_closcall2(data,  ((closureN)self_7312457)->elements[11],  &c_7320520, quote_equal_127);; 
++}
++
++static void __lambda_807(void *data, object self_7312458, int argc, object *args) /* object self_7312458, object r_735834 */
++ {
++ object r_735834 = args[0];
++  
++closureN_type c_7320523;
++object e_7322577 [14];
++c_7320523.hdr.mark = gc_color_red;
++ c_7320523.hdr.grayed = 0;
++c_7320523.tag = closureN_tag;
++ c_7320523.fn = (function_type)__lambda_808;
++c_7320523.num_args = 1;
++c_7320523.num_elements = 14;
++c_7320523.elements = (object *)e_7322577;
++c_7320523.elements[0] = ((closureN)self_7312458)->elements[0];
++c_7320523.elements[1] = ((closureN)self_7312458)->elements[1];
++c_7320523.elements[2] = ((closureN)self_7312458)->elements[2];
++c_7320523.elements[3] = ((closureN)self_7312458)->elements[3];
++c_7320523.elements[4] = ((closureN)self_7312458)->elements[4];
++c_7320523.elements[5] = ((closureN)self_7312458)->elements[5];
++c_7320523.elements[6] = ((closureN)self_7312458)->elements[6];
++c_7320523.elements[7] = ((closureN)self_7312458)->elements[7];
++c_7320523.elements[8] = ((closureN)self_7312458)->elements[8];
++c_7320523.elements[9] = ((closureN)self_7312458)->elements[9];
++c_7320523.elements[10] = ((closureN)self_7312458)->elements[10];
++c_7320523.elements[11] = ((closureN)self_7312458)->elements[11];
++c_7320523.elements[12] = r_735834;
++c_7320523.elements[13] = ((closureN)self_7312458)->elements[12];
++
++return_closcall2(data,  ((closureN)self_7312458)->elements[12],  &c_7320523, quote_car);; 
++}
++
++static void __lambda_808(void *data, object self_7312459, int argc, object *args) /* object self_7312459, object r_735835 */
++ {
++ object r_735835 = args[0];
++  
++closureN_type c_7320526;
++object e_7322576 [15];
++c_7320526.hdr.mark = gc_color_red;
++ c_7320526.hdr.grayed = 0;
++c_7320526.tag = closureN_tag;
++ c_7320526.fn = (function_type)__lambda_809;
++c_7320526.num_args = 1;
++c_7320526.num_elements = 15;
++c_7320526.elements = (object *)e_7322576;
++c_7320526.elements[0] = ((closureN)self_7312459)->elements[0];
++c_7320526.elements[1] = ((closureN)self_7312459)->elements[1];
++c_7320526.elements[2] = ((closureN)self_7312459)->elements[2];
++c_7320526.elements[3] = ((closureN)self_7312459)->elements[3];
++c_7320526.elements[4] = ((closureN)self_7312459)->elements[4];
++c_7320526.elements[5] = ((closureN)self_7312459)->elements[5];
++c_7320526.elements[6] = ((closureN)self_7312459)->elements[6];
++c_7320526.elements[7] = ((closureN)self_7312459)->elements[7];
++c_7320526.elements[8] = ((closureN)self_7312459)->elements[8];
++c_7320526.elements[9] = ((closureN)self_7312459)->elements[9];
++c_7320526.elements[10] = ((closureN)self_7312459)->elements[10];
++c_7320526.elements[11] = ((closureN)self_7312459)->elements[11];
++c_7320526.elements[12] = ((closureN)self_7312459)->elements[12];
++c_7320526.elements[13] = r_735835;
++c_7320526.elements[14] = ((closureN)self_7312459)->elements[13];
++
++return_closcall2(data,  ((closureN)self_7312459)->elements[13],  &c_7320526, quote_cdr);; 
++}
++
++static void __lambda_809(void *data, object self_7312460, int argc, object *args) /* object self_7312460, object r_735836 */
++ {
++ object r_735836 = args[0];
++  
++closureN_type c_7320529;
++object e_7322575 [16];
++c_7320529.hdr.mark = gc_color_red;
++ c_7320529.hdr.grayed = 0;
++c_7320529.tag = closureN_tag;
++ c_7320529.fn = (function_type)__lambda_810;
++c_7320529.num_args = 1;
++c_7320529.num_elements = 16;
++c_7320529.elements = (object *)e_7322575;
++c_7320529.elements[0] = ((closureN)self_7312460)->elements[0];
++c_7320529.elements[1] = ((closureN)self_7312460)->elements[1];
++c_7320529.elements[2] = ((closureN)self_7312460)->elements[2];
++c_7320529.elements[3] = ((closureN)self_7312460)->elements[3];
++c_7320529.elements[4] = ((closureN)self_7312460)->elements[4];
++c_7320529.elements[5] = ((closureN)self_7312460)->elements[5];
++c_7320529.elements[6] = ((closureN)self_7312460)->elements[6];
++c_7320529.elements[7] = ((closureN)self_7312460)->elements[7];
++c_7320529.elements[8] = ((closureN)self_7312460)->elements[8];
++c_7320529.elements[9] = ((closureN)self_7312460)->elements[9];
++c_7320529.elements[10] = ((closureN)self_7312460)->elements[10];
++c_7320529.elements[11] = ((closureN)self_7312460)->elements[11];
++c_7320529.elements[12] = ((closureN)self_7312460)->elements[12];
++c_7320529.elements[13] = ((closureN)self_7312460)->elements[13];
++c_7320529.elements[14] = r_735836;
++c_7320529.elements[15] = ((closureN)self_7312460)->elements[14];
++
++return_closcall2(data,  ((closureN)self_7312460)->elements[14],  &c_7320529, quote_cons);; 
++}
++
++static void __lambda_810(void *data, object self_7312461, int argc, object *args) /* object self_7312461, object r_735837 */
++ {
++ object r_735837 = args[0];
++  
++closureN_type c_7320532;
++object e_7322574 [17];
++c_7320532.hdr.mark = gc_color_red;
++ c_7320532.hdr.grayed = 0;
++c_7320532.tag = closureN_tag;
++ c_7320532.fn = (function_type)__lambda_811;
++c_7320532.num_args = 1;
++c_7320532.num_elements = 17;
++c_7320532.elements = (object *)e_7322574;
++c_7320532.elements[0] = ((closureN)self_7312461)->elements[0];
++c_7320532.elements[1] = ((closureN)self_7312461)->elements[1];
++c_7320532.elements[2] = ((closureN)self_7312461)->elements[2];
++c_7320532.elements[3] = ((closureN)self_7312461)->elements[3];
++c_7320532.elements[4] = ((closureN)self_7312461)->elements[4];
++c_7320532.elements[5] = ((closureN)self_7312461)->elements[5];
++c_7320532.elements[6] = ((closureN)self_7312461)->elements[6];
++c_7320532.elements[7] = ((closureN)self_7312461)->elements[7];
++c_7320532.elements[8] = ((closureN)self_7312461)->elements[8];
++c_7320532.elements[9] = ((closureN)self_7312461)->elements[9];
++c_7320532.elements[10] = ((closureN)self_7312461)->elements[10];
++c_7320532.elements[11] = ((closureN)self_7312461)->elements[11];
++c_7320532.elements[12] = ((closureN)self_7312461)->elements[12];
++c_7320532.elements[13] = ((closureN)self_7312461)->elements[13];
++c_7320532.elements[14] = ((closureN)self_7312461)->elements[14];
++c_7320532.elements[15] = r_735837;
++c_7320532.elements[16] = ((closureN)self_7312461)->elements[15];
++
++return_closcall2(data,  ((closureN)self_7312461)->elements[15],  &c_7320532, quote_pair_127);; 
++}
++
++static void __lambda_811(void *data, object self_7312462, int argc, object *args) /* object self_7312462, object r_735838 */
++ {
++ object r_735838 = args[0];
++  
++closureN_type c_7320535;
++object e_7322573 [18];
++c_7320535.hdr.mark = gc_color_red;
++ c_7320535.hdr.grayed = 0;
++c_7320535.tag = closureN_tag;
++ c_7320535.fn = (function_type)__lambda_812;
++c_7320535.num_args = 1;
++c_7320535.num_elements = 18;
++c_7320535.elements = (object *)e_7322573;
++c_7320535.elements[0] = ((closureN)self_7312462)->elements[0];
++c_7320535.elements[1] = ((closureN)self_7312462)->elements[1];
++c_7320535.elements[2] = ((closureN)self_7312462)->elements[2];
++c_7320535.elements[3] = ((closureN)self_7312462)->elements[3];
++c_7320535.elements[4] = ((closureN)self_7312462)->elements[4];
++c_7320535.elements[5] = ((closureN)self_7312462)->elements[5];
++c_7320535.elements[6] = ((closureN)self_7312462)->elements[6];
++c_7320535.elements[7] = ((closureN)self_7312462)->elements[7];
++c_7320535.elements[8] = ((closureN)self_7312462)->elements[8];
++c_7320535.elements[9] = ((closureN)self_7312462)->elements[9];
++c_7320535.elements[10] = ((closureN)self_7312462)->elements[10];
++c_7320535.elements[11] = ((closureN)self_7312462)->elements[11];
++c_7320535.elements[12] = ((closureN)self_7312462)->elements[12];
++c_7320535.elements[13] = ((closureN)self_7312462)->elements[13];
++c_7320535.elements[14] = ((closureN)self_7312462)->elements[14];
++c_7320535.elements[15] = ((closureN)self_7312462)->elements[15];
++c_7320535.elements[16] = r_735838;
++c_7320535.elements[17] = ((closureN)self_7312462)->elements[16];
++
++return_closcall2(data,  ((closureN)self_7312462)->elements[16],  &c_7320535, quote_null_127);; 
++}
++
++static void __lambda_812(void *data, object self_7312463, int argc, object *args) /* object self_7312463, object r_735839 */
++ {
++ object r_735839 = args[0];
++  
++closureN_type c_7320538;
++object e_7322572 [19];
++c_7320538.hdr.mark = gc_color_red;
++ c_7320538.hdr.grayed = 0;
++c_7320538.tag = closureN_tag;
++ c_7320538.fn = (function_type)__lambda_813;
++c_7320538.num_args = 1;
++c_7320538.num_elements = 19;
++c_7320538.elements = (object *)e_7322572;
++c_7320538.elements[0] = ((closureN)self_7312463)->elements[0];
++c_7320538.elements[1] = ((closureN)self_7312463)->elements[1];
++c_7320538.elements[2] = ((closureN)self_7312463)->elements[2];
++c_7320538.elements[3] = ((closureN)self_7312463)->elements[3];
++c_7320538.elements[4] = ((closureN)self_7312463)->elements[4];
++c_7320538.elements[5] = ((closureN)self_7312463)->elements[5];
++c_7320538.elements[6] = ((closureN)self_7312463)->elements[6];
++c_7320538.elements[7] = ((closureN)self_7312463)->elements[7];
++c_7320538.elements[8] = ((closureN)self_7312463)->elements[8];
++c_7320538.elements[9] = ((closureN)self_7312463)->elements[9];
++c_7320538.elements[10] = ((closureN)self_7312463)->elements[10];
++c_7320538.elements[11] = ((closureN)self_7312463)->elements[11];
++c_7320538.elements[12] = ((closureN)self_7312463)->elements[12];
++c_7320538.elements[13] = ((closureN)self_7312463)->elements[13];
++c_7320538.elements[14] = ((closureN)self_7312463)->elements[14];
++c_7320538.elements[15] = ((closureN)self_7312463)->elements[15];
++c_7320538.elements[16] = ((closureN)self_7312463)->elements[16];
++c_7320538.elements[17] = r_735839;
++c_7320538.elements[18] = ((closureN)self_7312463)->elements[17];
++
++return_closcall2(data,  ((closureN)self_7312463)->elements[17],  &c_7320538, quote_expr);; 
++}
++
++static void __lambda_813(void *data, object self_7312464, int argc, object *args) /* object self_7312464, object r_735840 */
++ {
++ object r_735840 = args[0];
++  
++closureN_type c_7320541;
++object e_7322571 [20];
++c_7320541.hdr.mark = gc_color_red;
++ c_7320541.hdr.grayed = 0;
++c_7320541.tag = closureN_tag;
++ c_7320541.fn = (function_type)__lambda_814;
++c_7320541.num_args = 1;
++c_7320541.num_elements = 20;
++c_7320541.elements = (object *)e_7322571;
++c_7320541.elements[0] = ((closureN)self_7312464)->elements[0];
++c_7320541.elements[1] = ((closureN)self_7312464)->elements[1];
++c_7320541.elements[2] = ((closureN)self_7312464)->elements[2];
++c_7320541.elements[3] = ((closureN)self_7312464)->elements[3];
++c_7320541.elements[4] = ((closureN)self_7312464)->elements[4];
++c_7320541.elements[5] = ((closureN)self_7312464)->elements[5];
++c_7320541.elements[6] = ((closureN)self_7312464)->elements[6];
++c_7320541.elements[7] = ((closureN)self_7312464)->elements[7];
++c_7320541.elements[8] = ((closureN)self_7312464)->elements[8];
++c_7320541.elements[9] = ((closureN)self_7312464)->elements[9];
++c_7320541.elements[10] = ((closureN)self_7312464)->elements[10];
++c_7320541.elements[11] = ((closureN)self_7312464)->elements[11];
++c_7320541.elements[12] = ((closureN)self_7312464)->elements[12];
++c_7320541.elements[13] = ((closureN)self_7312464)->elements[13];
++c_7320541.elements[14] = ((closureN)self_7312464)->elements[14];
++c_7320541.elements[15] = ((closureN)self_7312464)->elements[15];
++c_7320541.elements[16] = ((closureN)self_7312464)->elements[16];
++c_7320541.elements[17] = ((closureN)self_7312464)->elements[17];
++c_7320541.elements[18] = r_735840;
++c_7320541.elements[19] = ((closureN)self_7312464)->elements[18];
++
++return_closcall2(data,  ((closureN)self_7312464)->elements[18],  &c_7320541, quote_rename);; 
++}
++
++static void __lambda_814(void *data, object self_7312465, int argc, object *args) /* object self_7312465, object r_735841 */
++ {
++ object r_735841 = args[0];
++  
++closureN_type c_7320544;
++object e_7322570 [21];
++c_7320544.hdr.mark = gc_color_red;
++ c_7320544.hdr.grayed = 0;
++c_7320544.tag = closureN_tag;
++ c_7320544.fn = (function_type)__lambda_815;
++c_7320544.num_args = 1;
++c_7320544.num_elements = 21;
++c_7320544.elements = (object *)e_7322570;
++c_7320544.elements[0] = ((closureN)self_7312465)->elements[0];
++c_7320544.elements[1] = ((closureN)self_7312465)->elements[1];
++c_7320544.elements[2] = ((closureN)self_7312465)->elements[2];
++c_7320544.elements[3] = ((closureN)self_7312465)->elements[3];
++c_7320544.elements[4] = ((closureN)self_7312465)->elements[4];
++c_7320544.elements[5] = ((closureN)self_7312465)->elements[5];
++c_7320544.elements[6] = ((closureN)self_7312465)->elements[6];
++c_7320544.elements[7] = ((closureN)self_7312465)->elements[7];
++c_7320544.elements[8] = ((closureN)self_7312465)->elements[8];
++c_7320544.elements[9] = ((closureN)self_7312465)->elements[9];
++c_7320544.elements[10] = ((closureN)self_7312465)->elements[10];
++c_7320544.elements[11] = ((closureN)self_7312465)->elements[11];
++c_7320544.elements[12] = ((closureN)self_7312465)->elements[12];
++c_7320544.elements[13] = ((closureN)self_7312465)->elements[13];
++c_7320544.elements[14] = ((closureN)self_7312465)->elements[14];
++c_7320544.elements[15] = ((closureN)self_7312465)->elements[15];
++c_7320544.elements[16] = ((closureN)self_7312465)->elements[16];
++c_7320544.elements[17] = ((closureN)self_7312465)->elements[17];
++c_7320544.elements[18] = ((closureN)self_7312465)->elements[18];
++c_7320544.elements[19] = r_735841;
++c_7320544.elements[20] = ((closureN)self_7312465)->elements[19];
++
++return_closcall2(data,  ((closureN)self_7312465)->elements[19],  &c_7320544, quote_compare);; 
++}
++
++static void __lambda_815(void *data, object self_7312466, int argc, object *args) /* object self_7312466, object r_735842 */
++ {
++ object r_735842 = args[0];
++  
++closureN_type c_7320547;
++object e_7322569 [22];
++c_7320547.hdr.mark = gc_color_red;
++ c_7320547.hdr.grayed = 0;
++c_7320547.tag = closureN_tag;
++ c_7320547.fn = (function_type)__lambda_816;
++c_7320547.num_args = 1;
++c_7320547.num_elements = 22;
++c_7320547.elements = (object *)e_7322569;
++c_7320547.elements[0] = ((closureN)self_7312466)->elements[0];
++c_7320547.elements[1] = ((closureN)self_7312466)->elements[1];
++c_7320547.elements[2] = ((closureN)self_7312466)->elements[2];
++c_7320547.elements[3] = ((closureN)self_7312466)->elements[3];
++c_7320547.elements[4] = ((closureN)self_7312466)->elements[4];
++c_7320547.elements[5] = ((closureN)self_7312466)->elements[5];
++c_7320547.elements[6] = ((closureN)self_7312466)->elements[6];
++c_7320547.elements[7] = ((closureN)self_7312466)->elements[7];
++c_7320547.elements[8] = ((closureN)self_7312466)->elements[8];
++c_7320547.elements[9] = ((closureN)self_7312466)->elements[9];
++c_7320547.elements[10] = ((closureN)self_7312466)->elements[10];
++c_7320547.elements[11] = ((closureN)self_7312466)->elements[11];
++c_7320547.elements[12] = ((closureN)self_7312466)->elements[12];
++c_7320547.elements[13] = ((closureN)self_7312466)->elements[13];
++c_7320547.elements[14] = ((closureN)self_7312466)->elements[14];
++c_7320547.elements[15] = ((closureN)self_7312466)->elements[15];
++c_7320547.elements[16] = ((closureN)self_7312466)->elements[16];
++c_7320547.elements[17] = ((closureN)self_7312466)->elements[17];
++c_7320547.elements[18] = ((closureN)self_7312466)->elements[18];
++c_7320547.elements[19] = ((closureN)self_7312466)->elements[19];
++c_7320547.elements[20] = r_735842;
++c_7320547.elements[21] = ((closureN)self_7312466)->elements[20];
++
++return_closcall2(data,  ((closureN)self_7312466)->elements[20],  &c_7320547, quote_quote);; 
++}
++
++static void __lambda_816(void *data, object self_7312467, int argc, object *args) /* object self_7312467, object r_735843 */
++ {
++ object r_735843 = args[0];
++  
++closureN_type c_7320550;
++object e_7322568 [23];
++c_7320550.hdr.mark = gc_color_red;
++ c_7320550.hdr.grayed = 0;
++c_7320550.tag = closureN_tag;
++ c_7320550.fn = (function_type)__lambda_817;
++c_7320550.num_args = 1;
++c_7320550.num_elements = 23;
++c_7320550.elements = (object *)e_7322568;
++c_7320550.elements[0] = ((closureN)self_7312467)->elements[0];
++c_7320550.elements[1] = ((closureN)self_7312467)->elements[1];
++c_7320550.elements[2] = ((closureN)self_7312467)->elements[2];
++c_7320550.elements[3] = ((closureN)self_7312467)->elements[3];
++c_7320550.elements[4] = ((closureN)self_7312467)->elements[4];
++c_7320550.elements[5] = ((closureN)self_7312467)->elements[5];
++c_7320550.elements[6] = ((closureN)self_7312467)->elements[6];
++c_7320550.elements[7] = ((closureN)self_7312467)->elements[7];
++c_7320550.elements[8] = ((closureN)self_7312467)->elements[8];
++c_7320550.elements[9] = ((closureN)self_7312467)->elements[9];
++c_7320550.elements[10] = ((closureN)self_7312467)->elements[10];
++c_7320550.elements[11] = ((closureN)self_7312467)->elements[11];
++c_7320550.elements[12] = ((closureN)self_7312467)->elements[12];
++c_7320550.elements[13] = ((closureN)self_7312467)->elements[13];
++c_7320550.elements[14] = ((closureN)self_7312467)->elements[14];
++c_7320550.elements[15] = ((closureN)self_7312467)->elements[15];
++c_7320550.elements[16] = ((closureN)self_7312467)->elements[16];
++c_7320550.elements[17] = ((closureN)self_7312467)->elements[17];
++c_7320550.elements[18] = ((closureN)self_7312467)->elements[18];
++c_7320550.elements[19] = ((closureN)self_7312467)->elements[19];
++c_7320550.elements[20] = ((closureN)self_7312467)->elements[20];
++c_7320550.elements[21] = r_735843;
++c_7320550.elements[22] = ((closureN)self_7312467)->elements[21];
++
++return_closcall2(data,  ((closureN)self_7312467)->elements[21],  &c_7320550, quote_apply);; 
++}
++
++static void __lambda_817(void *data, object self_7312468, int argc, object *args) /* object self_7312468, object r_735844 */
++ {
++ object r_735844 = args[0];
++  
++closureN_type c_7320553;
++object e_7322567 [24];
++c_7320553.hdr.mark = gc_color_red;
++ c_7320553.hdr.grayed = 0;
++c_7320553.tag = closureN_tag;
++ c_7320553.fn = (function_type)__lambda_818;
++c_7320553.num_args = 1;
++c_7320553.num_elements = 24;
++c_7320553.elements = (object *)e_7322567;
++c_7320553.elements[0] = ((closureN)self_7312468)->elements[0];
++c_7320553.elements[1] = ((closureN)self_7312468)->elements[1];
++c_7320553.elements[2] = ((closureN)self_7312468)->elements[2];
++c_7320553.elements[3] = ((closureN)self_7312468)->elements[3];
++c_7320553.elements[4] = ((closureN)self_7312468)->elements[4];
++c_7320553.elements[5] = ((closureN)self_7312468)->elements[5];
++c_7320553.elements[6] = ((closureN)self_7312468)->elements[6];
++c_7320553.elements[7] = ((closureN)self_7312468)->elements[7];
++c_7320553.elements[8] = ((closureN)self_7312468)->elements[8];
++c_7320553.elements[9] = ((closureN)self_7312468)->elements[9];
++c_7320553.elements[10] = ((closureN)self_7312468)->elements[10];
++c_7320553.elements[11] = ((closureN)self_7312468)->elements[11];
++c_7320553.elements[12] = ((closureN)self_7312468)->elements[12];
++c_7320553.elements[13] = ((closureN)self_7312468)->elements[13];
++c_7320553.elements[14] = ((closureN)self_7312468)->elements[14];
++c_7320553.elements[15] = ((closureN)self_7312468)->elements[15];
++c_7320553.elements[16] = ((closureN)self_7312468)->elements[16];
++c_7320553.elements[17] = ((closureN)self_7312468)->elements[17];
++c_7320553.elements[18] = ((closureN)self_7312468)->elements[18];
++c_7320553.elements[19] = ((closureN)self_7312468)->elements[19];
++c_7320553.elements[20] = ((closureN)self_7312468)->elements[20];
++c_7320553.elements[21] = ((closureN)self_7312468)->elements[21];
++c_7320553.elements[22] = r_735844;
++c_7320553.elements[23] = ((closureN)self_7312468)->elements[22];
++
++return_closcall2(data,  ((closureN)self_7312468)->elements[22],  &c_7320553, quote_append);; 
++}
++
++static void __lambda_818(void *data, object self_7312469, int argc, object *args) /* object self_7312469, object r_735845 */
++ {
++ object r_735845 = args[0];
++  
++closureN_type c_7320556;
++object e_7322566 [25];
++c_7320556.hdr.mark = gc_color_red;
++ c_7320556.hdr.grayed = 0;
++c_7320556.tag = closureN_tag;
++ c_7320556.fn = (function_type)__lambda_819;
++c_7320556.num_args = 1;
++c_7320556.num_elements = 25;
++c_7320556.elements = (object *)e_7322566;
++c_7320556.elements[0] = ((closureN)self_7312469)->elements[0];
++c_7320556.elements[1] = ((closureN)self_7312469)->elements[1];
++c_7320556.elements[2] = ((closureN)self_7312469)->elements[2];
++c_7320556.elements[3] = ((closureN)self_7312469)->elements[3];
++c_7320556.elements[4] = ((closureN)self_7312469)->elements[4];
++c_7320556.elements[5] = ((closureN)self_7312469)->elements[5];
++c_7320556.elements[6] = ((closureN)self_7312469)->elements[6];
++c_7320556.elements[7] = ((closureN)self_7312469)->elements[7];
++c_7320556.elements[8] = ((closureN)self_7312469)->elements[8];
++c_7320556.elements[9] = ((closureN)self_7312469)->elements[9];
++c_7320556.elements[10] = ((closureN)self_7312469)->elements[10];
++c_7320556.elements[11] = ((closureN)self_7312469)->elements[11];
++c_7320556.elements[12] = ((closureN)self_7312469)->elements[12];
++c_7320556.elements[13] = ((closureN)self_7312469)->elements[13];
++c_7320556.elements[14] = ((closureN)self_7312469)->elements[14];
++c_7320556.elements[15] = ((closureN)self_7312469)->elements[15];
++c_7320556.elements[16] = ((closureN)self_7312469)->elements[16];
++c_7320556.elements[17] = ((closureN)self_7312469)->elements[17];
++c_7320556.elements[18] = ((closureN)self_7312469)->elements[18];
++c_7320556.elements[19] = ((closureN)self_7312469)->elements[19];
++c_7320556.elements[20] = ((closureN)self_7312469)->elements[20];
++c_7320556.elements[21] = ((closureN)self_7312469)->elements[21];
++c_7320556.elements[22] = ((closureN)self_7312469)->elements[22];
++c_7320556.elements[23] = r_735845;
++c_7320556.elements[24] = ((closureN)self_7312469)->elements[23];
++
++return_closcall2(data,  ((closureN)self_7312469)->elements[23],  &c_7320556, quote_map);; 
++}
++
++static void __lambda_819(void *data, object self_7312470, int argc, object *args) /* object self_7312470, object r_735846 */
++ {
++ object r_735846 = args[0];
++  
++closureN_type c_7320559;
++object e_7322565 [26];
++c_7320559.hdr.mark = gc_color_red;
++ c_7320559.hdr.grayed = 0;
++c_7320559.tag = closureN_tag;
++ c_7320559.fn = (function_type)__lambda_820;
++c_7320559.num_args = 1;
++c_7320559.num_elements = 26;
++c_7320559.elements = (object *)e_7322565;
++c_7320559.elements[0] = ((closureN)self_7312470)->elements[0];
++c_7320559.elements[1] = ((closureN)self_7312470)->elements[1];
++c_7320559.elements[2] = ((closureN)self_7312470)->elements[2];
++c_7320559.elements[3] = ((closureN)self_7312470)->elements[3];
++c_7320559.elements[4] = ((closureN)self_7312470)->elements[4];
++c_7320559.elements[5] = ((closureN)self_7312470)->elements[5];
++c_7320559.elements[6] = ((closureN)self_7312470)->elements[6];
++c_7320559.elements[7] = ((closureN)self_7312470)->elements[7];
++c_7320559.elements[8] = ((closureN)self_7312470)->elements[8];
++c_7320559.elements[9] = ((closureN)self_7312470)->elements[9];
++c_7320559.elements[10] = ((closureN)self_7312470)->elements[10];
++c_7320559.elements[11] = ((closureN)self_7312470)->elements[11];
++c_7320559.elements[12] = ((closureN)self_7312470)->elements[12];
++c_7320559.elements[13] = ((closureN)self_7312470)->elements[13];
++c_7320559.elements[14] = ((closureN)self_7312470)->elements[14];
++c_7320559.elements[15] = ((closureN)self_7312470)->elements[15];
++c_7320559.elements[16] = ((closureN)self_7312470)->elements[16];
++c_7320559.elements[17] = ((closureN)self_7312470)->elements[17];
++c_7320559.elements[18] = ((closureN)self_7312470)->elements[18];
++c_7320559.elements[19] = ((closureN)self_7312470)->elements[19];
++c_7320559.elements[20] = ((closureN)self_7312470)->elements[20];
++c_7320559.elements[21] = ((closureN)self_7312470)->elements[21];
++c_7320559.elements[22] = ((closureN)self_7312470)->elements[22];
++c_7320559.elements[23] = ((closureN)self_7312470)->elements[23];
++c_7320559.elements[24] = r_735846;
++c_7320559.elements[25] = ((closureN)self_7312470)->elements[24];
++
++return_closcall2(data,  ((closureN)self_7312470)->elements[24],  &c_7320559, quote_vector_127);; 
++}
++
++static void __lambda_820(void *data, object self_7312471, int argc, object *args) /* object self_7312471, object r_735847 */
++ {
++ object r_735847 = args[0];
++  
++closureN_type c_7320562;
++object e_7322564 [27];
++c_7320562.hdr.mark = gc_color_red;
++ c_7320562.hdr.grayed = 0;
++c_7320562.tag = closureN_tag;
++ c_7320562.fn = (function_type)__lambda_821;
++c_7320562.num_args = 1;
++c_7320562.num_elements = 27;
++c_7320562.elements = (object *)e_7322564;
++c_7320562.elements[0] = ((closureN)self_7312471)->elements[0];
++c_7320562.elements[1] = ((closureN)self_7312471)->elements[1];
++c_7320562.elements[2] = ((closureN)self_7312471)->elements[2];
++c_7320562.elements[3] = ((closureN)self_7312471)->elements[3];
++c_7320562.elements[4] = ((closureN)self_7312471)->elements[4];
++c_7320562.elements[5] = ((closureN)self_7312471)->elements[5];
++c_7320562.elements[6] = ((closureN)self_7312471)->elements[6];
++c_7320562.elements[7] = ((closureN)self_7312471)->elements[7];
++c_7320562.elements[8] = ((closureN)self_7312471)->elements[8];
++c_7320562.elements[9] = ((closureN)self_7312471)->elements[9];
++c_7320562.elements[10] = ((closureN)self_7312471)->elements[10];
++c_7320562.elements[11] = ((closureN)self_7312471)->elements[11];
++c_7320562.elements[12] = ((closureN)self_7312471)->elements[12];
++c_7320562.elements[13] = ((closureN)self_7312471)->elements[13];
++c_7320562.elements[14] = ((closureN)self_7312471)->elements[14];
++c_7320562.elements[15] = ((closureN)self_7312471)->elements[15];
++c_7320562.elements[16] = ((closureN)self_7312471)->elements[16];
++c_7320562.elements[17] = ((closureN)self_7312471)->elements[17];
++c_7320562.elements[18] = ((closureN)self_7312471)->elements[18];
++c_7320562.elements[19] = ((closureN)self_7312471)->elements[19];
++c_7320562.elements[20] = ((closureN)self_7312471)->elements[20];
++c_7320562.elements[21] = ((closureN)self_7312471)->elements[21];
++c_7320562.elements[22] = ((closureN)self_7312471)->elements[22];
++c_7320562.elements[23] = ((closureN)self_7312471)->elements[23];
++c_7320562.elements[24] = ((closureN)self_7312471)->elements[24];
++c_7320562.elements[25] = r_735847;
++c_7320562.elements[26] = ((closureN)self_7312471)->elements[25];
++
++return_closcall2(data,  ((closureN)self_7312471)->elements[25],  &c_7320562, quote_list_127);; 
++}
++
++static void __lambda_821(void *data, object self_7312472, int argc, object *args) /* object self_7312472, object r_735848 */
++ {
++ object r_735848 = args[0];
++  
++closureN_type c_7320565;
++object e_7322563 [28];
++c_7320565.hdr.mark = gc_color_red;
++ c_7320565.hdr.grayed = 0;
++c_7320565.tag = closureN_tag;
++ c_7320565.fn = (function_type)__lambda_822;
++c_7320565.num_args = 1;
++c_7320565.num_elements = 28;
++c_7320565.elements = (object *)e_7322563;
++c_7320565.elements[0] = ((closureN)self_7312472)->elements[0];
++c_7320565.elements[1] = ((closureN)self_7312472)->elements[1];
++c_7320565.elements[2] = ((closureN)self_7312472)->elements[2];
++c_7320565.elements[3] = ((closureN)self_7312472)->elements[3];
++c_7320565.elements[4] = ((closureN)self_7312472)->elements[4];
++c_7320565.elements[5] = ((closureN)self_7312472)->elements[5];
++c_7320565.elements[6] = ((closureN)self_7312472)->elements[6];
++c_7320565.elements[7] = ((closureN)self_7312472)->elements[7];
++c_7320565.elements[8] = ((closureN)self_7312472)->elements[8];
++c_7320565.elements[9] = ((closureN)self_7312472)->elements[9];
++c_7320565.elements[10] = ((closureN)self_7312472)->elements[10];
++c_7320565.elements[11] = ((closureN)self_7312472)->elements[11];
++c_7320565.elements[12] = ((closureN)self_7312472)->elements[12];
++c_7320565.elements[13] = ((closureN)self_7312472)->elements[13];
++c_7320565.elements[14] = ((closureN)self_7312472)->elements[14];
++c_7320565.elements[15] = ((closureN)self_7312472)->elements[15];
++c_7320565.elements[16] = ((closureN)self_7312472)->elements[16];
++c_7320565.elements[17] = ((closureN)self_7312472)->elements[17];
++c_7320565.elements[18] = ((closureN)self_7312472)->elements[18];
++c_7320565.elements[19] = ((closureN)self_7312472)->elements[19];
++c_7320565.elements[20] = ((closureN)self_7312472)->elements[20];
++c_7320565.elements[21] = ((closureN)self_7312472)->elements[21];
++c_7320565.elements[22] = ((closureN)self_7312472)->elements[22];
++c_7320565.elements[23] = ((closureN)self_7312472)->elements[23];
++c_7320565.elements[24] = ((closureN)self_7312472)->elements[24];
++c_7320565.elements[25] = ((closureN)self_7312472)->elements[25];
++c_7320565.elements[26] = r_735848;
++c_7320565.elements[27] = ((closureN)self_7312472)->elements[26];
++
++return_closcall2(data,  ((closureN)self_7312472)->elements[26],  &c_7320565, quote_len);; 
++}
++
++static void __lambda_822(void *data, object self_7312473, int argc, object *args) /* object self_7312473, object r_735849 */
++ {
++ object r_735849 = args[0];
++  
++closureN_type c_7320568;
++object e_7322562 [29];
++c_7320568.hdr.mark = gc_color_red;
++ c_7320568.hdr.grayed = 0;
++c_7320568.tag = closureN_tag;
++ c_7320568.fn = (function_type)__lambda_823;
++c_7320568.num_args = 1;
++c_7320568.num_elements = 29;
++c_7320568.elements = (object *)e_7322562;
++c_7320568.elements[0] = ((closureN)self_7312473)->elements[0];
++c_7320568.elements[1] = ((closureN)self_7312473)->elements[1];
++c_7320568.elements[2] = ((closureN)self_7312473)->elements[2];
++c_7320568.elements[3] = ((closureN)self_7312473)->elements[3];
++c_7320568.elements[4] = ((closureN)self_7312473)->elements[4];
++c_7320568.elements[5] = ((closureN)self_7312473)->elements[5];
++c_7320568.elements[6] = ((closureN)self_7312473)->elements[6];
++c_7320568.elements[7] = ((closureN)self_7312473)->elements[7];
++c_7320568.elements[8] = ((closureN)self_7312473)->elements[8];
++c_7320568.elements[9] = ((closureN)self_7312473)->elements[9];
++c_7320568.elements[10] = ((closureN)self_7312473)->elements[10];
++c_7320568.elements[11] = ((closureN)self_7312473)->elements[11];
++c_7320568.elements[12] = ((closureN)self_7312473)->elements[12];
++c_7320568.elements[13] = ((closureN)self_7312473)->elements[13];
++c_7320568.elements[14] = ((closureN)self_7312473)->elements[14];
++c_7320568.elements[15] = ((closureN)self_7312473)->elements[15];
++c_7320568.elements[16] = ((closureN)self_7312473)->elements[16];
++c_7320568.elements[17] = ((closureN)self_7312473)->elements[17];
++c_7320568.elements[18] = ((closureN)self_7312473)->elements[18];
++c_7320568.elements[19] = ((closureN)self_7312473)->elements[19];
++c_7320568.elements[20] = ((closureN)self_7312473)->elements[20];
++c_7320568.elements[21] = ((closureN)self_7312473)->elements[21];
++c_7320568.elements[22] = ((closureN)self_7312473)->elements[22];
++c_7320568.elements[23] = ((closureN)self_7312473)->elements[23];
++c_7320568.elements[24] = ((closureN)self_7312473)->elements[24];
++c_7320568.elements[25] = ((closureN)self_7312473)->elements[25];
++c_7320568.elements[26] = ((closureN)self_7312473)->elements[26];
++c_7320568.elements[27] = r_735849;
++c_7320568.elements[28] = ((closureN)self_7312473)->elements[27];
++
++return_closcall2(data,  ((closureN)self_7312473)->elements[27],  &c_7320568, quote_length);; 
++}
++
++static void __lambda_823(void *data, object self_7312474, int argc, object *args) /* object self_7312474, object r_735850 */
++ {
++ object r_735850 = args[0];
++  
++closureN_type c_7320571;
++object e_7322561 [30];
++c_7320571.hdr.mark = gc_color_red;
++ c_7320571.hdr.grayed = 0;
++c_7320571.tag = closureN_tag;
++ c_7320571.fn = (function_type)__lambda_824;
++c_7320571.num_args = 1;
++c_7320571.num_elements = 30;
++c_7320571.elements = (object *)e_7322561;
++c_7320571.elements[0] = ((closureN)self_7312474)->elements[0];
++c_7320571.elements[1] = ((closureN)self_7312474)->elements[1];
++c_7320571.elements[2] = ((closureN)self_7312474)->elements[2];
++c_7320571.elements[3] = ((closureN)self_7312474)->elements[3];
++c_7320571.elements[4] = ((closureN)self_7312474)->elements[4];
++c_7320571.elements[5] = ((closureN)self_7312474)->elements[5];
++c_7320571.elements[6] = ((closureN)self_7312474)->elements[6];
++c_7320571.elements[7] = ((closureN)self_7312474)->elements[7];
++c_7320571.elements[8] = ((closureN)self_7312474)->elements[8];
++c_7320571.elements[9] = ((closureN)self_7312474)->elements[9];
++c_7320571.elements[10] = ((closureN)self_7312474)->elements[10];
++c_7320571.elements[11] = ((closureN)self_7312474)->elements[11];
++c_7320571.elements[12] = ((closureN)self_7312474)->elements[12];
++c_7320571.elements[13] = ((closureN)self_7312474)->elements[13];
++c_7320571.elements[14] = ((closureN)self_7312474)->elements[14];
++c_7320571.elements[15] = ((closureN)self_7312474)->elements[15];
++c_7320571.elements[16] = ((closureN)self_7312474)->elements[16];
++c_7320571.elements[17] = ((closureN)self_7312474)->elements[17];
++c_7320571.elements[18] = ((closureN)self_7312474)->elements[18];
++c_7320571.elements[19] = ((closureN)self_7312474)->elements[19];
++c_7320571.elements[20] = ((closureN)self_7312474)->elements[20];
++c_7320571.elements[21] = ((closureN)self_7312474)->elements[21];
++c_7320571.elements[22] = ((closureN)self_7312474)->elements[22];
++c_7320571.elements[23] = ((closureN)self_7312474)->elements[23];
++c_7320571.elements[24] = ((closureN)self_7312474)->elements[24];
++c_7320571.elements[25] = ((closureN)self_7312474)->elements[25];
++c_7320571.elements[26] = ((closureN)self_7312474)->elements[26];
++c_7320571.elements[27] = ((closureN)self_7312474)->elements[27];
++c_7320571.elements[28] = r_735850;
++c_7320571.elements[29] = ((closureN)self_7312474)->elements[28];
++
++return_closcall2(data,  ((closureN)self_7312474)->elements[28],  &c_7320571, quote__91);; 
++}
++
++static void __lambda_824(void *data, object self_7312475, int argc, object *args) /* object self_7312475, object r_735851 */
++ {
++ object r_735851 = args[0];
++  
++closureN_type c_7320574;
++object e_7322560 [31];
++c_7320574.hdr.mark = gc_color_red;
++ c_7320574.hdr.grayed = 0;
++c_7320574.tag = closureN_tag;
++ c_7320574.fn = (function_type)__lambda_825;
++c_7320574.num_args = 1;
++c_7320574.num_elements = 31;
++c_7320574.elements = (object *)e_7322560;
++c_7320574.elements[0] = ((closureN)self_7312475)->elements[0];
++c_7320574.elements[1] = ((closureN)self_7312475)->elements[1];
++c_7320574.elements[2] = ((closureN)self_7312475)->elements[2];
++c_7320574.elements[3] = ((closureN)self_7312475)->elements[3];
++c_7320574.elements[4] = ((closureN)self_7312475)->elements[4];
++c_7320574.elements[5] = ((closureN)self_7312475)->elements[5];
++c_7320574.elements[6] = ((closureN)self_7312475)->elements[6];
++c_7320574.elements[7] = ((closureN)self_7312475)->elements[7];
++c_7320574.elements[8] = ((closureN)self_7312475)->elements[8];
++c_7320574.elements[9] = ((closureN)self_7312475)->elements[9];
++c_7320574.elements[10] = ((closureN)self_7312475)->elements[10];
++c_7320574.elements[11] = ((closureN)self_7312475)->elements[11];
++c_7320574.elements[12] = ((closureN)self_7312475)->elements[12];
++c_7320574.elements[13] = ((closureN)self_7312475)->elements[13];
++c_7320574.elements[14] = ((closureN)self_7312475)->elements[14];
++c_7320574.elements[15] = ((closureN)self_7312475)->elements[15];
++c_7320574.elements[16] = ((closureN)self_7312475)->elements[16];
++c_7320574.elements[17] = ((closureN)self_7312475)->elements[17];
++c_7320574.elements[18] = ((closureN)self_7312475)->elements[18];
++c_7320574.elements[19] = ((closureN)self_7312475)->elements[19];
++c_7320574.elements[20] = ((closureN)self_7312475)->elements[20];
++c_7320574.elements[21] = ((closureN)self_7312475)->elements[21];
++c_7320574.elements[22] = ((closureN)self_7312475)->elements[22];
++c_7320574.elements[23] = ((closureN)self_7312475)->elements[23];
++c_7320574.elements[24] = ((closureN)self_7312475)->elements[24];
++c_7320574.elements[25] = ((closureN)self_7312475)->elements[25];
++c_7320574.elements[26] = ((closureN)self_7312475)->elements[26];
++c_7320574.elements[27] = ((closureN)self_7312475)->elements[27];
++c_7320574.elements[28] = ((closureN)self_7312475)->elements[28];
++c_7320574.elements[29] = r_735851;
++c_7320574.elements[30] = ((closureN)self_7312475)->elements[29];
++
++return_closcall2(data,  ((closureN)self_7312475)->elements[29],  &c_7320574, quote__125_123);; 
++}
++
++static void __lambda_825(void *data, object self_7312476, int argc, object *args) /* object self_7312476, object r_735852 */
++ {
++ object r_735852 = args[0];
++  
++closureN_type c_7320577;
++object e_7322559 [32];
++c_7320577.hdr.mark = gc_color_red;
++ c_7320577.hdr.grayed = 0;
++c_7320577.tag = closureN_tag;
++ c_7320577.fn = (function_type)__lambda_826;
++c_7320577.num_args = 1;
++c_7320577.num_elements = 32;
++c_7320577.elements = (object *)e_7322559;
++c_7320577.elements[0] = ((closureN)self_7312476)->elements[0];
++c_7320577.elements[1] = ((closureN)self_7312476)->elements[1];
++c_7320577.elements[2] = ((closureN)self_7312476)->elements[2];
++c_7320577.elements[3] = ((closureN)self_7312476)->elements[3];
++c_7320577.elements[4] = ((closureN)self_7312476)->elements[4];
++c_7320577.elements[5] = ((closureN)self_7312476)->elements[5];
++c_7320577.elements[6] = ((closureN)self_7312476)->elements[6];
++c_7320577.elements[7] = ((closureN)self_7312476)->elements[7];
++c_7320577.elements[8] = ((closureN)self_7312476)->elements[8];
++c_7320577.elements[9] = ((closureN)self_7312476)->elements[9];
++c_7320577.elements[10] = ((closureN)self_7312476)->elements[10];
++c_7320577.elements[11] = ((closureN)self_7312476)->elements[11];
++c_7320577.elements[12] = ((closureN)self_7312476)->elements[12];
++c_7320577.elements[13] = ((closureN)self_7312476)->elements[13];
++c_7320577.elements[14] = ((closureN)self_7312476)->elements[14];
++c_7320577.elements[15] = ((closureN)self_7312476)->elements[15];
++c_7320577.elements[16] = ((closureN)self_7312476)->elements[16];
++c_7320577.elements[17] = ((closureN)self_7312476)->elements[17];
++c_7320577.elements[18] = ((closureN)self_7312476)->elements[18];
++c_7320577.elements[19] = ((closureN)self_7312476)->elements[19];
++c_7320577.elements[20] = ((closureN)self_7312476)->elements[20];
++c_7320577.elements[21] = ((closureN)self_7312476)->elements[21];
++c_7320577.elements[22] = ((closureN)self_7312476)->elements[22];
++c_7320577.elements[23] = ((closureN)self_7312476)->elements[23];
++c_7320577.elements[24] = ((closureN)self_7312476)->elements[24];
++c_7320577.elements[25] = ((closureN)self_7312476)->elements[25];
++c_7320577.elements[26] = ((closureN)self_7312476)->elements[26];
++c_7320577.elements[27] = ((closureN)self_7312476)->elements[27];
++c_7320577.elements[28] = ((closureN)self_7312476)->elements[28];
++c_7320577.elements[29] = ((closureN)self_7312476)->elements[29];
++c_7320577.elements[30] = r_735852;
++c_7320577.elements[31] = ((closureN)self_7312476)->elements[30];
++
++return_closcall2(data,  ((closureN)self_7312476)->elements[30],  &c_7320577, quote_error_95loc);; 
++}
++
++static void __lambda_826(void *data, object self_7312477, int argc, object *args) /* object self_7312477, object r_735853 */
++ {
++ object r_735853 = args[0];
++  
++closureN_type c_7320580;
++object e_7322558 [33];
++c_7320580.hdr.mark = gc_color_red;
++ c_7320580.hdr.grayed = 0;
++c_7320580.tag = closureN_tag;
++ c_7320580.fn = (function_type)__lambda_827;
++c_7320580.num_args = 1;
++c_7320580.num_elements = 33;
++c_7320580.elements = (object *)e_7322558;
++c_7320580.elements[0] = ((closureN)self_7312477)->elements[0];
++c_7320580.elements[1] = ((closureN)self_7312477)->elements[1];
++c_7320580.elements[2] = ((closureN)self_7312477)->elements[2];
++c_7320580.elements[3] = ((closureN)self_7312477)->elements[3];
++c_7320580.elements[4] = ((closureN)self_7312477)->elements[4];
++c_7320580.elements[5] = ((closureN)self_7312477)->elements[5];
++c_7320580.elements[6] = ((closureN)self_7312477)->elements[6];
++c_7320580.elements[7] = ((closureN)self_7312477)->elements[7];
++c_7320580.elements[8] = ((closureN)self_7312477)->elements[8];
++c_7320580.elements[9] = ((closureN)self_7312477)->elements[9];
++c_7320580.elements[10] = ((closureN)self_7312477)->elements[10];
++c_7320580.elements[11] = ((closureN)self_7312477)->elements[11];
++c_7320580.elements[12] = ((closureN)self_7312477)->elements[12];
++c_7320580.elements[13] = ((closureN)self_7312477)->elements[13];
++c_7320580.elements[14] = ((closureN)self_7312477)->elements[14];
++c_7320580.elements[15] = ((closureN)self_7312477)->elements[15];
++c_7320580.elements[16] = ((closureN)self_7312477)->elements[16];
++c_7320580.elements[17] = ((closureN)self_7312477)->elements[17];
++c_7320580.elements[18] = ((closureN)self_7312477)->elements[18];
++c_7320580.elements[19] = ((closureN)self_7312477)->elements[19];
++c_7320580.elements[20] = ((closureN)self_7312477)->elements[20];
++c_7320580.elements[21] = ((closureN)self_7312477)->elements[21];
++c_7320580.elements[22] = ((closureN)self_7312477)->elements[22];
++c_7320580.elements[23] = ((closureN)self_7312477)->elements[23];
++c_7320580.elements[24] = ((closureN)self_7312477)->elements[24];
++c_7320580.elements[25] = ((closureN)self_7312477)->elements[25];
++c_7320580.elements[26] = ((closureN)self_7312477)->elements[26];
++c_7320580.elements[27] = ((closureN)self_7312477)->elements[27];
++c_7320580.elements[28] = ((closureN)self_7312477)->elements[28];
++c_7320580.elements[29] = ((closureN)self_7312477)->elements[29];
++c_7320580.elements[30] = ((closureN)self_7312477)->elements[30];
++c_7320580.elements[31] = r_735853;
++c_7320580.elements[32] = ((closureN)self_7312477)->elements[31];
++
++return_closcall2(data,  ((closureN)self_7312477)->elements[31],  &c_7320580, quote_ls);; 
++}
++
++static void __lambda_827(void *data, object self_7312478, int argc, object *args) /* object self_7312478, object r_735854 */
++ {
++ object r_735854 = args[0];
++  
++closureN_type c_7320583;
++object e_7322557 [34];
++c_7320583.hdr.mark = gc_color_red;
++ c_7320583.hdr.grayed = 0;
++c_7320583.tag = closureN_tag;
++ c_7320583.fn = (function_type)__lambda_828;
++c_7320583.num_args = 1;
++c_7320583.num_elements = 34;
++c_7320583.elements = (object *)e_7322557;
++c_7320583.elements[0] = ((closureN)self_7312478)->elements[0];
++c_7320583.elements[1] = ((closureN)self_7312478)->elements[1];
++c_7320583.elements[2] = ((closureN)self_7312478)->elements[2];
++c_7320583.elements[3] = ((closureN)self_7312478)->elements[3];
++c_7320583.elements[4] = ((closureN)self_7312478)->elements[4];
++c_7320583.elements[5] = ((closureN)self_7312478)->elements[5];
++c_7320583.elements[6] = ((closureN)self_7312478)->elements[6];
++c_7320583.elements[7] = ((closureN)self_7312478)->elements[7];
++c_7320583.elements[8] = ((closureN)self_7312478)->elements[8];
++c_7320583.elements[9] = ((closureN)self_7312478)->elements[9];
++c_7320583.elements[10] = ((closureN)self_7312478)->elements[10];
++c_7320583.elements[11] = ((closureN)self_7312478)->elements[11];
++c_7320583.elements[12] = ((closureN)self_7312478)->elements[12];
++c_7320583.elements[13] = ((closureN)self_7312478)->elements[13];
++c_7320583.elements[14] = ((closureN)self_7312478)->elements[14];
++c_7320583.elements[15] = ((closureN)self_7312478)->elements[15];
++c_7320583.elements[16] = ((closureN)self_7312478)->elements[16];
++c_7320583.elements[17] = ((closureN)self_7312478)->elements[17];
++c_7320583.elements[18] = ((closureN)self_7312478)->elements[18];
++c_7320583.elements[19] = ((closureN)self_7312478)->elements[19];
++c_7320583.elements[20] = ((closureN)self_7312478)->elements[20];
++c_7320583.elements[21] = ((closureN)self_7312478)->elements[21];
++c_7320583.elements[22] = ((closureN)self_7312478)->elements[22];
++c_7320583.elements[23] = ((closureN)self_7312478)->elements[23];
++c_7320583.elements[24] = ((closureN)self_7312478)->elements[24];
++c_7320583.elements[25] = ((closureN)self_7312478)->elements[25];
++c_7320583.elements[26] = ((closureN)self_7312478)->elements[26];
++c_7320583.elements[27] = ((closureN)self_7312478)->elements[27];
++c_7320583.elements[28] = ((closureN)self_7312478)->elements[28];
++c_7320583.elements[29] = ((closureN)self_7312478)->elements[29];
++c_7320583.elements[30] = ((closureN)self_7312478)->elements[30];
++c_7320583.elements[31] = ((closureN)self_7312478)->elements[31];
++c_7320583.elements[32] = r_735854;
++c_7320583.elements[33] = ((closureN)self_7312478)->elements[32];
++
++return_closcall2(data,  ((closureN)self_7312478)->elements[32],  &c_7320583, quote_res);; 
++}
++
++static void __lambda_828(void *data, object self_7312479, int argc, object *args) /* object self_7312479, object r_735855 */
++ {
++ object r_735855 = args[0];
++  
++closureN_type c_7320586;
++object e_7322556 [35];
++c_7320586.hdr.mark = gc_color_red;
++ c_7320586.hdr.grayed = 0;
++c_7320586.tag = closureN_tag;
++ c_7320586.fn = (function_type)__lambda_829;
++c_7320586.num_args = 1;
++c_7320586.num_elements = 35;
++c_7320586.elements = (object *)e_7322556;
++c_7320586.elements[0] = ((closureN)self_7312479)->elements[0];
++c_7320586.elements[1] = ((closureN)self_7312479)->elements[1];
++c_7320586.elements[2] = ((closureN)self_7312479)->elements[2];
++c_7320586.elements[3] = ((closureN)self_7312479)->elements[3];
++c_7320586.elements[4] = ((closureN)self_7312479)->elements[4];
++c_7320586.elements[5] = ((closureN)self_7312479)->elements[5];
++c_7320586.elements[6] = ((closureN)self_7312479)->elements[6];
++c_7320586.elements[7] = ((closureN)self_7312479)->elements[7];
++c_7320586.elements[8] = ((closureN)self_7312479)->elements[8];
++c_7320586.elements[9] = ((closureN)self_7312479)->elements[9];
++c_7320586.elements[10] = ((closureN)self_7312479)->elements[10];
++c_7320586.elements[11] = ((closureN)self_7312479)->elements[11];
++c_7320586.elements[12] = ((closureN)self_7312479)->elements[12];
++c_7320586.elements[13] = ((closureN)self_7312479)->elements[13];
++c_7320586.elements[14] = ((closureN)self_7312479)->elements[14];
++c_7320586.elements[15] = ((closureN)self_7312479)->elements[15];
++c_7320586.elements[16] = ((closureN)self_7312479)->elements[16];
++c_7320586.elements[17] = ((closureN)self_7312479)->elements[17];
++c_7320586.elements[18] = ((closureN)self_7312479)->elements[18];
++c_7320586.elements[19] = ((closureN)self_7312479)->elements[19];
++c_7320586.elements[20] = ((closureN)self_7312479)->elements[20];
++c_7320586.elements[21] = ((closureN)self_7312479)->elements[21];
++c_7320586.elements[22] = ((closureN)self_7312479)->elements[22];
++c_7320586.elements[23] = ((closureN)self_7312479)->elements[23];
++c_7320586.elements[24] = ((closureN)self_7312479)->elements[24];
++c_7320586.elements[25] = ((closureN)self_7312479)->elements[25];
++c_7320586.elements[26] = ((closureN)self_7312479)->elements[26];
++c_7320586.elements[27] = ((closureN)self_7312479)->elements[27];
++c_7320586.elements[28] = ((closureN)self_7312479)->elements[28];
++c_7320586.elements[29] = ((closureN)self_7312479)->elements[29];
++c_7320586.elements[30] = ((closureN)self_7312479)->elements[30];
++c_7320586.elements[31] = ((closureN)self_7312479)->elements[31];
++c_7320586.elements[32] = ((closureN)self_7312479)->elements[32];
++c_7320586.elements[33] = r_735855;
++c_7320586.elements[34] = ((closureN)self_7312479)->elements[33];
++
++return_closcall2(data,  ((closureN)self_7312479)->elements[33],  &c_7320586, quote_i);; 
++}
++
++static void __lambda_829(void *data, object self_7312480, int argc, object *args) /* object self_7312480, object r_735856 */
++ {
++ object r_735856 = args[0];
++  
++closureN_type c_7320589;
++object e_7322555 [36];
++c_7320589.hdr.mark = gc_color_red;
++ c_7320589.hdr.grayed = 0;
++c_7320589.tag = closureN_tag;
++ c_7320589.fn = (function_type)__lambda_830;
++c_7320589.num_args = 1;
++c_7320589.num_elements = 36;
++c_7320589.elements = (object *)e_7322555;
++c_7320589.elements[0] = ((closureN)self_7312480)->elements[0];
++c_7320589.elements[1] = ((closureN)self_7312480)->elements[1];
++c_7320589.elements[2] = ((closureN)self_7312480)->elements[2];
++c_7320589.elements[3] = ((closureN)self_7312480)->elements[3];
++c_7320589.elements[4] = ((closureN)self_7312480)->elements[4];
++c_7320589.elements[5] = ((closureN)self_7312480)->elements[5];
++c_7320589.elements[6] = ((closureN)self_7312480)->elements[6];
++c_7320589.elements[7] = ((closureN)self_7312480)->elements[7];
++c_7320589.elements[8] = ((closureN)self_7312480)->elements[8];
++c_7320589.elements[9] = ((closureN)self_7312480)->elements[9];
++c_7320589.elements[10] = ((closureN)self_7312480)->elements[10];
++c_7320589.elements[11] = ((closureN)self_7312480)->elements[11];
++c_7320589.elements[12] = ((closureN)self_7312480)->elements[12];
++c_7320589.elements[13] = ((closureN)self_7312480)->elements[13];
++c_7320589.elements[14] = ((closureN)self_7312480)->elements[14];
++c_7320589.elements[15] = ((closureN)self_7312480)->elements[15];
++c_7320589.elements[16] = ((closureN)self_7312480)->elements[16];
++c_7320589.elements[17] = ((closureN)self_7312480)->elements[17];
++c_7320589.elements[18] = ((closureN)self_7312480)->elements[18];
++c_7320589.elements[19] = ((closureN)self_7312480)->elements[19];
++c_7320589.elements[20] = ((closureN)self_7312480)->elements[20];
++c_7320589.elements[21] = ((closureN)self_7312480)->elements[21];
++c_7320589.elements[22] = ((closureN)self_7312480)->elements[22];
++c_7320589.elements[23] = ((closureN)self_7312480)->elements[23];
++c_7320589.elements[24] = ((closureN)self_7312480)->elements[24];
++c_7320589.elements[25] = ((closureN)self_7312480)->elements[25];
++c_7320589.elements[26] = ((closureN)self_7312480)->elements[26];
++c_7320589.elements[27] = ((closureN)self_7312480)->elements[27];
++c_7320589.elements[28] = ((closureN)self_7312480)->elements[28];
++c_7320589.elements[29] = ((closureN)self_7312480)->elements[29];
++c_7320589.elements[30] = ((closureN)self_7312480)->elements[30];
++c_7320589.elements[31] = ((closureN)self_7312480)->elements[31];
++c_7320589.elements[32] = ((closureN)self_7312480)->elements[32];
++c_7320589.elements[33] = ((closureN)self_7312480)->elements[33];
++c_7320589.elements[34] = r_735856;
++c_7320589.elements[35] = ((closureN)self_7312480)->elements[34];
++
++return_closcall2(data,  ((closureN)self_7312480)->elements[34],  &c_7320589, quote_reverse);; 
++}
++
++static void __lambda_830(void *data, object self_7312481, int argc, object *args) /* object self_7312481, object r_735857 */
++ {
++ object r_735857 = args[0];
++  
++closureN_type c_7320592;
++object e_7322554 [37];
++c_7320592.hdr.mark = gc_color_red;
++ c_7320592.hdr.grayed = 0;
++c_7320592.tag = closureN_tag;
++ c_7320592.fn = (function_type)__lambda_831;
++c_7320592.num_args = 1;
++c_7320592.num_elements = 37;
++c_7320592.elements = (object *)e_7322554;
++c_7320592.elements[0] = ((closureN)self_7312481)->elements[0];
++c_7320592.elements[1] = ((closureN)self_7312481)->elements[1];
++c_7320592.elements[2] = ((closureN)self_7312481)->elements[2];
++c_7320592.elements[3] = ((closureN)self_7312481)->elements[3];
++c_7320592.elements[4] = ((closureN)self_7312481)->elements[4];
++c_7320592.elements[5] = ((closureN)self_7312481)->elements[5];
++c_7320592.elements[6] = ((closureN)self_7312481)->elements[6];
++c_7320592.elements[7] = ((closureN)self_7312481)->elements[7];
++c_7320592.elements[8] = ((closureN)self_7312481)->elements[8];
++c_7320592.elements[9] = ((closureN)self_7312481)->elements[9];
++c_7320592.elements[10] = ((closureN)self_7312481)->elements[10];
++c_7320592.elements[11] = ((closureN)self_7312481)->elements[11];
++c_7320592.elements[12] = ((closureN)self_7312481)->elements[12];
++c_7320592.elements[13] = ((closureN)self_7312481)->elements[13];
++c_7320592.elements[14] = ((closureN)self_7312481)->elements[14];
++c_7320592.elements[15] = ((closureN)self_7312481)->elements[15];
++c_7320592.elements[16] = ((closureN)self_7312481)->elements[16];
++c_7320592.elements[17] = ((closureN)self_7312481)->elements[17];
++c_7320592.elements[18] = ((closureN)self_7312481)->elements[18];
++c_7320592.elements[19] = ((closureN)self_7312481)->elements[19];
++c_7320592.elements[20] = ((closureN)self_7312481)->elements[20];
++c_7320592.elements[21] = ((closureN)self_7312481)->elements[21];
++c_7320592.elements[22] = ((closureN)self_7312481)->elements[22];
++c_7320592.elements[23] = ((closureN)self_7312481)->elements[23];
++c_7320592.elements[24] = ((closureN)self_7312481)->elements[24];
++c_7320592.elements[25] = ((closureN)self_7312481)->elements[25];
++c_7320592.elements[26] = ((closureN)self_7312481)->elements[26];
++c_7320592.elements[27] = ((closureN)self_7312481)->elements[27];
++c_7320592.elements[28] = ((closureN)self_7312481)->elements[28];
++c_7320592.elements[29] = ((closureN)self_7312481)->elements[29];
++c_7320592.elements[30] = ((closureN)self_7312481)->elements[30];
++c_7320592.elements[31] = ((closureN)self_7312481)->elements[31];
++c_7320592.elements[32] = ((closureN)self_7312481)->elements[32];
++c_7320592.elements[33] = ((closureN)self_7312481)->elements[33];
++c_7320592.elements[34] = ((closureN)self_7312481)->elements[34];
++c_7320592.elements[35] = r_735857;
++c_7320592.elements[36] = ((closureN)self_7312481)->elements[35];
++
++return_closcall2(data,  ((closureN)self_7312481)->elements[35],  &c_7320592, quote_vector_91_125list);; 
++}
++
++static void __lambda_831(void *data, object self_7312482, int argc, object *args) /* object self_7312482, object r_735858 */
++ {
++ object r_735858 = args[0];
++  
++closureN_type c_7320595;
++object e_7322553 [38];
++c_7320595.hdr.mark = gc_color_red;
++ c_7320595.hdr.grayed = 0;
++c_7320595.tag = closureN_tag;
++ c_7320595.fn = (function_type)__lambda_832;
++c_7320595.num_args = 1;
++c_7320595.num_elements = 38;
++c_7320595.elements = (object *)e_7322553;
++c_7320595.elements[0] = ((closureN)self_7312482)->elements[0];
++c_7320595.elements[1] = ((closureN)self_7312482)->elements[1];
++c_7320595.elements[2] = ((closureN)self_7312482)->elements[2];
++c_7320595.elements[3] = ((closureN)self_7312482)->elements[3];
++c_7320595.elements[4] = ((closureN)self_7312482)->elements[4];
++c_7320595.elements[5] = ((closureN)self_7312482)->elements[5];
++c_7320595.elements[6] = ((closureN)self_7312482)->elements[6];
++c_7320595.elements[7] = ((closureN)self_7312482)->elements[7];
++c_7320595.elements[8] = ((closureN)self_7312482)->elements[8];
++c_7320595.elements[9] = ((closureN)self_7312482)->elements[9];
++c_7320595.elements[10] = ((closureN)self_7312482)->elements[10];
++c_7320595.elements[11] = ((closureN)self_7312482)->elements[11];
++c_7320595.elements[12] = ((closureN)self_7312482)->elements[12];
++c_7320595.elements[13] = ((closureN)self_7312482)->elements[13];
++c_7320595.elements[14] = ((closureN)self_7312482)->elements[14];
++c_7320595.elements[15] = ((closureN)self_7312482)->elements[15];
++c_7320595.elements[16] = ((closureN)self_7312482)->elements[16];
++c_7320595.elements[17] = ((closureN)self_7312482)->elements[17];
++c_7320595.elements[18] = ((closureN)self_7312482)->elements[18];
++c_7320595.elements[19] = ((closureN)self_7312482)->elements[19];
++c_7320595.elements[20] = ((closureN)self_7312482)->elements[20];
++c_7320595.elements[21] = ((closureN)self_7312482)->elements[21];
++c_7320595.elements[22] = ((closureN)self_7312482)->elements[22];
++c_7320595.elements[23] = ((closureN)self_7312482)->elements[23];
++c_7320595.elements[24] = ((closureN)self_7312482)->elements[24];
++c_7320595.elements[25] = ((closureN)self_7312482)->elements[25];
++c_7320595.elements[26] = ((closureN)self_7312482)->elements[26];
++c_7320595.elements[27] = ((closureN)self_7312482)->elements[27];
++c_7320595.elements[28] = ((closureN)self_7312482)->elements[28];
++c_7320595.elements[29] = ((closureN)self_7312482)->elements[29];
++c_7320595.elements[30] = ((closureN)self_7312482)->elements[30];
++c_7320595.elements[31] = ((closureN)self_7312482)->elements[31];
++c_7320595.elements[32] = ((closureN)self_7312482)->elements[32];
++c_7320595.elements[33] = ((closureN)self_7312482)->elements[33];
++c_7320595.elements[34] = ((closureN)self_7312482)->elements[34];
++c_7320595.elements[35] = ((closureN)self_7312482)->elements[35];
++c_7320595.elements[36] = r_735858;
++c_7320595.elements[37] = ((closureN)self_7312482)->elements[36];
++
++return_closcall2(data,  ((closureN)self_7312482)->elements[36],  &c_7320595, quote_list_91_125vector);; 
++}
++
++static void __lambda_832(void *data, object self_7312483, int argc, object *args) /* object self_7312483, object r_735859 */
++ {
++ object r_735859 = args[0];
++  
++closureN_type c_7320598;
++object e_7322552 [39];
++c_7320598.hdr.mark = gc_color_red;
++ c_7320598.hdr.grayed = 0;
++c_7320598.tag = closureN_tag;
++ c_7320598.fn = (function_type)__lambda_833;
++c_7320598.num_args = 1;
++c_7320598.num_elements = 39;
++c_7320598.elements = (object *)e_7322552;
++c_7320598.elements[0] = ((closureN)self_7312483)->elements[0];
++c_7320598.elements[1] = ((closureN)self_7312483)->elements[1];
++c_7320598.elements[2] = ((closureN)self_7312483)->elements[2];
++c_7320598.elements[3] = ((closureN)self_7312483)->elements[3];
++c_7320598.elements[4] = ((closureN)self_7312483)->elements[4];
++c_7320598.elements[5] = ((closureN)self_7312483)->elements[5];
++c_7320598.elements[6] = ((closureN)self_7312483)->elements[6];
++c_7320598.elements[7] = ((closureN)self_7312483)->elements[7];
++c_7320598.elements[8] = ((closureN)self_7312483)->elements[8];
++c_7320598.elements[9] = ((closureN)self_7312483)->elements[9];
++c_7320598.elements[10] = ((closureN)self_7312483)->elements[10];
++c_7320598.elements[11] = ((closureN)self_7312483)->elements[11];
++c_7320598.elements[12] = ((closureN)self_7312483)->elements[12];
++c_7320598.elements[13] = ((closureN)self_7312483)->elements[13];
++c_7320598.elements[14] = ((closureN)self_7312483)->elements[14];
++c_7320598.elements[15] = ((closureN)self_7312483)->elements[15];
++c_7320598.elements[16] = ((closureN)self_7312483)->elements[16];
++c_7320598.elements[17] = ((closureN)self_7312483)->elements[17];
++c_7320598.elements[18] = ((closureN)self_7312483)->elements[18];
++c_7320598.elements[19] = ((closureN)self_7312483)->elements[19];
++c_7320598.elements[20] = ((closureN)self_7312483)->elements[20];
++c_7320598.elements[21] = ((closureN)self_7312483)->elements[21];
++c_7320598.elements[22] = ((closureN)self_7312483)->elements[22];
++c_7320598.elements[23] = ((closureN)self_7312483)->elements[23];
++c_7320598.elements[24] = ((closureN)self_7312483)->elements[24];
++c_7320598.elements[25] = ((closureN)self_7312483)->elements[25];
++c_7320598.elements[26] = ((closureN)self_7312483)->elements[26];
++c_7320598.elements[27] = ((closureN)self_7312483)->elements[27];
++c_7320598.elements[28] = ((closureN)self_7312483)->elements[28];
++c_7320598.elements[29] = ((closureN)self_7312483)->elements[29];
++c_7320598.elements[30] = ((closureN)self_7312483)->elements[30];
++c_7320598.elements[31] = ((closureN)self_7312483)->elements[31];
++c_7320598.elements[32] = ((closureN)self_7312483)->elements[32];
++c_7320598.elements[33] = ((closureN)self_7312483)->elements[33];
++c_7320598.elements[34] = ((closureN)self_7312483)->elements[34];
++c_7320598.elements[35] = ((closureN)self_7312483)->elements[35];
++c_7320598.elements[36] = ((closureN)self_7312483)->elements[36];
++c_7320598.elements[37] = r_735859;
++c_7320598.elements[38] = ((closureN)self_7312483)->elements[37];
++
++return_closcall2(data,  ((closureN)self_7312483)->elements[37],  &c_7320598, quote_cons_91source);; 
++}
++
++static void __lambda_833(void *data, object self_7312484, int argc, object *args) /* object self_7312484, object r_735860 */
++ {
++ object r_735860 = args[0];
++  
++closureN_type c_7320600;
++object e_7322516 [4];
++c_7320600.hdr.mark = gc_color_red;
++ c_7320600.hdr.grayed = 0;
++c_7320600.tag = closureN_tag;
++ c_7320600.fn = (function_type)__lambda_834;
++c_7320600.num_args = 37;
++c_7320600.num_elements = 4;
++c_7320600.elements = (object *)e_7322516;
++c_7320600.elements[0] = ((closureN)self_7312484)->elements[0];
++c_7320600.elements[1] = ((closureN)self_7312484)->elements[1];
++c_7320600.elements[2] = ((closureN)self_7312484)->elements[2];
++c_7320600.elements[3] = ((closureN)self_7312484)->elements[38];
++
++return_direct_with_clo37(data,(closure)&c_7320600,__lambda_834,  ((closureN)self_7312484)->elements[3], obj_int2obj(0), ((closureN)self_7312484)->elements[4], ((closureN)self_7312484)->elements[5], ((closureN)self_7312484)->elements[6], ((closureN)self_7312484)->elements[7], ((closureN)self_7312484)->elements[8], ((closureN)self_7312484)->elements[9], ((closureN)self_7312484)->elements[10], ((closureN)self_7312484)->elements[11], ((closureN)self_7312484)->elements[12], ((closureN)self_7312484)->elements[13], ((closureN)self_7312484)->elements[14], ((closureN)self_7312484)->elements[15], ((closureN)self_7312484)->elements[16], ((closureN)self_7312484)->elements[17], ((closureN)self_7312484)->elements[18], ((closureN)self_7312484)->elements[19], ((closureN)self_7312484)->elements[20], ((closureN)self_7312484)->elements[21], ((closureN)self_7312484)->elements[22], ((closureN)self_7312484)->elements[23], ((closureN)self_7312484)->elements[24], ((closureN)self_7312484)->elements
[25], ((closureN)self_7312484)->elements[26], ((closureN)self_7312484)->elements[27], ((closureN)self_7312484)->elements[28], ((closureN)self_7312484)->elements[29], ((closureN)self_7312484)->elements[30], ((closureN)self_7312484)->elements[31], ((closureN)self_7312484)->elements[32], ((closureN)self_7312484)->elements[33], ((closureN)self_7312484)->elements[34], ((closureN)self_7312484)->elements[35], ((closureN)self_7312484)->elements[36], ((closureN)self_7312484)->elements[37], r_735860);; 
++}
++
++static void __lambda_834(void *data, object self_7312485, int argc, object *args) /* object self_7312485, object ellipsis_91specified_127_731234_733176, object count_731235_733177, object _191er_91macro_91transformer_731236_733178, object _191lambda_731237_733179, object _191let_731238_733180, object _191begin_731239_733181, object _191if_731240_733182, object _191and_731241_733183, object _191or_731242_733184, object _191eq_127_731243_733185, object _191equal_127_731244_733186, object _191car_731245_733187, object _191cdr_731246_733188, object _191cons_731247_733189, object _191pair_127_731248_733190, object _191null_127_731249_733191, object _191expr_731250_733192, object _191rename_731251_733193, object _191compare_731252_733194, object _191quote_731253_733195, object _191apply_731254_733196, object _191append_731255_733197, object _191map_731256_733198, object _191vector_127_731257_733199, object _191list_127_731258_733200, object _191len_731259_733201, object _191lengt
h_731260_733202, object _191_91_731261_733203, object _191_125_123_731262_733204, object _191error_731263_733205, object _191ls_731264_733206, object _191res_731265_733207, object _191i_731266_733208, object _191reverse_731267_733209, object _191vector_91_125list_731268_733210, object _191list_91_125vector_731269_733211, object _191cons3_731270_733212 */
++ {
++ object ellipsis_91specified_127_731234_733176 = args[0]; object count_731235_733177 = args[1]; object _191er_91macro_91transformer_731236_733178 = args[2]; object _191lambda_731237_733179 = args[3]; object _191let_731238_733180 = args[4]; object _191if_731240_733182 = args[6]; object _191and_731241_733183 = args[7]; object _191or_731242_733184 = args[8]; object _191equal_127_731244_733186 = args[10]; object _191car_731245_733187 = args[11]; object _191cdr_731246_733188 = args[12]; object _191cons_731247_733189 = args[13]; object _191pair_127_731248_733190 = args[14]; object _191null_127_731249_733191 = args[15]; object _191expr_731250_733192 = args[16]; object _191rename_731251_733193 = args[17]; object _191compare_731252_733194 = args[18]; object _191quote_731253_733195 = args[19]; object _191apply_731254_733196 = args[20]; object _191append_731255_733197 = args[21]; object _191map_731256_733198 = args[22]; object _191vector_127_731257_733199 = args[23]; object _191list_1
27_731258_733200 = args[24]; object _191len_731259_733201 = args[25]; object _191length_731260_733202 = args[26]; object _191_91_731261_733203 = args[27]; object _191_125_123_731262_733204 = args[28]; object _191error_731263_733205 = args[29]; object _191ls_731264_733206 = args[30]; object _191res_731265_733207 = args[31]; object _191i_731266_733208 = args[32]; object _191reverse_731267_733209 = args[33]; object _191vector_91_125list_731268_733210 = args[34]; object _191list_91_125vector_731269_733211 = args[35]; object _191cons3_731270_733212 = args[36];
++  
++closureN_type c_7320602;
++object e_7322512 [38];
++c_7320602.hdr.mark = gc_color_red;
++ c_7320602.hdr.grayed = 0;
++c_7320602.tag = closureN_tag;
++ c_7320602.fn = (function_type)__lambda_1380;
++c_7320602.num_args = 1;
++c_7320602.num_elements = 38;
++c_7320602.elements = (object *)e_7322512;
++c_7320602.elements[0] = _191_91_731261_733203;
++c_7320602.elements[1] = _191_125_123_731262_733204;
++c_7320602.elements[2] = _191and_731241_733183;
++c_7320602.elements[3] = _191append_731255_733197;
++c_7320602.elements[4] = _191apply_731254_733196;
++c_7320602.elements[5] = _191car_731245_733187;
++c_7320602.elements[6] = _191cdr_731246_733188;
++c_7320602.elements[7] = _191compare_731252_733194;
++c_7320602.elements[8] = _191cons_731247_733189;
++c_7320602.elements[9] = _191cons3_731270_733212;
++c_7320602.elements[10] = _191equal_127_731244_733186;
++c_7320602.elements[11] = _191er_91macro_91transformer_731236_733178;
++c_7320602.elements[12] = _191error_731263_733205;
++c_7320602.elements[13] = _191expr_731250_733192;
++c_7320602.elements[14] = _191i_731266_733208;
++c_7320602.elements[15] = _191if_731240_733182;
++c_7320602.elements[16] = _191lambda_731237_733179;
++c_7320602.elements[17] = _191len_731259_733201;
++c_7320602.elements[18] = _191length_731260_733202;
++c_7320602.elements[19] = _191let_731238_733180;
++c_7320602.elements[20] = _191list_91_125vector_731269_733211;
++c_7320602.elements[21] = _191list_127_731258_733200;
++c_7320602.elements[22] = _191ls_731264_733206;
++c_7320602.elements[23] = _191map_731256_733198;
++c_7320602.elements[24] = _191null_127_731249_733191;
++c_7320602.elements[25] = _191or_731242_733184;
++c_7320602.elements[26] = _191pair_127_731248_733190;
++c_7320602.elements[27] = _191quote_731253_733195;
++c_7320602.elements[28] = _191rename_731251_733193;
++c_7320602.elements[29] = _191res_731265_733207;
++c_7320602.elements[30] = _191reverse_731267_733209;
++c_7320602.elements[31] = _191vector_91_125list_731268_733210;
++c_7320602.elements[32] = _191vector_127_731257_733199;
++c_7320602.elements[33] = ((closureN)self_7312485)->elements[0];
++c_7320602.elements[34] = ellipsis_91specified_127_731234_733176;
++c_7320602.elements[35] = ((closureN)self_7312485)->elements[1];
++c_7320602.elements[36] = ((closureN)self_7312485)->elements[2];
++c_7320602.elements[37] = ((closureN)self_7312485)->elements[3];
++
++
++pair_type local_7322515; 
++return_direct_with_clo1(data,(closure)&c_7320602,__lambda_1380,  set_cell_as_expr(&local_7322515, count_731235_733177));; 
++}
++
++static void __lambda_1380(void *data, object self_7312486, int argc, object *args) /* object self_7312486, object count_731235_733177 */
++ {
++ object count_731235_733177 = args[0];
++  
++closureN_type c_7320604;
++object e_7322511 [39];
++c_7320604.hdr.mark = gc_color_red;
++ c_7320604.hdr.grayed = 0;
++c_7320604.tag = closureN_tag;
++ c_7320604.fn = (function_type)__lambda_835;
++c_7320604.num_args = 12;
++c_7320604.num_elements = 39;
++c_7320604.elements = (object *)e_7322511;
++c_7320604.elements[0] = ((closureN)self_7312486)->elements[0];
++c_7320604.elements[1] = ((closureN)self_7312486)->elements[1];
++c_7320604.elements[2] = ((closureN)self_7312486)->elements[2];
++c_7320604.elements[3] = ((closureN)self_7312486)->elements[3];
++c_7320604.elements[4] = ((closureN)self_7312486)->elements[4];
++c_7320604.elements[5] = ((closureN)self_7312486)->elements[5];
++c_7320604.elements[6] = ((closureN)self_7312486)->elements[6];
++c_7320604.elements[7] = ((closureN)self_7312486)->elements[7];
++c_7320604.elements[8] = ((closureN)self_7312486)->elements[8];
++c_7320604.elements[9] = ((closureN)self_7312486)->elements[9];
++c_7320604.elements[10] = ((closureN)self_7312486)->elements[10];
++c_7320604.elements[11] = ((closureN)self_7312486)->elements[11];
++c_7320604.elements[12] = ((closureN)self_7312486)->elements[12];
++c_7320604.elements[13] = ((closureN)self_7312486)->elements[13];
++c_7320604.elements[14] = ((closureN)self_7312486)->elements[14];
++c_7320604.elements[15] = ((closureN)self_7312486)->elements[15];
++c_7320604.elements[16] = ((closureN)self_7312486)->elements[16];
++c_7320604.elements[17] = ((closureN)self_7312486)->elements[17];
++c_7320604.elements[18] = ((closureN)self_7312486)->elements[18];
++c_7320604.elements[19] = ((closureN)self_7312486)->elements[19];
++c_7320604.elements[20] = ((closureN)self_7312486)->elements[20];
++c_7320604.elements[21] = ((closureN)self_7312486)->elements[21];
++c_7320604.elements[22] = ((closureN)self_7312486)->elements[22];
++c_7320604.elements[23] = ((closureN)self_7312486)->elements[23];
++c_7320604.elements[24] = ((closureN)self_7312486)->elements[24];
++c_7320604.elements[25] = ((closureN)self_7312486)->elements[25];
++c_7320604.elements[26] = ((closureN)self_7312486)->elements[26];
++c_7320604.elements[27] = ((closureN)self_7312486)->elements[27];
++c_7320604.elements[28] = ((closureN)self_7312486)->elements[28];
++c_7320604.elements[29] = ((closureN)self_7312486)->elements[29];
++c_7320604.elements[30] = ((closureN)self_7312486)->elements[30];
++c_7320604.elements[31] = ((closureN)self_7312486)->elements[31];
++c_7320604.elements[32] = ((closureN)self_7312486)->elements[32];
++c_7320604.elements[33] = ((closureN)self_7312486)->elements[33];
++c_7320604.elements[34] = count_731235_733177;
++c_7320604.elements[35] = ((closureN)self_7312486)->elements[34];
++c_7320604.elements[36] = ((closureN)self_7312486)->elements[35];
++c_7320604.elements[37] = ((closureN)self_7312486)->elements[36];
++c_7320604.elements[38] = ((closureN)self_7312486)->elements[37];
++
++return_direct_with_clo12(data,(closure)&c_7320604,__lambda_835,  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_835(void *data, object self_7312487, int argc, object *args) /* object self_7312487, object ellipsis_733213, object lits_733214, object forms_733215, object next_91symbol_733216, object expand_91pattern_733217, object ellipsis_91escape_127_733218, object ellipsis_127_733219, object ellipsis_91depth_733220, object ellipsis_91tail_733221, object all_91vars_733222, object free_91vars_733223, object expand_91template_733224 */
++ {
++ object ellipsis_733213 = args[0]; object lits_733214 = args[1]; object forms_733215 = args[2]; object next_91symbol_733216 = args[3]; object expand_91pattern_733217 = args[4]; object ellipsis_91escape_127_733218 = args[5]; object ellipsis_127_733219 = args[6]; object ellipsis_91depth_733220 = args[7]; object ellipsis_91tail_733221 = args[8]; object all_91vars_733222 = args[9]; object free_91vars_733223 = args[10]; object expand_91template_733224 = args[11];
++  
++closureN_type c_7320606;
++object e_7322507 [50];
++c_7320606.hdr.mark = gc_color_red;
++ c_7320606.hdr.grayed = 0;
++c_7320606.tag = closureN_tag;
++ c_7320606.fn = (function_type)__lambda_1379;
++c_7320606.num_args = 1;
++c_7320606.num_elements = 50;
++c_7320606.elements = (object *)e_7322507;
++c_7320606.elements[0] = ((closureN)self_7312487)->elements[0];
++c_7320606.elements[1] = ((closureN)self_7312487)->elements[1];
++c_7320606.elements[2] = ((closureN)self_7312487)->elements[2];
++c_7320606.elements[3] = ((closureN)self_7312487)->elements[3];
++c_7320606.elements[4] = ((closureN)self_7312487)->elements[4];
++c_7320606.elements[5] = ((closureN)self_7312487)->elements[5];
++c_7320606.elements[6] = ((closureN)self_7312487)->elements[6];
++c_7320606.elements[7] = ((closureN)self_7312487)->elements[7];
++c_7320606.elements[8] = ((closureN)self_7312487)->elements[8];
++c_7320606.elements[9] = ((closureN)self_7312487)->elements[9];
++c_7320606.elements[10] = ((closureN)self_7312487)->elements[10];
++c_7320606.elements[11] = ((closureN)self_7312487)->elements[11];
++c_7320606.elements[12] = ((closureN)self_7312487)->elements[12];
++c_7320606.elements[13] = ((closureN)self_7312487)->elements[13];
++c_7320606.elements[14] = ((closureN)self_7312487)->elements[14];
++c_7320606.elements[15] = ((closureN)self_7312487)->elements[15];
++c_7320606.elements[16] = ((closureN)self_7312487)->elements[16];
++c_7320606.elements[17] = ((closureN)self_7312487)->elements[17];
++c_7320606.elements[18] = ((closureN)self_7312487)->elements[18];
++c_7320606.elements[19] = ((closureN)self_7312487)->elements[19];
++c_7320606.elements[20] = ((closureN)self_7312487)->elements[20];
++c_7320606.elements[21] = ((closureN)self_7312487)->elements[21];
++c_7320606.elements[22] = ((closureN)self_7312487)->elements[22];
++c_7320606.elements[23] = ((closureN)self_7312487)->elements[23];
++c_7320606.elements[24] = ((closureN)self_7312487)->elements[24];
++c_7320606.elements[25] = ((closureN)self_7312487)->elements[25];
++c_7320606.elements[26] = ((closureN)self_7312487)->elements[26];
++c_7320606.elements[27] = ((closureN)self_7312487)->elements[27];
++c_7320606.elements[28] = ((closureN)self_7312487)->elements[28];
++c_7320606.elements[29] = ((closureN)self_7312487)->elements[29];
++c_7320606.elements[30] = ((closureN)self_7312487)->elements[30];
++c_7320606.elements[31] = ((closureN)self_7312487)->elements[31];
++c_7320606.elements[32] = ((closureN)self_7312487)->elements[32];
++c_7320606.elements[33] = all_91vars_733222;
++c_7320606.elements[34] = ((closureN)self_7312487)->elements[33];
++c_7320606.elements[35] = ((closureN)self_7312487)->elements[34];
++c_7320606.elements[36] = ellipsis_91depth_733220;
++c_7320606.elements[37] = ellipsis_91escape_127_733218;
++c_7320606.elements[38] = ((closureN)self_7312487)->elements[35];
++c_7320606.elements[39] = ellipsis_91tail_733221;
++c_7320606.elements[40] = ellipsis_127_733219;
++c_7320606.elements[41] = expand_91pattern_733217;
++c_7320606.elements[42] = expand_91template_733224;
++c_7320606.elements[43] = ((closureN)self_7312487)->elements[36];
++c_7320606.elements[44] = forms_733215;
++c_7320606.elements[45] = free_91vars_733223;
++c_7320606.elements[46] = ((closureN)self_7312487)->elements[37];
++c_7320606.elements[47] = lits_733214;
++c_7320606.elements[48] = next_91symbol_733216;
++c_7320606.elements[49] = ((closureN)self_7312487)->elements[38];
++
++
++pair_type local_7322510; 
++return_direct_with_clo1(data,(closure)&c_7320606,__lambda_1379,  set_cell_as_expr(&local_7322510, ellipsis_733213));; 
++}
++
++static void __lambda_1379(void *data, object self_7312488, int argc, object *args) /* object self_7312488, object ellipsis_733213 */
++ {
++ object ellipsis_733213 = args[0];
++  
++closureN_type c_7320608;
++object e_7322502 [50];
++c_7320608.hdr.mark = gc_color_red;
++ c_7320608.hdr.grayed = 0;
++c_7320608.tag = closureN_tag;
++ c_7320608.fn = (function_type)__lambda_1378;
++c_7320608.num_args = 1;
++c_7320608.num_elements = 50;
++c_7320608.elements = (object *)e_7322502;
++c_7320608.elements[0] = ((closureN)self_7312488)->elements[0];
++c_7320608.elements[1] = ((closureN)self_7312488)->elements[1];
++c_7320608.elements[2] = ((closureN)self_7312488)->elements[2];
++c_7320608.elements[3] = ((closureN)self_7312488)->elements[3];
++c_7320608.elements[4] = ((closureN)self_7312488)->elements[4];
++c_7320608.elements[5] = ((closureN)self_7312488)->elements[5];
++c_7320608.elements[6] = ((closureN)self_7312488)->elements[6];
++c_7320608.elements[7] = ((closureN)self_7312488)->elements[7];
++c_7320608.elements[8] = ((closureN)self_7312488)->elements[8];
++c_7320608.elements[9] = ((closureN)self_7312488)->elements[9];
++c_7320608.elements[10] = ((closureN)self_7312488)->elements[10];
++c_7320608.elements[11] = ((closureN)self_7312488)->elements[11];
++c_7320608.elements[12] = ((closureN)self_7312488)->elements[12];
++c_7320608.elements[13] = ((closureN)self_7312488)->elements[13];
++c_7320608.elements[14] = ((closureN)self_7312488)->elements[14];
++c_7320608.elements[15] = ((closureN)self_7312488)->elements[15];
++c_7320608.elements[16] = ((closureN)self_7312488)->elements[16];
++c_7320608.elements[17] = ((closureN)self_7312488)->elements[17];
++c_7320608.elements[18] = ((closureN)self_7312488)->elements[18];
++c_7320608.elements[19] = ((closureN)self_7312488)->elements[19];
++c_7320608.elements[20] = ((closureN)self_7312488)->elements[20];
++c_7320608.elements[21] = ((closureN)self_7312488)->elements[21];
++c_7320608.elements[22] = ((closureN)self_7312488)->elements[22];
++c_7320608.elements[23] = ((closureN)self_7312488)->elements[23];
++c_7320608.elements[24] = ((closureN)self_7312488)->elements[24];
++c_7320608.elements[25] = ((closureN)self_7312488)->elements[25];
++c_7320608.elements[26] = ((closureN)self_7312488)->elements[26];
++c_7320608.elements[27] = ((closureN)self_7312488)->elements[27];
++c_7320608.elements[28] = ((closureN)self_7312488)->elements[28];
++c_7320608.elements[29] = ((closureN)self_7312488)->elements[29];
++c_7320608.elements[30] = ((closureN)self_7312488)->elements[30];
++c_7320608.elements[31] = ((closureN)self_7312488)->elements[31];
++c_7320608.elements[32] = ((closureN)self_7312488)->elements[32];
++c_7320608.elements[33] = ((closureN)self_7312488)->elements[33];
++c_7320608.elements[34] = ((closureN)self_7312488)->elements[34];
++c_7320608.elements[35] = ((closureN)self_7312488)->elements[35];
++c_7320608.elements[36] = ellipsis_733213;
++c_7320608.elements[37] = ((closureN)self_7312488)->elements[36];
++c_7320608.elements[38] = ((closureN)self_7312488)->elements[37];
++c_7320608.elements[39] = ((closureN)self_7312488)->elements[38];
++c_7320608.elements[40] = ((closureN)self_7312488)->elements[39];
++c_7320608.elements[41] = ((closureN)self_7312488)->elements[40];
++c_7320608.elements[42] = ((closureN)self_7312488)->elements[41];
++c_7320608.elements[43] = ((closureN)self_7312488)->elements[42];
++c_7320608.elements[44] = ((closureN)self_7312488)->elements[43];
++c_7320608.elements[45] = ((closureN)self_7312488)->elements[44];
++c_7320608.elements[46] = ((closureN)self_7312488)->elements[45];
++c_7320608.elements[47] = ((closureN)self_7312488)->elements[46];
++c_7320608.elements[48] = ((closureN)self_7312488)->elements[48];
++c_7320608.elements[49] = ((closureN)self_7312488)->elements[49];
++
++
++pair_type local_7322505; 
++return_direct_with_clo1(data,(closure)&c_7320608,__lambda_1378,  set_cell_as_expr(&local_7322505, ((closureN)self_7312488)->elements[47]));; 
++}
++
++static void __lambda_1378(void *data, object self_7312489, int argc, object *args) /* object self_7312489, object lits_733214 */
++ {
++ object lits_733214 = args[0];
++  
++closureN_type c_7320610;
++object e_7322497 [50];
++c_7320610.hdr.mark = gc_color_red;
++ c_7320610.hdr.grayed = 0;
++c_7320610.tag = closureN_tag;
++ c_7320610.fn = (function_type)__lambda_1377;
++c_7320610.num_args = 1;
++c_7320610.num_elements = 50;
++c_7320610.elements = (object *)e_7322497;
++c_7320610.elements[0] = ((closureN)self_7312489)->elements[0];
++c_7320610.elements[1] = ((closureN)self_7312489)->elements[1];
++c_7320610.elements[2] = ((closureN)self_7312489)->elements[2];
++c_7320610.elements[3] = ((closureN)self_7312489)->elements[3];
++c_7320610.elements[4] = ((closureN)self_7312489)->elements[4];
++c_7320610.elements[5] = ((closureN)self_7312489)->elements[5];
++c_7320610.elements[6] = ((closureN)self_7312489)->elements[6];
++c_7320610.elements[7] = ((closureN)self_7312489)->elements[7];
++c_7320610.elements[8] = ((closureN)self_7312489)->elements[8];
++c_7320610.elements[9] = ((closureN)self_7312489)->elements[9];
++c_7320610.elements[10] = ((closureN)self_7312489)->elements[10];
++c_7320610.elements[11] = ((closureN)self_7312489)->elements[11];
++c_7320610.elements[12] = ((closureN)self_7312489)->elements[12];
++c_7320610.elements[13] = ((closureN)self_7312489)->elements[13];
++c_7320610.elements[14] = ((closureN)self_7312489)->elements[14];
++c_7320610.elements[15] = ((closureN)self_7312489)->elements[15];
++c_7320610.elements[16] = ((closureN)self_7312489)->elements[16];
++c_7320610.elements[17] = ((closureN)self_7312489)->elements[17];
++c_7320610.elements[18] = ((closureN)self_7312489)->elements[18];
++c_7320610.elements[19] = ((closureN)self_7312489)->elements[19];
++c_7320610.elements[20] = ((closureN)self_7312489)->elements[20];
++c_7320610.elements[21] = ((closureN)self_7312489)->elements[21];
++c_7320610.elements[22] = ((closureN)self_7312489)->elements[22];
++c_7320610.elements[23] = ((closureN)self_7312489)->elements[23];
++c_7320610.elements[24] = ((closureN)self_7312489)->elements[24];
++c_7320610.elements[25] = ((closureN)self_7312489)->elements[25];
++c_7320610.elements[26] = ((closureN)self_7312489)->elements[26];
++c_7320610.elements[27] = ((closureN)self_7312489)->elements[27];
++c_7320610.elements[28] = ((closureN)self_7312489)->elements[28];
++c_7320610.elements[29] = ((closureN)self_7312489)->elements[29];
++c_7320610.elements[30] = ((closureN)self_7312489)->elements[30];
++c_7320610.elements[31] = ((closureN)self_7312489)->elements[31];
++c_7320610.elements[32] = ((closureN)self_7312489)->elements[32];
++c_7320610.elements[33] = ((closureN)self_7312489)->elements[33];
++c_7320610.elements[34] = ((closureN)self_7312489)->elements[34];
++c_7320610.elements[35] = ((closureN)self_7312489)->elements[35];
++c_7320610.elements[36] = ((closureN)self_7312489)->elements[36];
++c_7320610.elements[37] = ((closureN)self_7312489)->elements[37];
++c_7320610.elements[38] = ((closureN)self_7312489)->elements[38];
++c_7320610.elements[39] = ((closureN)self_7312489)->elements[39];
++c_7320610.elements[40] = ((closureN)self_7312489)->elements[40];
++c_7320610.elements[41] = ((closureN)self_7312489)->elements[41];
++c_7320610.elements[42] = ((closureN)self_7312489)->elements[42];
++c_7320610.elements[43] = ((closureN)self_7312489)->elements[43];
++c_7320610.elements[44] = ((closureN)self_7312489)->elements[44];
++c_7320610.elements[45] = ((closureN)self_7312489)->elements[46];
++c_7320610.elements[46] = ((closureN)self_7312489)->elements[47];
++c_7320610.elements[47] = lits_733214;
++c_7320610.elements[48] = ((closureN)self_7312489)->elements[48];
++c_7320610.elements[49] = ((closureN)self_7312489)->elements[49];
++
++
++pair_type local_7322500; 
++return_direct_with_clo1(data,(closure)&c_7320610,__lambda_1377,  set_cell_as_expr(&local_7322500, ((closureN)self_7312489)->elements[45]));; 
++}
++
++static void __lambda_1377(void *data, object self_7312490, int argc, object *args) /* object self_7312490, object forms_733215 */
++ {
++ object forms_733215 = args[0];
++  
++closureN_type c_7320612;
++object e_7322492 [50];
++c_7320612.hdr.mark = gc_color_red;
++ c_7320612.hdr.grayed = 0;
++c_7320612.tag = closureN_tag;
++ c_7320612.fn = (function_type)__lambda_1376;
++c_7320612.num_args = 1;
++c_7320612.num_elements = 50;
++c_7320612.elements = (object *)e_7322492;
++c_7320612.elements[0] = ((closureN)self_7312490)->elements[0];
++c_7320612.elements[1] = ((closureN)self_7312490)->elements[1];
++c_7320612.elements[2] = ((closureN)self_7312490)->elements[2];
++c_7320612.elements[3] = ((closureN)self_7312490)->elements[3];
++c_7320612.elements[4] = ((closureN)self_7312490)->elements[4];
++c_7320612.elements[5] = ((closureN)self_7312490)->elements[5];
++c_7320612.elements[6] = ((closureN)self_7312490)->elements[6];
++c_7320612.elements[7] = ((closureN)self_7312490)->elements[7];
++c_7320612.elements[8] = ((closureN)self_7312490)->elements[8];
++c_7320612.elements[9] = ((closureN)self_7312490)->elements[9];
++c_7320612.elements[10] = ((closureN)self_7312490)->elements[10];
++c_7320612.elements[11] = ((closureN)self_7312490)->elements[11];
++c_7320612.elements[12] = ((closureN)self_7312490)->elements[12];
++c_7320612.elements[13] = ((closureN)self_7312490)->elements[13];
++c_7320612.elements[14] = ((closureN)self_7312490)->elements[14];
++c_7320612.elements[15] = ((closureN)self_7312490)->elements[15];
++c_7320612.elements[16] = ((closureN)self_7312490)->elements[16];
++c_7320612.elements[17] = ((closureN)self_7312490)->elements[17];
++c_7320612.elements[18] = ((closureN)self_7312490)->elements[18];
++c_7320612.elements[19] = ((closureN)self_7312490)->elements[19];
++c_7320612.elements[20] = ((closureN)self_7312490)->elements[20];
++c_7320612.elements[21] = ((closureN)self_7312490)->elements[21];
++c_7320612.elements[22] = ((closureN)self_7312490)->elements[22];
++c_7320612.elements[23] = ((closureN)self_7312490)->elements[23];
++c_7320612.elements[24] = ((closureN)self_7312490)->elements[24];
++c_7320612.elements[25] = ((closureN)self_7312490)->elements[25];
++c_7320612.elements[26] = ((closureN)self_7312490)->elements[26];
++c_7320612.elements[27] = ((closureN)self_7312490)->elements[27];
++c_7320612.elements[28] = ((closureN)self_7312490)->elements[28];
++c_7320612.elements[29] = ((closureN)self_7312490)->elements[29];
++c_7320612.elements[30] = ((closureN)self_7312490)->elements[30];
++c_7320612.elements[31] = ((closureN)self_7312490)->elements[31];
++c_7320612.elements[32] = ((closureN)self_7312490)->elements[32];
++c_7320612.elements[33] = ((closureN)self_7312490)->elements[33];
++c_7320612.elements[34] = ((closureN)self_7312490)->elements[34];
++c_7320612.elements[35] = ((closureN)self_7312490)->elements[35];
++c_7320612.elements[36] = ((closureN)self_7312490)->elements[36];
++c_7320612.elements[37] = ((closureN)self_7312490)->elements[37];
++c_7320612.elements[38] = ((closureN)self_7312490)->elements[38];
++c_7320612.elements[39] = ((closureN)self_7312490)->elements[39];
++c_7320612.elements[40] = ((closureN)self_7312490)->elements[40];
++c_7320612.elements[41] = ((closureN)self_7312490)->elements[41];
++c_7320612.elements[42] = ((closureN)self_7312490)->elements[42];
++c_7320612.elements[43] = ((closureN)self_7312490)->elements[43];
++c_7320612.elements[44] = ((closureN)self_7312490)->elements[44];
++c_7320612.elements[45] = forms_733215;
++c_7320612.elements[46] = ((closureN)self_7312490)->elements[45];
++c_7320612.elements[47] = ((closureN)self_7312490)->elements[46];
++c_7320612.elements[48] = ((closureN)self_7312490)->elements[47];
++c_7320612.elements[49] = ((closureN)self_7312490)->elements[49];
++
++
++pair_type local_7322495; 
++return_direct_with_clo1(data,(closure)&c_7320612,__lambda_1376,  set_cell_as_expr(&local_7322495, ((closureN)self_7312490)->elements[48]));; 
++}
++
++static void __lambda_1376(void *data, object self_7312491, int argc, object *args) /* object self_7312491, object next_91symbol_733216 */
++ {
++ object next_91symbol_733216 = args[0];
++  
++closureN_type c_7320614;
++object e_7322487 [50];
++c_7320614.hdr.mark = gc_color_red;
++ c_7320614.hdr.grayed = 0;
++c_7320614.tag = closureN_tag;
++ c_7320614.fn = (function_type)__lambda_1375;
++c_7320614.num_args = 1;
++c_7320614.num_elements = 50;
++c_7320614.elements = (object *)e_7322487;
++c_7320614.elements[0] = ((closureN)self_7312491)->elements[0];
++c_7320614.elements[1] = ((closureN)self_7312491)->elements[1];
++c_7320614.elements[2] = ((closureN)self_7312491)->elements[2];
++c_7320614.elements[3] = ((closureN)self_7312491)->elements[3];
++c_7320614.elements[4] = ((closureN)self_7312491)->elements[4];
++c_7320614.elements[5] = ((closureN)self_7312491)->elements[5];
++c_7320614.elements[6] = ((closureN)self_7312491)->elements[6];
++c_7320614.elements[7] = ((closureN)self_7312491)->elements[7];
++c_7320614.elements[8] = ((closureN)self_7312491)->elements[8];
++c_7320614.elements[9] = ((closureN)self_7312491)->elements[9];
++c_7320614.elements[10] = ((closureN)self_7312491)->elements[10];
++c_7320614.elements[11] = ((closureN)self_7312491)->elements[11];
++c_7320614.elements[12] = ((closureN)self_7312491)->elements[12];
++c_7320614.elements[13] = ((closureN)self_7312491)->elements[13];
++c_7320614.elements[14] = ((closureN)self_7312491)->elements[14];
++c_7320614.elements[15] = ((closureN)self_7312491)->elements[15];
++c_7320614.elements[16] = ((closureN)self_7312491)->elements[16];
++c_7320614.elements[17] = ((closureN)self_7312491)->elements[17];
++c_7320614.elements[18] = ((closureN)self_7312491)->elements[18];
++c_7320614.elements[19] = ((closureN)self_7312491)->elements[19];
++c_7320614.elements[20] = ((closureN)self_7312491)->elements[20];
++c_7320614.elements[21] = ((closureN)self_7312491)->elements[21];
++c_7320614.elements[22] = ((closureN)self_7312491)->elements[22];
++c_7320614.elements[23] = ((closureN)self_7312491)->elements[23];
++c_7320614.elements[24] = ((closureN)self_7312491)->elements[24];
++c_7320614.elements[25] = ((closureN)self_7312491)->elements[25];
++c_7320614.elements[26] = ((closureN)self_7312491)->elements[26];
++c_7320614.elements[27] = ((closureN)self_7312491)->elements[27];
++c_7320614.elements[28] = ((closureN)self_7312491)->elements[28];
++c_7320614.elements[29] = ((closureN)self_7312491)->elements[29];
++c_7320614.elements[30] = ((closureN)self_7312491)->elements[30];
++c_7320614.elements[31] = ((closureN)self_7312491)->elements[31];
++c_7320614.elements[32] = ((closureN)self_7312491)->elements[32];
++c_7320614.elements[33] = ((closureN)self_7312491)->elements[33];
++c_7320614.elements[34] = ((closureN)self_7312491)->elements[34];
++c_7320614.elements[35] = ((closureN)self_7312491)->elements[35];
++c_7320614.elements[36] = ((closureN)self_7312491)->elements[36];
++c_7320614.elements[37] = ((closureN)self_7312491)->elements[37];
++c_7320614.elements[38] = ((closureN)self_7312491)->elements[38];
++c_7320614.elements[39] = ((closureN)self_7312491)->elements[39];
++c_7320614.elements[40] = ((closureN)self_7312491)->elements[40];
++c_7320614.elements[41] = ((closureN)self_7312491)->elements[41];
++c_7320614.elements[42] = ((closureN)self_7312491)->elements[43];
++c_7320614.elements[43] = ((closureN)self_7312491)->elements[44];
++c_7320614.elements[44] = ((closureN)self_7312491)->elements[45];
++c_7320614.elements[45] = ((closureN)self_7312491)->elements[46];
++c_7320614.elements[46] = ((closureN)self_7312491)->elements[47];
++c_7320614.elements[47] = ((closureN)self_7312491)->elements[48];
++c_7320614.elements[48] = next_91symbol_733216;
++c_7320614.elements[49] = ((closureN)self_7312491)->elements[49];
++
++
++pair_type local_7322490; 
++return_direct_with_clo1(data,(closure)&c_7320614,__lambda_1375,  set_cell_as_expr(&local_7322490, ((closureN)self_7312491)->elements[42]));; 
++}
++
++static void __lambda_1375(void *data, object self_7312492, int argc, object *args) /* object self_7312492, object expand_91pattern_733217 */
++ {
++ object expand_91pattern_733217 = args[0];
++  
++closureN_type c_7320616;
++object e_7322482 [50];
++c_7320616.hdr.mark = gc_color_red;
++ c_7320616.hdr.grayed = 0;
++c_7320616.tag = closureN_tag;
++ c_7320616.fn = (function_type)__lambda_1374;
++c_7320616.num_args = 1;
++c_7320616.num_elements = 50;
++c_7320616.elements = (object *)e_7322482;
++c_7320616.elements[0] = ((closureN)self_7312492)->elements[0];
++c_7320616.elements[1] = ((closureN)self_7312492)->elements[1];
++c_7320616.elements[2] = ((closureN)self_7312492)->elements[2];
++c_7320616.elements[3] = ((closureN)self_7312492)->elements[3];
++c_7320616.elements[4] = ((closureN)self_7312492)->elements[4];
++c_7320616.elements[5] = ((closureN)self_7312492)->elements[5];
++c_7320616.elements[6] = ((closureN)self_7312492)->elements[6];
++c_7320616.elements[7] = ((closureN)self_7312492)->elements[7];
++c_7320616.elements[8] = ((closureN)self_7312492)->elements[8];
++c_7320616.elements[9] = ((closureN)self_7312492)->elements[9];
++c_7320616.elements[10] = ((closureN)self_7312492)->elements[10];
++c_7320616.elements[11] = ((closureN)self_7312492)->elements[11];
++c_7320616.elements[12] = ((closureN)self_7312492)->elements[12];
++c_7320616.elements[13] = ((closureN)self_7312492)->elements[13];
++c_7320616.elements[14] = ((closureN)self_7312492)->elements[14];
++c_7320616.elements[15] = ((closureN)self_7312492)->elements[15];
++c_7320616.elements[16] = ((closureN)self_7312492)->elements[16];
++c_7320616.elements[17] = ((closureN)self_7312492)->elements[17];
++c_7320616.elements[18] = ((closureN)self_7312492)->elements[18];
++c_7320616.elements[19] = ((closureN)self_7312492)->elements[19];
++c_7320616.elements[20] = ((closureN)self_7312492)->elements[20];
++c_7320616.elements[21] = ((closureN)self_7312492)->elements[21];
++c_7320616.elements[22] = ((closureN)self_7312492)->elements[22];
++c_7320616.elements[23] = ((closureN)self_7312492)->elements[23];
++c_7320616.elements[24] = ((closureN)self_7312492)->elements[24];
++c_7320616.elements[25] = ((closureN)self_7312492)->elements[25];
++c_7320616.elements[26] = ((closureN)self_7312492)->elements[26];
++c_7320616.elements[27] = ((closureN)self_7312492)->elements[27];
++c_7320616.elements[28] = ((closureN)self_7312492)->elements[28];
++c_7320616.elements[29] = ((closureN)self_7312492)->elements[29];
++c_7320616.elements[30] = ((closureN)self_7312492)->elements[30];
++c_7320616.elements[31] = ((closureN)self_7312492)->elements[31];
++c_7320616.elements[32] = ((closureN)self_7312492)->elements[32];
++c_7320616.elements[33] = ((closureN)self_7312492)->elements[33];
++c_7320616.elements[34] = ((closureN)self_7312492)->elements[34];
++c_7320616.elements[35] = ((closureN)self_7312492)->elements[35];
++c_7320616.elements[36] = ((closureN)self_7312492)->elements[36];
++c_7320616.elements[37] = ((closureN)self_7312492)->elements[37];
++c_7320616.elements[38] = ((closureN)self_7312492)->elements[39];
++c_7320616.elements[39] = ((closureN)self_7312492)->elements[40];
++c_7320616.elements[40] = ((closureN)self_7312492)->elements[41];
++c_7320616.elements[41] = expand_91pattern_733217;
++c_7320616.elements[42] = ((closureN)self_7312492)->elements[42];
++c_7320616.elements[43] = ((closureN)self_7312492)->elements[43];
++c_7320616.elements[44] = ((closureN)self_7312492)->elements[44];
++c_7320616.elements[45] = ((closureN)self_7312492)->elements[45];
++c_7320616.elements[46] = ((closureN)self_7312492)->elements[46];
++c_7320616.elements[47] = ((closureN)self_7312492)->elements[47];
++c_7320616.elements[48] = ((closureN)self_7312492)->elements[48];
++c_7320616.elements[49] = ((closureN)self_7312492)->elements[49];
++
++
++pair_type local_7322485; 
++return_direct_with_clo1(data,(closure)&c_7320616,__lambda_1374,  set_cell_as_expr(&local_7322485, ((closureN)self_7312492)->elements[38]));; 
++}
++
++static void __lambda_1374(void *data, object self_7312493, int argc, object *args) /* object self_7312493, object ellipsis_91escape_127_733218 */
++ {
++ object ellipsis_91escape_127_733218 = args[0];
++  
++closureN_type c_7320618;
++object e_7322477 [50];
++c_7320618.hdr.mark = gc_color_red;
++ c_7320618.hdr.grayed = 0;
++c_7320618.tag = closureN_tag;
++ c_7320618.fn = (function_type)__lambda_1373;
++c_7320618.num_args = 1;
++c_7320618.num_elements = 50;
++c_7320618.elements = (object *)e_7322477;
++c_7320618.elements[0] = ((closureN)self_7312493)->elements[0];
++c_7320618.elements[1] = ((closureN)self_7312493)->elements[1];
++c_7320618.elements[2] = ((closureN)self_7312493)->elements[2];
++c_7320618.elements[3] = ((closureN)self_7312493)->elements[3];
++c_7320618.elements[4] = ((closureN)self_7312493)->elements[4];
++c_7320618.elements[5] = ((closureN)self_7312493)->elements[5];
++c_7320618.elements[6] = ((closureN)self_7312493)->elements[6];
++c_7320618.elements[7] = ((closureN)self_7312493)->elements[7];
++c_7320618.elements[8] = ((closureN)self_7312493)->elements[8];
++c_7320618.elements[9] = ((closureN)self_7312493)->elements[9];
++c_7320618.elements[10] = ((closureN)self_7312493)->elements[10];
++c_7320618.elements[11] = ((closureN)self_7312493)->elements[11];
++c_7320618.elements[12] = ((closureN)self_7312493)->elements[12];
++c_7320618.elements[13] = ((closureN)self_7312493)->elements[13];
++c_7320618.elements[14] = ((closureN)self_7312493)->elements[14];
++c_7320618.elements[15] = ((closureN)self_7312493)->elements[15];
++c_7320618.elements[16] = ((closureN)self_7312493)->elements[16];
++c_7320618.elements[17] = ((closureN)self_7312493)->elements[17];
++c_7320618.elements[18] = ((closureN)self_7312493)->elements[18];
++c_7320618.elements[19] = ((closureN)self_7312493)->elements[19];
++c_7320618.elements[20] = ((closureN)self_7312493)->elements[20];
++c_7320618.elements[21] = ((closureN)self_7312493)->elements[21];
++c_7320618.elements[22] = ((closureN)self_7312493)->elements[22];
++c_7320618.elements[23] = ((closureN)self_7312493)->elements[23];
++c_7320618.elements[24] = ((closureN)self_7312493)->elements[24];
++c_7320618.elements[25] = ((closureN)self_7312493)->elements[25];
++c_7320618.elements[26] = ((closureN)self_7312493)->elements[26];
++c_7320618.elements[27] = ((closureN)self_7312493)->elements[27];
++c_7320618.elements[28] = ((closureN)self_7312493)->elements[28];
++c_7320618.elements[29] = ((closureN)self_7312493)->elements[29];
++c_7320618.elements[30] = ((closureN)self_7312493)->elements[30];
++c_7320618.elements[31] = ((closureN)self_7312493)->elements[31];
++c_7320618.elements[32] = ((closureN)self_7312493)->elements[32];
++c_7320618.elements[33] = ((closureN)self_7312493)->elements[33];
++c_7320618.elements[34] = ((closureN)self_7312493)->elements[34];
++c_7320618.elements[35] = ((closureN)self_7312493)->elements[35];
++c_7320618.elements[36] = ((closureN)self_7312493)->elements[36];
++c_7320618.elements[37] = ((closureN)self_7312493)->elements[37];
++c_7320618.elements[38] = ellipsis_91escape_127_733218;
++c_7320618.elements[39] = ((closureN)self_7312493)->elements[38];
++c_7320618.elements[40] = ((closureN)self_7312493)->elements[39];
++c_7320618.elements[41] = ((closureN)self_7312493)->elements[41];
++c_7320618.elements[42] = ((closureN)self_7312493)->elements[42];
++c_7320618.elements[43] = ((closureN)self_7312493)->elements[43];
++c_7320618.elements[44] = ((closureN)self_7312493)->elements[44];
++c_7320618.elements[45] = ((closureN)self_7312493)->elements[45];
++c_7320618.elements[46] = ((closureN)self_7312493)->elements[46];
++c_7320618.elements[47] = ((closureN)self_7312493)->elements[47];
++c_7320618.elements[48] = ((closureN)self_7312493)->elements[48];
++c_7320618.elements[49] = ((closureN)self_7312493)->elements[49];
++
++
++pair_type local_7322480; 
++return_direct_with_clo1(data,(closure)&c_7320618,__lambda_1373,  set_cell_as_expr(&local_7322480, ((closureN)self_7312493)->elements[40]));; 
++}
++
++static void __lambda_1373(void *data, object self_7312494, int argc, object *args) /* object self_7312494, object ellipsis_127_733219 */
++ {
++ object ellipsis_127_733219 = args[0];
++  
++closureN_type c_7320620;
++object e_7322472 [50];
++c_7320620.hdr.mark = gc_color_red;
++ c_7320620.hdr.grayed = 0;
++c_7320620.tag = closureN_tag;
++ c_7320620.fn = (function_type)__lambda_1372;
++c_7320620.num_args = 1;
++c_7320620.num_elements = 50;
++c_7320620.elements = (object *)e_7322472;
++c_7320620.elements[0] = ((closureN)self_7312494)->elements[0];
++c_7320620.elements[1] = ((closureN)self_7312494)->elements[1];
++c_7320620.elements[2] = ((closureN)self_7312494)->elements[2];
++c_7320620.elements[3] = ((closureN)self_7312494)->elements[3];
++c_7320620.elements[4] = ((closureN)self_7312494)->elements[4];
++c_7320620.elements[5] = ((closureN)self_7312494)->elements[5];
++c_7320620.elements[6] = ((closureN)self_7312494)->elements[6];
++c_7320620.elements[7] = ((closureN)self_7312494)->elements[7];
++c_7320620.elements[8] = ((closureN)self_7312494)->elements[8];
++c_7320620.elements[9] = ((closureN)self_7312494)->elements[9];
++c_7320620.elements[10] = ((closureN)self_7312494)->elements[10];
++c_7320620.elements[11] = ((closureN)self_7312494)->elements[11];
++c_7320620.elements[12] = ((closureN)self_7312494)->elements[12];
++c_7320620.elements[13] = ((closureN)self_7312494)->elements[13];
++c_7320620.elements[14] = ((closureN)self_7312494)->elements[14];
++c_7320620.elements[15] = ((closureN)self_7312494)->elements[15];
++c_7320620.elements[16] = ((closureN)self_7312494)->elements[16];
++c_7320620.elements[17] = ((closureN)self_7312494)->elements[17];
++c_7320620.elements[18] = ((closureN)self_7312494)->elements[18];
++c_7320620.elements[19] = ((closureN)self_7312494)->elements[19];
++c_7320620.elements[20] = ((closureN)self_7312494)->elements[20];
++c_7320620.elements[21] = ((closureN)self_7312494)->elements[21];
++c_7320620.elements[22] = ((closureN)self_7312494)->elements[22];
++c_7320620.elements[23] = ((closureN)self_7312494)->elements[23];
++c_7320620.elements[24] = ((closureN)self_7312494)->elements[24];
++c_7320620.elements[25] = ((closureN)self_7312494)->elements[25];
++c_7320620.elements[26] = ((closureN)self_7312494)->elements[26];
++c_7320620.elements[27] = ((closureN)self_7312494)->elements[27];
++c_7320620.elements[28] = ((closureN)self_7312494)->elements[28];
++c_7320620.elements[29] = ((closureN)self_7312494)->elements[29];
++c_7320620.elements[30] = ((closureN)self_7312494)->elements[30];
++c_7320620.elements[31] = ((closureN)self_7312494)->elements[31];
++c_7320620.elements[32] = ((closureN)self_7312494)->elements[32];
++c_7320620.elements[33] = ((closureN)self_7312494)->elements[33];
++c_7320620.elements[34] = ((closureN)self_7312494)->elements[34];
++c_7320620.elements[35] = ((closureN)self_7312494)->elements[35];
++c_7320620.elements[36] = ((closureN)self_7312494)->elements[36];
++c_7320620.elements[37] = ((closureN)self_7312494)->elements[38];
++c_7320620.elements[38] = ((closureN)self_7312494)->elements[39];
++c_7320620.elements[39] = ((closureN)self_7312494)->elements[40];
++c_7320620.elements[40] = ellipsis_127_733219;
++c_7320620.elements[41] = ((closureN)self_7312494)->elements[41];
++c_7320620.elements[42] = ((closureN)self_7312494)->elements[42];
++c_7320620.elements[43] = ((closureN)self_7312494)->elements[43];
++c_7320620.elements[44] = ((closureN)self_7312494)->elements[44];
++c_7320620.elements[45] = ((closureN)self_7312494)->elements[45];
++c_7320620.elements[46] = ((closureN)self_7312494)->elements[46];
++c_7320620.elements[47] = ((closureN)self_7312494)->elements[47];
++c_7320620.elements[48] = ((closureN)self_7312494)->elements[48];
++c_7320620.elements[49] = ((closureN)self_7312494)->elements[49];
++
++
++pair_type local_7322475; 
++return_direct_with_clo1(data,(closure)&c_7320620,__lambda_1372,  set_cell_as_expr(&local_7322475, ((closureN)self_7312494)->elements[37]));; 
++}
++
++static void __lambda_1372(void *data, object self_7312495, int argc, object *args) /* object self_7312495, object ellipsis_91depth_733220 */
++ {
++ object ellipsis_91depth_733220 = args[0];
++  
++closureN_type c_7320622;
++object e_7322467 [50];
++c_7320622.hdr.mark = gc_color_red;
++ c_7320622.hdr.grayed = 0;
++c_7320622.tag = closureN_tag;
++ c_7320622.fn = (function_type)__lambda_1371;
++c_7320622.num_args = 1;
++c_7320622.num_elements = 50;
++c_7320622.elements = (object *)e_7322467;
++c_7320622.elements[0] = ((closureN)self_7312495)->elements[0];
++c_7320622.elements[1] = ((closureN)self_7312495)->elements[1];
++c_7320622.elements[2] = ((closureN)self_7312495)->elements[2];
++c_7320622.elements[3] = ((closureN)self_7312495)->elements[3];
++c_7320622.elements[4] = ((closureN)self_7312495)->elements[4];
++c_7320622.elements[5] = ((closureN)self_7312495)->elements[5];
++c_7320622.elements[6] = ((closureN)self_7312495)->elements[6];
++c_7320622.elements[7] = ((closureN)self_7312495)->elements[7];
++c_7320622.elements[8] = ((closureN)self_7312495)->elements[8];
++c_7320622.elements[9] = ((closureN)self_7312495)->elements[9];
++c_7320622.elements[10] = ((closureN)self_7312495)->elements[10];
++c_7320622.elements[11] = ((closureN)self_7312495)->elements[11];
++c_7320622.elements[12] = ((closureN)self_7312495)->elements[12];
++c_7320622.elements[13] = ((closureN)self_7312495)->elements[13];
++c_7320622.elements[14] = ((closureN)self_7312495)->elements[14];
++c_7320622.elements[15] = ((closureN)self_7312495)->elements[15];
++c_7320622.elements[16] = ((closureN)self_7312495)->elements[16];
++c_7320622.elements[17] = ((closureN)self_7312495)->elements[17];
++c_7320622.elements[18] = ((closureN)self_7312495)->elements[18];
++c_7320622.elements[19] = ((closureN)self_7312495)->elements[19];
++c_7320622.elements[20] = ((closureN)self_7312495)->elements[20];
++c_7320622.elements[21] = ((closureN)self_7312495)->elements[21];
++c_7320622.elements[22] = ((closureN)self_7312495)->elements[22];
++c_7320622.elements[23] = ((closureN)self_7312495)->elements[23];
++c_7320622.elements[24] = ((closureN)self_7312495)->elements[24];
++c_7320622.elements[25] = ((closureN)self_7312495)->elements[25];
++c_7320622.elements[26] = ((closureN)self_7312495)->elements[26];
++c_7320622.elements[27] = ((closureN)self_7312495)->elements[27];
++c_7320622.elements[28] = ((closureN)self_7312495)->elements[28];
++c_7320622.elements[29] = ((closureN)self_7312495)->elements[29];
++c_7320622.elements[30] = ((closureN)self_7312495)->elements[30];
++c_7320622.elements[31] = ((closureN)self_7312495)->elements[31];
++c_7320622.elements[32] = ((closureN)self_7312495)->elements[32];
++c_7320622.elements[33] = ((closureN)self_7312495)->elements[33];
++c_7320622.elements[34] = ((closureN)self_7312495)->elements[34];
++c_7320622.elements[35] = ((closureN)self_7312495)->elements[35];
++c_7320622.elements[36] = ((closureN)self_7312495)->elements[36];
++c_7320622.elements[37] = ellipsis_91depth_733220;
++c_7320622.elements[38] = ((closureN)self_7312495)->elements[37];
++c_7320622.elements[39] = ((closureN)self_7312495)->elements[38];
++c_7320622.elements[40] = ((closureN)self_7312495)->elements[40];
++c_7320622.elements[41] = ((closureN)self_7312495)->elements[41];
++c_7320622.elements[42] = ((closureN)self_7312495)->elements[42];
++c_7320622.elements[43] = ((closureN)self_7312495)->elements[43];
++c_7320622.elements[44] = ((closureN)self_7312495)->elements[44];
++c_7320622.elements[45] = ((closureN)self_7312495)->elements[45];
++c_7320622.elements[46] = ((closureN)self_7312495)->elements[46];
++c_7320622.elements[47] = ((closureN)self_7312495)->elements[47];
++c_7320622.elements[48] = ((closureN)self_7312495)->elements[48];
++c_7320622.elements[49] = ((closureN)self_7312495)->elements[49];
++
++
++pair_type local_7322470; 
++return_direct_with_clo1(data,(closure)&c_7320622,__lambda_1371,  set_cell_as_expr(&local_7322470, ((closureN)self_7312495)->elements[39]));; 
++}
++
++static void __lambda_1371(void *data, object self_7312496, int argc, object *args) /* object self_7312496, object ellipsis_91tail_733221 */
++ {
++ object ellipsis_91tail_733221 = args[0];
++  
++closureN_type c_7320624;
++object e_7322462 [50];
++c_7320624.hdr.mark = gc_color_red;
++ c_7320624.hdr.grayed = 0;
++c_7320624.tag = closureN_tag;
++ c_7320624.fn = (function_type)__lambda_1370;
++c_7320624.num_args = 1;
++c_7320624.num_elements = 50;
++c_7320624.elements = (object *)e_7322462;
++c_7320624.elements[0] = ((closureN)self_7312496)->elements[0];
++c_7320624.elements[1] = ((closureN)self_7312496)->elements[1];
++c_7320624.elements[2] = ((closureN)self_7312496)->elements[2];
++c_7320624.elements[3] = ((closureN)self_7312496)->elements[3];
++c_7320624.elements[4] = ((closureN)self_7312496)->elements[4];
++c_7320624.elements[5] = ((closureN)self_7312496)->elements[5];
++c_7320624.elements[6] = ((closureN)self_7312496)->elements[6];
++c_7320624.elements[7] = ((closureN)self_7312496)->elements[7];
++c_7320624.elements[8] = ((closureN)self_7312496)->elements[8];
++c_7320624.elements[9] = ((closureN)self_7312496)->elements[9];
++c_7320624.elements[10] = ((closureN)self_7312496)->elements[10];
++c_7320624.elements[11] = ((closureN)self_7312496)->elements[11];
++c_7320624.elements[12] = ((closureN)self_7312496)->elements[12];
++c_7320624.elements[13] = ((closureN)self_7312496)->elements[13];
++c_7320624.elements[14] = ((closureN)self_7312496)->elements[14];
++c_7320624.elements[15] = ((closureN)self_7312496)->elements[15];
++c_7320624.elements[16] = ((closureN)self_7312496)->elements[16];
++c_7320624.elements[17] = ((closureN)self_7312496)->elements[17];
++c_7320624.elements[18] = ((closureN)self_7312496)->elements[18];
++c_7320624.elements[19] = ((closureN)self_7312496)->elements[19];
++c_7320624.elements[20] = ((closureN)self_7312496)->elements[20];
++c_7320624.elements[21] = ((closureN)self_7312496)->elements[21];
++c_7320624.elements[22] = ((closureN)self_7312496)->elements[22];
++c_7320624.elements[23] = ((closureN)self_7312496)->elements[23];
++c_7320624.elements[24] = ((closureN)self_7312496)->elements[24];
++c_7320624.elements[25] = ((closureN)self_7312496)->elements[25];
++c_7320624.elements[26] = ((closureN)self_7312496)->elements[26];
++c_7320624.elements[27] = ((closureN)self_7312496)->elements[27];
++c_7320624.elements[28] = ((closureN)self_7312496)->elements[28];
++c_7320624.elements[29] = ((closureN)self_7312496)->elements[29];
++c_7320624.elements[30] = ((closureN)self_7312496)->elements[30];
++c_7320624.elements[31] = ((closureN)self_7312496)->elements[31];
++c_7320624.elements[32] = ((closureN)self_7312496)->elements[32];
++c_7320624.elements[33] = ((closureN)self_7312496)->elements[34];
++c_7320624.elements[34] = ((closureN)self_7312496)->elements[35];
++c_7320624.elements[35] = ((closureN)self_7312496)->elements[36];
++c_7320624.elements[36] = ((closureN)self_7312496)->elements[37];
++c_7320624.elements[37] = ((closureN)self_7312496)->elements[38];
++c_7320624.elements[38] = ((closureN)self_7312496)->elements[39];
++c_7320624.elements[39] = ellipsis_91tail_733221;
++c_7320624.elements[40] = ((closureN)self_7312496)->elements[40];
++c_7320624.elements[41] = ((closureN)self_7312496)->elements[41];
++c_7320624.elements[42] = ((closureN)self_7312496)->elements[42];
++c_7320624.elements[43] = ((closureN)self_7312496)->elements[43];
++c_7320624.elements[44] = ((closureN)self_7312496)->elements[44];
++c_7320624.elements[45] = ((closureN)self_7312496)->elements[45];
++c_7320624.elements[46] = ((closureN)self_7312496)->elements[46];
++c_7320624.elements[47] = ((closureN)self_7312496)->elements[47];
++c_7320624.elements[48] = ((closureN)self_7312496)->elements[48];
++c_7320624.elements[49] = ((closureN)self_7312496)->elements[49];
++
++
++pair_type local_7322465; 
++return_direct_with_clo1(data,(closure)&c_7320624,__lambda_1370,  set_cell_as_expr(&local_7322465, ((closureN)self_7312496)->elements[33]));; 
++}
++
++static void __lambda_1370(void *data, object self_7312497, int argc, object *args) /* object self_7312497, object all_91vars_733222 */
++ {
++ object all_91vars_733222 = args[0];
++  
++closureN_type c_7320626;
++object e_7322457 [50];
++c_7320626.hdr.mark = gc_color_red;
++ c_7320626.hdr.grayed = 0;
++c_7320626.tag = closureN_tag;
++ c_7320626.fn = (function_type)__lambda_1369;
++c_7320626.num_args = 1;
++c_7320626.num_elements = 50;
++c_7320626.elements = (object *)e_7322457;
++c_7320626.elements[0] = ((closureN)self_7312497)->elements[0];
++c_7320626.elements[1] = ((closureN)self_7312497)->elements[1];
++c_7320626.elements[2] = ((closureN)self_7312497)->elements[2];
++c_7320626.elements[3] = ((closureN)self_7312497)->elements[3];
++c_7320626.elements[4] = ((closureN)self_7312497)->elements[4];
++c_7320626.elements[5] = ((closureN)self_7312497)->elements[5];
++c_7320626.elements[6] = ((closureN)self_7312497)->elements[6];
++c_7320626.elements[7] = ((closureN)self_7312497)->elements[7];
++c_7320626.elements[8] = ((closureN)self_7312497)->elements[8];
++c_7320626.elements[9] = ((closureN)self_7312497)->elements[9];
++c_7320626.elements[10] = ((closureN)self_7312497)->elements[10];
++c_7320626.elements[11] = ((closureN)self_7312497)->elements[11];
++c_7320626.elements[12] = ((closureN)self_7312497)->elements[12];
++c_7320626.elements[13] = ((closureN)self_7312497)->elements[13];
++c_7320626.elements[14] = ((closureN)self_7312497)->elements[14];
++c_7320626.elements[15] = ((closureN)self_7312497)->elements[15];
++c_7320626.elements[16] = ((closureN)self_7312497)->elements[16];
++c_7320626.elements[17] = ((closureN)self_7312497)->elements[17];
++c_7320626.elements[18] = ((closureN)self_7312497)->elements[18];
++c_7320626.elements[19] = ((closureN)self_7312497)->elements[19];
++c_7320626.elements[20] = ((closureN)self_7312497)->elements[20];
++c_7320626.elements[21] = ((closureN)self_7312497)->elements[21];
++c_7320626.elements[22] = ((closureN)self_7312497)->elements[22];
++c_7320626.elements[23] = ((closureN)self_7312497)->elements[23];
++c_7320626.elements[24] = ((closureN)self_7312497)->elements[24];
++c_7320626.elements[25] = ((closureN)self_7312497)->elements[25];
++c_7320626.elements[26] = ((closureN)self_7312497)->elements[26];
++c_7320626.elements[27] = ((closureN)self_7312497)->elements[27];
++c_7320626.elements[28] = ((closureN)self_7312497)->elements[28];
++c_7320626.elements[29] = ((closureN)self_7312497)->elements[29];
++c_7320626.elements[30] = ((closureN)self_7312497)->elements[30];
++c_7320626.elements[31] = ((closureN)self_7312497)->elements[31];
++c_7320626.elements[32] = ((closureN)self_7312497)->elements[32];
++c_7320626.elements[33] = all_91vars_733222;
++c_7320626.elements[34] = ((closureN)self_7312497)->elements[33];
++c_7320626.elements[35] = ((closureN)self_7312497)->elements[34];
++c_7320626.elements[36] = ((closureN)self_7312497)->elements[35];
++c_7320626.elements[37] = ((closureN)self_7312497)->elements[36];
++c_7320626.elements[38] = ((closureN)self_7312497)->elements[37];
++c_7320626.elements[39] = ((closureN)self_7312497)->elements[38];
++c_7320626.elements[40] = ((closureN)self_7312497)->elements[39];
++c_7320626.elements[41] = ((closureN)self_7312497)->elements[40];
++c_7320626.elements[42] = ((closureN)self_7312497)->elements[41];
++c_7320626.elements[43] = ((closureN)self_7312497)->elements[42];
++c_7320626.elements[44] = ((closureN)self_7312497)->elements[43];
++c_7320626.elements[45] = ((closureN)self_7312497)->elements[44];
++c_7320626.elements[46] = ((closureN)self_7312497)->elements[46];
++c_7320626.elements[47] = ((closureN)self_7312497)->elements[47];
++c_7320626.elements[48] = ((closureN)self_7312497)->elements[48];
++c_7320626.elements[49] = ((closureN)self_7312497)->elements[49];
++
++
++pair_type local_7322460; 
++return_direct_with_clo1(data,(closure)&c_7320626,__lambda_1369,  set_cell_as_expr(&local_7322460, ((closureN)self_7312497)->elements[45]));; 
++}
++
++static void __lambda_1369(void *data, object self_7312498, int argc, object *args) /* object self_7312498, object free_91vars_733223 */
++ {
++ object free_91vars_733223 = args[0];
++  
++closureN_type c_7320628;
++object e_7322452 [50];
++c_7320628.hdr.mark = gc_color_red;
++ c_7320628.hdr.grayed = 0;
++c_7320628.tag = closureN_tag;
++ c_7320628.fn = (function_type)__lambda_1368;
++c_7320628.num_args = 1;
++c_7320628.num_elements = 50;
++c_7320628.elements = (object *)e_7322452;
++c_7320628.elements[0] = ((closureN)self_7312498)->elements[0];
++c_7320628.elements[1] = ((closureN)self_7312498)->elements[1];
++c_7320628.elements[2] = ((closureN)self_7312498)->elements[2];
++c_7320628.elements[3] = ((closureN)self_7312498)->elements[3];
++c_7320628.elements[4] = ((closureN)self_7312498)->elements[4];
++c_7320628.elements[5] = ((closureN)self_7312498)->elements[5];
++c_7320628.elements[6] = ((closureN)self_7312498)->elements[6];
++c_7320628.elements[7] = ((closureN)self_7312498)->elements[7];
++c_7320628.elements[8] = ((closureN)self_7312498)->elements[8];
++c_7320628.elements[9] = ((closureN)self_7312498)->elements[9];
++c_7320628.elements[10] = ((closureN)self_7312498)->elements[10];
++c_7320628.elements[11] = ((closureN)self_7312498)->elements[11];
++c_7320628.elements[12] = ((closureN)self_7312498)->elements[12];
++c_7320628.elements[13] = ((closureN)self_7312498)->elements[13];
++c_7320628.elements[14] = ((closureN)self_7312498)->elements[14];
++c_7320628.elements[15] = ((closureN)self_7312498)->elements[15];
++c_7320628.elements[16] = ((closureN)self_7312498)->elements[16];
++c_7320628.elements[17] = ((closureN)self_7312498)->elements[17];
++c_7320628.elements[18] = ((closureN)self_7312498)->elements[18];
++c_7320628.elements[19] = ((closureN)self_7312498)->elements[19];
++c_7320628.elements[20] = ((closureN)self_7312498)->elements[20];
++c_7320628.elements[21] = ((closureN)self_7312498)->elements[21];
++c_7320628.elements[22] = ((closureN)self_7312498)->elements[22];
++c_7320628.elements[23] = ((closureN)self_7312498)->elements[23];
++c_7320628.elements[24] = ((closureN)self_7312498)->elements[24];
++c_7320628.elements[25] = ((closureN)self_7312498)->elements[25];
++c_7320628.elements[26] = ((closureN)self_7312498)->elements[26];
++c_7320628.elements[27] = ((closureN)self_7312498)->elements[27];
++c_7320628.elements[28] = ((closureN)self_7312498)->elements[28];
++c_7320628.elements[29] = ((closureN)self_7312498)->elements[29];
++c_7320628.elements[30] = ((closureN)self_7312498)->elements[30];
++c_7320628.elements[31] = ((closureN)self_7312498)->elements[31];
++c_7320628.elements[32] = ((closureN)self_7312498)->elements[32];
++c_7320628.elements[33] = ((closureN)self_7312498)->elements[33];
++c_7320628.elements[34] = ((closureN)self_7312498)->elements[34];
++c_7320628.elements[35] = ((closureN)self_7312498)->elements[35];
++c_7320628.elements[36] = ((closureN)self_7312498)->elements[36];
++c_7320628.elements[37] = ((closureN)self_7312498)->elements[37];
++c_7320628.elements[38] = ((closureN)self_7312498)->elements[38];
++c_7320628.elements[39] = ((closureN)self_7312498)->elements[39];
++c_7320628.elements[40] = ((closureN)self_7312498)->elements[40];
++c_7320628.elements[41] = ((closureN)self_7312498)->elements[41];
++c_7320628.elements[42] = ((closureN)self_7312498)->elements[42];
++c_7320628.elements[43] = ((closureN)self_7312498)->elements[44];
++c_7320628.elements[44] = ((closureN)self_7312498)->elements[45];
++c_7320628.elements[45] = free_91vars_733223;
++c_7320628.elements[46] = ((closureN)self_7312498)->elements[46];
++c_7320628.elements[47] = ((closureN)self_7312498)->elements[47];
++c_7320628.elements[48] = ((closureN)self_7312498)->elements[48];
++c_7320628.elements[49] = ((closureN)self_7312498)->elements[49];
++
++
++pair_type local_7322455; 
++return_direct_with_clo1(data,(closure)&c_7320628,__lambda_1368,  set_cell_as_expr(&local_7322455, ((closureN)self_7312498)->elements[43]));; 
++}
++
++static void __lambda_1368(void *data, object self_7312499, int argc, object *args) /* object self_7312499, object expand_91template_733224 */
++ {
++ object expand_91template_733224 = args[0];
++  object r_736242;
++  if( (boolean_f != ((closureN)self_7312499)->elements[39]) ){ 
++  
++  r_736242 = Cyc_cadr(data, ((closureN)self_7312499)->elements[43]);
++} else { 
++  r_736242 = quote__93_93_93;}
++;
++closureN_type c_7320638;
++object e_7322451 [51];
++c_7320638.hdr.mark = gc_color_red;
++ c_7320638.hdr.grayed = 0;
++c_7320638.tag = closureN_tag;
++ c_7320638.fn = (function_type)__lambda_836;
++c_7320638.num_args = 1;
++c_7320638.num_elements = 51;
++c_7320638.elements = (object *)e_7322451;
++c_7320638.elements[0] = ((closureN)self_7312499)->elements[0];
++c_7320638.elements[1] = ((closureN)self_7312499)->elements[1];
++c_7320638.elements[2] = ((closureN)self_7312499)->elements[2];
++c_7320638.elements[3] = ((closureN)self_7312499)->elements[3];
++c_7320638.elements[4] = ((closureN)self_7312499)->elements[4];
++c_7320638.elements[5] = ((closureN)self_7312499)->elements[5];
++c_7320638.elements[6] = ((closureN)self_7312499)->elements[6];
++c_7320638.elements[7] = ((closureN)self_7312499)->elements[7];
++c_7320638.elements[8] = ((closureN)self_7312499)->elements[8];
++c_7320638.elements[9] = ((closureN)self_7312499)->elements[9];
++c_7320638.elements[10] = ((closureN)self_7312499)->elements[10];
++c_7320638.elements[11] = ((closureN)self_7312499)->elements[11];
++c_7320638.elements[12] = ((closureN)self_7312499)->elements[12];
++c_7320638.elements[13] = ((closureN)self_7312499)->elements[13];
++c_7320638.elements[14] = ((closureN)self_7312499)->elements[14];
++c_7320638.elements[15] = ((closureN)self_7312499)->elements[15];
++c_7320638.elements[16] = ((closureN)self_7312499)->elements[16];
++c_7320638.elements[17] = ((closureN)self_7312499)->elements[17];
++c_7320638.elements[18] = ((closureN)self_7312499)->elements[18];
++c_7320638.elements[19] = ((closureN)self_7312499)->elements[19];
++c_7320638.elements[20] = ((closureN)self_7312499)->elements[20];
++c_7320638.elements[21] = ((closureN)self_7312499)->elements[21];
++c_7320638.elements[22] = ((closureN)self_7312499)->elements[22];
++c_7320638.elements[23] = ((closureN)self_7312499)->elements[23];
++c_7320638.elements[24] = ((closureN)self_7312499)->elements[24];
++c_7320638.elements[25] = ((closureN)self_7312499)->elements[25];
++c_7320638.elements[26] = ((closureN)self_7312499)->elements[26];
++c_7320638.elements[27] = ((closureN)self_7312499)->elements[27];
++c_7320638.elements[28] = ((closureN)self_7312499)->elements[28];
++c_7320638.elements[29] = ((closureN)self_7312499)->elements[29];
++c_7320638.elements[30] = ((closureN)self_7312499)->elements[30];
++c_7320638.elements[31] = ((closureN)self_7312499)->elements[31];
++c_7320638.elements[32] = ((closureN)self_7312499)->elements[32];
++c_7320638.elements[33] = ((closureN)self_7312499)->elements[33];
++c_7320638.elements[34] = ((closureN)self_7312499)->elements[34];
++c_7320638.elements[35] = ((closureN)self_7312499)->elements[35];
++c_7320638.elements[36] = ((closureN)self_7312499)->elements[36];
++c_7320638.elements[37] = ((closureN)self_7312499)->elements[37];
++c_7320638.elements[38] = ((closureN)self_7312499)->elements[38];
++c_7320638.elements[39] = ((closureN)self_7312499)->elements[39];
++c_7320638.elements[40] = ((closureN)self_7312499)->elements[40];
++c_7320638.elements[41] = ((closureN)self_7312499)->elements[41];
++c_7320638.elements[42] = ((closureN)self_7312499)->elements[42];
++c_7320638.elements[43] = expand_91template_733224;
++c_7320638.elements[44] = ((closureN)self_7312499)->elements[43];
++c_7320638.elements[45] = ((closureN)self_7312499)->elements[44];
++c_7320638.elements[46] = ((closureN)self_7312499)->elements[45];
++c_7320638.elements[47] = ((closureN)self_7312499)->elements[46];
++c_7320638.elements[48] = ((closureN)self_7312499)->elements[47];
++c_7320638.elements[49] = ((closureN)self_7312499)->elements[48];
++c_7320638.elements[50] = ((closureN)self_7312499)->elements[49];
++
++return_closcall2(data,  ((closureN)self_7312499)->elements[49],  &c_7320638, r_736242);; 
++}
++
++static void __lambda_836(void *data, object self_7312500, int argc, object *args) /* object self_7312500, object r_736241 */
++ {
++ object r_736241 = args[0];
++  
++closureN_type c_7320640;
++object e_7322447 [51];
++c_7320640.hdr.mark = gc_color_red;
++ c_7320640.hdr.grayed = 0;
++c_7320640.tag = closureN_tag;
++ c_7320640.fn = (function_type)__lambda_837;
++c_7320640.num_args = 1;
++c_7320640.num_elements = 51;
++c_7320640.elements = (object *)e_7322447;
++c_7320640.elements[0] = ((closureN)self_7312500)->elements[0];
++c_7320640.elements[1] = ((closureN)self_7312500)->elements[1];
++c_7320640.elements[2] = ((closureN)self_7312500)->elements[2];
++c_7320640.elements[3] = ((closureN)self_7312500)->elements[3];
++c_7320640.elements[4] = ((closureN)self_7312500)->elements[4];
++c_7320640.elements[5] = ((closureN)self_7312500)->elements[5];
++c_7320640.elements[6] = ((closureN)self_7312500)->elements[6];
++c_7320640.elements[7] = ((closureN)self_7312500)->elements[7];
++c_7320640.elements[8] = ((closureN)self_7312500)->elements[8];
++c_7320640.elements[9] = ((closureN)self_7312500)->elements[9];
++c_7320640.elements[10] = ((closureN)self_7312500)->elements[10];
++c_7320640.elements[11] = ((closureN)self_7312500)->elements[11];
++c_7320640.elements[12] = ((closureN)self_7312500)->elements[12];
++c_7320640.elements[13] = ((closureN)self_7312500)->elements[13];
++c_7320640.elements[14] = ((closureN)self_7312500)->elements[14];
++c_7320640.elements[15] = ((closureN)self_7312500)->elements[15];
++c_7320640.elements[16] = ((closureN)self_7312500)->elements[16];
++c_7320640.elements[17] = ((closureN)self_7312500)->elements[17];
++c_7320640.elements[18] = ((closureN)self_7312500)->elements[18];
++c_7320640.elements[19] = ((closureN)self_7312500)->elements[19];
++c_7320640.elements[20] = ((closureN)self_7312500)->elements[20];
++c_7320640.elements[21] = ((closureN)self_7312500)->elements[21];
++c_7320640.elements[22] = ((closureN)self_7312500)->elements[22];
++c_7320640.elements[23] = ((closureN)self_7312500)->elements[23];
++c_7320640.elements[24] = ((closureN)self_7312500)->elements[24];
++c_7320640.elements[25] = ((closureN)self_7312500)->elements[25];
++c_7320640.elements[26] = ((closureN)self_7312500)->elements[26];
++c_7320640.elements[27] = ((closureN)self_7312500)->elements[27];
++c_7320640.elements[28] = ((closureN)self_7312500)->elements[28];
++c_7320640.elements[29] = ((closureN)self_7312500)->elements[29];
++c_7320640.elements[30] = ((closureN)self_7312500)->elements[30];
++c_7320640.elements[31] = ((closureN)self_7312500)->elements[31];
++c_7320640.elements[32] = ((closureN)self_7312500)->elements[32];
++c_7320640.elements[33] = ((closureN)self_7312500)->elements[33];
++c_7320640.elements[34] = ((closureN)self_7312500)->elements[34];
++c_7320640.elements[35] = ((closureN)self_7312500)->elements[35];
++c_7320640.elements[36] = ((closureN)self_7312500)->elements[36];
++c_7320640.elements[37] = ((closureN)self_7312500)->elements[37];
++c_7320640.elements[38] = ((closureN)self_7312500)->elements[38];
++c_7320640.elements[39] = ((closureN)self_7312500)->elements[39];
++c_7320640.elements[40] = ((closureN)self_7312500)->elements[40];
++c_7320640.elements[41] = ((closureN)self_7312500)->elements[41];
++c_7320640.elements[42] = ((closureN)self_7312500)->elements[42];
++c_7320640.elements[43] = ((closureN)self_7312500)->elements[43];
++c_7320640.elements[44] = ((closureN)self_7312500)->elements[44];
++c_7320640.elements[45] = ((closureN)self_7312500)->elements[45];
++c_7320640.elements[46] = ((closureN)self_7312500)->elements[46];
++c_7320640.elements[47] = ((closureN)self_7312500)->elements[47];
++c_7320640.elements[48] = ((closureN)self_7312500)->elements[48];
++c_7320640.elements[49] = ((closureN)self_7312500)->elements[49];
++c_7320640.elements[50] = ((closureN)self_7312500)->elements[50];
++
++
++
++return_direct_with_clo1(data,(closure)&c_7320640,__lambda_837,  Cyc_set_cell(data, ((closureN)self_7312500)->elements[36], r_736241));; 
++}
++
++static void __lambda_837(void *data, object self_7312501, int argc, object *args) /* object self_7312501, object r_735861 */
++ {
++
++  
++closureN_type c_7320642;
++object e_7320654 [2];
++c_7320642.hdr.mark = gc_color_red;
++ c_7320642.hdr.grayed = 0;
++c_7320642.tag = closureN_tag;
++ c_7320642.fn = (function_type)__lambda_838;
++c_7320642.num_args = 0;
++c_7320642.num_elements = 2;
++c_7320642.elements = (object *)e_7320654;
++c_7320642.elements[0] = ((closureN)self_7312501)->elements[39];
++c_7320642.elements[1] = ((closureN)self_7312501)->elements[44];
++
++
++closureN_type c_7320655;
++object e_7322446 [51];
++c_7320655.hdr.mark = gc_color_red;
++ c_7320655.hdr.grayed = 0;
++c_7320655.tag = closureN_tag;
++ c_7320655.fn = (function_type)__lambda_839;
++c_7320655.num_args = 1;
++c_7320655.num_elements = 51;
++c_7320655.elements = (object *)e_7322446;
++c_7320655.elements[0] = ((closureN)self_7312501)->elements[0];
++c_7320655.elements[1] = ((closureN)self_7312501)->elements[1];
++c_7320655.elements[2] = ((closureN)self_7312501)->elements[2];
++c_7320655.elements[3] = ((closureN)self_7312501)->elements[3];
++c_7320655.elements[4] = ((closureN)self_7312501)->elements[4];
++c_7320655.elements[5] = ((closureN)self_7312501)->elements[5];
++c_7320655.elements[6] = ((closureN)self_7312501)->elements[6];
++c_7320655.elements[7] = ((closureN)self_7312501)->elements[7];
++c_7320655.elements[8] = ((closureN)self_7312501)->elements[8];
++c_7320655.elements[9] = ((closureN)self_7312501)->elements[9];
++c_7320655.elements[10] = ((closureN)self_7312501)->elements[10];
++c_7320655.elements[11] = ((closureN)self_7312501)->elements[11];
++c_7320655.elements[12] = ((closureN)self_7312501)->elements[12];
++c_7320655.elements[13] = ((closureN)self_7312501)->elements[13];
++c_7320655.elements[14] = ((closureN)self_7312501)->elements[14];
++c_7320655.elements[15] = ((closureN)self_7312501)->elements[15];
++c_7320655.elements[16] = ((closureN)self_7312501)->elements[16];
++c_7320655.elements[17] = ((closureN)self_7312501)->elements[17];
++c_7320655.elements[18] = ((closureN)self_7312501)->elements[18];
++c_7320655.elements[19] = ((closureN)self_7312501)->elements[19];
++c_7320655.elements[20] = ((closureN)self_7312501)->elements[20];
++c_7320655.elements[21] = ((closureN)self_7312501)->elements[21];
++c_7320655.elements[22] = ((closureN)self_7312501)->elements[22];
++c_7320655.elements[23] = ((closureN)self_7312501)->elements[23];
++c_7320655.elements[24] = ((closureN)self_7312501)->elements[24];
++c_7320655.elements[25] = ((closureN)self_7312501)->elements[25];
++c_7320655.elements[26] = ((closureN)self_7312501)->elements[26];
++c_7320655.elements[27] = ((closureN)self_7312501)->elements[27];
++c_7320655.elements[28] = ((closureN)self_7312501)->elements[28];
++c_7320655.elements[29] = ((closureN)self_7312501)->elements[29];
++c_7320655.elements[30] = ((closureN)self_7312501)->elements[30];
++c_7320655.elements[31] = ((closureN)self_7312501)->elements[31];
++c_7320655.elements[32] = ((closureN)self_7312501)->elements[32];
++c_7320655.elements[33] = ((closureN)self_7312501)->elements[33];
++c_7320655.elements[34] = ((closureN)self_7312501)->elements[34];
++c_7320655.elements[35] = ((closureN)self_7312501)->elements[35];
++c_7320655.elements[36] = ((closureN)self_7312501)->elements[36];
++c_7320655.elements[37] = ((closureN)self_7312501)->elements[37];
++c_7320655.elements[38] = ((closureN)self_7312501)->elements[38];
++c_7320655.elements[39] = ((closureN)self_7312501)->elements[39];
++c_7320655.elements[40] = ((closureN)self_7312501)->elements[40];
++c_7320655.elements[41] = ((closureN)self_7312501)->elements[41];
++c_7320655.elements[42] = ((closureN)self_7312501)->elements[42];
++c_7320655.elements[43] = ((closureN)self_7312501)->elements[43];
++c_7320655.elements[44] = ((closureN)self_7312501)->elements[44];
++c_7320655.elements[45] = ((closureN)self_7312501)->elements[45];
++c_7320655.elements[46] = ((closureN)self_7312501)->elements[46];
++c_7320655.elements[47] = ((closureN)self_7312501)->elements[47];
++c_7320655.elements[48] = ((closureN)self_7312501)->elements[48];
++c_7320655.elements[49] = ((closureN)self_7312501)->elements[49];
++c_7320655.elements[50] = ((closureN)self_7312501)->elements[50];
++
++return_direct_with_clo1(data,(closure)&c_7320642,__lambda_838,  &c_7320655);; 
++}
++
++static void __lambda_839(void *data, object self_7312502, int argc, object *args) /* object self_7312502, object r_736238 */
++ {
++ object r_736238 = args[0];
++  
++closureN_type c_7320657;
++object e_7322442 [51];
++c_7320657.hdr.mark = gc_color_red;
++ c_7320657.hdr.grayed = 0;
++c_7320657.tag = closureN_tag;
++ c_7320657.fn = (function_type)__lambda_840;
++c_7320657.num_args = 1;
++c_7320657.num_elements = 51;
++c_7320657.elements = (object *)e_7322442;
++c_7320657.elements[0] = ((closureN)self_7312502)->elements[0];
++c_7320657.elements[1] = ((closureN)self_7312502)->elements[1];
++c_7320657.elements[2] = ((closureN)self_7312502)->elements[2];
++c_7320657.elements[3] = ((closureN)self_7312502)->elements[3];
++c_7320657.elements[4] = ((closureN)self_7312502)->elements[4];
++c_7320657.elements[5] = ((closureN)self_7312502)->elements[5];
++c_7320657.elements[6] = ((closureN)self_7312502)->elements[6];
++c_7320657.elements[7] = ((closureN)self_7312502)->elements[7];
++c_7320657.elements[8] = ((closureN)self_7312502)->elements[8];
++c_7320657.elements[9] = ((closureN)self_7312502)->elements[9];
++c_7320657.elements[10] = ((closureN)self_7312502)->elements[10];
++c_7320657.elements[11] = ((closureN)self_7312502)->elements[11];
++c_7320657.elements[12] = ((closureN)self_7312502)->elements[12];
++c_7320657.elements[13] = ((closureN)self_7312502)->elements[13];
++c_7320657.elements[14] = ((closureN)self_7312502)->elements[14];
++c_7320657.elements[15] = ((closureN)self_7312502)->elements[15];
++c_7320657.elements[16] = ((closureN)self_7312502)->elements[16];
++c_7320657.elements[17] = ((closureN)self_7312502)->elements[17];
++c_7320657.elements[18] = ((closureN)self_7312502)->elements[18];
++c_7320657.elements[19] = ((closureN)self_7312502)->elements[19];
++c_7320657.elements[20] = ((closureN)self_7312502)->elements[20];
++c_7320657.elements[21] = ((closureN)self_7312502)->elements[21];
++c_7320657.elements[22] = ((closureN)self_7312502)->elements[22];
++c_7320657.elements[23] = ((closureN)self_7312502)->elements[23];
++c_7320657.elements[24] = ((closureN)self_7312502)->elements[24];
++c_7320657.elements[25] = ((closureN)self_7312502)->elements[25];
++c_7320657.elements[26] = ((closureN)self_7312502)->elements[26];
++c_7320657.elements[27] = ((closureN)self_7312502)->elements[27];
++c_7320657.elements[28] = ((closureN)self_7312502)->elements[28];
++c_7320657.elements[29] = ((closureN)self_7312502)->elements[29];
++c_7320657.elements[30] = ((closureN)self_7312502)->elements[30];
++c_7320657.elements[31] = ((closureN)self_7312502)->elements[31];
++c_7320657.elements[32] = ((closureN)self_7312502)->elements[32];
++c_7320657.elements[33] = ((closureN)self_7312502)->elements[33];
++c_7320657.elements[34] = ((closureN)self_7312502)->elements[34];
++c_7320657.elements[35] = ((closureN)self_7312502)->elements[35];
++c_7320657.elements[36] = ((closureN)self_7312502)->elements[36];
++c_7320657.elements[37] = ((closureN)self_7312502)->elements[37];
++c_7320657.elements[38] = ((closureN)self_7312502)->elements[38];
++c_7320657.elements[39] = ((closureN)self_7312502)->elements[39];
++c_7320657.elements[40] = ((closureN)self_7312502)->elements[40];
++c_7320657.elements[41] = ((closureN)self_7312502)->elements[41];
++c_7320657.elements[42] = ((closureN)self_7312502)->elements[42];
++c_7320657.elements[43] = ((closureN)self_7312502)->elements[43];
++c_7320657.elements[44] = ((closureN)self_7312502)->elements[44];
++c_7320657.elements[45] = ((closureN)self_7312502)->elements[45];
++c_7320657.elements[46] = ((closureN)self_7312502)->elements[46];
++c_7320657.elements[47] = ((closureN)self_7312502)->elements[47];
++c_7320657.elements[48] = ((closureN)self_7312502)->elements[48];
++c_7320657.elements[49] = ((closureN)self_7312502)->elements[49];
++c_7320657.elements[50] = ((closureN)self_7312502)->elements[50];
++
++
++
++return_direct_with_clo1(data,(closure)&c_7320657,__lambda_840,  Cyc_set_cell(data, ((closureN)self_7312502)->elements[48], r_736238));; 
++}
++
++static void __lambda_840(void *data, object self_7312503, int argc, object *args) /* object self_7312503, object r_735862 */
++ {
++
++  
++closureN_type c_7320659;
++object e_7320671 [2];
++c_7320659.hdr.mark = gc_color_red;
++ c_7320659.hdr.grayed = 0;
++c_7320659.tag = closureN_tag;
++ c_7320659.fn = (function_type)__lambda_841;
++c_7320659.num_args = 0;
++c_7320659.num_elements = 2;
++c_7320659.elements = (object *)e_7320671;
++c_7320659.elements[0] = ((closureN)self_7312503)->elements[39];
++c_7320659.elements[1] = ((closureN)self_7312503)->elements[44];
++
++
++closureN_type c_7320672;
++object e_7322441 [50];
++c_7320672.hdr.mark = gc_color_red;
++ c_7320672.hdr.grayed = 0;
++c_7320672.tag = closureN_tag;
++ c_7320672.fn = (function_type)__lambda_842;
++c_7320672.num_args = 1;
++c_7320672.num_elements = 50;
++c_7320672.elements = (object *)e_7322441;
++c_7320672.elements[0] = ((closureN)self_7312503)->elements[0];
++c_7320672.elements[1] = ((closureN)self_7312503)->elements[1];
++c_7320672.elements[2] = ((closureN)self_7312503)->elements[2];
++c_7320672.elements[3] = ((closureN)self_7312503)->elements[3];
++c_7320672.elements[4] = ((closureN)self_7312503)->elements[4];
++c_7320672.elements[5] = ((closureN)self_7312503)->elements[5];
++c_7320672.elements[6] = ((closureN)self_7312503)->elements[6];
++c_7320672.elements[7] = ((closureN)self_7312503)->elements[7];
++c_7320672.elements[8] = ((closureN)self_7312503)->elements[8];
++c_7320672.elements[9] = ((closureN)self_7312503)->elements[9];
++c_7320672.elements[10] = ((closureN)self_7312503)->elements[10];
++c_7320672.elements[11] = ((closureN)self_7312503)->elements[11];
++c_7320672.elements[12] = ((closureN)self_7312503)->elements[12];
++c_7320672.elements[13] = ((closureN)self_7312503)->elements[13];
++c_7320672.elements[14] = ((closureN)self_7312503)->elements[14];
++c_7320672.elements[15] = ((closureN)self_7312503)->elements[15];
++c_7320672.elements[16] = ((closureN)self_7312503)->elements[16];
++c_7320672.elements[17] = ((closureN)self_7312503)->elements[17];
++c_7320672.elements[18] = ((closureN)self_7312503)->elements[18];
++c_7320672.elements[19] = ((closureN)self_7312503)->elements[19];
++c_7320672.elements[20] = ((closureN)self_7312503)->elements[20];
++c_7320672.elements[21] = ((closureN)self_7312503)->elements[21];
++c_7320672.elements[22] = ((closureN)self_7312503)->elements[22];
++c_7320672.elements[23] = ((closureN)self_7312503)->elements[23];
++c_7320672.elements[24] = ((closureN)self_7312503)->elements[24];
++c_7320672.elements[25] = ((closureN)self_7312503)->elements[25];
++c_7320672.elements[26] = ((closureN)self_7312503)->elements[26];
++c_7320672.elements[27] = ((closureN)self_7312503)->elements[27];
++c_7320672.elements[28] = ((closureN)self_7312503)->elements[28];
++c_7320672.elements[29] = ((closureN)self_7312503)->elements[29];
++c_7320672.elements[30] = ((closureN)self_7312503)->elements[30];
++c_7320672.elements[31] = ((closureN)self_7312503)->elements[31];
++c_7320672.elements[32] = ((closureN)self_7312503)->elements[32];
++c_7320672.elements[33] = ((closureN)self_7312503)->elements[33];
++c_7320672.elements[34] = ((closureN)self_7312503)->elements[34];
++c_7320672.elements[35] = ((closureN)self_7312503)->elements[35];
++c_7320672.elements[36] = ((closureN)self_7312503)->elements[36];
++c_7320672.elements[37] = ((closureN)self_7312503)->elements[37];
++c_7320672.elements[38] = ((closureN)self_7312503)->elements[38];
++c_7320672.elements[39] = ((closureN)self_7312503)->elements[40];
++c_7320672.elements[40] = ((closureN)self_7312503)->elements[41];
++c_7320672.elements[41] = ((closureN)self_7312503)->elements[42];
++c_7320672.elements[42] = ((closureN)self_7312503)->elements[43];
++c_7320672.elements[43] = ((closureN)self_7312503)->elements[44];
++c_7320672.elements[44] = ((closureN)self_7312503)->elements[45];
++c_7320672.elements[45] = ((closureN)self_7312503)->elements[46];
++c_7320672.elements[46] = ((closureN)self_7312503)->elements[47];
++c_7320672.elements[47] = ((closureN)self_7312503)->elements[48];
++c_7320672.elements[48] = ((closureN)self_7312503)->elements[49];
++c_7320672.elements[49] = ((closureN)self_7312503)->elements[50];
++
++return_direct_with_clo1(data,(closure)&c_7320659,__lambda_841,  &c_7320672);; 
++}
++
++static void __lambda_842(void *data, object self_7312504, int argc, object *args) /* object self_7312504, object r_736235 */
++ {
++ object r_736235 = args[0];
++  
++closureN_type c_7320674;
++object e_7322437 [50];
++c_7320674.hdr.mark = gc_color_red;
++ c_7320674.hdr.grayed = 0;
++c_7320674.tag = closureN_tag;
++ c_7320674.fn = (function_type)__lambda_843;
++c_7320674.num_args = 1;
++c_7320674.num_elements = 50;
++c_7320674.elements = (object *)e_7322437;
++c_7320674.elements[0] = ((closureN)self_7312504)->elements[0];
++c_7320674.elements[1] = ((closureN)self_7312504)->elements[1];
++c_7320674.elements[2] = ((closureN)self_7312504)->elements[2];
++c_7320674.elements[3] = ((closureN)self_7312504)->elements[3];
++c_7320674.elements[4] = ((closureN)self_7312504)->elements[4];
++c_7320674.elements[5] = ((closureN)self_7312504)->elements[5];
++c_7320674.elements[6] = ((closureN)self_7312504)->elements[6];
++c_7320674.elements[7] = ((closureN)self_7312504)->elements[7];
++c_7320674.elements[8] = ((closureN)self_7312504)->elements[8];
++c_7320674.elements[9] = ((closureN)self_7312504)->elements[9];
++c_7320674.elements[10] = ((closureN)self_7312504)->elements[10];
++c_7320674.elements[11] = ((closureN)self_7312504)->elements[11];
++c_7320674.elements[12] = ((closureN)self_7312504)->elements[12];
++c_7320674.elements[13] = ((closureN)self_7312504)->elements[13];
++c_7320674.elements[14] = ((closureN)self_7312504)->elements[14];
++c_7320674.elements[15] = ((closureN)self_7312504)->elements[15];
++c_7320674.elements[16] = ((closureN)self_7312504)->elements[16];
++c_7320674.elements[17] = ((closureN)self_7312504)->elements[17];
++c_7320674.elements[18] = ((closureN)self_7312504)->elements[18];
++c_7320674.elements[19] = ((closureN)self_7312504)->elements[19];
++c_7320674.elements[20] = ((closureN)self_7312504)->elements[20];
++c_7320674.elements[21] = ((closureN)self_7312504)->elements[21];
++c_7320674.elements[22] = ((closureN)self_7312504)->elements[22];
++c_7320674.elements[23] = ((closureN)self_7312504)->elements[23];
++c_7320674.elements[24] = ((closureN)self_7312504)->elements[24];
++c_7320674.elements[25] = ((closureN)self_7312504)->elements[25];
++c_7320674.elements[26] = ((closureN)self_7312504)->elements[26];
++c_7320674.elements[27] = ((closureN)self_7312504)->elements[27];
++c_7320674.elements[28] = ((closureN)self_7312504)->elements[28];
++c_7320674.elements[29] = ((closureN)self_7312504)->elements[29];
++c_7320674.elements[30] = ((closureN)self_7312504)->elements[30];
++c_7320674.elements[31] = ((closureN)self_7312504)->elements[31];
++c_7320674.elements[32] = ((closureN)self_7312504)->elements[32];
++c_7320674.elements[33] = ((closureN)self_7312504)->elements[33];
++c_7320674.elements[34] = ((closureN)self_7312504)->elements[34];
++c_7320674.elements[35] = ((closureN)self_7312504)->elements[35];
++c_7320674.elements[36] = ((closureN)self_7312504)->elements[36];
++c_7320674.elements[37] = ((closureN)self_7312504)->elements[37];
++c_7320674.elements[38] = ((closureN)self_7312504)->elements[38];
++c_7320674.elements[39] = ((closureN)self_7312504)->elements[39];
++c_7320674.elements[40] = ((closureN)self_7312504)->elements[40];
++c_7320674.elements[41] = ((closureN)self_7312504)->elements[41];
++c_7320674.elements[42] = ((closureN)self_7312504)->elements[42];
++c_7320674.elements[43] = ((closureN)self_7312504)->elements[43];
++c_7320674.elements[44] = ((closureN)self_7312504)->elements[44];
++c_7320674.elements[45] = ((closureN)self_7312504)->elements[45];
++c_7320674.elements[46] = ((closureN)self_7312504)->elements[46];
++c_7320674.elements[47] = ((closureN)self_7312504)->elements[47];
++c_7320674.elements[48] = ((closureN)self_7312504)->elements[48];
++c_7320674.elements[49] = ((closureN)self_7312504)->elements[49];
++
++
++
++return_direct_with_clo1(data,(closure)&c_7320674,__lambda_843,  Cyc_set_cell(data, ((closureN)self_7312504)->elements[44], r_736235));; 
++}
++
++static void __lambda_843(void *data, object self_7312505, int argc, object *args) /* object self_7312505, object r_735863 */
++ {
++
++  
++closureN_type c_7320676;
++object e_7322398 [48];
++c_7320676.hdr.mark = gc_color_red;
++ c_7320676.hdr.grayed = 0;
++c_7320676.tag = closureN_tag;
++ c_7320676.fn = (function_type)__lambda_844;
++c_7320676.num_args = 1;
++c_7320676.num_elements = 48;
++c_7320676.elements = (object *)e_7322398;
++c_7320676.elements[0] = ((closureN)self_7312505)->elements[0];
++c_7320676.elements[1] = ((closureN)self_7312505)->elements[1];
++c_7320676.elements[2] = ((closureN)self_7312505)->elements[2];
++c_7320676.elements[3] = ((closureN)self_7312505)->elements[3];
++c_7320676.elements[4] = ((closureN)self_7312505)->elements[4];
++c_7320676.elements[5] = ((closureN)self_7312505)->elements[5];
++c_7320676.elements[6] = ((closureN)self_7312505)->elements[6];
++c_7320676.elements[7] = ((closureN)self_7312505)->elements[7];
++c_7320676.elements[8] = ((closureN)self_7312505)->elements[8];
++c_7320676.elements[9] = ((closureN)self_7312505)->elements[9];
++c_7320676.elements[10] = ((closureN)self_7312505)->elements[10];
++c_7320676.elements[11] = ((closureN)self_7312505)->elements[11];
++c_7320676.elements[12] = ((closureN)self_7312505)->elements[12];
++c_7320676.elements[13] = ((closureN)self_7312505)->elements[13];
++c_7320676.elements[14] = ((closureN)self_7312505)->elements[14];
++c_7320676.elements[15] = ((closureN)self_7312505)->elements[15];
++c_7320676.elements[16] = ((closureN)self_7312505)->elements[16];
++c_7320676.elements[17] = ((closureN)self_7312505)->elements[17];
++c_7320676.elements[18] = ((closureN)self_7312505)->elements[18];
++c_7320676.elements[19] = ((closureN)self_7312505)->elements[19];
++c_7320676.elements[20] = ((closureN)self_7312505)->elements[20];
++c_7320676.elements[21] = ((closureN)self_7312505)->elements[21];
++c_7320676.elements[22] = ((closureN)self_7312505)->elements[22];
++c_7320676.elements[23] = ((closureN)self_7312505)->elements[23];
++c_7320676.elements[24] = ((closureN)self_7312505)->elements[24];
++c_7320676.elements[25] = ((closureN)self_7312505)->elements[25];
++c_7320676.elements[26] = ((closureN)self_7312505)->elements[26];
++c_7320676.elements[27] = ((closureN)self_7312505)->elements[27];
++c_7320676.elements[28] = ((closureN)self_7312505)->elements[28];
++c_7320676.elements[29] = ((closureN)self_7312505)->elements[29];
++c_7320676.elements[30] = ((closureN)self_7312505)->elements[30];
++c_7320676.elements[31] = ((closureN)self_7312505)->elements[31];
++c_7320676.elements[32] = ((closureN)self_7312505)->elements[32];
++c_7320676.elements[33] = ((closureN)self_7312505)->elements[33];
++c_7320676.elements[34] = ((closureN)self_7312505)->elements[34];
++c_7320676.elements[35] = ((closureN)self_7312505)->elements[36];
++c_7320676.elements[36] = ((closureN)self_7312505)->elements[37];
++c_7320676.elements[37] = ((closureN)self_7312505)->elements[38];
++c_7320676.elements[38] = ((closureN)self_7312505)->elements[39];
++c_7320676.elements[39] = ((closureN)self_7312505)->elements[40];
++c_7320676.elements[40] = ((closureN)self_7312505)->elements[41];
++c_7320676.elements[41] = ((closureN)self_7312505)->elements[42];
++c_7320676.elements[42] = ((closureN)self_7312505)->elements[43];
++c_7320676.elements[43] = ((closureN)self_7312505)->elements[44];
++c_7320676.elements[44] = ((closureN)self_7312505)->elements[45];
++c_7320676.elements[45] = ((closureN)self_7312505)->elements[46];
++c_7320676.elements[46] = ((closureN)self_7312505)->elements[47];
++c_7320676.elements[47] = ((closureN)self_7312505)->elements[48];
++
++
++closureN_type c_7322399;
++object e_7322436 [2];
++c_7322399.hdr.mark = gc_color_red;
++ c_7322399.hdr.grayed = 0;
++c_7322399.tag = closureN_tag;
++ c_7322399.fn = (function_type)__lambda_1006;
++c_7322399.num_args = 1;
++c_7322399.num_elements = 2;
++c_7322399.elements = (object *)e_7322436;
++c_7322399.elements[0] = ((closureN)self_7312505)->elements[35];
++c_7322399.elements[1] = ((closureN)self_7312505)->elements[49];
  
 -return_closcall2(data,  ((closureN)self_7313710)->elements[11],  &c_7321820, quote_equal_127);; 
-+return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7322635, primitive_cons, NULL, ((closureN)self_7312697)->elements[3]);; 
++return_direct_with_clo1(data,(closure)&c_7320676,__lambda_844,  &c_7322399);; 
  }
  
 -static void __lambda_807(void *data, object self_7313711, int argc, object *args) /* object self_7313711, object r_736286 */
-+static void __lambda_1020(void *data, object self_7312698, int argc, object *args) /* object self_7312698, object r_736305_7311675_7311686 */
++static void __lambda_1006(void *data, object self_7312506, int argc, object *args) /* object self_7312506, object k_736229, object s_731271_733225 */
   {
 - object r_736286 = args[0];
-+ object r_736305_7311675_7311686 = args[0];
++ object k_736229 = args[0]; object s_731271_733225 = args[1];
    
 -closureN_type c_7321823;
 -object e_7323877 [14];
@@ -18150,10 +21185,23 @@ Make let-values be the same as let*-values, to work around
 -c_7321829.elements[13] = ((closureN)self_7313713)->elements[13];
 -c_7321829.elements[14] = r_736288;
 -c_7321829.elements[15] = ((closureN)self_7313713)->elements[14];
--
++closureN_type c_7322401;
++object e_7322429 [4];
++c_7322401.hdr.mark = gc_color_red;
++ c_7322401.hdr.grayed = 0;
++c_7322401.tag = closureN_tag;
++ c_7322401.fn = (function_type)__lambda_1007;
++c_7322401.num_args = 1;
++c_7322401.num_elements = 4;
++c_7322401.elements = (object *)e_7322429;
++c_7322401.elements[0] = ((closureN)self_7312506)->elements[0];
++c_7322401.elements[1] = k_736229;
++c_7322401.elements[2] = ((closureN)self_7312506)->elements[1];
++c_7322401.elements[3] = s_731271_733225;
+ 
 -return_closcall2(data,  ((closureN)self_7313713)->elements[14],  &c_7321829, quote_cons);; 
 -}
--
+ 
 -static void __lambda_810(void *data, object self_7313714, int argc, object *args) /* object self_7313714, object r_736289 */
 - {
 - object r_736289 = args[0];
@@ -18184,29 +21232,14 @@ Make let-values be the same as let*-values, to work around
 -c_7321832.elements[14] = ((closureN)self_7313714)->elements[14];
 -c_7321832.elements[15] = r_736289;
 -c_7321832.elements[16] = ((closureN)self_7313714)->elements[15];
-+closureN_type c_7322637;
-+object e_7322687 [3];
-+c_7322637.hdr.mark = gc_color_red;
-+ c_7322637.hdr.grayed = 0;
-+c_7322637.tag = closureN_tag;
-+ c_7322637.fn = (function_type)__lambda_1021;
-+c_7322637.num_args = 2;
-+c_7322637.num_elements = 3;
-+c_7322637.elements = (object *)e_7322687;
-+c_7322637.elements[0] = ((closureN)self_7312698)->elements[0];
-+c_7322637.elements[1] = ((closureN)self_7312698)->elements[2];
-+c_7322637.elements[2] = ((closureN)self_7312698)->elements[3];
- 
+-
 -return_closcall2(data,  ((closureN)self_7313714)->elements[15],  &c_7321832, quote_pair_127);; 
-+return_direct_with_clo2(data,(closure)&c_7322637,__lambda_1021,  ((closureN)self_7312698)->elements[1], r_736305_7311675_7311686);; 
- }
- 
+-}
+-
 -static void __lambda_811(void *data, object self_7313715, int argc, object *args) /* object self_7313715, object r_736290 */
-+static void __lambda_1021(void *data, object self_7312699, int argc, object *args) /* object self_7312699, object var_731529_731559_733324_7311676_7311687, object val_731530_731560_733325_7311677_7311688 */
-  {
+- {
 - object r_736290 = args[0];
-+ object var_731529_731559_733324_7311676_7311687 = args[0]; object val_731530_731560_733325_7311677_7311688 = args[1];
-   
+-  
 -closureN_type c_7321835;
 -object e_7323873 [18];
 -c_7321835.hdr.mark = gc_color_red;
@@ -18270,31 +21303,14 @@ Make let-values be the same as let*-values, to work around
 -c_7321838.elements[16] = ((closureN)self_7313716)->elements[16];
 -c_7321838.elements[17] = r_736291;
 -c_7321838.elements[18] = ((closureN)self_7313716)->elements[17];
-+closureN_type c_7322640;
-+object e_7322686 [5];
-+c_7322640.hdr.mark = gc_color_red;
-+ c_7322640.hdr.grayed = 0;
-+c_7322640.tag = closureN_tag;
-+ c_7322640.fn = (function_type)__lambda_1022;
-+c_7322640.num_args = 1;
-+c_7322640.num_elements = 5;
-+c_7322640.elements = (object *)e_7322686;
-+c_7322640.elements[0] = ((closureN)self_7312699)->elements[0];
-+c_7322640.elements[1] = ((closureN)self_7312699)->elements[1];
-+c_7322640.elements[2] = ((closureN)self_7312699)->elements[2];
-+c_7322640.elements[3] = val_731530_731560_733325_7311677_7311688;
-+c_7322640.elements[4] = var_731529_731559_733324_7311676_7311687;
- 
+-
 -return_closcall2(data,  ((closureN)self_7313716)->elements[17],  &c_7321838, quote_expr);; 
-+return_closcall2(data,  ((closureN)self_7312699)->elements[1],  &c_7322640, quote_let);; 
- }
- 
+-}
+-
 -static void __lambda_813(void *data, object self_7313717, int argc, object *args) /* object self_7313717, object r_736292 */
-+static void __lambda_1022(void *data, object self_7312700, int argc, object *args) /* object self_7312700, object r_736308_7311678_7311689 */
-  {
+- {
 - object r_736292 = args[0];
-+ object r_736308_7311678_7311689 = args[0];
-   
+-  
 -closureN_type c_7321841;
 -object e_7323871 [20];
 -c_7321841.hdr.mark = gc_color_red;
@@ -18324,43 +21340,14 @@ Make let-values be the same as let*-values, to work around
 -c_7321841.elements[17] = ((closureN)self_7313717)->elements[17];
 -c_7321841.elements[18] = r_736292;
 -c_7321841.elements[19] = ((closureN)self_7313717)->elements[18];
-+closureN_type c_7322642;
-+object e_7322666 [5];
-+c_7322642.hdr.mark = gc_color_red;
-+ c_7322642.hdr.grayed = 0;
-+c_7322642.tag = closureN_tag;
-+ c_7322642.fn = (function_type)__lambda_1023;
-+c_7322642.num_args = 1;
-+c_7322642.num_elements = 5;
-+c_7322642.elements = (object *)e_7322666;
-+c_7322642.elements[0] = ((closureN)self_7312700)->elements[0];
-+c_7322642.elements[1] = r_736308_7311678_7311689;
-+c_7322642.elements[2] = ((closureN)self_7312700)->elements[2];
-+c_7322642.elements[3] = ((closureN)self_7312700)->elements[3];
-+c_7322642.elements[4] = ((closureN)self_7312700)->elements[4];
- 
+-
 -return_closcall2(data,  ((closureN)self_7313717)->elements[18],  &c_7321841, quote_rename);; 
-+
-+closureN_type c_7322667;
-+object e_7322685 [1];
-+c_7322667.hdr.mark = gc_color_red;
-+ c_7322667.hdr.grayed = 0;
-+c_7322667.tag = closureN_tag;
-+ c_7322667.fn = (function_type)__lambda_1026;
-+c_7322667.num_args = 2;
-+c_7322667.num_elements = 1;
-+c_7322667.elements = (object *)e_7322685;
-+c_7322667.elements[0] = ((closureN)self_7312700)->elements[1];
-+
-+return_direct_with_clo1(data,(closure)&c_7322642,__lambda_1023,  &c_7322667);; 
- }
- 
+-}
+-
 -static void __lambda_814(void *data, object self_7313718, int argc, object *args) /* object self_7313718, object r_736293 */
-+static void __lambda_1026(void *data, object self_7312701, int argc, object *args) /* object self_7312701, object k_736316_7311682_7311693, object var_731533_731563_733328_7311683_7311694, object val_731534_731564_733329_7311684_7311695 */
-  {
+- {
 - object r_736293 = args[0];
-+ object k_736316_7311682_7311693 = args[0]; object var_731533_731563_733328_7311683_7311694 = args[1]; object val_731534_731564_733329_7311684_7311695 = args[2];
-   
+-  
 -closureN_type c_7321844;
 -object e_7323870 [21];
 -c_7321844.hdr.mark = gc_color_red;
@@ -18391,14 +21378,19 @@ Make let-values be the same as let*-values, to work around
 -c_7321844.elements[18] = ((closureN)self_7313718)->elements[18];
 -c_7321844.elements[19] = r_736293;
 -c_7321844.elements[20] = ((closureN)self_7313718)->elements[19];
--
++complex_num_type local_7322432; 
++
+ 
 -return_closcall2(data,  ((closureN)self_7313718)->elements[19],  &c_7321844, quote_compare);; 
--}
--
++return_direct_with_clo1(data,(closure)&c_7322401,__lambda_1007,  Cyc_fast_sum(data,&local_7322432, car(((closureN)self_7312506)->elements[0]), obj_int2obj(1)));; 
+ }
+ 
 -static void __lambda_815(void *data, object self_7313719, int argc, object *args) /* object self_7313719, object r_736294 */
-- {
++static void __lambda_1007(void *data, object self_7312507, int argc, object *args) /* object self_7312507, object r_736234 */
+  {
 - object r_736294 = args[0];
--  
++ object r_736234 = args[0];
+   
 -closureN_type c_7321847;
 -object e_7323869 [22];
 -c_7321847.hdr.mark = gc_color_red;
@@ -18511,10 +21503,23 @@ Make let-values be the same as let*-values, to work around
 -c_7321853.elements[21] = ((closureN)self_7313721)->elements[21];
 -c_7321853.elements[22] = r_736296;
 -c_7321853.elements[23] = ((closureN)self_7313721)->elements[22];
--
++closureN_type c_7322403;
++object e_7322425 [4];
++c_7322403.hdr.mark = gc_color_red;
++ c_7322403.hdr.grayed = 0;
++c_7322403.tag = closureN_tag;
++ c_7322403.fn = (function_type)__lambda_1008;
++c_7322403.num_args = 1;
++c_7322403.num_elements = 4;
++c_7322403.elements = (object *)e_7322425;
++c_7322403.elements[0] = ((closureN)self_7312507)->elements[0];
++c_7322403.elements[1] = ((closureN)self_7312507)->elements[1];
++c_7322403.elements[2] = ((closureN)self_7312507)->elements[2];
++c_7322403.elements[3] = ((closureN)self_7312507)->elements[3];
+ 
 -return_closcall2(data,  ((closureN)self_7313721)->elements[22],  &c_7321853, quote_append);; 
 -}
--
+ 
 -static void __lambda_818(void *data, object self_7313722, int argc, object *args) /* object self_7313722, object r_736297 */
 - {
 - object r_736297 = args[0];
@@ -18685,29 +21690,14 @@ Make let-values be the same as let*-values, to work around
 -c_7321865.elements[25] = ((closureN)self_7313725)->elements[25];
 -c_7321865.elements[26] = r_736300;
 -c_7321865.elements[27] = ((closureN)self_7313725)->elements[26];
-+closureN_type c_7322670;
-+object e_7322684 [3];
-+c_7322670.hdr.mark = gc_color_red;
-+ c_7322670.hdr.grayed = 0;
-+c_7322670.tag = closureN_tag;
-+ c_7322670.fn = (function_type)__lambda_1027;
-+c_7322670.num_args = 1;
-+c_7322670.num_elements = 3;
-+c_7322670.elements = (object *)e_7322684;
-+c_7322670.elements[0] = k_736316_7311682_7311693;
-+c_7322670.elements[1] = val_731534_731564_733329_7311684_7311695;
-+c_7322670.elements[2] = var_731533_731563_733328_7311683_7311694;
- 
+-
 -return_closcall2(data,  ((closureN)self_7313725)->elements[26],  &c_7321865, quote_len);; 
-+return_closcall2(data,  ((closureN)self_7312701)->elements[0],  &c_7322670, quote_define);; 
- }
- 
+-}
+-
 -static void __lambda_822(void *data, object self_7313726, int argc, object *args) /* object self_7313726, object r_736301 */
-+static void __lambda_1027(void *data, object self_7312702, int argc, object *args) /* object self_7312702, object r_736317_7311685_7311696 */
-  {
+- {
 - object r_736301 = args[0];
-+ object r_736317_7311685_7311696 = args[0];
-   
+-  
 -closureN_type c_7321868;
 -object e_7323862 [29];
 -c_7321868.hdr.mark = gc_color_red;
@@ -18746,12 +21736,14 @@ Make let-values be the same as let*-values, to work around
 -c_7321868.elements[26] = ((closureN)self_7313726)->elements[26];
 -c_7321868.elements[27] = r_736301;
 -c_7321868.elements[28] = ((closureN)self_7313726)->elements[27];
--
+ 
 -return_closcall2(data,  ((closureN)self_7313726)->elements[27],  &c_7321868, quote_length);; 
--}
--
++return_direct_with_clo1(data,(closure)&c_7322403,__lambda_1008,  Cyc_set_cell(data, ((closureN)self_7312507)->elements[0], r_736234));; 
+ }
+ 
 -static void __lambda_823(void *data, object self_7313727, int argc, object *args) /* object self_7313727, object r_736302 */
-- {
++static void __lambda_1008(void *data, object self_7312508, int argc, object *args) /* object self_7312508, object r_736230 */
+  {
 - object r_736302 = args[0];
 -  
 -closureN_type c_7321871;
@@ -18890,21 +21882,14 @@ Make let-values be the same as let*-values, to work around
 -c_7321877.elements[29] = ((closureN)self_7313729)->elements[29];
 -c_7321877.elements[30] = r_736304;
 -c_7321877.elements[31] = ((closureN)self_7313729)->elements[30];
-+pair_type local_7322675; 
- 
+-
 -return_closcall2(data,  ((closureN)self_7313729)->elements[30],  &c_7321877, quote_error_95loc);; 
-+pair_type local_7322678; 
-+
-+pair_type local_7322682; 
-+return_direct_with_clo1(data,  ((closureN)self_7312702)->elements[0], (((closure)  ((closureN)self_7312702)->elements[0])->fn),  set_pair_as_expr(&local_7322675, r_736317_7311685_7311696, set_pair_as_expr(&local_7322678, ((closureN)self_7312702)->elements[2], set_pair_as_expr(&local_7322682, ((closureN)self_7312702)->elements[1], NULL))));; 
- }
- 
+-}
+-
 -static void __lambda_826(void *data, object self_7313730, int argc, object *args) /* object self_7313730, object r_736305 */
-+static void __lambda_1023(void *data, object self_7312703, int argc, object *args) /* object self_7312703, object r_736315_7311679_7311690 */
-  {
+- {
 - object r_736305 = args[0];
-+ object r_736315_7311679_7311690 = args[0];
-   
+-  
 -closureN_type c_7321880;
 -object e_7323858 [33];
 -c_7321880.hdr.mark = gc_color_red;
@@ -19469,12 +22454,25 @@ Make let-values be the same as let*-values, to work around
 -c_7321906.elements[47] = lits_733561;
 -c_7321906.elements[48] = next_91symbol_733563;
 -c_7321906.elements[49] = ((closureN)self_7313740)->elements[38];
--
--
+ 
++  
++closureN_type c_7322405;
++object e_7322418 [3];
++c_7322405.hdr.mark = gc_color_red;
++ c_7322405.hdr.grayed = 0;
++c_7322405.tag = closureN_tag;
++ c_7322405.fn = (function_type)__lambda_1009;
++c_7322405.num_args = 1;
++c_7322405.num_elements = 3;
++c_7322405.elements = (object *)e_7322418;
++c_7322405.elements[0] = ((closureN)self_7312508)->elements[1];
++c_7322405.elements[1] = ((closureN)self_7312508)->elements[2];
++c_7322405.elements[2] = ((closureN)self_7312508)->elements[3];
+ 
 -pair_type local_7323810; 
 -return_direct_with_clo1(data,(closure)&c_7321906,__lambda_1426,  set_cell_as_expr(&local_7323810, ellipsis_733560));; 
 -}
--
+ 
 -static void __lambda_1426(void *data, object self_7313741, int argc, object *args) /* object self_7313741, object ellipsis_733560 */
 - {
 - object ellipsis_733560 = args[0];
@@ -19538,16 +22536,20 @@ Make let-values be the same as let*-values, to work around
 -c_7321908.elements[47] = ((closureN)self_7313741)->elements[46];
 -c_7321908.elements[48] = ((closureN)self_7313741)->elements[48];
 -c_7321908.elements[49] = ((closureN)self_7313741)->elements[49];
--
--
+ 
+ 
 -pair_type local_7323805; 
 -return_direct_with_clo1(data,(closure)&c_7321908,__lambda_1425,  set_cell_as_expr(&local_7323805, ((closureN)self_7313741)->elements[47]));; 
--}
--
++object c_7322421 = Cyc_number2string2(data,(closure)&c_7322405,1,car(((closureN)self_7312508)->elements[0]));
++return_closcall1(data,(closure)&c_7322405,  c_7322421);; 
+ }
+ 
 -static void __lambda_1425(void *data, object self_7313742, int argc, object *args) /* object self_7313742, object lits_733561 */
-- {
++static void __lambda_1009(void *data, object self_7312509, int argc, object *args) /* object self_7312509, object r_736233 */
+  {
 - object lits_733561 = args[0];
--  
++ object r_736233 = args[0];
+   
 -closureN_type c_7321910;
 -object e_7323797 [50];
 -c_7321910.hdr.mark = gc_color_red;
@@ -19607,30 +22609,194 @@ Make let-values be the same as let*-values, to work around
 -c_7321910.elements[47] = lits_733561;
 -c_7321910.elements[48] = ((closureN)self_7313742)->elements[48];
 -c_7321910.elements[49] = ((closureN)self_7313742)->elements[49];
-+closureN_type c_7322644;
-+object e_7322663 [3];
-+c_7322644.hdr.mark = gc_color_red;
-+ c_7322644.hdr.grayed = 0;
-+c_7322644.tag = closureN_tag;
-+ c_7322644.fn = (function_type)__lambda_1024;
-+c_7322644.num_args = 1;
-+c_7322644.num_elements = 3;
-+c_7322644.elements = (object *)e_7322663;
-+c_7322644.elements[0] = ((closureN)self_7312703)->elements[0];
-+c_7322644.elements[1] = ((closureN)self_7312703)->elements[1];
-+c_7322644.elements[2] = ((closureN)self_7312703)->elements[2];
++closureN_type c_7322407;
++object e_7322413 [2];
++c_7322407.hdr.mark = gc_color_red;
++ c_7322407.hdr.grayed = 0;
++c_7322407.tag = closureN_tag;
++ c_7322407.fn = (function_type)__lambda_1010;
++c_7322407.num_args = 1;
++c_7322407.num_elements = 2;
++c_7322407.elements = (object *)e_7322413;
++c_7322407.elements[0] = ((closureN)self_7312509)->elements[0];
++c_7322407.elements[1] = ((closureN)self_7312509)->elements[1];
++
++
++object c_7322416 = Cyc_string_append(data,(closure)&c_7322407,2,((closureN)self_7312509)->elements[2], r_736233);
++return_closcall1(data,(closure)&c_7322407,  c_7322416);; 
++}
++
++static void __lambda_1010(void *data, object self_7312510, int argc, object *args) /* object self_7312510, object r_736232 */
++ {
++ object r_736232 = args[0];
++  
++
++return_closcall2(data,  ((closureN)self_7312510)->elements[1],  ((closureN)self_7312510)->elements[0], Cyc_string2symbol(data, r_736232));; 
++}
++
++static void __lambda_844(void *data, object self_7312511, int argc, object *args) /* object self_7312511, object r_736228 */
++ {
++ object r_736228 = args[0];
++  
++closureN_type c_7320678;
++object e_7322394 [48];
++c_7320678.hdr.mark = gc_color_red;
++ c_7320678.hdr.grayed = 0;
++c_7320678.tag = closureN_tag;
++ c_7320678.fn = (function_type)__lambda_845;
++c_7320678.num_args = 1;
++c_7320678.num_elements = 48;
++c_7320678.elements = (object *)e_7322394;
++c_7320678.elements[0] = ((closureN)self_7312511)->elements[0];
++c_7320678.elements[1] = ((closureN)self_7312511)->elements[1];
++c_7320678.elements[2] = ((closureN)self_7312511)->elements[2];
++c_7320678.elements[3] = ((closureN)self_7312511)->elements[3];
++c_7320678.elements[4] = ((closureN)self_7312511)->elements[4];
++c_7320678.elements[5] = ((closureN)self_7312511)->elements[5];
++c_7320678.elements[6] = ((closureN)self_7312511)->elements[6];
++c_7320678.elements[7] = ((closureN)self_7312511)->elements[7];
++c_7320678.elements[8] = ((closureN)self_7312511)->elements[8];
++c_7320678.elements[9] = ((closureN)self_7312511)->elements[9];
++c_7320678.elements[10] = ((closureN)self_7312511)->elements[10];
++c_7320678.elements[11] = ((closureN)self_7312511)->elements[11];
++c_7320678.elements[12] = ((closureN)self_7312511)->elements[12];
++c_7320678.elements[13] = ((closureN)self_7312511)->elements[13];
++c_7320678.elements[14] = ((closureN)self_7312511)->elements[14];
++c_7320678.elements[15] = ((closureN)self_7312511)->elements[15];
++c_7320678.elements[16] = ((closureN)self_7312511)->elements[16];
++c_7320678.elements[17] = ((closureN)self_7312511)->elements[17];
++c_7320678.elements[18] = ((closureN)self_7312511)->elements[18];
++c_7320678.elements[19] = ((closureN)self_7312511)->elements[19];
++c_7320678.elements[20] = ((closureN)self_7312511)->elements[20];
++c_7320678.elements[21] = ((closureN)self_7312511)->elements[21];
++c_7320678.elements[22] = ((closureN)self_7312511)->elements[22];
++c_7320678.elements[23] = ((closureN)self_7312511)->elements[23];
++c_7320678.elements[24] = ((closureN)self_7312511)->elements[24];
++c_7320678.elements[25] = ((closureN)self_7312511)->elements[25];
++c_7320678.elements[26] = ((closureN)self_7312511)->elements[26];
++c_7320678.elements[27] = ((closureN)self_7312511)->elements[27];
++c_7320678.elements[28] = ((closureN)self_7312511)->elements[28];
++c_7320678.elements[29] = ((closureN)self_7312511)->elements[29];
++c_7320678.elements[30] = ((closureN)self_7312511)->elements[30];
++c_7320678.elements[31] = ((closureN)self_7312511)->elements[31];
++c_7320678.elements[32] = ((closureN)self_7312511)->elements[32];
++c_7320678.elements[33] = ((closureN)self_7312511)->elements[33];
++c_7320678.elements[34] = ((closureN)self_7312511)->elements[34];
++c_7320678.elements[35] = ((closureN)self_7312511)->elements[35];
++c_7320678.elements[36] = ((closureN)self_7312511)->elements[36];
++c_7320678.elements[37] = ((closureN)self_7312511)->elements[37];
++c_7320678.elements[38] = ((closureN)self_7312511)->elements[38];
++c_7320678.elements[39] = ((closureN)self_7312511)->elements[39];
++c_7320678.elements[40] = ((closureN)self_7312511)->elements[40];
++c_7320678.elements[41] = ((closureN)self_7312511)->elements[41];
++c_7320678.elements[42] = ((closureN)self_7312511)->elements[42];
++c_7320678.elements[43] = ((closureN)self_7312511)->elements[43];
++c_7320678.elements[44] = ((closureN)self_7312511)->elements[44];
++c_7320678.elements[45] = ((closureN)self_7312511)->elements[45];
++c_7320678.elements[46] = ((closureN)self_7312511)->elements[46];
++c_7320678.elements[47] = ((closureN)self_7312511)->elements[47];
++
++
++
++return_direct_with_clo1(data,(closure)&c_7320678,__lambda_845,  Cyc_set_cell(data, ((closureN)self_7312511)->elements[47], r_736228));; 
++}
++
++static void __lambda_845(void *data, object self_7312512, int argc, object *args) /* object self_7312512, object r_735864 */
++ {
++
++  
++closureN_type c_7320680;
++object e_7321537 [29];
++c_7320680.hdr.mark = gc_color_red;
++ c_7320680.hdr.grayed = 0;
++c_7320680.tag = closureN_tag;
++ c_7320680.fn = (function_type)__lambda_846;
++c_7320680.num_args = 1;
++c_7320680.num_elements = 29;
++c_7320680.elements = (object *)e_7321537;
++c_7320680.elements[0] = ((closureN)self_7312512)->elements[3];
++c_7320680.elements[1] = ((closureN)self_7312512)->elements[4];
++c_7320680.elements[2] = ((closureN)self_7312512)->elements[5];
++c_7320680.elements[3] = ((closureN)self_7312512)->elements[7];
++c_7320680.elements[4] = ((closureN)self_7312512)->elements[8];
++c_7320680.elements[5] = ((closureN)self_7312512)->elements[9];
++c_7320680.elements[6] = ((closureN)self_7312512)->elements[11];
++c_7320680.elements[7] = ((closureN)self_7312512)->elements[12];
++c_7320680.elements[8] = ((closureN)self_7312512)->elements[13];
++c_7320680.elements[9] = ((closureN)self_7312512)->elements[16];
++c_7320680.elements[10] = ((closureN)self_7312512)->elements[20];
++c_7320680.elements[11] = ((closureN)self_7312512)->elements[23];
++c_7320680.elements[12] = ((closureN)self_7312512)->elements[25];
++c_7320680.elements[13] = ((closureN)self_7312512)->elements[27];
++c_7320680.elements[14] = ((closureN)self_7312512)->elements[28];
++c_7320680.elements[15] = ((closureN)self_7312512)->elements[33];
++c_7320680.elements[16] = ((closureN)self_7312512)->elements[34];
++c_7320680.elements[17] = ((closureN)self_7312512)->elements[35];
++c_7320680.elements[18] = ((closureN)self_7312512)->elements[36];
++c_7320680.elements[19] = ((closureN)self_7312512)->elements[37];
++c_7320680.elements[20] = ((closureN)self_7312512)->elements[38];
++c_7320680.elements[21] = ((closureN)self_7312512)->elements[39];
++c_7320680.elements[22] = ((closureN)self_7312512)->elements[40];
++c_7320680.elements[23] = ((closureN)self_7312512)->elements[41];
++c_7320680.elements[24] = ((closureN)self_7312512)->elements[42];
++c_7320680.elements[25] = ((closureN)self_7312512)->elements[43];
++c_7320680.elements[26] = ((closureN)self_7312512)->elements[44];
++c_7320680.elements[27] = ((closureN)self_7312512)->elements[45];
++c_7320680.elements[28] = ((closureN)self_7312512)->elements[46];
+ 
  
--
 -pair_type local_7323800; 
 -return_direct_with_clo1(data,(closure)&c_7321910,__lambda_1424,  set_cell_as_expr(&local_7323800, ((closureN)self_7313742)->elements[45]));; 
-+return_direct_with_clo4(data,  __glo_Cyc_91map_91loop_912_scheme_base, (((closure)  __glo_Cyc_91map_91loop_912_scheme_base)->fn),  &c_7322644, r_736315_7311679_7311690, ((closureN)self_7312703)->elements[4], ((closureN)self_7312703)->elements[3]);; 
++closureN_type c_7321538;
++object e_7322393 [32];
++c_7321538.hdr.mark = gc_color_red;
++ c_7321538.hdr.grayed = 0;
++c_7321538.tag = closureN_tag;
++ c_7321538.fn = (function_type)__lambda_944;
++c_7321538.num_args = 2;
++c_7321538.num_elements = 32;
++c_7321538.elements = (object *)e_7322393;
++c_7321538.elements[0] = ((closureN)self_7312512)->elements[0];
++c_7321538.elements[1] = ((closureN)self_7312512)->elements[1];
++c_7321538.elements[2] = ((closureN)self_7312512)->elements[2];
++c_7321538.elements[3] = ((closureN)self_7312512)->elements[5];
++c_7321538.elements[4] = ((closureN)self_7312512)->elements[6];
++c_7321538.elements[5] = ((closureN)self_7312512)->elements[7];
++c_7321538.elements[6] = ((closureN)self_7312512)->elements[8];
++c_7321538.elements[7] = ((closureN)self_7312512)->elements[9];
++c_7321538.elements[8] = ((closureN)self_7312512)->elements[10];
++c_7321538.elements[9] = ((closureN)self_7312512)->elements[13];
++c_7321538.elements[10] = ((closureN)self_7312512)->elements[14];
++c_7321538.elements[11] = ((closureN)self_7312512)->elements[15];
++c_7321538.elements[12] = ((closureN)self_7312512)->elements[17];
++c_7321538.elements[13] = ((closureN)self_7312512)->elements[18];
++c_7321538.elements[14] = ((closureN)self_7312512)->elements[19];
++c_7321538.elements[15] = ((closureN)self_7312512)->elements[21];
++c_7321538.elements[16] = ((closureN)self_7312512)->elements[22];
++c_7321538.elements[17] = ((closureN)self_7312512)->elements[24];
++c_7321538.elements[18] = ((closureN)self_7312512)->elements[26];
++c_7321538.elements[19] = ((closureN)self_7312512)->elements[27];
++c_7321538.elements[20] = ((closureN)self_7312512)->elements[28];
++c_7321538.elements[21] = ((closureN)self_7312512)->elements[29];
++c_7321538.elements[22] = ((closureN)self_7312512)->elements[30];
++c_7321538.elements[23] = ((closureN)self_7312512)->elements[31];
++c_7321538.elements[24] = ((closureN)self_7312512)->elements[32];
++c_7321538.elements[25] = ((closureN)self_7312512)->elements[33];
++c_7321538.elements[26] = ((closureN)self_7312512)->elements[34];
++c_7321538.elements[27] = ((closureN)self_7312512)->elements[35];
++c_7321538.elements[28] = ((closureN)self_7312512)->elements[39];
++c_7321538.elements[29] = ((closureN)self_7312512)->elements[41];
++c_7321538.elements[30] = ((closureN)self_7312512)->elements[46];
++c_7321538.elements[31] = ((closureN)self_7312512)->elements[47];
++
++return_direct_with_clo1(data,(closure)&c_7320680,__lambda_846,  &c_7321538);; 
  }
  
 -static void __lambda_1424(void *data, object self_7313743, int argc, object *args) /* object self_7313743, object forms_733562 */
-+static void __lambda_1024(void *data, object self_7312704, int argc, object *args) /* object self_7312704, object r_736314_7311680_7311691 */
++static void __lambda_944(void *data, object self_7312513, int argc, object *args) /* object self_7312513, object k_736013, object pat_731272_733226, object tmpl_731273_733227 */
   {
 - object forms_733562 = args[0];
-+ object r_736314_7311680_7311691 = args[0];
++ object k_736013 = args[0]; object pat_731272_733226 = args[1]; object tmpl_731273_733227 = args[2];
    
 -closureN_type c_7321912;
 -object e_7323792 [50];
@@ -19760,30 +22926,766 @@ Make let-values be the same as let*-values, to work around
 -c_7321914.elements[47] = ((closureN)self_7313744)->elements[48];
 -c_7321914.elements[48] = next_91symbol_733563;
 -c_7321914.elements[49] = ((closureN)self_7313744)->elements[49];
-+closureN_type c_7322646;
-+object e_7322659 [2];
-+c_7322646.hdr.mark = gc_color_red;
-+ c_7322646.hdr.grayed = 0;
-+c_7322646.tag = closureN_tag;
-+ c_7322646.fn = (function_type)__lambda_1025;
-+c_7322646.num_args = 1;
-+c_7322646.num_elements = 2;
-+c_7322646.elements = (object *)e_7322659;
-+c_7322646.elements[0] = ((closureN)self_7312704)->elements[0];
-+c_7322646.elements[1] = ((closureN)self_7312704)->elements[1];
- 
+-
++closureN_type c_7321540;
++object e_7322377 [33];
++c_7321540.hdr.mark = gc_color_red;
++ c_7321540.hdr.grayed = 0;
++c_7321540.tag = closureN_tag;
++ c_7321540.fn = (function_type)__lambda_945;
++c_7321540.num_args = 1;
++c_7321540.num_elements = 33;
++c_7321540.elements = (object *)e_7322377;
++c_7321540.elements[0] = ((closureN)self_7312513)->elements[0];
++c_7321540.elements[1] = ((closureN)self_7312513)->elements[1];
++c_7321540.elements[2] = ((closureN)self_7312513)->elements[2];
++c_7321540.elements[3] = ((closureN)self_7312513)->elements[3];
++c_7321540.elements[4] = ((closureN)self_7312513)->elements[4];
++c_7321540.elements[5] = ((closureN)self_7312513)->elements[5];
++c_7321540.elements[6] = ((closureN)self_7312513)->elements[6];
++c_7321540.elements[7] = ((closureN)self_7312513)->elements[7];
++c_7321540.elements[8] = ((closureN)self_7312513)->elements[8];
++c_7321540.elements[9] = ((closureN)self_7312513)->elements[9];
++c_7321540.elements[10] = ((closureN)self_7312513)->elements[10];
++c_7321540.elements[11] = ((closureN)self_7312513)->elements[11];
++c_7321540.elements[12] = ((closureN)self_7312513)->elements[12];
++c_7321540.elements[13] = ((closureN)self_7312513)->elements[13];
++c_7321540.elements[14] = ((closureN)self_7312513)->elements[14];
++c_7321540.elements[15] = ((closureN)self_7312513)->elements[15];
++c_7321540.elements[16] = ((closureN)self_7312513)->elements[16];
++c_7321540.elements[17] = ((closureN)self_7312513)->elements[17];
++c_7321540.elements[18] = ((closureN)self_7312513)->elements[18];
++c_7321540.elements[19] = ((closureN)self_7312513)->elements[19];
++c_7321540.elements[20] = ((closureN)self_7312513)->elements[20];
++c_7321540.elements[21] = ((closureN)self_7312513)->elements[21];
++c_7321540.elements[22] = ((closureN)self_7312513)->elements[22];
++c_7321540.elements[23] = ((closureN)self_7312513)->elements[23];
++c_7321540.elements[24] = ((closureN)self_7312513)->elements[24];
++c_7321540.elements[25] = ((closureN)self_7312513)->elements[25];
++c_7321540.elements[26] = ((closureN)self_7312513)->elements[26];
++c_7321540.elements[27] = ((closureN)self_7312513)->elements[27];
++c_7321540.elements[28] = ((closureN)self_7312513)->elements[28];
++c_7321540.elements[29] = k_736013;
++c_7321540.elements[30] = ((closureN)self_7312513)->elements[30];
++c_7321540.elements[31] = ((closureN)self_7312513)->elements[31];
++c_7321540.elements[32] = pat_731272_733226;
++
++
++closureN_type c_7322378;
++object e_7322392 [3];
++c_7322378.hdr.mark = gc_color_red;
++ c_7322378.hdr.grayed = 0;
++c_7322378.tag = closureN_tag;
++ c_7322378.fn = (function_type)__lambda_1004;
++c_7322378.num_args = 1;
++c_7322378.num_elements = 3;
++c_7322378.elements = (object *)e_7322392;
++c_7322378.elements[0] = ((closureN)self_7312513)->elements[6];
++c_7322378.elements[1] = ((closureN)self_7312513)->elements[29];
++c_7322378.elements[2] = tmpl_731273_733227;
++
++return_direct_with_clo1(data,(closure)&c_7321540,__lambda_945,  &c_7322378);; 
++}
++
++static void __lambda_1004(void *data, object self_7312514, int argc, object *args) /* object self_7312514, object k_736226, object vars_731352_733257 */
++ {
++ object k_736226 = args[0]; object vars_731352_733257 = args[1];
++  
++
++
++closureN_type c_7322383;
++object e_7322390 [2];
++c_7322383.hdr.mark = gc_color_red;
++ c_7322383.hdr.grayed = 0;
++c_7322383.tag = closureN_tag;
++ c_7322383.fn = (function_type)__lambda_1005;
++c_7322383.num_args = 1;
++c_7322383.num_elements = 2;
++c_7322383.elements = (object *)e_7322390;
++c_7322383.elements[0] = ((closureN)self_7312514)->elements[0];
++c_7322383.elements[1] = k_736226;
++
++return_closcall3(data,  car(((closureN)self_7312514)->elements[1]),  &c_7322383, ((closureN)self_7312514)->elements[2], vars_731352_733257);; 
++}
++
++static void __lambda_1005(void *data, object self_7312515, int argc, object *args) /* object self_7312515, object r_736227 */
++ {
++ object r_736227 = args[0];
++  
++list_3_type local_7322388; 
++return_direct_with_clo1(data,  ((closureN)self_7312515)->elements[1], (((closure)  ((closureN)self_7312515)->elements[1])->fn),  Cyc_fast_list_3(&local_7322388, ((closureN)self_7312515)->elements[0], r_736227, boolean_f));; 
++}
++
++static void __lambda_945(void *data, object self_7312516, int argc, object *args) /* object self_7312516, object r_736017 */
++ {
++ object r_736017 = args[0];
++  
++closureN_type c_7321542;
++object e_7322368 [31];
++c_7321542.hdr.mark = gc_color_red;
++ c_7321542.hdr.grayed = 0;
++c_7321542.tag = closureN_tag;
++ c_7321542.fn = (function_type)__lambda_946;
++c_7321542.num_args = 4;
++c_7321542.num_elements = 31;
++c_7321542.elements = (object *)e_7322368;
++c_7321542.elements[0] = ((closureN)self_7312516)->elements[0];
++c_7321542.elements[1] = ((closureN)self_7312516)->elements[1];
++c_7321542.elements[2] = ((closureN)self_7312516)->elements[2];
++c_7321542.elements[3] = ((closureN)self_7312516)->elements[3];
++c_7321542.elements[4] = ((closureN)self_7312516)->elements[4];
++c_7321542.elements[5] = ((closureN)self_7312516)->elements[5];
++c_7321542.elements[6] = ((closureN)self_7312516)->elements[6];
++c_7321542.elements[7] = ((closureN)self_7312516)->elements[7];
++c_7321542.elements[8] = ((closureN)self_7312516)->elements[8];
++c_7321542.elements[9] = ((closureN)self_7312516)->elements[10];
++c_7321542.elements[10] = ((closureN)self_7312516)->elements[11];
++c_7321542.elements[11] = ((closureN)self_7312516)->elements[12];
++c_7321542.elements[12] = ((closureN)self_7312516)->elements[13];
++c_7321542.elements[13] = ((closureN)self_7312516)->elements[14];
++c_7321542.elements[14] = ((closureN)self_7312516)->elements[15];
++c_7321542.elements[15] = ((closureN)self_7312516)->elements[16];
++c_7321542.elements[16] = ((closureN)self_7312516)->elements[17];
++c_7321542.elements[17] = ((closureN)self_7312516)->elements[18];
++c_7321542.elements[18] = ((closureN)self_7312516)->elements[19];
++c_7321542.elements[19] = ((closureN)self_7312516)->elements[20];
++c_7321542.elements[20] = ((closureN)self_7312516)->elements[21];
++c_7321542.elements[21] = ((closureN)self_7312516)->elements[22];
++c_7321542.elements[22] = ((closureN)self_7312516)->elements[23];
++c_7321542.elements[23] = ((closureN)self_7312516)->elements[24];
++c_7321542.elements[24] = ((closureN)self_7312516)->elements[25];
++c_7321542.elements[25] = ((closureN)self_7312516)->elements[26];
++c_7321542.elements[26] = ((closureN)self_7312516)->elements[27];
++c_7321542.elements[27] = ((closureN)self_7312516)->elements[28];
++c_7321542.elements[28] = ((closureN)self_7312516)->elements[29];
++c_7321542.elements[29] = ((closureN)self_7312516)->elements[30];
++c_7321542.elements[30] = ((closureN)self_7312516)->elements[31];
++
++
++
++
++list_2_type local_7322374; 
++return_direct_with_clo4(data,(closure)&c_7321542,__lambda_946,  Cyc_cdr(data, ((closureN)self_7312516)->elements[32]), Cyc_fast_list_2(&local_7322374, ((closureN)self_7312516)->elements[4], ((closureN)self_7312516)->elements[9]), NULL, r_736017);; 
++}
++
++static void __lambda_946(void *data, object self_7312517, int argc, object *args) /* object self_7312517, object p_731275_733228, object x_731276_733229, object vars_731278_733231, object k_731279_733232 */
++ {
++ object p_731275_733228 = args[0]; object x_731276_733229 = args[1]; object vars_731278_733231 = args[2]; object k_731279_733232 = args[3];
++  
++closureN_type c_7321544;
++object e_7322367 [35];
++c_7321544.hdr.mark = gc_color_red;
++ c_7321544.hdr.grayed = 0;
++c_7321544.tag = closureN_tag;
++ c_7321544.fn = (function_type)__lambda_947;
++c_7321544.num_args = 1;
++c_7321544.num_elements = 35;
++c_7321544.elements = (object *)e_7322367;
++c_7321544.elements[0] = ((closureN)self_7312517)->elements[0];
++c_7321544.elements[1] = ((closureN)self_7312517)->elements[1];
++c_7321544.elements[2] = ((closureN)self_7312517)->elements[2];
++c_7321544.elements[3] = ((closureN)self_7312517)->elements[3];
++c_7321544.elements[4] = ((closureN)self_7312517)->elements[4];
++c_7321544.elements[5] = ((closureN)self_7312517)->elements[5];
++c_7321544.elements[6] = ((closureN)self_7312517)->elements[6];
++c_7321544.elements[7] = ((closureN)self_7312517)->elements[7];
++c_7321544.elements[8] = ((closureN)self_7312517)->elements[8];
++c_7321544.elements[9] = ((closureN)self_7312517)->elements[9];
++c_7321544.elements[10] = ((closureN)self_7312517)->elements[10];
++c_7321544.elements[11] = ((closureN)self_7312517)->elements[11];
++c_7321544.elements[12] = ((closureN)self_7312517)->elements[12];
++c_7321544.elements[13] = ((closureN)self_7312517)->elements[13];
++c_7321544.elements[14] = ((closureN)self_7312517)->elements[14];
++c_7321544.elements[15] = ((closureN)self_7312517)->elements[15];
++c_7321544.elements[16] = ((closureN)self_7312517)->elements[16];
++c_7321544.elements[17] = ((closureN)self_7312517)->elements[17];
++c_7321544.elements[18] = ((closureN)self_7312517)->elements[18];
++c_7321544.elements[19] = ((closureN)self_7312517)->elements[19];
++c_7321544.elements[20] = ((closureN)self_7312517)->elements[20];
++c_7321544.elements[21] = ((closureN)self_7312517)->elements[21];
++c_7321544.elements[22] = ((closureN)self_7312517)->elements[22];
++c_7321544.elements[23] = ((closureN)self_7312517)->elements[23];
++c_7321544.elements[24] = ((closureN)self_7312517)->elements[24];
++c_7321544.elements[25] = ((closureN)self_7312517)->elements[25];
++c_7321544.elements[26] = ((closureN)self_7312517)->elements[26];
++c_7321544.elements[27] = ((closureN)self_7312517)->elements[27];
++c_7321544.elements[28] = k_731279_733232;
++c_7321544.elements[29] = ((closureN)self_7312517)->elements[28];
++c_7321544.elements[30] = ((closureN)self_7312517)->elements[29];
++c_7321544.elements[31] = ((closureN)self_7312517)->elements[30];
++c_7321544.elements[32] = p_731275_733228;
++c_7321544.elements[33] = vars_731278_733231;
++c_7321544.elements[34] = x_731276_733229;
++
++return_direct_with_clo1(data,(closure)&c_7321544,__lambda_947,  boolean_f);; 
++}
++
++static void __lambda_947(void *data, object self_7312518, int argc, object *args) /* object self_7312518, object lp_731280_733233 */
++ {
++ object lp_731280_733233 = args[0];
++  
++closureN_type c_7321546;
++object e_7322363 [35];
++c_7321546.hdr.mark = gc_color_red;
++ c_7321546.hdr.grayed = 0;
++c_7321546.tag = closureN_tag;
++ c_7321546.fn = (function_type)__lambda_1367;
++c_7321546.num_args = 1;
++c_7321546.num_elements = 35;
++c_7321546.elements = (object *)e_7322363;
++c_7321546.elements[0] = ((closureN)self_7312518)->elements[0];
++c_7321546.elements[1] = ((closureN)self_7312518)->elements[1];
++c_7321546.elements[2] = ((closureN)self_7312518)->elements[2];
++c_7321546.elements[3] = ((closureN)self_7312518)->elements[3];
++c_7321546.elements[4] = ((closureN)self_7312518)->elements[4];
++c_7321546.elements[5] = ((closureN)self_7312518)->elements[5];
++c_7321546.elements[6] = ((closureN)self_7312518)->elements[6];
++c_7321546.elements[7] = ((closureN)self_7312518)->elements[7];
++c_7321546.elements[8] = ((closureN)self_7312518)->elements[8];
++c_7321546.elements[9] = ((closureN)self_7312518)->elements[9];
++c_7321546.elements[10] = ((closureN)self_7312518)->elements[10];
++c_7321546.elements[11] = ((closureN)self_7312518)->elements[11];
++c_7321546.elements[12] = ((closureN)self_7312518)->elements[12];
++c_7321546.elements[13] = ((closureN)self_7312518)->elements[13];
++c_7321546.elements[14] = ((closureN)self_7312518)->elements[14];
++c_7321546.elements[15] = ((closureN)self_7312518)->elements[15];
++c_7321546.elements[16] = ((closureN)self_7312518)->elements[16];
++c_7321546.elements[17] = ((closureN)self_7312518)->elements[17];
++c_7321546.elements[18] = ((closureN)self_7312518)->elements[18];
++c_7321546.elements[19] = ((closureN)self_7312518)->elements[19];
++c_7321546.elements[20] = ((closureN)self_7312518)->elements[20];
++c_7321546.elements[21] = ((closureN)self_7312518)->elements[21];
++c_7321546.elements[22] = ((closureN)self_7312518)->elements[22];
++c_7321546.elements[23] = ((closureN)self_7312518)->elements[23];
++c_7321546.elements[24] = ((closureN)self_7312518)->elements[24];
++c_7321546.elements[25] = ((closureN)self_7312518)->elements[25];
++c_7321546.elements[26] = ((closureN)self_7312518)->elements[26];
++c_7321546.elements[27] = ((closureN)self_7312518)->elements[27];
++c_7321546.elements[28] = ((closureN)self_7312518)->elements[28];
++c_7321546.elements[29] = ((closureN)self_7312518)->elements[29];
++c_7321546.elements[30] = ((closureN)self_7312518)->elements[30];
++c_7321546.elements[31] = ((closureN)self_7312518)->elements[31];
++c_7321546.elements[32] = ((closureN)self_7312518)->elements[32];
++c_7321546.elements[33] = ((closureN)self_7312518)->elements[33];
++c_7321546.elements[34] = ((closureN)self_7312518)->elements[34];
++
++
++pair_type local_7322366; 
++return_direct_with_clo1(data,(closure)&c_7321546,__lambda_1367,  set_cell_as_expr(&local_7322366, lp_731280_733233));; 
++}
++
++static void __lambda_1367(void *data, object self_7312519, int argc, object *args) /* object self_7312519, object lp_731280_733233 */
++ {
++ object lp_731280_733233 = args[0];
++  
++closureN_type c_7321548;
++object e_7321564 [6];
++c_7321548.hdr.mark = gc_color_red;
++ c_7321548.hdr.grayed = 0;
++c_7321548.tag = closureN_tag;
++ c_7321548.fn = (function_type)__lambda_948;
++c_7321548.num_args = 1;
++c_7321548.num_elements = 6;
++c_7321548.elements = (object *)e_7321564;
++c_7321548.elements[0] = ((closureN)self_7312519)->elements[28];
++c_7321548.elements[1] = ((closureN)self_7312519)->elements[29];
++c_7321548.elements[2] = lp_731280_733233;
++c_7321548.elements[3] = ((closureN)self_7312519)->elements[32];
++c_7321548.elements[4] = ((closureN)self_7312519)->elements[33];
++c_7321548.elements[5] = ((closureN)self_7312519)->elements[34];
++
++
++closureN_type c_7321565;
++object e_7322362 [31];
++c_7321565.hdr.mark = gc_color_red;
++ c_7321565.hdr.grayed = 0;
++c_7321565.tag = closureN_tag;
++ c_7321565.fn = (function_type)__lambda_950;
++c_7321565.num_args = 5;
++c_7321565.num_elements = 31;
++c_7321565.elements = (object *)e_7322362;
++c_7321565.elements[0] = ((closureN)self_7312519)->elements[0];
++c_7321565.elements[1] = ((closureN)self_7312519)->elements[1];
++c_7321565.elements[2] = ((closureN)self_7312519)->elements[2];
++c_7321565.elements[3] = ((closureN)self_7312519)->elements[3];
++c_7321565.elements[4] = ((closureN)self_7312519)->elements[4];
++c_7321565.elements[5] = ((closureN)self_7312519)->elements[5];
++c_7321565.elements[6] = ((closureN)self_7312519)->elements[6];
++c_7321565.elements[7] = ((closureN)self_7312519)->elements[7];
++c_7321565.elements[8] = ((closureN)self_7312519)->elements[8];
++c_7321565.elements[9] = ((closureN)self_7312519)->elements[9];
++c_7321565.elements[10] = ((closureN)self_7312519)->elements[10];
++c_7321565.elements[11] = ((closureN)self_7312519)->elements[11];
++c_7321565.elements[12] = ((closureN)self_7312519)->elements[12];
++c_7321565.elements[13] = ((closureN)self_7312519)->elements[13];
++c_7321565.elements[14] = ((closureN)self_7312519)->elements[14];
++c_7321565.elements[15] = ((closureN)self_7312519)->elements[15];
++c_7321565.elements[16] = ((closureN)self_7312519)->elements[16];
++c_7321565.elements[17] = ((closureN)self_7312519)->elements[17];
++c_7321565.elements[18] = ((closureN)self_7312519)->elements[18];
++c_7321565.elements[19] = ((closureN)self_7312519)->elements[19];
++c_7321565.elements[20] = ((closureN)self_7312519)->elements[20];
++c_7321565.elements[21] = ((closureN)self_7312519)->elements[21];
++c_7321565.elements[22] = ((closureN)self_7312519)->elements[22];
++c_7321565.elements[23] = ((closureN)self_7312519)->elements[23];
++c_7321565.elements[24] = ((closureN)self_7312519)->elements[24];
++c_7321565.elements[25] = ((closureN)self_7312519)->elements[25];
++c_7321565.elements[26] = ((closureN)self_7312519)->elements[26];
++c_7321565.elements[27] = ((closureN)self_7312519)->elements[27];
++c_7321565.elements[28] = ((closureN)self_7312519)->elements[30];
++c_7321565.elements[29] = lp_731280_733233;
++c_7321565.elements[30] = ((closureN)self_7312519)->elements[31];
++
++return_direct_with_clo1(data,(closure)&c_7321548,__lambda_948,  &c_7321565);; 
++}
++
++static void __lambda_950(void *data, object self_7312520, int argc, object *args) /* object self_7312520, object k_736020, object p_731281_733234, object x_731282_733235, object dim_731283_733236, object vars_731284_733237, object k_731285_733238 */
++ {
++ object k_736020 = args[0]; object p_731281_733234 = args[1]; object x_731282_733235 = args[2]; object dim_731283_733236 = args[3]; object vars_731284_733237 = args[4]; object k_731285_733238 = args[5];
++  
++
++
++closureN_type c_7321570;
++object e_7322360 [37];
++c_7321570.hdr.mark = gc_color_red;
++ c_7321570.hdr.grayed = 0;
++c_7321570.tag = closureN_tag;
++ c_7321570.fn = (function_type)__lambda_951;
++c_7321570.num_args = 1;
++c_7321570.num_elements = 37;
++c_7321570.elements = (object *)e_7322360;
++c_7321570.elements[0] = ((closureN)self_7312520)->elements[0];
++c_7321570.elements[1] = ((closureN)self_7312520)->elements[1];
++c_7321570.elements[2] = ((closureN)self_7312520)->elements[2];
++c_7321570.elements[3] = ((closureN)self_7312520)->elements[3];
++c_7321570.elements[4] = ((closureN)self_7312520)->elements[4];
++c_7321570.elements[5] = ((closureN)self_7312520)->elements[5];
++c_7321570.elements[6] = ((closureN)self_7312520)->elements[6];
++c_7321570.elements[7] = ((closureN)self_7312520)->elements[7];
++c_7321570.elements[8] = ((closureN)self_7312520)->elements[8];
++c_7321570.elements[9] = ((closureN)self_7312520)->elements[9];
++c_7321570.elements[10] = ((closureN)self_7312520)->elements[10];
++c_7321570.elements[11] = ((closureN)self_7312520)->elements[11];
++c_7321570.elements[12] = ((closureN)self_7312520)->elements[12];
++c_7321570.elements[13] = ((closureN)self_7312520)->elements[13];
++c_7321570.elements[14] = ((closureN)self_7312520)->elements[14];
++c_7321570.elements[15] = ((closureN)self_7312520)->elements[15];
++c_7321570.elements[16] = ((closureN)self_7312520)->elements[16];
++c_7321570.elements[17] = ((closureN)self_7312520)->elements[17];
++c_7321570.elements[18] = ((closureN)self_7312520)->elements[18];
++c_7321570.elements[19] = ((closureN)self_7312520)->elements[19];
++c_7321570.elements[20] = ((closureN)self_7312520)->elements[20];
++c_7321570.elements[21] = ((closureN)self_7312520)->elements[21];
++c_7321570.elements[22] = ((closureN)self_7312520)->elements[22];
++c_7321570.elements[23] = ((closureN)self_7312520)->elements[23];
++c_7321570.elements[24] = ((closureN)self_7312520)->elements[24];
++c_7321570.elements[25] = ((closureN)self_7312520)->elements[25];
++c_7321570.elements[26] = dim_731283_733236;
++c_7321570.elements[27] = ((closureN)self_7312520)->elements[26];
++c_7321570.elements[28] = ((closureN)self_7312520)->elements[27];
++c_7321570.elements[29] = k_731285_733238;
++c_7321570.elements[30] = k_736020;
++c_7321570.elements[31] = ((closureN)self_7312520)->elements[28];
++c_7321570.elements[32] = ((closureN)self_7312520)->elements[29];
++c_7321570.elements[33] = ((closureN)self_7312520)->elements[30];
++c_7321570.elements[34] = p_731281_733234;
++c_7321570.elements[35] = vars_731284_733237;
++c_7321570.elements[36] = x_731282_733235;
++
++
++make_utf8_string_with_len(c_7322361, "v.", 2, 2);
++return_closcall2(data,  car(((closureN)self_7312520)->elements[30]),  &c_7321570, &c_7322361);; 
++}
++
++static void __lambda_951(void *data, object self_7312521, int argc, object *args) /* object self_7312521, object v_731286_733239 */
++ {
++ object v_731286_733239 = args[0];
++  
++closureN_type c_7321572;
++object e_7322343 [36];
++c_7321572.hdr.mark = gc_color_red;
++ c_7321572.hdr.grayed = 0;
++c_7321572.tag = closureN_tag;
++ c_7321572.fn = (function_type)__lambda_952;
++c_7321572.num_args = 0;
++c_7321572.num_elements = 36;
++c_7321572.elements = (object *)e_7322343;
++c_7321572.elements[0] = ((closureN)self_7312521)->elements[0];
++c_7321572.elements[1] = ((closureN)self_7312521)->elements[1];
++c_7321572.elements[2] = ((closureN)self_7312521)->elements[2];
++c_7321572.elements[3] = ((closureN)self_7312521)->elements[3];
++c_7321572.elements[4] = ((closureN)self_7312521)->elements[4];
++c_7321572.elements[5] = ((closureN)self_7312521)->elements[5];
++c_7321572.elements[6] = ((closureN)self_7312521)->elements[6];
++c_7321572.elements[7] = ((closureN)self_7312521)->elements[7];
++c_7321572.elements[8] = ((closureN)self_7312521)->elements[8];
++c_7321572.elements[9] = ((closureN)self_7312521)->elements[9];
++c_7321572.elements[10] = ((closureN)self_7312521)->elements[10];
++c_7321572.elements[11] = ((closureN)self_7312521)->elements[11];
++c_7321572.elements[12] = ((closureN)self_7312521)->elements[12];
++c_7321572.elements[13] = ((closureN)self_7312521)->elements[13];
++c_7321572.elements[14] = ((closureN)self_7312521)->elements[14];
++c_7321572.elements[15] = ((closureN)self_7312521)->elements[15];
++c_7321572.elements[16] = ((closureN)self_7312521)->elements[16];
++c_7321572.elements[17] = ((closureN)self_7312521)->elements[17];
++c_7321572.elements[18] = ((closureN)self_7312521)->elements[18];
++c_7321572.elements[19] = ((closureN)self_7312521)->elements[19];
++c_7321572.elements[20] = ((closureN)self_7312521)->elements[20];
++c_7321572.elements[21] = ((closureN)self_7312521)->elements[21];
++c_7321572.elements[22] = ((closureN)self_7312521)->elements[22];
++c_7321572.elements[23] = ((closureN)self_7312521)->elements[23];
++c_7321572.elements[24] = ((closureN)self_7312521)->elements[24];
++c_7321572.elements[25] = ((closureN)self_7312521)->elements[25];
++c_7321572.elements[26] = ((closureN)self_7312521)->elements[26];
++c_7321572.elements[27] = ((closureN)self_7312521)->elements[27];
++c_7321572.elements[28] = ((closureN)self_7312521)->elements[28];
++c_7321572.elements[29] = ((closureN)self_7312521)->elements[29];
++c_7321572.elements[30] = ((closureN)self_7312521)->elements[31];
++c_7321572.elements[31] = ((closureN)self_7312521)->elements[32];
++c_7321572.elements[32] = ((closureN)self_7312521)->elements[33];
++c_7321572.elements[33] = ((closureN)self_7312521)->elements[34];
++c_7321572.elements[34] = v_731286_733239;
++c_7321572.elements[35] = ((closureN)self_7312521)->elements[35];
++
++
++closureN_type c_7322344;
++object e_7322359 [4];
++c_7322344.hdr.mark = gc_color_red;
++ c_7322344.hdr.grayed = 0;
++c_7322344.tag = closureN_tag;
++ c_7322344.fn = (function_type)__lambda_1003;
++c_7322344.num_args = 1;
++c_7322344.num_elements = 4;
++c_7322344.elements = (object *)e_7322359;
++c_7322344.elements[0] = ((closureN)self_7312521)->elements[13];
++c_7322344.elements[1] = ((closureN)self_7312521)->elements[30];
++c_7322344.elements[2] = v_731286_733239;
++c_7322344.elements[3] = ((closureN)self_7312521)->elements[36];
++
++return_direct_with_clo1(data,(closure)&c_7321572,__lambda_952,  &c_7322344);; 
++}
++
++static void __lambda_1003(void *data, object self_7312522, int argc, object *args) /* object self_7312522, object r_736023 */
++ {
++ object r_736023 = args[0];
++  
++list_3_type local_7322349; 
++
++pair_type local_7322353; 
++
++list_2_type local_7322356; 
++return_direct_with_clo1(data,  ((closureN)self_7312522)->elements[1], (((closure)  ((closureN)self_7312522)->elements[1])->fn),  Cyc_fast_list_3(&local_7322349, ((closureN)self_7312522)->elements[0], set_cell_as_expr(&local_7322353, Cyc_fast_list_2(&local_7322356, ((closureN)self_7312522)->elements[2], ((closureN)self_7312522)->elements[3])), r_736023));; 
++}
++
++static void __lambda_952(void *data, object self_7312523, int argc, object *args) /* object self_7312523, object k_736024 */
++ {
++ object k_736024 = args[0];
++  
++closureN_type c_7321574;
++object e_7322341 [37];
++c_7321574.hdr.mark = gc_color_red;
++ c_7321574.hdr.grayed = 0;
++c_7321574.tag = closureN_tag;
++ c_7321574.fn = (function_type)__lambda_953;
++c_7321574.num_args = 1;
++c_7321574.num_elements = 37;
++c_7321574.elements = (object *)e_7322341;
++c_7321574.elements[0] = ((closureN)self_7312523)->elements[0];
++c_7321574.elements[1] = ((closureN)self_7312523)->elements[1];
++c_7321574.elements[2] = ((closureN)self_7312523)->elements[2];
++c_7321574.elements[3] = ((closureN)self_7312523)->elements[3];
++c_7321574.elements[4] = ((closureN)self_7312523)->elements[4];
++c_7321574.elements[5] = ((closureN)self_7312523)->elements[5];
++c_7321574.elements[6] = ((closureN)self_7312523)->elements[6];
++c_7321574.elements[7] = ((closureN)self_7312523)->elements[7];
++c_7321574.elements[8] = ((closureN)self_7312523)->elements[8];
++c_7321574.elements[9] = ((closureN)self_7312523)->elements[9];
++c_7321574.elements[10] = ((closureN)self_7312523)->elements[10];
++c_7321574.elements[11] = ((closureN)self_7312523)->elements[11];
++c_7321574.elements[12] = ((closureN)self_7312523)->elements[12];
++c_7321574.elements[13] = ((closureN)self_7312523)->elements[13];
++c_7321574.elements[14] = ((closureN)self_7312523)->elements[14];
++c_7321574.elements[15] = ((closureN)self_7312523)->elements[15];
++c_7321574.elements[16] = ((closureN)self_7312523)->elements[16];
++c_7321574.elements[17] = ((closureN)self_7312523)->elements[17];
++c_7321574.elements[18] = ((closureN)self_7312523)->elements[18];
++c_7321574.elements[19] = ((closureN)self_7312523)->elements[19];
++c_7321574.elements[20] = ((closureN)self_7312523)->elements[20];
++c_7321574.elements[21] = ((closureN)self_7312523)->elements[21];
++c_7321574.elements[22] = ((closureN)self_7312523)->elements[22];
++c_7321574.elements[23] = ((closureN)self_7312523)->elements[23];
++c_7321574.elements[24] = ((closureN)self_7312523)->elements[24];
++c_7321574.elements[25] = ((closureN)self_7312523)->elements[25];
++c_7321574.elements[26] = ((closureN)self_7312523)->elements[26];
++c_7321574.elements[27] = ((closureN)self_7312523)->elements[27];
++c_7321574.elements[28] = ((closureN)self_7312523)->elements[28];
++c_7321574.elements[29] = ((closureN)self_7312523)->elements[29];
++c_7321574.elements[30] = k_736024;
++c_7321574.elements[31] = ((closureN)self_7312523)->elements[30];
++c_7321574.elements[32] = ((closureN)self_7312523)->elements[31];
++c_7321574.elements[33] = ((closureN)self_7312523)->elements[32];
++c_7321574.elements[34] = ((closureN)self_7312523)->elements[33];
++c_7321574.elements[35] = ((closureN)self_7312523)->elements[34];
++c_7321574.elements[36] = ((closureN)self_7312523)->elements[35];
++
++return_direct_with_clo2(data,  __glo_identifier_127_scheme_base, (((closure)  __glo_identifier_127_scheme_base)->fn),  &c_7321574, ((closureN)self_7312523)->elements[33]);; 
++}
++
++static void __lambda_953(void *data, object self_7312524, int argc, object *args) /* object self_7312524, object r_736025 */
++ {
++ object r_736025 = args[0];
++  if( (boolean_f != r_736025) ){ 
++  
++closureN_type c_7321576;
++object e_7321639 [12];
++c_7321576.hdr.mark = gc_color_red;
++ c_7321576.hdr.grayed = 0;
++c_7321576.tag = closureN_tag;
++ c_7321576.fn = (function_type)__lambda_954;
++c_7321576.num_args = 1;
++c_7321576.num_elements = 12;
++c_7321576.elements = (object *)e_7321639;
++c_7321576.elements[0] = ((closureN)self_7312524)->elements[2];
++c_7321576.elements[1] = ((closureN)self_7312524)->elements[5];
++c_7321576.elements[2] = ((closureN)self_7312524)->elements[13];
++c_7321576.elements[3] = ((closureN)self_7312524)->elements[18];
++c_7321576.elements[4] = ((closureN)self_7312524)->elements[19];
++c_7321576.elements[5] = ((closureN)self_7312524)->elements[26];
++c_7321576.elements[6] = ((closureN)self_7312524)->elements[29];
++c_7321576.elements[7] = ((closureN)self_7312524)->elements[30];
++c_7321576.elements[8] = ((closureN)self_7312524)->elements[31];
++c_7321576.elements[9] = ((closureN)self_7312524)->elements[34];
++c_7321576.elements[10] = ((closureN)self_7312524)->elements[35];
++c_7321576.elements[11] = ((closureN)self_7312524)->elements[36];
++
++
++closureN_type c_7321640;
++object e_7321644 [2];
++c_7321640.hdr.mark = gc_color_red;
++ c_7321640.hdr.grayed = 0;
++c_7321640.tag = closureN_tag;
++ c_7321640.fn = (function_type)__lambda_959;
++c_7321640.num_args = 1;
++c_7321640.num_elements = 2;
++c_7321640.elements = (object *)e_7321644;
++c_7321640.elements[0] = ((closureN)self_7312524)->elements[25];
++c_7321640.elements[1] = ((closureN)self_7312524)->elements[34];
++
++return_direct_with_clo1(data,(closure)&c_7321576,__lambda_954,  &c_7321640);
++} else { 
++  
++
++
++closureN_type c_7321649;
++object e_7322339 [33];
++c_7321649.hdr.mark = gc_color_red;
++ c_7321649.hdr.grayed = 0;
++c_7321649.tag = closureN_tag;
++ c_7321649.fn = (function_type)__lambda_960;
++c_7321649.num_args = 1;
++c_7321649.num_elements = 33;
++c_7321649.elements = (object *)e_7322339;
++c_7321649.elements[0] = ((closureN)self_7312524)->elements[0];
++c_7321649.elements[1] = ((closureN)self_7312524)->elements[1];
++c_7321649.elements[2] = ((closureN)self_7312524)->elements[2];
++c_7321649.elements[3] = ((closureN)self_7312524)->elements[3];
++c_7321649.elements[4] = ((closureN)self_7312524)->elements[4];
++c_7321649.elements[5] = ((closureN)self_7312524)->elements[6];
++c_7321649.elements[6] = ((closureN)self_7312524)->elements[7];
++c_7321649.elements[7] = ((closureN)self_7312524)->elements[8];
++c_7321649.elements[8] = ((closureN)self_7312524)->elements[9];
++c_7321649.elements[9] = ((closureN)self_7312524)->elements[10];
++c_7321649.elements[10] = ((closureN)self_7312524)->elements[11];
++c_7321649.elements[11] = ((closureN)self_7312524)->elements[12];
++c_7321649.elements[12] = ((closureN)self_7312524)->elements[13];
++c_7321649.elements[13] = ((closureN)self_7312524)->elements[14];
++c_7321649.elements[14] = ((closureN)self_7312524)->elements[15];
++c_7321649.elements[15] = ((closureN)self_7312524)->elements[16];
++c_7321649.elements[16] = ((closureN)self_7312524)->elements[17];
++c_7321649.elements[17] = ((closureN)self_7312524)->elements[18];
++c_7321649.elements[18] = ((closureN)self_7312524)->elements[20];
++c_7321649.elements[19] = ((closureN)self_7312524)->elements[21];
++c_7321649.elements[20] = ((closureN)self_7312524)->elements[22];
++c_7321649.elements[21] = ((closureN)self_7312524)->elements[23];
++c_7321649.elements[22] = ((closureN)self_7312524)->elements[24];
++c_7321649.elements[23] = ((closureN)self_7312524)->elements[25];
++c_7321649.elements[24] = ((closureN)self_7312524)->elements[26];
++c_7321649.elements[25] = ((closureN)self_7312524)->elements[27];
++c_7321649.elements[26] = ((closureN)self_7312524)->elements[29];
++c_7321649.elements[27] = ((closureN)self_7312524)->elements[30];
++c_7321649.elements[28] = ((closureN)self_7312524)->elements[32];
++c_7321649.elements[29] = ((closureN)self_7312524)->elements[33];
++c_7321649.elements[30] = ((closureN)self_7312524)->elements[34];
++c_7321649.elements[31] = ((closureN)self_7312524)->elements[35];
++c_7321649.elements[32] = ((closureN)self_7312524)->elements[36];
++
++return_closcall2(data,  car(((closureN)self_7312524)->elements[28]),  &c_7321649, ((closureN)self_7312524)->elements[34]);}
++;; 
++}
++
++static void __lambda_960(void *data, object self_7312531, int argc, object *args) /* object self_7312531, object r_736038 */
++ {
++ object r_736038 = args[0];
++  if( (boolean_f != r_736038) ){ 
++  
++closureN_type c_7321651;
++object e_7322218 [30];
++c_7321651.hdr.mark = gc_color_red;
++ c_7321651.hdr.grayed = 0;
++c_7321651.tag = closureN_tag;
++ c_7321651.fn = (function_type)__lambda_961;
++c_7321651.num_args = 1;
++c_7321651.num_elements = 30;
++c_7321651.elements = (object *)e_7322218;
++c_7321651.elements[0] = ((closureN)self_7312531)->elements[0];
++c_7321651.elements[1] = ((closureN)self_7312531)->elements[1];
++c_7321651.elements[2] = ((closureN)self_7312531)->elements[2];
++c_7321651.elements[3] = ((closureN)self_7312531)->elements[3];
++c_7321651.elements[4] = ((closureN)self_7312531)->elements[4];
++c_7321651.elements[5] = ((closureN)self_7312531)->elements[5];
++c_7321651.elements[6] = ((closureN)self_7312531)->elements[6];
++c_7321651.elements[7] = ((closureN)self_7312531)->elements[8];
++c_7321651.elements[8] = ((closureN)self_7312531)->elements[9];
++c_7321651.elements[9] = ((closureN)self_7312531)->elements[10];
++c_7321651.elements[10] = ((closureN)self_7312531)->elements[11];
++c_7321651.elements[11] = ((closureN)self_7312531)->elements[12];
++c_7321651.elements[12] = ((closureN)self_7312531)->elements[13];
++c_7321651.elements[13] = ((closureN)self_7312531)->elements[14];
++c_7321651.elements[14] = ((closureN)self_7312531)->elements[15];
++c_7321651.elements[15] = ((closureN)self_7312531)->elements[16];
++c_7321651.elements[16] = ((closureN)self_7312531)->elements[17];
++c_7321651.elements[17] = ((closureN)self_7312531)->elements[18];
++c_7321651.elements[18] = ((closureN)self_7312531)->elements[19];
++c_7321651.elements[19] = ((closureN)self_7312531)->elements[22];
++c_7321651.elements[20] = ((closureN)self_7312531)->elements[23];
++c_7321651.elements[21] = ((closureN)self_7312531)->elements[24];
++c_7321651.elements[22] = ((closureN)self_7312531)->elements[25];
++c_7321651.elements[23] = ((closureN)self_7312531)->elements[26];
++c_7321651.elements[24] = ((closureN)self_7312531)->elements[27];
++c_7321651.elements[25] = ((closureN)self_7312531)->elements[28];
++c_7321651.elements[26] = ((closureN)self_7312531)->elements[29];
++c_7321651.elements[27] = ((closureN)self_7312531)->elements[30];
++c_7321651.elements[28] = ((closureN)self_7312531)->elements[31];
++c_7321651.elements[29] = ((closureN)self_7312531)->elements[32];
++
++
++
++return_direct_with_clo1(data,(closure)&c_7321651,__lambda_961,  Cyc_cdr(data, ((closureN)self_7312531)->elements[30]));
++} else { 
++    
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312531)->elements[30])) ){ 
++  
++closureN_type c_7322226;
++object e_7322254 [9];
++c_7322226.hdr.mark = gc_color_red;
++ c_7322226.hdr.grayed = 0;
++c_7322226.tag = closureN_tag;
++ c_7322226.fn = (function_type)__lambda_996;
++c_7322226.num_args = 1;
++c_7322226.num_elements = 9;
++c_7322226.elements = (object *)e_7322254;
++c_7322226.elements[0] = ((closureN)self_7312531)->elements[2];
++c_7322226.elements[1] = ((closureN)self_7312531)->elements[3];
++c_7322226.elements[2] = ((closureN)self_7312531)->elements[16];
++c_7322226.elements[3] = ((closureN)self_7312531)->elements[24];
++c_7322226.elements[4] = ((closureN)self_7312531)->elements[27];
++c_7322226.elements[5] = ((closureN)self_7312531)->elements[28];
++c_7322226.elements[6] = ((closureN)self_7312531)->elements[30];
++c_7322226.elements[7] = ((closureN)self_7312531)->elements[31];
++c_7322226.elements[8] = ((closureN)self_7312531)->elements[32];
++
++
++closureN_type c_7322255;
++object e_7322270 [6];
++c_7322255.hdr.mark = gc_color_red;
++ c_7322255.hdr.grayed = 0;
++c_7322255.tag = closureN_tag;
++ c_7322255.fn = (function_type)__lambda_998;
++c_7322255.num_args = 1;
++c_7322255.num_elements = 6;
++c_7322255.elements = (object *)e_7322270;
++c_7322255.elements[0] = ((closureN)self_7312531)->elements[4];
++c_7322255.elements[1] = ((closureN)self_7312531)->elements[24];
++c_7322255.elements[2] = ((closureN)self_7312531)->elements[26];
++c_7322255.elements[3] = ((closureN)self_7312531)->elements[28];
++c_7322255.elements[4] = ((closureN)self_7312531)->elements[30];
++c_7322255.elements[5] = ((closureN)self_7312531)->elements[31];
++
++return_direct_with_clo1(data,(closure)&c_7322226,__lambda_996,  &c_7322255);
++} else { 
++    
++if( (boolean_f != Cyc_is_vector_not_record_type(((closureN)self_7312531)->elements[30])) ){ 
++  
++closureN_type c_7322275;
++object e_7322301 [9];
++c_7322275.hdr.mark = gc_color_red;
++ c_7322275.hdr.grayed = 0;
++c_7322275.tag = closureN_tag;
++ c_7322275.fn = (function_type)__lambda_999;
++c_7322275.num_args = 1;
++c_7322275.num_elements = 9;
++c_7322275.elements = (object *)e_7322301;
++c_7322275.elements[0] = ((closureN)self_7312531)->elements[2];
++c_7322275.elements[1] = ((closureN)self_7312531)->elements[20];
++c_7322275.elements[2] = ((closureN)self_7312531)->elements[21];
++c_7322275.elements[3] = ((closureN)self_7312531)->elements[24];
++c_7322275.elements[4] = ((closureN)self_7312531)->elements[26];
++c_7322275.elements[5] = ((closureN)self_7312531)->elements[27];
++c_7322275.elements[6] = ((closureN)self_7312531)->elements[28];
++c_7322275.elements[7] = ((closureN)self_7312531)->elements[31];
++c_7322275.elements[8] = ((closureN)self_7312531)->elements[32];
++
++return_direct_with_clo2(data,  __glo_vector_91_125list_scheme_base, (((closure)  __glo_vector_91_125list_scheme_base)->fn),  &c_7322275, ((closureN)self_7312531)->elements[30]);
++} else { 
++    
++if( (boolean_f != Cyc_is_null(((closureN)self_7312531)->elements[30])) ){ 
++  
++closureN_type c_7322308;
++object e_7322320 [4];
++c_7322308.hdr.mark = gc_color_red;
++ c_7322308.hdr.grayed = 0;
++c_7322308.tag = closureN_tag;
++ c_7322308.fn = (function_type)__lambda_1001;
++c_7322308.num_args = 1;
++c_7322308.num_elements = 4;
++c_7322308.elements = (object *)e_7322320;
++c_7322308.elements[0] = ((closureN)self_7312531)->elements[2];
++c_7322308.elements[1] = ((closureN)self_7312531)->elements[15];
++c_7322308.elements[2] = ((closureN)self_7312531)->elements[27];
++c_7322308.elements[3] = ((closureN)self_7312531)->elements[31];
++
++return_closcall2(data,  ((closureN)self_7312531)->elements[26],  &c_7322308, ((closureN)self_7312531)->elements[32]);
++} else { 
++  
++closureN_type c_7322324;
++object e_7322337 [5];
++c_7322324.hdr.mark = gc_color_red;
++ c_7322324.hdr.grayed = 0;
++c_7322324.tag = closureN_tag;
++ c_7322324.fn = (function_type)__lambda_1002;
++c_7322324.num_args = 1;
++c_7322324.num_elements = 5;
++c_7322324.elements = (object *)e_7322337;
++c_7322324.elements[0] = ((closureN)self_7312531)->elements[2];
++c_7322324.elements[1] = ((closureN)self_7312531)->elements[7];
++c_7322324.elements[2] = ((closureN)self_7312531)->elements[27];
++c_7322324.elements[3] = ((closureN)self_7312531)->elements[30];
++c_7322324.elements[4] = ((closureN)self_7312531)->elements[31];
  
 -pair_type local_7323790; 
 -return_direct_with_clo1(data,(closure)&c_7321914,__lambda_1422,  set_cell_as_expr(&local_7323790, ((closureN)self_7313744)->elements[42]));; 
-+
-+return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7322646, r_736314_7311680_7311691, Cyc_cdr(data, ((closureN)self_7312704)->elements[2]));; 
++return_closcall2(data,  ((closureN)self_7312531)->elements[26],  &c_7322324, ((closureN)self_7312531)->elements[32]);}
++;}
++;}
++;}
++;; 
  }
  
 -static void __lambda_1422(void *data, object self_7313745, int argc, object *args) /* object self_7313745, object expand_91pattern_733564 */
-+static void __lambda_1025(void *data, object self_7312705, int argc, object *args) /* object self_7312705, object r_736312_7311681_7311692 */
++static void __lambda_1002(void *data, object self_7312573, int argc, object *args) /* object self_7312573, object r_736224 */
   {
 - object expand_91pattern_733564 = args[0];
-+ object r_736312_7311681_7311692 = args[0];
++ object r_736224 = args[0];
    
 -closureN_type c_7321916;
 -object e_7323782 [50];
@@ -19914,15 +23816,20 @@ Make let-values be the same as let*-values, to work around
 -c_7321918.elements[48] = ((closureN)self_7313746)->elements[48];
 -c_7321918.elements[49] = ((closureN)self_7313746)->elements[49];
 -
--
++list_3_type local_7322329; 
+ 
 -pair_type local_7323780; 
 -return_direct_with_clo1(data,(closure)&c_7321918,__lambda_1420,  set_cell_as_expr(&local_7323780, ((closureN)self_7313746)->elements[40]));; 
--}
--
++list_3_type local_7322333; 
++return_direct_with_clo1(data,  ((closureN)self_7312573)->elements[2], (((closure)  ((closureN)self_7312573)->elements[2])->fn),  Cyc_fast_list_3(&local_7322329, ((closureN)self_7312573)->elements[0], Cyc_fast_list_3(&local_7322333, ((closureN)self_7312573)->elements[1], ((closureN)self_7312573)->elements[4], ((closureN)self_7312573)->elements[3]), r_736224));; 
+ }
+ 
 -static void __lambda_1420(void *data, object self_7313747, int argc, object *args) /* object self_7313747, object ellipsis_127_733566 */
-- {
++static void __lambda_1001(void *data, object self_7312572, int argc, object *args) /* object self_7312572, object r_736222 */
+  {
 - object ellipsis_127_733566 = args[0];
--  
++ object r_736222 = args[0];
+   
 -closureN_type c_7321920;
 -object e_7323772 [50];
 -c_7321920.hdr.mark = gc_color_red;
@@ -20189,21 +24096,20 @@ Make let-values be the same as let*-values, to work around
 -c_7321926.elements[47] = ((closureN)self_7313750)->elements[47];
 -c_7321926.elements[48] = ((closureN)self_7313750)->elements[48];
 -c_7321926.elements[49] = ((closureN)self_7313750)->elements[49];
-+pair_type local_7322651; 
- 
-+pair_type local_7322654; 
+-
++list_3_type local_7322313; 
  
 -pair_type local_7323760; 
 -return_direct_with_clo1(data,(closure)&c_7321926,__lambda_1416,  set_cell_as_expr(&local_7323760, ((closureN)self_7313750)->elements[45]));; 
-+pair_type local_7322658; 
-+return_direct_with_clo1(data,  ((closureN)self_7312705)->elements[0], (((closure)  ((closureN)self_7312705)->elements[0])->fn),  set_pair_as_expr(&local_7322651, set_pair_as_expr(&local_7322654, ((closureN)self_7312705)->elements[1], set_pair_as_expr(&local_7322658, NULL, r_736312_7311681_7311692)), boolean_f));; 
++list_2_type local_7322317; 
++return_direct_with_clo1(data,  ((closureN)self_7312572)->elements[2], (((closure)  ((closureN)self_7312572)->elements[2])->fn),  Cyc_fast_list_3(&local_7322313, ((closureN)self_7312572)->elements[0], Cyc_fast_list_2(&local_7322317, ((closureN)self_7312572)->elements[1], ((closureN)self_7312572)->elements[3]), r_736222));; 
  }
  
 -static void __lambda_1416(void *data, object self_7313751, int argc, object *args) /* object self_7313751, object free_91vars_733570 */
-+static void __lambda_1016(void *data, object self_7312706, int argc, object *args) /* object self_7312706, object r_736301 */
++static void __lambda_999(void *data, object self_7312570, int argc, object *args) /* object self_7312570, object r_736218 */
   {
 - object free_91vars_733570 = args[0];
-+ object r_736301 = args[0];
++ object r_736218 = args[0];
    
 -closureN_type c_7321928;
 -object e_7323752 [50];
@@ -20775,20 +24681,6 @@ Make let-values be the same as let*-values, to work around
 -c_7321976.elements[45] = ((closureN)self_7313758)->elements[46];
 -c_7321976.elements[46] = ((closureN)self_7313758)->elements[47];
 -c_7321976.elements[47] = ((closureN)self_7313758)->elements[48];
-+closureN_type c_7322615;
-+object e_7322624 [5];
-+c_7322615.hdr.mark = gc_color_red;
-+ c_7322615.hdr.grayed = 0;
-+c_7322615.tag = closureN_tag;
-+ c_7322615.fn = (function_type)__lambda_1017;
-+c_7322615.num_args = 1;
-+c_7322615.num_elements = 5;
-+c_7322615.elements = (object *)e_7322624;
-+c_7322615.elements[0] = ((closureN)self_7312706)->elements[0];
-+c_7322615.elements[1] = ((closureN)self_7312706)->elements[1];
-+c_7322615.elements[2] = ((closureN)self_7312706)->elements[2];
-+c_7322615.elements[3] = ((closureN)self_7312706)->elements[3];
-+c_7322615.elements[4] = ((closureN)self_7312706)->elements[4];
  
  
 -closureN_type c_7323699;
@@ -20802,14 +24694,12 @@ Make let-values be the same as let*-values, to work around
 -c_7323699.elements = (object *)e_7323736;
 -c_7323699.elements[0] = ((closureN)self_7313758)->elements[35];
 -c_7323699.elements[1] = ((closureN)self_7313758)->elements[49];
- 
+-
 -return_direct_with_clo1(data,(closure)&c_7321976,__lambda_844,  &c_7323699);; 
-+return_direct_with_clo1(data,(closure)&c_7322615,__lambda_1017,  Cyc_set_cell(data, ((closureN)self_7312706)->elements[1], r_736301));; 
- }
- 
+-}
+-
 -static void __lambda_1006(void *data, object self_7313759, int argc, object *args) /* object self_7313759, object k_736681, object s_731271_733572 */
-+static void __lambda_1017(void *data, object self_7312707, int argc, object *args) /* object self_7312707, object r_736300 */
-  {
+- {
 - object k_736681 = args[0]; object s_731271_733572 = args[1];
 -  
 -closureN_type c_7323701;
@@ -20828,16 +24718,13 @@ Make let-values be the same as let*-values, to work around
 -
 -
 -complex_num_type local_7323732; 
- 
-+  
- 
+-
+-
 -return_direct_with_clo1(data,(closure)&c_7323701,__lambda_1007,  Cyc_fast_sum(data,&local_7323732, car(((closureN)self_7313759)->elements[0]), obj_int2obj(1)));; 
-+return_closcall4(data,  car(((closureN)self_7312707)->elements[1]),  ((closureN)self_7312707)->elements[0], ((closureN)self_7312707)->elements[4], ((closureN)self_7312707)->elements[3], ((closureN)self_7312707)->elements[2]);; 
- }
- 
+-}
+-
 -static void __lambda_1007(void *data, object self_7313760, int argc, object *args) /* object self_7313760, object r_736686 */
-+static void __lambda_796(void *data, object _, int argc, object *args) /* closure _,object k_735831, object expr_731232_733168, object rename_731233_733169, object compare_731234_733170 */
-  {
+- {
 - object r_736686 = args[0];
 -  
 -closureN_type c_7323703;
@@ -20853,35 +24740,16 @@ Make let-values be the same as let*-values, to work around
 -c_7323703.elements[1] = ((closureN)self_7313760)->elements[1];
 -c_7323703.elements[2] = ((closureN)self_7313760)->elements[2];
 -c_7323703.elements[3] = ((closureN)self_7313760)->elements[3];
-+object k_735831 = args[0]; object expr_731232_733168 = args[1]; object rename_731233_733169 = args[2]; object compare_731234_733170 = args[3];
-+  Cyc_st_add(data, "base.sld:syntax-rules");
- 
-+closureN_type c_7320498;
-+object e_7322595 [4];
-+c_7320498.hdr.mark = gc_color_red;
-+ c_7320498.hdr.grayed = 0;
-+c_7320498.tag = closureN_tag;
-+ c_7320498.fn = (function_type)__lambda_797;
-+c_7320498.num_args = 1;
-+c_7320498.num_elements = 4;
-+c_7320498.elements = (object *)e_7322595;
-+c_7320498.elements[0] = compare_731234_733170;
-+c_7320498.elements[1] = expr_731232_733168;
-+c_7320498.elements[2] = k_735831;
-+c_7320498.elements[3] = rename_731233_733169;
- 
- 
+-
+-
+-
 -return_direct_with_clo1(data,(closure)&c_7323703,__lambda_1008,  Cyc_set_cell(data, ((closureN)self_7313760)->elements[0], r_736686));; 
-+
-+return_direct_with_clo1(data,(closure)&c_7320498,__lambda_797,  Cyc_cadr(data, expr_731232_733168));; 
- }
- 
+-}
+-
 -static void __lambda_1008(void *data, object self_7313761, int argc, object *args) /* object self_7313761, object r_736682 */
-+static void __lambda_797(void *data, object self_7312455, int argc, object *args) /* object self_7312455, object r_736286 */
-  {
+- {
 -
-+ object r_736286 = args[0];
-   
+-  
 -closureN_type c_7323705;
 -object e_7323718 [3];
 -c_7323705.hdr.mark = gc_color_red;
@@ -20895,100 +24763,17 @@ Make let-values be the same as let*-values, to work around
 -c_7323705.elements[1] = ((closureN)self_7313761)->elements[2];
 -c_7323705.elements[2] = ((closureN)self_7313761)->elements[3];
 -
-+closureN_type c_7320500;
-+object e_7322594 [4];
-+c_7320500.hdr.mark = gc_color_red;
-+ c_7320500.hdr.grayed = 0;
-+c_7320500.tag = closureN_tag;
-+ c_7320500.fn = (function_type)__lambda_798;
-+c_7320500.num_args = 1;
-+c_7320500.num_elements = 4;
-+c_7320500.elements = (object *)e_7322594;
-+c_7320500.elements[0] = ((closureN)self_7312455)->elements[0];
-+c_7320500.elements[1] = ((closureN)self_7312455)->elements[1];
-+c_7320500.elements[2] = ((closureN)self_7312455)->elements[2];
-+c_7320500.elements[3] = ((closureN)self_7312455)->elements[3];
-+
-+return_direct_with_clo2(data,  __glo_identifier_127_scheme_base, (((closure)  __glo_identifier_127_scheme_base)->fn),  &c_7320500, r_736286);; 
-+}
-+
-+static void __lambda_798(void *data, object self_7312456, int argc, object *args) /* object self_7312456, object r_735832 */
-+ {
-+ object r_735832 = args[0];
-+  
-+closureN_type c_7320503;
-+object e_7322593 [5];
-+c_7320503.hdr.mark = gc_color_red;
-+ c_7320503.hdr.grayed = 0;
-+c_7320503.tag = closureN_tag;
-+ c_7320503.fn = (function_type)__lambda_799;
-+c_7320503.num_args = 1;
-+c_7320503.num_elements = 5;
-+c_7320503.elements = (object *)e_7322593;
-+c_7320503.elements[0] = ((closureN)self_7312456)->elements[0];
-+c_7320503.elements[1] = ((closureN)self_7312456)->elements[1];
-+c_7320503.elements[2] = ((closureN)self_7312456)->elements[2];
-+c_7320503.elements[3] = r_735832;
-+c_7320503.elements[4] = ((closureN)self_7312456)->elements[3];
- 
-+return_closcall2(data,  ((closureN)self_7312456)->elements[3],  &c_7320503, quote_er_91macro_91transformer);; 
-+}
- 
-+static void __lambda_799(void *data, object self_7312457, int argc, object *args) /* object self_7312457, object r_735833 */
-+ {
-+ object r_735833 = args[0];
-+  
-+closureN_type c_7320506;
-+object e_7322592 [6];
-+c_7320506.hdr.mark = gc_color_red;
-+ c_7320506.hdr.grayed = 0;
-+c_7320506.tag = closureN_tag;
-+ c_7320506.fn = (function_type)__lambda_800;
-+c_7320506.num_args = 1;
-+c_7320506.num_elements = 6;
-+c_7320506.elements = (object *)e_7322592;
-+c_7320506.elements[0] = ((closureN)self_7312457)->elements[0];
-+c_7320506.elements[1] = ((closureN)self_7312457)->elements[1];
-+c_7320506.elements[2] = ((closureN)self_7312457)->elements[2];
-+c_7320506.elements[3] = ((closureN)self_7312457)->elements[3];
-+c_7320506.elements[4] = r_735833;
-+c_7320506.elements[5] = ((closureN)self_7312457)->elements[4];
-+
-+return_closcall2(data,  ((closureN)self_7312457)->elements[4],  &c_7320506, quote_lambda);; 
-+}
-+
-+static void __lambda_800(void *data, object self_7312458, int argc, object *args) /* object self_7312458, object r_735834 */
-+ {
-+ object r_735834 = args[0];
-+  
-+closureN_type c_7320509;
-+object e_7322591 [7];
-+c_7320509.hdr.mark = gc_color_red;
-+ c_7320509.hdr.grayed = 0;
-+c_7320509.tag = closureN_tag;
-+ c_7320509.fn = (function_type)__lambda_801;
-+c_7320509.num_args = 1;
-+c_7320509.num_elements = 7;
-+c_7320509.elements = (object *)e_7322591;
-+c_7320509.elements[0] = ((closureN)self_7312458)->elements[0];
-+c_7320509.elements[1] = ((closureN)self_7312458)->elements[1];
-+c_7320509.elements[2] = ((closureN)self_7312458)->elements[2];
-+c_7320509.elements[3] = ((closureN)self_7312458)->elements[3];
-+c_7320509.elements[4] = ((closureN)self_7312458)->elements[4];
-+c_7320509.elements[5] = r_735834;
-+c_7320509.elements[6] = ((closureN)self_7312458)->elements[5];
- 
+-
+-
+-
 -object c_7323721 = Cyc_number2string2(data,(closure)&c_7323705,1,car(((closureN)self_7313761)->elements[0]));
 -return_closcall1(data,(closure)&c_7323705,  c_7323721);; 
-+return_closcall2(data,  ((closureN)self_7312458)->elements[5],  &c_7320509, quote_let);; 
- }
- 
+-}
+-
 -static void __lambda_1009(void *data, object self_7313762, int argc, object *args) /* object self_7313762, object r_736685 */
-+static void __lambda_801(void *data, object self_7312459, int argc, object *args) /* object self_7312459, object r_735835 */
-  {
+- {
 - object r_736685 = args[0];
-+ object r_735835 = args[0];
-   
+-  
 -closureN_type c_7323707;
 -object e_7323713 [2];
 -c_7323707.hdr.mark = gc_color_red;
@@ -21001,1926 +24786,23 @@ Make let-values be the same as let*-values, to work around
 -c_7323707.elements[0] = ((closureN)self_7313762)->elements[0];
 -c_7323707.elements[1] = ((closureN)self_7313762)->elements[1];
 -
-+closureN_type c_7320512;
-+object e_7322590 [8];
-+c_7320512.hdr.mark = gc_color_red;
-+ c_7320512.hdr.grayed = 0;
-+c_7320512.tag = closureN_tag;
-+ c_7320512.fn = (function_type)__lambda_802;
-+c_7320512.num_args = 1;
-+c_7320512.num_elements = 8;
-+c_7320512.elements = (object *)e_7322590;
-+c_7320512.elements[0] = ((closureN)self_7312459)->elements[0];
-+c_7320512.elements[1] = ((closureN)self_7312459)->elements[1];
-+c_7320512.elements[2] = ((closureN)self_7312459)->elements[2];
-+c_7320512.elements[3] = ((closureN)self_7312459)->elements[3];
-+c_7320512.elements[4] = ((closureN)self_7312459)->elements[4];
-+c_7320512.elements[5] = ((closureN)self_7312459)->elements[5];
-+c_7320512.elements[6] = r_735835;
-+c_7320512.elements[7] = ((closureN)self_7312459)->elements[6];
-+
-+return_closcall2(data,  ((closureN)self_7312459)->elements[6],  &c_7320512, quote_begin);; 
-+}
-+
-+static void __lambda_802(void *data, object self_7312460, int argc, object *args) /* object self_7312460, object r_735836 */
-+ {
-+ object r_735836 = args[0];
-+  
-+closureN_type c_7320515;
-+object e_7322589 [9];
-+c_7320515.hdr.mark = gc_color_red;
-+ c_7320515.hdr.grayed = 0;
-+c_7320515.tag = closureN_tag;
-+ c_7320515.fn = (function_type)__lambda_803;
-+c_7320515.num_args = 1;
-+c_7320515.num_elements = 9;
-+c_7320515.elements = (object *)e_7322589;
-+c_7320515.elements[0] = ((closureN)self_7312460)->elements[0];
-+c_7320515.elements[1] = ((closureN)self_7312460)->elements[1];
-+c_7320515.elements[2] = ((closureN)self_7312460)->elements[2];
-+c_7320515.elements[3] = ((closureN)self_7312460)->elements[3];
-+c_7320515.elements[4] = ((closureN)self_7312460)->elements[4];
-+c_7320515.elements[5] = ((closureN)self_7312460)->elements[5];
-+c_7320515.elements[6] = ((closureN)self_7312460)->elements[6];
-+c_7320515.elements[7] = r_735836;
-+c_7320515.elements[8] = ((closureN)self_7312460)->elements[7];
-+
-+return_closcall2(data,  ((closureN)self_7312460)->elements[7],  &c_7320515, quote__if);; 
-+}
-+
-+static void __lambda_803(void *data, object self_7312461, int argc, object *args) /* object self_7312461, object r_735837 */
-+ {
-+ object r_735837 = args[0];
-+  
-+closureN_type c_7320518;
-+object e_7322588 [10];
-+c_7320518.hdr.mark = gc_color_red;
-+ c_7320518.hdr.grayed = 0;
-+c_7320518.tag = closureN_tag;
-+ c_7320518.fn = (function_type)__lambda_804;
-+c_7320518.num_args = 1;
-+c_7320518.num_elements = 10;
-+c_7320518.elements = (object *)e_7322588;
-+c_7320518.elements[0] = ((closureN)self_7312461)->elements[0];
-+c_7320518.elements[1] = ((closureN)self_7312461)->elements[1];
-+c_7320518.elements[2] = ((closureN)self_7312461)->elements[2];
-+c_7320518.elements[3] = ((closureN)self_7312461)->elements[3];
-+c_7320518.elements[4] = ((closureN)self_7312461)->elements[4];
-+c_7320518.elements[5] = ((closureN)self_7312461)->elements[5];
-+c_7320518.elements[6] = ((closureN)self_7312461)->elements[6];
-+c_7320518.elements[7] = ((closureN)self_7312461)->elements[7];
-+c_7320518.elements[8] = r_735837;
-+c_7320518.elements[9] = ((closureN)self_7312461)->elements[8];
- 
+-
 -object c_7323716 = Cyc_string_append(data,(closure)&c_7323707,2,((closureN)self_7313762)->elements[2], r_736685);
 -return_closcall1(data,(closure)&c_7323707,  c_7323716);; 
-+return_closcall2(data,  ((closureN)self_7312461)->elements[8],  &c_7320518, quote_and);; 
- }
- 
+-}
+-
 -static void __lambda_1010(void *data, object self_7313763, int argc, object *args) /* object self_7313763, object r_736684 */
-+static void __lambda_804(void *data, object self_7312462, int argc, object *args) /* object self_7312462, object r_735838 */
-  {
+- {
 - object r_736684 = args[0];
-+ object r_735838 = args[0];
-   
-+closureN_type c_7320521;
-+object e_7322587 [11];
-+c_7320521.hdr.mark = gc_color_red;
-+ c_7320521.hdr.grayed = 0;
-+c_7320521.tag = closureN_tag;
-+ c_7320521.fn = (function_type)__lambda_805;
-+c_7320521.num_args = 1;
-+c_7320521.num_elements = 11;
-+c_7320521.elements = (object *)e_7322587;
-+c_7320521.elements[0] = ((closureN)self_7312462)->elements[0];
-+c_7320521.elements[1] = ((closureN)self_7312462)->elements[1];
-+c_7320521.elements[2] = ((closureN)self_7312462)->elements[2];
-+c_7320521.elements[3] = ((closureN)self_7312462)->elements[3];
-+c_7320521.elements[4] = ((closureN)self_7312462)->elements[4];
-+c_7320521.elements[5] = ((closureN)self_7312462)->elements[5];
-+c_7320521.elements[6] = ((closureN)self_7312462)->elements[6];
-+c_7320521.elements[7] = ((closureN)self_7312462)->elements[7];
-+c_7320521.elements[8] = ((closureN)self_7312462)->elements[8];
-+c_7320521.elements[9] = r_735838;
-+c_7320521.elements[10] = ((closureN)self_7312462)->elements[9];
-+
-+return_closcall2(data,  ((closureN)self_7312462)->elements[9],  &c_7320521, quote_or);; 
-+}
-+
-+static void __lambda_805(void *data, object self_7312463, int argc, object *args) /* object self_7312463, object r_735839 */
-+ {
-+ object r_735839 = args[0];
-+  
-+closureN_type c_7320524;
-+object e_7322586 [12];
-+c_7320524.hdr.mark = gc_color_red;
-+ c_7320524.hdr.grayed = 0;
-+c_7320524.tag = closureN_tag;
-+ c_7320524.fn = (function_type)__lambda_806;
-+c_7320524.num_args = 1;
-+c_7320524.num_elements = 12;
-+c_7320524.elements = (object *)e_7322586;
-+c_7320524.elements[0] = ((closureN)self_7312463)->elements[0];
-+c_7320524.elements[1] = ((closureN)self_7312463)->elements[1];
-+c_7320524.elements[2] = ((closureN)self_7312463)->elements[2];
-+c_7320524.elements[3] = ((closureN)self_7312463)->elements[3];
-+c_7320524.elements[4] = ((closureN)self_7312463)->elements[4];
-+c_7320524.elements[5] = ((closureN)self_7312463)->elements[5];
-+c_7320524.elements[6] = ((closureN)self_7312463)->elements[6];
-+c_7320524.elements[7] = ((closureN)self_7312463)->elements[7];
-+c_7320524.elements[8] = ((closureN)self_7312463)->elements[8];
-+c_7320524.elements[9] = ((closureN)self_7312463)->elements[9];
-+c_7320524.elements[10] = r_735839;
-+c_7320524.elements[11] = ((closureN)self_7312463)->elements[10];
-+
-+return_closcall2(data,  ((closureN)self_7312463)->elements[10],  &c_7320524, quote_eq_127);; 
-+}
-+
-+static void __lambda_806(void *data, object self_7312464, int argc, object *args) /* object self_7312464, object r_735840 */
-+ {
-+ object r_735840 = args[0];
-+  
-+closureN_type c_7320527;
-+object e_7322585 [13];
-+c_7320527.hdr.mark = gc_color_red;
-+ c_7320527.hdr.grayed = 0;
-+c_7320527.tag = closureN_tag;
-+ c_7320527.fn = (function_type)__lambda_807;
-+c_7320527.num_args = 1;
-+c_7320527.num_elements = 13;
-+c_7320527.elements = (object *)e_7322585;
-+c_7320527.elements[0] = ((closureN)self_7312464)->elements[0];
-+c_7320527.elements[1] = ((closureN)self_7312464)->elements[1];
-+c_7320527.elements[2] = ((closureN)self_7312464)->elements[2];
-+c_7320527.elements[3] = ((closureN)self_7312464)->elements[3];
-+c_7320527.elements[4] = ((closureN)self_7312464)->elements[4];
-+c_7320527.elements[5] = ((closureN)self_7312464)->elements[5];
-+c_7320527.elements[6] = ((closureN)self_7312464)->elements[6];
-+c_7320527.elements[7] = ((closureN)self_7312464)->elements[7];
-+c_7320527.elements[8] = ((closureN)self_7312464)->elements[8];
-+c_7320527.elements[9] = ((closureN)self_7312464)->elements[9];
-+c_7320527.elements[10] = ((closureN)self_7312464)->elements[10];
-+c_7320527.elements[11] = r_735840;
-+c_7320527.elements[12] = ((closureN)self_7312464)->elements[11];
-+
-+return_closcall2(data,  ((closureN)self_7312464)->elements[11],  &c_7320527, quote_equal_127);; 
-+}
-+
-+static void __lambda_807(void *data, object self_7312465, int argc, object *args) /* object self_7312465, object r_735841 */
-+ {
-+ object r_735841 = args[0];
-+  
-+closureN_type c_7320530;
-+object e_7322584 [14];
-+c_7320530.hdr.mark = gc_color_red;
-+ c_7320530.hdr.grayed = 0;
-+c_7320530.tag = closureN_tag;
-+ c_7320530.fn = (function_type)__lambda_808;
-+c_7320530.num_args = 1;
-+c_7320530.num_elements = 14;
-+c_7320530.elements = (object *)e_7322584;
-+c_7320530.elements[0] = ((closureN)self_7312465)->elements[0];
-+c_7320530.elements[1] = ((closureN)self_7312465)->elements[1];
-+c_7320530.elements[2] = ((closureN)self_7312465)->elements[2];
-+c_7320530.elements[3] = ((closureN)self_7312465)->elements[3];
-+c_7320530.elements[4] = ((closureN)self_7312465)->elements[4];
-+c_7320530.elements[5] = ((closureN)self_7312465)->elements[5];
-+c_7320530.elements[6] = ((closureN)self_7312465)->elements[6];
-+c_7320530.elements[7] = ((closureN)self_7312465)->elements[7];
-+c_7320530.elements[8] = ((closureN)self_7312465)->elements[8];
-+c_7320530.elements[9] = ((closureN)self_7312465)->elements[9];
-+c_7320530.elements[10] = ((closureN)self_7312465)->elements[10];
-+c_7320530.elements[11] = ((closureN)self_7312465)->elements[11];
-+c_7320530.elements[12] = r_735841;
-+c_7320530.elements[13] = ((closureN)self_7312465)->elements[12];
-+
-+return_closcall2(data,  ((closureN)self_7312465)->elements[12],  &c_7320530, quote_car);; 
-+}
-+
-+static void __lambda_808(void *data, object self_7312466, int argc, object *args) /* object self_7312466, object r_735842 */
-+ {
-+ object r_735842 = args[0];
-+  
-+closureN_type c_7320533;
-+object e_7322583 [15];
-+c_7320533.hdr.mark = gc_color_red;
-+ c_7320533.hdr.grayed = 0;
-+c_7320533.tag = closureN_tag;
-+ c_7320533.fn = (function_type)__lambda_809;
-+c_7320533.num_args = 1;
-+c_7320533.num_elements = 15;
-+c_7320533.elements = (object *)e_7322583;
-+c_7320533.elements[0] = ((closureN)self_7312466)->elements[0];
-+c_7320533.elements[1] = ((closureN)self_7312466)->elements[1];
-+c_7320533.elements[2] = ((closureN)self_7312466)->elements[2];
-+c_7320533.elements[3] = ((closureN)self_7312466)->elements[3];
-+c_7320533.elements[4] = ((closureN)self_7312466)->elements[4];
-+c_7320533.elements[5] = ((closureN)self_7312466)->elements[5];
-+c_7320533.elements[6] = ((closureN)self_7312466)->elements[6];
-+c_7320533.elements[7] = ((closureN)self_7312466)->elements[7];
-+c_7320533.elements[8] = ((closureN)self_7312466)->elements[8];
-+c_7320533.elements[9] = ((closureN)self_7312466)->elements[9];
-+c_7320533.elements[10] = ((closureN)self_7312466)->elements[10];
-+c_7320533.elements[11] = ((closureN)self_7312466)->elements[11];
-+c_7320533.elements[12] = ((closureN)self_7312466)->elements[12];
-+c_7320533.elements[13] = r_735842;
-+c_7320533.elements[14] = ((closureN)self_7312466)->elements[13];
-+
-+return_closcall2(data,  ((closureN)self_7312466)->elements[13],  &c_7320533, quote_cdr);; 
-+}
-+
-+static void __lambda_809(void *data, object self_7312467, int argc, object *args) /* object self_7312467, object r_735843 */
-+ {
-+ object r_735843 = args[0];
-+  
-+closureN_type c_7320536;
-+object e_7322582 [16];
-+c_7320536.hdr.mark = gc_color_red;
-+ c_7320536.hdr.grayed = 0;
-+c_7320536.tag = closureN_tag;
-+ c_7320536.fn = (function_type)__lambda_810;
-+c_7320536.num_args = 1;
-+c_7320536.num_elements = 16;
-+c_7320536.elements = (object *)e_7322582;
-+c_7320536.elements[0] = ((closureN)self_7312467)->elements[0];
-+c_7320536.elements[1] = ((closureN)self_7312467)->elements[1];
-+c_7320536.elements[2] = ((closureN)self_7312467)->elements[2];
-+c_7320536.elements[3] = ((closureN)self_7312467)->elements[3];
-+c_7320536.elements[4] = ((closureN)self_7312467)->elements[4];
-+c_7320536.elements[5] = ((closureN)self_7312467)->elements[5];
-+c_7320536.elements[6] = ((closureN)self_7312467)->elements[6];
-+c_7320536.elements[7] = ((closureN)self_7312467)->elements[7];
-+c_7320536.elements[8] = ((closureN)self_7312467)->elements[8];
-+c_7320536.elements[9] = ((closureN)self_7312467)->elements[9];
-+c_7320536.elements[10] = ((closureN)self_7312467)->elements[10];
-+c_7320536.elements[11] = ((closureN)self_7312467)->elements[11];
-+c_7320536.elements[12] = ((closureN)self_7312467)->elements[12];
-+c_7320536.elements[13] = ((closureN)self_7312467)->elements[13];
-+c_7320536.elements[14] = r_735843;
-+c_7320536.elements[15] = ((closureN)self_7312467)->elements[14];
-+
-+return_closcall2(data,  ((closureN)self_7312467)->elements[14],  &c_7320536, quote_cons);; 
-+}
-+
-+static void __lambda_810(void *data, object self_7312468, int argc, object *args) /* object self_7312468, object r_735844 */
-+ {
-+ object r_735844 = args[0];
-+  
-+closureN_type c_7320539;
-+object e_7322581 [17];
-+c_7320539.hdr.mark = gc_color_red;
-+ c_7320539.hdr.grayed = 0;
-+c_7320539.tag = closureN_tag;
-+ c_7320539.fn = (function_type)__lambda_811;
-+c_7320539.num_args = 1;
-+c_7320539.num_elements = 17;
-+c_7320539.elements = (object *)e_7322581;
-+c_7320539.elements[0] = ((closureN)self_7312468)->elements[0];
-+c_7320539.elements[1] = ((closureN)self_7312468)->elements[1];
-+c_7320539.elements[2] = ((closureN)self_7312468)->elements[2];
-+c_7320539.elements[3] = ((closureN)self_7312468)->elements[3];
-+c_7320539.elements[4] = ((closureN)self_7312468)->elements[4];
-+c_7320539.elements[5] = ((closureN)self_7312468)->elements[5];
-+c_7320539.elements[6] = ((closureN)self_7312468)->elements[6];
-+c_7320539.elements[7] = ((closureN)self_7312468)->elements[7];
-+c_7320539.elements[8] = ((closureN)self_7312468)->elements[8];
-+c_7320539.elements[9] = ((closureN)self_7312468)->elements[9];
-+c_7320539.elements[10] = ((closureN)self_7312468)->elements[10];
-+c_7320539.elements[11] = ((closureN)self_7312468)->elements[11];
-+c_7320539.elements[12] = ((closureN)self_7312468)->elements[12];
-+c_7320539.elements[13] = ((closureN)self_7312468)->elements[13];
-+c_7320539.elements[14] = ((closureN)self_7312468)->elements[14];
-+c_7320539.elements[15] = r_735844;
-+c_7320539.elements[16] = ((closureN)self_7312468)->elements[15];
-+
-+return_closcall2(data,  ((closureN)self_7312468)->elements[15],  &c_7320539, quote_pair_127);; 
-+}
-+
-+static void __lambda_811(void *data, object self_7312469, int argc, object *args) /* object self_7312469, object r_735845 */
-+ {
-+ object r_735845 = args[0];
-+  
-+closureN_type c_7320542;
-+object e_7322580 [18];
-+c_7320542.hdr.mark = gc_color_red;
-+ c_7320542.hdr.grayed = 0;
-+c_7320542.tag = closureN_tag;
-+ c_7320542.fn = (function_type)__lambda_812;
-+c_7320542.num_args = 1;
-+c_7320542.num_elements = 18;
-+c_7320542.elements = (object *)e_7322580;
-+c_7320542.elements[0] = ((closureN)self_7312469)->elements[0];
-+c_7320542.elements[1] = ((closureN)self_7312469)->elements[1];
-+c_7320542.elements[2] = ((closureN)self_7312469)->elements[2];
-+c_7320542.elements[3] = ((closureN)self_7312469)->elements[3];
-+c_7320542.elements[4] = ((closureN)self_7312469)->elements[4];
-+c_7320542.elements[5] = ((closureN)self_7312469)->elements[5];
-+c_7320542.elements[6] = ((closureN)self_7312469)->elements[6];
-+c_7320542.elements[7] = ((closureN)self_7312469)->elements[7];
-+c_7320542.elements[8] = ((closureN)self_7312469)->elements[8];
-+c_7320542.elements[9] = ((closureN)self_7312469)->elements[9];
-+c_7320542.elements[10] = ((closureN)self_7312469)->elements[10];
-+c_7320542.elements[11] = ((closureN)self_7312469)->elements[11];
-+c_7320542.elements[12] = ((closureN)self_7312469)->elements[12];
-+c_7320542.elements[13] = ((closureN)self_7312469)->elements[13];
-+c_7320542.elements[14] = ((closureN)self_7312469)->elements[14];
-+c_7320542.elements[15] = ((closureN)self_7312469)->elements[15];
-+c_7320542.elements[16] = r_735845;
-+c_7320542.elements[17] = ((closureN)self_7312469)->elements[16];
-+
-+return_closcall2(data,  ((closureN)self_7312469)->elements[16],  &c_7320542, quote_null_127);; 
-+}
-+
-+static void __lambda_812(void *data, object self_7312470, int argc, object *args) /* object self_7312470, object r_735846 */
-+ {
-+ object r_735846 = args[0];
-+  
-+closureN_type c_7320545;
-+object e_7322579 [19];
-+c_7320545.hdr.mark = gc_color_red;
-+ c_7320545.hdr.grayed = 0;
-+c_7320545.tag = closureN_tag;
-+ c_7320545.fn = (function_type)__lambda_813;
-+c_7320545.num_args = 1;
-+c_7320545.num_elements = 19;
-+c_7320545.elements = (object *)e_7322579;
-+c_7320545.elements[0] = ((closureN)self_7312470)->elements[0];
-+c_7320545.elements[1] = ((closureN)self_7312470)->elements[1];
-+c_7320545.elements[2] = ((closureN)self_7312470)->elements[2];
-+c_7320545.elements[3] = ((closureN)self_7312470)->elements[3];
-+c_7320545.elements[4] = ((closureN)self_7312470)->elements[4];
-+c_7320545.elements[5] = ((closureN)self_7312470)->elements[5];
-+c_7320545.elements[6] = ((closureN)self_7312470)->elements[6];
-+c_7320545.elements[7] = ((closureN)self_7312470)->elements[7];
-+c_7320545.elements[8] = ((closureN)self_7312470)->elements[8];
-+c_7320545.elements[9] = ((closureN)self_7312470)->elements[9];
-+c_7320545.elements[10] = ((closureN)self_7312470)->elements[10];
-+c_7320545.elements[11] = ((closureN)self_7312470)->elements[11];
-+c_7320545.elements[12] = ((closureN)self_7312470)->elements[12];
-+c_7320545.elements[13] = ((closureN)self_7312470)->elements[13];
-+c_7320545.elements[14] = ((closureN)self_7312470)->elements[14];
-+c_7320545.elements[15] = ((closureN)self_7312470)->elements[15];
-+c_7320545.elements[16] = ((closureN)self_7312470)->elements[16];
-+c_7320545.elements[17] = r_735846;
-+c_7320545.elements[18] = ((closureN)self_7312470)->elements[17];
-+
-+return_closcall2(data,  ((closureN)self_7312470)->elements[17],  &c_7320545, quote_expr);; 
-+}
-+
-+static void __lambda_813(void *data, object self_7312471, int argc, object *args) /* object self_7312471, object r_735847 */
-+ {
-+ object r_735847 = args[0];
-+  
-+closureN_type c_7320548;
-+object e_7322578 [20];
-+c_7320548.hdr.mark = gc_color_red;
-+ c_7320548.hdr.grayed = 0;
-+c_7320548.tag = closureN_tag;
-+ c_7320548.fn = (function_type)__lambda_814;
-+c_7320548.num_args = 1;
-+c_7320548.num_elements = 20;
-+c_7320548.elements = (object *)e_7322578;
-+c_7320548.elements[0] = ((closureN)self_7312471)->elements[0];
-+c_7320548.elements[1] = ((closureN)self_7312471)->elements[1];
-+c_7320548.elements[2] = ((closureN)self_7312471)->elements[2];
-+c_7320548.elements[3] = ((closureN)self_7312471)->elements[3];
-+c_7320548.elements[4] = ((closureN)self_7312471)->elements[4];
-+c_7320548.elements[5] = ((closureN)self_7312471)->elements[5];
-+c_7320548.elements[6] = ((closureN)self_7312471)->elements[6];
-+c_7320548.elements[7] = ((closureN)self_7312471)->elements[7];
-+c_7320548.elements[8] = ((closureN)self_7312471)->elements[8];
-+c_7320548.elements[9] = ((closureN)self_7312471)->elements[9];
-+c_7320548.elements[10] = ((closureN)self_7312471)->elements[10];
-+c_7320548.elements[11] = ((closureN)self_7312471)->elements[11];
-+c_7320548.elements[12] = ((closureN)self_7312471)->elements[12];
-+c_7320548.elements[13] = ((closureN)self_7312471)->elements[13];
-+c_7320548.elements[14] = ((closureN)self_7312471)->elements[14];
-+c_7320548.elements[15] = ((closureN)self_7312471)->elements[15];
-+c_7320548.elements[16] = ((closureN)self_7312471)->elements[16];
-+c_7320548.elements[17] = ((closureN)self_7312471)->elements[17];
-+c_7320548.elements[18] = r_735847;
-+c_7320548.elements[19] = ((closureN)self_7312471)->elements[18];
-+
-+return_closcall2(data,  ((closureN)self_7312471)->elements[18],  &c_7320548, quote_rename);; 
-+}
-+
-+static void __lambda_814(void *data, object self_7312472, int argc, object *args) /* object self_7312472, object r_735848 */
-+ {
-+ object r_735848 = args[0];
-+  
-+closureN_type c_7320551;
-+object e_7322577 [21];
-+c_7320551.hdr.mark = gc_color_red;
-+ c_7320551.hdr.grayed = 0;
-+c_7320551.tag = closureN_tag;
-+ c_7320551.fn = (function_type)__lambda_815;
-+c_7320551.num_args = 1;
-+c_7320551.num_elements = 21;
-+c_7320551.elements = (object *)e_7322577;
-+c_7320551.elements[0] = ((closureN)self_7312472)->elements[0];
-+c_7320551.elements[1] = ((closureN)self_7312472)->elements[1];
-+c_7320551.elements[2] = ((closureN)self_7312472)->elements[2];
-+c_7320551.elements[3] = ((closureN)self_7312472)->elements[3];
-+c_7320551.elements[4] = ((closureN)self_7312472)->elements[4];
-+c_7320551.elements[5] = ((closureN)self_7312472)->elements[5];
-+c_7320551.elements[6] = ((closureN)self_7312472)->elements[6];
-+c_7320551.elements[7] = ((closureN)self_7312472)->elements[7];
-+c_7320551.elements[8] = ((closureN)self_7312472)->elements[8];
-+c_7320551.elements[9] = ((closureN)self_7312472)->elements[9];
-+c_7320551.elements[10] = ((closureN)self_7312472)->elements[10];
-+c_7320551.elements[11] = ((closureN)self_7312472)->elements[11];
-+c_7320551.elements[12] = ((closureN)self_7312472)->elements[12];
-+c_7320551.elements[13] = ((closureN)self_7312472)->elements[13];
-+c_7320551.elements[14] = ((closureN)self_7312472)->elements[14];
-+c_7320551.elements[15] = ((closureN)self_7312472)->elements[15];
-+c_7320551.elements[16] = ((closureN)self_7312472)->elements[16];
-+c_7320551.elements[17] = ((closureN)self_7312472)->elements[17];
-+c_7320551.elements[18] = ((closureN)self_7312472)->elements[18];
-+c_7320551.elements[19] = r_735848;
-+c_7320551.elements[20] = ((closureN)self_7312472)->elements[19];
-+
-+return_closcall2(data,  ((closureN)self_7312472)->elements[19],  &c_7320551, quote_compare);; 
-+}
-+
-+static void __lambda_815(void *data, object self_7312473, int argc, object *args) /* object self_7312473, object r_735849 */
-+ {
-+ object r_735849 = args[0];
-+  
-+closureN_type c_7320554;
-+object e_7322576 [22];
-+c_7320554.hdr.mark = gc_color_red;
-+ c_7320554.hdr.grayed = 0;
-+c_7320554.tag = closureN_tag;
-+ c_7320554.fn = (function_type)__lambda_816;
-+c_7320554.num_args = 1;
-+c_7320554.num_elements = 22;
-+c_7320554.elements = (object *)e_7322576;
-+c_7320554.elements[0] = ((closureN)self_7312473)->elements[0];
-+c_7320554.elements[1] = ((closureN)self_7312473)->elements[1];
-+c_7320554.elements[2] = ((closureN)self_7312473)->elements[2];
-+c_7320554.elements[3] = ((closureN)self_7312473)->elements[3];
-+c_7320554.elements[4] = ((closureN)self_7312473)->elements[4];
-+c_7320554.elements[5] = ((closureN)self_7312473)->elements[5];
-+c_7320554.elements[6] = ((closureN)self_7312473)->elements[6];
-+c_7320554.elements[7] = ((closureN)self_7312473)->elements[7];
-+c_7320554.elements[8] = ((closureN)self_7312473)->elements[8];
-+c_7320554.elements[9] = ((closureN)self_7312473)->elements[9];
-+c_7320554.elements[10] = ((closureN)self_7312473)->elements[10];
-+c_7320554.elements[11] = ((closureN)self_7312473)->elements[11];
-+c_7320554.elements[12] = ((closureN)self_7312473)->elements[12];
-+c_7320554.elements[13] = ((closureN)self_7312473)->elements[13];
-+c_7320554.elements[14] = ((closureN)self_7312473)->elements[14];
-+c_7320554.elements[15] = ((closureN)self_7312473)->elements[15];
-+c_7320554.elements[16] = ((closureN)self_7312473)->elements[16];
-+c_7320554.elements[17] = ((closureN)self_7312473)->elements[17];
-+c_7320554.elements[18] = ((closureN)self_7312473)->elements[18];
-+c_7320554.elements[19] = ((closureN)self_7312473)->elements[19];
-+c_7320554.elements[20] = r_735849;
-+c_7320554.elements[21] = ((closureN)self_7312473)->elements[20];
-+
-+return_closcall2(data,  ((closureN)self_7312473)->elements[20],  &c_7320554, quote_quote);; 
-+}
-+
-+static void __lambda_816(void *data, object self_7312474, int argc, object *args) /* object self_7312474, object r_735850 */
-+ {
-+ object r_735850 = args[0];
-+  
-+closureN_type c_7320557;
-+object e_7322575 [23];
-+c_7320557.hdr.mark = gc_color_red;
-+ c_7320557.hdr.grayed = 0;
-+c_7320557.tag = closureN_tag;
-+ c_7320557.fn = (function_type)__lambda_817;
-+c_7320557.num_args = 1;
-+c_7320557.num_elements = 23;
-+c_7320557.elements = (object *)e_7322575;
-+c_7320557.elements[0] = ((closureN)self_7312474)->elements[0];
-+c_7320557.elements[1] = ((closureN)self_7312474)->elements[1];
-+c_7320557.elements[2] = ((closureN)self_7312474)->elements[2];
-+c_7320557.elements[3] = ((closureN)self_7312474)->elements[3];
-+c_7320557.elements[4] = ((closureN)self_7312474)->elements[4];
-+c_7320557.elements[5] = ((closureN)self_7312474)->elements[5];
-+c_7320557.elements[6] = ((closureN)self_7312474)->elements[6];
-+c_7320557.elements[7] = ((closureN)self_7312474)->elements[7];
-+c_7320557.elements[8] = ((closureN)self_7312474)->elements[8];
-+c_7320557.elements[9] = ((closureN)self_7312474)->elements[9];
-+c_7320557.elements[10] = ((closureN)self_7312474)->elements[10];
-+c_7320557.elements[11] = ((closureN)self_7312474)->elements[11];
-+c_7320557.elements[12] = ((closureN)self_7312474)->elements[12];
-+c_7320557.elements[13] = ((closureN)self_7312474)->elements[13];
-+c_7320557.elements[14] = ((closureN)self_7312474)->elements[14];
-+c_7320557.elements[15] = ((closureN)self_7312474)->elements[15];
-+c_7320557.elements[16] = ((closureN)self_7312474)->elements[16];
-+c_7320557.elements[17] = ((closureN)self_7312474)->elements[17];
-+c_7320557.elements[18] = ((closureN)self_7312474)->elements[18];
-+c_7320557.elements[19] = ((closureN)self_7312474)->elements[19];
-+c_7320557.elements[20] = ((closureN)self_7312474)->elements[20];
-+c_7320557.elements[21] = r_735850;
-+c_7320557.elements[22] = ((closureN)self_7312474)->elements[21];
-+
-+return_closcall2(data,  ((closureN)self_7312474)->elements[21],  &c_7320557, quote_apply);; 
-+}
-+
-+static void __lambda_817(void *data, object self_7312475, int argc, object *args) /* object self_7312475, object r_735851 */
-+ {
-+ object r_735851 = args[0];
-+  
-+closureN_type c_7320560;
-+object e_7322574 [24];
-+c_7320560.hdr.mark = gc_color_red;
-+ c_7320560.hdr.grayed = 0;
-+c_7320560.tag = closureN_tag;
-+ c_7320560.fn = (function_type)__lambda_818;
-+c_7320560.num_args = 1;
-+c_7320560.num_elements = 24;
-+c_7320560.elements = (object *)e_7322574;
-+c_7320560.elements[0] = ((closureN)self_7312475)->elements[0];
-+c_7320560.elements[1] = ((closureN)self_7312475)->elements[1];
-+c_7320560.elements[2] = ((closureN)self_7312475)->elements[2];
-+c_7320560.elements[3] = ((closureN)self_7312475)->elements[3];
-+c_7320560.elements[4] = ((closureN)self_7312475)->elements[4];
-+c_7320560.elements[5] = ((closureN)self_7312475)->elements[5];
-+c_7320560.elements[6] = ((closureN)self_7312475)->elements[6];
-+c_7320560.elements[7] = ((closureN)self_7312475)->elements[7];
-+c_7320560.elements[8] = ((closureN)self_7312475)->elements[8];
-+c_7320560.elements[9] = ((closureN)self_7312475)->elements[9];
-+c_7320560.elements[10] = ((closureN)self_7312475)->elements[10];
-+c_7320560.elements[11] = ((closureN)self_7312475)->elements[11];
-+c_7320560.elements[12] = ((closureN)self_7312475)->elements[12];
-+c_7320560.elements[13] = ((closureN)self_7312475)->elements[13];
-+c_7320560.elements[14] = ((closureN)self_7312475)->elements[14];
-+c_7320560.elements[15] = ((closureN)self_7312475)->elements[15];
-+c_7320560.elements[16] = ((closureN)self_7312475)->elements[16];
-+c_7320560.elements[17] = ((closureN)self_7312475)->elements[17];
-+c_7320560.elements[18] = ((closureN)self_7312475)->elements[18];
-+c_7320560.elements[19] = ((closureN)self_7312475)->elements[19];
-+c_7320560.elements[20] = ((closureN)self_7312475)->elements[20];
-+c_7320560.elements[21] = ((closureN)self_7312475)->elements[21];
-+c_7320560.elements[22] = r_735851;
-+c_7320560.elements[23] = ((closureN)self_7312475)->elements[22];
-+
-+return_closcall2(data,  ((closureN)self_7312475)->elements[22],  &c_7320560, quote_append);; 
-+}
-+
-+static void __lambda_818(void *data, object self_7312476, int argc, object *args) /* object self_7312476, object r_735852 */
-+ {
-+ object r_735852 = args[0];
-+  
-+closureN_type c_7320563;
-+object e_7322573 [25];
-+c_7320563.hdr.mark = gc_color_red;
-+ c_7320563.hdr.grayed = 0;
-+c_7320563.tag = closureN_tag;
-+ c_7320563.fn = (function_type)__lambda_819;
-+c_7320563.num_args = 1;
-+c_7320563.num_elements = 25;
-+c_7320563.elements = (object *)e_7322573;
-+c_7320563.elements[0] = ((closureN)self_7312476)->elements[0];
-+c_7320563.elements[1] = ((closureN)self_7312476)->elements[1];
-+c_7320563.elements[2] = ((closureN)self_7312476)->elements[2];
-+c_7320563.elements[3] = ((closureN)self_7312476)->elements[3];
-+c_7320563.elements[4] = ((closureN)self_7312476)->elements[4];
-+c_7320563.elements[5] = ((closureN)self_7312476)->elements[5];
-+c_7320563.elements[6] = ((closureN)self_7312476)->elements[6];
-+c_7320563.elements[7] = ((closureN)self_7312476)->elements[7];
-+c_7320563.elements[8] = ((closureN)self_7312476)->elements[8];
-+c_7320563.elements[9] = ((closureN)self_7312476)->elements[9];
-+c_7320563.elements[10] = ((closureN)self_7312476)->elements[10];
-+c_7320563.elements[11] = ((closureN)self_7312476)->elements[11];
-+c_7320563.elements[12] = ((closureN)self_7312476)->elements[12];
-+c_7320563.elements[13] = ((closureN)self_7312476)->elements[13];
-+c_7320563.elements[14] = ((closureN)self_7312476)->elements[14];
-+c_7320563.elements[15] = ((closureN)self_7312476)->elements[15];
-+c_7320563.elements[16] = ((closureN)self_7312476)->elements[16];
-+c_7320563.elements[17] = ((closureN)self_7312476)->elements[17];
-+c_7320563.elements[18] = ((closureN)self_7312476)->elements[18];
-+c_7320563.elements[19] = ((closureN)self_7312476)->elements[19];
-+c_7320563.elements[20] = ((closureN)self_7312476)->elements[20];
-+c_7320563.elements[21] = ((closureN)self_7312476)->elements[21];
-+c_7320563.elements[22] = ((closureN)self_7312476)->elements[22];
-+c_7320563.elements[23] = r_735852;
-+c_7320563.elements[24] = ((closureN)self_7312476)->elements[23];
-+
-+return_closcall2(data,  ((closureN)self_7312476)->elements[23],  &c_7320563, quote_map);; 
-+}
-+
-+static void __lambda_819(void *data, object self_7312477, int argc, object *args) /* object self_7312477, object r_735853 */
-+ {
-+ object r_735853 = args[0];
-+  
-+closureN_type c_7320566;
-+object e_7322572 [26];
-+c_7320566.hdr.mark = gc_color_red;
-+ c_7320566.hdr.grayed = 0;
-+c_7320566.tag = closureN_tag;
-+ c_7320566.fn = (function_type)__lambda_820;
-+c_7320566.num_args = 1;
-+c_7320566.num_elements = 26;
-+c_7320566.elements = (object *)e_7322572;
-+c_7320566.elements[0] = ((closureN)self_7312477)->elements[0];
-+c_7320566.elements[1] = ((closureN)self_7312477)->elements[1];
-+c_7320566.elements[2] = ((closureN)self_7312477)->elements[2];
-+c_7320566.elements[3] = ((closureN)self_7312477)->elements[3];
-+c_7320566.elements[4] = ((closureN)self_7312477)->elements[4];
-+c_7320566.elements[5] = ((closureN)self_7312477)->elements[5];
-+c_7320566.elements[6] = ((closureN)self_7312477)->elements[6];
-+c_7320566.elements[7] = ((closureN)self_7312477)->elements[7];
-+c_7320566.elements[8] = ((closureN)self_7312477)->elements[8];
-+c_7320566.elements[9] = ((closureN)self_7312477)->elements[9];
-+c_7320566.elements[10] = ((closureN)self_7312477)->elements[10];
-+c_7320566.elements[11] = ((closureN)self_7312477)->elements[11];
-+c_7320566.elements[12] = ((closureN)self_7312477)->elements[12];
-+c_7320566.elements[13] = ((closureN)self_7312477)->elements[13];
-+c_7320566.elements[14] = ((closureN)self_7312477)->elements[14];
-+c_7320566.elements[15] = ((closureN)self_7312477)->elements[15];
-+c_7320566.elements[16] = ((closureN)self_7312477)->elements[16];
-+c_7320566.elements[17] = ((closureN)self_7312477)->elements[17];
-+c_7320566.elements[18] = ((closureN)self_7312477)->elements[18];
-+c_7320566.elements[19] = ((closureN)self_7312477)->elements[19];
-+c_7320566.elements[20] = ((closureN)self_7312477)->elements[20];
-+c_7320566.elements[21] = ((closureN)self_7312477)->elements[21];
-+c_7320566.elements[22] = ((closureN)self_7312477)->elements[22];
-+c_7320566.elements[23] = ((closureN)self_7312477)->elements[23];
-+c_7320566.elements[24] = r_735853;
-+c_7320566.elements[25] = ((closureN)self_7312477)->elements[24];
-+
-+return_closcall2(data,  ((closureN)self_7312477)->elements[24],  &c_7320566, quote_vector_127);; 
-+}
-+
-+static void __lambda_820(void *data, object self_7312478, int argc, object *args) /* object self_7312478, object r_735854 */
-+ {
-+ object r_735854 = args[0];
-+  
-+closureN_type c_7320569;
-+object e_7322571 [27];
-+c_7320569.hdr.mark = gc_color_red;
-+ c_7320569.hdr.grayed = 0;
-+c_7320569.tag = closureN_tag;
-+ c_7320569.fn = (function_type)__lambda_821;
-+c_7320569.num_args = 1;
-+c_7320569.num_elements = 27;
-+c_7320569.elements = (object *)e_7322571;
-+c_7320569.elements[0] = ((closureN)self_7312478)->elements[0];
-+c_7320569.elements[1] = ((closureN)self_7312478)->elements[1];
-+c_7320569.elements[2] = ((closureN)self_7312478)->elements[2];
-+c_7320569.elements[3] = ((closureN)self_7312478)->elements[3];
-+c_7320569.elements[4] = ((closureN)self_7312478)->elements[4];
-+c_7320569.elements[5] = ((closureN)self_7312478)->elements[5];
-+c_7320569.elements[6] = ((closureN)self_7312478)->elements[6];
-+c_7320569.elements[7] = ((closureN)self_7312478)->elements[7];
-+c_7320569.elements[8] = ((closureN)self_7312478)->elements[8];
-+c_7320569.elements[9] = ((closureN)self_7312478)->elements[9];
-+c_7320569.elements[10] = ((closureN)self_7312478)->elements[10];
-+c_7320569.elements[11] = ((closureN)self_7312478)->elements[11];
-+c_7320569.elements[12] = ((closureN)self_7312478)->elements[12];
-+c_7320569.elements[13] = ((closureN)self_7312478)->elements[13];
-+c_7320569.elements[14] = ((closureN)self_7312478)->elements[14];
-+c_7320569.elements[15] = ((closureN)self_7312478)->elements[15];
-+c_7320569.elements[16] = ((closureN)self_7312478)->elements[16];
-+c_7320569.elements[17] = ((closureN)self_7312478)->elements[17];
-+c_7320569.elements[18] = ((closureN)self_7312478)->elements[18];
-+c_7320569.elements[19] = ((closureN)self_7312478)->elements[19];
-+c_7320569.elements[20] = ((closureN)self_7312478)->elements[20];
-+c_7320569.elements[21] = ((closureN)self_7312478)->elements[21];
-+c_7320569.elements[22] = ((closureN)self_7312478)->elements[22];
-+c_7320569.elements[23] = ((closureN)self_7312478)->elements[23];
-+c_7320569.elements[24] = ((closureN)self_7312478)->elements[24];
-+c_7320569.elements[25] = r_735854;
-+c_7320569.elements[26] = ((closureN)self_7312478)->elements[25];
-+
-+return_closcall2(data,  ((closureN)self_7312478)->elements[25],  &c_7320569, quote_list_127);; 
-+}
-+
-+static void __lambda_821(void *data, object self_7312479, int argc, object *args) /* object self_7312479, object r_735855 */
-+ {
-+ object r_735855 = args[0];
-+  
-+closureN_type c_7320572;
-+object e_7322570 [28];
-+c_7320572.hdr.mark = gc_color_red;
-+ c_7320572.hdr.grayed = 0;
-+c_7320572.tag = closureN_tag;
-+ c_7320572.fn = (function_type)__lambda_822;
-+c_7320572.num_args = 1;
-+c_7320572.num_elements = 28;
-+c_7320572.elements = (object *)e_7322570;
-+c_7320572.elements[0] = ((closureN)self_7312479)->elements[0];
-+c_7320572.elements[1] = ((closureN)self_7312479)->elements[1];
-+c_7320572.elements[2] = ((closureN)self_7312479)->elements[2];
-+c_7320572.elements[3] = ((closureN)self_7312479)->elements[3];
-+c_7320572.elements[4] = ((closureN)self_7312479)->elements[4];
-+c_7320572.elements[5] = ((closureN)self_7312479)->elements[5];
-+c_7320572.elements[6] = ((closureN)self_7312479)->elements[6];
-+c_7320572.elements[7] = ((closureN)self_7312479)->elements[7];
-+c_7320572.elements[8] = ((closureN)self_7312479)->elements[8];
-+c_7320572.elements[9] = ((closureN)self_7312479)->elements[9];
-+c_7320572.elements[10] = ((closureN)self_7312479)->elements[10];
-+c_7320572.elements[11] = ((closureN)self_7312479)->elements[11];
-+c_7320572.elements[12] = ((closureN)self_7312479)->elements[12];
-+c_7320572.elements[13] = ((closureN)self_7312479)->elements[13];
-+c_7320572.elements[14] = ((closureN)self_7312479)->elements[14];
-+c_7320572.elements[15] = ((closureN)self_7312479)->elements[15];
-+c_7320572.elements[16] = ((closureN)self_7312479)->elements[16];
-+c_7320572.elements[17] = ((closureN)self_7312479)->elements[17];
-+c_7320572.elements[18] = ((closureN)self_7312479)->elements[18];
-+c_7320572.elements[19] = ((closureN)self_7312479)->elements[19];
-+c_7320572.elements[20] = ((closureN)self_7312479)->elements[20];
-+c_7320572.elements[21] = ((closureN)self_7312479)->elements[21];
-+c_7320572.elements[22] = ((closureN)self_7312479)->elements[22];
-+c_7320572.elements[23] = ((closureN)self_7312479)->elements[23];
-+c_7320572.elements[24] = ((closureN)self_7312479)->elements[24];
-+c_7320572.elements[25] = ((closureN)self_7312479)->elements[25];
-+c_7320572.elements[26] = r_735855;
-+c_7320572.elements[27] = ((closureN)self_7312479)->elements[26];
-+
-+return_closcall2(data,  ((closureN)self_7312479)->elements[26],  &c_7320572, quote_len);; 
-+}
-+
-+static void __lambda_822(void *data, object self_7312480, int argc, object *args) /* object self_7312480, object r_735856 */
-+ {
-+ object r_735856 = args[0];
-+  
-+closureN_type c_7320575;
-+object e_7322569 [29];
-+c_7320575.hdr.mark = gc_color_red;
-+ c_7320575.hdr.grayed = 0;
-+c_7320575.tag = closureN_tag;
-+ c_7320575.fn = (function_type)__lambda_823;
-+c_7320575.num_args = 1;
-+c_7320575.num_elements = 29;
-+c_7320575.elements = (object *)e_7322569;
-+c_7320575.elements[0] = ((closureN)self_7312480)->elements[0];
-+c_7320575.elements[1] = ((closureN)self_7312480)->elements[1];
-+c_7320575.elements[2] = ((closureN)self_7312480)->elements[2];
-+c_7320575.elements[3] = ((closureN)self_7312480)->elements[3];
-+c_7320575.elements[4] = ((closureN)self_7312480)->elements[4];
-+c_7320575.elements[5] = ((closureN)self_7312480)->elements[5];
-+c_7320575.elements[6] = ((closureN)self_7312480)->elements[6];
-+c_7320575.elements[7] = ((closureN)self_7312480)->elements[7];
-+c_7320575.elements[8] = ((closureN)self_7312480)->elements[8];
-+c_7320575.elements[9] = ((closureN)self_7312480)->elements[9];
-+c_7320575.elements[10] = ((closureN)self_7312480)->elements[10];
-+c_7320575.elements[11] = ((closureN)self_7312480)->elements[11];
-+c_7320575.elements[12] = ((closureN)self_7312480)->elements[12];
-+c_7320575.elements[13] = ((closureN)self_7312480)->elements[13];
-+c_7320575.elements[14] = ((closureN)self_7312480)->elements[14];
-+c_7320575.elements[15] = ((closureN)self_7312480)->elements[15];
-+c_7320575.elements[16] = ((closureN)self_7312480)->elements[16];
-+c_7320575.elements[17] = ((closureN)self_7312480)->elements[17];
-+c_7320575.elements[18] = ((closureN)self_7312480)->elements[18];
-+c_7320575.elements[19] = ((closureN)self_7312480)->elements[19];
-+c_7320575.elements[20] = ((closureN)self_7312480)->elements[20];
-+c_7320575.elements[21] = ((closureN)self_7312480)->elements[21];
-+c_7320575.elements[22] = ((closureN)self_7312480)->elements[22];
-+c_7320575.elements[23] = ((closureN)self_7312480)->elements[23];
-+c_7320575.elements[24] = ((closureN)self_7312480)->elements[24];
-+c_7320575.elements[25] = ((closureN)self_7312480)->elements[25];
-+c_7320575.elements[26] = ((closureN)self_7312480)->elements[26];
-+c_7320575.elements[27] = r_735856;
-+c_7320575.elements[28] = ((closureN)self_7312480)->elements[27];
-+
-+return_closcall2(data,  ((closureN)self_7312480)->elements[27],  &c_7320575, quote_length);; 
-+}
-+
-+static void __lambda_823(void *data, object self_7312481, int argc, object *args) /* object self_7312481, object r_735857 */
-+ {
-+ object r_735857 = args[0];
-+  
-+closureN_type c_7320578;
-+object e_7322568 [30];
-+c_7320578.hdr.mark = gc_color_red;
-+ c_7320578.hdr.grayed = 0;
-+c_7320578.tag = closureN_tag;
-+ c_7320578.fn = (function_type)__lambda_824;
-+c_7320578.num_args = 1;
-+c_7320578.num_elements = 30;
-+c_7320578.elements = (object *)e_7322568;
-+c_7320578.elements[0] = ((closureN)self_7312481)->elements[0];
-+c_7320578.elements[1] = ((closureN)self_7312481)->elements[1];
-+c_7320578.elements[2] = ((closureN)self_7312481)->elements[2];
-+c_7320578.elements[3] = ((closureN)self_7312481)->elements[3];
-+c_7320578.elements[4] = ((closureN)self_7312481)->elements[4];
-+c_7320578.elements[5] = ((closureN)self_7312481)->elements[5];
-+c_7320578.elements[6] = ((closureN)self_7312481)->elements[6];
-+c_7320578.elements[7] = ((closureN)self_7312481)->elements[7];
-+c_7320578.elements[8] = ((closureN)self_7312481)->elements[8];
-+c_7320578.elements[9] = ((closureN)self_7312481)->elements[9];
-+c_7320578.elements[10] = ((closureN)self_7312481)->elements[10];
-+c_7320578.elements[11] = ((closureN)self_7312481)->elements[11];
-+c_7320578.elements[12] = ((closureN)self_7312481)->elements[12];
-+c_7320578.elements[13] = ((closureN)self_7312481)->elements[13];
-+c_7320578.elements[14] = ((closureN)self_7312481)->elements[14];
-+c_7320578.elements[15] = ((closureN)self_7312481)->elements[15];
-+c_7320578.elements[16] = ((closureN)self_7312481)->elements[16];
-+c_7320578.elements[17] = ((closureN)self_7312481)->elements[17];
-+c_7320578.elements[18] = ((closureN)self_7312481)->elements[18];
-+c_7320578.elements[19] = ((closureN)self_7312481)->elements[19];
-+c_7320578.elements[20] = ((closureN)self_7312481)->elements[20];
-+c_7320578.elements[21] = ((closureN)self_7312481)->elements[21];
-+c_7320578.elements[22] = ((closureN)self_7312481)->elements[22];
-+c_7320578.elements[23] = ((closureN)self_7312481)->elements[23];
-+c_7320578.elements[24] = ((closureN)self_7312481)->elements[24];
-+c_7320578.elements[25] = ((closureN)self_7312481)->elements[25];
-+c_7320578.elements[26] = ((closureN)self_7312481)->elements[26];
-+c_7320578.elements[27] = ((closureN)self_7312481)->elements[27];
-+c_7320578.elements[28] = r_735857;
-+c_7320578.elements[29] = ((closureN)self_7312481)->elements[28];
-+
-+return_closcall2(data,  ((closureN)self_7312481)->elements[28],  &c_7320578, quote__91);; 
-+}
-+
-+static void __lambda_824(void *data, object self_7312482, int argc, object *args) /* object self_7312482, object r_735858 */
-+ {
-+ object r_735858 = args[0];
-+  
-+closureN_type c_7320581;
-+object e_7322567 [31];
-+c_7320581.hdr.mark = gc_color_red;
-+ c_7320581.hdr.grayed = 0;
-+c_7320581.tag = closureN_tag;
-+ c_7320581.fn = (function_type)__lambda_825;
-+c_7320581.num_args = 1;
-+c_7320581.num_elements = 31;
-+c_7320581.elements = (object *)e_7322567;
-+c_7320581.elements[0] = ((closureN)self_7312482)->elements[0];
-+c_7320581.elements[1] = ((closureN)self_7312482)->elements[1];
-+c_7320581.elements[2] = ((closureN)self_7312482)->elements[2];
-+c_7320581.elements[3] = ((closureN)self_7312482)->elements[3];
-+c_7320581.elements[4] = ((closureN)self_7312482)->elements[4];
-+c_7320581.elements[5] = ((closureN)self_7312482)->elements[5];
-+c_7320581.elements[6] = ((closureN)self_7312482)->elements[6];
-+c_7320581.elements[7] = ((closureN)self_7312482)->elements[7];
-+c_7320581.elements[8] = ((closureN)self_7312482)->elements[8];
-+c_7320581.elements[9] = ((closureN)self_7312482)->elements[9];
-+c_7320581.elements[10] = ((closureN)self_7312482)->elements[10];
-+c_7320581.elements[11] = ((closureN)self_7312482)->elements[11];
-+c_7320581.elements[12] = ((closureN)self_7312482)->elements[12];
-+c_7320581.elements[13] = ((closureN)self_7312482)->elements[13];
-+c_7320581.elements[14] = ((closureN)self_7312482)->elements[14];
-+c_7320581.elements[15] = ((closureN)self_7312482)->elements[15];
-+c_7320581.elements[16] = ((closureN)self_7312482)->elements[16];
-+c_7320581.elements[17] = ((closureN)self_7312482)->elements[17];
-+c_7320581.elements[18] = ((closureN)self_7312482)->elements[18];
-+c_7320581.elements[19] = ((closureN)self_7312482)->elements[19];
-+c_7320581.elements[20] = ((closureN)self_7312482)->elements[20];
-+c_7320581.elements[21] = ((closureN)self_7312482)->elements[21];
-+c_7320581.elements[22] = ((closureN)self_7312482)->elements[22];
-+c_7320581.elements[23] = ((closureN)self_7312482)->elements[23];
-+c_7320581.elements[24] = ((closureN)self_7312482)->elements[24];
-+c_7320581.elements[25] = ((closureN)self_7312482)->elements[25];
-+c_7320581.elements[26] = ((closureN)self_7312482)->elements[26];
-+c_7320581.elements[27] = ((closureN)self_7312482)->elements[27];
-+c_7320581.elements[28] = ((closureN)self_7312482)->elements[28];
-+c_7320581.elements[29] = r_735858;
-+c_7320581.elements[30] = ((closureN)self_7312482)->elements[29];
-+
-+return_closcall2(data,  ((closureN)self_7312482)->elements[29],  &c_7320581, quote__125_123);; 
-+}
-+
-+static void __lambda_825(void *data, object self_7312483, int argc, object *args) /* object self_7312483, object r_735859 */
-+ {
-+ object r_735859 = args[0];
-+  
-+closureN_type c_7320584;
-+object e_7322566 [32];
-+c_7320584.hdr.mark = gc_color_red;
-+ c_7320584.hdr.grayed = 0;
-+c_7320584.tag = closureN_tag;
-+ c_7320584.fn = (function_type)__lambda_826;
-+c_7320584.num_args = 1;
-+c_7320584.num_elements = 32;
-+c_7320584.elements = (object *)e_7322566;
-+c_7320584.elements[0] = ((closureN)self_7312483)->elements[0];
-+c_7320584.elements[1] = ((closureN)self_7312483)->elements[1];
-+c_7320584.elements[2] = ((closureN)self_7312483)->elements[2];
-+c_7320584.elements[3] = ((closureN)self_7312483)->elements[3];
-+c_7320584.elements[4] = ((closureN)self_7312483)->elements[4];
-+c_7320584.elements[5] = ((closureN)self_7312483)->elements[5];
-+c_7320584.elements[6] = ((closureN)self_7312483)->elements[6];
-+c_7320584.elements[7] = ((closureN)self_7312483)->elements[7];
-+c_7320584.elements[8] = ((closureN)self_7312483)->elements[8];
-+c_7320584.elements[9] = ((closureN)self_7312483)->elements[9];
-+c_7320584.elements[10] = ((closureN)self_7312483)->elements[10];
-+c_7320584.elements[11] = ((closureN)self_7312483)->elements[11];
-+c_7320584.elements[12] = ((closureN)self_7312483)->elements[12];
-+c_7320584.elements[13] = ((closureN)self_7312483)->elements[13];
-+c_7320584.elements[14] = ((closureN)self_7312483)->elements[14];
-+c_7320584.elements[15] = ((closureN)self_7312483)->elements[15];
-+c_7320584.elements[16] = ((closureN)self_7312483)->elements[16];
-+c_7320584.elements[17] = ((closureN)self_7312483)->elements[17];
-+c_7320584.elements[18] = ((closureN)self_7312483)->elements[18];
-+c_7320584.elements[19] = ((closureN)self_7312483)->elements[19];
-+c_7320584.elements[20] = ((closureN)self_7312483)->elements[20];
-+c_7320584.elements[21] = ((closureN)self_7312483)->elements[21];
-+c_7320584.elements[22] = ((closureN)self_7312483)->elements[22];
-+c_7320584.elements[23] = ((closureN)self_7312483)->elements[23];
-+c_7320584.elements[24] = ((closureN)self_7312483)->elements[24];
-+c_7320584.elements[25] = ((closureN)self_7312483)->elements[25];
-+c_7320584.elements[26] = ((closureN)self_7312483)->elements[26];
-+c_7320584.elements[27] = ((closureN)self_7312483)->elements[27];
-+c_7320584.elements[28] = ((closureN)self_7312483)->elements[28];
-+c_7320584.elements[29] = ((closureN)self_7312483)->elements[29];
-+c_7320584.elements[30] = r_735859;
-+c_7320584.elements[31] = ((closureN)self_7312483)->elements[30];
-+
-+return_closcall2(data,  ((closureN)self_7312483)->elements[30],  &c_7320584, quote_error_95loc);; 
-+}
-+
-+static void __lambda_826(void *data, object self_7312484, int argc, object *args) /* object self_7312484, object r_735860 */
-+ {
-+ object r_735860 = args[0];
-+  
-+closureN_type c_7320587;
-+object e_7322565 [33];
-+c_7320587.hdr.mark = gc_color_red;
-+ c_7320587.hdr.grayed = 0;
-+c_7320587.tag = closureN_tag;
-+ c_7320587.fn = (function_type)__lambda_827;
-+c_7320587.num_args = 1;
-+c_7320587.num_elements = 33;
-+c_7320587.elements = (object *)e_7322565;
-+c_7320587.elements[0] = ((closureN)self_7312484)->elements[0];
-+c_7320587.elements[1] = ((closureN)self_7312484)->elements[1];
-+c_7320587.elements[2] = ((closureN)self_7312484)->elements[2];
-+c_7320587.elements[3] = ((closureN)self_7312484)->elements[3];
-+c_7320587.elements[4] = ((closureN)self_7312484)->elements[4];
-+c_7320587.elements[5] = ((closureN)self_7312484)->elements[5];
-+c_7320587.elements[6] = ((closureN)self_7312484)->elements[6];
-+c_7320587.elements[7] = ((closureN)self_7312484)->elements[7];
-+c_7320587.elements[8] = ((closureN)self_7312484)->elements[8];
-+c_7320587.elements[9] = ((closureN)self_7312484)->elements[9];
-+c_7320587.elements[10] = ((closureN)self_7312484)->elements[10];
-+c_7320587.elements[11] = ((closureN)self_7312484)->elements[11];
-+c_7320587.elements[12] = ((closureN)self_7312484)->elements[12];
-+c_7320587.elements[13] = ((closureN)self_7312484)->elements[13];
-+c_7320587.elements[14] = ((closureN)self_7312484)->elements[14];
-+c_7320587.elements[15] = ((closureN)self_7312484)->elements[15];
-+c_7320587.elements[16] = ((closureN)self_7312484)->elements[16];
-+c_7320587.elements[17] = ((closureN)self_7312484)->elements[17];
-+c_7320587.elements[18] = ((closureN)self_7312484)->elements[18];
-+c_7320587.elements[19] = ((closureN)self_7312484)->elements[19];
-+c_7320587.elements[20] = ((closureN)self_7312484)->elements[20];
-+c_7320587.elements[21] = ((closureN)self_7312484)->elements[21];
-+c_7320587.elements[22] = ((closureN)self_7312484)->elements[22];
-+c_7320587.elements[23] = ((closureN)self_7312484)->elements[23];
-+c_7320587.elements[24] = ((closureN)self_7312484)->elements[24];
-+c_7320587.elements[25] = ((closureN)self_7312484)->elements[25];
-+c_7320587.elements[26] = ((closureN)self_7312484)->elements[26];
-+c_7320587.elements[27] = ((closureN)self_7312484)->elements[27];
-+c_7320587.elements[28] = ((closureN)self_7312484)->elements[28];
-+c_7320587.elements[29] = ((closureN)self_7312484)->elements[29];
-+c_7320587.elements[30] = ((closureN)self_7312484)->elements[30];
-+c_7320587.elements[31] = r_735860;
-+c_7320587.elements[32] = ((closureN)self_7312484)->elements[31];
-+
-+return_closcall2(data,  ((closureN)self_7312484)->elements[31],  &c_7320587, quote_ls);; 
-+}
-+
-+static void __lambda_827(void *data, object self_7312485, int argc, object *args) /* object self_7312485, object r_735861 */
-+ {
-+ object r_735861 = args[0];
-+  
-+closureN_type c_7320590;
-+object e_7322564 [34];
-+c_7320590.hdr.mark = gc_color_red;
-+ c_7320590.hdr.grayed = 0;
-+c_7320590.tag = closureN_tag;
-+ c_7320590.fn = (function_type)__lambda_828;
-+c_7320590.num_args = 1;
-+c_7320590.num_elements = 34;
-+c_7320590.elements = (object *)e_7322564;
-+c_7320590.elements[0] = ((closureN)self_7312485)->elements[0];
-+c_7320590.elements[1] = ((closureN)self_7312485)->elements[1];
-+c_7320590.elements[2] = ((closureN)self_7312485)->elements[2];
-+c_7320590.elements[3] = ((closureN)self_7312485)->elements[3];
-+c_7320590.elements[4] = ((closureN)self_7312485)->elements[4];
-+c_7320590.elements[5] = ((closureN)self_7312485)->elements[5];
-+c_7320590.elements[6] = ((closureN)self_7312485)->elements[6];
-+c_7320590.elements[7] = ((closureN)self_7312485)->elements[7];
-+c_7320590.elements[8] = ((closureN)self_7312485)->elements[8];
-+c_7320590.elements[9] = ((closureN)self_7312485)->elements[9];
-+c_7320590.elements[10] = ((closureN)self_7312485)->elements[10];
-+c_7320590.elements[11] = ((closureN)self_7312485)->elements[11];
-+c_7320590.elements[12] = ((closureN)self_7312485)->elements[12];
-+c_7320590.elements[13] = ((closureN)self_7312485)->elements[13];
-+c_7320590.elements[14] = ((closureN)self_7312485)->elements[14];
-+c_7320590.elements[15] = ((closureN)self_7312485)->elements[15];
-+c_7320590.elements[16] = ((closureN)self_7312485)->elements[16];
-+c_7320590.elements[17] = ((closureN)self_7312485)->elements[17];
-+c_7320590.elements[18] = ((closureN)self_7312485)->elements[18];
-+c_7320590.elements[19] = ((closureN)self_7312485)->elements[19];
-+c_7320590.elements[20] = ((closureN)self_7312485)->elements[20];
-+c_7320590.elements[21] = ((closureN)self_7312485)->elements[21];
-+c_7320590.elements[22] = ((closureN)self_7312485)->elements[22];
-+c_7320590.elements[23] = ((closureN)self_7312485)->elements[23];
-+c_7320590.elements[24] = ((closureN)self_7312485)->elements[24];
-+c_7320590.elements[25] = ((closureN)self_7312485)->elements[25];
-+c_7320590.elements[26] = ((closureN)self_7312485)->elements[26];
-+c_7320590.elements[27] = ((closureN)self_7312485)->elements[27];
-+c_7320590.elements[28] = ((closureN)self_7312485)->elements[28];
-+c_7320590.elements[29] = ((closureN)self_7312485)->elements[29];
-+c_7320590.elements[30] = ((closureN)self_7312485)->elements[30];
-+c_7320590.elements[31] = ((closureN)self_7312485)->elements[31];
-+c_7320590.elements[32] = r_735861;
-+c_7320590.elements[33] = ((closureN)self_7312485)->elements[32];
-+
-+return_closcall2(data,  ((closureN)self_7312485)->elements[32],  &c_7320590, quote_res);; 
-+}
-+
-+static void __lambda_828(void *data, object self_7312486, int argc, object *args) /* object self_7312486, object r_735862 */
-+ {
-+ object r_735862 = args[0];
-+  
-+closureN_type c_7320593;
-+object e_7322563 [35];
-+c_7320593.hdr.mark = gc_color_red;
-+ c_7320593.hdr.grayed = 0;
-+c_7320593.tag = closureN_tag;
-+ c_7320593.fn = (function_type)__lambda_829;
-+c_7320593.num_args = 1;
-+c_7320593.num_elements = 35;
-+c_7320593.elements = (object *)e_7322563;
-+c_7320593.elements[0] = ((closureN)self_7312486)->elements[0];
-+c_7320593.elements[1] = ((closureN)self_7312486)->elements[1];
-+c_7320593.elements[2] = ((closureN)self_7312486)->elements[2];
-+c_7320593.elements[3] = ((closureN)self_7312486)->elements[3];
-+c_7320593.elements[4] = ((closureN)self_7312486)->elements[4];
-+c_7320593.elements[5] = ((closureN)self_7312486)->elements[5];
-+c_7320593.elements[6] = ((closureN)self_7312486)->elements[6];
-+c_7320593.elements[7] = ((closureN)self_7312486)->elements[7];
-+c_7320593.elements[8] = ((closureN)self_7312486)->elements[8];
-+c_7320593.elements[9] = ((closureN)self_7312486)->elements[9];
-+c_7320593.elements[10] = ((closureN)self_7312486)->elements[10];
-+c_7320593.elements[11] = ((closureN)self_7312486)->elements[11];
-+c_7320593.elements[12] = ((closureN)self_7312486)->elements[12];
-+c_7320593.elements[13] = ((closureN)self_7312486)->elements[13];
-+c_7320593.elements[14] = ((closureN)self_7312486)->elements[14];
-+c_7320593.elements[15] = ((closureN)self_7312486)->elements[15];
-+c_7320593.elements[16] = ((closureN)self_7312486)->elements[16];
-+c_7320593.elements[17] = ((closureN)self_7312486)->elements[17];
-+c_7320593.elements[18] = ((closureN)self_7312486)->elements[18];
-+c_7320593.elements[19] = ((closureN)self_7312486)->elements[19];
-+c_7320593.elements[20] = ((closureN)self_7312486)->elements[20];
-+c_7320593.elements[21] = ((closureN)self_7312486)->elements[21];
-+c_7320593.elements[22] = ((closureN)self_7312486)->elements[22];
-+c_7320593.elements[23] = ((closureN)self_7312486)->elements[23];
-+c_7320593.elements[24] = ((closureN)self_7312486)->elements[24];
-+c_7320593.elements[25] = ((closureN)self_7312486)->elements[25];
-+c_7320593.elements[26] = ((closureN)self_7312486)->elements[26];
-+c_7320593.elements[27] = ((closureN)self_7312486)->elements[27];
-+c_7320593.elements[28] = ((closureN)self_7312486)->elements[28];
-+c_7320593.elements[29] = ((closureN)self_7312486)->elements[29];
-+c_7320593.elements[30] = ((closureN)self_7312486)->elements[30];
-+c_7320593.elements[31] = ((closureN)self_7312486)->elements[31];
-+c_7320593.elements[32] = ((closureN)self_7312486)->elements[32];
-+c_7320593.elements[33] = r_735862;
-+c_7320593.elements[34] = ((closureN)self_7312486)->elements[33];
-+
-+return_closcall2(data,  ((closureN)self_7312486)->elements[33],  &c_7320593, quote_i);; 
-+}
-+
-+static void __lambda_829(void *data, object self_7312487, int argc, object *args) /* object self_7312487, object r_735863 */
-+ {
-+ object r_735863 = args[0];
-+  
-+closureN_type c_7320596;
-+object e_7322562 [36];
-+c_7320596.hdr.mark = gc_color_red;
-+ c_7320596.hdr.grayed = 0;
-+c_7320596.tag = closureN_tag;
-+ c_7320596.fn = (function_type)__lambda_830;
-+c_7320596.num_args = 1;
-+c_7320596.num_elements = 36;
-+c_7320596.elements = (object *)e_7322562;
-+c_7320596.elements[0] = ((closureN)self_7312487)->elements[0];
-+c_7320596.elements[1] = ((closureN)self_7312487)->elements[1];
-+c_7320596.elements[2] = ((closureN)self_7312487)->elements[2];
-+c_7320596.elements[3] = ((closureN)self_7312487)->elements[3];
-+c_7320596.elements[4] = ((closureN)self_7312487)->elements[4];
-+c_7320596.elements[5] = ((closureN)self_7312487)->elements[5];
-+c_7320596.elements[6] = ((closureN)self_7312487)->elements[6];
-+c_7320596.elements[7] = ((closureN)self_7312487)->elements[7];
-+c_7320596.elements[8] = ((closureN)self_7312487)->elements[8];
-+c_7320596.elements[9] = ((closureN)self_7312487)->elements[9];
-+c_7320596.elements[10] = ((closureN)self_7312487)->elements[10];
-+c_7320596.elements[11] = ((closureN)self_7312487)->elements[11];
-+c_7320596.elements[12] = ((closureN)self_7312487)->elements[12];
-+c_7320596.elements[13] = ((closureN)self_7312487)->elements[13];
-+c_7320596.elements[14] = ((closureN)self_7312487)->elements[14];
-+c_7320596.elements[15] = ((closureN)self_7312487)->elements[15];
-+c_7320596.elements[16] = ((closureN)self_7312487)->elements[16];
-+c_7320596.elements[17] = ((closureN)self_7312487)->elements[17];
-+c_7320596.elements[18] = ((closureN)self_7312487)->elements[18];
-+c_7320596.elements[19] = ((closureN)self_7312487)->elements[19];
-+c_7320596.elements[20] = ((closureN)self_7312487)->elements[20];
-+c_7320596.elements[21] = ((closureN)self_7312487)->elements[21];
-+c_7320596.elements[22] = ((closureN)self_7312487)->elements[22];
-+c_7320596.elements[23] = ((closureN)self_7312487)->elements[23];
-+c_7320596.elements[24] = ((closureN)self_7312487)->elements[24];
-+c_7320596.elements[25] = ((closureN)self_7312487)->elements[25];
-+c_7320596.elements[26] = ((closureN)self_7312487)->elements[26];
-+c_7320596.elements[27] = ((closureN)self_7312487)->elements[27];
-+c_7320596.elements[28] = ((closureN)self_7312487)->elements[28];
-+c_7320596.elements[29] = ((closureN)self_7312487)->elements[29];
-+c_7320596.elements[30] = ((closureN)self_7312487)->elements[30];
-+c_7320596.elements[31] = ((closureN)self_7312487)->elements[31];
-+c_7320596.elements[32] = ((closureN)self_7312487)->elements[32];
-+c_7320596.elements[33] = ((closureN)self_7312487)->elements[33];
-+c_7320596.elements[34] = r_735863;
-+c_7320596.elements[35] = ((closureN)self_7312487)->elements[34];
-+
-+return_closcall2(data,  ((closureN)self_7312487)->elements[34],  &c_7320596, quote_reverse);; 
-+}
-+
-+static void __lambda_830(void *data, object self_7312488, int argc, object *args) /* object self_7312488, object r_735864 */
-+ {
-+ object r_735864 = args[0];
-+  
-+closureN_type c_7320599;
-+object e_7322561 [37];
-+c_7320599.hdr.mark = gc_color_red;
-+ c_7320599.hdr.grayed = 0;
-+c_7320599.tag = closureN_tag;
-+ c_7320599.fn = (function_type)__lambda_831;
-+c_7320599.num_args = 1;
-+c_7320599.num_elements = 37;
-+c_7320599.elements = (object *)e_7322561;
-+c_7320599.elements[0] = ((closureN)self_7312488)->elements[0];
-+c_7320599.elements[1] = ((closureN)self_7312488)->elements[1];
-+c_7320599.elements[2] = ((closureN)self_7312488)->elements[2];
-+c_7320599.elements[3] = ((closureN)self_7312488)->elements[3];
-+c_7320599.elements[4] = ((closureN)self_7312488)->elements[4];
-+c_7320599.elements[5] = ((closureN)self_7312488)->elements[5];
-+c_7320599.elements[6] = ((closureN)self_7312488)->elements[6];
-+c_7320599.elements[7] = ((closureN)self_7312488)->elements[7];
-+c_7320599.elements[8] = ((closureN)self_7312488)->elements[8];
-+c_7320599.elements[9] = ((closureN)self_7312488)->elements[9];
-+c_7320599.elements[10] = ((closureN)self_7312488)->elements[10];
-+c_7320599.elements[11] = ((closureN)self_7312488)->elements[11];
-+c_7320599.elements[12] = ((closureN)self_7312488)->elements[12];
-+c_7320599.elements[13] = ((closureN)self_7312488)->elements[13];
-+c_7320599.elements[14] = ((closureN)self_7312488)->elements[14];
-+c_7320599.elements[15] = ((closureN)self_7312488)->elements[15];
-+c_7320599.elements[16] = ((closureN)self_7312488)->elements[16];
-+c_7320599.elements[17] = ((closureN)self_7312488)->elements[17];
-+c_7320599.elements[18] = ((closureN)self_7312488)->elements[18];
-+c_7320599.elements[19] = ((closureN)self_7312488)->elements[19];
-+c_7320599.elements[20] = ((closureN)self_7312488)->elements[20];
-+c_7320599.elements[21] = ((closureN)self_7312488)->elements[21];
-+c_7320599.elements[22] = ((closureN)self_7312488)->elements[22];
-+c_7320599.elements[23] = ((closureN)self_7312488)->elements[23];
-+c_7320599.elements[24] = ((closureN)self_7312488)->elements[24];
-+c_7320599.elements[25] = ((closureN)self_7312488)->elements[25];
-+c_7320599.elements[26] = ((closureN)self_7312488)->elements[26];
-+c_7320599.elements[27] = ((closureN)self_7312488)->elements[27];
-+c_7320599.elements[28] = ((closureN)self_7312488)->elements[28];
-+c_7320599.elements[29] = ((closureN)self_7312488)->elements[29];
-+c_7320599.elements[30] = ((closureN)self_7312488)->elements[30];
-+c_7320599.elements[31] = ((closureN)self_7312488)->elements[31];
-+c_7320599.elements[32] = ((closureN)self_7312488)->elements[32];
-+c_7320599.elements[33] = ((closureN)self_7312488)->elements[33];
-+c_7320599.elements[34] = ((closureN)self_7312488)->elements[34];
-+c_7320599.elements[35] = r_735864;
-+c_7320599.elements[36] = ((closureN)self_7312488)->elements[35];
-+
-+return_closcall2(data,  ((closureN)self_7312488)->elements[35],  &c_7320599, quote_vector_91_125list);; 
-+}
-+
-+static void __lambda_831(void *data, object self_7312489, int argc, object *args) /* object self_7312489, object r_735865 */
-+ {
-+ object r_735865 = args[0];
-+  
-+closureN_type c_7320602;
-+object e_7322560 [38];
-+c_7320602.hdr.mark = gc_color_red;
-+ c_7320602.hdr.grayed = 0;
-+c_7320602.tag = closureN_tag;
-+ c_7320602.fn = (function_type)__lambda_832;
-+c_7320602.num_args = 1;
-+c_7320602.num_elements = 38;
-+c_7320602.elements = (object *)e_7322560;
-+c_7320602.elements[0] = ((closureN)self_7312489)->elements[0];
-+c_7320602.elements[1] = ((closureN)self_7312489)->elements[1];
-+c_7320602.elements[2] = ((closureN)self_7312489)->elements[2];
-+c_7320602.elements[3] = ((closureN)self_7312489)->elements[3];
-+c_7320602.elements[4] = ((closureN)self_7312489)->elements[4];
-+c_7320602.elements[5] = ((closureN)self_7312489)->elements[5];
-+c_7320602.elements[6] = ((closureN)self_7312489)->elements[6];
-+c_7320602.elements[7] = ((closureN)self_7312489)->elements[7];
-+c_7320602.elements[8] = ((closureN)self_7312489)->elements[8];
-+c_7320602.elements[9] = ((closureN)self_7312489)->elements[9];
-+c_7320602.elements[10] = ((closureN)self_7312489)->elements[10];
-+c_7320602.elements[11] = ((closureN)self_7312489)->elements[11];
-+c_7320602.elements[12] = ((closureN)self_7312489)->elements[12];
-+c_7320602.elements[13] = ((closureN)self_7312489)->elements[13];
-+c_7320602.elements[14] = ((closureN)self_7312489)->elements[14];
-+c_7320602.elements[15] = ((closureN)self_7312489)->elements[15];
-+c_7320602.elements[16] = ((closureN)self_7312489)->elements[16];
-+c_7320602.elements[17] = ((closureN)self_7312489)->elements[17];
-+c_7320602.elements[18] = ((closureN)self_7312489)->elements[18];
-+c_7320602.elements[19] = ((closureN)self_7312489)->elements[19];
-+c_7320602.elements[20] = ((closureN)self_7312489)->elements[20];
-+c_7320602.elements[21] = ((closureN)self_7312489)->elements[21];
-+c_7320602.elements[22] = ((closureN)self_7312489)->elements[22];
-+c_7320602.elements[23] = ((closureN)self_7312489)->elements[23];
-+c_7320602.elements[24] = ((closureN)self_7312489)->elements[24];
-+c_7320602.elements[25] = ((closureN)self_7312489)->elements[25];
-+c_7320602.elements[26] = ((closureN)self_7312489)->elements[26];
-+c_7320602.elements[27] = ((closureN)self_7312489)->elements[27];
-+c_7320602.elements[28] = ((closureN)self_7312489)->elements[28];
-+c_7320602.elements[29] = ((closureN)self_7312489)->elements[29];
-+c_7320602.elements[30] = ((closureN)self_7312489)->elements[30];
-+c_7320602.elements[31] = ((closureN)self_7312489)->elements[31];
-+c_7320602.elements[32] = ((closureN)self_7312489)->elements[32];
-+c_7320602.elements[33] = ((closureN)self_7312489)->elements[33];
-+c_7320602.elements[34] = ((closureN)self_7312489)->elements[34];
-+c_7320602.elements[35] = ((closureN)self_7312489)->elements[35];
-+c_7320602.elements[36] = r_735865;
-+c_7320602.elements[37] = ((closureN)self_7312489)->elements[36];
-+
-+return_closcall2(data,  ((closureN)self_7312489)->elements[36],  &c_7320602, quote_list_91_125vector);; 
-+}
-+
-+static void __lambda_832(void *data, object self_7312490, int argc, object *args) /* object self_7312490, object r_735866 */
-+ {
-+ object r_735866 = args[0];
-+  
-+closureN_type c_7320605;
-+object e_7322559 [39];
-+c_7320605.hdr.mark = gc_color_red;
-+ c_7320605.hdr.grayed = 0;
-+c_7320605.tag = closureN_tag;
-+ c_7320605.fn = (function_type)__lambda_833;
-+c_7320605.num_args = 1;
-+c_7320605.num_elements = 39;
-+c_7320605.elements = (object *)e_7322559;
-+c_7320605.elements[0] = ((closureN)self_7312490)->elements[0];
-+c_7320605.elements[1] = ((closureN)self_7312490)->elements[1];
-+c_7320605.elements[2] = ((closureN)self_7312490)->elements[2];
-+c_7320605.elements[3] = ((closureN)self_7312490)->elements[3];
-+c_7320605.elements[4] = ((closureN)self_7312490)->elements[4];
-+c_7320605.elements[5] = ((closureN)self_7312490)->elements[5];
-+c_7320605.elements[6] = ((closureN)self_7312490)->elements[6];
-+c_7320605.elements[7] = ((closureN)self_7312490)->elements[7];
-+c_7320605.elements[8] = ((closureN)self_7312490)->elements[8];
-+c_7320605.elements[9] = ((closureN)self_7312490)->elements[9];
-+c_7320605.elements[10] = ((closureN)self_7312490)->elements[10];
-+c_7320605.elements[11] = ((closureN)self_7312490)->elements[11];
-+c_7320605.elements[12] = ((closureN)self_7312490)->elements[12];
-+c_7320605.elements[13] = ((closureN)self_7312490)->elements[13];
-+c_7320605.elements[14] = ((closureN)self_7312490)->elements[14];
-+c_7320605.elements[15] = ((closureN)self_7312490)->elements[15];
-+c_7320605.elements[16] = ((closureN)self_7312490)->elements[16];
-+c_7320605.elements[17] = ((closureN)self_7312490)->elements[17];
-+c_7320605.elements[18] = ((closureN)self_7312490)->elements[18];
-+c_7320605.elements[19] = ((closureN)self_7312490)->elements[19];
-+c_7320605.elements[20] = ((closureN)self_7312490)->elements[20];
-+c_7320605.elements[21] = ((closureN)self_7312490)->elements[21];
-+c_7320605.elements[22] = ((closureN)self_7312490)->elements[22];
-+c_7320605.elements[23] = ((closureN)self_7312490)->elements[23];
-+c_7320605.elements[24] = ((closureN)self_7312490)->elements[24];
-+c_7320605.elements[25] = ((closureN)self_7312490)->elements[25];
-+c_7320605.elements[26] = ((closureN)self_7312490)->elements[26];
-+c_7320605.elements[27] = ((closureN)self_7312490)->elements[27];
-+c_7320605.elements[28] = ((closureN)self_7312490)->elements[28];
-+c_7320605.elements[29] = ((closureN)self_7312490)->elements[29];
-+c_7320605.elements[30] = ((closureN)self_7312490)->elements[30];
-+c_7320605.elements[31] = ((closureN)self_7312490)->elements[31];
-+c_7320605.elements[32] = ((closureN)self_7312490)->elements[32];
-+c_7320605.elements[33] = ((closureN)self_7312490)->elements[33];
-+c_7320605.elements[34] = ((closureN)self_7312490)->elements[34];
-+c_7320605.elements[35] = ((closureN)self_7312490)->elements[35];
-+c_7320605.elements[36] = ((closureN)self_7312490)->elements[36];
-+c_7320605.elements[37] = r_735866;
-+c_7320605.elements[38] = ((closureN)self_7312490)->elements[37];
-+
-+return_closcall2(data,  ((closureN)self_7312490)->elements[37],  &c_7320605, quote_cons_91source);; 
-+}
-+
-+static void __lambda_833(void *data, object self_7312491, int argc, object *args) /* object self_7312491, object r_735867 */
-+ {
-+ object r_735867 = args[0];
-+  
-+closureN_type c_7320607;
-+object e_7322523 [4];
-+c_7320607.hdr.mark = gc_color_red;
-+ c_7320607.hdr.grayed = 0;
-+c_7320607.tag = closureN_tag;
-+ c_7320607.fn = (function_type)__lambda_834;
-+c_7320607.num_args = 37;
-+c_7320607.num_elements = 4;
-+c_7320607.elements = (object *)e_7322523;
-+c_7320607.elements[0] = ((closureN)self_7312491)->elements[0];
-+c_7320607.elements[1] = ((closureN)self_7312491)->elements[1];
-+c_7320607.elements[2] = ((closureN)self_7312491)->elements[2];
-+c_7320607.elements[3] = ((closureN)self_7312491)->elements[38];
-+
-+return_direct_with_clo37(data,(closure)&c_7320607,__lambda_834,  ((closureN)self_7312491)->elements[3], obj_int2obj(0), ((closureN)self_7312491)->elements[4], ((closureN)self_7312491)->elements[5], ((closureN)self_7312491)->elements[6], ((closureN)self_7312491)->elements[7], ((closureN)self_7312491)->elements[8], ((closureN)self_7312491)->elements[9], ((closureN)self_7312491)->elements[10], ((closureN)self_7312491)->elements[11], ((closureN)self_7312491)->elements[12], ((closureN)self_7312491)->elements[13], ((closureN)self_7312491)->elements[14], ((closureN)self_7312491)->elements[15], ((closureN)self_7312491)->elements[16], ((closureN)self_7312491)->elements[17], ((closureN)self_7312491)->elements[18], ((closureN)self_7312491)->elements[19], ((closureN)self_7312491)->elements[20], ((closureN)self_7312491)->elements[21], ((closureN)self_7312491)->elements[22], ((closureN)self_7312491)->elements[23], ((closureN)self_7312491)->elements[24], ((closureN)self_7312491)->elements
[25], ((closureN)self_7312491)->elements[26], ((closureN)self_7312491)->elements[27], ((closureN)self_7312491)->elements[28], ((closureN)self_7312491)->elements[29], ((closureN)self_7312491)->elements[30], ((closureN)self_7312491)->elements[31], ((closureN)self_7312491)->elements[32], ((closureN)self_7312491)->elements[33], ((closureN)self_7312491)->elements[34], ((closureN)self_7312491)->elements[35], ((closureN)self_7312491)->elements[36], ((closureN)self_7312491)->elements[37], r_735867);; 
-+}
-+
-+static void __lambda_834(void *data, object self_7312492, int argc, object *args) /* object self_7312492, object ellipsis_91specified_127_731235_733183, object count_731236_733184, object _191er_91macro_91transformer_731237_733185, object _191lambda_731238_733186, object _191let_731239_733187, object _191begin_731240_733188, object _191if_731241_733189, object _191and_731242_733190, object _191or_731243_733191, object _191eq_127_731244_733192, object _191equal_127_731245_733193, object _191car_731246_733194, object _191cdr_731247_733195, object _191cons_731248_733196, object _191pair_127_731249_733197, object _191null_127_731250_733198, object _191expr_731251_733199, object _191rename_731252_733200, object _191compare_731253_733201, object _191quote_731254_733202, object _191apply_731255_733203, object _191append_731256_733204, object _191map_731257_733205, object _191vector_127_731258_733206, object _191list_127_731259_733207, object _191len_731260_733208, object _191lengt
h_731261_733209, object _191_91_731262_733210, object _191_125_123_731263_733211, object _191error_731264_733212, object _191ls_731265_733213, object _191res_731266_733214, object _191i_731267_733215, object _191reverse_731268_733216, object _191vector_91_125list_731269_733217, object _191list_91_125vector_731270_733218, object _191cons3_731271_733219 */
-+ {
-+ object ellipsis_91specified_127_731235_733183 = args[0]; object count_731236_733184 = args[1]; object _191er_91macro_91transformer_731237_733185 = args[2]; object _191lambda_731238_733186 = args[3]; object _191let_731239_733187 = args[4]; object _191if_731241_733189 = args[6]; object _191and_731242_733190 = args[7]; object _191or_731243_733191 = args[8]; object _191equal_127_731245_733193 = args[10]; object _191car_731246_733194 = args[11]; object _191cdr_731247_733195 = args[12]; object _191cons_731248_733196 = args[13]; object _191pair_127_731249_733197 = args[14]; object _191null_127_731250_733198 = args[15]; object _191expr_731251_733199 = args[16]; object _191rename_731252_733200 = args[17]; object _191compare_731253_733201 = args[18]; object _191quote_731254_733202 = args[19]; object _191apply_731255_733203 = args[20]; object _191append_731256_733204 = args[21]; object _191map_731257_733205 = args[22]; object _191vector_127_731258_733206 = args[23]; object _191list_1
27_731259_733207 = args[24]; object _191len_731260_733208 = args[25]; object _191length_731261_733209 = args[26]; object _191_91_731262_733210 = args[27]; object _191_125_123_731263_733211 = args[28]; object _191error_731264_733212 = args[29]; object _191ls_731265_733213 = args[30]; object _191res_731266_733214 = args[31]; object _191i_731267_733215 = args[32]; object _191reverse_731268_733216 = args[33]; object _191vector_91_125list_731269_733217 = args[34]; object _191list_91_125vector_731270_733218 = args[35]; object _191cons3_731271_733219 = args[36];
-+  
-+closureN_type c_7320609;
-+object e_7322519 [38];
-+c_7320609.hdr.mark = gc_color_red;
-+ c_7320609.hdr.grayed = 0;
-+c_7320609.tag = closureN_tag;
-+ c_7320609.fn = (function_type)__lambda_1380;
-+c_7320609.num_args = 1;
-+c_7320609.num_elements = 38;
-+c_7320609.elements = (object *)e_7322519;
-+c_7320609.elements[0] = _191_91_731262_733210;
-+c_7320609.elements[1] = _191_125_123_731263_733211;
-+c_7320609.elements[2] = _191and_731242_733190;
-+c_7320609.elements[3] = _191append_731256_733204;
-+c_7320609.elements[4] = _191apply_731255_733203;
-+c_7320609.elements[5] = _191car_731246_733194;
-+c_7320609.elements[6] = _191cdr_731247_733195;
-+c_7320609.elements[7] = _191compare_731253_733201;
-+c_7320609.elements[8] = _191cons_731248_733196;
-+c_7320609.elements[9] = _191cons3_731271_733219;
-+c_7320609.elements[10] = _191equal_127_731245_733193;
-+c_7320609.elements[11] = _191er_91macro_91transformer_731237_733185;
-+c_7320609.elements[12] = _191error_731264_733212;
-+c_7320609.elements[13] = _191expr_731251_733199;
-+c_7320609.elements[14] = _191i_731267_733215;
-+c_7320609.elements[15] = _191if_731241_733189;
-+c_7320609.elements[16] = _191lambda_731238_733186;
-+c_7320609.elements[17] = _191len_731260_733208;
-+c_7320609.elements[18] = _191length_731261_733209;
-+c_7320609.elements[19] = _191let_731239_733187;
-+c_7320609.elements[20] = _191list_91_125vector_731270_733218;
-+c_7320609.elements[21] = _191list_127_731259_733207;
-+c_7320609.elements[22] = _191ls_731265_733213;
-+c_7320609.elements[23] = _191map_731257_733205;
-+c_7320609.elements[24] = _191null_127_731250_733198;
-+c_7320609.elements[25] = _191or_731243_733191;
-+c_7320609.elements[26] = _191pair_127_731249_733197;
-+c_7320609.elements[27] = _191quote_731254_733202;
-+c_7320609.elements[28] = _191rename_731252_733200;
-+c_7320609.elements[29] = _191res_731266_733214;
-+c_7320609.elements[30] = _191reverse_731268_733216;
-+c_7320609.elements[31] = _191vector_91_125list_731269_733217;
-+c_7320609.elements[32] = _191vector_127_731258_733206;
-+c_7320609.elements[33] = ((closureN)self_7312492)->elements[0];
-+c_7320609.elements[34] = ellipsis_91specified_127_731235_733183;
-+c_7320609.elements[35] = ((closureN)self_7312492)->elements[1];
-+c_7320609.elements[36] = ((closureN)self_7312492)->elements[2];
-+c_7320609.elements[37] = ((closureN)self_7312492)->elements[3];
-+
-+
-+pair_type local_7322522; 
-+return_direct_with_clo1(data,(closure)&c_7320609,__lambda_1380,  set_cell_as_expr(&local_7322522, count_731236_733184));; 
-+}
-+
-+static void __lambda_1380(void *data, object self_7312493, int argc, object *args) /* object self_7312493, object count_731236_733184 */
-+ {
-+ object count_731236_733184 = args[0];
-+  
-+closureN_type c_7320611;
-+object e_7322518 [39];
-+c_7320611.hdr.mark = gc_color_red;
-+ c_7320611.hdr.grayed = 0;
-+c_7320611.tag = closureN_tag;
-+ c_7320611.fn = (function_type)__lambda_835;
-+c_7320611.num_args = 12;
-+c_7320611.num_elements = 39;
-+c_7320611.elements = (object *)e_7322518;
-+c_7320611.elements[0] = ((closureN)self_7312493)->elements[0];
-+c_7320611.elements[1] = ((closureN)self_7312493)->elements[1];
-+c_7320611.elements[2] = ((closureN)self_7312493)->elements[2];
-+c_7320611.elements[3] = ((closureN)self_7312493)->elements[3];
-+c_7320611.elements[4] = ((closureN)self_7312493)->elements[4];
-+c_7320611.elements[5] = ((closureN)self_7312493)->elements[5];
-+c_7320611.elements[6] = ((closureN)self_7312493)->elements[6];
-+c_7320611.elements[7] = ((closureN)self_7312493)->elements[7];
-+c_7320611.elements[8] = ((closureN)self_7312493)->elements[8];
-+c_7320611.elements[9] = ((closureN)self_7312493)->elements[9];
-+c_7320611.elements[10] = ((closureN)self_7312493)->elements[10];
-+c_7320611.elements[11] = ((closureN)self_7312493)->elements[11];
-+c_7320611.elements[12] = ((closureN)self_7312493)->elements[12];
-+c_7320611.elements[13] = ((closureN)self_7312493)->elements[13];
-+c_7320611.elements[14] = ((closureN)self_7312493)->elements[14];
-+c_7320611.elements[15] = ((closureN)self_7312493)->elements[15];
-+c_7320611.elements[16] = ((closureN)self_7312493)->elements[16];
-+c_7320611.elements[17] = ((closureN)self_7312493)->elements[17];
-+c_7320611.elements[18] = ((closureN)self_7312493)->elements[18];
-+c_7320611.elements[19] = ((closureN)self_7312493)->elements[19];
-+c_7320611.elements[20] = ((closureN)self_7312493)->elements[20];
-+c_7320611.elements[21] = ((closureN)self_7312493)->elements[21];
-+c_7320611.elements[22] = ((closureN)self_7312493)->elements[22];
-+c_7320611.elements[23] = ((closureN)self_7312493)->elements[23];
-+c_7320611.elements[24] = ((closureN)self_7312493)->elements[24];
-+c_7320611.elements[25] = ((closureN)self_7312493)->elements[25];
-+c_7320611.elements[26] = ((closureN)self_7312493)->elements[26];
-+c_7320611.elements[27] = ((closureN)self_7312493)->elements[27];
-+c_7320611.elements[28] = ((closureN)self_7312493)->elements[28];
-+c_7320611.elements[29] = ((closureN)self_7312493)->elements[29];
-+c_7320611.elements[30] = ((closureN)self_7312493)->elements[30];
-+c_7320611.elements[31] = ((closureN)self_7312493)->elements[31];
-+c_7320611.elements[32] = ((closureN)self_7312493)->elements[32];
-+c_7320611.elements[33] = ((closureN)self_7312493)->elements[33];
-+c_7320611.elements[34] = count_731236_733184;
-+c_7320611.elements[35] = ((closureN)self_7312493)->elements[34];
-+c_7320611.elements[36] = ((closureN)self_7312493)->elements[35];
-+c_7320611.elements[37] = ((closureN)self_7312493)->elements[36];
-+c_7320611.elements[38] = ((closureN)self_7312493)->elements[37];
-+
-+return_direct_with_clo12(data,(closure)&c_7320611,__lambda_835,  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_835(void *data, object self_7312494, int argc, object *args) /* object self_7312494, object ellipsis_733220, object lits_733221, object forms_733222, object next_91symbol_733223, object expand_91pattern_733224, object ellipsis_91escape_127_733225, object ellipsis_127_733226, object ellipsis_91depth_733227, object ellipsis_91tail_733228, object all_91vars_733229, object free_91vars_733230, object expand_91template_733231 */
-+ {
-+ object ellipsis_733220 = args[0]; object lits_733221 = args[1]; object forms_733222 = args[2]; object next_91symbol_733223 = args[3]; object expand_91pattern_733224 = args[4]; object ellipsis_91escape_127_733225 = args[5]; object ellipsis_127_733226 = args[6]; object ellipsis_91depth_733227 = args[7]; object ellipsis_91tail_733228 = args[8]; object all_91vars_733229 = args[9]; object free_91vars_733230 = args[10]; object expand_91template_733231 = args[11];
-+  
-+closureN_type c_7320613;
-+object e_7322514 [50];
-+c_7320613.hdr.mark = gc_color_red;
-+ c_7320613.hdr.grayed = 0;
-+c_7320613.tag = closureN_tag;
-+ c_7320613.fn = (function_type)__lambda_1379;
-+c_7320613.num_args = 1;
-+c_7320613.num_elements = 50;
-+c_7320613.elements = (object *)e_7322514;
-+c_7320613.elements[0] = ((closureN)self_7312494)->elements[0];
-+c_7320613.elements[1] = ((closureN)self_7312494)->elements[1];
-+c_7320613.elements[2] = ((closureN)self_7312494)->elements[2];
-+c_7320613.elements[3] = ((closureN)self_7312494)->elements[3];
-+c_7320613.elements[4] = ((closureN)self_7312494)->elements[4];
-+c_7320613.elements[5] = ((closureN)self_7312494)->elements[5];
-+c_7320613.elements[6] = ((closureN)self_7312494)->elements[6];
-+c_7320613.elements[7] = ((closureN)self_7312494)->elements[7];
-+c_7320613.elements[8] = ((closureN)self_7312494)->elements[8];
-+c_7320613.elements[9] = ((closureN)self_7312494)->elements[9];
-+c_7320613.elements[10] = ((closureN)self_7312494)->elements[10];
-+c_7320613.elements[11] = ((closureN)self_7312494)->elements[11];
-+c_7320613.elements[12] = ((closureN)self_7312494)->elements[12];
-+c_7320613.elements[13] = ((closureN)self_7312494)->elements[13];
-+c_7320613.elements[14] = ((closureN)self_7312494)->elements[14];
-+c_7320613.elements[15] = ((closureN)self_7312494)->elements[15];
-+c_7320613.elements[16] = ((closureN)self_7312494)->elements[16];
-+c_7320613.elements[17] = ((closureN)self_7312494)->elements[17];
-+c_7320613.elements[18] = ((closureN)self_7312494)->elements[18];
-+c_7320613.elements[19] = ((closureN)self_7312494)->elements[19];
-+c_7320613.elements[20] = ((closureN)self_7312494)->elements[20];
-+c_7320613.elements[21] = ((closureN)self_7312494)->elements[21];
-+c_7320613.elements[22] = ((closureN)self_7312494)->elements[22];
-+c_7320613.elements[23] = ((closureN)self_7312494)->elements[23];
-+c_7320613.elements[24] = ((closureN)self_7312494)->elements[24];
-+c_7320613.elements[25] = ((closureN)self_7312494)->elements[25];
-+c_7320613.elements[26] = ((closureN)self_7312494)->elements[26];
-+c_7320613.elements[27] = ((closureN)self_7312494)->elements[27];
-+c_7320613.elements[28] = ((closureN)self_7312494)->elements[28];
-+c_7320613.elements[29] = ((closureN)self_7312494)->elements[29];
-+c_7320613.elements[30] = ((closureN)self_7312494)->elements[30];
-+c_7320613.elements[31] = ((closureN)self_7312494)->elements[31];
-+c_7320613.elements[32] = ((closureN)self_7312494)->elements[32];
-+c_7320613.elements[33] = all_91vars_733229;
-+c_7320613.elements[34] = ((closureN)self_7312494)->elements[33];
-+c_7320613.elements[35] = ((closureN)self_7312494)->elements[34];
-+c_7320613.elements[36] = ellipsis_91depth_733227;
-+c_7320613.elements[37] = ellipsis_91escape_127_733225;
-+c_7320613.elements[38] = ((closureN)self_7312494)->elements[35];
-+c_7320613.elements[39] = ellipsis_91tail_733228;
-+c_7320613.elements[40] = ellipsis_127_733226;
-+c_7320613.elements[41] = expand_91pattern_733224;
-+c_7320613.elements[42] = expand_91template_733231;
-+c_7320613.elements[43] = ((closureN)self_7312494)->elements[36];
-+c_7320613.elements[44] = forms_733222;
-+c_7320613.elements[45] = free_91vars_733230;
-+c_7320613.elements[46] = ((closureN)self_7312494)->elements[37];
-+c_7320613.elements[47] = lits_733221;
-+c_7320613.elements[48] = next_91symbol_733223;
-+c_7320613.elements[49] = ((closureN)self_7312494)->elements[38];
-+
-+
-+pair_type local_7322517; 
-+return_direct_with_clo1(data,(closure)&c_7320613,__lambda_1379,  set_cell_as_expr(&local_7322517, ellipsis_733220));; 
-+}
-+
-+static void __lambda_1379(void *data, object self_7312495, int argc, object *args) /* object self_7312495, object ellipsis_733220 */
-+ {
-+ object ellipsis_733220 = args[0];
-+  
-+closureN_type c_7320615;
-+object e_7322509 [50];
-+c_7320615.hdr.mark = gc_color_red;
-+ c_7320615.hdr.grayed = 0;
-+c_7320615.tag = closureN_tag;
-+ c_7320615.fn = (function_type)__lambda_1378;
-+c_7320615.num_args = 1;
-+c_7320615.num_elements = 50;
-+c_7320615.elements = (object *)e_7322509;
-+c_7320615.elements[0] = ((closureN)self_7312495)->elements[0];
-+c_7320615.elements[1] = ((closureN)self_7312495)->elements[1];
-+c_7320615.elements[2] = ((closureN)self_7312495)->elements[2];
-+c_7320615.elements[3] = ((closureN)self_7312495)->elements[3];
-+c_7320615.elements[4] = ((closureN)self_7312495)->elements[4];
-+c_7320615.elements[5] = ((closureN)self_7312495)->elements[5];
-+c_7320615.elements[6] = ((closureN)self_7312495)->elements[6];
-+c_7320615.elements[7] = ((closureN)self_7312495)->elements[7];
-+c_7320615.elements[8] = ((closureN)self_7312495)->elements[8];
-+c_7320615.elements[9] = ((closureN)self_7312495)->elements[9];
-+c_7320615.elements[10] = ((closureN)self_7312495)->elements[10];
-+c_7320615.elements[11] = ((closureN)self_7312495)->elements[11];
-+c_7320615.elements[12] = ((closureN)self_7312495)->elements[12];
-+c_7320615.elements[13] = ((closureN)self_7312495)->elements[13];
-+c_7320615.elements[14] = ((closureN)self_7312495)->elements[14];
-+c_7320615.elements[15] = ((closureN)self_7312495)->elements[15];
-+c_7320615.elements[16] = ((closureN)self_7312495)->elements[16];
-+c_7320615.elements[17] = ((closureN)self_7312495)->elements[17];
-+c_7320615.elements[18] = ((closureN)self_7312495)->elements[18];
-+c_7320615.elements[19] = ((closureN)self_7312495)->elements[19];
-+c_7320615.elements[20] = ((closureN)self_7312495)->elements[20];
-+c_7320615.elements[21] = ((closureN)self_7312495)->elements[21];
-+c_7320615.elements[22] = ((closureN)self_7312495)->elements[22];
-+c_7320615.elements[23] = ((closureN)self_7312495)->elements[23];
-+c_7320615.elements[24] = ((closureN)self_7312495)->elements[24];
-+c_7320615.elements[25] = ((closureN)self_7312495)->elements[25];
-+c_7320615.elements[26] = ((closureN)self_7312495)->elements[26];
-+c_7320615.elements[27] = ((closureN)self_7312495)->elements[27];
-+c_7320615.elements[28] = ((closureN)self_7312495)->elements[28];
-+c_7320615.elements[29] = ((closureN)self_7312495)->elements[29];
-+c_7320615.elements[30] = ((closureN)self_7312495)->elements[30];
-+c_7320615.elements[31] = ((closureN)self_7312495)->elements[31];
-+c_7320615.elements[32] = ((closureN)self_7312495)->elements[32];
-+c_7320615.elements[33] = ((closureN)self_7312495)->elements[33];
-+c_7320615.elements[34] = ((closureN)self_7312495)->elements[34];
-+c_7320615.elements[35] = ((closureN)self_7312495)->elements[35];
-+c_7320615.elements[36] = ellipsis_733220;
-+c_7320615.elements[37] = ((closureN)self_7312495)->elements[36];
-+c_7320615.elements[38] = ((closureN)self_7312495)->elements[37];
-+c_7320615.elements[39] = ((closureN)self_7312495)->elements[38];
-+c_7320615.elements[40] = ((closureN)self_7312495)->elements[39];
-+c_7320615.elements[41] = ((closureN)self_7312495)->elements[40];
-+c_7320615.elements[42] = ((closureN)self_7312495)->elements[41];
-+c_7320615.elements[43] = ((closureN)self_7312495)->elements[42];
-+c_7320615.elements[44] = ((closureN)self_7312495)->elements[43];
-+c_7320615.elements[45] = ((closureN)self_7312495)->elements[44];
-+c_7320615.elements[46] = ((closureN)self_7312495)->elements[45];
-+c_7320615.elements[47] = ((closureN)self_7312495)->elements[46];
-+c_7320615.elements[48] = ((closureN)self_7312495)->elements[48];
-+c_7320615.elements[49] = ((closureN)self_7312495)->elements[49];
-+
-+
-+pair_type local_7322512; 
-+return_direct_with_clo1(data,(closure)&c_7320615,__lambda_1378,  set_cell_as_expr(&local_7322512, ((closureN)self_7312495)->elements[47]));; 
-+}
-+
-+static void __lambda_1378(void *data, object self_7312496, int argc, object *args) /* object self_7312496, object lits_733221 */
-+ {
-+ object lits_733221 = args[0];
-+  
-+closureN_type c_7320617;
-+object e_7322504 [50];
-+c_7320617.hdr.mark = gc_color_red;
-+ c_7320617.hdr.grayed = 0;
-+c_7320617.tag = closureN_tag;
-+ c_7320617.fn = (function_type)__lambda_1377;
-+c_7320617.num_args = 1;
-+c_7320617.num_elements = 50;
-+c_7320617.elements = (object *)e_7322504;
-+c_7320617.elements[0] = ((closureN)self_7312496)->elements[0];
-+c_7320617.elements[1] = ((closureN)self_7312496)->elements[1];
-+c_7320617.elements[2] = ((closureN)self_7312496)->elements[2];
-+c_7320617.elements[3] = ((closureN)self_7312496)->elements[3];
-+c_7320617.elements[4] = ((closureN)self_7312496)->elements[4];
-+c_7320617.elements[5] = ((closureN)self_7312496)->elements[5];
-+c_7320617.elements[6] = ((closureN)self_7312496)->elements[6];
-+c_7320617.elements[7] = ((closureN)self_7312496)->elements[7];
-+c_7320617.elements[8] = ((closureN)self_7312496)->elements[8];
-+c_7320617.elements[9] = ((closureN)self_7312496)->elements[9];
-+c_7320617.elements[10] = ((closureN)self_7312496)->elements[10];
-+c_7320617.elements[11] = ((closureN)self_7312496)->elements[11];
-+c_7320617.elements[12] = ((closureN)self_7312496)->elements[12];
-+c_7320617.elements[13] = ((closureN)self_7312496)->elements[13];
-+c_7320617.elements[14] = ((closureN)self_7312496)->elements[14];
-+c_7320617.elements[15] = ((closureN)self_7312496)->elements[15];
-+c_7320617.elements[16] = ((closureN)self_7312496)->elements[16];
-+c_7320617.elements[17] = ((closureN)self_7312496)->elements[17];
-+c_7320617.elements[18] = ((closureN)self_7312496)->elements[18];
-+c_7320617.elements[19] = ((closureN)self_7312496)->elements[19];
-+c_7320617.elements[20] = ((closureN)self_7312496)->elements[20];
-+c_7320617.elements[21] = ((closureN)self_7312496)->elements[21];
-+c_7320617.elements[22] = ((closureN)self_7312496)->elements[22];
-+c_7320617.elements[23] = ((closureN)self_7312496)->elements[23];
-+c_7320617.elements[24] = ((closureN)self_7312496)->elements[24];
-+c_7320617.elements[25] = ((closureN)self_7312496)->elements[25];
-+c_7320617.elements[26] = ((closureN)self_7312496)->elements[26];
-+c_7320617.elements[27] = ((closureN)self_7312496)->elements[27];
-+c_7320617.elements[28] = ((closureN)self_7312496)->elements[28];
-+c_7320617.elements[29] = ((closureN)self_7312496)->elements[29];
-+c_7320617.elements[30] = ((closureN)self_7312496)->elements[30];
-+c_7320617.elements[31] = ((closureN)self_7312496)->elements[31];
-+c_7320617.elements[32] = ((closureN)self_7312496)->elements[32];
-+c_7320617.elements[33] = ((closureN)self_7312496)->elements[33];
-+c_7320617.elements[34] = ((closureN)self_7312496)->elements[34];
-+c_7320617.elements[35] = ((closureN)self_7312496)->elements[35];
-+c_7320617.elements[36] = ((closureN)self_7312496)->elements[36];
-+c_7320617.elements[37] = ((closureN)self_7312496)->elements[37];
-+c_7320617.elements[38] = ((closureN)self_7312496)->elements[38];
-+c_7320617.elements[39] = ((closureN)self_7312496)->elements[39];
-+c_7320617.elements[40] = ((closureN)self_7312496)->elements[40];
-+c_7320617.elements[41] = ((closureN)self_7312496)->elements[41];
-+c_7320617.elements[42] = ((closureN)self_7312496)->elements[42];
-+c_7320617.elements[43] = ((closureN)self_7312496)->elements[43];
-+c_7320617.elements[44] = ((closureN)self_7312496)->elements[44];
-+c_7320617.elements[45] = ((closureN)self_7312496)->elements[46];
-+c_7320617.elements[46] = ((closureN)self_7312496)->elements[47];
-+c_7320617.elements[47] = lits_733221;
-+c_7320617.elements[48] = ((closureN)self_7312496)->elements[48];
-+c_7320617.elements[49] = ((closureN)self_7312496)->elements[49];
-+
-+
-+pair_type local_7322507; 
-+return_direct_with_clo1(data,(closure)&c_7320617,__lambda_1377,  set_cell_as_expr(&local_7322507, ((closureN)self_7312496)->elements[45]));; 
-+}
-+
-+static void __lambda_1377(void *data, object self_7312497, int argc, object *args) /* object self_7312497, object forms_733222 */
-+ {
-+ object forms_733222 = args[0];
-+  
-+closureN_type c_7320619;
-+object e_7322499 [50];
-+c_7320619.hdr.mark = gc_color_red;
-+ c_7320619.hdr.grayed = 0;
-+c_7320619.tag = closureN_tag;
-+ c_7320619.fn = (function_type)__lambda_1376;
-+c_7320619.num_args = 1;
-+c_7320619.num_elements = 50;
-+c_7320619.elements = (object *)e_7322499;
-+c_7320619.elements[0] = ((closureN)self_7312497)->elements[0];
-+c_7320619.elements[1] = ((closureN)self_7312497)->elements[1];
-+c_7320619.elements[2] = ((closureN)self_7312497)->elements[2];
-+c_7320619.elements[3] = ((closureN)self_7312497)->elements[3];
-+c_7320619.elements[4] = ((closureN)self_7312497)->elements[4];
-+c_7320619.elements[5] = ((closureN)self_7312497)->elements[5];
-+c_7320619.elements[6] = ((closureN)self_7312497)->elements[6];
-+c_7320619.elements[7] = ((closureN)self_7312497)->elements[7];
-+c_7320619.elements[8] = ((closureN)self_7312497)->elements[8];
-+c_7320619.elements[9] = ((closureN)self_7312497)->elements[9];
-+c_7320619.elements[10] = ((closureN)self_7312497)->elements[10];
-+c_7320619.elements[11] = ((closureN)self_7312497)->elements[11];
-+c_7320619.elements[12] = ((closureN)self_7312497)->elements[12];
-+c_7320619.elements[13] = ((closureN)self_7312497)->elements[13];
-+c_7320619.elements[14] = ((closureN)self_7312497)->elements[14];
-+c_7320619.elements[15] = ((closureN)self_7312497)->elements[15];
-+c_7320619.elements[16] = ((closureN)self_7312497)->elements[16];
-+c_7320619.elements[17] = ((closureN)self_7312497)->elements[17];
-+c_7320619.elements[18] = ((closureN)self_7312497)->elements[18];
-+c_7320619.elements[19] = ((closureN)self_7312497)->elements[19];
-+c_7320619.elements[20] = ((closureN)self_7312497)->elements[20];
-+c_7320619.elements[21] = ((closureN)self_7312497)->elements[21];
-+c_7320619.elements[22] = ((closureN)self_7312497)->elements[22];
-+c_7320619.elements[23] = ((closureN)self_7312497)->elements[23];
-+c_7320619.elements[24] = ((closureN)self_7312497)->elements[24];
-+c_7320619.elements[25] = ((closureN)self_7312497)->elements[25];
-+c_7320619.elements[26] = ((closureN)self_7312497)->elements[26];
-+c_7320619.elements[27] = ((closureN)self_7312497)->elements[27];
-+c_7320619.elements[28] = ((closureN)self_7312497)->elements[28];
-+c_7320619.elements[29] = ((closureN)self_7312497)->elements[29];
-+c_7320619.elements[30] = ((closureN)self_7312497)->elements[30];
-+c_7320619.elements[31] = ((closureN)self_7312497)->elements[31];
-+c_7320619.elements[32] = ((closureN)self_7312497)->elements[32];
-+c_7320619.elements[33] = ((closureN)self_7312497)->elements[33];
-+c_7320619.elements[34] = ((closureN)self_7312497)->elements[34];
-+c_7320619.elements[35] = ((closureN)self_7312497)->elements[35];
-+c_7320619.elements[36] = ((closureN)self_7312497)->elements[36];
-+c_7320619.elements[37] = ((closureN)self_7312497)->elements[37];
-+c_7320619.elements[38] = ((closureN)self_7312497)->elements[38];
-+c_7320619.elements[39] = ((closureN)self_7312497)->elements[39];
-+c_7320619.elements[40] = ((closureN)self_7312497)->elements[40];
-+c_7320619.elements[41] = ((closureN)self_7312497)->elements[41];
-+c_7320619.elements[42] = ((closureN)self_7312497)->elements[42];
-+c_7320619.elements[43] = ((closureN)self_7312497)->elements[43];
-+c_7320619.elements[44] = ((closureN)self_7312497)->elements[44];
-+c_7320619.elements[45] = forms_733222;
-+c_7320619.elements[46] = ((closureN)self_7312497)->elements[45];
-+c_7320619.elements[47] = ((closureN)self_7312497)->elements[46];
-+c_7320619.elements[48] = ((closureN)self_7312497)->elements[47];
-+c_7320619.elements[49] = ((closureN)self_7312497)->elements[49];
-+
-+
-+pair_type local_7322502; 
-+return_direct_with_clo1(data,(closure)&c_7320619,__lambda_1376,  set_cell_as_expr(&local_7322502, ((closureN)self_7312497)->elements[48]));; 
-+}
-+
-+static void __lambda_1376(void *data, object self_7312498, int argc, object *args) /* object self_7312498, object next_91symbol_733223 */
-+ {
-+ object next_91symbol_733223 = args[0];
-+  
-+closureN_type c_7320621;
-+object e_7322494 [50];
-+c_7320621.hdr.mark = gc_color_red;
-+ c_7320621.hdr.grayed = 0;
-+c_7320621.tag = closureN_tag;
-+ c_7320621.fn = (function_type)__lambda_1375;
-+c_7320621.num_args = 1;
-+c_7320621.num_elements = 50;
-+c_7320621.elements = (object *)e_7322494;
-+c_7320621.elements[0] = ((closureN)self_7312498)->elements[0];
-+c_7320621.elements[1] = ((closureN)self_7312498)->elements[1];
-+c_7320621.elements[2] = ((closureN)self_7312498)->elements[2];
-+c_7320621.elements[3] = ((closureN)self_7312498)->elements[3];
-+c_7320621.elements[4] = ((closureN)self_7312498)->elements[4];
-+c_7320621.elements[5] = ((closureN)self_7312498)->elements[5];
-+c_7320621.elements[6] = ((closureN)self_7312498)->elements[6];
-+c_7320621.elements[7] = ((closureN)self_7312498)->elements[7];
-+c_7320621.elements[8] = ((closureN)self_7312498)->elements[8];
-+c_7320621.elements[9] = ((closureN)self_7312498)->elements[9];
-+c_7320621.elements[10] = ((closureN)self_7312498)->elements[10];
-+c_7320621.elements[11] = ((closureN)self_7312498)->elements[11];
-+c_7320621.elements[12] = ((closureN)self_7312498)->elements[12];
-+c_7320621.elements[13] = ((closureN)self_7312498)->elements[13];
-+c_7320621.elements[14] = ((closureN)self_7312498)->elements[14];
-+c_7320621.elements[15] = ((closureN)self_7312498)->elements[15];
-+c_7320621.elements[16] = ((closureN)self_7312498)->elements[16];
-+c_7320621.elements[17] = ((closureN)self_7312498)->elements[17];
-+c_7320621.elements[18] = ((closureN)self_7312498)->elements[18];
-+c_7320621.elements[19] = ((closureN)self_7312498)->elements[19];
-+c_7320621.elements[20] = ((closureN)self_7312498)->elements[20];
-+c_7320621.elements[21] = ((closureN)self_7312498)->elements[21];
-+c_7320621.elements[22] = ((closureN)self_7312498)->elements[22];
-+c_7320621.elements[23] = ((closureN)self_7312498)->elements[23];
-+c_7320621.elements[24] = ((closureN)self_7312498)->elements[24];
-+c_7320621.elements[25] = ((closureN)self_7312498)->elements[25];
-+c_7320621.elements[26] = ((closureN)self_7312498)->elements[26];
-+c_7320621.elements[27] = ((closureN)self_7312498)->elements[27];
-+c_7320621.elements[28] = ((closureN)self_7312498)->elements[28];
-+c_7320621.elements[29] = ((closureN)self_7312498)->elements[29];
-+c_7320621.elements[30] = ((closureN)self_7312498)->elements[30];
-+c_7320621.elements[31] = ((closureN)self_7312498)->elements[31];
-+c_7320621.elements[32] = ((closureN)self_7312498)->elements[32];
-+c_7320621.elements[33] = ((closureN)self_7312498)->elements[33];
-+c_7320621.elements[34] = ((closureN)self_7312498)->elements[34];
-+c_7320621.elements[35] = ((closureN)self_7312498)->elements[35];
-+c_7320621.elements[36] = ((closureN)self_7312498)->elements[36];
-+c_7320621.elements[37] = ((closureN)self_7312498)->elements[37];
-+c_7320621.elements[38] = ((closureN)self_7312498)->elements[38];
-+c_7320621.elements[39] = ((closureN)self_7312498)->elements[39];
-+c_7320621.elements[40] = ((closureN)self_7312498)->elements[40];
-+c_7320621.elements[41] = ((closureN)self_7312498)->elements[41];
-+c_7320621.elements[42] = ((closureN)self_7312498)->elements[43];
-+c_7320621.elements[43] = ((closureN)self_7312498)->elements[44];
-+c_7320621.elements[44] = ((closureN)self_7312498)->elements[45];
-+c_7320621.elements[45] = ((closureN)self_7312498)->elements[46];
-+c_7320621.elements[46] = ((closureN)self_7312498)->elements[47];
-+c_7320621.elements[47] = ((closureN)self_7312498)->elements[48];
-+c_7320621.elements[48] = next_91symbol_733223;
-+c_7320621.elements[49] = ((closureN)self_7312498)->elements[49];
-+
-+
-+pair_type local_7322497; 
-+return_direct_with_clo1(data,(closure)&c_7320621,__lambda_1375,  set_cell_as_expr(&local_7322497, ((closureN)self_7312498)->elements[42]));; 
-+}
-+
-+static void __lambda_1375(void *data, object self_7312499, int argc, object *args) /* object self_7312499, object expand_91pattern_733224 */
-+ {
-+ object expand_91pattern_733224 = args[0];
-+  
-+closureN_type c_7320623;
-+object e_7322489 [50];
-+c_7320623.hdr.mark = gc_color_red;
-+ c_7320623.hdr.grayed = 0;
-+c_7320623.tag = closureN_tag;
-+ c_7320623.fn = (function_type)__lambda_1374;
-+c_7320623.num_args = 1;
-+c_7320623.num_elements = 50;
-+c_7320623.elements = (object *)e_7322489;
-+c_7320623.elements[0] = ((closureN)self_7312499)->elements[0];
-+c_7320623.elements[1] = ((closureN)self_7312499)->elements[1];
-+c_7320623.elements[2] = ((closureN)self_7312499)->elements[2];
-+c_7320623.elements[3] = ((closureN)self_7312499)->elements[3];
-+c_7320623.elements[4] = ((closureN)self_7312499)->elements[4];
-+c_7320623.elements[5] = ((closureN)self_7312499)->elements[5];
-+c_7320623.elements[6] = ((closureN)self_7312499)->elements[6];
-+c_7320623.elements[7] = ((closureN)self_7312499)->elements[7];
-+c_7320623.elements[8] = ((closureN)self_7312499)->elements[8];
-+c_7320623.elements[9] = ((closureN)self_7312499)->elements[9];
-+c_7320623.elements[10] = ((closureN)self_7312499)->elements[10];
-+c_7320623.elements[11] = ((closureN)self_7312499)->elements[11];
-+c_7320623.elements[12] = ((closureN)self_7312499)->elements[12];
-+c_7320623.elements[13] = ((closureN)self_7312499)->elements[13];
-+c_7320623.elements[14] = ((closureN)self_7312499)->elements[14];
-+c_7320623.elements[15] = ((closureN)self_7312499)->elements[15];
-+c_7320623.elements[16] = ((closureN)self_7312499)->elements[16];
-+c_7320623.elements[17] = ((closureN)self_7312499)->elements[17];
-+c_7320623.elements[18] = ((closureN)self_7312499)->elements[18];
-+c_7320623.elements[19] = ((closureN)self_7312499)->elements[19];
-+c_7320623.elements[20] = ((closureN)self_7312499)->elements[20];
-+c_7320623.elements[21] = ((closureN)self_7312499)->elements[21];
-+c_7320623.elements[22] = ((closureN)self_7312499)->elements[22];
-+c_7320623.elements[23] = ((closureN)self_7312499)->elements[23];
-+c_7320623.elements[24] = ((closureN)self_7312499)->elements[24];
-+c_7320623.elements[25] = ((closureN)self_7312499)->elements[25];
-+c_7320623.elements[26] = ((closureN)self_7312499)->elements[26];
-+c_7320623.elements[27] = ((closureN)self_7312499)->elements[27];
-+c_7320623.elements[28] = ((closureN)self_7312499)->elements[28];
-+c_7320623.elements[29] = ((closureN)self_7312499)->elements[29];
-+c_7320623.elements[30] = ((closureN)self_7312499)->elements[30];
-+c_7320623.elements[31] = ((closureN)self_7312499)->elements[31];
-+c_7320623.elements[32] = ((closureN)self_7312499)->elements[32];
-+c_7320623.elements[33] = ((closureN)self_7312499)->elements[33];
-+c_7320623.elements[34] = ((closureN)self_7312499)->elements[34];
-+c_7320623.elements[35] = ((closureN)self_7312499)->elements[35];
-+c_7320623.elements[36] = ((closureN)self_7312499)->elements[36];
-+c_7320623.elements[37] = ((closureN)self_7312499)->elements[37];
-+c_7320623.elements[38] = ((closureN)self_7312499)->elements[39];
-+c_7320623.elements[39] = ((closureN)self_7312499)->elements[40];
-+c_7320623.elements[40] = ((closureN)self_7312499)->elements[41];
-+c_7320623.elements[41] = expand_91pattern_733224;
-+c_7320623.elements[42] = ((closureN)self_7312499)->elements[42];
-+c_7320623.elements[43] = ((closureN)self_7312499)->elements[43];
-+c_7320623.elements[44] = ((closureN)self_7312499)->elements[44];
-+c_7320623.elements[45] = ((closureN)self_7312499)->elements[45];
-+c_7320623.elements[46] = ((closureN)self_7312499)->elements[46];
-+c_7320623.elements[47] = ((closureN)self_7312499)->elements[47];
-+c_7320623.elements[48] = ((closureN)self_7312499)->elements[48];
-+c_7320623.elements[49] = ((closureN)self_7312499)->elements[49];
-+
-+
-+pair_type local_7322492; 
-+return_direct_with_clo1(data,(closure)&c_7320623,__lambda_1374,  set_cell_as_expr(&local_7322492, ((closureN)self_7312499)->elements[38]));; 
-+}
-+
-+static void __lambda_1374(void *data, object self_7312500, int argc, object *args) /* object self_7312500, object ellipsis_91escape_127_733225 */
-+ {
-+ object ellipsis_91escape_127_733225 = args[0];
-+  
-+closureN_type c_7320625;
-+object e_7322484 [50];
-+c_7320625.hdr.mark = gc_color_red;
-+ c_7320625.hdr.grayed = 0;
-+c_7320625.tag = closureN_tag;
-+ c_7320625.fn = (function_type)__lambda_1373;
-+c_7320625.num_args = 1;
-+c_7320625.num_elements = 50;
-+c_7320625.elements = (object *)e_7322484;
-+c_7320625.elements[0] = ((closureN)self_7312500)->elements[0];
-+c_7320625.elements[1] = ((closureN)self_7312500)->elements[1];
-+c_7320625.elements[2] = ((closureN)self_7312500)->elements[2];
-+c_7320625.elements[3] = ((closureN)self_7312500)->elements[3];
-+c_7320625.elements[4] = ((closureN)self_7312500)->elements[4];
-+c_7320625.elements[5] = ((closureN)self_7312500)->elements[5];
-+c_7320625.elements[6] = ((closureN)self_7312500)->elements[6];
-+c_7320625.elements[7] = ((closureN)self_7312500)->elements[7];
-+c_7320625.elements[8] = ((closureN)self_7312500)->elements[8];
-+c_7320625.elements[9] = ((closureN)self_7312500)->elements[9];
-+c_7320625.elements[10] = ((closureN)self_7312500)->elements[10];
-+c_7320625.elements[11] = ((closureN)self_7312500)->elements[11];
-+c_7320625.elements[12] = ((closureN)self_7312500)->elements[12];
-+c_7320625.elements[13] = ((closureN)self_7312500)->elements[13];
-+c_7320625.elements[14] = ((closureN)self_7312500)->elements[14];
-+c_7320625.elements[15] = ((closureN)self_7312500)->elements[15];
-+c_7320625.elements[16] = ((closureN)self_7312500)->elements[16];
-+c_7320625.elements[17] = ((closureN)self_7312500)->elements[17];
-+c_7320625.elements[18] = ((closureN)self_7312500)->elements[18];
-+c_7320625.elements[19] = ((closureN)self_7312500)->elements[19];
-+c_7320625.elements[20] = ((closureN)self_7312500)->elements[20];
-+c_7320625.elements[21] = ((closureN)self_7312500)->elements[21];
-+c_7320625.elements[22] = ((closureN)self_7312500)->elements[22];
-+c_7320625.elements[23] = ((closureN)self_7312500)->elements[23];
-+c_7320625.elements[24] = ((closureN)self_7312500)->elements[24];
-+c_7320625.elements[25] = ((closureN)self_7312500)->elements[25];
-+c_7320625.elements[26] = ((closureN)self_7312500)->elements[26];
-+c_7320625.elements[27] = ((closureN)self_7312500)->elements[27];
-+c_7320625.elements[28] = ((closureN)self_7312500)->elements[28];
-+c_7320625.elements[29] = ((closureN)self_7312500)->elements[29];
-+c_7320625.elements[30] = ((closureN)self_7312500)->elements[30];
-+c_7320625.elements[31] = ((closureN)self_7312500)->elements[31];
-+c_7320625.elements[32] = ((closureN)self_7312500)->elements[32];
-+c_7320625.elements[33] = ((closureN)self_7312500)->elements[33];
-+c_7320625.elements[34] = ((closureN)self_7312500)->elements[34];
-+c_7320625.elements[35] = ((closureN)self_7312500)->elements[35];
-+c_7320625.elements[36] = ((closureN)self_7312500)->elements[36];
-+c_7320625.elements[37] = ((closureN)self_7312500)->elements[37];
-+c_7320625.elements[38] = ellipsis_91escape_127_733225;
-+c_7320625.elements[39] = ((closureN)self_7312500)->elements[38];
-+c_7320625.elements[40] = ((closureN)self_7312500)->elements[39];
-+c_7320625.elements[41] = ((closureN)self_7312500)->elements[41];
-+c_7320625.elements[42] = ((closureN)self_7312500)->elements[42];
-+c_7320625.elements[43] = ((closureN)self_7312500)->elements[43];
-+c_7320625.elements[44] = ((closureN)self_7312500)->elements[44];
-+c_7320625.elements[45] = ((closureN)self_7312500)->elements[45];
-+c_7320625.elements[46] = ((closureN)self_7312500)->elements[46];
-+c_7320625.elements[47] = ((closureN)self_7312500)->elements[47];
-+c_7320625.elements[48] = ((closureN)self_7312500)->elements[48];
-+c_7320625.elements[49] = ((closureN)self_7312500)->elements[49];
- 
+-  
+-
 -return_closcall2(data,  ((closureN)self_7313763)->elements[1],  ((closureN)self_7313763)->elements[0], Cyc_string2symbol(data, r_736684));; 
-+
-+pair_type local_7322487; 
-+return_direct_with_clo1(data,(closure)&c_7320625,__lambda_1373,  set_cell_as_expr(&local_7322487, ((closureN)self_7312500)->elements[40]));; 
- }
- 
+-}
+-
 -static void __lambda_844(void *data, object self_7313764, int argc, object *args) /* object self_7313764, object r_736680 */
-+static void __lambda_1373(void *data, object self_7312501, int argc, object *args) /* object self_7312501, object ellipsis_127_733226 */
-  {
+- {
 - object r_736680 = args[0];
-+ object ellipsis_127_733226 = args[0];
-   
+-  
 -closureN_type c_7321978;
 -object e_7323694 [48];
 -c_7321978.hdr.mark = gc_color_red;
@@ -23164,12 +25046,31 @@ Make let-values be the same as let*-values, to work around
 -  
 -list_3_type local_7323688; 
 -return_direct_with_clo1(data,  ((closureN)self_7313768)->elements[1], (((closure)  ((closureN)self_7313768)->elements[1])->fn),  Cyc_fast_list_3(&local_7323688, ((closureN)self_7313768)->elements[0], r_736679, boolean_f));; 
--}
--
++closureN_type c_7322280;
++object e_7322292 [4];
++c_7322280.hdr.mark = gc_color_red;
++ c_7322280.hdr.grayed = 0;
++c_7322280.tag = closureN_tag;
++ c_7322280.fn = (function_type)__lambda_1000;
++c_7322280.num_args = 1;
++c_7322280.num_elements = 4;
++c_7322280.elements = (object *)e_7322292;
++c_7322280.elements[0] = ((closureN)self_7312570)->elements[0];
++c_7322280.elements[1] = ((closureN)self_7312570)->elements[2];
++c_7322280.elements[2] = ((closureN)self_7312570)->elements[5];
++c_7322280.elements[3] = ((closureN)self_7312570)->elements[7];
++
++
++list_2_type local_7322295; 
++return_closcall6(data,  car(((closureN)self_7312570)->elements[6]),  &c_7322280, r_736218, Cyc_fast_list_2(&local_7322295, ((closureN)self_7312570)->elements[1], ((closureN)self_7312570)->elements[7]), ((closureN)self_7312570)->elements[3], ((closureN)self_7312570)->elements[8], ((closureN)self_7312570)->elements[4]);; 
+ }
+ 
 -static void __lambda_945(void *data, object self_7313769, int argc, object *args) /* object self_7313769, object r_736469 */
-- {
++static void __lambda_1000(void *data, object self_7312571, int argc, object *args) /* object self_7312571, object r_736217 */
+  {
 - object r_736469 = args[0];
--  
++ object r_736217 = args[0];
+   
 -closureN_type c_7322842;
 -object e_7323668 [31];
 -c_7322842.hdr.mark = gc_color_red;
@@ -23511,222 +25412,26 @@ Make let-values be the same as let*-values, to work around
 -c_7323644.elements[1] = ((closureN)self_7313774)->elements[30];
 -c_7323644.elements[2] = v_731286_733586;
 -c_7323644.elements[3] = ((closureN)self_7313774)->elements[36];
-+closureN_type c_7320627;
-+object e_7322479 [50];
-+c_7320627.hdr.mark = gc_color_red;
-+ c_7320627.hdr.grayed = 0;
-+c_7320627.tag = closureN_tag;
-+ c_7320627.fn = (function_type)__lambda_1372;
-+c_7320627.num_args = 1;
-+c_7320627.num_elements = 50;
-+c_7320627.elements = (object *)e_7322479;
-+c_7320627.elements[0] = ((closureN)self_7312501)->elements[0];
-+c_7320627.elements[1] = ((closureN)self_7312501)->elements[1];
-+c_7320627.elements[2] = ((closureN)self_7312501)->elements[2];
-+c_7320627.elements[3] = ((closureN)self_7312501)->elements[3];
-+c_7320627.elements[4] = ((closureN)self_7312501)->elements[4];
-+c_7320627.elements[5] = ((closureN)self_7312501)->elements[5];
-+c_7320627.elements[6] = ((closureN)self_7312501)->elements[6];
-+c_7320627.elements[7] = ((closureN)self_7312501)->elements[7];
-+c_7320627.elements[8] = ((closureN)self_7312501)->elements[8];
-+c_7320627.elements[9] = ((closureN)self_7312501)->elements[9];
-+c_7320627.elements[10] = ((closureN)self_7312501)->elements[10];
-+c_7320627.elements[11] = ((closureN)self_7312501)->elements[11];
-+c_7320627.elements[12] = ((closureN)self_7312501)->elements[12];
-+c_7320627.elements[13] = ((closureN)self_7312501)->elements[13];
-+c_7320627.elements[14] = ((closureN)self_7312501)->elements[14];
-+c_7320627.elements[15] = ((closureN)self_7312501)->elements[15];
-+c_7320627.elements[16] = ((closureN)self_7312501)->elements[16];
-+c_7320627.elements[17] = ((closureN)self_7312501)->elements[17];
-+c_7320627.elements[18] = ((closureN)self_7312501)->elements[18];
-+c_7320627.elements[19] = ((closureN)self_7312501)->elements[19];
-+c_7320627.elements[20] = ((closureN)self_7312501)->elements[20];
-+c_7320627.elements[21] = ((closureN)self_7312501)->elements[21];
-+c_7320627.elements[22] = ((closureN)self_7312501)->elements[22];
-+c_7320627.elements[23] = ((closureN)self_7312501)->elements[23];
-+c_7320627.elements[24] = ((closureN)self_7312501)->elements[24];
-+c_7320627.elements[25] = ((closureN)self_7312501)->elements[25];
-+c_7320627.elements[26] = ((closureN)self_7312501)->elements[26];
-+c_7320627.elements[27] = ((closureN)self_7312501)->elements[27];
-+c_7320627.elements[28] = ((closureN)self_7312501)->elements[28];
-+c_7320627.elements[29] = ((closureN)self_7312501)->elements[29];
-+c_7320627.elements[30] = ((closureN)self_7312501)->elements[30];
-+c_7320627.elements[31] = ((closureN)self_7312501)->elements[31];
-+c_7320627.elements[32] = ((closureN)self_7312501)->elements[32];
-+c_7320627.elements[33] = ((closureN)self_7312501)->elements[33];
-+c_7320627.elements[34] = ((closureN)self_7312501)->elements[34];
-+c_7320627.elements[35] = ((closureN)self_7312501)->elements[35];
-+c_7320627.elements[36] = ((closureN)self_7312501)->elements[36];
-+c_7320627.elements[37] = ((closureN)self_7312501)->elements[38];
-+c_7320627.elements[38] = ((closureN)self_7312501)->elements[39];
-+c_7320627.elements[39] = ((closureN)self_7312501)->elements[40];
-+c_7320627.elements[40] = ellipsis_127_733226;
-+c_7320627.elements[41] = ((closureN)self_7312501)->elements[41];
-+c_7320627.elements[42] = ((closureN)self_7312501)->elements[42];
-+c_7320627.elements[43] = ((closureN)self_7312501)->elements[43];
-+c_7320627.elements[44] = ((closureN)self_7312501)->elements[44];
-+c_7320627.elements[45] = ((closureN)self_7312501)->elements[45];
-+c_7320627.elements[46] = ((closureN)self_7312501)->elements[46];
-+c_7320627.elements[47] = ((closureN)self_7312501)->elements[47];
-+c_7320627.elements[48] = ((closureN)self_7312501)->elements[48];
-+c_7320627.elements[49] = ((closureN)self_7312501)->elements[49];
-+
-+
-+pair_type local_7322482; 
-+return_direct_with_clo1(data,(closure)&c_7320627,__lambda_1372,  set_cell_as_expr(&local_7322482, ((closureN)self_7312501)->elements[37]));; 
-+}
-+
-+static void __lambda_1372(void *data, object self_7312502, int argc, object *args) /* object self_7312502, object ellipsis_91depth_733227 */
-+ {
-+ object ellipsis_91depth_733227 = args[0];
-+  
-+closureN_type c_7320629;
-+object e_7322474 [50];
-+c_7320629.hdr.mark = gc_color_red;
-+ c_7320629.hdr.grayed = 0;
-+c_7320629.tag = closureN_tag;
-+ c_7320629.fn = (function_type)__lambda_1371;
-+c_7320629.num_args = 1;
-+c_7320629.num_elements = 50;
-+c_7320629.elements = (object *)e_7322474;
-+c_7320629.elements[0] = ((closureN)self_7312502)->elements[0];
-+c_7320629.elements[1] = ((closureN)self_7312502)->elements[1];
-+c_7320629.elements[2] = ((closureN)self_7312502)->elements[2];
-+c_7320629.elements[3] = ((closureN)self_7312502)->elements[3];
-+c_7320629.elements[4] = ((closureN)self_7312502)->elements[4];
-+c_7320629.elements[5] = ((closureN)self_7312502)->elements[5];
-+c_7320629.elements[6] = ((closureN)self_7312502)->elements[6];
-+c_7320629.elements[7] = ((closureN)self_7312502)->elements[7];
-+c_7320629.elements[8] = ((closureN)self_7312502)->elements[8];
-+c_7320629.elements[9] = ((closureN)self_7312502)->elements[9];
-+c_7320629.elements[10] = ((closureN)self_7312502)->elements[10];
-+c_7320629.elements[11] = ((closureN)self_7312502)->elements[11];
-+c_7320629.elements[12] = ((closureN)self_7312502)->elements[12];
-+c_7320629.elements[13] = ((closureN)self_7312502)->elements[13];
-+c_7320629.elements[14] = ((closureN)self_7312502)->elements[14];
-+c_7320629.elements[15] = ((closureN)self_7312502)->elements[15];
-+c_7320629.elements[16] = ((closureN)self_7312502)->elements[16];
-+c_7320629.elements[17] = ((closureN)self_7312502)->elements[17];
-+c_7320629.elements[18] = ((closureN)self_7312502)->elements[18];
-+c_7320629.elements[19] = ((closureN)self_7312502)->elements[19];
-+c_7320629.elements[20] = ((closureN)self_7312502)->elements[20];
-+c_7320629.elements[21] = ((closureN)self_7312502)->elements[21];
-+c_7320629.elements[22] = ((closureN)self_7312502)->elements[22];
-+c_7320629.elements[23] = ((closureN)self_7312502)->elements[23];
-+c_7320629.elements[24] = ((closureN)self_7312502)->elements[24];
-+c_7320629.elements[25] = ((closureN)self_7312502)->elements[25];
-+c_7320629.elements[26] = ((closureN)self_7312502)->elements[26];
-+c_7320629.elements[27] = ((closureN)self_7312502)->elements[27];
-+c_7320629.elements[28] = ((closureN)self_7312502)->elements[28];
-+c_7320629.elements[29] = ((closureN)self_7312502)->elements[29];
-+c_7320629.elements[30] = ((closureN)self_7312502)->elements[30];
-+c_7320629.elements[31] = ((closureN)self_7312502)->elements[31];
-+c_7320629.elements[32] = ((closureN)self_7312502)->elements[32];
-+c_7320629.elements[33] = ((closureN)self_7312502)->elements[33];
-+c_7320629.elements[34] = ((closureN)self_7312502)->elements[34];
-+c_7320629.elements[35] = ((closureN)self_7312502)->elements[35];
-+c_7320629.elements[36] = ((closureN)self_7312502)->elements[36];
-+c_7320629.elements[37] = ellipsis_91depth_733227;
-+c_7320629.elements[38] = ((closureN)self_7312502)->elements[37];
-+c_7320629.elements[39] = ((closureN)self_7312502)->elements[38];
-+c_7320629.elements[40] = ((closureN)self_7312502)->elements[40];
-+c_7320629.elements[41] = ((closureN)self_7312502)->elements[41];
-+c_7320629.elements[42] = ((closureN)self_7312502)->elements[42];
-+c_7320629.elements[43] = ((closureN)self_7312502)->elements[43];
-+c_7320629.elements[44] = ((closureN)self_7312502)->elements[44];
-+c_7320629.elements[45] = ((closureN)self_7312502)->elements[45];
-+c_7320629.elements[46] = ((closureN)self_7312502)->elements[46];
-+c_7320629.elements[47] = ((closureN)self_7312502)->elements[47];
-+c_7320629.elements[48] = ((closureN)self_7312502)->elements[48];
-+c_7320629.elements[49] = ((closureN)self_7312502)->elements[49];
-+
- 
+-
 -return_direct_with_clo1(data,(closure)&c_7322872,__lambda_952,  &c_7323644);; 
-+pair_type local_7322477; 
-+return_direct_with_clo1(data,(closure)&c_7320629,__lambda_1371,  set_cell_as_expr(&local_7322477, ((closureN)self_7312502)->elements[39]));; 
- }
- 
+-}
+-
 -static void __lambda_1003(void *data, object self_7313775, int argc, object *args) /* object self_7313775, object r_736475 */
-+static void __lambda_1371(void *data, object self_7312503, int argc, object *args) /* object self_7312503, object ellipsis_91tail_733228 */
-  {
+- {
 - object r_736475 = args[0];
-+ object ellipsis_91tail_733228 = args[0];
-   
+-  
 -list_3_type local_7323649; 
-+closureN_type c_7320631;
-+object e_7322469 [50];
-+c_7320631.hdr.mark = gc_color_red;
-+ c_7320631.hdr.grayed = 0;
-+c_7320631.tag = closureN_tag;
-+ c_7320631.fn = (function_type)__lambda_1370;
-+c_7320631.num_args = 1;
-+c_7320631.num_elements = 50;
-+c_7320631.elements = (object *)e_7322469;
-+c_7320631.elements[0] = ((closureN)self_7312503)->elements[0];
-+c_7320631.elements[1] = ((closureN)self_7312503)->elements[1];
-+c_7320631.elements[2] = ((closureN)self_7312503)->elements[2];
-+c_7320631.elements[3] = ((closureN)self_7312503)->elements[3];
-+c_7320631.elements[4] = ((closureN)self_7312503)->elements[4];
-+c_7320631.elements[5] = ((closureN)self_7312503)->elements[5];
-+c_7320631.elements[6] = ((closureN)self_7312503)->elements[6];
-+c_7320631.elements[7] = ((closureN)self_7312503)->elements[7];
-+c_7320631.elements[8] = ((closureN)self_7312503)->elements[8];
-+c_7320631.elements[9] = ((closureN)self_7312503)->elements[9];
-+c_7320631.elements[10] = ((closureN)self_7312503)->elements[10];
-+c_7320631.elements[11] = ((closureN)self_7312503)->elements[11];
-+c_7320631.elements[12] = ((closureN)self_7312503)->elements[12];
-+c_7320631.elements[13] = ((closureN)self_7312503)->elements[13];
-+c_7320631.elements[14] = ((closureN)self_7312503)->elements[14];
-+c_7320631.elements[15] = ((closureN)self_7312503)->elements[15];
-+c_7320631.elements[16] = ((closureN)self_7312503)->elements[16];
-+c_7320631.elements[17] = ((closureN)self_7312503)->elements[17];
-+c_7320631.elements[18] = ((closureN)self_7312503)->elements[18];
-+c_7320631.elements[19] = ((closureN)self_7312503)->elements[19];
-+c_7320631.elements[20] = ((closureN)self_7312503)->elements[20];
-+c_7320631.elements[21] = ((closureN)self_7312503)->elements[21];
-+c_7320631.elements[22] = ((closureN)self_7312503)->elements[22];
-+c_7320631.elements[23] = ((closureN)self_7312503)->elements[23];
-+c_7320631.elements[24] = ((closureN)self_7312503)->elements[24];
-+c_7320631.elements[25] = ((closureN)self_7312503)->elements[25];
-+c_7320631.elements[26] = ((closureN)self_7312503)->elements[26];
-+c_7320631.elements[27] = ((closureN)self_7312503)->elements[27];
-+c_7320631.elements[28] = ((closureN)self_7312503)->elements[28];
-+c_7320631.elements[29] = ((closureN)self_7312503)->elements[29];
-+c_7320631.elements[30] = ((closureN)self_7312503)->elements[30];
-+c_7320631.elements[31] = ((closureN)self_7312503)->elements[31];
-+c_7320631.elements[32] = ((closureN)self_7312503)->elements[32];
-+c_7320631.elements[33] = ((closureN)self_7312503)->elements[34];
-+c_7320631.elements[34] = ((closureN)self_7312503)->elements[35];
-+c_7320631.elements[35] = ((closureN)self_7312503)->elements[36];
-+c_7320631.elements[36] = ((closureN)self_7312503)->elements[37];
-+c_7320631.elements[37] = ((closureN)self_7312503)->elements[38];
-+c_7320631.elements[38] = ((closureN)self_7312503)->elements[39];
-+c_7320631.elements[39] = ellipsis_91tail_733228;
-+c_7320631.elements[40] = ((closureN)self_7312503)->elements[40];
-+c_7320631.elements[41] = ((closureN)self_7312503)->elements[41];
-+c_7320631.elements[42] = ((closureN)self_7312503)->elements[42];
-+c_7320631.elements[43] = ((closureN)self_7312503)->elements[43];
-+c_7320631.elements[44] = ((closureN)self_7312503)->elements[44];
-+c_7320631.elements[45] = ((closureN)self_7312503)->elements[45];
-+c_7320631.elements[46] = ((closureN)self_7312503)->elements[46];
-+c_7320631.elements[47] = ((closureN)self_7312503)->elements[47];
-+c_7320631.elements[48] = ((closureN)self_7312503)->elements[48];
-+c_7320631.elements[49] = ((closureN)self_7312503)->elements[49];
- 
+-
 -pair_type local_7323653; 
- 
+-
 -list_2_type local_7323656; 
 -return_direct_with_clo1(data,  ((closureN)self_7313775)->elements[1], (((closure)  ((closureN)self_7313775)->elements[1])->fn),  Cyc_fast_list_3(&local_7323649, ((closureN)self_7313775)->elements[0], set_cell_as_expr(&local_7323653, Cyc_fast_list_2(&local_7323656, ((closureN)self_7313775)->elements[2], ((closureN)self_7313775)->elements[3])), r_736475));; 
-+pair_type local_7322472; 
-+return_direct_with_clo1(data,(closure)&c_7320631,__lambda_1370,  set_cell_as_expr(&local_7322472, ((closureN)self_7312503)->elements[33]));; 
- }
- 
+-}
+-
 -static void __lambda_952(void *data, object self_7313776, int argc, object *args) /* object self_7313776, object k_736476 */
-+static void __lambda_1370(void *data, object self_7312504, int argc, object *args) /* object self_7312504, object all_91vars_733229 */
-  {
+- {
 - object k_736476 = args[0];
-+ object all_91vars_733229 = args[0];
-   
+-  
 -closureN_type c_7322874;
 -object e_7323641 [37];
 -c_7322874.hdr.mark = gc_color_red;
@@ -23804,659 +25509,7 @@ Make let-values be the same as let*-values, to work around
 -c_7322876.elements[10] = ((closureN)self_7313777)->elements[35];
 -c_7322876.elements[11] = ((closureN)self_7313777)->elements[36];
 -
-+closureN_type c_7320633;
-+object e_7322464 [50];
-+c_7320633.hdr.mark = gc_color_red;
-+ c_7320633.hdr.grayed = 0;
-+c_7320633.tag = closureN_tag;
-+ c_7320633.fn = (function_type)__lambda_1369;
-+c_7320633.num_args = 1;
-+c_7320633.num_elements = 50;
-+c_7320633.elements = (object *)e_7322464;
-+c_7320633.elements[0] = ((closureN)self_7312504)->elements[0];
-+c_7320633.elements[1] = ((closureN)self_7312504)->elements[1];
-+c_7320633.elements[2] = ((closureN)self_7312504)->elements[2];
-+c_7320633.elements[3] = ((closureN)self_7312504)->elements[3];
-+c_7320633.elements[4] = ((closureN)self_7312504)->elements[4];
-+c_7320633.elements[5] = ((closureN)self_7312504)->elements[5];
-+c_7320633.elements[6] = ((closureN)self_7312504)->elements[6];
-+c_7320633.elements[7] = ((closureN)self_7312504)->elements[7];
-+c_7320633.elements[8] = ((closureN)self_7312504)->elements[8];
-+c_7320633.elements[9] = ((closureN)self_7312504)->elements[9];
-+c_7320633.elements[10] = ((closureN)self_7312504)->elements[10];
-+c_7320633.elements[11] = ((closureN)self_7312504)->elements[11];
-+c_7320633.elements[12] = ((closureN)self_7312504)->elements[12];
-+c_7320633.elements[13] = ((closureN)self_7312504)->elements[13];
-+c_7320633.elements[14] = ((closureN)self_7312504)->elements[14];
-+c_7320633.elements[15] = ((closureN)self_7312504)->elements[15];
-+c_7320633.elements[16] = ((closureN)self_7312504)->elements[16];
-+c_7320633.elements[17] = ((closureN)self_7312504)->elements[17];
-+c_7320633.elements[18] = ((closureN)self_7312504)->elements[18];
-+c_7320633.elements[19] = ((closureN)self_7312504)->elements[19];
-+c_7320633.elements[20] = ((closureN)self_7312504)->elements[20];
-+c_7320633.elements[21] = ((closureN)self_7312504)->elements[21];
-+c_7320633.elements[22] = ((closureN)self_7312504)->elements[22];
-+c_7320633.elements[23] = ((closureN)self_7312504)->elements[23];
-+c_7320633.elements[24] = ((closureN)self_7312504)->elements[24];
-+c_7320633.elements[25] = ((closureN)self_7312504)->elements[25];
-+c_7320633.elements[26] = ((closureN)self_7312504)->elements[26];
-+c_7320633.elements[27] = ((closureN)self_7312504)->elements[27];
-+c_7320633.elements[28] = ((closureN)self_7312504)->elements[28];
-+c_7320633.elements[29] = ((closureN)self_7312504)->elements[29];
-+c_7320633.elements[30] = ((closureN)self_7312504)->elements[30];
-+c_7320633.elements[31] = ((closureN)self_7312504)->elements[31];
-+c_7320633.elements[32] = ((closureN)self_7312504)->elements[32];
-+c_7320633.elements[33] = all_91vars_733229;
-+c_7320633.elements[34] = ((closureN)self_7312504)->elements[33];
-+c_7320633.elements[35] = ((closureN)self_7312504)->elements[34];
-+c_7320633.elements[36] = ((closureN)self_7312504)->elements[35];
-+c_7320633.elements[37] = ((closureN)self_7312504)->elements[36];
-+c_7320633.elements[38] = ((closureN)self_7312504)->elements[37];
-+c_7320633.elements[39] = ((closureN)self_7312504)->elements[38];
-+c_7320633.elements[40] = ((closureN)self_7312504)->elements[39];
-+c_7320633.elements[41] = ((closureN)self_7312504)->elements[40];
-+c_7320633.elements[42] = ((closureN)self_7312504)->elements[41];
-+c_7320633.elements[43] = ((closureN)self_7312504)->elements[42];
-+c_7320633.elements[44] = ((closureN)self_7312504)->elements[43];
-+c_7320633.elements[45] = ((closureN)self_7312504)->elements[44];
-+c_7320633.elements[46] = ((closureN)self_7312504)->elements[46];
-+c_7320633.elements[47] = ((closureN)self_7312504)->elements[47];
-+c_7320633.elements[48] = ((closureN)self_7312504)->elements[48];
-+c_7320633.elements[49] = ((closureN)self_7312504)->elements[49];
-+
-+
-+pair_type local_7322467; 
-+return_direct_with_clo1(data,(closure)&c_7320633,__lambda_1369,  set_cell_as_expr(&local_7322467, ((closureN)self_7312504)->elements[45]));; 
-+}
-+
-+static void __lambda_1369(void *data, object self_7312505, int argc, object *args) /* object self_7312505, object free_91vars_733230 */
-+ {
-+ object free_91vars_733230 = args[0];
-+  
-+closureN_type c_7320635;
-+object e_7322459 [50];
-+c_7320635.hdr.mark = gc_color_red;
-+ c_7320635.hdr.grayed = 0;
-+c_7320635.tag = closureN_tag;
-+ c_7320635.fn = (function_type)__lambda_1368;
-+c_7320635.num_args = 1;
-+c_7320635.num_elements = 50;
-+c_7320635.elements = (object *)e_7322459;
-+c_7320635.elements[0] = ((closureN)self_7312505)->elements[0];
-+c_7320635.elements[1] = ((closureN)self_7312505)->elements[1];
-+c_7320635.elements[2] = ((closureN)self_7312505)->elements[2];
-+c_7320635.elements[3] = ((closureN)self_7312505)->elements[3];
-+c_7320635.elements[4] = ((closureN)self_7312505)->elements[4];
-+c_7320635.elements[5] = ((closureN)self_7312505)->elements[5];
-+c_7320635.elements[6] = ((closureN)self_7312505)->elements[6];
-+c_7320635.elements[7] = ((closureN)self_7312505)->elements[7];
-+c_7320635.elements[8] = ((closureN)self_7312505)->elements[8];
-+c_7320635.elements[9] = ((closureN)self_7312505)->elements[9];
-+c_7320635.elements[10] = ((closureN)self_7312505)->elements[10];
-+c_7320635.elements[11] = ((closureN)self_7312505)->elements[11];
-+c_7320635.elements[12] = ((closureN)self_7312505)->elements[12];
-+c_7320635.elements[13] = ((closureN)self_7312505)->elements[13];
-+c_7320635.elements[14] = ((closureN)self_7312505)->elements[14];
-+c_7320635.elements[15] = ((closureN)self_7312505)->elements[15];
-+c_7320635.elements[16] = ((closureN)self_7312505)->elements[16];
-+c_7320635.elements[17] = ((closureN)self_7312505)->elements[17];
-+c_7320635.elements[18] = ((closureN)self_7312505)->elements[18];
-+c_7320635.elements[19] = ((closureN)self_7312505)->elements[19];
-+c_7320635.elements[20] = ((closureN)self_7312505)->elements[20];
-+c_7320635.elements[21] = ((closureN)self_7312505)->elements[21];
-+c_7320635.elements[22] = ((closureN)self_7312505)->elements[22];
-+c_7320635.elements[23] = ((closureN)self_7312505)->elements[23];
-+c_7320635.elements[24] = ((closureN)self_7312505)->elements[24];
-+c_7320635.elements[25] = ((closureN)self_7312505)->elements[25];
-+c_7320635.elements[26] = ((closureN)self_7312505)->elements[26];
-+c_7320635.elements[27] = ((closureN)self_7312505)->elements[27];
-+c_7320635.elements[28] = ((closureN)self_7312505)->elements[28];
-+c_7320635.elements[29] = ((closureN)self_7312505)->elements[29];
-+c_7320635.elements[30] = ((closureN)self_7312505)->elements[30];
-+c_7320635.elements[31] = ((closureN)self_7312505)->elements[31];
-+c_7320635.elements[32] = ((closureN)self_7312505)->elements[32];
-+c_7320635.elements[33] = ((closureN)self_7312505)->elements[33];
-+c_7320635.elements[34] = ((closureN)self_7312505)->elements[34];
-+c_7320635.elements[35] = ((closureN)self_7312505)->elements[35];
-+c_7320635.elements[36] = ((closureN)self_7312505)->elements[36];
-+c_7320635.elements[37] = ((closureN)self_7312505)->elements[37];
-+c_7320635.elements[38] = ((closureN)self_7312505)->elements[38];
-+c_7320635.elements[39] = ((closureN)self_7312505)->elements[39];
-+c_7320635.elements[40] = ((closureN)self_7312505)->elements[40];
-+c_7320635.elements[41] = ((closureN)self_7312505)->elements[41];
-+c_7320635.elements[42] = ((closureN)self_7312505)->elements[42];
-+c_7320635.elements[43] = ((closureN)self_7312505)->elements[44];
-+c_7320635.elements[44] = ((closureN)self_7312505)->elements[45];
-+c_7320635.elements[45] = free_91vars_733230;
-+c_7320635.elements[46] = ((closureN)self_7312505)->elements[46];
-+c_7320635.elements[47] = ((closureN)self_7312505)->elements[47];
-+c_7320635.elements[48] = ((closureN)self_7312505)->elements[48];
-+c_7320635.elements[49] = ((closureN)self_7312505)->elements[49];
-+
-+
-+pair_type local_7322462; 
-+return_direct_with_clo1(data,(closure)&c_7320635,__lambda_1368,  set_cell_as_expr(&local_7322462, ((closureN)self_7312505)->elements[43]));; 
-+}
-+
-+static void __lambda_1368(void *data, object self_7312506, int argc, object *args) /* object self_7312506, object expand_91template_733231 */
-+ {
-+ object expand_91template_733231 = args[0];
-+  object r_736249;
-+  if( (boolean_f != ((closureN)self_7312506)->elements[39]) ){ 
-+  
-+  r_736249 = Cyc_cadr(data, ((closureN)self_7312506)->elements[43]);
-+} else { 
-+  r_736249 = quote__93_93_93;}
-+;
-+closureN_type c_7320645;
-+object e_7322458 [51];
-+c_7320645.hdr.mark = gc_color_red;
-+ c_7320645.hdr.grayed = 0;
-+c_7320645.tag = closureN_tag;
-+ c_7320645.fn = (function_type)__lambda_836;
-+c_7320645.num_args = 1;
-+c_7320645.num_elements = 51;
-+c_7320645.elements = (object *)e_7322458;
-+c_7320645.elements[0] = ((closureN)self_7312506)->elements[0];
-+c_7320645.elements[1] = ((closureN)self_7312506)->elements[1];
-+c_7320645.elements[2] = ((closureN)self_7312506)->elements[2];
-+c_7320645.elements[3] = ((closureN)self_7312506)->elements[3];
-+c_7320645.elements[4] = ((closureN)self_7312506)->elements[4];
-+c_7320645.elements[5] = ((closureN)self_7312506)->elements[5];
-+c_7320645.elements[6] = ((closureN)self_7312506)->elements[6];
-+c_7320645.elements[7] = ((closureN)self_7312506)->elements[7];
-+c_7320645.elements[8] = ((closureN)self_7312506)->elements[8];
-+c_7320645.elements[9] = ((closureN)self_7312506)->elements[9];
-+c_7320645.elements[10] = ((closureN)self_7312506)->elements[10];
-+c_7320645.elements[11] = ((closureN)self_7312506)->elements[11];
-+c_7320645.elements[12] = ((closureN)self_7312506)->elements[12];
-+c_7320645.elements[13] = ((closureN)self_7312506)->elements[13];
-+c_7320645.elements[14] = ((closureN)self_7312506)->elements[14];
-+c_7320645.elements[15] = ((closureN)self_7312506)->elements[15];
-+c_7320645.elements[16] = ((closureN)self_7312506)->elements[16];
-+c_7320645.elements[17] = ((closureN)self_7312506)->elements[17];
-+c_7320645.elements[18] = ((closureN)self_7312506)->elements[18];
-+c_7320645.elements[19] = ((closureN)self_7312506)->elements[19];
-+c_7320645.elements[20] = ((closureN)self_7312506)->elements[20];
-+c_7320645.elements[21] = ((closureN)self_7312506)->elements[21];
-+c_7320645.elements[22] = ((closureN)self_7312506)->elements[22];
-+c_7320645.elements[23] = ((closureN)self_7312506)->elements[23];
-+c_7320645.elements[24] = ((closureN)self_7312506)->elements[24];
-+c_7320645.elements[25] = ((closureN)self_7312506)->elements[25];
-+c_7320645.elements[26] = ((closureN)self_7312506)->elements[26];
-+c_7320645.elements[27] = ((closureN)self_7312506)->elements[27];
-+c_7320645.elements[28] = ((closureN)self_7312506)->elements[28];
-+c_7320645.elements[29] = ((closureN)self_7312506)->elements[29];
-+c_7320645.elements[30] = ((closureN)self_7312506)->elements[30];
-+c_7320645.elements[31] = ((closureN)self_7312506)->elements[31];
-+c_7320645.elements[32] = ((closureN)self_7312506)->elements[32];
-+c_7320645.elements[33] = ((closureN)self_7312506)->elements[33];
-+c_7320645.elements[34] = ((closureN)self_7312506)->elements[34];
-+c_7320645.elements[35] = ((closureN)self_7312506)->elements[35];
-+c_7320645.elements[36] = ((closureN)self_7312506)->elements[36];
-+c_7320645.elements[37] = ((closureN)self_7312506)->elements[37];
-+c_7320645.elements[38] = ((closureN)self_7312506)->elements[38];
-+c_7320645.elements[39] = ((closureN)self_7312506)->elements[39];
-+c_7320645.elements[40] = ((closureN)self_7312506)->elements[40];
-+c_7320645.elements[41] = ((closureN)self_7312506)->elements[41];
-+c_7320645.elements[42] = ((closureN)self_7312506)->elements[42];
-+c_7320645.elements[43] = expand_91template_733231;
-+c_7320645.elements[44] = ((closureN)self_7312506)->elements[43];
-+c_7320645.elements[45] = ((closureN)self_7312506)->elements[44];
-+c_7320645.elements[46] = ((closureN)self_7312506)->elements[45];
-+c_7320645.elements[47] = ((closureN)self_7312506)->elements[46];
-+c_7320645.elements[48] = ((closureN)self_7312506)->elements[47];
-+c_7320645.elements[49] = ((closureN)self_7312506)->elements[48];
-+c_7320645.elements[50] = ((closureN)self_7312506)->elements[49];
-+
-+return_closcall2(data,  ((closureN)self_7312506)->elements[49],  &c_7320645, r_736249);; 
-+}
-+
-+static void __lambda_836(void *data, object self_7312507, int argc, object *args) /* object self_7312507, object r_736248 */
-+ {
-+ object r_736248 = args[0];
-+  
-+closureN_type c_7320647;
-+object e_7322454 [51];
-+c_7320647.hdr.mark = gc_color_red;
-+ c_7320647.hdr.grayed = 0;
-+c_7320647.tag = closureN_tag;
-+ c_7320647.fn = (function_type)__lambda_837;
-+c_7320647.num_args = 1;
-+c_7320647.num_elements = 51;
-+c_7320647.elements = (object *)e_7322454;
-+c_7320647.elements[0] = ((closureN)self_7312507)->elements[0];
-+c_7320647.elements[1] = ((closureN)self_7312507)->elements[1];
-+c_7320647.elements[2] = ((closureN)self_7312507)->elements[2];
-+c_7320647.elements[3] = ((closureN)self_7312507)->elements[3];
-+c_7320647.elements[4] = ((closureN)self_7312507)->elements[4];
-+c_7320647.elements[5] = ((closureN)self_7312507)->elements[5];
-+c_7320647.elements[6] = ((closureN)self_7312507)->elements[6];
-+c_7320647.elements[7] = ((closureN)self_7312507)->elements[7];
-+c_7320647.elements[8] = ((closureN)self_7312507)->elements[8];
-+c_7320647.elements[9] = ((closureN)self_7312507)->elements[9];
-+c_7320647.elements[10] = ((closureN)self_7312507)->elements[10];
-+c_7320647.elements[11] = ((closureN)self_7312507)->elements[11];
-+c_7320647.elements[12] = ((closureN)self_7312507)->elements[12];
-+c_7320647.elements[13] = ((closureN)self_7312507)->elements[13];
-+c_7320647.elements[14] = ((closureN)self_7312507)->elements[14];
-+c_7320647.elements[15] = ((closureN)self_7312507)->elements[15];
-+c_7320647.elements[16] = ((closureN)self_7312507)->elements[16];
-+c_7320647.elements[17] = ((closureN)self_7312507)->elements[17];
-+c_7320647.elements[18] = ((closureN)self_7312507)->elements[18];
-+c_7320647.elements[19] = ((closureN)self_7312507)->elements[19];
-+c_7320647.elements[20] = ((closureN)self_7312507)->elements[20];
-+c_7320647.elements[21] = ((closureN)self_7312507)->elements[21];
-+c_7320647.elements[22] = ((closureN)self_7312507)->elements[22];
-+c_7320647.elements[23] = ((closureN)self_7312507)->elements[23];
-+c_7320647.elements[24] = ((closureN)self_7312507)->elements[24];
-+c_7320647.elements[25] = ((closureN)self_7312507)->elements[25];
-+c_7320647.elements[26] = ((closureN)self_7312507)->elements[26];
-+c_7320647.elements[27] = ((closureN)self_7312507)->elements[27];
-+c_7320647.elements[28] = ((closureN)self_7312507)->elements[28];
-+c_7320647.elements[29] = ((closureN)self_7312507)->elements[29];
-+c_7320647.elements[30] = ((closureN)self_7312507)->elements[30];
-+c_7320647.elements[31] = ((closureN)self_7312507)->elements[31];
-+c_7320647.elements[32] = ((closureN)self_7312507)->elements[32];
-+c_7320647.elements[33] = ((closureN)self_7312507)->elements[33];
-+c_7320647.elements[34] = ((closureN)self_7312507)->elements[34];
-+c_7320647.elements[35] = ((closureN)self_7312507)->elements[35];
-+c_7320647.elements[36] = ((closureN)self_7312507)->elements[36];
-+c_7320647.elements[37] = ((closureN)self_7312507)->elements[37];
-+c_7320647.elements[38] = ((closureN)self_7312507)->elements[38];
-+c_7320647.elements[39] = ((closureN)self_7312507)->elements[39];
-+c_7320647.elements[40] = ((closureN)self_7312507)->elements[40];
-+c_7320647.elements[41] = ((closureN)self_7312507)->elements[41];
-+c_7320647.elements[42] = ((closureN)self_7312507)->elements[42];
-+c_7320647.elements[43] = ((closureN)self_7312507)->elements[43];
-+c_7320647.elements[44] = ((closureN)self_7312507)->elements[44];
-+c_7320647.elements[45] = ((closureN)self_7312507)->elements[45];
-+c_7320647.elements[46] = ((closureN)self_7312507)->elements[46];
-+c_7320647.elements[47] = ((closureN)self_7312507)->elements[47];
-+c_7320647.elements[48] = ((closureN)self_7312507)->elements[48];
-+c_7320647.elements[49] = ((closureN)self_7312507)->elements[49];
-+c_7320647.elements[50] = ((closureN)self_7312507)->elements[50];
-+
-+
-+
-+return_direct_with_clo1(data,(closure)&c_7320647,__lambda_837,  Cyc_set_cell(data, ((closureN)self_7312507)->elements[36], r_736248));; 
-+}
-+
-+static void __lambda_837(void *data, object self_7312508, int argc, object *args) /* object self_7312508, object r_735868 */
-+ {
-+
-+  
-+closureN_type c_7320649;
-+object e_7320661 [2];
-+c_7320649.hdr.mark = gc_color_red;
-+ c_7320649.hdr.grayed = 0;
-+c_7320649.tag = closureN_tag;
-+ c_7320649.fn = (function_type)__lambda_838;
-+c_7320649.num_args = 0;
-+c_7320649.num_elements = 2;
-+c_7320649.elements = (object *)e_7320661;
-+c_7320649.elements[0] = ((closureN)self_7312508)->elements[39];
-+c_7320649.elements[1] = ((closureN)self_7312508)->elements[44];
-+
-+
-+closureN_type c_7320662;
-+object e_7322453 [51];
-+c_7320662.hdr.mark = gc_color_red;
-+ c_7320662.hdr.grayed = 0;
-+c_7320662.tag = closureN_tag;
-+ c_7320662.fn = (function_type)__lambda_839;
-+c_7320662.num_args = 1;
-+c_7320662.num_elements = 51;
-+c_7320662.elements = (object *)e_7322453;
-+c_7320662.elements[0] = ((closureN)self_7312508)->elements[0];
-+c_7320662.elements[1] = ((closureN)self_7312508)->elements[1];
-+c_7320662.elements[2] = ((closureN)self_7312508)->elements[2];
-+c_7320662.elements[3] = ((closureN)self_7312508)->elements[3];
-+c_7320662.elements[4] = ((closureN)self_7312508)->elements[4];
-+c_7320662.elements[5] = ((closureN)self_7312508)->elements[5];
-+c_7320662.elements[6] = ((closureN)self_7312508)->elements[6];
-+c_7320662.elements[7] = ((closureN)self_7312508)->elements[7];
-+c_7320662.elements[8] = ((closureN)self_7312508)->elements[8];
-+c_7320662.elements[9] = ((closureN)self_7312508)->elements[9];
-+c_7320662.elements[10] = ((closureN)self_7312508)->elements[10];
-+c_7320662.elements[11] = ((closureN)self_7312508)->elements[11];
-+c_7320662.elements[12] = ((closureN)self_7312508)->elements[12];
-+c_7320662.elements[13] = ((closureN)self_7312508)->elements[13];
-+c_7320662.elements[14] = ((closureN)self_7312508)->elements[14];
-+c_7320662.elements[15] = ((closureN)self_7312508)->elements[15];
-+c_7320662.elements[16] = ((closureN)self_7312508)->elements[16];
-+c_7320662.elements[17] = ((closureN)self_7312508)->elements[17];
-+c_7320662.elements[18] = ((closureN)self_7312508)->elements[18];
-+c_7320662.elements[19] = ((closureN)self_7312508)->elements[19];
-+c_7320662.elements[20] = ((closureN)self_7312508)->elements[20];
-+c_7320662.elements[21] = ((closureN)self_7312508)->elements[21];
-+c_7320662.elements[22] = ((closureN)self_7312508)->elements[22];
-+c_7320662.elements[23] = ((closureN)self_7312508)->elements[23];
-+c_7320662.elements[24] = ((closureN)self_7312508)->elements[24];
-+c_7320662.elements[25] = ((closureN)self_7312508)->elements[25];
-+c_7320662.elements[26] = ((closureN)self_7312508)->elements[26];
-+c_7320662.elements[27] = ((closureN)self_7312508)->elements[27];
-+c_7320662.elements[28] = ((closureN)self_7312508)->elements[28];
-+c_7320662.elements[29] = ((closureN)self_7312508)->elements[29];
-+c_7320662.elements[30] = ((closureN)self_7312508)->elements[30];
-+c_7320662.elements[31] = ((closureN)self_7312508)->elements[31];
-+c_7320662.elements[32] = ((closureN)self_7312508)->elements[32];
-+c_7320662.elements[33] = ((closureN)self_7312508)->elements[33];
-+c_7320662.elements[34] = ((closureN)self_7312508)->elements[34];
-+c_7320662.elements[35] = ((closureN)self_7312508)->elements[35];
-+c_7320662.elements[36] = ((closureN)self_7312508)->elements[36];
-+c_7320662.elements[37] = ((closureN)self_7312508)->elements[37];
-+c_7320662.elements[38] = ((closureN)self_7312508)->elements[38];
-+c_7320662.elements[39] = ((closureN)self_7312508)->elements[39];
-+c_7320662.elements[40] = ((closureN)self_7312508)->elements[40];
-+c_7320662.elements[41] = ((closureN)self_7312508)->elements[41];
-+c_7320662.elements[42] = ((closureN)self_7312508)->elements[42];
-+c_7320662.elements[43] = ((closureN)self_7312508)->elements[43];
-+c_7320662.elements[44] = ((closureN)self_7312508)->elements[44];
-+c_7320662.elements[45] = ((closureN)self_7312508)->elements[45];
-+c_7320662.elements[46] = ((closureN)self_7312508)->elements[46];
-+c_7320662.elements[47] = ((closureN)self_7312508)->elements[47];
-+c_7320662.elements[48] = ((closureN)self_7312508)->elements[48];
-+c_7320662.elements[49] = ((closureN)self_7312508)->elements[49];
-+c_7320662.elements[50] = ((closureN)self_7312508)->elements[50];
-+
-+return_direct_with_clo1(data,(closure)&c_7320649,__lambda_838,  &c_7320662);; 
-+}
-+
-+static void __lambda_839(void *data, object self_7312509, int argc, object *args) /* object self_7312509, object r_736245 */
-+ {
-+ object r_736245 = args[0];
-+  
-+closureN_type c_7320664;
-+object e_7322449 [51];
-+c_7320664.hdr.mark = gc_color_red;
-+ c_7320664.hdr.grayed = 0;
-+c_7320664.tag = closureN_tag;
-+ c_7320664.fn = (function_type)__lambda_840;
-+c_7320664.num_args = 1;
-+c_7320664.num_elements = 51;
-+c_7320664.elements = (object *)e_7322449;
-+c_7320664.elements[0] = ((closureN)self_7312509)->elements[0];
-+c_7320664.elements[1] = ((closureN)self_7312509)->elements[1];
-+c_7320664.elements[2] = ((closureN)self_7312509)->elements[2];
-+c_7320664.elements[3] = ((closureN)self_7312509)->elements[3];
-+c_7320664.elements[4] = ((closureN)self_7312509)->elements[4];
-+c_7320664.elements[5] = ((closureN)self_7312509)->elements[5];
-+c_7320664.elements[6] = ((closureN)self_7312509)->elements[6];
-+c_7320664.elements[7] = ((closureN)self_7312509)->elements[7];
-+c_7320664.elements[8] = ((closureN)self_7312509)->elements[8];
-+c_7320664.elements[9] = ((closureN)self_7312509)->elements[9];
-+c_7320664.elements[10] = ((closureN)self_7312509)->elements[10];
-+c_7320664.elements[11] = ((closureN)self_7312509)->elements[11];
-+c_7320664.elements[12] = ((closureN)self_7312509)->elements[12];
-+c_7320664.elements[13] = ((closureN)self_7312509)->elements[13];
-+c_7320664.elements[14] = ((closureN)self_7312509)->elements[14];
-+c_7320664.elements[15] = ((closureN)self_7312509)->elements[15];
-+c_7320664.elements[16] = ((closureN)self_7312509)->elements[16];
-+c_7320664.elements[17] = ((closureN)self_7312509)->elements[17];
-+c_7320664.elements[18] = ((closureN)self_7312509)->elements[18];
-+c_7320664.elements[19] = ((closureN)self_7312509)->elements[19];
-+c_7320664.elements[20] = ((closureN)self_7312509)->elements[20];
-+c_7320664.elements[21] = ((closureN)self_7312509)->elements[21];
-+c_7320664.elements[22] = ((closureN)self_7312509)->elements[22];
-+c_7320664.elements[23] = ((closureN)self_7312509)->elements[23];
-+c_7320664.elements[24] = ((closureN)self_7312509)->elements[24];
-+c_7320664.elements[25] = ((closureN)self_7312509)->elements[25];
-+c_7320664.elements[26] = ((closureN)self_7312509)->elements[26];
-+c_7320664.elements[27] = ((closureN)self_7312509)->elements[27];
-+c_7320664.elements[28] = ((closureN)self_7312509)->elements[28];
-+c_7320664.elements[29] = ((closureN)self_7312509)->elements[29];
-+c_7320664.elements[30] = ((closureN)self_7312509)->elements[30];
-+c_7320664.elements[31] = ((closureN)self_7312509)->elements[31];
-+c_7320664.elements[32] = ((closureN)self_7312509)->elements[32];
-+c_7320664.elements[33] = ((closureN)self_7312509)->elements[33];
-+c_7320664.elements[34] = ((closureN)self_7312509)->elements[34];
-+c_7320664.elements[35] = ((closureN)self_7312509)->elements[35];
-+c_7320664.elements[36] = ((closureN)self_7312509)->elements[36];
-+c_7320664.elements[37] = ((closureN)self_7312509)->elements[37];
-+c_7320664.elements[38] = ((closureN)self_7312509)->elements[38];
-+c_7320664.elements[39] = ((closureN)self_7312509)->elements[39];
-+c_7320664.elements[40] = ((closureN)self_7312509)->elements[40];
-+c_7320664.elements[41] = ((closureN)self_7312509)->elements[41];
-+c_7320664.elements[42] = ((closureN)self_7312509)->elements[42];
-+c_7320664.elements[43] = ((closureN)self_7312509)->elements[43];
-+c_7320664.elements[44] = ((closureN)self_7312509)->elements[44];
-+c_7320664.elements[45] = ((closureN)self_7312509)->elements[45];
-+c_7320664.elements[46] = ((closureN)self_7312509)->elements[46];
-+c_7320664.elements[47] = ((closureN)self_7312509)->elements[47];
-+c_7320664.elements[48] = ((closureN)self_7312509)->elements[48];
-+c_7320664.elements[49] = ((closureN)self_7312509)->elements[49];
-+c_7320664.elements[50] = ((closureN)self_7312509)->elements[50];
-+
-+
-+
-+return_direct_with_clo1(data,(closure)&c_7320664,__lambda_840,  Cyc_set_cell(data, ((closureN)self_7312509)->elements[48], r_736245));; 
-+}
-+
-+static void __lambda_840(void *data, object self_7312510, int argc, object *args) /* object self_7312510, object r_735869 */
-+ {
-+
-+  
-+closureN_type c_7320666;
-+object e_7320678 [2];
-+c_7320666.hdr.mark = gc_color_red;
-+ c_7320666.hdr.grayed = 0;
-+c_7320666.tag = closureN_tag;
-+ c_7320666.fn = (function_type)__lambda_841;
-+c_7320666.num_args = 0;
-+c_7320666.num_elements = 2;
-+c_7320666.elements = (object *)e_7320678;
-+c_7320666.elements[0] = ((closureN)self_7312510)->elements[39];
-+c_7320666.elements[1] = ((closureN)self_7312510)->elements[44];
-+
-+
-+closureN_type c_7320679;
-+object e_7322448 [50];
-+c_7320679.hdr.mark = gc_color_red;
-+ c_7320679.hdr.grayed = 0;
-+c_7320679.tag = closureN_tag;
-+ c_7320679.fn = (function_type)__lambda_842;
-+c_7320679.num_args = 1;
-+c_7320679.num_elements = 50;
-+c_7320679.elements = (object *)e_7322448;
-+c_7320679.elements[0] = ((closureN)self_7312510)->elements[0];
-+c_7320679.elements[1] = ((closureN)self_7312510)->elements[1];
-+c_7320679.elements[2] = ((closureN)self_7312510)->elements[2];
-+c_7320679.elements[3] = ((closureN)self_7312510)->elements[3];
-+c_7320679.elements[4] = ((closureN)self_7312510)->elements[4];
-+c_7320679.elements[5] = ((closureN)self_7312510)->elements[5];
-+c_7320679.elements[6] = ((closureN)self_7312510)->elements[6];
-+c_7320679.elements[7] = ((closureN)self_7312510)->elements[7];
-+c_7320679.elements[8] = ((closureN)self_7312510)->elements[8];
-+c_7320679.elements[9] = ((closureN)self_7312510)->elements[9];
-+c_7320679.elements[10] = ((closureN)self_7312510)->elements[10];
-+c_7320679.elements[11] = ((closureN)self_7312510)->elements[11];
-+c_7320679.elements[12] = ((closureN)self_7312510)->elements[12];
-+c_7320679.elements[13] = ((closureN)self_7312510)->elements[13];
-+c_7320679.elements[14] = ((closureN)self_7312510)->elements[14];
-+c_7320679.elements[15] = ((closureN)self_7312510)->elements[15];
-+c_7320679.elements[16] = ((closureN)self_7312510)->elements[16];
-+c_7320679.elements[17] = ((closureN)self_7312510)->elements[17];
-+c_7320679.elements[18] = ((closureN)self_7312510)->elements[18];
-+c_7320679.elements[19] = ((closureN)self_7312510)->elements[19];
-+c_7320679.elements[20] = ((closureN)self_7312510)->elements[20];
-+c_7320679.elements[21] = ((closureN)self_7312510)->elements[21];
-+c_7320679.elements[22] = ((closureN)self_7312510)->elements[22];
-+c_7320679.elements[23] = ((closureN)self_7312510)->elements[23];
-+c_7320679.elements[24] = ((closureN)self_7312510)->elements[24];
-+c_7320679.elements[25] = ((closureN)self_7312510)->elements[25];
-+c_7320679.elements[26] = ((closureN)self_7312510)->elements[26];
-+c_7320679.elements[27] = ((closureN)self_7312510)->elements[27];
-+c_7320679.elements[28] = ((closureN)self_7312510)->elements[28];
-+c_7320679.elements[29] = ((closureN)self_7312510)->elements[29];
-+c_7320679.elements[30] = ((closureN)self_7312510)->elements[30];
-+c_7320679.elements[31] = ((closureN)self_7312510)->elements[31];
-+c_7320679.elements[32] = ((closureN)self_7312510)->elements[32];
-+c_7320679.elements[33] = ((closureN)self_7312510)->elements[33];
-+c_7320679.elements[34] = ((closureN)self_7312510)->elements[34];
-+c_7320679.elements[35] = ((closureN)self_7312510)->elements[35];
-+c_7320679.elements[36] = ((closureN)self_7312510)->elements[36];
-+c_7320679.elements[37] = ((closureN)self_7312510)->elements[37];
-+c_7320679.elements[38] = ((closureN)self_7312510)->elements[38];
-+c_7320679.elements[39] = ((closureN)self_7312510)->elements[40];
-+c_7320679.elements[40] = ((closureN)self_7312510)->elements[41];
-+c_7320679.elements[41] = ((closureN)self_7312510)->elements[42];
-+c_7320679.elements[42] = ((closureN)self_7312510)->elements[43];
-+c_7320679.elements[43] = ((closureN)self_7312510)->elements[44];
-+c_7320679.elements[44] = ((closureN)self_7312510)->elements[45];
-+c_7320679.elements[45] = ((closureN)self_7312510)->elements[46];
-+c_7320679.elements[46] = ((closureN)self_7312510)->elements[47];
-+c_7320679.elements[47] = ((closureN)self_7312510)->elements[48];
-+c_7320679.elements[48] = ((closureN)self_7312510)->elements[49];
-+c_7320679.elements[49] = ((closureN)self_7312510)->elements[50];
-+
-+return_direct_with_clo1(data,(closure)&c_7320666,__lambda_841,  &c_7320679);; 
-+}
-+
-+static void __lambda_842(void *data, object self_7312511, int argc, object *args) /* object self_7312511, object r_736242 */
-+ {
-+ object r_736242 = args[0];
-+  
-+closureN_type c_7320681;
-+object e_7322444 [50];
-+c_7320681.hdr.mark = gc_color_red;
-+ c_7320681.hdr.grayed = 0;
-+c_7320681.tag = closureN_tag;
-+ c_7320681.fn = (function_type)__lambda_843;
-+c_7320681.num_args = 1;
-+c_7320681.num_elements = 50;
-+c_7320681.elements = (object *)e_7322444;
-+c_7320681.elements[0] = ((closureN)self_7312511)->elements[0];
-+c_7320681.elements[1] = ((closureN)self_7312511)->elements[1];
-+c_7320681.elements[2] = ((closureN)self_7312511)->elements[2];
-+c_7320681.elements[3] = ((closureN)self_7312511)->elements[3];
-+c_7320681.elements[4] = ((closureN)self_7312511)->elements[4];
-+c_7320681.elements[5] = ((closureN)self_7312511)->elements[5];
-+c_7320681.elements[6] = ((closureN)self_7312511)->elements[6];
-+c_7320681.elements[7] = ((closureN)self_7312511)->elements[7];
-+c_7320681.elements[8] = ((closureN)self_7312511)->elements[8];
-+c_7320681.elements[9] = ((closureN)self_7312511)->elements[9];
-+c_7320681.elements[10] = ((closureN)self_7312511)->elements[10];
-+c_7320681.elements[11] = ((closureN)self_7312511)->elements[11];
-+c_7320681.elements[12] = ((closureN)self_7312511)->elements[12];
-+c_7320681.elements[13] = ((closureN)self_7312511)->elements[13];
-+c_7320681.elements[14] = ((closureN)self_7312511)->elements[14];
-+c_7320681.elements[15] = ((closureN)self_7312511)->elements[15];
-+c_7320681.elements[16] = ((closureN)self_7312511)->elements[16];
-+c_7320681.elements[17] = ((closureN)self_7312511)->elements[17];
-+c_7320681.elements[18] = ((closureN)self_7312511)->elements[18];
-+c_7320681.elements[19] = ((closureN)self_7312511)->elements[19];
-+c_7320681.elements[20] = ((closureN)self_7312511)->elements[20];
-+c_7320681.elements[21] = ((closureN)self_7312511)->elements[21];
-+c_7320681.elements[22] = ((closureN)self_7312511)->elements[22];
-+c_7320681.elements[23] = ((closureN)self_7312511)->elements[23];
-+c_7320681.elements[24] = ((closureN)self_7312511)->elements[24];
-+c_7320681.elements[25] = ((closureN)self_7312511)->elements[25];
-+c_7320681.elements[26] = ((closureN)self_7312511)->elements[26];
-+c_7320681.elements[27] = ((closureN)self_7312511)->elements[27];
-+c_7320681.elements[28] = ((closureN)self_7312511)->elements[28];
-+c_7320681.elements[29] = ((closureN)self_7312511)->elements[29];
-+c_7320681.elements[30] = ((closureN)self_7312511)->elements[30];
-+c_7320681.elements[31] = ((closureN)self_7312511)->elements[31];
-+c_7320681.elements[32] = ((closureN)self_7312511)->elements[32];
-+c_7320681.elements[33] = ((closureN)self_7312511)->elements[33];
-+c_7320681.elements[34] = ((closureN)self_7312511)->elements[34];
-+c_7320681.elements[35] = ((closureN)self_7312511)->elements[35];
-+c_7320681.elements[36] = ((closureN)self_7312511)->elements[36];
-+c_7320681.elements[37] = ((closureN)self_7312511)->elements[37];
-+c_7320681.elements[38] = ((closureN)self_7312511)->elements[38];
-+c_7320681.elements[39] = ((closureN)self_7312511)->elements[39];
-+c_7320681.elements[40] = ((closureN)self_7312511)->elements[40];
-+c_7320681.elements[41] = ((closureN)self_7312511)->elements[41];
-+c_7320681.elements[42] = ((closureN)self_7312511)->elements[42];
-+c_7320681.elements[43] = ((closureN)self_7312511)->elements[43];
-+c_7320681.elements[44] = ((closureN)self_7312511)->elements[44];
-+c_7320681.elements[45] = ((closureN)self_7312511)->elements[45];
-+c_7320681.elements[46] = ((closureN)self_7312511)->elements[46];
-+c_7320681.elements[47] = ((closureN)self_7312511)->elements[47];
-+c_7320681.elements[48] = ((closureN)self_7312511)->elements[48];
-+c_7320681.elements[49] = ((closureN)self_7312511)->elements[49];
-+
-+
-+
-+return_direct_with_clo1(data,(closure)&c_7320681,__lambda_843,  Cyc_set_cell(data, ((closureN)self_7312511)->elements[44], r_736242));; 
-+}
-+
-+static void __lambda_843(void *data, object self_7312512, int argc, object *args) /* object self_7312512, object r_735870 */
-+ {
-+
-+  
-+closureN_type c_7320683;
-+object e_7322405 [48];
-+c_7320683.hdr.mark = gc_color_red;
-+ c_7320683.hdr.grayed = 0;
-+c_7320683.tag = closureN_tag;
-+ c_7320683.fn = (function_type)__lambda_844;
-+c_7320683.num_args = 1;
-+c_7320683.num_elements = 48;
-+c_7320683.elements = (object *)e_7322405;
-+c_7320683.elements[0] = ((closureN)self_7312512)->elements[0];
-+c_7320683.elements[1] = ((closureN)self_7312512)->elements[1];
-+c_7320683.elements[2] = ((closureN)self_7312512)->elements[2];
-+c_7320683.elements[3] = ((closureN)self_7312512)->elements[3];
-+c_7320683.elements[4] = ((closureN)self_7312512)->elements[4];
-+c_7320683.elements[5] = ((closureN)self_7312512)->elements[5];
-+c_7320683.elements[6] = ((closureN)self_7312512)->elements[6];
-+c_7320683.elements[7] = ((closureN)self_7312512)->elements[7];
-+c_7320683.elements[8] = ((closureN)self_7312512)->elements[8];
-+c_7320683.elements[9] = ((closureN)self_7312512)->elements[9];
-+c_7320683.elements[10] = ((closureN)self_7312512)->elements[10];
-+c_7320683.elements[11] = ((closureN)self_7312512)->elements[11];
-+c_7320683.elements[12] = ((closureN)self_7312512)->elements[12];
-+c_7320683.elements[13] = ((closureN)self_7312512)->elements[13];
-+c_7320683.elements[14] = ((closureN)self_7312512)->elements[14];
-+c_7320683.elements[15] = ((closureN)self_7312512)->elements[15];
-+c_7320683.elements[16] = ((closureN)self_7312512)->elements[16];
-+c_7320683.elements[17] = ((closureN)self_7312512)->elements[17];
-+c_7320683.elements[18] = ((closureN)self_7312512)->elements[18];
-+c_7320683.elements[19] = ((closureN)self_7312512)->elements[19];
-+c_7320683.elements[20] = ((closureN)self_7312512)->elements[20];
-+c_7320683.elements[21] = ((closureN)self_7312512)->elements[21];
-+c_7320683.elements[22] = ((closureN)self_7312512)->elements[22];
-+c_7320683.elements[23] = ((closureN)self_7312512)->elements[23];
-+c_7320683.elements[24] = ((closureN)self_7312512)->elements[24];
-+c_7320683.elements[25] = ((closureN)self_7312512)->elements[25];
-+c_7320683.elements[26] = ((closureN)self_7312512)->elements[26];
-+c_7320683.elements[27] = ((closureN)self_7312512)->elements[27];
-+c_7320683.elements[28] = ((closureN)self_7312512)->elements[28];
-+c_7320683.elements[29] = ((closureN)self_7312512)->elements[29];
-+c_7320683.elements[30] = ((closureN)self_7312512)->elements[30];
-+c_7320683.elements[31] = ((closureN)self_7312512)->elements[31];
-+c_7320683.elements[32] = ((closureN)self_7312512)->elements[32];
-+c_7320683.elements[33] = ((closureN)self_7312512)->elements[33];
-+c_7320683.elements[34] = ((closureN)self_7312512)->elements[34];
-+c_7320683.elements[35] = ((closureN)self_7312512)->elements[36];
-+c_7320683.elements[36] = ((closureN)self_7312512)->elements[37];
-+c_7320683.elements[37] = ((closureN)self_7312512)->elements[38];
-+c_7320683.elements[38] = ((closureN)self_7312512)->elements[39];
-+c_7320683.elements[39] = ((closureN)self_7312512)->elements[40];
-+c_7320683.elements[40] = ((closureN)self_7312512)->elements[41];
-+c_7320683.elements[41] = ((closureN)self_7312512)->elements[42];
-+c_7320683.elements[42] = ((closureN)self_7312512)->elements[43];
-+c_7320683.elements[43] = ((closureN)self_7312512)->elements[44];
-+c_7320683.elements[44] = ((closureN)self_7312512)->elements[45];
-+c_7320683.elements[45] = ((closureN)self_7312512)->elements[46];
-+c_7320683.elements[46] = ((closureN)self_7312512)->elements[47];
-+c_7320683.elements[47] = ((closureN)self_7312512)->elements[48];
-+
-+
-+closureN_type c_7322406;
-+object e_7322443 [2];
-+c_7322406.hdr.mark = gc_color_red;
-+ c_7322406.hdr.grayed = 0;
-+c_7322406.tag = closureN_tag;
-+ c_7322406.fn = (function_type)__lambda_1006;
-+c_7322406.num_args = 1;
-+c_7322406.num_elements = 2;
-+c_7322406.elements = (object *)e_7322443;
-+c_7322406.elements[0] = ((closureN)self_7312512)->elements[35];
-+c_7322406.elements[1] = ((closureN)self_7312512)->elements[49];
- 
+-
 -closureN_type c_7322940;
 -object e_7322944 [2];
 -c_7322940.hdr.mark = gc_color_red;
@@ -24468,30 +25521,12 @@ Make let-values be the same as let*-values, to work around
 -c_7322940.elements = (object *)e_7322944;
 -c_7322940.elements[0] = ((closureN)self_7313777)->elements[25];
 -c_7322940.elements[1] = ((closureN)self_7313777)->elements[34];
-+return_direct_with_clo1(data,(closure)&c_7320683,__lambda_844,  &c_7322406);; 
-+}
- 
+-
 -return_direct_with_clo1(data,(closure)&c_7322876,__lambda_954,  &c_7322940);
 -} else { 
-+static void __lambda_1006(void *data, object self_7312513, int argc, object *args) /* object self_7312513, object k_736236, object s_731272_733232 */
-+ {
-+ object k_736236 = args[0]; object s_731272_733232 = args[1];
-   
-+closureN_type c_7322408;
-+object e_7322436 [4];
-+c_7322408.hdr.mark = gc_color_red;
-+ c_7322408.hdr.grayed = 0;
-+c_7322408.tag = closureN_tag;
-+ c_7322408.fn = (function_type)__lambda_1007;
-+c_7322408.num_args = 1;
-+c_7322408.num_elements = 4;
-+c_7322408.elements = (object *)e_7322436;
-+c_7322408.elements[0] = ((closureN)self_7312513)->elements[0];
-+c_7322408.elements[1] = k_736236;
-+c_7322408.elements[2] = ((closureN)self_7312513)->elements[1];
-+c_7322408.elements[3] = s_731272_733232;
- 
- 
+-  
+-
+-
 -closureN_type c_7322949;
 -object e_7323639 [33];
 -c_7322949.hdr.mark = gc_color_red;
@@ -24534,20 +25569,20 @@ Make let-values be the same as let*-values, to work around
 -c_7322949.elements[30] = ((closureN)self_7313777)->elements[34];
 -c_7322949.elements[31] = ((closureN)self_7313777)->elements[35];
 -c_7322949.elements[32] = ((closureN)self_7313777)->elements[36];
-+complex_num_type local_7322439; 
++list_3_type local_7322285; 
  
 -return_closcall2(data,  car(((closureN)self_7313777)->elements[28]),  &c_7322949, ((closureN)self_7313777)->elements[34]);}
 -;; 
-+
-+return_direct_with_clo1(data,(closure)&c_7322408,__lambda_1007,  Cyc_fast_sum(data,&local_7322439, car(((closureN)self_7312513)->elements[0]), obj_int2obj(1)));; 
++list_2_type local_7322289; 
++return_direct_with_clo1(data,  ((closureN)self_7312571)->elements[2], (((closure)  ((closureN)self_7312571)->elements[2])->fn),  Cyc_fast_list_3(&local_7322285, ((closureN)self_7312571)->elements[0], Cyc_fast_list_2(&local_7322289, ((closureN)self_7312571)->elements[1], ((closureN)self_7312571)->elements[3]), r_736217));; 
  }
  
 -static void __lambda_960(void *data, object self_7313784, int argc, object *args) /* object self_7313784, object r_736490 */
-+static void __lambda_1007(void *data, object self_7312514, int argc, object *args) /* object self_7312514, object r_736241 */
++static void __lambda_998(void *data, object self_7312567, int argc, object *args) /* object self_7312567, object k_736212, object vars_731344_733256 */
   {
 - object r_736490 = args[0];
 -  if( (boolean_f != r_736490) ){ 
-+ object r_736241 = args[0];
++ object k_736212 = args[0]; object vars_731344_733256 = args[1];
    
 -closureN_type c_7322951;
 -object e_7323518 [30];
@@ -24631,327 +25666,12 @@ Make let-values be the same as let*-values, to work around
 -c_7323555.elements[3] = ((closureN)self_7313784)->elements[28];
 -c_7323555.elements[4] = ((closureN)self_7313784)->elements[30];
 -c_7323555.elements[5] = ((closureN)self_7313784)->elements[31];
-+closureN_type c_7322410;
-+object e_7322432 [4];
-+c_7322410.hdr.mark = gc_color_red;
-+ c_7322410.hdr.grayed = 0;
-+c_7322410.tag = closureN_tag;
-+ c_7322410.fn = (function_type)__lambda_1008;
-+c_7322410.num_args = 1;
-+c_7322410.num_elements = 4;
-+c_7322410.elements = (object *)e_7322432;
-+c_7322410.elements[0] = ((closureN)self_7312514)->elements[0];
-+c_7322410.elements[1] = ((closureN)self_7312514)->elements[1];
-+c_7322410.elements[2] = ((closureN)self_7312514)->elements[2];
-+c_7322410.elements[3] = ((closureN)self_7312514)->elements[3];
-+
-+
-+
-+return_direct_with_clo1(data,(closure)&c_7322410,__lambda_1008,  Cyc_set_cell(data, ((closureN)self_7312514)->elements[0], r_736241));; 
-+}
-+
-+static void __lambda_1008(void *data, object self_7312515, int argc, object *args) /* object self_7312515, object r_736237 */
-+ {
-+
-+  
-+closureN_type c_7322412;
-+object e_7322425 [3];
-+c_7322412.hdr.mark = gc_color_red;
-+ c_7322412.hdr.grayed = 0;
-+c_7322412.tag = closureN_tag;
-+ c_7322412.fn = (function_type)__lambda_1009;
-+c_7322412.num_args = 1;
-+c_7322412.num_elements = 3;
-+c_7322412.elements = (object *)e_7322425;
-+c_7322412.elements[0] = ((closureN)self_7312515)->elements[1];
-+c_7322412.elements[1] = ((closureN)self_7312515)->elements[2];
-+c_7322412.elements[2] = ((closureN)self_7312515)->elements[3];
-+
-+
-+
-+
-+object c_7322428 = Cyc_number2string2(data,(closure)&c_7322412,1,car(((closureN)self_7312515)->elements[0]));
-+return_closcall1(data,(closure)&c_7322412,  c_7322428);; 
-+}
-+
-+static void __lambda_1009(void *data, object self_7312516, int argc, object *args) /* object self_7312516, object r_736240 */
-+ {
-+ object r_736240 = args[0];
-+  
-+closureN_type c_7322414;
-+object e_7322420 [2];
-+c_7322414.hdr.mark = gc_color_red;
-+ c_7322414.hdr.grayed = 0;
-+c_7322414.tag = closureN_tag;
-+ c_7322414.fn = (function_type)__lambda_1010;
-+c_7322414.num_args = 1;
-+c_7322414.num_elements = 2;
-+c_7322414.elements = (object *)e_7322420;
-+c_7322414.elements[0] = ((closureN)self_7312516)->elements[0];
-+c_7322414.elements[1] = ((closureN)self_7312516)->elements[1];
-+
-+
-+object c_7322423 = Cyc_string_append(data,(closure)&c_7322414,2,((closureN)self_7312516)->elements[2], r_736240);
-+return_closcall1(data,(closure)&c_7322414,  c_7322423);; 
-+}
-+
-+static void __lambda_1010(void *data, object self_7312517, int argc, object *args) /* object self_7312517, object r_736239 */
-+ {
-+ object r_736239 = args[0];
-+  
-+
-+return_closcall2(data,  ((closureN)self_7312517)->elements[1],  ((closureN)self_7312517)->elements[0], Cyc_string2symbol(data, r_736239));; 
-+}
-+
-+static void __lambda_844(void *data, object self_7312518, int argc, object *args) /* object self_7312518, object r_736235 */
-+ {
-+ object r_736235 = args[0];
-+  
-+closureN_type c_7320685;
-+object e_7322401 [48];
-+c_7320685.hdr.mark = gc_color_red;
-+ c_7320685.hdr.grayed = 0;
-+c_7320685.tag = closureN_tag;
-+ c_7320685.fn = (function_type)__lambda_845;
-+c_7320685.num_args = 1;
-+c_7320685.num_elements = 48;
-+c_7320685.elements = (object *)e_7322401;
-+c_7320685.elements[0] = ((closureN)self_7312518)->elements[0];
-+c_7320685.elements[1] = ((closureN)self_7312518)->elements[1];
-+c_7320685.elements[2] = ((closureN)self_7312518)->elements[2];
-+c_7320685.elements[3] = ((closureN)self_7312518)->elements[3];
-+c_7320685.elements[4] = ((closureN)self_7312518)->elements[4];
-+c_7320685.elements[5] = ((closureN)self_7312518)->elements[5];
-+c_7320685.elements[6] = ((closureN)self_7312518)->elements[6];
-+c_7320685.elements[7] = ((closureN)self_7312518)->elements[7];
-+c_7320685.elements[8] = ((closureN)self_7312518)->elements[8];
-+c_7320685.elements[9] = ((closureN)self_7312518)->elements[9];
-+c_7320685.elements[10] = ((closureN)self_7312518)->elements[10];
-+c_7320685.elements[11] = ((closureN)self_7312518)->elements[11];
-+c_7320685.elements[12] = ((closureN)self_7312518)->elements[12];
-+c_7320685.elements[13] = ((closureN)self_7312518)->elements[13];
-+c_7320685.elements[14] = ((closureN)self_7312518)->elements[14];
-+c_7320685.elements[15] = ((closureN)self_7312518)->elements[15];
-+c_7320685.elements[16] = ((closureN)self_7312518)->elements[16];
-+c_7320685.elements[17] = ((closureN)self_7312518)->elements[17];
-+c_7320685.elements[18] = ((closureN)self_7312518)->elements[18];
-+c_7320685.elements[19] = ((closureN)self_7312518)->elements[19];
-+c_7320685.elements[20] = ((closureN)self_7312518)->elements[20];
-+c_7320685.elements[21] = ((closureN)self_7312518)->elements[21];
-+c_7320685.elements[22] = ((closureN)self_7312518)->elements[22];
-+c_7320685.elements[23] = ((closureN)self_7312518)->elements[23];
-+c_7320685.elements[24] = ((closureN)self_7312518)->elements[24];
-+c_7320685.elements[25] = ((closureN)self_7312518)->elements[25];
-+c_7320685.elements[26] = ((closureN)self_7312518)->elements[26];
-+c_7320685.elements[27] = ((closureN)self_7312518)->elements[27];
-+c_7320685.elements[28] = ((closureN)self_7312518)->elements[28];
-+c_7320685.elements[29] = ((closureN)self_7312518)->elements[29];
-+c_7320685.elements[30] = ((closureN)self_7312518)->elements[30];
-+c_7320685.elements[31] = ((closureN)self_7312518)->elements[31];
-+c_7320685.elements[32] = ((closureN)self_7312518)->elements[32];
-+c_7320685.elements[33] = ((closureN)self_7312518)->elements[33];
-+c_7320685.elements[34] = ((closureN)self_7312518)->elements[34];
-+c_7320685.elements[35] = ((closureN)self_7312518)->elements[35];
-+c_7320685.elements[36] = ((closureN)self_7312518)->elements[36];
-+c_7320685.elements[37] = ((closureN)self_7312518)->elements[37];
-+c_7320685.elements[38] = ((closureN)self_7312518)->elements[38];
-+c_7320685.elements[39] = ((closureN)self_7312518)->elements[39];
-+c_7320685.elements[40] = ((closureN)self_7312518)->elements[40];
-+c_7320685.elements[41] = ((closureN)self_7312518)->elements[41];
-+c_7320685.elements[42] = ((closureN)self_7312518)->elements[42];
-+c_7320685.elements[43] = ((closureN)self_7312518)->elements[43];
-+c_7320685.elements[44] = ((closureN)self_7312518)->elements[44];
-+c_7320685.elements[45] = ((closureN)self_7312518)->elements[45];
-+c_7320685.elements[46] = ((closureN)self_7312518)->elements[46];
-+c_7320685.elements[47] = ((closureN)self_7312518)->elements[47];
-+
-+
-+
-+return_direct_with_clo1(data,(closure)&c_7320685,__lambda_845,  Cyc_set_cell(data, ((closureN)self_7312518)->elements[47], r_736235));; 
-+}
-+
-+static void __lambda_845(void *data, object self_7312519, int argc, object *args) /* object self_7312519, object r_735871 */
-+ {
-+
-+  
-+closureN_type c_7320687;
-+object e_7321544 [29];
-+c_7320687.hdr.mark = gc_color_red;
-+ c_7320687.hdr.grayed = 0;
-+c_7320687.tag = closureN_tag;
-+ c_7320687.fn = (function_type)__lambda_846;
-+c_7320687.num_args = 1;
-+c_7320687.num_elements = 29;
-+c_7320687.elements = (object *)e_7321544;
-+c_7320687.elements[0] = ((closureN)self_7312519)->elements[3];
-+c_7320687.elements[1] = ((closureN)self_7312519)->elements[4];
-+c_7320687.elements[2] = ((closureN)self_7312519)->elements[5];
-+c_7320687.elements[3] = ((closureN)self_7312519)->elements[7];
-+c_7320687.elements[4] = ((closureN)self_7312519)->elements[8];
-+c_7320687.elements[5] = ((closureN)self_7312519)->elements[9];
-+c_7320687.elements[6] = ((closureN)self_7312519)->elements[11];
-+c_7320687.elements[7] = ((closureN)self_7312519)->elements[12];
-+c_7320687.elements[8] = ((closureN)self_7312519)->elements[13];
-+c_7320687.elements[9] = ((closureN)self_7312519)->elements[16];
-+c_7320687.elements[10] = ((closureN)self_7312519)->elements[20];
-+c_7320687.elements[11] = ((closureN)self_7312519)->elements[23];
-+c_7320687.elements[12] = ((closureN)self_7312519)->elements[25];
-+c_7320687.elements[13] = ((closureN)self_7312519)->elements[27];
-+c_7320687.elements[14] = ((closureN)self_7312519)->elements[28];
-+c_7320687.elements[15] = ((closureN)self_7312519)->elements[33];
-+c_7320687.elements[16] = ((closureN)self_7312519)->elements[34];
-+c_7320687.elements[17] = ((closureN)self_7312519)->elements[35];
-+c_7320687.elements[18] = ((closureN)self_7312519)->elements[36];
-+c_7320687.elements[19] = ((closureN)self_7312519)->elements[37];
-+c_7320687.elements[20] = ((closureN)self_7312519)->elements[38];
-+c_7320687.elements[21] = ((closureN)self_7312519)->elements[39];
-+c_7320687.elements[22] = ((closureN)self_7312519)->elements[40];
-+c_7320687.elements[23] = ((closureN)self_7312519)->elements[41];
-+c_7320687.elements[24] = ((closureN)self_7312519)->elements[42];
-+c_7320687.elements[25] = ((closureN)self_7312519)->elements[43];
-+c_7320687.elements[26] = ((closureN)self_7312519)->elements[44];
-+c_7320687.elements[27] = ((closureN)self_7312519)->elements[45];
-+c_7320687.elements[28] = ((closureN)self_7312519)->elements[46];
-+
-+
-+closureN_type c_7321545;
-+object e_7322400 [32];
-+c_7321545.hdr.mark = gc_color_red;
-+ c_7321545.hdr.grayed = 0;
-+c_7321545.tag = closureN_tag;
-+ c_7321545.fn = (function_type)__lambda_944;
-+c_7321545.num_args = 2;
-+c_7321545.num_elements = 32;
-+c_7321545.elements = (object *)e_7322400;
-+c_7321545.elements[0] = ((closureN)self_7312519)->elements[0];
-+c_7321545.elements[1] = ((closureN)self_7312519)->elements[1];
-+c_7321545.elements[2] = ((closureN)self_7312519)->elements[2];
-+c_7321545.elements[3] = ((closureN)self_7312519)->elements[5];
-+c_7321545.elements[4] = ((closureN)self_7312519)->elements[6];
-+c_7321545.elements[5] = ((closureN)self_7312519)->elements[7];
-+c_7321545.elements[6] = ((closureN)self_7312519)->elements[8];
-+c_7321545.elements[7] = ((closureN)self_7312519)->elements[9];
-+c_7321545.elements[8] = ((closureN)self_7312519)->elements[10];
-+c_7321545.elements[9] = ((closureN)self_7312519)->elements[13];
-+c_7321545.elements[10] = ((closureN)self_7312519)->elements[14];
-+c_7321545.elements[11] = ((closureN)self_7312519)->elements[15];
-+c_7321545.elements[12] = ((closureN)self_7312519)->elements[17];
-+c_7321545.elements[13] = ((closureN)self_7312519)->elements[18];
-+c_7321545.elements[14] = ((closureN)self_7312519)->elements[19];
-+c_7321545.elements[15] = ((closureN)self_7312519)->elements[21];
-+c_7321545.elements[16] = ((closureN)self_7312519)->elements[22];
-+c_7321545.elements[17] = ((closureN)self_7312519)->elements[24];
-+c_7321545.elements[18] = ((closureN)self_7312519)->elements[26];
-+c_7321545.elements[19] = ((closureN)self_7312519)->elements[27];
-+c_7321545.elements[20] = ((closureN)self_7312519)->elements[28];
-+c_7321545.elements[21] = ((closureN)self_7312519)->elements[29];
-+c_7321545.elements[22] = ((closureN)self_7312519)->elements[30];
-+c_7321545.elements[23] = ((closureN)self_7312519)->elements[31];
-+c_7321545.elements[24] = ((closureN)self_7312519)->elements[32];
-+c_7321545.elements[25] = ((closureN)self_7312519)->elements[33];
-+c_7321545.elements[26] = ((closureN)self_7312519)->elements[34];
-+c_7321545.elements[27] = ((closureN)self_7312519)->elements[35];
-+c_7321545.elements[28] = ((closureN)self_7312519)->elements[39];
-+c_7321545.elements[29] = ((closureN)self_7312519)->elements[41];
-+c_7321545.elements[30] = ((closureN)self_7312519)->elements[46];
-+c_7321545.elements[31] = ((closureN)self_7312519)->elements[47];
-+
-+return_direct_with_clo1(data,(closure)&c_7320687,__lambda_846,  &c_7321545);; 
-+}
-+
-+static void __lambda_944(void *data, object self_7312520, int argc, object *args) /* object self_7312520, object k_736020, object pat_731273_733233, object tmpl_731274_733234 */
-+ {
-+ object k_736020 = args[0]; object pat_731273_733233 = args[1]; object tmpl_731274_733234 = args[2];
-+  
-+closureN_type c_7321547;
-+object e_7322384 [33];
-+c_7321547.hdr.mark = gc_color_red;
-+ c_7321547.hdr.grayed = 0;
-+c_7321547.tag = closureN_tag;
-+ c_7321547.fn = (function_type)__lambda_945;
-+c_7321547.num_args = 1;
-+c_7321547.num_elements = 33;
-+c_7321547.elements = (object *)e_7322384;
-+c_7321547.elements[0] = ((closureN)self_7312520)->elements[0];
-+c_7321547.elements[1] = ((closureN)self_7312520)->elements[1];
-+c_7321547.elements[2] = ((closureN)self_7312520)->elements[2];
-+c_7321547.elements[3] = ((closureN)self_7312520)->elements[3];
-+c_7321547.elements[4] = ((closureN)self_7312520)->elements[4];
-+c_7321547.elements[5] = ((closureN)self_7312520)->elements[5];
-+c_7321547.elements[6] = ((closureN)self_7312520)->elements[6];
-+c_7321547.elements[7] = ((closureN)self_7312520)->elements[7];
-+c_7321547.elements[8] = ((closureN)self_7312520)->elements[8];
-+c_7321547.elements[9] = ((closureN)self_7312520)->elements[9];
-+c_7321547.elements[10] = ((closureN)self_7312520)->elements[10];
-+c_7321547.elements[11] = ((closureN)self_7312520)->elements[11];
-+c_7321547.elements[12] = ((closureN)self_7312520)->elements[12];
-+c_7321547.elements[13] = ((closureN)self_7312520)->elements[13];
-+c_7321547.elements[14] = ((closureN)self_7312520)->elements[14];
-+c_7321547.elements[15] = ((closureN)self_7312520)->elements[15];
-+c_7321547.elements[16] = ((closureN)self_7312520)->elements[16];
-+c_7321547.elements[17] = ((closureN)self_7312520)->elements[17];
-+c_7321547.elements[18] = ((closureN)self_7312520)->elements[18];
-+c_7321547.elements[19] = ((closureN)self_7312520)->elements[19];
-+c_7321547.elements[20] = ((closureN)self_7312520)->elements[20];
-+c_7321547.elements[21] = ((closureN)self_7312520)->elements[21];
-+c_7321547.elements[22] = ((closureN)self_7312520)->elements[22];
-+c_7321547.elements[23] = ((closureN)self_7312520)->elements[23];
-+c_7321547.elements[24] = ((closureN)self_7312520)->elements[24];
-+c_7321547.elements[25] = ((closureN)self_7312520)->elements[25];
-+c_7321547.elements[26] = ((closureN)self_7312520)->elements[26];
-+c_7321547.elements[27] = ((closureN)self_7312520)->elements[27];
-+c_7321547.elements[28] = ((closureN)self_7312520)->elements[28];
-+c_7321547.elements[29] = k_736020;
-+c_7321547.elements[30] = ((closureN)self_7312520)->elements[30];
-+c_7321547.elements[31] = ((closureN)self_7312520)->elements[31];
-+c_7321547.elements[32] = pat_731273_733233;
-+
-+
-+closureN_type c_7322385;
-+object e_7322399 [3];
-+c_7322385.hdr.mark = gc_color_red;
-+ c_7322385.hdr.grayed = 0;
-+c_7322385.tag = closureN_tag;
-+ c_7322385.fn = (function_type)__lambda_1004;
-+c_7322385.num_args = 1;
-+c_7322385.num_elements = 3;
-+c_7322385.elements = (object *)e_7322399;
-+c_7322385.elements[0] = ((closureN)self_7312520)->elements[6];
-+c_7322385.elements[1] = ((closureN)self_7312520)->elements[29];
-+c_7322385.elements[2] = tmpl_731274_733234;
-+
-+return_direct_with_clo1(data,(closure)&c_7321547,__lambda_945,  &c_7322385);; 
-+}
-+
-+static void __lambda_1004(void *data, object self_7312521, int argc, object *args) /* object self_7312521, object k_736233, object vars_731353_733264 */
-+ {
-+ object k_736233 = args[0]; object vars_731353_733264 = args[1];
-+  
-+
-+
-+closureN_type c_7322390;
-+object e_7322397 [2];
-+c_7322390.hdr.mark = gc_color_red;
-+ c_7322390.hdr.grayed = 0;
-+c_7322390.tag = closureN_tag;
-+ c_7322390.fn = (function_type)__lambda_1005;
-+c_7322390.num_args = 1;
-+c_7322390.num_elements = 2;
-+c_7322390.elements = (object *)e_7322397;
-+c_7322390.elements[0] = ((closureN)self_7312521)->elements[0];
-+c_7322390.elements[1] = k_736233;
- 
+-
 -return_direct_with_clo1(data,(closure)&c_7323526,__lambda_996,  &c_7323555);
 -} else { 
 -    
 -if( (boolean_f != Cyc_is_vector_not_record_type(((closureN)self_7313784)->elements[30])) ){ 
-+return_closcall3(data,  car(((closureN)self_7312521)->elements[1]),  &c_7322390, ((closureN)self_7312521)->elements[2], vars_731353_733264);; 
-+}
-+
-+static void __lambda_1005(void *data, object self_7312522, int argc, object *args) /* object self_7312522, object r_736234 */
-+ {
-+ object r_736234 = args[0];
-   
+-  
 -closureN_type c_7323575;
 -object e_7323601 [9];
 -c_7323575.hdr.mark = gc_color_red;
@@ -24970,18 +25690,12 @@ Make let-values be the same as let*-values, to work around
 -c_7323575.elements[6] = ((closureN)self_7313784)->elements[28];
 -c_7323575.elements[7] = ((closureN)self_7313784)->elements[31];
 -c_7323575.elements[8] = ((closureN)self_7313784)->elements[32];
-+list_3_type local_7322395; 
-+return_direct_with_clo1(data,  ((closureN)self_7312522)->elements[1], (((closure)  ((closureN)self_7312522)->elements[1])->fn),  Cyc_fast_list_3(&local_7322395, ((closureN)self_7312522)->elements[0], r_736234, boolean_f));; 
-+}
- 
+-
 -return_direct_with_clo2(data,  __glo_vector_91_125list_scheme_base, (((closure)  __glo_vector_91_125list_scheme_base)->fn),  &c_7323575, ((closureN)self_7313784)->elements[30]);
 -} else { 
 -    
 -if( (boolean_f != Cyc_is_null(((closureN)self_7313784)->elements[30])) ){ 
-+static void __lambda_945(void *data, object self_7312523, int argc, object *args) /* object self_7312523, object r_736024 */
-+ {
-+ object r_736024 = args[0];
-   
+-  
 -closureN_type c_7323608;
 -object e_7323620 [4];
 -c_7323608.hdr.mark = gc_color_red;
@@ -25013,702 +25727,104 @@ Make let-values be the same as let*-values, to work around
 -c_7323624.elements[2] = ((closureN)self_7313784)->elements[27];
 -c_7323624.elements[3] = ((closureN)self_7313784)->elements[30];
 -c_7323624.elements[4] = ((closureN)self_7313784)->elements[31];
-+closureN_type c_7321549;
-+object e_7322375 [31];
-+c_7321549.hdr.mark = gc_color_red;
-+ c_7321549.hdr.grayed = 0;
-+c_7321549.tag = closureN_tag;
-+ c_7321549.fn = (function_type)__lambda_946;
-+c_7321549.num_args = 4;
-+c_7321549.num_elements = 31;
-+c_7321549.elements = (object *)e_7322375;
-+c_7321549.elements[0] = ((closureN)self_7312523)->elements[0];
-+c_7321549.elements[1] = ((closureN)self_7312523)->elements[1];
-+c_7321549.elements[2] = ((closureN)self_7312523)->elements[2];
-+c_7321549.elements[3] = ((closureN)self_7312523)->elements[3];
-+c_7321549.elements[4] = ((closureN)self_7312523)->elements[4];
-+c_7321549.elements[5] = ((closureN)self_7312523)->elements[5];
-+c_7321549.elements[6] = ((closureN)self_7312523)->elements[6];
-+c_7321549.elements[7] = ((closureN)self_7312523)->elements[7];
-+c_7321549.elements[8] = ((closureN)self_7312523)->elements[8];
-+c_7321549.elements[9] = ((closureN)self_7312523)->elements[10];
-+c_7321549.elements[10] = ((closureN)self_7312523)->elements[11];
-+c_7321549.elements[11] = ((closureN)self_7312523)->elements[12];
-+c_7321549.elements[12] = ((closureN)self_7312523)->elements[13];
-+c_7321549.elements[13] = ((closureN)self_7312523)->elements[14];
-+c_7321549.elements[14] = ((closureN)self_7312523)->elements[15];
-+c_7321549.elements[15] = ((closureN)self_7312523)->elements[16];
-+c_7321549.elements[16] = ((closureN)self_7312523)->elements[17];
-+c_7321549.elements[17] = ((closureN)self_7312523)->elements[18];
-+c_7321549.elements[18] = ((closureN)self_7312523)->elements[19];
-+c_7321549.elements[19] = ((closureN)self_7312523)->elements[20];
-+c_7321549.elements[20] = ((closureN)self_7312523)->elements[21];
-+c_7321549.elements[21] = ((closureN)self_7312523)->elements[22];
-+c_7321549.elements[22] = ((closureN)self_7312523)->elements[23];
-+c_7321549.elements[23] = ((closureN)self_7312523)->elements[24];
-+c_7321549.elements[24] = ((closureN)self_7312523)->elements[25];
-+c_7321549.elements[25] = ((closureN)self_7312523)->elements[26];
-+c_7321549.elements[26] = ((closureN)self_7312523)->elements[27];
-+c_7321549.elements[27] = ((closureN)self_7312523)->elements[28];
-+c_7321549.elements[28] = ((closureN)self_7312523)->elements[29];
-+c_7321549.elements[29] = ((closureN)self_7312523)->elements[30];
-+c_7321549.elements[30] = ((closureN)self_7312523)->elements[31];
-+
-+
-+
-+
-+list_2_type local_7322381; 
-+return_direct_with_clo4(data,(closure)&c_7321549,__lambda_946,  Cyc_cdr(data, ((closureN)self_7312523)->elements[32]), Cyc_fast_list_2(&local_7322381, ((closureN)self_7312523)->elements[4], ((closureN)self_7312523)->elements[9]), NULL, r_736024);; 
-+}
-+
-+static void __lambda_946(void *data, object self_7312524, int argc, object *args) /* object self_7312524, object p_731276_733235, object x_731277_733236, object vars_731279_733238, object k_731280_733239 */
-+ {
-+ object p_731276_733235 = args[0]; object x_731277_733236 = args[1]; object vars_731279_733238 = args[2]; object k_731280_733239 = args[3];
-+  
-+closureN_type c_7321551;
-+object e_7322374 [35];
-+c_7321551.hdr.mark = gc_color_red;
-+ c_7321551.hdr.grayed = 0;
-+c_7321551.tag = closureN_tag;
-+ c_7321551.fn = (function_type)__lambda_947;
-+c_7321551.num_args = 1;
-+c_7321551.num_elements = 35;
-+c_7321551.elements = (object *)e_7322374;
-+c_7321551.elements[0] = ((closureN)self_7312524)->elements[0];
-+c_7321551.elements[1] = ((closureN)self_7312524)->elements[1];
-+c_7321551.elements[2] = ((closureN)self_7312524)->elements[2];
-+c_7321551.elements[3] = ((closureN)self_7312524)->elements[3];
-+c_7321551.elements[4] = ((closureN)self_7312524)->elements[4];
-+c_7321551.elements[5] = ((closureN)self_7312524)->elements[5];
-+c_7321551.elements[6] = ((closureN)self_7312524)->elements[6];
-+c_7321551.elements[7] = ((closureN)self_7312524)->elements[7];
-+c_7321551.elements[8] = ((closureN)self_7312524)->elements[8];
-+c_7321551.elements[9] = ((closureN)self_7312524)->elements[9];
-+c_7321551.elements[10] = ((closureN)self_7312524)->elements[10];
-+c_7321551.elements[11] = ((closureN)self_7312524)->elements[11];
-+c_7321551.elements[12] = ((closureN)self_7312524)->elements[12];
-+c_7321551.elements[13] = ((closureN)self_7312524)->elements[13];
-+c_7321551.elements[14] = ((closureN)self_7312524)->elements[14];
-+c_7321551.elements[15] = ((closureN)self_7312524)->elements[15];
-+c_7321551.elements[16] = ((closureN)self_7312524)->elements[16];
-+c_7321551.elements[17] = ((closureN)self_7312524)->elements[17];
-+c_7321551.elements[18] = ((closureN)self_7312524)->elements[18];
-+c_7321551.elements[19] = ((closureN)self_7312524)->elements[19];
-+c_7321551.elements[20] = ((closureN)self_7312524)->elements[20];
-+c_7321551.elements[21] = ((closureN)self_7312524)->elements[21];
-+c_7321551.elements[22] = ((closureN)self_7312524)->elements[22];
-+c_7321551.elements[23] = ((closureN)self_7312524)->elements[23];
-+c_7321551.elements[24] = ((closureN)self_7312524)->elements[24];
-+c_7321551.elements[25] = ((closureN)self_7312524)->elements[25];
-+c_7321551.elements[26] = ((closureN)self_7312524)->elements[26];
-+c_7321551.elements[27] = ((closureN)self_7312524)->elements[27];
-+c_7321551.elements[28] = k_731280_733239;
-+c_7321551.elements[29] = ((closureN)self_7312524)->elements[28];
-+c_7321551.elements[30] = ((closureN)self_7312524)->elements[29];
-+c_7321551.elements[31] = ((closureN)self_7312524)->elements[30];
-+c_7321551.elements[32] = p_731276_733235;
-+c_7321551.elements[33] = vars_731279_733238;
-+c_7321551.elements[34] = x_731277_733236;
-+
-+return_direct_with_clo1(data,(closure)&c_7321551,__lambda_947,  boolean_f);; 
-+}
-+
-+static void __lambda_947(void *data, object self_7312525, int argc, object *args) /* object self_7312525, object lp_731281_733240 */
-+ {
-+ object lp_731281_733240 = args[0];
-+  
-+closureN_type c_7321553;
-+object e_7322370 [35];
-+c_7321553.hdr.mark = gc_color_red;
-+ c_7321553.hdr.grayed = 0;
-+c_7321553.tag = closureN_tag;
-+ c_7321553.fn = (function_type)__lambda_1367;
-+c_7321553.num_args = 1;
-+c_7321553.num_elements = 35;
-+c_7321553.elements = (object *)e_7322370;
-+c_7321553.elements[0] = ((closureN)self_7312525)->elements[0];
-+c_7321553.elements[1] = ((closureN)self_7312525)->elements[1];
-+c_7321553.elements[2] = ((closureN)self_7312525)->elements[2];
-+c_7321553.elements[3] = ((closureN)self_7312525)->elements[3];
-+c_7321553.elements[4] = ((closureN)self_7312525)->elements[4];
-+c_7321553.elements[5] = ((closureN)self_7312525)->elements[5];
-+c_7321553.elements[6] = ((closureN)self_7312525)->elements[6];
-+c_7321553.elements[7] = ((closureN)self_7312525)->elements[7];
-+c_7321553.elements[8] = ((closureN)self_7312525)->elements[8];
-+c_7321553.elements[9] = ((closureN)self_7312525)->elements[9];
-+c_7321553.elements[10] = ((closureN)self_7312525)->elements[10];
-+c_7321553.elements[11] = ((closureN)self_7312525)->elements[11];
-+c_7321553.elements[12] = ((closureN)self_7312525)->elements[12];
-+c_7321553.elements[13] = ((closureN)self_7312525)->elements[13];
-+c_7321553.elements[14] = ((closureN)self_7312525)->elements[14];
-+c_7321553.elements[15] = ((closureN)self_7312525)->elements[15];
-+c_7321553.elements[16] = ((closureN)self_7312525)->elements[16];
-+c_7321553.elements[17] = ((closureN)self_7312525)->elements[17];
-+c_7321553.elements[18] = ((closureN)self_7312525)->elements[18];
-+c_7321553.elements[19] = ((closureN)self_7312525)->elements[19];
-+c_7321553.elements[20] = ((closureN)self_7312525)->elements[20];
-+c_7321553.elements[21] = ((closureN)self_7312525)->elements[21];
-+c_7321553.elements[22] = ((closureN)self_7312525)->elements[22];
-+c_7321553.elements[23] = ((closureN)self_7312525)->elements[23];
-+c_7321553.elements[24] = ((closureN)self_7312525)->elements[24];
-+c_7321553.elements[25] = ((closureN)self_7312525)->elements[25];
-+c_7321553.elements[26] = ((closureN)self_7312525)->elements[26];
-+c_7321553.elements[27] = ((closureN)self_7312525)->elements[27];
-+c_7321553.elements[28] = ((closureN)self_7312525)->elements[28];
-+c_7321553.elements[29] = ((closureN)self_7312525)->elements[29];
-+c_7321553.elements[30] = ((closureN)self_7312525)->elements[30];
-+c_7321553.elements[31] = ((closureN)self_7312525)->elements[31];
-+c_7321553.elements[32] = ((closureN)self_7312525)->elements[32];
-+c_7321553.elements[33] = ((closureN)self_7312525)->elements[33];
-+c_7321553.elements[34] = ((closureN)self_7312525)->elements[34];
-+
-+
-+pair_type local_7322373; 
-+return_direct_with_clo1(data,(closure)&c_7321553,__lambda_1367,  set_cell_as_expr(&local_7322373, lp_731281_733240));; 
-+}
-+
-+static void __lambda_1367(void *data, object self_7312526, int argc, object *args) /* object self_7312526, object lp_731281_733240 */
-+ {
-+ object lp_731281_733240 = args[0];
-+  
-+closureN_type c_7321555;
-+object e_7321571 [6];
-+c_7321555.hdr.mark = gc_color_red;
-+ c_7321555.hdr.grayed = 0;
-+c_7321555.tag = closureN_tag;
-+ c_7321555.fn = (function_type)__lambda_948;
-+c_7321555.num_args = 1;
-+c_7321555.num_elements = 6;
-+c_7321555.elements = (object *)e_7321571;
-+c_7321555.elements[0] = ((closureN)self_7312526)->elements[28];
-+c_7321555.elements[1] = ((closureN)self_7312526)->elements[29];
-+c_7321555.elements[2] = lp_731281_733240;
-+c_7321555.elements[3] = ((closureN)self_7312526)->elements[32];
-+c_7321555.elements[4] = ((closureN)self_7312526)->elements[33];
-+c_7321555.elements[5] = ((closureN)self_7312526)->elements[34];
-+
-+
-+closureN_type c_7321572;
-+object e_7322369 [31];
-+c_7321572.hdr.mark = gc_color_red;
-+ c_7321572.hdr.grayed = 0;
-+c_7321572.tag = closureN_tag;
-+ c_7321572.fn = (function_type)__lambda_950;
-+c_7321572.num_args = 5;
-+c_7321572.num_elements = 31;
-+c_7321572.elements = (object *)e_7322369;
-+c_7321572.elements[0] = ((closureN)self_7312526)->elements[0];
-+c_7321572.elements[1] = ((closureN)self_7312526)->elements[1];
-+c_7321572.elements[2] = ((closureN)self_7312526)->elements[2];
-+c_7321572.elements[3] = ((closureN)self_7312526)->elements[3];
-+c_7321572.elements[4] = ((closureN)self_7312526)->elements[4];
-+c_7321572.elements[5] = ((closureN)self_7312526)->elements[5];
-+c_7321572.elements[6] = ((closureN)self_7312526)->elements[6];
-+c_7321572.elements[7] = ((closureN)self_7312526)->elements[7];
-+c_7321572.elements[8] = ((closureN)self_7312526)->elements[8];
-+c_7321572.elements[9] = ((closureN)self_7312526)->elements[9];
-+c_7321572.elements[10] = ((closureN)self_7312526)->elements[10];
-+c_7321572.elements[11] = ((closureN)self_7312526)->elements[11];
-+c_7321572.elements[12] = ((closureN)self_7312526)->elements[12];
-+c_7321572.elements[13] = ((closureN)self_7312526)->elements[13];
-+c_7321572.elements[14] = ((closureN)self_7312526)->elements[14];
-+c_7321572.elements[15] = ((closureN)self_7312526)->elements[15];
-+c_7321572.elements[16] = ((closureN)self_7312526)->elements[16];
-+c_7321572.elements[17] = ((closureN)self_7312526)->elements[17];
-+c_7321572.elements[18] = ((closureN)self_7312526)->elements[18];
-+c_7321572.elements[19] = ((closureN)self_7312526)->elements[19];
-+c_7321572.elements[20] = ((closureN)self_7312526)->elements[20];
-+c_7321572.elements[21] = ((closureN)self_7312526)->elements[21];
-+c_7321572.elements[22] = ((closureN)self_7312526)->elements[22];
-+c_7321572.elements[23] = ((closureN)self_7312526)->elements[23];
-+c_7321572.elements[24] = ((closureN)self_7312526)->elements[24];
-+c_7321572.elements[25] = ((closureN)self_7312526)->elements[25];
-+c_7321572.elements[26] = ((closureN)self_7312526)->elements[26];
-+c_7321572.elements[27] = ((closureN)self_7312526)->elements[27];
-+c_7321572.elements[28] = ((closureN)self_7312526)->elements[30];
-+c_7321572.elements[29] = lp_731281_733240;
-+c_7321572.elements[30] = ((closureN)self_7312526)->elements[31];
-+
-+return_direct_with_clo1(data,(closure)&c_7321555,__lambda_948,  &c_7321572);; 
-+}
-+
-+static void __lambda_950(void *data, object self_7312527, int argc, object *args) /* object self_7312527, object k_736027, object p_731282_733241, object x_731283_733242, object dim_731284_733243, object vars_731285_733244, object k_731286_733245 */
-+ {
-+ object k_736027 = args[0]; object p_731282_733241 = args[1]; object x_731283_733242 = args[2]; object dim_731284_733243 = args[3]; object vars_731285_733244 = args[4]; object k_731286_733245 = args[5];
-+  
-+
-+
-+closureN_type c_7321577;
-+object e_7322367 [37];
-+c_7321577.hdr.mark = gc_color_red;
-+ c_7321577.hdr.grayed = 0;
-+c_7321577.tag = closureN_tag;
-+ c_7321577.fn = (function_type)__lambda_951;
-+c_7321577.num_args = 1;
-+c_7321577.num_elements = 37;
-+c_7321577.elements = (object *)e_7322367;
-+c_7321577.elements[0] = ((closureN)self_7312527)->elements[0];
-+c_7321577.elements[1] = ((closureN)self_7312527)->elements[1];
-+c_7321577.elements[2] = ((closureN)self_7312527)->elements[2];
-+c_7321577.elements[3] = ((closureN)self_7312527)->elements[3];
-+c_7321577.elements[4] = ((closureN)self_7312527)->elements[4];
-+c_7321577.elements[5] = ((closureN)self_7312527)->elements[5];
-+c_7321577.elements[6] = ((closureN)self_7312527)->elements[6];
-+c_7321577.elements[7] = ((closureN)self_7312527)->elements[7];
-+c_7321577.elements[8] = ((closureN)self_7312527)->elements[8];
-+c_7321577.elements[9] = ((closureN)self_7312527)->elements[9];
-+c_7321577.elements[10] = ((closureN)self_7312527)->elements[10];
-+c_7321577.elements[11] = ((closureN)self_7312527)->elements[11];
-+c_7321577.elements[12] = ((closureN)self_7312527)->elements[12];
-+c_7321577.elements[13] = ((closureN)self_7312527)->elements[13];
-+c_7321577.elements[14] = ((closureN)self_7312527)->elements[14];
-+c_7321577.elements[15] = ((closureN)self_7312527)->elements[15];
-+c_7321577.elements[16] = ((closureN)self_7312527)->elements[16];
-+c_7321577.elements[17] = ((closureN)self_7312527)->elements[17];
-+c_7321577.elements[18] = ((closureN)self_7312527)->elements[18];
-+c_7321577.elements[19] = ((closureN)self_7312527)->elements[19];
-+c_7321577.elements[20] = ((closureN)self_7312527)->elements[20];
-+c_7321577.elements[21] = ((closureN)self_7312527)->elements[21];
-+c_7321577.elements[22] = ((closureN)self_7312527)->elements[22];
-+c_7321577.elements[23] = ((closureN)self_7312527)->elements[23];
-+c_7321577.elements[24] = ((closureN)self_7312527)->elements[24];
-+c_7321577.elements[25] = ((closureN)self_7312527)->elements[25];
-+c_7321577.elements[26] = dim_731284_733243;
-+c_7321577.elements[27] = ((closureN)self_7312527)->elements[26];
-+c_7321577.elements[28] = ((closureN)self_7312527)->elements[27];
-+c_7321577.elements[29] = k_731286_733245;
-+c_7321577.elements[30] = k_736027;
-+c_7321577.elements[31] = ((closureN)self_7312527)->elements[28];
-+c_7321577.elements[32] = ((closureN)self_7312527)->elements[29];
-+c_7321577.elements[33] = ((closureN)self_7312527)->elements[30];
-+c_7321577.elements[34] = p_731282_733241;
-+c_7321577.elements[35] = vars_731285_733244;
-+c_7321577.elements[36] = x_731283_733242;
-+
-+
-+make_utf8_string_with_len(c_7322368, "v.", 2, 2);
-+return_closcall2(data,  car(((closureN)self_7312527)->elements[30]),  &c_7321577, &c_7322368);; 
-+}
-+
-+static void __lambda_951(void *data, object self_7312528, int argc, object *args) /* object self_7312528, object v_731287_733246 */
-+ {
-+ object v_731287_733246 = args[0];
-+  
-+closureN_type c_7321579;
-+object e_7322350 [36];
-+c_7321579.hdr.mark = gc_color_red;
-+ c_7321579.hdr.grayed = 0;
-+c_7321579.tag = closureN_tag;
-+ c_7321579.fn = (function_type)__lambda_952;
-+c_7321579.num_args = 0;
-+c_7321579.num_elements = 36;
-+c_7321579.elements = (object *)e_7322350;
-+c_7321579.elements[0] = ((closureN)self_7312528)->elements[0];
-+c_7321579.elements[1] = ((closureN)self_7312528)->elements[1];
-+c_7321579.elements[2] = ((closureN)self_7312528)->elements[2];
-+c_7321579.elements[3] = ((closureN)self_7312528)->elements[3];
-+c_7321579.elements[4] = ((closureN)self_7312528)->elements[4];
-+c_7321579.elements[5] = ((closureN)self_7312528)->elements[5];
-+c_7321579.elements[6] = ((closureN)self_7312528)->elements[6];
-+c_7321579.elements[7] = ((closureN)self_7312528)->elements[7];
-+c_7321579.elements[8] = ((closureN)self_7312528)->elements[8];
-+c_7321579.elements[9] = ((closureN)self_7312528)->elements[9];
-+c_7321579.elements[10] = ((closureN)self_7312528)->elements[10];
-+c_7321579.elements[11] = ((closureN)self_7312528)->elements[11];
-+c_7321579.elements[12] = ((closureN)self_7312528)->elements[12];
-+c_7321579.elements[13] = ((closureN)self_7312528)->elements[13];
-+c_7321579.elements[14] = ((closureN)self_7312528)->elements[14];
-+c_7321579.elements[15] = ((closureN)self_7312528)->elements[15];
-+c_7321579.elements[16] = ((closureN)self_7312528)->elements[16];
-+c_7321579.elements[17] = ((closureN)self_7312528)->elements[17];
-+c_7321579.elements[18] = ((closureN)self_7312528)->elements[18];
-+c_7321579.elements[19] = ((closureN)self_7312528)->elements[19];
-+c_7321579.elements[20] = ((closureN)self_7312528)->elements[20];
-+c_7321579.elements[21] = ((closureN)self_7312528)->elements[21];
-+c_7321579.elements[22] = ((closureN)self_7312528)->elements[22];
-+c_7321579.elements[23] = ((closureN)self_7312528)->elements[23];
-+c_7321579.elements[24] = ((closureN)self_7312528)->elements[24];
-+c_7321579.elements[25] = ((closureN)self_7312528)->elements[25];
-+c_7321579.elements[26] = ((closureN)self_7312528)->elements[26];
-+c_7321579.elements[27] = ((closureN)self_7312528)->elements[27];
-+c_7321579.elements[28] = ((closureN)self_7312528)->elements[28];
-+c_7321579.elements[29] = ((closureN)self_7312528)->elements[29];
-+c_7321579.elements[30] = ((closureN)self_7312528)->elements[31];
-+c_7321579.elements[31] = ((closureN)self_7312528)->elements[32];
-+c_7321579.elements[32] = ((closureN)self_7312528)->elements[33];
-+c_7321579.elements[33] = ((closureN)self_7312528)->elements[34];
-+c_7321579.elements[34] = v_731287_733246;
-+c_7321579.elements[35] = ((closureN)self_7312528)->elements[35];
-+
-+
-+closureN_type c_7322351;
-+object e_7322366 [4];
-+c_7322351.hdr.mark = gc_color_red;
-+ c_7322351.hdr.grayed = 0;
-+c_7322351.tag = closureN_tag;
-+ c_7322351.fn = (function_type)__lambda_1003;
-+c_7322351.num_args = 1;
-+c_7322351.num_elements = 4;
-+c_7322351.elements = (object *)e_7322366;
-+c_7322351.elements[0] = ((closureN)self_7312528)->elements[13];
-+c_7322351.elements[1] = ((closureN)self_7312528)->elements[30];
-+c_7322351.elements[2] = v_731287_733246;
-+c_7322351.elements[3] = ((closureN)self_7312528)->elements[36];
-+
-+return_direct_with_clo1(data,(closure)&c_7321579,__lambda_952,  &c_7322351);; 
-+}
-+
-+static void __lambda_1003(void *data, object self_7312529, int argc, object *args) /* object self_7312529, object r_736030 */
-+ {
-+ object r_736030 = args[0];
-+  
-+list_3_type local_7322356; 
-+
-+pair_type local_7322360; 
-+
-+list_2_type local_7322363; 
-+return_direct_with_clo1(data,  ((closureN)self_7312529)->elements[1], (((closure)  ((closureN)self_7312529)->elements[1])->fn),  Cyc_fast_list_3(&local_7322356, ((closureN)self_7312529)->elements[0], set_cell_as_expr(&local_7322360, Cyc_fast_list_2(&local_7322363, ((closureN)self_7312529)->elements[2], ((closureN)self_7312529)->elements[3])), r_736030));; 
-+}
-+
-+static void __lambda_952(void *data, object self_7312530, int argc, object *args) /* object self_7312530, object k_736031 */
-+ {
-+ object k_736031 = args[0];
-+  
-+closureN_type c_7321581;
-+object e_7322348 [37];
-+c_7321581.hdr.mark = gc_color_red;
-+ c_7321581.hdr.grayed = 0;
-+c_7321581.tag = closureN_tag;
-+ c_7321581.fn = (function_type)__lambda_953;
-+c_7321581.num_args = 1;
-+c_7321581.num_elements = 37;
-+c_7321581.elements = (object *)e_7322348;
-+c_7321581.elements[0] = ((closureN)self_7312530)->elements[0];
-+c_7321581.elements[1] = ((closureN)self_7312530)->elements[1];
-+c_7321581.elements[2] = ((closureN)self_7312530)->elements[2];
-+c_7321581.elements[3] = ((closureN)self_7312530)->elements[3];
-+c_7321581.elements[4] = ((closureN)self_7312530)->elements[4];
-+c_7321581.elements[5] = ((closureN)self_7312530)->elements[5];
-+c_7321581.elements[6] = ((closureN)self_7312530)->elements[6];
-+c_7321581.elements[7] = ((closureN)self_7312530)->elements[7];
-+c_7321581.elements[8] = ((closureN)self_7312530)->elements[8];
-+c_7321581.elements[9] = ((closureN)self_7312530)->elements[9];
-+c_7321581.elements[10] = ((closureN)self_7312530)->elements[10];
-+c_7321581.elements[11] = ((closureN)self_7312530)->elements[11];
-+c_7321581.elements[12] = ((closureN)self_7312530)->elements[12];
-+c_7321581.elements[13] = ((closureN)self_7312530)->elements[13];
-+c_7321581.elements[14] = ((closureN)self_7312530)->elements[14];
-+c_7321581.elements[15] = ((closureN)self_7312530)->elements[15];
-+c_7321581.elements[16] = ((closureN)self_7312530)->elements[16];
-+c_7321581.elements[17] = ((closureN)self_7312530)->elements[17];
-+c_7321581.elements[18] = ((closureN)self_7312530)->elements[18];
-+c_7321581.elements[19] = ((closureN)self_7312530)->elements[19];
-+c_7321581.elements[20] = ((closureN)self_7312530)->elements[20];
-+c_7321581.elements[21] = ((closureN)self_7312530)->elements[21];
-+c_7321581.elements[22] = ((closureN)self_7312530)->elements[22];
-+c_7321581.elements[23] = ((closureN)self_7312530)->elements[23];
-+c_7321581.elements[24] = ((closureN)self_7312530)->elements[24];
-+c_7321581.elements[25] = ((closureN)self_7312530)->elements[25];
-+c_7321581.elements[26] = ((closureN)self_7312530)->elements[26];
-+c_7321581.elements[27] = ((closureN)self_7312530)->elements[27];
-+c_7321581.elements[28] = ((closureN)self_7312530)->elements[28];
-+c_7321581.elements[29] = ((closureN)self_7312530)->elements[29];
-+c_7321581.elements[30] = k_736031;
-+c_7321581.elements[31] = ((closureN)self_7312530)->elements[30];
-+c_7321581.elements[32] = ((closureN)self_7312530)->elements[31];
-+c_7321581.elements[33] = ((closureN)self_7312530)->elements[32];
-+c_7321581.elements[34] = ((closureN)self_7312530)->elements[33];
-+c_7321581.elements[35] = ((closureN)self_7312530)->elements[34];
-+c_7321581.elements[36] = ((closureN)self_7312530)->elements[35];
-+
-+return_direct_with_clo2(data,  __glo_identifier_127_scheme_base, (((closure)  __glo_identifier_127_scheme_base)->fn),  &c_7321581, ((closureN)self_7312530)->elements[33]);; 
-+}
-+
-+static void __lambda_953(void *data, object self_7312531, int argc, object *args) /* object self_7312531, object r_736032 */
-+ {
-+ object r_736032 = args[0];
-+  if( (boolean_f != r_736032) ){ 
-+  
-+closureN_type c_7321583;
-+object e_7321646 [12];
-+c_7321583.hdr.mark = gc_color_red;
-+ c_7321583.hdr.grayed = 0;
-+c_7321583.tag = closureN_tag;
-+ c_7321583.fn = (function_type)__lambda_954;
-+c_7321583.num_args = 1;
-+c_7321583.num_elements = 12;
-+c_7321583.elements = (object *)e_7321646;
-+c_7321583.elements[0] = ((closureN)self_7312531)->elements[2];
-+c_7321583.elements[1] = ((closureN)self_7312531)->elements[5];
-+c_7321583.elements[2] = ((closureN)self_7312531)->elements[13];
-+c_7321583.elements[3] = ((closureN)self_7312531)->elements[18];
-+c_7321583.elements[4] = ((closureN)self_7312531)->elements[19];
-+c_7321583.elements[5] = ((closureN)self_7312531)->elements[26];
-+c_7321583.elements[6] = ((closureN)self_7312531)->elements[29];
-+c_7321583.elements[7] = ((closureN)self_7312531)->elements[30];
-+c_7321583.elements[8] = ((closureN)self_7312531)->elements[31];
-+c_7321583.elements[9] = ((closureN)self_7312531)->elements[34];
-+c_7321583.elements[10] = ((closureN)self_7312531)->elements[35];
-+c_7321583.elements[11] = ((closureN)self_7312531)->elements[36];
-+
-+
-+closureN_type c_7321647;
-+object e_7321651 [2];
-+c_7321647.hdr.mark = gc_color_red;
-+ c_7321647.hdr.grayed = 0;
-+c_7321647.tag = closureN_tag;
-+ c_7321647.fn = (function_type)__lambda_959;
-+c_7321647.num_args = 1;
-+c_7321647.num_elements = 2;
-+c_7321647.elements = (object *)e_7321651;
-+c_7321647.elements[0] = ((closureN)self_7312531)->elements[25];
-+c_7321647.elements[1] = ((closureN)self_7312531)->elements[34];
-+
-+return_direct_with_clo1(data,(closure)&c_7321583,__lambda_954,  &c_7321647);
-+} else { 
-+  
+ 
+-return_closcall2(data,  ((closureN)self_7313784)->elements[26],  &c_7323624, ((closureN)self_7313784)->elements[32]);}
+-;}
+-;}
+-;}
+-;; 
 +
 +
-+closureN_type c_7321656;
-+object e_7322346 [33];
-+c_7321656.hdr.mark = gc_color_red;
-+ c_7321656.hdr.grayed = 0;
-+c_7321656.tag = closureN_tag;
-+ c_7321656.fn = (function_type)__lambda_960;
-+c_7321656.num_args = 1;
-+c_7321656.num_elements = 33;
-+c_7321656.elements = (object *)e_7322346;
-+c_7321656.elements[0] = ((closureN)self_7312531)->elements[0];
-+c_7321656.elements[1] = ((closureN)self_7312531)->elements[1];
-+c_7321656.elements[2] = ((closureN)self_7312531)->elements[2];
-+c_7321656.elements[3] = ((closureN)self_7312531)->elements[3];
-+c_7321656.elements[4] = ((closureN)self_7312531)->elements[4];
-+c_7321656.elements[5] = ((closureN)self_7312531)->elements[6];
-+c_7321656.elements[6] = ((closureN)self_7312531)->elements[7];
-+c_7321656.elements[7] = ((closureN)self_7312531)->elements[8];
-+c_7321656.elements[8] = ((closureN)self_7312531)->elements[9];
-+c_7321656.elements[9] = ((closureN)self_7312531)->elements[10];
-+c_7321656.elements[10] = ((closureN)self_7312531)->elements[11];
-+c_7321656.elements[11] = ((closureN)self_7312531)->elements[12];
-+c_7321656.elements[12] = ((closureN)self_7312531)->elements[13];
-+c_7321656.elements[13] = ((closureN)self_7312531)->elements[14];
-+c_7321656.elements[14] = ((closureN)self_7312531)->elements[15];
-+c_7321656.elements[15] = ((closureN)self_7312531)->elements[16];
-+c_7321656.elements[16] = ((closureN)self_7312531)->elements[17];
-+c_7321656.elements[17] = ((closureN)self_7312531)->elements[18];
-+c_7321656.elements[18] = ((closureN)self_7312531)->elements[20];
-+c_7321656.elements[19] = ((closureN)self_7312531)->elements[21];
-+c_7321656.elements[20] = ((closureN)self_7312531)->elements[22];
-+c_7321656.elements[21] = ((closureN)self_7312531)->elements[23];
-+c_7321656.elements[22] = ((closureN)self_7312531)->elements[24];
-+c_7321656.elements[23] = ((closureN)self_7312531)->elements[25];
-+c_7321656.elements[24] = ((closureN)self_7312531)->elements[26];
-+c_7321656.elements[25] = ((closureN)self_7312531)->elements[27];
-+c_7321656.elements[26] = ((closureN)self_7312531)->elements[29];
-+c_7321656.elements[27] = ((closureN)self_7312531)->elements[30];
-+c_7321656.elements[28] = ((closureN)self_7312531)->elements[32];
-+c_7321656.elements[29] = ((closureN)self_7312531)->elements[33];
-+c_7321656.elements[30] = ((closureN)self_7312531)->elements[34];
-+c_7321656.elements[31] = ((closureN)self_7312531)->elements[35];
-+c_7321656.elements[32] = ((closureN)self_7312531)->elements[36];
-+
-+return_closcall2(data,  car(((closureN)self_7312531)->elements[28]),  &c_7321656, ((closureN)self_7312531)->elements[34]);}
-+;; 
-+}
 +
-+static void __lambda_960(void *data, object self_7312538, int argc, object *args) /* object self_7312538, object r_736045 */
-+ {
-+ object r_736045 = args[0];
-+  if( (boolean_f != r_736045) ){ 
-+  
-+closureN_type c_7321658;
-+object e_7322225 [30];
-+c_7321658.hdr.mark = gc_color_red;
-+ c_7321658.hdr.grayed = 0;
-+c_7321658.tag = closureN_tag;
-+ c_7321658.fn = (function_type)__lambda_961;
-+c_7321658.num_args = 1;
-+c_7321658.num_elements = 30;
-+c_7321658.elements = (object *)e_7322225;
-+c_7321658.elements[0] = ((closureN)self_7312538)->elements[0];
-+c_7321658.elements[1] = ((closureN)self_7312538)->elements[1];
-+c_7321658.elements[2] = ((closureN)self_7312538)->elements[2];
-+c_7321658.elements[3] = ((closureN)self_7312538)->elements[3];
-+c_7321658.elements[4] = ((closureN)self_7312538)->elements[4];
-+c_7321658.elements[5] = ((closureN)self_7312538)->elements[5];
-+c_7321658.elements[6] = ((closureN)self_7312538)->elements[6];
-+c_7321658.elements[7] = ((closureN)self_7312538)->elements[8];
-+c_7321658.elements[8] = ((closureN)self_7312538)->elements[9];
-+c_7321658.elements[9] = ((closureN)self_7312538)->elements[10];
-+c_7321658.elements[10] = ((closureN)self_7312538)->elements[11];
-+c_7321658.elements[11] = ((closureN)self_7312538)->elements[12];
-+c_7321658.elements[12] = ((closureN)self_7312538)->elements[13];
-+c_7321658.elements[13] = ((closureN)self_7312538)->elements[14];
-+c_7321658.elements[14] = ((closureN)self_7312538)->elements[15];
-+c_7321658.elements[15] = ((closureN)self_7312538)->elements[16];
-+c_7321658.elements[16] = ((closureN)self_7312538)->elements[17];
-+c_7321658.elements[17] = ((closureN)self_7312538)->elements[18];
-+c_7321658.elements[18] = ((closureN)self_7312538)->elements[19];
-+c_7321658.elements[19] = ((closureN)self_7312538)->elements[22];
-+c_7321658.elements[20] = ((closureN)self_7312538)->elements[23];
-+c_7321658.elements[21] = ((closureN)self_7312538)->elements[24];
-+c_7321658.elements[22] = ((closureN)self_7312538)->elements[25];
-+c_7321658.elements[23] = ((closureN)self_7312538)->elements[26];
-+c_7321658.elements[24] = ((closureN)self_7312538)->elements[27];
-+c_7321658.elements[25] = ((closureN)self_7312538)->elements[28];
-+c_7321658.elements[26] = ((closureN)self_7312538)->elements[29];
-+c_7321658.elements[27] = ((closureN)self_7312538)->elements[30];
-+c_7321658.elements[28] = ((closureN)self_7312538)->elements[31];
-+c_7321658.elements[29] = ((closureN)self_7312538)->elements[32];
-+
-+
-+
-+return_direct_with_clo1(data,(closure)&c_7321658,__lambda_961,  Cyc_cdr(data, ((closureN)self_7312538)->elements[30]));
-+} else { 
-+    
-+if( (boolean_f != Cyc_is_pair(((closureN)self_7312538)->elements[30])) ){ 
-+  
-+closureN_type c_7322233;
-+object e_7322261 [9];
-+c_7322233.hdr.mark = gc_color_red;
-+ c_7322233.hdr.grayed = 0;
-+c_7322233.tag = closureN_tag;
-+ c_7322233.fn = (function_type)__lambda_996;
-+c_7322233.num_args = 1;
-+c_7322233.num_elements = 9;
-+c_7322233.elements = (object *)e_7322261;
-+c_7322233.elements[0] = ((closureN)self_7312538)->elements[2];
-+c_7322233.elements[1] = ((closureN)self_7312538)->elements[3];
-+c_7322233.elements[2] = ((closureN)self_7312538)->elements[16];
-+c_7322233.elements[3] = ((closureN)self_7312538)->elements[24];
-+c_7322233.elements[4] = ((closureN)self_7312538)->elements[27];
-+c_7322233.elements[5] = ((closureN)self_7312538)->elements[28];
-+c_7322233.elements[6] = ((closureN)self_7312538)->elements[30];
-+c_7322233.elements[7] = ((closureN)self_7312538)->elements[31];
-+c_7322233.elements[8] = ((closureN)self_7312538)->elements[32];
-+
-+
-+closureN_type c_7322262;
-+object e_7322277 [6];
-+c_7322262.hdr.mark = gc_color_red;
-+ c_7322262.hdr.grayed = 0;
-+c_7322262.tag = closureN_tag;
-+ c_7322262.fn = (function_type)__lambda_998;
-+c_7322262.num_args = 1;
-+c_7322262.num_elements = 6;
-+c_7322262.elements = (object *)e_7322277;
-+c_7322262.elements[0] = ((closureN)self_7312538)->elements[4];
-+c_7322262.elements[1] = ((closureN)self_7312538)->elements[24];
-+c_7322262.elements[2] = ((closureN)self_7312538)->elements[26];
-+c_7322262.elements[3] = ((closureN)self_7312538)->elements[28];
-+c_7322262.elements[4] = ((closureN)self_7312538)->elements[30];
-+c_7322262.elements[5] = ((closureN)self_7312538)->elements[31];
-+
-+return_direct_with_clo1(data,(closure)&c_7322233,__lambda_996,  &c_7322262);
-+} else { 
-+    
-+if( (boolean_f != Cyc_is_vector_not_record_type(((closureN)self_7312538)->elements[30])) ){ 
-+  
-+closureN_type c_7322282;
-+object e_7322308 [9];
-+c_7322282.hdr.mark = gc_color_red;
-+ c_7322282.hdr.grayed = 0;
-+c_7322282.tag = closureN_tag;
-+ c_7322282.fn = (function_type)__lambda_999;
-+c_7322282.num_args = 1;
-+c_7322282.num_elements = 9;
-+c_7322282.elements = (object *)e_7322308;
-+c_7322282.elements[0] = ((closureN)self_7312538)->elements[2];
-+c_7322282.elements[1] = ((closureN)self_7312538)->elements[20];
-+c_7322282.elements[2] = ((closureN)self_7312538)->elements[21];
-+c_7322282.elements[3] = ((closureN)self_7312538)->elements[24];
-+c_7322282.elements[4] = ((closureN)self_7312538)->elements[26];
-+c_7322282.elements[5] = ((closureN)self_7312538)->elements[27];
-+c_7322282.elements[6] = ((closureN)self_7312538)->elements[28];
-+c_7322282.elements[7] = ((closureN)self_7312538)->elements[31];
-+c_7322282.elements[8] = ((closureN)self_7312538)->elements[32];
-+
-+return_direct_with_clo2(data,  __glo_vector_91_125list_scheme_base, (((closure)  __glo_vector_91_125list_scheme_base)->fn),  &c_7322282, ((closureN)self_7312538)->elements[30]);
-+} else { 
-+    
-+if( (boolean_f != Cyc_is_null(((closureN)self_7312538)->elements[30])) ){ 
-+  
-+closureN_type c_7322315;
-+object e_7322327 [4];
-+c_7322315.hdr.mark = gc_color_red;
-+ c_7322315.hdr.grayed = 0;
-+c_7322315.tag = closureN_tag;
-+ c_7322315.fn = (function_type)__lambda_1001;
-+c_7322315.num_args = 1;
-+c_7322315.num_elements = 4;
-+c_7322315.elements = (object *)e_7322327;
-+c_7322315.elements[0] = ((closureN)self_7312538)->elements[2];
-+c_7322315.elements[1] = ((closureN)self_7312538)->elements[15];
-+c_7322315.elements[2] = ((closureN)self_7312538)->elements[27];
-+c_7322315.elements[3] = ((closureN)self_7312538)->elements[31];
-+
-+return_closcall2(data,  ((closureN)self_7312538)->elements[26],  &c_7322315, ((closureN)self_7312538)->elements[32]);
-+} else { 
-+  
-+closureN_type c_7322331;
-+object e_7322344 [5];
-+c_7322331.hdr.mark = gc_color_red;
-+ c_7322331.hdr.grayed = 0;
-+c_7322331.tag = closureN_tag;
-+ c_7322331.fn = (function_type)__lambda_1002;
-+c_7322331.num_args = 1;
-+c_7322331.num_elements = 5;
-+c_7322331.elements = (object *)e_7322344;
-+c_7322331.elements[0] = ((closureN)self_7312538)->elements[2];
-+c_7322331.elements[1] = ((closureN)self_7312538)->elements[7];
-+c_7322331.elements[2] = ((closureN)self_7312538)->elements[27];
-+c_7322331.elements[3] = ((closureN)self_7312538)->elements[30];
-+c_7322331.elements[4] = ((closureN)self_7312538)->elements[31];
- 
--return_closcall2(data,  ((closureN)self_7313784)->elements[26],  &c_7323624, ((closureN)self_7313784)->elements[32]);}
-+return_closcall2(data,  ((closureN)self_7312538)->elements[26],  &c_7322331, ((closureN)self_7312538)->elements[32]);}
- ;}
- ;}
- ;}
- ;; 
++list_2_type local_7322265; 
++return_closcall6(data,  car(((closureN)self_7312567)->elements[3]),  k_736212, Cyc_cdr(data, ((closureN)self_7312567)->elements[4]), Cyc_fast_list_2(&local_7322265, ((closureN)self_7312567)->elements[0], ((closureN)self_7312567)->elements[5]), ((closureN)self_7312567)->elements[1], vars_731344_733256, ((closureN)self_7312567)->elements[2]);; 
  }
  
 -static void __lambda_1002(void *data, object self_7313826, int argc, object *args) /* object self_7313826, object r_736676 */
-+static void __lambda_1002(void *data, object self_7312580, int argc, object *args) /* object self_7312580, object r_736231 */
++static void __lambda_996(void *data, object self_7312568, int argc, object *args) /* object self_7312568, object r_736211 */
   {
 - object r_736676 = args[0];
-+ object r_736231 = args[0];
++ object r_736211 = args[0];
    
 -list_3_type local_7323629; 
-+list_3_type local_7322336; 
  
 -list_3_type local_7323633; 
 -return_direct_with_clo1(data,  ((closureN)self_7313826)->elements[2], (((closure)  ((closureN)self_7313826)->elements[2])->fn),  Cyc_fast_list_3(&local_7323629, ((closureN)self_7313826)->elements[0], Cyc_fast_list_3(&local_7323633, ((closureN)self_7313826)->elements[1], ((closureN)self_7313826)->elements[4], ((closureN)self_7313826)->elements[3]), r_736676));; 
-+list_3_type local_7322340; 
-+return_direct_with_clo1(data,  ((closureN)self_7312580)->elements[2], (((closure)  ((closureN)self_7312580)->elements[2])->fn),  Cyc_fast_list_3(&local_7322336, ((closureN)self_7312580)->elements[0], Cyc_fast_list_3(&local_7322340, ((closureN)self_7312580)->elements[1], ((closureN)self_7312580)->elements[4], ((closureN)self_7312580)->elements[3]), r_736231));; 
++
++closureN_type c_7322231;
++object e_7322243 [4];
++c_7322231.hdr.mark = gc_color_red;
++ c_7322231.hdr.grayed = 0;
++c_7322231.tag = closureN_tag;
++ c_7322231.fn = (function_type)__lambda_997;
++c_7322231.num_args = 1;
++c_7322231.num_elements = 4;
++c_7322231.elements = (object *)e_7322243;
++c_7322231.elements[0] = ((closureN)self_7312568)->elements[0];
++c_7322231.elements[1] = ((closureN)self_7312568)->elements[2];
++c_7322231.elements[2] = ((closureN)self_7312568)->elements[4];
++c_7322231.elements[3] = ((closureN)self_7312568)->elements[7];
++
++
++
++
++list_2_type local_7322249; 
++return_closcall6(data,  car(((closureN)self_7312568)->elements[5]),  &c_7322231, Cyc_car(data, ((closureN)self_7312568)->elements[6]), Cyc_fast_list_2(&local_7322249, ((closureN)self_7312568)->elements[1], ((closureN)self_7312568)->elements[7]), ((closureN)self_7312568)->elements[3], ((closureN)self_7312568)->elements[8], r_736211);; 
  }
  
 -static void __lambda_1001(void *data, object self_7313825, int argc, object *args) /* object self_7313825, object r_736674 */
-+static void __lambda_1001(void *data, object self_7312579, int argc, object *args) /* object self_7312579, object r_736229 */
++static void __lambda_997(void *data, object self_7312569, int argc, object *args) /* object self_7312569, object r_736208 */
   {
 - object r_736674 = args[0];
-+ object r_736229 = args[0];
++ object r_736208 = args[0];
    
 -list_3_type local_7323613; 
-+list_3_type local_7322320; 
++list_3_type local_7322236; 
  
 -list_2_type local_7323617; 
 -return_direct_with_clo1(data,  ((closureN)self_7313825)->elements[2], (((closure)  ((closureN)self_7313825)->elements[2])->fn),  Cyc_fast_list_3(&local_7323613, ((closureN)self_7313825)->elements[0], Cyc_fast_list_2(&local_7323617, ((closureN)self_7313825)->elements[1], ((closureN)self_7313825)->elements[3]), r_736674));; 
-+list_2_type local_7322324; 
-+return_direct_with_clo1(data,  ((closureN)self_7312579)->elements[2], (((closure)  ((closureN)self_7312579)->elements[2])->fn),  Cyc_fast_list_3(&local_7322320, ((closureN)self_7312579)->elements[0], Cyc_fast_list_2(&local_7322324, ((closureN)self_7312579)->elements[1], ((closureN)self_7312579)->elements[3]), r_736229));; 
++list_2_type local_7322240; 
++return_direct_with_clo1(data,  ((closureN)self_7312569)->elements[2], (((closure)  ((closureN)self_7312569)->elements[2])->fn),  Cyc_fast_list_3(&local_7322236, ((closureN)self_7312569)->elements[0], Cyc_fast_list_2(&local_7322240, ((closureN)self_7312569)->elements[1], ((closureN)self_7312569)->elements[3]), r_736208));; 
  }
  
 -static void __lambda_999(void *data, object self_7313823, int argc, object *args) /* object self_7313823, object r_736670 */
-+static void __lambda_999(void *data, object self_7312577, int argc, object *args) /* object self_7312577, object r_736225 */
++static void __lambda_961(void *data, object self_7312532, int argc, object *args) /* object self_7312532, object r_736205 */
   {
 - object r_736670 = args[0];
-+ object r_736225 = args[0];
++ object r_736205 = args[0];
++    
    
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, r_736205))) ){ 
++  
++closureN_type c_7321657;
++object e_7321903 [20];
++c_7321657.hdr.mark = gc_color_red;
++ c_7321657.hdr.grayed = 0;
++c_7321657.tag = closureN_tag;
++ c_7321657.fn = (function_type)__lambda_962;
++c_7321657.num_args = 1;
++c_7321657.num_elements = 20;
++c_7321657.elements = (object *)e_7321903;
++c_7321657.elements[0] = ((closureN)self_7312532)->elements[2];
++c_7321657.elements[1] = ((closureN)self_7312532)->elements[3];
++c_7321657.elements[2] = ((closureN)self_7312532)->elements[4];
++c_7321657.elements[3] = ((closureN)self_7312532)->elements[5];
++c_7321657.elements[4] = ((closureN)self_7312532)->elements[8];
++c_7321657.elements[5] = ((closureN)self_7312532)->elements[11];
++c_7321657.elements[6] = ((closureN)self_7312532)->elements[12];
++c_7321657.elements[7] = ((closureN)self_7312532)->elements[14];
++c_7321657.elements[8] = ((closureN)self_7312532)->elements[15];
++c_7321657.elements[9] = ((closureN)self_7312532)->elements[16];
++c_7321657.elements[10] = ((closureN)self_7312532)->elements[18];
++c_7321657.elements[11] = ((closureN)self_7312532)->elements[19];
++c_7321657.elements[12] = ((closureN)self_7312532)->elements[21];
++c_7321657.elements[13] = ((closureN)self_7312532)->elements[23];
++c_7321657.elements[14] = ((closureN)self_7312532)->elements[24];
++c_7321657.elements[15] = ((closureN)self_7312532)->elements[25];
++c_7321657.elements[16] = ((closureN)self_7312532)->elements[26];
++c_7321657.elements[17] = ((closureN)self_7312532)->elements[27];
++c_7321657.elements[18] = ((closureN)self_7312532)->elements[28];
++c_7321657.elements[19] = ((closureN)self_7312532)->elements[29];
  
  
 -closureN_type c_7323580;
@@ -25724,63 +25840,292 @@ Make let-values be the same as let*-values, to work around
 -c_7323580.elements[1] = ((closureN)self_7313823)->elements[2];
 -c_7323580.elements[2] = ((closureN)self_7313823)->elements[5];
 -c_7323580.elements[3] = ((closureN)self_7313823)->elements[7];
-+closureN_type c_7322287;
-+object e_7322299 [4];
-+c_7322287.hdr.mark = gc_color_red;
-+ c_7322287.hdr.grayed = 0;
-+c_7322287.tag = closureN_tag;
-+ c_7322287.fn = (function_type)__lambda_1000;
-+c_7322287.num_args = 1;
-+c_7322287.num_elements = 4;
-+c_7322287.elements = (object *)e_7322299;
-+c_7322287.elements[0] = ((closureN)self_7312577)->elements[0];
-+c_7322287.elements[1] = ((closureN)self_7312577)->elements[2];
-+c_7322287.elements[2] = ((closureN)self_7312577)->elements[5];
-+c_7322287.elements[3] = ((closureN)self_7312577)->elements[7];
- 
+-
  
 -list_2_type local_7323595; 
 -return_closcall6(data,  car(((closureN)self_7313823)->elements[6]),  &c_7323580, r_736670, Cyc_fast_list_2(&local_7323595, ((closureN)self_7313823)->elements[1], ((closureN)self_7313823)->elements[7]), ((closureN)self_7313823)->elements[3], ((closureN)self_7313823)->elements[8], ((closureN)self_7313823)->elements[4]);; 
-+list_2_type local_7322302; 
-+return_closcall6(data,  car(((closureN)self_7312577)->elements[6]),  &c_7322287, r_736225, Cyc_fast_list_2(&local_7322302, ((closureN)self_7312577)->elements[1], ((closureN)self_7312577)->elements[7]), ((closureN)self_7312577)->elements[3], ((closureN)self_7312577)->elements[8], ((closureN)self_7312577)->elements[4]);; 
++return_direct_with_clo2(data,  __glo_identifier_127_scheme_base, (((closure)  __glo_identifier_127_scheme_base)->fn),  &c_7321657, Cyc_car(data, ((closureN)self_7312532)->elements[27]));
++} else { 
++  
++closureN_type c_7321908;
++object e_7322203 [24];
++c_7321908.hdr.mark = gc_color_red;
++ c_7321908.hdr.grayed = 0;
++c_7321908.tag = closureN_tag;
++ c_7321908.fn = (function_type)__lambda_988;
++c_7321908.num_args = 1;
++c_7321908.num_elements = 24;
++c_7321908.elements = (object *)e_7322203;
++c_7321908.elements[0] = ((closureN)self_7312532)->elements[0];
++c_7321908.elements[1] = ((closureN)self_7312532)->elements[1];
++c_7321908.elements[2] = ((closureN)self_7312532)->elements[2];
++c_7321908.elements[3] = ((closureN)self_7312532)->elements[3];
++c_7321908.elements[4] = ((closureN)self_7312532)->elements[4];
++c_7321908.elements[5] = ((closureN)self_7312532)->elements[5];
++c_7321908.elements[6] = ((closureN)self_7312532)->elements[6];
++c_7321908.elements[7] = ((closureN)self_7312532)->elements[7];
++c_7321908.elements[8] = ((closureN)self_7312532)->elements[8];
++c_7321908.elements[9] = ((closureN)self_7312532)->elements[9];
++c_7321908.elements[10] = ((closureN)self_7312532)->elements[10];
++c_7321908.elements[11] = ((closureN)self_7312532)->elements[11];
++c_7321908.elements[12] = ((closureN)self_7312532)->elements[13];
++c_7321908.elements[13] = ((closureN)self_7312532)->elements[16];
++c_7321908.elements[14] = ((closureN)self_7312532)->elements[17];
++c_7321908.elements[15] = ((closureN)self_7312532)->elements[18];
++c_7321908.elements[16] = ((closureN)self_7312532)->elements[21];
++c_7321908.elements[17] = ((closureN)self_7312532)->elements[23];
++c_7321908.elements[18] = ((closureN)self_7312532)->elements[24];
++c_7321908.elements[19] = ((closureN)self_7312532)->elements[25];
++c_7321908.elements[20] = ((closureN)self_7312532)->elements[26];
++c_7321908.elements[21] = ((closureN)self_7312532)->elements[27];
++c_7321908.elements[22] = ((closureN)self_7312532)->elements[28];
++c_7321908.elements[23] = ((closureN)self_7312532)->elements[29];
++
++
++closureN_type c_7322204;
++object e_7322217 [2];
++c_7322204.hdr.mark = gc_color_red;
++ c_7322204.hdr.grayed = 0;
++c_7322204.tag = closureN_tag;
++ c_7322204.fn = (function_type)__lambda_994;
++c_7322204.num_args = 1;
++c_7322204.num_elements = 2;
++c_7322204.elements = (object *)e_7322217;
++c_7322204.elements[0] = ((closureN)self_7312532)->elements[20];
++c_7322204.elements[1] = ((closureN)self_7312532)->elements[22];
++
++return_direct_with_clo1(data,(closure)&c_7321908,__lambda_988,  &c_7322204);}
++;; 
++}
++
++static void __lambda_994(void *data, object self_7312559, int argc, object *args) /* object self_7312559, object k_736202, object x_731300_733241 */
++ {
++ object k_736202 = args[0]; object x_731300_733241 = args[1];
++  
++closureN_type c_7322206;
++object e_7322216 [4];
++c_7322206.hdr.mark = gc_color_red;
++ c_7322206.hdr.grayed = 0;
++c_7322206.tag = closureN_tag;
++ c_7322206.fn = (function_type)__lambda_995;
++c_7322206.num_args = 1;
++c_7322206.num_elements = 4;
++c_7322206.elements = (object *)e_7322216;
++c_7322206.elements[0] = ((closureN)self_7312559)->elements[0];
++c_7322206.elements[1] = ((closureN)self_7312559)->elements[1];
++c_7322206.elements[2] = k_736202;
++c_7322206.elements[3] = x_731300_733241;
++
++return_direct_with_clo2(data,  __glo_identifier_127_scheme_base, (((closure)  __glo_identifier_127_scheme_base)->fn),  &c_7322206, x_731300_733241);; 
++}
++
++static void __lambda_995(void *data, object self_7312560, int argc, object *args) /* object self_7312560, object r_736203 */
++ {
++ object r_736203 = args[0];
++  if( (boolean_f != r_736203) ){ 
++  
++
++return_closcall3(data,  ((closureN)self_7312560)->elements[0],  ((closureN)self_7312560)->elements[2], ((closureN)self_7312560)->elements[3], car(((closureN)self_7312560)->elements[1]));
++} else { 
++  return_direct_with_clo1(data,  ((closureN)self_7312560)->elements[2], (((closure)  ((closureN)self_7312560)->elements[2])->fn),  boolean_f);}
++;; 
  }
  
 -static void __lambda_1000(void *data, object self_7313824, int argc, object *args) /* object self_7313824, object r_736669 */
-+static void __lambda_1000(void *data, object self_7312578, int argc, object *args) /* object self_7312578, object r_736224 */
++static void __lambda_988(void *data, object self_7312561, int argc, object *args) /* object self_7312561, object r_736200 */
   {
 - object r_736669 = args[0];
-+ object r_736224 = args[0];
++ object r_736200 = args[0];
    
 -list_3_type local_7323585; 
-+list_3_type local_7322292; 
++closureN_type c_7321910;
++object e_7322199 [25];
++c_7321910.hdr.mark = gc_color_red;
++ c_7321910.hdr.grayed = 0;
++c_7321910.tag = closureN_tag;
++ c_7321910.fn = (function_type)__lambda_989;
++c_7321910.num_args = 1;
++c_7321910.num_elements = 25;
++c_7321910.elements = (object *)e_7322199;
++c_7321910.elements[0] = ((closureN)self_7312561)->elements[0];
++c_7321910.elements[1] = ((closureN)self_7312561)->elements[1];
++c_7321910.elements[2] = ((closureN)self_7312561)->elements[2];
++c_7321910.elements[3] = ((closureN)self_7312561)->elements[3];
++c_7321910.elements[4] = ((closureN)self_7312561)->elements[4];
++c_7321910.elements[5] = ((closureN)self_7312561)->elements[5];
++c_7321910.elements[6] = ((closureN)self_7312561)->elements[6];
++c_7321910.elements[7] = ((closureN)self_7312561)->elements[7];
++c_7321910.elements[8] = ((closureN)self_7312561)->elements[8];
++c_7321910.elements[9] = ((closureN)self_7312561)->elements[9];
++c_7321910.elements[10] = ((closureN)self_7312561)->elements[10];
++c_7321910.elements[11] = ((closureN)self_7312561)->elements[11];
++c_7321910.elements[12] = ((closureN)self_7312561)->elements[12];
++c_7321910.elements[13] = ((closureN)self_7312561)->elements[13];
++c_7321910.elements[14] = ((closureN)self_7312561)->elements[14];
++c_7321910.elements[15] = ((closureN)self_7312561)->elements[15];
++c_7321910.elements[16] = ((closureN)self_7312561)->elements[16];
++c_7321910.elements[17] = ((closureN)self_7312561)->elements[17];
++c_7321910.elements[18] = ((closureN)self_7312561)->elements[18];
++c_7321910.elements[19] = ((closureN)self_7312561)->elements[19];
++c_7321910.elements[20] = ((closureN)self_7312561)->elements[20];
++c_7321910.elements[21] = ((closureN)self_7312561)->elements[21];
++c_7321910.elements[22] = r_736200;
++c_7321910.elements[23] = ((closureN)self_7312561)->elements[22];
++c_7321910.elements[24] = ((closureN)self_7312561)->elements[23];
++
  
 -list_2_type local_7323589; 
 -return_direct_with_clo1(data,  ((closureN)self_7313824)->elements[2], (((closure)  ((closureN)self_7313824)->elements[2])->fn),  Cyc_fast_list_3(&local_7323585, ((closureN)self_7313824)->elements[0], Cyc_fast_list_2(&local_7323589, ((closureN)self_7313824)->elements[1], ((closureN)self_7313824)->elements[3]), r_736669));; 
-+list_2_type local_7322296; 
-+return_direct_with_clo1(data,  ((closureN)self_7312578)->elements[2], (((closure)  ((closureN)self_7312578)->elements[2])->fn),  Cyc_fast_list_3(&local_7322292, ((closureN)self_7312578)->elements[0], Cyc_fast_list_2(&local_7322296, ((closureN)self_7312578)->elements[1], ((closureN)self_7312578)->elements[3]), r_736224));; 
++
++return_direct_with_clo1(data,(closure)&c_7321910,__lambda_989,  Cyc_cddr(data, ((closureN)self_7312561)->elements[21]));; 
  }
  
 -static void __lambda_998(void *data, object self_7313820, int argc, object *args) /* object self_7313820, object k_736664, object vars_731344_733603 */
-+static void __lambda_998(void *data, object self_7312574, int argc, object *args) /* object self_7312574, object k_736219, object vars_731345_733263 */
++static void __lambda_989(void *data, object self_7312562, int argc, object *args) /* object self_7312562, object r_736201 */
   {
 - object k_736664 = args[0]; object vars_731344_733603 = args[1];
-+ object k_736219 = args[0]; object vars_731345_733263 = args[1];
-   
++ object r_736201 = args[0];
+   
++closureN_type c_7321912;
++object e_7322197 [24];
++c_7321912.hdr.mark = gc_color_red;
++ c_7321912.hdr.grayed = 0;
++c_7321912.tag = closureN_tag;
++ c_7321912.fn = (function_type)__lambda_990;
++c_7321912.num_args = 1;
++c_7321912.num_elements = 24;
++c_7321912.elements = (object *)e_7322197;
++c_7321912.elements[0] = ((closureN)self_7312562)->elements[0];
++c_7321912.elements[1] = ((closureN)self_7312562)->elements[1];
++c_7321912.elements[2] = ((closureN)self_7312562)->elements[2];
++c_7321912.elements[3] = ((closureN)self_7312562)->elements[3];
++c_7321912.elements[4] = ((closureN)self_7312562)->elements[4];
++c_7321912.elements[5] = ((closureN)self_7312562)->elements[5];
++c_7321912.elements[6] = ((closureN)self_7312562)->elements[6];
++c_7321912.elements[7] = ((closureN)self_7312562)->elements[7];
++c_7321912.elements[8] = ((closureN)self_7312562)->elements[8];
++c_7321912.elements[9] = ((closureN)self_7312562)->elements[9];
++c_7321912.elements[10] = ((closureN)self_7312562)->elements[10];
++c_7321912.elements[11] = ((closureN)self_7312562)->elements[11];
++c_7321912.elements[12] = ((closureN)self_7312562)->elements[12];
++c_7321912.elements[13] = ((closureN)self_7312562)->elements[13];
++c_7321912.elements[14] = ((closureN)self_7312562)->elements[14];
++c_7321912.elements[15] = ((closureN)self_7312562)->elements[15];
++c_7321912.elements[16] = ((closureN)self_7312562)->elements[16];
++c_7321912.elements[17] = ((closureN)self_7312562)->elements[17];
++c_7321912.elements[18] = ((closureN)self_7312562)->elements[18];
++c_7321912.elements[19] = ((closureN)self_7312562)->elements[19];
++c_7321912.elements[20] = ((closureN)self_7312562)->elements[20];
++c_7321912.elements[21] = ((closureN)self_7312562)->elements[21];
++c_7321912.elements[22] = ((closureN)self_7312562)->elements[23];
++c_7321912.elements[23] = ((closureN)self_7312562)->elements[24];
++
++return_direct_with_clo3(data,  __glo_any_scheme_base, (((closure)  __glo_any_scheme_base)->fn),  &c_7321912, ((closureN)self_7312562)->elements[22], r_736201);; 
++}
++
++static void __lambda_990(void *data, object self_7312563, int argc, object *args) /* object self_7312563, object r_736095 */
++ {
++ object r_736095 = args[0];
++  if( (boolean_f != r_736095) ){ 
++  
++make_utf8_string_with_len(c_7321915, "multiple ellipses", 17, 17);
++return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_7312563)->elements[18], &c_7321915, ((closureN)self_7312563)->elements[21]);
++} else { 
++  
++
++
++closureN_type c_7321921;
++object e_7322195 [23];
++c_7321921.hdr.mark = gc_color_red;
++ c_7321921.hdr.grayed = 0;
++c_7321921.tag = closureN_tag;
++ c_7321921.fn = (function_type)__lambda_991;
++c_7321921.num_args = 1;
++c_7321921.num_elements = 23;
++c_7321921.elements = (object *)e_7322195;
++c_7321921.elements[0] = ((closureN)self_7312563)->elements[0];
++c_7321921.elements[1] = ((closureN)self_7312563)->elements[1];
++c_7321921.elements[2] = ((closureN)self_7312563)->elements[2];
++c_7321921.elements[3] = ((closureN)self_7312563)->elements[3];
++c_7321921.elements[4] = ((closureN)self_7312563)->elements[4];
++c_7321921.elements[5] = ((closureN)self_7312563)->elements[5];
++c_7321921.elements[6] = ((closureN)self_7312563)->elements[6];
++c_7321921.elements[7] = ((closureN)self_7312563)->elements[7];
++c_7321921.elements[8] = ((closureN)self_7312563)->elements[8];
++c_7321921.elements[9] = ((closureN)self_7312563)->elements[9];
++c_7321921.elements[10] = ((closureN)self_7312563)->elements[10];
++c_7321921.elements[11] = ((closureN)self_7312563)->elements[11];
++c_7321921.elements[12] = ((closureN)self_7312563)->elements[12];
++c_7321921.elements[13] = ((closureN)self_7312563)->elements[13];
++c_7321921.elements[14] = ((closureN)self_7312563)->elements[14];
++c_7321921.elements[15] = ((closureN)self_7312563)->elements[15];
++c_7321921.elements[16] = ((closureN)self_7312563)->elements[16];
++c_7321921.elements[17] = ((closureN)self_7312563)->elements[17];
++c_7321921.elements[18] = ((closureN)self_7312563)->elements[18];
++c_7321921.elements[19] = ((closureN)self_7312563)->elements[19];
++c_7321921.elements[20] = ((closureN)self_7312563)->elements[21];
++c_7321921.elements[21] = ((closureN)self_7312563)->elements[22];
++c_7321921.elements[22] = ((closureN)self_7312563)->elements[23];
++
++
++make_utf8_string_with_len(c_7322196, "lp.", 3, 3);
++return_closcall2(data,  car(((closureN)self_7312563)->elements[20]),  &c_7321921, &c_7322196);}
++;; 
++}
++
++static void __lambda_991(void *data, object self_7312564, int argc, object *args) /* object self_7312564, object r_736097 */
++ {
++ object r_736097 = args[0];
++  
++closureN_type c_7321923;
++object e_7322187 [23];
++c_7321923.hdr.mark = gc_color_red;
++ c_7321923.hdr.grayed = 0;
++c_7321923.tag = closureN_tag;
++ c_7321923.fn = (function_type)__lambda_992;
++c_7321923.num_args = 2;
++c_7321923.num_elements = 23;
++c_7321923.elements = (object *)e_7322187;
++c_7321923.elements[0] = ((closureN)self_7312564)->elements[0];
++c_7321923.elements[1] = ((closureN)self_7312564)->elements[1];
++c_7321923.elements[2] = ((closureN)self_7312564)->elements[2];
++c_7321923.elements[3] = ((closureN)self_7312564)->elements[3];
++c_7321923.elements[4] = ((closureN)self_7312564)->elements[4];
++c_7321923.elements[5] = ((closureN)self_7312564)->elements[5];
++c_7321923.elements[6] = ((closureN)self_7312564)->elements[6];
++c_7321923.elements[7] = ((closureN)self_7312564)->elements[7];
++c_7321923.elements[8] = ((closureN)self_7312564)->elements[8];
++c_7321923.elements[9] = ((closureN)self_7312564)->elements[9];
++c_7321923.elements[10] = ((closureN)self_7312564)->elements[10];
++c_7321923.elements[11] = ((closureN)self_7312564)->elements[11];
++c_7321923.elements[12] = ((closureN)self_7312564)->elements[12];
++c_7321923.elements[13] = ((closureN)self_7312564)->elements[13];
++c_7321923.elements[14] = ((closureN)self_7312564)->elements[14];
++c_7321923.elements[15] = ((closureN)self_7312564)->elements[15];
++c_7321923.elements[16] = ((closureN)self_7312564)->elements[16];
++c_7321923.elements[17] = ((closureN)self_7312564)->elements[17];
++c_7321923.elements[18] = ((closureN)self_7312564)->elements[18];
++c_7321923.elements[19] = ((closureN)self_7312564)->elements[19];
++c_7321923.elements[20] = ((closureN)self_7312564)->elements[20];
++c_7321923.elements[21] = ((closureN)self_7312564)->elements[21];
++c_7321923.elements[22] = ((closureN)self_7312564)->elements[22];
++
  
  
  
  
 -list_2_type local_7323565; 
 -return_closcall6(data,  car(((closureN)self_7313820)->elements[3]),  k_736664, Cyc_cdr(data, ((closureN)self_7313820)->elements[4]), Cyc_fast_list_2(&local_7323565, ((closureN)self_7313820)->elements[0], ((closureN)self_7313820)->elements[5]), ((closureN)self_7313820)->elements[1], vars_731344_733603, ((closureN)self_7313820)->elements[2]);; 
-+list_2_type local_7322272; 
-+return_closcall6(data,  car(((closureN)self_7312574)->elements[3]),  k_736219, Cyc_cdr(data, ((closureN)self_7312574)->elements[4]), Cyc_fast_list_2(&local_7322272, ((closureN)self_7312574)->elements[0], ((closureN)self_7312574)->elements[5]), ((closureN)self_7312574)->elements[1], vars_731345_733263, ((closureN)self_7312574)->elements[2]);; 
++
++
++return_direct_with_clo2(data,(closure)&c_7321923,__lambda_992,  Cyc_length(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312564)->elements[20]))), r_736097);; 
  }
  
 -static void __lambda_996(void *data, object self_7313821, int argc, object *args) /* object self_7313821, object r_736663 */
-+static void __lambda_996(void *data, object self_7312575, int argc, object *args) /* object self_7312575, object r_736218 */
++static void __lambda_992(void *data, object self_7312565, int argc, object *args) /* object self_7312565, object len_731303_733242, object _191lp_731304_733243 */
   {
 - object r_736663 = args[0];
-+ object r_736218 = args[0];
++ object len_731303_733242 = args[0]; object _191lp_731304_733243 = args[1];
    
  
  
@@ -25803,310 +26148,23 @@ Make let-values be the same as let*-values, to work around
 -
 -list_2_type local_7323549; 
 -return_closcall6(data,  car(((closureN)self_7313821)->elements[5]),  &c_7323531, Cyc_car(data, ((closureN)self_7313821)->elements[6]), Cyc_fast_list_2(&local_7323549, ((closureN)self_7313821)->elements[1], ((closureN)self_7313821)->elements[7]), ((closureN)self_7313821)->elements[3], ((closureN)self_7313821)->elements[8], r_736663);; 
-+closureN_type c_7322238;
-+object e_7322250 [4];
-+c_7322238.hdr.mark = gc_color_red;
-+ c_7322238.hdr.grayed = 0;
-+c_7322238.tag = closureN_tag;
-+ c_7322238.fn = (function_type)__lambda_997;
-+c_7322238.num_args = 1;
-+c_7322238.num_elements = 4;
-+c_7322238.elements = (object *)e_7322250;
-+c_7322238.elements[0] = ((closureN)self_7312575)->elements[0];
-+c_7322238.elements[1] = ((closureN)self_7312575)->elements[2];
-+c_7322238.elements[2] = ((closureN)self_7312575)->elements[4];
-+c_7322238.elements[3] = ((closureN)self_7312575)->elements[7];
-+
-+
-+
-+
-+list_2_type local_7322256; 
-+return_closcall6(data,  car(((closureN)self_7312575)->elements[5]),  &c_7322238, Cyc_car(data, ((closureN)self_7312575)->elements[6]), Cyc_fast_list_2(&local_7322256, ((closureN)self_7312575)->elements[1], ((closureN)self_7312575)->elements[7]), ((closureN)self_7312575)->elements[3], ((closureN)self_7312575)->elements[8], r_736218);; 
-+}
-+
-+static void __lambda_997(void *data, object self_7312576, int argc, object *args) /* object self_7312576, object r_736215 */
-+ {
-+ object r_736215 = args[0];
-+  
-+list_3_type local_7322243; 
-+
-+list_2_type local_7322247; 
-+return_direct_with_clo1(data,  ((closureN)self_7312576)->elements[2], (((closure)  ((closureN)self_7312576)->elements[2])->fn),  Cyc_fast_list_3(&local_7322243, ((closureN)self_7312576)->elements[0], Cyc_fast_list_2(&local_7322247, ((closureN)self_7312576)->elements[1], ((closureN)self_7312576)->elements[3]), r_736215));; 
-+}
-+
-+static void __lambda_961(void *data, object self_7312539, int argc, object *args) /* object self_7312539, object r_736212 */
-+ {
-+ object r_736212 = args[0];
-+    
-+  
-+if( (boolean_f != Cyc_is_null(Cyc_cdr(data, r_736212))) ){ 
-+  
-+closureN_type c_7321664;
-+object e_7321910 [20];
-+c_7321664.hdr.mark = gc_color_red;
-+ c_7321664.hdr.grayed = 0;
-+c_7321664.tag = closureN_tag;
-+ c_7321664.fn = (function_type)__lambda_962;
-+c_7321664.num_args = 1;
-+c_7321664.num_elements = 20;
-+c_7321664.elements = (object *)e_7321910;
-+c_7321664.elements[0] = ((closureN)self_7312539)->elements[2];
-+c_7321664.elements[1] = ((closureN)self_7312539)->elements[3];
-+c_7321664.elements[2] = ((closureN)self_7312539)->elements[4];
-+c_7321664.elements[3] = ((closureN)self_7312539)->elements[5];
-+c_7321664.elements[4] = ((closureN)self_7312539)->elements[8];
-+c_7321664.elements[5] = ((closureN)self_7312539)->elements[11];
-+c_7321664.elements[6] = ((closureN)self_7312539)->elements[12];
-+c_7321664.elements[7] = ((closureN)self_7312539)->elements[14];
-+c_7321664.elements[8] = ((closureN)self_7312539)->elements[15];
-+c_7321664.elements[9] = ((closureN)self_7312539)->elements[16];
-+c_7321664.elements[10] = ((closureN)self_7312539)->elements[18];
-+c_7321664.elements[11] = ((closureN)self_7312539)->elements[19];
-+c_7321664.elements[12] = ((closureN)self_7312539)->elements[21];
-+c_7321664.elements[13] = ((closureN)self_7312539)->elements[23];
-+c_7321664.elements[14] = ((closureN)self_7312539)->elements[24];
-+c_7321664.elements[15] = ((closureN)self_7312539)->elements[25];
-+c_7321664.elements[16] = ((closureN)self_7312539)->elements[26];
-+c_7321664.elements[17] = ((closureN)self_7312539)->elements[27];
-+c_7321664.elements[18] = ((closureN)self_7312539)->elements[28];
-+c_7321664.elements[19] = ((closureN)self_7312539)->elements[29];
-+
-+
-+
-+return_direct_with_clo2(data,  __glo_identifier_127_scheme_base, (((closure)  __glo_identifier_127_scheme_base)->fn),  &c_7321664, Cyc_car(data, ((closureN)self_7312539)->elements[27]));
-+} else { 
-+  
-+closureN_type c_7321915;
-+object e_7322210 [24];
-+c_7321915.hdr.mark = gc_color_red;
-+ c_7321915.hdr.grayed = 0;
-+c_7321915.tag = closureN_tag;
-+ c_7321915.fn = (function_type)__lambda_988;
-+c_7321915.num_args = 1;
-+c_7321915.num_elements = 24;
-+c_7321915.elements = (object *)e_7322210;
-+c_7321915.elements[0] = ((closureN)self_7312539)->elements[0];
-+c_7321915.elements[1] = ((closureN)self_7312539)->elements[1];
-+c_7321915.elements[2] = ((closureN)self_7312539)->elements[2];
-+c_7321915.elements[3] = ((closureN)self_7312539)->elements[3];
-+c_7321915.elements[4] = ((closureN)self_7312539)->elements[4];
-+c_7321915.elements[5] = ((closureN)self_7312539)->elements[5];
-+c_7321915.elements[6] = ((closureN)self_7312539)->elements[6];
-+c_7321915.elements[7] = ((closureN)self_7312539)->elements[7];
-+c_7321915.elements[8] = ((closureN)self_7312539)->elements[8];
-+c_7321915.elements[9] = ((closureN)self_7312539)->elements[9];
-+c_7321915.elements[10] = ((closureN)self_7312539)->elements[10];
-+c_7321915.elements[11] = ((closureN)self_7312539)->elements[11];
-+c_7321915.elements[12] = ((closureN)self_7312539)->elements[13];
-+c_7321915.elements[13] = ((closureN)self_7312539)->elements[16];
-+c_7321915.elements[14] = ((closureN)self_7312539)->elements[17];
-+c_7321915.elements[15] = ((closureN)self_7312539)->elements[18];
-+c_7321915.elements[16] = ((closureN)self_7312539)->elements[21];
-+c_7321915.elements[17] = ((closureN)self_7312539)->elements[23];
-+c_7321915.elements[18] = ((closureN)self_7312539)->elements[24];
-+c_7321915.elements[19] = ((closureN)self_7312539)->elements[25];
-+c_7321915.elements[20] = ((closureN)self_7312539)->elements[26];
-+c_7321915.elements[21] = ((closureN)self_7312539)->elements[27];
-+c_7321915.elements[22] = ((closureN)self_7312539)->elements[28];
-+c_7321915.elements[23] = ((closureN)self_7312539)->elements[29];
-+
-+
-+closureN_type c_7322211;
-+object e_7322224 [2];
-+c_7322211.hdr.mark = gc_color_red;
-+ c_7322211.hdr.grayed = 0;
-+c_7322211.tag = closureN_tag;
-+ c_7322211.fn = (function_type)__lambda_994;
-+c_7322211.num_args = 1;
-+c_7322211.num_elements = 2;
-+c_7322211.elements = (object *)e_7322224;
-+c_7322211.elements[0] = ((closureN)self_7312539)->elements[20];
-+c_7322211.elements[1] = ((closureN)self_7312539)->elements[22];
-+
-+return_direct_with_clo1(data,(closure)&c_7321915,__lambda_988,  &c_7322211);}
-+;; 
-+}
-+
-+static void __lambda_994(void *data, object self_7312566, int argc, object *args) /* object self_7312566, object k_736209, object x_731301_733248 */
-+ {
-+ object k_736209 = args[0]; object x_731301_733248 = args[1];
-+  
-+closureN_type c_7322213;
-+object e_7322223 [4];
-+c_7322213.hdr.mark = gc_color_red;
-+ c_7322213.hdr.grayed = 0;
-+c_7322213.tag = closureN_tag;
-+ c_7322213.fn = (function_type)__lambda_995;
-+c_7322213.num_args = 1;
-+c_7322213.num_elements = 4;
-+c_7322213.elements = (object *)e_7322223;
-+c_7322213.elements[0] = ((closureN)self_7312566)->elements[0];
-+c_7322213.elements[1] = ((closureN)self_7312566)->elements[1];
-+c_7322213.elements[2] = k_736209;
-+c_7322213.elements[3] = x_731301_733248;
-+
-+return_direct_with_clo2(data,  __glo_identifier_127_scheme_base, (((closure)  __glo_identifier_127_scheme_base)->fn),  &c_7322213, x_731301_733248);; 
-+}
-+
-+static void __lambda_995(void *data, object self_7312567, int argc, object *args) /* object self_7312567, object r_736210 */
-+ {
-+ object r_736210 = args[0];
-+  if( (boolean_f != r_736210) ){ 
-+  
-+
-+return_closcall3(data,  ((closureN)self_7312567)->elements[0],  ((closureN)self_7312567)->elements[2], ((closureN)self_7312567)->elements[3], car(((closureN)self_7312567)->elements[1]));
-+} else { 
-+  return_direct_with_clo1(data,  ((closureN)self_7312567)->elements[2], (((closure)  ((closureN)self_7312567)->elements[2])->fn),  boolean_f);}
-+;; 
-+}
-+
-+static void __lambda_988(void *data, object self_7312568, int argc, object *args) /* object self_7312568, object r_736207 */
-+ {
-+ object r_736207 = args[0];
-+  
-+closureN_type c_7321917;
-+object e_7322206 [25];
-+c_7321917.hdr.mark = gc_color_red;
-+ c_7321917.hdr.grayed = 0;
-+c_7321917.tag = closureN_tag;
-+ c_7321917.fn = (function_type)__lambda_989;
-+c_7321917.num_args = 1;
-+c_7321917.num_elements = 25;
-+c_7321917.elements = (object *)e_7322206;
-+c_7321917.elements[0] = ((closureN)self_7312568)->elements[0];
-+c_7321917.elements[1] = ((closureN)self_7312568)->elements[1];
-+c_7321917.elements[2] = ((closureN)self_7312568)->elements[2];
-+c_7321917.elements[3] = ((closureN)self_7312568)->elements[3];
-+c_7321917.elements[4] = ((closureN)self_7312568)->elements[4];
-+c_7321917.elements[5] = ((closureN)self_7312568)->elements[5];
-+c_7321917.elements[6] = ((closureN)self_7312568)->elements[6];
-+c_7321917.elements[7] = ((closureN)self_7312568)->elements[7];
-+c_7321917.elements[8] = ((closureN)self_7312568)->elements[8];
-+c_7321917.elements[9] = ((closureN)self_7312568)->elements[9];
-+c_7321917.elements[10] = ((closureN)self_7312568)->elements[10];
-+c_7321917.elements[11] = ((closureN)self_7312568)->elements[11];
-+c_7321917.elements[12] = ((closureN)self_7312568)->elements[12];
-+c_7321917.elements[13] = ((closureN)self_7312568)->elements[13];
-+c_7321917.elements[14] = ((closureN)self_7312568)->elements[14];
-+c_7321917.elements[15] = ((closureN)self_7312568)->elements[15];
-+c_7321917.elements[16] = ((closureN)self_7312568)->elements[16];
-+c_7321917.elements[17] = ((closureN)self_7312568)->elements[17];
-+c_7321917.elements[18] = ((closureN)self_7312568)->elements[18];
-+c_7321917.elements[19] = ((closureN)self_7312568)->elements[19];
-+c_7321917.elements[20] = ((closureN)self_7312568)->elements[20];
-+c_7321917.elements[21] = ((closureN)self_7312568)->elements[21];
-+c_7321917.elements[22] = r_736207;
-+c_7321917.elements[23] = ((closureN)self_7312568)->elements[22];
-+c_7321917.elements[24] = ((closureN)self_7312568)->elements[23];
-+
-+
-+
-+return_direct_with_clo1(data,(closure)&c_7321917,__lambda_989,  Cyc_cddr(data, ((closureN)self_7312568)->elements[21]));; 
-+}
-+
-+static void __lambda_989(void *data, object self_7312569, int argc, object *args) /* object self_7312569, object r_736208 */
-+ {
-+ object r_736208 = args[0];
-+  
-+closureN_type c_7321919;
-+object e_7322204 [24];
-+c_7321919.hdr.mark = gc_color_red;
-+ c_7321919.hdr.grayed = 0;
-+c_7321919.tag = closureN_tag;
-+ c_7321919.fn = (function_type)__lambda_990;
-+c_7321919.num_args = 1;
-+c_7321919.num_elements = 24;
-+c_7321919.elements = (object *)e_7322204;
-+c_7321919.elements[0] = ((closureN)self_7312569)->elements[0];
-+c_7321919.elements[1] = ((closureN)self_7312569)->elements[1];
-+c_7321919.elements[2] = ((closureN)self_7312569)->elements[2];
-+c_7321919.elements[3] = ((closureN)self_7312569)->elements[3];
-+c_7321919.elements[4] = ((closureN)self_7312569)->elements[4];
-+c_7321919.elements[5] = ((closureN)self_7312569)->elements[5];
-+c_7321919.elements[6] = ((closureN)self_7312569)->elements[6];
-+c_7321919.elements[7] = ((closureN)self_7312569)->elements[7];
-+c_7321919.elements[8] = ((closureN)self_7312569)->elements[8];
-+c_7321919.elements[9] = ((closureN)self_7312569)->elements[9];
-+c_7321919.elements[10] = ((closureN)self_7312569)->elements[10];
-+c_7321919.elements[11] = ((closureN)self_7312569)->elements[11];
-+c_7321919.elements[12] = ((closureN)self_7312569)->elements[12];
-+c_7321919.elements[13] = ((closureN)self_7312569)->elements[13];
-+c_7321919.elements[14] = ((closureN)self_7312569)->elements[14];
-+c_7321919.elements[15] = ((closureN)self_7312569)->elements[15];
-+c_7321919.elements[16] = ((closureN)self_7312569)->elements[16];
-+c_7321919.elements[17] = ((closureN)self_7312569)->elements[17];
-+c_7321919.elements[18] = ((closureN)self_7312569)->elements[18];
-+c_7321919.elements[19] = ((closureN)self_7312569)->elements[19];
-+c_7321919.elements[20] = ((closureN)self_7312569)->elements[20];
-+c_7321919.elements[21] = ((closureN)self_7312569)->elements[21];
-+c_7321919.elements[22] = ((closureN)self_7312569)->elements[23];
-+c_7321919.elements[23] = ((closureN)self_7312569)->elements[24];
-+
-+return_direct_with_clo3(data,  __glo_any_scheme_base, (((closure)  __glo_any_scheme_base)->fn),  &c_7321919, ((closureN)self_7312569)->elements[22], r_736208);; 
- }
- 
+-}
+-
 -static void __lambda_997(void *data, object self_7313822, int argc, object *args) /* object self_7313822, object r_736660 */
-+static void __lambda_990(void *data, object self_7312570, int argc, object *args) /* object self_7312570, object r_736102 */
-  {
+- {
 - object r_736660 = args[0];
-+ object r_736102 = args[0];
-+  if( (boolean_f != r_736102) ){ 
-   
+-  
 -list_3_type local_7323536; 
-+make_utf8_string_with_len(c_7321922, "multiple ellipses", 17, 17);
-+return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_7312570)->elements[18], &c_7321922, ((closureN)self_7312570)->elements[21]);
-+} else { 
-+  
-+
-+
-+closureN_type c_7321928;
-+object e_7322202 [23];
-+c_7321928.hdr.mark = gc_color_red;
-+ c_7321928.hdr.grayed = 0;
-+c_7321928.tag = closureN_tag;
-+ c_7321928.fn = (function_type)__lambda_991;
-+c_7321928.num_args = 1;
-+c_7321928.num_elements = 23;
-+c_7321928.elements = (object *)e_7322202;
-+c_7321928.elements[0] = ((closureN)self_7312570)->elements[0];
-+c_7321928.elements[1] = ((closureN)self_7312570)->elements[1];
-+c_7321928.elements[2] = ((closureN)self_7312570)->elements[2];
-+c_7321928.elements[3] = ((closureN)self_7312570)->elements[3];
-+c_7321928.elements[4] = ((closureN)self_7312570)->elements[4];
-+c_7321928.elements[5] = ((closureN)self_7312570)->elements[5];
-+c_7321928.elements[6] = ((closureN)self_7312570)->elements[6];
-+c_7321928.elements[7] = ((closureN)self_7312570)->elements[7];
-+c_7321928.elements[8] = ((closureN)self_7312570)->elements[8];
-+c_7321928.elements[9] = ((closureN)self_7312570)->elements[9];
-+c_7321928.elements[10] = ((closureN)self_7312570)->elements[10];
-+c_7321928.elements[11] = ((closureN)self_7312570)->elements[11];
-+c_7321928.elements[12] = ((closureN)self_7312570)->elements[12];
-+c_7321928.elements[13] = ((closureN)self_7312570)->elements[13];
-+c_7321928.elements[14] = ((closureN)self_7312570)->elements[14];
-+c_7321928.elements[15] = ((closureN)self_7312570)->elements[15];
-+c_7321928.elements[16] = ((closureN)self_7312570)->elements[16];
-+c_7321928.elements[17] = ((closureN)self_7312570)->elements[17];
-+c_7321928.elements[18] = ((closureN)self_7312570)->elements[18];
-+c_7321928.elements[19] = ((closureN)self_7312570)->elements[19];
-+c_7321928.elements[20] = ((closureN)self_7312570)->elements[21];
-+c_7321928.elements[21] = ((closureN)self_7312570)->elements[22];
-+c_7321928.elements[22] = ((closureN)self_7312570)->elements[23];
-+
- 
+-
 -list_2_type local_7323540; 
 -return_direct_with_clo1(data,  ((closureN)self_7313822)->elements[2], (((closure)  ((closureN)self_7313822)->elements[2])->fn),  Cyc_fast_list_3(&local_7323536, ((closureN)self_7313822)->elements[0], Cyc_fast_list_2(&local_7323540, ((closureN)self_7313822)->elements[1], ((closureN)self_7313822)->elements[3]), r_736660));; 
-+make_utf8_string_with_len(c_7322203, "lp.", 3, 3);
-+return_closcall2(data,  car(((closureN)self_7312570)->elements[20]),  &c_7321928, &c_7322203);}
-+;; 
- }
- 
+-}
+-
 -static void __lambda_961(void *data, object self_7313785, int argc, object *args) /* object self_7313785, object r_736657 */
-+static void __lambda_991(void *data, object self_7312571, int argc, object *args) /* object self_7312571, object r_736104 */
-  {
+- {
 - object r_736657 = args[0];
 -    
-+ object r_736104 = args[0];
-   
+-  
 -if( (boolean_f != Cyc_is_null(Cyc_cdr(data, r_736657))) ){ 
 -  
 -closureN_type c_7322957;
@@ -26138,41 +26196,9 @@ Make let-values be the same as let*-values, to work around
 -c_7322957.elements[17] = ((closureN)self_7313785)->elements[27];
 -c_7322957.elements[18] = ((closureN)self_7313785)->elements[28];
 -c_7322957.elements[19] = ((closureN)self_7313785)->elements[29];
-+closureN_type c_7321930;
-+object e_7322194 [23];
-+c_7321930.hdr.mark = gc_color_red;
-+ c_7321930.hdr.grayed = 0;
-+c_7321930.tag = closureN_tag;
-+ c_7321930.fn = (function_type)__lambda_992;
-+c_7321930.num_args = 2;
-+c_7321930.num_elements = 23;
-+c_7321930.elements = (object *)e_7322194;
-+c_7321930.elements[0] = ((closureN)self_7312571)->elements[0];
-+c_7321930.elements[1] = ((closureN)self_7312571)->elements[1];
-+c_7321930.elements[2] = ((closureN)self_7312571)->elements[2];
-+c_7321930.elements[3] = ((closureN)self_7312571)->elements[3];
-+c_7321930.elements[4] = ((closureN)self_7312571)->elements[4];
-+c_7321930.elements[5] = ((closureN)self_7312571)->elements[5];
-+c_7321930.elements[6] = ((closureN)self_7312571)->elements[6];
-+c_7321930.elements[7] = ((closureN)self_7312571)->elements[7];
-+c_7321930.elements[8] = ((closureN)self_7312571)->elements[8];
-+c_7321930.elements[9] = ((closureN)self_7312571)->elements[9];
-+c_7321930.elements[10] = ((closureN)self_7312571)->elements[10];
-+c_7321930.elements[11] = ((closureN)self_7312571)->elements[11];
-+c_7321930.elements[12] = ((closureN)self_7312571)->elements[12];
-+c_7321930.elements[13] = ((closureN)self_7312571)->elements[13];
-+c_7321930.elements[14] = ((closureN)self_7312571)->elements[14];
-+c_7321930.elements[15] = ((closureN)self_7312571)->elements[15];
-+c_7321930.elements[16] = ((closureN)self_7312571)->elements[16];
-+c_7321930.elements[17] = ((closureN)self_7312571)->elements[17];
-+c_7321930.elements[18] = ((closureN)self_7312571)->elements[18];
-+c_7321930.elements[19] = ((closureN)self_7312571)->elements[19];
-+c_7321930.elements[20] = ((closureN)self_7312571)->elements[20];
-+c_7321930.elements[21] = ((closureN)self_7312571)->elements[21];
-+c_7321930.elements[22] = ((closureN)self_7312571)->elements[22];
- 
- 
- 
+-
+-
+-
 -return_direct_with_clo2(data,  __glo_identifier_127_scheme_base, (((closure)  __glo_identifier_127_scheme_base)->fn),  &c_7322957, Cyc_car(data, ((closureN)self_7313785)->elements[27]));
 -} else { 
 -  
@@ -26209,8 +26235,8 @@ Make let-values be the same as let*-values, to work around
 -c_7323208.elements[21] = ((closureN)self_7313785)->elements[27];
 -c_7323208.elements[22] = ((closureN)self_7313785)->elements[28];
 -c_7323208.elements[23] = ((closureN)self_7313785)->elements[29];
- 
- 
+-
+-
 -closureN_type c_7323504;
 -object e_7323517 [2];
 -c_7323504.hdr.mark = gc_color_red;
@@ -26222,19 +26248,15 @@ Make let-values be the same as let*-values, to work around
 -c_7323504.elements = (object *)e_7323517;
 -c_7323504.elements[0] = ((closureN)self_7313785)->elements[20];
 -c_7323504.elements[1] = ((closureN)self_7313785)->elements[22];
- 
+-
 -return_direct_with_clo1(data,(closure)&c_7323208,__lambda_988,  &c_7323504);}
 -;; 
-+
-+return_direct_with_clo2(data,(closure)&c_7321930,__lambda_992,  Cyc_length(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312571)->elements[20]))), r_736104);; 
- }
- 
+-}
+-
 -static void __lambda_994(void *data, object self_7313812, int argc, object *args) /* object self_7313812, object k_736654, object x_731300_733588 */
-+static void __lambda_992(void *data, object self_7312572, int argc, object *args) /* object self_7312572, object len_731304_733249, object _191lp_731305_733250 */
-  {
+- {
 - object k_736654 = args[0]; object x_731300_733588 = args[1];
-+ object len_731304_733249 = args[0]; object _191lp_731305_733250 = args[1];
-   
+-  
 -closureN_type c_7323506;
 -object e_7323516 [4];
 -c_7323506.hdr.mark = gc_color_red;
@@ -26248,49 +26270,22 @@ Make let-values be the same as let*-values, to work around
 -c_7323506.elements[1] = ((closureN)self_7313812)->elements[1];
 -c_7323506.elements[2] = k_736654;
 -c_7323506.elements[3] = x_731300_733588;
- 
+-
 -return_direct_with_clo2(data,  __glo_identifier_127_scheme_base, (((closure)  __glo_identifier_127_scheme_base)->fn),  &c_7323506, x_731300_733588);; 
 -}
- 
+-
 -static void __lambda_995(void *data, object self_7313813, int argc, object *args) /* object self_7313813, object r_736655 */
 - {
 - object r_736655 = args[0];
 -  if( (boolean_f != r_736655) ){ 
 -  
-+closureN_type c_7321935;
-+object e_7322131 [18];
-+c_7321935.hdr.mark = gc_color_red;
-+ c_7321935.hdr.grayed = 0;
-+c_7321935.tag = closureN_tag;
-+ c_7321935.fn = (function_type)__lambda_993;
-+c_7321935.num_args = 1;
-+c_7321935.num_elements = 18;
-+c_7321935.elements = (object *)e_7322131;
-+c_7321935.elements[0] = ((closureN)self_7312572)->elements[0];
-+c_7321935.elements[1] = ((closureN)self_7312572)->elements[1];
-+c_7321935.elements[2] = ((closureN)self_7312572)->elements[2];
-+c_7321935.elements[3] = ((closureN)self_7312572)->elements[3];
-+c_7321935.elements[4] = ((closureN)self_7312572)->elements[4];
-+c_7321935.elements[5] = ((closureN)self_7312572)->elements[6];
-+c_7321935.elements[6] = ((closureN)self_7312572)->elements[7];
-+c_7321935.elements[7] = ((closureN)self_7312572)->elements[8];
-+c_7321935.elements[8] = ((closureN)self_7312572)->elements[9];
-+c_7321935.elements[9] = ((closureN)self_7312572)->elements[10];
-+c_7321935.elements[10] = ((closureN)self_7312572)->elements[11];
-+c_7321935.elements[11] = _191lp_731305_733250;
-+c_7321935.elements[12] = ((closureN)self_7312572)->elements[12];
-+c_7321935.elements[13] = ((closureN)self_7312572)->elements[13];
-+c_7321935.elements[14] = ((closureN)self_7312572)->elements[14];
-+c_7321935.elements[15] = ((closureN)self_7312572)->elements[18];
-+c_7321935.elements[16] = len_731304_733249;
-+c_7321935.elements[17] = ((closureN)self_7312572)->elements[21];
- 
+-
 -return_closcall3(data,  ((closureN)self_7313813)->elements[0],  ((closureN)self_7313813)->elements[2], ((closureN)self_7313813)->elements[3], car(((closureN)self_7313813)->elements[1]));
 -} else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7313813)->elements[2], (((closure)  ((closureN)self_7313813)->elements[2])->fn),  boolean_f);}
 -;; 
 -}
- 
+-
 -static void __lambda_988(void *data, object self_7313814, int argc, object *args) /* object self_7313814, object r_736652 */
 - {
 - object r_736652 = args[0];
@@ -26329,14 +26324,12 @@ Make let-values be the same as let*-values, to work around
 -c_7323210.elements[22] = r_736652;
 -c_7323210.elements[23] = ((closureN)self_7313814)->elements[22];
 -c_7323210.elements[24] = ((closureN)self_7313814)->elements[23];
-+pair_type local_7322134; 
- 
- 
- 
+-
+-
+-
 -return_direct_with_clo1(data,(closure)&c_7323210,__lambda_989,  Cyc_cddr(data, ((closureN)self_7313814)->elements[21]));; 
 -}
-+pair_type local_7322140; 
- 
+-
 -static void __lambda_989(void *data, object self_7313815, int argc, object *args) /* object self_7313815, object r_736653 */
 - {
 - object r_736653 = args[0];
@@ -26374,11 +26367,10 @@ Make let-values be the same as let*-values, to work around
 -c_7323212.elements[21] = ((closureN)self_7313815)->elements[21];
 -c_7323212.elements[22] = ((closureN)self_7313815)->elements[23];
 -c_7323212.elements[23] = ((closureN)self_7313815)->elements[24];
-+pair_type local_7322143; 
- 
+-
 -return_direct_with_clo3(data,  __glo_any_scheme_base, (((closure)  __glo_any_scheme_base)->fn),  &c_7323212, ((closureN)self_7313815)->elements[22], r_736653);; 
 -}
- 
+-
 -static void __lambda_990(void *data, object self_7313816, int argc, object *args) /* object self_7313816, object r_736547 */
 - {
 - object r_736547 = args[0];
@@ -26388,9 +26380,8 @@ Make let-values be the same as let*-values, to work around
 -return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_7313816)->elements[18], &c_7323215, ((closureN)self_7313816)->elements[21]);
 -} else { 
 -  
- 
-+pair_type local_7322149; 
- 
+-
+-
 -closureN_type c_7323221;
 -object e_7323495 [23];
 -c_7323221.hdr.mark = gc_color_red;
@@ -26423,13 +26414,13 @@ Make let-values be the same as let*-values, to work around
 -c_7323221.elements[20] = ((closureN)self_7313816)->elements[21];
 -c_7323221.elements[21] = ((closureN)self_7313816)->elements[22];
 -c_7323221.elements[22] = ((closureN)self_7313816)->elements[23];
- 
- 
+-
+-
 -make_utf8_string_with_len(c_7323496, "lp.", 3, 3);
 -return_closcall2(data,  car(((closureN)self_7313816)->elements[20]),  &c_7323221, &c_7323496);}
 -;; 
 -}
- 
+-
 -static void __lambda_991(void *data, object self_7313817, int argc, object *args) /* object self_7313817, object r_736549 */
 - {
 - object r_736549 = args[0];
@@ -26466,40 +26457,22 @@ Make let-values be the same as let*-values, to work around
 -c_7323223.elements[20] = ((closureN)self_7313817)->elements[20];
 -c_7323223.elements[21] = ((closureN)self_7313817)->elements[21];
 -c_7323223.elements[22] = ((closureN)self_7313817)->elements[22];
- 
-+pair_type local_7322157; 
-+
-+pair_type local_7322161; 
-+
-+pair_type local_7322165; 
-+
-+pair_type local_7322168; 
- 
-+pair_type local_7322172; 
- 
-+pair_type local_7322175; 
- 
-+pair_type local_7322179; 
- 
-+pair_type local_7322183; 
- 
-+pair_type local_7322186; 
- 
+-
+-
+-
+-
+-
+-
+-
 -return_direct_with_clo2(data,(closure)&c_7323223,__lambda_992,  Cyc_length(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313817)->elements[20]))), r_736549);; 
-+pair_type local_7322190; 
-+return_closcall6(data,  car(((closureN)self_7312572)->elements[19]),  &c_7321935, set_pair_as_expr(&local_7322134, Cyc_cddr(data, ((closureN)self_7312572)->elements[20]), set_pair_as_expr(&local_7322140, set_pair_as_expr(&local_7322143, Cyc_car(data, ((closureN)self_7312572)->elements[20]), set_pair_as_expr(&local_7322149, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312572)->elements[20])), NULL)), NULL)), set_pair_as_expr(&local_7322157, ((closureN)self_7312572)->elements[5], set_pair_as_expr(&local_7322161, ((closureN)self_7312572)->elements[12], set_pair_as_expr(&local_7322165, set_pair_as_expr(&local_7322168, ((closureN)self_7312572)->elements[5], set_pair_as_expr(&local_7322172, set_pair_as_expr(&local_7322175, ((closureN)self_7312572)->elements[15], set_pair_as_expr(&local_7322179, ((closureN)self_7312572)->elements[14], NULL)), set_pair_as_expr(&local_7322183, set_pair_as_expr(&local_7322186, ((closureN)self_7312572)->elements[13], set_pair_as_expr(&local_7322190, N
ULL, NULL)), NULL))), NULL))), ((closureN)self_7312572)->elements[16], ((closureN)self_7312572)->elements[22], ((closureN)self_7312572)->elements[17]);; 
- }
- 
+-}
+-
 -static void __lambda_992(void *data, object self_7313818, int argc, object *args) /* object self_7313818, object len_731303_733589, object _191lp_731304_733590 */
-+static void __lambda_993(void *data, object self_7312573, int argc, object *args) /* object self_7312573, object r_736124 */
-  {
+- {
 - object len_731303_733589 = args[0]; object _191lp_731304_733590 = args[1];
-+ object r_736124 = args[0];
-   
-+pair_type local_7321940; 
- 
-+pair_type local_7321944; 
- 
+-  
+-
+-
 -closureN_type c_7323228;
 -object e_7323424 [18];
 -c_7323228.hdr.mark = gc_color_red;
@@ -26527,584 +26500,266 @@ Make let-values be the same as let*-values, to work around
 -c_7323228.elements[15] = ((closureN)self_7313818)->elements[18];
 -c_7323228.elements[16] = len_731303_733589;
 -c_7323228.elements[17] = ((closureN)self_7313818)->elements[21];
-+pair_type local_7321947; 
++closureN_type c_7321928;
++object e_7322124 [18];
++c_7321928.hdr.mark = gc_color_red;
++ c_7321928.hdr.grayed = 0;
++c_7321928.tag = closureN_tag;
++ c_7321928.fn = (function_type)__lambda_993;
++c_7321928.num_args = 1;
++c_7321928.num_elements = 18;
++c_7321928.elements = (object *)e_7322124;
++c_7321928.elements[0] = ((closureN)self_7312565)->elements[0];
++c_7321928.elements[1] = ((closureN)self_7312565)->elements[1];
++c_7321928.elements[2] = ((closureN)self_7312565)->elements[2];
++c_7321928.elements[3] = ((closureN)self_7312565)->elements[3];
++c_7321928.elements[4] = ((closureN)self_7312565)->elements[4];
++c_7321928.elements[5] = ((closureN)self_7312565)->elements[6];
++c_7321928.elements[6] = ((closureN)self_7312565)->elements[7];
++c_7321928.elements[7] = ((closureN)self_7312565)->elements[8];
++c_7321928.elements[8] = ((closureN)self_7312565)->elements[9];
++c_7321928.elements[9] = ((closureN)self_7312565)->elements[10];
++c_7321928.elements[10] = ((closureN)self_7312565)->elements[11];
++c_7321928.elements[11] = _191lp_731304_733243;
++c_7321928.elements[12] = ((closureN)self_7312565)->elements[12];
++c_7321928.elements[13] = ((closureN)self_7312565)->elements[13];
++c_7321928.elements[14] = ((closureN)self_7312565)->elements[14];
++c_7321928.elements[15] = ((closureN)self_7312565)->elements[18];
++c_7321928.elements[16] = len_731303_733242;
++c_7321928.elements[17] = ((closureN)self_7312565)->elements[21];
  
-+pair_type local_7321950; 
  
 -pair_type local_7323427; 
-+pair_type local_7321954; 
++pair_type local_7322127; 
  
-+pair_type local_7321957; 
  
-+pair_type local_7321961; 
  
 -pair_type local_7323433; 
-+pair_type local_7321965; 
++pair_type local_7322133; 
  
 -pair_type local_7323436; 
-+pair_type local_7321968; 
++pair_type local_7322136; 
  
-+pair_type local_7321972; 
  
-+pair_type local_7321975; 
  
 -pair_type local_7323442; 
-+pair_type local_7321979; 
++pair_type local_7322142; 
  
-+pair_type local_7321983; 
  
-+pair_type local_7321987; 
  
-+pair_type local_7321990; 
  
-+pair_type local_7321994; 
  
 -pair_type local_7323450; 
-+pair_type local_7321998; 
++pair_type local_7322150; 
  
 -pair_type local_7323454; 
-+pair_type local_7322001; 
++pair_type local_7322154; 
  
 -pair_type local_7323458; 
-+pair_type local_7322004; 
++pair_type local_7322158; 
  
 -pair_type local_7323461; 
-+pair_type local_7322008; 
++pair_type local_7322161; 
  
 -pair_type local_7323465; 
-+pair_type local_7322012; 
++pair_type local_7322165; 
  
 -pair_type local_7323468; 
-+pair_type local_7322015; 
++pair_type local_7322168; 
  
 -pair_type local_7323472; 
-+pair_type local_7322019; 
++pair_type local_7322172; 
  
 -pair_type local_7323476; 
-+pair_type local_7322022; 
++pair_type local_7322176; 
  
 -pair_type local_7323479; 
-+pair_type local_7322026; 
++pair_type local_7322179; 
  
 -pair_type local_7323483; 
 -return_closcall6(data,  car(((closureN)self_7313818)->elements[19]),  &c_7323228, set_pair_as_expr(&local_7323427, Cyc_cddr(data, ((closureN)self_7313818)->elements[20]), set_pair_as_expr(&local_7323433, set_pair_as_expr(&local_7323436, Cyc_car(data, ((closureN)self_7313818)->elements[20]), set_pair_as_expr(&local_7323442, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7313818)->elements[20])), NULL)), NULL)), set_pair_as_expr(&local_7323450, ((closureN)self_7313818)->elements[5], set_pair_as_expr(&local_7323454, ((closureN)self_7313818)->elements[12], set_pair_as_expr(&local_7323458, set_pair_as_expr(&local_7323461, ((closureN)self_7313818)->elements[5], set_pair_as_expr(&local_7323465, set_pair_as_expr(&local_7323468, ((closureN)self_7313818)->elements[15], set_pair_as_expr(&local_7323472, ((closureN)self_7313818)->elements[14], NULL)), set_pair_as_expr(&local_7323476, set_pair_as_expr(&local_7323479, ((closureN)self_7313818)->elements[13], set_pair_as_expr(&local_7323483, N
ULL, NULL)), NULL))), NULL))), ((closureN)self_7313818)->elements[16], ((closureN)self_7313818)->elements[22], ((closureN)self_7313818)->elements[17]);; 
--}
-+pair_type local_7322030; 
++pair_type local_7322183; 
++return_closcall6(data,  car(((closureN)self_7312565)->elements[19]),  &c_7321928, set_pair_as_expr(&local_7322127, Cyc_cddr(data, ((closureN)self_7312565)->elements[20]), set_pair_as_expr(&local_7322133, set_pair_as_expr(&local_7322136, Cyc_car(data, ((closureN)self_7312565)->elements[20]), set_pair_as_expr(&local_7322142, Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312565)->elements[20])), NULL)), NULL)), set_pair_as_expr(&local_7322150, ((closureN)self_7312565)->elements[5], set_pair_as_expr(&local_7322154, ((closureN)self_7312565)->elements[12], set_pair_as_expr(&local_7322158, set_pair_as_expr(&local_7322161, ((closureN)self_7312565)->elements[5], set_pair_as_expr(&local_7322165, set_pair_as_expr(&local_7322168, ((closureN)self_7312565)->elements[15], set_pair_as_expr(&local_7322172, ((closureN)self_7312565)->elements[14], NULL)), set_pair_as_expr(&local_7322176, set_pair_as_expr(&local_7322179, ((closureN)self_7312565)->elements[13], set_pair_as_expr(&local_7322183, N
ULL, NULL)), NULL))), NULL))), ((closureN)self_7312565)->elements[16], ((closureN)self_7312565)->elements[22], ((closureN)self_7312565)->elements[17]);; 
+ }
  
 -static void __lambda_993(void *data, object self_7313819, int argc, object *args) /* object self_7313819, object r_736569 */
-- {
++static void __lambda_993(void *data, object self_7312566, int argc, object *args) /* object self_7312566, object r_736117 */
+  {
 - object r_736569 = args[0];
--  
++ object r_736117 = args[0];
+   
 -pair_type local_7323233; 
-+pair_type local_7322034; 
++pair_type local_7321933; 
  
 -pair_type local_7323237; 
-+pair_type local_7322037; 
++pair_type local_7321937; 
  
 -pair_type local_7323240; 
-+pair_type local_7322041; 
++pair_type local_7321940; 
  
 -pair_type local_7323243; 
-+pair_type local_7322044; 
++pair_type local_7321943; 
  
 -pair_type local_7323247; 
-+pair_type local_7322048; 
++pair_type local_7321947; 
  
 -pair_type local_7323250; 
-+pair_type local_7322051; 
++pair_type local_7321950; 
  
 -pair_type local_7323254; 
-+pair_type local_7322054; 
++pair_type local_7321954; 
  
 -pair_type local_7323258; 
-+pair_type local_7322058; 
++pair_type local_7321958; 
  
 -pair_type local_7323261; 
-+pair_type local_7322061; 
++pair_type local_7321961; 
  
 -pair_type local_7323265; 
-+pair_type local_7322065; 
++pair_type local_7321965; 
  
 -pair_type local_7323268; 
-+pair_type local_7322068; 
++pair_type local_7321968; 
  
 -pair_type local_7323272; 
-+pair_type local_7322072; 
++pair_type local_7321972; 
  
 -pair_type local_7323276; 
-+pair_type local_7322075; 
++pair_type local_7321976; 
  
 -pair_type local_7323280; 
-+pair_type local_7322078; 
++pair_type local_7321980; 
  
 -pair_type local_7323283; 
-+pair_type local_7322082; 
++pair_type local_7321983; 
  
 -pair_type local_7323287; 
-+pair_type local_7322085; 
++pair_type local_7321987; 
  
 -pair_type local_7323291; 
-+pair_type local_7322089; 
++pair_type local_7321991; 
  
 -pair_type local_7323294; 
-+pair_type local_7322093; 
++pair_type local_7321994; 
  
 -pair_type local_7323297; 
-+pair_type local_7322096; 
++pair_type local_7321997; 
  
 -pair_type local_7323301; 
-+pair_type local_7322100; 
++pair_type local_7322001; 
  
 -pair_type local_7323305; 
-+pair_type local_7322104; 
++pair_type local_7322005; 
  
 -pair_type local_7323308; 
-+pair_type local_7322107; 
++pair_type local_7322008; 
  
 -pair_type local_7323312; 
-+pair_type local_7322110; 
++pair_type local_7322012; 
  
 -pair_type local_7323315; 
-+pair_type local_7322114; 
++pair_type local_7322015; 
  
 -pair_type local_7323319; 
-+pair_type local_7322117; 
++pair_type local_7322019; 
  
 -pair_type local_7323323; 
-+pair_type local_7322121; 
++pair_type local_7322023; 
  
 -pair_type local_7323327; 
-+pair_type local_7322125; 
++pair_type local_7322027; 
  
 -pair_type local_7323330; 
-+pair_type local_7322129; 
-+return_direct_with_clo1(data,  ((closureN)self_7312573)->elements[15], (((closure)  ((closureN)self_7312573)->elements[15])->fn),  set_pair_as_expr(&local_7321940, ((closureN)self_7312573)->elements[10], set_pair_as_expr(&local_7321944, set_pair_as_expr(&local_7321947, set_pair_as_expr(&local_7321950, ((closureN)self_7312573)->elements[8], set_pair_as_expr(&local_7321954, set_pair_as_expr(&local_7321957, ((closureN)self_7312573)->elements[9], set_pair_as_expr(&local_7321961, ((closureN)self_7312573)->elements[17], NULL)), NULL)), NULL), set_pair_as_expr(&local_7321965, set_pair_as_expr(&local_7321968, ((closureN)self_7312573)->elements[2], set_pair_as_expr(&local_7321972, set_pair_as_expr(&local_7321975, ((closureN)self_7312573)->elements[1], set_pair_as_expr(&local_7321979, ((closureN)self_7312573)->elements[8], set_pair_as_expr(&local_7321983, ((closureN)self_7312573)->elements[16], NULL))), set_pair_as_expr(&local_7321987, set_pair_as_expr(&local_7321990, ((closureN)self
_7312573)->elements[10], set_pair_as_expr(&local_7321994, ((closureN)self_7312573)->elements[11], set_pair_as_expr(&local_7321998, set_pair_as_expr(&local_7322001, set_pair_as_expr(&local_7322004, ((closureN)self_7312573)->elements[12], set_pair_as_expr(&local_7322008, ((closureN)self_7312573)->elements[17], NULL)), set_pair_as_expr(&local_7322012, set_pair_as_expr(&local_7322015, ((closureN)self_7312573)->elements[6], set_pair_as_expr(&local_7322019, set_pair_as_expr(&local_7322022, ((closureN)self_7312573)->elements[0], set_pair_as_expr(&local_7322026, ((closureN)self_7312573)->elements[8], set_pair_as_expr(&local_7322030, ((closureN)self_7312573)->elements[16], NULL))), NULL)), set_pair_as_expr(&local_7322034, set_pair_as_expr(&local_7322037, ((closureN)self_7312573)->elements[14], set_pair_as_expr(&local_7322041, set_pair_as_expr(&local_7322044, ((closureN)self_7312573)->elements[13], set_pair_as_expr(&local_7322048, NULL, NULL)), NULL)), NULL))), set_pair_as_expr(&local_7322051,
  set_pair_as_expr(&local_7322054, ((closureN)self_7312573)->elements[7], set_pair_as_expr(&local_7322058, set_pair_as_expr(&local_7322061, ((closureN)self_7312573)->elements[1], set_pair_as_expr(&local_7322065, obj_int2obj(0), set_pair_as_expr(&local_7322068, ((closureN)self_7312573)->elements[6], NULL))), set_pair_as_expr(&local_7322072, r_736124, set_pair_as_expr(&local_7322075, set_pair_as_expr(&local_7322078, ((closureN)self_7312573)->elements[11], set_pair_as_expr(&local_7322082, set_pair_as_expr(&local_7322085, ((closureN)self_7312573)->elements[4], set_pair_as_expr(&local_7322089, ((closureN)self_7312573)->elements[12], NULL)), set_pair_as_expr(&local_7322093, set_pair_as_expr(&local_7322096, ((closureN)self_7312573)->elements[0], set_pair_as_expr(&local_7322100, ((closureN)self_7312573)->elements[6], set_pair_as_expr(&local_7322104, obj_int2obj(1), NULL))), set_pair_as_expr(&local_7322107, set_pair_as_expr(&local_7322110, ((closureN)self_7312573)->elements[5], set_pair_as_ex
 pr(&local_7322114, set_pair_as_expr(&local_7322117, ((closureN)self_7312573)->elements[3], set_pair_as_expr(&local_7322121, ((closureN)self_7312573)->elements[12], NULL)), set_pair_as_expr(&local_7322125, ((closureN)self_7312573)->elements[14], set_pair_as_expr(&local_7322129, ((closureN)self_7312573)->elements[12], NULL)))), NULL)))), NULL)))), NULL)))), NULL))), NULL))));; 
-+}
++pair_type local_7322030; 
  
 -pair_type local_7323334; 
-+static void __lambda_962(void *data, object self_7312540, int argc, object *args) /* object self_7312540, object r_736047 */
-+ {
-+ object r_736047 = args[0];
-+  if( (boolean_f != r_736047) ){ 
-+  
-+closureN_type c_7321667;
-+object e_7321693 [6];
-+c_7321667.hdr.mark = gc_color_red;
-+ c_7321667.hdr.grayed = 0;
-+c_7321667.tag = closureN_tag;
-+ c_7321667.fn = (function_type)__lambda_963;
-+c_7321667.num_args = 1;
-+c_7321667.num_elements = 6;
-+c_7321667.elements = (object *)e_7321693;
-+c_7321667.elements[0] = ((closureN)self_7312540)->elements[0];
-+c_7321667.elements[1] = ((closureN)self_7312540)->elements[5];
-+c_7321667.elements[2] = ((closureN)self_7312540)->elements[6];
-+c_7321667.elements[3] = ((closureN)self_7312540)->elements[14];
-+c_7321667.elements[4] = ((closureN)self_7312540)->elements[17];
-+c_7321667.elements[5] = ((closureN)self_7312540)->elements[18];
++pair_type local_7322034; 
  
 -pair_type local_7323337; 
++pair_type local_7322037; 
  
 -pair_type local_7323341; 
-+pair_type local_7321696; 
++pair_type local_7322041; 
  
 -pair_type local_7323344; 
-+pair_type local_7321699; 
++pair_type local_7322044; 
  
 -pair_type local_7323347; 
++pair_type local_7322047; 
  
 -pair_type local_7323351; 
++pair_type local_7322051; 
  
 -pair_type local_7323354; 
-+complex_num_type local_7321705; 
-+return_closcall2(data,  ((closureN)self_7312540)->elements[13],  &c_7321667, set_pair_as_expr(&local_7321696, set_pair_as_expr(&local_7321699, Cyc_car(data, ((closureN)self_7312540)->elements[17]), Cyc_fast_sum(data,&local_7321705, obj_int2obj(1), ((closureN)self_7312540)->elements[12])), ((closureN)self_7312540)->elements[19]));
-+} else { 
-+  
++pair_type local_7322054; 
  
 -pair_type local_7323358; 
++pair_type local_7322058; 
  
 -pair_type local_7323361; 
-+closureN_type c_7321712;
-+object e_7321908 [19];
-+c_7321712.hdr.mark = gc_color_red;
-+ c_7321712.hdr.grayed = 0;
-+c_7321712.tag = closureN_tag;
-+ c_7321712.fn = (function_type)__lambda_964;
-+c_7321712.num_args = 1;
-+c_7321712.num_elements = 19;
-+c_7321712.elements = (object *)e_7321908;
-+c_7321712.elements[0] = ((closureN)self_7312540)->elements[0];
-+c_7321712.elements[1] = ((closureN)self_7312540)->elements[1];
-+c_7321712.elements[2] = ((closureN)self_7312540)->elements[2];
-+c_7321712.elements[3] = ((closureN)self_7312540)->elements[3];
-+c_7321712.elements[4] = ((closureN)self_7312540)->elements[4];
-+c_7321712.elements[5] = ((closureN)self_7312540)->elements[5];
-+c_7321712.elements[6] = ((closureN)self_7312540)->elements[7];
-+c_7321712.elements[7] = ((closureN)self_7312540)->elements[8];
-+c_7321712.elements[8] = ((closureN)self_7312540)->elements[9];
-+c_7321712.elements[9] = ((closureN)self_7312540)->elements[10];
-+c_7321712.elements[10] = ((closureN)self_7312540)->elements[11];
-+c_7321712.elements[11] = ((closureN)self_7312540)->elements[12];
-+c_7321712.elements[12] = ((closureN)self_7312540)->elements[13];
-+c_7321712.elements[13] = ((closureN)self_7312540)->elements[14];
-+c_7321712.elements[14] = ((closureN)self_7312540)->elements[15];
-+c_7321712.elements[15] = ((closureN)self_7312540)->elements[16];
-+c_7321712.elements[16] = ((closureN)self_7312540)->elements[17];
-+c_7321712.elements[17] = ((closureN)self_7312540)->elements[18];
-+c_7321712.elements[18] = ((closureN)self_7312540)->elements[19];
++pair_type local_7322061; 
  
 -pair_type local_7323365; 
++pair_type local_7322065; 
  
 -pair_type local_7323368; 
-+make_utf8_string_with_len(c_7321909, "w.", 2, 2);
-+return_closcall2(data,  car(((closureN)self_7312540)->elements[16]),  &c_7321712, &c_7321909);}
-+;; 
-+}
++pair_type local_7322068; 
  
 -pair_type local_7323371; 
-+static void __lambda_964(void *data, object self_7312542, int argc, object *args) /* object self_7312542, object w_731321_733251 */
-+ {
-+ object w_731321_733251 = args[0];
-+  
++pair_type local_7322071; 
  
 -pair_type local_7323375; 
++pair_type local_7322075; 
  
 -pair_type local_7323378; 
-+closureN_type c_7321717;
-+object e_7321906 [20];
-+c_7321717.hdr.mark = gc_color_red;
-+ c_7321717.hdr.grayed = 0;
-+c_7321717.tag = closureN_tag;
-+ c_7321717.fn = (function_type)__lambda_965;
-+c_7321717.num_args = 1;
-+c_7321717.num_elements = 20;
-+c_7321717.elements = (object *)e_7321906;
-+c_7321717.elements[0] = ((closureN)self_7312542)->elements[0];
-+c_7321717.elements[1] = ((closureN)self_7312542)->elements[1];
-+c_7321717.elements[2] = ((closureN)self_7312542)->elements[2];
-+c_7321717.elements[3] = ((closureN)self_7312542)->elements[3];
-+c_7321717.elements[4] = ((closureN)self_7312542)->elements[4];
-+c_7321717.elements[5] = ((closureN)self_7312542)->elements[5];
-+c_7321717.elements[6] = ((closureN)self_7312542)->elements[6];
-+c_7321717.elements[7] = ((closureN)self_7312542)->elements[7];
-+c_7321717.elements[8] = ((closureN)self_7312542)->elements[8];
-+c_7321717.elements[9] = ((closureN)self_7312542)->elements[9];
-+c_7321717.elements[10] = ((closureN)self_7312542)->elements[10];
-+c_7321717.elements[11] = ((closureN)self_7312542)->elements[11];
-+c_7321717.elements[12] = ((closureN)self_7312542)->elements[12];
-+c_7321717.elements[13] = ((closureN)self_7312542)->elements[13];
-+c_7321717.elements[14] = ((closureN)self_7312542)->elements[14];
-+c_7321717.elements[15] = ((closureN)self_7312542)->elements[15];
-+c_7321717.elements[16] = ((closureN)self_7312542)->elements[16];
-+c_7321717.elements[17] = ((closureN)self_7312542)->elements[17];
-+c_7321717.elements[18] = ((closureN)self_7312542)->elements[18];
-+c_7321717.elements[19] = w_731321_733251;
++pair_type local_7322078; 
  
 -pair_type local_7323382; 
++pair_type local_7322082; 
  
 -pair_type local_7323386; 
-+make_utf8_string_with_len(c_7321907, "lp.", 3, 3);
-+return_closcall2(data,  car(((closureN)self_7312542)->elements[15]),  &c_7321717, &c_7321907);; 
-+}
++pair_type local_7322086; 
  
 -pair_type local_7323389; 
-+static void __lambda_965(void *data, object self_7312543, int argc, object *args) /* object self_7312543, object _191lp_731324_733252 */
-+ {
-+ object _191lp_731324_733252 = args[0];
-+  
++pair_type local_7322089; 
  
 -pair_type local_7323393; 
++pair_type local_7322093; 
  
 -pair_type local_7323397; 
-+closureN_type c_7321722;
-+object e_7321898 [20];
-+c_7321722.hdr.mark = gc_color_red;
-+ c_7321722.hdr.grayed = 0;
-+c_7321722.tag = closureN_tag;
-+ c_7321722.fn = (function_type)__lambda_966;
-+c_7321722.num_args = 1;
-+c_7321722.num_elements = 20;
-+c_7321722.elements = (object *)e_7321898;
-+c_7321722.elements[0] = ((closureN)self_7312543)->elements[0];
-+c_7321722.elements[1] = ((closureN)self_7312543)->elements[1];
-+c_7321722.elements[2] = ((closureN)self_7312543)->elements[2];
-+c_7321722.elements[3] = ((closureN)self_7312543)->elements[3];
-+c_7321722.elements[4] = ((closureN)self_7312543)->elements[4];
-+c_7321722.elements[5] = ((closureN)self_7312543)->elements[5];
-+c_7321722.elements[6] = _191lp_731324_733252;
-+c_7321722.elements[7] = ((closureN)self_7312543)->elements[6];
-+c_7321722.elements[8] = ((closureN)self_7312543)->elements[7];
-+c_7321722.elements[9] = ((closureN)self_7312543)->elements[8];
-+c_7321722.elements[10] = ((closureN)self_7312543)->elements[9];
-+c_7321722.elements[11] = ((closureN)self_7312543)->elements[11];
-+c_7321722.elements[12] = ((closureN)self_7312543)->elements[12];
-+c_7321722.elements[13] = ((closureN)self_7312543)->elements[13];
-+c_7321722.elements[14] = ((closureN)self_7312543)->elements[14];
-+c_7321722.elements[15] = ((closureN)self_7312543)->elements[15];
-+c_7321722.elements[16] = ((closureN)self_7312543)->elements[16];
-+c_7321722.elements[17] = ((closureN)self_7312543)->elements[17];
-+c_7321722.elements[18] = ((closureN)self_7312543)->elements[18];
-+c_7321722.elements[19] = ((closureN)self_7312543)->elements[19];
-+
-+
-+
-+
-+complex_num_type local_7321904; 
-+return_closcall3(data,  car(((closureN)self_7312543)->elements[10]),  &c_7321722, Cyc_car(data, ((closureN)self_7312543)->elements[16]), Cyc_fast_sum(data,&local_7321904, ((closureN)self_7312543)->elements[11], obj_int2obj(1)));; 
-+}
-+
-+static void __lambda_966(void *data, object self_7312544, int argc, object *args) /* object self_7312544, object new_91vars_731327_733253 */
-+ {
-+ object new_91vars_731327_733253 = args[0];
-+  
-+closureN_type c_7321724;
-+object e_7321875 [20];
-+c_7321724.hdr.mark = gc_color_red;
-+ c_7321724.hdr.grayed = 0;
-+c_7321724.tag = closureN_tag;
-+ c_7321724.fn = (function_type)__lambda_967;
-+c_7321724.num_args = 1;
-+c_7321724.num_elements = 20;
-+c_7321724.elements = (object *)e_7321875;
-+c_7321724.elements[0] = ((closureN)self_7312544)->elements[0];
-+c_7321724.elements[1] = ((closureN)self_7312544)->elements[1];
-+c_7321724.elements[2] = ((closureN)self_7312544)->elements[2];
-+c_7321724.elements[3] = ((closureN)self_7312544)->elements[3];
-+c_7321724.elements[4] = ((closureN)self_7312544)->elements[4];
-+c_7321724.elements[5] = ((closureN)self_7312544)->elements[5];
-+c_7321724.elements[6] = ((closureN)self_7312544)->elements[6];
-+c_7321724.elements[7] = ((closureN)self_7312544)->elements[7];
-+c_7321724.elements[8] = ((closureN)self_7312544)->elements[8];
-+c_7321724.elements[9] = ((closureN)self_7312544)->elements[9];
-+c_7321724.elements[10] = ((closureN)self_7312544)->elements[10];
-+c_7321724.elements[11] = ((closureN)self_7312544)->elements[11];
-+c_7321724.elements[12] = ((closureN)self_7312544)->elements[12];
-+c_7321724.elements[13] = ((closureN)self_7312544)->elements[13];
-+c_7321724.elements[14] = ((closureN)self_7312544)->elements[14];
-+c_7321724.elements[15] = new_91vars_731327_733253;
-+c_7321724.elements[16] = ((closureN)self_7312544)->elements[16];
-+c_7321724.elements[17] = ((closureN)self_7312544)->elements[17];
-+c_7321724.elements[18] = ((closureN)self_7312544)->elements[18];
-+c_7321724.elements[19] = ((closureN)self_7312544)->elements[19];
-+
-+
-+closureN_type c_7321876;
-+object e_7321897 [1];
-+c_7321876.hdr.mark = gc_color_red;
-+ c_7321876.hdr.grayed = 0;
-+c_7321876.tag = closureN_tag;
-+ c_7321876.fn = (function_type)__lambda_985;
-+c_7321876.num_args = 1;
-+c_7321876.num_elements = 1;
-+c_7321876.elements = (object *)e_7321897;
-+c_7321876.elements[0] = ((closureN)self_7312544)->elements[15];
-+
-+return_direct_with_clo1(data,(closure)&c_7321724,__lambda_967,  &c_7321876);; 
-+}
-+
-+static void __lambda_985(void *data, object self_7312545, int argc, object *args) /* object self_7312545, object k_736095, object x_731341_733262 */
-+ {
-+ object k_736095 = args[0]; object x_731341_733262 = args[1];
-+  
-+closureN_type c_7321878;
-+object e_7321891 [2];
-+c_7321878.hdr.mark = gc_color_red;
-+ c_7321878.hdr.grayed = 0;
-+c_7321878.tag = closureN_tag;
-+ c_7321878.fn = (function_type)__lambda_986;
-+c_7321878.num_args = 1;
-+c_7321878.num_elements = 2;
-+c_7321878.elements = (object *)e_7321891;
-+c_7321878.elements[0] = k_736095;
-+c_7321878.elements[1] = ((closureN)self_7312545)->elements[0];
++pair_type local_7322097; 
  
 -pair_type local_7323400; 
++pair_type local_7322100; 
  
 -pair_type local_7323403; 
++pair_type local_7322103; 
  
 -pair_type local_7323407; 
++pair_type local_7322107; 
  
 -pair_type local_7323410; 
-+object c_7321894 = Cyc_symbol2string(data,(closure)&c_7321878,Cyc_car(data, x_731341_733262));
-+return_closcall1(data,(closure)&c_7321878,  c_7321894);; 
-+}
++pair_type local_7322110; 
  
 -pair_type local_7323414; 
-+static void __lambda_986(void *data, object self_7312546, int argc, object *args) /* object self_7312546, object r_736097 */
-+ {
-+ object r_736097 = args[0];
-+  
-+closureN_type c_7321880;
-+object e_7321886 [2];
-+c_7321880.hdr.mark = gc_color_red;
-+ c_7321880.hdr.grayed = 0;
-+c_7321880.tag = closureN_tag;
-+ c_7321880.fn = (function_type)__lambda_987;
-+c_7321880.num_args = 1;
-+c_7321880.num_elements = 2;
-+c_7321880.elements = (object *)e_7321886;
-+c_7321880.elements[0] = ((closureN)self_7312546)->elements[0];
-+c_7321880.elements[1] = ((closureN)self_7312546)->elements[1];
-+
-+
-+make_utf8_string_with_len(c_7321890, "-ls", 3, 3);
-+
-+object c_7321889 = Cyc_string_append(data,(closure)&c_7321880,2,r_736097, &c_7321890);
-+return_closcall1(data,(closure)&c_7321880,  c_7321889);; 
-+}
-+
-+static void __lambda_987(void *data, object self_7312547, int argc, object *args) /* object self_7312547, object r_736096 */
-+ {
-+ object r_736096 = args[0];
-+  
-+
-+return_closcall2(data,  car(((closureN)self_7312547)->elements[1]),  ((closureN)self_7312547)->elements[0], r_736096);; 
-+}
-+
-+static void __lambda_967(void *data, object self_7312548, int argc, object *args) /* object self_7312548, object r_736094 */
-+ {
-+ object r_736094 = args[0];
-+  
-+closureN_type c_7321726;
-+object e_7321873 [20];
-+c_7321726.hdr.mark = gc_color_red;
-+ c_7321726.hdr.grayed = 0;
-+c_7321726.tag = closureN_tag;
-+ c_7321726.fn = (function_type)__lambda_968;
-+c_7321726.num_args = 1;
-+c_7321726.num_elements = 20;
-+c_7321726.elements = (object *)e_7321873;
-+c_7321726.elements[0] = ((closureN)self_7312548)->elements[0];
-+c_7321726.elements[1] = ((closureN)self_7312548)->elements[1];
-+c_7321726.elements[2] = ((closureN)self_7312548)->elements[2];
-+c_7321726.elements[3] = ((closureN)self_7312548)->elements[3];
-+c_7321726.elements[4] = ((closureN)self_7312548)->elements[4];
-+c_7321726.elements[5] = ((closureN)self_7312548)->elements[5];
-+c_7321726.elements[6] = ((closureN)self_7312548)->elements[6];
-+c_7321726.elements[7] = ((closureN)self_7312548)->elements[7];
-+c_7321726.elements[8] = ((closureN)self_7312548)->elements[8];
-+c_7321726.elements[9] = ((closureN)self_7312548)->elements[9];
-+c_7321726.elements[10] = ((closureN)self_7312548)->elements[10];
-+c_7321726.elements[11] = ((closureN)self_7312548)->elements[11];
-+c_7321726.elements[12] = ((closureN)self_7312548)->elements[12];
-+c_7321726.elements[13] = ((closureN)self_7312548)->elements[13];
-+c_7321726.elements[14] = ((closureN)self_7312548)->elements[14];
-+c_7321726.elements[15] = ((closureN)self_7312548)->elements[15];
-+c_7321726.elements[16] = ((closureN)self_7312548)->elements[16];
-+c_7321726.elements[17] = ((closureN)self_7312548)->elements[17];
-+c_7321726.elements[18] = ((closureN)self_7312548)->elements[18];
-+c_7321726.elements[19] = ((closureN)self_7312548)->elements[19];
-+
-+return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7321726, r_736094, ((closureN)self_7312548)->elements[15]);; 
-+}
-+
-+static void __lambda_968(void *data, object self_7312549, int argc, object *args) /* object self_7312549, object ls_91vars_731330_733254 */
-+ {
-+ object ls_91vars_731330_733254 = args[0];
-+  
-+closureN_type c_7321728;
-+object e_7321836 [19];
-+c_7321728.hdr.mark = gc_color_red;
-+ c_7321728.hdr.grayed = 0;
-+c_7321728.tag = closureN_tag;
-+ c_7321728.fn = (function_type)__lambda_969;
-+c_7321728.num_args = 1;
-+c_7321728.num_elements = 19;
-+c_7321728.elements = (object *)e_7321836;
-+c_7321728.elements[0] = ((closureN)self_7312549)->elements[0];
-+c_7321728.elements[1] = ((closureN)self_7312549)->elements[1];
-+c_7321728.elements[2] = ((closureN)self_7312549)->elements[4];
-+c_7321728.elements[3] = ((closureN)self_7312549)->elements[5];
-+c_7321728.elements[4] = ((closureN)self_7312549)->elements[6];
-+c_7321728.elements[5] = ((closureN)self_7312549)->elements[7];
-+c_7321728.elements[6] = ((closureN)self_7312549)->elements[8];
-+c_7321728.elements[7] = ((closureN)self_7312549)->elements[9];
-+c_7321728.elements[8] = ((closureN)self_7312549)->elements[10];
-+c_7321728.elements[9] = ((closureN)self_7312549)->elements[11];
-+c_7321728.elements[10] = ((closureN)self_7312549)->elements[12];
-+c_7321728.elements[11] = ((closureN)self_7312549)->elements[13];
-+c_7321728.elements[12] = ((closureN)self_7312549)->elements[14];
-+c_7321728.elements[13] = ls_91vars_731330_733254;
-+c_7321728.elements[14] = ((closureN)self_7312549)->elements[15];
-+c_7321728.elements[15] = ((closureN)self_7312549)->elements[16];
-+c_7321728.elements[16] = ((closureN)self_7312549)->elements[17];
-+c_7321728.elements[17] = ((closureN)self_7312549)->elements[18];
-+c_7321728.elements[18] = ((closureN)self_7312549)->elements[19];
-+
-+
-+closureN_type c_7321837;
-+object e_7321872 [6];
-+c_7321837.hdr.mark = gc_color_red;
-+ c_7321837.hdr.grayed = 0;
-+c_7321837.tag = closureN_tag;
-+ c_7321837.fn = (function_type)__lambda_980;
-+c_7321837.num_args = 1;
-+c_7321837.num_elements = 6;
-+c_7321837.elements = (object *)e_7321872;
-+c_7321837.elements[0] = ((closureN)self_7312549)->elements[2];
-+c_7321837.elements[1] = ((closureN)self_7312549)->elements[3];
-+c_7321837.elements[2] = ((closureN)self_7312549)->elements[6];
-+c_7321837.elements[3] = ls_91vars_731330_733254;
-+c_7321837.elements[4] = ((closureN)self_7312549)->elements[15];
-+c_7321837.elements[5] = ((closureN)self_7312549)->elements[19];
-+
-+return_direct_with_clo1(data,(closure)&c_7321728,__lambda_969,  &c_7321837);; 
-+}
-+
-+static void __lambda_980(void *data, object self_7312550, int argc, object *args) /* object self_7312550, object k_736087, object _191_731338_733259 */
-+ {
-+ object k_736087 = args[0];
-+  
-+closureN_type c_7321839;
-+object e_7321862 [6];
-+c_7321839.hdr.mark = gc_color_red;
-+ c_7321839.hdr.grayed = 0;
-+c_7321839.tag = closureN_tag;
-+ c_7321839.fn = (function_type)__lambda_981;
-+c_7321839.num_args = 1;
-+c_7321839.num_elements = 6;
-+c_7321839.elements = (object *)e_7321862;
-+c_7321839.elements[0] = ((closureN)self_7312550)->elements[0];
-+c_7321839.elements[1] = ((closureN)self_7312550)->elements[2];
-+c_7321839.elements[2] = k_736087;
-+c_7321839.elements[3] = ((closureN)self_7312550)->elements[3];
-+c_7321839.elements[4] = ((closureN)self_7312550)->elements[4];
-+c_7321839.elements[5] = ((closureN)self_7312550)->elements[5];
-+
-+
-+closureN_type c_7321863;
-+object e_7321871 [1];
-+c_7321863.hdr.mark = gc_color_red;
-+ c_7321863.hdr.grayed = 0;
-+c_7321863.tag = closureN_tag;
-+ c_7321863.fn = (function_type)__lambda_984;
-+c_7321863.num_args = 2;
-+c_7321863.num_elements = 1;
-+c_7321863.elements = (object *)e_7321871;
-+c_7321863.elements[0] = ((closureN)self_7312550)->elements[1];
-+
-+return_direct_with_clo1(data,(closure)&c_7321839,__lambda_981,  &c_7321863);; 
-+}
-+
-+static void __lambda_984(void *data, object self_7312551, int argc, object *args) /* object self_7312551, object k_736092, object x_731339_733260, object l_731340_733261 */
-+ {
-+ object k_736092 = args[0]; object x_731339_733260 = args[1]; object l_731340_733261 = args[2];
-+  
-+list_3_type local_7321867; 
++pair_type local_7322114; 
  
 -pair_type local_7323418; 
++pair_type local_7322118; 
  
 -pair_type local_7323422; 
 -return_direct_with_clo1(data,  ((closureN)self_7313819)->elements[15], (((closure)  ((closureN)self_7313819)->elements[15])->fn),  set_pair_as_expr(&local_7323233, ((closureN)self_7313819)->elements[10], set_pair_as_expr(&local_7323237, set_pair_as_expr(&local_7323240, set_pair_as_expr(&local_7323243, ((closureN)self_7313819)->elements[8], set_pair_as_expr(&local_7323247, set_pair_as_expr(&local_7323250, ((closureN)self_7313819)->elements[9], set_pair_as_expr(&local_7323254, ((closureN)self_7313819)->elements[17], NULL)), NULL)), NULL), set_pair_as_expr(&local_7323258, set_pair_as_expr(&local_7323261, ((closureN)self_7313819)->elements[2], set_pair_as_expr(&local_7323265, set_pair_as_expr(&local_7323268, ((closureN)self_7313819)->elements[1], set_pair_as_expr(&local_7323272, ((closureN)self_7313819)->elements[8], set_pair_as_expr(&local_7323276, ((closureN)self_7313819)->elements[16], NULL))), set_pair_as_expr(&local_7323280, set_pair_as_expr(&local_7323283, ((closureN)self
_7313819)->elements[10], set_pair_as_expr(&local_7323287, ((closureN)self_7313819)->elements[11], set_pair_as_expr(&local_7323291, set_pair_as_expr(&local_7323294, set_pair_as_expr(&local_7323297, ((closureN)self_7313819)->elements[12], set_pair_as_expr(&local_7323301, ((closureN)self_7313819)->elements[17], NULL)), set_pair_as_expr(&local_7323305, set_pair_as_expr(&local_7323308, ((closureN)self_7313819)->elements[6], set_pair_as_expr(&local_7323312, set_pair_as_expr(&local_7323315, ((closureN)self_7313819)->elements[0], set_pair_as_expr(&local_7323319, ((closureN)self_7313819)->elements[8], set_pair_as_expr(&local_7323323, ((closureN)self_7313819)->elements[16], NULL))), NULL)), set_pair_as_expr(&local_7323327, set_pair_as_expr(&local_7323330, ((closureN)self_7313819)->elements[14], set_pair_as_expr(&local_7323334, set_pair_as_expr(&local_7323337, ((closureN)self_7313819)->elements[13], set_pair_as_expr(&local_7323341, NULL, NULL)), NULL)), NULL))), set_pair_as_expr(&local_7323344,
  set_pair_as_expr(&local_7323347, ((closureN)self_7313819)->elements[7], set_pair_as_expr(&local_7323351, set_pair_as_expr(&local_7323354, ((closureN)self_7313819)->elements[1], set_pair_as_expr(&local_7323358, obj_int2obj(0), set_pair_as_expr(&local_7323361, ((closureN)self_7313819)->elements[6], NULL))), set_pair_as_expr(&local_7323365, r_736569, set_pair_as_expr(&local_7323368, set_pair_as_expr(&local_7323371, ((closureN)self_7313819)->elements[11], set_pair_as_expr(&local_7323375, set_pair_as_expr(&local_7323378, ((closureN)self_7313819)->elements[4], set_pair_as_expr(&local_7323382, ((closureN)self_7313819)->elements[12], NULL)), set_pair_as_expr(&local_7323386, set_pair_as_expr(&local_7323389, ((closureN)self_7313819)->elements[0], set_pair_as_expr(&local_7323393, ((closureN)self_7313819)->elements[6], set_pair_as_expr(&local_7323397, obj_int2obj(1), NULL))), set_pair_as_expr(&local_7323400, set_pair_as_expr(&local_7323403, ((closureN)self_7313819)->elements[5], set_pair_as_ex
 pr(&local_7323407, set_pair_as_expr(&local_7323410, ((closureN)self_7313819)->elements[3], set_pair_as_expr(&local_7323414, ((closureN)self_7313819)->elements[12], NULL)), set_pair_as_expr(&local_7323418, ((closureN)self_7313819)->elements[14], set_pair_as_expr(&local_7323422, ((closureN)self_7313819)->elements[12], NULL)))), NULL)))), NULL)))), NULL)))), NULL))), NULL))));; 
-+return_direct_with_clo1(data,  k_736092, (((closure)  k_736092)->fn),  Cyc_fast_list_3(&local_7321867, ((closureN)self_7312551)->elements[0], Cyc_car(data, x_731339_733260), l_731340_733261));; 
++pair_type local_7322122; 
++return_direct_with_clo1(data,  ((closureN)self_7312566)->elements[15], (((closure)  ((closureN)self_7312566)->elements[15])->fn),  set_pair_as_expr(&local_7321933, ((closureN)self_7312566)->elements[10], set_pair_as_expr(&local_7321937, set_pair_as_expr(&local_7321940, set_pair_as_expr(&local_7321943, ((closureN)self_7312566)->elements[8], set_pair_as_expr(&local_7321947, set_pair_as_expr(&local_7321950, ((closureN)self_7312566)->elements[9], set_pair_as_expr(&local_7321954, ((closureN)self_7312566)->elements[17], NULL)), NULL)), NULL), set_pair_as_expr(&local_7321958, set_pair_as_expr(&local_7321961, ((closureN)self_7312566)->elements[2], set_pair_as_expr(&local_7321965, set_pair_as_expr(&local_7321968, ((closureN)self_7312566)->elements[1], set_pair_as_expr(&local_7321972, ((closureN)self_7312566)->elements[8], set_pair_as_expr(&local_7321976, ((closureN)self_7312566)->elements[16], NULL))), set_pair_as_expr(&local_7321980, set_pair_as_expr(&local_7321983, ((closureN)self
_7312566)->elements[10], set_pair_as_expr(&local_7321987, ((closureN)self_7312566)->elements[11], set_pair_as_expr(&local_7321991, set_pair_as_expr(&local_7321994, set_pair_as_expr(&local_7321997, ((closureN)self_7312566)->elements[12], set_pair_as_expr(&local_7322001, ((closureN)self_7312566)->elements[17], NULL)), set_pair_as_expr(&local_7322005, set_pair_as_expr(&local_7322008, ((closureN)self_7312566)->elements[6], set_pair_as_expr(&local_7322012, set_pair_as_expr(&local_7322015, ((closureN)self_7312566)->elements[0], set_pair_as_expr(&local_7322019, ((closureN)self_7312566)->elements[8], set_pair_as_expr(&local_7322023, ((closureN)self_7312566)->elements[16], NULL))), NULL)), set_pair_as_expr(&local_7322027, set_pair_as_expr(&local_7322030, ((closureN)self_7312566)->elements[14], set_pair_as_expr(&local_7322034, set_pair_as_expr(&local_7322037, ((closureN)self_7312566)->elements[13], set_pair_as_expr(&local_7322041, NULL, NULL)), NULL)), NULL))), set_pair_as_expr(&local_7322044,
  set_pair_as_expr(&local_7322047, ((closureN)self_7312566)->elements[7], set_pair_as_expr(&local_7322051, set_pair_as_expr(&local_7322054, ((closureN)self_7312566)->elements[1], set_pair_as_expr(&local_7322058, obj_int2obj(0), set_pair_as_expr(&local_7322061, ((closureN)self_7312566)->elements[6], NULL))), set_pair_as_expr(&local_7322065, r_736117, set_pair_as_expr(&local_7322068, set_pair_as_expr(&local_7322071, ((closureN)self_7312566)->elements[11], set_pair_as_expr(&local_7322075, set_pair_as_expr(&local_7322078, ((closureN)self_7312566)->elements[4], set_pair_as_expr(&local_7322082, ((closureN)self_7312566)->elements[12], NULL)), set_pair_as_expr(&local_7322086, set_pair_as_expr(&local_7322089, ((closureN)self_7312566)->elements[0], set_pair_as_expr(&local_7322093, ((closureN)self_7312566)->elements[6], set_pair_as_expr(&local_7322097, obj_int2obj(1), NULL))), set_pair_as_expr(&local_7322100, set_pair_as_expr(&local_7322103, ((closureN)self_7312566)->elements[5], set_pair_as_ex
 pr(&local_7322107, set_pair_as_expr(&local_7322110, ((closureN)self_7312566)->elements[3], set_pair_as_expr(&local_7322114, ((closureN)self_7312566)->elements[12], NULL)), set_pair_as_expr(&local_7322118, ((closureN)self_7312566)->elements[14], set_pair_as_expr(&local_7322122, ((closureN)self_7312566)->elements[12], NULL)))), NULL)))), NULL)))), NULL)))), NULL))), NULL))));; 
  }
  
 -static void __lambda_962(void *data, object self_7313786, int argc, object *args) /* object self_7313786, object r_736492 */
-+static void __lambda_981(void *data, object self_7312552, int argc, object *args) /* object self_7312552, object r_736091 */
++static void __lambda_962(void *data, object self_7312533, int argc, object *args) /* object self_7312533, object r_736040 */
   {
 - object r_736492 = args[0];
 -  if( (boolean_f != r_736492) ){ 
-+ object r_736091 = args[0];
++ object r_736040 = args[0];
++  if( (boolean_f != r_736040) ){ 
    
 -closureN_type c_7322960;
 -object e_7322986 [6];
@@ -27299,29 +26954,37 @@ Make let-values be the same as let*-values, to work around
 -c_7323169.num_elements = 1;
 -c_7323169.elements = (object *)e_7323190;
 -c_7323169.elements[0] = ((closureN)self_7313790)->elements[15];
-+closureN_type c_7321841;
-+object e_7321859 [4];
-+c_7321841.hdr.mark = gc_color_red;
-+ c_7321841.hdr.grayed = 0;
-+c_7321841.tag = closureN_tag;
-+ c_7321841.fn = (function_type)__lambda_982;
-+c_7321841.num_args = 1;
-+c_7321841.num_elements = 4;
-+c_7321841.elements = (object *)e_7321859;
-+c_7321841.elements[0] = ((closureN)self_7312552)->elements[0];
-+c_7321841.elements[1] = ((closureN)self_7312552)->elements[1];
-+c_7321841.elements[2] = ((closureN)self_7312552)->elements[2];
-+c_7321841.elements[3] = ((closureN)self_7312552)->elements[5];
++closureN_type c_7321660;
++object e_7321686 [6];
++c_7321660.hdr.mark = gc_color_red;
++ c_7321660.hdr.grayed = 0;
++c_7321660.tag = closureN_tag;
++ c_7321660.fn = (function_type)__lambda_963;
++c_7321660.num_args = 1;
++c_7321660.num_elements = 6;
++c_7321660.elements = (object *)e_7321686;
++c_7321660.elements[0] = ((closureN)self_7312533)->elements[0];
++c_7321660.elements[1] = ((closureN)self_7312533)->elements[5];
++c_7321660.elements[2] = ((closureN)self_7312533)->elements[6];
++c_7321660.elements[3] = ((closureN)self_7312533)->elements[14];
++c_7321660.elements[4] = ((closureN)self_7312533)->elements[17];
++c_7321660.elements[5] = ((closureN)self_7312533)->elements[18];
  
 -return_direct_with_clo1(data,(closure)&c_7323017,__lambda_967,  &c_7323169);; 
-+return_direct_with_clo4(data,  __glo_Cyc_91map_91loop_912_scheme_base, (((closure)  __glo_Cyc_91map_91loop_912_scheme_base)->fn),  &c_7321841, r_736091, ((closureN)self_7312552)->elements[4], ((closureN)self_7312552)->elements[3]);; 
- }
+-}
  
 -static void __lambda_985(void *data, object self_7313791, int argc, object *args) /* object self_7313791, object k_736540, object x_731340_733602 */
-+static void __lambda_982(void *data, object self_7312553, int argc, object *args) /* object self_7312553, object r_736090 */
-  {
+- {
 - object k_736540 = args[0]; object x_731340_733602 = args[1];
-+ object r_736090 = args[0];
++pair_type local_7321689; 
++
++pair_type local_7321692; 
++
++
++
++complex_num_type local_7321698; 
++return_closcall2(data,  ((closureN)self_7312533)->elements[13],  &c_7321660, set_pair_as_expr(&local_7321689, set_pair_as_expr(&local_7321692, Cyc_car(data, ((closureN)self_7312533)->elements[17]), Cyc_fast_sum(data,&local_7321698, obj_int2obj(1), ((closureN)self_7312533)->elements[12])), ((closureN)self_7312533)->elements[19]));
++} else { 
    
 -closureN_type c_7323171;
 -object e_7323184 [2];
@@ -27334,34 +26997,18 @@ Make let-values be the same as let*-values, to work around
 -c_7323171.elements = (object *)e_7323184;
 -c_7323171.elements[0] = k_736540;
 -c_7323171.elements[1] = ((closureN)self_7313791)->elements[0];
-+closureN_type c_7321843;
-+object e_7321850 [2];
-+c_7321843.hdr.mark = gc_color_red;
-+ c_7321843.hdr.grayed = 0;
-+c_7321843.tag = closureN_tag;
-+ c_7321843.fn = (function_type)__lambda_983;
-+c_7321843.num_args = 1;
-+c_7321843.num_elements = 2;
-+c_7321843.elements = (object *)e_7321850;
-+c_7321843.elements[0] = ((closureN)self_7312553)->elements[1];
-+c_7321843.elements[1] = ((closureN)self_7312553)->elements[2];
- 
- 
-+pair_type local_7321853; 
- 
+-
+-
+-
 -
 -object c_7323187 = Cyc_symbol2string(data,(closure)&c_7323171,Cyc_car(data, x_731340_733602));
 -return_closcall1(data,(closure)&c_7323171,  c_7323187);; 
-+list_2_type local_7321856; 
-+return_direct_with_clo1(data,(closure)&c_7321843,__lambda_983,  set_pair_as_expr(&local_7321853, Cyc_fast_list_2(&local_7321856, ((closureN)self_7312553)->elements[0], ((closureN)self_7312553)->elements[3]), r_736090));; 
- }
- 
+-}
+-
 -static void __lambda_986(void *data, object self_7313792, int argc, object *args) /* object self_7313792, object r_736542 */
-+static void __lambda_983(void *data, object self_7312554, int argc, object *args) /* object self_7312554, object r_736088 */
-  {
+- {
 - object r_736542 = args[0];
-+ object r_736088 = args[0];
-   
+-  
 -closureN_type c_7323173;
 -object e_7323179 [2];
 -c_7323173.hdr.mark = gc_color_red;
@@ -27458,8 +27105,8 @@ Make let-values be the same as let*-values, to work around
 -c_7323021.elements[16] = ((closureN)self_7313795)->elements[17];
 -c_7323021.elements[17] = ((closureN)self_7313795)->elements[18];
 -c_7323021.elements[18] = ((closureN)self_7313795)->elements[19];
--
--
+ 
+ 
 -closureN_type c_7323130;
 -object e_7323165 [6];
 -c_7323130.hdr.mark = gc_color_red;
@@ -27475,14 +27122,48 @@ Make let-values be the same as let*-values, to work around
 -c_7323130.elements[3] = ls_91vars_731329_733594;
 -c_7323130.elements[4] = ((closureN)self_7313795)->elements[15];
 -c_7323130.elements[5] = ((closureN)self_7313795)->elements[19];
--
++closureN_type c_7321705;
++object e_7321901 [19];
++c_7321705.hdr.mark = gc_color_red;
++ c_7321705.hdr.grayed = 0;
++c_7321705.tag = closureN_tag;
++ c_7321705.fn = (function_type)__lambda_964;
++c_7321705.num_args = 1;
++c_7321705.num_elements = 19;
++c_7321705.elements = (object *)e_7321901;
++c_7321705.elements[0] = ((closureN)self_7312533)->elements[0];
++c_7321705.elements[1] = ((closureN)self_7312533)->elements[1];
++c_7321705.elements[2] = ((closureN)self_7312533)->elements[2];
++c_7321705.elements[3] = ((closureN)self_7312533)->elements[3];
++c_7321705.elements[4] = ((closureN)self_7312533)->elements[4];
++c_7321705.elements[5] = ((closureN)self_7312533)->elements[5];
++c_7321705.elements[6] = ((closureN)self_7312533)->elements[7];
++c_7321705.elements[7] = ((closureN)self_7312533)->elements[8];
++c_7321705.elements[8] = ((closureN)self_7312533)->elements[9];
++c_7321705.elements[9] = ((closureN)self_7312533)->elements[10];
++c_7321705.elements[10] = ((closureN)self_7312533)->elements[11];
++c_7321705.elements[11] = ((closureN)self_7312533)->elements[12];
++c_7321705.elements[12] = ((closureN)self_7312533)->elements[13];
++c_7321705.elements[13] = ((closureN)self_7312533)->elements[14];
++c_7321705.elements[14] = ((closureN)self_7312533)->elements[15];
++c_7321705.elements[15] = ((closureN)self_7312533)->elements[16];
++c_7321705.elements[16] = ((closureN)self_7312533)->elements[17];
++c_7321705.elements[17] = ((closureN)self_7312533)->elements[18];
++c_7321705.elements[18] = ((closureN)self_7312533)->elements[19];
+ 
 -return_direct_with_clo1(data,(closure)&c_7323021,__lambda_969,  &c_7323130);; 
--}
--
++
++make_utf8_string_with_len(c_7321902, "w.", 2, 2);
++return_closcall2(data,  car(((closureN)self_7312533)->elements[16]),  &c_7321705, &c_7321902);}
++;; 
+ }
+ 
 -static void __lambda_980(void *data, object self_7313796, int argc, object *args) /* object self_7313796, object k_736532, object _191_731337_733599 */
-- {
++static void __lambda_964(void *data, object self_7312535, int argc, object *args) /* object self_7312535, object w_731320_733244 */
+  {
 - object k_736532 = args[0];
--  
++ object w_731320_733244 = args[0];
+   
 -closureN_type c_7323132;
 -object e_7323155 [6];
 -c_7323132.hdr.mark = gc_color_red;
@@ -27498,8 +27179,8 @@ Make let-values be the same as let*-values, to work around
 -c_7323132.elements[3] = ((closureN)self_7313796)->elements[3];
 -c_7323132.elements[4] = ((closureN)self_7313796)->elements[4];
 -c_7323132.elements[5] = ((closureN)self_7313796)->elements[5];
--
--
+ 
+ 
 -closureN_type c_7323156;
 -object e_7323164 [1];
 -c_7323156.hdr.mark = gc_color_red;
@@ -27510,24 +27191,95 @@ Make let-values be the same as let*-values, to work around
 -c_7323156.num_elements = 1;
 -c_7323156.elements = (object *)e_7323164;
 -c_7323156.elements[0] = ((closureN)self_7313796)->elements[1];
--
++closureN_type c_7321710;
++object e_7321899 [20];
++c_7321710.hdr.mark = gc_color_red;
++ c_7321710.hdr.grayed = 0;
++c_7321710.tag = closureN_tag;
++ c_7321710.fn = (function_type)__lambda_965;
++c_7321710.num_args = 1;
++c_7321710.num_elements = 20;
++c_7321710.elements = (object *)e_7321899;
++c_7321710.elements[0] = ((closureN)self_7312535)->elements[0];
++c_7321710.elements[1] = ((closureN)self_7312535)->elements[1];
++c_7321710.elements[2] = ((closureN)self_7312535)->elements[2];
++c_7321710.elements[3] = ((closureN)self_7312535)->elements[3];
++c_7321710.elements[4] = ((closureN)self_7312535)->elements[4];
++c_7321710.elements[5] = ((closureN)self_7312535)->elements[5];
++c_7321710.elements[6] = ((closureN)self_7312535)->elements[6];
++c_7321710.elements[7] = ((closureN)self_7312535)->elements[7];
++c_7321710.elements[8] = ((closureN)self_7312535)->elements[8];
++c_7321710.elements[9] = ((closureN)self_7312535)->elements[9];
++c_7321710.elements[10] = ((closureN)self_7312535)->elements[10];
++c_7321710.elements[11] = ((closureN)self_7312535)->elements[11];
++c_7321710.elements[12] = ((closureN)self_7312535)->elements[12];
++c_7321710.elements[13] = ((closureN)self_7312535)->elements[13];
++c_7321710.elements[14] = ((closureN)self_7312535)->elements[14];
++c_7321710.elements[15] = ((closureN)self_7312535)->elements[15];
++c_7321710.elements[16] = ((closureN)self_7312535)->elements[16];
++c_7321710.elements[17] = ((closureN)self_7312535)->elements[17];
++c_7321710.elements[18] = ((closureN)self_7312535)->elements[18];
++c_7321710.elements[19] = w_731320_733244;
+ 
 -return_direct_with_clo1(data,(closure)&c_7323132,__lambda_981,  &c_7323156);; 
--}
--
++
++make_utf8_string_with_len(c_7321900, "lp.", 3, 3);
++return_closcall2(data,  car(((closureN)self_7312535)->elements[15]),  &c_7321710, &c_7321900);; 
+ }
+ 
 -static void __lambda_984(void *data, object self_7313797, int argc, object *args) /* object self_7313797, object k_736537, object x_731338_733600, object l_731339_733601 */
-- {
++static void __lambda_965(void *data, object self_7312536, int argc, object *args) /* object self_7312536, object _191lp_731323_733245 */
+  {
 - object k_736537 = args[0]; object x_731338_733600 = args[1]; object l_731339_733601 = args[2];
--  
++ object _191lp_731323_733245 = args[0];
+   
 -list_3_type local_7323160; 
--
--
+ 
+ 
 -return_direct_with_clo1(data,  k_736537, (((closure)  k_736537)->fn),  Cyc_fast_list_3(&local_7323160, ((closureN)self_7313797)->elements[0], Cyc_car(data, x_731338_733600), l_731339_733601));; 
--}
--
++closureN_type c_7321715;
++object e_7321891 [20];
++c_7321715.hdr.mark = gc_color_red;
++ c_7321715.hdr.grayed = 0;
++c_7321715.tag = closureN_tag;
++ c_7321715.fn = (function_type)__lambda_966;
++c_7321715.num_args = 1;
++c_7321715.num_elements = 20;
++c_7321715.elements = (object *)e_7321891;
++c_7321715.elements[0] = ((closureN)self_7312536)->elements[0];
++c_7321715.elements[1] = ((closureN)self_7312536)->elements[1];
++c_7321715.elements[2] = ((closureN)self_7312536)->elements[2];
++c_7321715.elements[3] = ((closureN)self_7312536)->elements[3];
++c_7321715.elements[4] = ((closureN)self_7312536)->elements[4];
++c_7321715.elements[5] = ((closureN)self_7312536)->elements[5];
++c_7321715.elements[6] = _191lp_731323_733245;
++c_7321715.elements[7] = ((closureN)self_7312536)->elements[6];
++c_7321715.elements[8] = ((closureN)self_7312536)->elements[7];
++c_7321715.elements[9] = ((closureN)self_7312536)->elements[8];
++c_7321715.elements[10] = ((closureN)self_7312536)->elements[9];
++c_7321715.elements[11] = ((closureN)self_7312536)->elements[11];
++c_7321715.elements[12] = ((closureN)self_7312536)->elements[12];
++c_7321715.elements[13] = ((closureN)self_7312536)->elements[13];
++c_7321715.elements[14] = ((closureN)self_7312536)->elements[14];
++c_7321715.elements[15] = ((closureN)self_7312536)->elements[15];
++c_7321715.elements[16] = ((closureN)self_7312536)->elements[16];
++c_7321715.elements[17] = ((closureN)self_7312536)->elements[17];
++c_7321715.elements[18] = ((closureN)self_7312536)->elements[18];
++c_7321715.elements[19] = ((closureN)self_7312536)->elements[19];
++
++
++
++
++complex_num_type local_7321897; 
++return_closcall3(data,  car(((closureN)self_7312536)->elements[10]),  &c_7321715, Cyc_car(data, ((closureN)self_7312536)->elements[16]), Cyc_fast_sum(data,&local_7321897, ((closureN)self_7312536)->elements[11], obj_int2obj(1)));; 
+ }
+ 
 -static void __lambda_981(void *data, object self_7313798, int argc, object *args) /* object self_7313798, object r_736536 */
-- {
++static void __lambda_966(void *data, object self_7312537, int argc, object *args) /* object self_7312537, object new_91vars_731326_733246 */
+  {
 - object r_736536 = args[0];
--  
++ object new_91vars_731326_733246 = args[0];
+   
 -closureN_type c_7323134;
 -object e_7323152 [4];
 -c_7323134.hdr.mark = gc_color_red;
@@ -27541,14 +27293,58 @@ Make let-values be the same as let*-values, to work around
 -c_7323134.elements[1] = ((closureN)self_7313798)->elements[1];
 -c_7323134.elements[2] = ((closureN)self_7313798)->elements[2];
 -c_7323134.elements[3] = ((closureN)self_7313798)->elements[5];
--
++closureN_type c_7321717;
++object e_7321868 [20];
++c_7321717.hdr.mark = gc_color_red;
++ c_7321717.hdr.grayed = 0;
++c_7321717.tag = closureN_tag;
++ c_7321717.fn = (function_type)__lambda_967;
++c_7321717.num_args = 1;
++c_7321717.num_elements = 20;
++c_7321717.elements = (object *)e_7321868;
++c_7321717.elements[0] = ((closureN)self_7312537)->elements[0];
++c_7321717.elements[1] = ((closureN)self_7312537)->elements[1];
++c_7321717.elements[2] = ((closureN)self_7312537)->elements[2];
++c_7321717.elements[3] = ((closureN)self_7312537)->elements[3];
++c_7321717.elements[4] = ((closureN)self_7312537)->elements[4];
++c_7321717.elements[5] = ((closureN)self_7312537)->elements[5];
++c_7321717.elements[6] = ((closureN)self_7312537)->elements[6];
++c_7321717.elements[7] = ((closureN)self_7312537)->elements[7];
++c_7321717.elements[8] = ((closureN)self_7312537)->elements[8];
++c_7321717.elements[9] = ((closureN)self_7312537)->elements[9];
++c_7321717.elements[10] = ((closureN)self_7312537)->elements[10];
++c_7321717.elements[11] = ((closureN)self_7312537)->elements[11];
++c_7321717.elements[12] = ((closureN)self_7312537)->elements[12];
++c_7321717.elements[13] = ((closureN)self_7312537)->elements[13];
++c_7321717.elements[14] = ((closureN)self_7312537)->elements[14];
++c_7321717.elements[15] = new_91vars_731326_733246;
++c_7321717.elements[16] = ((closureN)self_7312537)->elements[16];
++c_7321717.elements[17] = ((closureN)self_7312537)->elements[17];
++c_7321717.elements[18] = ((closureN)self_7312537)->elements[18];
++c_7321717.elements[19] = ((closureN)self_7312537)->elements[19];
++
+ 
 -return_direct_with_clo4(data,  __glo_Cyc_91map_91loop_912_scheme_base, (((closure)  __glo_Cyc_91map_91loop_912_scheme_base)->fn),  &c_7323134, r_736536, ((closureN)self_7313798)->elements[4], ((closureN)self_7313798)->elements[3]);; 
--}
--
++closureN_type c_7321869;
++object e_7321890 [1];
++c_7321869.hdr.mark = gc_color_red;
++ c_7321869.hdr.grayed = 0;
++c_7321869.tag = closureN_tag;
++ c_7321869.fn = (function_type)__lambda_985;
++c_7321869.num_args = 1;
++c_7321869.num_elements = 1;
++c_7321869.elements = (object *)e_7321890;
++c_7321869.elements[0] = ((closureN)self_7312537)->elements[15];
++
++return_direct_with_clo1(data,(closure)&c_7321717,__lambda_967,  &c_7321869);; 
+ }
+ 
 -static void __lambda_982(void *data, object self_7313799, int argc, object *args) /* object self_7313799, object r_736535 */
-- {
++static void __lambda_985(void *data, object self_7312538, int argc, object *args) /* object self_7312538, object k_736088, object x_731340_733255 */
+  {
 - object r_736535 = args[0];
--  
++ object k_736088 = args[0]; object x_731340_733255 = args[1];
+   
 -closureN_type c_7323136;
 -object e_7323143 [2];
 -c_7323136.hdr.mark = gc_color_red;
@@ -27560,28 +27356,65 @@ Make let-values be the same as let*-values, to work around
 -c_7323136.elements = (object *)e_7323143;
 -c_7323136.elements[0] = ((closureN)self_7313799)->elements[1];
 -c_7323136.elements[1] = ((closureN)self_7313799)->elements[2];
--
--
++closureN_type c_7321871;
++object e_7321884 [2];
++c_7321871.hdr.mark = gc_color_red;
++ c_7321871.hdr.grayed = 0;
++c_7321871.tag = closureN_tag;
++ c_7321871.fn = (function_type)__lambda_986;
++c_7321871.num_args = 1;
++c_7321871.num_elements = 2;
++c_7321871.elements = (object *)e_7321884;
++c_7321871.elements[0] = k_736088;
++c_7321871.elements[1] = ((closureN)self_7312538)->elements[0];
+ 
+ 
 -pair_type local_7323146; 
--
+ 
 -list_2_type local_7323149; 
 -return_direct_with_clo1(data,(closure)&c_7323136,__lambda_983,  set_pair_as_expr(&local_7323146, Cyc_fast_list_2(&local_7323149, ((closureN)self_7313799)->elements[0], ((closureN)self_7313799)->elements[3]), r_736535));; 
--}
--
++
++object c_7321887 = Cyc_symbol2string(data,(closure)&c_7321871,Cyc_car(data, x_731340_733255));
++return_closcall1(data,(closure)&c_7321871,  c_7321887);; 
+ }
+ 
 -static void __lambda_983(void *data, object self_7313800, int argc, object *args) /* object self_7313800, object r_736533 */
-- {
++static void __lambda_986(void *data, object self_7312539, int argc, object *args) /* object self_7312539, object r_736090 */
+  {
 - object r_736533 = args[0];
--  
++ object r_736090 = args[0];
+   
 -pair_type local_7323141; 
 -return_direct_with_clo1(data,  ((closureN)self_7313800)->elements[1], (((closure)  ((closureN)self_7313800)->elements[1])->fn),  set_pair_as_expr(&local_7323141, ((closureN)self_7313800)->elements[0], r_736533));; 
--}
--
++closureN_type c_7321873;
++object e_7321879 [2];
++c_7321873.hdr.mark = gc_color_red;
++ c_7321873.hdr.grayed = 0;
++c_7321873.tag = closureN_tag;
++ c_7321873.fn = (function_type)__lambda_987;
++c_7321873.num_args = 1;
++c_7321873.num_elements = 2;
++c_7321873.elements = (object *)e_7321879;
++c_7321873.elements[0] = ((closureN)self_7312539)->elements[0];
++c_7321873.elements[1] = ((closureN)self_7312539)->elements[1];
++
++
++make_utf8_string_with_len(c_7321883, "-ls", 3, 3);
++
++object c_7321882 = Cyc_string_append(data,(closure)&c_7321873,2,r_736090, &c_7321883);
++return_closcall1(data,(closure)&c_7321873,  c_7321882);; 
+ }
+ 
 -static void __lambda_969(void *data, object self_7313801, int argc, object *args) /* object self_7313801, object r_736531 */
-- {
++static void __lambda_987(void *data, object self_7312540, int argc, object *args) /* object self_7312540, object r_736089 */
+  {
 - object r_736531 = args[0];
--  
--
--
++ object r_736089 = args[0];
+   
+ 
++return_closcall2(data,  car(((closureN)self_7312540)->elements[1]),  ((closureN)self_7312540)->elements[0], r_736089);; 
++}
+ 
 -closureN_type c_7323026;
 -object e_7323116 [15];
 -c_7323026.hdr.mark = gc_color_red;
@@ -27742,26 +27575,143 @@ Make let-values be the same as let*-values, to work around
 -c_7323091.num_elements = 1;
 -c_7323091.elements = (object *)e_7323102;
 -c_7323091.elements[0] = ((closureN)self_7313805)->elements[6];
--
++static void __lambda_967(void *data, object self_7312541, int argc, object *args) /* object self_7312541, object r_736087 */
++ {
++ object r_736087 = args[0];
++  
++closureN_type c_7321719;
++object e_7321866 [20];
++c_7321719.hdr.mark = gc_color_red;
++ c_7321719.hdr.grayed = 0;
++c_7321719.tag = closureN_tag;
++ c_7321719.fn = (function_type)__lambda_968;
++c_7321719.num_args = 1;
++c_7321719.num_elements = 20;
++c_7321719.elements = (object *)e_7321866;
++c_7321719.elements[0] = ((closureN)self_7312541)->elements[0];
++c_7321719.elements[1] = ((closureN)self_7312541)->elements[1];
++c_7321719.elements[2] = ((closureN)self_7312541)->elements[2];
++c_7321719.elements[3] = ((closureN)self_7312541)->elements[3];
++c_7321719.elements[4] = ((closureN)self_7312541)->elements[4];
++c_7321719.elements[5] = ((closureN)self_7312541)->elements[5];
++c_7321719.elements[6] = ((closureN)self_7312541)->elements[6];
++c_7321719.elements[7] = ((closureN)self_7312541)->elements[7];
++c_7321719.elements[8] = ((closureN)self_7312541)->elements[8];
++c_7321719.elements[9] = ((closureN)self_7312541)->elements[9];
++c_7321719.elements[10] = ((closureN)self_7312541)->elements[10];
++c_7321719.elements[11] = ((closureN)self_7312541)->elements[11];
++c_7321719.elements[12] = ((closureN)self_7312541)->elements[12];
++c_7321719.elements[13] = ((closureN)self_7312541)->elements[13];
++c_7321719.elements[14] = ((closureN)self_7312541)->elements[14];
++c_7321719.elements[15] = ((closureN)self_7312541)->elements[15];
++c_7321719.elements[16] = ((closureN)self_7312541)->elements[16];
++c_7321719.elements[17] = ((closureN)self_7312541)->elements[17];
++c_7321719.elements[18] = ((closureN)self_7312541)->elements[18];
++c_7321719.elements[19] = ((closureN)self_7312541)->elements[19];
++
++return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7321719, r_736087, ((closureN)self_7312541)->elements[15]);; 
++}
++
++static void __lambda_968(void *data, object self_7312542, int argc, object *args) /* object self_7312542, object ls_91vars_731329_733247 */
++ {
++ object ls_91vars_731329_733247 = args[0];
++  
++closureN_type c_7321721;
++object e_7321829 [19];
++c_7321721.hdr.mark = gc_color_red;
++ c_7321721.hdr.grayed = 0;
++c_7321721.tag = closureN_tag;
++ c_7321721.fn = (function_type)__lambda_969;
++c_7321721.num_args = 1;
++c_7321721.num_elements = 19;
++c_7321721.elements = (object *)e_7321829;
++c_7321721.elements[0] = ((closureN)self_7312542)->elements[0];
++c_7321721.elements[1] = ((closureN)self_7312542)->elements[1];
++c_7321721.elements[2] = ((closureN)self_7312542)->elements[4];
++c_7321721.elements[3] = ((closureN)self_7312542)->elements[5];
++c_7321721.elements[4] = ((closureN)self_7312542)->elements[6];
++c_7321721.elements[5] = ((closureN)self_7312542)->elements[7];
++c_7321721.elements[6] = ((closureN)self_7312542)->elements[8];
++c_7321721.elements[7] = ((closureN)self_7312542)->elements[9];
++c_7321721.elements[8] = ((closureN)self_7312542)->elements[10];
++c_7321721.elements[9] = ((closureN)self_7312542)->elements[11];
++c_7321721.elements[10] = ((closureN)self_7312542)->elements[12];
++c_7321721.elements[11] = ((closureN)self_7312542)->elements[13];
++c_7321721.elements[12] = ((closureN)self_7312542)->elements[14];
++c_7321721.elements[13] = ls_91vars_731329_733247;
++c_7321721.elements[14] = ((closureN)self_7312542)->elements[15];
++c_7321721.elements[15] = ((closureN)self_7312542)->elements[16];
++c_7321721.elements[16] = ((closureN)self_7312542)->elements[17];
++c_7321721.elements[17] = ((closureN)self_7312542)->elements[18];
++c_7321721.elements[18] = ((closureN)self_7312542)->elements[19];
++
++
++closureN_type c_7321830;
++object e_7321865 [6];
++c_7321830.hdr.mark = gc_color_red;
++ c_7321830.hdr.grayed = 0;
++c_7321830.tag = closureN_tag;
++ c_7321830.fn = (function_type)__lambda_980;
++c_7321830.num_args = 1;
++c_7321830.num_elements = 6;
++c_7321830.elements = (object *)e_7321865;
++c_7321830.elements[0] = ((closureN)self_7312542)->elements[2];
++c_7321830.elements[1] = ((closureN)self_7312542)->elements[3];
++c_7321830.elements[2] = ((closureN)self_7312542)->elements[6];
++c_7321830.elements[3] = ls_91vars_731329_733247;
++c_7321830.elements[4] = ((closureN)self_7312542)->elements[15];
++c_7321830.elements[5] = ((closureN)self_7312542)->elements[19];
+ 
 -return_direct_with_clo1(data,(closure)&c_7323032,__lambda_973,  &c_7323091);; 
--}
--
++return_direct_with_clo1(data,(closure)&c_7321721,__lambda_969,  &c_7321830);; 
+ }
+ 
 -static void __lambda_978(void *data, object self_7313806, int argc, object *args) /* object self_7313806, object k_736518, object x_731335_733597, object l_731336_733598 */
-- {
++static void __lambda_980(void *data, object self_7312543, int argc, object *args) /* object self_7312543, object k_736080, object _191_731337_733252 */
+  {
 - object k_736518 = args[0]; object x_731335_733597 = args[1]; object l_731336_733598 = args[2];
--  
++ object k_736080 = args[0];
+   
 -list_2_type local_7323095; 
--
--
--
++closureN_type c_7321832;
++object e_7321855 [6];
++c_7321832.hdr.mark = gc_color_red;
++ c_7321832.hdr.grayed = 0;
++c_7321832.tag = closureN_tag;
++ c_7321832.fn = (function_type)__lambda_981;
++c_7321832.num_args = 1;
++c_7321832.num_elements = 6;
++c_7321832.elements = (object *)e_7321855;
++c_7321832.elements[0] = ((closureN)self_7312543)->elements[0];
++c_7321832.elements[1] = ((closureN)self_7312543)->elements[2];
++c_7321832.elements[2] = k_736080;
++c_7321832.elements[3] = ((closureN)self_7312543)->elements[3];
++c_7321832.elements[4] = ((closureN)self_7312543)->elements[4];
++c_7321832.elements[5] = ((closureN)self_7312543)->elements[5];
+ 
+ 
++closureN_type c_7321856;
++object e_7321864 [1];
++c_7321856.hdr.mark = gc_color_red;
++ c_7321856.hdr.grayed = 0;
++c_7321856.tag = closureN_tag;
++ c_7321856.fn = (function_type)__lambda_984;
++c_7321856.num_args = 2;
++c_7321856.num_elements = 1;
++c_7321856.elements = (object *)e_7321864;
++c_7321856.elements[0] = ((closureN)self_7312543)->elements[1];
+ 
 -list_2_type local_7323100; 
 -return_direct_with_clo1(data,  k_736518, (((closure)  k_736518)->fn),  Cyc_fast_list_2(&local_7323095, Cyc_car(data, x_731335_733597), Cyc_fast_list_2(&local_7323100, ((closureN)self_7313806)->elements[0], l_731336_733598)));; 
--}
--
++return_direct_with_clo1(data,(closure)&c_7321832,__lambda_981,  &c_7321856);; 
+ }
+ 
 -static void __lambda_973(void *data, object self_7313807, int argc, object *args) /* object self_7313807, object r_736517 */
-- {
++static void __lambda_984(void *data, object self_7312544, int argc, object *args) /* object self_7312544, object k_736085, object x_731338_733253, object l_731339_733254 */
+  {
 - object r_736517 = args[0];
--  
++ object k_736085 = args[0]; object x_731338_733253 = args[1]; object l_731339_733254 = args[2];
+   
 -closureN_type c_7323034;
 -object e_7323087 [14];
 -c_7323034.hdr.mark = gc_color_red;
@@ -27785,14 +27735,19 @@ Make let-values be the same as let*-values, to work around
 -c_7323034.elements[11] = ((closureN)self_7313807)->elements[12];
 -c_7323034.elements[12] = ((closureN)self_7313807)->elements[13];
 -c_7323034.elements[13] = ((closureN)self_7313807)->elements[14];
--
++list_3_type local_7321860; 
++
+ 
 -return_direct_with_clo4(data,  __glo_Cyc_91map_91loop_912_scheme_base, (((closure)  __glo_Cyc_91map_91loop_912_scheme_base)->fn),  &c_7323034, r_736517, ((closureN)self_7313807)->elements[9], ((closureN)self_7313807)->elements[8]);; 
--}
--
++return_direct_with_clo1(data,  k_736085, (((closure)  k_736085)->fn),  Cyc_fast_list_3(&local_7321860, ((closureN)self_7312544)->elements[0], Cyc_car(data, x_731338_733253), l_731339_733254));; 
+ }
+ 
 -static void __lambda_974(void *data, object self_7313808, int argc, object *args) /* object self_7313808, object r_736514 */
-- {
++static void __lambda_981(void *data, object self_7312545, int argc, object *args) /* object self_7312545, object r_736084 */
+  {
 - object r_736514 = args[0];
--  
++ object r_736084 = args[0];
+   
 -closureN_type c_7323036;
 -object e_7323084 [13];
 -c_7323036.hdr.mark = gc_color_red;
@@ -27815,14 +27770,30 @@ Make let-values be the same as let*-values, to work around
 -c_7323036.elements[10] = ((closureN)self_7313808)->elements[10];
 -c_7323036.elements[11] = ((closureN)self_7313808)->elements[11];
 -c_7323036.elements[12] = ((closureN)self_7313808)->elements[13];
--
++closureN_type c_7321834;
++object e_7321852 [4];
++c_7321834.hdr.mark = gc_color_red;
++ c_7321834.hdr.grayed = 0;
++c_7321834.tag = closureN_tag;
++ c_7321834.fn = (function_type)__lambda_982;
++c_7321834.num_args = 1;
++c_7321834.num_elements = 4;
++c_7321834.elements = (object *)e_7321852;
++c_7321834.elements[0] = ((closureN)self_7312545)->elements[0];
++c_7321834.elements[1] = ((closureN)self_7312545)->elements[1];
++c_7321834.elements[2] = ((closureN)self_7312545)->elements[2];
++c_7321834.elements[3] = ((closureN)self_7312545)->elements[5];
+ 
 -return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7323036, ((closureN)self_7313808)->elements[8], ((closureN)self_7313808)->elements[12]);; 
--}
--
++return_direct_with_clo4(data,  __glo_Cyc_91map_91loop_912_scheme_base, (((closure)  __glo_Cyc_91map_91loop_912_scheme_base)->fn),  &c_7321834, r_736084, ((closureN)self_7312545)->elements[4], ((closureN)self_7312545)->elements[3]);; 
+ }
+ 
 -static void __lambda_975(void *data, object self_7313809, int argc, object *args) /* object self_7313809, object r_736516 */
-- {
++static void __lambda_982(void *data, object self_7312546, int argc, object *args) /* object self_7312546, object r_736083 */
+  {
 - object r_736516 = args[0];
--  
++ object r_736083 = args[0];
+   
 -closureN_type c_7323039;
 -object e_7323083 [12];
 -c_7323039.hdr.mark = gc_color_red;
@@ -27844,14 +27815,1465 @@ Make let-values be the same as let*-values, to work around
 -c_7323039.elements[9] = ((closureN)self_7313809)->elements[10];
 -c_7323039.elements[10] = ((closureN)self_7313809)->elements[11];
 -c_7323039.elements[11] = ((closureN)self_7313809)->elements[12];
--
++closureN_type c_7321836;
++object e_7321843 [2];
++c_7321836.hdr.mark = gc_color_red;
++ c_7321836.hdr.grayed = 0;
++c_7321836.tag = closureN_tag;
++ c_7321836.fn = (function_type)__lambda_983;
++c_7321836.num_args = 1;
++c_7321836.num_elements = 2;
++c_7321836.elements = (object *)e_7321843;
++c_7321836.elements[0] = ((closureN)self_7312546)->elements[1];
++c_7321836.elements[1] = ((closureN)self_7312546)->elements[2];
++
++
++pair_type local_7321846; 
++
++list_2_type local_7321849; 
++return_direct_with_clo1(data,(closure)&c_7321836,__lambda_983,  set_pair_as_expr(&local_7321846, Cyc_fast_list_2(&local_7321849, ((closureN)self_7312546)->elements[0], ((closureN)self_7312546)->elements[3]), r_736083));; 
++}
++
++static void __lambda_983(void *data, object self_7312547, int argc, object *args) /* object self_7312547, object r_736081 */
++ {
++ object r_736081 = args[0];
++  
++pair_type local_7321841; 
++return_direct_with_clo1(data,  ((closureN)self_7312547)->elements[1], (((closure)  ((closureN)self_7312547)->elements[1])->fn),  set_pair_as_expr(&local_7321841, ((closureN)self_7312547)->elements[0], r_736081));; 
++}
++
++static void __lambda_969(void *data, object self_7312548, int argc, object *args) /* object self_7312548, object r_736079 */
++ {
++ object r_736079 = args[0];
++  
++
++
++closureN_type c_7321726;
++object e_7321816 [15];
++c_7321726.hdr.mark = gc_color_red;
++ c_7321726.hdr.grayed = 0;
++c_7321726.tag = closureN_tag;
++ c_7321726.fn = (function_type)__lambda_970;
++c_7321726.num_args = 1;
++c_7321726.num_elements = 15;
++c_7321726.elements = (object *)e_7321816;
++c_7321726.elements[0] = ((closureN)self_7312548)->elements[0];
++c_7321726.elements[1] = ((closureN)self_7312548)->elements[2];
++c_7321726.elements[2] = ((closureN)self_7312548)->elements[3];
++c_7321726.elements[3] = ((closureN)self_7312548)->elements[4];
++c_7321726.elements[4] = ((closureN)self_7312548)->elements[5];
++c_7321726.elements[5] = ((closureN)self_7312548)->elements[6];
++c_7321726.elements[6] = ((closureN)self_7312548)->elements[7];
++c_7321726.elements[7] = ((closureN)self_7312548)->elements[8];
++c_7321726.elements[8] = ((closureN)self_7312548)->elements[10];
++c_7321726.elements[9] = ((closureN)self_7312548)->elements[11];
++c_7321726.elements[10] = ((closureN)self_7312548)->elements[13];
++c_7321726.elements[11] = ((closureN)self_7312548)->elements[14];
++c_7321726.elements[12] = ((closureN)self_7312548)->elements[16];
++c_7321726.elements[13] = ((closureN)self_7312548)->elements[17];
++c_7321726.elements[14] = ((closureN)self_7312548)->elements[18];
++
++
++
++
++list_2_type local_7321822; 
++
++complex_num_type local_7321827; 
++return_closcall6(data,  car(((closureN)self_7312548)->elements[12]),  &c_7321726, Cyc_car(data, ((closureN)self_7312548)->elements[15]), Cyc_fast_list_2(&local_7321822, ((closureN)self_7312548)->elements[1], ((closureN)self_7312548)->elements[18]), Cyc_fast_sum(data,&local_7321827, ((closureN)self_7312548)->elements[9], obj_int2obj(1)), NULL, r_736079);; 
++}
++
++static void __lambda_970(void *data, object self_7312549, int argc, object *args) /* object self_7312549, object once_731332_733248 */
++ {
++ object once_731332_733248 = args[0];
++  
++closureN_type c_7321728;
++object e_7321805 [15];
++c_7321728.hdr.mark = gc_color_red;
++ c_7321728.hdr.grayed = 0;
++c_7321728.tag = closureN_tag;
++ c_7321728.fn = (function_type)__lambda_971;
++c_7321728.num_args = 1;
++c_7321728.num_elements = 15;
++c_7321728.elements = (object *)e_7321805;
++c_7321728.elements[0] = ((closureN)self_7312549)->elements[0];
++c_7321728.elements[1] = ((closureN)self_7312549)->elements[1];
++c_7321728.elements[2] = ((closureN)self_7312549)->elements[2];
++c_7321728.elements[3] = ((closureN)self_7312549)->elements[3];
++c_7321728.elements[4] = ((closureN)self_7312549)->elements[4];
++c_7321728.elements[5] = ((closureN)self_7312549)->elements[5];
++c_7321728.elements[6] = ((closureN)self_7312549)->elements[7];
++c_7321728.elements[7] = ((closureN)self_7312549)->elements[8];
++c_7321728.elements[8] = ((closureN)self_7312549)->elements[9];
++c_7321728.elements[9] = ((closureN)self_7312549)->elements[10];
++c_7321728.elements[10] = ((closureN)self_7312549)->elements[11];
++c_7321728.elements[11] = once_731332_733248;
++c_7321728.elements[12] = ((closureN)self_7312549)->elements[12];
++c_7321728.elements[13] = ((closureN)self_7312549)->elements[13];
++c_7321728.elements[14] = ((closureN)self_7312549)->elements[14];
++
++
++closureN_type c_7321806;
++object e_7321815 [1];
++c_7321806.hdr.mark = gc_color_red;
++ c_7321806.hdr.grayed = 0;
++c_7321806.tag = closureN_tag;
++ c_7321806.fn = (function_type)__lambda_979;
++c_7321806.num_args = 1;
++c_7321806.num_elements = 1;
++c_7321806.elements = (object *)e_7321815;
++c_7321806.elements[0] = ((closureN)self_7312549)->elements[6];
++
++return_direct_with_clo1(data,(closure)&c_7321728,__lambda_971,  &c_7321806);; 
++}
++
++static void __lambda_979(void *data, object self_7312550, int argc, object *args) /* object self_7312550, object k_736072, object x_731334_733249 */
++ {
++ object k_736072 = args[0]; object x_731334_733249 = args[1];
++  
++list_2_type local_7321810; 
++
++list_2_type local_7321813; 
++return_direct_with_clo1(data,  k_736072, (((closure)  k_736072)->fn),  Cyc_fast_list_2(&local_7321810, x_731334_733249, Cyc_fast_list_2(&local_7321813, ((closureN)self_7312550)->elements[0], NULL)));; 
++}
++
++static void __lambda_971(void *data, object self_7312551, int argc, object *args) /* object self_7312551, object r_736071 */
++ {
++ object r_736071 = args[0];
++  
++closureN_type c_7321730;
++object e_7321803 [15];
++c_7321730.hdr.mark = gc_color_red;
++ c_7321730.hdr.grayed = 0;
++c_7321730.tag = closureN_tag;
++ c_7321730.fn = (function_type)__lambda_972;
++c_7321730.num_args = 1;
++c_7321730.num_elements = 15;
++c_7321730.elements = (object *)e_7321803;
++c_7321730.elements[0] = ((closureN)self_7312551)->elements[0];
++c_7321730.elements[1] = ((closureN)self_7312551)->elements[1];
++c_7321730.elements[2] = ((closureN)self_7312551)->elements[2];
++c_7321730.elements[3] = ((closureN)self_7312551)->elements[3];
++c_7321730.elements[4] = ((closureN)self_7312551)->elements[4];
++c_7321730.elements[5] = ((closureN)self_7312551)->elements[5];
++c_7321730.elements[6] = ((closureN)self_7312551)->elements[6];
++c_7321730.elements[7] = ((closureN)self_7312551)->elements[7];
++c_7321730.elements[8] = ((closureN)self_7312551)->elements[8];
++c_7321730.elements[9] = ((closureN)self_7312551)->elements[9];
++c_7321730.elements[10] = ((closureN)self_7312551)->elements[10];
++c_7321730.elements[11] = ((closureN)self_7312551)->elements[11];
++c_7321730.elements[12] = ((closureN)self_7312551)->elements[12];
++c_7321730.elements[13] = ((closureN)self_7312551)->elements[13];
++c_7321730.elements[14] = ((closureN)self_7312551)->elements[14];
++
++return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7321730, r_736071, ((closureN)self_7312551)->elements[9]);; 
++}
++
++static void __lambda_972(void *data, object self_7312552, int argc, object *args) /* object self_7312552, object r_736070 */
++ {
++ object r_736070 = args[0];
++  
++closureN_type c_7321732;
++object e_7321790 [15];
++c_7321732.hdr.mark = gc_color_red;
++ c_7321732.hdr.grayed = 0;
++c_7321732.tag = closureN_tag;
++ c_7321732.fn = (function_type)__lambda_973;
++c_7321732.num_args = 1;
++c_7321732.num_elements = 15;
++c_7321732.elements = (object *)e_7321790;
++c_7321732.elements[0] = ((closureN)self_7312552)->elements[0];
++c_7321732.elements[1] = ((closureN)self_7312552)->elements[1];
++c_7321732.elements[2] = ((closureN)self_7312552)->elements[2];
++c_7321732.elements[3] = ((closureN)self_7312552)->elements[3];
++c_7321732.elements[4] = ((closureN)self_7312552)->elements[4];
++c_7321732.elements[5] = ((closureN)self_7312552)->elements[5];
++c_7321732.elements[6] = ((closureN)self_7312552)->elements[7];
++c_7321732.elements[7] = ((closureN)self_7312552)->elements[8];
++c_7321732.elements[8] = ((closureN)self_7312552)->elements[9];
++c_7321732.elements[9] = ((closureN)self_7312552)->elements[10];
++c_7321732.elements[10] = ((closureN)self_7312552)->elements[11];
++c_7321732.elements[11] = r_736070;
++c_7321732.elements[12] = ((closureN)self_7312552)->elements[12];
++c_7321732.elements[13] = ((closureN)self_7312552)->elements[13];
++c_7321732.elements[14] = ((closureN)self_7312552)->elements[14];
++
++
++closureN_type c_7321791;
++object e_7321802 [1];
++c_7321791.hdr.mark = gc_color_red;
++ c_7321791.hdr.grayed = 0;
++c_7321791.tag = closureN_tag;
++ c_7321791.fn = (function_type)__lambda_978;
++c_7321791.num_args = 2;
++c_7321791.num_elements = 1;
++c_7321791.elements = (object *)e_7321802;
++c_7321791.elements[0] = ((closureN)self_7312552)->elements[6];
++
++return_direct_with_clo1(data,(closure)&c_7321732,__lambda_973,  &c_7321791);; 
++}
++
++static void __lambda_978(void *data, object self_7312553, int argc, object *args) /* object self_7312553, object k_736066, object x_731335_733250, object l_731336_733251 */
++ {
++ object k_736066 = args[0]; object x_731335_733250 = args[1]; object l_731336_733251 = args[2];
++  
++list_2_type local_7321795; 
++
++
++
++list_2_type local_7321800; 
++return_direct_with_clo1(data,  k_736066, (((closure)  k_736066)->fn),  Cyc_fast_list_2(&local_7321795, Cyc_car(data, x_731335_733250), Cyc_fast_list_2(&local_7321800, ((closureN)self_7312553)->elements[0], l_731336_733251)));; 
++}
++
++static void __lambda_973(void *data, object self_7312554, int argc, object *args) /* object self_7312554, object r_736065 */
++ {
++ object r_736065 = args[0];
++  
++closureN_type c_7321734;
++object e_7321787 [14];
++c_7321734.hdr.mark = gc_color_red;
++ c_7321734.hdr.grayed = 0;
++c_7321734.tag = closureN_tag;
++ c_7321734.fn = (function_type)__lambda_974;
++c_7321734.num_args = 1;
++c_7321734.num_elements = 14;
++c_7321734.elements = (object *)e_7321787;
++c_7321734.elements[0] = ((closureN)self_7312554)->elements[0];
++c_7321734.elements[1] = ((closureN)self_7312554)->elements[1];
++c_7321734.elements[2] = ((closureN)self_7312554)->elements[2];
++c_7321734.elements[3] = ((closureN)self_7312554)->elements[3];
++c_7321734.elements[4] = ((closureN)self_7312554)->elements[4];
++c_7321734.elements[5] = ((closureN)self_7312554)->elements[5];
++c_7321734.elements[6] = ((closureN)self_7312554)->elements[6];
++c_7321734.elements[7] = ((closureN)self_7312554)->elements[7];
++c_7321734.elements[8] = ((closureN)self_7312554)->elements[9];
++c_7321734.elements[9] = ((closureN)self_7312554)->elements[10];
++c_7321734.elements[10] = ((closureN)self_7312554)->elements[11];
++c_7321734.elements[11] = ((closureN)self_7312554)->elements[12];
++c_7321734.elements[12] = ((closureN)self_7312554)->elements[13];
++c_7321734.elements[13] = ((closureN)self_7312554)->elements[14];
++
++return_direct_with_clo4(data,  __glo_Cyc_91map_91loop_912_scheme_base, (((closure)  __glo_Cyc_91map_91loop_912_scheme_base)->fn),  &c_7321734, r_736065, ((closureN)self_7312554)->elements[9], ((closureN)self_7312554)->elements[8]);; 
++}
++
++static void __lambda_974(void *data, object self_7312555, int argc, object *args) /* object self_7312555, object r_736062 */
++ {
++ object r_736062 = args[0];
++  
++closureN_type c_7321736;
++object e_7321784 [13];
++c_7321736.hdr.mark = gc_color_red;
++ c_7321736.hdr.grayed = 0;
++c_7321736.tag = closureN_tag;
++ c_7321736.fn = (function_type)__lambda_975;
++c_7321736.num_args = 1;
++c_7321736.num_elements = 13;
++c_7321736.elements = (object *)e_7321784;
++c_7321736.elements[0] = ((closureN)self_7312555)->elements[0];
++c_7321736.elements[1] = ((closureN)self_7312555)->elements[1];
++c_7321736.elements[2] = ((closureN)self_7312555)->elements[2];
++c_7321736.elements[3] = ((closureN)self_7312555)->elements[3];
++c_7321736.elements[4] = ((closureN)self_7312555)->elements[4];
++c_7321736.elements[5] = ((closureN)self_7312555)->elements[5];
++c_7321736.elements[6] = ((closureN)self_7312555)->elements[6];
++c_7321736.elements[7] = ((closureN)self_7312555)->elements[7];
++c_7321736.elements[8] = ((closureN)self_7312555)->elements[9];
++c_7321736.elements[9] = r_736062;
++c_7321736.elements[10] = ((closureN)self_7312555)->elements[10];
++c_7321736.elements[11] = ((closureN)self_7312555)->elements[11];
++c_7321736.elements[12] = ((closureN)self_7312555)->elements[13];
++
++return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7321736, ((closureN)self_7312555)->elements[8], ((closureN)self_7312555)->elements[12]);; 
++}
++
++static void __lambda_975(void *data, object self_7312556, int argc, object *args) /* object self_7312556, object r_736064 */
++ {
++ object r_736064 = args[0];
++  
++closureN_type c_7321739;
++object e_7321783 [12];
++c_7321739.hdr.mark = gc_color_red;
++ c_7321739.hdr.grayed = 0;
++c_7321739.tag = closureN_tag;
++ c_7321739.fn = (function_type)__lambda_976;
++c_7321739.num_args = 1;
++c_7321739.num_elements = 12;
++c_7321739.elements = (object *)e_7321783;
++c_7321739.elements[0] = ((closureN)self_7312556)->elements[0];
++c_7321739.elements[1] = ((closureN)self_7312556)->elements[1];
++c_7321739.elements[2] = ((closureN)self_7312556)->elements[2];
++c_7321739.elements[3] = ((closureN)self_7312556)->elements[3];
++c_7321739.elements[4] = ((closureN)self_7312556)->elements[4];
++c_7321739.elements[5] = ((closureN)self_7312556)->elements[5];
++c_7321739.elements[6] = ((closureN)self_7312556)->elements[7];
++c_7321739.elements[7] = ((closureN)self_7312556)->elements[8];
++c_7321739.elements[8] = ((closureN)self_7312556)->elements[9];
++c_7321739.elements[9] = ((closureN)self_7312556)->elements[10];
++c_7321739.elements[10] = ((closureN)self_7312556)->elements[11];
++c_7321739.elements[11] = ((closureN)self_7312556)->elements[12];
++
++return_closcall2(data,  ((closureN)self_7312556)->elements[6],  &c_7321739, r_736064);; 
++}
++
++static void __lambda_976(void *data, object self_7312557, int argc, object *args) /* object self_7312557, object r_736063 */
++ {
++ object r_736063 = args[0];
++  
++closureN_type c_7321741;
++object e_7321777 [11];
++c_7321741.hdr.mark = gc_color_red;
++ c_7321741.hdr.grayed = 0;
++c_7321741.tag = closureN_tag;
++ c_7321741.fn = (function_type)__lambda_977;
++c_7321741.num_args = 1;
++c_7321741.num_elements = 11;
++c_7321741.elements = (object *)e_7321777;
++c_7321741.elements[0] = ((closureN)self_7312557)->elements[0];
++c_7321741.elements[1] = ((closureN)self_7312557)->elements[1];
++c_7321741.elements[2] = ((closureN)self_7312557)->elements[2];
++c_7321741.elements[3] = ((closureN)self_7312557)->elements[3];
++c_7321741.elements[4] = ((closureN)self_7312557)->elements[4];
++c_7321741.elements[5] = ((closureN)self_7312557)->elements[5];
++c_7321741.elements[6] = ((closureN)self_7312557)->elements[6];
++c_7321741.elements[7] = ((closureN)self_7312557)->elements[7];
++c_7321741.elements[8] = ((closureN)self_7312557)->elements[9];
++c_7321741.elements[9] = ((closureN)self_7312557)->elements[10];
++c_7321741.elements[10] = ((closureN)self_7312557)->elements[11];
++
++
++list_3_type local_7321780; 
++return_direct_with_clo1(data,(closure)&c_7321741,__lambda_977,  Cyc_fast_list_3(&local_7321780, ((closureN)self_7312557)->elements[2], ((closureN)self_7312557)->elements[8], r_736063));; 
++}
++
++static void __lambda_977(void *data, object self_7312558, int argc, object *args) /* object self_7312558, object r_736059 */
++ {
++ object r_736059 = args[0];
++  
++list_4_type local_7321746; 
++
++pair_type local_7321751; 
++
++list_2_type local_7321754; 
++
++list_4_type local_7321760; 
++
++list_2_type local_7321764; 
++
++list_3_type local_7321769; 
++
++list_2_type local_7321773; 
++return_direct_with_clo1(data,  ((closureN)self_7312558)->elements[6], (((closure)  ((closureN)self_7312558)->elements[6])->fn),  Cyc_fast_list_4(&local_7321746, ((closureN)self_7312558)->elements[2], ((closureN)self_7312558)->elements[3], set_pair_as_expr(&local_7321751, Cyc_fast_list_2(&local_7321754, ((closureN)self_7312558)->elements[10], ((closureN)self_7312558)->elements[9]), ((closureN)self_7312558)->elements[8]), Cyc_fast_list_4(&local_7321760, ((closureN)self_7312558)->elements[1], Cyc_fast_list_2(&local_7321764, ((closureN)self_7312558)->elements[4], ((closureN)self_7312558)->elements[10]), r_736059, Cyc_fast_list_3(&local_7321769, ((closureN)self_7312558)->elements[0], Cyc_fast_list_2(&local_7321773, ((closureN)self_7312558)->elements[5], ((closureN)self_7312558)->elements[10]), ((closureN)self_7312558)->elements[7]))));; 
++}
++
++static void __lambda_963(void *data, object self_7312534, int argc, object *args) /* object self_7312534, object r_736044 */
++ {
++ object r_736044 = args[0];
++  
++list_3_type local_7321665; 
++
++list_2_type local_7321669; 
++
++list_3_type local_7321674; 
++
++pair_type local_7321678; 
++
++list_2_type local_7321681; 
++
++
++return_direct_with_clo1(data,  ((closureN)self_7312534)->elements[3], (((closure)  ((closureN)self_7312534)->elements[3])->fn),  Cyc_fast_list_3(&local_7321665, ((closureN)self_7312534)->elements[0], Cyc_fast_list_2(&local_7321669, ((closureN)self_7312534)->elements[2], ((closureN)self_7312534)->elements[5]), Cyc_fast_list_3(&local_7321674, ((closureN)self_7312534)->elements[1], set_cell_as_expr(&local_7321678, Cyc_fast_list_2(&local_7321681, Cyc_car(data, ((closureN)self_7312534)->elements[4]), ((closureN)self_7312534)->elements[5])), r_736044)));; 
++}
++
++static void __lambda_959(void *data, object self_7312525, int argc, object *args) /* object self_7312525, object k_736037, object l_731290_733240 */
++ {
++ object k_736037 = args[0]; object l_731290_733240 = args[1];
++  return_closcall3(data,  ((closureN)self_7312525)->elements[0],  k_736037, ((closureN)self_7312525)->elements[1], l_731290_733240);; 
++}
++
++static void __lambda_954(void *data, object self_7312526, int argc, object *args) /* object self_7312526, object r_736036 */
++ {
++ object r_736036 = args[0];
++  
++closureN_type c_7321578;
++object e_7321635 [11];
++c_7321578.hdr.mark = gc_color_red;
++ c_7321578.hdr.grayed = 0;
++c_7321578.tag = closureN_tag;
++ c_7321578.fn = (function_type)__lambda_955;
++c_7321578.num_args = 1;
++c_7321578.num_elements = 11;
++c_7321578.elements = (object *)e_7321635;
++c_7321578.elements[0] = ((closureN)self_7312526)->elements[0];
++c_7321578.elements[1] = ((closureN)self_7312526)->elements[1];
++c_7321578.elements[2] = ((closureN)self_7312526)->elements[2];
++c_7321578.elements[3] = ((closureN)self_7312526)->elements[3];
++c_7321578.elements[4] = ((closureN)self_7312526)->elements[4];
++c_7321578.elements[5] = ((closureN)self_7312526)->elements[5];
++c_7321578.elements[6] = ((closureN)self_7312526)->elements[6];
++c_7321578.elements[7] = ((closureN)self_7312526)->elements[7];
++c_7321578.elements[8] = ((closureN)self_7312526)->elements[9];
++c_7321578.elements[9] = ((closureN)self_7312526)->elements[10];
++c_7321578.elements[10] = ((closureN)self_7312526)->elements[11];
++
++
++
++return_direct_with_clo3(data,  __glo_any_scheme_base, (((closure)  __glo_any_scheme_base)->fn),  &c_7321578, r_736036, car(((closureN)self_7312526)->elements[8]));; 
++}
++
++static void __lambda_955(void *data, object self_7312527, int argc, object *args) /* object self_7312527, object r_736026 */
++ {
++ object r_736026 = args[0];
++  if( (boolean_f != r_736026) ){ 
++  
++closureN_type c_7321580;
++object e_7321602 [7];
++c_7321580.hdr.mark = gc_color_red;
++ c_7321580.hdr.grayed = 0;
++c_7321580.tag = closureN_tag;
++ c_7321580.fn = (function_type)__lambda_956;
++c_7321580.num_args = 1;
++c_7321580.num_elements = 7;
++c_7321580.elements = (object *)e_7321602;
++c_7321580.elements[0] = ((closureN)self_7312527)->elements[0];
++c_7321580.elements[1] = ((closureN)self_7312527)->elements[1];
++c_7321580.elements[2] = ((closureN)self_7312527)->elements[4];
++c_7321580.elements[3] = ((closureN)self_7312527)->elements[6];
++c_7321580.elements[4] = ((closureN)self_7312527)->elements[7];
++c_7321580.elements[5] = ((closureN)self_7312527)->elements[9];
++c_7321580.elements[6] = ((closureN)self_7312527)->elements[10];
++
++
++list_2_type local_7321605; 
++return_direct_with_clo1(data,(closure)&c_7321580,__lambda_956,  Cyc_fast_list_2(&local_7321605, ((closureN)self_7312527)->elements[3], ((closureN)self_7312527)->elements[8]));
++} else { 
++  
++closureN_type c_7321610;
++object e_7321625 [4];
++c_7321610.hdr.mark = gc_color_red;
++ c_7321610.hdr.grayed = 0;
++c_7321610.tag = closureN_tag;
++ c_7321610.fn = (function_type)__lambda_958;
++c_7321610.num_args = 1;
++c_7321610.num_elements = 4;
++c_7321610.elements = (object *)e_7321625;
++c_7321610.elements[0] = ((closureN)self_7312527)->elements[2];
++c_7321610.elements[1] = ((closureN)self_7312527)->elements[7];
++c_7321610.elements[2] = ((closureN)self_7312527)->elements[8];
++c_7321610.elements[3] = ((closureN)self_7312527)->elements[9];
++
++
++pair_type local_7321628; 
++
++pair_type local_7321631; 
++return_closcall2(data,  ((closureN)self_7312527)->elements[6],  &c_7321610, set_pair_as_expr(&local_7321628, set_pair_as_expr(&local_7321631, ((closureN)self_7312527)->elements[8], ((closureN)self_7312527)->elements[5]), ((closureN)self_7312527)->elements[10]));}
++;; 
++}
++
++static void __lambda_958(void *data, object self_7312530, int argc, object *args) /* object self_7312530, object r_736032 */
++ {
++ object r_736032 = args[0];
++  
++list_3_type local_7321615; 
++
++pair_type local_7321619; 
++
++list_2_type local_7321622; 
++return_direct_with_clo1(data,  ((closureN)self_7312530)->elements[1], (((closure)  ((closureN)self_7312530)->elements[1])->fn),  Cyc_fast_list_3(&local_7321615, ((closureN)self_7312530)->elements[0], set_cell_as_expr(&local_7321619, Cyc_fast_list_2(&local_7321622, ((closureN)self_7312530)->elements[2], ((closureN)self_7312530)->elements[3])), r_736032));; 
++}
++
++static void __lambda_956(void *data, object self_7312528, int argc, object *args) /* object self_7312528, object r_736030 */
++ {
++ object r_736030 = args[0];
++  
++closureN_type c_7321583;
++object e_7321600 [6];
++c_7321583.hdr.mark = gc_color_red;
++ c_7321583.hdr.grayed = 0;
++c_7321583.tag = closureN_tag;
++ c_7321583.fn = (function_type)__lambda_957;
++c_7321583.num_args = 1;
++c_7321583.num_elements = 6;
++c_7321583.elements = (object *)e_7321600;
++c_7321583.elements[0] = ((closureN)self_7312528)->elements[0];
++c_7321583.elements[1] = ((closureN)self_7312528)->elements[1];
++c_7321583.elements[2] = ((closureN)self_7312528)->elements[2];
++c_7321583.elements[3] = ((closureN)self_7312528)->elements[4];
++c_7321583.elements[4] = r_736030;
++c_7321583.elements[5] = ((closureN)self_7312528)->elements[5];
++
++return_closcall2(data,  ((closureN)self_7312528)->elements[3],  &c_7321583, ((closureN)self_7312528)->elements[6]);; 
++}
++
++static void __lambda_957(void *data, object self_7312529, int argc, object *args) /* object self_7312529, object r_736028 */
++ {
++ object r_736028 = args[0];
++  
++list_3_type local_7321588; 
++
++list_3_type local_7321592; 
++
++list_2_type local_7321597; 
++return_direct_with_clo1(data,  ((closureN)self_7312529)->elements[3], (((closure)  ((closureN)self_7312529)->elements[3])->fn),  Cyc_fast_list_3(&local_7321588, ((closureN)self_7312529)->elements[0], Cyc_fast_list_3(&local_7321592, ((closureN)self_7312529)->elements[1], ((closureN)self_7312529)->elements[5], Cyc_fast_list_2(&local_7321597, ((closureN)self_7312529)->elements[2], ((closureN)self_7312529)->elements[4])), r_736028));; 
++}
++
++static void __lambda_948(void *data, object self_7312574, int argc, object *args) /* object self_7312574, object r_736019 */
++ {
++ object r_736019 = args[0];
++  
++closureN_type c_7321550;
++object e_7321560 [6];
++c_7321550.hdr.mark = gc_color_red;
++ c_7321550.hdr.grayed = 0;
++c_7321550.tag = closureN_tag;
++ c_7321550.fn = (function_type)__lambda_949;
++c_7321550.num_args = 1;
++c_7321550.num_elements = 6;
++c_7321550.elements = (object *)e_7321560;
++c_7321550.elements[0] = ((closureN)self_7312574)->elements[0];
++c_7321550.elements[1] = ((closureN)self_7312574)->elements[1];
++c_7321550.elements[2] = ((closureN)self_7312574)->elements[2];
++c_7321550.elements[3] = ((closureN)self_7312574)->elements[3];
++c_7321550.elements[4] = ((closureN)self_7312574)->elements[4];
++c_7321550.elements[5] = ((closureN)self_7312574)->elements[5];
++
++
++
++return_direct_with_clo1(data,(closure)&c_7321550,__lambda_949,  Cyc_set_cell(data, ((closureN)self_7312574)->elements[2], r_736019));; 
++}
++
++static void __lambda_949(void *data, object self_7312575, int argc, object *args) /* object self_7312575, object r_736018 */
++ {
++
++  
++
++return_closcall6(data,  car(((closureN)self_7312575)->elements[2]),  ((closureN)self_7312575)->elements[1], ((closureN)self_7312575)->elements[3], ((closureN)self_7312575)->elements[5], obj_int2obj(0), ((closureN)self_7312575)->elements[4], ((closureN)self_7312575)->elements[0]);; 
++}
++
++static void __lambda_846(void *data, object self_7312576, int argc, object *args) /* object self_7312576, object r_736012 */
++ {
++ object r_736012 = args[0];
++  
++closureN_type c_7320682;
++object e_7321533 [29];
++c_7320682.hdr.mark = gc_color_red;
++ c_7320682.hdr.grayed = 0;
++c_7320682.tag = closureN_tag;
++ c_7320682.fn = (function_type)__lambda_847;
++c_7320682.num_args = 1;
++c_7320682.num_elements = 29;
++c_7320682.elements = (object *)e_7321533;
++c_7320682.elements[0] = ((closureN)self_7312576)->elements[0];
++c_7320682.elements[1] = ((closureN)self_7312576)->elements[1];
++c_7320682.elements[2] = ((closureN)self_7312576)->elements[2];
++c_7320682.elements[3] = ((closureN)self_7312576)->elements[3];
++c_7320682.elements[4] = ((closureN)self_7312576)->elements[4];
++c_7320682.elements[5] = ((closureN)self_7312576)->elements[5];
++c_7320682.elements[6] = ((closureN)self_7312576)->elements[6];
++c_7320682.elements[7] = ((closureN)self_7312576)->elements[7];
++c_7320682.elements[8] = ((closureN)self_7312576)->elements[8];
++c_7320682.elements[9] = ((closureN)self_7312576)->elements[9];
++c_7320682.elements[10] = ((closureN)self_7312576)->elements[10];
++c_7320682.elements[11] = ((closureN)self_7312576)->elements[11];
++c_7320682.elements[12] = ((closureN)self_7312576)->elements[12];
++c_7320682.elements[13] = ((closureN)self_7312576)->elements[13];
++c_7320682.elements[14] = ((closureN)self_7312576)->elements[14];
++c_7320682.elements[15] = ((closureN)self_7312576)->elements[15];
++c_7320682.elements[16] = ((closureN)self_7312576)->elements[16];
++c_7320682.elements[17] = ((closureN)self_7312576)->elements[17];
++c_7320682.elements[18] = ((closureN)self_7312576)->elements[18];
++c_7320682.elements[19] = ((closureN)self_7312576)->elements[19];
++c_7320682.elements[20] = ((closureN)self_7312576)->elements[20];
++c_7320682.elements[21] = ((closureN)self_7312576)->elements[21];
++c_7320682.elements[22] = ((closureN)self_7312576)->elements[22];
++c_7320682.elements[23] = ((closureN)self_7312576)->elements[23];
++c_7320682.elements[24] = ((closureN)self_7312576)->elements[24];
++c_7320682.elements[25] = ((closureN)self_7312576)->elements[25];
++c_7320682.elements[26] = ((closureN)self_7312576)->elements[26];
++c_7320682.elements[27] = ((closureN)self_7312576)->elements[27];
++c_7320682.elements[28] = ((closureN)self_7312576)->elements[28];
++
++
++
++return_direct_with_clo1(data,(closure)&c_7320682,__lambda_847,  Cyc_set_cell(data, ((closureN)self_7312576)->elements[22], r_736012));; 
++}
++
++static void __lambda_847(void *data, object self_7312577, int argc, object *args) /* object self_7312577, object r_735865 */
++ {
++
++  
++closureN_type c_7320684;
++object e_7321520 [29];
++c_7320684.hdr.mark = gc_color_red;
++ c_7320684.hdr.grayed = 0;
++c_7320684.tag = closureN_tag;
++ c_7320684.fn = (function_type)__lambda_848;
++c_7320684.num_args = 1;
++c_7320684.num_elements = 29;
++c_7320684.elements = (object *)e_7321520;
++c_7320684.elements[0] = ((closureN)self_7312577)->elements[0];
++c_7320684.elements[1] = ((closureN)self_7312577)->elements[1];
++c_7320684.elements[2] = ((closureN)self_7312577)->elements[2];
++c_7320684.elements[3] = ((closureN)self_7312577)->elements[3];
++c_7320684.elements[4] = ((closureN)self_7312577)->elements[4];
++c_7320684.elements[5] = ((closureN)self_7312577)->elements[5];
++c_7320684.elements[6] = ((closureN)self_7312577)->elements[6];
++c_7320684.elements[7] = ((closureN)self_7312577)->elements[7];
++c_7320684.elements[8] = ((closureN)self_7312577)->elements[8];
++c_7320684.elements[9] = ((closureN)self_7312577)->elements[9];
++c_7320684.elements[10] = ((closureN)self_7312577)->elements[10];
++c_7320684.elements[11] = ((closureN)self_7312577)->elements[11];
++c_7320684.elements[12] = ((closureN)self_7312577)->elements[12];
++c_7320684.elements[13] = ((closureN)self_7312577)->elements[13];
++c_7320684.elements[14] = ((closureN)self_7312577)->elements[14];
++c_7320684.elements[15] = ((closureN)self_7312577)->elements[15];
++c_7320684.elements[16] = ((closureN)self_7312577)->elements[16];
++c_7320684.elements[17] = ((closureN)self_7312577)->elements[17];
++c_7320684.elements[18] = ((closureN)self_7312577)->elements[18];
++c_7320684.elements[19] = ((closureN)self_7312577)->elements[19];
++c_7320684.elements[20] = ((closureN)self_7312577)->elements[20];
++c_7320684.elements[21] = ((closureN)self_7312577)->elements[21];
++c_7320684.elements[22] = ((closureN)self_7312577)->elements[22];
++c_7320684.elements[23] = ((closureN)self_7312577)->elements[23];
++c_7320684.elements[24] = ((closureN)self_7312577)->elements[24];
++c_7320684.elements[25] = ((closureN)self_7312577)->elements[25];
++c_7320684.elements[26] = ((closureN)self_7312577)->elements[26];
++c_7320684.elements[27] = ((closureN)self_7312577)->elements[27];
++c_7320684.elements[28] = ((closureN)self_7312577)->elements[28];
++
++
++closureN_type c_7321521;
++object e_7321532 [2];
++c_7321521.hdr.mark = gc_color_red;
++ c_7321521.hdr.grayed = 0;
++c_7321521.tag = closureN_tag;
++ c_7321521.fn = (function_type)__lambda_943;
++c_7321521.num_args = 1;
++c_7321521.num_elements = 2;
++c_7321521.elements = (object *)e_7321532;
++c_7321521.elements[0] = ((closureN)self_7312577)->elements[16];
++c_7321521.elements[1] = ((closureN)self_7312577)->elements[17];
++
++return_direct_with_clo1(data,(closure)&c_7320684,__lambda_848,  &c_7321521);; 
++}
++
++static void __lambda_943(void *data, object self_7312578, int argc, object *args) /* object self_7312578, object k_736009, object x_731353_733258 */
++ {
++ object k_736009 = args[0]; object x_731353_733258 = args[1];
++    
++if( (boolean_f != Cyc_is_pair(x_731353_733258)) ){ 
++  
++
++
++
++return_closcall3(data,  ((closureN)self_7312578)->elements[0],  k_736009, car(((closureN)self_7312578)->elements[1]), Cyc_car(data, x_731353_733258));
++} else { 
++  return_direct_with_clo1(data,  k_736009, (((closure)  k_736009)->fn),  boolean_f);}
++;; 
++}
++
++static void __lambda_848(void *data, object self_7312579, int argc, object *args) /* object self_7312579, object r_736008 */
++ {
++ object r_736008 = args[0];
++  
++closureN_type c_7320686;
++object e_7321516 [29];
++c_7320686.hdr.mark = gc_color_red;
++ c_7320686.hdr.grayed = 0;
++c_7320686.tag = closureN_tag;
++ c_7320686.fn = (function_type)__lambda_849;
++c_7320686.num_args = 1;
++c_7320686.num_elements = 29;
++c_7320686.elements = (object *)e_7321516;
++c_7320686.elements[0] = ((closureN)self_7312579)->elements[0];
++c_7320686.elements[1] = ((closureN)self_7312579)->elements[1];
++c_7320686.elements[2] = ((closureN)self_7312579)->elements[2];
++c_7320686.elements[3] = ((closureN)self_7312579)->elements[3];
++c_7320686.elements[4] = ((closureN)self_7312579)->elements[4];
++c_7320686.elements[5] = ((closureN)self_7312579)->elements[5];
++c_7320686.elements[6] = ((closureN)self_7312579)->elements[6];
++c_7320686.elements[7] = ((closureN)self_7312579)->elements[7];
++c_7320686.elements[8] = ((closureN)self_7312579)->elements[8];
++c_7320686.elements[9] = ((closureN)self_7312579)->elements[9];
++c_7320686.elements[10] = ((closureN)self_7312579)->elements[10];
++c_7320686.elements[11] = ((closureN)self_7312579)->elements[11];
++c_7320686.elements[12] = ((closureN)self_7312579)->elements[12];
++c_7320686.elements[13] = ((closureN)self_7312579)->elements[13];
++c_7320686.elements[14] = ((closureN)self_7312579)->elements[14];
++c_7320686.elements[15] = ((closureN)self_7312579)->elements[15];
++c_7320686.elements[16] = ((closureN)self_7312579)->elements[16];
++c_7320686.elements[17] = ((closureN)self_7312579)->elements[17];
++c_7320686.elements[18] = ((closureN)self_7312579)->elements[18];
++c_7320686.elements[19] = ((closureN)self_7312579)->elements[19];
++c_7320686.elements[20] = ((closureN)self_7312579)->elements[20];
++c_7320686.elements[21] = ((closureN)self_7312579)->elements[21];
++c_7320686.elements[22] = ((closureN)self_7312579)->elements[22];
++c_7320686.elements[23] = ((closureN)self_7312579)->elements[23];
++c_7320686.elements[24] = ((closureN)self_7312579)->elements[24];
++c_7320686.elements[25] = ((closureN)self_7312579)->elements[25];
++c_7320686.elements[26] = ((closureN)self_7312579)->elements[26];
++c_7320686.elements[27] = ((closureN)self_7312579)->elements[27];
++c_7320686.elements[28] = ((closureN)self_7312579)->elements[28];
++
++
++
++return_direct_with_clo1(data,(closure)&c_7320686,__lambda_849,  Cyc_set_cell(data, ((closureN)self_7312579)->elements[19], r_736008));; 
++}
++
++static void __lambda_849(void *data, object self_7312580, int argc, object *args) /* object self_7312580, object r_735866 */
++ {
++
++  
++closureN_type c_7320688;
++object e_7321498 [28];
++c_7320688.hdr.mark = gc_color_red;
++ c_7320688.hdr.grayed = 0;
++c_7320688.tag = closureN_tag;
++ c_7320688.fn = (function_type)__lambda_850;
++c_7320688.num_args = 1;
++c_7320688.num_elements = 28;
++c_7320688.elements = (object *)e_7321498;
++c_7320688.elements[0] = ((closureN)self_7312580)->elements[0];
++c_7320688.elements[1] = ((closureN)self_7312580)->elements[1];
++c_7320688.elements[2] = ((closureN)self_7312580)->elements[2];
++c_7320688.elements[3] = ((closureN)self_7312580)->elements[3];
++c_7320688.elements[4] = ((closureN)self_7312580)->elements[4];
++c_7320688.elements[5] = ((closureN)self_7312580)->elements[5];
++c_7320688.elements[6] = ((closureN)self_7312580)->elements[6];
++c_7320688.elements[7] = ((closureN)self_7312580)->elements[7];
++c_7320688.elements[8] = ((closureN)self_7312580)->elements[8];
++c_7320688.elements[9] = ((closureN)self_7312580)->elements[9];
++c_7320688.elements[10] = ((closureN)self_7312580)->elements[10];
++c_7320688.elements[11] = ((closureN)self_7312580)->elements[11];
++c_7320688.elements[12] = ((closureN)self_7312580)->elements[12];
++c_7320688.elements[13] = ((closureN)self_7312580)->elements[13];
++c_7320688.elements[14] = ((closureN)self_7312580)->elements[14];
++c_7320688.elements[15] = ((closureN)self_7312580)->elements[15];
++c_7320688.elements[16] = ((closureN)self_7312580)->elements[16];
++c_7320688.elements[17] = ((closureN)self_7312580)->elements[18];
++c_7320688.elements[18] = ((closureN)self_7312580)->elements[19];
++c_7320688.elements[19] = ((closureN)self_7312580)->elements[20];
++c_7320688.elements[20] = ((closureN)self_7312580)->elements[21];
++c_7320688.elements[21] = ((closureN)self_7312580)->elements[22];
++c_7320688.elements[22] = ((closureN)self_7312580)->elements[23];
++c_7320688.elements[23] = ((closureN)self_7312580)->elements[24];
++c_7320688.elements[24] = ((closureN)self_7312580)->elements[25];
++c_7320688.elements[25] = ((closureN)self_7312580)->elements[26];
++c_7320688.elements[26] = ((closureN)self_7312580)->elements[27];
++c_7320688.elements[27] = ((closureN)self_7312580)->elements[28];
++
++
++closureN_type c_7321499;
++object e_7321515 [2];
++c_7321499.hdr.mark = gc_color_red;
++ c_7321499.hdr.grayed = 0;
++c_7321499.tag = closureN_tag;
++ c_7321499.fn = (function_type)__lambda_942;
++c_7321499.num_args = 1;
++c_7321499.num_elements = 2;
++c_7321499.elements = (object *)e_7321515;
++c_7321499.elements[0] = ((closureN)self_7312580)->elements[16];
++c_7321499.elements[1] = ((closureN)self_7312580)->elements[17];
++
++return_direct_with_clo1(data,(closure)&c_7320688,__lambda_850,  &c_7321499);; 
++}
++
++static void __lambda_942(void *data, object self_7312581, int argc, object *args) /* object self_7312581, object k_736003, object x_731355_733259 */
++ {
++ object k_736003 = args[0]; object x_731355_733259 = args[1];
++    
++if( (boolean_f != Cyc_is_pair(x_731355_733259)) ){ 
++    
++  
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, x_731355_733259))) ){ 
++  
++
++
++
++return_closcall3(data,  ((closureN)self_7312581)->elements[0],  k_736003, car(((closureN)self_7312581)->elements[1]), Cyc_cadr(data, x_731355_733259));
++} else { 
++  return_direct_with_clo1(data,  k_736003, (((closure)  k_736003)->fn),  boolean_f);}
++;
++} else { 
++  return_direct_with_clo1(data,  k_736003, (((closure)  k_736003)->fn),  boolean_f);}
++;; 
++}
++
++static void __lambda_850(void *data, object self_7312582, int argc, object *args) /* object self_7312582, object r_736002 */
++ {
++ object r_736002 = args[0];
++  
++closureN_type c_7320690;
++object e_7321494 [28];
++c_7320690.hdr.mark = gc_color_red;
++ c_7320690.hdr.grayed = 0;
++c_7320690.tag = closureN_tag;
++ c_7320690.fn = (function_type)__lambda_851;
++c_7320690.num_args = 1;
++c_7320690.num_elements = 28;
++c_7320690.elements = (object *)e_7321494;
++c_7320690.elements[0] = ((closureN)self_7312582)->elements[0];
++c_7320690.elements[1] = ((closureN)self_7312582)->elements[1];
++c_7320690.elements[2] = ((closureN)self_7312582)->elements[2];
++c_7320690.elements[3] = ((closureN)self_7312582)->elements[3];
++c_7320690.elements[4] = ((closureN)self_7312582)->elements[4];
++c_7320690.elements[5] = ((closureN)self_7312582)->elements[5];
++c_7320690.elements[6] = ((closureN)self_7312582)->elements[6];
++c_7320690.elements[7] = ((closureN)self_7312582)->elements[7];
++c_7320690.elements[8] = ((closureN)self_7312582)->elements[8];
++c_7320690.elements[9] = ((closureN)self_7312582)->elements[9];
++c_7320690.elements[10] = ((closureN)self_7312582)->elements[10];
++c_7320690.elements[11] = ((closureN)self_7312582)->elements[11];
++c_7320690.elements[12] = ((closureN)self_7312582)->elements[12];
++c_7320690.elements[13] = ((closureN)self_7312582)->elements[13];
++c_7320690.elements[14] = ((closureN)self_7312582)->elements[14];
++c_7320690.elements[15] = ((closureN)self_7312582)->elements[15];
++c_7320690.elements[16] = ((closureN)self_7312582)->elements[16];
++c_7320690.elements[17] = ((closureN)self_7312582)->elements[17];
++c_7320690.elements[18] = ((closureN)self_7312582)->elements[18];
++c_7320690.elements[19] = ((closureN)self_7312582)->elements[19];
++c_7320690.elements[20] = ((closureN)self_7312582)->elements[20];
++c_7320690.elements[21] = ((closureN)self_7312582)->elements[21];
++c_7320690.elements[22] = ((closureN)self_7312582)->elements[22];
++c_7320690.elements[23] = ((closureN)self_7312582)->elements[23];
++c_7320690.elements[24] = ((closureN)self_7312582)->elements[24];
++c_7320690.elements[25] = ((closureN)self_7312582)->elements[25];
++c_7320690.elements[26] = ((closureN)self_7312582)->elements[26];
++c_7320690.elements[27] = ((closureN)self_7312582)->elements[27];
++
++
++
++return_direct_with_clo1(data,(closure)&c_7320690,__lambda_851,  Cyc_set_cell(data, ((closureN)self_7312582)->elements[20], r_736002));; 
++}
++
++static void __lambda_851(void *data, object self_7312583, int argc, object *args) /* object self_7312583, object r_735867 */
++ {
++
++  
++closureN_type c_7320692;
++object e_7321469 [28];
++c_7320692.hdr.mark = gc_color_red;
++ c_7320692.hdr.grayed = 0;
++c_7320692.tag = closureN_tag;
++ c_7320692.fn = (function_type)__lambda_852;
++c_7320692.num_args = 1;
++c_7320692.num_elements = 28;
++c_7320692.elements = (object *)e_7321469;
++c_7320692.elements[0] = ((closureN)self_7312583)->elements[0];
++c_7320692.elements[1] = ((closureN)self_7312583)->elements[1];
++c_7320692.elements[2] = ((closureN)self_7312583)->elements[2];
++c_7320692.elements[3] = ((closureN)self_7312583)->elements[3];
++c_7320692.elements[4] = ((closureN)self_7312583)->elements[4];
++c_7320692.elements[5] = ((closureN)self_7312583)->elements[5];
++c_7320692.elements[6] = ((closureN)self_7312583)->elements[6];
++c_7320692.elements[7] = ((closureN)self_7312583)->elements[7];
++c_7320692.elements[8] = ((closureN)self_7312583)->elements[8];
++c_7320692.elements[9] = ((closureN)self_7312583)->elements[9];
++c_7320692.elements[10] = ((closureN)self_7312583)->elements[10];
++c_7320692.elements[11] = ((closureN)self_7312583)->elements[11];
++c_7320692.elements[12] = ((closureN)self_7312583)->elements[12];
++c_7320692.elements[13] = ((closureN)self_7312583)->elements[13];
++c_7320692.elements[14] = ((closureN)self_7312583)->elements[14];
++c_7320692.elements[15] = ((closureN)self_7312583)->elements[15];
++c_7320692.elements[16] = ((closureN)self_7312583)->elements[16];
++c_7320692.elements[17] = ((closureN)self_7312583)->elements[17];
++c_7320692.elements[18] = ((closureN)self_7312583)->elements[18];
++c_7320692.elements[19] = ((closureN)self_7312583)->elements[19];
++c_7320692.elements[20] = ((closureN)self_7312583)->elements[20];
++c_7320692.elements[21] = ((closureN)self_7312583)->elements[21];
++c_7320692.elements[22] = ((closureN)self_7312583)->elements[22];
++c_7320692.elements[23] = ((closureN)self_7312583)->elements[23];
++c_7320692.elements[24] = ((closureN)self_7312583)->elements[24];
++c_7320692.elements[25] = ((closureN)self_7312583)->elements[25];
++c_7320692.elements[26] = ((closureN)self_7312583)->elements[26];
++c_7320692.elements[27] = ((closureN)self_7312583)->elements[27];
++
++
++closureN_type c_7321470;
++object e_7321493 [2];
++c_7321470.hdr.mark = gc_color_red;
++ c_7321470.hdr.grayed = 0;
++c_7321470.tag = closureN_tag;
++ c_7321470.fn = (function_type)__lambda_939;
++c_7321470.num_args = 1;
++c_7321470.num_elements = 2;
++c_7321470.elements = (object *)e_7321493;
++c_7321470.elements[0] = ((closureN)self_7312583)->elements[17];
++c_7321470.elements[1] = ((closureN)self_7312583)->elements[20];
++
++return_direct_with_clo1(data,(closure)&c_7320692,__lambda_852,  &c_7321470);; 
++}
++
++static void __lambda_939(void *data, object self_7312584, int argc, object *args) /* object self_7312584, object k_735998, object x_731358_733260 */
++ {
++ object k_735998 = args[0]; object x_731358_733260 = args[1];
++  
++
++
++closureN_type c_7321475;
++object e_7321492 [3];
++c_7321475.hdr.mark = gc_color_red;
++ c_7321475.hdr.grayed = 0;
++c_7321475.tag = closureN_tag;
++ c_7321475.fn = (function_type)__lambda_940;
++c_7321475.num_args = 1;
++c_7321475.num_elements = 3;
++c_7321475.elements = (object *)e_7321492;
++c_7321475.elements[0] = ((closureN)self_7312584)->elements[0];
++c_7321475.elements[1] = k_735998;
++c_7321475.elements[2] = x_731358_733260;
++
++return_closcall2(data,  car(((closureN)self_7312584)->elements[1]),  &c_7321475, x_731358_733260);; 
++}
++
++static void __lambda_940(void *data, object self_7312585, int argc, object *args) /* object self_7312585, object r_735999 */
++ {
++ object r_735999 = args[0];
++  if( (boolean_f != r_735999) ){ 
++  
++
++
++closureN_type c_7321480;
++object e_7321486 [1];
++c_7321480.hdr.mark = gc_color_red;
++ c_7321480.hdr.grayed = 0;
++c_7321480.tag = closureN_tag;
++ c_7321480.fn = (function_type)__lambda_941;
++c_7321480.num_args = 1;
++c_7321480.num_elements = 1;
++c_7321480.elements = (object *)e_7321486;
++c_7321480.elements[0] = ((closureN)self_7312585)->elements[1];
++
++
++
++return_closcall2(data,  car(((closureN)self_7312585)->elements[0]),  &c_7321480, Cyc_cdr(data, ((closureN)self_7312585)->elements[2]));
++} else { 
++  return_direct_with_clo1(data,  ((closureN)self_7312585)->elements[1], (((closure)  ((closureN)self_7312585)->elements[1])->fn),  obj_int2obj(0));}
++;; 
++}
++
++static void __lambda_941(void *data, object self_7312586, int argc, object *args) /* object self_7312586, object r_736000 */
++ {
++ object r_736000 = args[0];
++  
++complex_num_type local_7321485; 
++return_direct_with_clo1(data,  ((closureN)self_7312586)->elements[0], (((closure)  ((closureN)self_7312586)->elements[0])->fn),  Cyc_fast_sum(data,&local_7321485, obj_int2obj(1), r_736000));; 
++}
++
++static void __lambda_852(void *data, object self_7312587, int argc, object *args) /* object self_7312587, object r_735997 */
++ {
++ object r_735997 = args[0];
++  
++closureN_type c_7320694;
++object e_7321465 [28];
++c_7320694.hdr.mark = gc_color_red;
++ c_7320694.hdr.grayed = 0;
++c_7320694.tag = closureN_tag;
++ c_7320694.fn = (function_type)__lambda_853;
++c_7320694.num_args = 1;
++c_7320694.num_elements = 28;
++c_7320694.elements = (object *)e_7321465;
++c_7320694.elements[0] = ((closureN)self_7312587)->elements[0];
++c_7320694.elements[1] = ((closureN)self_7312587)->elements[1];
++c_7320694.elements[2] = ((closureN)self_7312587)->elements[2];
++c_7320694.elements[3] = ((closureN)self_7312587)->elements[3];
++c_7320694.elements[4] = ((closureN)self_7312587)->elements[4];
++c_7320694.elements[5] = ((closureN)self_7312587)->elements[5];
++c_7320694.elements[6] = ((closureN)self_7312587)->elements[6];
++c_7320694.elements[7] = ((closureN)self_7312587)->elements[7];
++c_7320694.elements[8] = ((closureN)self_7312587)->elements[8];
++c_7320694.elements[9] = ((closureN)self_7312587)->elements[9];
++c_7320694.elements[10] = ((closureN)self_7312587)->elements[10];
++c_7320694.elements[11] = ((closureN)self_7312587)->elements[11];
++c_7320694.elements[12] = ((closureN)self_7312587)->elements[12];
++c_7320694.elements[13] = ((closureN)self_7312587)->elements[13];
++c_7320694.elements[14] = ((closureN)self_7312587)->elements[14];
++c_7320694.elements[15] = ((closureN)self_7312587)->elements[15];
++c_7320694.elements[16] = ((closureN)self_7312587)->elements[16];
++c_7320694.elements[17] = ((closureN)self_7312587)->elements[17];
++c_7320694.elements[18] = ((closureN)self_7312587)->elements[18];
++c_7320694.elements[19] = ((closureN)self_7312587)->elements[19];
++c_7320694.elements[20] = ((closureN)self_7312587)->elements[20];
++c_7320694.elements[21] = ((closureN)self_7312587)->elements[21];
++c_7320694.elements[22] = ((closureN)self_7312587)->elements[22];
++c_7320694.elements[23] = ((closureN)self_7312587)->elements[23];
++c_7320694.elements[24] = ((closureN)self_7312587)->elements[24];
++c_7320694.elements[25] = ((closureN)self_7312587)->elements[25];
++c_7320694.elements[26] = ((closureN)self_7312587)->elements[26];
++c_7320694.elements[27] = ((closureN)self_7312587)->elements[27];
++
++
++
++return_direct_with_clo1(data,(closure)&c_7320694,__lambda_853,  Cyc_set_cell(data, ((closureN)self_7312587)->elements[17], r_735997));; 
++}
++
++static void __lambda_853(void *data, object self_7312588, int argc, object *args) /* object self_7312588, object r_735868 */
++ {
++
++  
++closureN_type c_7320696;
++object e_7321443 [28];
++c_7320696.hdr.mark = gc_color_red;
++ c_7320696.hdr.grayed = 0;
++c_7320696.tag = closureN_tag;
++ c_7320696.fn = (function_type)__lambda_854;
++c_7320696.num_args = 1;
++c_7320696.num_elements = 28;
++c_7320696.elements = (object *)e_7321443;
++c_7320696.elements[0] = ((closureN)self_7312588)->elements[0];
++c_7320696.elements[1] = ((closureN)self_7312588)->elements[1];
++c_7320696.elements[2] = ((closureN)self_7312588)->elements[2];
++c_7320696.elements[3] = ((closureN)self_7312588)->elements[3];
++c_7320696.elements[4] = ((closureN)self_7312588)->elements[4];
++c_7320696.elements[5] = ((closureN)self_7312588)->elements[5];
++c_7320696.elements[6] = ((closureN)self_7312588)->elements[6];
++c_7320696.elements[7] = ((closureN)self_7312588)->elements[7];
++c_7320696.elements[8] = ((closureN)self_7312588)->elements[8];
++c_7320696.elements[9] = ((closureN)self_7312588)->elements[9];
++c_7320696.elements[10] = ((closureN)self_7312588)->elements[10];
++c_7320696.elements[11] = ((closureN)self_7312588)->elements[11];
++c_7320696.elements[12] = ((closureN)self_7312588)->elements[12];
++c_7320696.elements[13] = ((closureN)self_7312588)->elements[13];
++c_7320696.elements[14] = ((closureN)self_7312588)->elements[14];
++c_7320696.elements[15] = ((closureN)self_7312588)->elements[15];
++c_7320696.elements[16] = ((closureN)self_7312588)->elements[16];
++c_7320696.elements[17] = ((closureN)self_7312588)->elements[17];
++c_7320696.elements[18] = ((closureN)self_7312588)->elements[18];
++c_7320696.elements[19] = ((closureN)self_7312588)->elements[19];
++c_7320696.elements[20] = ((closureN)self_7312588)->elements[20];
++c_7320696.elements[21] = ((closureN)self_7312588)->elements[21];
++c_7320696.elements[22] = ((closureN)self_7312588)->elements[22];
++c_7320696.elements[23] = ((closureN)self_7312588)->elements[23];
++c_7320696.elements[24] = ((closureN)self_7312588)->elements[24];
++c_7320696.elements[25] = ((closureN)self_7312588)->elements[25];
++c_7320696.elements[26] = ((closureN)self_7312588)->elements[26];
++c_7320696.elements[27] = ((closureN)self_7312588)->elements[27];
++
++
++closureN_type c_7321444;
++object e_7321464 [2];
++c_7321444.hdr.mark = gc_color_red;
++ c_7321444.hdr.grayed = 0;
++c_7321444.tag = closureN_tag;
++ c_7321444.fn = (function_type)__lambda_937;
++c_7321444.num_args = 1;
++c_7321444.num_elements = 2;
++c_7321444.elements = (object *)e_7321464;
++c_7321444.elements[0] = ((closureN)self_7312588)->elements[19];
++c_7321444.elements[1] = ((closureN)self_7312588)->elements[20];
++
++return_direct_with_clo1(data,(closure)&c_7320696,__lambda_854,  &c_7321444);; 
++}
++
++static void __lambda_937(void *data, object self_7312589, int argc, object *args) /* object self_7312589, object k_735994, object x_731359_733261 */
++ {
++ object k_735994 = args[0]; object x_731359_733261 = args[1];
++  
++
++
++closureN_type c_7321449;
++object e_7321463 [3];
++c_7321449.hdr.mark = gc_color_red;
++ c_7321449.hdr.grayed = 0;
++c_7321449.tag = closureN_tag;
++ c_7321449.fn = (function_type)__lambda_938;
++c_7321449.num_args = 1;
++c_7321449.num_elements = 3;
++c_7321449.elements = (object *)e_7321463;
++c_7321449.elements[0] = ((closureN)self_7312589)->elements[0];
++c_7321449.elements[1] = k_735994;
++c_7321449.elements[2] = x_731359_733261;
++
++return_closcall2(data,  car(((closureN)self_7312589)->elements[1]),  &c_7321449, x_731359_733261);; 
++}
++
++static void __lambda_938(void *data, object self_7312590, int argc, object *args) /* object self_7312590, object r_735995 */
++ {
++ object r_735995 = args[0];
++  if( (boolean_f != r_735995) ){ 
++  
++
++
++
++return_closcall2(data,  car(((closureN)self_7312590)->elements[0]),  ((closureN)self_7312590)->elements[1], Cyc_cdr(data, ((closureN)self_7312590)->elements[2]));
++} else { 
++  
++
++return_direct_with_clo1(data,  ((closureN)self_7312590)->elements[1], (((closure)  ((closureN)self_7312590)->elements[1])->fn),  Cyc_cdr(data, ((closureN)self_7312590)->elements[2]));}
++;; 
++}
++
++static void __lambda_854(void *data, object self_7312591, int argc, object *args) /* object self_7312591, object r_735993 */
++ {
++ object r_735993 = args[0];
++  
++closureN_type c_7320698;
++object e_7321439 [28];
++c_7320698.hdr.mark = gc_color_red;
++ c_7320698.hdr.grayed = 0;
++c_7320698.tag = closureN_tag;
++ c_7320698.fn = (function_type)__lambda_855;
++c_7320698.num_args = 1;
++c_7320698.num_elements = 28;
++c_7320698.elements = (object *)e_7321439;
++c_7320698.elements[0] = ((closureN)self_7312591)->elements[0];
++c_7320698.elements[1] = ((closureN)self_7312591)->elements[1];
++c_7320698.elements[2] = ((closureN)self_7312591)->elements[2];
++c_7320698.elements[3] = ((closureN)self_7312591)->elements[3];
++c_7320698.elements[4] = ((closureN)self_7312591)->elements[4];
++c_7320698.elements[5] = ((closureN)self_7312591)->elements[5];
++c_7320698.elements[6] = ((closureN)self_7312591)->elements[6];
++c_7320698.elements[7] = ((closureN)self_7312591)->elements[7];
++c_7320698.elements[8] = ((closureN)self_7312591)->elements[8];
++c_7320698.elements[9] = ((closureN)self_7312591)->elements[9];
++c_7320698.elements[10] = ((closureN)self_7312591)->elements[10];
++c_7320698.elements[11] = ((closureN)self_7312591)->elements[11];
++c_7320698.elements[12] = ((closureN)self_7312591)->elements[12];
++c_7320698.elements[13] = ((closureN)self_7312591)->elements[13];
++c_7320698.elements[14] = ((closureN)self_7312591)->elements[14];
++c_7320698.elements[15] = ((closureN)self_7312591)->elements[15];
++c_7320698.elements[16] = ((closureN)self_7312591)->elements[16];
++c_7320698.elements[17] = ((closureN)self_7312591)->elements[17];
++c_7320698.elements[18] = ((closureN)self_7312591)->elements[18];
++c_7320698.elements[19] = ((closureN)self_7312591)->elements[19];
++c_7320698.elements[20] = ((closureN)self_7312591)->elements[20];
++c_7320698.elements[21] = ((closureN)self_7312591)->elements[21];
++c_7320698.elements[22] = ((closureN)self_7312591)->elements[22];
++c_7320698.elements[23] = ((closureN)self_7312591)->elements[23];
++c_7320698.elements[24] = ((closureN)self_7312591)->elements[24];
++c_7320698.elements[25] = ((closureN)self_7312591)->elements[25];
++c_7320698.elements[26] = ((closureN)self_7312591)->elements[26];
++c_7320698.elements[27] = ((closureN)self_7312591)->elements[27];
++
++
++
++return_direct_with_clo1(data,(closure)&c_7320698,__lambda_855,  Cyc_set_cell(data, ((closureN)self_7312591)->elements[19], r_735993));; 
++}
++
++static void __lambda_855(void *data, object self_7312592, int argc, object *args) /* object self_7312592, object r_735869 */
++ {
++
++  
++closureN_type c_7320700;
++object e_7321304 [26];
++c_7320700.hdr.mark = gc_color_red;
++ c_7320700.hdr.grayed = 0;
++c_7320700.tag = closureN_tag;
++ c_7320700.fn = (function_type)__lambda_856;
++c_7320700.num_args = 1;
++c_7320700.num_elements = 26;
++c_7320700.elements = (object *)e_7321304;
++c_7320700.elements[0] = ((closureN)self_7312592)->elements[0];
++c_7320700.elements[1] = ((closureN)self_7312592)->elements[1];
++c_7320700.elements[2] = ((closureN)self_7312592)->elements[2];
++c_7320700.elements[3] = ((closureN)self_7312592)->elements[3];
++c_7320700.elements[4] = ((closureN)self_7312592)->elements[4];
++c_7320700.elements[5] = ((closureN)self_7312592)->elements[5];
++c_7320700.elements[6] = ((closureN)self_7312592)->elements[6];
++c_7320700.elements[7] = ((closureN)self_7312592)->elements[7];
++c_7320700.elements[8] = ((closureN)self_7312592)->elements[8];
++c_7320700.elements[9] = ((closureN)self_7312592)->elements[9];
++c_7320700.elements[10] = ((closureN)self_7312592)->elements[10];
++c_7320700.elements[11] = ((closureN)self_7312592)->elements[11];
++c_7320700.elements[12] = ((closureN)self_7312592)->elements[12];
++c_7320700.elements[13] = ((closureN)self_7312592)->elements[13];
++c_7320700.elements[14] = ((closureN)self_7312592)->elements[14];
++c_7320700.elements[15] = ((closureN)self_7312592)->elements[15];
++c_7320700.elements[16] = ((closureN)self_7312592)->elements[17];
++c_7320700.elements[17] = ((closureN)self_7312592)->elements[18];
++c_7320700.elements[18] = ((closureN)self_7312592)->elements[19];
++c_7320700.elements[19] = ((closureN)self_7312592)->elements[20];
++c_7320700.elements[20] = ((closureN)self_7312592)->elements[21];
++c_7320700.elements[21] = ((closureN)self_7312592)->elements[22];
++c_7320700.elements[22] = ((closureN)self_7312592)->elements[23];
++c_7320700.elements[23] = ((closureN)self_7312592)->elements[24];
++c_7320700.elements[24] = ((closureN)self_7312592)->elements[25];
++c_7320700.elements[25] = ((closureN)self_7312592)->elements[26];
++
++
++closureN_type c_7321305;
++object e_7321438 [3];
++c_7321305.hdr.mark = gc_color_red;
++ c_7321305.hdr.grayed = 0;
++c_7321305.tag = closureN_tag;
++ c_7321305.fn = (function_type)__lambda_923;
++c_7321305.num_args = 2;
++c_7321305.num_elements = 3;
++c_7321305.elements = (object *)e_7321438;
++c_7321305.elements[0] = ((closureN)self_7312592)->elements[16];
++c_7321305.elements[1] = ((closureN)self_7312592)->elements[20];
++c_7321305.elements[2] = ((closureN)self_7312592)->elements[27];
++
++return_direct_with_clo1(data,(closure)&c_7320700,__lambda_856,  &c_7321305);; 
++}
++
++static void __lambda_923(void *data, object self_7312593, int argc, object *args) /* object self_7312593, object k_735972, object x_731360_733262, object dim_731361_733263 */
++ {
++ object k_735972 = args[0]; object x_731360_733262 = args[1]; object dim_731361_733263 = args[2];
++  
++closureN_type c_7321307;
++object e_7321437 [4];
++c_7321307.hdr.mark = gc_color_red;
++ c_7321307.hdr.grayed = 0;
++c_7321307.tag = closureN_tag;
++ c_7321307.fn = (function_type)__lambda_924;
++c_7321307.num_args = 3;
++c_7321307.num_elements = 4;
++c_7321307.elements = (object *)e_7321437;
++c_7321307.elements[0] = ((closureN)self_7312593)->elements[0];
++c_7321307.elements[1] = ((closureN)self_7312593)->elements[1];
++c_7321307.elements[2] = k_735972;
++c_7321307.elements[3] = ((closureN)self_7312593)->elements[2];
++
++return_direct_with_clo3(data,(closure)&c_7321307,__lambda_924,  x_731360_733262, dim_731361_733263, NULL);; 
++}
++
++static void __lambda_924(void *data, object self_7312594, int argc, object *args) /* object self_7312594, object x_731363_733264, object dim_731364_733265, object vars_731365_733266 */
++ {
++ object x_731363_733264 = args[0]; object dim_731364_733265 = args[1]; object vars_731365_733266 = args[2];
++  
++closureN_type c_7321309;
++object e_7321436 [7];
++c_7321309.hdr.mark = gc_color_red;
++ c_7321309.hdr.grayed = 0;
++c_7321309.tag = closureN_tag;
++ c_7321309.fn = (function_type)__lambda_925;
++c_7321309.num_args = 1;
++c_7321309.num_elements = 7;
++c_7321309.elements = (object *)e_7321436;
++c_7321309.elements[0] = ((closureN)self_7312594)->elements[0];
++c_7321309.elements[1] = dim_731364_733265;
++c_7321309.elements[2] = ((closureN)self_7312594)->elements[1];
++c_7321309.elements[3] = ((closureN)self_7312594)->elements[2];
++c_7321309.elements[4] = ((closureN)self_7312594)->elements[3];
++c_7321309.elements[5] = vars_731365_733266;
++c_7321309.elements[6] = x_731363_733264;
++
++return_direct_with_clo1(data,(closure)&c_7321309,__lambda_925,  boolean_f);; 
++}
++
++static void __lambda_925(void *data, object self_7312595, int argc, object *args) /* object self_7312595, object lp_731366_733267 */
++ {
++ object lp_731366_733267 = args[0];
++  
++closureN_type c_7321311;
++object e_7321432 [7];
++c_7321311.hdr.mark = gc_color_red;
++ c_7321311.hdr.grayed = 0;
++c_7321311.tag = closureN_tag;
++ c_7321311.fn = (function_type)__lambda_1366;
++c_7321311.num_args = 1;
++c_7321311.num_elements = 7;
++c_7321311.elements = (object *)e_7321432;
++c_7321311.elements[0] = ((closureN)self_7312595)->elements[0];
++c_7321311.elements[1] = ((closureN)self_7312595)->elements[1];
++c_7321311.elements[2] = ((closureN)self_7312595)->elements[2];
++c_7321311.elements[3] = ((closureN)self_7312595)->elements[3];
++c_7321311.elements[4] = ((closureN)self_7312595)->elements[4];
++c_7321311.elements[5] = ((closureN)self_7312595)->elements[5];
++c_7321311.elements[6] = ((closureN)self_7312595)->elements[6];
++
++
++pair_type local_7321435; 
++return_direct_with_clo1(data,(closure)&c_7321311,__lambda_1366,  set_cell_as_expr(&local_7321435, lp_731366_733267));; 
++}
++
++static void __lambda_1366(void *data, object self_7312596, int argc, object *args) /* object self_7312596, object lp_731366_733267 */
++ {
++ object lp_731366_733267 = args[0];
++  
++closureN_type c_7321313;
++object e_7321328 [5];
++c_7321313.hdr.mark = gc_color_red;
++ c_7321313.hdr.grayed = 0;
++c_7321313.tag = closureN_tag;
++ c_7321313.fn = (function_type)__lambda_926;
++c_7321313.num_args = 1;
++c_7321313.num_elements = 5;
++c_7321313.elements = (object *)e_7321328;
++c_7321313.elements[0] = ((closureN)self_7312596)->elements[1];
++c_7321313.elements[1] = ((closureN)self_7312596)->elements[3];
++c_7321313.elements[2] = lp_731366_733267;
++c_7321313.elements[3] = ((closureN)self_7312596)->elements[5];
++c_7321313.elements[4] = ((closureN)self_7312596)->elements[6];
++
++
++closureN_type c_7321329;
++object e_7321431 [4];
++c_7321329.hdr.mark = gc_color_red;
++ c_7321329.hdr.grayed = 0;
++c_7321329.tag = closureN_tag;
++ c_7321329.fn = (function_type)__lambda_928;
++c_7321329.num_args = 3;
++c_7321329.num_elements = 4;
++c_7321329.elements = (object *)e_7321431;
++c_7321329.elements[0] = ((closureN)self_7312596)->elements[0];
++c_7321329.elements[1] = ((closureN)self_7312596)->elements[2];
++c_7321329.elements[2] = ((closureN)self_7312596)->elements[4];
++c_7321329.elements[3] = lp_731366_733267;
++
++return_direct_with_clo1(data,(closure)&c_7321313,__lambda_926,  &c_7321329);; 
++}
++
++static void __lambda_928(void *data, object self_7312597, int argc, object *args) /* object self_7312597, object k_735976, object x_731367_733268, object dim_731368_733269, object vars_731369_733270 */
++ {
++ object k_735976 = args[0]; object x_731367_733268 = args[1]; object dim_731368_733269 = args[2]; object vars_731369_733270 = args[3];
++  
++closureN_type c_7321331;
++object e_7321430 [8];
++c_7321331.hdr.mark = gc_color_red;
++ c_7321331.hdr.grayed = 0;
++c_7321331.tag = closureN_tag;
++ c_7321331.fn = (function_type)__lambda_929;
++c_7321331.num_args = 1;
++c_7321331.num_elements = 8;
++c_7321331.elements = (object *)e_7321430;
++c_7321331.elements[0] = ((closureN)self_7312597)->elements[0];
++c_7321331.elements[1] = dim_731368_733269;
++c_7321331.elements[2] = ((closureN)self_7312597)->elements[1];
++c_7321331.elements[3] = k_735976;
++c_7321331.elements[4] = ((closureN)self_7312597)->elements[2];
++c_7321331.elements[5] = ((closureN)self_7312597)->elements[3];
++c_7321331.elements[6] = vars_731369_733270;
++c_7321331.elements[7] = x_731367_733268;
++
++return_direct_with_clo2(data,  __glo_identifier_127_scheme_base, (((closure)  __glo_identifier_127_scheme_base)->fn),  &c_7321331, x_731367_733268);; 
++}
++
++static void __lambda_929(void *data, object self_7312598, int argc, object *args) /* object self_7312598, object r_735977 */
++ {
++ object r_735977 = args[0];
++  if( (boolean_f != r_735977) ){ 
++  
++closureN_type c_7321333;
++object e_7321354 [5];
++c_7321333.hdr.mark = gc_color_red;
++ c_7321333.hdr.grayed = 0;
++c_7321333.tag = closureN_tag;
++ c_7321333.fn = (function_type)__lambda_930;
++c_7321333.num_args = 1;
++c_7321333.num_elements = 5;
++c_7321333.elements = (object *)e_7321354;
++c_7321333.elements[0] = ((closureN)self_7312598)->elements[1];
++c_7321333.elements[1] = ((closureN)self_7312598)->elements[3];
++c_7321333.elements[2] = ((closureN)self_7312598)->elements[4];
++c_7321333.elements[3] = ((closureN)self_7312598)->elements[6];
++c_7321333.elements[4] = ((closureN)self_7312598)->elements[7];
++
++
++closureN_type c_7321355;
++object e_7321359 [2];
++c_7321355.hdr.mark = gc_color_red;
++ c_7321355.hdr.grayed = 0;
++c_7321355.tag = closureN_tag;
++ c_7321355.fn = (function_type)__lambda_932;
++c_7321355.num_args = 1;
++c_7321355.num_elements = 2;
++c_7321355.elements = (object *)e_7321359;
++c_7321355.elements[0] = ((closureN)self_7312598)->elements[0];
++c_7321355.elements[1] = ((closureN)self_7312598)->elements[7];
++
++return_direct_with_clo1(data,(closure)&c_7321333,__lambda_930,  &c_7321355);
++} else { 
++  
++
++
++closureN_type c_7321364;
++object e_7321428 [5];
++c_7321364.hdr.mark = gc_color_red;
++ c_7321364.hdr.grayed = 0;
++c_7321364.tag = closureN_tag;
++ c_7321364.fn = (function_type)__lambda_933;
++c_7321364.num_args = 1;
++c_7321364.num_elements = 5;
++c_7321364.elements = (object *)e_7321428;
++c_7321364.elements[0] = ((closureN)self_7312598)->elements[1];
++c_7321364.elements[1] = ((closureN)self_7312598)->elements[3];
++c_7321364.elements[2] = ((closureN)self_7312598)->elements[5];
++c_7321364.elements[3] = ((closureN)self_7312598)->elements[6];
++c_7321364.elements[4] = ((closureN)self_7312598)->elements[7];
++
++return_closcall2(data,  car(((closureN)self_7312598)->elements[2]),  &c_7321364, ((closureN)self_7312598)->elements[7]);}
++;; 
++}
++
++static void __lambda_933(void *data, object self_7312602, int argc, object *args) /* object self_7312602, object r_735982 */
++ {
++ object r_735982 = args[0];
++  if( (boolean_f != r_735982) ){ 
++  
++
++
++closureN_type c_7321369;
++object e_7321382 [4];
++c_7321369.hdr.mark = gc_color_red;
++ c_7321369.hdr.grayed = 0;
++c_7321369.tag = closureN_tag;
++ c_7321369.fn = (function_type)__lambda_934;
++c_7321369.num_args = 1;
++c_7321369.num_elements = 4;
++c_7321369.elements = (object *)e_7321382;
++c_7321369.elements[0] = ((closureN)self_7312602)->elements[0];
++c_7321369.elements[1] = ((closureN)self_7312602)->elements[1];
++c_7321369.elements[2] = ((closureN)self_7312602)->elements[2];
++c_7321369.elements[3] = ((closureN)self_7312602)->elements[4];
++
++
++
++return_closcall4(data,  car(((closureN)self_7312602)->elements[2]),  &c_7321369, Cyc_cddr(data, ((closureN)self_7312602)->elements[4]), ((closureN)self_7312602)->elements[0], ((closureN)self_7312602)->elements[3]);
++} else { 
++    
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312602)->elements[4])) ){ 
++  
++
++
++closureN_type c_7321395;
++object e_7321405 [4];
++c_7321395.hdr.mark = gc_color_red;
++ c_7321395.hdr.grayed = 0;
++c_7321395.tag = closureN_tag;
++ c_7321395.fn = (function_type)__lambda_935;
++c_7321395.num_args = 1;
++c_7321395.num_elements = 4;
++c_7321395.elements = (object *)e_7321405;
++c_7321395.elements[0] = ((closureN)self_7312602)->elements[0];
++c_7321395.elements[1] = ((closureN)self_7312602)->elements[1];
++c_7321395.elements[2] = ((closureN)self_7312602)->elements[2];
++c_7321395.elements[3] = ((closureN)self_7312602)->elements[4];
++
++
++
++return_closcall4(data,  car(((closureN)self_7312602)->elements[2]),  &c_7321395, Cyc_cdr(data, ((closureN)self_7312602)->elements[4]), ((closureN)self_7312602)->elements[0], ((closureN)self_7312602)->elements[3]);
++} else { 
++    
++if( (boolean_f != Cyc_is_vector_not_record_type(((closureN)self_7312602)->elements[4])) ){ 
++  
++closureN_type c_7321415;
++object e_7321423 [4];
++c_7321415.hdr.mark = gc_color_red;
++ c_7321415.hdr.grayed = 0;
++c_7321415.tag = closureN_tag;
++ c_7321415.fn = (function_type)__lambda_936;
++c_7321415.num_args = 1;
++c_7321415.num_elements = 4;
++c_7321415.elements = (object *)e_7321423;
++c_7321415.elements[0] = ((closureN)self_7312602)->elements[0];
++c_7321415.elements[1] = ((closureN)self_7312602)->elements[1];
++c_7321415.elements[2] = ((closureN)self_7312602)->elements[2];
++c_7321415.elements[3] = ((closureN)self_7312602)->elements[3];
+ 
 -return_closcall2(data,  ((closureN)self_7313809)->elements[6],  &c_7323039, r_736516);; 
--}
--
++return_direct_with_clo2(data,  __glo_vector_91_125list_scheme_base, (((closure)  __glo_vector_91_125list_scheme_base)->fn),  &c_7321415, ((closureN)self_7312602)->elements[4]);
++} else { 
++  return_direct_with_clo1(data,  ((closureN)self_7312602)->elements[1], (((closure)  ((closureN)self_7312602)->elements[1])->fn),  ((closureN)self_7312602)->elements[3]);}
++;}
++;}
++;; 
+ }
+ 
 -static void __lambda_976(void *data, object self_7313810, int argc, object *args) /* object self_7313810, object r_736515 */
-- {
++static void __lambda_936(void *data, object self_7312605, int argc, object *args) /* object self_7312605, object r_735992 */
+  {
 - object r_736515 = args[0];
--  
++ object r_735992 = args[0];
+   
 -closureN_type c_7323041;
 -object e_7323077 [11];
 -c_7323041.hdr.mark = gc_color_red;
@@ -27872,16 +29294,19 @@ Make let-values be the same as let*-values, to work around
 -c_7323041.elements[8] = ((closureN)self_7313810)->elements[9];
 -c_7323041.elements[9] = ((closureN)self_7313810)->elements[10];
 -c_7323041.elements[10] = ((closureN)self_7313810)->elements[11];
--
+ 
 -
 -list_3_type local_7323080; 
 -return_direct_with_clo1(data,(closure)&c_7323041,__lambda_977,  Cyc_fast_list_3(&local_7323080, ((closureN)self_7313810)->elements[2], ((closureN)self_7313810)->elements[8], r_736515));; 
--}
--
++return_closcall4(data,  car(((closureN)self_7312605)->elements[2]),  ((closureN)self_7312605)->elements[1], r_735992, ((closureN)self_7312605)->elements[0], ((closureN)self_7312605)->elements[3]);; 
+ }
+ 
 -static void __lambda_977(void *data, object self_7313811, int argc, object *args) /* object self_7313811, object r_736511 */
-- {
++static void __lambda_935(void *data, object self_7312604, int argc, object *args) /* object self_7312604, object r_735989 */
+  {
 - object r_736511 = args[0];
--  
++ object r_735989 = args[0];
+   
 -list_4_type local_7323046; 
 -
 -pair_type local_7323051; 
@@ -27889,46 +29314,52 @@ Make let-values be the same as let*-values, to work around
 -list_2_type local_7323054; 
 -
 -list_4_type local_7323060; 
--
+ 
 -list_2_type local_7323064; 
--
+ 
 -list_3_type local_7323069; 
--
+ 
 -list_2_type local_7323073; 
 -return_direct_with_clo1(data,  ((closureN)self_7313811)->elements[6], (((closure)  ((closureN)self_7313811)->elements[6])->fn),  Cyc_fast_list_4(&local_7323046, ((closureN)self_7313811)->elements[2], ((closureN)self_7313811)->elements[3], set_pair_as_expr(&local_7323051, Cyc_fast_list_2(&local_7323054, ((closureN)self_7313811)->elements[10], ((closureN)self_7313811)->elements[9]), ((closureN)self_7313811)->elements[8]), Cyc_fast_list_4(&local_7323060, ((closureN)self_7313811)->elements[1], Cyc_fast_list_2(&local_7323064, ((closureN)self_7313811)->elements[4], ((closureN)self_7313811)->elements[10]), r_736511, Cyc_fast_list_3(&local_7323069, ((closureN)self_7313811)->elements[0], Cyc_fast_list_2(&local_7323073, ((closureN)self_7313811)->elements[5], ((closureN)self_7313811)->elements[10]), ((closureN)self_7313811)->elements[7]))));; 
--}
--
++return_closcall4(data,  car(((closureN)self_7312604)->elements[2]),  ((closureN)self_7312604)->elements[1], Cyc_car(data, ((closureN)self_7312604)->elements[3]), ((closureN)self_7312604)->elements[0], r_735989);; 
+ }
+ 
 -static void __lambda_963(void *data, object self_7313787, int argc, object *args) /* object self_7313787, object r_736496 */
-- {
++static void __lambda_934(void *data, object self_7312603, int argc, object *args) /* object self_7312603, object r_735985 */
+  {
 - object r_736496 = args[0];
--  
++ object r_735985 = args[0];
+   
 -list_3_type local_7322965; 
 -
 -list_2_type local_7322969; 
--
+ 
 -list_3_type local_7322974; 
--
+ 
 -pair_type local_7322978; 
--
+ 
 -list_2_type local_7322981; 
--
+ 
 -
 -return_direct_with_clo1(data,  ((closureN)self_7313787)->elements[3], (((closure)  ((closureN)self_7313787)->elements[3])->fn),  Cyc_fast_list_3(&local_7322965, ((closureN)self_7313787)->elements[0], Cyc_fast_list_2(&local_7322969, ((closureN)self_7313787)->elements[2], ((closureN)self_7313787)->elements[5]), Cyc_fast_list_3(&local_7322974, ((closureN)self_7313787)->elements[1], set_cell_as_expr(&local_7322978, Cyc_fast_list_2(&local_7322981, Cyc_car(data, ((closureN)self_7313787)->elements[4]), ((closureN)self_7313787)->elements[5])), r_736496)));; 
--}
--
++complex_num_type local_7321380; 
++return_closcall4(data,  car(((closureN)self_7312603)->elements[2]),  ((closureN)self_7312603)->elements[1], Cyc_car(data, ((closureN)self_7312603)->elements[3]), Cyc_fast_sum(data,&local_7321380, ((closureN)self_7312603)->elements[0], obj_int2obj(1)), r_735985);; 
+ }
+ 
 -static void __lambda_959(void *data, object self_7313778, int argc, object *args) /* object self_7313778, object k_736489, object l_731290_733587 */
-- {
++static void __lambda_932(void *data, object self_7312599, int argc, object *args) /* object self_7312599, object k_735981, object lit_731373_733271 */
+  {
 - object k_736489 = args[0]; object l_731290_733587 = args[1];
 -  return_closcall3(data,  ((closureN)self_7313778)->elements[0],  k_736489, ((closureN)self_7313778)->elements[1], l_731290_733587);; 
-+pair_type local_7321848; 
-+return_direct_with_clo1(data,  ((closureN)self_7312554)->elements[1], (((closure)  ((closureN)self_7312554)->elements[1])->fn),  set_pair_as_expr(&local_7321848, ((closureN)self_7312554)->elements[0], r_736088));; 
++ object k_735981 = args[0]; object lit_731373_733271 = args[1];
++  return_closcall3(data,  ((closureN)self_7312599)->elements[0],  k_735981, ((closureN)self_7312599)->elements[1], lit_731373_733271);; 
  }
  
 -static void __lambda_954(void *data, object self_7313779, int argc, object *args) /* object self_7313779, object r_736488 */
-+static void __lambda_969(void *data, object self_7312555, int argc, object *args) /* object self_7312555, object r_736086 */
++static void __lambda_930(void *data, object self_7312600, int argc, object *args) /* object self_7312600, object r_735980 */
   {
 - object r_736488 = args[0];
-+ object r_736086 = args[0];
++ object r_735980 = args[0];
    
 -closureN_type c_7322878;
 -object e_7322935 [11];
@@ -27950,38 +29381,29 @@ Make let-values be the same as let*-values, to work around
 -c_7322878.elements[8] = ((closureN)self_7313779)->elements[9];
 -c_7322878.elements[9] = ((closureN)self_7313779)->elements[10];
 -c_7322878.elements[10] = ((closureN)self_7313779)->elements[11];
++closureN_type c_7321335;
++object e_7321350 [4];
++c_7321335.hdr.mark = gc_color_red;
++ c_7321335.hdr.grayed = 0;
++c_7321335.tag = closureN_tag;
++ c_7321335.fn = (function_type)__lambda_931;
++c_7321335.num_args = 1;
++c_7321335.num_elements = 4;
++c_7321335.elements = (object *)e_7321350;
++c_7321335.elements[0] = ((closureN)self_7312600)->elements[0];
++c_7321335.elements[1] = ((closureN)self_7312600)->elements[1];
++c_7321335.elements[2] = ((closureN)self_7312600)->elements[3];
++c_7321335.elements[3] = ((closureN)self_7312600)->elements[4];
  
  
-+closureN_type c_7321733;
-+object e_7321823 [15];
-+c_7321733.hdr.mark = gc_color_red;
-+ c_7321733.hdr.grayed = 0;
-+c_7321733.tag = closureN_tag;
-+ c_7321733.fn = (function_type)__lambda_970;
-+c_7321733.num_args = 1;
-+c_7321733.num_elements = 15;
-+c_7321733.elements = (object *)e_7321823;
-+c_7321733.elements[0] = ((closureN)self_7312555)->elements[0];
-+c_7321733.elements[1] = ((closureN)self_7312555)->elements[2];
-+c_7321733.elements[2] = ((closureN)self_7312555)->elements[3];
-+c_7321733.elements[3] = ((closureN)self_7312555)->elements[4];
-+c_7321733.elements[4] = ((closureN)self_7312555)->elements[5];
-+c_7321733.elements[5] = ((closureN)self_7312555)->elements[6];
-+c_7321733.elements[6] = ((closureN)self_7312555)->elements[7];
-+c_7321733.elements[7] = ((closureN)self_7312555)->elements[8];
-+c_7321733.elements[8] = ((closureN)self_7312555)->elements[10];
-+c_7321733.elements[9] = ((closureN)self_7312555)->elements[11];
-+c_7321733.elements[10] = ((closureN)self_7312555)->elements[13];
-+c_7321733.elements[11] = ((closureN)self_7312555)->elements[14];
-+c_7321733.elements[12] = ((closureN)self_7312555)->elements[16];
-+c_7321733.elements[13] = ((closureN)self_7312555)->elements[17];
-+c_7321733.elements[14] = ((closureN)self_7312555)->elements[18];
  
 -return_direct_with_clo3(data,  __glo_any_scheme_base, (((closure)  __glo_any_scheme_base)->fn),  &c_7322878, r_736488, car(((closureN)self_7313779)->elements[8]));; 
--}
++return_direct_with_clo3(data,  __glo_any_scheme_base, (((closure)  __glo_any_scheme_base)->fn),  &c_7321335, r_735980, car(((closureN)self_7312600)->elements[2]));; 
+ }
  
 -static void __lambda_955(void *data, object self_7313780, int argc, object *args) /* object self_7313780, object r_736478 */
-- {
++static void __lambda_931(void *data, object self_7312601, int argc, object *args) /* object self_7312601, object r_735978 */
+  {
 - object r_736478 = args[0];
 -  if( (boolean_f != r_736478) ){ 
 -  
@@ -28001,20 +29423,14 @@ Make let-values be the same as let*-values, to work around
 -c_7322880.elements[4] = ((closureN)self_7313780)->elements[7];
 -c_7322880.elements[5] = ((closureN)self_7313780)->elements[9];
 -c_7322880.elements[6] = ((closureN)self_7313780)->elements[10];
- 
- 
+-
+-
 -list_2_type local_7322905; 
 -return_direct_with_clo1(data,(closure)&c_7322880,__lambda_956,  Cyc_fast_list_2(&local_7322905, ((closureN)self_7313780)->elements[3], ((closureN)self_7313780)->elements[8]));
--} else { 
-+list_2_type local_7321829; 
-+
-+complex_num_type local_7321834; 
-+return_closcall6(data,  car(((closureN)self_7312555)->elements[12]),  &c_7321733, Cyc_car(data, ((closureN)self_7312555)->elements[15]), Cyc_fast_list_2(&local_7321829, ((closureN)self_7312555)->elements[1], ((closureN)self_7312555)->elements[18]), Cyc_fast_sum(data,&local_7321834, ((closureN)self_7312555)->elements[9], obj_int2obj(1)), NULL, r_736086);; 
-+}
-+
-+static void __lambda_970(void *data, object self_7312556, int argc, object *args) /* object self_7312556, object once_731333_733255 */
-+ {
-+ object once_731333_733255 = args[0];
++ object r_735978 = args[0];
++  if( (boolean_f != r_735978) ){ 
++  return_direct_with_clo1(data,  ((closureN)self_7312601)->elements[1], (((closure)  ((closureN)self_7312601)->elements[1])->fn),  ((closureN)self_7312601)->elements[2]);
+ } else { 
    
 -closureN_type c_7322910;
 -object e_7322925 [4];
@@ -28029,72 +29445,53 @@ Make let-values be the same as let*-values, to work around
 -c_7322910.elements[1] = ((closureN)self_7313780)->elements[7];
 -c_7322910.elements[2] = ((closureN)self_7313780)->elements[8];
 -c_7322910.elements[3] = ((closureN)self_7313780)->elements[9];
-+closureN_type c_7321735;
-+object e_7321812 [15];
-+c_7321735.hdr.mark = gc_color_red;
-+ c_7321735.hdr.grayed = 0;
-+c_7321735.tag = closureN_tag;
-+ c_7321735.fn = (function_type)__lambda_971;
-+c_7321735.num_args = 1;
-+c_7321735.num_elements = 15;
-+c_7321735.elements = (object *)e_7321812;
-+c_7321735.elements[0] = ((closureN)self_7312556)->elements[0];
-+c_7321735.elements[1] = ((closureN)self_7312556)->elements[1];
-+c_7321735.elements[2] = ((closureN)self_7312556)->elements[2];
-+c_7321735.elements[3] = ((closureN)self_7312556)->elements[3];
-+c_7321735.elements[4] = ((closureN)self_7312556)->elements[4];
-+c_7321735.elements[5] = ((closureN)self_7312556)->elements[5];
-+c_7321735.elements[6] = ((closureN)self_7312556)->elements[7];
-+c_7321735.elements[7] = ((closureN)self_7312556)->elements[8];
-+c_7321735.elements[8] = ((closureN)self_7312556)->elements[9];
-+c_7321735.elements[9] = ((closureN)self_7312556)->elements[10];
-+c_7321735.elements[10] = ((closureN)self_7312556)->elements[11];
-+c_7321735.elements[11] = once_731333_733255;
-+c_7321735.elements[12] = ((closureN)self_7312556)->elements[12];
-+c_7321735.elements[13] = ((closureN)self_7312556)->elements[13];
-+c_7321735.elements[14] = ((closureN)self_7312556)->elements[14];
- 
- 
+-
+-
 -pair_type local_7322928; 
-+closureN_type c_7321813;
-+object e_7321822 [1];
-+c_7321813.hdr.mark = gc_color_red;
-+ c_7321813.hdr.grayed = 0;
-+c_7321813.tag = closureN_tag;
-+ c_7321813.fn = (function_type)__lambda_979;
-+c_7321813.num_args = 1;
-+c_7321813.num_elements = 1;
-+c_7321813.elements = (object *)e_7321822;
-+c_7321813.elements[0] = ((closureN)self_7312556)->elements[6];
++pair_type local_7321343; 
  
 -pair_type local_7322931; 
 -return_closcall2(data,  ((closureN)self_7313780)->elements[6],  &c_7322910, set_pair_as_expr(&local_7322928, set_pair_as_expr(&local_7322931, ((closureN)self_7313780)->elements[8], ((closureN)self_7313780)->elements[5]), ((closureN)self_7313780)->elements[10]));}
--;; 
-+return_direct_with_clo1(data,(closure)&c_7321735,__lambda_971,  &c_7321813);; 
++pair_type local_7321346; 
++return_direct_with_clo1(data,  ((closureN)self_7312601)->elements[1], (((closure)  ((closureN)self_7312601)->elements[1])->fn),  set_pair_as_expr(&local_7321343, set_pair_as_expr(&local_7321346, ((closureN)self_7312601)->elements[3], ((closureN)self_7312601)->elements[0]), ((closureN)self_7312601)->elements[2]));}
+ ;; 
  }
  
 -static void __lambda_958(void *data, object self_7313783, int argc, object *args) /* object self_7313783, object r_736484 */
-+static void __lambda_979(void *data, object self_7312557, int argc, object *args) /* object self_7312557, object k_736079, object x_731335_733256 */
++static void __lambda_926(void *data, object self_7312606, int argc, object *args) /* object self_7312606, object r_735975 */
   {
 - object r_736484 = args[0];
-+ object k_736079 = args[0]; object x_731335_733256 = args[1];
++ object r_735975 = args[0];
    
 -list_3_type local_7322915; 
-+list_2_type local_7321817; 
++closureN_type c_7321315;
++object e_7321324 [5];
++c_7321315.hdr.mark = gc_color_red;
++ c_7321315.hdr.grayed = 0;
++c_7321315.tag = closureN_tag;
++ c_7321315.fn = (function_type)__lambda_927;
++c_7321315.num_args = 1;
++c_7321315.num_elements = 5;
++c_7321315.elements = (object *)e_7321324;
++c_7321315.elements[0] = ((closureN)self_7312606)->elements[0];
++c_7321315.elements[1] = ((closureN)self_7312606)->elements[1];
++c_7321315.elements[2] = ((closureN)self_7312606)->elements[2];
++c_7321315.elements[3] = ((closureN)self_7312606)->elements[3];
++c_7321315.elements[4] = ((closureN)self_7312606)->elements[4];
++
  
 -pair_type local_7322919; 
--
+ 
 -list_2_type local_7322922; 
 -return_direct_with_clo1(data,  ((closureN)self_7313783)->elements[1], (((closure)  ((closureN)self_7313783)->elements[1])->fn),  Cyc_fast_list_3(&local_7322915, ((closureN)self_7313783)->elements[0], set_cell_as_expr(&local_7322919, Cyc_fast_list_2(&local_7322922, ((closureN)self_7313783)->elements[2], ((closureN)self_7313783)->elements[3])), r_736484));; 
-+list_2_type local_7321820; 
-+return_direct_with_clo1(data,  k_736079, (((closure)  k_736079)->fn),  Cyc_fast_list_2(&local_7321817, x_731335_733256, Cyc_fast_list_2(&local_7321820, ((closureN)self_7312557)->elements[0], NULL)));; 
++return_direct_with_clo1(data,(closure)&c_7321315,__lambda_927,  Cyc_set_cell(data, ((closureN)self_7312606)->elements[2], r_735975));; 
  }
  
 -static void __lambda_956(void *data, object self_7313781, int argc, object *args) /* object self_7313781, object r_736482 */
-+static void __lambda_971(void *data, object self_7312558, int argc, object *args) /* object self_7312558, object r_736078 */
++static void __lambda_927(void *data, object self_7312607, int argc, object *args) /* object self_7312607, object r_735974 */
   {
 - object r_736482 = args[0];
-+ object r_736078 = args[0];
++
    
 -closureN_type c_7322883;
 -object e_7322900 [6];
@@ -28111,91 +29508,26 @@ Make let-values be the same as let*-values, to work around
 -c_7322883.elements[3] = ((closureN)self_7313781)->elements[4];
 -c_7322883.elements[4] = r_736482;
 -c_7322883.elements[5] = ((closureN)self_7313781)->elements[5];
-+closureN_type c_7321737;
-+object e_7321810 [15];
-+c_7321737.hdr.mark = gc_color_red;
-+ c_7321737.hdr.grayed = 0;
-+c_7321737.tag = closureN_tag;
-+ c_7321737.fn = (function_type)__lambda_972;
-+c_7321737.num_args = 1;
-+c_7321737.num_elements = 15;
-+c_7321737.elements = (object *)e_7321810;
-+c_7321737.elements[0] = ((closureN)self_7312558)->elements[0];
-+c_7321737.elements[1] = ((closureN)self_7312558)->elements[1];
-+c_7321737.elements[2] = ((closureN)self_7312558)->elements[2];
-+c_7321737.elements[3] = ((closureN)self_7312558)->elements[3];
-+c_7321737.elements[4] = ((closureN)self_7312558)->elements[4];
-+c_7321737.elements[5] = ((closureN)self_7312558)->elements[5];
-+c_7321737.elements[6] = ((closureN)self_7312558)->elements[6];
-+c_7321737.elements[7] = ((closureN)self_7312558)->elements[7];
-+c_7321737.elements[8] = ((closureN)self_7312558)->elements[8];
-+c_7321737.elements[9] = ((closureN)self_7312558)->elements[9];
-+c_7321737.elements[10] = ((closureN)self_7312558)->elements[10];
-+c_7321737.elements[11] = ((closureN)self_7312558)->elements[11];
-+c_7321737.elements[12] = ((closureN)self_7312558)->elements[12];
-+c_7321737.elements[13] = ((closureN)self_7312558)->elements[13];
-+c_7321737.elements[14] = ((closureN)self_7312558)->elements[14];
- 
+-
 -return_closcall2(data,  ((closureN)self_7313781)->elements[3],  &c_7322883, ((closureN)self_7313781)->elements[6]);; 
-+return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7321737, r_736078, ((closureN)self_7312558)->elements[9]);; 
- }
- 
+-}
+-
 -static void __lambda_957(void *data, object self_7313782, int argc, object *args) /* object self_7313782, object r_736480 */
-+static void __lambda_972(void *data, object self_7312559, int argc, object *args) /* object self_7312559, object r_736077 */
-  {
+- {
 - object r_736480 = args[0];
-+ object r_736077 = args[0];
-   
+-  
 -list_3_type local_7322888; 
-+closureN_type c_7321739;
-+object e_7321797 [15];
-+c_7321739.hdr.mark = gc_color_red;
-+ c_7321739.hdr.grayed = 0;
-+c_7321739.tag = closureN_tag;
-+ c_7321739.fn = (function_type)__lambda_973;
-+c_7321739.num_args = 1;
-+c_7321739.num_elements = 15;
-+c_7321739.elements = (object *)e_7321797;
-+c_7321739.elements[0] = ((closureN)self_7312559)->elements[0];
-+c_7321739.elements[1] = ((closureN)self_7312559)->elements[1];
-+c_7321739.elements[2] = ((closureN)self_7312559)->elements[2];
-+c_7321739.elements[3] = ((closureN)self_7312559)->elements[3];
-+c_7321739.elements[4] = ((closureN)self_7312559)->elements[4];
-+c_7321739.elements[5] = ((closureN)self_7312559)->elements[5];
-+c_7321739.elements[6] = ((closureN)self_7312559)->elements[7];
-+c_7321739.elements[7] = ((closureN)self_7312559)->elements[8];
-+c_7321739.elements[8] = ((closureN)self_7312559)->elements[9];
-+c_7321739.elements[9] = ((closureN)self_7312559)->elements[10];
-+c_7321739.elements[10] = ((closureN)self_7312559)->elements[11];
-+c_7321739.elements[11] = r_736077;
-+c_7321739.elements[12] = ((closureN)self_7312559)->elements[12];
-+c_7321739.elements[13] = ((closureN)self_7312559)->elements[13];
-+c_7321739.elements[14] = ((closureN)self_7312559)->elements[14];
-+
- 
+-
 -list_3_type local_7322892; 
-+closureN_type c_7321798;
-+object e_7321809 [1];
-+c_7321798.hdr.mark = gc_color_red;
-+ c_7321798.hdr.grayed = 0;
-+c_7321798.tag = closureN_tag;
-+ c_7321798.fn = (function_type)__lambda_978;
-+c_7321798.num_args = 2;
-+c_7321798.num_elements = 1;
-+c_7321798.elements = (object *)e_7321809;
-+c_7321798.elements[0] = ((closureN)self_7312559)->elements[6];
- 
+-
 -list_2_type local_7322897; 
 -return_direct_with_clo1(data,  ((closureN)self_7313782)->elements[3], (((closure)  ((closureN)self_7313782)->elements[3])->fn),  Cyc_fast_list_3(&local_7322888, ((closureN)self_7313782)->elements[0], Cyc_fast_list_3(&local_7322892, ((closureN)self_7313782)->elements[1], ((closureN)self_7313782)->elements[5], Cyc_fast_list_2(&local_7322897, ((closureN)self_7313782)->elements[2], ((closureN)self_7313782)->elements[4])), r_736480));; 
-+return_direct_with_clo1(data,(closure)&c_7321739,__lambda_973,  &c_7321798);; 
- }
- 
+-}
+-
 -static void __lambda_948(void *data, object self_7313827, int argc, object *args) /* object self_7313827, object r_736471 */
-+static void __lambda_978(void *data, object self_7312560, int argc, object *args) /* object self_7312560, object k_736073, object x_731336_733257, object l_731337_733258 */
-  {
+- {
 - object r_736471 = args[0];
-+ object k_736073 = args[0]; object x_731336_733257 = args[1]; object l_731337_733258 = args[2];
-   
+-  
 -closureN_type c_7322850;
 -object e_7322860 [6];
 -c_7322850.hdr.mark = gc_color_red;
@@ -28211,55 +29543,24 @@ Make let-values be the same as let*-values, to work around
 -c_7322850.elements[3] = ((closureN)self_7313827)->elements[3];
 -c_7322850.elements[4] = ((closureN)self_7313827)->elements[4];
 -c_7322850.elements[5] = ((closureN)self_7313827)->elements[5];
-+list_2_type local_7321802; 
- 
- 
- 
+-
+-
+-
 -return_direct_with_clo1(data,(closure)&c_7322850,__lambda_949,  Cyc_set_cell(data, ((closureN)self_7313827)->elements[2], r_736471));; 
-+list_2_type local_7321807; 
-+return_direct_with_clo1(data,  k_736073, (((closure)  k_736073)->fn),  Cyc_fast_list_2(&local_7321802, Cyc_car(data, x_731336_733257), Cyc_fast_list_2(&local_7321807, ((closureN)self_7312560)->elements[0], l_731337_733258)));; 
- }
- 
+-}
+-
 -static void __lambda_949(void *data, object self_7313828, int argc, object *args) /* object self_7313828, object r_736470 */
-+static void __lambda_973(void *data, object self_7312561, int argc, object *args) /* object self_7312561, object r_736072 */
-  {
+- {
+-
+-  
 -
-+ object r_736072 = args[0];
-   
-+closureN_type c_7321741;
-+object e_7321794 [14];
-+c_7321741.hdr.mark = gc_color_red;
-+ c_7321741.hdr.grayed = 0;
-+c_7321741.tag = closureN_tag;
-+ c_7321741.fn = (function_type)__lambda_974;
-+c_7321741.num_args = 1;
-+c_7321741.num_elements = 14;
-+c_7321741.elements = (object *)e_7321794;
-+c_7321741.elements[0] = ((closureN)self_7312561)->elements[0];
-+c_7321741.elements[1] = ((closureN)self_7312561)->elements[1];
-+c_7321741.elements[2] = ((closureN)self_7312561)->elements[2];
-+c_7321741.elements[3] = ((closureN)self_7312561)->elements[3];
-+c_7321741.elements[4] = ((closureN)self_7312561)->elements[4];
-+c_7321741.elements[5] = ((closureN)self_7312561)->elements[5];
-+c_7321741.elements[6] = ((closureN)self_7312561)->elements[6];
-+c_7321741.elements[7] = ((closureN)self_7312561)->elements[7];
-+c_7321741.elements[8] = ((closureN)self_7312561)->elements[9];
-+c_7321741.elements[9] = ((closureN)self_7312561)->elements[10];
-+c_7321741.elements[10] = ((closureN)self_7312561)->elements[11];
-+c_7321741.elements[11] = ((closureN)self_7312561)->elements[12];
-+c_7321741.elements[12] = ((closureN)self_7312561)->elements[13];
-+c_7321741.elements[13] = ((closureN)self_7312561)->elements[14];
- 
 -return_closcall6(data,  car(((closureN)self_7313828)->elements[2]),  ((closureN)self_7313828)->elements[1], ((closureN)self_7313828)->elements[3], ((closureN)self_7313828)->elements[5], obj_int2obj(0), ((closureN)self_7313828)->elements[4], ((closureN)self_7313828)->elements[0]);; 
-+return_direct_with_clo4(data,  __glo_Cyc_91map_91loop_912_scheme_base, (((closure)  __glo_Cyc_91map_91loop_912_scheme_base)->fn),  &c_7321741, r_736072, ((closureN)self_7312561)->elements[9], ((closureN)self_7312561)->elements[8]);; 
- }
- 
+-}
+-
 -static void __lambda_846(void *data, object self_7313829, int argc, object *args) /* object self_7313829, object r_736464 */
-+static void __lambda_974(void *data, object self_7312562, int argc, object *args) /* object self_7312562, object r_736069 */
-  {
+- {
 - object r_736464 = args[0];
-+ object r_736069 = args[0];
-   
+-  
 -closureN_type c_7321982;
 -object e_7322833 [29];
 -c_7321982.hdr.mark = gc_color_red;
@@ -28298,68 +29599,16 @@ Make let-values be the same as let*-values, to work around
 -c_7321982.elements[26] = ((closureN)self_7313829)->elements[26];
 -c_7321982.elements[27] = ((closureN)self_7313829)->elements[27];
 -c_7321982.elements[28] = ((closureN)self_7313829)->elements[28];
-+closureN_type c_7321743;
-+object e_7321791 [13];
-+c_7321743.hdr.mark = gc_color_red;
-+ c_7321743.hdr.grayed = 0;
-+c_7321743.tag = closureN_tag;
-+ c_7321743.fn = (function_type)__lambda_975;
-+c_7321743.num_args = 1;
-+c_7321743.num_elements = 13;
-+c_7321743.elements = (object *)e_7321791;
-+c_7321743.elements[0] = ((closureN)self_7312562)->elements[0];
-+c_7321743.elements[1] = ((closureN)self_7312562)->elements[1];
-+c_7321743.elements[2] = ((closureN)self_7312562)->elements[2];
-+c_7321743.elements[3] = ((closureN)self_7312562)->elements[3];
-+c_7321743.elements[4] = ((closureN)self_7312562)->elements[4];
-+c_7321743.elements[5] = ((closureN)self_7312562)->elements[5];
-+c_7321743.elements[6] = ((closureN)self_7312562)->elements[6];
-+c_7321743.elements[7] = ((closureN)self_7312562)->elements[7];
-+c_7321743.elements[8] = ((closureN)self_7312562)->elements[9];
-+c_7321743.elements[9] = r_736069;
-+c_7321743.elements[10] = ((closureN)self_7312562)->elements[10];
-+c_7321743.elements[11] = ((closureN)self_7312562)->elements[11];
-+c_7321743.elements[12] = ((closureN)self_7312562)->elements[13];
- 
-+return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7321743, ((closureN)self_7312562)->elements[8], ((closureN)self_7312562)->elements[12]);; 
-+}
- 
-+static void __lambda_975(void *data, object self_7312563, int argc, object *args) /* object self_7312563, object r_736071 */
-+ {
-+ object r_736071 = args[0];
-+  
-+closureN_type c_7321746;
-+object e_7321790 [12];
-+c_7321746.hdr.mark = gc_color_red;
-+ c_7321746.hdr.grayed = 0;
-+c_7321746.tag = closureN_tag;
-+ c_7321746.fn = (function_type)__lambda_976;
-+c_7321746.num_args = 1;
-+c_7321746.num_elements = 12;
-+c_7321746.elements = (object *)e_7321790;
-+c_7321746.elements[0] = ((closureN)self_7312563)->elements[0];
-+c_7321746.elements[1] = ((closureN)self_7312563)->elements[1];
-+c_7321746.elements[2] = ((closureN)self_7312563)->elements[2];
-+c_7321746.elements[3] = ((closureN)self_7312563)->elements[3];
-+c_7321746.elements[4] = ((closureN)self_7312563)->elements[4];
-+c_7321746.elements[5] = ((closureN)self_7312563)->elements[5];
-+c_7321746.elements[6] = ((closureN)self_7312563)->elements[7];
-+c_7321746.elements[7] = ((closureN)self_7312563)->elements[8];
-+c_7321746.elements[8] = ((closureN)self_7312563)->elements[9];
-+c_7321746.elements[9] = ((closureN)self_7312563)->elements[10];
-+c_7321746.elements[10] = ((closureN)self_7312563)->elements[11];
-+c_7321746.elements[11] = ((closureN)self_7312563)->elements[12];
- 
+-
+-
+-
 -return_direct_with_clo1(data,(closure)&c_7321982,__lambda_847,  Cyc_set_cell(data, ((closureN)self_7313829)->elements[22], r_736464));; 
-+return_closcall2(data,  ((closureN)self_7312563)->elements[6],  &c_7321746, r_736071);; 
- }
- 
+-}
+-
 -static void __lambda_847(void *data, object self_7313830, int argc, object *args) /* object self_7313830, object r_736317 */
-+static void __lambda_976(void *data, object self_7312564, int argc, object *args) /* object self_7312564, object r_736070 */
-  {
+- {
 -
-+ object r_736070 = args[0];
-   
+-  
 -closureN_type c_7321984;
 -object e_7322820 [29];
 -c_7321984.hdr.mark = gc_color_red;
@@ -28399,27 +29648,7 @@ Make let-values be the same as let*-values, to work around
 -c_7321984.elements[27] = ((closureN)self_7313830)->elements[27];
 -c_7321984.elements[28] = ((closureN)self_7313830)->elements[28];
 -
-+closureN_type c_7321748;
-+object e_7321784 [11];
-+c_7321748.hdr.mark = gc_color_red;
-+ c_7321748.hdr.grayed = 0;
-+c_7321748.tag = closureN_tag;
-+ c_7321748.fn = (function_type)__lambda_977;
-+c_7321748.num_args = 1;
-+c_7321748.num_elements = 11;
-+c_7321748.elements = (object *)e_7321784;
-+c_7321748.elements[0] = ((closureN)self_7312564)->elements[0];
-+c_7321748.elements[1] = ((closureN)self_7312564)->elements[1];
-+c_7321748.elements[2] = ((closureN)self_7312564)->elements[2];
-+c_7321748.elements[3] = ((closureN)self_7312564)->elements[3];
-+c_7321748.elements[4] = ((closureN)self_7312564)->elements[4];
-+c_7321748.elements[5] = ((closureN)self_7312564)->elements[5];
-+c_7321748.elements[6] = ((closureN)self_7312564)->elements[6];
-+c_7321748.elements[7] = ((closureN)self_7312564)->elements[7];
-+c_7321748.elements[8] = ((closureN)self_7312564)->elements[9];
-+c_7321748.elements[9] = ((closureN)self_7312564)->elements[10];
-+c_7321748.elements[10] = ((closureN)self_7312564)->elements[11];
- 
+-
 -closureN_type c_7322821;
 -object e_7322832 [2];
 -c_7322821.hdr.mark = gc_color_red;
@@ -28431,46 +29660,29 @@ Make let-values be the same as let*-values, to work around
 -c_7322821.elements = (object *)e_7322832;
 -c_7322821.elements[0] = ((closureN)self_7313830)->elements[16];
 -c_7322821.elements[1] = ((closureN)self_7313830)->elements[17];
- 
+-
 -return_direct_with_clo1(data,(closure)&c_7321984,__lambda_848,  &c_7322821);; 
-+list_3_type local_7321787; 
-+return_direct_with_clo1(data,(closure)&c_7321748,__lambda_977,  Cyc_fast_list_3(&local_7321787, ((closureN)self_7312564)->elements[2], ((closureN)self_7312564)->elements[8], r_736070));; 
- }
- 
+-}
+-
 -static void __lambda_943(void *data, object self_7313831, int argc, object *args) /* object self_7313831, object k_736461, object x_731353_733605 */
-+static void __lambda_977(void *data, object self_7312565, int argc, object *args) /* object self_7312565, object r_736066 */
-  {
+- {
 - object k_736461 = args[0]; object x_731353_733605 = args[1];
 -    
 -if( (boolean_f != Cyc_is_pair(x_731353_733605)) ){ 
-+ object r_736066 = args[0];
-   
-+list_4_type local_7321753; 
- 
-+pair_type local_7321758; 
- 
-+list_2_type local_7321761; 
- 
+-  
+-
+-
+-
 -return_closcall3(data,  ((closureN)self_7313831)->elements[0],  k_736461, car(((closureN)self_7313831)->elements[1]), Cyc_car(data, x_731353_733605));
 -} else { 
 -  return_direct_with_clo1(data,  k_736461, (((closure)  k_736461)->fn),  boolean_f);}
 -;; 
-+list_4_type local_7321767; 
-+
-+list_2_type local_7321771; 
-+
-+list_3_type local_7321776; 
-+
-+list_2_type local_7321780; 
-+return_direct_with_clo1(data,  ((closureN)self_7312565)->elements[6], (((closure)  ((closureN)self_7312565)->elements[6])->fn),  Cyc_fast_list_4(&local_7321753, ((closureN)self_7312565)->elements[2], ((closureN)self_7312565)->elements[3], set_pair_as_expr(&local_7321758, Cyc_fast_list_2(&local_7321761, ((closureN)self_7312565)->elements[10], ((closureN)self_7312565)->elements[9]), ((closureN)self_7312565)->elements[8]), Cyc_fast_list_4(&local_7321767, ((closureN)self_7312565)->elements[1], Cyc_fast_list_2(&local_7321771, ((closureN)self_7312565)->elements[4], ((closureN)self_7312565)->elements[10]), r_736066, Cyc_fast_list_3(&local_7321776, ((closureN)self_7312565)->elements[0], Cyc_fast_list_2(&local_7321780, ((closureN)self_7312565)->elements[5], ((closureN)self_7312565)->elements[10]), ((closureN)self_7312565)->elements[7]))));; 
- }
- 
+-}
+-
 -static void __lambda_848(void *data, object self_7313832, int argc, object *args) /* object self_7313832, object r_736460 */
-+static void __lambda_963(void *data, object self_7312541, int argc, object *args) /* object self_7312541, object r_736051 */
-  {
+- {
 - object r_736460 = args[0];
-+ object r_736051 = args[0];
-   
+-  
 -closureN_type c_7321986;
 -object e_7322816 [29];
 -c_7321986.hdr.mark = gc_color_red;
@@ -28509,32 +29721,16 @@ Make let-values be the same as let*-values, to work around
 -c_7321986.elements[26] = ((closureN)self_7313832)->elements[26];
 -c_7321986.elements[27] = ((closureN)self_7313832)->elements[27];
 -c_7321986.elements[28] = ((closureN)self_7313832)->elements[28];
-+list_3_type local_7321672; 
-+
-+list_2_type local_7321676; 
-+
-+list_3_type local_7321681; 
- 
-+pair_type local_7321685; 
- 
-+list_2_type local_7321688; 
- 
+-
+-
+-
 -return_direct_with_clo1(data,(closure)&c_7321986,__lambda_849,  Cyc_set_cell(data, ((closureN)self_7313832)->elements[19], r_736460));; 
-+
-+return_direct_with_clo1(data,  ((closureN)self_7312541)->elements[3], (((closure)  ((closureN)self_7312541)->elements[3])->fn),  Cyc_fast_list_3(&local_7321672, ((closureN)self_7312541)->elements[0], Cyc_fast_list_2(&local_7321676, ((closureN)self_7312541)->elements[2], ((closureN)self_7312541)->elements[5]), Cyc_fast_list_3(&local_7321681, ((closureN)self_7312541)->elements[1], set_cell_as_expr(&local_7321685, Cyc_fast_list_2(&local_7321688, Cyc_car(data, ((closureN)self_7312541)->elements[4]), ((closureN)self_7312541)->elements[5])), r_736051)));; 
- }
- 
+-}
+-
 -static void __lambda_849(void *data, object self_7313833, int argc, object *args) /* object self_7313833, object r_736318 */
-+static void __lambda_959(void *data, object self_7312532, int argc, object *args) /* object self_7312532, object k_736044, object l_731291_733247 */
-  {
-+ object k_736044 = args[0]; object l_731291_733247 = args[1];
-+  return_closcall3(data,  ((closureN)self_7312532)->elements[0],  k_736044, ((closureN)self_7312532)->elements[1], l_731291_733247);; 
-+}
- 
-+static void __lambda_954(void *data, object self_7312533, int argc, object *args) /* object self_7312533, object r_736043 */
-+ {
-+ object r_736043 = args[0];
-   
+- {
+-
+-  
 -closureN_type c_7321988;
 -object e_7322798 [28];
 -c_7321988.hdr.mark = gc_color_red;
@@ -28572,28 +29768,8 @@ Make let-values be the same as let*-values, to work around
 -c_7321988.elements[25] = ((closureN)self_7313833)->elements[26];
 -c_7321988.elements[26] = ((closureN)self_7313833)->elements[27];
 -c_7321988.elements[27] = ((closureN)self_7313833)->elements[28];
-+closureN_type c_7321585;
-+object e_7321642 [11];
-+c_7321585.hdr.mark = gc_color_red;
-+ c_7321585.hdr.grayed = 0;
-+c_7321585.tag = closureN_tag;
-+ c_7321585.fn = (function_type)__lambda_955;
-+c_7321585.num_args = 1;
-+c_7321585.num_elements = 11;
-+c_7321585.elements = (object *)e_7321642;
-+c_7321585.elements[0] = ((closureN)self_7312533)->elements[0];
-+c_7321585.elements[1] = ((closureN)self_7312533)->elements[1];
-+c_7321585.elements[2] = ((closureN)self_7312533)->elements[2];
-+c_7321585.elements[3] = ((closureN)self_7312533)->elements[3];
-+c_7321585.elements[4] = ((closureN)self_7312533)->elements[4];
-+c_7321585.elements[5] = ((closureN)self_7312533)->elements[5];
-+c_7321585.elements[6] = ((closureN)self_7312533)->elements[6];
-+c_7321585.elements[7] = ((closureN)self_7312533)->elements[7];
-+c_7321585.elements[8] = ((closureN)self_7312533)->elements[9];
-+c_7321585.elements[9] = ((closureN)self_7312533)->elements[10];
-+c_7321585.elements[10] = ((closureN)self_7312533)->elements[11];
- 
- 
+-
+-
 -closureN_type c_7322799;
 -object e_7322815 [2];
 -c_7322799.hdr.mark = gc_color_red;
@@ -28605,78 +29781,35 @@ Make let-values be the same as let*-values, to work around
 -c_7322799.elements = (object *)e_7322815;
 -c_7322799.elements[0] = ((closureN)self_7313833)->elements[16];
 -c_7322799.elements[1] = ((closureN)self_7313833)->elements[17];
- 
+-
 -return_direct_with_clo1(data,(closure)&c_7321988,__lambda_850,  &c_7322799);; 
-+return_direct_with_clo3(data,  __glo_any_scheme_base, (((closure)  __glo_any_scheme_base)->fn),  &c_7321585, r_736043, car(((closureN)self_7312533)->elements[8]));; 
- }
- 
+-}
+-
 -static void __lambda_942(void *data, object self_7313834, int argc, object *args) /* object self_7313834, object k_736455, object x_731355_733606 */
-+static void __lambda_955(void *data, object self_7312534, int argc, object *args) /* object self_7312534, object r_736033 */
-  {
+- {
 - object k_736455 = args[0]; object x_731355_733606 = args[1];
 -    
 -if( (boolean_f != Cyc_is_pair(x_731355_733606)) ){ 
 -    
-+ object r_736033 = args[0];
-+  if( (boolean_f != r_736033) ){ 
-   
+-  
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, x_731355_733606))) ){ 
-+closureN_type c_7321587;
-+object e_7321609 [7];
-+c_7321587.hdr.mark = gc_color_red;
-+ c_7321587.hdr.grayed = 0;
-+c_7321587.tag = closureN_tag;
-+ c_7321587.fn = (function_type)__lambda_956;
-+c_7321587.num_args = 1;
-+c_7321587.num_elements = 7;
-+c_7321587.elements = (object *)e_7321609;
-+c_7321587.elements[0] = ((closureN)self_7312534)->elements[0];
-+c_7321587.elements[1] = ((closureN)self_7312534)->elements[1];
-+c_7321587.elements[2] = ((closureN)self_7312534)->elements[4];
-+c_7321587.elements[3] = ((closureN)self_7312534)->elements[6];
-+c_7321587.elements[4] = ((closureN)self_7312534)->elements[7];
-+c_7321587.elements[5] = ((closureN)self_7312534)->elements[9];
-+c_7321587.elements[6] = ((closureN)self_7312534)->elements[10];
-+
-+
-+list_2_type local_7321612; 
-+return_direct_with_clo1(data,(closure)&c_7321587,__lambda_956,  Cyc_fast_list_2(&local_7321612, ((closureN)self_7312534)->elements[3], ((closureN)self_7312534)->elements[8]));
-+} else { 
-   
-+closureN_type c_7321617;
-+object e_7321632 [4];
-+c_7321617.hdr.mark = gc_color_red;
-+ c_7321617.hdr.grayed = 0;
-+c_7321617.tag = closureN_tag;
-+ c_7321617.fn = (function_type)__lambda_958;
-+c_7321617.num_args = 1;
-+c_7321617.num_elements = 4;
-+c_7321617.elements = (object *)e_7321632;
-+c_7321617.elements[0] = ((closureN)self_7312534)->elements[2];
-+c_7321617.elements[1] = ((closureN)self_7312534)->elements[7];
-+c_7321617.elements[2] = ((closureN)self_7312534)->elements[8];
-+c_7321617.elements[3] = ((closureN)self_7312534)->elements[9];
- 
- 
-+pair_type local_7321635; 
- 
+-  
+-
+-
+-
 -return_closcall3(data,  ((closureN)self_7313834)->elements[0],  k_736455, car(((closureN)self_7313834)->elements[1]), Cyc_cadr(data, x_731355_733606));
 -} else { 
 -  return_direct_with_clo1(data,  k_736455, (((closure)  k_736455)->fn),  boolean_f);}
 -;
 -} else { 
 -  return_direct_with_clo1(data,  k_736455, (((closure)  k_736455)->fn),  boolean_f);}
-+pair_type local_7321638; 
-+return_closcall2(data,  ((closureN)self_7312534)->elements[6],  &c_7321617, set_pair_as_expr(&local_7321635, set_pair_as_expr(&local_7321638, ((closureN)self_7312534)->elements[8], ((closureN)self_7312534)->elements[5]), ((closureN)self_7312534)->elements[10]));}
- ;; 
- }
- 
+-;; 
+-}
+-
 -static void __lambda_850(void *data, object self_7313835, int argc, object *args) /* object self_7313835, object r_736454 */
-+static void __lambda_958(void *data, object self_7312537, int argc, object *args) /* object self_7312537, object r_736039 */
-  {
+- {
 - object r_736454 = args[0];
-+ object r_736039 = args[0];
-   
+-  
 -closureN_type c_7321990;
 -object e_7322794 [28];
 -c_7321990.hdr.mark = gc_color_red;
@@ -28796,38 +29929,16 @@ Make let-values be the same as let*-values, to work around
 -c_7322775.elements[0] = ((closureN)self_7313837)->elements[0];
 -c_7322775.elements[1] = k_736450;
 -c_7322775.elements[2] = x_731358_733607;
-+list_3_type local_7321622; 
- 
+-
 -return_closcall2(data,  car(((closureN)self_7313837)->elements[1]),  &c_7322775, x_731358_733607);; 
-+pair_type local_7321626; 
-+
-+list_2_type local_7321629; 
-+return_direct_with_clo1(data,  ((closureN)self_7312537)->elements[1], (((closure)  ((closureN)self_7312537)->elements[1])->fn),  Cyc_fast_list_3(&local_7321622, ((closureN)self_7312537)->elements[0], set_cell_as_expr(&local_7321626, Cyc_fast_list_2(&local_7321629, ((closureN)self_7312537)->elements[2], ((closureN)self_7312537)->elements[3])), r_736039));; 
- }
- 
+-}
+-
 -static void __lambda_940(void *data, object self_7313838, int argc, object *args) /* object self_7313838, object r_736451 */
-+static void __lambda_956(void *data, object self_7312535, int argc, object *args) /* object self_7312535, object r_736037 */
-  {
+- {
 - object r_736451 = args[0];
 -  if( (boolean_f != r_736451) ){ 
-+ object r_736037 = args[0];
-   
-+closureN_type c_7321590;
-+object e_7321607 [6];
-+c_7321590.hdr.mark = gc_color_red;
-+ c_7321590.hdr.grayed = 0;
-+c_7321590.tag = closureN_tag;
-+ c_7321590.fn = (function_type)__lambda_957;
-+c_7321590.num_args = 1;
-+c_7321590.num_elements = 6;
-+c_7321590.elements = (object *)e_7321607;
-+c_7321590.elements[0] = ((closureN)self_7312535)->elements[0];
-+c_7321590.elements[1] = ((closureN)self_7312535)->elements[1];
-+c_7321590.elements[2] = ((closureN)self_7312535)->elements[2];
-+c_7321590.elements[3] = ((closureN)self_7312535)->elements[4];
-+c_7321590.elements[4] = r_736037;
-+c_7321590.elements[5] = ((closureN)self_7312535)->elements[5];
- 
+-  
+-
 -
 -closureN_type c_7322780;
 -object e_7322786 [1];
@@ -28846,31 +29957,20 @@ Make let-values be the same as let*-values, to work around
 -} else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7313838)->elements[1], (((closure)  ((closureN)self_7313838)->elements[1])->fn),  obj_int2obj(0));}
 -;; 
-+return_closcall2(data,  ((closureN)self_7312535)->elements[3],  &c_7321590, ((closureN)self_7312535)->elements[6]);; 
- }
- 
+-}
+-
 -static void __lambda_941(void *data, object self_7313839, int argc, object *args) /* object self_7313839, object r_736452 */
-+static void __lambda_957(void *data, object self_7312536, int argc, object *args) /* object self_7312536, object r_736035 */
-  {
+- {
 - object r_736452 = args[0];
-+ object r_736035 = args[0];
-   
+-  
 -complex_num_type local_7322785; 
 -return_direct_with_clo1(data,  ((closureN)self_7313839)->elements[0], (((closure)  ((closureN)self_7313839)->elements[0])->fn),  Cyc_fast_sum(data,&local_7322785, obj_int2obj(1), r_736452));; 
-+list_3_type local_7321595; 
-+
-+list_3_type local_7321599; 
-+
-+list_2_type local_7321604; 
-+return_direct_with_clo1(data,  ((closureN)self_7312536)->elements[3], (((closure)  ((closureN)self_7312536)->elements[3])->fn),  Cyc_fast_list_3(&local_7321595, ((closureN)self_7312536)->elements[0], Cyc_fast_list_3(&local_7321599, ((closureN)self_7312536)->elements[1], ((closureN)self_7312536)->elements[5], Cyc_fast_list_2(&local_7321604, ((closureN)self_7312536)->elements[2], ((closureN)self_7312536)->elements[4])), r_736035));; 
- }
- 
+-}
+-
 -static void __lambda_852(void *data, object self_7313840, int argc, object *args) /* object self_7313840, object r_736449 */
-+static void __lambda_948(void *data, object self_7312581, int argc, object *args) /* object self_7312581, object r_736026 */
-  {
+- {
 - object r_736449 = args[0];
-+ object r_736026 = args[0];
-   
+-  
 -closureN_type c_7321994;
 -object e_7322765 [28];
 -c_7321994.hdr.mark = gc_color_red;
@@ -28908,33 +30008,16 @@ Make let-values be the same as let*-values, to work around
 -c_7321994.elements[25] = ((closureN)self_7313840)->elements[25];
 -c_7321994.elements[26] = ((closureN)self_7313840)->elements[26];
 -c_7321994.elements[27] = ((closureN)self_7313840)->elements[27];
-+closureN_type c_7321557;
-+object e_7321567 [6];
-+c_7321557.hdr.mark = gc_color_red;
-+ c_7321557.hdr.grayed = 0;
-+c_7321557.tag = closureN_tag;
-+ c_7321557.fn = (function_type)__lambda_949;
-+c_7321557.num_args = 1;
-+c_7321557.num_elements = 6;
-+c_7321557.elements = (object *)e_7321567;
-+c_7321557.elements[0] = ((closureN)self_7312581)->elements[0];
-+c_7321557.elements[1] = ((closureN)self_7312581)->elements[1];
-+c_7321557.elements[2] = ((closureN)self_7312581)->elements[2];
-+c_7321557.elements[3] = ((closureN)self_7312581)->elements[3];
-+c_7321557.elements[4] = ((closureN)self_7312581)->elements[4];
-+c_7321557.elements[5] = ((closureN)self_7312581)->elements[5];
- 
- 
- 
+-
+-
+-
 -return_direct_with_clo1(data,(closure)&c_7321994,__lambda_853,  Cyc_set_cell(data, ((closureN)self_7313840)->elements[17], r_736449));; 
-+return_direct_with_clo1(data,(closure)&c_7321557,__lambda_949,  Cyc_set_cell(data, ((closureN)self_7312581)->elements[2], r_736026));; 
- }
- 
+-}
+-
 -static void __lambda_853(void *data, object self_7313841, int argc, object *args) /* object self_7313841, object r_736320 */
-+static void __lambda_949(void *data, object self_7312582, int argc, object *args) /* object self_7312582, object r_736025 */
-  {
- 
-   
+- {
+-
+-  
 -closureN_type c_7321996;
 -object e_7322743 [28];
 -c_7321996.hdr.mark = gc_color_red;
@@ -28985,57 +30068,16 @@ Make let-values be the same as let*-values, to work around
 -c_7322744.elements = (object *)e_7322764;
 -c_7322744.elements[0] = ((closureN)self_7313841)->elements[19];
 -c_7322744.elements[1] = ((closureN)self_7313841)->elements[20];
- 
+-
 -return_direct_with_clo1(data,(closure)&c_7321996,__lambda_854,  &c_7322744);; 
-+return_closcall6(data,  car(((closureN)self_7312582)->elements[2]),  ((closureN)self_7312582)->elements[1], ((closureN)self_7312582)->elements[3], ((closureN)self_7312582)->elements[5], obj_int2obj(0), ((closureN)self_7312582)->elements[4], ((closureN)self_7312582)->elements[0]);; 
- }
- 
+-}
+-
 -static void __lambda_937(void *data, object self_7313842, int argc, object *args) /* object self_7313842, object k_736446, object x_731359_733608 */
-+static void __lambda_846(void *data, object self_7312583, int argc, object *args) /* object self_7312583, object r_736019 */
-  {
+- {
 - object k_736446 = args[0]; object x_731359_733608 = args[1];
-+ object r_736019 = args[0];
-   
-+closureN_type c_7320689;
-+object e_7321540 [29];
-+c_7320689.hdr.mark = gc_color_red;
-+ c_7320689.hdr.grayed = 0;
-+c_7320689.tag = closureN_tag;
-+ c_7320689.fn = (function_type)__lambda_847;
-+c_7320689.num_args = 1;
-+c_7320689.num_elements = 29;
-+c_7320689.elements = (object *)e_7321540;
-+c_7320689.elements[0] = ((closureN)self_7312583)->elements[0];
-+c_7320689.elements[1] = ((closureN)self_7312583)->elements[1];
-+c_7320689.elements[2] = ((closureN)self_7312583)->elements[2];
-+c_7320689.elements[3] = ((closureN)self_7312583)->elements[3];
-+c_7320689.elements[4] = ((closureN)self_7312583)->elements[4];
-+c_7320689.elements[5] = ((closureN)self_7312583)->elements[5];
-+c_7320689.elements[6] = ((closureN)self_7312583)->elements[6];
-+c_7320689.elements[7] = ((closureN)self_7312583)->elements[7];
-+c_7320689.elements[8] = ((closureN)self_7312583)->elements[8];
-+c_7320689.elements[9] = ((closureN)self_7312583)->elements[9];
-+c_7320689.elements[10] = ((closureN)self_7312583)->elements[10];
-+c_7320689.elements[11] = ((closureN)self_7312583)->elements[11];
-+c_7320689.elements[12] = ((closureN)self_7312583)->elements[12];
-+c_7320689.elements[13] = ((closureN)self_7312583)->elements[13];
-+c_7320689.elements[14] = ((closureN)self_7312583)->elements[14];
-+c_7320689.elements[15] = ((closureN)self_7312583)->elements[15];
-+c_7320689.elements[16] = ((closureN)self_7312583)->elements[16];
-+c_7320689.elements[17] = ((closureN)self_7312583)->elements[17];
-+c_7320689.elements[18] = ((closureN)self_7312583)->elements[18];
-+c_7320689.elements[19] = ((closureN)self_7312583)->elements[19];
-+c_7320689.elements[20] = ((closureN)self_7312583)->elements[20];
-+c_7320689.elements[21] = ((closureN)self_7312583)->elements[21];
-+c_7320689.elements[22] = ((closureN)self_7312583)->elements[22];
-+c_7320689.elements[23] = ((closureN)self_7312583)->elements[23];
-+c_7320689.elements[24] = ((closureN)self_7312583)->elements[24];
-+c_7320689.elements[25] = ((closureN)self_7312583)->elements[25];
-+c_7320689.elements[26] = ((closureN)self_7312583)->elements[26];
-+c_7320689.elements[27] = ((closureN)self_7312583)->elements[27];
-+c_7320689.elements[28] = ((closureN)self_7312583)->elements[28];
- 
- 
+-  
+-
+-
 -closureN_type c_7322749;
 -object e_7322763 [3];
 -c_7322749.hdr.mark = gc_color_red;
@@ -29050,85 +30092,105 @@ Make let-values be the same as let*-values, to work around
 -c_7322749.elements[2] = x_731359_733608;
  
 -return_closcall2(data,  car(((closureN)self_7313842)->elements[1]),  &c_7322749, x_731359_733608);; 
-+return_direct_with_clo1(data,(closure)&c_7320689,__lambda_847,  Cyc_set_cell(data, ((closureN)self_7312583)->elements[22], r_736019));; 
++return_closcall4(data,  car(((closureN)self_7312607)->elements[2]),  ((closureN)self_7312607)->elements[1], ((closureN)self_7312607)->elements[4], ((closureN)self_7312607)->elements[0], ((closureN)self_7312607)->elements[3]);; 
  }
  
 -static void __lambda_938(void *data, object self_7313843, int argc, object *args) /* object self_7313843, object r_736447 */
-+static void __lambda_847(void *data, object self_7312584, int argc, object *args) /* object self_7312584, object r_735872 */
++static void __lambda_856(void *data, object self_7312608, int argc, object *args) /* object self_7312608, object r_735971 */
   {
 - object r_736447 = args[0];
 -  if( (boolean_f != r_736447) ){ 
--  
++ object r_735971 = args[0];
+   
++closureN_type c_7320702;
++object e_7321300 [25];
++c_7320702.hdr.mark = gc_color_red;
++ c_7320702.hdr.grayed = 0;
++c_7320702.tag = closureN_tag;
++ c_7320702.fn = (function_type)__lambda_857;
++c_7320702.num_args = 1;
++c_7320702.num_elements = 25;
++c_7320702.elements = (object *)e_7321300;
++c_7320702.elements[0] = ((closureN)self_7312608)->elements[0];
++c_7320702.elements[1] = ((closureN)self_7312608)->elements[1];
++c_7320702.elements[2] = ((closureN)self_7312608)->elements[2];
++c_7320702.elements[3] = ((closureN)self_7312608)->elements[3];
++c_7320702.elements[4] = ((closureN)self_7312608)->elements[4];
++c_7320702.elements[5] = ((closureN)self_7312608)->elements[5];
++c_7320702.elements[6] = ((closureN)self_7312608)->elements[6];
++c_7320702.elements[7] = ((closureN)self_7312608)->elements[7];
++c_7320702.elements[8] = ((closureN)self_7312608)->elements[8];
++c_7320702.elements[9] = ((closureN)self_7312608)->elements[9];
++c_7320702.elements[10] = ((closureN)self_7312608)->elements[10];
++c_7320702.elements[11] = ((closureN)self_7312608)->elements[11];
++c_7320702.elements[12] = ((closureN)self_7312608)->elements[12];
++c_7320702.elements[13] = ((closureN)self_7312608)->elements[13];
++c_7320702.elements[14] = ((closureN)self_7312608)->elements[14];
++c_7320702.elements[15] = ((closureN)self_7312608)->elements[16];
++c_7320702.elements[16] = ((closureN)self_7312608)->elements[17];
++c_7320702.elements[17] = ((closureN)self_7312608)->elements[18];
++c_7320702.elements[18] = ((closureN)self_7312608)->elements[19];
++c_7320702.elements[19] = ((closureN)self_7312608)->elements[20];
++c_7320702.elements[20] = ((closureN)self_7312608)->elements[21];
++c_7320702.elements[21] = ((closureN)self_7312608)->elements[22];
++c_7320702.elements[22] = ((closureN)self_7312608)->elements[23];
++c_7320702.elements[23] = ((closureN)self_7312608)->elements[24];
++c_7320702.elements[24] = ((closureN)self_7312608)->elements[25];
  
-+  
-+closureN_type c_7320691;
-+object e_7321527 [29];
-+c_7320691.hdr.mark = gc_color_red;
-+ c_7320691.hdr.grayed = 0;
-+c_7320691.tag = closureN_tag;
-+ c_7320691.fn = (function_type)__lambda_848;
-+c_7320691.num_args = 1;
-+c_7320691.num_elements = 29;
-+c_7320691.elements = (object *)e_7321527;
-+c_7320691.elements[0] = ((closureN)self_7312584)->elements[0];
-+c_7320691.elements[1] = ((closureN)self_7312584)->elements[1];
-+c_7320691.elements[2] = ((closureN)self_7312584)->elements[2];
-+c_7320691.elements[3] = ((closureN)self_7312584)->elements[3];
-+c_7320691.elements[4] = ((closureN)self_7312584)->elements[4];
-+c_7320691.elements[5] = ((closureN)self_7312584)->elements[5];
-+c_7320691.elements[6] = ((closureN)self_7312584)->elements[6];
-+c_7320691.elements[7] = ((closureN)self_7312584)->elements[7];
-+c_7320691.elements[8] = ((closureN)self_7312584)->elements[8];
-+c_7320691.elements[9] = ((closureN)self_7312584)->elements[9];
-+c_7320691.elements[10] = ((closureN)self_7312584)->elements[10];
-+c_7320691.elements[11] = ((closureN)self_7312584)->elements[11];
-+c_7320691.elements[12] = ((closureN)self_7312584)->elements[12];
-+c_7320691.elements[13] = ((closureN)self_7312584)->elements[13];
-+c_7320691.elements[14] = ((closureN)self_7312584)->elements[14];
-+c_7320691.elements[15] = ((closureN)self_7312584)->elements[15];
-+c_7320691.elements[16] = ((closureN)self_7312584)->elements[16];
-+c_7320691.elements[17] = ((closureN)self_7312584)->elements[17];
-+c_7320691.elements[18] = ((closureN)self_7312584)->elements[18];
-+c_7320691.elements[19] = ((closureN)self_7312584)->elements[19];
-+c_7320691.elements[20] = ((closureN)self_7312584)->elements[20];
-+c_7320691.elements[21] = ((closureN)self_7312584)->elements[21];
-+c_7320691.elements[22] = ((closureN)self_7312584)->elements[22];
-+c_7320691.elements[23] = ((closureN)self_7312584)->elements[23];
-+c_7320691.elements[24] = ((closureN)self_7312584)->elements[24];
-+c_7320691.elements[25] = ((closureN)self_7312584)->elements[25];
-+c_7320691.elements[26] = ((closureN)self_7312584)->elements[26];
-+c_7320691.elements[27] = ((closureN)self_7312584)->elements[27];
-+c_7320691.elements[28] = ((closureN)self_7312584)->elements[28];
  
  
 -return_closcall2(data,  car(((closureN)self_7313843)->elements[0]),  ((closureN)self_7313843)->elements[1], Cyc_cdr(data, ((closureN)self_7313843)->elements[2]));
 -} else { 
--  
-+closureN_type c_7321528;
-+object e_7321539 [2];
-+c_7321528.hdr.mark = gc_color_red;
-+ c_7321528.hdr.grayed = 0;
-+c_7321528.tag = closureN_tag;
-+ c_7321528.fn = (function_type)__lambda_943;
-+c_7321528.num_args = 1;
-+c_7321528.num_elements = 2;
-+c_7321528.elements = (object *)e_7321539;
-+c_7321528.elements[0] = ((closureN)self_7312584)->elements[16];
-+c_7321528.elements[1] = ((closureN)self_7312584)->elements[17];
++return_direct_with_clo1(data,(closure)&c_7320702,__lambda_857,  Cyc_set_cell(data, ((closureN)self_7312608)->elements[15], r_735971));; 
++}
++
++static void __lambda_857(void *data, object self_7312609, int argc, object *args) /* object self_7312609, object r_735870 */
++ {
++
+   
++closureN_type c_7320704;
++object e_7321185 [25];
++c_7320704.hdr.mark = gc_color_red;
++ c_7320704.hdr.grayed = 0;
++c_7320704.tag = closureN_tag;
++ c_7320704.fn = (function_type)__lambda_858;
++c_7320704.num_args = 1;
++c_7320704.num_elements = 25;
++c_7320704.elements = (object *)e_7321185;
++c_7320704.elements[0] = ((closureN)self_7312609)->elements[0];
++c_7320704.elements[1] = ((closureN)self_7312609)->elements[1];
++c_7320704.elements[2] = ((closureN)self_7312609)->elements[2];
++c_7320704.elements[3] = ((closureN)self_7312609)->elements[3];
++c_7320704.elements[4] = ((closureN)self_7312609)->elements[4];
++c_7320704.elements[5] = ((closureN)self_7312609)->elements[5];
++c_7320704.elements[6] = ((closureN)self_7312609)->elements[6];
++c_7320704.elements[7] = ((closureN)self_7312609)->elements[7];
++c_7320704.elements[8] = ((closureN)self_7312609)->elements[8];
++c_7320704.elements[9] = ((closureN)self_7312609)->elements[9];
++c_7320704.elements[10] = ((closureN)self_7312609)->elements[10];
++c_7320704.elements[11] = ((closureN)self_7312609)->elements[11];
++c_7320704.elements[12] = ((closureN)self_7312609)->elements[12];
++c_7320704.elements[13] = ((closureN)self_7312609)->elements[13];
++c_7320704.elements[14] = ((closureN)self_7312609)->elements[14];
++c_7320704.elements[15] = ((closureN)self_7312609)->elements[15];
++c_7320704.elements[16] = ((closureN)self_7312609)->elements[16];
++c_7320704.elements[17] = ((closureN)self_7312609)->elements[17];
++c_7320704.elements[18] = ((closureN)self_7312609)->elements[18];
++c_7320704.elements[19] = ((closureN)self_7312609)->elements[19];
++c_7320704.elements[20] = ((closureN)self_7312609)->elements[20];
++c_7320704.elements[21] = ((closureN)self_7312609)->elements[21];
++c_7320704.elements[22] = ((closureN)self_7312609)->elements[22];
++c_7320704.elements[23] = ((closureN)self_7312609)->elements[23];
++c_7320704.elements[24] = ((closureN)self_7312609)->elements[24];
  
 -return_direct_with_clo1(data,  ((closureN)self_7313843)->elements[1], (((closure)  ((closureN)self_7313843)->elements[1])->fn),  Cyc_cdr(data, ((closureN)self_7313843)->elements[2]));}
 -;; 
-+return_direct_with_clo1(data,(closure)&c_7320691,__lambda_848,  &c_7321528);; 
- }
- 
+-}
+-
 -static void __lambda_854(void *data, object self_7313844, int argc, object *args) /* object self_7313844, object r_736445 */
-+static void __lambda_943(void *data, object self_7312585, int argc, object *args) /* object self_7312585, object k_736016, object x_731354_733265 */
-  {
+- {
 - object r_736445 = args[0];
-+ object k_736016 = args[0]; object x_731354_733265 = args[1];
-+    
-+if( (boolean_f != Cyc_is_pair(x_731354_733265)) ){ 
-   
+-  
 -closureN_type c_7321998;
 -object e_7322739 [28];
 -c_7321998.hdr.mark = gc_color_red;
@@ -29211,8 +30273,8 @@ Make let-values be the same as let*-values, to work around
 -c_7322000.elements[23] = ((closureN)self_7313845)->elements[24];
 -c_7322000.elements[24] = ((closureN)self_7313845)->elements[25];
 -c_7322000.elements[25] = ((closureN)self_7313845)->elements[26];
- 
- 
+-
+-
 -closureN_type c_7322605;
 -object e_7322738 [3];
 -c_7322605.hdr.mark = gc_color_red;
@@ -29225,20 +30287,14 @@ Make let-values be the same as let*-values, to work around
 -c_7322605.elements[0] = ((closureN)self_7313845)->elements[16];
 -c_7322605.elements[1] = ((closureN)self_7313845)->elements[20];
 -c_7322605.elements[2] = ((closureN)self_7313845)->elements[27];
- 
+-
 -return_direct_with_clo1(data,(closure)&c_7322000,__lambda_856,  &c_7322605);; 
-+return_closcall3(data,  ((closureN)self_7312585)->elements[0],  k_736016, car(((closureN)self_7312585)->elements[1]), Cyc_car(data, x_731354_733265));
-+} else { 
-+  return_direct_with_clo1(data,  k_736016, (((closure)  k_736016)->fn),  boolean_f);}
-+;; 
- }
- 
+-}
+-
 -static void __lambda_923(void *data, object self_7313846, int argc, object *args) /* object self_7313846, object k_736424, object x_731360_733609, object dim_731361_733610 */
-+static void __lambda_848(void *data, object self_7312586, int argc, object *args) /* object self_7312586, object r_736015 */
-  {
+- {
 - object k_736424 = args[0]; object x_731360_733609 = args[1]; object dim_731361_733610 = args[2];
-+ object r_736015 = args[0];
-   
+-  
 -closureN_type c_7322607;
 -object e_7322737 [4];
 -c_7322607.hdr.mark = gc_color_red;
@@ -29252,48 +30308,10 @@ Make let-values be the same as let*-values, to work around
 -c_7322607.elements[1] = ((closureN)self_7313846)->elements[1];
 -c_7322607.elements[2] = k_736424;
 -c_7322607.elements[3] = ((closureN)self_7313846)->elements[2];
-+closureN_type c_7320693;
-+object e_7321523 [29];
-+c_7320693.hdr.mark = gc_color_red;
-+ c_7320693.hdr.grayed = 0;
-+c_7320693.tag = closureN_tag;
-+ c_7320693.fn = (function_type)__lambda_849;
-+c_7320693.num_args = 1;
-+c_7320693.num_elements = 29;
-+c_7320693.elements = (object *)e_7321523;
-+c_7320693.elements[0] = ((closureN)self_7312586)->elements[0];
-+c_7320693.elements[1] = ((closureN)self_7312586)->elements[1];
-+c_7320693.elements[2] = ((closureN)self_7312586)->elements[2];
-+c_7320693.elements[3] = ((closureN)self_7312586)->elements[3];
-+c_7320693.elements[4] = ((closureN)self_7312586)->elements[4];
-+c_7320693.elements[5] = ((closureN)self_7312586)->elements[5];
-+c_7320693.elements[6] = ((closureN)self_7312586)->elements[6];
-+c_7320693.elements[7] = ((closureN)self_7312586)->elements[7];
-+c_7320693.elements[8] = ((closureN)self_7312586)->elements[8];
-+c_7320693.elements[9] = ((closureN)self_7312586)->elements[9];
-+c_7320693.elements[10] = ((closureN)self_7312586)->elements[10];
-+c_7320693.elements[11] = ((closureN)self_7312586)->elements[11];
-+c_7320693.elements[12] = ((closureN)self_7312586)->elements[12];
-+c_7320693.elements[13] = ((closureN)self_7312586)->elements[13];
-+c_7320693.elements[14] = ((closureN)self_7312586)->elements[14];
-+c_7320693.elements[15] = ((closureN)self_7312586)->elements[15];
-+c_7320693.elements[16] = ((closureN)self_7312586)->elements[16];
-+c_7320693.elements[17] = ((closureN)self_7312586)->elements[17];
-+c_7320693.elements[18] = ((closureN)self_7312586)->elements[18];
-+c_7320693.elements[19] = ((closureN)self_7312586)->elements[19];
-+c_7320693.elements[20] = ((closureN)self_7312586)->elements[20];
-+c_7320693.elements[21] = ((closureN)self_7312586)->elements[21];
-+c_7320693.elements[22] = ((closureN)self_7312586)->elements[22];
-+c_7320693.elements[23] = ((closureN)self_7312586)->elements[23];
-+c_7320693.elements[24] = ((closureN)self_7312586)->elements[24];
-+c_7320693.elements[25] = ((closureN)self_7312586)->elements[25];
-+c_7320693.elements[26] = ((closureN)self_7312586)->elements[26];
-+c_7320693.elements[27] = ((closureN)self_7312586)->elements[27];
-+c_7320693.elements[28] = ((closureN)self_7312586)->elements[28];
- 
+-
 -return_direct_with_clo3(data,(closure)&c_7322607,__lambda_924,  x_731360_733609, dim_731361_733610, NULL);; 
 -}
- 
+-
 -static void __lambda_924(void *data, object self_7313847, int argc, object *args) /* object self_7313847, object x_731363_733611, object dim_731364_733612, object vars_731365_733613 */
 - {
 - object x_731363_733611 = args[0]; object dim_731364_733612 = args[1]; object vars_731365_733613 = args[2];
@@ -29314,17 +30332,14 @@ Make let-values be the same as let*-values, to work around
 -c_7322609.elements[4] = ((closureN)self_7313847)->elements[3];
 -c_7322609.elements[5] = vars_731365_733613;
 -c_7322609.elements[6] = x_731363_733611;
- 
+-
 -return_direct_with_clo1(data,(closure)&c_7322609,__lambda_925,  boolean_f);; 
-+return_direct_with_clo1(data,(closure)&c_7320693,__lambda_849,  Cyc_set_cell(data, ((closureN)self_7312586)->elements[19], r_736015));; 
- }
- 
+-}
+-
 -static void __lambda_925(void *data, object self_7313848, int argc, object *args) /* object self_7313848, object lp_731366_733614 */
-+static void __lambda_849(void *data, object self_7312587, int argc, object *args) /* object self_7312587, object r_735873 */
-  {
+- {
 - object lp_731366_733614 = args[0];
-+
-   
+-  
 -closureN_type c_7322611;
 -object e_7322732 [7];
 -c_7322611.hdr.mark = gc_color_red;
@@ -29341,72 +30356,38 @@ Make let-values be the same as let*-values, to work around
 -c_7322611.elements[4] = ((closureN)self_7313848)->elements[4];
 -c_7322611.elements[5] = ((closureN)self_7313848)->elements[5];
 -c_7322611.elements[6] = ((closureN)self_7313848)->elements[6];
-+closureN_type c_7320695;
-+object e_7321505 [28];
-+c_7320695.hdr.mark = gc_color_red;
-+ c_7320695.hdr.grayed = 0;
-+c_7320695.tag = closureN_tag;
-+ c_7320695.fn = (function_type)__lambda_850;
-+c_7320695.num_args = 1;
-+c_7320695.num_elements = 28;
-+c_7320695.elements = (object *)e_7321505;
-+c_7320695.elements[0] = ((closureN)self_7312587)->elements[0];
-+c_7320695.elements[1] = ((closureN)self_7312587)->elements[1];
-+c_7320695.elements[2] = ((closureN)self_7312587)->elements[2];
-+c_7320695.elements[3] = ((closureN)self_7312587)->elements[3];
-+c_7320695.elements[4] = ((closureN)self_7312587)->elements[4];
-+c_7320695.elements[5] = ((closureN)self_7312587)->elements[5];
-+c_7320695.elements[6] = ((closureN)self_7312587)->elements[6];
-+c_7320695.elements[7] = ((closureN)self_7312587)->elements[7];
-+c_7320695.elements[8] = ((closureN)self_7312587)->elements[8];
-+c_7320695.elements[9] = ((closureN)self_7312587)->elements[9];
-+c_7320695.elements[10] = ((closureN)self_7312587)->elements[10];
-+c_7320695.elements[11] = ((closureN)self_7312587)->elements[11];
-+c_7320695.elements[12] = ((closureN)self_7312587)->elements[12];
-+c_7320695.elements[13] = ((closureN)self_7312587)->elements[13];
-+c_7320695.elements[14] = ((closureN)self_7312587)->elements[14];
-+c_7320695.elements[15] = ((closureN)self_7312587)->elements[15];
-+c_7320695.elements[16] = ((closureN)self_7312587)->elements[16];
-+c_7320695.elements[17] = ((closureN)self_7312587)->elements[18];
-+c_7320695.elements[18] = ((closureN)self_7312587)->elements[19];
-+c_7320695.elements[19] = ((closureN)self_7312587)->elements[20];
-+c_7320695.elements[20] = ((closureN)self_7312587)->elements[21];
-+c_7320695.elements[21] = ((closureN)self_7312587)->elements[22];
-+c_7320695.elements[22] = ((closureN)self_7312587)->elements[23];
-+c_7320695.elements[23] = ((closureN)self_7312587)->elements[24];
-+c_7320695.elements[24] = ((closureN)self_7312587)->elements[25];
-+c_7320695.elements[25] = ((closureN)self_7312587)->elements[26];
-+c_7320695.elements[26] = ((closureN)self_7312587)->elements[27];
-+c_7320695.elements[27] = ((closureN)self_7312587)->elements[28];
-+
- 
-+closureN_type c_7321506;
-+object e_7321522 [2];
-+c_7321506.hdr.mark = gc_color_red;
-+ c_7321506.hdr.grayed = 0;
-+c_7321506.tag = closureN_tag;
-+ c_7321506.fn = (function_type)__lambda_942;
-+c_7321506.num_args = 1;
-+c_7321506.num_elements = 2;
-+c_7321506.elements = (object *)e_7321522;
-+c_7321506.elements[0] = ((closureN)self_7312587)->elements[16];
-+c_7321506.elements[1] = ((closureN)self_7312587)->elements[17];
+ 
++mmacro(c_7321186, (function_type)__lambda_909);c_7321186.num_args = 3;
++return_direct_with_clo1(data,(closure)&c_7320704,__lambda_858,  &c_7321186);; 
++}
  
 -pair_type local_7322735; 
 -return_direct_with_clo1(data,(closure)&c_7322611,__lambda_1413,  set_cell_as_expr(&local_7322735, lp_731366_733614));; 
-+return_direct_with_clo1(data,(closure)&c_7320695,__lambda_850,  &c_7321506);; 
++static void __lambda_909(void *data, object self_7312610, int argc, object *args) /* object self_7312610, object k_735954, object x_731384_733272, object vars_731385_733273, object dim_731386_733274 */
++ {
++ object k_735954 = args[0]; object x_731384_733272 = args[1]; object vars_731385_733273 = args[2]; object dim_731386_733274 = args[3];
++  
++closureN_type c_7321188;
++object e_7321299 [3];
++c_7321188.hdr.mark = gc_color_red;
++ c_7321188.hdr.grayed = 0;
++c_7321188.tag = closureN_tag;
++ c_7321188.fn = (function_type)__lambda_910;
++c_7321188.num_args = 2;
++c_7321188.num_elements = 3;
++c_7321188.elements = (object *)e_7321299;
++c_7321188.elements[0] = dim_731386_733274;
++c_7321188.elements[1] = k_735954;
++c_7321188.elements[2] = vars_731385_733273;
++
++return_direct_with_clo2(data,(closure)&c_7321188,__lambda_910,  x_731384_733272, NULL);; 
  }
  
 -static void __lambda_1413(void *data, object self_7313849, int argc, object *args) /* object self_7313849, object lp_731366_733614 */
-+static void __lambda_942(void *data, object self_7312588, int argc, object *args) /* object self_7312588, object k_736010, object x_731356_733266 */
++static void __lambda_910(void *data, object self_7312611, int argc, object *args) /* object self_7312611, object x_731388_733275, object free_731389_733276 */
   {
 - object lp_731366_733614 = args[0];
-+ object k_736010 = args[0]; object x_731356_733266 = args[1];
-+    
-+if( (boolean_f != Cyc_is_pair(x_731356_733266)) ){ 
-+    
-+  
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, x_731356_733266))) ){ 
++ object x_731388_733275 = args[0]; object free_731389_733276 = args[1];
    
 -closureN_type c_7322613;
 -object e_7322628 [5];
@@ -29422,8 +30403,8 @@ Make let-values be the same as let*-values, to work around
 -c_7322613.elements[2] = lp_731366_733614;
 -c_7322613.elements[3] = ((closureN)self_7313849)->elements[5];
 -c_7322613.elements[4] = ((closureN)self_7313849)->elements[6];
- 
- 
+-
+-
 -closureN_type c_7322629;
 -object e_7322731 [4];
 -c_7322629.hdr.mark = gc_color_red;
@@ -29462,23 +30443,31 @@ Make let-values be the same as let*-values, to work around
 -c_7322631.elements[5] = ((closureN)self_7313850)->elements[3];
 -c_7322631.elements[6] = vars_731369_733617;
 -c_7322631.elements[7] = x_731367_733615;
++closureN_type c_7321190;
++object e_7321298 [5];
++c_7321190.hdr.mark = gc_color_red;
++ c_7321190.hdr.grayed = 0;
++c_7321190.tag = closureN_tag;
++ c_7321190.fn = (function_type)__lambda_911;
++c_7321190.num_args = 1;
++c_7321190.num_elements = 5;
++c_7321190.elements = (object *)e_7321298;
++c_7321190.elements[0] = ((closureN)self_7312611)->elements[0];
++c_7321190.elements[1] = free_731389_733276;
++c_7321190.elements[2] = ((closureN)self_7312611)->elements[1];
++c_7321190.elements[3] = ((closureN)self_7312611)->elements[2];
++c_7321190.elements[4] = x_731388_733275;
  
 -return_direct_with_clo2(data,  __glo_identifier_127_scheme_base, (((closure)  __glo_identifier_127_scheme_base)->fn),  &c_7322631, x_731367_733615);; 
-+return_closcall3(data,  ((closureN)self_7312588)->elements[0],  k_736010, car(((closureN)self_7312588)->elements[1]), Cyc_cadr(data, x_731356_733266));
-+} else { 
-+  return_direct_with_clo1(data,  k_736010, (((closure)  k_736010)->fn),  boolean_f);}
-+;
-+} else { 
-+  return_direct_with_clo1(data,  k_736010, (((closure)  k_736010)->fn),  boolean_f);}
-+;; 
++return_direct_with_clo1(data,(closure)&c_7321190,__lambda_911,  boolean_f);; 
  }
  
 -static void __lambda_929(void *data, object self_7313851, int argc, object *args) /* object self_7313851, object r_736429 */
-+static void __lambda_850(void *data, object self_7312589, int argc, object *args) /* object self_7312589, object r_736009 */
++static void __lambda_911(void *data, object self_7312612, int argc, object *args) /* object self_7312612, object lp_731390_733277 */
   {
 - object r_736429 = args[0];
 -  if( (boolean_f != r_736429) ){ 
-+ object r_736009 = args[0];
++ object lp_731390_733277 = args[0];
    
 -closureN_type c_7322633;
 -object e_7322654 [5];
@@ -29494,8 +30483,22 @@ Make let-values be the same as let*-values, to work around
 -c_7322633.elements[2] = ((closureN)self_7313851)->elements[4];
 -c_7322633.elements[3] = ((closureN)self_7313851)->elements[6];
 -c_7322633.elements[4] = ((closureN)self_7313851)->elements[7];
--
--
++closureN_type c_7321192;
++object e_7321294 [5];
++c_7321192.hdr.mark = gc_color_red;
++ c_7321192.hdr.grayed = 0;
++c_7321192.tag = closureN_tag;
++ c_7321192.fn = (function_type)__lambda_1365;
++c_7321192.num_args = 1;
++c_7321192.num_elements = 5;
++c_7321192.elements = (object *)e_7321294;
++c_7321192.elements[0] = ((closureN)self_7312612)->elements[0];
++c_7321192.elements[1] = ((closureN)self_7312612)->elements[1];
++c_7321192.elements[2] = ((closureN)self_7312612)->elements[2];
++c_7321192.elements[3] = ((closureN)self_7312612)->elements[3];
++c_7321192.elements[4] = ((closureN)self_7312612)->elements[4];
+ 
+ 
 -closureN_type c_7322655;
 -object e_7322659 [2];
 -c_7322655.hdr.mark = gc_color_red;
@@ -29507,165 +30510,30 @@ Make let-values be the same as let*-values, to work around
 -c_7322655.elements = (object *)e_7322659;
 -c_7322655.elements[0] = ((closureN)self_7313851)->elements[0];
 -c_7322655.elements[1] = ((closureN)self_7313851)->elements[7];
--
--return_direct_with_clo1(data,(closure)&c_7322633,__lambda_930,  &c_7322655);
-+closureN_type c_7320697;
-+object e_7321501 [28];
-+c_7320697.hdr.mark = gc_color_red;
-+ c_7320697.hdr.grayed = 0;
-+c_7320697.tag = closureN_tag;
-+ c_7320697.fn = (function_type)__lambda_851;
-+c_7320697.num_args = 1;
-+c_7320697.num_elements = 28;
-+c_7320697.elements = (object *)e_7321501;
-+c_7320697.elements[0] = ((closureN)self_7312589)->elements[0];
-+c_7320697.elements[1] = ((closureN)self_7312589)->elements[1];
-+c_7320697.elements[2] = ((closureN)self_7312589)->elements[2];
-+c_7320697.elements[3] = ((closureN)self_7312589)->elements[3];
-+c_7320697.elements[4] = ((closureN)self_7312589)->elements[4];
-+c_7320697.elements[5] = ((closureN)self_7312589)->elements[5];
-+c_7320697.elements[6] = ((closureN)self_7312589)->elements[6];
-+c_7320697.elements[7] = ((closureN)self_7312589)->elements[7];
-+c_7320697.elements[8] = ((closureN)self_7312589)->elements[8];
-+c_7320697.elements[9] = ((closureN)self_7312589)->elements[9];
-+c_7320697.elements[10] = ((closureN)self_7312589)->elements[10];
-+c_7320697.elements[11] = ((closureN)self_7312589)->elements[11];
-+c_7320697.elements[12] = ((closureN)self_7312589)->elements[12];
-+c_7320697.elements[13] = ((closureN)self_7312589)->elements[13];
-+c_7320697.elements[14] = ((closureN)self_7312589)->elements[14];
-+c_7320697.elements[15] = ((closureN)self_7312589)->elements[15];
-+c_7320697.elements[16] = ((closureN)self_7312589)->elements[16];
-+c_7320697.elements[17] = ((closureN)self_7312589)->elements[17];
-+c_7320697.elements[18] = ((closureN)self_7312589)->elements[18];
-+c_7320697.elements[19] = ((closureN)self_7312589)->elements[19];
-+c_7320697.elements[20] = ((closureN)self_7312589)->elements[20];
-+c_7320697.elements[21] = ((closureN)self_7312589)->elements[21];
-+c_7320697.elements[22] = ((closureN)self_7312589)->elements[22];
-+c_7320697.elements[23] = ((closureN)self_7312589)->elements[23];
-+c_7320697.elements[24] = ((closureN)self_7312589)->elements[24];
-+c_7320697.elements[25] = ((closureN)self_7312589)->elements[25];
-+c_7320697.elements[26] = ((closureN)self_7312589)->elements[26];
-+c_7320697.elements[27] = ((closureN)self_7312589)->elements[27];
-+
-+
-+
-+return_direct_with_clo1(data,(closure)&c_7320697,__lambda_851,  Cyc_set_cell(data, ((closureN)self_7312589)->elements[20], r_736009));; 
-+}
-+
-+static void __lambda_851(void *data, object self_7312590, int argc, object *args) /* object self_7312590, object r_735874 */
-+ {
-+
-+  
-+closureN_type c_7320699;
-+object e_7321476 [28];
-+c_7320699.hdr.mark = gc_color_red;
-+ c_7320699.hdr.grayed = 0;
-+c_7320699.tag = closureN_tag;
-+ c_7320699.fn = (function_type)__lambda_852;
-+c_7320699.num_args = 1;
-+c_7320699.num_elements = 28;
-+c_7320699.elements = (object *)e_7321476;
-+c_7320699.elements[0] = ((closureN)self_7312590)->elements[0];
-+c_7320699.elements[1] = ((closureN)self_7312590)->elements[1];
-+c_7320699.elements[2] = ((closureN)self_7312590)->elements[2];
-+c_7320699.elements[3] = ((closureN)self_7312590)->elements[3];
-+c_7320699.elements[4] = ((closureN)self_7312590)->elements[4];
-+c_7320699.elements[5] = ((closureN)self_7312590)->elements[5];
-+c_7320699.elements[6] = ((closureN)self_7312590)->elements[6];
-+c_7320699.elements[7] = ((closureN)self_7312590)->elements[7];
-+c_7320699.elements[8] = ((closureN)self_7312590)->elements[8];
-+c_7320699.elements[9] = ((closureN)self_7312590)->elements[9];
-+c_7320699.elements[10] = ((closureN)self_7312590)->elements[10];
-+c_7320699.elements[11] = ((closureN)self_7312590)->elements[11];
-+c_7320699.elements[12] = ((closureN)self_7312590)->elements[12];
-+c_7320699.elements[13] = ((closureN)self_7312590)->elements[13];
-+c_7320699.elements[14] = ((closureN)self_7312590)->elements[14];
-+c_7320699.elements[15] = ((closureN)self_7312590)->elements[15];
-+c_7320699.elements[16] = ((closureN)self_7312590)->elements[16];
-+c_7320699.elements[17] = ((closureN)self_7312590)->elements[17];
-+c_7320699.elements[18] = ((closureN)self_7312590)->elements[18];
-+c_7320699.elements[19] = ((closureN)self_7312590)->elements[19];
-+c_7320699.elements[20] = ((closureN)self_7312590)->elements[20];
-+c_7320699.elements[21] = ((closureN)self_7312590)->elements[21];
-+c_7320699.elements[22] = ((closureN)self_7312590)->elements[22];
-+c_7320699.elements[23] = ((closureN)self_7312590)->elements[23];
-+c_7320699.elements[24] = ((closureN)self_7312590)->elements[24];
-+c_7320699.elements[25] = ((closureN)self_7312590)->elements[25];
-+c_7320699.elements[26] = ((closureN)self_7312590)->elements[26];
-+c_7320699.elements[27] = ((closureN)self_7312590)->elements[27];
-+
-+
-+closureN_type c_7321477;
-+object e_7321500 [2];
-+c_7321477.hdr.mark = gc_color_red;
-+ c_7321477.hdr.grayed = 0;
-+c_7321477.tag = closureN_tag;
-+ c_7321477.fn = (function_type)__lambda_939;
-+c_7321477.num_args = 1;
-+c_7321477.num_elements = 2;
-+c_7321477.elements = (object *)e_7321500;
-+c_7321477.elements[0] = ((closureN)self_7312590)->elements[17];
-+c_7321477.elements[1] = ((closureN)self_7312590)->elements[20];
-+
-+return_direct_with_clo1(data,(closure)&c_7320699,__lambda_852,  &c_7321477);; 
-+}
-+
-+static void __lambda_939(void *data, object self_7312591, int argc, object *args) /* object self_7312591, object k_736005, object x_731359_733267 */
-+ {
-+ object k_736005 = args[0]; object x_731359_733267 = args[1];
-+  
-+
-+
-+closureN_type c_7321482;
-+object e_7321499 [3];
-+c_7321482.hdr.mark = gc_color_red;
-+ c_7321482.hdr.grayed = 0;
-+c_7321482.tag = closureN_tag;
-+ c_7321482.fn = (function_type)__lambda_940;
-+c_7321482.num_args = 1;
-+c_7321482.num_elements = 3;
-+c_7321482.elements = (object *)e_7321499;
-+c_7321482.elements[0] = ((closureN)self_7312591)->elements[0];
-+c_7321482.elements[1] = k_736005;
-+c_7321482.elements[2] = x_731359_733267;
-+
-+return_closcall2(data,  car(((closureN)self_7312591)->elements[1]),  &c_7321482, x_731359_733267);; 
-+}
-+
-+static void __lambda_940(void *data, object self_7312592, int argc, object *args) /* object self_7312592, object r_736006 */
-+ {
-+ object r_736006 = args[0];
-+  if( (boolean_f != r_736006) ){ 
-+  
-+
-+
-+closureN_type c_7321487;
-+object e_7321493 [1];
-+c_7321487.hdr.mark = gc_color_red;
-+ c_7321487.hdr.grayed = 0;
-+c_7321487.tag = closureN_tag;
-+ c_7321487.fn = (function_type)__lambda_941;
-+c_7321487.num_args = 1;
-+c_7321487.num_elements = 1;
-+c_7321487.elements = (object *)e_7321493;
-+c_7321487.elements[0] = ((closureN)self_7312592)->elements[1];
-+
-+
-+
-+return_closcall2(data,  car(((closureN)self_7312592)->elements[0]),  &c_7321487, Cyc_cdr(data, ((closureN)self_7312592)->elements[2]));
- } else { 
--  
-+  return_direct_with_clo1(data,  ((closureN)self_7312592)->elements[1], (((closure)  ((closureN)self_7312592)->elements[1])->fn),  obj_int2obj(0));}
-+;; 
++pair_type local_7321297; 
++return_direct_with_clo1(data,(closure)&c_7321192,__lambda_1365,  set_cell_as_expr(&local_7321297, lp_731390_733277));; 
 +}
  
-+static void __lambda_941(void *data, object self_7312593, int argc, object *args) /* object self_7312593, object r_736007 */
+-return_direct_with_clo1(data,(closure)&c_7322633,__lambda_930,  &c_7322655);
+-} else { 
++static void __lambda_1365(void *data, object self_7312613, int argc, object *args) /* object self_7312613, object lp_731390_733277 */
 + {
-+ object r_736007 = args[0];
-+  
-+complex_num_type local_7321492; 
-+return_direct_with_clo1(data,  ((closureN)self_7312593)->elements[0], (((closure)  ((closureN)self_7312593)->elements[0])->fn),  Cyc_fast_sum(data,&local_7321492, obj_int2obj(1), r_736007));; 
-+}
++ object lp_731390_733277 = args[0];
+   
++closureN_type c_7321194;
++object e_7321208 [4];
++c_7321194.hdr.mark = gc_color_red;
++ c_7321194.hdr.grayed = 0;
++c_7321194.tag = closureN_tag;
++ c_7321194.fn = (function_type)__lambda_912;
++c_7321194.num_args = 1;
++c_7321194.num_elements = 4;
++c_7321194.elements = (object *)e_7321208;
++c_7321194.elements[0] = ((closureN)self_7312613)->elements[1];
++c_7321194.elements[1] = ((closureN)self_7312613)->elements[2];
++c_7321194.elements[2] = lp_731390_733277;
++c_7321194.elements[3] = ((closureN)self_7312613)->elements[4];
+ 
  
 -closureN_type c_7322664;
 -object e_7322728 [5];
@@ -29681,453 +30549,49 @@ Make let-values be the same as let*-values, to work around
 -c_7322664.elements[2] = ((closureN)self_7313851)->elements[5];
 -c_7322664.elements[3] = ((closureN)self_7313851)->elements[6];
 -c_7322664.elements[4] = ((closureN)self_7313851)->elements[7];
-+static void __lambda_852(void *data, object self_7312594, int argc, object *args) /* object self_7312594, object r_736004 */
-+ {
-+ object r_736004 = args[0];
-+  
-+closureN_type c_7320701;
-+object e_7321472 [28];
-+c_7320701.hdr.mark = gc_color_red;
-+ c_7320701.hdr.grayed = 0;
-+c_7320701.tag = closureN_tag;
-+ c_7320701.fn = (function_type)__lambda_853;
-+c_7320701.num_args = 1;
-+c_7320701.num_elements = 28;
-+c_7320701.elements = (object *)e_7321472;
-+c_7320701.elements[0] = ((closureN)self_7312594)->elements[0];
-+c_7320701.elements[1] = ((closureN)self_7312594)->elements[1];
-+c_7320701.elements[2] = ((closureN)self_7312594)->elements[2];
-+c_7320701.elements[3] = ((closureN)self_7312594)->elements[3];
-+c_7320701.elements[4] = ((closureN)self_7312594)->elements[4];
-+c_7320701.elements[5] = ((closureN)self_7312594)->elements[5];
-+c_7320701.elements[6] = ((closureN)self_7312594)->elements[6];
-+c_7320701.elements[7] = ((closureN)self_7312594)->elements[7];
-+c_7320701.elements[8] = ((closureN)self_7312594)->elements[8];
-+c_7320701.elements[9] = ((closureN)self_7312594)->elements[9];
-+c_7320701.elements[10] = ((closureN)self_7312594)->elements[10];
-+c_7320701.elements[11] = ((closureN)self_7312594)->elements[11];
-+c_7320701.elements[12] = ((closureN)self_7312594)->elements[12];
-+c_7320701.elements[13] = ((closureN)self_7312594)->elements[13];
-+c_7320701.elements[14] = ((closureN)self_7312594)->elements[14];
-+c_7320701.elements[15] = ((closureN)self_7312594)->elements[15];
-+c_7320701.elements[16] = ((closureN)self_7312594)->elements[16];
-+c_7320701.elements[17] = ((closureN)self_7312594)->elements[17];
-+c_7320701.elements[18] = ((closureN)self_7312594)->elements[18];
-+c_7320701.elements[19] = ((closureN)self_7312594)->elements[19];
-+c_7320701.elements[20] = ((closureN)self_7312594)->elements[20];
-+c_7320701.elements[21] = ((closureN)self_7312594)->elements[21];
-+c_7320701.elements[22] = ((closureN)self_7312594)->elements[22];
-+c_7320701.elements[23] = ((closureN)self_7312594)->elements[23];
-+c_7320701.elements[24] = ((closureN)self_7312594)->elements[24];
-+c_7320701.elements[25] = ((closureN)self_7312594)->elements[25];
-+c_7320701.elements[26] = ((closureN)self_7312594)->elements[26];
-+c_7320701.elements[27] = ((closureN)self_7312594)->elements[27];
-+
-+
-+
-+return_direct_with_clo1(data,(closure)&c_7320701,__lambda_853,  Cyc_set_cell(data, ((closureN)self_7312594)->elements[17], r_736004));; 
-+}
-+
-+static void __lambda_853(void *data, object self_7312595, int argc, object *args) /* object self_7312595, object r_735875 */
-+ {
-+
-+  
-+closureN_type c_7320703;
-+object e_7321450 [28];
-+c_7320703.hdr.mark = gc_color_red;
-+ c_7320703.hdr.grayed = 0;
-+c_7320703.tag = closureN_tag;
-+ c_7320703.fn = (function_type)__lambda_854;
-+c_7320703.num_args = 1;
-+c_7320703.num_elements = 28;
-+c_7320703.elements = (object *)e_7321450;
-+c_7320703.elements[0] = ((closureN)self_7312595)->elements[0];
-+c_7320703.elements[1] = ((closureN)self_7312595)->elements[1];
-+c_7320703.elements[2] = ((closureN)self_7312595)->elements[2];
-+c_7320703.elements[3] = ((closureN)self_7312595)->elements[3];
-+c_7320703.elements[4] = ((closureN)self_7312595)->elements[4];
-+c_7320703.elements[5] = ((closureN)self_7312595)->elements[5];
-+c_7320703.elements[6] = ((closureN)self_7312595)->elements[6];
-+c_7320703.elements[7] = ((closureN)self_7312595)->elements[7];
-+c_7320703.elements[8] = ((closureN)self_7312595)->elements[8];
-+c_7320703.elements[9] = ((closureN)self_7312595)->elements[9];
-+c_7320703.elements[10] = ((closureN)self_7312595)->elements[10];
-+c_7320703.elements[11] = ((closureN)self_7312595)->elements[11];
-+c_7320703.elements[12] = ((closureN)self_7312595)->elements[12];
-+c_7320703.elements[13] = ((closureN)self_7312595)->elements[13];
-+c_7320703.elements[14] = ((closureN)self_7312595)->elements[14];
-+c_7320703.elements[15] = ((closureN)self_7312595)->elements[15];
-+c_7320703.elements[16] = ((closureN)self_7312595)->elements[16];
-+c_7320703.elements[17] = ((closureN)self_7312595)->elements[17];
-+c_7320703.elements[18] = ((closureN)self_7312595)->elements[18];
-+c_7320703.elements[19] = ((closureN)self_7312595)->elements[19];
-+c_7320703.elements[20] = ((closureN)self_7312595)->elements[20];
-+c_7320703.elements[21] = ((closureN)self_7312595)->elements[21];
-+c_7320703.elements[22] = ((closureN)self_7312595)->elements[22];
-+c_7320703.elements[23] = ((closureN)self_7312595)->elements[23];
-+c_7320703.elements[24] = ((closureN)self_7312595)->elements[24];
-+c_7320703.elements[25] = ((closureN)self_7312595)->elements[25];
-+c_7320703.elements[26] = ((closureN)self_7312595)->elements[26];
-+c_7320703.elements[27] = ((closureN)self_7312595)->elements[27];
-+
-+
-+closureN_type c_7321451;
-+object e_7321471 [2];
-+c_7321451.hdr.mark = gc_color_red;
-+ c_7321451.hdr.grayed = 0;
-+c_7321451.tag = closureN_tag;
-+ c_7321451.fn = (function_type)__lambda_937;
-+c_7321451.num_args = 1;
-+c_7321451.num_elements = 2;
-+c_7321451.elements = (object *)e_7321471;
-+c_7321451.elements[0] = ((closureN)self_7312595)->elements[19];
-+c_7321451.elements[1] = ((closureN)self_7312595)->elements[20];
-+
-+return_direct_with_clo1(data,(closure)&c_7320703,__lambda_854,  &c_7321451);; 
-+}
-+
-+static void __lambda_937(void *data, object self_7312596, int argc, object *args) /* object self_7312596, object k_736001, object x_731360_733268 */
-+ {
-+ object k_736001 = args[0]; object x_731360_733268 = args[1];
-+  
-+
-+
-+closureN_type c_7321456;
-+object e_7321470 [3];
-+c_7321456.hdr.mark = gc_color_red;
-+ c_7321456.hdr.grayed = 0;
-+c_7321456.tag = closureN_tag;
-+ c_7321456.fn = (function_type)__lambda_938;
-+c_7321456.num_args = 1;
-+c_7321456.num_elements = 3;
-+c_7321456.elements = (object *)e_7321470;
-+c_7321456.elements[0] = ((closureN)self_7312596)->elements[0];
-+c_7321456.elements[1] = k_736001;
-+c_7321456.elements[2] = x_731360_733268;
-+
-+return_closcall2(data,  car(((closureN)self_7312596)->elements[1]),  &c_7321456, x_731360_733268);; 
-+}
-+
-+static void __lambda_938(void *data, object self_7312597, int argc, object *args) /* object self_7312597, object r_736002 */
-+ {
-+ object r_736002 = args[0];
-+  if( (boolean_f != r_736002) ){ 
-+  
-+
-+
-+
-+return_closcall2(data,  car(((closureN)self_7312597)->elements[0]),  ((closureN)self_7312597)->elements[1], Cyc_cdr(data, ((closureN)self_7312597)->elements[2]));
-+} else { 
-+  
-+
-+return_direct_with_clo1(data,  ((closureN)self_7312597)->elements[1], (((closure)  ((closureN)self_7312597)->elements[1])->fn),  Cyc_cdr(data, ((closureN)self_7312597)->elements[2]));}
-+;; 
-+}
-+
-+static void __lambda_854(void *data, object self_7312598, int argc, object *args) /* object self_7312598, object r_736000 */
-+ {
-+ object r_736000 = args[0];
-+  
-+closureN_type c_7320705;
-+object e_7321446 [28];
-+c_7320705.hdr.mark = gc_color_red;
-+ c_7320705.hdr.grayed = 0;
-+c_7320705.tag = closureN_tag;
-+ c_7320705.fn = (function_type)__lambda_855;
-+c_7320705.num_args = 1;
-+c_7320705.num_elements = 28;
-+c_7320705.elements = (object *)e_7321446;
-+c_7320705.elements[0] = ((closureN)self_7312598)->elements[0];
-+c_7320705.elements[1] = ((closureN)self_7312598)->elements[1];
-+c_7320705.elements[2] = ((closureN)self_7312598)->elements[2];
-+c_7320705.elements[3] = ((closureN)self_7312598)->elements[3];
-+c_7320705.elements[4] = ((closureN)self_7312598)->elements[4];
-+c_7320705.elements[5] = ((closureN)self_7312598)->elements[5];
-+c_7320705.elements[6] = ((closureN)self_7312598)->elements[6];
-+c_7320705.elements[7] = ((closureN)self_7312598)->elements[7];
-+c_7320705.elements[8] = ((closureN)self_7312598)->elements[8];
-+c_7320705.elements[9] = ((closureN)self_7312598)->elements[9];
-+c_7320705.elements[10] = ((closureN)self_7312598)->elements[10];
-+c_7320705.elements[11] = ((closureN)self_7312598)->elements[11];
-+c_7320705.elements[12] = ((closureN)self_7312598)->elements[12];
-+c_7320705.elements[13] = ((closureN)self_7312598)->elements[13];
-+c_7320705.elements[14] = ((closureN)self_7312598)->elements[14];
-+c_7320705.elements[15] = ((closureN)self_7312598)->elements[15];
-+c_7320705.elements[16] = ((closureN)self_7312598)->elements[16];
-+c_7320705.elements[17] = ((closureN)self_7312598)->elements[17];
-+c_7320705.elements[18] = ((closureN)self_7312598)->elements[18];
-+c_7320705.elements[19] = ((closureN)self_7312598)->elements[19];
-+c_7320705.elements[20] = ((closureN)self_7312598)->elements[20];
-+c_7320705.elements[21] = ((closureN)self_7312598)->elements[21];
-+c_7320705.elements[22] = ((closureN)self_7312598)->elements[22];
-+c_7320705.elements[23] = ((closureN)self_7312598)->elements[23];
-+c_7320705.elements[24] = ((closureN)self_7312598)->elements[24];
-+c_7320705.elements[25] = ((closureN)self_7312598)->elements[25];
-+c_7320705.elements[26] = ((closureN)self_7312598)->elements[26];
-+c_7320705.elements[27] = ((closureN)self_7312598)->elements[27];
-+
-+
-+
-+return_direct_with_clo1(data,(closure)&c_7320705,__lambda_855,  Cyc_set_cell(data, ((closureN)self_7312598)->elements[19], r_736000));; 
-+}
-+
-+static void __lambda_855(void *data, object self_7312599, int argc, object *args) /* object self_7312599, object r_735876 */
-+ {
-+
-+  
-+closureN_type c_7320707;
-+object e_7321311 [26];
-+c_7320707.hdr.mark = gc_color_red;
-+ c_7320707.hdr.grayed = 0;
-+c_7320707.tag = closureN_tag;
-+ c_7320707.fn = (function_type)__lambda_856;
-+c_7320707.num_args = 1;
-+c_7320707.num_elements = 26;
-+c_7320707.elements = (object *)e_7321311;
-+c_7320707.elements[0] = ((closureN)self_7312599)->elements[0];
-+c_7320707.elements[1] = ((closureN)self_7312599)->elements[1];
-+c_7320707.elements[2] = ((closureN)self_7312599)->elements[2];
-+c_7320707.elements[3] = ((closureN)self_7312599)->elements[3];
-+c_7320707.elements[4] = ((closureN)self_7312599)->elements[4];
-+c_7320707.elements[5] = ((closureN)self_7312599)->elements[5];
-+c_7320707.elements[6] = ((closureN)self_7312599)->elements[6];
-+c_7320707.elements[7] = ((closureN)self_7312599)->elements[7];
-+c_7320707.elements[8] = ((closureN)self_7312599)->elements[8];
-+c_7320707.elements[9] = ((closureN)self_7312599)->elements[9];
-+c_7320707.elements[10] = ((closureN)self_7312599)->elements[10];
-+c_7320707.elements[11] = ((closureN)self_7312599)->elements[11];
-+c_7320707.elements[12] = ((closureN)self_7312599)->elements[12];
-+c_7320707.elements[13] = ((closureN)self_7312599)->elements[13];
-+c_7320707.elements[14] = ((closureN)self_7312599)->elements[14];
-+c_7320707.elements[15] = ((closureN)self_7312599)->elements[15];
-+c_7320707.elements[16] = ((closureN)self_7312599)->elements[17];
-+c_7320707.elements[17] = ((closureN)self_7312599)->elements[18];
-+c_7320707.elements[18] = ((closureN)self_7312599)->elements[19];
-+c_7320707.elements[19] = ((closureN)self_7312599)->elements[20];
-+c_7320707.elements[20] = ((closureN)self_7312599)->elements[21];
-+c_7320707.elements[21] = ((closureN)self_7312599)->elements[22];
-+c_7320707.elements[22] = ((closureN)self_7312599)->elements[23];
-+c_7320707.elements[23] = ((closureN)self_7312599)->elements[24];
-+c_7320707.elements[24] = ((closureN)self_7312599)->elements[25];
-+c_7320707.elements[25] = ((closureN)self_7312599)->elements[26];
-+
-+
-+closureN_type c_7321312;
-+object e_7321445 [3];
-+c_7321312.hdr.mark = gc_color_red;
-+ c_7321312.hdr.grayed = 0;
-+c_7321312.tag = closureN_tag;
-+ c_7321312.fn = (function_type)__lambda_923;
-+c_7321312.num_args = 2;
-+c_7321312.num_elements = 3;
-+c_7321312.elements = (object *)e_7321445;
-+c_7321312.elements[0] = ((closureN)self_7312599)->elements[16];
-+c_7321312.elements[1] = ((closureN)self_7312599)->elements[20];
-+c_7321312.elements[2] = ((closureN)self_7312599)->elements[27];
-+
-+return_direct_with_clo1(data,(closure)&c_7320707,__lambda_856,  &c_7321312);; 
-+}
-+
-+static void __lambda_923(void *data, object self_7312600, int argc, object *args) /* object self_7312600, object k_735979, object x_731361_733269, object dim_731362_733270 */
-+ {
-+ object k_735979 = args[0]; object x_731361_733269 = args[1]; object dim_731362_733270 = args[2];
-+  
-+closureN_type c_7321314;
-+object e_7321444 [4];
-+c_7321314.hdr.mark = gc_color_red;
-+ c_7321314.hdr.grayed = 0;
-+c_7321314.tag = closureN_tag;
-+ c_7321314.fn = (function_type)__lambda_924;
-+c_7321314.num_args = 3;
-+c_7321314.num_elements = 4;
-+c_7321314.elements = (object *)e_7321444;
-+c_7321314.elements[0] = ((closureN)self_7312600)->elements[0];
-+c_7321314.elements[1] = ((closureN)self_7312600)->elements[1];
-+c_7321314.elements[2] = k_735979;
-+c_7321314.elements[3] = ((closureN)self_7312600)->elements[2];
-+
-+return_direct_with_clo3(data,(closure)&c_7321314,__lambda_924,  x_731361_733269, dim_731362_733270, NULL);; 
-+}
-+
-+static void __lambda_924(void *data, object self_7312601, int argc, object *args) /* object self_7312601, object x_731364_733271, object dim_731365_733272, object vars_731366_733273 */
-+ {
-+ object x_731364_733271 = args[0]; object dim_731365_733272 = args[1]; object vars_731366_733273 = args[2];
-+  
-+closureN_type c_7321316;
-+object e_7321443 [7];
-+c_7321316.hdr.mark = gc_color_red;
-+ c_7321316.hdr.grayed = 0;
-+c_7321316.tag = closureN_tag;
-+ c_7321316.fn = (function_type)__lambda_925;
-+c_7321316.num_args = 1;
-+c_7321316.num_elements = 7;
-+c_7321316.elements = (object *)e_7321443;
-+c_7321316.elements[0] = ((closureN)self_7312601)->elements[0];
-+c_7321316.elements[1] = dim_731365_733272;
-+c_7321316.elements[2] = ((closureN)self_7312601)->elements[1];
-+c_7321316.elements[3] = ((closureN)self_7312601)->elements[2];
-+c_7321316.elements[4] = ((closureN)self_7312601)->elements[3];
-+c_7321316.elements[5] = vars_731366_733273;
-+c_7321316.elements[6] = x_731364_733271;
-+
-+return_direct_with_clo1(data,(closure)&c_7321316,__lambda_925,  boolean_f);; 
-+}
-+
-+static void __lambda_925(void *data, object self_7312602, int argc, object *args) /* object self_7312602, object lp_731367_733274 */
-+ {
-+ object lp_731367_733274 = args[0];
-+  
-+closureN_type c_7321318;
-+object e_7321439 [7];
-+c_7321318.hdr.mark = gc_color_red;
-+ c_7321318.hdr.grayed = 0;
-+c_7321318.tag = closureN_tag;
-+ c_7321318.fn = (function_type)__lambda_1366;
-+c_7321318.num_args = 1;
-+c_7321318.num_elements = 7;
-+c_7321318.elements = (object *)e_7321439;
-+c_7321318.elements[0] = ((closureN)self_7312602)->elements[0];
-+c_7321318.elements[1] = ((closureN)self_7312602)->elements[1];
-+c_7321318.elements[2] = ((closureN)self_7312602)->elements[2];
-+c_7321318.elements[3] = ((closureN)self_7312602)->elements[3];
-+c_7321318.elements[4] = ((closureN)self_7312602)->elements[4];
-+c_7321318.elements[5] = ((closureN)self_7312602)->elements[5];
-+c_7321318.elements[6] = ((closureN)self_7312602)->elements[6];
-+
-+
-+pair_type local_7321442; 
-+return_direct_with_clo1(data,(closure)&c_7321318,__lambda_1366,  set_cell_as_expr(&local_7321442, lp_731367_733274));; 
-+}
-+
-+static void __lambda_1366(void *data, object self_7312603, int argc, object *args) /* object self_7312603, object lp_731367_733274 */
-+ {
-+ object lp_731367_733274 = args[0];
-+  
-+closureN_type c_7321320;
-+object e_7321335 [5];
-+c_7321320.hdr.mark = gc_color_red;
-+ c_7321320.hdr.grayed = 0;
-+c_7321320.tag = closureN_tag;
-+ c_7321320.fn = (function_type)__lambda_926;
-+c_7321320.num_args = 1;
-+c_7321320.num_elements = 5;
-+c_7321320.elements = (object *)e_7321335;
-+c_7321320.elements[0] = ((closureN)self_7312603)->elements[1];
-+c_7321320.elements[1] = ((closureN)self_7312603)->elements[3];
-+c_7321320.elements[2] = lp_731367_733274;
-+c_7321320.elements[3] = ((closureN)self_7312603)->elements[5];
-+c_7321320.elements[4] = ((closureN)self_7312603)->elements[6];
-+
-+
-+closureN_type c_7321336;
-+object e_7321438 [4];
-+c_7321336.hdr.mark = gc_color_red;
-+ c_7321336.hdr.grayed = 0;
-+c_7321336.tag = closureN_tag;
-+ c_7321336.fn = (function_type)__lambda_928;
-+c_7321336.num_args = 3;
-+c_7321336.num_elements = 4;
-+c_7321336.elements = (object *)e_7321438;
-+c_7321336.elements[0] = ((closureN)self_7312603)->elements[0];
-+c_7321336.elements[1] = ((closureN)self_7312603)->elements[2];
-+c_7321336.elements[2] = ((closureN)self_7312603)->elements[4];
-+c_7321336.elements[3] = lp_731367_733274;
-+
-+return_direct_with_clo1(data,(closure)&c_7321320,__lambda_926,  &c_7321336);; 
-+}
-+
-+static void __lambda_928(void *data, object self_7312604, int argc, object *args) /* object self_7312604, object k_735983, object x_731368_733275, object dim_731369_733276, object vars_731370_733277 */
-+ {
-+ object k_735983 = args[0]; object x_731368_733275 = args[1]; object dim_731369_733276 = args[2]; object vars_731370_733277 = args[3];
-+  
-+closureN_type c_7321338;
-+object e_7321437 [8];
-+c_7321338.hdr.mark = gc_color_red;
-+ c_7321338.hdr.grayed = 0;
-+c_7321338.tag = closureN_tag;
-+ c_7321338.fn = (function_type)__lambda_929;
-+c_7321338.num_args = 1;
-+c_7321338.num_elements = 8;
-+c_7321338.elements = (object *)e_7321437;
-+c_7321338.elements[0] = ((closureN)self_7312604)->elements[0];
-+c_7321338.elements[1] = dim_731369_733276;
-+c_7321338.elements[2] = ((closureN)self_7312604)->elements[1];
-+c_7321338.elements[3] = k_735983;
-+c_7321338.elements[4] = ((closureN)self_7312604)->elements[2];
-+c_7321338.elements[5] = ((closureN)self_7312604)->elements[3];
-+c_7321338.elements[6] = vars_731370_733277;
-+c_7321338.elements[7] = x_731368_733275;
-+
-+return_direct_with_clo2(data,  __glo_identifier_127_scheme_base, (((closure)  __glo_identifier_127_scheme_base)->fn),  &c_7321338, x_731368_733275);; 
-+}
-+
-+static void __lambda_929(void *data, object self_7312605, int argc, object *args) /* object self_7312605, object r_735984 */
-+ {
-+ object r_735984 = args[0];
-+  if( (boolean_f != r_735984) ){ 
-+  
-+closureN_type c_7321340;
-+object e_7321361 [5];
-+c_7321340.hdr.mark = gc_color_red;
-+ c_7321340.hdr.grayed = 0;
-+c_7321340.tag = closureN_tag;
-+ c_7321340.fn = (function_type)__lambda_930;
-+c_7321340.num_args = 1;
-+c_7321340.num_elements = 5;
-+c_7321340.elements = (object *)e_7321361;
-+c_7321340.elements[0] = ((closureN)self_7312605)->elements[1];
-+c_7321340.elements[1] = ((closureN)self_7312605)->elements[3];
-+c_7321340.elements[2] = ((closureN)self_7312605)->elements[4];
-+c_7321340.elements[3] = ((closureN)self_7312605)->elements[6];
-+c_7321340.elements[4] = ((closureN)self_7312605)->elements[7];
-+
-+
-+closureN_type c_7321362;
-+object e_7321366 [2];
-+c_7321362.hdr.mark = gc_color_red;
-+ c_7321362.hdr.grayed = 0;
-+c_7321362.tag = closureN_tag;
-+ c_7321362.fn = (function_type)__lambda_932;
-+c_7321362.num_args = 1;
-+c_7321362.num_elements = 2;
-+c_7321362.elements = (object *)e_7321366;
-+c_7321362.elements[0] = ((closureN)self_7312605)->elements[0];
-+c_7321362.elements[1] = ((closureN)self_7312605)->elements[7];
-+
-+return_direct_with_clo1(data,(closure)&c_7321340,__lambda_930,  &c_7321362);
-+} else { 
-+  
-+
-+
-+closureN_type c_7321371;
-+object e_7321435 [5];
-+c_7321371.hdr.mark = gc_color_red;
-+ c_7321371.hdr.grayed = 0;
-+c_7321371.tag = closureN_tag;
-+ c_7321371.fn = (function_type)__lambda_933;
-+c_7321371.num_args = 1;
-+c_7321371.num_elements = 5;
-+c_7321371.elements = (object *)e_7321435;
-+c_7321371.elements[0] = ((closureN)self_7312605)->elements[1];
-+c_7321371.elements[1] = ((closureN)self_7312605)->elements[3];
-+c_7321371.elements[2] = ((closureN)self_7312605)->elements[5];
-+c_7321371.elements[3] = ((closureN)self_7312605)->elements[6];
-+c_7321371.elements[4] = ((closureN)self_7312605)->elements[7];
++closureN_type c_7321209;
++object e_7321293 [3];
++c_7321209.hdr.mark = gc_color_red;
++ c_7321209.hdr.grayed = 0;
++c_7321209.tag = closureN_tag;
++ c_7321209.fn = (function_type)__lambda_914;
++c_7321209.num_args = 2;
++c_7321209.num_elements = 3;
++c_7321209.elements = (object *)e_7321293;
++c_7321209.elements[0] = ((closureN)self_7312613)->elements[0];
++c_7321209.elements[1] = lp_731390_733277;
++c_7321209.elements[2] = ((closureN)self_7312613)->elements[3];
  
 -return_closcall2(data,  car(((closureN)self_7313851)->elements[2]),  &c_7322664, ((closureN)self_7313851)->elements[7]);}
-+return_closcall2(data,  car(((closureN)self_7312605)->elements[2]),  &c_7321371, ((closureN)self_7312605)->elements[7]);}
- ;; 
+-;; 
++return_direct_with_clo1(data,(closure)&c_7321194,__lambda_912,  &c_7321209);; 
  }
  
 -static void __lambda_933(void *data, object self_7313855, int argc, object *args) /* object self_7313855, object r_736434 */
-+static void __lambda_933(void *data, object self_7312609, int argc, object *args) /* object self_7312609, object r_735989 */
++static void __lambda_914(void *data, object self_7312614, int argc, object *args) /* object self_7312614, object k_735958, object x_731391_733278, object free_731392_733279 */
   {
 - object r_736434 = args[0];
 -  if( (boolean_f != r_736434) ){ 
-+ object r_735989 = args[0];
-+  if( (boolean_f != r_735989) ){ 
-   
- 
++ object k_735958 = args[0]; object x_731391_733278 = args[1]; object free_731392_733279 = args[2];
+   
++closureN_type c_7321211;
++object e_7321292 [6];
++c_7321211.hdr.mark = gc_color_red;
++ c_7321211.hdr.grayed = 0;
++c_7321211.tag = closureN_tag;
++ c_7321211.fn = (function_type)__lambda_915;
++c_7321211.num_args = 1;
++c_7321211.num_elements = 6;
++c_7321211.elements = (object *)e_7321292;
++c_7321211.elements[0] = ((closureN)self_7312614)->elements[0];
++c_7321211.elements[1] = free_731392_733279;
++c_7321211.elements[2] = k_735958;
++c_7321211.elements[3] = ((closureN)self_7312614)->elements[1];
++c_7321211.elements[4] = ((closureN)self_7312614)->elements[2];
++c_7321211.elements[5] = x_731391_733278;
+ 
++return_direct_with_clo2(data,  __glo_identifier_127_scheme_base, (((closure)  __glo_identifier_127_scheme_base)->fn),  &c_7321211, x_731391_733278);; 
++}
  
 -closureN_type c_7322669;
 -object e_7322682 [4];
@@ -30142,28 +30606,45 @@ Make let-values be the same as let*-values, to work around
 -c_7322669.elements[1] = ((closureN)self_7313855)->elements[1];
 -c_7322669.elements[2] = ((closureN)self_7313855)->elements[2];
 -c_7322669.elements[3] = ((closureN)self_7313855)->elements[4];
-+closureN_type c_7321376;
-+object e_7321389 [4];
-+c_7321376.hdr.mark = gc_color_red;
-+ c_7321376.hdr.grayed = 0;
-+c_7321376.tag = closureN_tag;
-+ c_7321376.fn = (function_type)__lambda_934;
-+c_7321376.num_args = 1;
-+c_7321376.num_elements = 4;
-+c_7321376.elements = (object *)e_7321389;
-+c_7321376.elements[0] = ((closureN)self_7312609)->elements[0];
-+c_7321376.elements[1] = ((closureN)self_7312609)->elements[1];
-+c_7321376.elements[2] = ((closureN)self_7312609)->elements[2];
-+c_7321376.elements[3] = ((closureN)self_7312609)->elements[4];
- 
- 
++static void __lambda_915(void *data, object self_7312615, int argc, object *args) /* object self_7312615, object r_735959 */
++ {
++ object r_735959 = args[0];
++  if( (boolean_f != r_735959) ){ 
++  
++closureN_type c_7321213;
++object e_7321242 [4];
++c_7321213.hdr.mark = gc_color_red;
++ c_7321213.hdr.grayed = 0;
++c_7321213.tag = closureN_tag;
++ c_7321213.fn = (function_type)__lambda_916;
++c_7321213.num_args = 0;
++c_7321213.num_elements = 4;
++c_7321213.elements = (object *)e_7321242;
++c_7321213.elements[0] = ((closureN)self_7312615)->elements[0];
++c_7321213.elements[1] = ((closureN)self_7312615)->elements[1];
++c_7321213.elements[2] = ((closureN)self_7312615)->elements[4];
++c_7321213.elements[3] = ((closureN)self_7312615)->elements[5];
+ 
+ 
++closureN_type c_7321243;
++object e_7321254 [3];
++c_7321243.hdr.mark = gc_color_red;
++ c_7321243.hdr.grayed = 0;
++c_7321243.tag = closureN_tag;
++ c_7321243.fn = (function_type)__lambda_920;
++c_7321243.num_args = 1;
++c_7321243.num_elements = 3;
++c_7321243.elements = (object *)e_7321254;
++c_7321243.elements[0] = ((closureN)self_7312615)->elements[1];
++c_7321243.elements[1] = ((closureN)self_7312615)->elements[2];
++c_7321243.elements[2] = ((closureN)self_7312615)->elements[5];
  
 -return_closcall4(data,  car(((closureN)self_7313855)->elements[2]),  &c_7322669, Cyc_cddr(data, ((closureN)self_7313855)->elements[4]), ((closureN)self_7313855)->elements[0], ((closureN)self_7313855)->elements[3]);
-+return_closcall4(data,  car(((closureN)self_7312609)->elements[2]),  &c_7321376, Cyc_cddr(data, ((closureN)self_7312609)->elements[4]), ((closureN)self_7312609)->elements[0], ((closureN)self_7312609)->elements[3]);
++return_direct_with_clo1(data,(closure)&c_7321213,__lambda_916,  &c_7321243);
  } else { 
      
 -if( (boolean_f != Cyc_is_pair(((closureN)self_7313855)->elements[4])) ){ 
-+if( (boolean_f != Cyc_is_pair(((closureN)self_7312609)->elements[4])) ){ 
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312615)->elements[5])) ){ 
    
  
  
@@ -30180,28 +30661,27 @@ Make let-values be the same as let*-values, to work around
 -c_7322695.elements[1] = ((closureN)self_7313855)->elements[1];
 -c_7322695.elements[2] = ((closureN)self_7313855)->elements[2];
 -c_7322695.elements[3] = ((closureN)self_7313855)->elements[4];
-+closureN_type c_7321402;
-+object e_7321412 [4];
-+c_7321402.hdr.mark = gc_color_red;
-+ c_7321402.hdr.grayed = 0;
-+c_7321402.tag = closureN_tag;
-+ c_7321402.fn = (function_type)__lambda_935;
-+c_7321402.num_args = 1;
-+c_7321402.num_elements = 4;
-+c_7321402.elements = (object *)e_7321412;
-+c_7321402.elements[0] = ((closureN)self_7312609)->elements[0];
-+c_7321402.elements[1] = ((closureN)self_7312609)->elements[1];
-+c_7321402.elements[2] = ((closureN)self_7312609)->elements[2];
-+c_7321402.elements[3] = ((closureN)self_7312609)->elements[4];
++closureN_type c_7321262;
++object e_7321271 [3];
++c_7321262.hdr.mark = gc_color_red;
++ c_7321262.hdr.grayed = 0;
++c_7321262.tag = closureN_tag;
++ c_7321262.fn = (function_type)__lambda_921;
++c_7321262.num_args = 1;
++c_7321262.num_elements = 3;
++c_7321262.elements = (object *)e_7321271;
++c_7321262.elements[0] = ((closureN)self_7312615)->elements[2];
++c_7321262.elements[1] = ((closureN)self_7312615)->elements[3];
++c_7321262.elements[2] = ((closureN)self_7312615)->elements[5];
  
  
  
 -return_closcall4(data,  car(((closureN)self_7313855)->elements[2]),  &c_7322695, Cyc_cdr(data, ((closureN)self_7313855)->elements[4]), ((closureN)self_7313855)->elements[0], ((closureN)self_7313855)->elements[3]);
-+return_closcall4(data,  car(((closureN)self_7312609)->elements[2]),  &c_7321402, Cyc_cdr(data, ((closureN)self_7312609)->elements[4]), ((closureN)self_7312609)->elements[0], ((closureN)self_7312609)->elements[3]);
++return_closcall3(data,  car(((closureN)self_7312615)->elements[3]),  &c_7321262, Cyc_cdr(data, ((closureN)self_7312615)->elements[5]), ((closureN)self_7312615)->elements[1]);
  } else { 
      
 -if( (boolean_f != Cyc_is_vector_not_record_type(((closureN)self_7313855)->elements[4])) ){ 
-+if( (boolean_f != Cyc_is_vector_not_record_type(((closureN)self_7312609)->elements[4])) ){ 
++if( (boolean_f != Cyc_is_vector_not_record_type(((closureN)self_7312615)->elements[5])) ){ 
    
 -closureN_type c_7322715;
 -object e_7322723 [4];
@@ -30216,84 +30696,126 @@ Make let-values be the same as let*-values, to work around
 -c_7322715.elements[1] = ((closureN)self_7313855)->elements[1];
 -c_7322715.elements[2] = ((closureN)self_7313855)->elements[2];
 -c_7322715.elements[3] = ((closureN)self_7313855)->elements[3];
-+closureN_type c_7321422;
-+object e_7321430 [4];
-+c_7321422.hdr.mark = gc_color_red;
-+ c_7321422.hdr.grayed = 0;
-+c_7321422.tag = closureN_tag;
-+ c_7321422.fn = (function_type)__lambda_936;
-+c_7321422.num_args = 1;
-+c_7321422.num_elements = 4;
-+c_7321422.elements = (object *)e_7321430;
-+c_7321422.elements[0] = ((closureN)self_7312609)->elements[0];
-+c_7321422.elements[1] = ((closureN)self_7312609)->elements[1];
-+c_7321422.elements[2] = ((closureN)self_7312609)->elements[2];
-+c_7321422.elements[3] = ((closureN)self_7312609)->elements[3];
++closureN_type c_7321280;
++object e_7321287 [3];
++c_7321280.hdr.mark = gc_color_red;
++ c_7321280.hdr.grayed = 0;
++c_7321280.tag = closureN_tag;
++ c_7321280.fn = (function_type)__lambda_922;
++c_7321280.num_args = 1;
++c_7321280.num_elements = 3;
++c_7321280.elements = (object *)e_7321287;
++c_7321280.elements[0] = ((closureN)self_7312615)->elements[1];
++c_7321280.elements[1] = ((closureN)self_7312615)->elements[2];
++c_7321280.elements[2] = ((closureN)self_7312615)->elements[3];
  
 -return_direct_with_clo2(data,  __glo_vector_91_125list_scheme_base, (((closure)  __glo_vector_91_125list_scheme_base)->fn),  &c_7322715, ((closureN)self_7313855)->elements[4]);
-+return_direct_with_clo2(data,  __glo_vector_91_125list_scheme_base, (((closure)  __glo_vector_91_125list_scheme_base)->fn),  &c_7321422, ((closureN)self_7312609)->elements[4]);
++return_direct_with_clo2(data,  __glo_vector_91_125list_scheme_base, (((closure)  __glo_vector_91_125list_scheme_base)->fn),  &c_7321280, ((closureN)self_7312615)->elements[5]);
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7313855)->elements[1], (((closure)  ((closureN)self_7313855)->elements[1])->fn),  ((closureN)self_7313855)->elements[3]);}
-+  return_direct_with_clo1(data,  ((closureN)self_7312609)->elements[1], (((closure)  ((closureN)self_7312609)->elements[1])->fn),  ((closureN)self_7312609)->elements[3]);}
++  return_direct_with_clo1(data,  ((closureN)self_7312615)->elements[2], (((closure)  ((closureN)self_7312615)->elements[2])->fn),  ((closureN)self_7312615)->elements[1]);}
  ;}
  ;}
  ;; 
  }
  
 -static void __lambda_936(void *data, object self_7313858, int argc, object *args) /* object self_7313858, object r_736444 */
-+static void __lambda_936(void *data, object self_7312612, int argc, object *args) /* object self_7312612, object r_735999 */
++static void __lambda_922(void *data, object self_7312622, int argc, object *args) /* object self_7312622, object r_735970 */
   {
 - object r_736444 = args[0];
-+ object r_735999 = args[0];
++ object r_735970 = args[0];
    
  
 -return_closcall4(data,  car(((closureN)self_7313858)->elements[2]),  ((closureN)self_7313858)->elements[1], r_736444, ((closureN)self_7313858)->elements[0], ((closureN)self_7313858)->elements[3]);; 
-+return_closcall4(data,  car(((closureN)self_7312612)->elements[2]),  ((closureN)self_7312612)->elements[1], r_735999, ((closureN)self_7312612)->elements[0], ((closureN)self_7312612)->elements[3]);; 
++return_closcall3(data,  car(((closureN)self_7312622)->elements[2]),  ((closureN)self_7312622)->elements[1], r_735970, ((closureN)self_7312622)->elements[0]);; 
  }
  
 -static void __lambda_935(void *data, object self_7313857, int argc, object *args) /* object self_7313857, object r_736441 */
-+static void __lambda_935(void *data, object self_7312611, int argc, object *args) /* object self_7312611, object r_735996 */
++static void __lambda_921(void *data, object self_7312621, int argc, object *args) /* object self_7312621, object r_735967 */
   {
 - object r_736441 = args[0];
-+ object r_735996 = args[0];
++ object r_735967 = args[0];
    
  
  
  
 -return_closcall4(data,  car(((closureN)self_7313857)->elements[2]),  ((closureN)self_7313857)->elements[1], Cyc_car(data, ((closureN)self_7313857)->elements[3]), ((closureN)self_7313857)->elements[0], r_736441);; 
-+return_closcall4(data,  car(((closureN)self_7312611)->elements[2]),  ((closureN)self_7312611)->elements[1], Cyc_car(data, ((closureN)self_7312611)->elements[3]), ((closureN)self_7312611)->elements[0], r_735996);; 
++return_closcall3(data,  car(((closureN)self_7312621)->elements[1]),  ((closureN)self_7312621)->elements[0], Cyc_car(data, ((closureN)self_7312621)->elements[2]), r_735967);; 
  }
  
 -static void __lambda_934(void *data, object self_7313856, int argc, object *args) /* object self_7313856, object r_736437 */
-+static void __lambda_934(void *data, object self_7312610, int argc, object *args) /* object self_7312610, object r_735992 */
++static void __lambda_920(void *data, object self_7312616, int argc, object *args) /* object self_7312616, object r_735960 */
   {
 - object r_736437 = args[0];
-+ object r_735992 = args[0];
++ object r_735960 = args[0];
++  if( (boolean_f != r_735960) ){ 
    
++pair_type local_7321248; 
++return_direct_with_clo1(data,  ((closureN)self_7312616)->elements[1], (((closure)  ((closureN)self_7312616)->elements[1])->fn),  set_pair_as_expr(&local_7321248, ((closureN)self_7312616)->elements[2], ((closureN)self_7312616)->elements[0]));
++} else { 
++  return_direct_with_clo1(data,  ((closureN)self_7312616)->elements[1], (((closure)  ((closureN)self_7312616)->elements[1])->fn),  ((closureN)self_7312616)->elements[0]);}
++;; 
++}
  
++static void __lambda_916(void *data, object self_7312617, int argc, object *args) /* object self_7312617, object k_735961 */
++ {
++ object k_735961 = args[0];
++  
++closureN_type c_7321215;
++object e_7321237 [4];
++c_7321215.hdr.mark = gc_color_red;
++ c_7321215.hdr.grayed = 0;
++c_7321215.tag = closureN_tag;
++ c_7321215.fn = (function_type)__lambda_917;
++c_7321215.num_args = 1;
++c_7321215.num_elements = 4;
++c_7321215.elements = (object *)e_7321237;
++c_7321215.elements[0] = ((closureN)self_7312617)->elements[0];
++c_7321215.elements[1] = k_735961;
++c_7321215.elements[2] = ((closureN)self_7312617)->elements[2];
++c_7321215.elements[3] = ((closureN)self_7312617)->elements[3];
  
  
  
 -complex_num_type local_7322680; 
 -return_closcall4(data,  car(((closureN)self_7313856)->elements[2]),  ((closureN)self_7313856)->elements[1], Cyc_car(data, ((closureN)self_7313856)->elements[3]), Cyc_fast_sum(data,&local_7322680, ((closureN)self_7313856)->elements[0], obj_int2obj(1)), r_736437);; 
-+complex_num_type local_7321387; 
-+return_closcall4(data,  car(((closureN)self_7312610)->elements[2]),  ((closureN)self_7312610)->elements[1], Cyc_car(data, ((closureN)self_7312610)->elements[3]), Cyc_fast_sum(data,&local_7321387, ((closureN)self_7312610)->elements[0], obj_int2obj(1)), r_735992);; 
++return_direct_with_clo1(data,(closure)&c_7321215,__lambda_917,  memqp(data, ((closureN)self_7312617)->elements[3], ((closureN)self_7312617)->elements[1]));; 
  }
  
 -static void __lambda_932(void *data, object self_7313852, int argc, object *args) /* object self_7313852, object k_736433, object lit_731373_733618 */
-+static void __lambda_932(void *data, object self_7312606, int argc, object *args) /* object self_7312606, object k_735988, object lit_731374_733278 */
++static void __lambda_917(void *data, object self_7312618, int argc, object *args) /* object self_7312618, object r_735962 */
   {
 - object k_736433 = args[0]; object lit_731373_733618 = args[1];
 -  return_closcall3(data,  ((closureN)self_7313852)->elements[0],  k_736433, ((closureN)self_7313852)->elements[1], lit_731373_733618);; 
-+ object k_735988 = args[0]; object lit_731374_733278 = args[1];
-+  return_closcall3(data,  ((closureN)self_7312606)->elements[0],  k_735988, ((closureN)self_7312606)->elements[1], lit_731374_733278);; 
++ object r_735962 = args[0];
++  if( (boolean_f != r_735962) ){ 
++  return_direct_with_clo1(data,  ((closureN)self_7312618)->elements[1], (((closure)  ((closureN)self_7312618)->elements[1])->fn),  boolean_f);
++} else { 
++  
++closureN_type c_7321219;
++object e_7321232 [2];
++c_7321219.hdr.mark = gc_color_red;
++ c_7321219.hdr.grayed = 0;
++c_7321219.tag = closureN_tag;
++ c_7321219.fn = (function_type)__lambda_918;
++c_7321219.num_args = 1;
++c_7321219.num_elements = 2;
++c_7321219.elements = (object *)e_7321232;
++c_7321219.elements[0] = ((closureN)self_7312618)->elements[0];
++c_7321219.elements[1] = ((closureN)self_7312618)->elements[1];
++
++
++
++return_direct_with_clo1(data,(closure)&c_7321219,__lambda_918,  assq(data, ((closureN)self_7312618)->elements[3], ((closureN)self_7312618)->elements[2]));}
++;; 
  }
  
 -static void __lambda_930(void *data, object self_7313853, int argc, object *args) /* object self_7313853, object r_736432 */
-+static void __lambda_930(void *data, object self_7312607, int argc, object *args) /* object self_7312607, object r_735987 */
++static void __lambda_918(void *data, object self_7312619, int argc, object *args) /* object self_7312619, object tmp_731399_731401_733280 */
   {
 - object r_736432 = args[0];
-+ object r_735987 = args[0];
++ object tmp_731399_731401_733280 = args[0];
++  if( (boolean_f != tmp_731399_731401_733280) ){ 
    
 -closureN_type c_7322635;
 -object e_7322650 [4];
@@ -30308,302 +30830,30 @@ Make let-values be the same as let*-values, to work around
 -c_7322635.elements[1] = ((closureN)self_7313853)->elements[1];
 -c_7322635.elements[2] = ((closureN)self_7313853)->elements[3];
 -c_7322635.elements[3] = ((closureN)self_7313853)->elements[4];
-+closureN_type c_7321342;
-+object e_7321357 [4];
-+c_7321342.hdr.mark = gc_color_red;
-+ c_7321342.hdr.grayed = 0;
-+c_7321342.tag = closureN_tag;
-+ c_7321342.fn = (function_type)__lambda_931;
-+c_7321342.num_args = 1;
-+c_7321342.num_elements = 4;
-+c_7321342.elements = (object *)e_7321357;
-+c_7321342.elements[0] = ((closureN)self_7312607)->elements[0];
-+c_7321342.elements[1] = ((closureN)self_7312607)->elements[1];
-+c_7321342.elements[2] = ((closureN)self_7312607)->elements[3];
-+c_7321342.elements[3] = ((closureN)self_7312607)->elements[4];
-+
-+
-+
-+return_direct_with_clo3(data,  __glo_any_scheme_base, (((closure)  __glo_any_scheme_base)->fn),  &c_7321342, r_735987, car(((closureN)self_7312607)->elements[2]));; 
-+}
-+
-+static void __lambda_931(void *data, object self_7312608, int argc, object *args) /* object self_7312608, object r_735985 */
-+ {
-+ object r_735985 = args[0];
-+  if( (boolean_f != r_735985) ){ 
-+  return_direct_with_clo1(data,  ((closureN)self_7312608)->elements[1], (((closure)  ((closureN)self_7312608)->elements[1])->fn),  ((closureN)self_7312608)->elements[2]);
-+} else { 
-+  
-+pair_type local_7321350; 
-+
-+pair_type local_7321353; 
-+return_direct_with_clo1(data,  ((closureN)self_7312608)->elements[1], (((closure)  ((closureN)self_7312608)->elements[1])->fn),  set_pair_as_expr(&local_7321350, set_pair_as_expr(&local_7321353, ((closureN)self_7312608)->elements[3], ((closureN)self_7312608)->elements[0]), ((closureN)self_7312608)->elements[2]));}
-+;; 
-+}
-+
-+static void __lambda_926(void *data, object self_7312613, int argc, object *args) /* object self_7312613, object r_735982 */
-+ {
-+ object r_735982 = args[0];
-+  
-+closureN_type c_7321322;
-+object e_7321331 [5];
-+c_7321322.hdr.mark = gc_color_red;
-+ c_7321322.hdr.grayed = 0;
-+c_7321322.tag = closureN_tag;
-+ c_7321322.fn = (function_type)__lambda_927;
-+c_7321322.num_args = 1;
-+c_7321322.num_elements = 5;
-+c_7321322.elements = (object *)e_7321331;
-+c_7321322.elements[0] = ((closureN)self_7312613)->elements[0];
-+c_7321322.elements[1] = ((closureN)self_7312613)->elements[1];
-+c_7321322.elements[2] = ((closureN)self_7312613)->elements[2];
-+c_7321322.elements[3] = ((closureN)self_7312613)->elements[3];
-+c_7321322.elements[4] = ((closureN)self_7312613)->elements[4];
-+
-+
-+
-+return_direct_with_clo1(data,(closure)&c_7321322,__lambda_927,  Cyc_set_cell(data, ((closureN)self_7312613)->elements[2], r_735982));; 
-+}
-+
-+static void __lambda_927(void *data, object self_7312614, int argc, object *args) /* object self_7312614, object r_735981 */
-+ {
-+
-+  
-+
-+return_closcall4(data,  car(((closureN)self_7312614)->elements[2]),  ((closureN)self_7312614)->elements[1], ((closureN)self_7312614)->elements[4], ((closureN)self_7312614)->elements[0], ((closureN)self_7312614)->elements[3]);; 
-+}
-+
-+static void __lambda_856(void *data, object self_7312615, int argc, object *args) /* object self_7312615, object r_735978 */
-+ {
-+ object r_735978 = args[0];
-+  
-+closureN_type c_7320709;
-+object e_7321307 [25];
-+c_7320709.hdr.mark = gc_color_red;
-+ c_7320709.hdr.grayed = 0;
-+c_7320709.tag = closureN_tag;
-+ c_7320709.fn = (function_type)__lambda_857;
-+c_7320709.num_args = 1;
-+c_7320709.num_elements = 25;
-+c_7320709.elements = (object *)e_7321307;
-+c_7320709.elements[0] = ((closureN)self_7312615)->elements[0];
-+c_7320709.elements[1] = ((closureN)self_7312615)->elements[1];
-+c_7320709.elements[2] = ((closureN)self_7312615)->elements[2];
-+c_7320709.elements[3] = ((closureN)self_7312615)->elements[3];
-+c_7320709.elements[4] = ((closureN)self_7312615)->elements[4];
-+c_7320709.elements[5] = ((closureN)self_7312615)->elements[5];
-+c_7320709.elements[6] = ((closureN)self_7312615)->elements[6];
-+c_7320709.elements[7] = ((closureN)self_7312615)->elements[7];
-+c_7320709.elements[8] = ((closureN)self_7312615)->elements[8];
-+c_7320709.elements[9] = ((closureN)self_7312615)->elements[9];
-+c_7320709.elements[10] = ((closureN)self_7312615)->elements[10];
-+c_7320709.elements[11] = ((closureN)self_7312615)->elements[11];
-+c_7320709.elements[12] = ((closureN)self_7312615)->elements[12];
-+c_7320709.elements[13] = ((closureN)self_7312615)->elements[13];
-+c_7320709.elements[14] = ((closureN)self_7312615)->elements[14];
-+c_7320709.elements[15] = ((closureN)self_7312615)->elements[16];
-+c_7320709.elements[16] = ((closureN)self_7312615)->elements[17];
-+c_7320709.elements[17] = ((closureN)self_7312615)->elements[18];
-+c_7320709.elements[18] = ((closureN)self_7312615)->elements[19];
-+c_7320709.elements[19] = ((closureN)self_7312615)->elements[20];
-+c_7320709.elements[20] = ((closureN)self_7312615)->elements[21];
-+c_7320709.elements[21] = ((closureN)self_7312615)->elements[22];
-+c_7320709.elements[22] = ((closureN)self_7312615)->elements[23];
-+c_7320709.elements[23] = ((closureN)self_7312615)->elements[24];
-+c_7320709.elements[24] = ((closureN)self_7312615)->elements[25];
-+
-+
-+
-+return_direct_with_clo1(data,(closure)&c_7320709,__lambda_857,  Cyc_set_cell(data, ((closureN)self_7312615)->elements[15], r_735978));; 
-+}
-+
-+static void __lambda_857(void *data, object self_7312616, int argc, object *args) /* object self_7312616, object r_735877 */
-+ {
-+
-+  
-+closureN_type c_7320711;
-+object e_7321192 [25];
-+c_7320711.hdr.mark = gc_color_red;
-+ c_7320711.hdr.grayed = 0;
-+c_7320711.tag = closureN_tag;
-+ c_7320711.fn = (function_type)__lambda_858;
-+c_7320711.num_args = 1;
-+c_7320711.num_elements = 25;
-+c_7320711.elements = (object *)e_7321192;
-+c_7320711.elements[0] = ((closureN)self_7312616)->elements[0];
-+c_7320711.elements[1] = ((closureN)self_7312616)->elements[1];
-+c_7320711.elements[2] = ((closureN)self_7312616)->elements[2];
-+c_7320711.elements[3] = ((closureN)self_7312616)->elements[3];
-+c_7320711.elements[4] = ((closureN)self_7312616)->elements[4];
-+c_7320711.elements[5] = ((closureN)self_7312616)->elements[5];
-+c_7320711.elements[6] = ((closureN)self_7312616)->elements[6];
-+c_7320711.elements[7] = ((closureN)self_7312616)->elements[7];
-+c_7320711.elements[8] = ((closureN)self_7312616)->elements[8];
-+c_7320711.elements[9] = ((closureN)self_7312616)->elements[9];
-+c_7320711.elements[10] = ((closureN)self_7312616)->elements[10];
-+c_7320711.elements[11] = ((closureN)self_7312616)->elements[11];
-+c_7320711.elements[12] = ((closureN)self_7312616)->elements[12];
-+c_7320711.elements[13] = ((closureN)self_7312616)->elements[13];
-+c_7320711.elements[14] = ((closureN)self_7312616)->elements[14];
-+c_7320711.elements[15] = ((closureN)self_7312616)->elements[15];
-+c_7320711.elements[16] = ((closureN)self_7312616)->elements[16];
-+c_7320711.elements[17] = ((closureN)self_7312616)->elements[17];
-+c_7320711.elements[18] = ((closureN)self_7312616)->elements[18];
-+c_7320711.elements[19] = ((closureN)self_7312616)->elements[19];
-+c_7320711.elements[20] = ((closureN)self_7312616)->elements[20];
-+c_7320711.elements[21] = ((closureN)self_7312616)->elements[21];
-+c_7320711.elements[22] = ((closureN)self_7312616)->elements[22];
-+c_7320711.elements[23] = ((closureN)self_7312616)->elements[23];
-+c_7320711.elements[24] = ((closureN)self_7312616)->elements[24];
-+
-+
-+mmacro(c_7321193, (function_type)__lambda_909);c_7321193.num_args = 3;
-+return_direct_with_clo1(data,(closure)&c_7320711,__lambda_858,  &c_7321193);; 
-+}
-+
-+static void __lambda_909(void *data, object self_7312617, int argc, object *args) /* object self_7312617, object k_735961, object x_731385_733279, object vars_731386_733280, object dim_731387_733281 */
-+ {
-+ object k_735961 = args[0]; object x_731385_733279 = args[1]; object vars_731386_733280 = args[2]; object dim_731387_733281 = args[3];
-+  
-+closureN_type c_7321195;
-+object e_7321306 [3];
-+c_7321195.hdr.mark = gc_color_red;
-+ c_7321195.hdr.grayed = 0;
-+c_7321195.tag = closureN_tag;
-+ c_7321195.fn = (function_type)__lambda_910;
-+c_7321195.num_args = 2;
-+c_7321195.num_elements = 3;
-+c_7321195.elements = (object *)e_7321306;
-+c_7321195.elements[0] = dim_731387_733281;
-+c_7321195.elements[1] = k_735961;
-+c_7321195.elements[2] = vars_731386_733280;
-+
-+return_direct_with_clo2(data,(closure)&c_7321195,__lambda_910,  x_731385_733279, NULL);; 
-+}
-+
-+static void __lambda_910(void *data, object self_7312618, int argc, object *args) /* object self_7312618, object x_731389_733282, object free_731390_733283 */
-+ {
-+ object x_731389_733282 = args[0]; object free_731390_733283 = args[1];
-+  
-+closureN_type c_7321197;
-+object e_7321305 [5];
-+c_7321197.hdr.mark = gc_color_red;
-+ c_7321197.hdr.grayed = 0;
-+c_7321197.tag = closureN_tag;
-+ c_7321197.fn = (function_type)__lambda_911;
-+c_7321197.num_args = 1;
-+c_7321197.num_elements = 5;
-+c_7321197.elements = (object *)e_7321305;
-+c_7321197.elements[0] = ((closureN)self_7312618)->elements[0];
-+c_7321197.elements[1] = free_731390_733283;
-+c_7321197.elements[2] = ((closureN)self_7312618)->elements[1];
-+c_7321197.elements[3] = ((closureN)self_7312618)->elements[2];
-+c_7321197.elements[4] = x_731389_733282;
-+
-+return_direct_with_clo1(data,(closure)&c_7321197,__lambda_911,  boolean_f);; 
-+}
-+
-+static void __lambda_911(void *data, object self_7312619, int argc, object *args) /* object self_7312619, object lp_731391_733284 */
-+ {
-+ object lp_731391_733284 = args[0];
-+  
-+closureN_type c_7321199;
-+object e_7321301 [5];
-+c_7321199.hdr.mark = gc_color_red;
-+ c_7321199.hdr.grayed = 0;
-+c_7321199.tag = closureN_tag;
-+ c_7321199.fn = (function_type)__lambda_1365;
-+c_7321199.num_args = 1;
-+c_7321199.num_elements = 5;
-+c_7321199.elements = (object *)e_7321301;
-+c_7321199.elements[0] = ((closureN)self_7312619)->elements[0];
-+c_7321199.elements[1] = ((closureN)self_7312619)->elements[1];
-+c_7321199.elements[2] = ((closureN)self_7312619)->elements[2];
-+c_7321199.elements[3] = ((closureN)self_7312619)->elements[3];
-+c_7321199.elements[4] = ((closureN)self_7312619)->elements[4];
-+
-+
-+pair_type local_7321304; 
-+return_direct_with_clo1(data,(closure)&c_7321199,__lambda_1365,  set_cell_as_expr(&local_7321304, lp_731391_733284));; 
-+}
-+
-+static void __lambda_1365(void *data, object self_7312620, int argc, object *args) /* object self_7312620, object lp_731391_733284 */
-+ {
-+ object lp_731391_733284 = args[0];
-+  
-+closureN_type c_7321201;
-+object e_7321215 [4];
-+c_7321201.hdr.mark = gc_color_red;
-+ c_7321201.hdr.grayed = 0;
-+c_7321201.tag = closureN_tag;
-+ c_7321201.fn = (function_type)__lambda_912;
-+c_7321201.num_args = 1;
-+c_7321201.num_elements = 4;
-+c_7321201.elements = (object *)e_7321215;
-+c_7321201.elements[0] = ((closureN)self_7312620)->elements[1];
-+c_7321201.elements[1] = ((closureN)self_7312620)->elements[2];
-+c_7321201.elements[2] = lp_731391_733284;
-+c_7321201.elements[3] = ((closureN)self_7312620)->elements[4];
-+
-+
-+closureN_type c_7321216;
-+object e_7321300 [3];
-+c_7321216.hdr.mark = gc_color_red;
-+ c_7321216.hdr.grayed = 0;
-+c_7321216.tag = closureN_tag;
-+ c_7321216.fn = (function_type)__lambda_914;
-+c_7321216.num_args = 2;
-+c_7321216.num_elements = 3;
-+c_7321216.elements = (object *)e_7321300;
-+c_7321216.elements[0] = ((closureN)self_7312620)->elements[0];
-+c_7321216.elements[1] = lp_731391_733284;
-+c_7321216.elements[2] = ((closureN)self_7312620)->elements[3];
- 
+-
 -
 -
 -return_direct_with_clo3(data,  __glo_any_scheme_base, (((closure)  __glo_any_scheme_base)->fn),  &c_7322635, r_736432, car(((closureN)self_7313853)->elements[2]));; 
-+return_direct_with_clo1(data,(closure)&c_7321201,__lambda_912,  &c_7321216);; 
- }
- 
+-}
+-
 -static void __lambda_931(void *data, object self_7313854, int argc, object *args) /* object self_7313854, object r_736430 */
-+static void __lambda_914(void *data, object self_7312621, int argc, object *args) /* object self_7312621, object k_735965, object x_731392_733285, object free_731393_733286 */
-  {
+- {
 - object r_736430 = args[0];
 -  if( (boolean_f != r_736430) ){ 
 -  return_direct_with_clo1(data,  ((closureN)self_7313854)->elements[1], (((closure)  ((closureN)self_7313854)->elements[1])->fn),  ((closureN)self_7313854)->elements[2]);
 -} else { 
-+ object k_735965 = args[0]; object x_731392_733285 = args[1]; object free_731393_733286 = args[2];
-   
+-  
 -pair_type local_7322643; 
-+closureN_type c_7321218;
-+object e_7321299 [6];
-+c_7321218.hdr.mark = gc_color_red;
-+ c_7321218.hdr.grayed = 0;
-+c_7321218.tag = closureN_tag;
-+ c_7321218.fn = (function_type)__lambda_915;
-+c_7321218.num_args = 1;
-+c_7321218.num_elements = 6;
-+c_7321218.elements = (object *)e_7321299;
-+c_7321218.elements[0] = ((closureN)self_7312621)->elements[0];
-+c_7321218.elements[1] = free_731393_733286;
-+c_7321218.elements[2] = k_735965;
-+c_7321218.elements[3] = ((closureN)self_7312621)->elements[1];
-+c_7321218.elements[4] = ((closureN)self_7312621)->elements[2];
-+c_7321218.elements[5] = x_731392_733285;
- 
+-
 -pair_type local_7322646; 
 -return_direct_with_clo1(data,  ((closureN)self_7313854)->elements[1], (((closure)  ((closureN)self_7313854)->elements[1])->fn),  set_pair_as_expr(&local_7322643, set_pair_as_expr(&local_7322646, ((closureN)self_7313854)->elements[3], ((closureN)self_7313854)->elements[0]), ((closureN)self_7313854)->elements[2]));}
 -;; 
-+return_direct_with_clo2(data,  __glo_identifier_127_scheme_base, (((closure)  __glo_identifier_127_scheme_base)->fn),  &c_7321218, x_731392_733285);; 
- }
- 
+-}
+-
 -static void __lambda_926(void *data, object self_7313859, int argc, object *args) /* object self_7313859, object r_736427 */
-+static void __lambda_915(void *data, object self_7312622, int argc, object *args) /* object self_7312622, object r_735966 */
-  {
+- {
 - object r_736427 = args[0];
-+ object r_735966 = args[0];
-+  if( (boolean_f != r_735966) ){ 
-   
+-  
 -closureN_type c_7322615;
 -object e_7322624 [5];
 -c_7322615.hdr.mark = gc_color_red;
@@ -30817,44 +31067,14 @@ Make let-values be the same as let*-values, to work around
 -c_7322509.elements[0] = ((closureN)self_7313866)->elements[0];
 -c_7322509.elements[1] = lp_731390_733624;
 -c_7322509.elements[2] = ((closureN)self_7313866)->elements[3];
-+closureN_type c_7321220;
-+object e_7321249 [4];
-+c_7321220.hdr.mark = gc_color_red;
-+ c_7321220.hdr.grayed = 0;
-+c_7321220.tag = closureN_tag;
-+ c_7321220.fn = (function_type)__lambda_916;
-+c_7321220.num_args = 0;
-+c_7321220.num_elements = 4;
-+c_7321220.elements = (object *)e_7321249;
-+c_7321220.elements[0] = ((closureN)self_7312622)->elements[0];
-+c_7321220.elements[1] = ((closureN)self_7312622)->elements[1];
-+c_7321220.elements[2] = ((closureN)self_7312622)->elements[4];
-+c_7321220.elements[3] = ((closureN)self_7312622)->elements[5];
- 
+-
 -return_direct_with_clo1(data,(closure)&c_7322494,__lambda_912,  &c_7322509);; 
 -}
- 
+-
 -static void __lambda_914(void *data, object self_7313867, int argc, object *args) /* object self_7313867, object k_736410, object x_731391_733625, object free_731392_733626 */
 - {
 - object k_736410 = args[0]; object x_731391_733625 = args[1]; object free_731392_733626 = args[2];
-+closureN_type c_7321250;
-+object e_7321261 [3];
-+c_7321250.hdr.mark = gc_color_red;
-+ c_7321250.hdr.grayed = 0;
-+c_7321250.tag = closureN_tag;
-+ c_7321250.fn = (function_type)__lambda_920;
-+c_7321250.num_args = 1;
-+c_7321250.num_elements = 3;
-+c_7321250.elements = (object *)e_7321261;
-+c_7321250.elements[0] = ((closureN)self_7312622)->elements[1];
-+c_7321250.elements[1] = ((closureN)self_7312622)->elements[2];
-+c_7321250.elements[2] = ((closureN)self_7312622)->elements[5];
-+
-+return_direct_with_clo1(data,(closure)&c_7321220,__lambda_916,  &c_7321250);
-+} else { 
-+    
-+if( (boolean_f != Cyc_is_pair(((closureN)self_7312622)->elements[5])) ){ 
-   
+-  
 -closureN_type c_7322511;
 -object e_7322592 [6];
 -c_7322511.hdr.mark = gc_color_red;
@@ -30946,98 +31166,88 @@ Make let-values be the same as let*-values, to work around
 -c_7322580.elements[0] = ((closureN)self_7313868)->elements[1];
 -c_7322580.elements[1] = ((closureN)self_7313868)->elements[2];
 -c_7322580.elements[2] = ((closureN)self_7313868)->elements[3];
++closureN_type c_7321221;
++object e_7321229 [2];
++c_7321221.hdr.mark = gc_color_red;
++ c_7321221.hdr.grayed = 0;
++c_7321221.tag = closureN_tag;
++ c_7321221.fn = (function_type)__lambda_919;
++c_7321221.num_args = 1;
++c_7321221.num_elements = 2;
++c_7321221.elements = (object *)e_7321229;
++c_7321221.elements[0] = ((closureN)self_7312619)->elements[0];
++c_7321221.elements[1] = ((closureN)self_7312619)->elements[1];
  
 -return_direct_with_clo2(data,  __glo_vector_91_125list_scheme_base, (((closure)  __glo_vector_91_125list_scheme_base)->fn),  &c_7322580, ((closureN)self_7313868)->elements[5]);
-+
-+closureN_type c_7321269;
-+object e_7321278 [3];
-+c_7321269.hdr.mark = gc_color_red;
-+ c_7321269.hdr.grayed = 0;
-+c_7321269.tag = closureN_tag;
-+ c_7321269.fn = (function_type)__lambda_921;
-+c_7321269.num_args = 1;
-+c_7321269.num_elements = 3;
-+c_7321269.elements = (object *)e_7321278;
-+c_7321269.elements[0] = ((closureN)self_7312622)->elements[2];
-+c_7321269.elements[1] = ((closureN)self_7312622)->elements[3];
-+c_7321269.elements[2] = ((closureN)self_7312622)->elements[5];
-+
-+
-+
-+return_closcall3(data,  car(((closureN)self_7312622)->elements[3]),  &c_7321269, Cyc_cdr(data, ((closureN)self_7312622)->elements[5]), ((closureN)self_7312622)->elements[1]);
-+} else { 
-+    
-+if( (boolean_f != Cyc_is_vector_not_record_type(((closureN)self_7312622)->elements[5])) ){ 
-+  
-+closureN_type c_7321287;
-+object e_7321294 [3];
-+c_7321287.hdr.mark = gc_color_red;
-+ c_7321287.hdr.grayed = 0;
-+c_7321287.tag = closureN_tag;
-+ c_7321287.fn = (function_type)__lambda_922;
-+c_7321287.num_args = 1;
-+c_7321287.num_elements = 3;
-+c_7321287.elements = (object *)e_7321294;
-+c_7321287.elements[0] = ((closureN)self_7312622)->elements[1];
-+c_7321287.elements[1] = ((closureN)self_7312622)->elements[2];
-+c_7321287.elements[2] = ((closureN)self_7312622)->elements[3];
-+
-+return_direct_with_clo2(data,  __glo_vector_91_125list_scheme_base, (((closure)  __glo_vector_91_125list_scheme_base)->fn),  &c_7321287, ((closureN)self_7312622)->elements[5]);
++return_direct_with_clo1(data,(closure)&c_7321221,__lambda_919,  tmp_731399_731401_733280);
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7313868)->elements[2], (((closure)  ((closureN)self_7313868)->elements[2])->fn),  ((closureN)self_7313868)->elements[1]);}
-+  return_direct_with_clo1(data,  ((closureN)self_7312622)->elements[2], (((closure)  ((closureN)self_7312622)->elements[2])->fn),  ((closureN)self_7312622)->elements[1]);}
- ;}
- ;}
+-;}
+-;}
++  return_direct_with_clo1(data,  ((closureN)self_7312619)->elements[1], (((closure)  ((closureN)self_7312619)->elements[1])->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_922(void *data, object self_7313875, int argc, object *args) /* object self_7313875, object r_736422 */
-+static void __lambda_922(void *data, object self_7312629, int argc, object *args) /* object self_7312629, object r_735977 */
++static void __lambda_919(void *data, object self_7312620, int argc, object *args) /* object self_7312620, object cell_731402_733281 */
   {
 - object r_736422 = args[0];
-+ object r_735977 = args[0];
++ object cell_731402_733281 = args[0];
    
  
 -return_closcall3(data,  car(((closureN)self_7313875)->elements[2]),  ((closureN)self_7313875)->elements[1], r_736422, ((closureN)self_7313875)->elements[0]);; 
-+return_closcall3(data,  car(((closureN)self_7312629)->elements[2]),  ((closureN)self_7312629)->elements[1], r_735977, ((closureN)self_7312629)->elements[0]);; 
++
++
++return_direct_with_clo1(data,  ((closureN)self_7312620)->elements[1], (((closure)  ((closureN)self_7312620)->elements[1])->fn),  Cyc_num_fast_gte_op(data, Cyc_cdr(data, cell_731402_733281), ((closureN)self_7312620)->elements[0]));; 
  }
  
 -static void __lambda_921(void *data, object self_7313874, int argc, object *args) /* object self_7313874, object r_736419 */
-+static void __lambda_921(void *data, object self_7312628, int argc, object *args) /* object self_7312628, object r_735974 */
++static void __lambda_912(void *data, object self_7312623, int argc, object *args) /* object self_7312623, object r_735957 */
   {
 - object r_736419 = args[0];
-+ object r_735974 = args[0];
++ object r_735957 = args[0];
    
++closureN_type c_7321196;
++object e_7321204 [4];
++c_7321196.hdr.mark = gc_color_red;
++ c_7321196.hdr.grayed = 0;
++c_7321196.tag = closureN_tag;
++ c_7321196.fn = (function_type)__lambda_913;
++c_7321196.num_args = 1;
++c_7321196.num_elements = 4;
++c_7321196.elements = (object *)e_7321204;
++c_7321196.elements[0] = ((closureN)self_7312623)->elements[0];
++c_7321196.elements[1] = ((closureN)self_7312623)->elements[1];
++c_7321196.elements[2] = ((closureN)self_7312623)->elements[2];
++c_7321196.elements[3] = ((closureN)self_7312623)->elements[3];
  
  
  
 -return_closcall3(data,  car(((closureN)self_7313874)->elements[1]),  ((closureN)self_7313874)->elements[0], Cyc_car(data, ((closureN)self_7313874)->elements[2]), r_736419);; 
-+return_closcall3(data,  car(((closureN)self_7312628)->elements[1]),  ((closureN)self_7312628)->elements[0], Cyc_car(data, ((closureN)self_7312628)->elements[2]), r_735974);; 
++return_direct_with_clo1(data,(closure)&c_7321196,__lambda_913,  Cyc_set_cell(data, ((closureN)self_7312623)->elements[2], r_735957));; 
  }
  
 -static void __lambda_920(void *data, object self_7313869, int argc, object *args) /* object self_7313869, object r_736412 */
-+static void __lambda_920(void *data, object self_7312623, int argc, object *args) /* object self_7312623, object r_735967 */
++static void __lambda_913(void *data, object self_7312624, int argc, object *args) /* object self_7312624, object r_735956 */
   {
 - object r_736412 = args[0];
 -  if( (boolean_f != r_736412) ){ 
-+ object r_735967 = args[0];
-+  if( (boolean_f != r_735967) ){ 
++
    
 -pair_type local_7322548; 
 -return_direct_with_clo1(data,  ((closureN)self_7313869)->elements[1], (((closure)  ((closureN)self_7313869)->elements[1])->fn),  set_pair_as_expr(&local_7322548, ((closureN)self_7313869)->elements[2], ((closureN)self_7313869)->elements[0]));
-+pair_type local_7321255; 
-+return_direct_with_clo1(data,  ((closureN)self_7312623)->elements[1], (((closure)  ((closureN)self_7312623)->elements[1])->fn),  set_pair_as_expr(&local_7321255, ((closureN)self_7312623)->elements[2], ((closureN)self_7312623)->elements[0]));
- } else { 
+-} else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7313869)->elements[1], (((closure)  ((closureN)self_7313869)->elements[1])->fn),  ((closureN)self_7313869)->elements[0]);}
-+  return_direct_with_clo1(data,  ((closureN)self_7312623)->elements[1], (((closure)  ((closureN)self_7312623)->elements[1])->fn),  ((closureN)self_7312623)->elements[0]);}
- ;; 
+-;; 
++
++return_closcall3(data,  car(((closureN)self_7312624)->elements[2]),  ((closureN)self_7312624)->elements[1], ((closureN)self_7312624)->elements[3], ((closureN)self_7312624)->elements[0]);; 
  }
  
 -static void __lambda_916(void *data, object self_7313870, int argc, object *args) /* object self_7313870, object k_736413 */
-+static void __lambda_916(void *data, object self_7312624, int argc, object *args) /* object self_7312624, object k_735968 */
++static void __lambda_858(void *data, object self_7312625, int argc, object *args) /* object self_7312625, object r_735953 */
   {
 - object k_736413 = args[0];
-+ object k_735968 = args[0];
++ object r_735953 = args[0];
    
 -closureN_type c_7322515;
 -object e_7322537 [4];
@@ -31052,36 +31262,55 @@ Make let-values be the same as let*-values, to work around
 -c_7322515.elements[1] = k_736413;
 -c_7322515.elements[2] = ((closureN)self_7313870)->elements[2];
 -c_7322515.elements[3] = ((closureN)self_7313870)->elements[3];
-+closureN_type c_7321222;
-+object e_7321244 [4];
-+c_7321222.hdr.mark = gc_color_red;
-+ c_7321222.hdr.grayed = 0;
-+c_7321222.tag = closureN_tag;
-+ c_7321222.fn = (function_type)__lambda_917;
-+c_7321222.num_args = 1;
-+c_7321222.num_elements = 4;
-+c_7321222.elements = (object *)e_7321244;
-+c_7321222.elements[0] = ((closureN)self_7312624)->elements[0];
-+c_7321222.elements[1] = k_735968;
-+c_7321222.elements[2] = ((closureN)self_7312624)->elements[2];
-+c_7321222.elements[3] = ((closureN)self_7312624)->elements[3];
++closureN_type c_7320706;
++object e_7321181 [25];
++c_7320706.hdr.mark = gc_color_red;
++ c_7320706.hdr.grayed = 0;
++c_7320706.tag = closureN_tag;
++ c_7320706.fn = (function_type)__lambda_859;
++c_7320706.num_args = 1;
++c_7320706.num_elements = 25;
++c_7320706.elements = (object *)e_7321181;
++c_7320706.elements[0] = ((closureN)self_7312625)->elements[0];
++c_7320706.elements[1] = ((closureN)self_7312625)->elements[1];
++c_7320706.elements[2] = ((closureN)self_7312625)->elements[2];
++c_7320706.elements[3] = ((closureN)self_7312625)->elements[3];
++c_7320706.elements[4] = ((closureN)self_7312625)->elements[4];
++c_7320706.elements[5] = ((closureN)self_7312625)->elements[5];
++c_7320706.elements[6] = ((closureN)self_7312625)->elements[6];
++c_7320706.elements[7] = ((closureN)self_7312625)->elements[7];
++c_7320706.elements[8] = ((closureN)self_7312625)->elements[8];
++c_7320706.elements[9] = ((closureN)self_7312625)->elements[9];
++c_7320706.elements[10] = ((closureN)self_7312625)->elements[10];
++c_7320706.elements[11] = ((closureN)self_7312625)->elements[11];
++c_7320706.elements[12] = ((closureN)self_7312625)->elements[12];
++c_7320706.elements[13] = ((closureN)self_7312625)->elements[13];
++c_7320706.elements[14] = ((closureN)self_7312625)->elements[14];
++c_7320706.elements[15] = ((closureN)self_7312625)->elements[15];
++c_7320706.elements[16] = ((closureN)self_7312625)->elements[16];
++c_7320706.elements[17] = ((closureN)self_7312625)->elements[17];
++c_7320706.elements[18] = ((closureN)self_7312625)->elements[18];
++c_7320706.elements[19] = ((closureN)self_7312625)->elements[19];
++c_7320706.elements[20] = ((closureN)self_7312625)->elements[20];
++c_7320706.elements[21] = ((closureN)self_7312625)->elements[21];
++c_7320706.elements[22] = ((closureN)self_7312625)->elements[22];
++c_7320706.elements[23] = ((closureN)self_7312625)->elements[23];
++c_7320706.elements[24] = ((closureN)self_7312625)->elements[24];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7322515,__lambda_917,  memqp(data, ((closureN)self_7313870)->elements[3], ((closureN)self_7313870)->elements[1]));; 
-+return_direct_with_clo1(data,(closure)&c_7321222,__lambda_917,  memqp(data, ((closureN)self_7312624)->elements[3], ((closureN)self_7312624)->elements[1]));; 
++return_direct_with_clo1(data,(closure)&c_7320706,__lambda_859,  Cyc_set_cell(data, ((closureN)self_7312625)->elements[23], r_735953));; 
  }
  
 -static void __lambda_917(void *data, object self_7313871, int argc, object *args) /* object self_7313871, object r_736414 */
-+static void __lambda_917(void *data, object self_7312625, int argc, object *args) /* object self_7312625, object r_735969 */
++static void __lambda_859(void *data, object self_7312626, int argc, object *args) /* object self_7312626, object r_735871 */
   {
 - object r_736414 = args[0];
 -  if( (boolean_f != r_736414) ){ 
 -  return_direct_with_clo1(data,  ((closureN)self_7313871)->elements[1], (((closure)  ((closureN)self_7313871)->elements[1])->fn),  boolean_f);
-+ object r_735969 = args[0];
-+  if( (boolean_f != r_735969) ){ 
-+  return_direct_with_clo1(data,  ((closureN)self_7312625)->elements[1], (((closure)  ((closureN)self_7312625)->elements[1])->fn),  boolean_f);
- } else { 
+-} else { 
++
    
 -closureN_type c_7322519;
 -object e_7322532 [2];
@@ -31094,32 +31323,98 @@ Make let-values be the same as let*-values, to work around
 -c_7322519.elements = (object *)e_7322532;
 -c_7322519.elements[0] = ((closureN)self_7313871)->elements[0];
 -c_7322519.elements[1] = ((closureN)self_7313871)->elements[1];
-+closureN_type c_7321226;
-+object e_7321239 [2];
-+c_7321226.hdr.mark = gc_color_red;
-+ c_7321226.hdr.grayed = 0;
-+c_7321226.tag = closureN_tag;
-+ c_7321226.fn = (function_type)__lambda_918;
-+c_7321226.num_args = 1;
-+c_7321226.num_elements = 2;
-+c_7321226.elements = (object *)e_7321239;
-+c_7321226.elements[0] = ((closureN)self_7312625)->elements[0];
-+c_7321226.elements[1] = ((closureN)self_7312625)->elements[1];
- 
- 
++closureN_type c_7320708;
++object e_7320778 [13];
++c_7320708.hdr.mark = gc_color_red;
++ c_7320708.hdr.grayed = 0;
++c_7320708.tag = closureN_tag;
++ c_7320708.fn = (function_type)__lambda_860;
++c_7320708.num_args = 1;
++c_7320708.num_elements = 13;
++c_7320708.elements = (object *)e_7320778;
++c_7320708.elements[0] = ((closureN)self_7312626)->elements[2];
++c_7320708.elements[1] = ((closureN)self_7312626)->elements[3];
++c_7320708.elements[2] = ((closureN)self_7312626)->elements[4];
++c_7320708.elements[3] = ((closureN)self_7312626)->elements[6];
++c_7320708.elements[4] = ((closureN)self_7312626)->elements[7];
++c_7320708.elements[5] = ((closureN)self_7312626)->elements[8];
++c_7320708.elements[6] = ((closureN)self_7312626)->elements[9];
++c_7320708.elements[7] = ((closureN)self_7312626)->elements[12];
++c_7320708.elements[8] = ((closureN)self_7312626)->elements[14];
++c_7320708.elements[9] = ((closureN)self_7312626)->elements[19];
++c_7320708.elements[10] = ((closureN)self_7312626)->elements[20];
++c_7320708.elements[11] = ((closureN)self_7312626)->elements[22];
++c_7320708.elements[12] = ((closureN)self_7312626)->elements[24];
+ 
+ 
++closureN_type c_7320779;
++object e_7321180 [14];
++c_7320779.hdr.mark = gc_color_red;
++ c_7320779.hdr.grayed = 0;
++c_7320779.tag = closureN_tag;
++ c_7320779.fn = (function_type)__lambda_867;
++c_7320779.num_args = 2;
++c_7320779.num_elements = 14;
++c_7320779.elements = (object *)e_7321180;
++c_7320779.elements[0] = ((closureN)self_7312626)->elements[0];
++c_7320779.elements[1] = ((closureN)self_7312626)->elements[1];
++c_7320779.elements[2] = ((closureN)self_7312626)->elements[5];
++c_7320779.elements[3] = ((closureN)self_7312626)->elements[9];
++c_7320779.elements[4] = ((closureN)self_7312626)->elements[10];
++c_7320779.elements[5] = ((closureN)self_7312626)->elements[11];
++c_7320779.elements[6] = ((closureN)self_7312626)->elements[13];
++c_7320779.elements[7] = ((closureN)self_7312626)->elements[14];
++c_7320779.elements[8] = ((closureN)self_7312626)->elements[15];
++c_7320779.elements[9] = ((closureN)self_7312626)->elements[16];
++c_7320779.elements[10] = ((closureN)self_7312626)->elements[17];
++c_7320779.elements[11] = ((closureN)self_7312626)->elements[18];
++c_7320779.elements[12] = ((closureN)self_7312626)->elements[21];
++c_7320779.elements[13] = ((closureN)self_7312626)->elements[23];
++
++return_direct_with_clo1(data,(closure)&c_7320708,__lambda_860,  &c_7320779);; 
++}
++
++static void __lambda_867(void *data, object self_7312627, int argc, object *args) /* object self_7312627, object k_735887, object tmpl_731411_733282, object vars_731412_733283 */
++ {
++ object k_735887 = args[0]; object tmpl_731411_733282 = args[1]; object vars_731412_733283 = args[2];
++  
++closureN_type c_7320781;
++object e_7321179 [16];
++c_7320781.hdr.mark = gc_color_red;
++ c_7320781.hdr.grayed = 0;
++c_7320781.tag = closureN_tag;
++ c_7320781.fn = (function_type)__lambda_868;
++c_7320781.num_args = 1;
++c_7320781.num_elements = 16;
++c_7320781.elements = (object *)e_7321179;
++c_7320781.elements[0] = ((closureN)self_7312627)->elements[0];
++c_7320781.elements[1] = ((closureN)self_7312627)->elements[1];
++c_7320781.elements[2] = ((closureN)self_7312627)->elements[2];
++c_7320781.elements[3] = ((closureN)self_7312627)->elements[3];
++c_7320781.elements[4] = ((closureN)self_7312627)->elements[4];
++c_7320781.elements[5] = ((closureN)self_7312627)->elements[5];
++c_7320781.elements[6] = ((closureN)self_7312627)->elements[6];
++c_7320781.elements[7] = ((closureN)self_7312627)->elements[7];
++c_7320781.elements[8] = ((closureN)self_7312627)->elements[8];
++c_7320781.elements[9] = ((closureN)self_7312627)->elements[9];
++c_7320781.elements[10] = ((closureN)self_7312627)->elements[10];
++c_7320781.elements[11] = ((closureN)self_7312627)->elements[11];
++c_7320781.elements[12] = ((closureN)self_7312627)->elements[12];
++c_7320781.elements[13] = ((closureN)self_7312627)->elements[13];
++c_7320781.elements[14] = k_735887;
++c_7320781.elements[15] = vars_731412_733283;
  
 -return_direct_with_clo1(data,(closure)&c_7322519,__lambda_918,  assq(data, ((closureN)self_7313871)->elements[3], ((closureN)self_7313871)->elements[2]));}
-+return_direct_with_clo1(data,(closure)&c_7321226,__lambda_918,  assq(data, ((closureN)self_7312625)->elements[3], ((closureN)self_7312625)->elements[2]));}
- ;; 
+-;; 
++return_direct_with_clo1(data,(closure)&c_7320781,__lambda_868,  tmpl_731411_733282);; 
  }
  
 -static void __lambda_918(void *data, object self_7313872, int argc, object *args) /* object self_7313872, object tmp_731399_731401_733627 */
-+static void __lambda_918(void *data, object self_7312626, int argc, object *args) /* object self_7312626, object tmp_731400_731402_733287 */
++static void __lambda_868(void *data, object self_7312628, int argc, object *args) /* object self_7312628, object t_731414_733284 */
   {
 - object tmp_731399_731401_733627 = args[0];
 -  if( (boolean_f != tmp_731399_731401_733627) ){ 
-+ object tmp_731400_731402_733287 = args[0];
-+  if( (boolean_f != tmp_731400_731402_733287) ){ 
++ object t_731414_733284 = args[0];
    
 -closureN_type c_7322521;
 -object e_7322529 [2];
@@ -31132,44 +31427,85 @@ Make let-values be the same as let*-values, to work around
 -c_7322521.elements = (object *)e_7322529;
 -c_7322521.elements[0] = ((closureN)self_7313872)->elements[0];
 -c_7322521.elements[1] = ((closureN)self_7313872)->elements[1];
-+closureN_type c_7321228;
-+object e_7321236 [2];
-+c_7321228.hdr.mark = gc_color_red;
-+ c_7321228.hdr.grayed = 0;
-+c_7321228.tag = closureN_tag;
-+ c_7321228.fn = (function_type)__lambda_919;
-+c_7321228.num_args = 1;
-+c_7321228.num_elements = 2;
-+c_7321228.elements = (object *)e_7321236;
-+c_7321228.elements[0] = ((closureN)self_7312626)->elements[0];
-+c_7321228.elements[1] = ((closureN)self_7312626)->elements[1];
++closureN_type c_7320783;
++object e_7321178 [17];
++c_7320783.hdr.mark = gc_color_red;
++ c_7320783.hdr.grayed = 0;
++c_7320783.tag = closureN_tag;
++ c_7320783.fn = (function_type)__lambda_869;
++c_7320783.num_args = 1;
++c_7320783.num_elements = 17;
++c_7320783.elements = (object *)e_7321178;
++c_7320783.elements[0] = ((closureN)self_7312628)->elements[0];
++c_7320783.elements[1] = ((closureN)self_7312628)->elements[1];
++c_7320783.elements[2] = ((closureN)self_7312628)->elements[2];
++c_7320783.elements[3] = ((closureN)self_7312628)->elements[3];
++c_7320783.elements[4] = ((closureN)self_7312628)->elements[4];
++c_7320783.elements[5] = ((closureN)self_7312628)->elements[5];
++c_7320783.elements[6] = ((closureN)self_7312628)->elements[6];
++c_7320783.elements[7] = ((closureN)self_7312628)->elements[7];
++c_7320783.elements[8] = ((closureN)self_7312628)->elements[8];
++c_7320783.elements[9] = ((closureN)self_7312628)->elements[9];
++c_7320783.elements[10] = ((closureN)self_7312628)->elements[10];
++c_7320783.elements[11] = ((closureN)self_7312628)->elements[11];
++c_7320783.elements[12] = ((closureN)self_7312628)->elements[12];
++c_7320783.elements[13] = ((closureN)self_7312628)->elements[13];
++c_7320783.elements[14] = ((closureN)self_7312628)->elements[14];
++c_7320783.elements[15] = t_731414_733284;
++c_7320783.elements[16] = ((closureN)self_7312628)->elements[15];
  
 -return_direct_with_clo1(data,(closure)&c_7322521,__lambda_919,  tmp_731399_731401_733627);
-+return_direct_with_clo1(data,(closure)&c_7321228,__lambda_919,  tmp_731400_731402_733287);
- } else { 
+-} else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7313872)->elements[1], (((closure)  ((closureN)self_7313872)->elements[1])->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  ((closureN)self_7312626)->elements[1], (((closure)  ((closureN)self_7312626)->elements[1])->fn),  boolean_f);}
- ;; 
+-;; 
++return_direct_with_clo1(data,(closure)&c_7320783,__lambda_869,  boolean_f);; 
  }
  
 -static void __lambda_919(void *data, object self_7313873, int argc, object *args) /* object self_7313873, object cell_731402_733628 */
-+static void __lambda_919(void *data, object self_7312627, int argc, object *args) /* object self_7312627, object cell_731403_733288 */
++static void __lambda_869(void *data, object self_7312629, int argc, object *args) /* object self_7312629, object lp_731416_733286 */
   {
 - object cell_731402_733628 = args[0];
-+ object cell_731403_733288 = args[0];
-   
- 
++ object lp_731416_733286 = args[0];
+   
++closureN_type c_7320785;
++object e_7321174 [17];
++c_7320785.hdr.mark = gc_color_red;
++ c_7320785.hdr.grayed = 0;
++c_7320785.tag = closureN_tag;
++ c_7320785.fn = (function_type)__lambda_1364;
++c_7320785.num_args = 1;
++c_7320785.num_elements = 17;
++c_7320785.elements = (object *)e_7321174;
++c_7320785.elements[0] = ((closureN)self_7312629)->elements[0];
++c_7320785.elements[1] = ((closureN)self_7312629)->elements[1];
++c_7320785.elements[2] = ((closureN)self_7312629)->elements[2];
++c_7320785.elements[3] = ((closureN)self_7312629)->elements[3];
++c_7320785.elements[4] = ((closureN)self_7312629)->elements[4];
++c_7320785.elements[5] = ((closureN)self_7312629)->elements[5];
++c_7320785.elements[6] = ((closureN)self_7312629)->elements[6];
++c_7320785.elements[7] = ((closureN)self_7312629)->elements[7];
++c_7320785.elements[8] = ((closureN)self_7312629)->elements[8];
++c_7320785.elements[9] = ((closureN)self_7312629)->elements[9];
++c_7320785.elements[10] = ((closureN)self_7312629)->elements[10];
++c_7320785.elements[11] = ((closureN)self_7312629)->elements[11];
++c_7320785.elements[12] = ((closureN)self_7312629)->elements[12];
++c_7320785.elements[13] = ((closureN)self_7312629)->elements[13];
++c_7320785.elements[14] = ((closureN)self_7312629)->elements[14];
++c_7320785.elements[15] = ((closureN)self_7312629)->elements[15];
++c_7320785.elements[16] = ((closureN)self_7312629)->elements[16];
  
  
+-
 -return_direct_with_clo1(data,  ((closureN)self_7313873)->elements[1], (((closure)  ((closureN)self_7313873)->elements[1])->fn),  Cyc_num_fast_gte_op(data, Cyc_cdr(data, cell_731402_733628), ((closureN)self_7313873)->elements[0]));; 
-+return_direct_with_clo1(data,  ((closureN)self_7312627)->elements[1], (((closure)  ((closureN)self_7312627)->elements[1])->fn),  Cyc_num_fast_gte_op(data, Cyc_cdr(data, cell_731403_733288), ((closureN)self_7312627)->elements[0]));; 
++pair_type local_7321177; 
++return_direct_with_clo1(data,(closure)&c_7320785,__lambda_1364,  set_cell_as_expr(&local_7321177, lp_731416_733286));; 
  }
  
 -static void __lambda_912(void *data, object self_7313876, int argc, object *args) /* object self_7313876, object r_736409 */
-+static void __lambda_912(void *data, object self_7312630, int argc, object *args) /* object self_7312630, object r_735964 */
++static void __lambda_1364(void *data, object self_7312630, int argc, object *args) /* object self_7312630, object lp_731416_733286 */
   {
 - object r_736409 = args[0];
-+ object r_735964 = args[0];
++ object lp_731416_733286 = args[0];
    
 -closureN_type c_7322496;
 -object e_7322504 [4];
@@ -31184,42 +31520,24 @@ Make let-values be the same as let*-values, to work around
 -c_7322496.elements[1] = ((closureN)self_7313876)->elements[1];
 -c_7322496.elements[2] = ((closureN)self_7313876)->elements[2];
 -c_7322496.elements[3] = ((closureN)self_7313876)->elements[3];
-+closureN_type c_7321203;
-+object e_7321211 [4];
-+c_7321203.hdr.mark = gc_color_red;
-+ c_7321203.hdr.grayed = 0;
-+c_7321203.tag = closureN_tag;
-+ c_7321203.fn = (function_type)__lambda_913;
-+c_7321203.num_args = 1;
-+c_7321203.num_elements = 4;
-+c_7321203.elements = (object *)e_7321211;
-+c_7321203.elements[0] = ((closureN)self_7312630)->elements[0];
-+c_7321203.elements[1] = ((closureN)self_7312630)->elements[1];
-+c_7321203.elements[2] = ((closureN)self_7312630)->elements[2];
-+c_7321203.elements[3] = ((closureN)self_7312630)->elements[3];
- 
- 
- 
+-
+-
+-
 -return_direct_with_clo1(data,(closure)&c_7322496,__lambda_913,  Cyc_set_cell(data, ((closureN)self_7313876)->elements[2], r_736409));; 
-+return_direct_with_clo1(data,(closure)&c_7321203,__lambda_913,  Cyc_set_cell(data, ((closureN)self_7312630)->elements[2], r_735964));; 
- }
- 
+-}
+-
 -static void __lambda_913(void *data, object self_7313877, int argc, object *args) /* object self_7313877, object r_736408 */
-+static void __lambda_913(void *data, object self_7312631, int argc, object *args) /* object self_7312631, object r_735963 */
-  {
- 
-   
- 
+- {
+-
+-  
+-
 -return_closcall3(data,  car(((closureN)self_7313877)->elements[2]),  ((closureN)self_7313877)->elements[1], ((closureN)self_7313877)->elements[3], ((closureN)self_7313877)->elements[0]);; 
-+return_closcall3(data,  car(((closureN)self_7312631)->elements[2]),  ((closureN)self_7312631)->elements[1], ((closureN)self_7312631)->elements[3], ((closureN)self_7312631)->elements[0]);; 
- }
- 
+-}
+-
 -static void __lambda_858(void *data, object self_7313878, int argc, object *args) /* object self_7313878, object r_736405 */
-+static void __lambda_858(void *data, object self_7312632, int argc, object *args) /* object self_7312632, object r_735960 */
-  {
+- {
 - object r_736405 = args[0];
-+ object r_735960 = args[0];
-   
+-  
 -closureN_type c_7322006;
 -object e_7322481 [25];
 -c_7322006.hdr.mark = gc_color_red;
@@ -31254,52 +31572,16 @@ Make let-values be the same as let*-values, to work around
 -c_7322006.elements[22] = ((closureN)self_7313878)->elements[22];
 -c_7322006.elements[23] = ((closureN)self_7313878)->elements[23];
 -c_7322006.elements[24] = ((closureN)self_7313878)->elements[24];
-+closureN_type c_7320713;
-+object e_7321188 [25];
-+c_7320713.hdr.mark = gc_color_red;
-+ c_7320713.hdr.grayed = 0;
-+c_7320713.tag = closureN_tag;
-+ c_7320713.fn = (function_type)__lambda_859;
-+c_7320713.num_args = 1;
-+c_7320713.num_elements = 25;
-+c_7320713.elements = (object *)e_7321188;
-+c_7320713.elements[0] = ((closureN)self_7312632)->elements[0];
-+c_7320713.elements[1] = ((closureN)self_7312632)->elements[1];
-+c_7320713.elements[2] = ((closureN)self_7312632)->elements[2];
-+c_7320713.elements[3] = ((closureN)self_7312632)->elements[3];
-+c_7320713.elements[4] = ((closureN)self_7312632)->elements[4];
-+c_7320713.elements[5] = ((closureN)self_7312632)->elements[5];
-+c_7320713.elements[6] = ((closureN)self_7312632)->elements[6];
-+c_7320713.elements[7] = ((closureN)self_7312632)->elements[7];
-+c_7320713.elements[8] = ((closureN)self_7312632)->elements[8];
-+c_7320713.elements[9] = ((closureN)self_7312632)->elements[9];
-+c_7320713.elements[10] = ((closureN)self_7312632)->elements[10];
-+c_7320713.elements[11] = ((closureN)self_7312632)->elements[11];
-+c_7320713.elements[12] = ((closureN)self_7312632)->elements[12];
-+c_7320713.elements[13] = ((closureN)self_7312632)->elements[13];
-+c_7320713.elements[14] = ((closureN)self_7312632)->elements[14];
-+c_7320713.elements[15] = ((closureN)self_7312632)->elements[15];
-+c_7320713.elements[16] = ((closureN)self_7312632)->elements[16];
-+c_7320713.elements[17] = ((closureN)self_7312632)->elements[17];
-+c_7320713.elements[18] = ((closureN)self_7312632)->elements[18];
-+c_7320713.elements[19] = ((closureN)self_7312632)->elements[19];
-+c_7320713.elements[20] = ((closureN)self_7312632)->elements[20];
-+c_7320713.elements[21] = ((closureN)self_7312632)->elements[21];
-+c_7320713.elements[22] = ((closureN)self_7312632)->elements[22];
-+c_7320713.elements[23] = ((closureN)self_7312632)->elements[23];
-+c_7320713.elements[24] = ((closureN)self_7312632)->elements[24];
- 
- 
- 
+-
+-
+-
 -return_direct_with_clo1(data,(closure)&c_7322006,__lambda_859,  Cyc_set_cell(data, ((closureN)self_7313878)->elements[23], r_736405));; 
-+return_direct_with_clo1(data,(closure)&c_7320713,__lambda_859,  Cyc_set_cell(data, ((closureN)self_7312632)->elements[23], r_735960));; 
- }
- 
+-}
+-
 -static void __lambda_859(void *data, object self_7313879, int argc, object *args) /* object self_7313879, object r_736323 */
-+static void __lambda_859(void *data, object self_7312633, int argc, object *args) /* object self_7312633, object r_735878 */
-  {
- 
-   
+- {
+-
+-  
 -closureN_type c_7322008;
 -object e_7322078 [13];
 -c_7322008.hdr.mark = gc_color_red;
@@ -31322,30 +31604,8 @@ Make let-values be the same as let*-values, to work around
 -c_7322008.elements[10] = ((closureN)self_7313879)->elements[20];
 -c_7322008.elements[11] = ((closureN)self_7313879)->elements[22];
 -c_7322008.elements[12] = ((closureN)self_7313879)->elements[24];
-+closureN_type c_7320715;
-+object e_7320785 [13];
-+c_7320715.hdr.mark = gc_color_red;
-+ c_7320715.hdr.grayed = 0;
-+c_7320715.tag = closureN_tag;
-+ c_7320715.fn = (function_type)__lambda_860;
-+c_7320715.num_args = 1;
-+c_7320715.num_elements = 13;
-+c_7320715.elements = (object *)e_7320785;
-+c_7320715.elements[0] = ((closureN)self_7312633)->elements[2];
-+c_7320715.elements[1] = ((closureN)self_7312633)->elements[3];
-+c_7320715.elements[2] = ((closureN)self_7312633)->elements[4];
-+c_7320715.elements[3] = ((closureN)self_7312633)->elements[6];
-+c_7320715.elements[4] = ((closureN)self_7312633)->elements[7];
-+c_7320715.elements[5] = ((closureN)self_7312633)->elements[8];
-+c_7320715.elements[6] = ((closureN)self_7312633)->elements[9];
-+c_7320715.elements[7] = ((closureN)self_7312633)->elements[12];
-+c_7320715.elements[8] = ((closureN)self_7312633)->elements[14];
-+c_7320715.elements[9] = ((closureN)self_7312633)->elements[19];
-+c_7320715.elements[10] = ((closureN)self_7312633)->elements[20];
-+c_7320715.elements[11] = ((closureN)self_7312633)->elements[22];
-+c_7320715.elements[12] = ((closureN)self_7312633)->elements[24];
- 
- 
+-
+-
 -closureN_type c_7322079;
 -object e_7322480 [14];
 -c_7322079.hdr.mark = gc_color_red;
@@ -31369,40 +31629,14 @@ Make let-values be the same as let*-values, to work around
 -c_7322079.elements[11] = ((closureN)self_7313879)->elements[18];
 -c_7322079.elements[12] = ((closureN)self_7313879)->elements[21];
 -c_7322079.elements[13] = ((closureN)self_7313879)->elements[23];
-+closureN_type c_7320786;
-+object e_7321187 [14];
-+c_7320786.hdr.mark = gc_color_red;
-+ c_7320786.hdr.grayed = 0;
-+c_7320786.tag = closureN_tag;
-+ c_7320786.fn = (function_type)__lambda_867;
-+c_7320786.num_args = 2;
-+c_7320786.num_elements = 14;
-+c_7320786.elements = (object *)e_7321187;
-+c_7320786.elements[0] = ((closureN)self_7312633)->elements[0];
-+c_7320786.elements[1] = ((closureN)self_7312633)->elements[1];
-+c_7320786.elements[2] = ((closureN)self_7312633)->elements[5];
-+c_7320786.elements[3] = ((closureN)self_7312633)->elements[9];
-+c_7320786.elements[4] = ((closureN)self_7312633)->elements[10];
-+c_7320786.elements[5] = ((closureN)self_7312633)->elements[11];
-+c_7320786.elements[6] = ((closureN)self_7312633)->elements[13];
-+c_7320786.elements[7] = ((closureN)self_7312633)->elements[14];
-+c_7320786.elements[8] = ((closureN)self_7312633)->elements[15];
-+c_7320786.elements[9] = ((closureN)self_7312633)->elements[16];
-+c_7320786.elements[10] = ((closureN)self_7312633)->elements[17];
-+c_7320786.elements[11] = ((closureN)self_7312633)->elements[18];
-+c_7320786.elements[12] = ((closureN)self_7312633)->elements[21];
-+c_7320786.elements[13] = ((closureN)self_7312633)->elements[23];
- 
+-
 -return_direct_with_clo1(data,(closure)&c_7322008,__lambda_860,  &c_7322079);; 
-+return_direct_with_clo1(data,(closure)&c_7320715,__lambda_860,  &c_7320786);; 
- }
- 
+-}
+-
 -static void __lambda_867(void *data, object self_7313880, int argc, object *args) /* object self_7313880, object k_736339, object tmpl_731411_733629, object vars_731412_733630 */
-+static void __lambda_867(void *data, object self_7312634, int argc, object *args) /* object self_7312634, object k_735894, object tmpl_731412_733289, object vars_731413_733290 */
-  {
+- {
 - object k_736339 = args[0]; object tmpl_731411_733629 = args[1]; object vars_731412_733630 = args[2];
-+ object k_735894 = args[0]; object tmpl_731412_733289 = args[1]; object vars_731413_733290 = args[2];
-   
+-  
 -closureN_type c_7322081;
 -object e_7322479 [16];
 -c_7322081.hdr.mark = gc_color_red;
@@ -31428,42 +31662,14 @@ Make let-values be the same as let*-values, to work around
 -c_7322081.elements[13] = ((closureN)self_7313880)->elements[13];
 -c_7322081.elements[14] = k_736339;
 -c_7322081.elements[15] = vars_731412_733630;
-+closureN_type c_7320788;
-+object e_7321186 [16];
-+c_7320788.hdr.mark = gc_color_red;
-+ c_7320788.hdr.grayed = 0;
-+c_7320788.tag = closureN_tag;
-+ c_7320788.fn = (function_type)__lambda_868;
-+c_7320788.num_args = 1;
-+c_7320788.num_elements = 16;
-+c_7320788.elements = (object *)e_7321186;
-+c_7320788.elements[0] = ((closureN)self_7312634)->elements[0];
-+c_7320788.elements[1] = ((closureN)self_7312634)->elements[1];
-+c_7320788.elements[2] = ((closureN)self_7312634)->elements[2];
-+c_7320788.elements[3] = ((closureN)self_7312634)->elements[3];
-+c_7320788.elements[4] = ((closureN)self_7312634)->elements[4];
-+c_7320788.elements[5] = ((closureN)self_7312634)->elements[5];
-+c_7320788.elements[6] = ((closureN)self_7312634)->elements[6];
-+c_7320788.elements[7] = ((closureN)self_7312634)->elements[7];
-+c_7320788.elements[8] = ((closureN)self_7312634)->elements[8];
-+c_7320788.elements[9] = ((closureN)self_7312634)->elements[9];
-+c_7320788.elements[10] = ((closureN)self_7312634)->elements[10];
-+c_7320788.elements[11] = ((closureN)self_7312634)->elements[11];
-+c_7320788.elements[12] = ((closureN)self_7312634)->elements[12];
-+c_7320788.elements[13] = ((closureN)self_7312634)->elements[13];
-+c_7320788.elements[14] = k_735894;
-+c_7320788.elements[15] = vars_731413_733290;
- 
+-
 -return_direct_with_clo1(data,(closure)&c_7322081,__lambda_868,  tmpl_731411_733629);; 
-+return_direct_with_clo1(data,(closure)&c_7320788,__lambda_868,  tmpl_731412_733289);; 
- }
- 
+-}
+-
 -static void __lambda_868(void *data, object self_7313881, int argc, object *args) /* object self_7313881, object t_731414_733631 */
-+static void __lambda_868(void *data, object self_7312635, int argc, object *args) /* object self_7312635, object t_731415_733291 */
-  {
+- {
 - object t_731414_733631 = args[0];
-+ object t_731415_733291 = args[0];
-   
+-  
 -closureN_type c_7322083;
 -object e_7322478 [17];
 -c_7322083.hdr.mark = gc_color_red;
@@ -31490,43 +31696,14 @@ Make let-values be the same as let*-values, to work around
 -c_7322083.elements[14] = ((closureN)self_7313881)->elements[14];
 -c_7322083.elements[15] = t_731414_733631;
 -c_7322083.elements[16] = ((closureN)self_7313881)->elements[15];
-+closureN_type c_7320790;
-+object e_7321185 [17];
-+c_7320790.hdr.mark = gc_color_red;
-+ c_7320790.hdr.grayed = 0;
-+c_7320790.tag = closureN_tag;
-+ c_7320790.fn = (function_type)__lambda_869;
-+c_7320790.num_args = 1;
-+c_7320790.num_elements = 17;
-+c_7320790.elements = (object *)e_7321185;
-+c_7320790.elements[0] = ((closureN)self_7312635)->elements[0];
-+c_7320790.elements[1] = ((closureN)self_7312635)->elements[1];
-+c_7320790.elements[2] = ((closureN)self_7312635)->elements[2];
-+c_7320790.elements[3] = ((closureN)self_7312635)->elements[3];
-+c_7320790.elements[4] = ((closureN)self_7312635)->elements[4];
-+c_7320790.elements[5] = ((closureN)self_7312635)->elements[5];
-+c_7320790.elements[6] = ((closureN)self_7312635)->elements[6];
-+c_7320790.elements[7] = ((closureN)self_7312635)->elements[7];
-+c_7320790.elements[8] = ((closureN)self_7312635)->elements[8];
-+c_7320790.elements[9] = ((closureN)self_7312635)->elements[9];
-+c_7320790.elements[10] = ((closureN)self_7312635)->elements[10];
-+c_7320790.elements[11] = ((closureN)self_7312635)->elements[11];
-+c_7320790.elements[12] = ((closureN)self_7312635)->elements[12];
-+c_7320790.elements[13] = ((closureN)self_7312635)->elements[13];
-+c_7320790.elements[14] = ((closureN)self_7312635)->elements[14];
-+c_7320790.elements[15] = t_731415_733291;
-+c_7320790.elements[16] = ((closureN)self_7312635)->elements[15];
- 
+-
 -return_direct_with_clo1(data,(closure)&c_7322083,__lambda_869,  boolean_f);; 
-+return_direct_with_clo1(data,(closure)&c_7320790,__lambda_869,  boolean_f);; 
- }
- 
+-}
+-
 -static void __lambda_869(void *data, object self_7313882, int argc, object *args) /* object self_7313882, object lp_731416_733633 */
-+static void __lambda_869(void *data, object self_7312636, int argc, object *args) /* object self_7312636, object lp_731417_733293 */
-  {
+- {
 - object lp_731416_733633 = args[0];
-+ object lp_731417_733293 = args[0];
-   
+-  
 -closureN_type c_7322085;
 -object e_7322474 [17];
 -c_7322085.hdr.mark = gc_color_red;
@@ -31553,46 +31730,16 @@ Make let-values be the same as let*-values, to work around
 -c_7322085.elements[14] = ((closureN)self_7313882)->elements[14];
 -c_7322085.elements[15] = ((closureN)self_7313882)->elements[15];
 -c_7322085.elements[16] = ((closureN)self_7313882)->elements[16];
-+closureN_type c_7320792;
-+object e_7321181 [17];
-+c_7320792.hdr.mark = gc_color_red;
-+ c_7320792.hdr.grayed = 0;
-+c_7320792.tag = closureN_tag;
-+ c_7320792.fn = (function_type)__lambda_1364;
-+c_7320792.num_args = 1;
-+c_7320792.num_elements = 17;
-+c_7320792.elements = (object *)e_7321181;
-+c_7320792.elements[0] = ((closureN)self_7312636)->elements[0];
-+c_7320792.elements[1] = ((closureN)self_7312636)->elements[1];
-+c_7320792.elements[2] = ((closureN)self_7312636)->elements[2];
-+c_7320792.elements[3] = ((closureN)self_7312636)->elements[3];
-+c_7320792.elements[4] = ((closureN)self_7312636)->elements[4];
-+c_7320792.elements[5] = ((closureN)self_7312636)->elements[5];
-+c_7320792.elements[6] = ((closureN)self_7312636)->elements[6];
-+c_7320792.elements[7] = ((closureN)self_7312636)->elements[7];
-+c_7320792.elements[8] = ((closureN)self_7312636)->elements[8];
-+c_7320792.elements[9] = ((closureN)self_7312636)->elements[9];
-+c_7320792.elements[10] = ((closureN)self_7312636)->elements[10];
-+c_7320792.elements[11] = ((closureN)self_7312636)->elements[11];
-+c_7320792.elements[12] = ((closureN)self_7312636)->elements[12];
-+c_7320792.elements[13] = ((closureN)self_7312636)->elements[13];
-+c_7320792.elements[14] = ((closureN)self_7312636)->elements[14];
-+c_7320792.elements[15] = ((closureN)self_7312636)->elements[15];
-+c_7320792.elements[16] = ((closureN)self_7312636)->elements[16];
- 
- 
+-
+-
 -pair_type local_7322477; 
 -return_direct_with_clo1(data,(closure)&c_7322085,__lambda_1411,  set_cell_as_expr(&local_7322477, lp_731416_733633));; 
-+pair_type local_7321184; 
-+return_direct_with_clo1(data,(closure)&c_7320792,__lambda_1364,  set_cell_as_expr(&local_7321184, lp_731417_733293));; 
- }
- 
+-}
+-
 -static void __lambda_1411(void *data, object self_7313883, int argc, object *args) /* object self_7313883, object lp_731416_733633 */
-+static void __lambda_1364(void *data, object self_7312637, int argc, object *args) /* object self_7312637, object lp_731417_733293 */
-  {
+- {
 - object lp_731416_733633 = args[0];
-+ object lp_731417_733293 = args[0];
-   
+-  
 -closureN_type c_7322087;
 -object e_7322100 [3];
 -c_7322087.hdr.mark = gc_color_red;
@@ -31758,183 +31905,183 @@ Make let-values be the same as let*-values, to work around
 -c_7322444.elements[3] = ((closureN)self_7313885)->elements[16];
 -
 -return_direct_with_clo2(data,  __glo_vector_91_125list_scheme_base, (((closure)  __glo_vector_91_125list_scheme_base)->fn),  &c_7322444, ((closureN)self_7313885)->elements[17]);
-+closureN_type c_7320794;
-+object e_7320807 [3];
-+c_7320794.hdr.mark = gc_color_red;
-+ c_7320794.hdr.grayed = 0;
-+c_7320794.tag = closureN_tag;
-+ c_7320794.fn = (function_type)__lambda_870;
-+c_7320794.num_args = 1;
-+c_7320794.num_elements = 3;
-+c_7320794.elements = (object *)e_7320807;
-+c_7320794.elements[0] = ((closureN)self_7312637)->elements[14];
-+c_7320794.elements[1] = lp_731417_733293;
-+c_7320794.elements[2] = ((closureN)self_7312637)->elements[15];
-+
-+
-+closureN_type c_7320808;
-+object e_7321180 [16];
-+c_7320808.hdr.mark = gc_color_red;
-+ c_7320808.hdr.grayed = 0;
-+c_7320808.tag = closureN_tag;
-+ c_7320808.fn = (function_type)__lambda_872;
-+c_7320808.num_args = 2;
-+c_7320808.num_elements = 16;
-+c_7320808.elements = (object *)e_7321180;
-+c_7320808.elements[0] = ((closureN)self_7312637)->elements[0];
-+c_7320808.elements[1] = ((closureN)self_7312637)->elements[1];
-+c_7320808.elements[2] = ((closureN)self_7312637)->elements[2];
-+c_7320808.elements[3] = ((closureN)self_7312637)->elements[3];
-+c_7320808.elements[4] = ((closureN)self_7312637)->elements[4];
-+c_7320808.elements[5] = ((closureN)self_7312637)->elements[5];
-+c_7320808.elements[6] = ((closureN)self_7312637)->elements[6];
-+c_7320808.elements[7] = ((closureN)self_7312637)->elements[7];
-+c_7320808.elements[8] = ((closureN)self_7312637)->elements[8];
-+c_7320808.elements[9] = ((closureN)self_7312637)->elements[9];
-+c_7320808.elements[10] = ((closureN)self_7312637)->elements[10];
-+c_7320808.elements[11] = ((closureN)self_7312637)->elements[11];
-+c_7320808.elements[12] = ((closureN)self_7312637)->elements[12];
-+c_7320808.elements[13] = ((closureN)self_7312637)->elements[13];
-+c_7320808.elements[14] = lp_731417_733293;
-+c_7320808.elements[15] = ((closureN)self_7312637)->elements[16];
-+
-+return_direct_with_clo1(data,(closure)&c_7320794,__lambda_870,  &c_7320808);; 
++closureN_type c_7320787;
++object e_7320800 [3];
++c_7320787.hdr.mark = gc_color_red;
++ c_7320787.hdr.grayed = 0;
++c_7320787.tag = closureN_tag;
++ c_7320787.fn = (function_type)__lambda_870;
++c_7320787.num_args = 1;
++c_7320787.num_elements = 3;
++c_7320787.elements = (object *)e_7320800;
++c_7320787.elements[0] = ((closureN)self_7312630)->elements[14];
++c_7320787.elements[1] = lp_731416_733286;
++c_7320787.elements[2] = ((closureN)self_7312630)->elements[15];
++
++
++closureN_type c_7320801;
++object e_7321173 [16];
++c_7320801.hdr.mark = gc_color_red;
++ c_7320801.hdr.grayed = 0;
++c_7320801.tag = closureN_tag;
++ c_7320801.fn = (function_type)__lambda_872;
++c_7320801.num_args = 2;
++c_7320801.num_elements = 16;
++c_7320801.elements = (object *)e_7321173;
++c_7320801.elements[0] = ((closureN)self_7312630)->elements[0];
++c_7320801.elements[1] = ((closureN)self_7312630)->elements[1];
++c_7320801.elements[2] = ((closureN)self_7312630)->elements[2];
++c_7320801.elements[3] = ((closureN)self_7312630)->elements[3];
++c_7320801.elements[4] = ((closureN)self_7312630)->elements[4];
++c_7320801.elements[5] = ((closureN)self_7312630)->elements[5];
++c_7320801.elements[6] = ((closureN)self_7312630)->elements[6];
++c_7320801.elements[7] = ((closureN)self_7312630)->elements[7];
++c_7320801.elements[8] = ((closureN)self_7312630)->elements[8];
++c_7320801.elements[9] = ((closureN)self_7312630)->elements[9];
++c_7320801.elements[10] = ((closureN)self_7312630)->elements[10];
++c_7320801.elements[11] = ((closureN)self_7312630)->elements[11];
++c_7320801.elements[12] = ((closureN)self_7312630)->elements[12];
++c_7320801.elements[13] = ((closureN)self_7312630)->elements[13];
++c_7320801.elements[14] = lp_731416_733286;
++c_7320801.elements[15] = ((closureN)self_7312630)->elements[16];
++
++return_direct_with_clo1(data,(closure)&c_7320787,__lambda_870,  &c_7320801);; 
 +}
 +
-+static void __lambda_872(void *data, object self_7312638, int argc, object *args) /* object self_7312638, object k_735897, object t_731418_733294, object dim_731419_733295 */
++static void __lambda_872(void *data, object self_7312631, int argc, object *args) /* object self_7312631, object k_735890, object t_731417_733287, object dim_731418_733288 */
 + {
-+ object k_735897 = args[0]; object t_731418_733294 = args[1]; object dim_731419_733295 = args[2];
++ object k_735890 = args[0]; object t_731417_733287 = args[1]; object dim_731418_733288 = args[2];
 +  
-+closureN_type c_7320810;
-+object e_7321179 [19];
-+c_7320810.hdr.mark = gc_color_red;
-+ c_7320810.hdr.grayed = 0;
-+c_7320810.tag = closureN_tag;
-+ c_7320810.fn = (function_type)__lambda_873;
-+c_7320810.num_args = 1;
-+c_7320810.num_elements = 19;
-+c_7320810.elements = (object *)e_7321179;
-+c_7320810.elements[0] = ((closureN)self_7312638)->elements[0];
-+c_7320810.elements[1] = ((closureN)self_7312638)->elements[1];
-+c_7320810.elements[2] = ((closureN)self_7312638)->elements[2];
-+c_7320810.elements[3] = ((closureN)self_7312638)->elements[3];
-+c_7320810.elements[4] = ((closureN)self_7312638)->elements[4];
-+c_7320810.elements[5] = ((closureN)self_7312638)->elements[5];
-+c_7320810.elements[6] = ((closureN)self_7312638)->elements[6];
-+c_7320810.elements[7] = ((closureN)self_7312638)->elements[7];
-+c_7320810.elements[8] = dim_731419_733295;
-+c_7320810.elements[9] = ((closureN)self_7312638)->elements[8];
-+c_7320810.elements[10] = ((closureN)self_7312638)->elements[9];
-+c_7320810.elements[11] = ((closureN)self_7312638)->elements[10];
-+c_7320810.elements[12] = ((closureN)self_7312638)->elements[11];
-+c_7320810.elements[13] = ((closureN)self_7312638)->elements[12];
-+c_7320810.elements[14] = ((closureN)self_7312638)->elements[13];
-+c_7320810.elements[15] = k_735897;
-+c_7320810.elements[16] = ((closureN)self_7312638)->elements[14];
-+c_7320810.elements[17] = t_731418_733294;
-+c_7320810.elements[18] = ((closureN)self_7312638)->elements[15];
-+
-+return_direct_with_clo2(data,  __glo_identifier_127_scheme_base, (((closure)  __glo_identifier_127_scheme_base)->fn),  &c_7320810, t_731418_733294);; 
++closureN_type c_7320803;
++object e_7321172 [19];
++c_7320803.hdr.mark = gc_color_red;
++ c_7320803.hdr.grayed = 0;
++c_7320803.tag = closureN_tag;
++ c_7320803.fn = (function_type)__lambda_873;
++c_7320803.num_args = 1;
++c_7320803.num_elements = 19;
++c_7320803.elements = (object *)e_7321172;
++c_7320803.elements[0] = ((closureN)self_7312631)->elements[0];
++c_7320803.elements[1] = ((closureN)self_7312631)->elements[1];
++c_7320803.elements[2] = ((closureN)self_7312631)->elements[2];
++c_7320803.elements[3] = ((closureN)self_7312631)->elements[3];
++c_7320803.elements[4] = ((closureN)self_7312631)->elements[4];
++c_7320803.elements[5] = ((closureN)self_7312631)->elements[5];
++c_7320803.elements[6] = ((closureN)self_7312631)->elements[6];
++c_7320803.elements[7] = ((closureN)self_7312631)->elements[7];
++c_7320803.elements[8] = dim_731418_733288;
++c_7320803.elements[9] = ((closureN)self_7312631)->elements[8];
++c_7320803.elements[10] = ((closureN)self_7312631)->elements[9];
++c_7320803.elements[11] = ((closureN)self_7312631)->elements[10];
++c_7320803.elements[12] = ((closureN)self_7312631)->elements[11];
++c_7320803.elements[13] = ((closureN)self_7312631)->elements[12];
++c_7320803.elements[14] = ((closureN)self_7312631)->elements[13];
++c_7320803.elements[15] = k_735890;
++c_7320803.elements[16] = ((closureN)self_7312631)->elements[14];
++c_7320803.elements[17] = t_731417_733287;
++c_7320803.elements[18] = ((closureN)self_7312631)->elements[15];
++
++return_direct_with_clo2(data,  __glo_identifier_127_scheme_base, (((closure)  __glo_identifier_127_scheme_base)->fn),  &c_7320803, t_731417_733287);; 
 +}
 +
-+static void __lambda_873(void *data, object self_7312639, int argc, object *args) /* object self_7312639, object r_735898 */
++static void __lambda_873(void *data, object self_7312632, int argc, object *args) /* object self_7312632, object r_735891 */
 + {
-+ object r_735898 = args[0];
-+  if( (boolean_f != r_735898) ){ 
++ object r_735891 = args[0];
++  if( (boolean_f != r_735891) ){ 
 +  
-+closureN_type c_7320812;
-+object e_7320842 [6];
-+c_7320812.hdr.mark = gc_color_red;
-+ c_7320812.hdr.grayed = 0;
-+c_7320812.tag = closureN_tag;
-+ c_7320812.fn = (function_type)__lambda_874;
-+c_7320812.num_args = 1;
-+c_7320812.num_elements = 6;
-+c_7320812.elements = (object *)e_7320842;
-+c_7320812.elements[0] = ((closureN)self_7312639)->elements[6];
-+c_7320812.elements[1] = ((closureN)self_7312639)->elements[7];
-+c_7320812.elements[2] = ((closureN)self_7312639)->elements[8];
-+c_7320812.elements[3] = ((closureN)self_7312639)->elements[15];
-+c_7320812.elements[4] = ((closureN)self_7312639)->elements[17];
-+c_7320812.elements[5] = ((closureN)self_7312639)->elements[18];
-+
-+
-+closureN_type c_7320843;
-+object e_7320850 [1];
-+c_7320843.hdr.mark = gc_color_red;
-+ c_7320843.hdr.grayed = 0;
-+c_7320843.tag = closureN_tag;
-+ c_7320843.fn = (function_type)__lambda_877;
-+c_7320843.num_args = 1;
-+c_7320843.num_elements = 1;
-+c_7320843.elements = (object *)e_7320850;
-+c_7320843.elements[0] = ((closureN)self_7312639)->elements[17];
-+
-+return_direct_with_clo1(data,(closure)&c_7320812,__lambda_874,  &c_7320843);
++closureN_type c_7320805;
++object e_7320835 [6];
++c_7320805.hdr.mark = gc_color_red;
++ c_7320805.hdr.grayed = 0;
++c_7320805.tag = closureN_tag;
++ c_7320805.fn = (function_type)__lambda_874;
++c_7320805.num_args = 1;
++c_7320805.num_elements = 6;
++c_7320805.elements = (object *)e_7320835;
++c_7320805.elements[0] = ((closureN)self_7312632)->elements[6];
++c_7320805.elements[1] = ((closureN)self_7312632)->elements[7];
++c_7320805.elements[2] = ((closureN)self_7312632)->elements[8];
++c_7320805.elements[3] = ((closureN)self_7312632)->elements[15];
++c_7320805.elements[4] = ((closureN)self_7312632)->elements[17];
++c_7320805.elements[5] = ((closureN)self_7312632)->elements[18];
++
++
++closureN_type c_7320836;
++object e_7320843 [1];
++c_7320836.hdr.mark = gc_color_red;
++ c_7320836.hdr.grayed = 0;
++c_7320836.tag = closureN_tag;
++ c_7320836.fn = (function_type)__lambda_877;
++c_7320836.num_args = 1;
++c_7320836.num_elements = 1;
++c_7320836.elements = (object *)e_7320843;
++c_7320836.elements[0] = ((closureN)self_7312632)->elements[17];
++
++return_direct_with_clo1(data,(closure)&c_7320805,__lambda_874,  &c_7320836);
 +} else { 
 +    
-+if( (boolean_f != Cyc_is_pair(((closureN)self_7312639)->elements[17])) ){ 
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312632)->elements[17])) ){ 
 +  
 +
 +
-+closureN_type c_7320858;
-+object e_7321145 [16];
-+c_7320858.hdr.mark = gc_color_red;
-+ c_7320858.hdr.grayed = 0;
-+c_7320858.tag = closureN_tag;
-+ c_7320858.fn = (function_type)__lambda_878;
-+c_7320858.num_args = 1;
-+c_7320858.num_elements = 16;
-+c_7320858.elements = (object *)e_7321145;
-+c_7320858.elements[0] = ((closureN)self_7312639)->elements[0];
-+c_7320858.elements[1] = ((closureN)self_7312639)->elements[1];
-+c_7320858.elements[2] = ((closureN)self_7312639)->elements[2];
-+c_7320858.elements[3] = ((closureN)self_7312639)->elements[3];
-+c_7320858.elements[4] = ((closureN)self_7312639)->elements[5];
-+c_7320858.elements[5] = ((closureN)self_7312639)->elements[6];
-+c_7320858.elements[6] = ((closureN)self_7312639)->elements[8];
-+c_7320858.elements[7] = ((closureN)self_7312639)->elements[9];
-+c_7320858.elements[8] = ((closureN)self_7312639)->elements[11];
-+c_7320858.elements[9] = ((closureN)self_7312639)->elements[12];
-+c_7320858.elements[10] = ((closureN)self_7312639)->elements[13];
-+c_7320858.elements[11] = ((closureN)self_7312639)->elements[14];
-+c_7320858.elements[12] = ((closureN)self_7312639)->elements[15];
-+c_7320858.elements[13] = ((closureN)self_7312639)->elements[16];
-+c_7320858.elements[14] = ((closureN)self_7312639)->elements[17];
-+c_7320858.elements[15] = ((closureN)self_7312639)->elements[18];
-+
-+return_closcall2(data,  car(((closureN)self_7312639)->elements[10]),  &c_7320858, ((closureN)self_7312639)->elements[17]);
++closureN_type c_7320851;
++object e_7321138 [16];
++c_7320851.hdr.mark = gc_color_red;
++ c_7320851.hdr.grayed = 0;
++c_7320851.tag = closureN_tag;
++ c_7320851.fn = (function_type)__lambda_878;
++c_7320851.num_args = 1;
++c_7320851.num_elements = 16;
++c_7320851.elements = (object *)e_7321138;
++c_7320851.elements[0] = ((closureN)self_7312632)->elements[0];
++c_7320851.elements[1] = ((closureN)self_7312632)->elements[1];
++c_7320851.elements[2] = ((closureN)self_7312632)->elements[2];
++c_7320851.elements[3] = ((closureN)self_7312632)->elements[3];
++c_7320851.elements[4] = ((closureN)self_7312632)->elements[5];
++c_7320851.elements[5] = ((closureN)self_7312632)->elements[6];
++c_7320851.elements[6] = ((closureN)self_7312632)->elements[8];
++c_7320851.elements[7] = ((closureN)self_7312632)->elements[9];
++c_7320851.elements[8] = ((closureN)self_7312632)->elements[11];
++c_7320851.elements[9] = ((closureN)self_7312632)->elements[12];
++c_7320851.elements[10] = ((closureN)self_7312632)->elements[13];
++c_7320851.elements[11] = ((closureN)self_7312632)->elements[14];
++c_7320851.elements[12] = ((closureN)self_7312632)->elements[15];
++c_7320851.elements[13] = ((closureN)self_7312632)->elements[16];
++c_7320851.elements[14] = ((closureN)self_7312632)->elements[17];
++c_7320851.elements[15] = ((closureN)self_7312632)->elements[18];
++
++return_closcall2(data,  car(((closureN)self_7312632)->elements[10]),  &c_7320851, ((closureN)self_7312632)->elements[17]);
 +} else { 
 +    
-+if( (boolean_f != Cyc_is_vector_not_record_type(((closureN)self_7312639)->elements[17])) ){ 
++if( (boolean_f != Cyc_is_vector_not_record_type(((closureN)self_7312632)->elements[17])) ){ 
 +  
-+closureN_type c_7321151;
-+object e_7321165 [4];
-+c_7321151.hdr.mark = gc_color_red;
-+ c_7321151.hdr.grayed = 0;
-+c_7321151.tag = closureN_tag;
-+ c_7321151.fn = (function_type)__lambda_907;
-+c_7321151.num_args = 1;
-+c_7321151.num_elements = 4;
-+c_7321151.elements = (object *)e_7321165;
-+c_7321151.elements[0] = ((closureN)self_7312639)->elements[4];
-+c_7321151.elements[1] = ((closureN)self_7312639)->elements[8];
-+c_7321151.elements[2] = ((closureN)self_7312639)->elements[15];
-+c_7321151.elements[3] = ((closureN)self_7312639)->elements[16];
-+
-+return_direct_with_clo2(data,  __glo_vector_91_125list_scheme_base, (((closure)  __glo_vector_91_125list_scheme_base)->fn),  &c_7321151, ((closureN)self_7312639)->elements[17]);
++closureN_type c_7321144;
++object e_7321158 [4];
++c_7321144.hdr.mark = gc_color_red;
++ c_7321144.hdr.grayed = 0;
++c_7321144.tag = closureN_tag;
++ c_7321144.fn = (function_type)__lambda_907;
++c_7321144.num_args = 1;
++c_7321144.num_elements = 4;
++c_7321144.elements = (object *)e_7321158;
++c_7321144.elements[0] = ((closureN)self_7312632)->elements[4];
++c_7321144.elements[1] = ((closureN)self_7312632)->elements[8];
++c_7321144.elements[2] = ((closureN)self_7312632)->elements[15];
++c_7321144.elements[3] = ((closureN)self_7312632)->elements[16];
++
++return_direct_with_clo2(data,  __glo_vector_91_125list_scheme_base, (((closure)  __glo_vector_91_125list_scheme_base)->fn),  &c_7321144, ((closureN)self_7312632)->elements[17]);
  } else { 
      
 -if( (boolean_f != Cyc_is_null(((closureN)self_7313885)->elements[17])) ){ 
-+if( (boolean_f != Cyc_is_null(((closureN)self_7312639)->elements[17])) ){ 
++if( (boolean_f != Cyc_is_null(((closureN)self_7312632)->elements[17])) ){ 
    
 -list_2_type local_7322467; 
 -return_direct_with_clo1(data,  ((closureN)self_7313885)->elements[15], (((closure)  ((closureN)self_7313885)->elements[15])->fn),  Cyc_fast_list_2(&local_7322467, ((closureN)self_7313885)->elements[6], NULL));
-+list_2_type local_7321174; 
-+return_direct_with_clo1(data,  ((closureN)self_7312639)->elements[15], (((closure)  ((closureN)self_7312639)->elements[15])->fn),  Cyc_fast_list_2(&local_7321174, ((closureN)self_7312639)->elements[6], NULL));
++list_2_type local_7321167; 
++return_direct_with_clo1(data,  ((closureN)self_7312632)->elements[15], (((closure)  ((closureN)self_7312632)->elements[15])->fn),  Cyc_fast_list_2(&local_7321167, ((closureN)self_7312632)->elements[6], NULL));
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7313885)->elements[15], (((closure)  ((closureN)self_7313885)->elements[15])->fn),  ((closureN)self_7313885)->elements[17]);}
-+  return_direct_with_clo1(data,  ((closureN)self_7312639)->elements[15], (((closure)  ((closureN)self_7312639)->elements[15])->fn),  ((closureN)self_7312639)->elements[17]);}
++  return_direct_with_clo1(data,  ((closureN)self_7312632)->elements[15], (((closure)  ((closureN)self_7312632)->elements[15])->fn),  ((closureN)self_7312632)->elements[17]);}
  ;}
  ;}
  ;}
@@ -31942,11 +32089,51 @@ Make let-values be the same as let*-values, to work around
  }
  
 -static void __lambda_907(void *data, object self_7313920, int argc, object *args) /* object self_7313920, object r_736402 */
-+static void __lambda_907(void *data, object self_7312674, int argc, object *args) /* object self_7312674, object r_735957 */
++static void __lambda_907(void *data, object self_7312667, int argc, object *args) /* object self_7312667, object r_735950 */
++ {
++ object r_735950 = args[0];
++  
++
++
++closureN_type c_7321149;
++object e_7321156 [2];
++c_7321149.hdr.mark = gc_color_red;
++ c_7321149.hdr.grayed = 0;
++c_7321149.tag = closureN_tag;
++ c_7321149.fn = (function_type)__lambda_908;
++c_7321149.num_args = 1;
++c_7321149.num_elements = 2;
++c_7321149.elements = (object *)e_7321156;
++c_7321149.elements[0] = ((closureN)self_7312667)->elements[0];
++c_7321149.elements[1] = ((closureN)self_7312667)->elements[2];
++
++return_closcall3(data,  car(((closureN)self_7312667)->elements[3]),  &c_7321149, r_735950, ((closureN)self_7312667)->elements[1]);; 
++}
++
++static void __lambda_908(void *data, object self_7312668, int argc, object *args) /* object self_7312668, object r_735949 */
   {
 - object r_736402 = args[0];
-+ object r_735957 = args[0];
++ object r_735949 = args[0];
    
++list_2_type local_7321154; 
++return_direct_with_clo1(data,  ((closureN)self_7312668)->elements[1], (((closure)  ((closureN)self_7312668)->elements[1])->fn),  Cyc_fast_list_2(&local_7321154, ((closureN)self_7312668)->elements[0], r_735949));; 
++}
++
++static void __lambda_878(void *data, object self_7312637, int argc, object *args) /* object self_7312637, object r_735900 */
++ {
++ object r_735900 = args[0];
++  if( (boolean_f != r_735900) ){ 
++  
++closureN_type c_7320853;
++object e_7320876 [1];
++c_7320853.hdr.mark = gc_color_red;
++ c_7320853.hdr.grayed = 0;
++c_7320853.tag = closureN_tag;
++ c_7320853.fn = (function_type)__lambda_879;
++c_7320853.num_args = 0;
++c_7320853.num_elements = 1;
++c_7320853.elements = (object *)e_7320876;
++c_7320853.elements[0] = ((closureN)self_7312637)->elements[14];
  
  
 -closureN_type c_7322449;
@@ -31960,42 +32147,23 @@ Make let-values be the same as let*-values, to work around
 -c_7322449.elements = (object *)e_7322456;
 -c_7322449.elements[0] = ((closureN)self_7313920)->elements[0];
 -c_7322449.elements[1] = ((closureN)self_7313920)->elements[2];
-+closureN_type c_7321156;
-+object e_7321163 [2];
-+c_7321156.hdr.mark = gc_color_red;
-+ c_7321156.hdr.grayed = 0;
-+c_7321156.tag = closureN_tag;
-+ c_7321156.fn = (function_type)__lambda_908;
-+c_7321156.num_args = 1;
-+c_7321156.num_elements = 2;
-+c_7321156.elements = (object *)e_7321163;
-+c_7321156.elements[0] = ((closureN)self_7312674)->elements[0];
-+c_7321156.elements[1] = ((closureN)self_7312674)->elements[2];
- 
+-
 -return_closcall3(data,  car(((closureN)self_7313920)->elements[3]),  &c_7322449, r_736402, ((closureN)self_7313920)->elements[1]);; 
-+return_closcall3(data,  car(((closureN)self_7312674)->elements[3]),  &c_7321156, r_735957, ((closureN)self_7312674)->elements[1]);; 
- }
- 
+-}
+-
 -static void __lambda_908(void *data, object self_7313921, int argc, object *args) /* object self_7313921, object r_736401 */
-+static void __lambda_908(void *data, object self_7312675, int argc, object *args) /* object self_7312675, object r_735956 */
-  {
+- {
 - object r_736401 = args[0];
-+ object r_735956 = args[0];
-   
+-  
 -list_2_type local_7322454; 
 -return_direct_with_clo1(data,  ((closureN)self_7313921)->elements[1], (((closure)  ((closureN)self_7313921)->elements[1])->fn),  Cyc_fast_list_2(&local_7322454, ((closureN)self_7313921)->elements[0], r_736401));; 
-+list_2_type local_7321161; 
-+return_direct_with_clo1(data,  ((closureN)self_7312675)->elements[1], (((closure)  ((closureN)self_7312675)->elements[1])->fn),  Cyc_fast_list_2(&local_7321161, ((closureN)self_7312675)->elements[0], r_735956));; 
- }
- 
+-}
+-
 -static void __lambda_878(void *data, object self_7313890, int argc, object *args) /* object self_7313890, object r_736352 */
-+static void __lambda_878(void *data, object self_7312644, int argc, object *args) /* object self_7312644, object r_735907 */
-  {
+- {
 - object r_736352 = args[0];
 -  if( (boolean_f != r_736352) ){ 
-+ object r_735907 = args[0];
-+  if( (boolean_f != r_735907) ){ 
-   
+-  
 -closureN_type c_7322153;
 -object e_7322176 [1];
 -c_7322153.hdr.mark = gc_color_red;
@@ -32006,18 +32174,8 @@ Make let-values be the same as let*-values, to work around
 -c_7322153.num_elements = 1;
 -c_7322153.elements = (object *)e_7322176;
 -c_7322153.elements[0] = ((closureN)self_7313890)->elements[14];
-+closureN_type c_7320860;
-+object e_7320883 [1];
-+c_7320860.hdr.mark = gc_color_red;
-+ c_7320860.hdr.grayed = 0;
-+c_7320860.tag = closureN_tag;
-+ c_7320860.fn = (function_type)__lambda_879;
-+c_7320860.num_args = 0;
-+c_7320860.num_elements = 1;
-+c_7320860.elements = (object *)e_7320883;
-+c_7320860.elements[0] = ((closureN)self_7312644)->elements[14];
- 
- 
+-
+-
 -closureN_type c_7322177;
 -object e_7322184 [2];
 -c_7322177.hdr.mark = gc_color_red;
@@ -32029,24 +32187,12 @@ Make let-values be the same as let*-values, to work around
 -c_7322177.elements = (object *)e_7322184;
 -c_7322177.elements[0] = ((closureN)self_7313890)->elements[5];
 -c_7322177.elements[1] = ((closureN)self_7313890)->elements[12];
-+closureN_type c_7320884;
-+object e_7320891 [2];
-+c_7320884.hdr.mark = gc_color_red;
-+ c_7320884.hdr.grayed = 0;
-+c_7320884.tag = closureN_tag;
-+ c_7320884.fn = (function_type)__lambda_880;
-+c_7320884.num_args = 1;
-+c_7320884.num_elements = 2;
-+c_7320884.elements = (object *)e_7320891;
-+c_7320884.elements[0] = ((closureN)self_7312644)->elements[5];
-+c_7320884.elements[1] = ((closureN)self_7312644)->elements[12];
- 
+-
 -return_direct_with_clo1(data,(closure)&c_7322153,__lambda_879,  &c_7322177);
-+return_direct_with_clo1(data,(closure)&c_7320860,__lambda_879,  &c_7320884);
- } else { 
-   
- 
- 
+-} else { 
+-  
+-
+-
 -closureN_type c_7322189;
 -object e_7322436 [15];
 -c_7322189.hdr.mark = gc_color_red;
@@ -32071,46 +32217,18 @@ Make let-values be the same as let*-values, to work around
 -c_7322189.elements[12] = ((closureN)self_7313890)->elements[13];
 -c_7322189.elements[13] = ((closureN)self_7313890)->elements[14];
 -c_7322189.elements[14] = ((closureN)self_7313890)->elements[15];
-+closureN_type c_7320896;
-+object e_7321143 [15];
-+c_7320896.hdr.mark = gc_color_red;
-+ c_7320896.hdr.grayed = 0;
-+c_7320896.tag = closureN_tag;
-+ c_7320896.fn = (function_type)__lambda_881;
-+c_7320896.num_args = 1;
-+c_7320896.num_elements = 15;
-+c_7320896.elements = (object *)e_7321143;
-+c_7320896.elements[0] = ((closureN)self_7312644)->elements[0];
-+c_7320896.elements[1] = ((closureN)self_7312644)->elements[1];
-+c_7320896.elements[2] = ((closureN)self_7312644)->elements[2];
-+c_7320896.elements[3] = ((closureN)self_7312644)->elements[3];
-+c_7320896.elements[4] = ((closureN)self_7312644)->elements[4];
-+c_7320896.elements[5] = ((closureN)self_7312644)->elements[5];
-+c_7320896.elements[6] = ((closureN)self_7312644)->elements[6];
-+c_7320896.elements[7] = ((closureN)self_7312644)->elements[7];
-+c_7320896.elements[8] = ((closureN)self_7312644)->elements[8];
-+c_7320896.elements[9] = ((closureN)self_7312644)->elements[10];
-+c_7320896.elements[10] = ((closureN)self_7312644)->elements[11];
-+c_7320896.elements[11] = ((closureN)self_7312644)->elements[12];
-+c_7320896.elements[12] = ((closureN)self_7312644)->elements[13];
-+c_7320896.elements[13] = ((closureN)self_7312644)->elements[14];
-+c_7320896.elements[14] = ((closureN)self_7312644)->elements[15];
- 
+-
 -return_closcall2(data,  car(((closureN)self_7313890)->elements[9]),  &c_7322189, ((closureN)self_7313890)->elements[14]);}
-+return_closcall2(data,  car(((closureN)self_7312644)->elements[9]),  &c_7320896, ((closureN)self_7312644)->elements[14]);}
- ;; 
- }
- 
+-;; 
+-}
+-
 -static void __lambda_881(void *data, object self_7313893, int argc, object *args) /* object self_7313893, object r_736359 */
-+static void __lambda_881(void *data, object self_7312647, int argc, object *args) /* object self_7312647, object r_735914 */
-  {
+- {
 - object r_736359 = args[0];
 -  if( (boolean_f != r_736359) ){ 
-+ object r_735914 = args[0];
-+  if( (boolean_f != r_735914) ){ 
-   
- 
- 
+-  
+-
+-
 -closureN_type c_7322194;
 -object e_7322395 [12];
 -c_7322194.hdr.mark = gc_color_red;
@@ -32132,30 +32250,20 @@ Make let-values be the same as let*-values, to work around
 -c_7322194.elements[9] = ((closureN)self_7313893)->elements[12];
 -c_7322194.elements[10] = ((closureN)self_7313893)->elements[13];
 -c_7322194.elements[11] = ((closureN)self_7313893)->elements[14];
-+closureN_type c_7320901;
-+object e_7321102 [12];
-+c_7320901.hdr.mark = gc_color_red;
-+ c_7320901.hdr.grayed = 0;
-+c_7320901.tag = closureN_tag;
-+ c_7320901.fn = (function_type)__lambda_882;
-+c_7320901.num_args = 1;
-+c_7320901.num_elements = 12;
-+c_7320901.elements = (object *)e_7321102;
-+c_7320901.elements[0] = ((closureN)self_7312647)->elements[0];
-+c_7320901.elements[1] = ((closureN)self_7312647)->elements[1];
-+c_7320901.elements[2] = ((closureN)self_7312647)->elements[3];
-+c_7320901.elements[3] = ((closureN)self_7312647)->elements[4];
-+c_7320901.elements[4] = ((closureN)self_7312647)->elements[6];
-+c_7320901.elements[5] = ((closureN)self_7312647)->elements[8];
-+c_7320901.elements[6] = ((closureN)self_7312647)->elements[9];
-+c_7320901.elements[7] = ((closureN)self_7312647)->elements[10];
-+c_7320901.elements[8] = ((closureN)self_7312647)->elements[11];
-+c_7320901.elements[9] = ((closureN)self_7312647)->elements[12];
-+c_7320901.elements[10] = ((closureN)self_7312647)->elements[13];
-+c_7320901.elements[11] = ((closureN)self_7312647)->elements[14];
++closureN_type c_7320877;
++object e_7320884 [2];
++c_7320877.hdr.mark = gc_color_red;
++ c_7320877.hdr.grayed = 0;
++c_7320877.tag = closureN_tag;
++ c_7320877.fn = (function_type)__lambda_880;
++c_7320877.num_args = 1;
++c_7320877.num_elements = 2;
++c_7320877.elements = (object *)e_7320884;
++c_7320877.elements[0] = ((closureN)self_7312637)->elements[5];
++c_7320877.elements[1] = ((closureN)self_7312637)->elements[12];
  
 -return_closcall2(data,  car(((closureN)self_7313893)->elements[7]),  &c_7322194, ((closureN)self_7313893)->elements[13]);
-+return_closcall2(data,  car(((closureN)self_7312647)->elements[7]),  &c_7320901, ((closureN)self_7312647)->elements[13]);
++return_direct_with_clo1(data,(closure)&c_7320853,__lambda_879,  &c_7320877);
  } else { 
    
  
@@ -32175,34 +32283,97 @@ Make let-values be the same as let*-values, to work around
 -c_7322401.elements[3] = ((closureN)self_7313893)->elements[11];
 -c_7322401.elements[4] = ((closureN)self_7313893)->elements[12];
 -c_7322401.elements[5] = ((closureN)self_7313893)->elements[13];
-+closureN_type c_7321108;
-+object e_7321138 [6];
-+c_7321108.hdr.mark = gc_color_red;
-+ c_7321108.hdr.grayed = 0;
-+c_7321108.tag = closureN_tag;
-+ c_7321108.fn = (function_type)__lambda_903;
-+c_7321108.num_args = 1;
-+c_7321108.num_elements = 6;
-+c_7321108.elements = (object *)e_7321138;
-+c_7321108.elements[0] = ((closureN)self_7312647)->elements[2];
-+c_7321108.elements[1] = ((closureN)self_7312647)->elements[5];
-+c_7321108.elements[2] = ((closureN)self_7312647)->elements[6];
-+c_7321108.elements[3] = ((closureN)self_7312647)->elements[11];
-+c_7321108.elements[4] = ((closureN)self_7312647)->elements[12];
-+c_7321108.elements[5] = ((closureN)self_7312647)->elements[13];
- 
++closureN_type c_7320889;
++object e_7321136 [15];
++c_7320889.hdr.mark = gc_color_red;
++ c_7320889.hdr.grayed = 0;
++c_7320889.tag = closureN_tag;
++ c_7320889.fn = (function_type)__lambda_881;
++c_7320889.num_args = 1;
++c_7320889.num_elements = 15;
++c_7320889.elements = (object *)e_7321136;
++c_7320889.elements[0] = ((closureN)self_7312637)->elements[0];
++c_7320889.elements[1] = ((closureN)self_7312637)->elements[1];
++c_7320889.elements[2] = ((closureN)self_7312637)->elements[2];
++c_7320889.elements[3] = ((closureN)self_7312637)->elements[3];
++c_7320889.elements[4] = ((closureN)self_7312637)->elements[4];
++c_7320889.elements[5] = ((closureN)self_7312637)->elements[5];
++c_7320889.elements[6] = ((closureN)self_7312637)->elements[6];
++c_7320889.elements[7] = ((closureN)self_7312637)->elements[7];
++c_7320889.elements[8] = ((closureN)self_7312637)->elements[8];
++c_7320889.elements[9] = ((closureN)self_7312637)->elements[10];
++c_7320889.elements[10] = ((closureN)self_7312637)->elements[11];
++c_7320889.elements[11] = ((closureN)self_7312637)->elements[12];
++c_7320889.elements[12] = ((closureN)self_7312637)->elements[13];
++c_7320889.elements[13] = ((closureN)self_7312637)->elements[14];
++c_7320889.elements[14] = ((closureN)self_7312637)->elements[15];
++
++return_closcall2(data,  car(((closureN)self_7312637)->elements[9]),  &c_7320889, ((closureN)self_7312637)->elements[14]);}
++;; 
++}
++
++static void __lambda_881(void *data, object self_7312640, int argc, object *args) /* object self_7312640, object r_735907 */
++ {
++ object r_735907 = args[0];
++  if( (boolean_f != r_735907) ){ 
++  
++
  
++closureN_type c_7320894;
++object e_7321095 [12];
++c_7320894.hdr.mark = gc_color_red;
++ c_7320894.hdr.grayed = 0;
++c_7320894.tag = closureN_tag;
++ c_7320894.fn = (function_type)__lambda_882;
++c_7320894.num_args = 1;
++c_7320894.num_elements = 12;
++c_7320894.elements = (object *)e_7321095;
++c_7320894.elements[0] = ((closureN)self_7312640)->elements[0];
++c_7320894.elements[1] = ((closureN)self_7312640)->elements[1];
++c_7320894.elements[2] = ((closureN)self_7312640)->elements[3];
++c_7320894.elements[3] = ((closureN)self_7312640)->elements[4];
++c_7320894.elements[4] = ((closureN)self_7312640)->elements[6];
++c_7320894.elements[5] = ((closureN)self_7312640)->elements[8];
++c_7320894.elements[6] = ((closureN)self_7312640)->elements[9];
++c_7320894.elements[7] = ((closureN)self_7312640)->elements[10];
++c_7320894.elements[8] = ((closureN)self_7312640)->elements[11];
++c_7320894.elements[9] = ((closureN)self_7312640)->elements[12];
++c_7320894.elements[10] = ((closureN)self_7312640)->elements[13];
++c_7320894.elements[11] = ((closureN)self_7312640)->elements[14];
+ 
++return_closcall2(data,  car(((closureN)self_7312640)->elements[7]),  &c_7320894, ((closureN)self_7312640)->elements[13]);
++} else { 
++  
++
++
++closureN_type c_7321101;
++object e_7321131 [6];
++c_7321101.hdr.mark = gc_color_red;
++ c_7321101.hdr.grayed = 0;
++c_7321101.tag = closureN_tag;
++ c_7321101.fn = (function_type)__lambda_903;
++c_7321101.num_args = 1;
++c_7321101.num_elements = 6;
++c_7321101.elements = (object *)e_7321131;
++c_7321101.elements[0] = ((closureN)self_7312640)->elements[2];
++c_7321101.elements[1] = ((closureN)self_7312640)->elements[5];
++c_7321101.elements[2] = ((closureN)self_7312640)->elements[6];
++c_7321101.elements[3] = ((closureN)self_7312640)->elements[11];
++c_7321101.elements[4] = ((closureN)self_7312640)->elements[12];
++c_7321101.elements[5] = ((closureN)self_7312640)->elements[13];
  
 -return_closcall3(data,  car(((closureN)self_7313893)->elements[12]),  &c_7322401, Cyc_car(data, ((closureN)self_7313893)->elements[13]), ((closureN)self_7313893)->elements[6]);}
-+return_closcall3(data,  car(((closureN)self_7312647)->elements[12]),  &c_7321108, Cyc_car(data, ((closureN)self_7312647)->elements[13]), ((closureN)self_7312647)->elements[6]);}
++
++
++return_closcall3(data,  car(((closureN)self_7312640)->elements[12]),  &c_7321101, Cyc_car(data, ((closureN)self_7312640)->elements[13]), ((closureN)self_7312640)->elements[6]);}
  ;; 
  }
  
 -static void __lambda_903(void *data, object self_7313916, int argc, object *args) /* object self_7313916, object r_736395 */
-+static void __lambda_903(void *data, object self_7312670, int argc, object *args) /* object self_7312670, object r_735950 */
++static void __lambda_903(void *data, object self_7312663, int argc, object *args) /* object self_7312663, object r_735943 */
   {
 - object r_736395 = args[0];
-+ object r_735950 = args[0];
++ object r_735943 = args[0];
    
 -closureN_type c_7322403;
 -object e_7322427 [7];
@@ -32220,34 +32391,34 @@ Make let-values be the same as let*-values, to work around
 -c_7322403.elements[4] = ((closureN)self_7313916)->elements[4];
 -c_7322403.elements[5] = r_736395;
 -c_7322403.elements[6] = ((closureN)self_7313916)->elements[5];
-+closureN_type c_7321110;
-+object e_7321134 [7];
-+c_7321110.hdr.mark = gc_color_red;
-+ c_7321110.hdr.grayed = 0;
-+c_7321110.tag = closureN_tag;
-+ c_7321110.fn = (function_type)__lambda_904;
-+c_7321110.num_args = 1;
-+c_7321110.num_elements = 7;
-+c_7321110.elements = (object *)e_7321134;
-+c_7321110.elements[0] = ((closureN)self_7312670)->elements[0];
-+c_7321110.elements[1] = ((closureN)self_7312670)->elements[1];
-+c_7321110.elements[2] = ((closureN)self_7312670)->elements[2];
-+c_7321110.elements[3] = ((closureN)self_7312670)->elements[3];
-+c_7321110.elements[4] = ((closureN)self_7312670)->elements[4];
-+c_7321110.elements[5] = r_735950;
-+c_7321110.elements[6] = ((closureN)self_7312670)->elements[5];
++closureN_type c_7321103;
++object e_7321127 [7];
++c_7321103.hdr.mark = gc_color_red;
++ c_7321103.hdr.grayed = 0;
++c_7321103.tag = closureN_tag;
++ c_7321103.fn = (function_type)__lambda_904;
++c_7321103.num_args = 1;
++c_7321103.num_elements = 7;
++c_7321103.elements = (object *)e_7321127;
++c_7321103.elements[0] = ((closureN)self_7312663)->elements[0];
++c_7321103.elements[1] = ((closureN)self_7312663)->elements[1];
++c_7321103.elements[2] = ((closureN)self_7312663)->elements[2];
++c_7321103.elements[3] = ((closureN)self_7312663)->elements[3];
++c_7321103.elements[4] = ((closureN)self_7312663)->elements[4];
++c_7321103.elements[5] = r_735943;
++c_7321103.elements[6] = ((closureN)self_7312663)->elements[5];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7322403,__lambda_904,  Cyc_cdr(data, ((closureN)self_7313916)->elements[5]));; 
-+return_direct_with_clo1(data,(closure)&c_7321110,__lambda_904,  Cyc_cdr(data, ((closureN)self_7312670)->elements[5]));; 
++return_direct_with_clo1(data,(closure)&c_7321103,__lambda_904,  Cyc_cdr(data, ((closureN)self_7312663)->elements[5]));; 
  }
  
 -static void __lambda_904(void *data, object self_7313917, int argc, object *args) /* object self_7313917, object r_736398 */
-+static void __lambda_904(void *data, object self_7312671, int argc, object *args) /* object self_7312671, object r_735953 */
++static void __lambda_904(void *data, object self_7312664, int argc, object *args) /* object self_7312664, object r_735946 */
   {
 - object r_736398 = args[0];
-+ object r_735953 = args[0];
++ object r_735946 = args[0];
    
  
  
@@ -32265,30 +32436,30 @@ Make let-values be the same as let*-values, to work around
 -c_7322408.elements[2] = ((closureN)self_7313917)->elements[3];
 -c_7322408.elements[3] = ((closureN)self_7313917)->elements[5];
 -c_7322408.elements[4] = ((closureN)self_7313917)->elements[6];
-+closureN_type c_7321115;
-+object e_7321132 [5];
-+c_7321115.hdr.mark = gc_color_red;
-+ c_7321115.hdr.grayed = 0;
-+c_7321115.tag = closureN_tag;
-+ c_7321115.fn = (function_type)__lambda_905;
-+c_7321115.num_args = 1;
-+c_7321115.num_elements = 5;
-+c_7321115.elements = (object *)e_7321132;
-+c_7321115.elements[0] = ((closureN)self_7312671)->elements[0];
-+c_7321115.elements[1] = ((closureN)self_7312671)->elements[1];
-+c_7321115.elements[2] = ((closureN)self_7312671)->elements[3];
-+c_7321115.elements[3] = ((closureN)self_7312671)->elements[5];
-+c_7321115.elements[4] = ((closureN)self_7312671)->elements[6];
++closureN_type c_7321108;
++object e_7321125 [5];
++c_7321108.hdr.mark = gc_color_red;
++ c_7321108.hdr.grayed = 0;
++c_7321108.tag = closureN_tag;
++ c_7321108.fn = (function_type)__lambda_905;
++c_7321108.num_args = 1;
++c_7321108.num_elements = 5;
++c_7321108.elements = (object *)e_7321125;
++c_7321108.elements[0] = ((closureN)self_7312664)->elements[0];
++c_7321108.elements[1] = ((closureN)self_7312664)->elements[1];
++c_7321108.elements[2] = ((closureN)self_7312664)->elements[3];
++c_7321108.elements[3] = ((closureN)self_7312664)->elements[5];
++c_7321108.elements[4] = ((closureN)self_7312664)->elements[6];
  
 -return_closcall3(data,  car(((closureN)self_7313917)->elements[4]),  &c_7322408, r_736398, ((closureN)self_7313917)->elements[2]);; 
-+return_closcall3(data,  car(((closureN)self_7312671)->elements[4]),  &c_7321115, r_735953, ((closureN)self_7312671)->elements[2]);; 
++return_closcall3(data,  car(((closureN)self_7312664)->elements[4]),  &c_7321108, r_735946, ((closureN)self_7312664)->elements[2]);; 
  }
  
 -static void __lambda_905(void *data, object self_7313918, int argc, object *args) /* object self_7313918, object r_736396 */
-+static void __lambda_905(void *data, object self_7312672, int argc, object *args) /* object self_7312672, object r_735951 */
++static void __lambda_905(void *data, object self_7312665, int argc, object *args) /* object self_7312665, object r_735944 */
   {
 - object r_736396 = args[0];
-+ object r_735951 = args[0];
++ object r_735944 = args[0];
    
 -closureN_type c_7322410;
 -object e_7322419 [4];
@@ -32303,44 +32474,44 @@ Make let-values be the same as let*-values, to work around
 -c_7322410.elements[1] = ((closureN)self_7313918)->elements[2];
 -c_7322410.elements[2] = ((closureN)self_7313918)->elements[3];
 -c_7322410.elements[3] = r_736396;
-+closureN_type c_7321117;
-+object e_7321126 [4];
-+c_7321117.hdr.mark = gc_color_red;
-+ c_7321117.hdr.grayed = 0;
-+c_7321117.tag = closureN_tag;
-+ c_7321117.fn = (function_type)__lambda_906;
-+c_7321117.num_args = 1;
-+c_7321117.num_elements = 4;
-+c_7321117.elements = (object *)e_7321126;
-+c_7321117.elements[0] = ((closureN)self_7312672)->elements[0];
-+c_7321117.elements[1] = ((closureN)self_7312672)->elements[2];
-+c_7321117.elements[2] = ((closureN)self_7312672)->elements[3];
-+c_7321117.elements[3] = r_735951;
++closureN_type c_7321110;
++object e_7321119 [4];
++c_7321110.hdr.mark = gc_color_red;
++ c_7321110.hdr.grayed = 0;
++c_7321110.tag = closureN_tag;
++ c_7321110.fn = (function_type)__lambda_906;
++c_7321110.num_args = 1;
++c_7321110.num_elements = 4;
++c_7321110.elements = (object *)e_7321119;
++c_7321110.elements[0] = ((closureN)self_7312665)->elements[0];
++c_7321110.elements[1] = ((closureN)self_7312665)->elements[2];
++c_7321110.elements[2] = ((closureN)self_7312665)->elements[3];
++c_7321110.elements[3] = r_735944;
  
  
 -list_2_type local_7322422; 
 -return_direct_with_clo1(data,(closure)&c_7322410,__lambda_906,  Cyc_fast_list_2(&local_7322422, ((closureN)self_7313918)->elements[1], ((closureN)self_7313918)->elements[4]));; 
-+list_2_type local_7321129; 
-+return_direct_with_clo1(data,(closure)&c_7321117,__lambda_906,  Cyc_fast_list_2(&local_7321129, ((closureN)self_7312672)->elements[1], ((closureN)self_7312672)->elements[4]));; 
++list_2_type local_7321122; 
++return_direct_with_clo1(data,(closure)&c_7321110,__lambda_906,  Cyc_fast_list_2(&local_7321122, ((closureN)self_7312665)->elements[1], ((closureN)self_7312665)->elements[4]));; 
  }
  
 -static void __lambda_906(void *data, object self_7313919, int argc, object *args) /* object self_7313919, object r_736397 */
-+static void __lambda_906(void *data, object self_7312673, int argc, object *args) /* object self_7312673, object r_735952 */
++static void __lambda_906(void *data, object self_7312666, int argc, object *args) /* object self_7312666, object r_735945 */
   {
 - object r_736397 = args[0];
-+ object r_735952 = args[0];
++ object r_735945 = args[0];
    
 -list_4_type local_7322415; 
 -return_direct_with_clo1(data,  ((closureN)self_7313919)->elements[1], (((closure)  ((closureN)self_7313919)->elements[1])->fn),  Cyc_fast_list_4(&local_7322415, ((closureN)self_7313919)->elements[0], ((closureN)self_7313919)->elements[2], ((closureN)self_7313919)->elements[3], r_736397));; 
-+list_4_type local_7321122; 
-+return_direct_with_clo1(data,  ((closureN)self_7312673)->elements[1], (((closure)  ((closureN)self_7312673)->elements[1])->fn),  Cyc_fast_list_4(&local_7321122, ((closureN)self_7312673)->elements[0], ((closureN)self_7312673)->elements[2], ((closureN)self_7312673)->elements[3], r_735952));; 
++list_4_type local_7321115; 
++return_direct_with_clo1(data,  ((closureN)self_7312666)->elements[1], (((closure)  ((closureN)self_7312666)->elements[1])->fn),  Cyc_fast_list_4(&local_7321115, ((closureN)self_7312666)->elements[0], ((closureN)self_7312666)->elements[2], ((closureN)self_7312666)->elements[3], r_735945));; 
  }
  
 -static void __lambda_882(void *data, object self_7313894, int argc, object *args) /* object self_7313894, object depth_731441_733639 */
-+static void __lambda_882(void *data, object self_7312648, int argc, object *args) /* object self_7312648, object depth_731442_733299 */
++static void __lambda_882(void *data, object self_7312641, int argc, object *args) /* object self_7312641, object depth_731441_733292 */
   {
 - object depth_731441_733639 = args[0];
-+ object depth_731442_733299 = args[0];
++ object depth_731441_733292 = args[0];
    
 -closureN_type c_7322196;
 -object e_7322391 [13];
@@ -32364,40 +32535,40 @@ Make let-values be the same as let*-values, to work around
 -c_7322196.elements[10] = ((closureN)self_7313894)->elements[9];
 -c_7322196.elements[11] = ((closureN)self_7313894)->elements[10];
 -c_7322196.elements[12] = ((closureN)self_7313894)->elements[11];
-+closureN_type c_7320903;
-+object e_7321098 [13];
-+c_7320903.hdr.mark = gc_color_red;
-+ c_7320903.hdr.grayed = 0;
-+c_7320903.tag = closureN_tag;
-+ c_7320903.fn = (function_type)__lambda_883;
-+c_7320903.num_args = 1;
-+c_7320903.num_elements = 13;
-+c_7320903.elements = (object *)e_7321098;
-+c_7320903.elements[0] = ((closureN)self_7312648)->elements[0];
-+c_7320903.elements[1] = ((closureN)self_7312648)->elements[1];
-+c_7320903.elements[2] = ((closureN)self_7312648)->elements[2];
-+c_7320903.elements[3] = ((closureN)self_7312648)->elements[3];
-+c_7320903.elements[4] = depth_731442_733299;
-+c_7320903.elements[5] = ((closureN)self_7312648)->elements[4];
-+c_7320903.elements[6] = ((closureN)self_7312648)->elements[5];
-+c_7320903.elements[7] = ((closureN)self_7312648)->elements[6];
-+c_7320903.elements[8] = ((closureN)self_7312648)->elements[7];
-+c_7320903.elements[9] = ((closureN)self_7312648)->elements[8];
-+c_7320903.elements[10] = ((closureN)self_7312648)->elements[9];
-+c_7320903.elements[11] = ((closureN)self_7312648)->elements[10];
-+c_7320903.elements[12] = ((closureN)self_7312648)->elements[11];
++closureN_type c_7320896;
++object e_7321091 [13];
++c_7320896.hdr.mark = gc_color_red;
++ c_7320896.hdr.grayed = 0;
++c_7320896.tag = closureN_tag;
++ c_7320896.fn = (function_type)__lambda_883;
++c_7320896.num_args = 1;
++c_7320896.num_elements = 13;
++c_7320896.elements = (object *)e_7321091;
++c_7320896.elements[0] = ((closureN)self_7312641)->elements[0];
++c_7320896.elements[1] = ((closureN)self_7312641)->elements[1];
++c_7320896.elements[2] = ((closureN)self_7312641)->elements[2];
++c_7320896.elements[3] = ((closureN)self_7312641)->elements[3];
++c_7320896.elements[4] = depth_731441_733292;
++c_7320896.elements[5] = ((closureN)self_7312641)->elements[4];
++c_7320896.elements[6] = ((closureN)self_7312641)->elements[5];
++c_7320896.elements[7] = ((closureN)self_7312641)->elements[6];
++c_7320896.elements[8] = ((closureN)self_7312641)->elements[7];
++c_7320896.elements[9] = ((closureN)self_7312641)->elements[8];
++c_7320896.elements[10] = ((closureN)self_7312641)->elements[9];
++c_7320896.elements[11] = ((closureN)self_7312641)->elements[10];
++c_7320896.elements[12] = ((closureN)self_7312641)->elements[11];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7322196,__lambda_883,  Cyc_car(data, ((closureN)self_7313894)->elements[10]));; 
-+return_direct_with_clo1(data,(closure)&c_7320903,__lambda_883,  Cyc_car(data, ((closureN)self_7312648)->elements[10]));; 
++return_direct_with_clo1(data,(closure)&c_7320896,__lambda_883,  Cyc_car(data, ((closureN)self_7312641)->elements[10]));; 
  }
  
 -static void __lambda_883(void *data, object self_7313895, int argc, object *args) /* object self_7313895, object r_736394 */
-+static void __lambda_883(void *data, object self_7312649, int argc, object *args) /* object self_7312649, object r_735949 */
++static void __lambda_883(void *data, object self_7312642, int argc, object *args) /* object self_7312642, object r_735942 */
   {
 - object r_736394 = args[0];
-+ object r_735949 = args[0];
++ object r_735942 = args[0];
    
  
  
@@ -32422,48 +32593,48 @@ Make let-values be the same as let*-values, to work around
 -c_7322201.elements[9] = ((closureN)self_7313895)->elements[10];
 -c_7322201.elements[10] = ((closureN)self_7313895)->elements[11];
 -c_7322201.elements[11] = ((closureN)self_7313895)->elements[12];
-+closureN_type c_7320908;
-+object e_7321091 [12];
-+c_7320908.hdr.mark = gc_color_red;
-+ c_7320908.hdr.grayed = 0;
-+c_7320908.tag = closureN_tag;
-+ c_7320908.fn = (function_type)__lambda_884;
-+c_7320908.num_args = 1;
-+c_7320908.num_elements = 12;
-+c_7320908.elements = (object *)e_7321091;
-+c_7320908.elements[0] = ((closureN)self_7312649)->elements[0];
-+c_7320908.elements[1] = ((closureN)self_7312649)->elements[1];
-+c_7320908.elements[2] = ((closureN)self_7312649)->elements[2];
-+c_7320908.elements[3] = ((closureN)self_7312649)->elements[3];
-+c_7320908.elements[4] = ((closureN)self_7312649)->elements[4];
-+c_7320908.elements[5] = ((closureN)self_7312649)->elements[5];
-+c_7320908.elements[6] = ((closureN)self_7312649)->elements[6];
-+c_7320908.elements[7] = ((closureN)self_7312649)->elements[7];
-+c_7320908.elements[8] = ((closureN)self_7312649)->elements[9];
-+c_7320908.elements[9] = ((closureN)self_7312649)->elements[10];
-+c_7320908.elements[10] = ((closureN)self_7312649)->elements[11];
-+c_7320908.elements[11] = ((closureN)self_7312649)->elements[12];
++closureN_type c_7320901;
++object e_7321084 [12];
++c_7320901.hdr.mark = gc_color_red;
++ c_7320901.hdr.grayed = 0;
++c_7320901.tag = closureN_tag;
++ c_7320901.fn = (function_type)__lambda_884;
++c_7320901.num_args = 1;
++c_7320901.num_elements = 12;
++c_7320901.elements = (object *)e_7321084;
++c_7320901.elements[0] = ((closureN)self_7312642)->elements[0];
++c_7320901.elements[1] = ((closureN)self_7312642)->elements[1];
++c_7320901.elements[2] = ((closureN)self_7312642)->elements[2];
++c_7320901.elements[3] = ((closureN)self_7312642)->elements[3];
++c_7320901.elements[4] = ((closureN)self_7312642)->elements[4];
++c_7320901.elements[5] = ((closureN)self_7312642)->elements[5];
++c_7320901.elements[6] = ((closureN)self_7312642)->elements[6];
++c_7320901.elements[7] = ((closureN)self_7312642)->elements[7];
++c_7320901.elements[8] = ((closureN)self_7312642)->elements[9];
++c_7320901.elements[9] = ((closureN)self_7312642)->elements[10];
++c_7320901.elements[10] = ((closureN)self_7312642)->elements[11];
++c_7320901.elements[11] = ((closureN)self_7312642)->elements[12];
  
  
 -complex_num_type local_7322388; 
 -return_closcall4(data,  car(((closureN)self_7313895)->elements[8]),  &c_7322201, r_736394, ((closureN)self_7313895)->elements[12], Cyc_fast_sum(data,&local_7322388, ((closureN)self_7313895)->elements[5], ((closureN)self_7313895)->elements[4]));; 
-+complex_num_type local_7321095; 
-+return_closcall4(data,  car(((closureN)self_7312649)->elements[8]),  &c_7320908, r_735949, ((closureN)self_7312649)->elements[12], Cyc_fast_sum(data,&local_7321095, ((closureN)self_7312649)->elements[5], ((closureN)self_7312649)->elements[4]));; 
++complex_num_type local_7321088; 
++return_closcall4(data,  car(((closureN)self_7312642)->elements[8]),  &c_7320901, r_735942, ((closureN)self_7312642)->elements[12], Cyc_fast_sum(data,&local_7321088, ((closureN)self_7312642)->elements[5], ((closureN)self_7312642)->elements[4]));; 
  }
  
 -static void __lambda_884(void *data, object self_7313896, int argc, object *args) /* object self_7313896, object ell_91vars_731447_733641 */
-+static void __lambda_884(void *data, object self_7312650, int argc, object *args) /* object self_7312650, object ell_91vars_731448_733301 */
++static void __lambda_884(void *data, object self_7312643, int argc, object *args) /* object self_7312643, object ell_91vars_731447_733294 */
   {
 - object ell_91vars_731447_733641 = args[0];
-+ object ell_91vars_731448_733301 = args[0];
++ object ell_91vars_731447_733294 = args[0];
      
 -if( (boolean_f != Cyc_is_null(ell_91vars_731447_733641)) ){ 
-+if( (boolean_f != Cyc_is_null(ell_91vars_731448_733301)) ){ 
++if( (boolean_f != Cyc_is_null(ell_91vars_731447_733294)) ){ 
    
 -make_utf8_string_with_len(c_7322206, "too many ...'s", 14, 14);
 -return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7313896)->elements[8], &c_7322206, ((closureN)self_7313896)->elements[7]);
-+make_utf8_string_with_len(c_7320913, "too many ...'s", 14, 14);
-+return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7312650)->elements[8], &c_7320913, ((closureN)self_7312650)->elements[7]);
++make_utf8_string_with_len(c_7320906, "too many ...'s", 14, 14);
++return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7312643)->elements[8], &c_7320906, ((closureN)self_7312643)->elements[7]);
  } else { 
    
 -closureN_type c_7322209;
@@ -32476,16 +32647,16 @@ Make let-values be the same as let*-values, to work around
 -c_7322209.num_elements = 1;
 -c_7322209.elements = (object *)e_7322222;
 -c_7322209.elements[0] = ((closureN)self_7313896)->elements[10];
-+closureN_type c_7320916;
-+object e_7320929 [1];
-+c_7320916.hdr.mark = gc_color_red;
-+ c_7320916.hdr.grayed = 0;
-+c_7320916.tag = closureN_tag;
-+ c_7320916.fn = (function_type)__lambda_885;
-+c_7320916.num_args = 0;
-+c_7320916.num_elements = 1;
-+c_7320916.elements = (object *)e_7320929;
-+c_7320916.elements[0] = ((closureN)self_7312650)->elements[10];
++closureN_type c_7320909;
++object e_7320922 [1];
++c_7320909.hdr.mark = gc_color_red;
++ c_7320909.hdr.grayed = 0;
++c_7320909.tag = closureN_tag;
++ c_7320909.fn = (function_type)__lambda_885;
++c_7320909.num_args = 0;
++c_7320909.num_elements = 1;
++c_7320909.elements = (object *)e_7320922;
++c_7320909.elements[0] = ((closureN)self_7312643)->elements[10];
  
  
 -closureN_type c_7322223;
@@ -32509,40 +32680,40 @@ Make let-values be the same as let*-values, to work around
 -c_7322223.elements[9] = ((closureN)self_7313896)->elements[9];
 -c_7322223.elements[10] = ((closureN)self_7313896)->elements[10];
 -c_7322223.elements[11] = ((closureN)self_7313896)->elements[11];
-+closureN_type c_7320930;
-+object e_7321090 [12];
-+c_7320930.hdr.mark = gc_color_red;
-+ c_7320930.hdr.grayed = 0;
-+c_7320930.tag = closureN_tag;
-+ c_7320930.fn = (function_type)__lambda_886;
-+c_7320930.num_args = 1;
-+c_7320930.num_elements = 12;
-+c_7320930.elements = (object *)e_7321090;
-+c_7320930.elements[0] = ((closureN)self_7312650)->elements[0];
-+c_7320930.elements[1] = ((closureN)self_7312650)->elements[1];
-+c_7320930.elements[2] = ((closureN)self_7312650)->elements[2];
-+c_7320930.elements[3] = ((closureN)self_7312650)->elements[3];
-+c_7320930.elements[4] = ((closureN)self_7312650)->elements[4];
-+c_7320930.elements[5] = ((closureN)self_7312650)->elements[5];
-+c_7320930.elements[6] = ell_91vars_731448_733301;
-+c_7320930.elements[7] = ((closureN)self_7312650)->elements[6];
-+c_7320930.elements[8] = ((closureN)self_7312650)->elements[8];
-+c_7320930.elements[9] = ((closureN)self_7312650)->elements[9];
-+c_7320930.elements[10] = ((closureN)self_7312650)->elements[10];
-+c_7320930.elements[11] = ((closureN)self_7312650)->elements[11];
++closureN_type c_7320923;
++object e_7321083 [12];
++c_7320923.hdr.mark = gc_color_red;
++ c_7320923.hdr.grayed = 0;
++c_7320923.tag = closureN_tag;
++ c_7320923.fn = (function_type)__lambda_886;
++c_7320923.num_args = 1;
++c_7320923.num_elements = 12;
++c_7320923.elements = (object *)e_7321083;
++c_7320923.elements[0] = ((closureN)self_7312643)->elements[0];
++c_7320923.elements[1] = ((closureN)self_7312643)->elements[1];
++c_7320923.elements[2] = ((closureN)self_7312643)->elements[2];
++c_7320923.elements[3] = ((closureN)self_7312643)->elements[3];
++c_7320923.elements[4] = ((closureN)self_7312643)->elements[4];
++c_7320923.elements[5] = ((closureN)self_7312643)->elements[5];
++c_7320923.elements[6] = ell_91vars_731447_733294;
++c_7320923.elements[7] = ((closureN)self_7312643)->elements[6];
++c_7320923.elements[8] = ((closureN)self_7312643)->elements[8];
++c_7320923.elements[9] = ((closureN)self_7312643)->elements[9];
++c_7320923.elements[10] = ((closureN)self_7312643)->elements[10];
++c_7320923.elements[11] = ((closureN)self_7312643)->elements[11];
  
 -return_direct_with_clo1(data,(closure)&c_7322209,__lambda_885,  &c_7322223);}
-+return_direct_with_clo1(data,(closure)&c_7320916,__lambda_885,  &c_7320930);}
++return_direct_with_clo1(data,(closure)&c_7320909,__lambda_885,  &c_7320923);}
  ;; 
  }
  
 -static void __lambda_886(void *data, object self_7313897, int argc, object *args) /* object self_7313897, object r_736364 */
-+static void __lambda_886(void *data, object self_7312651, int argc, object *args) /* object self_7312651, object r_735919 */
++static void __lambda_886(void *data, object self_7312644, int argc, object *args) /* object self_7312644, object r_735912 */
   {
 - object r_736364 = args[0];
 -  if( (boolean_f != r_736364) ){ 
-+ object r_735919 = args[0];
-+  if( (boolean_f != r_735919) ){ 
++ object r_735912 = args[0];
++  if( (boolean_f != r_735912) ){ 
    
  
  
@@ -32550,8 +32721,8 @@ Make let-values be the same as let*-values, to work around
  
 -complex_num_type local_7322234; 
 -return_closcall3(data,  car(((closureN)self_7313897)->elements[9]),  ((closureN)self_7313897)->elements[8], Cyc_car(data, ((closureN)self_7313897)->elements[10]), Cyc_fast_sum(data,&local_7322234, ((closureN)self_7313897)->elements[5], ((closureN)self_7313897)->elements[4]));
-+complex_num_type local_7320941; 
-+return_closcall3(data,  car(((closureN)self_7312651)->elements[9]),  ((closureN)self_7312651)->elements[8], Cyc_car(data, ((closureN)self_7312651)->elements[10]), Cyc_fast_sum(data,&local_7320941, ((closureN)self_7312651)->elements[5], ((closureN)self_7312651)->elements[4]));
++complex_num_type local_7320934; 
++return_closcall3(data,  car(((closureN)self_7312644)->elements[9]),  ((closureN)self_7312644)->elements[8], Cyc_car(data, ((closureN)self_7312644)->elements[10]), Cyc_fast_sum(data,&local_7320934, ((closureN)self_7312644)->elements[5], ((closureN)self_7312644)->elements[4]));
  } else { 
    
 -closureN_type c_7322238;
@@ -32575,40 +32746,40 @@ Make let-values be the same as let*-values, to work around
 -c_7322238.elements[9] = ((closureN)self_7313897)->elements[9];
 -c_7322238.elements[10] = ((closureN)self_7313897)->elements[10];
 -c_7322238.elements[11] = ((closureN)self_7313897)->elements[11];
-+closureN_type c_7320945;
-+object e_7321086 [12];
-+c_7320945.hdr.mark = gc_color_red;
-+ c_7320945.hdr.grayed = 0;
-+c_7320945.tag = closureN_tag;
-+ c_7320945.fn = (function_type)__lambda_887;
-+c_7320945.num_args = 1;
-+c_7320945.num_elements = 12;
-+c_7320945.elements = (object *)e_7321086;
-+c_7320945.elements[0] = ((closureN)self_7312651)->elements[0];
-+c_7320945.elements[1] = ((closureN)self_7312651)->elements[1];
-+c_7320945.elements[2] = ((closureN)self_7312651)->elements[2];
-+c_7320945.elements[3] = ((closureN)self_7312651)->elements[3];
-+c_7320945.elements[4] = ((closureN)self_7312651)->elements[4];
-+c_7320945.elements[5] = ((closureN)self_7312651)->elements[5];
-+c_7320945.elements[6] = ((closureN)self_7312651)->elements[6];
-+c_7320945.elements[7] = ((closureN)self_7312651)->elements[7];
-+c_7320945.elements[8] = ((closureN)self_7312651)->elements[8];
-+c_7320945.elements[9] = ((closureN)self_7312651)->elements[9];
-+c_7320945.elements[10] = ((closureN)self_7312651)->elements[10];
-+c_7320945.elements[11] = ((closureN)self_7312651)->elements[11];
++closureN_type c_7320938;
++object e_7321079 [12];
++c_7320938.hdr.mark = gc_color_red;
++ c_7320938.hdr.grayed = 0;
++c_7320938.tag = closureN_tag;
++ c_7320938.fn = (function_type)__lambda_887;
++c_7320938.num_args = 1;
++c_7320938.num_elements = 12;
++c_7320938.elements = (object *)e_7321079;
++c_7320938.elements[0] = ((closureN)self_7312644)->elements[0];
++c_7320938.elements[1] = ((closureN)self_7312644)->elements[1];
++c_7320938.elements[2] = ((closureN)self_7312644)->elements[2];
++c_7320938.elements[3] = ((closureN)self_7312644)->elements[3];
++c_7320938.elements[4] = ((closureN)self_7312644)->elements[4];
++c_7320938.elements[5] = ((closureN)self_7312644)->elements[5];
++c_7320938.elements[6] = ((closureN)self_7312644)->elements[6];
++c_7320938.elements[7] = ((closureN)self_7312644)->elements[7];
++c_7320938.elements[8] = ((closureN)self_7312644)->elements[8];
++c_7320938.elements[9] = ((closureN)self_7312644)->elements[9];
++c_7320938.elements[10] = ((closureN)self_7312644)->elements[10];
++c_7320938.elements[11] = ((closureN)self_7312644)->elements[11];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7322238,__lambda_887,  Cyc_car(data, ((closureN)self_7313897)->elements[10]));}
-+return_direct_with_clo1(data,(closure)&c_7320945,__lambda_887,  Cyc_car(data, ((closureN)self_7312651)->elements[10]));}
++return_direct_with_clo1(data,(closure)&c_7320938,__lambda_887,  Cyc_car(data, ((closureN)self_7312644)->elements[10]));}
  ;; 
  }
  
 -static void __lambda_887(void *data, object self_7313898, int argc, object *args) /* object self_7313898, object r_736388 */
-+static void __lambda_887(void *data, object self_7312652, int argc, object *args) /* object self_7312652, object r_735943 */
++static void __lambda_887(void *data, object self_7312645, int argc, object *args) /* object self_7312645, object r_735936 */
   {
 - object r_736388 = args[0];
-+ object r_735943 = args[0];
++ object r_735936 = args[0];
    
  
  
@@ -32633,40 +32804,40 @@ Make let-values be the same as let*-values, to work around
 -c_7322243.elements[9] = ((closureN)self_7313898)->elements[9];
 -c_7322243.elements[10] = ((closureN)self_7313898)->elements[10];
 -c_7322243.elements[11] = ((closureN)self_7313898)->elements[11];
-+closureN_type c_7320950;
-+object e_7321080 [12];
-+c_7320950.hdr.mark = gc_color_red;
-+ c_7320950.hdr.grayed = 0;
-+c_7320950.tag = closureN_tag;
-+ c_7320950.fn = (function_type)__lambda_888;
-+c_7320950.num_args = 1;
-+c_7320950.num_elements = 12;
-+c_7320950.elements = (object *)e_7321080;
-+c_7320950.elements[0] = ((closureN)self_7312652)->elements[0];
-+c_7320950.elements[1] = ((closureN)self_7312652)->elements[1];
-+c_7320950.elements[2] = ((closureN)self_7312652)->elements[2];
-+c_7320950.elements[3] = ((closureN)self_7312652)->elements[3];
-+c_7320950.elements[4] = ((closureN)self_7312652)->elements[4];
-+c_7320950.elements[5] = ((closureN)self_7312652)->elements[5];
-+c_7320950.elements[6] = ((closureN)self_7312652)->elements[6];
-+c_7320950.elements[7] = ((closureN)self_7312652)->elements[7];
-+c_7320950.elements[8] = ((closureN)self_7312652)->elements[8];
-+c_7320950.elements[9] = ((closureN)self_7312652)->elements[9];
-+c_7320950.elements[10] = ((closureN)self_7312652)->elements[10];
-+c_7320950.elements[11] = ((closureN)self_7312652)->elements[11];
++closureN_type c_7320943;
++object e_7321073 [12];
++c_7320943.hdr.mark = gc_color_red;
++ c_7320943.hdr.grayed = 0;
++c_7320943.tag = closureN_tag;
++ c_7320943.fn = (function_type)__lambda_888;
++c_7320943.num_args = 1;
++c_7320943.num_elements = 12;
++c_7320943.elements = (object *)e_7321073;
++c_7320943.elements[0] = ((closureN)self_7312645)->elements[0];
++c_7320943.elements[1] = ((closureN)self_7312645)->elements[1];
++c_7320943.elements[2] = ((closureN)self_7312645)->elements[2];
++c_7320943.elements[3] = ((closureN)self_7312645)->elements[3];
++c_7320943.elements[4] = ((closureN)self_7312645)->elements[4];
++c_7320943.elements[5] = ((closureN)self_7312645)->elements[5];
++c_7320943.elements[6] = ((closureN)self_7312645)->elements[6];
++c_7320943.elements[7] = ((closureN)self_7312645)->elements[7];
++c_7320943.elements[8] = ((closureN)self_7312645)->elements[8];
++c_7320943.elements[9] = ((closureN)self_7312645)->elements[9];
++c_7320943.elements[10] = ((closureN)self_7312645)->elements[10];
++c_7320943.elements[11] = ((closureN)self_7312645)->elements[11];
  
  
 -complex_num_type local_7322376; 
 -return_closcall3(data,  car(((closureN)self_7313898)->elements[9]),  &c_7322243, r_736388, Cyc_fast_sum(data,&local_7322376, ((closureN)self_7313898)->elements[5], ((closureN)self_7313898)->elements[4]));; 
-+complex_num_type local_7321083; 
-+return_closcall3(data,  car(((closureN)self_7312652)->elements[9]),  &c_7320950, r_735943, Cyc_fast_sum(data,&local_7321083, ((closureN)self_7312652)->elements[5], ((closureN)self_7312652)->elements[4]));; 
++complex_num_type local_7321076; 
++return_closcall3(data,  car(((closureN)self_7312645)->elements[9]),  &c_7320943, r_735936, Cyc_fast_sum(data,&local_7321076, ((closureN)self_7312645)->elements[5], ((closureN)self_7312645)->elements[4]));; 
  }
  
 -static void __lambda_888(void *data, object self_7313899, int argc, object *args) /* object self_7313899, object once_731459_733642 */
-+static void __lambda_888(void *data, object self_7312653, int argc, object *args) /* object self_7312653, object once_731460_733302 */
++static void __lambda_888(void *data, object self_7312646, int argc, object *args) /* object self_7312646, object once_731459_733295 */
   {
 - object once_731459_733642 = args[0];
-+ object once_731460_733302 = args[0];
++ object once_731459_733295 = args[0];
    
 -closureN_type c_7322245;
 -object e_7322290 [5];
@@ -32682,20 +32853,20 @@ Make let-values be the same as let*-values, to work around
 -c_7322245.elements[2] = ((closureN)self_7313899)->elements[6];
 -c_7322245.elements[3] = once_731459_733642;
 -c_7322245.elements[4] = ((closureN)self_7313899)->elements[11];
-+closureN_type c_7320952;
-+object e_7320997 [5];
-+c_7320952.hdr.mark = gc_color_red;
-+ c_7320952.hdr.grayed = 0;
-+c_7320952.tag = closureN_tag;
-+ c_7320952.fn = (function_type)__lambda_889;
-+c_7320952.num_args = 0;
-+c_7320952.num_elements = 5;
-+c_7320952.elements = (object *)e_7320997;
-+c_7320952.elements[0] = ((closureN)self_7312653)->elements[2];
-+c_7320952.elements[1] = ((closureN)self_7312653)->elements[3];
-+c_7320952.elements[2] = ((closureN)self_7312653)->elements[6];
-+c_7320952.elements[3] = once_731460_733302;
-+c_7320952.elements[4] = ((closureN)self_7312653)->elements[11];
++closureN_type c_7320945;
++object e_7320990 [5];
++c_7320945.hdr.mark = gc_color_red;
++ c_7320945.hdr.grayed = 0;
++c_7320945.tag = closureN_tag;
++ c_7320945.fn = (function_type)__lambda_889;
++c_7320945.num_args = 0;
++c_7320945.num_elements = 5;
++c_7320945.elements = (object *)e_7320990;
++c_7320945.elements[0] = ((closureN)self_7312646)->elements[2];
++c_7320945.elements[1] = ((closureN)self_7312646)->elements[3];
++c_7320945.elements[2] = ((closureN)self_7312646)->elements[6];
++c_7320945.elements[3] = once_731459_733295;
++c_7320945.elements[4] = ((closureN)self_7312646)->elements[11];
  
  
 -closureN_type c_7322291;
@@ -32715,33 +32886,33 @@ Make let-values be the same as let*-values, to work around
 -c_7322291.elements[5] = ((closureN)self_7313899)->elements[8];
 -c_7322291.elements[6] = ((closureN)self_7313899)->elements[9];
 -c_7322291.elements[7] = ((closureN)self_7313899)->elements[10];
-+closureN_type c_7320998;
-+object e_7321079 [8];
-+c_7320998.hdr.mark = gc_color_red;
-+ c_7320998.hdr.grayed = 0;
-+c_7320998.tag = closureN_tag;
-+ c_7320998.fn = (function_type)__lambda_893;
-+c_7320998.num_args = 1;
-+c_7320998.num_elements = 8;
-+c_7320998.elements = (object *)e_7321079;
-+c_7320998.elements[0] = ((closureN)self_7312653)->elements[0];
-+c_7320998.elements[1] = ((closureN)self_7312653)->elements[1];
-+c_7320998.elements[2] = ((closureN)self_7312653)->elements[4];
-+c_7320998.elements[3] = ((closureN)self_7312653)->elements[5];
-+c_7320998.elements[4] = ((closureN)self_7312653)->elements[7];
-+c_7320998.elements[5] = ((closureN)self_7312653)->elements[8];
-+c_7320998.elements[6] = ((closureN)self_7312653)->elements[9];
-+c_7320998.elements[7] = ((closureN)self_7312653)->elements[10];
++closureN_type c_7320991;
++object e_7321072 [8];
++c_7320991.hdr.mark = gc_color_red;
++ c_7320991.hdr.grayed = 0;
++c_7320991.tag = closureN_tag;
++ c_7320991.fn = (function_type)__lambda_893;
++c_7320991.num_args = 1;
++c_7320991.num_elements = 8;
++c_7320991.elements = (object *)e_7321072;
++c_7320991.elements[0] = ((closureN)self_7312646)->elements[0];
++c_7320991.elements[1] = ((closureN)self_7312646)->elements[1];
++c_7320991.elements[2] = ((closureN)self_7312646)->elements[4];
++c_7320991.elements[3] = ((closureN)self_7312646)->elements[5];
++c_7320991.elements[4] = ((closureN)self_7312646)->elements[7];
++c_7320991.elements[5] = ((closureN)self_7312646)->elements[8];
++c_7320991.elements[6] = ((closureN)self_7312646)->elements[9];
++c_7320991.elements[7] = ((closureN)self_7312646)->elements[10];
  
 -return_direct_with_clo1(data,(closure)&c_7322245,__lambda_889,  &c_7322291);; 
-+return_direct_with_clo1(data,(closure)&c_7320952,__lambda_889,  &c_7320998);; 
++return_direct_with_clo1(data,(closure)&c_7320945,__lambda_889,  &c_7320991);; 
  }
  
 -static void __lambda_893(void *data, object self_7313900, int argc, object *args) /* object self_7313900, object nest_731462_733643 */
-+static void __lambda_893(void *data, object self_7312654, int argc, object *args) /* object self_7312654, object nest_731463_733303 */
++static void __lambda_893(void *data, object self_7312647, int argc, object *args) /* object self_7312647, object nest_731462_733296 */
   {
 - object nest_731462_733643 = args[0];
-+ object nest_731463_733303 = args[0];
++ object nest_731462_733296 = args[0];
    
 -closureN_type c_7322293;
 -object e_7322370 [7];
@@ -32759,32 +32930,32 @@ Make let-values be the same as let*-values, to work around
 -c_7322293.elements[4] = ((closureN)self_7313900)->elements[5];
 -c_7322293.elements[5] = ((closureN)self_7313900)->elements[6];
 -c_7322293.elements[6] = ((closureN)self_7313900)->elements[7];
-+closureN_type c_7321000;
-+object e_7321077 [7];
-+c_7321000.hdr.mark = gc_color_red;
-+ c_7321000.hdr.grayed = 0;
-+c_7321000.tag = closureN_tag;
-+ c_7321000.fn = (function_type)__lambda_894;
-+c_7321000.num_args = 2;
-+c_7321000.num_elements = 7;
-+c_7321000.elements = (object *)e_7321077;
-+c_7321000.elements[0] = ((closureN)self_7312654)->elements[0];
-+c_7321000.elements[1] = ((closureN)self_7312654)->elements[1];
-+c_7321000.elements[2] = ((closureN)self_7312654)->elements[3];
-+c_7321000.elements[3] = ((closureN)self_7312654)->elements[4];
-+c_7321000.elements[4] = ((closureN)self_7312654)->elements[5];
-+c_7321000.elements[5] = ((closureN)self_7312654)->elements[6];
-+c_7321000.elements[6] = ((closureN)self_7312654)->elements[7];
++closureN_type c_7320993;
++object e_7321070 [7];
++c_7320993.hdr.mark = gc_color_red;
++ c_7320993.hdr.grayed = 0;
++c_7320993.tag = closureN_tag;
++ c_7320993.fn = (function_type)__lambda_894;
++c_7320993.num_args = 2;
++c_7320993.num_elements = 7;
++c_7320993.elements = (object *)e_7321070;
++c_7320993.elements[0] = ((closureN)self_7312647)->elements[0];
++c_7320993.elements[1] = ((closureN)self_7312647)->elements[1];
++c_7320993.elements[2] = ((closureN)self_7312647)->elements[3];
++c_7320993.elements[3] = ((closureN)self_7312647)->elements[4];
++c_7320993.elements[4] = ((closureN)self_7312647)->elements[5];
++c_7320993.elements[5] = ((closureN)self_7312647)->elements[6];
++c_7320993.elements[6] = ((closureN)self_7312647)->elements[7];
  
 -return_direct_with_clo2(data,(closure)&c_7322293,__lambda_894,  ((closureN)self_7313900)->elements[2], nest_731462_733643);; 
-+return_direct_with_clo2(data,(closure)&c_7321000,__lambda_894,  ((closureN)self_7312654)->elements[2], nest_731463_733303);; 
++return_direct_with_clo2(data,(closure)&c_7320993,__lambda_894,  ((closureN)self_7312647)->elements[2], nest_731462_733296);; 
  }
  
 -static void __lambda_894(void *data, object self_7313901, int argc, object *args) /* object self_7313901, object d_731469_733645, object many_731470_733646 */
-+static void __lambda_894(void *data, object self_7312655, int argc, object *args) /* object self_7312655, object d_731470_733305, object many_731471_733306 */
++static void __lambda_894(void *data, object self_7312648, int argc, object *args) /* object self_7312648, object d_731469_733298, object many_731470_733299 */
   {
 - object d_731469_733645 = args[0]; object many_731470_733646 = args[1];
-+ object d_731470_733305 = args[0]; object many_731471_733306 = args[1];
++ object d_731469_733298 = args[0]; object many_731470_733299 = args[1];
    
 -closureN_type c_7322295;
 -object e_7322369 [9];
@@ -32804,34 +32975,34 @@ Make let-values be the same as let*-values, to work around
 -c_7322295.elements[6] = ((closureN)self_7313901)->elements[5];
 -c_7322295.elements[7] = many_731470_733646;
 -c_7322295.elements[8] = ((closureN)self_7313901)->elements[6];
-+closureN_type c_7321002;
-+object e_7321076 [9];
-+c_7321002.hdr.mark = gc_color_red;
-+ c_7321002.hdr.grayed = 0;
-+c_7321002.tag = closureN_tag;
-+ c_7321002.fn = (function_type)__lambda_895;
-+c_7321002.num_args = 1;
-+c_7321002.num_elements = 9;
-+c_7321002.elements = (object *)e_7321076;
-+c_7321002.elements[0] = ((closureN)self_7312655)->elements[0];
-+c_7321002.elements[1] = ((closureN)self_7312655)->elements[1];
-+c_7321002.elements[2] = d_731470_733305;
-+c_7321002.elements[3] = ((closureN)self_7312655)->elements[2];
-+c_7321002.elements[4] = ((closureN)self_7312655)->elements[3];
-+c_7321002.elements[5] = ((closureN)self_7312655)->elements[4];
-+c_7321002.elements[6] = ((closureN)self_7312655)->elements[5];
-+c_7321002.elements[7] = many_731471_733306;
-+c_7321002.elements[8] = ((closureN)self_7312655)->elements[6];
++closureN_type c_7320995;
++object e_7321069 [9];
++c_7320995.hdr.mark = gc_color_red;
++ c_7320995.hdr.grayed = 0;
++c_7320995.tag = closureN_tag;
++ c_7320995.fn = (function_type)__lambda_895;
++c_7320995.num_args = 1;
++c_7320995.num_elements = 9;
++c_7320995.elements = (object *)e_7321069;
++c_7320995.elements[0] = ((closureN)self_7312648)->elements[0];
++c_7320995.elements[1] = ((closureN)self_7312648)->elements[1];
++c_7320995.elements[2] = d_731469_733298;
++c_7320995.elements[3] = ((closureN)self_7312648)->elements[2];
++c_7320995.elements[4] = ((closureN)self_7312648)->elements[3];
++c_7320995.elements[5] = ((closureN)self_7312648)->elements[4];
++c_7320995.elements[6] = ((closureN)self_7312648)->elements[5];
++c_7320995.elements[7] = many_731470_733299;
++c_7320995.elements[8] = ((closureN)self_7312648)->elements[6];
  
 -return_direct_with_clo1(data,(closure)&c_7322295,__lambda_895,  boolean_f);; 
-+return_direct_with_clo1(data,(closure)&c_7321002,__lambda_895,  boolean_f);; 
++return_direct_with_clo1(data,(closure)&c_7320995,__lambda_895,  boolean_f);; 
  }
  
 -static void __lambda_895(void *data, object self_7313902, int argc, object *args) /* object self_7313902, object lp_731416_731471_733647 */
-+static void __lambda_895(void *data, object self_7312656, int argc, object *args) /* object self_7312656, object lp_731417_731472_733307 */
++static void __lambda_895(void *data, object self_7312649, int argc, object *args) /* object self_7312649, object lp_731416_731471_733300 */
   {
 - object lp_731416_731471_733647 = args[0];
-+ object lp_731417_731472_733307 = args[0];
++ object lp_731416_731471_733300 = args[0];
    
 -closureN_type c_7322297;
 -object e_7322365 [9];
@@ -32851,37 +33022,37 @@ Make let-values be the same as let*-values, to work around
 -c_7322297.elements[6] = ((closureN)self_7313902)->elements[6];
 -c_7322297.elements[7] = ((closureN)self_7313902)->elements[7];
 -c_7322297.elements[8] = ((closureN)self_7313902)->elements[8];
-+closureN_type c_7321004;
-+object e_7321072 [9];
-+c_7321004.hdr.mark = gc_color_red;
-+ c_7321004.hdr.grayed = 0;
-+c_7321004.tag = closureN_tag;
-+ c_7321004.fn = (function_type)__lambda_1363;
-+c_7321004.num_args = 1;
-+c_7321004.num_elements = 9;
-+c_7321004.elements = (object *)e_7321072;
-+c_7321004.elements[0] = ((closureN)self_7312656)->elements[0];
-+c_7321004.elements[1] = ((closureN)self_7312656)->elements[1];
-+c_7321004.elements[2] = ((closureN)self_7312656)->elements[2];
-+c_7321004.elements[3] = ((closureN)self_7312656)->elements[3];
-+c_7321004.elements[4] = ((closureN)self_7312656)->elements[4];
-+c_7321004.elements[5] = ((closureN)self_7312656)->elements[5];
-+c_7321004.elements[6] = ((closureN)self_7312656)->elements[6];
-+c_7321004.elements[7] = ((closureN)self_7312656)->elements[7];
-+c_7321004.elements[8] = ((closureN)self_7312656)->elements[8];
++closureN_type c_7320997;
++object e_7321065 [9];
++c_7320997.hdr.mark = gc_color_red;
++ c_7320997.hdr.grayed = 0;
++c_7320997.tag = closureN_tag;
++ c_7320997.fn = (function_type)__lambda_1363;
++c_7320997.num_args = 1;
++c_7320997.num_elements = 9;
++c_7320997.elements = (object *)e_7321065;
++c_7320997.elements[0] = ((closureN)self_7312649)->elements[0];
++c_7320997.elements[1] = ((closureN)self_7312649)->elements[1];
++c_7320997.elements[2] = ((closureN)self_7312649)->elements[2];
++c_7320997.elements[3] = ((closureN)self_7312649)->elements[3];
++c_7320997.elements[4] = ((closureN)self_7312649)->elements[4];
++c_7320997.elements[5] = ((closureN)self_7312649)->elements[5];
++c_7320997.elements[6] = ((closureN)self_7312649)->elements[6];
++c_7320997.elements[7] = ((closureN)self_7312649)->elements[7];
++c_7320997.elements[8] = ((closureN)self_7312649)->elements[8];
  
  
 -pair_type local_7322368; 
 -return_direct_with_clo1(data,(closure)&c_7322297,__lambda_1410,  set_cell_as_expr(&local_7322368, lp_731416_731471_733647));; 
-+pair_type local_7321075; 
-+return_direct_with_clo1(data,(closure)&c_7321004,__lambda_1363,  set_cell_as_expr(&local_7321075, lp_731417_731472_733307));; 
++pair_type local_7321068; 
++return_direct_with_clo1(data,(closure)&c_7320997,__lambda_1363,  set_cell_as_expr(&local_7321068, lp_731416_731471_733300));; 
  }
  
 -static void __lambda_1410(void *data, object self_7313903, int argc, object *args) /* object self_7313903, object lp_731416_731471_733647 */
-+static void __lambda_1363(void *data, object self_7312657, int argc, object *args) /* object self_7312657, object lp_731417_731472_733307 */
++static void __lambda_1363(void *data, object self_7312650, int argc, object *args) /* object self_7312650, object lp_731416_731471_733300 */
   {
 - object lp_731416_731471_733647 = args[0];
-+ object lp_731417_731472_733307 = args[0];
++ object lp_731416_731471_733300 = args[0];
    
 -closureN_type c_7322299;
 -object e_7322347 [9];
@@ -32901,24 +33072,24 @@ Make let-values be the same as let*-values, to work around
 -c_7322299.elements[6] = ((closureN)self_7313903)->elements[6];
 -c_7322299.elements[7] = ((closureN)self_7313903)->elements[7];
 -c_7322299.elements[8] = ((closureN)self_7313903)->elements[8];
-+closureN_type c_7321006;
-+object e_7321054 [9];
-+c_7321006.hdr.mark = gc_color_red;
-+ c_7321006.hdr.grayed = 0;
-+c_7321006.tag = closureN_tag;
-+ c_7321006.fn = (function_type)__lambda_896;
-+c_7321006.num_args = 1;
-+c_7321006.num_elements = 9;
-+c_7321006.elements = (object *)e_7321054;
-+c_7321006.elements[0] = ((closureN)self_7312657)->elements[0];
-+c_7321006.elements[1] = ((closureN)self_7312657)->elements[2];
-+c_7321006.elements[2] = ((closureN)self_7312657)->elements[3];
-+c_7321006.elements[3] = ((closureN)self_7312657)->elements[4];
-+c_7321006.elements[4] = ((closureN)self_7312657)->elements[5];
-+c_7321006.elements[5] = lp_731417_731472_733307;
-+c_7321006.elements[6] = ((closureN)self_7312657)->elements[6];
-+c_7321006.elements[7] = ((closureN)self_7312657)->elements[7];
-+c_7321006.elements[8] = ((closureN)self_7312657)->elements[8];
++closureN_type c_7320999;
++object e_7321047 [9];
++c_7320999.hdr.mark = gc_color_red;
++ c_7320999.hdr.grayed = 0;
++c_7320999.tag = closureN_tag;
++ c_7320999.fn = (function_type)__lambda_896;
++c_7320999.num_args = 1;
++c_7320999.num_elements = 9;
++c_7320999.elements = (object *)e_7321047;
++c_7320999.elements[0] = ((closureN)self_7312650)->elements[0];
++c_7320999.elements[1] = ((closureN)self_7312650)->elements[2];
++c_7320999.elements[2] = ((closureN)self_7312650)->elements[3];
++c_7320999.elements[3] = ((closureN)self_7312650)->elements[4];
++c_7320999.elements[4] = ((closureN)self_7312650)->elements[5];
++c_7320999.elements[5] = lp_731416_731471_733300;
++c_7320999.elements[6] = ((closureN)self_7312650)->elements[6];
++c_7320999.elements[7] = ((closureN)self_7312650)->elements[7];
++c_7320999.elements[8] = ((closureN)self_7312650)->elements[8];
  
  
 -closureN_type c_7322348;
@@ -32933,52 +33104,52 @@ Make let-values be the same as let*-values, to work around
 -c_7322348.elements[0] = ((closureN)self_7313903)->elements[0];
 -c_7322348.elements[1] = ((closureN)self_7313903)->elements[1];
 -c_7322348.elements[2] = lp_731416_731471_733647;
-+closureN_type c_7321055;
-+object e_7321071 [3];
-+c_7321055.hdr.mark = gc_color_red;
-+ c_7321055.hdr.grayed = 0;
-+c_7321055.tag = closureN_tag;
-+ c_7321055.fn = (function_type)__lambda_902;
-+c_7321055.num_args = 2;
-+c_7321055.num_elements = 3;
-+c_7321055.elements = (object *)e_7321071;
-+c_7321055.elements[0] = ((closureN)self_7312657)->elements[0];
-+c_7321055.elements[1] = ((closureN)self_7312657)->elements[1];
-+c_7321055.elements[2] = lp_731417_731472_733307;
++closureN_type c_7321048;
++object e_7321064 [3];
++c_7321048.hdr.mark = gc_color_red;
++ c_7321048.hdr.grayed = 0;
++c_7321048.tag = closureN_tag;
++ c_7321048.fn = (function_type)__lambda_902;
++c_7321048.num_args = 2;
++c_7321048.num_elements = 3;
++c_7321048.elements = (object *)e_7321064;
++c_7321048.elements[0] = ((closureN)self_7312650)->elements[0];
++c_7321048.elements[1] = ((closureN)self_7312650)->elements[1];
++c_7321048.elements[2] = lp_731416_731471_733300;
  
 -return_direct_with_clo1(data,(closure)&c_7322299,__lambda_896,  &c_7322348);; 
-+return_direct_with_clo1(data,(closure)&c_7321006,__lambda_896,  &c_7321055);; 
++return_direct_with_clo1(data,(closure)&c_7320999,__lambda_896,  &c_7321048);; 
  }
  
 -static void __lambda_902(void *data, object self_7313904, int argc, object *args) /* object self_7313904, object k_736375, object d_731472_733648, object many_731473_733649 */
-+static void __lambda_902(void *data, object self_7312658, int argc, object *args) /* object self_7312658, object k_735930, object d_731473_733308, object many_731474_733309 */
++static void __lambda_902(void *data, object self_7312651, int argc, object *args) /* object self_7312651, object k_735923, object d_731472_733301, object many_731473_733302 */
   {
 - object k_736375 = args[0]; object d_731472_733648 = args[1]; object many_731473_733649 = args[2];
-+ object k_735930 = args[0]; object d_731473_733308 = args[1]; object many_731474_733309 = args[2];
++ object k_735923 = args[0]; object d_731472_733301 = args[1]; object many_731473_733302 = args[2];
      
 -if( (boolean_f != Cyc_num_fast_eq_op(data, d_731472_733648, obj_int2obj(1))) ){ 
 -  return_direct_with_clo1(data,  k_736375, (((closure)  k_736375)->fn),  many_731473_733649);
-+if( (boolean_f != Cyc_num_fast_eq_op(data, d_731473_733308, obj_int2obj(1))) ){ 
-+  return_direct_with_clo1(data,  k_735930, (((closure)  k_735930)->fn),  many_731474_733309);
++if( (boolean_f != Cyc_num_fast_eq_op(data, d_731472_733301, obj_int2obj(1))) ){ 
++  return_direct_with_clo1(data,  k_735923, (((closure)  k_735923)->fn),  many_731473_733302);
  } else { 
    
  
  
 -complex_num_type local_7322358; 
-+complex_num_type local_7321065; 
++complex_num_type local_7321058; 
  
 -list_3_type local_7322361; 
 -return_closcall3(data,  car(((closureN)self_7313904)->elements[2]),  k_736375, Cyc_fast_sub(data,&local_7322358, d_731472_733648, obj_int2obj(1)), Cyc_fast_list_3(&local_7322361, ((closureN)self_7313904)->elements[1], ((closureN)self_7313904)->elements[0], many_731473_733649));}
-+list_3_type local_7321068; 
-+return_closcall3(data,  car(((closureN)self_7312658)->elements[2]),  k_735930, Cyc_fast_sub(data,&local_7321065, d_731473_733308, obj_int2obj(1)), Cyc_fast_list_3(&local_7321068, ((closureN)self_7312658)->elements[1], ((closureN)self_7312658)->elements[0], many_731474_733309));}
++list_3_type local_7321061; 
++return_closcall3(data,  car(((closureN)self_7312651)->elements[2]),  k_735923, Cyc_fast_sub(data,&local_7321058, d_731472_733301, obj_int2obj(1)), Cyc_fast_list_3(&local_7321061, ((closureN)self_7312651)->elements[1], ((closureN)self_7312651)->elements[0], many_731473_733302));}
  ;; 
  }
  
 -static void __lambda_896(void *data, object self_7313905, int argc, object *args) /* object self_7313905, object r_736374 */
-+static void __lambda_896(void *data, object self_7312659, int argc, object *args) /* object self_7312659, object r_735929 */
++static void __lambda_896(void *data, object self_7312652, int argc, object *args) /* object self_7312652, object r_735922 */
   {
 - object r_736374 = args[0];
-+ object r_735929 = args[0];
++ object r_735922 = args[0];
    
 -closureN_type c_7322301;
 -object e_7322343 [9];
@@ -32998,33 +33169,33 @@ Make let-values be the same as let*-values, to work around
 -c_7322301.elements[6] = ((closureN)self_7313905)->elements[6];
 -c_7322301.elements[7] = ((closureN)self_7313905)->elements[7];
 -c_7322301.elements[8] = ((closureN)self_7313905)->elements[8];
-+closureN_type c_7321008;
-+object e_7321050 [9];
-+c_7321008.hdr.mark = gc_color_red;
-+ c_7321008.hdr.grayed = 0;
-+c_7321008.tag = closureN_tag;
-+ c_7321008.fn = (function_type)__lambda_897;
-+c_7321008.num_args = 1;
-+c_7321008.num_elements = 9;
-+c_7321008.elements = (object *)e_7321050;
-+c_7321008.elements[0] = ((closureN)self_7312659)->elements[0];
-+c_7321008.elements[1] = ((closureN)self_7312659)->elements[1];
-+c_7321008.elements[2] = ((closureN)self_7312659)->elements[2];
-+c_7321008.elements[3] = ((closureN)self_7312659)->elements[3];
-+c_7321008.elements[4] = ((closureN)self_7312659)->elements[4];
-+c_7321008.elements[5] = ((closureN)self_7312659)->elements[5];
-+c_7321008.elements[6] = ((closureN)self_7312659)->elements[6];
-+c_7321008.elements[7] = ((closureN)self_7312659)->elements[7];
-+c_7321008.elements[8] = ((closureN)self_7312659)->elements[8];
++closureN_type c_7321001;
++object e_7321043 [9];
++c_7321001.hdr.mark = gc_color_red;
++ c_7321001.hdr.grayed = 0;
++c_7321001.tag = closureN_tag;
++ c_7321001.fn = (function_type)__lambda_897;
++c_7321001.num_args = 1;
++c_7321001.num_elements = 9;
++c_7321001.elements = (object *)e_7321043;
++c_7321001.elements[0] = ((closureN)self_7312652)->elements[0];
++c_7321001.elements[1] = ((closureN)self_7312652)->elements[1];
++c_7321001.elements[2] = ((closureN)self_7312652)->elements[2];
++c_7321001.elements[3] = ((closureN)self_7312652)->elements[3];
++c_7321001.elements[4] = ((closureN)self_7312652)->elements[4];
++c_7321001.elements[5] = ((closureN)self_7312652)->elements[5];
++c_7321001.elements[6] = ((closureN)self_7312652)->elements[6];
++c_7321001.elements[7] = ((closureN)self_7312652)->elements[7];
++c_7321001.elements[8] = ((closureN)self_7312652)->elements[8];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7322301,__lambda_897,  Cyc_set_cell(data, ((closureN)self_7313905)->elements[5], r_736374));; 
-+return_direct_with_clo1(data,(closure)&c_7321008,__lambda_897,  Cyc_set_cell(data, ((closureN)self_7312659)->elements[5], r_735929));; 
++return_direct_with_clo1(data,(closure)&c_7321001,__lambda_897,  Cyc_set_cell(data, ((closureN)self_7312652)->elements[5], r_735922));; 
  }
  
 -static void __lambda_897(void *data, object self_7313906, int argc, object *args) /* object self_7313906, object r_736373 */
-+static void __lambda_897(void *data, object self_7312660, int argc, object *args) /* object self_7312660, object r_735928 */
++static void __lambda_897(void *data, object self_7312653, int argc, object *args) /* object self_7312653, object r_735921 */
   {
  
    
@@ -33045,31 +33216,31 @@ Make let-values be the same as let*-values, to work around
 -c_7322306.elements[3] = ((closureN)self_7313906)->elements[4];
 -c_7322306.elements[4] = ((closureN)self_7313906)->elements[6];
 -c_7322306.elements[5] = ((closureN)self_7313906)->elements[8];
-+closureN_type c_7321013;
-+object e_7321047 [6];
-+c_7321013.hdr.mark = gc_color_red;
-+ c_7321013.hdr.grayed = 0;
-+c_7321013.tag = closureN_tag;
-+ c_7321013.fn = (function_type)__lambda_898;
-+c_7321013.num_args = 1;
-+c_7321013.num_elements = 6;
-+c_7321013.elements = (object *)e_7321047;
-+c_7321013.elements[0] = ((closureN)self_7312660)->elements[0];
-+c_7321013.elements[1] = ((closureN)self_7312660)->elements[2];
-+c_7321013.elements[2] = ((closureN)self_7312660)->elements[3];
-+c_7321013.elements[3] = ((closureN)self_7312660)->elements[4];
-+c_7321013.elements[4] = ((closureN)self_7312660)->elements[6];
-+c_7321013.elements[5] = ((closureN)self_7312660)->elements[8];
++closureN_type c_7321006;
++object e_7321040 [6];
++c_7321006.hdr.mark = gc_color_red;
++ c_7321006.hdr.grayed = 0;
++c_7321006.tag = closureN_tag;
++ c_7321006.fn = (function_type)__lambda_898;
++c_7321006.num_args = 1;
++c_7321006.num_elements = 6;
++c_7321006.elements = (object *)e_7321040;
++c_7321006.elements[0] = ((closureN)self_7312653)->elements[0];
++c_7321006.elements[1] = ((closureN)self_7312653)->elements[2];
++c_7321006.elements[2] = ((closureN)self_7312653)->elements[3];
++c_7321006.elements[3] = ((closureN)self_7312653)->elements[4];
++c_7321006.elements[4] = ((closureN)self_7312653)->elements[6];
++c_7321006.elements[5] = ((closureN)self_7312653)->elements[8];
  
 -return_closcall3(data,  car(((closureN)self_7313906)->elements[5]),  &c_7322306, ((closureN)self_7313906)->elements[1], ((closureN)self_7313906)->elements[7]);; 
-+return_closcall3(data,  car(((closureN)self_7312660)->elements[5]),  &c_7321013, ((closureN)self_7312660)->elements[1], ((closureN)self_7312660)->elements[7]);; 
++return_closcall3(data,  car(((closureN)self_7312653)->elements[5]),  &c_7321006, ((closureN)self_7312653)->elements[1], ((closureN)self_7312653)->elements[7]);; 
  }
  
 -static void __lambda_898(void *data, object self_7313907, int argc, object *args) /* object self_7313907, object many_731465_733644 */
-+static void __lambda_898(void *data, object self_7312661, int argc, object *args) /* object self_7312661, object many_731466_733304 */
++static void __lambda_898(void *data, object self_7312654, int argc, object *args) /* object self_7312654, object many_731465_733297 */
   {
 - object many_731465_733644 = args[0];
-+ object many_731466_733304 = args[0];
++ object many_731465_733297 = args[0];
    
  
  
@@ -33089,37 +33260,37 @@ Make let-values be the same as let*-values, to work around
 -c_7322311.elements[4] = ((closureN)self_7313907)->elements[4];
 -c_7322311.elements[5] = many_731465_733644;
 -c_7322311.elements[6] = ((closureN)self_7313907)->elements[5];
-+closureN_type c_7321018;
-+object e_7321045 [7];
-+c_7321018.hdr.mark = gc_color_red;
-+ c_7321018.hdr.grayed = 0;
-+c_7321018.tag = closureN_tag;
-+ c_7321018.fn = (function_type)__lambda_899;
-+c_7321018.num_args = 1;
-+c_7321018.num_elements = 7;
-+c_7321018.elements = (object *)e_7321045;
-+c_7321018.elements[0] = ((closureN)self_7312661)->elements[0];
-+c_7321018.elements[1] = ((closureN)self_7312661)->elements[1];
-+c_7321018.elements[2] = ((closureN)self_7312661)->elements[2];
-+c_7321018.elements[3] = ((closureN)self_7312661)->elements[3];
-+c_7321018.elements[4] = ((closureN)self_7312661)->elements[4];
-+c_7321018.elements[5] = many_731466_733304;
-+c_7321018.elements[6] = ((closureN)self_7312661)->elements[5];
++closureN_type c_7321011;
++object e_7321038 [7];
++c_7321011.hdr.mark = gc_color_red;
++ c_7321011.hdr.grayed = 0;
++c_7321011.tag = closureN_tag;
++ c_7321011.fn = (function_type)__lambda_899;
++c_7321011.num_args = 1;
++c_7321011.num_elements = 7;
++c_7321011.elements = (object *)e_7321038;
++c_7321011.elements[0] = ((closureN)self_7312654)->elements[0];
++c_7321011.elements[1] = ((closureN)self_7312654)->elements[1];
++c_7321011.elements[2] = ((closureN)self_7312654)->elements[2];
++c_7321011.elements[3] = ((closureN)self_7312654)->elements[3];
++c_7321011.elements[4] = ((closureN)self_7312654)->elements[4];
++c_7321011.elements[5] = many_731465_733297;
++c_7321011.elements[6] = ((closureN)self_7312654)->elements[5];
  
 -return_closcall2(data,  car(((closureN)self_7313907)->elements[2]),  &c_7322311, ((closureN)self_7313907)->elements[5]);; 
-+return_closcall2(data,  car(((closureN)self_7312661)->elements[2]),  &c_7321018, ((closureN)self_7312661)->elements[5]);; 
++return_closcall2(data,  car(((closureN)self_7312654)->elements[2]),  &c_7321011, ((closureN)self_7312654)->elements[5]);; 
  }
  
 -static void __lambda_899(void *data, object self_7313908, int argc, object *args) /* object self_7313908, object r_736372 */
-+static void __lambda_899(void *data, object self_7312662, int argc, object *args) /* object self_7312662, object r_735927 */
++static void __lambda_899(void *data, object self_7312655, int argc, object *args) /* object self_7312655, object r_735920 */
   {
 - object r_736372 = args[0];
-+ object r_735927 = args[0];
++ object r_735920 = args[0];
      
 -if( (boolean_f != Cyc_is_null(r_736372)) ){ 
 -  return_direct_with_clo1(data,  ((closureN)self_7313908)->elements[3], (((closure)  ((closureN)self_7313908)->elements[3])->fn),  ((closureN)self_7313908)->elements[5]);
-+if( (boolean_f != Cyc_is_null(r_735927)) ){ 
-+  return_direct_with_clo1(data,  ((closureN)self_7312662)->elements[3], (((closure)  ((closureN)self_7312662)->elements[3])->fn),  ((closureN)self_7312662)->elements[5]);
++if( (boolean_f != Cyc_is_null(r_735920)) ){ 
++  return_direct_with_clo1(data,  ((closureN)self_7312655)->elements[3], (((closure)  ((closureN)self_7312655)->elements[3])->fn),  ((closureN)self_7312655)->elements[5]);
  } else { 
    
  
@@ -33138,31 +33309,31 @@ Make let-values be the same as let*-values, to work around
 -c_7322321.elements[2] = ((closureN)self_7313908)->elements[3];
 -c_7322321.elements[3] = ((closureN)self_7313908)->elements[4];
 -c_7322321.elements[4] = ((closureN)self_7313908)->elements[5];
-+closureN_type c_7321028;
-+object e_7321043 [5];
-+c_7321028.hdr.mark = gc_color_red;
-+ c_7321028.hdr.grayed = 0;
-+c_7321028.tag = closureN_tag;
-+ c_7321028.fn = (function_type)__lambda_900;
-+c_7321028.num_args = 1;
-+c_7321028.num_elements = 5;
-+c_7321028.elements = (object *)e_7321043;
-+c_7321028.elements[0] = ((closureN)self_7312662)->elements[0];
-+c_7321028.elements[1] = ((closureN)self_7312662)->elements[1];
-+c_7321028.elements[2] = ((closureN)self_7312662)->elements[3];
-+c_7321028.elements[3] = ((closureN)self_7312662)->elements[4];
-+c_7321028.elements[4] = ((closureN)self_7312662)->elements[5];
++closureN_type c_7321021;
++object e_7321036 [5];
++c_7321021.hdr.mark = gc_color_red;
++ c_7321021.hdr.grayed = 0;
++c_7321021.tag = closureN_tag;
++ c_7321021.fn = (function_type)__lambda_900;
++c_7321021.num_args = 1;
++c_7321021.num_elements = 5;
++c_7321021.elements = (object *)e_7321036;
++c_7321021.elements[0] = ((closureN)self_7312655)->elements[0];
++c_7321021.elements[1] = ((closureN)self_7312655)->elements[1];
++c_7321021.elements[2] = ((closureN)self_7312655)->elements[3];
++c_7321021.elements[3] = ((closureN)self_7312655)->elements[4];
++c_7321021.elements[4] = ((closureN)self_7312655)->elements[5];
  
 -return_closcall2(data,  car(((closureN)self_7313908)->elements[2]),  &c_7322321, ((closureN)self_7313908)->elements[6]);}
-+return_closcall2(data,  car(((closureN)self_7312662)->elements[2]),  &c_7321028, ((closureN)self_7312662)->elements[6]);}
++return_closcall2(data,  car(((closureN)self_7312655)->elements[2]),  &c_7321021, ((closureN)self_7312655)->elements[6]);}
  ;; 
  }
  
 -static void __lambda_900(void *data, object self_7313909, int argc, object *args) /* object self_7313909, object r_736371 */
-+static void __lambda_900(void *data, object self_7312663, int argc, object *args) /* object self_7312663, object r_735926 */
++static void __lambda_900(void *data, object self_7312656, int argc, object *args) /* object self_7312656, object r_735919 */
   {
 - object r_736371 = args[0];
-+ object r_735926 = args[0];
++ object r_735919 = args[0];
    
  
  
@@ -33178,40 +33349,40 @@ Make let-values be the same as let*-values, to work around
 -c_7322326.elements[0] = ((closureN)self_7313909)->elements[0];
 -c_7322326.elements[1] = ((closureN)self_7313909)->elements[2];
 -c_7322326.elements[2] = ((closureN)self_7313909)->elements[4];
-+closureN_type c_7321033;
-+object e_7321041 [3];
-+c_7321033.hdr.mark = gc_color_red;
-+ c_7321033.hdr.grayed = 0;
-+c_7321033.tag = closureN_tag;
-+ c_7321033.fn = (function_type)__lambda_901;
-+c_7321033.num_args = 1;
-+c_7321033.num_elements = 3;
-+c_7321033.elements = (object *)e_7321041;
-+c_7321033.elements[0] = ((closureN)self_7312663)->elements[0];
-+c_7321033.elements[1] = ((closureN)self_7312663)->elements[2];
-+c_7321033.elements[2] = ((closureN)self_7312663)->elements[4];
++closureN_type c_7321026;
++object e_7321034 [3];
++c_7321026.hdr.mark = gc_color_red;
++ c_7321026.hdr.grayed = 0;
++c_7321026.tag = closureN_tag;
++ c_7321026.fn = (function_type)__lambda_901;
++c_7321026.num_args = 1;
++c_7321026.num_elements = 3;
++c_7321026.elements = (object *)e_7321034;
++c_7321026.elements[0] = ((closureN)self_7312656)->elements[0];
++c_7321026.elements[1] = ((closureN)self_7312656)->elements[2];
++c_7321026.elements[2] = ((closureN)self_7312656)->elements[4];
  
 -return_closcall3(data,  car(((closureN)self_7313909)->elements[3]),  &c_7322326, r_736371, ((closureN)self_7313909)->elements[1]);; 
-+return_closcall3(data,  car(((closureN)self_7312663)->elements[3]),  &c_7321033, r_735926, ((closureN)self_7312663)->elements[1]);; 
++return_closcall3(data,  car(((closureN)self_7312656)->elements[3]),  &c_7321026, r_735919, ((closureN)self_7312656)->elements[1]);; 
  }
  
 -static void __lambda_901(void *data, object self_7313910, int argc, object *args) /* object self_7313910, object r_736370 */
-+static void __lambda_901(void *data, object self_7312664, int argc, object *args) /* object self_7312664, object r_735925 */
++static void __lambda_901(void *data, object self_7312657, int argc, object *args) /* object self_7312657, object r_735918 */
   {
 - object r_736370 = args[0];
-+ object r_735925 = args[0];
++ object r_735918 = args[0];
    
 -list_3_type local_7322331; 
 -return_direct_with_clo1(data,  ((closureN)self_7313910)->elements[1], (((closure)  ((closureN)self_7313910)->elements[1])->fn),  Cyc_fast_list_3(&local_7322331, ((closureN)self_7313910)->elements[0], ((closureN)self_7313910)->elements[2], r_736370));; 
-+list_3_type local_7321038; 
-+return_direct_with_clo1(data,  ((closureN)self_7312664)->elements[1], (((closure)  ((closureN)self_7312664)->elements[1])->fn),  Cyc_fast_list_3(&local_7321038, ((closureN)self_7312664)->elements[0], ((closureN)self_7312664)->elements[2], r_735925));; 
++list_3_type local_7321031; 
++return_direct_with_clo1(data,  ((closureN)self_7312657)->elements[1], (((closure)  ((closureN)self_7312657)->elements[1])->fn),  Cyc_fast_list_3(&local_7321031, ((closureN)self_7312657)->elements[0], ((closureN)self_7312657)->elements[2], r_735918));; 
  }
  
 -static void __lambda_889(void *data, object self_7313911, int argc, object *args) /* object self_7313911, object k_736379 */
-+static void __lambda_889(void *data, object self_7312665, int argc, object *args) /* object self_7312665, object k_735934 */
++static void __lambda_889(void *data, object self_7312658, int argc, object *args) /* object self_7312658, object k_735927 */
   {
 - object k_736379 = args[0];
-+ object k_735934 = args[0];
++ object k_735927 = args[0];
    
 -closureN_type c_7322247;
 -object e_7322268 [3];
@@ -33225,18 +33396,18 @@ Make let-values be the same as let*-values, to work around
 -c_7322247.elements[0] = ((closureN)self_7313911)->elements[2];
 -c_7322247.elements[1] = ((closureN)self_7313911)->elements[3];
 -c_7322247.elements[2] = ((closureN)self_7313911)->elements[4];
-+closureN_type c_7320954;
-+object e_7320975 [3];
-+c_7320954.hdr.mark = gc_color_red;
-+ c_7320954.hdr.grayed = 0;
-+c_7320954.tag = closureN_tag;
-+ c_7320954.fn = (function_type)__lambda_890;
-+c_7320954.num_args = 0;
-+c_7320954.num_elements = 3;
-+c_7320954.elements = (object *)e_7320975;
-+c_7320954.elements[0] = ((closureN)self_7312665)->elements[2];
-+c_7320954.elements[1] = ((closureN)self_7312665)->elements[3];
-+c_7320954.elements[2] = ((closureN)self_7312665)->elements[4];
++closureN_type c_7320947;
++object e_7320968 [3];
++c_7320947.hdr.mark = gc_color_red;
++ c_7320947.hdr.grayed = 0;
++c_7320947.tag = closureN_tag;
++ c_7320947.fn = (function_type)__lambda_890;
++c_7320947.num_args = 0;
++c_7320947.num_elements = 3;
++c_7320947.elements = (object *)e_7320968;
++c_7320947.elements[0] = ((closureN)self_7312658)->elements[2];
++c_7320947.elements[1] = ((closureN)self_7312658)->elements[3];
++c_7320947.elements[2] = ((closureN)self_7312658)->elements[4];
  
  
 -closureN_type c_7322269;
@@ -33253,58 +33424,58 @@ Make let-values be the same as let*-values, to work around
 -c_7322269.elements[2] = ((closureN)self_7313911)->elements[2];
 -c_7322269.elements[3] = k_736379;
 -c_7322269.elements[4] = ((closureN)self_7313911)->elements[3];
-+closureN_type c_7320976;
-+object e_7320996 [5];
-+c_7320976.hdr.mark = gc_color_red;
-+ c_7320976.hdr.grayed = 0;
-+c_7320976.tag = closureN_tag;
-+ c_7320976.fn = (function_type)__lambda_892;
-+c_7320976.num_args = 1;
-+c_7320976.num_elements = 5;
-+c_7320976.elements = (object *)e_7320996;
-+c_7320976.elements[0] = ((closureN)self_7312665)->elements[0];
-+c_7320976.elements[1] = ((closureN)self_7312665)->elements[1];
-+c_7320976.elements[2] = ((closureN)self_7312665)->elements[2];
-+c_7320976.elements[3] = k_735934;
-+c_7320976.elements[4] = ((closureN)self_7312665)->elements[3];
++closureN_type c_7320969;
++object e_7320989 [5];
++c_7320969.hdr.mark = gc_color_red;
++ c_7320969.hdr.grayed = 0;
++c_7320969.tag = closureN_tag;
++ c_7320969.fn = (function_type)__lambda_892;
++c_7320969.num_args = 1;
++c_7320969.num_elements = 5;
++c_7320969.elements = (object *)e_7320989;
++c_7320969.elements[0] = ((closureN)self_7312658)->elements[0];
++c_7320969.elements[1] = ((closureN)self_7312658)->elements[1];
++c_7320969.elements[2] = ((closureN)self_7312658)->elements[2];
++c_7320969.elements[3] = k_735927;
++c_7320969.elements[4] = ((closureN)self_7312658)->elements[3];
  
 -return_direct_with_clo1(data,(closure)&c_7322247,__lambda_890,  &c_7322269);; 
-+return_direct_with_clo1(data,(closure)&c_7320954,__lambda_890,  &c_7320976);; 
++return_direct_with_clo1(data,(closure)&c_7320947,__lambda_890,  &c_7320969);; 
  }
  
 -static void __lambda_892(void *data, object self_7313912, int argc, object *args) /* object self_7313912, object r_736380 */
-+static void __lambda_892(void *data, object self_7312666, int argc, object *args) /* object self_7312666, object r_735935 */
++static void __lambda_892(void *data, object self_7312659, int argc, object *args) /* object self_7312659, object r_735928 */
   {
 - object r_736380 = args[0];
 -  if( (boolean_f != r_736380) ){ 
 -  return_direct_with_clo1(data,  ((closureN)self_7313912)->elements[3], (((closure)  ((closureN)self_7313912)->elements[3])->fn),  ((closureN)self_7313912)->elements[4]);
-+ object r_735935 = args[0];
-+  if( (boolean_f != r_735935) ){ 
-+  return_direct_with_clo1(data,  ((closureN)self_7312666)->elements[3], (((closure)  ((closureN)self_7312666)->elements[3])->fn),  ((closureN)self_7312666)->elements[4]);
++ object r_735928 = args[0];
++  if( (boolean_f != r_735928) ){ 
++  return_direct_with_clo1(data,  ((closureN)self_7312659)->elements[3], (((closure)  ((closureN)self_7312659)->elements[3])->fn),  ((closureN)self_7312659)->elements[4]);
  } else { 
    
 -pair_type local_7322277; 
-+pair_type local_7320984; 
++pair_type local_7320977; 
  
 -pair_type local_7322281; 
-+pair_type local_7320988; 
++pair_type local_7320981; 
  
 -list_3_type local_7322284; 
 -return_direct_with_clo1(data,  ((closureN)self_7313912)->elements[3], (((closure)  ((closureN)self_7313912)->elements[3])->fn),  set_pair_as_expr(&local_7322277, ((closureN)self_7313912)->elements[1], set_pair_as_expr(&local_7322281, Cyc_fast_list_3(&local_7322284, ((closureN)self_7313912)->elements[0], ((closureN)self_7313912)->elements[2], ((closureN)self_7313912)->elements[4]), ((closureN)self_7313912)->elements[2])));}
-+list_3_type local_7320991; 
-+return_direct_with_clo1(data,  ((closureN)self_7312666)->elements[3], (((closure)  ((closureN)self_7312666)->elements[3])->fn),  set_pair_as_expr(&local_7320984, ((closureN)self_7312666)->elements[1], set_pair_as_expr(&local_7320988, Cyc_fast_list_3(&local_7320991, ((closureN)self_7312666)->elements[0], ((closureN)self_7312666)->elements[2], ((closureN)self_7312666)->elements[4]), ((closureN)self_7312666)->elements[2])));}
++list_3_type local_7320984; 
++return_direct_with_clo1(data,  ((closureN)self_7312659)->elements[3], (((closure)  ((closureN)self_7312659)->elements[3])->fn),  set_pair_as_expr(&local_7320977, ((closureN)self_7312659)->elements[1], set_pair_as_expr(&local_7320981, Cyc_fast_list_3(&local_7320984, ((closureN)self_7312659)->elements[0], ((closureN)self_7312659)->elements[2], ((closureN)self_7312659)->elements[4]), ((closureN)self_7312659)->elements[2])));}
  ;; 
  }
  
 -static void __lambda_890(void *data, object self_7313913, int argc, object *args) /* object self_7313913, object k_736383 */
-+static void __lambda_890(void *data, object self_7312667, int argc, object *args) /* object self_7312667, object k_735938 */
++static void __lambda_890(void *data, object self_7312660, int argc, object *args) /* object self_7312660, object k_735931 */
   {
 - object k_736383 = args[0];
-+ object k_735938 = args[0];
++ object k_735931 = args[0];
      
    
 -if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_7313913)->elements[0]))) ){ 
-+if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_7312667)->elements[0]))) ){ 
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_7312660)->elements[0]))) ){ 
    
 -closureN_type c_7322254;
 -object e_7322265 [3];
@@ -33318,127 +33489,127 @@ Make let-values be the same as let*-values, to work around
 -c_7322254.elements[0] = k_736383;
 -c_7322254.elements[1] = ((closureN)self_7313913)->elements[1];
 -c_7322254.elements[2] = ((closureN)self_7313913)->elements[2];
-+closureN_type c_7320961;
-+object e_7320972 [3];
-+c_7320961.hdr.mark = gc_color_red;
-+ c_7320961.hdr.grayed = 0;
-+c_7320961.tag = closureN_tag;
-+ c_7320961.fn = (function_type)__lambda_891;
-+c_7320961.num_args = 1;
-+c_7320961.num_elements = 3;
-+c_7320961.elements = (object *)e_7320972;
-+c_7320961.elements[0] = k_735938;
-+c_7320961.elements[1] = ((closureN)self_7312667)->elements[1];
-+c_7320961.elements[2] = ((closureN)self_7312667)->elements[2];
++closureN_type c_7320954;
++object e_7320965 [3];
++c_7320954.hdr.mark = gc_color_red;
++ c_7320954.hdr.grayed = 0;
++c_7320954.tag = closureN_tag;
++ c_7320954.fn = (function_type)__lambda_891;
++c_7320954.num_args = 1;
++c_7320954.num_elements = 3;
++c_7320954.elements = (object *)e_7320965;
++c_7320954.elements[0] = k_735931;
++c_7320954.elements[1] = ((closureN)self_7312660)->elements[1];
++c_7320954.elements[2] = ((closureN)self_7312660)->elements[2];
  
 -return_direct_with_clo2(data,  __glo_identifier_127_scheme_base, (((closure)  __glo_identifier_127_scheme_base)->fn),  &c_7322254, ((closureN)self_7313913)->elements[1]);
-+return_direct_with_clo2(data,  __glo_identifier_127_scheme_base, (((closure)  __glo_identifier_127_scheme_base)->fn),  &c_7320961, ((closureN)self_7312667)->elements[1]);
++return_direct_with_clo2(data,  __glo_identifier_127_scheme_base, (((closure)  __glo_identifier_127_scheme_base)->fn),  &c_7320954, ((closureN)self_7312660)->elements[1]);
  } else { 
 -  return_direct_with_clo1(data,  k_736383, (((closure)  k_736383)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_735938, (((closure)  k_735938)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_735931, (((closure)  k_735931)->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_891(void *data, object self_7313914, int argc, object *args) /* object self_7313914, object r_736385 */
-+static void __lambda_891(void *data, object self_7312668, int argc, object *args) /* object self_7312668, object r_735940 */
++static void __lambda_891(void *data, object self_7312661, int argc, object *args) /* object self_7312661, object r_735933 */
   {
 - object r_736385 = args[0];
 -  if( (boolean_f != r_736385) ){ 
-+ object r_735940 = args[0];
-+  if( (boolean_f != r_735940) ){ 
++ object r_735933 = args[0];
++  if( (boolean_f != r_735933) ){ 
    
  
  
  
 -return_direct_with_clo1(data,  ((closureN)self_7313914)->elements[0], (((closure)  ((closureN)self_7313914)->elements[0])->fn),  Cyc_eq(((closureN)self_7313914)->elements[1], Cyc_car(data, ((closureN)self_7313914)->elements[2])));
-+return_direct_with_clo1(data,  ((closureN)self_7312668)->elements[0], (((closure)  ((closureN)self_7312668)->elements[0])->fn),  Cyc_eq(((closureN)self_7312668)->elements[1], Cyc_car(data, ((closureN)self_7312668)->elements[2])));
++return_direct_with_clo1(data,  ((closureN)self_7312661)->elements[0], (((closure)  ((closureN)self_7312661)->elements[0])->fn),  Cyc_eq(((closureN)self_7312661)->elements[1], Cyc_car(data, ((closureN)self_7312661)->elements[2])));
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7313914)->elements[0], (((closure)  ((closureN)self_7313914)->elements[0])->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  ((closureN)self_7312668)->elements[0], (((closure)  ((closureN)self_7312668)->elements[0])->fn),  boolean_f);}
++  return_direct_with_clo1(data,  ((closureN)self_7312661)->elements[0], (((closure)  ((closureN)self_7312661)->elements[0])->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_885(void *data, object self_7313915, int argc, object *args) /* object self_7313915, object k_736389 */
-+static void __lambda_885(void *data, object self_7312669, int argc, object *args) /* object self_7312669, object k_735944 */
++static void __lambda_885(void *data, object self_7312662, int argc, object *args) /* object self_7312662, object k_735937 */
   {
 - object k_736389 = args[0];
-+ object k_735944 = args[0];
++ object k_735937 = args[0];
      
    
    
 -if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313915)->elements[0])))) ){ 
-+if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312669)->elements[0])))) ){ 
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312662)->elements[0])))) ){ 
    
  
 -return_direct_with_clo2(data,  __glo_identifier_127_scheme_base, (((closure)  __glo_identifier_127_scheme_base)->fn),  k_736389, Cyc_car(data, ((closureN)self_7313915)->elements[0]));
-+return_direct_with_clo2(data,  __glo_identifier_127_scheme_base, (((closure)  __glo_identifier_127_scheme_base)->fn),  k_735944, Cyc_car(data, ((closureN)self_7312669)->elements[0]));
++return_direct_with_clo2(data,  __glo_identifier_127_scheme_base, (((closure)  __glo_identifier_127_scheme_base)->fn),  k_735937, Cyc_car(data, ((closureN)self_7312662)->elements[0]));
  } else { 
 -  return_direct_with_clo1(data,  k_736389, (((closure)  k_736389)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_735944, (((closure)  k_735944)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_735937, (((closure)  k_735937)->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_880(void *data, object self_7313891, int argc, object *args) /* object self_7313891, object r_736353 */
-+static void __lambda_880(void *data, object self_7312645, int argc, object *args) /* object self_7312645, object r_735908 */
++static void __lambda_880(void *data, object self_7312638, int argc, object *args) /* object self_7312638, object r_735901 */
   {
 - object r_736353 = args[0];
-+ object r_735908 = args[0];
++ object r_735901 = args[0];
    
 -list_2_type local_7322182; 
 -return_direct_with_clo1(data,  ((closureN)self_7313891)->elements[1], (((closure)  ((closureN)self_7313891)->elements[1])->fn),  Cyc_fast_list_2(&local_7322182, ((closureN)self_7313891)->elements[0], r_736353));; 
-+list_2_type local_7320889; 
-+return_direct_with_clo1(data,  ((closureN)self_7312645)->elements[1], (((closure)  ((closureN)self_7312645)->elements[1])->fn),  Cyc_fast_list_2(&local_7320889, ((closureN)self_7312645)->elements[0], r_735908));; 
++list_2_type local_7320882; 
++return_direct_with_clo1(data,  ((closureN)self_7312638)->elements[1], (((closure)  ((closureN)self_7312638)->elements[1])->fn),  Cyc_fast_list_2(&local_7320882, ((closureN)self_7312638)->elements[0], r_735901));; 
  }
  
 -static void __lambda_879(void *data, object self_7313892, int argc, object *args) /* object self_7313892, object k_736354 */
-+static void __lambda_879(void *data, object self_7312646, int argc, object *args) /* object self_7312646, object k_735909 */
++static void __lambda_879(void *data, object self_7312639, int argc, object *args) /* object self_7312639, object k_735902 */
   {
 - object k_736354 = args[0];
-+ object k_735909 = args[0];
++ object k_735902 = args[0];
      
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7313892)->elements[0]))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312646)->elements[0]))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312639)->elements[0]))) ){ 
      
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cddr(data, ((closureN)self_7313892)->elements[0]))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_cddr(data, ((closureN)self_7312646)->elements[0]))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_cddr(data, ((closureN)self_7312639)->elements[0]))) ){ 
    
  
 -return_direct_with_clo1(data,  k_736354,__lambda_880,  Cyc_cddr(data, ((closureN)self_7313892)->elements[0]));
-+return_direct_with_clo1(data,  k_735909,__lambda_880,  Cyc_cddr(data, ((closureN)self_7312646)->elements[0]));
++return_direct_with_clo1(data,  k_735902,__lambda_880,  Cyc_cddr(data, ((closureN)self_7312639)->elements[0]));
  } else { 
    
  
 -return_direct_with_clo1(data,  k_736354,__lambda_880,  Cyc_cadr(data, ((closureN)self_7313892)->elements[0]));}
-+return_direct_with_clo1(data,  k_735909,__lambda_880,  Cyc_cadr(data, ((closureN)self_7312646)->elements[0]));}
++return_direct_with_clo1(data,  k_735902,__lambda_880,  Cyc_cadr(data, ((closureN)self_7312639)->elements[0]));}
  ;
  } else { 
    
  
 -return_direct_with_clo1(data,  k_736354,__lambda_880,  Cyc_cdr(data, ((closureN)self_7313892)->elements[0]));}
-+return_direct_with_clo1(data,  k_735909,__lambda_880,  Cyc_cdr(data, ((closureN)self_7312646)->elements[0]));}
++return_direct_with_clo1(data,  k_735902,__lambda_880,  Cyc_cdr(data, ((closureN)self_7312639)->elements[0]));}
  ;; 
  }
  
 -static void __lambda_877(void *data, object self_7313886, int argc, object *args) /* object self_7313886, object k_736349, object v_731429_733638 */
-+static void __lambda_877(void *data, object self_7312640, int argc, object *args) /* object self_7312640, object k_735904, object v_731430_733298 */
++static void __lambda_877(void *data, object self_7312633, int argc, object *args) /* object self_7312633, object k_735897, object v_731429_733291 */
   {
 - object k_736349 = args[0]; object v_731429_733638 = args[1];
-+ object k_735904 = args[0]; object v_731430_733298 = args[1];
++ object k_735897 = args[0]; object v_731429_733291 = args[1];
    
  
  
  
 -return_direct_with_clo1(data,  k_736349, (((closure)  k_736349)->fn),  Cyc_eq(((closureN)self_7313886)->elements[0], Cyc_car(data, v_731429_733638)));; 
-+return_direct_with_clo1(data,  k_735904, (((closure)  k_735904)->fn),  Cyc_eq(((closureN)self_7312640)->elements[0], Cyc_car(data, v_731430_733298)));; 
++return_direct_with_clo1(data,  k_735897, (((closure)  k_735897)->fn),  Cyc_eq(((closureN)self_7312633)->elements[0], Cyc_car(data, v_731429_733291)));; 
  }
  
 -static void __lambda_874(void *data, object self_7313887, int argc, object *args) /* object self_7313887, object r_736348 */
-+static void __lambda_874(void *data, object self_7312641, int argc, object *args) /* object self_7312641, object r_735903 */
++static void __lambda_874(void *data, object self_7312634, int argc, object *args) /* object self_7312634, object r_735896 */
   {
 - object r_736348 = args[0];
-+ object r_735903 = args[0];
++ object r_735896 = args[0];
    
 -closureN_type c_7322107;
 -object e_7322133 [5];
@@ -33454,32 +33625,32 @@ Make let-values be the same as let*-values, to work around
 -c_7322107.elements[2] = ((closureN)self_7313887)->elements[2];
 -c_7322107.elements[3] = ((closureN)self_7313887)->elements[3];
 -c_7322107.elements[4] = ((closureN)self_7313887)->elements[4];
-+closureN_type c_7320814;
-+object e_7320840 [5];
-+c_7320814.hdr.mark = gc_color_red;
-+ c_7320814.hdr.grayed = 0;
-+c_7320814.tag = closureN_tag;
-+ c_7320814.fn = (function_type)__lambda_875;
-+c_7320814.num_args = 1;
-+c_7320814.num_elements = 5;
-+c_7320814.elements = (object *)e_7320840;
-+c_7320814.elements[0] = ((closureN)self_7312641)->elements[0];
-+c_7320814.elements[1] = ((closureN)self_7312641)->elements[1];
-+c_7320814.elements[2] = ((closureN)self_7312641)->elements[2];
-+c_7320814.elements[3] = ((closureN)self_7312641)->elements[3];
-+c_7320814.elements[4] = ((closureN)self_7312641)->elements[4];
++closureN_type c_7320807;
++object e_7320833 [5];
++c_7320807.hdr.mark = gc_color_red;
++ c_7320807.hdr.grayed = 0;
++c_7320807.tag = closureN_tag;
++ c_7320807.fn = (function_type)__lambda_875;
++c_7320807.num_args = 1;
++c_7320807.num_elements = 5;
++c_7320807.elements = (object *)e_7320833;
++c_7320807.elements[0] = ((closureN)self_7312634)->elements[0];
++c_7320807.elements[1] = ((closureN)self_7312634)->elements[1];
++c_7320807.elements[2] = ((closureN)self_7312634)->elements[2];
++c_7320807.elements[3] = ((closureN)self_7312634)->elements[3];
++c_7320807.elements[4] = ((closureN)self_7312634)->elements[4];
  
 -return_direct_with_clo3(data,  __glo_find_scheme_base, (((closure)  __glo_find_scheme_base)->fn),  &c_7322107, r_736348, ((closureN)self_7313887)->elements[5]);; 
-+return_direct_with_clo3(data,  __glo_find_scheme_base, (((closure)  __glo_find_scheme_base)->fn),  &c_7320814, r_735903, ((closureN)self_7312641)->elements[5]);; 
++return_direct_with_clo3(data,  __glo_find_scheme_base, (((closure)  __glo_find_scheme_base)->fn),  &c_7320807, r_735896, ((closureN)self_7312634)->elements[5]);; 
  }
  
 -static void __lambda_875(void *data, object self_7313888, int argc, object *args) /* object self_7313888, object tmp_731424_731426_733636 */
-+static void __lambda_875(void *data, object self_7312642, int argc, object *args) /* object self_7312642, object tmp_731425_731427_733296 */
++static void __lambda_875(void *data, object self_7312635, int argc, object *args) /* object self_7312635, object tmp_731424_731426_733289 */
   {
 - object tmp_731424_731426_733636 = args[0];
 -  if( (boolean_f != tmp_731424_731426_733636) ){ 
-+ object tmp_731425_731427_733296 = args[0];
-+  if( (boolean_f != tmp_731425_731427_733296) ){ 
++ object tmp_731424_731426_733289 = args[0];
++  if( (boolean_f != tmp_731424_731426_733289) ){ 
    
 -closureN_type c_7322109;
 -object e_7322121 [3];
@@ -33493,58 +33664,58 @@ Make let-values be the same as let*-values, to work around
 -c_7322109.elements[0] = ((closureN)self_7313888)->elements[2];
 -c_7322109.elements[1] = ((closureN)self_7313888)->elements[3];
 -c_7322109.elements[2] = ((closureN)self_7313888)->elements[4];
-+closureN_type c_7320816;
-+object e_7320828 [3];
-+c_7320816.hdr.mark = gc_color_red;
-+ c_7320816.hdr.grayed = 0;
-+c_7320816.tag = closureN_tag;
-+ c_7320816.fn = (function_type)__lambda_876;
-+c_7320816.num_args = 1;
-+c_7320816.num_elements = 3;
-+c_7320816.elements = (object *)e_7320828;
-+c_7320816.elements[0] = ((closureN)self_7312642)->elements[2];
-+c_7320816.elements[1] = ((closureN)self_7312642)->elements[3];
-+c_7320816.elements[2] = ((closureN)self_7312642)->elements[4];
++closureN_type c_7320809;
++object e_7320821 [3];
++c_7320809.hdr.mark = gc_color_red;
++ c_7320809.hdr.grayed = 0;
++c_7320809.tag = closureN_tag;
++ c_7320809.fn = (function_type)__lambda_876;
++c_7320809.num_args = 1;
++c_7320809.num_elements = 3;
++c_7320809.elements = (object *)e_7320821;
++c_7320809.elements[0] = ((closureN)self_7312635)->elements[2];
++c_7320809.elements[1] = ((closureN)self_7312635)->elements[3];
++c_7320809.elements[2] = ((closureN)self_7312635)->elements[4];
  
 -return_direct_with_clo1(data,(closure)&c_7322109,__lambda_876,  tmp_731424_731426_733636);
-+return_direct_with_clo1(data,(closure)&c_7320816,__lambda_876,  tmp_731425_731427_733296);
++return_direct_with_clo1(data,(closure)&c_7320809,__lambda_876,  tmp_731424_731426_733289);
  } else { 
    
 -list_2_type local_7322126; 
-+list_2_type local_7320833; 
++list_2_type local_7320826; 
  
 -list_2_type local_7322130; 
 -return_direct_with_clo1(data,  ((closureN)self_7313888)->elements[3], (((closure)  ((closureN)self_7313888)->elements[3])->fn),  Cyc_fast_list_2(&local_7322126, ((closureN)self_7313888)->elements[1], Cyc_fast_list_2(&local_7322130, ((closureN)self_7313888)->elements[0], ((closureN)self_7313888)->elements[4])));}
-+list_2_type local_7320837; 
-+return_direct_with_clo1(data,  ((closureN)self_7312642)->elements[3], (((closure)  ((closureN)self_7312642)->elements[3])->fn),  Cyc_fast_list_2(&local_7320833, ((closureN)self_7312642)->elements[1], Cyc_fast_list_2(&local_7320837, ((closureN)self_7312642)->elements[0], ((closureN)self_7312642)->elements[4])));}
++list_2_type local_7320830; 
++return_direct_with_clo1(data,  ((closureN)self_7312635)->elements[3], (((closure)  ((closureN)self_7312635)->elements[3])->fn),  Cyc_fast_list_2(&local_7320826, ((closureN)self_7312635)->elements[1], Cyc_fast_list_2(&local_7320830, ((closureN)self_7312635)->elements[0], ((closureN)self_7312635)->elements[4])));}
  ;; 
  }
  
 -static void __lambda_876(void *data, object self_7313889, int argc, object *args) /* object self_7313889, object cell_731427_733637 */
-+static void __lambda_876(void *data, object self_7312643, int argc, object *args) /* object self_7312643, object cell_731428_733297 */
++static void __lambda_876(void *data, object self_7312636, int argc, object *args) /* object self_7312636, object cell_731427_733290 */
   {
 - object cell_731427_733637 = args[0];
-+ object cell_731428_733297 = args[0];
++ object cell_731427_733290 = args[0];
      
    
 -if( (boolean_f != Cyc_num_fast_lte_op(data, Cyc_cdr(data, cell_731427_733637), ((closureN)self_7313889)->elements[0])) ){ 
 -  return_direct_with_clo1(data,  ((closureN)self_7313889)->elements[1], (((closure)  ((closureN)self_7313889)->elements[1])->fn),  ((closureN)self_7313889)->elements[2]);
-+if( (boolean_f != Cyc_num_fast_lte_op(data, Cyc_cdr(data, cell_731428_733297), ((closureN)self_7312643)->elements[0])) ){ 
-+  return_direct_with_clo1(data,  ((closureN)self_7312643)->elements[1], (((closure)  ((closureN)self_7312643)->elements[1])->fn),  ((closureN)self_7312643)->elements[2]);
++if( (boolean_f != Cyc_num_fast_lte_op(data, Cyc_cdr(data, cell_731427_733290), ((closureN)self_7312636)->elements[0])) ){ 
++  return_direct_with_clo1(data,  ((closureN)self_7312636)->elements[1], (((closure)  ((closureN)self_7312636)->elements[1])->fn),  ((closureN)self_7312636)->elements[2]);
  } else { 
    
 -make_utf8_string_with_len(c_7322120, "too few ...'s", 13, 13);
 -return_direct_with_clo2(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_7313889)->elements[1], &c_7322120);}
-+make_utf8_string_with_len(c_7320827, "too few ...'s", 13, 13);
-+return_direct_with_clo2(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_7312643)->elements[1], &c_7320827);}
++make_utf8_string_with_len(c_7320820, "too few ...'s", 13, 13);
++return_direct_with_clo2(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_7312636)->elements[1], &c_7320820);}
  ;; 
  }
  
 -static void __lambda_870(void *data, object self_7313922, int argc, object *args) /* object self_7313922, object r_736341 */
-+static void __lambda_870(void *data, object self_7312676, int argc, object *args) /* object self_7312676, object r_735896 */
++static void __lambda_870(void *data, object self_7312669, int argc, object *args) /* object self_7312669, object r_735889 */
   {
 - object r_736341 = args[0];
-+ object r_735896 = args[0];
++ object r_735889 = args[0];
    
 -closureN_type c_7322089;
 -object e_7322096 [3];
@@ -33558,40 +33729,40 @@ Make let-values be the same as let*-values, to work around
 -c_7322089.elements[0] = ((closureN)self_7313922)->elements[0];
 -c_7322089.elements[1] = ((closureN)self_7313922)->elements[1];
 -c_7322089.elements[2] = ((closureN)self_7313922)->elements[2];
-+closureN_type c_7320796;
-+object e_7320803 [3];
-+c_7320796.hdr.mark = gc_color_red;
-+ c_7320796.hdr.grayed = 0;
-+c_7320796.tag = closureN_tag;
-+ c_7320796.fn = (function_type)__lambda_871;
-+c_7320796.num_args = 1;
-+c_7320796.num_elements = 3;
-+c_7320796.elements = (object *)e_7320803;
-+c_7320796.elements[0] = ((closureN)self_7312676)->elements[0];
-+c_7320796.elements[1] = ((closureN)self_7312676)->elements[1];
-+c_7320796.elements[2] = ((closureN)self_7312676)->elements[2];
++closureN_type c_7320789;
++object e_7320796 [3];
++c_7320789.hdr.mark = gc_color_red;
++ c_7320789.hdr.grayed = 0;
++c_7320789.tag = closureN_tag;
++ c_7320789.fn = (function_type)__lambda_871;
++c_7320789.num_args = 1;
++c_7320789.num_elements = 3;
++c_7320789.elements = (object *)e_7320796;
++c_7320789.elements[0] = ((closureN)self_7312669)->elements[0];
++c_7320789.elements[1] = ((closureN)self_7312669)->elements[1];
++c_7320789.elements[2] = ((closureN)self_7312669)->elements[2];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7322089,__lambda_871,  Cyc_set_cell(data, ((closureN)self_7313922)->elements[1], r_736341));; 
-+return_direct_with_clo1(data,(closure)&c_7320796,__lambda_871,  Cyc_set_cell(data, ((closureN)self_7312676)->elements[1], r_735896));; 
++return_direct_with_clo1(data,(closure)&c_7320789,__lambda_871,  Cyc_set_cell(data, ((closureN)self_7312669)->elements[1], r_735889));; 
  }
  
 -static void __lambda_871(void *data, object self_7313923, int argc, object *args) /* object self_7313923, object r_736340 */
-+static void __lambda_871(void *data, object self_7312677, int argc, object *args) /* object self_7312677, object r_735895 */
++static void __lambda_871(void *data, object self_7312670, int argc, object *args) /* object self_7312670, object r_735888 */
   {
  
    
  
 -return_closcall3(data,  car(((closureN)self_7313923)->elements[1]),  ((closureN)self_7313923)->elements[0], ((closureN)self_7313923)->elements[2], obj_int2obj(0));; 
-+return_closcall3(data,  car(((closureN)self_7312677)->elements[1]),  ((closureN)self_7312677)->elements[0], ((closureN)self_7312677)->elements[2], obj_int2obj(0));; 
++return_closcall3(data,  car(((closureN)self_7312670)->elements[1]),  ((closureN)self_7312670)->elements[0], ((closureN)self_7312670)->elements[2], obj_int2obj(0));; 
  }
  
 -static void __lambda_860(void *data, object self_7313924, int argc, object *args) /* object self_7313924, object r_736338 */
-+static void __lambda_860(void *data, object self_7312678, int argc, object *args) /* object self_7312678, object r_735893 */
++static void __lambda_860(void *data, object self_7312671, int argc, object *args) /* object self_7312671, object r_735886 */
   {
 - object r_736338 = args[0];
-+ object r_735893 = args[0];
++ object r_735886 = args[0];
    
 -closureN_type c_7322010;
 -object e_7322074 [12];
@@ -33614,36 +33785,36 @@ Make let-values be the same as let*-values, to work around
 -c_7322010.elements[9] = ((closureN)self_7313924)->elements[9];
 -c_7322010.elements[10] = ((closureN)self_7313924)->elements[11];
 -c_7322010.elements[11] = ((closureN)self_7313924)->elements[12];
-+closureN_type c_7320717;
-+object e_7320781 [12];
-+c_7320717.hdr.mark = gc_color_red;
-+ c_7320717.hdr.grayed = 0;
-+c_7320717.tag = closureN_tag;
-+ c_7320717.fn = (function_type)__lambda_861;
-+c_7320717.num_args = 1;
-+c_7320717.num_elements = 12;
-+c_7320717.elements = (object *)e_7320781;
-+c_7320717.elements[0] = ((closureN)self_7312678)->elements[0];
-+c_7320717.elements[1] = ((closureN)self_7312678)->elements[1];
-+c_7320717.elements[2] = ((closureN)self_7312678)->elements[2];
-+c_7320717.elements[3] = ((closureN)self_7312678)->elements[3];
-+c_7320717.elements[4] = ((closureN)self_7312678)->elements[4];
-+c_7320717.elements[5] = ((closureN)self_7312678)->elements[5];
-+c_7320717.elements[6] = ((closureN)self_7312678)->elements[6];
-+c_7320717.elements[7] = ((closureN)self_7312678)->elements[7];
-+c_7320717.elements[8] = ((closureN)self_7312678)->elements[8];
-+c_7320717.elements[9] = ((closureN)self_7312678)->elements[9];
-+c_7320717.elements[10] = ((closureN)self_7312678)->elements[11];
-+c_7320717.elements[11] = ((closureN)self_7312678)->elements[12];
++closureN_type c_7320710;
++object e_7320774 [12];
++c_7320710.hdr.mark = gc_color_red;
++ c_7320710.hdr.grayed = 0;
++c_7320710.tag = closureN_tag;
++ c_7320710.fn = (function_type)__lambda_861;
++c_7320710.num_args = 1;
++c_7320710.num_elements = 12;
++c_7320710.elements = (object *)e_7320774;
++c_7320710.elements[0] = ((closureN)self_7312671)->elements[0];
++c_7320710.elements[1] = ((closureN)self_7312671)->elements[1];
++c_7320710.elements[2] = ((closureN)self_7312671)->elements[2];
++c_7320710.elements[3] = ((closureN)self_7312671)->elements[3];
++c_7320710.elements[4] = ((closureN)self_7312671)->elements[4];
++c_7320710.elements[5] = ((closureN)self_7312671)->elements[5];
++c_7320710.elements[6] = ((closureN)self_7312671)->elements[6];
++c_7320710.elements[7] = ((closureN)self_7312671)->elements[7];
++c_7320710.elements[8] = ((closureN)self_7312671)->elements[8];
++c_7320710.elements[9] = ((closureN)self_7312671)->elements[9];
++c_7320710.elements[10] = ((closureN)self_7312671)->elements[11];
++c_7320710.elements[11] = ((closureN)self_7312671)->elements[12];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7322010,__lambda_861,  Cyc_set_cell(data, ((closureN)self_7313924)->elements[10], r_736338));; 
-+return_direct_with_clo1(data,(closure)&c_7320717,__lambda_861,  Cyc_set_cell(data, ((closureN)self_7312678)->elements[10], r_735893));; 
++return_direct_with_clo1(data,(closure)&c_7320710,__lambda_861,  Cyc_set_cell(data, ((closureN)self_7312671)->elements[10], r_735886));; 
  }
  
 -static void __lambda_861(void *data, object self_7313925, int argc, object *args) /* object self_7313925, object r_736324 */
-+static void __lambda_861(void *data, object self_7312679, int argc, object *args) /* object self_7312679, object r_735879 */
++static void __lambda_861(void *data, object self_7312672, int argc, object *args) /* object self_7312672, object r_735872 */
   {
  
    
@@ -33667,26 +33838,26 @@ Make let-values be the same as let*-values, to work around
 -c_7322012.elements[8] = ((closureN)self_7313925)->elements[8];
 -c_7322012.elements[9] = ((closureN)self_7313925)->elements[10];
 -c_7322012.elements[10] = ((closureN)self_7313925)->elements[11];
-+closureN_type c_7320719;
-+object e_7320770 [11];
-+c_7320719.hdr.mark = gc_color_red;
-+ c_7320719.hdr.grayed = 0;
-+c_7320719.tag = closureN_tag;
-+ c_7320719.fn = (function_type)__lambda_862;
-+c_7320719.num_args = 1;
-+c_7320719.num_elements = 11;
-+c_7320719.elements = (object *)e_7320770;
-+c_7320719.elements[0] = ((closureN)self_7312679)->elements[0];
-+c_7320719.elements[1] = ((closureN)self_7312679)->elements[1];
-+c_7320719.elements[2] = ((closureN)self_7312679)->elements[2];
-+c_7320719.elements[3] = ((closureN)self_7312679)->elements[3];
-+c_7320719.elements[4] = ((closureN)self_7312679)->elements[4];
-+c_7320719.elements[5] = ((closureN)self_7312679)->elements[5];
-+c_7320719.elements[6] = ((closureN)self_7312679)->elements[6];
-+c_7320719.elements[7] = ((closureN)self_7312679)->elements[7];
-+c_7320719.elements[8] = ((closureN)self_7312679)->elements[8];
-+c_7320719.elements[9] = ((closureN)self_7312679)->elements[10];
-+c_7320719.elements[10] = ((closureN)self_7312679)->elements[11];
++closureN_type c_7320712;
++object e_7320763 [11];
++c_7320712.hdr.mark = gc_color_red;
++ c_7320712.hdr.grayed = 0;
++c_7320712.tag = closureN_tag;
++ c_7320712.fn = (function_type)__lambda_862;
++c_7320712.num_args = 1;
++c_7320712.num_elements = 11;
++c_7320712.elements = (object *)e_7320763;
++c_7320712.elements[0] = ((closureN)self_7312672)->elements[0];
++c_7320712.elements[1] = ((closureN)self_7312672)->elements[1];
++c_7320712.elements[2] = ((closureN)self_7312672)->elements[2];
++c_7320712.elements[3] = ((closureN)self_7312672)->elements[3];
++c_7320712.elements[4] = ((closureN)self_7312672)->elements[4];
++c_7320712.elements[5] = ((closureN)self_7312672)->elements[5];
++c_7320712.elements[6] = ((closureN)self_7312672)->elements[6];
++c_7320712.elements[7] = ((closureN)self_7312672)->elements[7];
++c_7320712.elements[8] = ((closureN)self_7312672)->elements[8];
++c_7320712.elements[9] = ((closureN)self_7312672)->elements[10];
++c_7320712.elements[10] = ((closureN)self_7312672)->elements[11];
  
  
 -closureN_type c_7322064;
@@ -33699,26 +33870,26 @@ Make let-values be the same as let*-values, to work around
 -c_7322064.num_elements = 1;
 -c_7322064.elements = (object *)e_7322073;
 -c_7322064.elements[0] = ((closureN)self_7313925)->elements[9];
-+closureN_type c_7320771;
-+object e_7320780 [1];
-+c_7320771.hdr.mark = gc_color_red;
-+ c_7320771.hdr.grayed = 0;
-+c_7320771.tag = closureN_tag;
-+ c_7320771.fn = (function_type)__lambda_866;
-+c_7320771.num_args = 1;
-+c_7320771.num_elements = 1;
-+c_7320771.elements = (object *)e_7320780;
-+c_7320771.elements[0] = ((closureN)self_7312679)->elements[9];
++closureN_type c_7320764;
++object e_7320773 [1];
++c_7320764.hdr.mark = gc_color_red;
++ c_7320764.hdr.grayed = 0;
++c_7320764.tag = closureN_tag;
++ c_7320764.fn = (function_type)__lambda_866;
++c_7320764.num_args = 1;
++c_7320764.num_elements = 1;
++c_7320764.elements = (object *)e_7320773;
++c_7320764.elements[0] = ((closureN)self_7312672)->elements[9];
  
 -return_direct_with_clo1(data,(closure)&c_7322012,__lambda_862,  &c_7322064);; 
-+return_direct_with_clo1(data,(closure)&c_7320719,__lambda_862,  &c_7320771);; 
++return_direct_with_clo1(data,(closure)&c_7320712,__lambda_862,  &c_7320764);; 
  }
  
 -static void __lambda_866(void *data, object self_7313926, int argc, object *args) /* object self_7313926, object k_736335, object clause_731484_733650 */
-+static void __lambda_866(void *data, object self_7312680, int argc, object *args) /* object self_7312680, object k_735890, object clause_731485_733310 */
++static void __lambda_866(void *data, object self_7312673, int argc, object *args) /* object self_7312673, object k_735883, object clause_731484_733303 */
   {
 - object k_736335 = args[0]; object clause_731484_733650 = args[1];
-+ object k_735890 = args[0]; object clause_731485_733310 = args[1];
++ object k_735883 = args[0]; object clause_731484_733303 = args[1];
    
  
  
@@ -33726,14 +33897,14 @@ Make let-values be the same as let*-values, to work around
  
  
 -return_closcall3(data,  car(((closureN)self_7313926)->elements[0]),  k_736335, Cyc_car(data, clause_731484_733650), Cyc_cadr(data, clause_731484_733650));; 
-+return_closcall3(data,  car(((closureN)self_7312680)->elements[0]),  k_735890, Cyc_car(data, clause_731485_733310), Cyc_cadr(data, clause_731485_733310));; 
++return_closcall3(data,  car(((closureN)self_7312673)->elements[0]),  k_735883, Cyc_car(data, clause_731484_733303), Cyc_cadr(data, clause_731484_733303));; 
  }
  
 -static void __lambda_862(void *data, object self_7313927, int argc, object *args) /* object self_7313927, object r_736334 */
-+static void __lambda_862(void *data, object self_7312681, int argc, object *args) /* object self_7312681, object r_735889 */
++static void __lambda_862(void *data, object self_7312674, int argc, object *args) /* object self_7312674, object r_735882 */
   {
 - object r_736334 = args[0];
-+ object r_735889 = args[0];
++ object r_735882 = args[0];
    
 -closureN_type c_7322014;
 -object e_7322059 [10];
@@ -33754,38 +33925,16 @@ Make let-values be the same as let*-values, to work around
 -c_7322014.elements[7] = ((closureN)self_7313927)->elements[7];
 -c_7322014.elements[8] = ((closureN)self_7313927)->elements[8];
 -c_7322014.elements[9] = ((closureN)self_7313927)->elements[10];
-+closureN_type c_7320721;
-+object e_7320766 [10];
-+c_7320721.hdr.mark = gc_color_red;
-+ c_7320721.hdr.grayed = 0;
-+c_7320721.tag = closureN_tag;
-+ c_7320721.fn = (function_type)__lambda_863;
-+c_7320721.num_args = 1;
-+c_7320721.num_elements = 10;
-+c_7320721.elements = (object *)e_7320766;
-+c_7320721.elements[0] = ((closureN)self_7312681)->elements[0];
-+c_7320721.elements[1] = ((closureN)self_7312681)->elements[1];
-+c_7320721.elements[2] = ((closureN)self_7312681)->elements[2];
-+c_7320721.elements[3] = ((closureN)self_7312681)->elements[3];
-+c_7320721.elements[4] = ((closureN)self_7312681)->elements[4];
-+c_7320721.elements[5] = ((closureN)self_7312681)->elements[5];
-+c_7320721.elements[6] = ((closureN)self_7312681)->elements[6];
-+c_7320721.elements[7] = ((closureN)self_7312681)->elements[7];
-+c_7320721.elements[8] = ((closureN)self_7312681)->elements[8];
-+c_7320721.elements[9] = ((closureN)self_7312681)->elements[10];
- 
- 
- 
+-
+-
+-
 -return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7322014, r_736334, car(((closureN)self_7313927)->elements[9]));; 
-+return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7320721, r_735889, car(((closureN)self_7312681)->elements[9]));; 
- }
- 
+-}
+-
 -static void __lambda_863(void *data, object self_7313928, int argc, object *args) /* object self_7313928, object r_736330 */
-+static void __lambda_863(void *data, object self_7312682, int argc, object *args) /* object self_7312682, object r_735885 */
-  {
+- {
 - object r_736330 = args[0];
-+ object r_735885 = args[0];
-   
+-  
 -closureN_type c_7322016;
 -object e_7322052 [10];
 -c_7322016.hdr.mark = gc_color_red;
@@ -33805,42 +33954,18 @@ Make let-values be the same as let*-values, to work around
 -c_7322016.elements[7] = ((closureN)self_7313928)->elements[8];
 -c_7322016.elements[8] = ((closureN)self_7313928)->elements[9];
 -c_7322016.elements[9] = r_736330;
-+closureN_type c_7320723;
-+object e_7320759 [10];
-+c_7320723.hdr.mark = gc_color_red;
-+ c_7320723.hdr.grayed = 0;
-+c_7320723.tag = closureN_tag;
-+ c_7320723.fn = (function_type)__lambda_864;
-+c_7320723.num_args = 1;
-+c_7320723.num_elements = 10;
-+c_7320723.elements = (object *)e_7320759;
-+c_7320723.elements[0] = ((closureN)self_7312682)->elements[0];
-+c_7320723.elements[1] = ((closureN)self_7312682)->elements[1];
-+c_7320723.elements[2] = ((closureN)self_7312682)->elements[2];
-+c_7320723.elements[3] = ((closureN)self_7312682)->elements[3];
-+c_7320723.elements[4] = ((closureN)self_7312682)->elements[5];
-+c_7320723.elements[5] = ((closureN)self_7312682)->elements[6];
-+c_7320723.elements[6] = ((closureN)self_7312682)->elements[7];
-+c_7320723.elements[7] = ((closureN)self_7312682)->elements[8];
-+c_7320723.elements[8] = ((closureN)self_7312682)->elements[9];
-+c_7320723.elements[9] = r_735885;
- 
- 
+-
+-
 -list_3_type local_7322055; 
-+list_3_type local_7320762; 
- 
+-
 -make_utf8_string_with_len(c_7322057, "no expansion for", 16, 16);
 -return_direct_with_clo1(data,(closure)&c_7322016,__lambda_864,  Cyc_fast_list_3(&local_7322055, ((closureN)self_7313928)->elements[4], &c_7322057, ((closureN)self_7313928)->elements[5]));; 
-+make_utf8_string_with_len(c_7320764, "no expansion for", 16, 16);
-+return_direct_with_clo1(data,(closure)&c_7320723,__lambda_864,  Cyc_fast_list_3(&local_7320762, ((closureN)self_7312682)->elements[4], &c_7320764, ((closureN)self_7312682)->elements[5]));; 
- }
- 
+-}
+-
 -static void __lambda_864(void *data, object self_7313929, int argc, object *args) /* object self_7313929, object r_736333 */
-+static void __lambda_864(void *data, object self_7312683, int argc, object *args) /* object self_7312683, object r_735888 */
-  {
+- {
 - object r_736333 = args[0];
-+ object r_735888 = args[0];
-   
+-  
 -closureN_type c_7322018;
 -object e_7322043 [8];
 -c_7322018.hdr.mark = gc_color_red;
@@ -33858,121 +33983,179 @@ Make let-values be the same as let*-values, to work around
 -c_7322018.elements[5] = ((closureN)self_7313929)->elements[6];
 -c_7322018.elements[6] = ((closureN)self_7313929)->elements[7];
 -c_7322018.elements[7] = ((closureN)self_7313929)->elements[8];
-+closureN_type c_7320725;
-+object e_7320750 [8];
-+c_7320725.hdr.mark = gc_color_red;
-+ c_7320725.hdr.grayed = 0;
-+c_7320725.tag = closureN_tag;
-+ c_7320725.fn = (function_type)__lambda_865;
-+c_7320725.num_args = 1;
-+c_7320725.num_elements = 8;
-+c_7320725.elements = (object *)e_7320750;
-+c_7320725.elements[0] = ((closureN)self_7312683)->elements[0];
-+c_7320725.elements[1] = ((closureN)self_7312683)->elements[1];
-+c_7320725.elements[2] = ((closureN)self_7312683)->elements[3];
-+c_7320725.elements[3] = ((closureN)self_7312683)->elements[4];
-+c_7320725.elements[4] = ((closureN)self_7312683)->elements[5];
-+c_7320725.elements[5] = ((closureN)self_7312683)->elements[6];
-+c_7320725.elements[6] = ((closureN)self_7312683)->elements[7];
-+c_7320725.elements[7] = ((closureN)self_7312683)->elements[8];
++closureN_type c_7320714;
++object e_7320759 [10];
++c_7320714.hdr.mark = gc_color_red;
++ c_7320714.hdr.grayed = 0;
++c_7320714.tag = closureN_tag;
++ c_7320714.fn = (function_type)__lambda_863;
++c_7320714.num_args = 1;
++c_7320714.num_elements = 10;
++c_7320714.elements = (object *)e_7320759;
++c_7320714.elements[0] = ((closureN)self_7312674)->elements[0];
++c_7320714.elements[1] = ((closureN)self_7312674)->elements[1];
++c_7320714.elements[2] = ((closureN)self_7312674)->elements[2];
++c_7320714.elements[3] = ((closureN)self_7312674)->elements[3];
++c_7320714.elements[4] = ((closureN)self_7312674)->elements[4];
++c_7320714.elements[5] = ((closureN)self_7312674)->elements[5];
++c_7320714.elements[6] = ((closureN)self_7312674)->elements[6];
++c_7320714.elements[7] = ((closureN)self_7312674)->elements[7];
++c_7320714.elements[8] = ((closureN)self_7312674)->elements[8];
++c_7320714.elements[9] = ((closureN)self_7312674)->elements[10];
  
  
 -pair_type local_7322047; 
-+pair_type local_7320754; 
  
 -list_3_type local_7322050; 
 -return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7322018, ((closureN)self_7313929)->elements[9], set_cell_as_expr(&local_7322047, Cyc_fast_list_3(&local_7322050, ((closureN)self_7313929)->elements[2], r_736333, boolean_f)));; 
-+list_3_type local_7320757; 
-+return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7320725, ((closureN)self_7312683)->elements[9], set_cell_as_expr(&local_7320754, Cyc_fast_list_3(&local_7320757, ((closureN)self_7312683)->elements[2], r_735888, boolean_f)));; 
++return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7320714, r_735882, car(((closureN)self_7312674)->elements[9]));; 
++}
++
++static void __lambda_863(void *data, object self_7312675, int argc, object *args) /* object self_7312675, object r_735878 */
++ {
++ object r_735878 = args[0];
++  
++closureN_type c_7320716;
++object e_7320752 [10];
++c_7320716.hdr.mark = gc_color_red;
++ c_7320716.hdr.grayed = 0;
++c_7320716.tag = closureN_tag;
++ c_7320716.fn = (function_type)__lambda_864;
++c_7320716.num_args = 1;
++c_7320716.num_elements = 10;
++c_7320716.elements = (object *)e_7320752;
++c_7320716.elements[0] = ((closureN)self_7312675)->elements[0];
++c_7320716.elements[1] = ((closureN)self_7312675)->elements[1];
++c_7320716.elements[2] = ((closureN)self_7312675)->elements[2];
++c_7320716.elements[3] = ((closureN)self_7312675)->elements[3];
++c_7320716.elements[4] = ((closureN)self_7312675)->elements[5];
++c_7320716.elements[5] = ((closureN)self_7312675)->elements[6];
++c_7320716.elements[6] = ((closureN)self_7312675)->elements[7];
++c_7320716.elements[7] = ((closureN)self_7312675)->elements[8];
++c_7320716.elements[8] = ((closureN)self_7312675)->elements[9];
++c_7320716.elements[9] = r_735878;
++
++
++list_3_type local_7320755; 
++
++make_utf8_string_with_len(c_7320757, "no expansion for", 16, 16);
++return_direct_with_clo1(data,(closure)&c_7320716,__lambda_864,  Cyc_fast_list_3(&local_7320755, ((closureN)self_7312675)->elements[4], &c_7320757, ((closureN)self_7312675)->elements[5]));; 
  }
  
 -static void __lambda_865(void *data, object self_7313930, int argc, object *args) /* object self_7313930, object r_736329 */
-+static void __lambda_865(void *data, object self_7312684, int argc, object *args) /* object self_7312684, object r_735884 */
++static void __lambda_864(void *data, object self_7312676, int argc, object *args) /* object self_7312676, object r_735881 */
   {
 - object r_736329 = args[0];
-+ object r_735884 = args[0];
++ object r_735881 = args[0];
    
 -list_2_type local_7322023; 
-+list_2_type local_7320730; 
++closureN_type c_7320718;
++object e_7320743 [8];
++c_7320718.hdr.mark = gc_color_red;
++ c_7320718.hdr.grayed = 0;
++c_7320718.tag = closureN_tag;
++ c_7320718.fn = (function_type)__lambda_865;
++c_7320718.num_args = 1;
++c_7320718.num_elements = 8;
++c_7320718.elements = (object *)e_7320743;
++c_7320718.elements[0] = ((closureN)self_7312676)->elements[0];
++c_7320718.elements[1] = ((closureN)self_7312676)->elements[1];
++c_7320718.elements[2] = ((closureN)self_7312676)->elements[3];
++c_7320718.elements[3] = ((closureN)self_7312676)->elements[4];
++c_7320718.elements[4] = ((closureN)self_7312676)->elements[5];
++c_7320718.elements[5] = ((closureN)self_7312676)->elements[6];
++c_7320718.elements[6] = ((closureN)self_7312676)->elements[7];
++c_7320718.elements[7] = ((closureN)self_7312676)->elements[8];
  
 -list_3_type local_7322027; 
-+list_3_type local_7320734; 
  
 -list_3_type local_7322031; 
-+list_3_type local_7320738; 
++pair_type local_7320747; 
  
 -list_2_type local_7322037; 
-+list_2_type local_7320744; 
++list_3_type local_7320750; 
++return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7320718, ((closureN)self_7312676)->elements[9], set_cell_as_expr(&local_7320747, Cyc_fast_list_3(&local_7320750, ((closureN)self_7312676)->elements[2], r_735881, boolean_f)));; 
++}
  
 -pair_type local_7322041; 
 -return_direct_with_clo1(data,  ((closureN)self_7313930)->elements[7], (((closure)  ((closureN)self_7313930)->elements[7])->fn),  Cyc_fast_list_2(&local_7322023, ((closureN)self_7313930)->elements[2], Cyc_fast_list_3(&local_7322027, ((closureN)self_7313930)->elements[4], Cyc_fast_list_3(&local_7322031, ((closureN)self_7313930)->elements[3], ((closureN)self_7313930)->elements[6], ((closureN)self_7313930)->elements[1]), Cyc_fast_list_2(&local_7322037, ((closureN)self_7313930)->elements[0], set_pair_as_expr(&local_7322041, ((closureN)self_7313930)->elements[5], r_736329)))));; 
-+pair_type local_7320748; 
-+return_direct_with_clo1(data,  ((closureN)self_7312684)->elements[7], (((closure)  ((closureN)self_7312684)->elements[7])->fn),  Cyc_fast_list_2(&local_7320730, ((closureN)self_7312684)->elements[2], Cyc_fast_list_3(&local_7320734, ((closureN)self_7312684)->elements[4], Cyc_fast_list_3(&local_7320738, ((closureN)self_7312684)->elements[3], ((closureN)self_7312684)->elements[6], ((closureN)self_7312684)->elements[1]), Cyc_fast_list_2(&local_7320744, ((closureN)self_7312684)->elements[0], set_pair_as_expr(&local_7320748, ((closureN)self_7312684)->elements[5], r_735884)))));; 
++static void __lambda_865(void *data, object self_7312677, int argc, object *args) /* object self_7312677, object r_735877 */
++ {
++ object r_735877 = args[0];
++  
++list_2_type local_7320723; 
++
++list_3_type local_7320727; 
++
++list_3_type local_7320731; 
++
++list_2_type local_7320737; 
++
++pair_type local_7320741; 
++return_direct_with_clo1(data,  ((closureN)self_7312677)->elements[7], (((closure)  ((closureN)self_7312677)->elements[7])->fn),  Cyc_fast_list_2(&local_7320723, ((closureN)self_7312677)->elements[2], Cyc_fast_list_3(&local_7320727, ((closureN)self_7312677)->elements[4], Cyc_fast_list_3(&local_7320731, ((closureN)self_7312677)->elements[3], ((closureN)self_7312677)->elements[6], ((closureN)self_7312677)->elements[1]), Cyc_fast_list_2(&local_7320737, ((closureN)self_7312677)->elements[0], set_pair_as_expr(&local_7320741, ((closureN)self_7312677)->elements[5], r_735877)))));; 
  }
  
 -static void __lambda_841(void *data, object self_7313931, int argc, object *args) /* object self_7313931, object k_736688 */
-+static void __lambda_841(void *data, object self_7312685, int argc, object *args) /* object self_7312685, object k_736243 */
++static void __lambda_841(void *data, object self_7312678, int argc, object *args) /* object self_7312678, object k_736236 */
   {
 - object k_736688 = args[0];
 -  if( (boolean_f != ((closureN)self_7313931)->elements[0]) ){ 
-+ object k_736243 = args[0];
-+  if( (boolean_f != ((closureN)self_7312685)->elements[0]) ){ 
++ object k_736236 = args[0];
++  if( (boolean_f != ((closureN)self_7312678)->elements[0]) ){ 
    
  
  
  
 -return_direct_with_clo1(data,  k_736688,__lambda_842,  Cyc_cdr(data, Cyc_cddr(data, ((closureN)self_7313931)->elements[1])));
-+return_direct_with_clo1(data,  k_736243,__lambda_842,  Cyc_cdr(data, Cyc_cddr(data, ((closureN)self_7312685)->elements[1])));
++return_direct_with_clo1(data,  k_736236,__lambda_842,  Cyc_cdr(data, Cyc_cddr(data, ((closureN)self_7312678)->elements[1])));
  } else { 
    
  
 -return_direct_with_clo1(data,  k_736688,__lambda_842,  Cyc_cddr(data, ((closureN)self_7313931)->elements[1]));}
-+return_direct_with_clo1(data,  k_736243,__lambda_842,  Cyc_cddr(data, ((closureN)self_7312685)->elements[1]));}
++return_direct_with_clo1(data,  k_736236,__lambda_842,  Cyc_cddr(data, ((closureN)self_7312678)->elements[1]));}
  ;; 
  }
  
 -static void __lambda_838(void *data, object self_7313932, int argc, object *args) /* object self_7313932, object k_736691 */
-+static void __lambda_838(void *data, object self_7312686, int argc, object *args) /* object self_7312686, object k_736246 */
++static void __lambda_838(void *data, object self_7312679, int argc, object *args) /* object self_7312679, object k_736239 */
   {
 - object k_736691 = args[0];
 -  if( (boolean_f != ((closureN)self_7313932)->elements[0]) ){ 
-+ object k_736246 = args[0];
-+  if( (boolean_f != ((closureN)self_7312686)->elements[0]) ){ 
++ object k_736239 = args[0];
++  if( (boolean_f != ((closureN)self_7312679)->elements[0]) ){ 
    
  
  
  
 -return_direct_with_clo1(data,  k_736691,__lambda_839,  Cyc_car(data, Cyc_cddr(data, ((closureN)self_7313932)->elements[1])));
-+return_direct_with_clo1(data,  k_736246,__lambda_839,  Cyc_car(data, Cyc_cddr(data, ((closureN)self_7312686)->elements[1])));
++return_direct_with_clo1(data,  k_736239,__lambda_839,  Cyc_car(data, Cyc_cddr(data, ((closureN)self_7312679)->elements[1])));
  } else { 
    
  
 -return_direct_with_clo1(data,  k_736691,__lambda_839,  Cyc_cadr(data, ((closureN)self_7313932)->elements[1]));}
-+return_direct_with_clo1(data,  k_736246,__lambda_839,  Cyc_cadr(data, ((closureN)self_7312686)->elements[1]));}
++return_direct_with_clo1(data,  k_736239,__lambda_839,  Cyc_cadr(data, ((closureN)self_7312679)->elements[1]));}
  ;; 
  }
  
 -static void __lambda_795(void *data, object _, int argc, object *args) /* closure _,object k_736273, object kar_731228_733505, object kdr_731229_733506, object source_731230_733507 */
-+static void __lambda_795(void *data, object _, int argc, object *args) /* closure _,object k_735828, object kar_731229_733165, object kdr_731230_733166, object source_731231_733167 */
++static void __lambda_795(void *data, object _, int argc, object *args) /* closure _,object k_735821, object kar_731228_733158, object kdr_731229_733159, object source_731230_733160 */
   {
 -object k_736273 = args[0]; object kar_731228_733505 = args[1]; object kdr_731229_733506 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:cons-source");
-+object k_735828 = args[0]; object kar_731229_733165 = args[1]; object kdr_731230_733166 = args[2];
-+  Cyc_st_add(data, "base.sld:cons-source");
++object k_735821 = args[0]; object kar_731228_733158 = args[1]; object kdr_731229_733159 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:cons-source");
  
 -pair_type local_7321788; 
 -return_direct_with_clo1(data,  k_736273, (((closure)  k_736273)->fn),  set_pair_as_expr(&local_7321788, kar_731228_733505, kdr_731229_733506));; 
-+pair_type local_7320495; 
-+return_direct_with_clo1(data,  k_735828, (((closure)  k_735828)->fn),  set_pair_as_expr(&local_7320495, kar_731229_733165, kdr_731230_733166));; 
++pair_type local_7320488; 
++return_direct_with_clo1(data,  k_735821, (((closure)  k_735821)->fn),  set_pair_as_expr(&local_7320488, kar_731228_733158, kdr_731229_733159));; 
  }
  
 -static void __lambda_793(void *data, object _, int argc, object *args) /* closure _,object k_736269, object pred_731220_733502, object ls_731221_733503 */
-+static void __lambda_793(void *data, object _, int argc, object *args) /* closure _,object k_735824, object pred_731221_733162, object ls_731222_733163 */
++static void __lambda_793(void *data, object _, int argc, object *args) /* closure _,object k_735817, object pred_731220_733155, object ls_731221_733156 */
   {
 -object k_736269 = args[0]; object pred_731220_733502 = args[1]; object ls_731221_733503 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:find");
-+object k_735824 = args[0]; object pred_731221_733162 = args[1]; object ls_731222_733163 = args[2];
-+  Cyc_st_add(data, "base.sld:find");
++object k_735817 = args[0]; object pred_731220_733155 = args[1]; object ls_731221_733156 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:find");
  
 -closureN_type c_7321776;
 -object e_7321783 [1];
@@ -33984,48 +34167,47 @@ Make let-values be the same as let*-values, to work around
 -c_7321776.num_elements = 1;
 -c_7321776.elements = (object *)e_7321783;
 -c_7321776.elements[0] = k_736269;
-+closureN_type c_7320483;
-+object e_7320490 [1];
-+c_7320483.hdr.mark = gc_color_red;
-+ c_7320483.hdr.grayed = 0;
-+c_7320483.tag = closureN_tag;
-+ c_7320483.fn = (function_type)__lambda_794;
-+c_7320483.num_args = 1;
-+c_7320483.num_elements = 1;
-+c_7320483.elements = (object *)e_7320490;
-+c_7320483.elements[0] = k_735824;
++closureN_type c_7320476;
++object e_7320483 [1];
++c_7320476.hdr.mark = gc_color_red;
++ c_7320476.hdr.grayed = 0;
++c_7320476.tag = closureN_tag;
++ c_7320476.fn = (function_type)__lambda_794;
++c_7320476.num_args = 1;
++c_7320476.num_elements = 1;
++c_7320476.elements = (object *)e_7320483;
++c_7320476.elements[0] = k_735817;
  
 -return_direct_with_clo3(data,  __glo_find_91tail_scheme_base, (((closure)  __glo_find_91tail_scheme_base)->fn),  &c_7321776, pred_731220_733502, ls_731221_733503);; 
-+return_direct_with_clo3(data,  __glo_find_91tail_scheme_base, (((closure)  __glo_find_91tail_scheme_base)->fn),  &c_7320483, pred_731221_733162, ls_731222_733163);; 
++return_direct_with_clo3(data,  __glo_find_91tail_scheme_base, (((closure)  __glo_find_91tail_scheme_base)->fn),  &c_7320476, pred_731220_733155, ls_731221_733156);; 
  }
  
 -static void __lambda_794(void *data, object self_7313700, int argc, object *args) /* object self_7313700, object tmp_731224_731226_733504 */
-+static void __lambda_794(void *data, object self_7312454, int argc, object *args) /* object self_7312454, object tmp_731225_731227_733164 */
++static void __lambda_794(void *data, object self_7312447, int argc, object *args) /* object self_7312447, object tmp_731224_731226_733157 */
   {
 - object tmp_731224_731226_733504 = args[0];
 -  if( (boolean_f != tmp_731224_731226_733504) ){ 
-+ object tmp_731225_731227_733164 = args[0];
-+  if( (boolean_f != tmp_731225_731227_733164) ){ 
++ object tmp_731224_731226_733157 = args[0];
++  if( (boolean_f != tmp_731224_731226_733157) ){ 
    
  
 -return_direct_with_clo1(data,  ((closureN)self_7313700)->elements[0], (((closure)  ((closureN)self_7313700)->elements[0])->fn),  Cyc_car(data, tmp_731224_731226_733504));
-+return_direct_with_clo1(data,  ((closureN)self_7312454)->elements[0], (((closure)  ((closureN)self_7312454)->elements[0])->fn),  Cyc_car(data, tmp_731225_731227_733164));
++return_direct_with_clo1(data,  ((closureN)self_7312447)->elements[0], (((closure)  ((closureN)self_7312447)->elements[0])->fn),  Cyc_car(data, tmp_731224_731226_733157));
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7313700)->elements[0], (((closure)  ((closureN)self_7313700)->elements[0])->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  ((closureN)self_7312454)->elements[0], (((closure)  ((closureN)self_7312454)->elements[0])->fn),  boolean_f);}
++  return_direct_with_clo1(data,  ((closureN)self_7312447)->elements[0], (((closure)  ((closureN)self_7312447)->elements[0])->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_791(void *data, object _, int argc, object *args) /* closure _,object k_736262, object pred_731217_733500, object ls_731218_733501 */
-+static void __lambda_791(void *data, object _, int argc, object *args) /* closure _,object k_735817, object pred_731218_733160, object ls_731219_733161 */
++static void __lambda_791(void *data, object _, int argc, object *args) /* closure _,object k_735810, object pred_731217_733153, object ls_731218_733154 */
   {
 -object k_736262 = args[0]; object pred_731217_733500 = args[1]; object ls_731218_733501 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:find-tail");
-+object k_735817 = args[0]; object pred_731218_733160 = args[1]; object ls_731219_733161 = args[2];
-+  Cyc_st_add(data, "base.sld:find-tail");
++object k_735810 = args[0]; object pred_731217_733153 = args[1]; object ls_731218_733154 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:find-tail");
    
 -if( (boolean_f != Cyc_is_pair(ls_731218_733501)) ){ 
-+if( (boolean_f != Cyc_is_pair(ls_731219_733161)) ){ 
++if( (boolean_f != Cyc_is_pair(ls_731218_733154)) ){ 
    
 -closureN_type c_7321760;
 -object e_7321770 [3];
@@ -34039,43 +34221,43 @@ Make let-values be the same as let*-values, to work around
 -c_7321760.elements[0] = k_736262;
 -c_7321760.elements[1] = ls_731218_733501;
 -c_7321760.elements[2] = pred_731217_733500;
-+closureN_type c_7320467;
-+object e_7320477 [3];
-+c_7320467.hdr.mark = gc_color_red;
-+ c_7320467.hdr.grayed = 0;
-+c_7320467.tag = closureN_tag;
-+ c_7320467.fn = (function_type)__lambda_792;
-+c_7320467.num_args = 1;
-+c_7320467.num_elements = 3;
-+c_7320467.elements = (object *)e_7320477;
-+c_7320467.elements[0] = k_735817;
-+c_7320467.elements[1] = ls_731219_733161;
-+c_7320467.elements[2] = pred_731218_733160;
++closureN_type c_7320460;
++object e_7320470 [3];
++c_7320460.hdr.mark = gc_color_red;
++ c_7320460.hdr.grayed = 0;
++c_7320460.tag = closureN_tag;
++ c_7320460.fn = (function_type)__lambda_792;
++c_7320460.num_args = 1;
++c_7320460.num_elements = 3;
++c_7320460.elements = (object *)e_7320470;
++c_7320460.elements[0] = k_735810;
++c_7320460.elements[1] = ls_731218_733154;
++c_7320460.elements[2] = pred_731217_733153;
  
  
  
 -return_closcall2(data,  pred_731217_733500,  &c_7321760, Cyc_car(data, ls_731218_733501));
-+return_closcall2(data,  pred_731218_733160,  &c_7320467, Cyc_car(data, ls_731219_733161));
++return_closcall2(data,  pred_731217_733153,  &c_7320460, Cyc_car(data, ls_731218_733154));
  } else { 
 -  return_direct_with_clo1(data,  k_736262, (((closure)  k_736262)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_735817, (((closure)  k_735817)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_735810, (((closure)  k_735810)->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_792(void *data, object self_7313699, int argc, object *args) /* object self_7313699, object r_736264 */
-+static void __lambda_792(void *data, object self_7312453, int argc, object *args) /* object self_7312453, object r_735819 */
++static void __lambda_792(void *data, object self_7312446, int argc, object *args) /* object self_7312446, object r_735812 */
   {
 - object r_736264 = args[0];
 -  if( (boolean_f != r_736264) ){ 
 -  return_direct_with_clo1(data,  ((closureN)self_7313699)->elements[0], (((closure)  ((closureN)self_7313699)->elements[0])->fn),  ((closureN)self_7313699)->elements[1]);
-+ object r_735819 = args[0];
-+  if( (boolean_f != r_735819) ){ 
-+  return_direct_with_clo1(data,  ((closureN)self_7312453)->elements[0], (((closure)  ((closureN)self_7312453)->elements[0])->fn),  ((closureN)self_7312453)->elements[1]);
++ object r_735812 = args[0];
++  if( (boolean_f != r_735812) ){ 
++  return_direct_with_clo1(data,  ((closureN)self_7312446)->elements[0], (((closure)  ((closureN)self_7312446)->elements[0])->fn),  ((closureN)self_7312446)->elements[1]);
  } else { 
    
  
 -return_direct_with_clo3(data,  __glo_find_91tail_scheme_base, (((closure)  __glo_find_91tail_scheme_base)->fn),  ((closureN)self_7313699)->elements[0], ((closureN)self_7313699)->elements[2], Cyc_cdr(data, ((closureN)self_7313699)->elements[1]));}
-+return_direct_with_clo3(data,  __glo_find_91tail_scheme_base, (((closure)  __glo_find_91tail_scheme_base)->fn),  ((closureN)self_7312453)->elements[0], ((closureN)self_7312453)->elements[2], Cyc_cdr(data, ((closureN)self_7312453)->elements[1]));}
++return_direct_with_clo3(data,  __glo_find_91tail_scheme_base, (((closure)  __glo_find_91tail_scheme_base)->fn),  ((closureN)self_7312446)->elements[0], ((closureN)self_7312446)->elements[2], Cyc_cdr(data, ((closureN)self_7312446)->elements[1]));}
  ;; 
  }
  
@@ -34145,38 +34327,35 @@ Make let-values be the same as let*-values, to work around
 +static object __lambda_1435(void *data, object ptr) { return Cyc_EOF; }
 +static void __lambda_1434(void *data, object _, int argc, object *args) {object k = args[0]; return_closcall1(data, k, Cyc_EOF);  }
 +static void __lambda_1433(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_1432(void *data, object ptr,object z_731217_733159) {
++static object __lambda_1432(void *data, object ptr,object z_731216_733152) {
  
--  Cyc_st_add(data, "scheme/base.sld:square");
-+  Cyc_st_add(data, "base.sld:square");
+   Cyc_st_add(data, "scheme/base.sld:square");
  
 -complex_num_type local_7321739; 
 -return_copy(ptr,  Cyc_fast_mul(data,&local_7321739, z_731216_733499, z_731216_733499));; 
-+complex_num_type local_7320446; 
-+return_copy(ptr,  Cyc_fast_mul(data,&local_7320446, z_731217_733159, z_731217_733159));; 
++complex_num_type local_7320439; 
++return_copy(ptr,  Cyc_fast_mul(data,&local_7320439, z_731216_733152, z_731216_733152));; 
  }
  
 -static void __lambda_790(void *data, object _, int argc, object *args) /* closure _,object k_736255, object z_731216_733499 */
-+static void __lambda_790(void *data, object _, int argc, object *args) /* closure _,object k_735810, object z_731217_733159 */
++static void __lambda_790(void *data, object _, int argc, object *args) /* closure _,object k_735803, object z_731216_733152 */
   {
 -object k_736255 = args[0]; object z_731216_733499 = args[1];
--  Cyc_st_add(data, "scheme/base.sld:square");
-+object k_735810 = args[0]; object z_731217_733159 = args[1];
-+  Cyc_st_add(data, "base.sld:square");
++object k_735803 = args[0]; object z_731216_733152 = args[1];
+   Cyc_st_add(data, "scheme/base.sld:square");
  
 -complex_num_type local_7321734; 
 -return_direct_with_clo1(data,  k_736255, (((closure)  k_736255)->fn),  Cyc_fast_mul(data,&local_7321734, z_731216_733499, z_731216_733499));; 
-+complex_num_type local_7320441; 
-+return_direct_with_clo1(data,  k_735810, (((closure)  k_735810)->fn),  Cyc_fast_mul(data,&local_7320441, z_731217_733159, z_731217_733159));; 
++complex_num_type local_7320434; 
++return_direct_with_clo1(data,  k_735803, (((closure)  k_735803)->fn),  Cyc_fast_mul(data,&local_7320434, z_731216_733152, z_731216_733152));; 
  }
  
 -static void __lambda_787(void *data, object _, int argc, object *args) /* closure _,object k_736250, object n_731214_733497, object m_731215_733498 */
-+static void __lambda_787(void *data, object _, int argc, object *args) /* closure _,object k_735805, object n_731215_733157, object m_731216_733158 */
++static void __lambda_787(void *data, object _, int argc, object *args) /* closure _,object k_735798, object n_731214_733150, object m_731215_733151 */
   {
 -object k_736250 = args[0]; object n_731214_733497 = args[1]; object m_731215_733498 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:floor/");
-+object k_735805 = args[0]; object n_731215_733157 = args[1]; object m_731216_733158 = args[2];
-+  Cyc_st_add(data, "base.sld:floor/");
++object k_735798 = args[0]; object n_731214_733150 = args[1]; object m_731215_733151 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:floor/");
  
 -closureN_type c_7321720;
 -object e_7321729 [3];
@@ -34190,28 +34369,28 @@ Make let-values be the same as let*-values, to work around
 -c_7321720.elements[0] = k_736250;
 -c_7321720.elements[1] = m_731215_733498;
 -c_7321720.elements[2] = n_731214_733497;
-+closureN_type c_7320427;
-+object e_7320436 [3];
-+c_7320427.hdr.mark = gc_color_red;
-+ c_7320427.hdr.grayed = 0;
-+c_7320427.tag = closureN_tag;
-+ c_7320427.fn = (function_type)__lambda_788;
-+c_7320427.num_args = 1;
-+c_7320427.num_elements = 3;
-+c_7320427.elements = (object *)e_7320436;
-+c_7320427.elements[0] = k_735805;
-+c_7320427.elements[1] = m_731216_733158;
-+c_7320427.elements[2] = n_731215_733157;
++closureN_type c_7320420;
++object e_7320429 [3];
++c_7320420.hdr.mark = gc_color_red;
++ c_7320420.hdr.grayed = 0;
++c_7320420.tag = closureN_tag;
++ c_7320420.fn = (function_type)__lambda_788;
++c_7320420.num_args = 1;
++c_7320420.num_elements = 3;
++c_7320420.elements = (object *)e_7320429;
++c_7320420.elements[0] = k_735798;
++c_7320420.elements[1] = m_731215_733151;
++c_7320420.elements[2] = n_731214_733150;
  
 -return_direct_with_clo3(data,  __glo_floor_91quotient_scheme_base, (((closure)  __glo_floor_91quotient_scheme_base)->fn),  &c_7321720, n_731214_733497, m_731215_733498);; 
-+return_direct_with_clo3(data,  __glo_floor_91quotient_scheme_base, (((closure)  __glo_floor_91quotient_scheme_base)->fn),  &c_7320427, n_731215_733157, m_731216_733158);; 
++return_direct_with_clo3(data,  __glo_floor_91quotient_scheme_base, (((closure)  __glo_floor_91quotient_scheme_base)->fn),  &c_7320420, n_731214_733150, m_731215_733151);; 
  }
  
 -static void __lambda_788(void *data, object self_7313697, int argc, object *args) /* object self_7313697, object r_736251 */
-+static void __lambda_788(void *data, object self_7312451, int argc, object *args) /* object self_7312451, object r_735806 */
++static void __lambda_788(void *data, object self_7312444, int argc, object *args) /* object self_7312444, object r_735799 */
   {
 - object r_736251 = args[0];
-+ object r_735806 = args[0];
++ object r_735799 = args[0];
    
 -closureN_type c_7321722;
 -object e_7321726 [2];
@@ -34224,38 +34403,37 @@ Make let-values be the same as let*-values, to work around
 -c_7321722.elements = (object *)e_7321726;
 -c_7321722.elements[0] = ((closureN)self_7313697)->elements[0];
 -c_7321722.elements[1] = r_736251;
-+closureN_type c_7320429;
-+object e_7320433 [2];
-+c_7320429.hdr.mark = gc_color_red;
-+ c_7320429.hdr.grayed = 0;
-+c_7320429.tag = closureN_tag;
-+ c_7320429.fn = (function_type)__lambda_789;
-+c_7320429.num_args = 1;
-+c_7320429.num_elements = 2;
-+c_7320429.elements = (object *)e_7320433;
-+c_7320429.elements[0] = ((closureN)self_7312451)->elements[0];
-+c_7320429.elements[1] = r_735806;
++closureN_type c_7320422;
++object e_7320426 [2];
++c_7320422.hdr.mark = gc_color_red;
++ c_7320422.hdr.grayed = 0;
++c_7320422.tag = closureN_tag;
++ c_7320422.fn = (function_type)__lambda_789;
++c_7320422.num_args = 1;
++c_7320422.num_elements = 2;
++c_7320422.elements = (object *)e_7320426;
++c_7320422.elements[0] = ((closureN)self_7312444)->elements[0];
++c_7320422.elements[1] = r_735799;
  
 -return_direct_with_clo3(data,  __glo_floor_91remainder_scheme_base, (((closure)  __glo_floor_91remainder_scheme_base)->fn),  &c_7321722, ((closureN)self_7313697)->elements[2], ((closureN)self_7313697)->elements[1]);; 
-+return_direct_with_clo3(data,  __glo_floor_91remainder_scheme_base, (((closure)  __glo_floor_91remainder_scheme_base)->fn),  &c_7320429, ((closureN)self_7312451)->elements[2], ((closureN)self_7312451)->elements[1]);; 
++return_direct_with_clo3(data,  __glo_floor_91remainder_scheme_base, (((closure)  __glo_floor_91remainder_scheme_base)->fn),  &c_7320422, ((closureN)self_7312444)->elements[2], ((closureN)self_7312444)->elements[1]);; 
  }
  
 -static void __lambda_789(void *data, object self_7313698, int argc, object *args) /* object self_7313698, object r_736252 */
-+static void __lambda_789(void *data, object self_7312452, int argc, object *args) /* object self_7312452, object r_735807 */
++static void __lambda_789(void *data, object self_7312445, int argc, object *args) /* object self_7312445, object r_735800 */
   {
 - object r_736252 = args[0];
 -  return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_7313698)->elements[0], ((closureN)self_7313698)->elements[1], r_736252);; 
-+ object r_735807 = args[0];
-+  return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_7312452)->elements[0], ((closureN)self_7312452)->elements[1], r_735807);; 
++ object r_735800 = args[0];
++  return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_7312445)->elements[0], ((closureN)self_7312445)->elements[1], r_735800);; 
  }
  
 -static void __lambda_785(void *data, object _, int argc, object *args) /* closure _,object k_736245, object n_731212_733495, object m_731213_733496 */
-+static void __lambda_785(void *data, object _, int argc, object *args) /* closure _,object k_735800, object n_731213_733155, object m_731214_733156 */
++static void __lambda_785(void *data, object _, int argc, object *args) /* closure _,object k_735793, object n_731212_733148, object m_731213_733149 */
   {
 -object k_736245 = args[0]; object n_731212_733495 = args[1]; object m_731213_733496 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:floor-remainder");
-+object k_735800 = args[0]; object n_731213_733155 = args[1]; object m_731214_733156 = args[2];
-+  Cyc_st_add(data, "base.sld:floor-remainder");
++object k_735793 = args[0]; object n_731212_733148 = args[1]; object m_731213_733149 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:floor-remainder");
  
 -closureN_type c_7321706;
 -object e_7321717 [3];
@@ -34269,94 +34447,92 @@ Make let-values be the same as let*-values, to work around
 -c_7321706.elements[0] = k_736245;
 -c_7321706.elements[1] = m_731213_733496;
 -c_7321706.elements[2] = n_731212_733495;
-+closureN_type c_7320413;
-+object e_7320424 [3];
-+c_7320413.hdr.mark = gc_color_red;
-+ c_7320413.hdr.grayed = 0;
-+c_7320413.tag = closureN_tag;
-+ c_7320413.fn = (function_type)__lambda_786;
-+c_7320413.num_args = 1;
-+c_7320413.num_elements = 3;
-+c_7320413.elements = (object *)e_7320424;
-+c_7320413.elements[0] = k_735800;
-+c_7320413.elements[1] = m_731214_733156;
-+c_7320413.elements[2] = n_731213_733155;
++closureN_type c_7320406;
++object e_7320417 [3];
++c_7320406.hdr.mark = gc_color_red;
++ c_7320406.hdr.grayed = 0;
++c_7320406.tag = closureN_tag;
++ c_7320406.fn = (function_type)__lambda_786;
++c_7320406.num_args = 1;
++c_7320406.num_elements = 3;
++c_7320406.elements = (object *)e_7320417;
++c_7320406.elements[0] = k_735793;
++c_7320406.elements[1] = m_731213_733149;
++c_7320406.elements[2] = n_731212_733148;
  
 -return_direct_with_clo3(data,  __glo_floor_91quotient_scheme_base, (((closure)  __glo_floor_91quotient_scheme_base)->fn),  &c_7321706, n_731212_733495, m_731213_733496);; 
-+return_direct_with_clo3(data,  __glo_floor_91quotient_scheme_base, (((closure)  __glo_floor_91quotient_scheme_base)->fn),  &c_7320413, n_731213_733155, m_731214_733156);; 
++return_direct_with_clo3(data,  __glo_floor_91quotient_scheme_base, (((closure)  __glo_floor_91quotient_scheme_base)->fn),  &c_7320406, n_731212_733148, m_731213_733149);; 
  }
  
 -static void __lambda_786(void *data, object self_7313696, int argc, object *args) /* object self_7313696, object r_736247 */
-+static void __lambda_786(void *data, object self_7312450, int argc, object *args) /* object self_7312450, object r_735802 */
++static void __lambda_786(void *data, object self_7312443, int argc, object *args) /* object self_7312443, object r_735795 */
   {
 - object r_736247 = args[0];
-+ object r_735802 = args[0];
++ object r_735795 = args[0];
    
 -complex_num_type local_7321711; 
-+complex_num_type local_7320418; 
++complex_num_type local_7320411; 
  
 -complex_num_type local_7321715; 
 -return_direct_with_clo1(data,  ((closureN)self_7313696)->elements[0], (((closure)  ((closureN)self_7313696)->elements[0])->fn),  Cyc_fast_sub(data,&local_7321711, ((closureN)self_7313696)->elements[2], Cyc_fast_mul(data,&local_7321715, ((closureN)self_7313696)->elements[1], r_736247)));; 
-+complex_num_type local_7320422; 
-+return_direct_with_clo1(data,  ((closureN)self_7312450)->elements[0], (((closure)  ((closureN)self_7312450)->elements[0])->fn),  Cyc_fast_sub(data,&local_7320418, ((closureN)self_7312450)->elements[2], Cyc_fast_mul(data,&local_7320422, ((closureN)self_7312450)->elements[1], r_735802)));; 
++complex_num_type local_7320415; 
++return_direct_with_clo1(data,  ((closureN)self_7312443)->elements[0], (((closure)  ((closureN)self_7312443)->elements[0])->fn),  Cyc_fast_sub(data,&local_7320411, ((closureN)self_7312443)->elements[2], Cyc_fast_mul(data,&local_7320415, ((closureN)self_7312443)->elements[1], r_735795)));; 
  }
  
 -static void __lambda_784(void *data, object _, int argc, object *args) /* closure _,object k_736237, object n_731208_733492, object m_731209_733493 */
-+static void __lambda_784(void *data, object _, int argc, object *args) /* closure _,object k_735792, object n_731209_733152, object m_731210_733153 */
++static void __lambda_784(void *data, object _, int argc, object *args) /* closure _,object k_735785, object n_731208_733145, object m_731209_733146 */
   {
 -object k_736237 = args[0]; object n_731208_733492 = args[1]; object m_731209_733493 = args[2];
 -  object r_736239;
--  Cyc_st_add(data, "scheme/base.sld:floor-quotient");
++object k_735785 = args[0]; object n_731208_733145 = args[1]; object m_731209_733146 = args[2];
++  object r_735787;
+   Cyc_st_add(data, "scheme/base.sld:floor-quotient");
 -  object local_7321684 = alloca(sizeof(complex_num_type)); 
-+object k_735792 = args[0]; object n_731209_733152 = args[1]; object m_731210_733153 = args[2];
-+  object r_735794;
-+  Cyc_st_add(data, "base.sld:floor-quotient");
-+  object local_7320391 = alloca(sizeof(complex_num_type)); 
++  object local_7320384 = alloca(sizeof(complex_num_type)); 
  if( (boolean_f != ((inline_function_type)
 -                   ((closure)__glo_exact_127_191_191inline_191_191_scheme_base)->fn)(data,local_7321684, n_731208_733492)) ){ 
 -  object local_7321688 = alloca(sizeof(complex_num_type)); 
 -  r_736239 = ((inline_function_type)
 -                   ((closure)__glo_exact_127_191_191inline_191_191_scheme_base)->fn)(data,local_7321688, m_731209_733493);
-+                   ((closure)__glo_exact_127_191_191inline_191_191_scheme_base)->fn)(data,local_7320391, n_731209_733152)) ){ 
-+  object local_7320395 = alloca(sizeof(complex_num_type)); 
-+  r_735794 = ((inline_function_type)
-+                   ((closure)__glo_exact_127_191_191inline_191_191_scheme_base)->fn)(data,local_7320395, m_731210_733153);
++                   ((closure)__glo_exact_127_191_191inline_191_191_scheme_base)->fn)(data,local_7320384, n_731208_733145)) ){ 
++  object local_7320388 = alloca(sizeof(complex_num_type)); 
++  r_735787 = ((inline_function_type)
++                   ((closure)__glo_exact_127_191_191inline_191_191_scheme_base)->fn)(data,local_7320388, m_731209_733146);
  } else { 
 -  r_736239 = boolean_f;}
 -;if( (boolean_f != r_736239) ){ 
-+  r_735794 = boolean_f;}
-+;if( (boolean_f != r_735794) ){ 
++  r_735787 = boolean_f;}
++;if( (boolean_f != r_735787) ){ 
    
 -complex_num_type local_7321693; 
-+complex_num_type local_7320400; 
++complex_num_type local_7320393; 
  
 -complex_num_type local_7321696; 
 -return_direct_with_clo2(data,  __glo_exact_scheme_base, (((closure)  __glo_exact_scheme_base)->fn),  k_736237, ((inline_function_type)
 -                   ((closure)__glo_floor_191_191inline_191_191_scheme_base)->fn)(data,&local_7321693, Cyc_fast_div(data,&local_7321696, n_731208_733492, m_731209_733493)));
-+complex_num_type local_7320403; 
-+return_direct_with_clo2(data,  __glo_exact_scheme_base, (((closure)  __glo_exact_scheme_base)->fn),  k_735792, ((inline_function_type)
-+                   ((closure)__glo_floor_191_191inline_191_191_scheme_base)->fn)(data,&local_7320400, Cyc_fast_div(data,&local_7320403, n_731209_733152, m_731210_733153)));
++complex_num_type local_7320396; 
++return_direct_with_clo2(data,  __glo_exact_scheme_base, (((closure)  __glo_exact_scheme_base)->fn),  k_735785, ((inline_function_type)
++                   ((closure)__glo_floor_191_191inline_191_191_scheme_base)->fn)(data,&local_7320393, Cyc_fast_div(data,&local_7320396, n_731208_733145, m_731209_733146)));
  } else { 
    
 -complex_num_type local_7321700; 
-+complex_num_type local_7320407; 
++complex_num_type local_7320400; 
  
 -complex_num_type local_7321703; 
 -return_direct_with_clo1(data,  k_736237, (((closure)  k_736237)->fn),  ((inline_function_type)
 -                   ((closure)__glo_floor_191_191inline_191_191_scheme_base)->fn)(data,&local_7321700, Cyc_fast_div(data,&local_7321703, n_731208_733492, m_731209_733493)));}
-+complex_num_type local_7320410; 
-+return_direct_with_clo1(data,  k_735792, (((closure)  k_735792)->fn),  ((inline_function_type)
-+                   ((closure)__glo_floor_191_191inline_191_191_scheme_base)->fn)(data,&local_7320407, Cyc_fast_div(data,&local_7320410, n_731209_733152, m_731210_733153)));}
++complex_num_type local_7320403; 
++return_direct_with_clo1(data,  k_735785, (((closure)  k_735785)->fn),  ((inline_function_type)
++                   ((closure)__glo_floor_191_191inline_191_191_scheme_base)->fn)(data,&local_7320400, Cyc_fast_div(data,&local_7320403, n_731208_733145, m_731209_733146)));}
  ;; 
  }
  
 -static void __lambda_781(void *data, object _, int argc, object *args) /* closure _,object k_736232, object n_731206_733490, object m_731207_733491 */
-+static void __lambda_781(void *data, object _, int argc, object *args) /* closure _,object k_735787, object n_731207_733150, object m_731208_733151 */
++static void __lambda_781(void *data, object _, int argc, object *args) /* closure _,object k_735780, object n_731206_733143, object m_731207_733144 */
   {
 -object k_736232 = args[0]; object n_731206_733490 = args[1]; object m_731207_733491 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:truncate/");
-+object k_735787 = args[0]; object n_731207_733150 = args[1]; object m_731208_733151 = args[2];
-+  Cyc_st_add(data, "base.sld:truncate/");
++object k_735780 = args[0]; object n_731206_733143 = args[1]; object m_731207_733144 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:truncate/");
  
 -closureN_type c_7321670;
 -object e_7321679 [3];
@@ -34370,28 +34546,28 @@ Make let-values be the same as let*-values, to work around
 -c_7321670.elements[0] = k_736232;
 -c_7321670.elements[1] = m_731207_733491;
 -c_7321670.elements[2] = n_731206_733490;
-+closureN_type c_7320377;
-+object e_7320386 [3];
-+c_7320377.hdr.mark = gc_color_red;
-+ c_7320377.hdr.grayed = 0;
-+c_7320377.tag = closureN_tag;
-+ c_7320377.fn = (function_type)__lambda_782;
-+c_7320377.num_args = 1;
-+c_7320377.num_elements = 3;
-+c_7320377.elements = (object *)e_7320386;
-+c_7320377.elements[0] = k_735787;
-+c_7320377.elements[1] = m_731208_733151;
-+c_7320377.elements[2] = n_731207_733150;
++closureN_type c_7320370;
++object e_7320379 [3];
++c_7320370.hdr.mark = gc_color_red;
++ c_7320370.hdr.grayed = 0;
++c_7320370.tag = closureN_tag;
++ c_7320370.fn = (function_type)__lambda_782;
++c_7320370.num_args = 1;
++c_7320370.num_elements = 3;
++c_7320370.elements = (object *)e_7320379;
++c_7320370.elements[0] = k_735780;
++c_7320370.elements[1] = m_731207_733144;
++c_7320370.elements[2] = n_731206_733143;
  
 -return_direct_with_clo3(data,  __glo_truncate_91quotient_scheme_base, (((closure)  __glo_truncate_91quotient_scheme_base)->fn),  &c_7321670, n_731206_733490, m_731207_733491);; 
-+return_direct_with_clo3(data,  __glo_truncate_91quotient_scheme_base, (((closure)  __glo_truncate_91quotient_scheme_base)->fn),  &c_7320377, n_731207_733150, m_731208_733151);; 
++return_direct_with_clo3(data,  __glo_truncate_91quotient_scheme_base, (((closure)  __glo_truncate_91quotient_scheme_base)->fn),  &c_7320370, n_731206_733143, m_731207_733144);; 
  }
  
 -static void __lambda_782(void *data, object self_7313694, int argc, object *args) /* object self_7313694, object r_736233 */
-+static void __lambda_782(void *data, object self_7312448, int argc, object *args) /* object self_7312448, object r_735788 */
++static void __lambda_782(void *data, object self_7312441, int argc, object *args) /* object self_7312441, object r_735781 */
   {
 - object r_736233 = args[0];
-+ object r_735788 = args[0];
++ object r_735781 = args[0];
    
 -closureN_type c_7321672;
 -object e_7321676 [2];
@@ -34404,64 +34580,62 @@ Make let-values be the same as let*-values, to work around
 -c_7321672.elements = (object *)e_7321676;
 -c_7321672.elements[0] = ((closureN)self_7313694)->elements[0];
 -c_7321672.elements[1] = r_736233;
-+closureN_type c_7320379;
-+object e_7320383 [2];
-+c_7320379.hdr.mark = gc_color_red;
-+ c_7320379.hdr.grayed = 0;
-+c_7320379.tag = closureN_tag;
-+ c_7320379.fn = (function_type)__lambda_783;
-+c_7320379.num_args = 1;
-+c_7320379.num_elements = 2;
-+c_7320379.elements = (object *)e_7320383;
-+c_7320379.elements[0] = ((closureN)self_7312448)->elements[0];
-+c_7320379.elements[1] = r_735788;
++closureN_type c_7320372;
++object e_7320376 [2];
++c_7320372.hdr.mark = gc_color_red;
++ c_7320372.hdr.grayed = 0;
++c_7320372.tag = closureN_tag;
++ c_7320372.fn = (function_type)__lambda_783;
++c_7320372.num_args = 1;
++c_7320372.num_elements = 2;
++c_7320372.elements = (object *)e_7320376;
++c_7320372.elements[0] = ((closureN)self_7312441)->elements[0];
++c_7320372.elements[1] = r_735781;
  
 -return_direct_with_clo3(data,  __glo_truncate_91remainder_scheme_base, (((closure)  __glo_truncate_91remainder_scheme_base)->fn),  &c_7321672, ((closureN)self_7313694)->elements[2], ((closureN)self_7313694)->elements[1]);; 
-+return_direct_with_clo3(data,  __glo_truncate_91remainder_scheme_base, (((closure)  __glo_truncate_91remainder_scheme_base)->fn),  &c_7320379, ((closureN)self_7312448)->elements[2], ((closureN)self_7312448)->elements[1]);; 
++return_direct_with_clo3(data,  __glo_truncate_91remainder_scheme_base, (((closure)  __glo_truncate_91remainder_scheme_base)->fn),  &c_7320372, ((closureN)self_7312441)->elements[2], ((closureN)self_7312441)->elements[1]);; 
  }
  
 -static void __lambda_783(void *data, object self_7313695, int argc, object *args) /* object self_7313695, object r_736234 */
-+static void __lambda_783(void *data, object self_7312449, int argc, object *args) /* object self_7312449, object r_735789 */
++static void __lambda_783(void *data, object self_7312442, int argc, object *args) /* object self_7312442, object r_735782 */
   {
 - object r_736234 = args[0];
 -  return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_7313695)->elements[0], ((closureN)self_7313695)->elements[1], r_736234);; 
-+ object r_735789 = args[0];
-+  return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_7312449)->elements[0], ((closureN)self_7312449)->elements[1], r_735789);; 
++ object r_735782 = args[0];
++  return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_7312442)->elements[0], ((closureN)self_7312442)->elements[1], r_735782);; 
  }
  
 -static object __lambda_1478(void *data, object ptr,object x_731204_733488, object y_731205_733489) {
-+static object __lambda_1431(void *data, object ptr,object x_731205_733148, object y_731206_733149) {
++static object __lambda_1431(void *data, object ptr,object x_731204_733141, object y_731205_733142) {
  
--  Cyc_st_add(data, "scheme/base.sld:quotient");
-+  Cyc_st_add(data, "base.sld:quotient");
+   Cyc_st_add(data, "scheme/base.sld:quotient");
  
 -complex_num_type local_7321664; 
-+complex_num_type local_7320371; 
++complex_num_type local_7320364; 
  
 -complex_num_type local_7321667; 
-+complex_num_type local_7320374; 
++complex_num_type local_7320367; 
  return_copy(ptr,  ((inline_function_type)
 -                   ((closure)__glo_truncate_191_191inline_191_191_scheme_base)->fn)(data,&local_7321664, Cyc_fast_div(data,&local_7321667, x_731204_733488, y_731205_733489)));; 
-+                   ((closure)__glo_truncate_191_191inline_191_191_scheme_base)->fn)(data,&local_7320371, Cyc_fast_div(data,&local_7320374, x_731205_733148, y_731206_733149)));; 
++                   ((closure)__glo_truncate_191_191inline_191_191_scheme_base)->fn)(data,&local_7320364, Cyc_fast_div(data,&local_7320367, x_731204_733141, y_731205_733142)));; 
  }
  
 -static void __lambda_780(void *data, object _, int argc, object *args) /* closure _,object k_736224, object x_731204_733488, object y_731205_733489 */
-+static void __lambda_780(void *data, object _, int argc, object *args) /* closure _,object k_735779, object x_731205_733148, object y_731206_733149 */
++static void __lambda_780(void *data, object _, int argc, object *args) /* closure _,object k_735772, object x_731204_733141, object y_731205_733142 */
   {
 -object k_736224 = args[0]; object x_731204_733488 = args[1]; object y_731205_733489 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:quotient");
-+object k_735779 = args[0]; object x_731205_733148 = args[1]; object y_731206_733149 = args[2];
-+  Cyc_st_add(data, "base.sld:quotient");
++object k_735772 = args[0]; object x_731204_733141 = args[1]; object y_731205_733142 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:quotient");
  
 -complex_num_type local_7321656; 
-+complex_num_type local_7320363; 
++complex_num_type local_7320356; 
  
 -complex_num_type local_7321659; 
 -return_direct_with_clo1(data,  k_736224, (((closure)  k_736224)->fn),  ((inline_function_type)
 -                   ((closure)__glo_truncate_191_191inline_191_191_scheme_base)->fn)(data,&local_7321656, Cyc_fast_div(data,&local_7321659, x_731204_733488, y_731205_733489)));; 
-+complex_num_type local_7320366; 
-+return_direct_with_clo1(data,  k_735779, (((closure)  k_735779)->fn),  ((inline_function_type)
-+                   ((closure)__glo_truncate_191_191inline_191_191_scheme_base)->fn)(data,&local_7320363, Cyc_fast_div(data,&local_7320366, x_731205_733148, y_731206_733149)));; 
++complex_num_type local_7320359; 
++return_direct_with_clo1(data,  k_735772, (((closure)  k_735772)->fn),  ((inline_function_type)
++                   ((closure)__glo_truncate_191_191inline_191_191_scheme_base)->fn)(data,&local_7320356, Cyc_fast_div(data,&local_7320359, x_731204_733141, y_731205_733142)));; 
  }
  
 -static void __lambda_1477(void *data, object _, int argc, object *args) {object k = args[0];object n = args[1]; Cyc_get_ratio(data, k, n, 0); }
@@ -34469,36 +34643,34 @@ Make let-values be the same as let*-values, to work around
 -static void __lambda_779(void *data, object _, int argc, object *args) /* closure _,object k_736217, object nums_731203_733487_raw, ... */
 +static void __lambda_1430(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_1429(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_779(void *data, object _, int argc, object *args) /* closure _,object k_735772, object nums_731204_733147_raw, ... */
++static void __lambda_779(void *data, object _, int argc, object *args) /* closure _,object k_735765, object nums_731203_733140_raw, ... */
   {
 -object k_736217 = args[0];
 -load_varargs(nums_731203_733487, args, 1, argc - 1);
--  Cyc_st_add(data, "scheme/base.sld:lcm/entry");
-+object k_735772 = args[0];
-+load_varargs(nums_731204_733147, args, 1, argc - 1);
-+  Cyc_st_add(data, "base.sld:lcm/entry");
++object k_735765 = args[0];
++load_varargs(nums_731203_733140, args, 1, argc - 1);
+   Cyc_st_add(data, "scheme/base.sld:lcm/entry");
    
 -if( (boolean_f != Cyc_eqv(nums_731203_733487, NULL)) ){ 
 -  return_direct_with_clo1(data,  k_736217, (((closure)  k_736217)->fn),  obj_int2obj(1));
-+if( (boolean_f != Cyc_eqv(nums_731204_733147, NULL)) ){ 
-+  return_direct_with_clo1(data,  k_735772, (((closure)  k_735772)->fn),  obj_int2obj(1));
++if( (boolean_f != Cyc_eqv(nums_731203_733140, NULL)) ){ 
++  return_direct_with_clo1(data,  k_735765, (((closure)  k_735765)->fn),  obj_int2obj(1));
  } else { 
    
  
  
  
 -return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  k_736217, __glo_lcm_95main_scheme_base, Cyc_car(data, nums_731203_733487), Cyc_cdr(data, nums_731203_733487));}
-+return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  k_735772, __glo_lcm_95main_scheme_base, Cyc_car(data, nums_731204_733147), Cyc_cdr(data, nums_731204_733147));}
++return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  k_735765, __glo_lcm_95main_scheme_base, Cyc_car(data, nums_731203_733140), Cyc_cdr(data, nums_731203_733140));}
  ;; 
  }
  
 -static void __lambda_777(void *data, object _, int argc, object *args) /* closure _,object k_736211, object a_731201_733485, object b_731202_733486 */
-+static void __lambda_777(void *data, object _, int argc, object *args) /* closure _,object k_735766, object a_731202_733145, object b_731203_733146 */
++static void __lambda_777(void *data, object _, int argc, object *args) /* closure _,object k_735759, object a_731201_733138, object b_731202_733139 */
   {
 -object k_736211 = args[0]; object a_731201_733485 = args[1]; object b_731202_733486 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:lcm/main");
-+object k_735766 = args[0]; object a_731202_733145 = args[1]; object b_731203_733146 = args[2];
-+  Cyc_st_add(data, "base.sld:lcm/main");
++object k_735759 = args[0]; object a_731201_733138 = args[1]; object b_731202_733139 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:lcm/main");
  
 -closureN_type c_7321629;
 -object e_7321640 [3];
@@ -34512,74 +34684,72 @@ Make let-values be the same as let*-values, to work around
 -c_7321629.elements[0] = a_731201_733485;
 -c_7321629.elements[1] = b_731202_733486;
 -c_7321629.elements[2] = k_736211;
-+closureN_type c_7320336;
-+object e_7320347 [3];
-+c_7320336.hdr.mark = gc_color_red;
-+ c_7320336.hdr.grayed = 0;
-+c_7320336.tag = closureN_tag;
-+ c_7320336.fn = (function_type)__lambda_778;
-+c_7320336.num_args = 1;
-+c_7320336.num_elements = 3;
-+c_7320336.elements = (object *)e_7320347;
-+c_7320336.elements[0] = a_731202_733145;
-+c_7320336.elements[1] = b_731203_733146;
-+c_7320336.elements[2] = k_735766;
++closureN_type c_7320329;
++object e_7320340 [3];
++c_7320329.hdr.mark = gc_color_red;
++ c_7320329.hdr.grayed = 0;
++c_7320329.tag = closureN_tag;
++ c_7320329.fn = (function_type)__lambda_778;
++c_7320329.num_args = 1;
++c_7320329.num_elements = 3;
++c_7320329.elements = (object *)e_7320340;
++c_7320329.elements[0] = a_731201_733138;
++c_7320329.elements[1] = b_731202_733139;
++c_7320329.elements[2] = k_735759;
  
 -return_direct_with_clo3(data,  __glo_gcd_95main_scheme_base, (((closure)  __glo_gcd_95main_scheme_base)->fn),  &c_7321629, a_731201_733485, b_731202_733486);; 
-+return_direct_with_clo3(data,  __glo_gcd_95main_scheme_base, (((closure)  __glo_gcd_95main_scheme_base)->fn),  &c_7320336, a_731202_733145, b_731203_733146);; 
++return_direct_with_clo3(data,  __glo_gcd_95main_scheme_base, (((closure)  __glo_gcd_95main_scheme_base)->fn),  &c_7320329, a_731201_733138, b_731202_733139);; 
  }
  
 -static void __lambda_778(void *data, object self_7313693, int argc, object *args) /* object self_7313693, object r_736214 */
-+static void __lambda_778(void *data, object self_7312447, int argc, object *args) /* object self_7312447, object r_735769 */
++static void __lambda_778(void *data, object self_7312440, int argc, object *args) /* object self_7312440, object r_735762 */
   {
 - object r_736214 = args[0];
-+ object r_735769 = args[0];
++ object r_735762 = args[0];
    
 -complex_num_type local_7321634; 
-+complex_num_type local_7320341; 
++complex_num_type local_7320334; 
  
 -complex_num_type local_7321637; 
 -return_direct_with_clo2(data,  __glo_abs_scheme_base, (((closure)  __glo_abs_scheme_base)->fn),  ((closureN)self_7313693)->elements[2], Cyc_fast_div(data,&local_7321634, Cyc_fast_mul(data,&local_7321637, ((closureN)self_7313693)->elements[0], ((closureN)self_7313693)->elements[1]), r_736214));; 
-+complex_num_type local_7320344; 
-+return_direct_with_clo2(data,  __glo_abs_scheme_base, (((closure)  __glo_abs_scheme_base)->fn),  ((closureN)self_7312447)->elements[2], Cyc_fast_div(data,&local_7320341, Cyc_fast_mul(data,&local_7320344, ((closureN)self_7312447)->elements[0], ((closureN)self_7312447)->elements[1]), r_735769));; 
++complex_num_type local_7320337; 
++return_direct_with_clo2(data,  __glo_abs_scheme_base, (((closure)  __glo_abs_scheme_base)->fn),  ((closureN)self_7312440)->elements[2], Cyc_fast_div(data,&local_7320334, Cyc_fast_mul(data,&local_7320337, ((closureN)self_7312440)->elements[0], ((closureN)self_7312440)->elements[1]), r_735762));; 
  }
  
 -static void __lambda_776(void *data, object _, int argc, object *args) /* closure _,object k_736204, object nums_731200_733484_raw, ... */
-+static void __lambda_776(void *data, object _, int argc, object *args) /* closure _,object k_735759, object nums_731201_733144_raw, ... */
++static void __lambda_776(void *data, object _, int argc, object *args) /* closure _,object k_735752, object nums_731200_733137_raw, ... */
   {
 -object k_736204 = args[0];
 -load_varargs(nums_731200_733484, args, 1, argc - 1);
--  Cyc_st_add(data, "scheme/base.sld:gcd/entry");
-+object k_735759 = args[0];
-+load_varargs(nums_731201_733144, args, 1, argc - 1);
-+  Cyc_st_add(data, "base.sld:gcd/entry");
++object k_735752 = args[0];
++load_varargs(nums_731200_733137, args, 1, argc - 1);
+   Cyc_st_add(data, "scheme/base.sld:gcd/entry");
    
 -if( (boolean_f != Cyc_eqv(nums_731200_733484, NULL)) ){ 
 -  return_direct_with_clo1(data,  k_736204, (((closure)  k_736204)->fn),  obj_int2obj(0));
-+if( (boolean_f != Cyc_eqv(nums_731201_733144, NULL)) ){ 
-+  return_direct_with_clo1(data,  k_735759, (((closure)  k_735759)->fn),  obj_int2obj(0));
++if( (boolean_f != Cyc_eqv(nums_731200_733137, NULL)) ){ 
++  return_direct_with_clo1(data,  k_735752, (((closure)  k_735752)->fn),  obj_int2obj(0));
  } else { 
    
  
  
  
 -return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  k_736204, __glo_gcd_95main_scheme_base, Cyc_car(data, nums_731200_733484), Cyc_cdr(data, nums_731200_733484));}
-+return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  k_735759, __glo_gcd_95main_scheme_base, Cyc_car(data, nums_731201_733144), Cyc_cdr(data, nums_731201_733144));}
++return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  k_735752, __glo_gcd_95main_scheme_base, Cyc_car(data, nums_731200_733137), Cyc_cdr(data, nums_731200_733137));}
  ;; 
  }
  
 -static void __lambda_774(void *data, object _, int argc, object *args) /* closure _,object k_736199, object a_731198_733482, object b_731199_733483 */
-+static void __lambda_774(void *data, object _, int argc, object *args) /* closure _,object k_735754, object a_731199_733142, object b_731200_733143 */
++static void __lambda_774(void *data, object _, int argc, object *args) /* closure _,object k_735747, object a_731198_733135, object b_731199_733136 */
   {
 -object k_736199 = args[0]; object a_731198_733482 = args[1]; object b_731199_733483 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:gcd/main");
-+object k_735754 = args[0]; object a_731199_733142 = args[1]; object b_731200_733143 = args[2];
-+  Cyc_st_add(data, "base.sld:gcd/main");
++object k_735747 = args[0]; object a_731198_733135 = args[1]; object b_731199_733136 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:gcd/main");
    
 -if( (boolean_f != Cyc_num_fast_eq_op(data, b_731199_733483, obj_int2obj(0))) ){ 
 -  return_direct_with_clo2(data,  __glo_abs_scheme_base, (((closure)  __glo_abs_scheme_base)->fn),  k_736199, a_731198_733482);
-+if( (boolean_f != Cyc_num_fast_eq_op(data, b_731200_733143, obj_int2obj(0))) ){ 
-+  return_direct_with_clo2(data,  __glo_abs_scheme_base, (((closure)  __glo_abs_scheme_base)->fn),  k_735754, a_731199_733142);
++if( (boolean_f != Cyc_num_fast_eq_op(data, b_731199_733136, obj_int2obj(0))) ){ 
++  return_direct_with_clo2(data,  __glo_abs_scheme_base, (((closure)  __glo_abs_scheme_base)->fn),  k_735747, a_731198_733135);
  } else { 
    
 -closureN_type c_7321613;
@@ -34593,41 +34763,40 @@ Make let-values be the same as let*-values, to work around
 -c_7321613.elements = (object *)e_7321617;
 -c_7321613.elements[0] = b_731199_733483;
 -c_7321613.elements[1] = k_736199;
-+closureN_type c_7320320;
-+object e_7320324 [2];
-+c_7320320.hdr.mark = gc_color_red;
-+ c_7320320.hdr.grayed = 0;
-+c_7320320.tag = closureN_tag;
-+ c_7320320.fn = (function_type)__lambda_775;
-+c_7320320.num_args = 1;
-+c_7320320.num_elements = 2;
-+c_7320320.elements = (object *)e_7320324;
-+c_7320320.elements[0] = b_731200_733143;
-+c_7320320.elements[1] = k_735754;
++closureN_type c_7320313;
++object e_7320317 [2];
++c_7320313.hdr.mark = gc_color_red;
++ c_7320313.hdr.grayed = 0;
++c_7320313.tag = closureN_tag;
++ c_7320313.fn = (function_type)__lambda_775;
++c_7320313.num_args = 1;
++c_7320313.num_elements = 2;
++c_7320313.elements = (object *)e_7320317;
++c_7320313.elements[0] = b_731199_733136;
++c_7320313.elements[1] = k_735747;
  
 -return_direct_with_clo3(data,  __glo_modulo_scheme_base, (((closure)  __glo_modulo_scheme_base)->fn),  &c_7321613, a_731198_733482, b_731199_733483);}
-+return_direct_with_clo3(data,  __glo_modulo_scheme_base, (((closure)  __glo_modulo_scheme_base)->fn),  &c_7320320, a_731199_733142, b_731200_733143);}
++return_direct_with_clo3(data,  __glo_modulo_scheme_base, (((closure)  __glo_modulo_scheme_base)->fn),  &c_7320313, a_731198_733135, b_731199_733136);}
  ;; 
  }
  
 -static void __lambda_775(void *data, object self_7313692, int argc, object *args) /* object self_7313692, object r_736201 */
-+static void __lambda_775(void *data, object self_7312446, int argc, object *args) /* object self_7312446, object r_735756 */
++static void __lambda_775(void *data, object self_7312439, int argc, object *args) /* object self_7312439, object r_735749 */
   {
 - object r_736201 = args[0];
 -  return_direct_with_clo3(data,  __glo_gcd_95main_scheme_base, (((closure)  __glo_gcd_95main_scheme_base)->fn),  ((closureN)self_7313692)->elements[1], ((closureN)self_7313692)->elements[0], r_736201);; 
-+ object r_735756 = args[0];
-+  return_direct_with_clo3(data,  __glo_gcd_95main_scheme_base, (((closure)  __glo_gcd_95main_scheme_base)->fn),  ((closureN)self_7312446)->elements[1], ((closureN)self_7312446)->elements[0], r_735756);; 
++ object r_735749 = args[0];
++  return_direct_with_clo3(data,  __glo_gcd_95main_scheme_base, (((closure)  __glo_gcd_95main_scheme_base)->fn),  ((closureN)self_7312439)->elements[1], ((closureN)self_7312439)->elements[0], r_735749);; 
  }
  
 -static void __lambda_771(void *data, object _, int argc, object *args) /* closure _,object k_736189, object first_731194_733478, object rest_731195_733479_raw, ... */
-+static void __lambda_771(void *data, object _, int argc, object *args) /* closure _,object k_735744, object first_731195_733138, object rest_731196_733139_raw, ... */
++static void __lambda_771(void *data, object _, int argc, object *args) /* closure _,object k_735737, object first_731194_733131, object rest_731195_733132_raw, ... */
   {
 -object k_736189 = args[0]; object first_731194_733478 = args[1];
 -load_varargs(rest_731195_733479, args, 2, argc - 2);
--  Cyc_st_add(data, "scheme/base.sld:min");
-+object k_735744 = args[0]; object first_731195_733138 = args[1];
-+load_varargs(rest_731196_733139, args, 2, argc - 2);
-+  Cyc_st_add(data, "base.sld:min");
++object k_735737 = args[0]; object first_731194_733131 = args[1];
++load_varargs(rest_731195_733132, args, 2, argc - 2);
+   Cyc_st_add(data, "scheme/base.sld:min");
  
 -closureN_type c_7321597;
 -object e_7321602 [3];
@@ -34641,60 +34810,59 @@ Make let-values be the same as let*-values, to work around
 -c_7321597.elements[0] = first_731194_733478;
 -c_7321597.elements[1] = k_736189;
 -c_7321597.elements[2] = rest_731195_733479;
-+closureN_type c_7320304;
-+object e_7320309 [3];
-+c_7320304.hdr.mark = gc_color_red;
-+ c_7320304.hdr.grayed = 0;
-+c_7320304.tag = closureN_tag;
-+ c_7320304.fn = (function_type)__lambda_772;
-+c_7320304.num_args = 1;
-+c_7320304.num_elements = 3;
-+c_7320304.elements = (object *)e_7320309;
-+c_7320304.elements[0] = first_731195_733138;
-+c_7320304.elements[1] = k_735744;
-+c_7320304.elements[2] = rest_731196_733139;
++closureN_type c_7320297;
++object e_7320302 [3];
++c_7320297.hdr.mark = gc_color_red;
++ c_7320297.hdr.grayed = 0;
++c_7320297.tag = closureN_tag;
++ c_7320297.fn = (function_type)__lambda_772;
++c_7320297.num_args = 1;
++c_7320297.num_elements = 3;
++c_7320297.elements = (object *)e_7320302;
++c_7320297.elements[0] = first_731194_733131;
++c_7320297.elements[1] = k_735737;
++c_7320297.elements[2] = rest_731195_733132;
  
  
 -mclosure0(c_7321603, (function_type)__lambda_773);c_7321603.num_args = 2;
 -return_direct_with_clo1(data,(closure)&c_7321597,__lambda_772,  &c_7321603);; 
-+mclosure0(c_7320310, (function_type)__lambda_773);c_7320310.num_args = 2;
-+return_direct_with_clo1(data,(closure)&c_7320304,__lambda_772,  &c_7320310);; 
++mclosure0(c_7320303, (function_type)__lambda_773);c_7320303.num_args = 2;
++return_direct_with_clo1(data,(closure)&c_7320297,__lambda_772,  &c_7320303);; 
  }
  
 -static void __lambda_773(void *data, object self_7313690, int argc, object *args) /* object self_7313690, object k_736191, object old_731196_733480, object new_731197_733481 */
-+static void __lambda_773(void *data, object self_7312444, int argc, object *args) /* object self_7312444, object k_735746, object old_731197_733140, object new_731198_733141 */
++static void __lambda_773(void *data, object self_7312437, int argc, object *args) /* object self_7312437, object k_735739, object old_731196_733133, object new_731197_733134 */
   {
 - object k_736191 = args[0]; object old_731196_733480 = args[1]; object new_731197_733481 = args[2];
-+ object k_735746 = args[0]; object old_731197_733140 = args[1]; object new_731198_733141 = args[2];
++ object k_735739 = args[0]; object old_731196_733133 = args[1]; object new_731197_733134 = args[2];
      
 -if( (boolean_f != Cyc_num_fast_lt_op(data, old_731196_733480, new_731197_733481)) ){ 
 -  return_direct_with_clo1(data,  k_736191, (((closure)  k_736191)->fn),  old_731196_733480);
-+if( (boolean_f != Cyc_num_fast_lt_op(data, old_731197_733140, new_731198_733141)) ){ 
-+  return_direct_with_clo1(data,  k_735746, (((closure)  k_735746)->fn),  old_731197_733140);
++if( (boolean_f != Cyc_num_fast_lt_op(data, old_731196_733133, new_731197_733134)) ){ 
++  return_direct_with_clo1(data,  k_735739, (((closure)  k_735739)->fn),  old_731196_733133);
  } else { 
 -  return_direct_with_clo1(data,  k_736191, (((closure)  k_736191)->fn),  new_731197_733481);}
-+  return_direct_with_clo1(data,  k_735746, (((closure)  k_735746)->fn),  new_731198_733141);}
++  return_direct_with_clo1(data,  k_735739, (((closure)  k_735739)->fn),  new_731197_733134);}
  ;; 
  }
  
 -static void __lambda_772(void *data, object self_7313691, int argc, object *args) /* object self_7313691, object r_736190 */
-+static void __lambda_772(void *data, object self_7312445, int argc, object *args) /* object self_7312445, object r_735745 */
++static void __lambda_772(void *data, object self_7312438, int argc, object *args) /* object self_7312438, object r_735738 */
   {
 - object r_736190 = args[0];
 -  return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  ((closureN)self_7313691)->elements[1], r_736190, ((closureN)self_7313691)->elements[0], ((closureN)self_7313691)->elements[2]);; 
-+ object r_735745 = args[0];
-+  return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  ((closureN)self_7312445)->elements[1], r_735745, ((closureN)self_7312445)->elements[0], ((closureN)self_7312445)->elements[2]);; 
++ object r_735738 = args[0];
++  return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  ((closureN)self_7312438)->elements[1], r_735738, ((closureN)self_7312438)->elements[0], ((closureN)self_7312438)->elements[2]);; 
  }
  
 -static void __lambda_768(void *data, object _, int argc, object *args) /* closure _,object k_736183, object first_731190_733474, object rest_731191_733475_raw, ... */
-+static void __lambda_768(void *data, object _, int argc, object *args) /* closure _,object k_735738, object first_731191_733134, object rest_731192_733135_raw, ... */
++static void __lambda_768(void *data, object _, int argc, object *args) /* closure _,object k_735731, object first_731190_733127, object rest_731191_733128_raw, ... */
   {
 -object k_736183 = args[0]; object first_731190_733474 = args[1];
 -load_varargs(rest_731191_733475, args, 2, argc - 2);
--  Cyc_st_add(data, "scheme/base.sld:max");
-+object k_735738 = args[0]; object first_731191_733134 = args[1];
-+load_varargs(rest_731192_733135, args, 2, argc - 2);
-+  Cyc_st_add(data, "base.sld:max");
++object k_735731 = args[0]; object first_731190_733127 = args[1];
++load_varargs(rest_731191_733128, args, 2, argc - 2);
+   Cyc_st_add(data, "scheme/base.sld:max");
  
 -closureN_type c_7321584;
 -object e_7321589 [3];
@@ -34708,49 +34876,49 @@ Make let-values be the same as let*-values, to work around
 -c_7321584.elements[0] = first_731190_733474;
 -c_7321584.elements[1] = k_736183;
 -c_7321584.elements[2] = rest_731191_733475;
-+closureN_type c_7320291;
-+object e_7320296 [3];
-+c_7320291.hdr.mark = gc_color_red;
-+ c_7320291.hdr.grayed = 0;
-+c_7320291.tag = closureN_tag;
-+ c_7320291.fn = (function_type)__lambda_769;
-+c_7320291.num_args = 1;
-+c_7320291.num_elements = 3;
-+c_7320291.elements = (object *)e_7320296;
-+c_7320291.elements[0] = first_731191_733134;
-+c_7320291.elements[1] = k_735738;
-+c_7320291.elements[2] = rest_731192_733135;
++closureN_type c_7320284;
++object e_7320289 [3];
++c_7320284.hdr.mark = gc_color_red;
++ c_7320284.hdr.grayed = 0;
++c_7320284.tag = closureN_tag;
++ c_7320284.fn = (function_type)__lambda_769;
++c_7320284.num_args = 1;
++c_7320284.num_elements = 3;
++c_7320284.elements = (object *)e_7320289;
++c_7320284.elements[0] = first_731190_733127;
++c_7320284.elements[1] = k_735731;
++c_7320284.elements[2] = rest_731191_733128;
  
  
 -mclosure0(c_7321590, (function_type)__lambda_770);c_7321590.num_args = 2;
 -return_direct_with_clo1(data,(closure)&c_7321584,__lambda_769,  &c_7321590);; 
-+mclosure0(c_7320297, (function_type)__lambda_770);c_7320297.num_args = 2;
-+return_direct_with_clo1(data,(closure)&c_7320291,__lambda_769,  &c_7320297);; 
++mclosure0(c_7320290, (function_type)__lambda_770);c_7320290.num_args = 2;
++return_direct_with_clo1(data,(closure)&c_7320284,__lambda_769,  &c_7320290);; 
  }
  
 -static void __lambda_770(void *data, object self_7313688, int argc, object *args) /* object self_7313688, object k_736185, object old_731192_733476, object new_731193_733477 */
-+static void __lambda_770(void *data, object self_7312442, int argc, object *args) /* object self_7312442, object k_735740, object old_731193_733136, object new_731194_733137 */
++static void __lambda_770(void *data, object self_7312435, int argc, object *args) /* object self_7312435, object k_735733, object old_731192_733129, object new_731193_733130 */
   {
 - object k_736185 = args[0]; object old_731192_733476 = args[1]; object new_731193_733477 = args[2];
-+ object k_735740 = args[0]; object old_731193_733136 = args[1]; object new_731194_733137 = args[2];
++ object k_735733 = args[0]; object old_731192_733129 = args[1]; object new_731193_733130 = args[2];
      
 -if( (boolean_f != Cyc_num_fast_gt_op(data, old_731192_733476, new_731193_733477)) ){ 
 -  return_direct_with_clo1(data,  k_736185, (((closure)  k_736185)->fn),  old_731192_733476);
-+if( (boolean_f != Cyc_num_fast_gt_op(data, old_731193_733136, new_731194_733137)) ){ 
-+  return_direct_with_clo1(data,  k_735740, (((closure)  k_735740)->fn),  old_731193_733136);
++if( (boolean_f != Cyc_num_fast_gt_op(data, old_731192_733129, new_731193_733130)) ){ 
++  return_direct_with_clo1(data,  k_735733, (((closure)  k_735733)->fn),  old_731192_733129);
  } else { 
 -  return_direct_with_clo1(data,  k_736185, (((closure)  k_736185)->fn),  new_731193_733477);}
-+  return_direct_with_clo1(data,  k_735740, (((closure)  k_735740)->fn),  new_731194_733137);}
++  return_direct_with_clo1(data,  k_735733, (((closure)  k_735733)->fn),  new_731193_733130);}
  ;; 
  }
  
 -static void __lambda_769(void *data, object self_7313689, int argc, object *args) /* object self_7313689, object r_736184 */
-+static void __lambda_769(void *data, object self_7312443, int argc, object *args) /* object self_7312443, object r_735739 */
++static void __lambda_769(void *data, object self_7312436, int argc, object *args) /* object self_7312436, object r_735732 */
   {
 - object r_736184 = args[0];
 -  return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  ((closureN)self_7313689)->elements[1], r_736184, ((closureN)self_7313689)->elements[0], ((closureN)self_7313689)->elements[2]);; 
-+ object r_735739 = args[0];
-+  return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  ((closureN)self_7312443)->elements[1], r_735739, ((closureN)self_7312443)->elements[0], ((closureN)self_7312443)->elements[2]);; 
++ object r_735732 = args[0];
++  return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  ((closureN)self_7312436)->elements[1], r_735732, ((closureN)self_7312436)->elements[0], ((closureN)self_7312436)->elements[2]);; 
  }
  
 -static object __lambda_1475(void *data, object ptr, object z) { return Cyc_is_complex(z);  }
@@ -34758,22 +34926,21 @@ Make let-values be the same as let*-values, to work around
 -static void __lambda_767(void *data, object _, int argc, object *args) /* closure _,object k_736177, object num_731189_733473 */
 +static object __lambda_1428(void *data, object ptr, object z) { return Cyc_is_complex(z);  }
 +static void __lambda_1427(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_767(void *data, object _, int argc, object *args) /* closure _,object k_735732, object num_731190_733133 */
++static void __lambda_767(void *data, object _, int argc, object *args) /* closure _,object k_735725, object num_731189_733126 */
   {
 -object k_736177 = args[0]; object num_731189_733473 = args[1];
--  Cyc_st_add(data, "scheme/base.sld:inexact?");
++object k_735725 = args[0]; object num_731189_733126 = args[1];
+   Cyc_st_add(data, "scheme/base.sld:inexact?");
 -  complex_num_type local_7321577; 
-+object k_735732 = args[0]; object num_731190_733133 = args[1];
-+  Cyc_st_add(data, "base.sld:inexact?");
-+  complex_num_type local_7320284; 
++  complex_num_type local_7320277; 
  if( (boolean_f != ((inline_function_type)
 -                   ((closure)__glo_exact_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7321577, num_731189_733473)) ){ 
 -  return_direct_with_clo1(data,  k_736177, (((closure)  k_736177)->fn),  boolean_f);
-+                   ((closure)__glo_exact_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7320284, num_731190_733133)) ){ 
-+  return_direct_with_clo1(data,  k_735732, (((closure)  k_735732)->fn),  boolean_f);
++                   ((closure)__glo_exact_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7320277, num_731189_733126)) ){ 
++  return_direct_with_clo1(data,  k_735725, (((closure)  k_735725)->fn),  boolean_f);
  } else { 
 -  return_direct_with_clo1(data,  k_736177, (((closure)  k_736177)->fn),  boolean_t);}
-+  return_direct_with_clo1(data,  k_735732, (((closure)  k_735732)->fn),  boolean_t);}
++  return_direct_with_clo1(data,  k_735725, (((closure)  k_735725)->fn),  boolean_t);}
  ;; 
  }
  
@@ -34806,12 +34973,11 @@ Make let-values be the same as let*-values, to work around
 -static void __lambda_761(void *data, object _, int argc, object *args) /* closure _,object k_736160, object k_731179_733470 */
 +static object __lambda_1422(void *data, object ptr, object z) { return_inexact_double_op_no_cps(data, ptr, sqrt, z); }
 +static void __lambda_1421(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_761(void *data, object _, int argc, object *args) /* closure _,object k_735715, object k_731180_733130 */
++static void __lambda_761(void *data, object _, int argc, object *args) /* closure _,object k_735708, object k_731179_733123 */
   {
 -object k_736160 = args[0]; object k_731179_733470 = args[1];
--  Cyc_st_add(data, "scheme/base.sld:exact-integer-sqrt");
-+object k_735715 = args[0]; object k_731180_733130 = args[1];
-+  Cyc_st_add(data, "base.sld:exact-integer-sqrt");
++object k_735708 = args[0]; object k_731179_733123 = args[1];
+   Cyc_st_add(data, "scheme/base.sld:exact-integer-sqrt");
  
 -closureN_type c_7321515;
 -object e_7321535 [1];
@@ -34823,18 +34989,8 @@ Make let-values be the same as let*-values, to work around
 -c_7321515.num_elements = 1;
 -c_7321515.elements = (object *)e_7321535;
 -c_7321515.elements[0] = k_731179_733470;
-+closureN_type c_7320222;
-+object e_7320242 [1];
-+c_7320222.hdr.mark = gc_color_red;
-+ c_7320222.hdr.grayed = 0;
-+c_7320222.tag = closureN_tag;
-+ c_7320222.fn = (function_type)__lambda_762;
-+c_7320222.num_args = 0;
-+c_7320222.num_elements = 1;
-+c_7320222.elements = (object *)e_7320242;
-+c_7320222.elements[0] = k_731180_733130;
- 
- 
+-
+-
 -closureN_type c_7321536;
 -object e_7321567 [2];
 -c_7321536.hdr.mark = gc_color_red;
@@ -34846,24 +35002,36 @@ Make let-values be the same as let*-values, to work around
 -c_7321536.elements = (object *)e_7321567;
 -c_7321536.elements[0] = k_731179_733470;
 -c_7321536.elements[1] = k_736160;
-+closureN_type c_7320243;
-+object e_7320274 [2];
-+c_7320243.hdr.mark = gc_color_red;
-+ c_7320243.hdr.grayed = 0;
-+c_7320243.tag = closureN_tag;
-+ c_7320243.fn = (function_type)__lambda_763;
-+c_7320243.num_args = 1;
-+c_7320243.num_elements = 2;
-+c_7320243.elements = (object *)e_7320274;
-+c_7320243.elements[0] = k_731180_733130;
-+c_7320243.elements[1] = k_735715;
++closureN_type c_7320215;
++object e_7320235 [1];
++c_7320215.hdr.mark = gc_color_red;
++ c_7320215.hdr.grayed = 0;
++c_7320215.tag = closureN_tag;
++ c_7320215.fn = (function_type)__lambda_762;
++c_7320215.num_args = 0;
++c_7320215.num_elements = 1;
++c_7320215.elements = (object *)e_7320235;
++c_7320215.elements[0] = k_731179_733123;
++
++
++closureN_type c_7320236;
++object e_7320267 [2];
++c_7320236.hdr.mark = gc_color_red;
++ c_7320236.hdr.grayed = 0;
++c_7320236.tag = closureN_tag;
++ c_7320236.fn = (function_type)__lambda_763;
++c_7320236.num_args = 1;
++c_7320236.num_elements = 2;
++c_7320236.elements = (object *)e_7320267;
++c_7320236.elements[0] = k_731179_733123;
++c_7320236.elements[1] = k_735708;
  
 -return_direct_with_clo1(data,(closure)&c_7321515,__lambda_762,  &c_7321536);; 
-+return_direct_with_clo1(data,(closure)&c_7320222,__lambda_762,  &c_7320243);; 
++return_direct_with_clo1(data,(closure)&c_7320215,__lambda_762,  &c_7320236);; 
  }
  
 -static void __lambda_763(void *data, object self_7313683, int argc, object *args) /* object self_7313683, object r_736161 */
-+static void __lambda_763(void *data, object self_7312437, int argc, object *args) /* object self_7312437, object r_735716 */
++static void __lambda_763(void *data, object self_7312430, int argc, object *args) /* object self_7312430, object r_735709 */
   {
  
    
@@ -34877,16 +35045,16 @@ Make let-values be the same as let*-values, to work around
 -c_7321538.num_elements = 1;
 -c_7321538.elements = (object *)e_7321555;
 -c_7321538.elements[0] = ((closureN)self_7313683)->elements[0];
-+closureN_type c_7320245;
-+object e_7320262 [1];
-+c_7320245.hdr.mark = gc_color_red;
-+ c_7320245.hdr.grayed = 0;
-+c_7320245.tag = closureN_tag;
-+ c_7320245.fn = (function_type)__lambda_764;
-+c_7320245.num_args = 0;
-+c_7320245.num_elements = 1;
-+c_7320245.elements = (object *)e_7320262;
-+c_7320245.elements[0] = ((closureN)self_7312437)->elements[0];
++closureN_type c_7320238;
++object e_7320255 [1];
++c_7320238.hdr.mark = gc_color_red;
++ c_7320238.hdr.grayed = 0;
++c_7320238.tag = closureN_tag;
++ c_7320238.fn = (function_type)__lambda_764;
++c_7320238.num_args = 0;
++c_7320238.num_elements = 1;
++c_7320238.elements = (object *)e_7320255;
++c_7320238.elements[0] = ((closureN)self_7312430)->elements[0];
  
  
 -closureN_type c_7321556;
@@ -34900,42 +35068,42 @@ Make let-values be the same as let*-values, to work around
 -c_7321556.elements = (object *)e_7321566;
 -c_7321556.elements[0] = ((closureN)self_7313683)->elements[0];
 -c_7321556.elements[1] = ((closureN)self_7313683)->elements[1];
-+closureN_type c_7320263;
-+object e_7320273 [2];
-+c_7320263.hdr.mark = gc_color_red;
-+ c_7320263.hdr.grayed = 0;
-+c_7320263.tag = closureN_tag;
-+ c_7320263.fn = (function_type)__lambda_766;
-+c_7320263.num_args = 1;
-+c_7320263.num_elements = 2;
-+c_7320263.elements = (object *)e_7320273;
-+c_7320263.elements[0] = ((closureN)self_7312437)->elements[0];
-+c_7320263.elements[1] = ((closureN)self_7312437)->elements[1];
++closureN_type c_7320256;
++object e_7320266 [2];
++c_7320256.hdr.mark = gc_color_red;
++ c_7320256.hdr.grayed = 0;
++c_7320256.tag = closureN_tag;
++ c_7320256.fn = (function_type)__lambda_766;
++c_7320256.num_args = 1;
++c_7320256.num_elements = 2;
++c_7320256.elements = (object *)e_7320266;
++c_7320256.elements[0] = ((closureN)self_7312430)->elements[0];
++c_7320256.elements[1] = ((closureN)self_7312430)->elements[1];
  
 -return_direct_with_clo1(data,(closure)&c_7321538,__lambda_764,  &c_7321556);; 
-+return_direct_with_clo1(data,(closure)&c_7320245,__lambda_764,  &c_7320263);; 
++return_direct_with_clo1(data,(closure)&c_7320238,__lambda_764,  &c_7320256);; 
  }
  
 -static void __lambda_766(void *data, object self_7313684, int argc, object *args) /* object self_7313684, object s_731184_733471 */
-+static void __lambda_766(void *data, object self_7312438, int argc, object *args) /* object self_7312438, object s_731185_733131 */
++static void __lambda_766(void *data, object self_7312431, int argc, object *args) /* object self_7312431, object s_731184_733124 */
   {
 - object s_731184_733471 = args[0];
-+ object s_731185_733131 = args[0];
++ object s_731184_733124 = args[0];
    
 -complex_num_type local_7321561; 
-+complex_num_type local_7320268; 
++complex_num_type local_7320261; 
  
 -complex_num_type local_7321565; 
 -return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_7313684)->elements[1], s_731184_733471, Cyc_fast_sub(data,&local_7321561, ((closureN)self_7313684)->elements[0], Cyc_fast_mul(data,&local_7321565, s_731184_733471, s_731184_733471)));; 
-+complex_num_type local_7320272; 
-+return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_7312438)->elements[1], s_731185_733131, Cyc_fast_sub(data,&local_7320268, ((closureN)self_7312438)->elements[0], Cyc_fast_mul(data,&local_7320272, s_731185_733131, s_731185_733131)));; 
++complex_num_type local_7320265; 
++return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  ((closureN)self_7312431)->elements[1], s_731184_733124, Cyc_fast_sub(data,&local_7320261, ((closureN)self_7312431)->elements[0], Cyc_fast_mul(data,&local_7320265, s_731184_733124, s_731184_733124)));; 
  }
  
 -static void __lambda_764(void *data, object self_7313685, int argc, object *args) /* object self_7313685, object k_736165 */
-+static void __lambda_764(void *data, object self_7312439, int argc, object *args) /* object self_7312439, object k_735720 */
++static void __lambda_764(void *data, object self_7312432, int argc, object *args) /* object self_7312432, object k_735713 */
   {
 - object k_736165 = args[0];
-+ object k_735720 = args[0];
++ object k_735713 = args[0];
    
 -closureN_type c_7321540;
 -object e_7321553 [2];
@@ -34948,88 +35116,88 @@ Make let-values be the same as let*-values, to work around
 -c_7321540.elements = (object *)e_7321553;
 -c_7321540.elements[0] = ((closureN)self_7313685)->elements[0];
 -c_7321540.elements[1] = k_736165;
-+closureN_type c_7320247;
-+object e_7320260 [2];
-+c_7320247.hdr.mark = gc_color_red;
-+ c_7320247.hdr.grayed = 0;
-+c_7320247.tag = closureN_tag;
-+ c_7320247.fn = (function_type)__lambda_765;
-+c_7320247.num_args = 1;
-+c_7320247.num_elements = 2;
-+c_7320247.elements = (object *)e_7320260;
-+c_7320247.elements[0] = ((closureN)self_7312439)->elements[0];
-+c_7320247.elements[1] = k_735720;
++closureN_type c_7320240;
++object e_7320253 [2];
++c_7320240.hdr.mark = gc_color_red;
++ c_7320240.hdr.grayed = 0;
++c_7320240.tag = closureN_tag;
++ c_7320240.fn = (function_type)__lambda_765;
++c_7320240.num_args = 1;
++c_7320240.num_elements = 2;
++c_7320240.elements = (object *)e_7320253;
++c_7320240.elements[0] = ((closureN)self_7312432)->elements[0];
++c_7320240.elements[1] = k_735713;
  
 -return_direct_with_clo2(data,  __glo_bignum_127_scheme_base, (((closure)  __glo_bignum_127_scheme_base)->fn),  &c_7321540, ((closureN)self_7313685)->elements[0]);; 
-+return_direct_with_clo2(data,  __glo_bignum_127_scheme_base, (((closure)  __glo_bignum_127_scheme_base)->fn),  &c_7320247, ((closureN)self_7312439)->elements[0]);; 
++return_direct_with_clo2(data,  __glo_bignum_127_scheme_base, (((closure)  __glo_bignum_127_scheme_base)->fn),  &c_7320240, ((closureN)self_7312432)->elements[0]);; 
  }
  
 -static void __lambda_765(void *data, object self_7313686, int argc, object *args) /* object self_7313686, object r_736166 */
-+static void __lambda_765(void *data, object self_7312440, int argc, object *args) /* object self_7312440, object r_735721 */
++static void __lambda_765(void *data, object self_7312433, int argc, object *args) /* object self_7312433, object r_735714 */
   {
 - object r_736166 = args[0];
 -  if( (boolean_f != r_736166) ){ 
 -  return_direct_with_clo2(data,  __glo_bignum_91sqrt_scheme_base, (((closure)  __glo_bignum_91sqrt_scheme_base)->fn),  ((closureN)self_7313686)->elements[1], ((closureN)self_7313686)->elements[0]);
-+ object r_735721 = args[0];
-+  if( (boolean_f != r_735721) ){ 
-+  return_direct_with_clo2(data,  __glo_bignum_91sqrt_scheme_base, (((closure)  __glo_bignum_91sqrt_scheme_base)->fn),  ((closureN)self_7312440)->elements[1], ((closureN)self_7312440)->elements[0]);
++ object r_735714 = args[0];
++  if( (boolean_f != r_735714) ){ 
++  return_direct_with_clo2(data,  __glo_bignum_91sqrt_scheme_base, (((closure)  __glo_bignum_91sqrt_scheme_base)->fn),  ((closureN)self_7312433)->elements[1], ((closureN)self_7312433)->elements[0]);
  } else { 
    
 -complex_num_type local_7321548; 
-+complex_num_type local_7320255; 
++complex_num_type local_7320248; 
  
 -complex_num_type local_7321551; 
 -return_direct_with_clo2(data,  __glo_exact_scheme_base, (((closure)  __glo_exact_scheme_base)->fn),  ((closureN)self_7313686)->elements[1], ((inline_function_type)
 -                   ((closure)__glo_truncate_191_191inline_191_191_scheme_base)->fn)(data,&local_7321548, ((inline_function_type)
 -                   ((closure)__glo_sqrt_191_191inline_191_191_scheme_base)->fn)(data,&local_7321551, ((closureN)self_7313686)->elements[0])));}
-+complex_num_type local_7320258; 
-+return_direct_with_clo2(data,  __glo_exact_scheme_base, (((closure)  __glo_exact_scheme_base)->fn),  ((closureN)self_7312440)->elements[1], ((inline_function_type)
-+                   ((closure)__glo_truncate_191_191inline_191_191_scheme_base)->fn)(data,&local_7320255, ((inline_function_type)
-+                   ((closure)__glo_sqrt_191_191inline_191_191_scheme_base)->fn)(data,&local_7320258, ((closureN)self_7312440)->elements[0])));}
++complex_num_type local_7320251; 
++return_direct_with_clo2(data,  __glo_exact_scheme_base, (((closure)  __glo_exact_scheme_base)->fn),  ((closureN)self_7312433)->elements[1], ((inline_function_type)
++                   ((closure)__glo_truncate_191_191inline_191_191_scheme_base)->fn)(data,&local_7320248, ((inline_function_type)
++                   ((closure)__glo_sqrt_191_191inline_191_191_scheme_base)->fn)(data,&local_7320251, ((closureN)self_7312433)->elements[0])));}
  ;; 
  }
  
 -static void __lambda_762(void *data, object self_7313687, int argc, object *args) /* object self_7313687, object k_736169 */
-+static void __lambda_762(void *data, object self_7312441, int argc, object *args) /* object self_7312441, object k_735724 */
++static void __lambda_762(void *data, object self_7312434, int argc, object *args) /* object self_7312434, object k_735717 */
   {
 - object k_736169 = args[0];
 -  object r_736170;
 -    object local_7321519 = alloca(sizeof(complex_num_type)); 
-+ object k_735724 = args[0];
-+  object r_735725;
-+    object local_7320226 = alloca(sizeof(complex_num_type)); 
++ object k_735717 = args[0];
++  object r_735718;
++    object local_7320219 = alloca(sizeof(complex_num_type)); 
  if( (boolean_f != ((inline_function_type)
 -                   ((closure)__glo_exact_127_191_191inline_191_191_scheme_base)->fn)(data,local_7321519, ((closureN)self_7313687)->elements[0])) ){ 
-+                   ((closure)__glo_exact_127_191_191inline_191_191_scheme_base)->fn)(data,local_7320226, ((closureN)self_7312441)->elements[0])) ){ 
++                   ((closure)__glo_exact_127_191_191inline_191_191_scheme_base)->fn)(data,local_7320219, ((closureN)self_7312434)->elements[0])) ){ 
      
 -if( (boolean_f != Cyc_is_integer(((closureN)self_7313687)->elements[0])) ){ 
-+if( (boolean_f != Cyc_is_integer(((closureN)self_7312441)->elements[0])) ){ 
++if( (boolean_f != Cyc_is_integer(((closureN)self_7312434)->elements[0])) ){ 
      
 -if( (boolean_f != Cyc_num_fast_lt_op(data, ((closureN)self_7313687)->elements[0], obj_int2obj(0))) ){ 
 -  r_736170 = boolean_f;
-+if( (boolean_f != Cyc_num_fast_lt_op(data, ((closureN)self_7312441)->elements[0], obj_int2obj(0))) ){ 
-+  r_735725 = boolean_f;
++if( (boolean_f != Cyc_num_fast_lt_op(data, ((closureN)self_7312434)->elements[0], obj_int2obj(0))) ){ 
++  r_735718 = boolean_f;
  } else { 
 -  r_736170 = boolean_t;}
-+  r_735725 = boolean_t;}
++  r_735718 = boolean_t;}
  ;
  } else { 
 -  r_736170 = boolean_f;}
-+  r_735725 = boolean_f;}
++  r_735718 = boolean_f;}
  ;
  } else { 
 -  r_736170 = boolean_f;}
 -;if( (boolean_f != r_736170) ){ 
 -  return_direct_with_clo1(data,  k_736169, (((closure)  k_736169)->fn),  Cyc_VOID);
-+  r_735725 = boolean_f;}
-+;if( (boolean_f != r_735725) ){ 
-+  return_direct_with_clo1(data,  k_735724, (((closure)  k_735724)->fn),  Cyc_VOID);
++  r_735718 = boolean_f;}
++;if( (boolean_f != r_735718) ){ 
++  return_direct_with_clo1(data,  k_735717, (((closure)  k_735717)->fn),  Cyc_VOID);
  } else { 
    
 -make_utf8_string_with_len(c_7321533, "exact non-negative integer required", 35, 35);
 -return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_736169, &c_7321533, ((closureN)self_7313687)->elements[0]);}
-+make_utf8_string_with_len(c_7320240, "exact non-negative integer required", 35, 35);
-+return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_735724, &c_7320240, ((closureN)self_7312441)->elements[0]);}
++make_utf8_string_with_len(c_7320233, "exact non-negative integer required", 35, 35);
++return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_735717, &c_7320233, ((closureN)self_7312434)->elements[0]);}
  ;; 
  }
  
@@ -35042,12 +35210,11 @@ Make let-values be the same as let*-values, to work around
 -static void __lambda_1466(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_759(void *data, object _, int argc, object *args) /* closure _,object k_736156, object num_731178_733469 */
 +static void __lambda_1419(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_759(void *data, object _, int argc, object *args) /* closure _,object k_735711, object num_731179_733129 */
++static void __lambda_759(void *data, object _, int argc, object *args) /* closure _,object k_735704, object num_731178_733122 */
   {
 -object k_736156 = args[0]; object num_731178_733469 = args[1];
--  Cyc_st_add(data, "scheme/base.sld:even?");
-+object k_735711 = args[0]; object num_731179_733129 = args[1];
-+  Cyc_st_add(data, "base.sld:even?");
++object k_735704 = args[0]; object num_731178_733122 = args[1];
+   Cyc_st_add(data, "scheme/base.sld:even?");
  
 -closureN_type c_7321505;
 -object e_7321510 [1];
@@ -35059,39 +35226,38 @@ Make let-values be the same as let*-values, to work around
 -c_7321505.num_elements = 1;
 -c_7321505.elements = (object *)e_7321510;
 -c_7321505.elements[0] = k_736156;
-+closureN_type c_7320212;
-+object e_7320217 [1];
-+c_7320212.hdr.mark = gc_color_red;
-+ c_7320212.hdr.grayed = 0;
-+c_7320212.tag = closureN_tag;
-+ c_7320212.fn = (function_type)__lambda_760;
-+c_7320212.num_args = 1;
-+c_7320212.num_elements = 1;
-+c_7320212.elements = (object *)e_7320217;
-+c_7320212.elements[0] = k_735711;
++closureN_type c_7320205;
++object e_7320210 [1];
++c_7320205.hdr.mark = gc_color_red;
++ c_7320205.hdr.grayed = 0;
++c_7320205.tag = closureN_tag;
++ c_7320205.fn = (function_type)__lambda_760;
++c_7320205.num_args = 1;
++c_7320205.num_elements = 1;
++c_7320205.elements = (object *)e_7320210;
++c_7320205.elements[0] = k_735704;
  
 -return_direct_with_clo3(data,  __glo_modulo_scheme_base, (((closure)  __glo_modulo_scheme_base)->fn),  &c_7321505, num_731178_733469, obj_int2obj(2));; 
-+return_direct_with_clo3(data,  __glo_modulo_scheme_base, (((closure)  __glo_modulo_scheme_base)->fn),  &c_7320212, num_731179_733129, obj_int2obj(2));; 
++return_direct_with_clo3(data,  __glo_modulo_scheme_base, (((closure)  __glo_modulo_scheme_base)->fn),  &c_7320205, num_731178_733122, obj_int2obj(2));; 
  }
  
 -static void __lambda_760(void *data, object self_7313682, int argc, object *args) /* object self_7313682, object r_736157 */
-+static void __lambda_760(void *data, object self_7312436, int argc, object *args) /* object self_7312436, object r_735712 */
++static void __lambda_760(void *data, object self_7312429, int argc, object *args) /* object self_7312429, object r_735705 */
   {
 - object r_736157 = args[0];
-+ object r_735712 = args[0];
++ object r_735705 = args[0];
    
  
 -return_direct_with_clo1(data,  ((closureN)self_7313682)->elements[0], (((closure)  ((closureN)self_7313682)->elements[0])->fn),  Cyc_num_fast_eq_op(data, r_736157, obj_int2obj(0)));; 
-+return_direct_with_clo1(data,  ((closureN)self_7312436)->elements[0], (((closure)  ((closureN)self_7312436)->elements[0])->fn),  Cyc_num_fast_eq_op(data, r_735712, obj_int2obj(0)));; 
++return_direct_with_clo1(data,  ((closureN)self_7312429)->elements[0], (((closure)  ((closureN)self_7312429)->elements[0])->fn),  Cyc_num_fast_eq_op(data, r_735705, obj_int2obj(0)));; 
  }
  
 -static void __lambda_757(void *data, object _, int argc, object *args) /* closure _,object k_736152, object num_731177_733468 */
-+static void __lambda_757(void *data, object _, int argc, object *args) /* closure _,object k_735707, object num_731178_733128 */
++static void __lambda_757(void *data, object _, int argc, object *args) /* closure _,object k_735700, object num_731177_733121 */
   {
 -object k_736152 = args[0]; object num_731177_733468 = args[1];
--  Cyc_st_add(data, "scheme/base.sld:odd?");
-+object k_735707 = args[0]; object num_731178_733128 = args[1];
-+  Cyc_st_add(data, "base.sld:odd?");
++object k_735700 = args[0]; object num_731177_733121 = args[1];
+   Cyc_st_add(data, "scheme/base.sld:odd?");
  
 -closureN_type c_7321497;
 -object e_7321502 [1];
@@ -35103,39 +35269,38 @@ Make let-values be the same as let*-values, to work around
 -c_7321497.num_elements = 1;
 -c_7321497.elements = (object *)e_7321502;
 -c_7321497.elements[0] = k_736152;
-+closureN_type c_7320204;
-+object e_7320209 [1];
-+c_7320204.hdr.mark = gc_color_red;
-+ c_7320204.hdr.grayed = 0;
-+c_7320204.tag = closureN_tag;
-+ c_7320204.fn = (function_type)__lambda_758;
-+c_7320204.num_args = 1;
-+c_7320204.num_elements = 1;
-+c_7320204.elements = (object *)e_7320209;
-+c_7320204.elements[0] = k_735707;
++closureN_type c_7320197;
++object e_7320202 [1];
++c_7320197.hdr.mark = gc_color_red;
++ c_7320197.hdr.grayed = 0;
++c_7320197.tag = closureN_tag;
++ c_7320197.fn = (function_type)__lambda_758;
++c_7320197.num_args = 1;
++c_7320197.num_elements = 1;
++c_7320197.elements = (object *)e_7320202;
++c_7320197.elements[0] = k_735700;
  
 -return_direct_with_clo3(data,  __glo_modulo_scheme_base, (((closure)  __glo_modulo_scheme_base)->fn),  &c_7321497, num_731177_733468, obj_int2obj(2));; 
-+return_direct_with_clo3(data,  __glo_modulo_scheme_base, (((closure)  __glo_modulo_scheme_base)->fn),  &c_7320204, num_731178_733128, obj_int2obj(2));; 
++return_direct_with_clo3(data,  __glo_modulo_scheme_base, (((closure)  __glo_modulo_scheme_base)->fn),  &c_7320197, num_731177_733121, obj_int2obj(2));; 
  }
  
 -static void __lambda_758(void *data, object self_7313681, int argc, object *args) /* object self_7313681, object r_736153 */
-+static void __lambda_758(void *data, object self_7312435, int argc, object *args) /* object self_7312435, object r_735708 */
++static void __lambda_758(void *data, object self_7312428, int argc, object *args) /* object self_7312428, object r_735701 */
   {
 - object r_736153 = args[0];
-+ object r_735708 = args[0];
++ object r_735701 = args[0];
    
  
 -return_direct_with_clo1(data,  ((closureN)self_7313681)->elements[0], (((closure)  ((closureN)self_7313681)->elements[0])->fn),  Cyc_num_fast_eq_op(data, r_736153, obj_int2obj(1)));; 
-+return_direct_with_clo1(data,  ((closureN)self_7312435)->elements[0], (((closure)  ((closureN)self_7312435)->elements[0])->fn),  Cyc_num_fast_eq_op(data, r_735708, obj_int2obj(1)));; 
++return_direct_with_clo1(data,  ((closureN)self_7312428)->elements[0], (((closure)  ((closureN)self_7312428)->elements[0])->fn),  Cyc_num_fast_eq_op(data, r_735701, obj_int2obj(1)));; 
  }
  
 -static void __lambda_755(void *data, object _, int argc, object *args) /* closure _,object k_736145, object a_731174_733465, object b_731175_733466 */
-+static void __lambda_755(void *data, object _, int argc, object *args) /* closure _,object k_735700, object a_731175_733125, object b_731176_733126 */
++static void __lambda_755(void *data, object _, int argc, object *args) /* closure _,object k_735693, object a_731174_733118, object b_731175_733119 */
   {
 -object k_736145 = args[0]; object a_731174_733465 = args[1]; object b_731175_733466 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:modulo");
-+object k_735700 = args[0]; object a_731175_733125 = args[1]; object b_731176_733126 = args[2];
-+  Cyc_st_add(data, "base.sld:modulo");
++object k_735693 = args[0]; object a_731174_733118 = args[1]; object b_731175_733119 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:modulo");
  
 -closureN_type c_7321470;
 -object e_7321494 [2];
@@ -35148,54 +35313,54 @@ Make let-values be the same as let*-values, to work around
 -c_7321470.elements = (object *)e_7321494;
 -c_7321470.elements[0] = b_731175_733466;
 -c_7321470.elements[1] = k_736145;
-+closureN_type c_7320177;
-+object e_7320201 [2];
-+c_7320177.hdr.mark = gc_color_red;
-+ c_7320177.hdr.grayed = 0;
-+c_7320177.tag = closureN_tag;
-+ c_7320177.fn = (function_type)__lambda_756;
-+c_7320177.num_args = 1;
-+c_7320177.num_elements = 2;
-+c_7320177.elements = (object *)e_7320201;
-+c_7320177.elements[0] = b_731176_733126;
-+c_7320177.elements[1] = k_735700;
++closureN_type c_7320170;
++object e_7320194 [2];
++c_7320170.hdr.mark = gc_color_red;
++ c_7320170.hdr.grayed = 0;
++c_7320170.tag = closureN_tag;
++ c_7320170.fn = (function_type)__lambda_756;
++c_7320170.num_args = 1;
++c_7320170.num_elements = 2;
++c_7320170.elements = (object *)e_7320194;
++c_7320170.elements[0] = b_731175_733119;
++c_7320170.elements[1] = k_735693;
  
 -return_direct_with_clo3(data,  __glo_remainder_scheme_base, (((closure)  __glo_remainder_scheme_base)->fn),  &c_7321470, a_731174_733465, b_731175_733466);; 
-+return_direct_with_clo3(data,  __glo_remainder_scheme_base, (((closure)  __glo_remainder_scheme_base)->fn),  &c_7320177, a_731175_733125, b_731176_733126);; 
++return_direct_with_clo3(data,  __glo_remainder_scheme_base, (((closure)  __glo_remainder_scheme_base)->fn),  &c_7320170, a_731174_733118, b_731175_733119);; 
  }
  
 -static void __lambda_756(void *data, object self_7313680, int argc, object *args) /* object self_7313680, object res_731176_733467 */
-+static void __lambda_756(void *data, object self_7312434, int argc, object *args) /* object self_7312434, object res_731177_733127 */
++static void __lambda_756(void *data, object self_7312427, int argc, object *args) /* object self_7312427, object res_731176_733120 */
   {
 - object res_731176_733467 = args[0];
-+ object res_731177_733127 = args[0];
++ object res_731176_733120 = args[0];
      
 -if( (boolean_f != Cyc_num_fast_lt_op(data, ((closureN)self_7313680)->elements[0], obj_int2obj(0))) ){ 
-+if( (boolean_f != Cyc_num_fast_lt_op(data, ((closureN)self_7312434)->elements[0], obj_int2obj(0))) ){ 
++if( (boolean_f != Cyc_num_fast_lt_op(data, ((closureN)self_7312427)->elements[0], obj_int2obj(0))) ){ 
      
 -if( (boolean_f != Cyc_num_fast_lte_op(data, res_731176_733467, obj_int2obj(0))) ){ 
 -  return_direct_with_clo1(data,  ((closureN)self_7313680)->elements[1], (((closure)  ((closureN)self_7313680)->elements[1])->fn),  res_731176_733467);
-+if( (boolean_f != Cyc_num_fast_lte_op(data, res_731177_733127, obj_int2obj(0))) ){ 
-+  return_direct_with_clo1(data,  ((closureN)self_7312434)->elements[1], (((closure)  ((closureN)self_7312434)->elements[1])->fn),  res_731177_733127);
++if( (boolean_f != Cyc_num_fast_lte_op(data, res_731176_733120, obj_int2obj(0))) ){ 
++  return_direct_with_clo1(data,  ((closureN)self_7312427)->elements[1], (((closure)  ((closureN)self_7312427)->elements[1])->fn),  res_731176_733120);
  } else { 
    
 -complex_num_type local_7321482; 
 -return_direct_with_clo1(data,  ((closureN)self_7313680)->elements[1], (((closure)  ((closureN)self_7313680)->elements[1])->fn),  Cyc_fast_sum(data,&local_7321482, res_731176_733467, ((closureN)self_7313680)->elements[0]));}
-+complex_num_type local_7320189; 
-+return_direct_with_clo1(data,  ((closureN)self_7312434)->elements[1], (((closure)  ((closureN)self_7312434)->elements[1])->fn),  Cyc_fast_sum(data,&local_7320189, res_731177_733127, ((closureN)self_7312434)->elements[0]));}
++complex_num_type local_7320182; 
++return_direct_with_clo1(data,  ((closureN)self_7312427)->elements[1], (((closure)  ((closureN)self_7312427)->elements[1])->fn),  Cyc_fast_sum(data,&local_7320182, res_731176_733120, ((closureN)self_7312427)->elements[0]));}
  ;
  } else { 
      
 -if( (boolean_f != Cyc_num_fast_gte_op(data, res_731176_733467, obj_int2obj(0))) ){ 
 -  return_direct_with_clo1(data,  ((closureN)self_7313680)->elements[1], (((closure)  ((closureN)self_7313680)->elements[1])->fn),  res_731176_733467);
-+if( (boolean_f != Cyc_num_fast_gte_op(data, res_731177_733127, obj_int2obj(0))) ){ 
-+  return_direct_with_clo1(data,  ((closureN)self_7312434)->elements[1], (((closure)  ((closureN)self_7312434)->elements[1])->fn),  res_731177_733127);
++if( (boolean_f != Cyc_num_fast_gte_op(data, res_731176_733120, obj_int2obj(0))) ){ 
++  return_direct_with_clo1(data,  ((closureN)self_7312427)->elements[1], (((closure)  ((closureN)self_7312427)->elements[1])->fn),  res_731176_733120);
  } else { 
    
 -complex_num_type local_7321492; 
 -return_direct_with_clo1(data,  ((closureN)self_7313680)->elements[1], (((closure)  ((closureN)self_7313680)->elements[1])->fn),  Cyc_fast_sum(data,&local_7321492, res_731176_733467, ((closureN)self_7313680)->elements[0]));}
-+complex_num_type local_7320199; 
-+return_direct_with_clo1(data,  ((closureN)self_7312434)->elements[1], (((closure)  ((closureN)self_7312434)->elements[1])->fn),  Cyc_fast_sum(data,&local_7320199, res_731177_733127, ((closureN)self_7312434)->elements[0]));}
++complex_num_type local_7320192; 
++return_direct_with_clo1(data,  ((closureN)self_7312427)->elements[1], (((closure)  ((closureN)self_7312427)->elements[1])->fn),  Cyc_fast_sum(data,&local_7320192, res_731176_733120, ((closureN)self_7312427)->elements[0]));}
  ;}
  ;; 
  }
@@ -35222,10 +35387,22 @@ Make let-values be the same as let*-values, to work around
 -static object __lambda_1455(void *data, object ptr, object z) { return_exact_double_op_no_cps(data, ptr, floor, z); }
 -static void __lambda_1454(void *data, object _, int argc, object *args) {object k = args[0];object z = args[1]; return_exact_double_op(data, k, floor, z);  }
 -static void __lambda_749(void *data, object _, int argc, object *args) /* closure _,object k_736133, object pred_731161_733460, object lst_731162_733461 */
-- {
++static object __lambda_1416(void *data, object ptr, object z) { return_inexact_double_or_cplx_op_no_cps(data, ptr, (double), (double complex), z); }
++static void __lambda_1415(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_1414(void *data, object ptr, object z) { return_exact_double_op_no_cps(data, ptr, round, z); }
++static void __lambda_1413(void *data, object _, int argc, object *args) {object k = args[0];object z = args[1]; return_exact_double_op(data, k, round, z);  }
++static object __lambda_1412(void *data, object ptr, object z) { return_exact_double_op_no_cps(data, ptr, (int), z); }
++static void __lambda_1411(void *data, object _, int argc, object *args) {object k = args[0];object z = args[1]; return_exact_double_op(data, k, (int), z);  }
++static object __lambda_1410(void *data, object ptr, object z) { return_exact_double_op_no_cps(data, ptr, ceil, z); }
++static void __lambda_1409(void *data, object _, int argc, object *args) {object k = args[0];object z = args[1]; return_exact_double_op(data, k, ceil, z);  }
++static object __lambda_1408(void *data, object ptr, object z) { return_exact_double_op_no_cps(data, ptr, floor, z); }
++static void __lambda_1407(void *data, object _, int argc, object *args) {object k = args[0];object z = args[1]; return_exact_double_op(data, k, floor, z);  }
++static void __lambda_749(void *data, object _, int argc, object *args) /* closure _,object k_735681, object pred_731161_733113, object lst_731162_733114 */
+  {
 -object k_736133 = args[0]; object pred_731161_733460 = args[1]; object lst_731162_733461 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:every");
--
++object k_735681 = args[0]; object pred_731161_733113 = args[1]; object lst_731162_733114 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:every");
+ 
 -closureN_type c_7321416;
 -object e_7321455 [1];
 -c_7321416.hdr.mark = gc_color_red;
@@ -35255,14 +35432,46 @@ Make let-values be the same as let*-values, to work around
 -c_7321418.elements = (object *)e_7321454;
 -c_7321418.elements[0] = ((closureN)self_7313674)->elements[0];
 -c_7321418.elements[1] = l_731164_733462;
--
++closureN_type c_7320116;
++object e_7320155 [1];
++c_7320116.hdr.mark = gc_color_red;
++ c_7320116.hdr.grayed = 0;
++c_7320116.tag = closureN_tag;
++ c_7320116.fn = (function_type)__lambda_750;
++c_7320116.num_args = 1;
++c_7320116.num_elements = 1;
++c_7320116.elements = (object *)e_7320155;
++c_7320116.elements[0] = k_735681;
++
++return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7320116, pred_731161_733113, lst_731162_733114);; 
++}
++
++static void __lambda_750(void *data, object self_7312421, int argc, object *args) /* object self_7312421, object l_731164_733115 */
++ {
++ object l_731164_733115 = args[0];
++  
++closureN_type c_7320118;
++object e_7320154 [2];
++c_7320118.hdr.mark = gc_color_red;
++ c_7320118.hdr.grayed = 0;
++c_7320118.tag = closureN_tag;
++ c_7320118.fn = (function_type)__lambda_751;
++c_7320118.num_args = 1;
++c_7320118.num_elements = 2;
++c_7320118.elements = (object *)e_7320154;
++c_7320118.elements[0] = ((closureN)self_7312421)->elements[0];
++c_7320118.elements[1] = l_731164_733115;
+ 
 -return_direct_with_clo1(data,(closure)&c_7321418,__lambda_751,  boolean_f);; 
--}
--
++return_direct_with_clo1(data,(closure)&c_7320118,__lambda_751,  boolean_f);; 
+ }
+ 
 -static void __lambda_751(void *data, object self_7313675, int argc, object *args) /* object self_7313675, object every_85_731165_733463 */
-- {
++static void __lambda_751(void *data, object self_7312422, int argc, object *args) /* object self_7312422, object every_85_731165_733116 */
+  {
 - object every_85_731165_733463 = args[0];
--  
++ object every_85_731165_733116 = args[0];
+   
 -closureN_type c_7321420;
 -object e_7321450 [2];
 -c_7321420.hdr.mark = gc_color_red;
@@ -35274,82 +35483,30 @@ Make let-values be the same as let*-values, to work around
 -c_7321420.elements = (object *)e_7321450;
 -c_7321420.elements[0] = ((closureN)self_7313675)->elements[0];
 -c_7321420.elements[1] = ((closureN)self_7313675)->elements[1];
-+static object __lambda_1416(void *data, object ptr, object z) { return_inexact_double_or_cplx_op_no_cps(data, ptr, (double), (double complex), z); }
-+static void __lambda_1415(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_1414(void *data, object ptr, object z) { return_exact_double_op_no_cps(data, ptr, round, z); }
-+static void __lambda_1413(void *data, object _, int argc, object *args) {object k = args[0];object z = args[1]; return_exact_double_op(data, k, round, z);  }
-+static object __lambda_1412(void *data, object ptr, object z) { return_exact_double_op_no_cps(data, ptr, (int), z); }
-+static void __lambda_1411(void *data, object _, int argc, object *args) {object k = args[0];object z = args[1]; return_exact_double_op(data, k, (int), z);  }
-+static object __lambda_1410(void *data, object ptr, object z) { return_exact_double_op_no_cps(data, ptr, ceil, z); }
-+static void __lambda_1409(void *data, object _, int argc, object *args) {object k = args[0];object z = args[1]; return_exact_double_op(data, k, ceil, z);  }
-+static object __lambda_1408(void *data, object ptr, object z) { return_exact_double_op_no_cps(data, ptr, floor, z); }
-+static void __lambda_1407(void *data, object _, int argc, object *args) {object k = args[0];object z = args[1]; return_exact_double_op(data, k, floor, z);  }
-+static void __lambda_749(void *data, object _, int argc, object *args) /* closure _,object k_735688, object pred_731162_733120, object lst_731163_733121 */
-+ {
-+object k_735688 = args[0]; object pred_731162_733120 = args[1]; object lst_731163_733121 = args[2];
-+  Cyc_st_add(data, "base.sld:every");
-+
-+closureN_type c_7320123;
-+object e_7320162 [1];
-+c_7320123.hdr.mark = gc_color_red;
-+ c_7320123.hdr.grayed = 0;
-+c_7320123.tag = closureN_tag;
-+ c_7320123.fn = (function_type)__lambda_750;
-+c_7320123.num_args = 1;
-+c_7320123.num_elements = 1;
-+c_7320123.elements = (object *)e_7320162;
-+c_7320123.elements[0] = k_735688;
-+
-+return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7320123, pred_731162_733120, lst_731163_733121);; 
-+}
-+
-+static void __lambda_750(void *data, object self_7312428, int argc, object *args) /* object self_7312428, object l_731165_733122 */
-+ {
-+ object l_731165_733122 = args[0];
-+  
-+closureN_type c_7320125;
-+object e_7320161 [2];
-+c_7320125.hdr.mark = gc_color_red;
-+ c_7320125.hdr.grayed = 0;
-+c_7320125.tag = closureN_tag;
-+ c_7320125.fn = (function_type)__lambda_751;
-+c_7320125.num_args = 1;
-+c_7320125.num_elements = 2;
-+c_7320125.elements = (object *)e_7320161;
-+c_7320125.elements[0] = ((closureN)self_7312428)->elements[0];
-+c_7320125.elements[1] = l_731165_733122;
-+
-+return_direct_with_clo1(data,(closure)&c_7320125,__lambda_751,  boolean_f);; 
-+}
-+
-+static void __lambda_751(void *data, object self_7312429, int argc, object *args) /* object self_7312429, object every_85_731166_733123 */
-+ {
-+ object every_85_731166_733123 = args[0];
-+  
-+closureN_type c_7320127;
-+object e_7320157 [2];
-+c_7320127.hdr.mark = gc_color_red;
-+ c_7320127.hdr.grayed = 0;
-+c_7320127.tag = closureN_tag;
-+ c_7320127.fn = (function_type)__lambda_1362;
-+c_7320127.num_args = 1;
-+c_7320127.num_elements = 2;
-+c_7320127.elements = (object *)e_7320157;
-+c_7320127.elements[0] = ((closureN)self_7312429)->elements[0];
-+c_7320127.elements[1] = ((closureN)self_7312429)->elements[1];
++closureN_type c_7320120;
++object e_7320150 [2];
++c_7320120.hdr.mark = gc_color_red;
++ c_7320120.hdr.grayed = 0;
++c_7320120.tag = closureN_tag;
++ c_7320120.fn = (function_type)__lambda_1362;
++c_7320120.num_args = 1;
++c_7320120.num_elements = 2;
++c_7320120.elements = (object *)e_7320150;
++c_7320120.elements[0] = ((closureN)self_7312422)->elements[0];
++c_7320120.elements[1] = ((closureN)self_7312422)->elements[1];
  
  
 -pair_type local_7321453; 
 -return_direct_with_clo1(data,(closure)&c_7321420,__lambda_1409,  set_cell_as_expr(&local_7321453, every_85_731165_733463));; 
-+pair_type local_7320160; 
-+return_direct_with_clo1(data,(closure)&c_7320127,__lambda_1362,  set_cell_as_expr(&local_7320160, every_85_731166_733123));; 
++pair_type local_7320153; 
++return_direct_with_clo1(data,(closure)&c_7320120,__lambda_1362,  set_cell_as_expr(&local_7320153, every_85_731165_733116));; 
  }
  
 -static void __lambda_1409(void *data, object self_7313676, int argc, object *args) /* object self_7313676, object every_85_731165_733463 */
-+static void __lambda_1362(void *data, object self_7312430, int argc, object *args) /* object self_7312430, object every_85_731166_733123 */
++static void __lambda_1362(void *data, object self_7312423, int argc, object *args) /* object self_7312423, object every_85_731165_733116 */
   {
 - object every_85_731165_733463 = args[0];
-+ object every_85_731166_733123 = args[0];
++ object every_85_731165_733116 = args[0];
    
 -closureN_type c_7321422;
 -object e_7321435 [3];
@@ -35363,18 +35520,18 @@ Make let-values be the same as let*-values, to work around
 -c_7321422.elements[0] = every_85_731165_733463;
 -c_7321422.elements[1] = ((closureN)self_7313676)->elements[0];
 -c_7321422.elements[2] = ((closureN)self_7313676)->elements[1];
-+closureN_type c_7320129;
-+object e_7320142 [3];
-+c_7320129.hdr.mark = gc_color_red;
-+ c_7320129.hdr.grayed = 0;
-+c_7320129.tag = closureN_tag;
-+ c_7320129.fn = (function_type)__lambda_752;
-+c_7320129.num_args = 1;
-+c_7320129.num_elements = 3;
-+c_7320129.elements = (object *)e_7320142;
-+c_7320129.elements[0] = every_85_731166_733123;
-+c_7320129.elements[1] = ((closureN)self_7312430)->elements[0];
-+c_7320129.elements[2] = ((closureN)self_7312430)->elements[1];
++closureN_type c_7320122;
++object e_7320135 [3];
++c_7320122.hdr.mark = gc_color_red;
++ c_7320122.hdr.grayed = 0;
++c_7320122.tag = closureN_tag;
++ c_7320122.fn = (function_type)__lambda_752;
++c_7320122.num_args = 1;
++c_7320122.num_elements = 3;
++c_7320122.elements = (object *)e_7320135;
++c_7320122.elements[0] = every_85_731165_733116;
++c_7320122.elements[1] = ((closureN)self_7312423)->elements[0];
++c_7320122.elements[2] = ((closureN)self_7312423)->elements[1];
  
  
 -closureN_type c_7321436;
@@ -35387,53 +35544,53 @@ Make let-values be the same as let*-values, to work around
 -c_7321436.num_elements = 1;
 -c_7321436.elements = (object *)e_7321449;
 -c_7321436.elements[0] = every_85_731165_733463;
-+closureN_type c_7320143;
-+object e_7320156 [1];
-+c_7320143.hdr.mark = gc_color_red;
-+ c_7320143.hdr.grayed = 0;
-+c_7320143.tag = closureN_tag;
-+ c_7320143.fn = (function_type)__lambda_754;
-+c_7320143.num_args = 1;
-+c_7320143.num_elements = 1;
-+c_7320143.elements = (object *)e_7320156;
-+c_7320143.elements[0] = every_85_731166_733123;
++closureN_type c_7320136;
++object e_7320149 [1];
++c_7320136.hdr.mark = gc_color_red;
++ c_7320136.hdr.grayed = 0;
++c_7320136.tag = closureN_tag;
++ c_7320136.fn = (function_type)__lambda_754;
++c_7320136.num_args = 1;
++c_7320136.num_elements = 1;
++c_7320136.elements = (object *)e_7320149;
++c_7320136.elements[0] = every_85_731165_733116;
  
 -return_direct_with_clo1(data,(closure)&c_7321422,__lambda_752,  &c_7321436);; 
-+return_direct_with_clo1(data,(closure)&c_7320129,__lambda_752,  &c_7320143);; 
++return_direct_with_clo1(data,(closure)&c_7320122,__lambda_752,  &c_7320136);; 
  }
  
 -static void __lambda_754(void *data, object self_7313677, int argc, object *args) /* object self_7313677, object k_736137, object l_731166_733464 */
-+static void __lambda_754(void *data, object self_7312431, int argc, object *args) /* object self_7312431, object k_735692, object l_731167_733124 */
++static void __lambda_754(void *data, object self_7312424, int argc, object *args) /* object self_7312424, object k_735685, object l_731166_733117 */
   {
 - object k_736137 = args[0]; object l_731166_733464 = args[1];
-+ object k_735692 = args[0]; object l_731167_733124 = args[1];
++ object k_735685 = args[0]; object l_731166_733117 = args[1];
      
 -if( (boolean_f != Cyc_is_null(l_731166_733464)) ){ 
 -  return_direct_with_clo1(data,  k_736137, (((closure)  k_736137)->fn),  boolean_t);
-+if( (boolean_f != Cyc_is_null(l_731167_733124)) ){ 
-+  return_direct_with_clo1(data,  k_735692, (((closure)  k_735692)->fn),  boolean_t);
++if( (boolean_f != Cyc_is_null(l_731166_733117)) ){ 
++  return_direct_with_clo1(data,  k_735685, (((closure)  k_735685)->fn),  boolean_t);
  } else { 
      
 -if( (boolean_f != Cyc_car(data, l_731166_733464)) ){ 
-+if( (boolean_f != Cyc_car(data, l_731167_733124)) ){ 
++if( (boolean_f != Cyc_car(data, l_731166_733117)) ){ 
    
  
  
  
 -return_closcall2(data,  car(((closureN)self_7313677)->elements[0]),  k_736137, Cyc_cdr(data, l_731166_733464));
-+return_closcall2(data,  car(((closureN)self_7312431)->elements[0]),  k_735692, Cyc_cdr(data, l_731167_733124));
++return_closcall2(data,  car(((closureN)self_7312424)->elements[0]),  k_735685, Cyc_cdr(data, l_731166_733117));
  } else { 
 -  return_direct_with_clo1(data,  k_736137, (((closure)  k_736137)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_735692, (((closure)  k_735692)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_735685, (((closure)  k_735685)->fn),  boolean_f);}
  ;}
  ;; 
  }
  
 -static void __lambda_752(void *data, object self_7313678, int argc, object *args) /* object self_7313678, object r_736136 */
-+static void __lambda_752(void *data, object self_7312432, int argc, object *args) /* object self_7312432, object r_735691 */
++static void __lambda_752(void *data, object self_7312425, int argc, object *args) /* object self_7312425, object r_735684 */
   {
 - object r_736136 = args[0];
-+ object r_735691 = args[0];
++ object r_735684 = args[0];
    
 -closureN_type c_7321424;
 -object e_7321431 [3];
@@ -35447,42 +35604,41 @@ Make let-values be the same as let*-values, to work around
 -c_7321424.elements[0] = ((closureN)self_7313678)->elements[0];
 -c_7321424.elements[1] = ((closureN)self_7313678)->elements[1];
 -c_7321424.elements[2] = ((closureN)self_7313678)->elements[2];
-+closureN_type c_7320131;
-+object e_7320138 [3];
-+c_7320131.hdr.mark = gc_color_red;
-+ c_7320131.hdr.grayed = 0;
-+c_7320131.tag = closureN_tag;
-+ c_7320131.fn = (function_type)__lambda_753;
-+c_7320131.num_args = 1;
-+c_7320131.num_elements = 3;
-+c_7320131.elements = (object *)e_7320138;
-+c_7320131.elements[0] = ((closureN)self_7312432)->elements[0];
-+c_7320131.elements[1] = ((closureN)self_7312432)->elements[1];
-+c_7320131.elements[2] = ((closureN)self_7312432)->elements[2];
++closureN_type c_7320124;
++object e_7320131 [3];
++c_7320124.hdr.mark = gc_color_red;
++ c_7320124.hdr.grayed = 0;
++c_7320124.tag = closureN_tag;
++ c_7320124.fn = (function_type)__lambda_753;
++c_7320124.num_args = 1;
++c_7320124.num_elements = 3;
++c_7320124.elements = (object *)e_7320131;
++c_7320124.elements[0] = ((closureN)self_7312425)->elements[0];
++c_7320124.elements[1] = ((closureN)self_7312425)->elements[1];
++c_7320124.elements[2] = ((closureN)self_7312425)->elements[2];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7321424,__lambda_753,  Cyc_set_cell(data, ((closureN)self_7313678)->elements[0], r_736136));; 
-+return_direct_with_clo1(data,(closure)&c_7320131,__lambda_753,  Cyc_set_cell(data, ((closureN)self_7312432)->elements[0], r_735691));; 
++return_direct_with_clo1(data,(closure)&c_7320124,__lambda_753,  Cyc_set_cell(data, ((closureN)self_7312425)->elements[0], r_735684));; 
  }
  
 -static void __lambda_753(void *data, object self_7313679, int argc, object *args) /* object self_7313679, object r_736135 */
-+static void __lambda_753(void *data, object self_7312433, int argc, object *args) /* object self_7312433, object r_735690 */
++static void __lambda_753(void *data, object self_7312426, int argc, object *args) /* object self_7312426, object r_735683 */
   {
  
    
  
 -return_closcall2(data,  car(((closureN)self_7313679)->elements[0]),  ((closureN)self_7313679)->elements[1], ((closureN)self_7313679)->elements[2]);; 
-+return_closcall2(data,  car(((closureN)self_7312433)->elements[0]),  ((closureN)self_7312433)->elements[1], ((closureN)self_7312433)->elements[2]);; 
++return_closcall2(data,  car(((closureN)self_7312426)->elements[0]),  ((closureN)self_7312426)->elements[1], ((closureN)self_7312426)->elements[2]);; 
  }
  
 -static void __lambda_743(void *data, object _, int argc, object *args) /* closure _,object k_736123, object pred_731148_733455, object lst_731149_733456 */
-+static void __lambda_743(void *data, object _, int argc, object *args) /* closure _,object k_735678, object pred_731149_733115, object lst_731150_733116 */
++static void __lambda_743(void *data, object _, int argc, object *args) /* closure _,object k_735671, object pred_731148_733108, object lst_731149_733109 */
   {
 -object k_736123 = args[0]; object pred_731148_733455 = args[1]; object lst_731149_733456 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:any");
-+object k_735678 = args[0]; object pred_731149_733115 = args[1]; object lst_731150_733116 = args[2];
-+  Cyc_st_add(data, "base.sld:any");
++object k_735671 = args[0]; object pred_731148_733108 = args[1]; object lst_731149_733109 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:any");
  
 -closureN_type c_7321374;
 -object e_7321413 [1];
@@ -35494,27 +35650,14 @@ Make let-values be the same as let*-values, to work around
 -c_7321374.num_elements = 1;
 -c_7321374.elements = (object *)e_7321413;
 -c_7321374.elements[0] = k_736123;
-+closureN_type c_7320081;
-+object e_7320120 [1];
-+c_7320081.hdr.mark = gc_color_red;
-+ c_7320081.hdr.grayed = 0;
-+c_7320081.tag = closureN_tag;
-+ c_7320081.fn = (function_type)__lambda_744;
-+c_7320081.num_args = 1;
-+c_7320081.num_elements = 1;
-+c_7320081.elements = (object *)e_7320120;
-+c_7320081.elements[0] = k_735678;
- 
+-
 -return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7321374, pred_731148_733455, lst_731149_733456);; 
-+return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7320081, pred_731149_733115, lst_731150_733116);; 
- }
- 
+-}
+-
 -static void __lambda_744(void *data, object self_7313668, int argc, object *args) /* object self_7313668, object l_731151_733457 */
-+static void __lambda_744(void *data, object self_7312422, int argc, object *args) /* object self_7312422, object l_731152_733117 */
-  {
+- {
 - object l_731151_733457 = args[0];
-+ object l_731152_733117 = args[0];
-   
+-  
 -closureN_type c_7321376;
 -object e_7321412 [2];
 -c_7321376.hdr.mark = gc_color_red;
@@ -35526,28 +35669,14 @@ Make let-values be the same as let*-values, to work around
 -c_7321376.elements = (object *)e_7321412;
 -c_7321376.elements[0] = ((closureN)self_7313668)->elements[0];
 -c_7321376.elements[1] = l_731151_733457;
-+closureN_type c_7320083;
-+object e_7320119 [2];
-+c_7320083.hdr.mark = gc_color_red;
-+ c_7320083.hdr.grayed = 0;
-+c_7320083.tag = closureN_tag;
-+ c_7320083.fn = (function_type)__lambda_745;
-+c_7320083.num_args = 1;
-+c_7320083.num_elements = 2;
-+c_7320083.elements = (object *)e_7320119;
-+c_7320083.elements[0] = ((closureN)self_7312422)->elements[0];
-+c_7320083.elements[1] = l_731152_733117;
- 
+-
 -return_direct_with_clo1(data,(closure)&c_7321376,__lambda_745,  boolean_f);; 
-+return_direct_with_clo1(data,(closure)&c_7320083,__lambda_745,  boolean_f);; 
- }
- 
+-}
+-
 -static void __lambda_745(void *data, object self_7313669, int argc, object *args) /* object self_7313669, object any_85_731152_733458 */
-+static void __lambda_745(void *data, object self_7312423, int argc, object *args) /* object self_7312423, object any_85_731153_733118 */
-  {
+- {
 - object any_85_731152_733458 = args[0];
-+ object any_85_731153_733118 = args[0];
-   
+-  
 -closureN_type c_7321378;
 -object e_7321408 [2];
 -c_7321378.hdr.mark = gc_color_red;
@@ -35559,31 +35688,16 @@ Make let-values be the same as let*-values, to work around
 -c_7321378.elements = (object *)e_7321408;
 -c_7321378.elements[0] = ((closureN)self_7313669)->elements[0];
 -c_7321378.elements[1] = ((closureN)self_7313669)->elements[1];
-+closureN_type c_7320085;
-+object e_7320115 [2];
-+c_7320085.hdr.mark = gc_color_red;
-+ c_7320085.hdr.grayed = 0;
-+c_7320085.tag = closureN_tag;
-+ c_7320085.fn = (function_type)__lambda_1361;
-+c_7320085.num_args = 1;
-+c_7320085.num_elements = 2;
-+c_7320085.elements = (object *)e_7320115;
-+c_7320085.elements[0] = ((closureN)self_7312423)->elements[0];
-+c_7320085.elements[1] = ((closureN)self_7312423)->elements[1];
- 
- 
+-
+-
 -pair_type local_7321411; 
 -return_direct_with_clo1(data,(closure)&c_7321378,__lambda_1408,  set_cell_as_expr(&local_7321411, any_85_731152_733458));; 
-+pair_type local_7320118; 
-+return_direct_with_clo1(data,(closure)&c_7320085,__lambda_1361,  set_cell_as_expr(&local_7320118, any_85_731153_733118));; 
- }
- 
+-}
+-
 -static void __lambda_1408(void *data, object self_7313670, int argc, object *args) /* object self_7313670, object any_85_731152_733458 */
-+static void __lambda_1361(void *data, object self_7312424, int argc, object *args) /* object self_7312424, object any_85_731153_733118 */
-  {
+- {
 - object any_85_731152_733458 = args[0];
-+ object any_85_731153_733118 = args[0];
-   
+-  
 -closureN_type c_7321380;
 -object e_7321393 [3];
 -c_7321380.hdr.mark = gc_color_red;
@@ -35596,18 +35710,76 @@ Make let-values be the same as let*-values, to work around
 -c_7321380.elements[0] = any_85_731152_733458;
 -c_7321380.elements[1] = ((closureN)self_7313670)->elements[0];
 -c_7321380.elements[2] = ((closureN)self_7313670)->elements[1];
-+closureN_type c_7320087;
-+object e_7320100 [3];
-+c_7320087.hdr.mark = gc_color_red;
-+ c_7320087.hdr.grayed = 0;
-+c_7320087.tag = closureN_tag;
-+ c_7320087.fn = (function_type)__lambda_746;
-+c_7320087.num_args = 1;
-+c_7320087.num_elements = 3;
-+c_7320087.elements = (object *)e_7320100;
-+c_7320087.elements[0] = any_85_731153_733118;
-+c_7320087.elements[1] = ((closureN)self_7312424)->elements[0];
-+c_7320087.elements[2] = ((closureN)self_7312424)->elements[1];
++closureN_type c_7320074;
++object e_7320113 [1];
++c_7320074.hdr.mark = gc_color_red;
++ c_7320074.hdr.grayed = 0;
++c_7320074.tag = closureN_tag;
++ c_7320074.fn = (function_type)__lambda_744;
++c_7320074.num_args = 1;
++c_7320074.num_elements = 1;
++c_7320074.elements = (object *)e_7320113;
++c_7320074.elements[0] = k_735671;
++
++return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7320074, pred_731148_733108, lst_731149_733109);; 
++}
++
++static void __lambda_744(void *data, object self_7312415, int argc, object *args) /* object self_7312415, object l_731151_733110 */
++ {
++ object l_731151_733110 = args[0];
++  
++closureN_type c_7320076;
++object e_7320112 [2];
++c_7320076.hdr.mark = gc_color_red;
++ c_7320076.hdr.grayed = 0;
++c_7320076.tag = closureN_tag;
++ c_7320076.fn = (function_type)__lambda_745;
++c_7320076.num_args = 1;
++c_7320076.num_elements = 2;
++c_7320076.elements = (object *)e_7320112;
++c_7320076.elements[0] = ((closureN)self_7312415)->elements[0];
++c_7320076.elements[1] = l_731151_733110;
++
++return_direct_with_clo1(data,(closure)&c_7320076,__lambda_745,  boolean_f);; 
++}
++
++static void __lambda_745(void *data, object self_7312416, int argc, object *args) /* object self_7312416, object any_85_731152_733111 */
++ {
++ object any_85_731152_733111 = args[0];
++  
++closureN_type c_7320078;
++object e_7320108 [2];
++c_7320078.hdr.mark = gc_color_red;
++ c_7320078.hdr.grayed = 0;
++c_7320078.tag = closureN_tag;
++ c_7320078.fn = (function_type)__lambda_1361;
++c_7320078.num_args = 1;
++c_7320078.num_elements = 2;
++c_7320078.elements = (object *)e_7320108;
++c_7320078.elements[0] = ((closureN)self_7312416)->elements[0];
++c_7320078.elements[1] = ((closureN)self_7312416)->elements[1];
++
++
++pair_type local_7320111; 
++return_direct_with_clo1(data,(closure)&c_7320078,__lambda_1361,  set_cell_as_expr(&local_7320111, any_85_731152_733111));; 
++}
++
++static void __lambda_1361(void *data, object self_7312417, int argc, object *args) /* object self_7312417, object any_85_731152_733111 */
++ {
++ object any_85_731152_733111 = args[0];
++  
++closureN_type c_7320080;
++object e_7320093 [3];
++c_7320080.hdr.mark = gc_color_red;
++ c_7320080.hdr.grayed = 0;
++c_7320080.tag = closureN_tag;
++ c_7320080.fn = (function_type)__lambda_746;
++c_7320080.num_args = 1;
++c_7320080.num_elements = 3;
++c_7320080.elements = (object *)e_7320093;
++c_7320080.elements[0] = any_85_731152_733111;
++c_7320080.elements[1] = ((closureN)self_7312417)->elements[0];
++c_7320080.elements[2] = ((closureN)self_7312417)->elements[1];
  
  
 -closureN_type c_7321394;
@@ -35620,53 +35792,53 @@ Make let-values be the same as let*-values, to work around
 -c_7321394.num_elements = 1;
 -c_7321394.elements = (object *)e_7321407;
 -c_7321394.elements[0] = any_85_731152_733458;
-+closureN_type c_7320101;
-+object e_7320114 [1];
-+c_7320101.hdr.mark = gc_color_red;
-+ c_7320101.hdr.grayed = 0;
-+c_7320101.tag = closureN_tag;
-+ c_7320101.fn = (function_type)__lambda_748;
-+c_7320101.num_args = 1;
-+c_7320101.num_elements = 1;
-+c_7320101.elements = (object *)e_7320114;
-+c_7320101.elements[0] = any_85_731153_733118;
++closureN_type c_7320094;
++object e_7320107 [1];
++c_7320094.hdr.mark = gc_color_red;
++ c_7320094.hdr.grayed = 0;
++c_7320094.tag = closureN_tag;
++ c_7320094.fn = (function_type)__lambda_748;
++c_7320094.num_args = 1;
++c_7320094.num_elements = 1;
++c_7320094.elements = (object *)e_7320107;
++c_7320094.elements[0] = any_85_731152_733111;
  
 -return_direct_with_clo1(data,(closure)&c_7321380,__lambda_746,  &c_7321394);; 
-+return_direct_with_clo1(data,(closure)&c_7320087,__lambda_746,  &c_7320101);; 
++return_direct_with_clo1(data,(closure)&c_7320080,__lambda_746,  &c_7320094);; 
  }
  
 -static void __lambda_748(void *data, object self_7313671, int argc, object *args) /* object self_7313671, object k_736127, object l_731153_733459 */
-+static void __lambda_748(void *data, object self_7312425, int argc, object *args) /* object self_7312425, object k_735682, object l_731154_733119 */
++static void __lambda_748(void *data, object self_7312418, int argc, object *args) /* object self_7312418, object k_735675, object l_731153_733112 */
   {
 - object k_736127 = args[0]; object l_731153_733459 = args[1];
-+ object k_735682 = args[0]; object l_731154_733119 = args[1];
++ object k_735675 = args[0]; object l_731153_733112 = args[1];
      
 -if( (boolean_f != Cyc_is_null(l_731153_733459)) ){ 
 -  return_direct_with_clo1(data,  k_736127, (((closure)  k_736127)->fn),  boolean_f);
-+if( (boolean_f != Cyc_is_null(l_731154_733119)) ){ 
-+  return_direct_with_clo1(data,  k_735682, (((closure)  k_735682)->fn),  boolean_f);
++if( (boolean_f != Cyc_is_null(l_731153_733112)) ){ 
++  return_direct_with_clo1(data,  k_735675, (((closure)  k_735675)->fn),  boolean_f);
  } else { 
      
 -if( (boolean_f != Cyc_car(data, l_731153_733459)) ){ 
 -  return_direct_with_clo1(data,  k_736127, (((closure)  k_736127)->fn),  boolean_t);
-+if( (boolean_f != Cyc_car(data, l_731154_733119)) ){ 
-+  return_direct_with_clo1(data,  k_735682, (((closure)  k_735682)->fn),  boolean_t);
++if( (boolean_f != Cyc_car(data, l_731153_733112)) ){ 
++  return_direct_with_clo1(data,  k_735675, (((closure)  k_735675)->fn),  boolean_t);
  } else { 
    
  
  
  
 -return_closcall2(data,  car(((closureN)self_7313671)->elements[0]),  k_736127, Cyc_cdr(data, l_731153_733459));}
-+return_closcall2(data,  car(((closureN)self_7312425)->elements[0]),  k_735682, Cyc_cdr(data, l_731154_733119));}
++return_closcall2(data,  car(((closureN)self_7312418)->elements[0]),  k_735675, Cyc_cdr(data, l_731153_733112));}
  ;}
  ;; 
  }
  
 -static void __lambda_746(void *data, object self_7313672, int argc, object *args) /* object self_7313672, object r_736126 */
-+static void __lambda_746(void *data, object self_7312426, int argc, object *args) /* object self_7312426, object r_735681 */
++static void __lambda_746(void *data, object self_7312419, int argc, object *args) /* object self_7312419, object r_735674 */
   {
 - object r_736126 = args[0];
-+ object r_735681 = args[0];
++ object r_735674 = args[0];
    
 -closureN_type c_7321382;
 -object e_7321389 [3];
@@ -35680,44 +35852,43 @@ Make let-values be the same as let*-values, to work around
 -c_7321382.elements[0] = ((closureN)self_7313672)->elements[0];
 -c_7321382.elements[1] = ((closureN)self_7313672)->elements[1];
 -c_7321382.elements[2] = ((closureN)self_7313672)->elements[2];
-+closureN_type c_7320089;
-+object e_7320096 [3];
-+c_7320089.hdr.mark = gc_color_red;
-+ c_7320089.hdr.grayed = 0;
-+c_7320089.tag = closureN_tag;
-+ c_7320089.fn = (function_type)__lambda_747;
-+c_7320089.num_args = 1;
-+c_7320089.num_elements = 3;
-+c_7320089.elements = (object *)e_7320096;
-+c_7320089.elements[0] = ((closureN)self_7312426)->elements[0];
-+c_7320089.elements[1] = ((closureN)self_7312426)->elements[1];
-+c_7320089.elements[2] = ((closureN)self_7312426)->elements[2];
++closureN_type c_7320082;
++object e_7320089 [3];
++c_7320082.hdr.mark = gc_color_red;
++ c_7320082.hdr.grayed = 0;
++c_7320082.tag = closureN_tag;
++ c_7320082.fn = (function_type)__lambda_747;
++c_7320082.num_args = 1;
++c_7320082.num_elements = 3;
++c_7320082.elements = (object *)e_7320089;
++c_7320082.elements[0] = ((closureN)self_7312419)->elements[0];
++c_7320082.elements[1] = ((closureN)self_7312419)->elements[1];
++c_7320082.elements[2] = ((closureN)self_7312419)->elements[2];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7321382,__lambda_747,  Cyc_set_cell(data, ((closureN)self_7313672)->elements[0], r_736126));; 
-+return_direct_with_clo1(data,(closure)&c_7320089,__lambda_747,  Cyc_set_cell(data, ((closureN)self_7312426)->elements[0], r_735681));; 
++return_direct_with_clo1(data,(closure)&c_7320082,__lambda_747,  Cyc_set_cell(data, ((closureN)self_7312419)->elements[0], r_735674));; 
  }
  
 -static void __lambda_747(void *data, object self_7313673, int argc, object *args) /* object self_7313673, object r_736125 */
-+static void __lambda_747(void *data, object self_7312427, int argc, object *args) /* object self_7312427, object r_735680 */
++static void __lambda_747(void *data, object self_7312420, int argc, object *args) /* object self_7312420, object r_735673 */
   {
  
    
  
 -return_closcall2(data,  car(((closureN)self_7313673)->elements[0]),  ((closureN)self_7313673)->elements[1], ((closureN)self_7313673)->elements[2]);; 
-+return_closcall2(data,  car(((closureN)self_7312427)->elements[0]),  ((closureN)self_7312427)->elements[1], ((closureN)self_7312427)->elements[2]);; 
++return_closcall2(data,  car(((closureN)self_7312420)->elements[0]),  ((closureN)self_7312420)->elements[1], ((closureN)self_7312420)->elements[2]);; 
  }
  
 -static void __lambda_729(void *data, object _, int argc, object *args) /* closure _,object k_736100, object reason_731132_733445, object expr_731133_733446, object args_731134_733447_raw, ... */
-+static void __lambda_729(void *data, object _, int argc, object *args) /* closure _,object k_735655, object reason_731133_733105, object expr_731134_733106, object args_731135_733107_raw, ... */
++static void __lambda_729(void *data, object _, int argc, object *args) /* closure _,object k_735648, object reason_731132_733098, object expr_731133_733099, object args_731134_733100_raw, ... */
   {
 -object k_736100 = args[0]; object reason_731132_733445 = args[1]; object expr_731133_733446 = args[2];
 -load_varargs(args_731134_733447, args, 3, argc - 3);
--  Cyc_st_add(data, "scheme/base.sld:error/loc");
-+object k_735655 = args[0]; object reason_731133_733105 = args[1]; object expr_731134_733106 = args[2];
-+load_varargs(args_731135_733107, args, 3, argc - 3);
-+  Cyc_st_add(data, "base.sld:error/loc");
++object k_735648 = args[0]; object reason_731132_733098 = args[1]; object expr_731133_733099 = args[2];
++load_varargs(args_731134_733100, args, 3, argc - 3);
+   Cyc_st_add(data, "scheme/base.sld:error/loc");
  
 -closureN_type c_7321256;
 -object e_7321371 [4];
@@ -35732,29 +35903,29 @@ Make let-values be the same as let*-values, to work around
 -c_7321256.elements[1] = expr_731133_733446;
 -c_7321256.elements[2] = k_736100;
 -c_7321256.elements[3] = reason_731132_733445;
-+closureN_type c_7319963;
-+object e_7320078 [4];
-+c_7319963.hdr.mark = gc_color_red;
-+ c_7319963.hdr.grayed = 0;
-+c_7319963.tag = closureN_tag;
-+ c_7319963.fn = (function_type)__lambda_730;
-+c_7319963.num_args = 1;
-+c_7319963.num_elements = 4;
-+c_7319963.elements = (object *)e_7320078;
-+c_7319963.elements[0] = args_731135_733107;
-+c_7319963.elements[1] = expr_731134_733106;
-+c_7319963.elements[2] = k_735655;
-+c_7319963.elements[3] = reason_731133_733105;
++closureN_type c_7319956;
++object e_7320071 [4];
++c_7319956.hdr.mark = gc_color_red;
++ c_7319956.hdr.grayed = 0;
++c_7319956.tag = closureN_tag;
++ c_7319956.fn = (function_type)__lambda_730;
++c_7319956.num_args = 1;
++c_7319956.num_elements = 4;
++c_7319956.elements = (object *)e_7320071;
++c_7319956.elements[0] = args_731134_733100;
++c_7319956.elements[1] = expr_731133_733099;
++c_7319956.elements[2] = k_735648;
++c_7319956.elements[3] = reason_731132_733098;
  
 -return_direct_with_clo1(data,(closure)&c_7321256,__lambda_730,  boolean_f);; 
-+return_direct_with_clo1(data,(closure)&c_7319963,__lambda_730,  boolean_f);; 
++return_direct_with_clo1(data,(closure)&c_7319956,__lambda_730,  boolean_f);; 
  }
  
 -static void __lambda_730(void *data, object self_7313654, int argc, object *args) /* object self_7313654, object reason_95line_91loc_127_733449 */
-+static void __lambda_730(void *data, object self_7312408, int argc, object *args) /* object self_7312408, object reason_95line_91loc_127_733109 */
++static void __lambda_730(void *data, object self_7312401, int argc, object *args) /* object self_7312401, object reason_95line_91loc_127_733102 */
   {
 - object reason_95line_91loc_127_733449 = args[0];
-+ object reason_95line_91loc_127_733109 = args[0];
++ object reason_95line_91loc_127_733102 = args[0];
    
 -closureN_type c_7321258;
 -object e_7321367 [4];
@@ -35769,32 +35940,32 @@ Make let-values be the same as let*-values, to work around
 -c_7321258.elements[1] = ((closureN)self_7313654)->elements[1];
 -c_7321258.elements[2] = ((closureN)self_7313654)->elements[2];
 -c_7321258.elements[3] = ((closureN)self_7313654)->elements[3];
-+closureN_type c_7319965;
-+object e_7320074 [4];
-+c_7319965.hdr.mark = gc_color_red;
-+ c_7319965.hdr.grayed = 0;
-+c_7319965.tag = closureN_tag;
-+ c_7319965.fn = (function_type)__lambda_1360;
-+c_7319965.num_args = 1;
-+c_7319965.num_elements = 4;
-+c_7319965.elements = (object *)e_7320074;
-+c_7319965.elements[0] = ((closureN)self_7312408)->elements[0];
-+c_7319965.elements[1] = ((closureN)self_7312408)->elements[1];
-+c_7319965.elements[2] = ((closureN)self_7312408)->elements[2];
-+c_7319965.elements[3] = ((closureN)self_7312408)->elements[3];
++closureN_type c_7319958;
++object e_7320067 [4];
++c_7319958.hdr.mark = gc_color_red;
++ c_7319958.hdr.grayed = 0;
++c_7319958.tag = closureN_tag;
++ c_7319958.fn = (function_type)__lambda_1360;
++c_7319958.num_args = 1;
++c_7319958.num_elements = 4;
++c_7319958.elements = (object *)e_7320067;
++c_7319958.elements[0] = ((closureN)self_7312401)->elements[0];
++c_7319958.elements[1] = ((closureN)self_7312401)->elements[1];
++c_7319958.elements[2] = ((closureN)self_7312401)->elements[2];
++c_7319958.elements[3] = ((closureN)self_7312401)->elements[3];
  
  
 -pair_type local_7321370; 
 -return_direct_with_clo1(data,(closure)&c_7321258,__lambda_1407,  set_cell_as_expr(&local_7321370, reason_95line_91loc_127_733449));; 
-+pair_type local_7320077; 
-+return_direct_with_clo1(data,(closure)&c_7319965,__lambda_1360,  set_cell_as_expr(&local_7320077, reason_95line_91loc_127_733109));; 
++pair_type local_7320070; 
++return_direct_with_clo1(data,(closure)&c_7319958,__lambda_1360,  set_cell_as_expr(&local_7320070, reason_95line_91loc_127_733102));; 
  }
  
 -static void __lambda_1407(void *data, object self_7313655, int argc, object *args) /* object self_7313655, object reason_95line_91loc_127_733449 */
-+static void __lambda_1360(void *data, object self_7312409, int argc, object *args) /* object self_7312409, object reason_95line_91loc_127_733109 */
++static void __lambda_1360(void *data, object self_7312402, int argc, object *args) /* object self_7312402, object reason_95line_91loc_127_733102 */
   {
 - object reason_95line_91loc_127_733449 = args[0];
-+ object reason_95line_91loc_127_733109 = args[0];
++ object reason_95line_91loc_127_733102 = args[0];
    
 -closureN_type c_7321260;
 -object e_7321351 [5];
@@ -35810,36 +35981,36 @@ Make let-values be the same as let*-values, to work around
 -c_7321260.elements[2] = ((closureN)self_7313655)->elements[2];
 -c_7321260.elements[3] = ((closureN)self_7313655)->elements[3];
 -c_7321260.elements[4] = reason_95line_91loc_127_733449;
-+closureN_type c_7319967;
-+object e_7320058 [5];
-+c_7319967.hdr.mark = gc_color_red;
-+ c_7319967.hdr.grayed = 0;
-+c_7319967.tag = closureN_tag;
-+ c_7319967.fn = (function_type)__lambda_731;
-+c_7319967.num_args = 1;
-+c_7319967.num_elements = 5;
-+c_7319967.elements = (object *)e_7320058;
-+c_7319967.elements[0] = ((closureN)self_7312409)->elements[0];
-+c_7319967.elements[1] = ((closureN)self_7312409)->elements[1];
-+c_7319967.elements[2] = ((closureN)self_7312409)->elements[2];
-+c_7319967.elements[3] = ((closureN)self_7312409)->elements[3];
-+c_7319967.elements[4] = reason_95line_91loc_127_733109;
++closureN_type c_7319960;
++object e_7320051 [5];
++c_7319960.hdr.mark = gc_color_red;
++ c_7319960.hdr.grayed = 0;
++c_7319960.tag = closureN_tag;
++ c_7319960.fn = (function_type)__lambda_731;
++c_7319960.num_args = 1;
++c_7319960.num_elements = 5;
++c_7319960.elements = (object *)e_7320051;
++c_7319960.elements[0] = ((closureN)self_7312402)->elements[0];
++c_7319960.elements[1] = ((closureN)self_7312402)->elements[1];
++c_7319960.elements[2] = ((closureN)self_7312402)->elements[2];
++c_7319960.elements[3] = ((closureN)self_7312402)->elements[3];
++c_7319960.elements[4] = reason_95line_91loc_127_733102;
  
  
 -mclosure0(c_7321352, (function_type)__lambda_741);c_7321352.num_args = 1;
 -return_direct_with_clo1(data,(closure)&c_7321260,__lambda_731,  &c_7321352);; 
-+mclosure0(c_7320059, (function_type)__lambda_741);c_7320059.num_args = 1;
-+return_direct_with_clo1(data,(closure)&c_7319967,__lambda_731,  &c_7320059);; 
++mclosure0(c_7320052, (function_type)__lambda_741);c_7320052.num_args = 1;
++return_direct_with_clo1(data,(closure)&c_7319960,__lambda_731,  &c_7320052);; 
  }
  
 -static void __lambda_741(void *data, object self_7313656, int argc, object *args) /* object self_7313656, object k_736118, object reason_731135_733451 */
-+static void __lambda_741(void *data, object self_7312410, int argc, object *args) /* object self_7312410, object k_735673, object reason_731136_733111 */
++static void __lambda_741(void *data, object self_7312403, int argc, object *args) /* object self_7312403, object k_735666, object reason_731135_733104 */
   {
 - object k_736118 = args[0]; object reason_731135_733451 = args[1];
-+ object k_735673 = args[0]; object reason_731136_733111 = args[1];
++ object k_735666 = args[0]; object reason_731135_733104 = args[1];
      
 -if( (boolean_f != Cyc_is_string(reason_731135_733451)) ){ 
-+if( (boolean_f != Cyc_is_string(reason_731136_733111)) ){ 
++if( (boolean_f != Cyc_is_string(reason_731135_733104)) ){ 
    
 -closureN_type c_7321356;
 -object e_7321362 [1];
@@ -35851,47 +36022,47 @@ Make let-values be the same as let*-values, to work around
 -c_7321356.num_elements = 1;
 -c_7321356.elements = (object *)e_7321362;
 -c_7321356.elements[0] = k_736118;
-+closureN_type c_7320063;
-+object e_7320069 [1];
-+c_7320063.hdr.mark = gc_color_red;
-+ c_7320063.hdr.grayed = 0;
-+c_7320063.tag = closureN_tag;
-+ c_7320063.fn = (function_type)__lambda_742;
-+c_7320063.num_args = 1;
-+c_7320063.num_elements = 1;
-+c_7320063.elements = (object *)e_7320069;
-+c_7320063.elements[0] = k_735673;
++closureN_type c_7320056;
++object e_7320062 [1];
++c_7320056.hdr.mark = gc_color_red;
++ c_7320056.hdr.grayed = 0;
++c_7320056.tag = closureN_tag;
++ c_7320056.fn = (function_type)__lambda_742;
++c_7320056.num_args = 1;
++c_7320056.num_elements = 1;
++c_7320056.elements = (object *)e_7320062;
++c_7320056.elements[0] = k_735666;
  
  
 -object c_7321365 = Cyc_substring(data,(closure)&c_7321356,reason_731135_733451, obj_int2obj(0), obj_int2obj(8));
 -return_closcall1(data,(closure)&c_7321356,  c_7321365);
-+object c_7320072 = Cyc_substring(data,(closure)&c_7320063,reason_731136_733111, obj_int2obj(0), obj_int2obj(8));
-+return_closcall1(data,(closure)&c_7320063,  c_7320072);
++object c_7320065 = Cyc_substring(data,(closure)&c_7320056,reason_731135_733104, obj_int2obj(0), obj_int2obj(8));
++return_closcall1(data,(closure)&c_7320056,  c_7320065);
  } else { 
 -  return_direct_with_clo1(data,  k_736118, (((closure)  k_736118)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_735673, (((closure)  k_735673)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_735666, (((closure)  k_735666)->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_742(void *data, object self_7313657, int argc, object *args) /* object self_7313657, object r_736120 */
-+static void __lambda_742(void *data, object self_7312411, int argc, object *args) /* object self_7312411, object r_735675 */
++static void __lambda_742(void *data, object self_7312404, int argc, object *args) /* object self_7312404, object r_735668 */
   {
 - object r_736120 = args[0];
-+ object r_735675 = args[0];
++ object r_735668 = args[0];
    
  
  
 -make_utf8_string_with_len(c_7321361, "at line ", 8, 8);
 -return_direct_with_clo1(data,  ((closureN)self_7313657)->elements[0], (((closure)  ((closureN)self_7313657)->elements[0])->fn),  equalp(r_736120, &c_7321361));; 
-+make_utf8_string_with_len(c_7320068, "at line ", 8, 8);
-+return_direct_with_clo1(data,  ((closureN)self_7312411)->elements[0], (((closure)  ((closureN)self_7312411)->elements[0])->fn),  equalp(r_735675, &c_7320068));; 
++make_utf8_string_with_len(c_7320061, "at line ", 8, 8);
++return_direct_with_clo1(data,  ((closureN)self_7312404)->elements[0], (((closure)  ((closureN)self_7312404)->elements[0])->fn),  equalp(r_735668, &c_7320061));; 
  }
  
 -static void __lambda_731(void *data, object self_7313658, int argc, object *args) /* object self_7313658, object r_736117 */
-+static void __lambda_731(void *data, object self_7312412, int argc, object *args) /* object self_7312412, object r_735672 */
++static void __lambda_731(void *data, object self_7312405, int argc, object *args) /* object self_7312405, object r_735665 */
   {
 - object r_736117 = args[0];
-+ object r_735672 = args[0];
++ object r_735665 = args[0];
    
 -closureN_type c_7321262;
 -object e_7321347 [5];
@@ -35907,29 +36078,29 @@ Make let-values be the same as let*-values, to work around
 -c_7321262.elements[2] = ((closureN)self_7313658)->elements[2];
 -c_7321262.elements[3] = ((closureN)self_7313658)->elements[3];
 -c_7321262.elements[4] = ((closureN)self_7313658)->elements[4];
-+closureN_type c_7319969;
-+object e_7320054 [5];
-+c_7319969.hdr.mark = gc_color_red;
-+ c_7319969.hdr.grayed = 0;
-+c_7319969.tag = closureN_tag;
-+ c_7319969.fn = (function_type)__lambda_732;
-+c_7319969.num_args = 1;
-+c_7319969.num_elements = 5;
-+c_7319969.elements = (object *)e_7320054;
-+c_7319969.elements[0] = ((closureN)self_7312412)->elements[0];
-+c_7319969.elements[1] = ((closureN)self_7312412)->elements[1];
-+c_7319969.elements[2] = ((closureN)self_7312412)->elements[2];
-+c_7319969.elements[3] = ((closureN)self_7312412)->elements[3];
-+c_7319969.elements[4] = ((closureN)self_7312412)->elements[4];
++closureN_type c_7319962;
++object e_7320047 [5];
++c_7319962.hdr.mark = gc_color_red;
++ c_7319962.hdr.grayed = 0;
++c_7319962.tag = closureN_tag;
++ c_7319962.fn = (function_type)__lambda_732;
++c_7319962.num_args = 1;
++c_7319962.num_elements = 5;
++c_7319962.elements = (object *)e_7320047;
++c_7319962.elements[0] = ((closureN)self_7312405)->elements[0];
++c_7319962.elements[1] = ((closureN)self_7312405)->elements[1];
++c_7319962.elements[2] = ((closureN)self_7312405)->elements[2];
++c_7319962.elements[3] = ((closureN)self_7312405)->elements[3];
++c_7319962.elements[4] = ((closureN)self_7312405)->elements[4];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7321262,__lambda_732,  Cyc_set_cell(data, ((closureN)self_7313658)->elements[4], r_736117));; 
-+return_direct_with_clo1(data,(closure)&c_7319969,__lambda_732,  Cyc_set_cell(data, ((closureN)self_7312412)->elements[4], r_735672));; 
++return_direct_with_clo1(data,(closure)&c_7319962,__lambda_732,  Cyc_set_cell(data, ((closureN)self_7312405)->elements[4], r_735665));; 
  }
  
 -static void __lambda_732(void *data, object self_7313659, int argc, object *args) /* object self_7313659, object r_736101 */
-+static void __lambda_732(void *data, object self_7312413, int argc, object *args) /* object self_7312413, object r_735656 */
++static void __lambda_732(void *data, object self_7312406, int argc, object *args) /* object self_7312406, object r_735649 */
   {
  
    
@@ -35947,42 +36118,42 @@ Make let-values be the same as let*-values, to work around
 -c_7321264.elements[2] = ((closureN)self_7313659)->elements[2];
 -c_7321264.elements[3] = ((closureN)self_7313659)->elements[3];
 -c_7321264.elements[4] = ((closureN)self_7313659)->elements[4];
-+closureN_type c_7319971;
-+object e_7320050 [5];
-+c_7319971.hdr.mark = gc_color_red;
-+ c_7319971.hdr.grayed = 0;
-+c_7319971.tag = closureN_tag;
-+ c_7319971.fn = (function_type)__lambda_733;
-+c_7319971.num_args = 1;
-+c_7319971.num_elements = 5;
-+c_7319971.elements = (object *)e_7320050;
-+c_7319971.elements[0] = ((closureN)self_7312413)->elements[0];
-+c_7319971.elements[1] = ((closureN)self_7312413)->elements[1];
-+c_7319971.elements[2] = ((closureN)self_7312413)->elements[2];
-+c_7319971.elements[3] = ((closureN)self_7312413)->elements[3];
-+c_7319971.elements[4] = ((closureN)self_7312413)->elements[4];
++closureN_type c_7319964;
++object e_7320043 [5];
++c_7319964.hdr.mark = gc_color_red;
++ c_7319964.hdr.grayed = 0;
++c_7319964.tag = closureN_tag;
++ c_7319964.fn = (function_type)__lambda_733;
++c_7319964.num_args = 1;
++c_7319964.num_elements = 5;
++c_7319964.elements = (object *)e_7320043;
++c_7319964.elements[0] = ((closureN)self_7312406)->elements[0];
++c_7319964.elements[1] = ((closureN)self_7312406)->elements[1];
++c_7319964.elements[2] = ((closureN)self_7312406)->elements[2];
++c_7319964.elements[3] = ((closureN)self_7312406)->elements[3];
++c_7319964.elements[4] = ((closureN)self_7312406)->elements[4];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7321264,__lambda_733,  assoc(data, ((closureN)self_7313659)->elements[1], __glo__85reader_91source_91db_85_scheme_cyclone_common));; 
-+return_direct_with_clo1(data,(closure)&c_7319971,__lambda_733,  assoc(data, ((closureN)self_7312413)->elements[1], __glo__85reader_91source_91db_85_scheme_cyclone_common));; 
++return_direct_with_clo1(data,(closure)&c_7319964,__lambda_733,  assoc(data, ((closureN)self_7312406)->elements[1], __glo__85reader_91source_91db_85_scheme_cyclone_common));; 
  }
  
 -static void __lambda_733(void *data, object self_7313660, int argc, object *args) /* object self_7313660, object found_731139_733452 */
-+static void __lambda_733(void *data, object self_7312414, int argc, object *args) /* object self_7312414, object found_731140_733112 */
++static void __lambda_733(void *data, object self_7312407, int argc, object *args) /* object self_7312407, object found_731139_733105 */
   {
 - object found_731139_733452 = args[0];
 -  object loc_91vec_731142_733453;
 -  if( (boolean_f != found_731139_733452) ){ 
-+ object found_731140_733112 = args[0];
-+  object loc_91vec_731143_733113;
-+  if( (boolean_f != found_731140_733112) ){ 
++ object found_731139_733105 = args[0];
++  object loc_91vec_731142_733106;
++  if( (boolean_f != found_731139_733105) ){ 
    
 -  loc_91vec_731142_733453 = Cyc_cdr(data, found_731139_733452);
-+  loc_91vec_731143_733113 = Cyc_cdr(data, found_731140_733112);
++  loc_91vec_731142_733106 = Cyc_cdr(data, found_731139_733105);
  } else { 
 -  loc_91vec_731142_733453 = boolean_f;}
-+  loc_91vec_731143_733113 = boolean_f;}
++  loc_91vec_731142_733106 = boolean_f;}
  ;
 -closureN_type c_7321271;
 -object e_7321325 [3];
@@ -35996,18 +36167,18 @@ Make let-values be the same as let*-values, to work around
 -c_7321271.elements[0] = loc_91vec_731142_733453;
 -c_7321271.elements[1] = ((closureN)self_7313660)->elements[3];
 -c_7321271.elements[2] = ((closureN)self_7313660)->elements[4];
-+closureN_type c_7319978;
-+object e_7320032 [3];
-+c_7319978.hdr.mark = gc_color_red;
-+ c_7319978.hdr.grayed = 0;
-+c_7319978.tag = closureN_tag;
-+ c_7319978.fn = (function_type)__lambda_734;
-+c_7319978.num_args = 0;
-+c_7319978.num_elements = 3;
-+c_7319978.elements = (object *)e_7320032;
-+c_7319978.elements[0] = loc_91vec_731143_733113;
-+c_7319978.elements[1] = ((closureN)self_7312414)->elements[3];
-+c_7319978.elements[2] = ((closureN)self_7312414)->elements[4];
++closureN_type c_7319971;
++object e_7320025 [3];
++c_7319971.hdr.mark = gc_color_red;
++ c_7319971.hdr.grayed = 0;
++c_7319971.tag = closureN_tag;
++ c_7319971.fn = (function_type)__lambda_734;
++c_7319971.num_args = 0;
++c_7319971.num_elements = 3;
++c_7319971.elements = (object *)e_7320025;
++c_7319971.elements[0] = loc_91vec_731142_733106;
++c_7319971.elements[1] = ((closureN)self_7312407)->elements[3];
++c_7319971.elements[2] = ((closureN)self_7312407)->elements[4];
  
  
 -closureN_type c_7321326;
@@ -36022,50 +36193,50 @@ Make let-values be the same as let*-values, to work around
 -c_7321326.elements[0] = ((closureN)self_7313660)->elements[0];
 -c_7321326.elements[1] = ((closureN)self_7313660)->elements[1];
 -c_7321326.elements[2] = ((closureN)self_7313660)->elements[2];
-+closureN_type c_7320033;
-+object e_7320049 [3];
-+c_7320033.hdr.mark = gc_color_red;
-+ c_7320033.hdr.grayed = 0;
-+c_7320033.tag = closureN_tag;
-+ c_7320033.fn = (function_type)__lambda_740;
-+c_7320033.num_args = 1;
-+c_7320033.num_elements = 3;
-+c_7320033.elements = (object *)e_7320049;
-+c_7320033.elements[0] = ((closureN)self_7312414)->elements[0];
-+c_7320033.elements[1] = ((closureN)self_7312414)->elements[1];
-+c_7320033.elements[2] = ((closureN)self_7312414)->elements[2];
++closureN_type c_7320026;
++object e_7320042 [3];
++c_7320026.hdr.mark = gc_color_red;
++ c_7320026.hdr.grayed = 0;
++c_7320026.tag = closureN_tag;
++ c_7320026.fn = (function_type)__lambda_740;
++c_7320026.num_args = 1;
++c_7320026.num_elements = 3;
++c_7320026.elements = (object *)e_7320042;
++c_7320026.elements[0] = ((closureN)self_7312407)->elements[0];
++c_7320026.elements[1] = ((closureN)self_7312407)->elements[1];
++c_7320026.elements[2] = ((closureN)self_7312407)->elements[2];
  
 -return_direct_with_clo1(data,(closure)&c_7321271,__lambda_734,  &c_7321326);; 
-+return_direct_with_clo1(data,(closure)&c_7319978,__lambda_734,  &c_7320033);; 
++return_direct_with_clo1(data,(closure)&c_7319971,__lambda_734,  &c_7320026);; 
  }
  
 -static void __lambda_740(void *data, object self_7313661, int argc, object *args) /* object self_7313661, object msg_731145_733454 */
-+static void __lambda_740(void *data, object self_7312415, int argc, object *args) /* object self_7312415, object msg_731146_733114 */
++static void __lambda_740(void *data, object self_7312408, int argc, object *args) /* object self_7312408, object msg_731145_733107 */
   {
 - object msg_731145_733454 = args[0];
-+ object msg_731146_733114 = args[0];
++ object msg_731145_733107 = args[0];
      
 -if( (boolean_f != Cyc_is_pair(((closureN)self_7313661)->elements[0])) ){ 
-+if( (boolean_f != Cyc_is_pair(((closureN)self_7312415)->elements[0])) ){ 
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312408)->elements[0])) ){ 
    
 -pair_type local_7321337; 
-+pair_type local_7320044; 
++pair_type local_7320037; 
  
 -object c_7321334 = apply(data,  ((closureN)self_7313661)->elements[2],__glo_error_scheme_base, set_pair_as_expr(&local_7321337, msg_731145_733454, ((closureN)self_7313661)->elements[0]));
 -return_direct_with_clo1(data,  ((closureN)self_7313661)->elements[2], (((closure)  ((closureN)self_7313661)->elements[2])->fn),  c_7321334);
-+object c_7320041 = apply(data,  ((closureN)self_7312415)->elements[2],__glo_error_scheme_base, set_pair_as_expr(&local_7320044, msg_731146_733114, ((closureN)self_7312415)->elements[0]));
-+return_direct_with_clo1(data,  ((closureN)self_7312415)->elements[2], (((closure)  ((closureN)self_7312415)->elements[2])->fn),  c_7320041);
++object c_7320034 = apply(data,  ((closureN)self_7312408)->elements[2],__glo_error_scheme_base, set_pair_as_expr(&local_7320037, msg_731145_733107, ((closureN)self_7312408)->elements[0]));
++return_direct_with_clo1(data,  ((closureN)self_7312408)->elements[2], (((closure)  ((closureN)self_7312408)->elements[2])->fn),  c_7320034);
  } else { 
 -  return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_7313661)->elements[2], msg_731145_733454, ((closureN)self_7313661)->elements[1]);}
-+  return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_7312415)->elements[2], msg_731146_733114, ((closureN)self_7312415)->elements[1]);}
++  return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_7312408)->elements[2], msg_731145_733107, ((closureN)self_7312408)->elements[1]);}
  ;; 
  }
  
 -static void __lambda_734(void *data, object self_7313662, int argc, object *args) /* object self_7313662, object k_736107 */
-+static void __lambda_734(void *data, object self_7312416, int argc, object *args) /* object self_7312416, object k_735662 */
++static void __lambda_734(void *data, object self_7312409, int argc, object *args) /* object self_7312409, object k_735655 */
   {
 - object k_736107 = args[0];
-+ object k_735662 = args[0];
++ object k_735655 = args[0];
    
 -closureN_type c_7321273;
 -object e_7321287 [3];
@@ -36079,18 +36250,18 @@ Make let-values be the same as let*-values, to work around
 -c_7321273.elements[0] = ((closureN)self_7313662)->elements[0];
 -c_7321273.elements[1] = ((closureN)self_7313662)->elements[1];
 -c_7321273.elements[2] = ((closureN)self_7313662)->elements[2];
-+closureN_type c_7319980;
-+object e_7319994 [3];
-+c_7319980.hdr.mark = gc_color_red;
-+ c_7319980.hdr.grayed = 0;
-+c_7319980.tag = closureN_tag;
-+ c_7319980.fn = (function_type)__lambda_735;
-+c_7319980.num_args = 0;
-+c_7319980.num_elements = 3;
-+c_7319980.elements = (object *)e_7319994;
-+c_7319980.elements[0] = ((closureN)self_7312416)->elements[0];
-+c_7319980.elements[1] = ((closureN)self_7312416)->elements[1];
-+c_7319980.elements[2] = ((closureN)self_7312416)->elements[2];
++closureN_type c_7319973;
++object e_7319987 [3];
++c_7319973.hdr.mark = gc_color_red;
++ c_7319973.hdr.grayed = 0;
++c_7319973.tag = closureN_tag;
++ c_7319973.fn = (function_type)__lambda_735;
++c_7319973.num_args = 0;
++c_7319973.num_elements = 3;
++c_7319973.elements = (object *)e_7319987;
++c_7319973.elements[0] = ((closureN)self_7312409)->elements[0];
++c_7319973.elements[1] = ((closureN)self_7312409)->elements[1];
++c_7319973.elements[2] = ((closureN)self_7312409)->elements[2];
  
  
 -closureN_type c_7321288;
@@ -36105,30 +36276,30 @@ Make let-values be the same as let*-values, to work around
 -c_7321288.elements[0] = k_736107;
 -c_7321288.elements[1] = ((closureN)self_7313662)->elements[0];
 -c_7321288.elements[2] = ((closureN)self_7313662)->elements[1];
-+closureN_type c_7319995;
-+object e_7320031 [3];
-+c_7319995.hdr.mark = gc_color_red;
-+ c_7319995.hdr.grayed = 0;
-+c_7319995.tag = closureN_tag;
-+ c_7319995.fn = (function_type)__lambda_737;
-+c_7319995.num_args = 1;
-+c_7319995.num_elements = 3;
-+c_7319995.elements = (object *)e_7320031;
-+c_7319995.elements[0] = k_735662;
-+c_7319995.elements[1] = ((closureN)self_7312416)->elements[0];
-+c_7319995.elements[2] = ((closureN)self_7312416)->elements[1];
++closureN_type c_7319988;
++object e_7320024 [3];
++c_7319988.hdr.mark = gc_color_red;
++ c_7319988.hdr.grayed = 0;
++c_7319988.tag = closureN_tag;
++ c_7319988.fn = (function_type)__lambda_737;
++c_7319988.num_args = 1;
++c_7319988.num_elements = 3;
++c_7319988.elements = (object *)e_7320024;
++c_7319988.elements[0] = k_735655;
++c_7319988.elements[1] = ((closureN)self_7312409)->elements[0];
++c_7319988.elements[2] = ((closureN)self_7312409)->elements[1];
  
 -return_direct_with_clo1(data,(closure)&c_7321273,__lambda_735,  &c_7321288);; 
-+return_direct_with_clo1(data,(closure)&c_7319980,__lambda_735,  &c_7319995);; 
++return_direct_with_clo1(data,(closure)&c_7319973,__lambda_735,  &c_7319988);; 
  }
  
 -static void __lambda_737(void *data, object self_7313663, int argc, object *args) /* object self_7313663, object r_736108 */
-+static void __lambda_737(void *data, object self_7312417, int argc, object *args) /* object self_7312417, object r_735663 */
++static void __lambda_737(void *data, object self_7312410, int argc, object *args) /* object self_7312410, object r_735656 */
   {
 - object r_736108 = args[0];
 -  if( (boolean_f != r_736108) ){ 
-+ object r_735663 = args[0];
-+  if( (boolean_f != r_735663) ){ 
++ object r_735656 = args[0];
++  if( (boolean_f != r_735656) ){ 
    
 -closureN_type c_7321290;
 -object e_7321314 [3];
@@ -36142,37 +36313,37 @@ Make let-values be the same as let*-values, to work around
 -c_7321290.elements[0] = ((closureN)self_7313663)->elements[0];
 -c_7321290.elements[1] = ((closureN)self_7313663)->elements[1];
 -c_7321290.elements[2] = ((closureN)self_7313663)->elements[2];
-+closureN_type c_7319997;
-+object e_7320021 [3];
-+c_7319997.hdr.mark = gc_color_red;
-+ c_7319997.hdr.grayed = 0;
-+c_7319997.tag = closureN_tag;
-+ c_7319997.fn = (function_type)__lambda_738;
-+c_7319997.num_args = 1;
-+c_7319997.num_elements = 3;
-+c_7319997.elements = (object *)e_7320021;
-+c_7319997.elements[0] = ((closureN)self_7312417)->elements[0];
-+c_7319997.elements[1] = ((closureN)self_7312417)->elements[1];
-+c_7319997.elements[2] = ((closureN)self_7312417)->elements[2];
++closureN_type c_7319990;
++object e_7320014 [3];
++c_7319990.hdr.mark = gc_color_red;
++ c_7319990.hdr.grayed = 0;
++c_7319990.tag = closureN_tag;
++ c_7319990.fn = (function_type)__lambda_738;
++c_7319990.num_args = 1;
++c_7319990.num_elements = 3;
++c_7319990.elements = (object *)e_7320014;
++c_7319990.elements[0] = ((closureN)self_7312410)->elements[0];
++c_7319990.elements[1] = ((closureN)self_7312410)->elements[1];
++c_7319990.elements[2] = ((closureN)self_7312410)->elements[2];
  
  
  
  
 -object c_7321317 = Cyc_number2string2(data,(closure)&c_7321290,1,Cyc_vector_ref(data, ((closureN)self_7313663)->elements[1], obj_int2obj(1)));
 -return_closcall1(data,(closure)&c_7321290,  c_7321317);
-+object c_7320024 = Cyc_number2string2(data,(closure)&c_7319997,1,Cyc_vector_ref(data, ((closureN)self_7312417)->elements[1], obj_int2obj(1)));
-+return_closcall1(data,(closure)&c_7319997,  c_7320024);
++object c_7320017 = Cyc_number2string2(data,(closure)&c_7319990,1,Cyc_vector_ref(data, ((closureN)self_7312410)->elements[1], obj_int2obj(1)));
++return_closcall1(data,(closure)&c_7319990,  c_7320017);
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7313663)->elements[0], (((closure)  ((closureN)self_7313663)->elements[0])->fn),  ((closureN)self_7313663)->elements[2]);}
-+  return_direct_with_clo1(data,  ((closureN)self_7312417)->elements[0], (((closure)  ((closureN)self_7312417)->elements[0])->fn),  ((closureN)self_7312417)->elements[2]);}
++  return_direct_with_clo1(data,  ((closureN)self_7312410)->elements[0], (((closure)  ((closureN)self_7312410)->elements[0])->fn),  ((closureN)self_7312410)->elements[2]);}
  ;; 
  }
  
 -static void __lambda_738(void *data, object self_7313664, int argc, object *args) /* object self_7313664, object r_736109 */
-+static void __lambda_738(void *data, object self_7312418, int argc, object *args) /* object self_7312418, object r_735664 */
++static void __lambda_738(void *data, object self_7312411, int argc, object *args) /* object self_7312411, object r_735657 */
   {
 - object r_736109 = args[0];
-+ object r_735664 = args[0];
++ object r_735657 = args[0];
    
 -closureN_type c_7321292;
 -object e_7321307 [4];
@@ -36187,62 +36358,62 @@ Make let-values be the same as let*-values, to work around
 -c_7321292.elements[1] = ((closureN)self_7313664)->elements[1];
 -c_7321292.elements[2] = r_736109;
 -c_7321292.elements[3] = ((closureN)self_7313664)->elements[2];
-+closureN_type c_7319999;
-+object e_7320014 [4];
-+c_7319999.hdr.mark = gc_color_red;
-+ c_7319999.hdr.grayed = 0;
-+c_7319999.tag = closureN_tag;
-+ c_7319999.fn = (function_type)__lambda_739;
-+c_7319999.num_args = 1;
-+c_7319999.num_elements = 4;
-+c_7319999.elements = (object *)e_7320014;
-+c_7319999.elements[0] = ((closureN)self_7312418)->elements[0];
-+c_7319999.elements[1] = ((closureN)self_7312418)->elements[1];
-+c_7319999.elements[2] = r_735664;
-+c_7319999.elements[3] = ((closureN)self_7312418)->elements[2];
++closureN_type c_7319992;
++object e_7320007 [4];
++c_7319992.hdr.mark = gc_color_red;
++ c_7319992.hdr.grayed = 0;
++c_7319992.tag = closureN_tag;
++ c_7319992.fn = (function_type)__lambda_739;
++c_7319992.num_args = 1;
++c_7319992.num_elements = 4;
++c_7319992.elements = (object *)e_7320007;
++c_7319992.elements[0] = ((closureN)self_7312411)->elements[0];
++c_7319992.elements[1] = ((closureN)self_7312411)->elements[1];
++c_7319992.elements[2] = r_735657;
++c_7319992.elements[3] = ((closureN)self_7312411)->elements[2];
  
  
  
  
 -object c_7321310 = Cyc_number2string2(data,(closure)&c_7321292,1,Cyc_vector_ref(data, ((closureN)self_7313664)->elements[1], obj_int2obj(2)));
 -return_closcall1(data,(closure)&c_7321292,  c_7321310);; 
-+object c_7320017 = Cyc_number2string2(data,(closure)&c_7319999,1,Cyc_vector_ref(data, ((closureN)self_7312418)->elements[1], obj_int2obj(2)));
-+return_closcall1(data,(closure)&c_7319999,  c_7320017);; 
++object c_7320010 = Cyc_number2string2(data,(closure)&c_7319992,1,Cyc_vector_ref(data, ((closureN)self_7312411)->elements[1], obj_int2obj(2)));
++return_closcall1(data,(closure)&c_7319992,  c_7320010);; 
  }
  
 -static void __lambda_739(void *data, object self_7313665, int argc, object *args) /* object self_7313665, object r_736110 */
-+static void __lambda_739(void *data, object self_7312419, int argc, object *args) /* object self_7312419, object r_735665 */
++static void __lambda_739(void *data, object self_7312412, int argc, object *args) /* object self_7312412, object r_735658 */
   {
 - object r_736110 = args[0];
-+ object r_735665 = args[0];
++ object r_735658 = args[0];
    
 -make_utf8_string_with_len(c_7321298, "at line ", 8, 8);
-+make_utf8_string_with_len(c_7320005, "at line ", 8, 8);
++make_utf8_string_with_len(c_7319998, "at line ", 8, 8);
  
 -make_utf8_string_with_len(c_7321300, ", column ", 9, 9);
-+make_utf8_string_with_len(c_7320007, ", column ", 9, 9);
++make_utf8_string_with_len(c_7320000, ", column ", 9, 9);
  
 -make_utf8_string_with_len(c_7321301, " of ", 4, 4);
-+make_utf8_string_with_len(c_7320008, " of ", 4, 4);
++make_utf8_string_with_len(c_7320001, " of ", 4, 4);
  
  
  
 -make_utf8_string_with_len(c_7321305, ": ", 2, 2);
-+make_utf8_string_with_len(c_7320012, ": ", 2, 2);
++make_utf8_string_with_len(c_7320005, ": ", 2, 2);
  
 -object c_7321297 = Cyc_string_append(data,  ((closureN)self_7313665)->elements[0],8,&c_7321298, ((closureN)self_7313665)->elements[2], &c_7321300, r_736110, &c_7321301, Cyc_vector_ref(data, ((closureN)self_7313665)->elements[1], obj_int2obj(0)), &c_7321305, ((closureN)self_7313665)->elements[3]);
 -return_direct_with_clo1(data,  ((closureN)self_7313665)->elements[0], (((closure)  ((closureN)self_7313665)->elements[0])->fn),  c_7321297);; 
-+object c_7320004 = Cyc_string_append(data,  ((closureN)self_7312419)->elements[0],8,&c_7320005, ((closureN)self_7312419)->elements[2], &c_7320007, r_735665, &c_7320008, Cyc_vector_ref(data, ((closureN)self_7312419)->elements[1], obj_int2obj(0)), &c_7320012, ((closureN)self_7312419)->elements[3]);
-+return_direct_with_clo1(data,  ((closureN)self_7312419)->elements[0], (((closure)  ((closureN)self_7312419)->elements[0])->fn),  c_7320004);; 
++object c_7319997 = Cyc_string_append(data,  ((closureN)self_7312412)->elements[0],8,&c_7319998, ((closureN)self_7312412)->elements[2], &c_7320000, r_735658, &c_7320001, Cyc_vector_ref(data, ((closureN)self_7312412)->elements[1], obj_int2obj(0)), &c_7320005, ((closureN)self_7312412)->elements[3]);
++return_direct_with_clo1(data,  ((closureN)self_7312412)->elements[0], (((closure)  ((closureN)self_7312412)->elements[0])->fn),  c_7319997);; 
  }
  
 -static void __lambda_735(void *data, object self_7313666, int argc, object *args) /* object self_7313666, object k_736114 */
-+static void __lambda_735(void *data, object self_7312420, int argc, object *args) /* object self_7312420, object k_735669 */
++static void __lambda_735(void *data, object self_7312413, int argc, object *args) /* object self_7312413, object k_735662 */
   {
 - object k_736114 = args[0];
 -  if( (boolean_f != ((closureN)self_7313666)->elements[0]) ){ 
-+ object k_735669 = args[0];
-+  if( (boolean_f != ((closureN)self_7312420)->elements[0]) ){ 
++ object k_735662 = args[0];
++  if( (boolean_f != ((closureN)self_7312413)->elements[0]) ){ 
    
  
  
@@ -36256,37 +36427,37 @@ Make let-values be the same as let*-values, to work around
 -c_7321279.num_elements = 1;
 -c_7321279.elements = (object *)e_7321284;
 -c_7321279.elements[0] = k_736114;
-+closureN_type c_7319986;
-+object e_7319991 [1];
-+c_7319986.hdr.mark = gc_color_red;
-+ c_7319986.hdr.grayed = 0;
-+c_7319986.tag = closureN_tag;
-+ c_7319986.fn = (function_type)__lambda_736;
-+c_7319986.num_args = 1;
-+c_7319986.num_elements = 1;
-+c_7319986.elements = (object *)e_7319991;
-+c_7319986.elements[0] = k_735669;
++closureN_type c_7319979;
++object e_7319984 [1];
++c_7319979.hdr.mark = gc_color_red;
++ c_7319979.hdr.grayed = 0;
++c_7319979.tag = closureN_tag;
++ c_7319979.fn = (function_type)__lambda_736;
++c_7319979.num_args = 1;
++c_7319979.num_elements = 1;
++c_7319979.elements = (object *)e_7319984;
++c_7319979.elements[0] = k_735662;
  
 -return_closcall2(data,  car(((closureN)self_7313666)->elements[2]),  &c_7321279, ((closureN)self_7313666)->elements[1]);
-+return_closcall2(data,  car(((closureN)self_7312420)->elements[2]),  &c_7319986, ((closureN)self_7312420)->elements[1]);
++return_closcall2(data,  car(((closureN)self_7312413)->elements[2]),  &c_7319979, ((closureN)self_7312413)->elements[1]);
  } else { 
 -  return_direct_with_clo1(data,  k_736114, (((closure)  k_736114)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_735669, (((closure)  k_735669)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_735662, (((closure)  k_735662)->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_736(void *data, object self_7313667, int argc, object *args) /* object self_7313667, object r_736115 */
-+static void __lambda_736(void *data, object self_7312421, int argc, object *args) /* object self_7312421, object r_735670 */
++static void __lambda_736(void *data, object self_7312414, int argc, object *args) /* object self_7312414, object r_735663 */
   {
 - object r_736115 = args[0];
 -  if( (boolean_f != r_736115) ){ 
 -  return_direct_with_clo1(data,  ((closureN)self_7313667)->elements[0], (((closure)  ((closureN)self_7313667)->elements[0])->fn),  boolean_f);
-+ object r_735670 = args[0];
-+  if( (boolean_f != r_735670) ){ 
-+  return_direct_with_clo1(data,  ((closureN)self_7312421)->elements[0], (((closure)  ((closureN)self_7312421)->elements[0])->fn),  boolean_f);
++ object r_735663 = args[0];
++  if( (boolean_f != r_735663) ){ 
++  return_direct_with_clo1(data,  ((closureN)self_7312414)->elements[0], (((closure)  ((closureN)self_7312414)->elements[0])->fn),  boolean_f);
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7313667)->elements[0], (((closure)  ((closureN)self_7313667)->elements[0])->fn),  boolean_t);}
-+  return_direct_with_clo1(data,  ((closureN)self_7312421)->elements[0], (((closure)  ((closureN)self_7312421)->elements[0])->fn),  boolean_t);}
++  return_direct_with_clo1(data,  ((closureN)self_7312414)->elements[0], (((closure)  ((closureN)self_7312414)->elements[0])->fn),  boolean_t);}
  ;; 
  }
  
@@ -36302,12 +36473,11 @@ Make let-values be the same as let*-values, to work around
          thd->exception_handler_stack = &c;
          return_closcall1(data, k, &c);  }
 -static void __lambda_717(void *data, object _, int argc, object *args) /* closure _,object k_736082, object handler_731124_733438, object thunk_731125_733439 */
-+static void __lambda_717(void *data, object _, int argc, object *args) /* closure _,object k_735637, object handler_731125_733098, object thunk_731126_733099 */
++static void __lambda_717(void *data, object _, int argc, object *args) /* closure _,object k_735630, object handler_731124_733091, object thunk_731125_733092 */
   {
 -object k_736082 = args[0]; object handler_731124_733438 = args[1]; object thunk_731125_733439 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:with-exception-handler");
-+object k_735637 = args[0]; object handler_731125_733098 = args[1]; object thunk_731126_733099 = args[2];
-+  Cyc_st_add(data, "base.sld:with-exception-handler");
++object k_735630 = args[0]; object handler_731124_733091 = args[1]; object thunk_731125_733092 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:with-exception-handler");
  
 -closureN_type c_7321174;
 -object e_7321206 [2];
@@ -36320,17 +36490,17 @@ Make let-values be the same as let*-values, to work around
 -c_7321174.elements = (object *)e_7321206;
 -c_7321174.elements[0] = k_736082;
 -c_7321174.elements[1] = thunk_731125_733439;
-+closureN_type c_7319881;
-+object e_7319913 [2];
-+c_7319881.hdr.mark = gc_color_red;
-+ c_7319881.hdr.grayed = 0;
-+c_7319881.tag = closureN_tag;
-+ c_7319881.fn = (function_type)__lambda_718;
-+c_7319881.num_args = 1;
-+c_7319881.num_elements = 2;
-+c_7319881.elements = (object *)e_7319913;
-+c_7319881.elements[0] = k_735637;
-+c_7319881.elements[1] = thunk_731126_733099;
++closureN_type c_7319874;
++object e_7319906 [2];
++c_7319874.hdr.mark = gc_color_red;
++ c_7319874.hdr.grayed = 0;
++c_7319874.tag = closureN_tag;
++ c_7319874.fn = (function_type)__lambda_718;
++c_7319874.num_args = 1;
++c_7319874.num_elements = 2;
++c_7319874.elements = (object *)e_7319906;
++c_7319874.elements[0] = k_735630;
++c_7319874.elements[1] = thunk_731125_733092;
  
  
 -closureN_type c_7321207;
@@ -36343,38 +36513,38 @@ Make let-values be the same as let*-values, to work around
 -c_7321207.num_elements = 1;
 -c_7321207.elements = (object *)e_7321251;
 -c_7321207.elements[0] = handler_731124_733438;
-+closureN_type c_7319914;
-+object e_7319958 [1];
-+c_7319914.hdr.mark = gc_color_red;
-+ c_7319914.hdr.grayed = 0;
-+c_7319914.tag = closureN_tag;
-+ c_7319914.fn = (function_type)__lambda_724;
-+c_7319914.num_args = 1;
-+c_7319914.num_elements = 1;
-+c_7319914.elements = (object *)e_7319958;
-+c_7319914.elements[0] = handler_731125_733098;
++closureN_type c_7319907;
++object e_7319951 [1];
++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 = 1;
++c_7319907.elements = (object *)e_7319951;
++c_7319907.elements[0] = handler_731124_733091;
  
 -return_direct_with_clo1(data,(closure)&c_7321174,__lambda_718,  &c_7321207);; 
-+return_direct_with_clo1(data,(closure)&c_7319881,__lambda_718,  &c_7319914);; 
++return_direct_with_clo1(data,(closure)&c_7319874,__lambda_718,  &c_7319907);; 
  }
  
 -static void __lambda_724(void *data, object self_7313641, int argc, object *args) /* object self_7313641, object k_736088, object obj_731128_733442 */
-+static void __lambda_724(void *data, object self_7312395, int argc, object *args) /* object self_7312395, object k_735643, object obj_731129_733102 */
++static void __lambda_724(void *data, object self_7312388, int argc, object *args) /* object self_7312388, object k_735636, object obj_731128_733095 */
   {
 - object k_736088 = args[0]; object obj_731128_733442 = args[1];
 -  object r_736089;
-+ object k_735643 = args[0]; object obj_731129_733102 = args[1];
-+  object r_735644;
++ object k_735636 = args[0]; object obj_731128_733095 = args[1];
++  object r_735637;
      
 -if( (boolean_f != Cyc_is_pair(obj_731128_733442)) ){ 
-+if( (boolean_f != Cyc_is_pair(obj_731129_733102)) ){ 
++if( (boolean_f != Cyc_is_pair(obj_731128_733095)) ){ 
    
    
 -  r_736089 = equalp(Cyc_car(data, obj_731128_733442), quote_continuable);
-+  r_735644 = equalp(Cyc_car(data, obj_731129_733102), quote_continuable);
++  r_735637 = equalp(Cyc_car(data, obj_731128_733095), quote_continuable);
  } else { 
 -  r_736089 = boolean_f;}
-+  r_735644 = boolean_f;}
++  r_735637 = boolean_f;}
  ;
 -closureN_type c_7321218;
 -object e_7321250 [3];
@@ -36388,28 +36558,28 @@ Make let-values be the same as let*-values, to work around
 -c_7321218.elements[0] = ((closureN)self_7313641)->elements[0];
 -c_7321218.elements[1] = k_736088;
 -c_7321218.elements[2] = obj_731128_733442;
-+closureN_type c_7319925;
-+object e_7319957 [3];
-+c_7319925.hdr.mark = gc_color_red;
-+ c_7319925.hdr.grayed = 0;
-+c_7319925.tag = closureN_tag;
-+ c_7319925.fn = (function_type)__lambda_725;
-+c_7319925.num_args = 2;
-+c_7319925.num_elements = 3;
-+c_7319925.elements = (object *)e_7319957;
-+c_7319925.elements[0] = ((closureN)self_7312395)->elements[0];
-+c_7319925.elements[1] = k_735643;
-+c_7319925.elements[2] = obj_731129_733102;
++closureN_type c_7319918;
++object e_7319950 [3];
++c_7319918.hdr.mark = gc_color_red;
++ c_7319918.hdr.grayed = 0;
++c_7319918.tag = closureN_tag;
++ c_7319918.fn = (function_type)__lambda_725;
++c_7319918.num_args = 2;
++c_7319918.num_elements = 3;
++c_7319918.elements = (object *)e_7319950;
++c_7319918.elements[0] = ((closureN)self_7312388)->elements[0];
++c_7319918.elements[1] = k_735636;
++c_7319918.elements[2] = obj_731128_733095;
  
 -return_direct_with_clo2(data,(closure)&c_7321218,__lambda_725,  boolean_f, r_736089);; 
-+return_direct_with_clo2(data,(closure)&c_7319925,__lambda_725,  boolean_f, r_735644);; 
++return_direct_with_clo2(data,(closure)&c_7319918,__lambda_725,  boolean_f, r_735637);; 
  }
  
 -static void __lambda_725(void *data, object self_7313642, int argc, object *args) /* object self_7313642, object result_731129_733443, object continuable_127_731130_733444 */
-+static void __lambda_725(void *data, object self_7312396, int argc, object *args) /* object self_7312396, object result_731130_733103, object continuable_127_731131_733104 */
++static void __lambda_725(void *data, object self_7312389, int argc, object *args) /* object self_7312389, object result_731129_733096, object continuable_127_731130_733097 */
   {
 - object result_731129_733443 = args[0]; object continuable_127_731130_733444 = args[1];
-+ object result_731130_733103 = args[0]; object continuable_127_731131_733104 = args[1];
++ object result_731129_733096 = args[0]; object continuable_127_731130_733097 = args[1];
    
 -closureN_type c_7321220;
 -object e_7321246 [4];
@@ -36424,32 +36594,32 @@ Make let-values be the same as let*-values, to work around
 -c_7321220.elements[1] = ((closureN)self_7313642)->elements[0];
 -c_7321220.elements[2] = ((closureN)self_7313642)->elements[1];
 -c_7321220.elements[3] = ((closureN)self_7313642)->elements[2];
-+closureN_type c_7319927;
-+object e_7319953 [4];
-+c_7319927.hdr.mark = gc_color_red;
-+ c_7319927.hdr.grayed = 0;
-+c_7319927.tag = closureN_tag;
-+ c_7319927.fn = (function_type)__lambda_1359;
-+c_7319927.num_args = 1;
-+c_7319927.num_elements = 4;
-+c_7319927.elements = (object *)e_7319953;
-+c_7319927.elements[0] = continuable_127_731131_733104;
-+c_7319927.elements[1] = ((closureN)self_7312396)->elements[0];
-+c_7319927.elements[2] = ((closureN)self_7312396)->elements[1];
-+c_7319927.elements[3] = ((closureN)self_7312396)->elements[2];
++closureN_type c_7319920;
++object e_7319946 [4];
++c_7319920.hdr.mark = gc_color_red;
++ c_7319920.hdr.grayed = 0;
++c_7319920.tag = closureN_tag;
++ c_7319920.fn = (function_type)__lambda_1359;
++c_7319920.num_args = 1;
++c_7319920.num_elements = 4;
++c_7319920.elements = (object *)e_7319946;
++c_7319920.elements[0] = continuable_127_731130_733097;
++c_7319920.elements[1] = ((closureN)self_7312389)->elements[0];
++c_7319920.elements[2] = ((closureN)self_7312389)->elements[1];
++c_7319920.elements[3] = ((closureN)self_7312389)->elements[2];
  
  
 -pair_type local_7321249; 
 -return_direct_with_clo1(data,(closure)&c_7321220,__lambda_1406,  set_cell_as_expr(&local_7321249, result_731129_733443));; 
-+pair_type local_7319956; 
-+return_direct_with_clo1(data,(closure)&c_7319927,__lambda_1359,  set_cell_as_expr(&local_7319956, result_731130_733103));; 
++pair_type local_7319949; 
++return_direct_with_clo1(data,(closure)&c_7319920,__lambda_1359,  set_cell_as_expr(&local_7319949, result_731129_733096));; 
  }
  
 -static void __lambda_1406(void *data, object self_7313643, int argc, object *args) /* object self_7313643, object result_731129_733443 */
-+static void __lambda_1359(void *data, object self_7312397, int argc, object *args) /* object self_7312397, object result_731130_733103 */
++static void __lambda_1359(void *data, object self_7312390, int argc, object *args) /* object self_7312390, object result_731129_733096 */
   {
 - object result_731129_733443 = args[0];
-+ object result_731130_733103 = args[0];
++ object result_731129_733096 = args[0];
    
 -closureN_type c_7321222;
 -object e_7321245 [5];
@@ -36465,27 +36635,27 @@ Make let-values be the same as let*-values, to work around
 -c_7321222.elements[2] = ((closureN)self_7313643)->elements[2];
 -c_7321222.elements[3] = ((closureN)self_7313643)->elements[3];
 -c_7321222.elements[4] = result_731129_733443;
-+closureN_type c_7319929;
-+object e_7319952 [5];
-+c_7319929.hdr.mark = gc_color_red;
-+ c_7319929.hdr.grayed = 0;
-+c_7319929.tag = closureN_tag;
-+ c_7319929.fn = (function_type)__lambda_726;
-+c_7319929.num_args = 1;
-+c_7319929.num_elements = 5;
-+c_7319929.elements = (object *)e_7319952;
-+c_7319929.elements[0] = ((closureN)self_7312397)->elements[0];
-+c_7319929.elements[1] = ((closureN)self_7312397)->elements[1];
-+c_7319929.elements[2] = ((closureN)self_7312397)->elements[2];
-+c_7319929.elements[3] = ((closureN)self_7312397)->elements[3];
-+c_7319929.elements[4] = result_731130_733103;
++closureN_type c_7319922;
++object e_7319945 [5];
++c_7319922.hdr.mark = gc_color_red;
++ c_7319922.hdr.grayed = 0;
++c_7319922.tag = closureN_tag;
++ c_7319922.fn = (function_type)__lambda_726;
++c_7319922.num_args = 1;
++c_7319922.num_elements = 5;
++c_7319922.elements = (object *)e_7319945;
++c_7319922.elements[0] = ((closureN)self_7312390)->elements[0];
++c_7319922.elements[1] = ((closureN)self_7312390)->elements[1];
++c_7319922.elements[2] = ((closureN)self_7312390)->elements[2];
++c_7319922.elements[3] = ((closureN)self_7312390)->elements[3];
++c_7319922.elements[4] = result_731129_733096;
  
 -return_direct_with_clo1(data,  __glo_Cyc_91remove_91exception_91handler_scheme_base, (((closure)  __glo_Cyc_91remove_91exception_91handler_scheme_base)->fn),  &c_7321222);; 
-+return_direct_with_clo1(data,  __glo_Cyc_91remove_91exception_91handler_scheme_base, (((closure)  __glo_Cyc_91remove_91exception_91handler_scheme_base)->fn),  &c_7319929);; 
++return_direct_with_clo1(data,  __glo_Cyc_91remove_91exception_91handler_scheme_base, (((closure)  __glo_Cyc_91remove_91exception_91handler_scheme_base)->fn),  &c_7319922);; 
  }
  
 -static void __lambda_726(void *data, object self_7313644, int argc, object *args) /* object self_7313644, object r_736090 */
-+static void __lambda_726(void *data, object self_7312398, int argc, object *args) /* object self_7312398, object r_735645 */
++static void __lambda_726(void *data, object self_7312391, int argc, object *args) /* object self_7312391, object r_735638 */
   {
  
    
@@ -36501,30 +36671,30 @@ Make let-values be the same as let*-values, to work around
 -c_7321225.elements[0] = ((closureN)self_7313644)->elements[0];
 -c_7321225.elements[1] = ((closureN)self_7313644)->elements[2];
 -c_7321225.elements[2] = ((closureN)self_7313644)->elements[4];
-+closureN_type c_7319932;
-+object e_7319948 [3];
-+c_7319932.hdr.mark = gc_color_red;
-+ c_7319932.hdr.grayed = 0;
-+c_7319932.tag = closureN_tag;
-+ c_7319932.fn = (function_type)__lambda_727;
-+c_7319932.num_args = 1;
-+c_7319932.num_elements = 3;
-+c_7319932.elements = (object *)e_7319948;
-+c_7319932.elements[0] = ((closureN)self_7312398)->elements[0];
-+c_7319932.elements[1] = ((closureN)self_7312398)->elements[2];
-+c_7319932.elements[2] = ((closureN)self_7312398)->elements[4];
++closureN_type c_7319925;
++object e_7319941 [3];
++c_7319925.hdr.mark = gc_color_red;
++ c_7319925.hdr.grayed = 0;
++c_7319925.tag = closureN_tag;
++ c_7319925.fn = (function_type)__lambda_727;
++c_7319925.num_args = 1;
++c_7319925.num_elements = 3;
++c_7319925.elements = (object *)e_7319941;
++c_7319925.elements[0] = ((closureN)self_7312391)->elements[0];
++c_7319925.elements[1] = ((closureN)self_7312391)->elements[2];
++c_7319925.elements[2] = ((closureN)self_7312391)->elements[4];
  
  
  
 -return_closcall2(data,  ((closureN)self_7313644)->elements[1],  &c_7321225, Cyc_cdr(data, ((closureN)self_7313644)->elements[3]));; 
-+return_closcall2(data,  ((closureN)self_7312398)->elements[1],  &c_7319932, Cyc_cdr(data, ((closureN)self_7312398)->elements[3]));; 
++return_closcall2(data,  ((closureN)self_7312391)->elements[1],  &c_7319925, Cyc_cdr(data, ((closureN)self_7312391)->elements[3]));; 
  }
  
 -static void __lambda_727(void *data, object self_7313645, int argc, object *args) /* object self_7313645, object r_736092 */
-+static void __lambda_727(void *data, object self_7312399, int argc, object *args) /* object self_7312399, object r_735647 */
++static void __lambda_727(void *data, object self_7312392, int argc, object *args) /* object self_7312392, object r_735640 */
   {
 - object r_736092 = args[0];
-+ object r_735647 = args[0];
++ object r_735640 = args[0];
    
 -closureN_type c_7321227;
 -object e_7321237 [3];
@@ -36538,49 +36708,49 @@ Make let-values be the same as let*-values, to work around
 -c_7321227.elements[0] = ((closureN)self_7313645)->elements[0];
 -c_7321227.elements[1] = ((closureN)self_7313645)->elements[1];
 -c_7321227.elements[2] = ((closureN)self_7313645)->elements[2];
-+closureN_type c_7319934;
-+object e_7319944 [3];
-+c_7319934.hdr.mark = gc_color_red;
-+ c_7319934.hdr.grayed = 0;
-+c_7319934.tag = closureN_tag;
-+ c_7319934.fn = (function_type)__lambda_728;
-+c_7319934.num_args = 1;
-+c_7319934.num_elements = 3;
-+c_7319934.elements = (object *)e_7319944;
-+c_7319934.elements[0] = ((closureN)self_7312399)->elements[0];
-+c_7319934.elements[1] = ((closureN)self_7312399)->elements[1];
-+c_7319934.elements[2] = ((closureN)self_7312399)->elements[2];
++closureN_type c_7319927;
++object e_7319937 [3];
++c_7319927.hdr.mark = gc_color_red;
++ c_7319927.hdr.grayed = 0;
++c_7319927.tag = closureN_tag;
++ c_7319927.fn = (function_type)__lambda_728;
++c_7319927.num_args = 1;
++c_7319927.num_elements = 3;
++c_7319927.elements = (object *)e_7319937;
++c_7319927.elements[0] = ((closureN)self_7312392)->elements[0];
++c_7319927.elements[1] = ((closureN)self_7312392)->elements[1];
++c_7319927.elements[2] = ((closureN)self_7312392)->elements[2];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7321227,__lambda_728,  Cyc_set_cell(data, ((closureN)self_7313645)->elements[2], r_736092));; 
-+return_direct_with_clo1(data,(closure)&c_7319934,__lambda_728,  Cyc_set_cell(data, ((closureN)self_7312399)->elements[2], r_735647));; 
++return_direct_with_clo1(data,(closure)&c_7319927,__lambda_728,  Cyc_set_cell(data, ((closureN)self_7312392)->elements[2], r_735640));; 
  }
  
 -static void __lambda_728(void *data, object self_7313646, int argc, object *args) /* object self_7313646, object r_736091 */
-+static void __lambda_728(void *data, object self_7312400, int argc, object *args) /* object self_7312400, object r_735646 */
++static void __lambda_728(void *data, object self_7312393, int argc, object *args) /* object self_7312393, object r_735639 */
   {
  
 -  if( (boolean_f != ((closureN)self_7313646)->elements[0]) ){ 
-+  if( (boolean_f != ((closureN)self_7312400)->elements[0]) ){ 
++  if( (boolean_f != ((closureN)self_7312393)->elements[0]) ){ 
    
  
 -return_direct_with_clo1(data,  ((closureN)self_7313646)->elements[1], (((closure)  ((closureN)self_7313646)->elements[1])->fn),  car(((closureN)self_7313646)->elements[2]));
-+return_direct_with_clo1(data,  ((closureN)self_7312400)->elements[1], (((closure)  ((closureN)self_7312400)->elements[1])->fn),  car(((closureN)self_7312400)->elements[2]));
++return_direct_with_clo1(data,  ((closureN)self_7312393)->elements[1], (((closure)  ((closureN)self_7312393)->elements[1])->fn),  car(((closureN)self_7312393)->elements[2]));
  } else { 
    
 -make_utf8_string_with_len(c_7321236, "exception handler returned", 26, 26);
 -return_direct_with_clo2(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_7313646)->elements[1], &c_7321236);}
-+make_utf8_string_with_len(c_7319943, "exception handler returned", 26, 26);
-+return_direct_with_clo2(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_7312400)->elements[1], &c_7319943);}
++make_utf8_string_with_len(c_7319936, "exception handler returned", 26, 26);
++return_direct_with_clo2(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  ((closureN)self_7312393)->elements[1], &c_7319936);}
  ;; 
  }
  
 -static void __lambda_718(void *data, object self_7313647, int argc, object *args) /* object self_7313647, object r_736083 */
-+static void __lambda_718(void *data, object self_7312401, int argc, object *args) /* object self_7312401, object r_735638 */
++static void __lambda_718(void *data, object self_7312394, int argc, object *args) /* object self_7312394, object r_735631 */
   {
 - object r_736083 = args[0];
-+ object r_735638 = args[0];
++ object r_735631 = args[0];
    
 -closureN_type c_7321176;
 -object e_7321205 [2];
@@ -36593,27 +36763,27 @@ Make let-values be the same as let*-values, to work around
 -c_7321176.elements = (object *)e_7321205;
 -c_7321176.elements[0] = ((closureN)self_7313647)->elements[0];
 -c_7321176.elements[1] = ((closureN)self_7313647)->elements[1];
-+closureN_type c_7319883;
-+object e_7319912 [2];
-+c_7319883.hdr.mark = gc_color_red;
-+ c_7319883.hdr.grayed = 0;
-+c_7319883.tag = closureN_tag;
-+ c_7319883.fn = (function_type)__lambda_719;
-+c_7319883.num_args = 2;
-+c_7319883.num_elements = 2;
-+c_7319883.elements = (object *)e_7319912;
-+c_7319883.elements[0] = ((closureN)self_7312401)->elements[0];
-+c_7319883.elements[1] = ((closureN)self_7312401)->elements[1];
++closureN_type c_7319876;
++object e_7319905 [2];
++c_7319876.hdr.mark = gc_color_red;
++ c_7319876.hdr.grayed = 0;
++c_7319876.tag = closureN_tag;
++ c_7319876.fn = (function_type)__lambda_719;
++c_7319876.num_args = 2;
++c_7319876.num_elements = 2;
++c_7319876.elements = (object *)e_7319905;
++c_7319876.elements[0] = ((closureN)self_7312394)->elements[0];
++c_7319876.elements[1] = ((closureN)self_7312394)->elements[1];
  
 -return_direct_with_clo2(data,(closure)&c_7321176,__lambda_719,  boolean_f, r_736083);; 
-+return_direct_with_clo2(data,(closure)&c_7319883,__lambda_719,  boolean_f, r_735638);; 
++return_direct_with_clo2(data,(closure)&c_7319876,__lambda_719,  boolean_f, r_735631);; 
  }
  
 -static void __lambda_719(void *data, object self_7313648, int argc, object *args) /* object self_7313648, object result_731126_733440, object my_91handler_731127_733441 */
-+static void __lambda_719(void *data, object self_7312402, int argc, object *args) /* object self_7312402, object result_731127_733100, object my_91handler_731128_733101 */
++static void __lambda_719(void *data, object self_7312395, int argc, object *args) /* object self_7312395, object result_731126_733093, object my_91handler_731127_733094 */
   {
 - object result_731126_733440 = args[0]; object my_91handler_731127_733441 = args[1];
-+ object result_731127_733100 = args[0]; object my_91handler_731128_733101 = args[1];
++ object result_731126_733093 = args[0]; object my_91handler_731127_733094 = args[1];
    
 -closureN_type c_7321178;
 -object e_7321201 [3];
@@ -36627,31 +36797,31 @@ Make let-values be the same as let*-values, to work around
 -c_7321178.elements[0] = ((closureN)self_7313648)->elements[0];
 -c_7321178.elements[1] = my_91handler_731127_733441;
 -c_7321178.elements[2] = ((closureN)self_7313648)->elements[1];
-+closureN_type c_7319885;
-+object e_7319908 [3];
-+c_7319885.hdr.mark = gc_color_red;
-+ c_7319885.hdr.grayed = 0;
-+c_7319885.tag = closureN_tag;
-+ c_7319885.fn = (function_type)__lambda_1358;
-+c_7319885.num_args = 1;
-+c_7319885.num_elements = 3;
-+c_7319885.elements = (object *)e_7319908;
-+c_7319885.elements[0] = ((closureN)self_7312402)->elements[0];
-+c_7319885.elements[1] = my_91handler_731128_733101;
-+c_7319885.elements[2] = ((closureN)self_7312402)->elements[1];
++closureN_type c_7319878;
++object e_7319901 [3];
++c_7319878.hdr.mark = gc_color_red;
++ c_7319878.hdr.grayed = 0;
++c_7319878.tag = closureN_tag;
++ c_7319878.fn = (function_type)__lambda_1358;
++c_7319878.num_args = 1;
++c_7319878.num_elements = 3;
++c_7319878.elements = (object *)e_7319901;
++c_7319878.elements[0] = ((closureN)self_7312395)->elements[0];
++c_7319878.elements[1] = my_91handler_731127_733094;
++c_7319878.elements[2] = ((closureN)self_7312395)->elements[1];
  
  
 -pair_type local_7321204; 
 -return_direct_with_clo1(data,(closure)&c_7321178,__lambda_1405,  set_cell_as_expr(&local_7321204, result_731126_733440));; 
-+pair_type local_7319911; 
-+return_direct_with_clo1(data,(closure)&c_7319885,__lambda_1358,  set_cell_as_expr(&local_7319911, result_731127_733100));; 
++pair_type local_7319904; 
++return_direct_with_clo1(data,(closure)&c_7319878,__lambda_1358,  set_cell_as_expr(&local_7319904, result_731126_733093));; 
  }
  
 -static void __lambda_1405(void *data, object self_7313649, int argc, object *args) /* object self_7313649, object result_731126_733440 */
-+static void __lambda_1358(void *data, object self_7312403, int argc, object *args) /* object self_7312403, object result_731127_733100 */
++static void __lambda_1358(void *data, object self_7312396, int argc, object *args) /* object self_7312396, object result_731126_733093 */
   {
 - object result_731126_733440 = args[0];
-+ object result_731127_733100 = args[0];
++ object result_731126_733093 = args[0];
    
 -closureN_type c_7321180;
 -object e_7321199 [3];
@@ -36665,25 +36835,25 @@ Make let-values be the same as let*-values, to work around
 -c_7321180.elements[0] = ((closureN)self_7313649)->elements[0];
 -c_7321180.elements[1] = result_731126_733440;
 -c_7321180.elements[2] = ((closureN)self_7313649)->elements[2];
-+closureN_type c_7319887;
-+object e_7319906 [3];
-+c_7319887.hdr.mark = gc_color_red;
-+ c_7319887.hdr.grayed = 0;
-+c_7319887.tag = closureN_tag;
-+ c_7319887.fn = (function_type)__lambda_720;
-+c_7319887.num_args = 1;
-+c_7319887.num_elements = 3;
-+c_7319887.elements = (object *)e_7319906;
-+c_7319887.elements[0] = ((closureN)self_7312403)->elements[0];
-+c_7319887.elements[1] = result_731127_733100;
-+c_7319887.elements[2] = ((closureN)self_7312403)->elements[2];
++closureN_type c_7319880;
++object e_7319899 [3];
++c_7319880.hdr.mark = gc_color_red;
++ c_7319880.hdr.grayed = 0;
++c_7319880.tag = closureN_tag;
++ c_7319880.fn = (function_type)__lambda_720;
++c_7319880.num_args = 1;
++c_7319880.num_elements = 3;
++c_7319880.elements = (object *)e_7319899;
++c_7319880.elements[0] = ((closureN)self_7312396)->elements[0];
++c_7319880.elements[1] = result_731126_733093;
++c_7319880.elements[2] = ((closureN)self_7312396)->elements[2];
  
 -return_direct_with_clo2(data,  __glo_Cyc_91add_91exception_91handler_scheme_base, (((closure)  __glo_Cyc_91add_91exception_91handler_scheme_base)->fn),  &c_7321180, ((closureN)self_7313649)->elements[1]);; 
-+return_direct_with_clo2(data,  __glo_Cyc_91add_91exception_91handler_scheme_base, (((closure)  __glo_Cyc_91add_91exception_91handler_scheme_base)->fn),  &c_7319887, ((closureN)self_7312403)->elements[1]);; 
++return_direct_with_clo2(data,  __glo_Cyc_91add_91exception_91handler_scheme_base, (((closure)  __glo_Cyc_91add_91exception_91handler_scheme_base)->fn),  &c_7319880, ((closureN)self_7312396)->elements[1]);; 
  }
  
 -static void __lambda_720(void *data, object self_7313650, int argc, object *args) /* object self_7313650, object r_736084 */
-+static void __lambda_720(void *data, object self_7312404, int argc, object *args) /* object self_7312404, object r_735639 */
++static void __lambda_720(void *data, object self_7312397, int argc, object *args) /* object self_7312397, object r_735632 */
   {
  
    
@@ -36698,27 +36868,27 @@ Make let-values be the same as let*-values, to work around
 -c_7321183.elements = (object *)e_7321198;
 -c_7321183.elements[0] = ((closureN)self_7313650)->elements[0];
 -c_7321183.elements[1] = ((closureN)self_7313650)->elements[1];
-+closureN_type c_7319890;
-+object e_7319905 [2];
-+c_7319890.hdr.mark = gc_color_red;
-+ c_7319890.hdr.grayed = 0;
-+c_7319890.tag = closureN_tag;
-+ c_7319890.fn = (function_type)__lambda_721;
-+c_7319890.num_args = 1;
-+c_7319890.num_elements = 2;
-+c_7319890.elements = (object *)e_7319905;
-+c_7319890.elements[0] = ((closureN)self_7312404)->elements[0];
-+c_7319890.elements[1] = ((closureN)self_7312404)->elements[1];
++closureN_type c_7319883;
++object e_7319898 [2];
++c_7319883.hdr.mark = gc_color_red;
++ c_7319883.hdr.grayed = 0;
++c_7319883.tag = closureN_tag;
++ c_7319883.fn = (function_type)__lambda_721;
++c_7319883.num_args = 1;
++c_7319883.num_elements = 2;
++c_7319883.elements = (object *)e_7319898;
++c_7319883.elements[0] = ((closureN)self_7312397)->elements[0];
++c_7319883.elements[1] = ((closureN)self_7312397)->elements[1];
  
 -return_closcall1(data,  ((closureN)self_7313650)->elements[2],  &c_7321183);; 
-+return_closcall1(data,  ((closureN)self_7312404)->elements[2],  &c_7319890);; 
++return_closcall1(data,  ((closureN)self_7312397)->elements[2],  &c_7319883);; 
  }
  
 -static void __lambda_721(void *data, object self_7313651, int argc, object *args) /* object self_7313651, object r_736087 */
-+static void __lambda_721(void *data, object self_7312405, int argc, object *args) /* object self_7312405, object r_735642 */
++static void __lambda_721(void *data, object self_7312398, int argc, object *args) /* object self_7312398, object r_735635 */
   {
 - object r_736087 = args[0];
-+ object r_735642 = args[0];
++ object r_735635 = args[0];
    
 -closureN_type c_7321185;
 -object e_7321194 [2];
@@ -36731,26 +36901,26 @@ Make let-values be the same as let*-values, to work around
 -c_7321185.elements = (object *)e_7321194;
 -c_7321185.elements[0] = ((closureN)self_7313651)->elements[0];
 -c_7321185.elements[1] = ((closureN)self_7313651)->elements[1];
-+closureN_type c_7319892;
-+object e_7319901 [2];
-+c_7319892.hdr.mark = gc_color_red;
-+ c_7319892.hdr.grayed = 0;
-+c_7319892.tag = closureN_tag;
-+ c_7319892.fn = (function_type)__lambda_722;
-+c_7319892.num_args = 1;
-+c_7319892.num_elements = 2;
-+c_7319892.elements = (object *)e_7319901;
-+c_7319892.elements[0] = ((closureN)self_7312405)->elements[0];
-+c_7319892.elements[1] = ((closureN)self_7312405)->elements[1];
++closureN_type c_7319885;
++object e_7319894 [2];
++c_7319885.hdr.mark = gc_color_red;
++ c_7319885.hdr.grayed = 0;
++c_7319885.tag = closureN_tag;
++ c_7319885.fn = (function_type)__lambda_722;
++c_7319885.num_args = 1;
++c_7319885.num_elements = 2;
++c_7319885.elements = (object *)e_7319894;
++c_7319885.elements[0] = ((closureN)self_7312398)->elements[0];
++c_7319885.elements[1] = ((closureN)self_7312398)->elements[1];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7321185,__lambda_722,  Cyc_set_cell(data, ((closureN)self_7313651)->elements[1], r_736087));; 
-+return_direct_with_clo1(data,(closure)&c_7319892,__lambda_722,  Cyc_set_cell(data, ((closureN)self_7312405)->elements[1], r_735642));; 
++return_direct_with_clo1(data,(closure)&c_7319885,__lambda_722,  Cyc_set_cell(data, ((closureN)self_7312398)->elements[1], r_735635));; 
  }
  
 -static void __lambda_722(void *data, object self_7313652, int argc, object *args) /* object self_7313652, object r_736085 */
-+static void __lambda_722(void *data, object self_7312406, int argc, object *args) /* object self_7312406, object r_735640 */
++static void __lambda_722(void *data, object self_7312399, int argc, object *args) /* object self_7312399, object r_735633 */
   {
  
    
@@ -36765,207 +36935,201 @@ Make let-values be the same as let*-values, to work around
 -c_7321187.elements = (object *)e_7321193;
 -c_7321187.elements[0] = ((closureN)self_7313652)->elements[0];
 -c_7321187.elements[1] = ((closureN)self_7313652)->elements[1];
-+closureN_type c_7319894;
-+object e_7319900 [2];
-+c_7319894.hdr.mark = gc_color_red;
-+ c_7319894.hdr.grayed = 0;
-+c_7319894.tag = closureN_tag;
-+ c_7319894.fn = (function_type)__lambda_723;
-+c_7319894.num_args = 1;
-+c_7319894.num_elements = 2;
-+c_7319894.elements = (object *)e_7319900;
-+c_7319894.elements[0] = ((closureN)self_7312406)->elements[0];
-+c_7319894.elements[1] = ((closureN)self_7312406)->elements[1];
++closureN_type c_7319887;
++object e_7319893 [2];
++c_7319887.hdr.mark = gc_color_red;
++ c_7319887.hdr.grayed = 0;
++c_7319887.tag = closureN_tag;
++ c_7319887.fn = (function_type)__lambda_723;
++c_7319887.num_args = 1;
++c_7319887.num_elements = 2;
++c_7319887.elements = (object *)e_7319893;
++c_7319887.elements[0] = ((closureN)self_7312399)->elements[0];
++c_7319887.elements[1] = ((closureN)self_7312399)->elements[1];
  
 -return_direct_with_clo1(data,  __glo_Cyc_91remove_91exception_91handler_scheme_base, (((closure)  __glo_Cyc_91remove_91exception_91handler_scheme_base)->fn),  &c_7321187);; 
-+return_direct_with_clo1(data,  __glo_Cyc_91remove_91exception_91handler_scheme_base, (((closure)  __glo_Cyc_91remove_91exception_91handler_scheme_base)->fn),  &c_7319894);; 
++return_direct_with_clo1(data,  __glo_Cyc_91remove_91exception_91handler_scheme_base, (((closure)  __glo_Cyc_91remove_91exception_91handler_scheme_base)->fn),  &c_7319887);; 
  }
  
 -static void __lambda_723(void *data, object self_7313653, int argc, object *args) /* object self_7313653, object r_736086 */
-+static void __lambda_723(void *data, object self_7312407, int argc, object *args) /* object self_7312407, object r_735641 */
++static void __lambda_723(void *data, object self_7312400, int argc, object *args) /* object self_7312400, object r_735634 */
   {
  
    
  
 -return_direct_with_clo1(data,  ((closureN)self_7313653)->elements[0], (((closure)  ((closureN)self_7313653)->elements[0])->fn),  car(((closureN)self_7313653)->elements[1]));; 
-+return_direct_with_clo1(data,  ((closureN)self_7312407)->elements[0], (((closure)  ((closureN)self_7312407)->elements[0])->fn),  car(((closureN)self_7312407)->elements[1]));; 
++return_direct_with_clo1(data,  ((closureN)self_7312400)->elements[0], (((closure)  ((closureN)self_7312400)->elements[0])->fn),  car(((closureN)self_7312400)->elements[1]));; 
  }
  
 -static void __lambda_716(void *data, object _, int argc, object *args) /* closure _,object k_736041, object exp_731118_733435, object rename_731119_733436, object compare_731120_733437 */
-+static void __lambda_716(void *data, object _, int argc, object *args) /* closure _,object k_735596, object exp_731119_733095, object rename_731120_733096, object compare_731121_733097 */
++static void __lambda_716(void *data, object _, int argc, object *args) /* closure _,object k_735589, object exp_731118_733088, object rename_731119_733089, object compare_731120_733090 */
   {
 -object k_736041 = args[0]; object exp_731118_733435 = args[1];
--  Cyc_st_add(data, "scheme/base.sld:with-handler");
-+object k_735596 = args[0]; object exp_731119_733095 = args[1];
-+  Cyc_st_add(data, "base.sld:with-handler");
++object k_735589 = args[0]; object exp_731118_733088 = args[1];
+   Cyc_st_add(data, "scheme/base.sld:with-handler");
  
 -pair_type local_7321113; 
-+pair_type local_7319820; 
++pair_type local_7319813; 
  
 -pair_type local_7321116; 
-+pair_type local_7319823; 
++pair_type local_7319816; 
  
 -pair_type local_7321119; 
-+pair_type local_7319826; 
++pair_type local_7319819; 
  
 -pair_type local_7321122; 
-+pair_type local_7319829; 
++pair_type local_7319822; 
  
 -pair_type local_7321125; 
-+pair_type local_7319832; 
++pair_type local_7319825; 
  
 -pair_type local_7321128; 
-+pair_type local_7319835; 
++pair_type local_7319828; 
  
 -pair_type local_7321131; 
-+pair_type local_7319838; 
++pair_type local_7319831; 
  
 -pair_type local_7321134; 
-+pair_type local_7319841; 
++pair_type local_7319834; 
  
 -pair_type local_7321137; 
-+pair_type local_7319844; 
++pair_type local_7319837; 
  
 -pair_type local_7321140; 
-+pair_type local_7319847; 
++pair_type local_7319840; 
  
 -pair_type local_7321143; 
-+pair_type local_7319850; 
++pair_type local_7319843; 
  
 -pair_type local_7321146; 
-+pair_type local_7319853; 
++pair_type local_7319846; 
  
 -pair_type local_7321149; 
-+pair_type local_7319856; 
++pair_type local_7319849; 
  
 -pair_type local_7321152; 
-+pair_type local_7319859; 
++pair_type local_7319852; 
  
 -pair_type local_7321155; 
-+pair_type local_7319862; 
++pair_type local_7319855; 
  
  
  
 -pair_type local_7321160; 
-+pair_type local_7319867; 
++pair_type local_7319860; 
  
 -pair_type local_7321163; 
-+pair_type local_7319870; 
++pair_type local_7319863; 
  
 -pair_type local_7321166; 
-+pair_type local_7319873; 
++pair_type local_7319866; 
  
 -pair_type local_7321169; 
-+pair_type local_7319876; 
++pair_type local_7319869; 
  
  
 -return_direct_with_clo1(data,  k_736041, (((closure)  k_736041)->fn),  set_pair_as_expr(&local_7321113, quote_call_95cc, set_pair_as_expr(&local_7321116, set_pair_as_expr(&local_7321119, quote_lambda, set_pair_as_expr(&local_7321122, set_pair_as_expr(&local_7321125, quote_k, NULL), set_pair_as_expr(&local_7321128, set_pair_as_expr(&local_7321131, quote_with_91exception_91handler, set_pair_as_expr(&local_7321134, set_pair_as_expr(&local_7321137, quote_lambda, set_pair_as_expr(&local_7321140, set_pair_as_expr(&local_7321143, quote_obj, NULL), set_pair_as_expr(&local_7321146, set_pair_as_expr(&local_7321149, quote_k, set_pair_as_expr(&local_7321152, set_pair_as_expr(&local_7321155, Cyc_cadr(data, exp_731118_733435), set_pair_as_expr(&local_7321160, quote_obj, NULL)), NULL)), NULL))), set_pair_as_expr(&local_7321163, set_pair_as_expr(&local_7321166, quote_lambda, set_pair_as_expr(&local_7321169, NULL, Cyc_cddr(data, exp_731118_733435))), NULL))), NULL))), NULL)));; 
-+return_direct_with_clo1(data,  k_735596, (((closure)  k_735596)->fn),  set_pair_as_expr(&local_7319820, quote_call_95cc, set_pair_as_expr(&local_7319823, set_pair_as_expr(&local_7319826, quote_lambda, set_pair_as_expr(&local_7319829, set_pair_as_expr(&local_7319832, quote_k, NULL), set_pair_as_expr(&local_7319835, set_pair_as_expr(&local_7319838, quote_with_91exception_91handler, set_pair_as_expr(&local_7319841, set_pair_as_expr(&local_7319844, quote_lambda, set_pair_as_expr(&local_7319847, set_pair_as_expr(&local_7319850, quote_obj, NULL), set_pair_as_expr(&local_7319853, set_pair_as_expr(&local_7319856, quote_k, set_pair_as_expr(&local_7319859, set_pair_as_expr(&local_7319862, Cyc_cadr(data, exp_731119_733095), set_pair_as_expr(&local_7319867, quote_obj, NULL)), NULL)), NULL))), set_pair_as_expr(&local_7319870, set_pair_as_expr(&local_7319873, quote_lambda, set_pair_as_expr(&local_7319876, NULL, Cyc_cddr(data, exp_731119_733095))), NULL))), NULL))), NULL)));; 
++return_direct_with_clo1(data,  k_735589, (((closure)  k_735589)->fn),  set_pair_as_expr(&local_7319813, quote_call_95cc, set_pair_as_expr(&local_7319816, set_pair_as_expr(&local_7319819, quote_lambda, set_pair_as_expr(&local_7319822, set_pair_as_expr(&local_7319825, quote_k, NULL), set_pair_as_expr(&local_7319828, set_pair_as_expr(&local_7319831, quote_with_91exception_91handler, set_pair_as_expr(&local_7319834, set_pair_as_expr(&local_7319837, quote_lambda, set_pair_as_expr(&local_7319840, set_pair_as_expr(&local_7319843, quote_obj, NULL), set_pair_as_expr(&local_7319846, set_pair_as_expr(&local_7319849, quote_k, set_pair_as_expr(&local_7319852, set_pair_as_expr(&local_7319855, Cyc_cadr(data, exp_731118_733088), set_pair_as_expr(&local_7319860, quote_obj, NULL)), NULL)), NULL))), set_pair_as_expr(&local_7319863, set_pair_as_expr(&local_7319866, quote_lambda, set_pair_as_expr(&local_7319869, NULL, Cyc_cddr(data, exp_731118_733088))), NULL))), NULL))), NULL)));; 
  }
  
 -static void __lambda_715(void *data, object _, int argc, object *args) /* closure _,object k_736032, object obj_731117_733434 */
-+static void __lambda_715(void *data, object _, int argc, object *args) /* closure _,object k_735587, object obj_731118_733094 */
++static void __lambda_715(void *data, object _, int argc, object *args) /* closure _,object k_735580, object obj_731117_733087 */
   {
 -object k_736032 = args[0]; object obj_731117_733434 = args[1];
 -  object r_736036;
--  Cyc_st_add(data, "scheme/base.sld:raise-continuable");
-+object k_735587 = args[0]; object obj_731118_733094 = args[1];
-+  object r_735591;
-+  Cyc_st_add(data, "base.sld:raise-continuable");
++object k_735580 = args[0]; object obj_731117_733087 = args[1];
++  object r_735584;
+   Cyc_st_add(data, "scheme/base.sld:raise-continuable");
    
 -if( (boolean_f != Cyc_is_pair(obj_731117_733434)) ){ 
 -  r_736036 = obj_731117_733434;
-+if( (boolean_f != Cyc_is_pair(obj_731118_733094)) ){ 
-+  r_735591 = obj_731118_733094;
++if( (boolean_f != Cyc_is_pair(obj_731117_733087)) ){ 
++  r_735584 = obj_731117_733087;
  } else { 
 -  object local_7321102 = alloca(sizeof(pair_type)); 
 -  r_736036 = set_cell_as_expr(local_7321102, obj_731117_733434);}
-+  object local_7319809 = alloca(sizeof(pair_type)); 
-+  r_735591 = set_cell_as_expr(local_7319809, obj_731118_733094);}
++  object local_7319802 = alloca(sizeof(pair_type)); 
++  r_735584 = set_cell_as_expr(local_7319802, obj_731117_733087);}
  ;
  
  
 -pair_type local_7321108; 
 -return_closcall2(data,  Cyc_current_exception_handler(data),  k_736032, set_pair_as_expr(&local_7321108, quote_continuable, r_736036));; 
-+pair_type local_7319815; 
-+return_closcall2(data,  Cyc_current_exception_handler(data),  k_735587, set_pair_as_expr(&local_7319815, quote_continuable, r_735591));; 
++pair_type local_7319808; 
++return_closcall2(data,  Cyc_current_exception_handler(data),  k_735580, set_pair_as_expr(&local_7319808, quote_continuable, r_735584));; 
  }
  
 -static void __lambda_714(void *data, object _, int argc, object *args) /* closure _,object k_736023, object obj_731116_733433 */
-+static void __lambda_714(void *data, object _, int argc, object *args) /* closure _,object k_735578, object obj_731117_733093 */
++static void __lambda_714(void *data, object _, int argc, object *args) /* closure _,object k_735571, object obj_731116_733086 */
   {
 -object k_736023 = args[0]; object obj_731116_733433 = args[1];
 -  object r_736027;
--  Cyc_st_add(data, "scheme/base.sld:raise");
-+object k_735578 = args[0]; object obj_731117_733093 = args[1];
-+  object r_735582;
-+  Cyc_st_add(data, "base.sld:raise");
++object k_735571 = args[0]; object obj_731116_733086 = args[1];
++  object r_735575;
+   Cyc_st_add(data, "scheme/base.sld:raise");
    
 -if( (boolean_f != Cyc_is_pair(obj_731116_733433)) ){ 
 -  r_736027 = obj_731116_733433;
-+if( (boolean_f != Cyc_is_pair(obj_731117_733093)) ){ 
-+  r_735582 = obj_731117_733093;
++if( (boolean_f != Cyc_is_pair(obj_731116_733086)) ){ 
++  r_735575 = obj_731116_733086;
  } else { 
 -  object local_7321087 = alloca(sizeof(pair_type)); 
 -  r_736027 = set_cell_as_expr(local_7321087, obj_731116_733433);}
-+  object local_7319794 = alloca(sizeof(pair_type)); 
-+  r_735582 = set_cell_as_expr(local_7319794, obj_731117_733093);}
++  object local_7319787 = alloca(sizeof(pair_type)); 
++  r_735575 = set_cell_as_expr(local_7319787, obj_731116_733086);}
  ;
  
  
 -pair_type local_7321093; 
 -return_closcall2(data,  Cyc_current_exception_handler(data),  k_736023, set_pair_as_expr(&local_7321093, quote_raised, r_736027));; 
-+pair_type local_7319800; 
-+return_closcall2(data,  Cyc_current_exception_handler(data),  k_735578, set_pair_as_expr(&local_7319800, quote_raised, r_735582));; 
++pair_type local_7319793; 
++return_closcall2(data,  Cyc_current_exception_handler(data),  k_735571, set_pair_as_expr(&local_7319793, quote_raised, r_735575));; 
  }
  
 -static void __lambda_713(void *data, object _, int argc, object *args) /* closure _,object k_736019, object msg_731114_733431, object args_731115_733432_raw, ... */
-+static void __lambda_713(void *data, object _, int argc, object *args) /* closure _,object k_735574, object msg_731115_733091, object args_731116_733092_raw, ... */
++static void __lambda_713(void *data, object _, int argc, object *args) /* closure _,object k_735567, object msg_731114_733084, object args_731115_733085_raw, ... */
   {
 -object k_736019 = args[0]; object msg_731114_733431 = args[1];
 -load_varargs(args_731115_733432, args, 2, argc - 2);
--  Cyc_st_add(data, "scheme/base.sld:error");
-+object k_735574 = args[0]; object msg_731115_733091 = args[1];
-+load_varargs(args_731116_733092, args, 2, argc - 2);
-+  Cyc_st_add(data, "base.sld:error");
++object k_735567 = args[0]; object msg_731114_733084 = args[1];
++load_varargs(args_731115_733085, args, 2, argc - 2);
+   Cyc_st_add(data, "scheme/base.sld:error");
  
 -pair_type local_7321078; 
 -return_direct_with_clo2(data,  __glo_raise_scheme_base, (((closure)  __glo_raise_scheme_base)->fn),  k_736019, set_pair_as_expr(&local_7321078, msg_731114_733431, args_731115_733432));; 
-+pair_type local_7319785; 
-+return_direct_with_clo2(data,  __glo_raise_scheme_base, (((closure)  __glo_raise_scheme_base)->fn),  k_735574, set_pair_as_expr(&local_7319785, msg_731115_733091, args_731116_733092));; 
++pair_type local_7319778; 
++return_direct_with_clo2(data,  __glo_raise_scheme_base, (((closure)  __glo_raise_scheme_base)->fn),  k_735567, set_pair_as_expr(&local_7319778, msg_731114_733084, args_731115_733085));; 
  }
  
 -static void __lambda_712(void *data, object _, int argc, object *args) /* closure _,object k_736010, object x_731112_733430 */
-+static void __lambda_712(void *data, object _, int argc, object *args) /* closure _,object k_735565, object x_731113_733090 */
++static void __lambda_712(void *data, object _, int argc, object *args) /* closure _,object k_735558, object x_731112_733083 */
   {
 -object k_736010 = args[0]; object x_731112_733430 = args[1];
--  Cyc_st_add(data, "scheme/base.sld:error-object?");
-+object k_735565 = args[0]; object x_731113_733090 = args[1];
-+  Cyc_st_add(data, "base.sld:error-object?");
++object k_735558 = args[0]; object x_731112_733083 = args[1];
+   Cyc_st_add(data, "scheme/base.sld:error-object?");
    
 -if( (boolean_f != Cyc_is_pair(x_731112_733430)) ){ 
-+if( (boolean_f != Cyc_is_pair(x_731113_733090)) ){ 
++if( (boolean_f != Cyc_is_pair(x_731112_733083)) ){ 
    
  
  
  
 -return_direct_with_clo1(data,  k_736010, (((closure)  k_736010)->fn),  Cyc_is_string(Cyc_car(data, x_731112_733430)));
-+return_direct_with_clo1(data,  k_735565, (((closure)  k_735565)->fn),  Cyc_is_string(Cyc_car(data, x_731113_733090)));
++return_direct_with_clo1(data,  k_735558, (((closure)  k_735558)->fn),  Cyc_is_string(Cyc_car(data, x_731112_733083)));
  } else { 
 -  return_direct_with_clo1(data,  k_736010, (((closure)  k_736010)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_735565, (((closure)  k_735565)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_735558, (((closure)  k_735558)->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_694(void *data, object _, int argc, object *args) /* closure _,object k_735974, object init_731085_733420, object o_731086_733421_raw, ... */
-+static void __lambda_694(void *data, object _, int argc, object *args) /* closure _,object k_735529, object init_731086_733080, object o_731087_733081_raw, ... */
++static void __lambda_694(void *data, object _, int argc, object *args) /* closure _,object k_735522, object init_731085_733073, object o_731086_733074_raw, ... */
   {
 -object k_735974 = args[0]; object init_731085_733420 = args[1];
 -load_varargs(o_731086_733421, args, 2, argc - 2);
--  Cyc_st_add(data, "scheme/base.sld:make-parameter");
-+object k_735529 = args[0]; object init_731086_733080 = args[1];
-+load_varargs(o_731087_733081, args, 2, argc - 2);
-+  Cyc_st_add(data, "base.sld:make-parameter");
++object k_735522 = args[0]; object init_731085_733073 = args[1];
++load_varargs(o_731086_733074, args, 2, argc - 2);
+   Cyc_st_add(data, "scheme/base.sld:make-parameter");
  
 -closureN_type c_7320937;
 -object e_7320948 [1];
@@ -36977,16 +37141,16 @@ Make let-values be the same as let*-values, to work around
 -c_7320937.num_elements = 1;
 -c_7320937.elements = (object *)e_7320948;
 -c_7320937.elements[0] = o_731086_733421;
-+closureN_type c_7319644;
-+object e_7319655 [1];
-+c_7319644.hdr.mark = gc_color_red;
-+ c_7319644.hdr.grayed = 0;
-+c_7319644.tag = closureN_tag;
-+ c_7319644.fn = (function_type)__lambda_695;
-+c_7319644.num_args = 0;
-+c_7319644.num_elements = 1;
-+c_7319644.elements = (object *)e_7319655;
-+c_7319644.elements[0] = o_731087_733081;
++closureN_type c_7319637;
++object e_7319648 [1];
++c_7319637.hdr.mark = gc_color_red;
++ c_7319637.hdr.grayed = 0;
++c_7319637.tag = closureN_tag;
++ c_7319637.fn = (function_type)__lambda_695;
++c_7319637.num_args = 0;
++c_7319637.num_elements = 1;
++c_7319637.elements = (object *)e_7319648;
++c_7319637.elements[0] = o_731086_733074;
  
  
 -closureN_type c_7320949;
@@ -37000,27 +37164,27 @@ Make let-values be the same as let*-values, to work around
 -c_7320949.elements = (object *)e_7321064;
 -c_7320949.elements[0] = init_731085_733420;
 -c_7320949.elements[1] = k_735974;
-+closureN_type c_7319656;
-+object e_7319771 [2];
-+c_7319656.hdr.mark = gc_color_red;
-+ c_7319656.hdr.grayed = 0;
-+c_7319656.tag = closureN_tag;
-+ c_7319656.fn = (function_type)__lambda_697;
-+c_7319656.num_args = 1;
-+c_7319656.num_elements = 2;
-+c_7319656.elements = (object *)e_7319771;
-+c_7319656.elements[0] = init_731086_733080;
-+c_7319656.elements[1] = k_735529;
++closureN_type c_7319649;
++object e_7319764 [2];
++c_7319649.hdr.mark = gc_color_red;
++ c_7319649.hdr.grayed = 0;
++c_7319649.tag = closureN_tag;
++ c_7319649.fn = (function_type)__lambda_697;
++c_7319649.num_args = 1;
++c_7319649.num_elements = 2;
++c_7319649.elements = (object *)e_7319764;
++c_7319649.elements[0] = init_731085_733073;
++c_7319649.elements[1] = k_735522;
  
 -return_direct_with_clo1(data,(closure)&c_7320937,__lambda_695,  &c_7320949);; 
-+return_direct_with_clo1(data,(closure)&c_7319644,__lambda_695,  &c_7319656);; 
++return_direct_with_clo1(data,(closure)&c_7319637,__lambda_695,  &c_7319649);; 
  }
  
 -static void __lambda_697(void *data, object self_7313623, int argc, object *args) /* object self_7313623, object converter_731089_733422 */
-+static void __lambda_697(void *data, object self_7312377, int argc, object *args) /* object self_7312377, object converter_731090_733082 */
++static void __lambda_697(void *data, object self_7312370, int argc, object *args) /* object self_7312370, object converter_731089_733075 */
   {
 - object converter_731089_733422 = args[0];
-+ object converter_731090_733082 = args[0];
++ object converter_731089_733075 = args[0];
    
 -closureN_type c_7320951;
 -object e_7321062 [2];
@@ -37033,27 +37197,27 @@ Make let-values be the same as let*-values, to work around
 -c_7320951.elements = (object *)e_7321062;
 -c_7320951.elements[0] = converter_731089_733422;
 -c_7320951.elements[1] = ((closureN)self_7313623)->elements[1];
-+closureN_type c_7319658;
-+object e_7319769 [2];
-+c_7319658.hdr.mark = gc_color_red;
-+ c_7319658.hdr.grayed = 0;
-+c_7319658.tag = closureN_tag;
-+ c_7319658.fn = (function_type)__lambda_698;
-+c_7319658.num_args = 1;
-+c_7319658.num_elements = 2;
-+c_7319658.elements = (object *)e_7319769;
-+c_7319658.elements[0] = converter_731090_733082;
-+c_7319658.elements[1] = ((closureN)self_7312377)->elements[1];
++closureN_type c_7319651;
++object e_7319762 [2];
++c_7319651.hdr.mark = gc_color_red;
++ c_7319651.hdr.grayed = 0;
++c_7319651.tag = closureN_tag;
++ c_7319651.fn = (function_type)__lambda_698;
++c_7319651.num_args = 1;
++c_7319651.num_elements = 2;
++c_7319651.elements = (object *)e_7319762;
++c_7319651.elements[0] = converter_731089_733075;
++c_7319651.elements[1] = ((closureN)self_7312370)->elements[1];
  
 -return_closcall2(data,  converter_731089_733422,  &c_7320951, ((closureN)self_7313623)->elements[0]);; 
-+return_closcall2(data,  converter_731090_733082,  &c_7319658, ((closureN)self_7312377)->elements[0]);; 
++return_closcall2(data,  converter_731089_733075,  &c_7319651, ((closureN)self_7312370)->elements[0]);; 
  }
  
 -static void __lambda_698(void *data, object self_7313624, int argc, object *args) /* object self_7313624, object value_731092_733423 */
-+static void __lambda_698(void *data, object self_7312378, int argc, object *args) /* object self_7312378, object value_731093_733083 */
++static void __lambda_698(void *data, object self_7312371, int argc, object *args) /* object self_7312371, object value_731092_733076 */
   {
 - object value_731092_733423 = args[0];
-+ object value_731093_733083 = args[0];
++ object value_731092_733076 = args[0];
    
 -closureN_type c_7320953;
 -object e_7321061 [3];
@@ -37067,28 +37231,28 @@ Make let-values be the same as let*-values, to work around
 -c_7320953.elements[0] = ((closureN)self_7313624)->elements[0];
 -c_7320953.elements[1] = ((closureN)self_7313624)->elements[1];
 -c_7320953.elements[2] = value_731092_733423;
-+closureN_type c_7319660;
-+object e_7319768 [3];
-+c_7319660.hdr.mark = gc_color_red;
-+ c_7319660.hdr.grayed = 0;
-+c_7319660.tag = closureN_tag;
-+ c_7319660.fn = (function_type)__lambda_699;
-+c_7319660.num_args = 1;
-+c_7319660.num_elements = 3;
-+c_7319660.elements = (object *)e_7319768;
-+c_7319660.elements[0] = ((closureN)self_7312378)->elements[0];
-+c_7319660.elements[1] = ((closureN)self_7312378)->elements[1];
-+c_7319660.elements[2] = value_731093_733083;
++closureN_type c_7319653;
++object e_7319761 [3];
++c_7319653.hdr.mark = gc_color_red;
++ c_7319653.hdr.grayed = 0;
++c_7319653.tag = closureN_tag;
++ c_7319653.fn = (function_type)__lambda_699;
++c_7319653.num_args = 1;
++c_7319653.num_elements = 3;
++c_7319653.elements = (object *)e_7319761;
++c_7319653.elements[0] = ((closureN)self_7312371)->elements[0];
++c_7319653.elements[1] = ((closureN)self_7312371)->elements[1];
++c_7319653.elements[2] = value_731092_733076;
  
 -return_direct_with_clo1(data,(closure)&c_7320953,__lambda_699,  boolean_f);; 
-+return_direct_with_clo1(data,(closure)&c_7319660,__lambda_699,  boolean_f);; 
++return_direct_with_clo1(data,(closure)&c_7319653,__lambda_699,  boolean_f);; 
  }
  
 -static void __lambda_699(void *data, object self_7313625, int argc, object *args) /* object self_7313625, object key_731095_733424 */
-+static void __lambda_699(void *data, object self_7312379, int argc, object *args) /* object self_7312379, object key_731096_733084 */
++static void __lambda_699(void *data, object self_7312372, int argc, object *args) /* object self_7312372, object key_731095_733077 */
   {
 - object key_731095_733424 = args[0];
-+ object key_731096_733084 = args[0];
++ object key_731095_733077 = args[0];
    
 -closureN_type c_7320955;
 -object e_7321057 [3];
@@ -37102,31 +37266,31 @@ Make let-values be the same as let*-values, to work around
 -c_7320955.elements[0] = ((closureN)self_7313625)->elements[0];
 -c_7320955.elements[1] = ((closureN)self_7313625)->elements[1];
 -c_7320955.elements[2] = ((closureN)self_7313625)->elements[2];
-+closureN_type c_7319662;
-+object e_7319764 [3];
-+c_7319662.hdr.mark = gc_color_red;
-+ c_7319662.hdr.grayed = 0;
-+c_7319662.tag = closureN_tag;
-+ c_7319662.fn = (function_type)__lambda_1357;
-+c_7319662.num_args = 1;
-+c_7319662.num_elements = 3;
-+c_7319662.elements = (object *)e_7319764;
-+c_7319662.elements[0] = ((closureN)self_7312379)->elements[0];
-+c_7319662.elements[1] = ((closureN)self_7312379)->elements[1];
-+c_7319662.elements[2] = ((closureN)self_7312379)->elements[2];
++closureN_type c_7319655;
++object e_7319757 [3];
++c_7319655.hdr.mark = gc_color_red;
++ c_7319655.hdr.grayed = 0;
++c_7319655.tag = closureN_tag;
++ c_7319655.fn = (function_type)__lambda_1357;
++c_7319655.num_args = 1;
++c_7319655.num_elements = 3;
++c_7319655.elements = (object *)e_7319757;
++c_7319655.elements[0] = ((closureN)self_7312372)->elements[0];
++c_7319655.elements[1] = ((closureN)self_7312372)->elements[1];
++c_7319655.elements[2] = ((closureN)self_7312372)->elements[2];
  
  
 -pair_type local_7321060; 
 -return_direct_with_clo1(data,(closure)&c_7320955,__lambda_1404,  set_cell_as_expr(&local_7321060, key_731095_733424));; 
-+pair_type local_7319767; 
-+return_direct_with_clo1(data,(closure)&c_7319662,__lambda_1357,  set_cell_as_expr(&local_7319767, key_731096_733084));; 
++pair_type local_7319760; 
++return_direct_with_clo1(data,(closure)&c_7319655,__lambda_1357,  set_cell_as_expr(&local_7319760, key_731095_733077));; 
  }
  
 -static void __lambda_1404(void *data, object self_7313626, int argc, object *args) /* object self_7313626, object key_731095_733424 */
-+static void __lambda_1357(void *data, object self_7312380, int argc, object *args) /* object self_7312380, object key_731096_733084 */
++static void __lambda_1357(void *data, object self_7312373, int argc, object *args) /* object self_7312373, object key_731095_733077 */
   {
 - object key_731095_733424 = args[0];
-+ object key_731096_733084 = args[0];
++ object key_731095_733077 = args[0];
    
 -closureN_type c_7320957;
 -object e_7321054 [4];
@@ -37141,28 +37305,28 @@ Make let-values be the same as let*-values, to work around
 -c_7320957.elements[1] = ((closureN)self_7313626)->elements[1];
 -c_7320957.elements[2] = key_731095_733424;
 -c_7320957.elements[3] = ((closureN)self_7313626)->elements[2];
-+closureN_type c_7319664;
-+object e_7319761 [4];
-+c_7319664.hdr.mark = gc_color_red;
-+ c_7319664.hdr.grayed = 0;
-+c_7319664.tag = closureN_tag;
-+ c_7319664.fn = (function_type)__lambda_700;
-+c_7319664.num_args = 1;
-+c_7319664.num_elements = 4;
-+c_7319664.elements = (object *)e_7319761;
-+c_7319664.elements[0] = ((closureN)self_7312380)->elements[0];
-+c_7319664.elements[1] = ((closureN)self_7312380)->elements[1];
-+c_7319664.elements[2] = key_731096_733084;
-+c_7319664.elements[3] = ((closureN)self_7312380)->elements[2];
++closureN_type c_7319657;
++object e_7319754 [4];
++c_7319657.hdr.mark = gc_color_red;
++ c_7319657.hdr.grayed = 0;
++c_7319657.tag = closureN_tag;
++ c_7319657.fn = (function_type)__lambda_700;
++c_7319657.num_args = 1;
++c_7319657.num_elements = 4;
++c_7319657.elements = (object *)e_7319754;
++c_7319657.elements[0] = ((closureN)self_7312373)->elements[0];
++c_7319657.elements[1] = ((closureN)self_7312373)->elements[1];
++c_7319657.elements[2] = key_731095_733077;
++c_7319657.elements[3] = ((closureN)self_7312373)->elements[2];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7320957,__lambda_700,  Cyc_set_cell(data, key_731095_733424, __glo__85parameter_91id_85_scheme_base));; 
-+return_direct_with_clo1(data,(closure)&c_7319664,__lambda_700,  Cyc_set_cell(data, key_731096_733084, __glo__85parameter_91id_85_scheme_base));; 
++return_direct_with_clo1(data,(closure)&c_7319657,__lambda_700,  Cyc_set_cell(data, key_731095_733077, __glo__85parameter_91id_85_scheme_base));; 
  }
  
 -static void __lambda_700(void *data, object self_7313627, int argc, object *args) /* object self_7313627, object r_735977 */
-+static void __lambda_700(void *data, object self_7312381, int argc, object *args) /* object self_7312381, object r_735532 */
++static void __lambda_700(void *data, object self_7312374, int argc, object *args) /* object self_7312374, object r_735525 */
   {
  
    
@@ -37179,32 +37343,32 @@ Make let-values be the same as let*-values, to work around
 -c_7320959.elements[1] = ((closureN)self_7313627)->elements[1];
 -c_7320959.elements[2] = ((closureN)self_7313627)->elements[2];
 -c_7320959.elements[3] = ((closureN)self_7313627)->elements[3];
-+closureN_type c_7319666;
-+object e_7319757 [4];
-+c_7319666.hdr.mark = gc_color_red;
-+ c_7319666.hdr.grayed = 0;
-+c_7319666.tag = closureN_tag;
-+ c_7319666.fn = (function_type)__lambda_701;
-+c_7319666.num_args = 1;
-+c_7319666.num_elements = 4;
-+c_7319666.elements = (object *)e_7319757;
-+c_7319666.elements[0] = ((closureN)self_7312381)->elements[0];
-+c_7319666.elements[1] = ((closureN)self_7312381)->elements[1];
-+c_7319666.elements[2] = ((closureN)self_7312381)->elements[2];
-+c_7319666.elements[3] = ((closureN)self_7312381)->elements[3];
++closureN_type c_7319659;
++object e_7319750 [4];
++c_7319659.hdr.mark = gc_color_red;
++ c_7319659.hdr.grayed = 0;
++c_7319659.tag = closureN_tag;
++ c_7319659.fn = (function_type)__lambda_701;
++c_7319659.num_args = 1;
++c_7319659.num_elements = 4;
++c_7319659.elements = (object *)e_7319750;
++c_7319659.elements[0] = ((closureN)self_7312374)->elements[0];
++c_7319659.elements[1] = ((closureN)self_7312374)->elements[1];
++c_7319659.elements[2] = ((closureN)self_7312374)->elements[2];
++c_7319659.elements[3] = ((closureN)self_7312374)->elements[3];
  
  
 -complex_num_type local_7321053; 
 -return_direct_with_clo1(data,(closure)&c_7320959,__lambda_701,  Cyc_fast_sum(data,&local_7321053, __glo__85parameter_91id_85_scheme_base, obj_int2obj(1)));; 
-+complex_num_type local_7319760; 
-+return_direct_with_clo1(data,(closure)&c_7319666,__lambda_701,  Cyc_fast_sum(data,&local_7319760, __glo__85parameter_91id_85_scheme_base, obj_int2obj(1)));; 
++complex_num_type local_7319753; 
++return_direct_with_clo1(data,(closure)&c_7319659,__lambda_701,  Cyc_fast_sum(data,&local_7319753, __glo__85parameter_91id_85_scheme_base, obj_int2obj(1)));; 
  }
  
 -static void __lambda_701(void *data, object self_7313628, int argc, object *args) /* object self_7313628, object r_735998 */
-+static void __lambda_701(void *data, object self_7312382, int argc, object *args) /* object self_7312382, object r_735553 */
++static void __lambda_701(void *data, object self_7312375, int argc, object *args) /* object self_7312375, object r_735546 */
   {
 - object r_735998 = args[0];
-+ object r_735553 = args[0];
++ object r_735546 = args[0];
    
 -closureN_type c_7320961;
 -object e_7321046 [4];
@@ -37219,29 +37383,29 @@ Make let-values be the same as let*-values, to work around
 -c_7320961.elements[1] = ((closureN)self_7313628)->elements[1];
 -c_7320961.elements[2] = ((closureN)self_7313628)->elements[2];
 -c_7320961.elements[3] = ((closureN)self_7313628)->elements[3];
-+closureN_type c_7319668;
-+object e_7319753 [4];
-+c_7319668.hdr.mark = gc_color_red;
-+ c_7319668.hdr.grayed = 0;
-+c_7319668.tag = closureN_tag;
-+ c_7319668.fn = (function_type)__lambda_702;
-+c_7319668.num_args = 1;
-+c_7319668.num_elements = 4;
-+c_7319668.elements = (object *)e_7319753;
-+c_7319668.elements[0] = ((closureN)self_7312382)->elements[0];
-+c_7319668.elements[1] = ((closureN)self_7312382)->elements[1];
-+c_7319668.elements[2] = ((closureN)self_7312382)->elements[2];
-+c_7319668.elements[3] = ((closureN)self_7312382)->elements[3];
++closureN_type c_7319661;
++object e_7319746 [4];
++c_7319661.hdr.mark = gc_color_red;
++ c_7319661.hdr.grayed = 0;
++c_7319661.tag = closureN_tag;
++ c_7319661.fn = (function_type)__lambda_702;
++c_7319661.num_args = 1;
++c_7319661.num_elements = 4;
++c_7319661.elements = (object *)e_7319746;
++c_7319661.elements[0] = ((closureN)self_7312375)->elements[0];
++c_7319661.elements[1] = ((closureN)self_7312375)->elements[1];
++c_7319661.elements[2] = ((closureN)self_7312375)->elements[2];
++c_7319661.elements[3] = ((closureN)self_7312375)->elements[3];
  
  
 -object c_7321049 = global_set_cps_id(data,(closure)&c_7320961,"__glo__85parameter_91id_85_scheme_base", __glo__85parameter_91id_85_scheme_base, r_735998);
 -return_closcall1(data,(closure)&c_7320961,  c_7321049);; 
-+object c_7319756 = global_set_cps_id(data,(closure)&c_7319668,"__glo__85parameter_91id_85_scheme_base", __glo__85parameter_91id_85_scheme_base, r_735553);
-+return_closcall1(data,(closure)&c_7319668,  c_7319756);; 
++object c_7319749 = global_set_cps_id(data,(closure)&c_7319661,"__glo__85parameter_91id_85_scheme_base", __glo__85parameter_91id_85_scheme_base, r_735546);
++return_closcall1(data,(closure)&c_7319661,  c_7319749);; 
  }
  
 -static void __lambda_702(void *data, object self_7313629, int argc, object *args) /* object self_7313629, object r_735978 */
-+static void __lambda_702(void *data, object self_7312383, int argc, object *args) /* object self_7312383, object r_735533 */
++static void __lambda_702(void *data, object self_7312376, int argc, object *args) /* object self_7312376, object r_735526 */
   {
  
    
@@ -37257,30 +37421,30 @@ Make let-values be the same as let*-values, to work around
 -c_7320963.elements[0] = ((closureN)self_7313629)->elements[0];
 -c_7320963.elements[1] = ((closureN)self_7313629)->elements[1];
 -c_7320963.elements[2] = ((closureN)self_7313629)->elements[2];
-+closureN_type c_7319670;
-+object e_7319745 [3];
-+c_7319670.hdr.mark = gc_color_red;
-+ c_7319670.hdr.grayed = 0;
-+c_7319670.tag = closureN_tag;
-+ c_7319670.fn = (function_type)__lambda_703;
-+c_7319670.num_args = 1;
-+c_7319670.num_elements = 3;
-+c_7319670.elements = (object *)e_7319745;
-+c_7319670.elements[0] = ((closureN)self_7312383)->elements[0];
-+c_7319670.elements[1] = ((closureN)self_7312383)->elements[1];
-+c_7319670.elements[2] = ((closureN)self_7312383)->elements[2];
++closureN_type c_7319663;
++object e_7319738 [3];
++c_7319663.hdr.mark = gc_color_red;
++ c_7319663.hdr.grayed = 0;
++c_7319663.tag = closureN_tag;
++ c_7319663.fn = (function_type)__lambda_703;
++c_7319663.num_args = 1;
++c_7319663.num_elements = 3;
++c_7319663.elements = (object *)e_7319738;
++c_7319663.elements[0] = ((closureN)self_7312376)->elements[0];
++c_7319663.elements[1] = ((closureN)self_7312376)->elements[1];
++c_7319663.elements[2] = ((closureN)self_7312376)->elements[2];
  
  
 -pair_type local_7321041; 
-+pair_type local_7319748; 
++pair_type local_7319741; 
  
  
 -return_direct_with_clo2(data,  __glo_set_91param_91obj_67_scheme_base, (((closure)  __glo_set_91param_91obj_67_scheme_base)->fn),  &c_7320963, set_pair_as_expr(&local_7321041, car(((closureN)self_7313629)->elements[2]), ((closureN)self_7313629)->elements[3]));; 
-+return_direct_with_clo2(data,  __glo_set_91param_91obj_67_scheme_base, (((closure)  __glo_set_91param_91obj_67_scheme_base)->fn),  &c_7319670, set_pair_as_expr(&local_7319748, car(((closureN)self_7312383)->elements[2]), ((closureN)self_7312383)->elements[3]));; 
++return_direct_with_clo2(data,  __glo_set_91param_91obj_67_scheme_base, (((closure)  __glo_set_91param_91obj_67_scheme_base)->fn),  &c_7319663, set_pair_as_expr(&local_7319741, car(((closureN)self_7312376)->elements[2]), ((closureN)self_7312376)->elements[3]));; 
  }
  
 -static void __lambda_703(void *data, object self_7313630, int argc, object *args) /* object self_7313630, object r_735979 */
-+static void __lambda_703(void *data, object self_7312384, int argc, object *args) /* object self_7312384, object r_735534 */
++static void __lambda_703(void *data, object self_7312377, int argc, object *args) /* object self_7312377, object r_735527 */
   {
  
    
@@ -37295,32 +37459,32 @@ Make let-values be the same as let*-values, to work around
 -c_7320966.elements = (object *)e_7321037;
 -c_7320966.elements[0] = ((closureN)self_7313630)->elements[0];
 -c_7320966.elements[1] = ((closureN)self_7313630)->elements[2];
-+closureN_type c_7319673;
-+object e_7319744 [2];
-+c_7319673.hdr.mark = gc_color_red;
-+ c_7319673.hdr.grayed = 0;
-+c_7319673.tag = closureN_tag;
-+ c_7319673.fn = (function_type)__lambda_704;
-+c_7319673.num_args = 0;
-+c_7319673.num_elements = 2;
-+c_7319673.elements = (object *)e_7319744;
-+c_7319673.elements[0] = ((closureN)self_7312384)->elements[0];
-+c_7319673.elements[1] = ((closureN)self_7312384)->elements[2];
++closureN_type c_7319666;
++object e_7319737 [2];
++c_7319666.hdr.mark = gc_color_red;
++ c_7319666.hdr.grayed = 0;
++c_7319666.tag = closureN_tag;
++ c_7319666.fn = (function_type)__lambda_704;
++c_7319666.num_args = 0;
++c_7319666.num_elements = 2;
++c_7319666.elements = (object *)e_7319737;
++c_7319666.elements[0] = ((closureN)self_7312377)->elements[0];
++c_7319666.elements[1] = ((closureN)self_7312377)->elements[2];
  
 -return_direct_with_clo1(data,  ((closureN)self_7313630)->elements[1], (((closure)  ((closureN)self_7313630)->elements[1])->fn),  &c_7320966);; 
-+return_direct_with_clo1(data,  ((closureN)self_7312384)->elements[1], (((closure)  ((closureN)self_7312384)->elements[1])->fn),  &c_7319673);; 
++return_direct_with_clo1(data,  ((closureN)self_7312377)->elements[1], (((closure)  ((closureN)self_7312377)->elements[1])->fn),  &c_7319666);; 
  }
  
 -static void __lambda_704(void *data, object self_7313631, int argc, object *args) /* object self_7313631, object k_735980, object args_731097_733425_raw, ... */
-+static void __lambda_704(void *data, object self_7312385, int argc, object *args) /* object self_7312385, object k_735535, object args_731098_733085_raw, ... */
++static void __lambda_704(void *data, object self_7312378, int argc, object *args) /* object self_7312378, object k_735528, object args_731097_733078_raw, ... */
   {
 - object k_735980 = args[0];
 -load_varargs(args_731097_733425, args, 1, argc - 1);
-+ object k_735535 = args[0];
-+load_varargs(args_731098_733085, args, 1, argc - 1);
++ object k_735528 = args[0];
++load_varargs(args_731097_733078, args, 1, argc - 1);
      
 -if( (boolean_f != Cyc_is_null(args_731097_733425)) ){ 
-+if( (boolean_f != Cyc_is_null(args_731098_733085)) ){ 
++if( (boolean_f != Cyc_is_null(args_731097_733078)) ){ 
    
 -closureN_type c_7320970;
 -object e_7320983 [2];
@@ -37333,25 +37497,25 @@ Make let-values be the same as let*-values, to work around
 -c_7320970.elements = (object *)e_7320983;
 -c_7320970.elements[0] = k_735980;
 -c_7320970.elements[1] = ((closureN)self_7313631)->elements[1];
-+closureN_type c_7319677;
-+object e_7319690 [2];
-+c_7319677.hdr.mark = gc_color_red;
-+ c_7319677.hdr.grayed = 0;
-+c_7319677.tag = closureN_tag;
-+ c_7319677.fn = (function_type)__lambda_705;
-+c_7319677.num_args = 1;
-+c_7319677.num_elements = 2;
-+c_7319677.elements = (object *)e_7319690;
-+c_7319677.elements[0] = k_735535;
-+c_7319677.elements[1] = ((closureN)self_7312385)->elements[1];
++closureN_type c_7319670;
++object e_7319683 [2];
++c_7319670.hdr.mark = gc_color_red;
++ c_7319670.hdr.grayed = 0;
++c_7319670.tag = closureN_tag;
++ c_7319670.fn = (function_type)__lambda_705;
++c_7319670.num_args = 1;
++c_7319670.num_elements = 2;
++c_7319670.elements = (object *)e_7319683;
++c_7319670.elements[0] = k_735528;
++c_7319670.elements[1] = ((closureN)self_7312378)->elements[1];
  
 -return_direct_with_clo1(data,  __glo_get_91param_91objs_scheme_base, (((closure)  __glo_get_91param_91objs_scheme_base)->fn),  &c_7320970);
-+return_direct_with_clo1(data,  __glo_get_91param_91objs_scheme_base, (((closure)  __glo_get_91param_91objs_scheme_base)->fn),  &c_7319677);
++return_direct_with_clo1(data,  __glo_get_91param_91objs_scheme_base, (((closure)  __glo_get_91param_91objs_scheme_base)->fn),  &c_7319670);
  } else { 
      
    
 -if( (boolean_f != Cyc_eq(Cyc_car(data, args_731097_733425), quote__121param_91set_67_125)) ){ 
-+if( (boolean_f != Cyc_eq(Cyc_car(data, args_731098_733085), quote__121param_91set_67_125)) ){ 
++if( (boolean_f != Cyc_eq(Cyc_car(data, args_731097_733078), quote__121param_91set_67_125)) ){ 
    
 -closureN_type c_7320989;
 -object e_7321006 [3];
@@ -37365,30 +37529,29 @@ Make let-values be the same as let*-values, to work around
 -c_7320989.elements[0] = args_731097_733425;
 -c_7320989.elements[1] = k_735980;
 -c_7320989.elements[2] = ((closureN)self_7313631)->elements[1];
-+closureN_type c_7319696;
-+object e_7319713 [3];
-+c_7319696.hdr.mark = gc_color_red;
-+ c_7319696.hdr.grayed = 0;
-+c_7319696.tag = closureN_tag;
-+ c_7319696.fn = (function_type)__lambda_707;
-+c_7319696.num_args = 1;
-+c_7319696.num_elements = 3;
-+c_7319696.elements = (object *)e_7319713;
-+c_7319696.elements[0] = args_731098_733085;
-+c_7319696.elements[1] = k_735535;
-+c_7319696.elements[2] = ((closureN)self_7312385)->elements[1];
- 
+-
 -return_direct_with_clo1(data,  __glo_get_91param_91objs_scheme_base, (((closure)  __glo_get_91param_91objs_scheme_base)->fn),  &c_7320989);
-+return_direct_with_clo1(data,  __glo_get_91param_91objs_scheme_base, (((closure)  __glo_get_91param_91objs_scheme_base)->fn),  &c_7319696);
++closureN_type c_7319689;
++object e_7319706 [3];
++c_7319689.hdr.mark = gc_color_red;
++ c_7319689.hdr.grayed = 0;
++c_7319689.tag = closureN_tag;
++ c_7319689.fn = (function_type)__lambda_707;
++c_7319689.num_args = 1;
++c_7319689.num_elements = 3;
++c_7319689.elements = (object *)e_7319706;
++c_7319689.elements[0] = args_731097_733078;
++c_7319689.elements[1] = k_735528;
++c_7319689.elements[2] = ((closureN)self_7312378)->elements[1];
++
++return_direct_with_clo1(data,  __glo_get_91param_91objs_scheme_base, (((closure)  __glo_get_91param_91objs_scheme_base)->fn),  &c_7319689);
  } else { 
      
    
 -if( (boolean_f != Cyc_eq(Cyc_car(data, args_731097_733425), quote__121param_91convert_125)) ){ 
 -  return_direct_with_clo1(data,  k_735980, (((closure)  k_735980)->fn),  ((closureN)self_7313631)->elements[0]);
-+if( (boolean_f != Cyc_eq(Cyc_car(data, args_731098_733085), quote__121param_91convert_125)) ){ 
-+  return_direct_with_clo1(data,  k_735535, (((closure)  k_735535)->fn),  ((closureN)self_7312385)->elements[0]);
- } else { 
-   
+-} else { 
+-  
 -closureN_type c_7321014;
 -object e_7321036 [4];
 -c_7321014.hdr.mark = gc_color_red;
@@ -37402,32 +37565,36 @@ Make let-values be the same as let*-values, to work around
 -c_7321014.elements[1] = ((closureN)self_7313631)->elements[0];
 -c_7321014.elements[2] = k_735980;
 -c_7321014.elements[3] = ((closureN)self_7313631)->elements[1];
-+closureN_type c_7319721;
-+object e_7319743 [4];
-+c_7319721.hdr.mark = gc_color_red;
-+ c_7319721.hdr.grayed = 0;
-+c_7319721.tag = closureN_tag;
-+ c_7319721.fn = (function_type)__lambda_709;
-+c_7319721.num_args = 1;
-+c_7319721.num_elements = 4;
-+c_7319721.elements = (object *)e_7319743;
-+c_7319721.elements[0] = args_731098_733085;
-+c_7319721.elements[1] = ((closureN)self_7312385)->elements[0];
-+c_7319721.elements[2] = k_735535;
-+c_7319721.elements[3] = ((closureN)self_7312385)->elements[1];
++if( (boolean_f != Cyc_eq(Cyc_car(data, args_731097_733078), quote__121param_91convert_125)) ){ 
++  return_direct_with_clo1(data,  k_735528, (((closure)  k_735528)->fn),  ((closureN)self_7312378)->elements[0]);
++} else { 
++  
++closureN_type c_7319714;
++object e_7319736 [4];
++c_7319714.hdr.mark = gc_color_red;
++ c_7319714.hdr.grayed = 0;
++c_7319714.tag = closureN_tag;
++ c_7319714.fn = (function_type)__lambda_709;
++c_7319714.num_args = 1;
++c_7319714.num_elements = 4;
++c_7319714.elements = (object *)e_7319736;
++c_7319714.elements[0] = args_731097_733078;
++c_7319714.elements[1] = ((closureN)self_7312378)->elements[0];
++c_7319714.elements[2] = k_735528;
++c_7319714.elements[3] = ((closureN)self_7312378)->elements[1];
  
 -return_direct_with_clo1(data,  __glo_get_91param_91objs_scheme_base, (((closure)  __glo_get_91param_91objs_scheme_base)->fn),  &c_7321014);}
-+return_direct_with_clo1(data,  __glo_get_91param_91objs_scheme_base, (((closure)  __glo_get_91param_91objs_scheme_base)->fn),  &c_7319721);}
++return_direct_with_clo1(data,  __glo_get_91param_91objs_scheme_base, (((closure)  __glo_get_91param_91objs_scheme_base)->fn),  &c_7319714);}
  ;}
  ;}
  ;; 
  }
  
 -static void __lambda_709(void *data, object self_7313636, int argc, object *args) /* object self_7313636, object r_735992 */
-+static void __lambda_709(void *data, object self_7312390, int argc, object *args) /* object self_7312390, object r_735547 */
++static void __lambda_709(void *data, object self_7312383, int argc, object *args) /* object self_7312383, object r_735540 */
   {
 - object r_735992 = args[0];
-+ object r_735547 = args[0];
++ object r_735540 = args[0];
    
 -closureN_type c_7321016;
 -object e_7321030 [3];
@@ -37441,32 +37608,32 @@ Make let-values be the same as let*-values, to work around
 -c_7321016.elements[0] = ((closureN)self_7313636)->elements[0];
 -c_7321016.elements[1] = ((closureN)self_7313636)->elements[1];
 -c_7321016.elements[2] = ((closureN)self_7313636)->elements[2];
-+closureN_type c_7319723;
-+object e_7319737 [3];
-+c_7319723.hdr.mark = gc_color_red;
-+ c_7319723.hdr.grayed = 0;
-+c_7319723.tag = closureN_tag;
-+ c_7319723.fn = (function_type)__lambda_710;
-+c_7319723.num_args = 1;
-+c_7319723.num_elements = 3;
-+c_7319723.elements = (object *)e_7319737;
-+c_7319723.elements[0] = ((closureN)self_7312390)->elements[0];
-+c_7319723.elements[1] = ((closureN)self_7312390)->elements[1];
-+c_7319723.elements[2] = ((closureN)self_7312390)->elements[2];
++closureN_type c_7319716;
++object e_7319730 [3];
++c_7319716.hdr.mark = gc_color_red;
++ c_7319716.hdr.grayed = 0;
++c_7319716.tag = closureN_tag;
++ c_7319716.fn = (function_type)__lambda_710;
++c_7319716.num_args = 1;
++c_7319716.num_elements = 3;
++c_7319716.elements = (object *)e_7319730;
++c_7319716.elements[0] = ((closureN)self_7312383)->elements[0];
++c_7319716.elements[1] = ((closureN)self_7312383)->elements[1];
++c_7319716.elements[2] = ((closureN)self_7312383)->elements[2];
  
  
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7321016,__lambda_710,  assoc(data, car(((closureN)self_7313636)->elements[3]), r_735992));; 
-+return_direct_with_clo1(data,(closure)&c_7319723,__lambda_710,  assoc(data, car(((closureN)self_7312390)->elements[3]), r_735547));; 
++return_direct_with_clo1(data,(closure)&c_7319716,__lambda_710,  assoc(data, car(((closureN)self_7312383)->elements[3]), r_735540));; 
  }
  
 -static void __lambda_710(void *data, object self_7313637, int argc, object *args) /* object self_7313637, object cell_731110_733428 */
-+static void __lambda_710(void *data, object self_7312391, int argc, object *args) /* object self_7312391, object cell_731111_733088 */
++static void __lambda_710(void *data, object self_7312384, int argc, object *args) /* object self_7312384, object cell_731110_733081 */
   {
 - object cell_731110_733428 = args[0];
-+ object cell_731111_733088 = args[0];
++ object cell_731110_733081 = args[0];
    
 -closureN_type c_7321019;
 -object e_7321026 [2];
@@ -37479,41 +37646,41 @@ Make let-values be the same as let*-values, to work around
 -c_7321019.elements = (object *)e_7321026;
 -c_7321019.elements[0] = cell_731110_733428;
 -c_7321019.elements[1] = ((closureN)self_7313637)->elements[2];
-+closureN_type c_7319726;
-+object e_7319733 [2];
-+c_7319726.hdr.mark = gc_color_red;
-+ c_7319726.hdr.grayed = 0;
-+c_7319726.tag = closureN_tag;
-+ c_7319726.fn = (function_type)__lambda_711;
-+c_7319726.num_args = 1;
-+c_7319726.num_elements = 2;
-+c_7319726.elements = (object *)e_7319733;
-+c_7319726.elements[0] = cell_731111_733088;
-+c_7319726.elements[1] = ((closureN)self_7312391)->elements[2];
++closureN_type c_7319719;
++object e_7319726 [2];
++c_7319719.hdr.mark = gc_color_red;
++ c_7319719.hdr.grayed = 0;
++c_7319719.tag = closureN_tag;
++ c_7319719.fn = (function_type)__lambda_711;
++c_7319719.num_args = 1;
++c_7319719.num_elements = 2;
++c_7319719.elements = (object *)e_7319726;
++c_7319719.elements[0] = cell_731110_733081;
++c_7319719.elements[1] = ((closureN)self_7312384)->elements[2];
  
  
  
 -return_closcall2(data,  ((closureN)self_7313637)->elements[1],  &c_7321019, Cyc_car(data, ((closureN)self_7313637)->elements[0]));; 
-+return_closcall2(data,  ((closureN)self_7312391)->elements[1],  &c_7319726, Cyc_car(data, ((closureN)self_7312391)->elements[0]));; 
++return_closcall2(data,  ((closureN)self_7312384)->elements[1],  &c_7319719, Cyc_car(data, ((closureN)self_7312384)->elements[0]));; 
  }
  
 -static void __lambda_711(void *data, object self_7313638, int argc, object *args) /* object self_7313638, object r_735990 */
-+static void __lambda_711(void *data, object self_7312392, int argc, object *args) /* object self_7312392, object r_735545 */
++static void __lambda_711(void *data, object self_7312385, int argc, object *args) /* object self_7312385, object r_735538 */
   {
 - object r_735990 = args[0];
-+ object r_735545 = args[0];
++ object r_735538 = args[0];
    
 -object c_7321024 = Cyc_set_cdr_cps(data,  ((closureN)self_7313638)->elements[1],((closureN)self_7313638)->elements[0], r_735990);
 -return_direct_with_clo1(data,  ((closureN)self_7313638)->elements[1], (((closure)  ((closureN)self_7313638)->elements[1])->fn),  c_7321024);; 
-+object c_7319731 = Cyc_set_cdr_cps(data,  ((closureN)self_7312392)->elements[1],((closureN)self_7312392)->elements[0], r_735545);
-+return_direct_with_clo1(data,  ((closureN)self_7312392)->elements[1], (((closure)  ((closureN)self_7312392)->elements[1])->fn),  c_7319731);; 
++object c_7319724 = Cyc_set_cdr_cps(data,  ((closureN)self_7312385)->elements[1],((closureN)self_7312385)->elements[0], r_735538);
++return_direct_with_clo1(data,  ((closureN)self_7312385)->elements[1], (((closure)  ((closureN)self_7312385)->elements[1])->fn),  c_7319724);; 
  }
  
 -static void __lambda_707(void *data, object self_7313634, int argc, object *args) /* object self_7313634, object r_735987 */
-+static void __lambda_707(void *data, object self_7312388, int argc, object *args) /* object self_7312388, object r_735542 */
++static void __lambda_707(void *data, object self_7312381, int argc, object *args) /* object self_7312381, object r_735535 */
   {
 - object r_735987 = args[0];
-+ object r_735542 = args[0];
++ object r_735535 = args[0];
    
 -closureN_type c_7320991;
 -object e_7321000 [2];
@@ -37526,45 +37693,45 @@ Make let-values be the same as let*-values, to work around
 -c_7320991.elements = (object *)e_7321000;
 -c_7320991.elements[0] = ((closureN)self_7313634)->elements[0];
 -c_7320991.elements[1] = ((closureN)self_7313634)->elements[1];
-+closureN_type c_7319698;
-+object e_7319707 [2];
-+c_7319698.hdr.mark = gc_color_red;
-+ c_7319698.hdr.grayed = 0;
-+c_7319698.tag = closureN_tag;
-+ c_7319698.fn = (function_type)__lambda_708;
-+c_7319698.num_args = 1;
-+c_7319698.num_elements = 2;
-+c_7319698.elements = (object *)e_7319707;
-+c_7319698.elements[0] = ((closureN)self_7312388)->elements[0];
-+c_7319698.elements[1] = ((closureN)self_7312388)->elements[1];
++closureN_type c_7319691;
++object e_7319700 [2];
++c_7319691.hdr.mark = gc_color_red;
++ c_7319691.hdr.grayed = 0;
++c_7319691.tag = closureN_tag;
++ c_7319691.fn = (function_type)__lambda_708;
++c_7319691.num_args = 1;
++c_7319691.num_elements = 2;
++c_7319691.elements = (object *)e_7319700;
++c_7319691.elements[0] = ((closureN)self_7312381)->elements[0];
++c_7319691.elements[1] = ((closureN)self_7312381)->elements[1];
  
  
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7320991,__lambda_708,  assoc(data, car(((closureN)self_7313634)->elements[2]), r_735987));; 
-+return_direct_with_clo1(data,(closure)&c_7319698,__lambda_708,  assoc(data, car(((closureN)self_7312388)->elements[2]), r_735542));; 
++return_direct_with_clo1(data,(closure)&c_7319691,__lambda_708,  assoc(data, car(((closureN)self_7312381)->elements[2]), r_735535));; 
  }
  
 -static void __lambda_708(void *data, object self_7313635, int argc, object *args) /* object self_7313635, object cell_731105_733427 */
-+static void __lambda_708(void *data, object self_7312389, int argc, object *args) /* object self_7312389, object cell_731106_733087 */
++static void __lambda_708(void *data, object self_7312382, int argc, object *args) /* object self_7312382, object cell_731105_733080 */
   {
 - object cell_731105_733427 = args[0];
-+ object cell_731106_733087 = args[0];
++ object cell_731105_733080 = args[0];
    
  
  
 -object c_7320996 = Cyc_set_cdr_cps(data,  ((closureN)self_7313635)->elements[1],cell_731105_733427, Cyc_cadr(data, ((closureN)self_7313635)->elements[0]));
 -return_direct_with_clo1(data,  ((closureN)self_7313635)->elements[1], (((closure)  ((closureN)self_7313635)->elements[1])->fn),  c_7320996);; 
-+object c_7319703 = Cyc_set_cdr_cps(data,  ((closureN)self_7312389)->elements[1],cell_731106_733087, Cyc_cadr(data, ((closureN)self_7312389)->elements[0]));
-+return_direct_with_clo1(data,  ((closureN)self_7312389)->elements[1], (((closure)  ((closureN)self_7312389)->elements[1])->fn),  c_7319703);; 
++object c_7319696 = Cyc_set_cdr_cps(data,  ((closureN)self_7312382)->elements[1],cell_731105_733080, Cyc_cadr(data, ((closureN)self_7312382)->elements[0]));
++return_direct_with_clo1(data,  ((closureN)self_7312382)->elements[1], (((closure)  ((closureN)self_7312382)->elements[1])->fn),  c_7319696);; 
  }
  
 -static void __lambda_705(void *data, object self_7313632, int argc, object *args) /* object self_7313632, object pobj_731101_733426 */
-+static void __lambda_705(void *data, object self_7312386, int argc, object *args) /* object self_7312386, object pobj_731102_733086 */
++static void __lambda_705(void *data, object self_7312379, int argc, object *args) /* object self_7312379, object pobj_731101_733079 */
   {
 - object pobj_731101_733426 = args[0];
-+ object pobj_731102_733086 = args[0];
++ object pobj_731101_733079 = args[0];
    
 -closureN_type c_7320972;
 -object e_7320977 [1];
@@ -37576,64 +37743,64 @@ Make let-values be the same as let*-values, to work around
 -c_7320972.num_elements = 1;
 -c_7320972.elements = (object *)e_7320977;
 -c_7320972.elements[0] = ((closureN)self_7313632)->elements[0];
-+closureN_type c_7319679;
-+object e_7319684 [1];
-+c_7319679.hdr.mark = gc_color_red;
-+ c_7319679.hdr.grayed = 0;
-+c_7319679.tag = closureN_tag;
-+ c_7319679.fn = (function_type)__lambda_706;
-+c_7319679.num_args = 1;
-+c_7319679.num_elements = 1;
-+c_7319679.elements = (object *)e_7319684;
-+c_7319679.elements[0] = ((closureN)self_7312386)->elements[0];
++closureN_type c_7319672;
++object e_7319677 [1];
++c_7319672.hdr.mark = gc_color_red;
++ c_7319672.hdr.grayed = 0;
++c_7319672.tag = closureN_tag;
++ c_7319672.fn = (function_type)__lambda_706;
++c_7319672.num_args = 1;
++c_7319672.num_elements = 1;
++c_7319672.elements = (object *)e_7319677;
++c_7319672.elements[0] = ((closureN)self_7312379)->elements[0];
  
  
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7320972,__lambda_706,  assoc(data, car(((closureN)self_7313632)->elements[1]), pobj_731101_733426));; 
-+return_direct_with_clo1(data,(closure)&c_7319679,__lambda_706,  assoc(data, car(((closureN)self_7312386)->elements[1]), pobj_731102_733086));; 
++return_direct_with_clo1(data,(closure)&c_7319672,__lambda_706,  assoc(data, car(((closureN)self_7312379)->elements[1]), pobj_731101_733079));; 
  }
  
 -static void __lambda_706(void *data, object self_7313633, int argc, object *args) /* object self_7313633, object r_735983 */
-+static void __lambda_706(void *data, object self_7312387, int argc, object *args) /* object self_7312387, object r_735538 */
++static void __lambda_706(void *data, object self_7312380, int argc, object *args) /* object self_7312380, object r_735531 */
   {
 - object r_735983 = args[0];
-+ object r_735538 = args[0];
++ object r_735531 = args[0];
    
  
 -return_direct_with_clo1(data,  ((closureN)self_7313633)->elements[0], (((closure)  ((closureN)self_7313633)->elements[0])->fn),  Cyc_cdr(data, r_735983));; 
-+return_direct_with_clo1(data,  ((closureN)self_7312387)->elements[0], (((closure)  ((closureN)self_7312387)->elements[0])->fn),  Cyc_cdr(data, r_735538));; 
++return_direct_with_clo1(data,  ((closureN)self_7312380)->elements[0], (((closure)  ((closureN)self_7312380)->elements[0])->fn),  Cyc_cdr(data, r_735531));; 
  }
  
 -static void __lambda_695(void *data, object self_7313639, int argc, object *args) /* object self_7313639, object k_735999 */
-+static void __lambda_695(void *data, object self_7312393, int argc, object *args) /* object self_7312393, object k_735554 */
++static void __lambda_695(void *data, object self_7312386, int argc, object *args) /* object self_7312386, object k_735547 */
   {
 - object k_735999 = args[0];
-+ object k_735554 = args[0];
++ object k_735547 = args[0];
      
 -if( (boolean_f != Cyc_is_pair(((closureN)self_7313639)->elements[0])) ){ 
-+if( (boolean_f != Cyc_is_pair(((closureN)self_7312393)->elements[0])) ){ 
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312386)->elements[0])) ){ 
    
  
 -return_direct_with_clo1(data,  k_735999,__lambda_697,  Cyc_car(data, ((closureN)self_7313639)->elements[0]));
-+return_direct_with_clo1(data,  k_735554,__lambda_697,  Cyc_car(data, ((closureN)self_7312393)->elements[0]));
++return_direct_with_clo1(data,  k_735547,__lambda_697,  Cyc_car(data, ((closureN)self_7312386)->elements[0]));
  } else { 
    
 -mclosure0(c_7320946, (function_type)__lambda_696);c_7320946.num_args = 1;
 -return_direct_with_clo1(data,  k_735999,__lambda_697,  &c_7320946);}
-+mclosure0(c_7319653, (function_type)__lambda_696);c_7319653.num_args = 1;
-+return_direct_with_clo1(data,  k_735554,__lambda_697,  &c_7319653);}
++mclosure0(c_7319646, (function_type)__lambda_696);c_7319646.num_args = 1;
++return_direct_with_clo1(data,  k_735547,__lambda_697,  &c_7319646);}
  ;; 
  }
  
 -static void __lambda_696(void *data, object self_7313640, int argc, object *args) /* object self_7313640, object k_736001, object x_731111_733429 */
-+static void __lambda_696(void *data, object self_7312394, int argc, object *args) /* object self_7312394, object k_735556, object x_731112_733089 */
++static void __lambda_696(void *data, object self_7312387, int argc, object *args) /* object self_7312387, object k_735549, object x_731111_733082 */
   {
 - object k_736001 = args[0]; object x_731111_733429 = args[1];
 -  return_direct_with_clo1(data,  k_736001, (((closure)  k_736001)->fn),  x_731111_733429);; 
-+ object k_735556 = args[0]; object x_731112_733089 = args[1];
-+  return_direct_with_clo1(data,  k_735556, (((closure)  k_735556)->fn),  x_731112_733089);; 
++ object k_735549 = args[0]; object x_731111_733082 = args[1];
++  return_direct_with_clo1(data,  k_735549, (((closure)  k_735549)->fn),  x_731111_733082);; 
  }
  
 -static void __lambda_1451(void *data, object _, int argc, object *args) {object k = args[0];object obj = args[1]; gc_thread_data *thd = (gc_thread_data *)data;
@@ -37646,12 +37813,11 @@ Make let-values be the same as let*-values, to work around
          //Cyc_st_add(data, "scheme/base.sld:get-param-objs");
          return_closcall1(data, k, thd->param_objs);  }
 -static void __lambda_623(void *data, object _, int argc, object *args) /* closure _,object k_735660, object expr_73761_73827_73978_733313, object rename_73762_73828_73979_733314, object compare_73763_73829_73980_733315 */
-+static void __lambda_623(void *data, object _, int argc, object *args) /* closure _,object k_735215, object expr_73761_73828_73979_732973, object rename_73762_73829_73980_732974, object compare_73763_73830_73981_732975 */
++static void __lambda_623(void *data, object _, int argc, object *args) /* closure _,object k_735208, object expr_73761_73827_73978_732966, object rename_73762_73828_73979_732967, object compare_73763_73829_73980_732968 */
   {
 -object k_735660 = args[0]; object expr_73761_73827_73978_733313 = args[1]; object rename_73762_73828_73979_733314 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:parameterize");
-+object k_735215 = args[0]; object expr_73761_73828_73979_732973 = args[1]; object rename_73762_73829_73980_732974 = args[2];
-+  Cyc_st_add(data, "base.sld:parameterize");
++object k_735208 = args[0]; object expr_73761_73827_73978_732966 = args[1]; object rename_73762_73828_73979_732967 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:parameterize");
  
 -closureN_type c_7319984;
 -object e_7320930 [3];
@@ -37665,31 +37831,16 @@ Make let-values be the same as let*-values, to work around
 -c_7319984.elements[0] = expr_73761_73827_73978_733313;
 -c_7319984.elements[1] = k_735660;
 -c_7319984.elements[2] = rename_73762_73828_73979_733314;
-+closureN_type c_7318691;
-+object e_7319637 [3];
-+c_7318691.hdr.mark = gc_color_red;
-+ c_7318691.hdr.grayed = 0;
-+c_7318691.tag = closureN_tag;
-+ c_7318691.fn = (function_type)__lambda_624;
-+c_7318691.num_args = 1;
-+c_7318691.num_elements = 3;
-+c_7318691.elements = (object *)e_7319637;
-+c_7318691.elements[0] = expr_73761_73828_73979_732973;
-+c_7318691.elements[1] = k_735215;
-+c_7318691.elements[2] = rename_73762_73829_73980_732974;
- 
- 
- 
+-
+-
+-
 -return_direct_with_clo1(data,(closure)&c_7319984,__lambda_624,  Cyc_cdr(data, expr_73761_73827_73978_733313));; 
-+return_direct_with_clo1(data,(closure)&c_7318691,__lambda_624,  Cyc_cdr(data, expr_73761_73828_73979_732973));; 
- }
- 
+-}
+-
 -static void __lambda_624(void *data, object self_7313551, int argc, object *args) /* object self_7313551, object v_931_73769_73904_731028_733363 */
-+static void __lambda_624(void *data, object self_7312305, int argc, object *args) /* object self_7312305, object v_931_73770_73905_731029_733023 */
-  {
+- {
 - object v_931_73769_73904_731028_733363 = args[0];
-+ object v_931_73770_73905_731029_733023 = args[0];
-   
+-  
 -closureN_type c_7319986;
 -object e_7320511 [2];
 -c_7319986.hdr.mark = gc_color_red;
@@ -37701,19 +37852,8 @@ Make let-values be the same as let*-values, to work around
 -c_7319986.elements = (object *)e_7320511;
 -c_7319986.elements[0] = ((closureN)self_7313551)->elements[2];
 -c_7319986.elements[1] = v_931_73769_73904_731028_733363;
-+closureN_type c_7318693;
-+object e_7319218 [2];
-+c_7318693.hdr.mark = gc_color_red;
-+ c_7318693.hdr.grayed = 0;
-+c_7318693.tag = closureN_tag;
-+ c_7318693.fn = (function_type)__lambda_625;
-+c_7318693.num_args = 0;
-+c_7318693.num_elements = 2;
-+c_7318693.elements = (object *)e_7319218;
-+c_7318693.elements[0] = ((closureN)self_7312305)->elements[2];
-+c_7318693.elements[1] = v_931_73770_73905_731029_733023;
- 
- 
+-
+-
 -closureN_type c_7320512;
 -object e_7320929 [3];
 -c_7320512.hdr.mark = gc_color_red;
@@ -37726,29 +37866,14 @@ Make let-values be the same as let*-values, to work around
 -c_7320512.elements[0] = ((closureN)self_7313551)->elements[0];
 -c_7320512.elements[1] = ((closureN)self_7313551)->elements[1];
 -c_7320512.elements[2] = ((closureN)self_7313551)->elements[2];
-+closureN_type c_7319219;
-+object e_7319636 [3];
-+c_7319219.hdr.mark = gc_color_red;
-+ c_7319219.hdr.grayed = 0;
-+c_7319219.tag = closureN_tag;
-+ c_7319219.fn = (function_type)__lambda_668;
-+c_7319219.num_args = 1;
-+c_7319219.num_elements = 3;
-+c_7319219.elements = (object *)e_7319636;
-+c_7319219.elements[0] = ((closureN)self_7312305)->elements[0];
-+c_7319219.elements[1] = ((closureN)self_7312305)->elements[1];
-+c_7319219.elements[2] = ((closureN)self_7312305)->elements[2];
- 
+-
 -return_direct_with_clo1(data,(closure)&c_7319986,__lambda_625,  &c_7320512);; 
-+return_direct_with_clo1(data,(closure)&c_7318693,__lambda_625,  &c_7319219);; 
- }
- 
+-}
+-
 -static void __lambda_668(void *data, object self_7313552, int argc, object *args) /* object self_7313552, object tmp_73831_73833_73981_733316 */
-+static void __lambda_668(void *data, object self_7312306, int argc, object *args) /* object self_7312306, object tmp_73832_73834_73982_732976 */
-  {
+- {
 - object tmp_73831_73833_73981_733316 = args[0];
-+ object tmp_73832_73834_73982_732976 = args[0];
-   
+-  
 -closureN_type c_7320514;
 -object e_7320922 [3];
 -c_7320514.hdr.mark = gc_color_red;
@@ -37761,20 +37886,8 @@ Make let-values be the same as let*-values, to work around
 -c_7320514.elements[0] = ((closureN)self_7313552)->elements[0];
 -c_7320514.elements[1] = ((closureN)self_7313552)->elements[2];
 -c_7320514.elements[2] = tmp_73831_73833_73981_733316;
-+closureN_type c_7319221;
-+object e_7319629 [3];
-+c_7319221.hdr.mark = gc_color_red;
-+ c_7319221.hdr.grayed = 0;
-+c_7319221.tag = closureN_tag;
-+ c_7319221.fn = (function_type)__lambda_669;
-+c_7319221.num_args = 0;
-+c_7319221.num_elements = 3;
-+c_7319221.elements = (object *)e_7319629;
-+c_7319221.elements[0] = ((closureN)self_7312306)->elements[0];
-+c_7319221.elements[1] = ((closureN)self_7312306)->elements[2];
-+c_7319221.elements[2] = tmp_73832_73834_73982_732976;
- 
- 
+-
+-
 -closureN_type c_7320923;
 -object e_7320928 [1];
 -c_7320923.hdr.mark = gc_color_red;
@@ -37785,41 +37898,110 @@ Make let-values be the same as let*-values, to work around
 -c_7320923.num_elements = 1;
 -c_7320923.elements = (object *)e_7320928;
 -c_7320923.elements[0] = ((closureN)self_7313552)->elements[1];
-+closureN_type c_7319630;
-+object e_7319635 [1];
-+c_7319630.hdr.mark = gc_color_red;
-+ c_7319630.hdr.grayed = 0;
-+c_7319630.tag = closureN_tag;
-+ c_7319630.fn = (function_type)__lambda_693;
-+c_7319630.num_args = 1;
-+c_7319630.num_elements = 1;
-+c_7319630.elements = (object *)e_7319635;
-+c_7319630.elements[0] = ((closureN)self_7312306)->elements[1];
++closureN_type c_7318684;
++object e_7319630 [3];
++c_7318684.hdr.mark = gc_color_red;
++ c_7318684.hdr.grayed = 0;
++c_7318684.tag = closureN_tag;
++ c_7318684.fn = (function_type)__lambda_624;
++c_7318684.num_args = 1;
++c_7318684.num_elements = 3;
++c_7318684.elements = (object *)e_7319630;
++c_7318684.elements[0] = expr_73761_73827_73978_732966;
++c_7318684.elements[1] = k_735208;
++c_7318684.elements[2] = rename_73762_73828_73979_732967;
++
++
++
++return_direct_with_clo1(data,(closure)&c_7318684,__lambda_624,  Cyc_cdr(data, expr_73761_73827_73978_732966));; 
++}
++
++static void __lambda_624(void *data, object self_7312298, int argc, object *args) /* object self_7312298, object v_931_73769_73904_731028_733016 */
++ {
++ object v_931_73769_73904_731028_733016 = args[0];
++  
++closureN_type c_7318686;
++object e_7319211 [2];
++c_7318686.hdr.mark = gc_color_red;
++ c_7318686.hdr.grayed = 0;
++c_7318686.tag = closureN_tag;
++ c_7318686.fn = (function_type)__lambda_625;
++c_7318686.num_args = 0;
++c_7318686.num_elements = 2;
++c_7318686.elements = (object *)e_7319211;
++c_7318686.elements[0] = ((closureN)self_7312298)->elements[2];
++c_7318686.elements[1] = v_931_73769_73904_731028_733016;
++
++
++closureN_type c_7319212;
++object e_7319629 [3];
++c_7319212.hdr.mark = gc_color_red;
++ c_7319212.hdr.grayed = 0;
++c_7319212.tag = closureN_tag;
++ c_7319212.fn = (function_type)__lambda_668;
++c_7319212.num_args = 1;
++c_7319212.num_elements = 3;
++c_7319212.elements = (object *)e_7319629;
++c_7319212.elements[0] = ((closureN)self_7312298)->elements[0];
++c_7319212.elements[1] = ((closureN)self_7312298)->elements[1];
++c_7319212.elements[2] = ((closureN)self_7312298)->elements[2];
++
++return_direct_with_clo1(data,(closure)&c_7318686,__lambda_625,  &c_7319212);; 
++}
++
++static void __lambda_668(void *data, object self_7312299, int argc, object *args) /* object self_7312299, object tmp_73831_73833_73981_732969 */
++ {
++ object tmp_73831_73833_73981_732969 = args[0];
++  
++closureN_type c_7319214;
++object e_7319622 [3];
++c_7319214.hdr.mark = gc_color_red;
++ c_7319214.hdr.grayed = 0;
++c_7319214.tag = closureN_tag;
++ c_7319214.fn = (function_type)__lambda_669;
++c_7319214.num_args = 0;
++c_7319214.num_elements = 3;
++c_7319214.elements = (object *)e_7319622;
++c_7319214.elements[0] = ((closureN)self_7312299)->elements[0];
++c_7319214.elements[1] = ((closureN)self_7312299)->elements[2];
++c_7319214.elements[2] = tmp_73831_73833_73981_732969;
++
++
++closureN_type c_7319623;
++object e_7319628 [1];
++c_7319623.hdr.mark = gc_color_red;
++ c_7319623.hdr.grayed = 0;
++c_7319623.tag = closureN_tag;
++ c_7319623.fn = (function_type)__lambda_693;
++c_7319623.num_args = 1;
++c_7319623.num_elements = 1;
++c_7319623.elements = (object *)e_7319628;
++c_7319623.elements[0] = ((closureN)self_7312299)->elements[1];
  
 -return_direct_with_clo1(data,(closure)&c_7320514,__lambda_669,  &c_7320923);; 
-+return_direct_with_clo1(data,(closure)&c_7319221,__lambda_669,  &c_7319630);; 
++return_direct_with_clo1(data,(closure)&c_7319214,__lambda_669,  &c_7319623);; 
  }
  
 -static void __lambda_693(void *data, object self_7313553, int argc, object *args) /* object self_7313553, object r_735661 */
-+static void __lambda_693(void *data, object self_7312307, int argc, object *args) /* object self_7312307, object r_735216 */
++static void __lambda_693(void *data, object self_7312300, int argc, object *args) /* object self_7312300, object r_735209 */
   {
 - object r_735661 = args[0];
-+ object r_735216 = args[0];
++ object r_735209 = args[0];
    
  
 -return_direct_with_clo1(data,  ((closureN)self_7313553)->elements[0], (((closure)  ((closureN)self_7313553)->elements[0])->fn),  Cyc_car(data, r_735661));; 
-+return_direct_with_clo1(data,  ((closureN)self_7312307)->elements[0], (((closure)  ((closureN)self_7312307)->elements[0])->fn),  Cyc_car(data, r_735216));; 
++return_direct_with_clo1(data,  ((closureN)self_7312300)->elements[0], (((closure)  ((closureN)self_7312300)->elements[0])->fn),  Cyc_car(data, r_735209));; 
  }
  
 -static void __lambda_669(void *data, object self_7313554, int argc, object *args) /* object self_7313554, object k_735663 */
-+static void __lambda_669(void *data, object self_7312308, int argc, object *args) /* object self_7312308, object k_735218 */
++static void __lambda_669(void *data, object self_7312301, int argc, object *args) /* object self_7312301, object k_735211 */
   {
 - object k_735663 = args[0];
 -  if( (boolean_f != ((closureN)self_7313554)->elements[2]) ){ 
 -  return_direct_with_clo1(data,  k_735663, (((closure)  k_735663)->fn),  ((closureN)self_7313554)->elements[2]);
-+ object k_735218 = args[0];
-+  if( (boolean_f != ((closureN)self_7312308)->elements[2]) ){ 
-+  return_direct_with_clo1(data,  k_735218, (((closure)  k_735218)->fn),  ((closureN)self_7312308)->elements[2]);
++ object k_735211 = args[0];
++  if( (boolean_f != ((closureN)self_7312301)->elements[2]) ){ 
++  return_direct_with_clo1(data,  k_735211, (((closure)  k_735211)->fn),  ((closureN)self_7312301)->elements[2]);
  } else { 
    
 -closureN_type c_7320519;
@@ -37834,31 +38016,31 @@ Make let-values be the same as let*-values, to work around
 -c_7320519.elements[0] = ((closureN)self_7313554)->elements[0];
 -c_7320519.elements[1] = k_735663;
 -c_7320519.elements[2] = ((closureN)self_7313554)->elements[1];
-+closureN_type c_7319226;
-+object e_7319625 [3];
-+c_7319226.hdr.mark = gc_color_red;
-+ c_7319226.hdr.grayed = 0;
-+c_7319226.tag = closureN_tag;
-+ c_7319226.fn = (function_type)__lambda_670;
-+c_7319226.num_args = 1;
-+c_7319226.num_elements = 3;
-+c_7319226.elements = (object *)e_7319625;
-+c_7319226.elements[0] = ((closureN)self_7312308)->elements[0];
-+c_7319226.elements[1] = k_735218;
-+c_7319226.elements[2] = ((closureN)self_7312308)->elements[1];
++closureN_type c_7319219;
++object e_7319618 [3];
++c_7319219.hdr.mark = gc_color_red;
++ c_7319219.hdr.grayed = 0;
++c_7319219.tag = closureN_tag;
++ c_7319219.fn = (function_type)__lambda_670;
++c_7319219.num_args = 1;
++c_7319219.num_elements = 3;
++c_7319219.elements = (object *)e_7319618;
++c_7319219.elements[0] = ((closureN)self_7312301)->elements[0];
++c_7319219.elements[1] = k_735211;
++c_7319219.elements[2] = ((closureN)self_7312301)->elements[1];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7320519,__lambda_670,  Cyc_cdr(data, ((closureN)self_7313554)->elements[0]));}
-+return_direct_with_clo1(data,(closure)&c_7319226,__lambda_670,  Cyc_cdr(data, ((closureN)self_7312308)->elements[0]));}
++return_direct_with_clo1(data,(closure)&c_7319219,__lambda_670,  Cyc_cdr(data, ((closureN)self_7312301)->elements[0]));}
  ;; 
  }
  
 -static void __lambda_670(void *data, object self_7313555, int argc, object *args) /* object self_7313555, object v_9330_73798_73870_731006_733341 */
-+static void __lambda_670(void *data, object self_7312309, int argc, object *args) /* object self_7312309, object v_9330_73799_73871_731007_733001 */
++static void __lambda_670(void *data, object self_7312302, int argc, object *args) /* object self_7312302, object v_9330_73798_73870_731006_732994 */
   {
 - object v_9330_73798_73870_731006_733341 = args[0];
-+ object v_9330_73799_73871_731007_733001 = args[0];
++ object v_9330_73798_73870_731006_732994 = args[0];
    
 -closureN_type c_7320521;
 -object e_7320745 [2];
@@ -37871,17 +38053,17 @@ Make let-values be the same as let*-values, to work around
 -c_7320521.elements = (object *)e_7320745;
 -c_7320521.elements[0] = ((closureN)self_7313555)->elements[2];
 -c_7320521.elements[1] = v_9330_73798_73870_731006_733341;
-+closureN_type c_7319228;
-+object e_7319452 [2];
-+c_7319228.hdr.mark = gc_color_red;
-+ c_7319228.hdr.grayed = 0;
-+c_7319228.tag = closureN_tag;
-+ c_7319228.fn = (function_type)__lambda_671;
-+c_7319228.num_args = 0;
-+c_7319228.num_elements = 2;
-+c_7319228.elements = (object *)e_7319452;
-+c_7319228.elements[0] = ((closureN)self_7312309)->elements[2];
-+c_7319228.elements[1] = v_9330_73799_73871_731007_733001;
++closureN_type c_7319221;
++object e_7319445 [2];
++c_7319221.hdr.mark = gc_color_red;
++ c_7319221.hdr.grayed = 0;
++c_7319221.tag = closureN_tag;
++ c_7319221.fn = (function_type)__lambda_671;
++c_7319221.num_args = 0;
++c_7319221.num_elements = 2;
++c_7319221.elements = (object *)e_7319445;
++c_7319221.elements[0] = ((closureN)self_7312302)->elements[2];
++c_7319221.elements[1] = v_9330_73798_73870_731006_732994;
  
  
 -closureN_type c_7320746;
@@ -37896,32 +38078,32 @@ Make let-values be the same as let*-values, to work around
 -c_7320746.elements[0] = ((closureN)self_7313555)->elements[0];
 -c_7320746.elements[1] = ((closureN)self_7313555)->elements[1];
 -c_7320746.elements[2] = ((closureN)self_7313555)->elements[2];
-+closureN_type c_7319453;
-+object e_7319624 [3];
-+c_7319453.hdr.mark = gc_color_red;
-+ c_7319453.hdr.grayed = 0;
-+c_7319453.tag = closureN_tag;
-+ c_7319453.fn = (function_type)__lambda_676;
-+c_7319453.num_args = 1;
-+c_7319453.num_elements = 3;
-+c_7319453.elements = (object *)e_7319624;
-+c_7319453.elements[0] = ((closureN)self_7312309)->elements[0];
-+c_7319453.elements[1] = ((closureN)self_7312309)->elements[1];
-+c_7319453.elements[2] = ((closureN)self_7312309)->elements[2];
++closureN_type c_7319446;
++object e_7319617 [3];
++c_7319446.hdr.mark = gc_color_red;
++ c_7319446.hdr.grayed = 0;
++c_7319446.tag = closureN_tag;
++ c_7319446.fn = (function_type)__lambda_676;
++c_7319446.num_args = 1;
++c_7319446.num_elements = 3;
++c_7319446.elements = (object *)e_7319617;
++c_7319446.elements[0] = ((closureN)self_7312302)->elements[0];
++c_7319446.elements[1] = ((closureN)self_7312302)->elements[1];
++c_7319446.elements[2] = ((closureN)self_7312302)->elements[2];
  
 -return_direct_with_clo1(data,(closure)&c_7320521,__lambda_671,  &c_7320746);; 
-+return_direct_with_clo1(data,(closure)&c_7319228,__lambda_671,  &c_7319453);; 
++return_direct_with_clo1(data,(closure)&c_7319221,__lambda_671,  &c_7319446);; 
  }
  
 -static void __lambda_676(void *data, object self_7313556, int argc, object *args) /* object self_7313556, object tmp_73835_73837_73982_733317 */
-+static void __lambda_676(void *data, object self_7312310, int argc, object *args) /* object self_7312310, object tmp_73836_73838_73983_732977 */
++static void __lambda_676(void *data, object self_7312303, int argc, object *args) /* object self_7312303, object tmp_73835_73837_73982_732970 */
   {
 - object tmp_73835_73837_73982_733317 = args[0];
 -  if( (boolean_f != tmp_73835_73837_73982_733317) ){ 
 -  return_direct_with_clo1(data,  ((closureN)self_7313556)->elements[1], (((closure)  ((closureN)self_7313556)->elements[1])->fn),  tmp_73835_73837_73982_733317);
-+ object tmp_73836_73838_73983_732977 = args[0];
-+  if( (boolean_f != tmp_73836_73838_73983_732977) ){ 
-+  return_direct_with_clo1(data,  ((closureN)self_7312310)->elements[1], (((closure)  ((closureN)self_7312310)->elements[1])->fn),  tmp_73836_73838_73983_732977);
++ object tmp_73835_73837_73982_732970 = args[0];
++  if( (boolean_f != tmp_73835_73837_73982_732970) ){ 
++  return_direct_with_clo1(data,  ((closureN)self_7312303)->elements[1], (((closure)  ((closureN)self_7312303)->elements[1])->fn),  tmp_73835_73837_73982_732970);
  } else { 
    
 -closureN_type c_7320750;
@@ -37936,31 +38118,31 @@ Make let-values be the same as let*-values, to work around
 -c_7320750.elements[0] = ((closureN)self_7313556)->elements[0];
 -c_7320750.elements[1] = ((closureN)self_7313556)->elements[1];
 -c_7320750.elements[2] = ((closureN)self_7313556)->elements[2];
-+closureN_type c_7319457;
-+object e_7319620 [3];
-+c_7319457.hdr.mark = gc_color_red;
-+ c_7319457.hdr.grayed = 0;
-+c_7319457.tag = closureN_tag;
-+ c_7319457.fn = (function_type)__lambda_677;
-+c_7319457.num_args = 1;
-+c_7319457.num_elements = 3;
-+c_7319457.elements = (object *)e_7319620;
-+c_7319457.elements[0] = ((closureN)self_7312310)->elements[0];
-+c_7319457.elements[1] = ((closureN)self_7312310)->elements[1];
-+c_7319457.elements[2] = ((closureN)self_7312310)->elements[2];
++closureN_type c_7319450;
++object e_7319613 [3];
++c_7319450.hdr.mark = gc_color_red;
++ c_7319450.hdr.grayed = 0;
++c_7319450.tag = closureN_tag;
++ c_7319450.fn = (function_type)__lambda_677;
++c_7319450.num_args = 1;
++c_7319450.num_elements = 3;
++c_7319450.elements = (object *)e_7319613;
++c_7319450.elements[0] = ((closureN)self_7312303)->elements[0];
++c_7319450.elements[1] = ((closureN)self_7312303)->elements[1];
++c_7319450.elements[2] = ((closureN)self_7312303)->elements[2];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7320750,__lambda_677,  Cyc_cdr(data, ((closureN)self_7313556)->elements[0]));}
-+return_direct_with_clo1(data,(closure)&c_7319457,__lambda_677,  Cyc_cdr(data, ((closureN)self_7312310)->elements[0]));}
++return_direct_with_clo1(data,(closure)&c_7319450,__lambda_677,  Cyc_cdr(data, ((closureN)self_7312303)->elements[0]));}
  ;; 
  }
  
 -static void __lambda_677(void *data, object self_7313557, int argc, object *args) /* object self_7313557, object v_9347_73815_73842_73984_733319 */
-+static void __lambda_677(void *data, object self_7312311, int argc, object *args) /* object self_7312311, object v_9347_73816_73843_73985_732979 */
++static void __lambda_677(void *data, object self_7312304, int argc, object *args) /* object self_7312304, object v_9347_73815_73842_73984_732972 */
   {
 - object v_9347_73815_73842_73984_733319 = args[0];
-+ object v_9347_73816_73843_73985_732979 = args[0];
++ object v_9347_73815_73842_73984_732972 = args[0];
    
 -closureN_type c_7320752;
 -object e_7320898 [2];
@@ -37973,17 +38155,17 @@ Make let-values be the same as let*-values, to work around
 -c_7320752.elements = (object *)e_7320898;
 -c_7320752.elements[0] = ((closureN)self_7313557)->elements[2];
 -c_7320752.elements[1] = v_9347_73815_73842_73984_733319;
-+closureN_type c_7319459;
-+object e_7319605 [2];
-+c_7319459.hdr.mark = gc_color_red;
-+ c_7319459.hdr.grayed = 0;
-+c_7319459.tag = closureN_tag;
-+ c_7319459.fn = (function_type)__lambda_678;
-+c_7319459.num_args = 0;
-+c_7319459.num_elements = 2;
-+c_7319459.elements = (object *)e_7319605;
-+c_7319459.elements[0] = ((closureN)self_7312311)->elements[2];
-+c_7319459.elements[1] = v_9347_73816_73843_73985_732979;
++closureN_type c_7319452;
++object e_7319598 [2];
++c_7319452.hdr.mark = gc_color_red;
++ c_7319452.hdr.grayed = 0;
++c_7319452.tag = closureN_tag;
++ c_7319452.fn = (function_type)__lambda_678;
++c_7319452.num_args = 0;
++c_7319452.num_elements = 2;
++c_7319452.elements = (object *)e_7319598;
++c_7319452.elements[0] = ((closureN)self_7312304)->elements[2];
++c_7319452.elements[1] = v_9347_73815_73842_73984_732972;
  
  
 -closureN_type c_7320899;
@@ -37997,31 +38179,31 @@ Make let-values be the same as let*-values, to work around
 -c_7320899.elements = (object *)e_7320912;
 -c_7320899.elements[0] = ((closureN)self_7313557)->elements[0];
 -c_7320899.elements[1] = ((closureN)self_7313557)->elements[1];
-+closureN_type c_7319606;
-+object e_7319619 [2];
-+c_7319606.hdr.mark = gc_color_red;
-+ c_7319606.hdr.grayed = 0;
-+c_7319606.tag = closureN_tag;
-+ c_7319606.fn = (function_type)__lambda_691;
-+c_7319606.num_args = 1;
-+c_7319606.num_elements = 2;
-+c_7319606.elements = (object *)e_7319619;
-+c_7319606.elements[0] = ((closureN)self_7312311)->elements[0];
-+c_7319606.elements[1] = ((closureN)self_7312311)->elements[1];
++closureN_type c_7319599;
++object e_7319612 [2];
++c_7319599.hdr.mark = gc_color_red;
++ c_7319599.hdr.grayed = 0;
++c_7319599.tag = closureN_tag;
++ c_7319599.fn = (function_type)__lambda_691;
++c_7319599.num_args = 1;
++c_7319599.num_elements = 2;
++c_7319599.elements = (object *)e_7319612;
++c_7319599.elements[0] = ((closureN)self_7312304)->elements[0];
++c_7319599.elements[1] = ((closureN)self_7312304)->elements[1];
  
 -return_direct_with_clo1(data,(closure)&c_7320752,__lambda_678,  &c_7320899);; 
-+return_direct_with_clo1(data,(closure)&c_7319459,__lambda_678,  &c_7319606);; 
++return_direct_with_clo1(data,(closure)&c_7319452,__lambda_678,  &c_7319599);; 
  }
  
 -static void __lambda_691(void *data, object self_7313558, int argc, object *args) /* object self_7313558, object tmp_73839_73841_73983_733318 */
-+static void __lambda_691(void *data, object self_7312312, int argc, object *args) /* object self_7312312, object tmp_73840_73842_73984_732978 */
++static void __lambda_691(void *data, object self_7312305, int argc, object *args) /* object self_7312305, object tmp_73839_73841_73983_732971 */
   {
 - object tmp_73839_73841_73983_733318 = args[0];
 -  if( (boolean_f != tmp_73839_73841_73983_733318) ){ 
 -  return_direct_with_clo1(data,  ((closureN)self_7313558)->elements[1], (((closure)  ((closureN)self_7313558)->elements[1])->fn),  tmp_73839_73841_73983_733318);
-+ object tmp_73840_73842_73984_732978 = args[0];
-+  if( (boolean_f != tmp_73840_73842_73984_732978) ){ 
-+  return_direct_with_clo1(data,  ((closureN)self_7312312)->elements[1], (((closure)  ((closureN)self_7312312)->elements[1])->fn),  tmp_73840_73842_73984_732978);
++ object tmp_73839_73841_73983_732971 = args[0];
++  if( (boolean_f != tmp_73839_73841_73983_732971) ){ 
++  return_direct_with_clo1(data,  ((closureN)self_7312305)->elements[1], (((closure)  ((closureN)self_7312305)->elements[1])->fn),  tmp_73839_73841_73983_732971);
  } else { 
    
 -closureN_type c_7320903;
@@ -38034,45 +38216,45 @@ Make let-values be the same as let*-values, to work around
 -c_7320903.num_elements = 1;
 -c_7320903.elements = (object *)e_7320909;
 -c_7320903.elements[0] = ((closureN)self_7313558)->elements[1];
-+closureN_type c_7319610;
-+object e_7319616 [1];
-+c_7319610.hdr.mark = gc_color_red;
-+ c_7319610.hdr.grayed = 0;
-+c_7319610.tag = closureN_tag;
-+ c_7319610.fn = (function_type)__lambda_692;
-+c_7319610.num_args = 1;
-+c_7319610.num_elements = 1;
-+c_7319610.elements = (object *)e_7319616;
-+c_7319610.elements[0] = ((closureN)self_7312312)->elements[1];
++closureN_type c_7319603;
++object e_7319609 [1];
++c_7319603.hdr.mark = gc_color_red;
++ c_7319603.hdr.grayed = 0;
++c_7319603.tag = closureN_tag;
++ c_7319603.fn = (function_type)__lambda_692;
++c_7319603.num_args = 1;
++c_7319603.num_elements = 1;
++c_7319603.elements = (object *)e_7319609;
++c_7319603.elements[0] = ((closureN)self_7312305)->elements[1];
  
  
 -make_utf8_string_with_len(c_7320910, "no expansion for", 16, 16);
 -return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_7320903, &c_7320910, ((closureN)self_7313558)->elements[0]);}
-+make_utf8_string_with_len(c_7319617, "no expansion for", 16, 16);
-+return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_7319610, &c_7319617, ((closureN)self_7312312)->elements[0]);}
++make_utf8_string_with_len(c_7319610, "no expansion for", 16, 16);
++return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_7319603, &c_7319610, ((closureN)self_7312305)->elements[0]);}
  ;; 
  }
  
 -static void __lambda_692(void *data, object self_7313559, int argc, object *args) /* object self_7313559, object r_735666 */
-+static void __lambda_692(void *data, object self_7312313, int argc, object *args) /* object self_7312313, object r_735221 */
++static void __lambda_692(void *data, object self_7312306, int argc, object *args) /* object self_7312306, object r_735214 */
   {
 - object r_735666 = args[0];
-+ object r_735221 = args[0];
++ object r_735214 = args[0];
    
 -pair_type local_7320908; 
 -return_direct_with_clo1(data,  ((closureN)self_7313559)->elements[0], (((closure)  ((closureN)self_7313559)->elements[0])->fn),  set_pair_as_expr(&local_7320908, r_735666, boolean_f));; 
-+pair_type local_7319615; 
-+return_direct_with_clo1(data,  ((closureN)self_7312313)->elements[0], (((closure)  ((closureN)self_7312313)->elements[0])->fn),  set_pair_as_expr(&local_7319615, r_735221, boolean_f));; 
++pair_type local_7319608; 
++return_direct_with_clo1(data,  ((closureN)self_7312306)->elements[0], (((closure)  ((closureN)self_7312306)->elements[0])->fn),  set_pair_as_expr(&local_7319608, r_735214, boolean_f));; 
  }
  
 -static void __lambda_678(void *data, object self_7313560, int argc, object *args) /* object self_7313560, object k_735668 */
-+static void __lambda_678(void *data, object self_7312314, int argc, object *args) /* object self_7312314, object k_735223 */
++static void __lambda_678(void *data, object self_7312307, int argc, object *args) /* object self_7312307, object k_735216 */
   {
 - object k_735668 = args[0];
-+ object k_735223 = args[0];
++ object k_735216 = args[0];
      
 -if( (boolean_f != Cyc_is_pair(((closureN)self_7313560)->elements[1])) ){ 
-+if( (boolean_f != Cyc_is_pair(((closureN)self_7312314)->elements[1])) ){ 
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312307)->elements[1])) ){ 
    
 -closureN_type c_7320757;
 -object e_7320893 [3];
@@ -38086,34 +38268,34 @@ Make let-values be the same as let*-values, to work around
 -c_7320757.elements[0] = k_735668;
 -c_7320757.elements[1] = ((closureN)self_7313560)->elements[0];
 -c_7320757.elements[2] = ((closureN)self_7313560)->elements[1];
-+closureN_type c_7319464;
-+object e_7319600 [3];
-+c_7319464.hdr.mark = gc_color_red;
-+ c_7319464.hdr.grayed = 0;
-+c_7319464.tag = closureN_tag;
-+ c_7319464.fn = (function_type)__lambda_679;
-+c_7319464.num_args = 3;
-+c_7319464.num_elements = 3;
-+c_7319464.elements = (object *)e_7319600;
-+c_7319464.elements[0] = k_735223;
-+c_7319464.elements[1] = ((closureN)self_7312314)->elements[0];
-+c_7319464.elements[2] = ((closureN)self_7312314)->elements[1];
++closureN_type c_7319457;
++object e_7319593 [3];
++c_7319457.hdr.mark = gc_color_red;
++ c_7319457.hdr.grayed = 0;
++c_7319457.tag = closureN_tag;
++ c_7319457.fn = (function_type)__lambda_679;
++c_7319457.num_args = 3;
++c_7319457.num_elements = 3;
++c_7319457.elements = (object *)e_7319593;
++c_7319457.elements[0] = k_735216;
++c_7319457.elements[1] = ((closureN)self_7312307)->elements[0];
++c_7319457.elements[2] = ((closureN)self_7312307)->elements[1];
  
  
  
 -return_direct_with_clo3(data,(closure)&c_7320757,__lambda_679,  Cyc_car(data, ((closureN)self_7313560)->elements[1]), NULL, NULL);
-+return_direct_with_clo3(data,(closure)&c_7319464,__lambda_679,  Cyc_car(data, ((closureN)self_7312314)->elements[1]), NULL, NULL);
++return_direct_with_clo3(data,(closure)&c_7319457,__lambda_679,  Cyc_car(data, ((closureN)self_7312307)->elements[1]), NULL, NULL);
  } else { 
 -  return_direct_with_clo1(data,  k_735668, (((closure)  k_735668)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_735223, (((closure)  k_735223)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_735216, (((closure)  k_735216)->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_679(void *data, object self_7313561, int argc, object *args) /* object self_7313561, object w_9349_73817_73846_73986_733321, object param_91ls51_73819_73847_73987_733322, object value_91ls52_73820_73848_73988_733323 */
-+static void __lambda_679(void *data, object self_7312315, int argc, object *args) /* object self_7312315, object w_9349_73818_73847_73987_732981, object param_91ls51_73820_73848_73988_732982, object value_91ls52_73821_73849_73989_732983 */
++static void __lambda_679(void *data, object self_7312308, int argc, object *args) /* object self_7312308, object w_9349_73817_73846_73986_732974, object param_91ls51_73819_73847_73987_732975, object value_91ls52_73820_73848_73988_732976 */
   {
 - object w_9349_73817_73846_73986_733321 = args[0]; object param_91ls51_73819_73847_73987_733322 = args[1]; object value_91ls52_73820_73848_73988_733323 = args[2];
-+ object w_9349_73818_73847_73987_732981 = args[0]; object param_91ls51_73820_73848_73988_732982 = args[1]; object value_91ls52_73821_73849_73989_732983 = args[2];
++ object w_9349_73817_73846_73986_732974 = args[0]; object param_91ls51_73819_73847_73987_732975 = args[1]; object value_91ls52_73820_73848_73988_732976 = args[2];
    
 -closureN_type c_7320759;
 -object e_7320892 [6];
@@ -38130,31 +38312,31 @@ Make let-values be the same as let*-values, to work around
 -c_7320759.elements[3] = ((closureN)self_7313561)->elements[2];
 -c_7320759.elements[4] = value_91ls52_73820_73848_73988_733323;
 -c_7320759.elements[5] = w_9349_73817_73846_73986_733321;
-+closureN_type c_7319466;
-+object e_7319599 [6];
-+c_7319466.hdr.mark = gc_color_red;
-+ c_7319466.hdr.grayed = 0;
-+c_7319466.tag = closureN_tag;
-+ c_7319466.fn = (function_type)__lambda_680;
-+c_7319466.num_args = 1;
-+c_7319466.num_elements = 6;
-+c_7319466.elements = (object *)e_7319599;
-+c_7319466.elements[0] = ((closureN)self_7312315)->elements[0];
-+c_7319466.elements[1] = param_91ls51_73820_73848_73988_732982;
-+c_7319466.elements[2] = ((closureN)self_7312315)->elements[1];
-+c_7319466.elements[3] = ((closureN)self_7312315)->elements[2];
-+c_7319466.elements[4] = value_91ls52_73821_73849_73989_732983;
-+c_7319466.elements[5] = w_9349_73818_73847_73987_732981;
++closureN_type c_7319459;
++object e_7319592 [6];
++c_7319459.hdr.mark = gc_color_red;
++ c_7319459.hdr.grayed = 0;
++c_7319459.tag = closureN_tag;
++ c_7319459.fn = (function_type)__lambda_680;
++c_7319459.num_args = 1;
++c_7319459.num_elements = 6;
++c_7319459.elements = (object *)e_7319592;
++c_7319459.elements[0] = ((closureN)self_7312308)->elements[0];
++c_7319459.elements[1] = param_91ls51_73819_73847_73987_732975;
++c_7319459.elements[2] = ((closureN)self_7312308)->elements[1];
++c_7319459.elements[3] = ((closureN)self_7312308)->elements[2];
++c_7319459.elements[4] = value_91ls52_73820_73848_73988_732976;
++c_7319459.elements[5] = w_9349_73817_73846_73986_732974;
  
 -return_direct_with_clo1(data,(closure)&c_7320759,__lambda_680,  boolean_f);; 
-+return_direct_with_clo1(data,(closure)&c_7319466,__lambda_680,  boolean_f);; 
++return_direct_with_clo1(data,(closure)&c_7319459,__lambda_680,  boolean_f);; 
  }
  
 -static void __lambda_680(void *data, object self_7313562, int argc, object *args) /* object self_7313562, object lp_9350_73818_73849_73989_733324 */
-+static void __lambda_680(void *data, object self_7312316, int argc, object *args) /* object self_7312316, object lp_9350_73819_73850_73990_732984 */
++static void __lambda_680(void *data, object self_7312309, int argc, object *args) /* object self_7312309, object lp_9350_73818_73849_73989_732977 */
   {
 - object lp_9350_73818_73849_73989_733324 = args[0];
-+ object lp_9350_73819_73850_73990_732984 = args[0];
++ object lp_9350_73818_73849_73989_732977 = args[0];
    
 -closureN_type c_7320761;
 -object e_7320888 [6];
@@ -38171,34 +38353,34 @@ Make let-values be the same as let*-values, to work around
 -c_7320761.elements[3] = ((closureN)self_7313562)->elements[3];
 -c_7320761.elements[4] = ((closureN)self_7313562)->elements[4];
 -c_7320761.elements[5] = ((closureN)self_7313562)->elements[5];
-+closureN_type c_7319468;
-+object e_7319595 [6];
-+c_7319468.hdr.mark = gc_color_red;
-+ c_7319468.hdr.grayed = 0;
-+c_7319468.tag = closureN_tag;
-+ c_7319468.fn = (function_type)__lambda_1356;
-+c_7319468.num_args = 1;
-+c_7319468.num_elements = 6;
-+c_7319468.elements = (object *)e_7319595;
-+c_7319468.elements[0] = ((closureN)self_7312316)->elements[0];
-+c_7319468.elements[1] = ((closureN)self_7312316)->elements[1];
-+c_7319468.elements[2] = ((closureN)self_7312316)->elements[2];
-+c_7319468.elements[3] = ((closureN)self_7312316)->elements[3];
-+c_7319468.elements[4] = ((closureN)self_7312316)->elements[4];
-+c_7319468.elements[5] = ((closureN)self_7312316)->elements[5];
++closureN_type c_7319461;
++object e_7319588 [6];
++c_7319461.hdr.mark = gc_color_red;
++ c_7319461.hdr.grayed = 0;
++c_7319461.tag = closureN_tag;
++ c_7319461.fn = (function_type)__lambda_1356;
++c_7319461.num_args = 1;
++c_7319461.num_elements = 6;
++c_7319461.elements = (object *)e_7319588;
++c_7319461.elements[0] = ((closureN)self_7312309)->elements[0];
++c_7319461.elements[1] = ((closureN)self_7312309)->elements[1];
++c_7319461.elements[2] = ((closureN)self_7312309)->elements[2];
++c_7319461.elements[3] = ((closureN)self_7312309)->elements[3];
++c_7319461.elements[4] = ((closureN)self_7312309)->elements[4];
++c_7319461.elements[5] = ((closureN)self_7312309)->elements[5];
  
  
 -pair_type local_7320891; 
 -return_direct_with_clo1(data,(closure)&c_7320761,__lambda_1403,  set_cell_as_expr(&local_7320891, lp_9350_73818_73849_73989_733324));; 
-+pair_type local_7319598; 
-+return_direct_with_clo1(data,(closure)&c_7319468,__lambda_1356,  set_cell_as_expr(&local_7319598, lp_9350_73819_73850_73990_732984));; 
++pair_type local_7319591; 
++return_direct_with_clo1(data,(closure)&c_7319461,__lambda_1356,  set_cell_as_expr(&local_7319591, lp_9350_73818_73849_73989_732977));; 
  }
  
 -static void __lambda_1403(void *data, object self_7313563, int argc, object *args) /* object self_7313563, object lp_9350_73818_73849_73989_733324 */
-+static void __lambda_1356(void *data, object self_7312317, int argc, object *args) /* object self_7312317, object lp_9350_73819_73850_73990_732984 */
++static void __lambda_1356(void *data, object self_7312310, int argc, object *args) /* object self_7312310, object lp_9350_73818_73849_73989_732977 */
   {
 - object lp_9350_73818_73849_73989_733324 = args[0];
-+ object lp_9350_73819_73850_73990_732984 = args[0];
++ object lp_9350_73818_73849_73989_732977 = args[0];
    
 -closureN_type c_7320763;
 -object e_7320778 [5];
@@ -38214,20 +38396,20 @@ Make let-values be the same as let*-values, to work around
 -c_7320763.elements[2] = ((closureN)self_7313563)->elements[1];
 -c_7320763.elements[3] = ((closureN)self_7313563)->elements[4];
 -c_7320763.elements[4] = ((closureN)self_7313563)->elements[5];
-+closureN_type c_7319470;
-+object e_7319485 [5];
-+c_7319470.hdr.mark = gc_color_red;
-+ c_7319470.hdr.grayed = 0;
-+c_7319470.tag = closureN_tag;
-+ c_7319470.fn = (function_type)__lambda_681;
-+c_7319470.num_args = 1;
-+c_7319470.num_elements = 5;
-+c_7319470.elements = (object *)e_7319485;
-+c_7319470.elements[0] = ((closureN)self_7312317)->elements[0];
-+c_7319470.elements[1] = lp_9350_73819_73850_73990_732984;
-+c_7319470.elements[2] = ((closureN)self_7312317)->elements[1];
-+c_7319470.elements[3] = ((closureN)self_7312317)->elements[4];
-+c_7319470.elements[4] = ((closureN)self_7312317)->elements[5];
++closureN_type c_7319463;
++object e_7319478 [5];
++c_7319463.hdr.mark = gc_color_red;
++ c_7319463.hdr.grayed = 0;
++c_7319463.tag = closureN_tag;
++ c_7319463.fn = (function_type)__lambda_681;
++c_7319463.num_args = 1;
++c_7319463.num_elements = 5;
++c_7319463.elements = (object *)e_7319478;
++c_7319463.elements[0] = ((closureN)self_7312310)->elements[0];
++c_7319463.elements[1] = lp_9350_73818_73849_73989_732977;
++c_7319463.elements[2] = ((closureN)self_7312310)->elements[1];
++c_7319463.elements[3] = ((closureN)self_7312310)->elements[4];
++c_7319463.elements[4] = ((closureN)self_7312310)->elements[5];
  
  
 -closureN_type c_7320779;
@@ -38242,31 +38424,31 @@ Make let-values be the same as let*-values, to work around
 -c_7320779.elements[0] = lp_9350_73818_73849_73989_733324;
 -c_7320779.elements[1] = ((closureN)self_7313563)->elements[2];
 -c_7320779.elements[2] = ((closureN)self_7313563)->elements[3];
-+closureN_type c_7319486;
-+object e_7319594 [3];
-+c_7319486.hdr.mark = gc_color_red;
-+ c_7319486.hdr.grayed = 0;
-+c_7319486.tag = closureN_tag;
-+ c_7319486.fn = (function_type)__lambda_683;
-+c_7319486.num_args = 3;
-+c_7319486.num_elements = 3;
-+c_7319486.elements = (object *)e_7319594;
-+c_7319486.elements[0] = lp_9350_73819_73850_73990_732984;
-+c_7319486.elements[1] = ((closureN)self_7312317)->elements[2];
-+c_7319486.elements[2] = ((closureN)self_7312317)->elements[3];
++closureN_type c_7319479;
++object e_7319587 [3];
++c_7319479.hdr.mark = gc_color_red;
++ c_7319479.hdr.grayed = 0;
++c_7319479.tag = closureN_tag;
++ c_7319479.fn = (function_type)__lambda_683;
++c_7319479.num_args = 3;
++c_7319479.num_elements = 3;
++c_7319479.elements = (object *)e_7319587;
++c_7319479.elements[0] = lp_9350_73818_73849_73989_732977;
++c_7319479.elements[1] = ((closureN)self_7312310)->elements[2];
++c_7319479.elements[2] = ((closureN)self_7312310)->elements[3];
  
 -return_direct_with_clo1(data,(closure)&c_7320763,__lambda_681,  &c_7320779);; 
-+return_direct_with_clo1(data,(closure)&c_7319470,__lambda_681,  &c_7319486);; 
++return_direct_with_clo1(data,(closure)&c_7319463,__lambda_681,  &c_7319479);; 
  }
  
 -static void __lambda_683(void *data, object self_7313564, int argc, object *args) /* object self_7313564, object k_735675, object w_9349_73817_73850_73990_733325, object param_91ls51_73819_73851_73991_733326, object value_91ls52_73820_73852_73992_733327 */
-+static void __lambda_683(void *data, object self_7312318, int argc, object *args) /* object self_7312318, object k_735230, object w_9349_73818_73851_73991_732985, object param_91ls51_73820_73852_73992_732986, object value_91ls52_73821_73853_73993_732987 */
++static void __lambda_683(void *data, object self_7312311, int argc, object *args) /* object self_7312311, object k_735223, object w_9349_73817_73850_73990_732978, object param_91ls51_73819_73851_73991_732979, object value_91ls52_73820_73852_73992_732980 */
   {
 - object k_735675 = args[0]; object w_9349_73817_73850_73990_733325 = args[1]; object param_91ls51_73819_73851_73991_733326 = args[2]; object value_91ls52_73820_73852_73992_733327 = args[3];
-+ object k_735230 = args[0]; object w_9349_73818_73851_73991_732985 = args[1]; object param_91ls51_73820_73852_73992_732986 = args[2]; object value_91ls52_73821_73853_73993_732987 = args[3];
++ object k_735223 = args[0]; object w_9349_73817_73850_73990_732978 = args[1]; object param_91ls51_73819_73851_73991_732979 = args[2]; object value_91ls52_73820_73852_73992_732980 = args[3];
      
 -if( (boolean_f != Cyc_is_null(w_9349_73817_73850_73990_733325)) ){ 
-+if( (boolean_f != Cyc_is_null(w_9349_73818_73851_73991_732985)) ){ 
++if( (boolean_f != Cyc_is_null(w_9349_73817_73850_73990_732978)) ){ 
    
 -closureN_type c_7320783;
 -object e_7320840 [4];
@@ -38281,55 +38463,55 @@ Make let-values be the same as let*-values, to work around
 -c_7320783.elements[1] = ((closureN)self_7313564)->elements[1];
 -c_7320783.elements[2] = ((closureN)self_7313564)->elements[2];
 -c_7320783.elements[3] = value_91ls52_73820_73852_73992_733327;
-+closureN_type c_7319490;
-+object e_7319547 [4];
-+c_7319490.hdr.mark = gc_color_red;
-+ c_7319490.hdr.grayed = 0;
-+c_7319490.tag = closureN_tag;
-+ c_7319490.fn = (function_type)__lambda_684;
-+c_7319490.num_args = 1;
-+c_7319490.num_elements = 4;
-+c_7319490.elements = (object *)e_7319547;
-+c_7319490.elements[0] = k_735230;
-+c_7319490.elements[1] = ((closureN)self_7312318)->elements[1];
-+c_7319490.elements[2] = ((closureN)self_7312318)->elements[2];
-+c_7319490.elements[3] = value_91ls52_73821_73853_73993_732987;
++closureN_type c_7319483;
++object e_7319540 [4];
++c_7319483.hdr.mark = gc_color_red;
++ c_7319483.hdr.grayed = 0;
++c_7319483.tag = closureN_tag;
++ c_7319483.fn = (function_type)__lambda_684;
++c_7319483.num_args = 1;
++c_7319483.num_elements = 4;
++c_7319483.elements = (object *)e_7319540;
++c_7319483.elements[0] = k_735223;
++c_7319483.elements[1] = ((closureN)self_7312311)->elements[1];
++c_7319483.elements[2] = ((closureN)self_7312311)->elements[2];
++c_7319483.elements[3] = value_91ls52_73820_73852_73992_732980;
  
 -return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7320783, primitive_cons, NULL, param_91ls51_73819_73851_73991_733326);
-+return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7319490, primitive_cons, NULL, param_91ls51_73820_73852_73992_732986);
++return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7319483, primitive_cons, NULL, param_91ls51_73819_73851_73991_732979);
  } else { 
      
 -if( (boolean_f != Cyc_is_pair(w_9349_73817_73850_73990_733325)) ){ 
-+if( (boolean_f != Cyc_is_pair(w_9349_73818_73851_73991_732985)) ){ 
++if( (boolean_f != Cyc_is_pair(w_9349_73817_73850_73990_732978)) ){ 
      
    
 -if( (boolean_f != Cyc_is_pair(Cyc_car(data, w_9349_73817_73850_73990_733325))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_car(data, w_9349_73818_73851_73991_732985))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, w_9349_73817_73850_73990_732978))) ){ 
      
    
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, w_9349_73817_73850_73990_733325)))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, w_9349_73818_73851_73991_732985)))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, w_9349_73817_73850_73990_732978)))) ){ 
      
    
    
    
 -if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_9349_73817_73850_73990_733325))))) ){ 
-+if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_9349_73818_73851_73991_732985))))) ){ 
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_9349_73817_73850_73990_732978))))) ){ 
    
  
  
  
  
 -pair_type local_7320869; 
-+pair_type local_7319576; 
++pair_type local_7319569; 
  
  
  
  
  
 -pair_type local_7320876; 
-+pair_type local_7319583; 
++pair_type local_7319576; 
  
  
  
@@ -38337,31 +38519,31 @@ Make let-values be the same as let*-values, to work around
  
  
 -return_closcall4(data,  car(((closureN)self_7313564)->elements[0]),  k_735675, Cyc_cdr(data, w_9349_73817_73850_73990_733325), set_pair_as_expr(&local_7320869, Cyc_car(data, Cyc_car(data, w_9349_73817_73850_73990_733325)), param_91ls51_73819_73851_73991_733326), set_pair_as_expr(&local_7320876, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, w_9349_73817_73850_73990_733325))), value_91ls52_73820_73852_73992_733327));
-+return_closcall4(data,  car(((closureN)self_7312318)->elements[0]),  k_735230, Cyc_cdr(data, w_9349_73818_73851_73991_732985), set_pair_as_expr(&local_7319576, Cyc_car(data, Cyc_car(data, w_9349_73818_73851_73991_732985)), param_91ls51_73820_73852_73992_732986), set_pair_as_expr(&local_7319583, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, w_9349_73818_73851_73991_732985))), value_91ls52_73821_73853_73993_732987));
++return_closcall4(data,  car(((closureN)self_7312311)->elements[0]),  k_735223, Cyc_cdr(data, w_9349_73817_73850_73990_732978), set_pair_as_expr(&local_7319569, Cyc_car(data, Cyc_car(data, w_9349_73817_73850_73990_732978)), param_91ls51_73819_73851_73991_732979), set_pair_as_expr(&local_7319576, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, w_9349_73817_73850_73990_732978))), value_91ls52_73820_73852_73992_732980));
  } else { 
 -  return_direct_with_clo1(data,  k_735675, (((closure)  k_735675)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_735230, (((closure)  k_735230)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_735223, (((closure)  k_735223)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_735675, (((closure)  k_735675)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_735230, (((closure)  k_735230)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_735223, (((closure)  k_735223)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_735675, (((closure)  k_735675)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_735230, (((closure)  k_735230)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_735223, (((closure)  k_735223)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_735675, (((closure)  k_735675)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_735230, (((closure)  k_735230)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_735223, (((closure)  k_735223)->fn),  boolean_f);}
  ;}
  ;; 
  }
  
 -static void __lambda_684(void *data, object self_7313565, int argc, object *args) /* object self_7313565, object r_735677_7312901 */
-+static void __lambda_684(void *data, object self_7312319, int argc, object *args) /* object self_7312319, object r_735232_7311655 */
++static void __lambda_684(void *data, object self_7312312, int argc, object *args) /* object self_7312312, object r_735225_7311648 */
   {
 - object r_735677_7312901 = args[0];
-+ object r_735232_7311655 = args[0];
++ object r_735225_7311648 = args[0];
    
 -closureN_type c_7320785;
 -object e_7320838 [4];
@@ -38376,14 +38558,30 @@ Make let-values be the same as let*-values, to work around
 -c_7320785.elements[1] = r_735677_7312901;
 -c_7320785.elements[2] = ((closureN)self_7313565)->elements[1];
 -c_7320785.elements[3] = ((closureN)self_7313565)->elements[2];
--
++closureN_type c_7319485;
++object e_7319538 [4];
++c_7319485.hdr.mark = gc_color_red;
++ c_7319485.hdr.grayed = 0;
++c_7319485.tag = closureN_tag;
++ c_7319485.fn = (function_type)__lambda_685;
++c_7319485.num_args = 1;
++c_7319485.num_elements = 4;
++c_7319485.elements = (object *)e_7319538;
++c_7319485.elements[0] = ((closureN)self_7312312)->elements[0];
++c_7319485.elements[1] = r_735225_7311648;
++c_7319485.elements[2] = ((closureN)self_7312312)->elements[1];
++c_7319485.elements[3] = ((closureN)self_7312312)->elements[2];
+ 
 -return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7320785, primitive_cons, NULL, ((closureN)self_7313565)->elements[3]);; 
--}
--
++return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7319485, primitive_cons, NULL, ((closureN)self_7312312)->elements[3]);; 
+ }
+ 
 -static void __lambda_685(void *data, object self_7313566, int argc, object *args) /* object self_7313566, object r_735678_7312902_7312911 */
-- {
++static void __lambda_685(void *data, object self_7312313, int argc, object *args) /* object self_7312313, object r_735226_7311649_7311658 */
+  {
 - object r_735678_7312902_7312911 = args[0];
--  
++ object r_735226_7311649_7311658 = args[0];
+   
 -closureN_type c_7320787;
 -object e_7320836 [3];
 -c_7320787.hdr.mark = gc_color_red;
@@ -38396,29 +38594,28 @@ Make let-values be the same as let*-values, to work around
 -c_7320787.elements[0] = ((closureN)self_7313566)->elements[0];
 -c_7320787.elements[1] = ((closureN)self_7313566)->elements[2];
 -c_7320787.elements[2] = ((closureN)self_7313566)->elements[3];
-+closureN_type c_7319492;
-+object e_7319545 [4];
-+c_7319492.hdr.mark = gc_color_red;
-+ c_7319492.hdr.grayed = 0;
-+c_7319492.tag = closureN_tag;
-+ c_7319492.fn = (function_type)__lambda_685;
-+c_7319492.num_args = 1;
-+c_7319492.num_elements = 4;
-+c_7319492.elements = (object *)e_7319545;
-+c_7319492.elements[0] = ((closureN)self_7312319)->elements[0];
-+c_7319492.elements[1] = r_735232_7311655;
-+c_7319492.elements[2] = ((closureN)self_7312319)->elements[1];
-+c_7319492.elements[3] = ((closureN)self_7312319)->elements[2];
++closureN_type c_7319487;
++object e_7319536 [3];
++c_7319487.hdr.mark = gc_color_red;
++ c_7319487.hdr.grayed = 0;
++c_7319487.tag = closureN_tag;
++ c_7319487.fn = (function_type)__lambda_686;
++c_7319487.num_args = 2;
++c_7319487.num_elements = 3;
++c_7319487.elements = (object *)e_7319536;
++c_7319487.elements[0] = ((closureN)self_7312313)->elements[0];
++c_7319487.elements[1] = ((closureN)self_7312313)->elements[2];
++c_7319487.elements[2] = ((closureN)self_7312313)->elements[3];
  
 -return_direct_with_clo2(data,(closure)&c_7320787,__lambda_686,  ((closureN)self_7313566)->elements[1], r_735678_7312902_7312911);; 
-+return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7319492, primitive_cons, NULL, ((closureN)self_7312319)->elements[3]);; 
++return_direct_with_clo2(data,(closure)&c_7319487,__lambda_686,  ((closureN)self_7312313)->elements[1], r_735226_7311649_7311658);; 
  }
  
 -static void __lambda_686(void *data, object self_7313567, int argc, object *args) /* object self_7313567, object param_73853_73993_733328_7312903_7312912, object value_73854_73994_733329_7312904_7312913 */
-+static void __lambda_685(void *data, object self_7312320, int argc, object *args) /* object self_7312320, object r_735233_7311656_7311665 */
++static void __lambda_686(void *data, object self_7312314, int argc, object *args) /* object self_7312314, object param_73853_73993_732981_7311650_7311659, object value_73854_73994_732982_7311651_7311660 */
   {
 - object param_73853_73993_733328_7312903_7312912 = args[0]; object value_73854_73994_733329_7312904_7312913 = args[1];
-+ object r_735233_7311656_7311665 = args[0];
++ object param_73853_73993_732981_7311650_7311659 = args[0]; object value_73854_73994_732982_7311651_7311660 = args[1];
    
 -closureN_type c_7320790;
 -object e_7320835 [4];
@@ -38433,28 +38630,29 @@ Make let-values be the same as let*-values, to work around
 -c_7320790.elements[1] = param_73853_73993_733328_7312903_7312912;
 -c_7320790.elements[2] = ((closureN)self_7313567)->elements[2];
 -c_7320790.elements[3] = value_73854_73994_733329_7312904_7312913;
-+closureN_type c_7319494;
-+object e_7319543 [3];
-+c_7319494.hdr.mark = gc_color_red;
-+ c_7319494.hdr.grayed = 0;
-+c_7319494.tag = closureN_tag;
-+ c_7319494.fn = (function_type)__lambda_686;
-+c_7319494.num_args = 2;
-+c_7319494.num_elements = 3;
-+c_7319494.elements = (object *)e_7319543;
-+c_7319494.elements[0] = ((closureN)self_7312320)->elements[0];
-+c_7319494.elements[1] = ((closureN)self_7312320)->elements[2];
-+c_7319494.elements[2] = ((closureN)self_7312320)->elements[3];
++closureN_type c_7319490;
++object e_7319535 [4];
++c_7319490.hdr.mark = gc_color_red;
++ c_7319490.hdr.grayed = 0;
++c_7319490.tag = closureN_tag;
++ c_7319490.fn = (function_type)__lambda_687;
++c_7319490.num_args = 1;
++c_7319490.num_elements = 4;
++c_7319490.elements = (object *)e_7319535;
++c_7319490.elements[0] = ((closureN)self_7312314)->elements[0];
++c_7319490.elements[1] = param_73853_73993_732981_7311650_7311659;
++c_7319490.elements[2] = ((closureN)self_7312314)->elements[2];
++c_7319490.elements[3] = value_73854_73994_732982_7311651_7311660;
  
 -return_closcall2(data,  ((closureN)self_7313567)->elements[1],  &c_7320790, quote_parameterize);; 
-+return_direct_with_clo2(data,(closure)&c_7319494,__lambda_686,  ((closureN)self_7312320)->elements[1], r_735233_7311656_7311665);; 
++return_closcall2(data,  ((closureN)self_7312314)->elements[1],  &c_7319490, quote_parameterize);; 
  }
  
 -static void __lambda_687(void *data, object self_7313568, int argc, object *args) /* object self_7313568, object r_735681_7312905_7312914 */
-+static void __lambda_686(void *data, object self_7312321, int argc, object *args) /* object self_7312321, object param_73854_73994_732988_7311657_7311666, object value_73855_73995_732989_7311658_7311667 */
++static void __lambda_687(void *data, object self_7312315, int argc, object *args) /* object self_7312315, object r_735229_7311652_7311661 */
   {
 - object r_735681_7312905_7312914 = args[0];
-+ object param_73854_73994_732988_7311657_7311666 = args[0]; object value_73855_73995_732989_7311658_7311667 = args[1];
++ object r_735229_7311652_7311661 = args[0];
    
 -closureN_type c_7320792;
 -object e_7320826 [5];
@@ -38470,69 +38668,48 @@ Make let-values be the same as let*-values, to work around
 -c_7320792.elements[2] = r_735681_7312905_7312914;
 -c_7320792.elements[3] = ((closureN)self_7313568)->elements[2];
 -c_7320792.elements[4] = ((closureN)self_7313568)->elements[3];
-+closureN_type c_7319497;
-+object e_7319542 [4];
-+c_7319497.hdr.mark = gc_color_red;
-+ c_7319497.hdr.grayed = 0;
-+c_7319497.tag = closureN_tag;
-+ c_7319497.fn = (function_type)__lambda_687;
-+c_7319497.num_args = 1;
-+c_7319497.num_elements = 4;
-+c_7319497.elements = (object *)e_7319542;
-+c_7319497.elements[0] = ((closureN)self_7312321)->elements[0];
-+c_7319497.elements[1] = param_73854_73994_732988_7311657_7311666;
-+c_7319497.elements[2] = ((closureN)self_7312321)->elements[2];
-+c_7319497.elements[3] = value_73855_73995_732989_7311658_7311667;
-+
-+return_closcall2(data,  ((closureN)self_7312321)->elements[1],  &c_7319497, quote_parameterize);; 
-+}
-+
-+static void __lambda_687(void *data, object self_7312322, int argc, object *args) /* object self_7312322, object r_735236_7311659_7311668 */
-+ {
-+ object r_735236_7311659_7311668 = args[0];
-+  
-+closureN_type c_7319499;
-+object e_7319533 [5];
-+c_7319499.hdr.mark = gc_color_red;
-+ c_7319499.hdr.grayed = 0;
-+c_7319499.tag = closureN_tag;
-+ c_7319499.fn = (function_type)__lambda_688;
-+c_7319499.num_args = 1;
-+c_7319499.num_elements = 5;
-+c_7319499.elements = (object *)e_7319533;
-+c_7319499.elements[0] = ((closureN)self_7312322)->elements[0];
-+c_7319499.elements[1] = ((closureN)self_7312322)->elements[1];
-+c_7319499.elements[2] = r_735236_7311659_7311668;
-+c_7319499.elements[3] = ((closureN)self_7312322)->elements[2];
-+c_7319499.elements[4] = ((closureN)self_7312322)->elements[3];
++closureN_type c_7319492;
++object e_7319526 [5];
++c_7319492.hdr.mark = gc_color_red;
++ c_7319492.hdr.grayed = 0;
++c_7319492.tag = closureN_tag;
++ c_7319492.fn = (function_type)__lambda_688;
++c_7319492.num_args = 1;
++c_7319492.num_elements = 5;
++c_7319492.elements = (object *)e_7319526;
++c_7319492.elements[0] = ((closureN)self_7312315)->elements[0];
++c_7319492.elements[1] = ((closureN)self_7312315)->elements[1];
++c_7319492.elements[2] = r_735229_7311652_7311661;
++c_7319492.elements[3] = ((closureN)self_7312315)->elements[2];
++c_7319492.elements[4] = ((closureN)self_7312315)->elements[3];
  
  
 -mmacro(c_7320827, (function_type)__lambda_690);c_7320827.num_args = 2;
 -return_direct_with_clo1(data,(closure)&c_7320792,__lambda_688,  &c_7320827);; 
-+mmacro(c_7319534, (function_type)__lambda_690);c_7319534.num_args = 2;
-+return_direct_with_clo1(data,(closure)&c_7319499,__lambda_688,  &c_7319534);; 
++mmacro(c_7319527, (function_type)__lambda_690);c_7319527.num_args = 2;
++return_direct_with_clo1(data,(closure)&c_7319492,__lambda_688,  &c_7319527);; 
  }
  
 -static void __lambda_690(void *data, object self_7313569, int argc, object *args) /* object self_7313569, object k_735696_738681_7312908_7312917, object param_73857_73997_733332_738682_7312909_7312918, object value_73858_73998_733333_738683_7312910_7312919 */
-+static void __lambda_690(void *data, object self_7312323, int argc, object *args) /* object self_7312323, object k_735251_737913_7311662_7311671, object param_73858_73998_732992_737914_7311663_7311672, object value_73859_73999_732993_737915_7311664_7311673 */
++static void __lambda_690(void *data, object self_7312316, int argc, object *args) /* object self_7312316, object k_735244_737906_7311655_7311664, object param_73857_73997_732985_737907_7311656_7311665, object value_73858_73998_732986_737908_7311657_7311666 */
   {
 - object k_735696_738681_7312908_7312917 = args[0]; object param_73857_73997_733332_738682_7312909_7312918 = args[1]; object value_73858_73998_733333_738683_7312910_7312919 = args[2];
-+ object k_735251_737913_7311662_7311671 = args[0]; object param_73858_73998_732992_737914_7311663_7311672 = args[1]; object value_73859_73999_732993_737915_7311664_7311673 = args[2];
++ object k_735244_737906_7311655_7311664 = args[0]; object param_73857_73997_732985_737907_7311656_7311665 = args[1]; object value_73858_73998_732986_737908_7311657_7311666 = args[2];
    
 -pair_type local_7320831; 
-+pair_type local_7319538; 
++pair_type local_7319531; 
  
 -pair_type local_7320834; 
 -return_direct_with_clo1(data,  k_735696_738681_7312908_7312917, (((closure)  k_735696_738681_7312908_7312917)->fn),  set_pair_as_expr(&local_7320831, param_73857_73997_733332_738682_7312909_7312918, set_pair_as_expr(&local_7320834, value_73858_73998_733333_738683_7312910_7312919, NULL)));; 
-+pair_type local_7319541; 
-+return_direct_with_clo1(data,  k_735251_737913_7311662_7311671, (((closure)  k_735251_737913_7311662_7311671)->fn),  set_pair_as_expr(&local_7319538, param_73858_73998_732992_737914_7311663_7311672, set_pair_as_expr(&local_7319541, value_73859_73999_732993_737915_7311664_7311673, NULL)));; 
++pair_type local_7319534; 
++return_direct_with_clo1(data,  k_735244_737906_7311655_7311664, (((closure)  k_735244_737906_7311655_7311664)->fn),  set_pair_as_expr(&local_7319531, param_73857_73997_732985_737907_7311656_7311665, set_pair_as_expr(&local_7319534, value_73858_73998_732986_737908_7311657_7311666, NULL)));; 
  }
  
 -static void __lambda_688(void *data, object self_7313570, int argc, object *args) /* object self_7313570, object r_735695_738674_7312906_7312915 */
-+static void __lambda_688(void *data, object self_7312324, int argc, object *args) /* object self_7312324, object r_735250_737906_7311660_7311669 */
++static void __lambda_688(void *data, object self_7312317, int argc, object *args) /* object self_7312317, object r_735243_737899_7311653_7311662 */
   {
 - object r_735695_738674_7312906_7312915 = args[0];
-+ object r_735250_737906_7311660_7311669 = args[0];
++ object r_735243_737899_7311653_7311662 = args[0];
    
 -closureN_type c_7320794;
 -object e_7320823 [3];
@@ -38546,63 +38723,63 @@ Make let-values be the same as let*-values, to work around
 -c_7320794.elements[0] = ((closureN)self_7313570)->elements[0];
 -c_7320794.elements[1] = ((closureN)self_7313570)->elements[2];
 -c_7320794.elements[2] = ((closureN)self_7313570)->elements[3];
-+closureN_type c_7319501;
-+object e_7319530 [3];
-+c_7319501.hdr.mark = gc_color_red;
-+ c_7319501.hdr.grayed = 0;
-+c_7319501.tag = closureN_tag;
-+ c_7319501.fn = (function_type)__lambda_689;
-+c_7319501.num_args = 1;
-+c_7319501.num_elements = 3;
-+c_7319501.elements = (object *)e_7319530;
-+c_7319501.elements[0] = ((closureN)self_7312324)->elements[0];
-+c_7319501.elements[1] = ((closureN)self_7312324)->elements[2];
-+c_7319501.elements[2] = ((closureN)self_7312324)->elements[3];
++closureN_type c_7319494;
++object e_7319523 [3];
++c_7319494.hdr.mark = gc_color_red;
++ c_7319494.hdr.grayed = 0;
++c_7319494.tag = closureN_tag;
++ c_7319494.fn = (function_type)__lambda_689;
++c_7319494.num_args = 1;
++c_7319494.num_elements = 3;
++c_7319494.elements = (object *)e_7319523;
++c_7319494.elements[0] = ((closureN)self_7312317)->elements[0];
++c_7319494.elements[1] = ((closureN)self_7312317)->elements[2];
++c_7319494.elements[2] = ((closureN)self_7312317)->elements[3];
  
 -return_direct_with_clo4(data,  __glo_Cyc_91map_91loop_912_scheme_base, (((closure)  __glo_Cyc_91map_91loop_912_scheme_base)->fn),  &c_7320794, r_735695_738674_7312906_7312915, ((closureN)self_7313570)->elements[1], ((closureN)self_7313570)->elements[4]);; 
-+return_direct_with_clo4(data,  __glo_Cyc_91map_91loop_912_scheme_base, (((closure)  __glo_Cyc_91map_91loop_912_scheme_base)->fn),  &c_7319501, r_735250_737906_7311660_7311669, ((closureN)self_7312324)->elements[1], ((closureN)self_7312324)->elements[4]);; 
++return_direct_with_clo4(data,  __glo_Cyc_91map_91loop_912_scheme_base, (((closure)  __glo_Cyc_91map_91loop_912_scheme_base)->fn),  &c_7319494, r_735243_737899_7311653_7311662, ((closureN)self_7312317)->elements[1], ((closureN)self_7312317)->elements[4]);; 
  }
  
 -static void __lambda_689(void *data, object self_7313571, int argc, object *args) /* object self_7313571, object r_735690_738675_7312907_7312916 */
-+static void __lambda_689(void *data, object self_7312325, int argc, object *args) /* object self_7312325, object r_735245_737907_7311661_7311670 */
++static void __lambda_689(void *data, object self_7312318, int argc, object *args) /* object self_7312318, object r_735238_737900_7311654_7311663 */
   {
 - object r_735690_738675_7312907_7312916 = args[0];
-+ object r_735245_737907_7311661_7311670 = args[0];
++ object r_735238_737900_7311654_7311663 = args[0];
    
 -pair_type local_7320799; 
-+pair_type local_7319506; 
++pair_type local_7319499; 
  
 -pair_type local_7320802; 
-+pair_type local_7319509; 
++pair_type local_7319502; 
  
 -pair_type local_7320806; 
-+pair_type local_7319513; 
++pair_type local_7319506; 
  
 -pair_type local_7320809; 
-+pair_type local_7319516; 
++pair_type local_7319509; 
  
 -make_utf8_string_with_len(c_7320810, "step", 4, 4);
-+make_utf8_string_with_len(c_7319517, "step", 4, 4);
++make_utf8_string_with_len(c_7319510, "step", 4, 4);
  
 -pair_type local_7320813; 
-+pair_type local_7319520; 
++pair_type local_7319513; 
  
 -pair_type local_7320816; 
-+pair_type local_7319523; 
++pair_type local_7319516; 
  
 -pair_type local_7320819; 
-+pair_type local_7319526; 
++pair_type local_7319519; 
  
  
 -return_direct_with_clo1(data,  ((closureN)self_7313571)->elements[0], (((closure)  ((closureN)self_7313571)->elements[0])->fn),  set_pair_as_expr(&local_7320799, set_pair_as_expr(&local_7320802, ((closureN)self_7313571)->elements[1], set_pair_as_expr(&local_7320806, set_pair_as_expr(&local_7320809, &c_7320810, NULL), set_pair_as_expr(&local_7320813, NULL, set_pair_as_expr(&local_7320816, r_735690_738675_7312907_7312916, set_pair_as_expr(&local_7320819, Cyc_cdr(data, ((closureN)self_7313571)->elements[2]), NULL))))), boolean_f));; 
-+return_direct_with_clo1(data,  ((closureN)self_7312325)->elements[0], (((closure)  ((closureN)self_7312325)->elements[0])->fn),  set_pair_as_expr(&local_7319506, set_pair_as_expr(&local_7319509, ((closureN)self_7312325)->elements[1], set_pair_as_expr(&local_7319513, set_pair_as_expr(&local_7319516, &c_7319517, NULL), set_pair_as_expr(&local_7319520, NULL, set_pair_as_expr(&local_7319523, r_735245_737907_7311661_7311670, set_pair_as_expr(&local_7319526, Cyc_cdr(data, ((closureN)self_7312325)->elements[2]), NULL))))), boolean_f));; 
++return_direct_with_clo1(data,  ((closureN)self_7312318)->elements[0], (((closure)  ((closureN)self_7312318)->elements[0])->fn),  set_pair_as_expr(&local_7319499, set_pair_as_expr(&local_7319502, ((closureN)self_7312318)->elements[1], set_pair_as_expr(&local_7319506, set_pair_as_expr(&local_7319509, &c_7319510, NULL), set_pair_as_expr(&local_7319513, NULL, set_pair_as_expr(&local_7319516, r_735238_737900_7311654_7311663, set_pair_as_expr(&local_7319519, Cyc_cdr(data, ((closureN)self_7312318)->elements[2]), NULL))))), boolean_f));; 
  }
  
 -static void __lambda_681(void *data, object self_7313572, int argc, object *args) /* object self_7313572, object r_735674 */
-+static void __lambda_681(void *data, object self_7312326, int argc, object *args) /* object self_7312326, object r_735229 */
++static void __lambda_681(void *data, object self_7312319, int argc, object *args) /* object self_7312319, object r_735222 */
   {
 - object r_735674 = args[0];
-+ object r_735229 = args[0];
++ object r_735222 = args[0];
    
 -closureN_type c_7320765;
 -object e_7320774 [5];
@@ -38618,83 +38795,83 @@ Make let-values be the same as let*-values, to work around
 -c_7320765.elements[2] = ((closureN)self_7313572)->elements[2];
 -c_7320765.elements[3] = ((closureN)self_7313572)->elements[3];
 -c_7320765.elements[4] = ((closureN)self_7313572)->elements[4];
-+closureN_type c_7319472;
-+object e_7319481 [5];
-+c_7319472.hdr.mark = gc_color_red;
-+ c_7319472.hdr.grayed = 0;
-+c_7319472.tag = closureN_tag;
-+ c_7319472.fn = (function_type)__lambda_682;
-+c_7319472.num_args = 1;
-+c_7319472.num_elements = 5;
-+c_7319472.elements = (object *)e_7319481;
-+c_7319472.elements[0] = ((closureN)self_7312326)->elements[0];
-+c_7319472.elements[1] = ((closureN)self_7312326)->elements[1];
-+c_7319472.elements[2] = ((closureN)self_7312326)->elements[2];
-+c_7319472.elements[3] = ((closureN)self_7312326)->elements[3];
-+c_7319472.elements[4] = ((closureN)self_7312326)->elements[4];
++closureN_type c_7319465;
++object e_7319474 [5];
++c_7319465.hdr.mark = gc_color_red;
++ c_7319465.hdr.grayed = 0;
++c_7319465.tag = closureN_tag;
++ c_7319465.fn = (function_type)__lambda_682;
++c_7319465.num_args = 1;
++c_7319465.num_elements = 5;
++c_7319465.elements = (object *)e_7319474;
++c_7319465.elements[0] = ((closureN)self_7312319)->elements[0];
++c_7319465.elements[1] = ((closureN)self_7312319)->elements[1];
++c_7319465.elements[2] = ((closureN)self_7312319)->elements[2];
++c_7319465.elements[3] = ((closureN)self_7312319)->elements[3];
++c_7319465.elements[4] = ((closureN)self_7312319)->elements[4];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7320765,__lambda_682,  Cyc_set_cell(data, ((closureN)self_7313572)->elements[1], r_735674));; 
-+return_direct_with_clo1(data,(closure)&c_7319472,__lambda_682,  Cyc_set_cell(data, ((closureN)self_7312326)->elements[1], r_735229));; 
++return_direct_with_clo1(data,(closure)&c_7319465,__lambda_682,  Cyc_set_cell(data, ((closureN)self_7312319)->elements[1], r_735222));; 
  }
  
 -static void __lambda_682(void *data, object self_7313573, int argc, object *args) /* object self_7313573, object r_735673 */
-+static void __lambda_682(void *data, object self_7312327, int argc, object *args) /* object self_7312327, object r_735228 */
++static void __lambda_682(void *data, object self_7312320, int argc, object *args) /* object self_7312320, object r_735221 */
   {
  
    
  
 -return_closcall4(data,  car(((closureN)self_7313573)->elements[1]),  ((closureN)self_7313573)->elements[0], ((closureN)self_7313573)->elements[4], ((closureN)self_7313573)->elements[2], ((closureN)self_7313573)->elements[3]);; 
-+return_closcall4(data,  car(((closureN)self_7312327)->elements[1]),  ((closureN)self_7312327)->elements[0], ((closureN)self_7312327)->elements[4], ((closureN)self_7312327)->elements[2], ((closureN)self_7312327)->elements[3]);; 
++return_closcall4(data,  car(((closureN)self_7312320)->elements[1]),  ((closureN)self_7312320)->elements[0], ((closureN)self_7312320)->elements[4], ((closureN)self_7312320)->elements[2], ((closureN)self_7312320)->elements[3]);; 
  }
  
 -static void __lambda_671(void *data, object self_7313574, int argc, object *args) /* object self_7313574, object k_735717 */
-+static void __lambda_671(void *data, object self_7312328, int argc, object *args) /* object self_7312328, object k_735272 */
++static void __lambda_671(void *data, object self_7312321, int argc, object *args) /* object self_7312321, object k_735265 */
   {
 - object k_735717 = args[0];
-+ object k_735272 = args[0];
++ object k_735265 = args[0];
      
 -if( (boolean_f != Cyc_is_pair(((closureN)self_7313574)->elements[1])) ){ 
-+if( (boolean_f != Cyc_is_pair(((closureN)self_7312328)->elements[1])) ){ 
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312321)->elements[1])) ){ 
      
    
 -if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7313574)->elements[1]))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7312328)->elements[1]))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7312321)->elements[1]))) ){ 
      
    
    
 -  make_utf8_string_with_len(c_7320537, "step", 4, 4);
 -if( (boolean_f != equalp(Cyc_car(data, Cyc_car(data, ((closureN)self_7313574)->elements[1])), &c_7320537)) ){ 
-+  make_utf8_string_with_len(c_7319244, "step", 4, 4);
-+if( (boolean_f != equalp(Cyc_car(data, Cyc_car(data, ((closureN)self_7312328)->elements[1])), &c_7319244)) ){ 
++  make_utf8_string_with_len(c_7319237, "step", 4, 4);
++if( (boolean_f != equalp(Cyc_car(data, Cyc_car(data, ((closureN)self_7312321)->elements[1])), &c_7319237)) ){ 
      
    
    
 -if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, ((closureN)self_7313574)->elements[1])))) ){ 
-+if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, ((closureN)self_7312328)->elements[1])))) ){ 
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, ((closureN)self_7312321)->elements[1])))) ){ 
      
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7313574)->elements[1]))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312328)->elements[1]))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312321)->elements[1]))) ){ 
      
    
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313574)->elements[1])))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312328)->elements[1])))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312321)->elements[1])))) ){ 
      
    
    
    
 -if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313574)->elements[1]))))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312328)->elements[1]))))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312321)->elements[1]))))) ){ 
      
    
    
    
    
 -if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313574)->elements[1])))))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312328)->elements[1])))))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312321)->elements[1])))))) ){ 
      
    
    
@@ -38702,7 +38879,7 @@ Make let-values be the same as let*-values, to work around
    
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313574)->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_7312328)->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_7312321)->elements[1]))))))) ){ 
      
    
    
@@ -38711,20 +38888,20 @@ Make let-values be the same as let*-values, to work around
    
    
 -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_7313574)->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_7312328)->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_7312321)->elements[1])))))))) ){ 
      
    
    
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313574)->elements[1]))))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312328)->elements[1]))))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312321)->elements[1]))))) ){ 
      
    
    
    
    
 -if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313574)->elements[1])))))) ){ 
-+if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312328)->elements[1])))))) ){ 
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312321)->elements[1])))))) ){ 
    
 -closureN_type c_7320627;
 -object e_7320732 [3];
@@ -38738,76 +38915,76 @@ Make let-values be the same as let*-values, to work around
 -c_7320627.elements[0] = k_735717;
 -c_7320627.elements[1] = ((closureN)self_7313574)->elements[0];
 -c_7320627.elements[2] = ((closureN)self_7313574)->elements[1];
-+closureN_type c_7319334;
-+object e_7319439 [3];
-+c_7319334.hdr.mark = gc_color_red;
-+ c_7319334.hdr.grayed = 0;
-+c_7319334.tag = closureN_tag;
-+ c_7319334.fn = (function_type)__lambda_672;
-+c_7319334.num_args = 1;
-+c_7319334.num_elements = 3;
-+c_7319334.elements = (object *)e_7319439;
-+c_7319334.elements[0] = k_735272;
-+c_7319334.elements[1] = ((closureN)self_7312328)->elements[0];
-+c_7319334.elements[2] = ((closureN)self_7312328)->elements[1];
++closureN_type c_7319327;
++object e_7319432 [3];
++c_7319327.hdr.mark = gc_color_red;
++ c_7319327.hdr.grayed = 0;
++c_7319327.tag = closureN_tag;
++ c_7319327.fn = (function_type)__lambda_672;
++c_7319327.num_args = 1;
++c_7319327.num_elements = 3;
++c_7319327.elements = (object *)e_7319432;
++c_7319327.elements[0] = k_735265;
++c_7319327.elements[1] = ((closureN)self_7312321)->elements[0];
++c_7319327.elements[2] = ((closureN)self_7312321)->elements[1];
  
 -return_closcall2(data,  ((closureN)self_7313574)->elements[0],  &c_7320627, quote_parameterize);
-+return_closcall2(data,  ((closureN)self_7312328)->elements[0],  &c_7319334, quote_parameterize);
++return_closcall2(data,  ((closureN)self_7312321)->elements[0],  &c_7319327, quote_parameterize);
  } else { 
 -  return_direct_with_clo1(data,  k_735717, (((closure)  k_735717)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_735272, (((closure)  k_735272)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_735265, (((closure)  k_735265)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_735717, (((closure)  k_735717)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_735272, (((closure)  k_735272)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_735265, (((closure)  k_735265)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_735717, (((closure)  k_735717)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_735272, (((closure)  k_735272)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_735265, (((closure)  k_735265)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_735717, (((closure)  k_735717)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_735272, (((closure)  k_735272)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_735265, (((closure)  k_735265)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_735717, (((closure)  k_735717)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_735272, (((closure)  k_735272)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_735265, (((closure)  k_735265)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_735717, (((closure)  k_735717)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_735272, (((closure)  k_735272)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_735265, (((closure)  k_735265)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_735717, (((closure)  k_735717)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_735272, (((closure)  k_735272)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_735265, (((closure)  k_735265)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_735717, (((closure)  k_735717)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_735272, (((closure)  k_735272)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_735265, (((closure)  k_735265)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_735717, (((closure)  k_735717)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_735272, (((closure)  k_735272)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_735265, (((closure)  k_735265)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_735717, (((closure)  k_735717)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_735272, (((closure)  k_735272)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_735265, (((closure)  k_735265)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_735717, (((closure)  k_735717)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_735272, (((closure)  k_735272)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_735265, (((closure)  k_735265)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_735717, (((closure)  k_735717)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_735272, (((closure)  k_735272)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_735265, (((closure)  k_735265)->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_672(void *data, object self_7313575, int argc, object *args) /* object self_7313575, object r_735747 */
-+static void __lambda_672(void *data, object self_7312329, int argc, object *args) /* object self_7312329, object r_735302 */
++static void __lambda_672(void *data, object self_7312322, int argc, object *args) /* object self_7312322, object r_735295 */
   {
 - object r_735747 = args[0];
-+ object r_735302 = args[0];
++ object r_735295 = args[0];
    
 -closureN_type c_7320630;
 -object e_7320731 [4];
@@ -38822,29 +38999,29 @@ Make let-values be the same as let*-values, to work around
 -c_7320630.elements[1] = r_735747;
 -c_7320630.elements[2] = ((closureN)self_7313575)->elements[1];
 -c_7320630.elements[3] = ((closureN)self_7313575)->elements[2];
-+closureN_type c_7319337;
-+object e_7319438 [4];
-+c_7319337.hdr.mark = gc_color_red;
-+ c_7319337.hdr.grayed = 0;
-+c_7319337.tag = closureN_tag;
-+ c_7319337.fn = (function_type)__lambda_673;
-+c_7319337.num_args = 1;
-+c_7319337.num_elements = 4;
-+c_7319337.elements = (object *)e_7319438;
-+c_7319337.elements[0] = ((closureN)self_7312329)->elements[0];
-+c_7319337.elements[1] = r_735302;
-+c_7319337.elements[2] = ((closureN)self_7312329)->elements[1];
-+c_7319337.elements[3] = ((closureN)self_7312329)->elements[2];
++closureN_type c_7319330;
++object e_7319431 [4];
++c_7319330.hdr.mark = gc_color_red;
++ c_7319330.hdr.grayed = 0;
++c_7319330.tag = closureN_tag;
++ c_7319330.fn = (function_type)__lambda_673;
++c_7319330.num_args = 1;
++c_7319330.num_elements = 4;
++c_7319330.elements = (object *)e_7319431;
++c_7319330.elements[0] = ((closureN)self_7312322)->elements[0];
++c_7319330.elements[1] = r_735295;
++c_7319330.elements[2] = ((closureN)self_7312322)->elements[1];
++c_7319330.elements[3] = ((closureN)self_7312322)->elements[2];
  
 -return_closcall2(data,  ((closureN)self_7313575)->elements[1],  &c_7320630, quote_p);; 
-+return_closcall2(data,  ((closureN)self_7312329)->elements[1],  &c_7319337, quote_p);; 
++return_closcall2(data,  ((closureN)self_7312322)->elements[1],  &c_7319330, quote_p);; 
  }
  
 -static void __lambda_673(void *data, object self_7313576, int argc, object *args) /* object self_7313576, object r_735766_738593 */
-+static void __lambda_673(void *data, object self_7312330, int argc, object *args) /* object self_7312330, object r_735321_737825 */
++static void __lambda_673(void *data, object self_7312323, int argc, object *args) /* object self_7312323, object r_735314_737818 */
   {
 - object r_735766_738593 = args[0];
-+ object r_735321_737825 = args[0];
++ object r_735314_737818 = args[0];
    
 -closureN_type c_7320633;
 -object e_7320730 [5];
@@ -38860,30 +39037,30 @@ Make let-values be the same as let*-values, to work around
 -c_7320633.elements[2] = r_735766_738593;
 -c_7320633.elements[3] = ((closureN)self_7313576)->elements[2];
 -c_7320633.elements[4] = ((closureN)self_7313576)->elements[3];
-+closureN_type c_7319340;
-+object e_7319437 [5];
-+c_7319340.hdr.mark = gc_color_red;
-+ c_7319340.hdr.grayed = 0;
-+c_7319340.tag = closureN_tag;
-+ c_7319340.fn = (function_type)__lambda_674;
-+c_7319340.num_args = 1;
-+c_7319340.num_elements = 5;
-+c_7319340.elements = (object *)e_7319437;
-+c_7319340.elements[0] = ((closureN)self_7312330)->elements[0];
-+c_7319340.elements[1] = ((closureN)self_7312330)->elements[1];
-+c_7319340.elements[2] = r_735321_737825;
-+c_7319340.elements[3] = ((closureN)self_7312330)->elements[2];
-+c_7319340.elements[4] = ((closureN)self_7312330)->elements[3];
++closureN_type c_7319333;
++object e_7319430 [5];
++c_7319333.hdr.mark = gc_color_red;
++ c_7319333.hdr.grayed = 0;
++c_7319333.tag = closureN_tag;
++ c_7319333.fn = (function_type)__lambda_674;
++c_7319333.num_args = 1;
++c_7319333.num_elements = 5;
++c_7319333.elements = (object *)e_7319430;
++c_7319333.elements[0] = ((closureN)self_7312323)->elements[0];
++c_7319333.elements[1] = ((closureN)self_7312323)->elements[1];
++c_7319333.elements[2] = r_735314_737818;
++c_7319333.elements[3] = ((closureN)self_7312323)->elements[2];
++c_7319333.elements[4] = ((closureN)self_7312323)->elements[3];
  
 -return_closcall2(data,  ((closureN)self_7313576)->elements[2],  &c_7320633, quote_old);; 
-+return_closcall2(data,  ((closureN)self_7312330)->elements[2],  &c_7319340, quote_old);; 
++return_closcall2(data,  ((closureN)self_7312323)->elements[2],  &c_7319333, quote_old);; 
  }
  
 -static void __lambda_674(void *data, object self_7313577, int argc, object *args) /* object self_7313577, object r_735769_738594 */
-+static void __lambda_674(void *data, object self_7312331, int argc, object *args) /* object self_7312331, object r_735324_737826 */
++static void __lambda_674(void *data, object self_7312324, int argc, object *args) /* object self_7312324, object r_735317_737819 */
   {
 - object r_735769_738594 = args[0];
-+ object r_735324_737826 = args[0];
++ object r_735317_737819 = args[0];
    
 -closureN_type c_7320636;
 -object e_7320729 [5];
@@ -38899,54 +39076,54 @@ Make let-values be the same as let*-values, to work around
 -c_7320636.elements[2] = ((closureN)self_7313577)->elements[2];
 -c_7320636.elements[3] = r_735769_738594;
 -c_7320636.elements[4] = ((closureN)self_7313577)->elements[4];
-+closureN_type c_7319343;
-+object e_7319436 [5];
-+c_7319343.hdr.mark = gc_color_red;
-+ c_7319343.hdr.grayed = 0;
-+c_7319343.tag = closureN_tag;
-+ c_7319343.fn = (function_type)__lambda_675;
-+c_7319343.num_args = 1;
-+c_7319343.num_elements = 5;
-+c_7319343.elements = (object *)e_7319436;
-+c_7319343.elements[0] = ((closureN)self_7312331)->elements[0];
-+c_7319343.elements[1] = ((closureN)self_7312331)->elements[1];
-+c_7319343.elements[2] = ((closureN)self_7312331)->elements[2];
-+c_7319343.elements[3] = r_735324_737826;
-+c_7319343.elements[4] = ((closureN)self_7312331)->elements[4];
++closureN_type c_7319336;
++object e_7319429 [5];
++c_7319336.hdr.mark = gc_color_red;
++ c_7319336.hdr.grayed = 0;
++c_7319336.tag = closureN_tag;
++ c_7319336.fn = (function_type)__lambda_675;
++c_7319336.num_args = 1;
++c_7319336.num_elements = 5;
++c_7319336.elements = (object *)e_7319429;
++c_7319336.elements[0] = ((closureN)self_7312324)->elements[0];
++c_7319336.elements[1] = ((closureN)self_7312324)->elements[1];
++c_7319336.elements[2] = ((closureN)self_7312324)->elements[2];
++c_7319336.elements[3] = r_735317_737819;
++c_7319336.elements[4] = ((closureN)self_7312324)->elements[4];
  
 -return_closcall2(data,  ((closureN)self_7313577)->elements[3],  &c_7320636, quote_new);; 
-+return_closcall2(data,  ((closureN)self_7312331)->elements[3],  &c_7319343, quote_new);; 
++return_closcall2(data,  ((closureN)self_7312324)->elements[3],  &c_7319336, quote_new);; 
  }
  
 -static void __lambda_675(void *data, object self_7313578, int argc, object *args) /* object self_7313578, object r_735772_738595 */
-+static void __lambda_675(void *data, object self_7312332, int argc, object *args) /* object self_7312332, object r_735327_737827 */
++static void __lambda_675(void *data, object self_7312325, int argc, object *args) /* object self_7312325, object r_735320_737820 */
   {
 - object r_735772_738595 = args[0];
-+ object r_735327_737827 = args[0];
++ object r_735320_737820 = args[0];
    
 -pair_type local_7320641; 
-+pair_type local_7319348; 
++pair_type local_7319341; 
  
 -pair_type local_7320644; 
-+pair_type local_7319351; 
++pair_type local_7319344; 
  
 -pair_type local_7320648; 
-+pair_type local_7319355; 
++pair_type local_7319348; 
  
 -pair_type local_7320651; 
-+pair_type local_7319358; 
++pair_type local_7319351; 
  
 -make_utf8_string_with_len(c_7320652, "step", 4, 4);
-+make_utf8_string_with_len(c_7319359, "step", 4, 4);
++make_utf8_string_with_len(c_7319352, "step", 4, 4);
  
 -pair_type local_7320655; 
-+pair_type local_7319362; 
++pair_type local_7319355; 
  
 -pair_type local_7320658; 
-+pair_type local_7319365; 
++pair_type local_7319358; 
  
 -pair_type local_7320661; 
-+pair_type local_7319368; 
++pair_type local_7319361; 
  
  
  
@@ -38955,7 +39132,7 @@ Make let-values be the same as let*-values, to work around
  
  
 -pair_type local_7320675; 
-+pair_type local_7319382; 
++pair_type local_7319375; 
  
  
  
@@ -38964,20 +39141,20 @@ Make let-values be the same as let*-values, to work around
  
  
 -pair_type local_7320691; 
-+pair_type local_7319398; 
++pair_type local_7319391; 
  
 -pair_type local_7320695; 
-+pair_type local_7319402; 
++pair_type local_7319395; 
  
 -pair_type local_7320699; 
-+pair_type local_7319406; 
++pair_type local_7319399; 
  
  
  
  
  
 -pair_type local_7320707; 
-+pair_type local_7319414; 
++pair_type local_7319407; 
  
  
  
@@ -38986,7 +39163,7 @@ Make let-values be the same as let*-values, to work around
  
  
 -pair_type local_7320719; 
-+pair_type local_7319426; 
++pair_type local_7319419; 
  
  
  
@@ -38995,33 +39172,33 @@ Make let-values be the same as let*-values, to work around
  
  
 -return_direct_with_clo1(data,  ((closureN)self_7313578)->elements[0], (((closure)  ((closureN)self_7313578)->elements[0])->fn),  set_pair_as_expr(&local_7320641, set_pair_as_expr(&local_7320644, ((closureN)self_7313578)->elements[1], set_pair_as_expr(&local_7320648, set_pair_as_expr(&local_7320651, &c_7320652, NULL), set_pair_as_expr(&local_7320655, set_pair_as_expr(&local_7320658, set_pair_as_expr(&local_7320661, Cyc_car(data, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313578)->elements[4]))))), set_pair_as_expr(&local_7320675, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313578)->elements[4])))))), set_pair_as_expr(&local_7320691, ((closureN)self_7313578)->elements[2], set_pair_as_expr(&local_7320695, ((closureN)self_7313578)->elements[3], set_pair_as_expr(&local_7320699, r_735772_738595, NULL))))), Cyc_car(data, Cyc_cdr(data, ((closureN)self_7313578)->elements[4]))), set_pair_as_expr(&l
ocal_7320707, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313578)->elements[4])))), set_pair_as_expr(&local_7320719, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313578)->elements[4])))), NULL))))), boolean_f));; 
-+return_direct_with_clo1(data,  ((closureN)self_7312332)->elements[0], (((closure)  ((closureN)self_7312332)->elements[0])->fn),  set_pair_as_expr(&local_7319348, set_pair_as_expr(&local_7319351, ((closureN)self_7312332)->elements[1], set_pair_as_expr(&local_7319355, set_pair_as_expr(&local_7319358, &c_7319359, NULL), set_pair_as_expr(&local_7319362, set_pair_as_expr(&local_7319365, set_pair_as_expr(&local_7319368, Cyc_car(data, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312332)->elements[4]))))), set_pair_as_expr(&local_7319382, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312332)->elements[4])))))), set_pair_as_expr(&local_7319398, ((closureN)self_7312332)->elements[2], set_pair_as_expr(&local_7319402, ((closureN)self_7312332)->elements[3], set_pair_as_expr(&local_7319406, r_735327_737827, NULL))))), Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312332)->elements[4]))), set_pair_as_expr(&l
ocal_7319414, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312332)->elements[4])))), set_pair_as_expr(&local_7319426, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312332)->elements[4])))), NULL))))), boolean_f));; 
++return_direct_with_clo1(data,  ((closureN)self_7312325)->elements[0], (((closure)  ((closureN)self_7312325)->elements[0])->fn),  set_pair_as_expr(&local_7319341, set_pair_as_expr(&local_7319344, ((closureN)self_7312325)->elements[1], set_pair_as_expr(&local_7319348, set_pair_as_expr(&local_7319351, &c_7319352, NULL), set_pair_as_expr(&local_7319355, set_pair_as_expr(&local_7319358, set_pair_as_expr(&local_7319361, Cyc_car(data, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312325)->elements[4]))))), set_pair_as_expr(&local_7319375, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312325)->elements[4])))))), set_pair_as_expr(&local_7319391, ((closureN)self_7312325)->elements[2], set_pair_as_expr(&local_7319395, ((closureN)self_7312325)->elements[3], set_pair_as_expr(&local_7319399, r_735320_737820, NULL))))), Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312325)->elements[4]))), set_pair_as_expr(&l
ocal_7319407, Cyc_cdr(data, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312325)->elements[4])))), set_pair_as_expr(&local_7319419, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312325)->elements[4])))), NULL))))), boolean_f));; 
  }
  
 -static void __lambda_625(void *data, object self_7313579, int argc, object *args) /* object self_7313579, object k_735782 */
-+static void __lambda_625(void *data, object self_7312333, int argc, object *args) /* object self_7312333, object k_735337 */
++static void __lambda_625(void *data, object self_7312326, int argc, object *args) /* object self_7312326, object k_735330 */
   {
 - object k_735782 = args[0];
-+ object k_735337 = args[0];
++ object k_735330 = args[0];
      
 -if( (boolean_f != Cyc_is_pair(((closureN)self_7313579)->elements[1])) ){ 
-+if( (boolean_f != Cyc_is_pair(((closureN)self_7312333)->elements[1])) ){ 
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312326)->elements[1])) ){ 
      
    
 -if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7313579)->elements[1]))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7312333)->elements[1]))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7312326)->elements[1]))) ){ 
      
    
    
 -  make_utf8_string_with_len(c_7320002, "step", 4, 4);
 -if( (boolean_f != equalp(Cyc_car(data, Cyc_car(data, ((closureN)self_7313579)->elements[1])), &c_7320002)) ){ 
-+  make_utf8_string_with_len(c_7318709, "step", 4, 4);
-+if( (boolean_f != equalp(Cyc_car(data, Cyc_car(data, ((closureN)self_7312333)->elements[1])), &c_7318709)) ){ 
++  make_utf8_string_with_len(c_7318702, "step", 4, 4);
++if( (boolean_f != equalp(Cyc_car(data, Cyc_car(data, ((closureN)self_7312326)->elements[1])), &c_7318702)) ){ 
      
    
    
 -if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, ((closureN)self_7313579)->elements[1])))) ){ 
-+if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, ((closureN)self_7312333)->elements[1])))) ){ 
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, ((closureN)self_7312326)->elements[1])))) ){ 
    
 -closureN_type c_7320011;
 -object e_7320503 [2];
@@ -39034,48 +39211,48 @@ Make let-values be the same as let*-values, to work around
 -c_7320011.elements = (object *)e_7320503;
 -c_7320011.elements[0] = k_735782;
 -c_7320011.elements[1] = ((closureN)self_7313579)->elements[0];
-+closureN_type c_7318718;
-+object e_7319210 [2];
-+c_7318718.hdr.mark = gc_color_red;
-+ c_7318718.hdr.grayed = 0;
-+c_7318718.tag = closureN_tag;
-+ c_7318718.fn = (function_type)__lambda_626;
-+c_7318718.num_args = 1;
-+c_7318718.num_elements = 2;
-+c_7318718.elements = (object *)e_7319210;
-+c_7318718.elements[0] = k_735337;
-+c_7318718.elements[1] = ((closureN)self_7312333)->elements[0];
++closureN_type c_7318711;
++object e_7319203 [2];
++c_7318711.hdr.mark = gc_color_red;
++ c_7318711.hdr.grayed = 0;
++c_7318711.tag = closureN_tag;
++ c_7318711.fn = (function_type)__lambda_626;
++c_7318711.num_args = 1;
++c_7318711.num_elements = 2;
++c_7318711.elements = (object *)e_7319203;
++c_7318711.elements[0] = k_735330;
++c_7318711.elements[1] = ((closureN)self_7312326)->elements[0];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7320011,__lambda_626,  Cyc_cdr(data, ((closureN)self_7313579)->elements[1]));
-+return_direct_with_clo1(data,(closure)&c_7318718,__lambda_626,  Cyc_cdr(data, ((closureN)self_7312333)->elements[1]));
++return_direct_with_clo1(data,(closure)&c_7318711,__lambda_626,  Cyc_cdr(data, ((closureN)self_7312326)->elements[1]));
  } else { 
 -  return_direct_with_clo1(data,  k_735782, (((closure)  k_735782)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_735337, (((closure)  k_735337)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_735330, (((closure)  k_735330)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_735782, (((closure)  k_735782)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_735337, (((closure)  k_735337)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_735330, (((closure)  k_735330)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_735782, (((closure)  k_735782)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_735337, (((closure)  k_735337)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_735330, (((closure)  k_735330)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_735782, (((closure)  k_735782)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_735337, (((closure)  k_735337)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_735330, (((closure)  k_735330)->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_626(void *data, object self_7313580, int argc, object *args) /* object self_7313580, object v_935_73773_73912_731032_733367 */
-+static void __lambda_626(void *data, object self_7312334, int argc, object *args) /* object self_7312334, object v_935_73774_73913_731033_733027 */
++static void __lambda_626(void *data, object self_7312327, int argc, object *args) /* object self_7312327, object v_935_73773_73912_731032_733020 */
   {
 - object v_935_73773_73912_731032_733367 = args[0];
-+ object v_935_73774_73913_731033_733027 = args[0];
++ object v_935_73773_73912_731032_733020 = args[0];
      
 -if( (boolean_f != Cyc_is_pair(v_935_73773_73912_731032_733367)) ){ 
-+if( (boolean_f != Cyc_is_pair(v_935_73774_73913_731033_733027)) ){ 
++if( (boolean_f != Cyc_is_pair(v_935_73773_73912_731032_733020)) ){ 
    
 -closureN_type c_7320015;
 -object e_7320498 [3];
@@ -39089,34 +39266,34 @@ Make let-values be the same as let*-values, to work around
 -c_7320015.elements[0] = ((closureN)self_7313580)->elements[0];
 -c_7320015.elements[1] = ((closureN)self_7313580)->elements[1];
 -c_7320015.elements[2] = v_935_73773_73912_731032_733367;
-+closureN_type c_7318722;
-+object e_7319205 [3];
-+c_7318722.hdr.mark = gc_color_red;
-+ c_7318722.hdr.grayed = 0;
-+c_7318722.tag = closureN_tag;
-+ c_7318722.fn = (function_type)__lambda_627;
-+c_7318722.num_args = 6;
-+c_7318722.num_elements = 3;
-+c_7318722.elements = (object *)e_7319205;
-+c_7318722.elements[0] = ((closureN)self_7312334)->elements[0];
-+c_7318722.elements[1] = ((closureN)self_7312334)->elements[1];
-+c_7318722.elements[2] = v_935_73774_73913_731033_733027;
++closureN_type c_7318715;
++object e_7319198 [3];
++c_7318715.hdr.mark = gc_color_red;
++ c_7318715.hdr.grayed = 0;
++c_7318715.tag = closureN_tag;
++ c_7318715.fn = (function_type)__lambda_627;
++c_7318715.num_args = 6;
++c_7318715.num_elements = 3;
++c_7318715.elements = (object *)e_7319198;
++c_7318715.elements[0] = ((closureN)self_7312327)->elements[0];
++c_7318715.elements[1] = ((closureN)self_7312327)->elements[1];
++c_7318715.elements[2] = v_935_73773_73912_731032_733020;
  
  
  
 -return_direct_with_clo6(data,(closure)&c_7320015,__lambda_627,  Cyc_car(data, v_935_73773_73912_731032_733367), NULL, NULL, NULL, NULL, NULL);
-+return_direct_with_clo6(data,(closure)&c_7318722,__lambda_627,  Cyc_car(data, v_935_73774_73913_731033_733027), NULL, NULL, NULL, NULL, NULL);
++return_direct_with_clo6(data,(closure)&c_7318715,__lambda_627,  Cyc_car(data, v_935_73773_73912_731032_733020), NULL, NULL, NULL, NULL, NULL);
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7313580)->elements[0], (((closure)  ((closureN)self_7313580)->elements[0])->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  ((closureN)self_7312334)->elements[0], (((closure)  ((closureN)self_7312334)->elements[0])->fn),  boolean_f);}
++  return_direct_with_clo1(data,  ((closureN)self_7312327)->elements[0], (((closure)  ((closureN)self_7312327)->elements[0])->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_627(void *data, object self_7313581, int argc, object *args) /* object self_7313581, object w_937_73775_73916_731034_733369, object param_91ls9_73777_73917_731035_733370, object value_91ls10_73778_73918_731036_733371, object p_91ls11_73779_73919_731037_733372, object old_91ls12_73780_73920_731038_733373, object new_91ls13_73781_73921_731039_733374 */
-+static void __lambda_627(void *data, object self_7312335, int argc, object *args) /* object self_7312335, object w_937_73776_73917_731035_733029, object param_91ls9_73778_73918_731036_733030, object value_91ls10_73779_73919_731037_733031, object p_91ls11_73780_73920_731038_733032, object old_91ls12_73781_73921_731039_733033, object new_91ls13_73782_73922_731040_733034 */
++static void __lambda_627(void *data, object self_7312328, int argc, object *args) /* object self_7312328, object w_937_73775_73916_731034_733022, object param_91ls9_73777_73917_731035_733023, object value_91ls10_73778_73918_731036_733024, object p_91ls11_73779_73919_731037_733025, object old_91ls12_73780_73920_731038_733026, object new_91ls13_73781_73921_731039_733027 */
   {
 - object w_937_73775_73916_731034_733369 = args[0]; object param_91ls9_73777_73917_731035_733370 = args[1]; object value_91ls10_73778_73918_731036_733371 = args[2]; object p_91ls11_73779_73919_731037_733372 = args[3]; object old_91ls12_73780_73920_731038_733373 = args[4]; object new_91ls13_73781_73921_731039_733374 = args[5];
-+ object w_937_73776_73917_731035_733029 = args[0]; object param_91ls9_73778_73918_731036_733030 = args[1]; object value_91ls10_73779_73919_731037_733031 = args[2]; object p_91ls11_73780_73920_731038_733032 = args[3]; object old_91ls12_73781_73921_731039_733033 = args[4]; object new_91ls13_73782_73922_731040_733034 = args[5];
++ object w_937_73775_73916_731034_733022 = args[0]; object param_91ls9_73777_73917_731035_733023 = args[1]; object value_91ls10_73778_73918_731036_733024 = args[2]; object p_91ls11_73779_73919_731037_733025 = args[3]; object old_91ls12_73780_73920_731038_733026 = args[4]; object new_91ls13_73781_73921_731039_733027 = args[5];
    
 -closureN_type c_7320017;
 -object e_7320497 [9];
@@ -39136,34 +39313,34 @@ Make let-values be the same as let*-values, to work around
 -c_7320017.elements[6] = ((closureN)self_7313581)->elements[2];
 -c_7320017.elements[7] = value_91ls10_73778_73918_731036_733371;
 -c_7320017.elements[8] = w_937_73775_73916_731034_733369;
-+closureN_type c_7318724;
-+object e_7319204 [9];
-+c_7318724.hdr.mark = gc_color_red;
-+ c_7318724.hdr.grayed = 0;
-+c_7318724.tag = closureN_tag;
-+ c_7318724.fn = (function_type)__lambda_628;
-+c_7318724.num_args = 1;
-+c_7318724.num_elements = 9;
-+c_7318724.elements = (object *)e_7319204;
-+c_7318724.elements[0] = ((closureN)self_7312335)->elements[0];
-+c_7318724.elements[1] = new_91ls13_73782_73922_731040_733034;
-+c_7318724.elements[2] = old_91ls12_73781_73921_731039_733033;
-+c_7318724.elements[3] = p_91ls11_73780_73920_731038_733032;
-+c_7318724.elements[4] = param_91ls9_73778_73918_731036_733030;
-+c_7318724.elements[5] = ((closureN)self_7312335)->elements[1];
-+c_7318724.elements[6] = ((closureN)self_7312335)->elements[2];
-+c_7318724.elements[7] = value_91ls10_73779_73919_731037_733031;
-+c_7318724.elements[8] = w_937_73776_73917_731035_733029;
++closureN_type c_7318717;
++object e_7319197 [9];
++c_7318717.hdr.mark = gc_color_red;
++ c_7318717.hdr.grayed = 0;
++c_7318717.tag = closureN_tag;
++ c_7318717.fn = (function_type)__lambda_628;
++c_7318717.num_args = 1;
++c_7318717.num_elements = 9;
++c_7318717.elements = (object *)e_7319197;
++c_7318717.elements[0] = ((closureN)self_7312328)->elements[0];
++c_7318717.elements[1] = new_91ls13_73781_73921_731039_733027;
++c_7318717.elements[2] = old_91ls12_73780_73920_731038_733026;
++c_7318717.elements[3] = p_91ls11_73779_73919_731037_733025;
++c_7318717.elements[4] = param_91ls9_73777_73917_731035_733023;
++c_7318717.elements[5] = ((closureN)self_7312328)->elements[1];
++c_7318717.elements[6] = ((closureN)self_7312328)->elements[2];
++c_7318717.elements[7] = value_91ls10_73778_73918_731036_733024;
++c_7318717.elements[8] = w_937_73775_73916_731034_733022;
  
 -return_direct_with_clo1(data,(closure)&c_7320017,__lambda_628,  boolean_f);; 
-+return_direct_with_clo1(data,(closure)&c_7318724,__lambda_628,  boolean_f);; 
++return_direct_with_clo1(data,(closure)&c_7318717,__lambda_628,  boolean_f);; 
  }
  
 -static void __lambda_628(void *data, object self_7313582, int argc, object *args) /* object self_7313582, object lp_938_73776_73922_731040_733375 */
-+static void __lambda_628(void *data, object self_7312336, int argc, object *args) /* object self_7312336, object lp_938_73777_73923_731041_733035 */
++static void __lambda_628(void *data, object self_7312329, int argc, object *args) /* object self_7312329, object lp_938_73776_73922_731040_733028 */
   {
 - object lp_938_73776_73922_731040_733375 = args[0];
-+ object lp_938_73777_73923_731041_733035 = args[0];
++ object lp_938_73776_73922_731040_733028 = args[0];
    
 -closureN_type c_7320019;
 -object e_7320493 [9];
@@ -39183,37 +39360,37 @@ Make let-values be the same as let*-values, to work around
 -c_7320019.elements[6] = ((closureN)self_7313582)->elements[6];
 -c_7320019.elements[7] = ((closureN)self_7313582)->elements[7];
 -c_7320019.elements[8] = ((closureN)self_7313582)->elements[8];
-+closureN_type c_7318726;
-+object e_7319200 [9];
-+c_7318726.hdr.mark = gc_color_red;
-+ c_7318726.hdr.grayed = 0;
-+c_7318726.tag = closureN_tag;
-+ c_7318726.fn = (function_type)__lambda_1355;
-+c_7318726.num_args = 1;
-+c_7318726.num_elements = 9;
-+c_7318726.elements = (object *)e_7319200;
-+c_7318726.elements[0] = ((closureN)self_7312336)->elements[0];
-+c_7318726.elements[1] = ((closureN)self_7312336)->elements[1];
-+c_7318726.elements[2] = ((closureN)self_7312336)->elements[2];
-+c_7318726.elements[3] = ((closureN)self_7312336)->elements[3];
-+c_7318726.elements[4] = ((closureN)self_7312336)->elements[4];
-+c_7318726.elements[5] = ((closureN)self_7312336)->elements[5];
-+c_7318726.elements[6] = ((closureN)self_7312336)->elements[6];
-+c_7318726.elements[7] = ((closureN)self_7312336)->elements[7];
-+c_7318726.elements[8] = ((closureN)self_7312336)->elements[8];
++closureN_type c_7318719;
++object e_7319193 [9];
++c_7318719.hdr.mark = gc_color_red;
++ c_7318719.hdr.grayed = 0;
++c_7318719.tag = closureN_tag;
++ c_7318719.fn = (function_type)__lambda_1355;
++c_7318719.num_args = 1;
++c_7318719.num_elements = 9;
++c_7318719.elements = (object *)e_7319193;
++c_7318719.elements[0] = ((closureN)self_7312329)->elements[0];
++c_7318719.elements[1] = ((closureN)self_7312329)->elements[1];
++c_7318719.elements[2] = ((closureN)self_7312329)->elements[2];
++c_7318719.elements[3] = ((closureN)self_7312329)->elements[3];
++c_7318719.elements[4] = ((closureN)self_7312329)->elements[4];
++c_7318719.elements[5] = ((closureN)self_7312329)->elements[5];
++c_7318719.elements[6] = ((closureN)self_7312329)->elements[6];
++c_7318719.elements[7] = ((closureN)self_7312329)->elements[7];
++c_7318719.elements[8] = ((closureN)self_7312329)->elements[8];
  
  
 -pair_type local_7320496; 
 -return_direct_with_clo1(data,(closure)&c_7320019,__lambda_1402,  set_cell_as_expr(&local_7320496, lp_938_73776_73922_731040_733375));; 
-+pair_type local_7319203; 
-+return_direct_with_clo1(data,(closure)&c_7318726,__lambda_1355,  set_cell_as_expr(&local_7319203, lp_938_73777_73923_731041_733035));; 
++pair_type local_7319196; 
++return_direct_with_clo1(data,(closure)&c_7318719,__lambda_1355,  set_cell_as_expr(&local_7319196, lp_938_73776_73922_731040_733028));; 
  }
  
 -static void __lambda_1402(void *data, object self_7313583, int argc, object *args) /* object self_7313583, object lp_938_73776_73922_731040_733375 */
-+static void __lambda_1355(void *data, object self_7312337, int argc, object *args) /* object self_7312337, object lp_938_73777_73923_731041_733035 */
++static void __lambda_1355(void *data, object self_7312330, int argc, object *args) /* object self_7312330, object lp_938_73776_73922_731040_733028 */
   {
 - object lp_938_73776_73922_731040_733375 = args[0];
-+ object lp_938_73777_73923_731041_733035 = args[0];
++ object lp_938_73776_73922_731040_733028 = args[0];
    
 -closureN_type c_7320021;
 -object e_7320039 [8];
@@ -39232,23 +39409,23 @@ Make let-values be the same as let*-values, to work around
 -c_7320021.elements[5] = ((closureN)self_7313583)->elements[4];
 -c_7320021.elements[6] = ((closureN)self_7313583)->elements[7];
 -c_7320021.elements[7] = ((closureN)self_7313583)->elements[8];
-+closureN_type c_7318728;
-+object e_7318746 [8];
-+c_7318728.hdr.mark = gc_color_red;
-+ c_7318728.hdr.grayed = 0;
-+c_7318728.tag = closureN_tag;
-+ c_7318728.fn = (function_type)__lambda_629;
-+c_7318728.num_args = 1;
-+c_7318728.num_elements = 8;
-+c_7318728.elements = (object *)e_7318746;
-+c_7318728.elements[0] = ((closureN)self_7312337)->elements[0];
-+c_7318728.elements[1] = lp_938_73777_73923_731041_733035;
-+c_7318728.elements[2] = ((closureN)self_7312337)->elements[1];
-+c_7318728.elements[3] = ((closureN)self_7312337)->elements[2];
-+c_7318728.elements[4] = ((closureN)self_7312337)->elements[3];
-+c_7318728.elements[5] = ((closureN)self_7312337)->elements[4];
-+c_7318728.elements[6] = ((closureN)self_7312337)->elements[7];
-+c_7318728.elements[7] = ((closureN)self_7312337)->elements[8];
++closureN_type c_7318721;
++object e_7318739 [8];
++c_7318721.hdr.mark = gc_color_red;
++ c_7318721.hdr.grayed = 0;
++c_7318721.tag = closureN_tag;
++ c_7318721.fn = (function_type)__lambda_629;
++c_7318721.num_args = 1;
++c_7318721.num_elements = 8;
++c_7318721.elements = (object *)e_7318739;
++c_7318721.elements[0] = ((closureN)self_7312330)->elements[0];
++c_7318721.elements[1] = lp_938_73776_73922_731040_733028;
++c_7318721.elements[2] = ((closureN)self_7312330)->elements[1];
++c_7318721.elements[3] = ((closureN)self_7312330)->elements[2];
++c_7318721.elements[4] = ((closureN)self_7312330)->elements[3];
++c_7318721.elements[5] = ((closureN)self_7312330)->elements[4];
++c_7318721.elements[6] = ((closureN)self_7312330)->elements[7];
++c_7318721.elements[7] = ((closureN)self_7312330)->elements[8];
  
  
 -closureN_type c_7320040;
@@ -39263,31 +39440,31 @@ Make let-values be the same as let*-values, to work around
 -c_7320040.elements[0] = lp_938_73776_73922_731040_733375;
 -c_7320040.elements[1] = ((closureN)self_7313583)->elements[5];
 -c_7320040.elements[2] = ((closureN)self_7313583)->elements[6];
-+closureN_type c_7318747;
-+object e_7319199 [3];
-+c_7318747.hdr.mark = gc_color_red;
-+ c_7318747.hdr.grayed = 0;
-+c_7318747.tag = closureN_tag;
-+ c_7318747.fn = (function_type)__lambda_631;
-+c_7318747.num_args = 6;
-+c_7318747.num_elements = 3;
-+c_7318747.elements = (object *)e_7319199;
-+c_7318747.elements[0] = lp_938_73777_73923_731041_733035;
-+c_7318747.elements[1] = ((closureN)self_7312337)->elements[5];
-+c_7318747.elements[2] = ((closureN)self_7312337)->elements[6];
++closureN_type c_7318740;
++object e_7319192 [3];
++c_7318740.hdr.mark = gc_color_red;
++ c_7318740.hdr.grayed = 0;
++c_7318740.tag = closureN_tag;
++ c_7318740.fn = (function_type)__lambda_631;
++c_7318740.num_args = 6;
++c_7318740.num_elements = 3;
++c_7318740.elements = (object *)e_7319192;
++c_7318740.elements[0] = lp_938_73776_73922_731040_733028;
++c_7318740.elements[1] = ((closureN)self_7312330)->elements[5];
++c_7318740.elements[2] = ((closureN)self_7312330)->elements[6];
  
 -return_direct_with_clo1(data,(closure)&c_7320021,__lambda_629,  &c_7320040);; 
-+return_direct_with_clo1(data,(closure)&c_7318728,__lambda_629,  &c_7318747);; 
++return_direct_with_clo1(data,(closure)&c_7318721,__lambda_629,  &c_7318740);; 
  }
  
 -static void __lambda_631(void *data, object self_7313584, int argc, object *args) /* object self_7313584, object k_735800, object w_937_73775_73923_731041_733376, object param_91ls9_73777_73924_731042_733377, object value_91ls10_73778_73925_731043_733378, object p_91ls11_73779_73926_731044_733379, object old_91ls12_73780_73927_731045_733380, object new_91ls13_73781_73928_731046_733381 */
-+static void __lambda_631(void *data, object self_7312338, int argc, object *args) /* object self_7312338, object k_735355, object w_937_73776_73924_731042_733036, object param_91ls9_73778_73925_731043_733037, object value_91ls10_73779_73926_731044_733038, object p_91ls11_73780_73927_731045_733039, object old_91ls12_73781_73928_731046_733040, object new_91ls13_73782_73929_731047_733041 */
++static void __lambda_631(void *data, object self_7312331, int argc, object *args) /* object self_7312331, object k_735348, object w_937_73775_73923_731041_733029, object param_91ls9_73777_73924_731042_733030, object value_91ls10_73778_73925_731043_733031, object p_91ls11_73779_73926_731044_733032, object old_91ls12_73780_73927_731045_733033, object new_91ls13_73781_73928_731046_733034 */
   {
 - object k_735800 = args[0]; object w_937_73775_73923_731041_733376 = args[1]; object param_91ls9_73777_73924_731042_733377 = args[2]; object value_91ls10_73778_73925_731043_733378 = args[3]; object p_91ls11_73779_73926_731044_733379 = args[4]; object old_91ls12_73780_73927_731045_733380 = args[5]; object new_91ls13_73781_73928_731046_733381 = args[6];
-+ object k_735355 = args[0]; object w_937_73776_73924_731042_733036 = args[1]; object param_91ls9_73778_73925_731043_733037 = args[2]; object value_91ls10_73779_73926_731044_733038 = args[3]; object p_91ls11_73780_73927_731045_733039 = args[4]; object old_91ls12_73781_73928_731046_733040 = args[5]; object new_91ls13_73782_73929_731047_733041 = args[6];
++ object k_735348 = args[0]; object w_937_73775_73923_731041_733029 = args[1]; object param_91ls9_73777_73924_731042_733030 = args[2]; object value_91ls10_73778_73925_731043_733031 = args[3]; object p_91ls11_73779_73926_731044_733032 = args[4]; object old_91ls12_73780_73927_731045_733033 = args[5]; object new_91ls13_73781_73928_731046_733034 = args[6];
      
 -if( (boolean_f != Cyc_is_null(w_937_73775_73923_731041_733376)) ){ 
-+if( (boolean_f != Cyc_is_null(w_937_73776_73924_731042_733036)) ){ 
++if( (boolean_f != Cyc_is_null(w_937_73775_73923_731041_733029)) ){ 
    
 -closureN_type c_7320044;
 -object e_7320367 [7];
@@ -39305,51 +39482,51 @@ Make let-values be the same as let*-values, to work around
 -c_7320044.elements[4] = ((closureN)self_7313584)->elements[1];
 -c_7320044.elements[5] = ((closureN)self_7313584)->elements[2];
 -c_7320044.elements[6] = value_91ls10_73778_73925_731043_733378;
-+closureN_type c_7318751;
-+object e_7319074 [7];
-+c_7318751.hdr.mark = gc_color_red;
-+ c_7318751.hdr.grayed = 0;
-+c_7318751.tag = closureN_tag;
-+ c_7318751.fn = (function_type)__lambda_632;
-+c_7318751.num_args = 1;
-+c_7318751.num_elements = 7;
-+c_7318751.elements = (object *)e_7319074;
-+c_7318751.elements[0] = k_735355;
-+c_7318751.elements[1] = new_91ls13_73782_73929_731047_733041;
-+c_7318751.elements[2] = old_91ls12_73781_73928_731046_733040;
-+c_7318751.elements[3] = p_91ls11_73780_73927_731045_733039;
-+c_7318751.elements[4] = ((closureN)self_7312338)->elements[1];
-+c_7318751.elements[5] = ((closureN)self_7312338)->elements[2];
-+c_7318751.elements[6] = value_91ls10_73779_73926_731044_733038;
++closureN_type c_7318744;
++object e_7319067 [7];
++c_7318744.hdr.mark = gc_color_red;
++ c_7318744.hdr.grayed = 0;
++c_7318744.tag = closureN_tag;
++ c_7318744.fn = (function_type)__lambda_632;
++c_7318744.num_args = 1;
++c_7318744.num_elements = 7;
++c_7318744.elements = (object *)e_7319067;
++c_7318744.elements[0] = k_735348;
++c_7318744.elements[1] = new_91ls13_73781_73928_731046_733034;
++c_7318744.elements[2] = old_91ls12_73780_73927_731045_733033;
++c_7318744.elements[3] = p_91ls11_73779_73926_731044_733032;
++c_7318744.elements[4] = ((closureN)self_7312331)->elements[1];
++c_7318744.elements[5] = ((closureN)self_7312331)->elements[2];
++c_7318744.elements[6] = value_91ls10_73778_73925_731043_733031;
  
 -return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7320044, primitive_cons, NULL, param_91ls9_73777_73924_731042_733377);
-+return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7318751, primitive_cons, NULL, param_91ls9_73778_73925_731043_733037);
++return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7318744, primitive_cons, NULL, param_91ls9_73777_73924_731042_733030);
  } else { 
      
 -if( (boolean_f != Cyc_is_pair(w_937_73775_73923_731041_733376)) ){ 
-+if( (boolean_f != Cyc_is_pair(w_937_73776_73924_731042_733036)) ){ 
++if( (boolean_f != Cyc_is_pair(w_937_73775_73923_731041_733029)) ){ 
      
    
 -if( (boolean_f != Cyc_is_pair(Cyc_car(data, w_937_73775_73923_731041_733376))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_car(data, w_937_73776_73924_731042_733036))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, w_937_73775_73923_731041_733029))) ){ 
      
    
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, w_937_73775_73923_731041_733376)))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, w_937_73776_73924_731042_733036)))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_car(data, w_937_73775_73923_731041_733029)))) ){ 
      
    
    
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_937_73775_73923_731041_733376))))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_937_73776_73924_731042_733036))))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_937_73775_73923_731041_733029))))) ){ 
      
    
    
    
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_937_73775_73923_731041_733376)))))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_937_73776_73924_731042_733036)))))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_937_73775_73923_731041_733029)))))) ){ 
      
    
    
@@ -39357,7 +39534,7 @@ Make let-values be the same as let*-values, to work around
    
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_937_73775_73923_731041_733376))))))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_937_73776_73924_731042_733036))))))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_937_73775_73923_731041_733029))))))) ){ 
      
    
    
@@ -39366,21 +39543,21 @@ Make let-values be the same as let*-values, to work around
    
    
 -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_73775_73923_731041_733376)))))))) ){ 
-+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_73776_73924_731042_733036)))))))) ){ 
++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_73775_73923_731041_733029)))))))) ){ 
    
  
  
  
  
 -pair_type local_7320432; 
-+pair_type local_7319139; 
++pair_type local_7319132; 
  
  
  
  
  
 -pair_type local_7320439; 
-+pair_type local_7319146; 
++pair_type local_7319139; 
  
  
  
@@ -39389,7 +39566,7 @@ Make let-values be the same as let*-values, to work around
  
  
 -pair_type local_7320448; 
-+pair_type local_7319155; 
++pair_type local_7319148; 
  
  
  
@@ -39398,7 +39575,7 @@ Make let-values be the same as let*-values, to work around
  
  
 -pair_type local_7320459; 
-+pair_type local_7319166; 
++pair_type local_7319159; 
  
  
  
@@ -39407,7 +39584,7 @@ Make let-values be the same as let*-values, to work around
  
  
 -pair_type local_7320472; 
-+pair_type local_7319179; 
++pair_type local_7319172; 
  
  
  
@@ -39416,43 +39593,43 @@ Make let-values be the same as let*-values, to work around
  
  
 -return_closcall7(data,  car(((closureN)self_7313584)->elements[0]),  k_735800, Cyc_cdr(data, w_937_73775_73923_731041_733376), set_pair_as_expr(&local_7320432, Cyc_car(data, Cyc_car(data, w_937_73775_73923_731041_733376)), param_91ls9_73777_73924_731042_733377), set_pair_as_expr(&local_7320439, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, w_937_73775_73923_731041_733376))), value_91ls10_73778_73925_731043_733378), set_pair_as_expr(&local_7320448, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_937_73775_73923_731041_733376)))), p_91ls11_73779_73926_731044_733379), set_pair_as_expr(&local_7320459, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_937_73775_73923_731041_733376))))), old_91ls12_73780_73927_731045_733380), set_pair_as_expr(&local_7320472, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_937_73775_73923_731041_733376)))))), new_91ls13_73781_73928_731046_733381));
-+return_closcall7(data,  car(((closureN)self_7312338)->elements[0]),  k_735355, Cyc_cdr(data, w_937_73776_73924_731042_733036), set_pair_as_expr(&local_7319139, Cyc_car(data, Cyc_car(data, w_937_73776_73924_731042_733036)), param_91ls9_73778_73925_731043_733037), set_pair_as_expr(&local_7319146, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, w_937_73776_73924_731042_733036))), value_91ls10_73779_73926_731044_733038), set_pair_as_expr(&local_7319155, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_937_73776_73924_731042_733036)))), p_91ls11_73780_73927_731045_733039), set_pair_as_expr(&local_7319166, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_937_73776_73924_731042_733036))))), old_91ls12_73781_73928_731046_733040), set_pair_as_expr(&local_7319179, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_937_73776_73924_731042_733036)))))), new_91ls13_73782_73929_731047_733041));
++return_closcall7(data,  car(((closureN)self_7312331)->elements[0]),  k_735348, Cyc_cdr(data, w_937_73775_73923_731041_733029), set_pair_as_expr(&local_7319132, Cyc_car(data, Cyc_car(data, w_937_73775_73923_731041_733029)), param_91ls9_73777_73924_731042_733030), set_pair_as_expr(&local_7319139, Cyc_car(data, Cyc_cdr(data, Cyc_car(data, w_937_73775_73923_731041_733029))), value_91ls10_73778_73925_731043_733031), set_pair_as_expr(&local_7319148, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_937_73775_73923_731041_733029)))), p_91ls11_73779_73926_731044_733032), set_pair_as_expr(&local_7319159, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_937_73775_73923_731041_733029))))), old_91ls12_73780_73927_731045_733033), set_pair_as_expr(&local_7319172, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, Cyc_car(data, w_937_73775_73923_731041_733029)))))), new_91ls13_73781_73928_731046_733034));
  } else { 
 -  return_direct_with_clo1(data,  k_735800, (((closure)  k_735800)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_735355, (((closure)  k_735355)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_735348, (((closure)  k_735348)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_735800, (((closure)  k_735800)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_735355, (((closure)  k_735355)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_735348, (((closure)  k_735348)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_735800, (((closure)  k_735800)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_735355, (((closure)  k_735355)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_735348, (((closure)  k_735348)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_735800, (((closure)  k_735800)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_735355, (((closure)  k_735355)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_735348, (((closure)  k_735348)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_735800, (((closure)  k_735800)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_735355, (((closure)  k_735355)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_735348, (((closure)  k_735348)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_735800, (((closure)  k_735800)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_735355, (((closure)  k_735355)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_735348, (((closure)  k_735348)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_735800, (((closure)  k_735800)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_735355, (((closure)  k_735355)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_735348, (((closure)  k_735348)->fn),  boolean_f);}
  ;}
  ;; 
  }
  
 -static void __lambda_632(void *data, object self_7313585, int argc, object *args) /* object self_7313585, object r_735802_7312656 */
-+static void __lambda_632(void *data, object self_7312339, int argc, object *args) /* object self_7312339, object r_735357_7311410 */
++static void __lambda_632(void *data, object self_7312332, int argc, object *args) /* object self_7312332, object r_735350_7311403 */
   {
 - object r_735802_7312656 = args[0];
-+ object r_735357_7311410 = args[0];
++ object r_735350_7311403 = args[0];
    
 -closureN_type c_7320046;
 -object e_7320365 [7];
@@ -39470,32 +39647,32 @@ Make let-values be the same as let*-values, to work around
 -c_7320046.elements[4] = r_735802_7312656;
 -c_7320046.elements[5] = ((closureN)self_7313585)->elements[4];
 -c_7320046.elements[6] = ((closureN)self_7313585)->elements[5];
-+closureN_type c_7318753;
-+object e_7319072 [7];
-+c_7318753.hdr.mark = gc_color_red;
-+ c_7318753.hdr.grayed = 0;
-+c_7318753.tag = closureN_tag;
-+ c_7318753.fn = (function_type)__lambda_633;
-+c_7318753.num_args = 1;
-+c_7318753.num_elements = 7;
-+c_7318753.elements = (object *)e_7319072;
-+c_7318753.elements[0] = ((closureN)self_7312339)->elements[0];
-+c_7318753.elements[1] = ((closureN)self_7312339)->elements[1];
-+c_7318753.elements[2] = ((closureN)self_7312339)->elements[2];
-+c_7318753.elements[3] = ((closureN)self_7312339)->elements[3];
-+c_7318753.elements[4] = r_735357_7311410;
-+c_7318753.elements[5] = ((closureN)self_7312339)->elements[4];
-+c_7318753.elements[6] = ((closureN)self_7312339)->elements[5];
++closureN_type c_7318746;
++object e_7319065 [7];
++c_7318746.hdr.mark = gc_color_red;
++ c_7318746.hdr.grayed = 0;
++c_7318746.tag = closureN_tag;
++ c_7318746.fn = (function_type)__lambda_633;
++c_7318746.num_args = 1;
++c_7318746.num_elements = 7;
++c_7318746.elements = (object *)e_7319065;
++c_7318746.elements[0] = ((closureN)self_7312332)->elements[0];
++c_7318746.elements[1] = ((closureN)self_7312332)->elements[1];
++c_7318746.elements[2] = ((closureN)self_7312332)->elements[2];
++c_7318746.elements[3] = ((closureN)self_7312332)->elements[3];
++c_7318746.elements[4] = r_735350_7311403;
++c_7318746.elements[5] = ((closureN)self_7312332)->elements[4];
++c_7318746.elements[6] = ((closureN)self_7312332)->elements[5];
  
 -return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7320046, primitive_cons, NULL, ((closureN)self_7313585)->elements[6]);; 
-+return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7318753, primitive_cons, NULL, ((closureN)self_7312339)->elements[6]);; 
++return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7318746, primitive_cons, NULL, ((closureN)self_7312332)->elements[6]);; 
  }
  
 -static void __lambda_633(void *data, object self_7313586, int argc, object *args) /* object self_7313586, object r_735803_7312657_7312707 */
-+static void __lambda_633(void *data, object self_7312340, int argc, object *args) /* object self_7312340, object r_735358_7311411_7311461 */
++static void __lambda_633(void *data, object self_7312333, int argc, object *args) /* object self_7312333, object r_735351_7311404_7311454 */
   {
 - object r_735803_7312657_7312707 = args[0];
-+ object r_735358_7311411_7311461 = args[0];
++ object r_735351_7311404_7311454 = args[0];
    
 -closureN_type c_7320048;
 -object e_7320363 [7];
@@ -39513,32 +39690,32 @@ Make let-values be the same as let*-values, to work around
 -c_7320048.elements[4] = r_735803_7312657_7312707;
 -c_7320048.elements[5] = ((closureN)self_7313586)->elements[5];
 -c_7320048.elements[6] = ((closureN)self_7313586)->elements[6];
-+closureN_type c_7318755;
-+object e_7319070 [7];
-+c_7318755.hdr.mark = gc_color_red;
-+ c_7318755.hdr.grayed = 0;
-+c_7318755.tag = closureN_tag;
-+ c_7318755.fn = (function_type)__lambda_634;
-+c_7318755.num_args = 1;
-+c_7318755.num_elements = 7;
-+c_7318755.elements = (object *)e_7319070;
-+c_7318755.elements[0] = ((closureN)self_7312340)->elements[0];
-+c_7318755.elements[1] = ((closureN)self_7312340)->elements[1];
-+c_7318755.elements[2] = ((closureN)self_7312340)->elements[2];
-+c_7318755.elements[3] = ((closureN)self_7312340)->elements[4];
-+c_7318755.elements[4] = r_735358_7311411_7311461;
-+c_7318755.elements[5] = ((closureN)self_7312340)->elements[5];
-+c_7318755.elements[6] = ((closureN)self_7312340)->elements[6];
++closureN_type c_7318748;
++object e_7319063 [7];
++c_7318748.hdr.mark = gc_color_red;
++ c_7318748.hdr.grayed = 0;
++c_7318748.tag = closureN_tag;
++ c_7318748.fn = (function_type)__lambda_634;
++c_7318748.num_args = 1;
++c_7318748.num_elements = 7;
++c_7318748.elements = (object *)e_7319063;
++c_7318748.elements[0] = ((closureN)self_7312333)->elements[0];
++c_7318748.elements[1] = ((closureN)self_7312333)->elements[1];
++c_7318748.elements[2] = ((closureN)self_7312333)->elements[2];
++c_7318748.elements[3] = ((closureN)self_7312333)->elements[4];
++c_7318748.elements[4] = r_735351_7311404_7311454;
++c_7318748.elements[5] = ((closureN)self_7312333)->elements[5];
++c_7318748.elements[6] = ((closureN)self_7312333)->elements[6];
  
 -return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7320048, primitive_cons, NULL, ((closureN)self_7313586)->elements[3]);; 
-+return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7318755, primitive_cons, NULL, ((closureN)self_7312340)->elements[3]);; 
++return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7318748, primitive_cons, NULL, ((closureN)self_7312333)->elements[3]);; 
  }
  
 -static void __lambda_634(void *data, object self_7313587, int argc, object *args) /* object self_7313587, object r_735804_7312658_7312708_7312757 */
-+static void __lambda_634(void *data, object self_7312341, int argc, object *args) /* object self_7312341, object r_735359_7311412_7311462_7311511 */
++static void __lambda_634(void *data, object self_7312334, int argc, object *args) /* object self_7312334, object r_735352_7311405_7311455_7311504 */
   {
 - object r_735804_7312658_7312708_7312757 = args[0];
-+ object r_735359_7311412_7311462_7311511 = args[0];
++ object r_735352_7311405_7311455_7311504 = args[0];
    
 -closureN_type c_7320050;
 -object e_7320361 [7];
@@ -39556,32 +39733,32 @@ Make let-values be the same as let*-values, to work around
 -c_7320050.elements[4] = r_735804_7312658_7312708_7312757;
 -c_7320050.elements[5] = ((closureN)self_7313587)->elements[5];
 -c_7320050.elements[6] = ((closureN)self_7313587)->elements[6];
-+closureN_type c_7318757;
-+object e_7319068 [7];
-+c_7318757.hdr.mark = gc_color_red;
-+ c_7318757.hdr.grayed = 0;
-+c_7318757.tag = closureN_tag;
-+ c_7318757.fn = (function_type)__lambda_635;
-+c_7318757.num_args = 1;
-+c_7318757.num_elements = 7;
-+c_7318757.elements = (object *)e_7319068;
-+c_7318757.elements[0] = ((closureN)self_7312341)->elements[0];
-+c_7318757.elements[1] = ((closureN)self_7312341)->elements[1];
-+c_7318757.elements[2] = ((closureN)self_7312341)->elements[3];
-+c_7318757.elements[3] = ((closureN)self_7312341)->elements[4];
-+c_7318757.elements[4] = r_735359_7311412_7311462_7311511;
-+c_7318757.elements[5] = ((closureN)self_7312341)->elements[5];
-+c_7318757.elements[6] = ((closureN)self_7312341)->elements[6];
++closureN_type c_7318750;
++object e_7319061 [7];
++c_7318750.hdr.mark = gc_color_red;
++ c_7318750.hdr.grayed = 0;
++c_7318750.tag = closureN_tag;
++ c_7318750.fn = (function_type)__lambda_635;
++c_7318750.num_args = 1;
++c_7318750.num_elements = 7;
++c_7318750.elements = (object *)e_7319061;
++c_7318750.elements[0] = ((closureN)self_7312334)->elements[0];
++c_7318750.elements[1] = ((closureN)self_7312334)->elements[1];
++c_7318750.elements[2] = ((closureN)self_7312334)->elements[3];
++c_7318750.elements[3] = ((closureN)self_7312334)->elements[4];
++c_7318750.elements[4] = r_735352_7311405_7311455_7311504;
++c_7318750.elements[5] = ((closureN)self_7312334)->elements[5];
++c_7318750.elements[6] = ((closureN)self_7312334)->elements[6];
  
 -return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7320050, primitive_cons, NULL, ((closureN)self_7313587)->elements[2]);; 
-+return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7318757, primitive_cons, NULL, ((closureN)self_7312341)->elements[2]);; 
++return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7318750, primitive_cons, NULL, ((closureN)self_7312334)->elements[2]);; 
  }
  
 -static void __lambda_635(void *data, object self_7313588, int argc, object *args) /* object self_7313588, object r_735805_7312659_7312709_7312758_7312806 */
-+static void __lambda_635(void *data, object self_7312342, int argc, object *args) /* object self_7312342, object r_735360_7311413_7311463_7311512_7311560 */
++static void __lambda_635(void *data, object self_7312335, int argc, object *args) /* object self_7312335, object r_735353_7311406_7311456_7311505_7311553 */
   {
 - object r_735805_7312659_7312709_7312758_7312806 = args[0];
-+ object r_735360_7311413_7311463_7311512_7311560 = args[0];
++ object r_735353_7311406_7311456_7311505_7311553 = args[0];
    
 -closureN_type c_7320052;
 -object e_7320359 [7];
@@ -39599,32 +39776,32 @@ Make let-values be the same as let*-values, to work around
 -c_7320052.elements[4] = r_735805_7312659_7312709_7312758_7312806;
 -c_7320052.elements[5] = ((closureN)self_7313588)->elements[5];
 -c_7320052.elements[6] = ((closureN)self_7313588)->elements[6];
-+closureN_type c_7318759;
-+object e_7319066 [7];
-+c_7318759.hdr.mark = gc_color_red;
-+ c_7318759.hdr.grayed = 0;
-+c_7318759.tag = closureN_tag;
-+ c_7318759.fn = (function_type)__lambda_636;
-+c_7318759.num_args = 1;
-+c_7318759.num_elements = 7;
-+c_7318759.elements = (object *)e_7319066;
-+c_7318759.elements[0] = ((closureN)self_7312342)->elements[0];
-+c_7318759.elements[1] = ((closureN)self_7312342)->elements[2];
-+c_7318759.elements[2] = ((closureN)self_7312342)->elements[3];
-+c_7318759.elements[3] = ((closureN)self_7312342)->elements[4];
-+c_7318759.elements[4] = r_735360_7311413_7311463_7311512_7311560;
-+c_7318759.elements[5] = ((closureN)self_7312342)->elements[5];
-+c_7318759.elements[6] = ((closureN)self_7312342)->elements[6];
++closureN_type c_7318752;
++object e_7319059 [7];
++c_7318752.hdr.mark = gc_color_red;
++ c_7318752.hdr.grayed = 0;
++c_7318752.tag = closureN_tag;
++ c_7318752.fn = (function_type)__lambda_636;
++c_7318752.num_args = 1;
++c_7318752.num_elements = 7;
++c_7318752.elements = (object *)e_7319059;
++c_7318752.elements[0] = ((closureN)self_7312335)->elements[0];
++c_7318752.elements[1] = ((closureN)self_7312335)->elements[2];
++c_7318752.elements[2] = ((closureN)self_7312335)->elements[3];
++c_7318752.elements[3] = ((closureN)self_7312335)->elements[4];
++c_7318752.elements[4] = r_735353_7311406_7311456_7311505_7311553;
++c_7318752.elements[5] = ((closureN)self_7312335)->elements[5];
++c_7318752.elements[6] = ((closureN)self_7312335)->elements[6];
  
 -return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7320052, primitive_cons, NULL, ((closureN)self_7313588)->elements[1]);; 
-+return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7318759, primitive_cons, NULL, ((closureN)self_7312342)->elements[1]);; 
++return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7318752, primitive_cons, NULL, ((closureN)self_7312335)->elements[1]);; 
  }
  
 -static void __lambda_636(void *data, object self_7313589, int argc, object *args) /* object self_7313589, object r_735806_7312660_7312710_7312759_7312807_7312854 */
-+static void __lambda_636(void *data, object self_7312343, int argc, object *args) /* object self_7312343, object r_735361_7311414_7311464_7311513_7311561_7311608 */
++static void __lambda_636(void *data, object self_7312336, int argc, object *args) /* object self_7312336, object r_735354_7311407_7311457_7311506_7311554_7311601 */
   {
 - object r_735806_7312660_7312710_7312759_7312807_7312854 = args[0];
-+ object r_735361_7311414_7311464_7311513_7311561_7311608 = args[0];
++ object r_735354_7311407_7311457_7311506_7311554_7311601 = args[0];
    
 -closureN_type c_7320054;
 -object e_7320354 [3];
@@ -39638,49 +39815,48 @@ Make let-values be the same as let*-values, to work around
 -c_7320054.elements[0] = ((closureN)self_7313589)->elements[0];
 -c_7320054.elements[1] = ((closureN)self_7313589)->elements[5];
 -c_7320054.elements[2] = ((closureN)self_7313589)->elements[6];
-+closureN_type c_7318761;
-+object e_7319061 [3];
-+c_7318761.hdr.mark = gc_color_red;
-+ c_7318761.hdr.grayed = 0;
-+c_7318761.tag = closureN_tag;
-+ c_7318761.fn = (function_type)__lambda_637;
-+c_7318761.num_args = 5;
-+c_7318761.num_elements = 3;
-+c_7318761.elements = (object *)e_7319061;
-+c_7318761.elements[0] = ((closureN)self_7312343)->elements[0];
-+c_7318761.elements[1] = ((closureN)self_7312343)->elements[5];
-+c_7318761.elements[2] = ((closureN)self_7312343)->elements[6];
++closureN_type c_7318754;
++object e_7319054 [3];
++c_7318754.hdr.mark = gc_color_red;
++ c_7318754.hdr.grayed = 0;
++c_7318754.tag = closureN_tag;
++ c_7318754.fn = (function_type)__lambda_637;
++c_7318754.num_args = 5;
++c_7318754.num_elements = 3;
++c_7318754.elements = (object *)e_7319054;
++c_7318754.elements[0] = ((closureN)self_7312336)->elements[0];
++c_7318754.elements[1] = ((closureN)self_7312336)->elements[5];
++c_7318754.elements[2] = ((closureN)self_7312336)->elements[6];
  
 -return_direct_with_clo5(data,(closure)&c_7320054,__lambda_637,  ((closureN)self_7313589)->elements[1], ((closureN)self_7313589)->elements[2], ((closureN)self_7313589)->elements[3], ((closureN)self_7313589)->elements[4], r_735806_7312660_7312710_7312759_7312807_7312854);; 
-+return_direct_with_clo5(data,(closure)&c_7318761,__lambda_637,  ((closureN)self_7312343)->elements[1], ((closureN)self_7312343)->elements[2], ((closureN)self_7312343)->elements[3], ((closureN)self_7312343)->elements[4], r_735361_7311414_7311464_7311513_7311561_7311608);; 
++return_direct_with_clo5(data,(closure)&c_7318754,__lambda_637,  ((closureN)self_7312336)->elements[1], ((closureN)self_7312336)->elements[2], ((closureN)self_7312336)->elements[3], ((closureN)self_7312336)->elements[4], r_735354_7311407_7311457_7311506_7311554_7311601);; 
  }
  
 -static void __lambda_637(void *data, object self_7313590, int argc, object *args) /* object self_7313590, object param_73929_731047_733382_7312661_7312711_7312760_7312808_7312855, object value_73930_731048_733383_7312662_7312712_7312761_7312809_7312856, object p_73931_731049_733384_7312663_7312713_7312762_7312810_7312857, object old_73932_731050_733385_7312664_7312714_7312763_7312811_7312858, object new_73933_731051_733386_7312665_7312715_7312764_7312812_7312859 */
-+static void __lambda_637(void *data, object self_7312344, int argc, object *args) /* object self_7312344, object param_73930_731048_733042_7311415_7311465_7311514_7311562_7311609, object value_73931_731049_733043_7311416_7311466_7311515_7311563_7311610, object p_73932_731050_733044_7311417_7311467_7311516_7311564_7311611, object old_73933_731051_733045_7311418_7311468_7311517_7311565_7311612, object new_73934_731052_733046_7311419_7311469_7311518_7311566_7311613 */
++static void __lambda_637(void *data, object self_7312337, int argc, object *args) /* object self_7312337, object param_73929_731047_733035_7311408_7311458_7311507_7311555_7311602, object value_73930_731048_733036_7311409_7311459_7311508_7311556_7311603, object p_73931_731049_733037_7311410_7311460_7311509_7311557_7311604, object old_73932_731050_733038_7311411_7311461_7311510_7311558_7311605, object new_73933_731051_733039_7311412_7311462_7311511_7311559_7311606 */
   {
 - object param_73929_731047_733382_7312661_7312711_7312760_7312808_7312855 = args[0]; object value_73930_731048_733383_7312662_7312712_7312761_7312809_7312856 = args[1]; object p_73931_731049_733384_7312663_7312713_7312762_7312810_7312857 = args[2]; object old_73932_731050_733385_7312664_7312714_7312763_7312811_7312858 = args[3]; object new_73933_731051_733386_7312665_7312715_7312764_7312812_7312859 = args[4];
-+ object param_73930_731048_733042_7311415_7311465_7311514_7311562_7311609 = args[0]; object value_73931_731049_733043_7311416_7311466_7311515_7311563_7311610 = args[1]; object p_73932_731050_733044_7311417_7311467_7311516_7311564_7311611 = args[2]; object old_73933_731051_733045_7311418_7311468_7311517_7311565_7311612 = args[3]; object new_73934_731052_733046_7311419_7311469_7311518_7311566_7311613 = args[4];
++ object param_73929_731047_733035_7311408_7311458_7311507_7311555_7311602 = args[0]; object value_73930_731048_733036_7311409_7311459_7311508_7311556_7311603 = args[1]; object p_73931_731049_733037_7311410_7311460_7311509_7311557_7311604 = args[2]; object old_73932_731050_733038_7311411_7311461_7311510_7311558_7311605 = args[3]; object new_73933_731051_733039_7311412_7311462_7311511_7311559_7311606 = args[4];
      
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7313590)->elements[2]))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312344)->elements[2]))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312337)->elements[2]))) ){ 
      
    
    
 -if( (boolean_f != Cyc_is_null(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7313590)->elements[2])))) ){ 
-+if( (boolean_f != Cyc_is_null(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312344)->elements[2])))) ){ 
++if( (boolean_f != Cyc_is_null(Cyc_car(data, Cyc_cdr(data, ((closureN)self_7312337)->elements[2])))) ){ 
      
    
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313590)->elements[2])))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312344)->elements[2])))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312337)->elements[2])))) ){ 
      
    
    
    
 -if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313590)->elements[2]))))) ){ 
-+if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312344)->elements[2]))))) ){ 
-   
+-  
 -closureN_type c_7320085;
 -object e_7320345 [8];
 -c_7320085.hdr.mark = gc_color_red;
@@ -39698,50 +39874,26 @@ Make let-values be the same as let*-values, to work around
 -c_7320085.elements[5] = ((closureN)self_7313590)->elements[1];
 -c_7320085.elements[6] = ((closureN)self_7313590)->elements[2];
 -c_7320085.elements[7] = value_73930_731048_733383_7312662_7312712_7312761_7312809_7312856;
-+closureN_type c_7318792;
-+object e_7319052 [8];
-+c_7318792.hdr.mark = gc_color_red;
-+ c_7318792.hdr.grayed = 0;
-+c_7318792.tag = closureN_tag;
-+ c_7318792.fn = (function_type)__lambda_638;
-+c_7318792.num_args = 1;
-+c_7318792.num_elements = 8;
-+c_7318792.elements = (object *)e_7319052;
-+c_7318792.elements[0] = ((closureN)self_7312344)->elements[0];
-+c_7318792.elements[1] = new_73934_731052_733046_7311419_7311469_7311518_7311566_7311613;
-+c_7318792.elements[2] = old_73933_731051_733045_7311418_7311468_7311517_7311565_7311612;
-+c_7318792.elements[3] = p_73932_731050_733044_7311417_7311467_7311516_7311564_7311611;
-+c_7318792.elements[4] = param_73930_731048_733042_7311415_7311465_7311514_7311562_7311609;
-+c_7318792.elements[5] = ((closureN)self_7312344)->elements[1];
-+c_7318792.elements[6] = ((closureN)self_7312344)->elements[2];
-+c_7318792.elements[7] = value_73931_731049_733043_7311416_7311466_7311515_7311563_7311610;
- 
+-
 -return_closcall2(data,  ((closureN)self_7313590)->elements[1],  &c_7320085, quote_let);
-+return_closcall2(data,  ((closureN)self_7312344)->elements[1],  &c_7318792, quote_let);
- } else { 
+-} else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7313590)->elements[0], (((closure)  ((closureN)self_7313590)->elements[0])->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  ((closureN)self_7312344)->elements[0], (((closure)  ((closureN)self_7312344)->elements[0])->fn),  boolean_f);}
- ;
- } else { 
+-;
+-} else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7313590)->elements[0], (((closure)  ((closureN)self_7313590)->elements[0])->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  ((closureN)self_7312344)->elements[0], (((closure)  ((closureN)self_7312344)->elements[0])->fn),  boolean_f);}
- ;
- } else { 
+-;
+-} else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7313590)->elements[0], (((closure)  ((closureN)self_7313590)->elements[0])->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  ((closureN)self_7312344)->elements[0], (((closure)  ((closureN)self_7312344)->elements[0])->fn),  boolean_f);}
- ;
- } else { 
+-;
+-} else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7313590)->elements[0], (((closure)  ((closureN)self_7313590)->elements[0])->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  ((closureN)self_7312344)->elements[0], (((closure)  ((closureN)self_7312344)->elements[0])->fn),  boolean_f);}
- ;; 
- }
- 
+-;; 
+-}
+-
 -static void __lambda_638(void *data, object self_7313591, int argc, object *args) /* object self_7313591, object r_735817_7312666_7312716_7312765_7312813_7312860 */
-+static void __lambda_638(void *data, object self_7312345, int argc, object *args) /* object self_7312345, object r_735372_7311420_7311470_7311519_7311567_7311614 */
-  {
+- {
 - object r_735817_7312666_7312716_7312765_7312813_7312860 = args[0];
-+ object r_735372_7311420_7311470_7311519_7311567_7311614 = args[0];
-   
+-  
 -closureN_type c_7320087;
 -object e_7320336 [9];
 -c_7320087.hdr.mark = gc_color_red;
@@ -39760,53 +39912,26 @@ Make let-values be the same as let*-values, to work around
 -c_7320087.elements[6] = ((closureN)self_7313591)->elements[5];
 -c_7320087.elements[7] = ((closureN)self_7313591)->elements[6];
 -c_7320087.elements[8] = ((closureN)self_7313591)->elements[7];
-+closureN_type c_7318794;
-+object e_7319043 [9];
-+c_7318794.hdr.mark = gc_color_red;
-+ c_7318794.hdr.grayed = 0;
-+c_7318794.tag = closureN_tag;
-+ c_7318794.fn = (function_type)__lambda_639;
-+c_7318794.num_args = 1;
-+c_7318794.num_elements = 9;
-+c_7318794.elements = (object *)e_7319043;
-+c_7318794.elements[0] = ((closureN)self_7312345)->elements[0];
-+c_7318794.elements[1] = ((closureN)self_7312345)->elements[1];
-+c_7318794.elements[2] = ((closureN)self_7312345)->elements[2];
-+c_7318794.elements[3] = ((closureN)self_7312345)->elements[3];
-+c_7318794.elements[4] = ((closureN)self_7312345)->elements[4];
-+c_7318794.elements[5] = r_735372_7311420_7311470_7311519_7311567_7311614;
-+c_7318794.elements[6] = ((closureN)self_7312345)->elements[5];
-+c_7318794.elements[7] = ((closureN)self_7312345)->elements[6];
-+c_7318794.elements[8] = ((closureN)self_7312345)->elements[7];
- 
- 
+-
+-
 -mmacro(c_7320337, (function_type)__lambda_667);c_7320337.num_args = 2;
 -return_direct_with_clo1(data,(closure)&c_7320087,__lambda_639,  &c_7320337);; 
-+mmacro(c_7319044, (function_type)__lambda_667);c_7319044.num_args = 2;
-+return_direct_with_clo1(data,(closure)&c_7318794,__lambda_639,  &c_7319044);; 
- }
- 
+-}
+-
 -static void __lambda_667(void *data, object self_7313592, int argc, object *args) /* object self_7313592, object k_735940_7312704_7312754_7312803_7312851_7312898, object p_73944_731058_733393_7312705_7312755_7312804_7312852_7312899, object param_73945_731059_733394_7312706_7312756_7312805_7312853_7312900 */
-+static void __lambda_667(void *data, object self_7312346, int argc, object *args) /* object self_7312346, object k_735495_7311458_7311508_7311557_7311605_7311652, object p_73945_731059_733053_7311459_7311509_7311558_7311606_7311653, object param_73946_731060_733054_7311460_7311510_7311559_7311607_7311654 */
-  {
+- {
 - object k_735940_7312704_7312754_7312803_7312851_7312898 = args[0]; object p_73944_731058_733393_7312705_7312755_7312804_7312852_7312899 = args[1]; object param_73945_731059_733394_7312706_7312756_7312805_7312853_7312900 = args[2];
-+ object k_735495_7311458_7311508_7311557_7311605_7311652 = args[0]; object p_73945_731059_733053_7311459_7311509_7311558_7311606_7311653 = args[1]; object param_73946_731060_733054_7311460_7311510_7311559_7311607_7311654 = args[2];
-   
+-  
 -pair_type local_7320341; 
-+pair_type local_7319048; 
- 
+-
 -pair_type local_7320344; 
 -return_direct_with_clo1(data,  k_735940_7312704_7312754_7312803_7312851_7312898, (((closure)  k_735940_7312704_7312754_7312803_7312851_7312898)->fn),  set_pair_as_expr(&local_7320341, p_73944_731058_733393_7312705_7312755_7312804_7312852_7312899, set_pair_as_expr(&local_7320344, param_73945_731059_733394_7312706_7312756_7312805_7312853_7312900, NULL)));; 
-+pair_type local_7319051; 
-+return_direct_with_clo1(data,  k_735495_7311458_7311508_7311557_7311605_7311652, (((closure)  k_735495_7311458_7311508_7311557_7311605_7311652)->fn),  set_pair_as_expr(&local_7319048, p_73945_731059_733053_7311459_7311509_7311558_7311606_7311653, set_pair_as_expr(&local_7319051, param_73946_731060_733054_7311460_7311510_7311559_7311607_7311654, NULL)));; 
- }
- 
+-}
+-
 -static void __lambda_639(void *data, object self_7313593, int argc, object *args) /* object self_7313593, object r_735939_7312667_7312717_7312766_7312814_7312861 */
-+static void __lambda_639(void *data, object self_7312347, int argc, object *args) /* object self_7312347, object r_735494_7311421_7311471_7311520_7311568_7311615 */
-  {
+- {
 - object r_735939_7312667_7312717_7312766_7312814_7312861 = args[0];
-+ object r_735494_7311421_7311471_7311520_7311568_7311615 = args[0];
-   
+-  
 -closureN_type c_7320089;
 -object e_7320333 [8];
 -c_7320089.hdr.mark = gc_color_red;
@@ -40397,7 +40522,8 @@ Make let-values be the same as let*-values, to work around
 -static void __lambda_657(void *data, object self_7313615, int argc, object *args) /* object self_7313615, object k_735854_738374_738402_738428_738453_7312685_7312735_7312784_7312832_7312879, object p_73953_731067_733402_738375_738403_738429_738454_7312686_7312736_7312785_7312833_7312880, object old_73954_731068_733403_738376_738404_738430_738455_7312687_7312737_7312786_7312834_7312881 */
 - {
 - object k_735854_738374_738402_738428_738453_7312685_7312735_7312784_7312832_7312879 = args[0]; object p_73953_731067_733402_738375_738403_738429_738454_7312686_7312736_7312785_7312833_7312880 = args[1]; object old_73954_731068_733403_738376_738404_738430_738455_7312687_7312737_7312786_7312834_7312881 = args[2];
--  
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312337)->elements[2]))))) ){ 
+   
 -closureN_type c_7320201;
 -object e_7320226 [4];
 -c_7320201.hdr.mark = gc_color_red;
@@ -40411,235 +40537,291 @@ Make let-values be the same as let*-values, to work around
 -c_7320201.elements[1] = old_73954_731068_733403_738376_738404_738430_738455_7312687_7312737_7312786_7312834_7312881;
 -c_7320201.elements[2] = p_73953_731067_733402_738375_738403_738429_738454_7312686_7312736_7312785_7312833_7312880;
 -c_7320201.elements[3] = ((closureN)self_7313615)->elements[0];
-+closureN_type c_7318796;
-+object e_7319040 [8];
-+c_7318796.hdr.mark = gc_color_red;
-+ c_7318796.hdr.grayed = 0;
-+c_7318796.tag = closureN_tag;
-+ c_7318796.fn = (function_type)__lambda_640;
-+c_7318796.num_args = 1;
-+c_7318796.num_elements = 8;
-+c_7318796.elements = (object *)e_7319040;
-+c_7318796.elements[0] = ((closureN)self_7312347)->elements[0];
-+c_7318796.elements[1] = ((closureN)self_7312347)->elements[1];
-+c_7318796.elements[2] = ((closureN)self_7312347)->elements[2];
-+c_7318796.elements[3] = ((closureN)self_7312347)->elements[3];
-+c_7318796.elements[4] = ((closureN)self_7312347)->elements[5];
-+c_7318796.elements[5] = ((closureN)self_7312347)->elements[6];
-+c_7318796.elements[6] = ((closureN)self_7312347)->elements[7];
-+c_7318796.elements[7] = ((closureN)self_7312347)->elements[8];
- 
--return_closcall2(data,  ((closureN)self_7313615)->elements[0],  &c_7320201, quote_quote);; 
-+return_direct_with_clo4(data,  __glo_Cyc_91map_91loop_912_scheme_base, (((closure)  __glo_Cyc_91map_91loop_912_scheme_base)->fn),  &c_7318796, r_735494_7311421_7311471_7311520_7311568_7311615, ((closureN)self_7312347)->elements[3], ((closureN)self_7312347)->elements[4]);; 
- }
- 
--static void __lambda_658(void *data, object self_7313616, int argc, object *args) /* object self_7313616, object r_735862_738377_738405_738431_738456_7312688_7312738_7312787_7312835_7312882 */
-+static void __lambda_640(void *data, object self_7312348, int argc, object *args) /* object self_7312348, object r_735375_7311422_7311472_7311521_7311569_7311616 */
-  {
-- object r_735862_738377_738405_738431_738456_7312688_7312738_7312787_7312835_7312882 = args[0];
-+ object r_735375_7311422_7311472_7311521_7311569_7311616 = args[0];
-   
--closureN_type c_7320204;
--object e_7320225 [4];
--c_7320204.hdr.mark = gc_color_red;
-- c_7320204.hdr.grayed = 0;
--c_7320204.tag = closureN_tag;
-- c_7320204.fn = (function_type)__lambda_659;
--c_7320204.num_args = 1;
--c_7320204.num_elements = 4;
--c_7320204.elements = (object *)e_7320225;
--c_7320204.elements[0] = ((closureN)self_7313616)->elements[0];
--c_7320204.elements[1] = ((closureN)self_7313616)->elements[1];
--c_7320204.elements[2] = ((closureN)self_7313616)->elements[2];
--c_7320204.elements[3] = r_735862_738377_738405_738431_738456_7312688_7312738_7312787_7312835_7312882;
-+closureN_type c_7318799;
-+object e_7319039 [9];
-+c_7318799.hdr.mark = gc_color_red;
-+ c_7318799.hdr.grayed = 0;
-+c_7318799.tag = closureN_tag;
-+ c_7318799.fn = (function_type)__lambda_641;
-+c_7318799.num_args = 1;
-+c_7318799.num_elements = 9;
-+c_7318799.elements = (object *)e_7319039;
-+c_7318799.elements[0] = ((closureN)self_7312348)->elements[0];
-+c_7318799.elements[1] = ((closureN)self_7312348)->elements[1];
-+c_7318799.elements[2] = ((closureN)self_7312348)->elements[2];
-+c_7318799.elements[3] = ((closureN)self_7312348)->elements[3];
-+c_7318799.elements[4] = ((closureN)self_7312348)->elements[4];
-+c_7318799.elements[5] = r_735375_7311422_7311472_7311521_7311569_7311616;
-+c_7318799.elements[6] = ((closureN)self_7312348)->elements[5];
-+c_7318799.elements[7] = ((closureN)self_7312348)->elements[6];
-+c_7318799.elements[8] = ((closureN)self_7312348)->elements[7];
-+
-+return_closcall2(data,  ((closureN)self_7312348)->elements[5],  &c_7318799, quote_let);; 
++closureN_type c_7318785;
++object e_7319045 [8];
++c_7318785.hdr.mark = gc_color_red;
++ c_7318785.hdr.grayed = 0;
++c_7318785.tag = closureN_tag;
++ c_7318785.fn = (function_type)__lambda_638;
++c_7318785.num_args = 1;
++c_7318785.num_elements = 8;
++c_7318785.elements = (object *)e_7319045;
++c_7318785.elements[0] = ((closureN)self_7312337)->elements[0];
++c_7318785.elements[1] = new_73933_731051_733039_7311412_7311462_7311511_7311559_7311606;
++c_7318785.elements[2] = old_73932_731050_733038_7311411_7311461_7311510_7311558_7311605;
++c_7318785.elements[3] = p_73931_731049_733037_7311410_7311460_7311509_7311557_7311604;
++c_7318785.elements[4] = param_73929_731047_733035_7311408_7311458_7311507_7311555_7311602;
++c_7318785.elements[5] = ((closureN)self_7312337)->elements[1];
++c_7318785.elements[6] = ((closureN)self_7312337)->elements[2];
++c_7318785.elements[7] = value_73930_731048_733036_7311409_7311459_7311508_7311556_7311603;
++
++return_closcall2(data,  ((closureN)self_7312337)->elements[1],  &c_7318785, quote_let);
++} else { 
++  return_direct_with_clo1(data,  ((closureN)self_7312337)->elements[0], (((closure)  ((closureN)self_7312337)->elements[0])->fn),  boolean_f);}
++;
++} else { 
++  return_direct_with_clo1(data,  ((closureN)self_7312337)->elements[0], (((closure)  ((closureN)self_7312337)->elements[0])->fn),  boolean_f);}
++;
++} else { 
++  return_direct_with_clo1(data,  ((closureN)self_7312337)->elements[0], (((closure)  ((closureN)self_7312337)->elements[0])->fn),  boolean_f);}
++;
++} else { 
++  return_direct_with_clo1(data,  ((closureN)self_7312337)->elements[0], (((closure)  ((closureN)self_7312337)->elements[0])->fn),  boolean_f);}
++;; 
 +}
 +
-+static void __lambda_641(void *data, object self_7312349, int argc, object *args) /* object self_7312349, object r_735381_7311423_7311473_7311522_7311570_7311617 */
++static void __lambda_638(void *data, object self_7312338, int argc, object *args) /* object self_7312338, object r_735365_7311413_7311463_7311512_7311560_7311607 */
 + {
-+ object r_735381_7311423_7311473_7311522_7311570_7311617 = args[0];
++ object r_735365_7311413_7311463_7311512_7311560_7311607 = args[0];
 +  
-+closureN_type c_7318801;
-+object e_7319027 [10];
-+c_7318801.hdr.mark = gc_color_red;
-+ c_7318801.hdr.grayed = 0;
-+c_7318801.tag = closureN_tag;
-+ c_7318801.fn = (function_type)__lambda_642;
-+c_7318801.num_args = 1;
-+c_7318801.num_elements = 10;
-+c_7318801.elements = (object *)e_7319027;
-+c_7318801.elements[0] = ((closureN)self_7312349)->elements[0];
-+c_7318801.elements[1] = ((closureN)self_7312349)->elements[1];
-+c_7318801.elements[2] = ((closureN)self_7312349)->elements[2];
-+c_7318801.elements[3] = ((closureN)self_7312349)->elements[3];
-+c_7318801.elements[4] = ((closureN)self_7312349)->elements[4];
-+c_7318801.elements[5] = ((closureN)self_7312349)->elements[5];
-+c_7318801.elements[6] = r_735381_7311423_7311473_7311522_7311570_7311617;
-+c_7318801.elements[7] = ((closureN)self_7312349)->elements[6];
-+c_7318801.elements[8] = ((closureN)self_7312349)->elements[7];
-+c_7318801.elements[9] = ((closureN)self_7312349)->elements[8];
- 
--return_closcall2(data,  ((closureN)self_7313616)->elements[3],  &c_7320204, quote__121param_91set_67_125);; 
++closureN_type c_7318787;
++object e_7319036 [9];
++c_7318787.hdr.mark = gc_color_red;
++ c_7318787.hdr.grayed = 0;
++c_7318787.tag = closureN_tag;
++ c_7318787.fn = (function_type)__lambda_639;
++c_7318787.num_args = 1;
++c_7318787.num_elements = 9;
++c_7318787.elements = (object *)e_7319036;
++c_7318787.elements[0] = ((closureN)self_7312338)->elements[0];
++c_7318787.elements[1] = ((closureN)self_7312338)->elements[1];
++c_7318787.elements[2] = ((closureN)self_7312338)->elements[2];
++c_7318787.elements[3] = ((closureN)self_7312338)->elements[3];
++c_7318787.elements[4] = ((closureN)self_7312338)->elements[4];
++c_7318787.elements[5] = r_735365_7311413_7311463_7311512_7311560_7311607;
++c_7318787.elements[6] = ((closureN)self_7312338)->elements[5];
++c_7318787.elements[7] = ((closureN)self_7312338)->elements[6];
++c_7318787.elements[8] = ((closureN)self_7312338)->elements[7];
++
++
++mmacro(c_7319037, (function_type)__lambda_667);c_7319037.num_args = 2;
++return_direct_with_clo1(data,(closure)&c_7318787,__lambda_639,  &c_7319037);; 
++}
 +
-+mmacro(c_7319028, (function_type)__lambda_666);c_7319028.num_args = 2;
-+return_direct_with_clo1(data,(closure)&c_7318801,__lambda_642,  &c_7319028);; 
- }
- 
--static void __lambda_659(void *data, object self_7313617, int argc, object *args) /* object self_7313617, object r_735865_738378_738406_738432_738457_7312689_7312739_7312788_7312836_7312883 */
-+static void __lambda_666(void *data, object self_7312350, int argc, object *args) /* object self_7312350, object k_735485_7311455_7311505_7311554_7311602_7311649, object old_73947_731061_733055_7311456_7311506_7311555_7311603_7311650, object p_73948_731062_733056_7311457_7311507_7311556_7311604_7311651 */
-  {
-- object r_735865_738378_738406_738432_738457_7312689_7312739_7312788_7312836_7312883 = args[0];
-+ object k_735485_7311455_7311505_7311554_7311602_7311649 = args[0]; object old_73947_731061_733055_7311456_7311506_7311555_7311603_7311650 = args[1]; object p_73948_731062_733056_7311457_7311507_7311556_7311604_7311651 = args[2];
-   
--pair_type local_7320209; 
-+pair_type local_7319032; 
- 
--pair_type local_7320213; 
-+pair_type local_7319035; 
- 
--pair_type local_7320216; 
-+pair_type local_7319038; 
-+return_direct_with_clo1(data,  k_735485_7311455_7311505_7311554_7311602_7311649, (((closure)  k_735485_7311455_7311505_7311554_7311602_7311649)->fn),  set_pair_as_expr(&local_7319032, old_73947_731061_733055_7311456_7311506_7311555_7311603_7311650, set_pair_as_expr(&local_7319035, set_pair_as_expr(&local_7319038, p_73948_731062_733056_7311457_7311507_7311556_7311604_7311651, NULL), NULL)));; 
++static void __lambda_667(void *data, object self_7312339, int argc, object *args) /* object self_7312339, object k_735488_7311451_7311501_7311550_7311598_7311645, object p_73944_731058_733046_7311452_7311502_7311551_7311599_7311646, object param_73945_731059_733047_7311453_7311503_7311552_7311600_7311647 */
++ {
++ object k_735488_7311451_7311501_7311550_7311598_7311645 = args[0]; object p_73944_731058_733046_7311452_7311502_7311551_7311599_7311646 = args[1]; object param_73945_731059_733047_7311453_7311503_7311552_7311600_7311647 = args[2];
++  
++pair_type local_7319041; 
++
++pair_type local_7319044; 
++return_direct_with_clo1(data,  k_735488_7311451_7311501_7311550_7311598_7311645, (((closure)  k_735488_7311451_7311501_7311550_7311598_7311645)->fn),  set_pair_as_expr(&local_7319041, p_73944_731058_733046_7311452_7311502_7311551_7311599_7311646, set_pair_as_expr(&local_7319044, param_73945_731059_733047_7311453_7311503_7311552_7311600_7311647, NULL)));; 
 +}
- 
--pair_type local_7320220; 
-+static void __lambda_642(void *data, object self_7312351, int argc, object *args) /* object self_7312351, object r_735484_7311424_7311474_7311523_7311571_7311618 */
++
++static void __lambda_639(void *data, object self_7312340, int argc, object *args) /* object self_7312340, object r_735487_7311414_7311464_7311513_7311561_7311608 */
 + {
-+ object r_735484_7311424_7311474_7311523_7311571_7311618 = args[0];
++ object r_735487_7311414_7311464_7311513_7311561_7311608 = args[0];
 +  
-+closureN_type c_7318803;
-+object e_7319024 [10];
-+c_7318803.hdr.mark = gc_color_red;
-+ c_7318803.hdr.grayed = 0;
-+c_7318803.tag = closureN_tag;
-+ c_7318803.fn = (function_type)__lambda_643;
-+c_7318803.num_args = 1;
-+c_7318803.num_elements = 10;
-+c_7318803.elements = (object *)e_7319024;
-+c_7318803.elements[0] = ((closureN)self_7312351)->elements[0];
-+c_7318803.elements[1] = ((closureN)self_7312351)->elements[1];
-+c_7318803.elements[2] = ((closureN)self_7312351)->elements[2];
-+c_7318803.elements[3] = ((closureN)self_7312351)->elements[3];
-+c_7318803.elements[4] = ((closureN)self_7312351)->elements[4];
-+c_7318803.elements[5] = ((closureN)self_7312351)->elements[5];
-+c_7318803.elements[6] = ((closureN)self_7312351)->elements[6];
-+c_7318803.elements[7] = ((closureN)self_7312351)->elements[7];
-+c_7318803.elements[8] = ((closureN)self_7312351)->elements[8];
-+c_7318803.elements[9] = ((closureN)self_7312351)->elements[9];
-+
-+return_direct_with_clo4(data,  __glo_Cyc_91map_91loop_912_scheme_base, (((closure)  __glo_Cyc_91map_91loop_912_scheme_base)->fn),  &c_7318803, r_735484_7311424_7311474_7311523_7311571_7311618, ((closureN)self_7312351)->elements[2], ((closureN)self_7312351)->elements[3]);; 
++closureN_type c_7318789;
++object e_7319033 [8];
++c_7318789.hdr.mark = gc_color_red;
++ c_7318789.hdr.grayed = 0;
++c_7318789.tag = closureN_tag;
++ c_7318789.fn = (function_type)__lambda_640;
++c_7318789.num_args = 1;
++c_7318789.num_elements = 8;
++c_7318789.elements = (object *)e_7319033;
++c_7318789.elements[0] = ((closureN)self_7312340)->elements[0];
++c_7318789.elements[1] = ((closureN)self_7312340)->elements[1];
++c_7318789.elements[2] = ((closureN)self_7312340)->elements[2];
++c_7318789.elements[3] = ((closureN)self_7312340)->elements[3];
++c_7318789.elements[4] = ((closureN)self_7312340)->elements[5];
++c_7318789.elements[5] = ((closureN)self_7312340)->elements[6];
++c_7318789.elements[6] = ((closureN)self_7312340)->elements[7];
++c_7318789.elements[7] = ((closureN)self_7312340)->elements[8];
++
++return_direct_with_clo4(data,  __glo_Cyc_91map_91loop_912_scheme_base, (((closure)  __glo_Cyc_91map_91loop_912_scheme_base)->fn),  &c_7318789, r_735487_7311414_7311464_7311513_7311561_7311608, ((closureN)self_7312340)->elements[3], ((closureN)self_7312340)->elements[4]);; 
 +}
 +
-+static void __lambda_643(void *data, object self_7312352, int argc, object *args) /* object self_7312352, object r_735457_7311425_7311475_7311524_7311572_7311619 */
++static void __lambda_640(void *data, object self_7312341, int argc, object *args) /* object self_7312341, object r_735368_7311415_7311465_7311514_7311562_7311609 */
 + {
-+ object r_735457_7311425_7311475_7311524_7311572_7311619 = args[0];
++ object r_735368_7311415_7311465_7311514_7311562_7311609 = args[0];
 +  
-+closureN_type c_7318805;
-+object e_7318983 [11];
-+c_7318805.hdr.mark = gc_color_red;
-+ c_7318805.hdr.grayed = 0;
-+c_7318805.tag = closureN_tag;
-+ c_7318805.fn = (function_type)__lambda_644;
-+c_7318805.num_args = 1;
-+c_7318805.num_elements = 11;
-+c_7318805.elements = (object *)e_7318983;
-+c_7318805.elements[0] = ((closureN)self_7312352)->elements[0];
-+c_7318805.elements[1] = ((closureN)self_7312352)->elements[1];
-+c_7318805.elements[2] = ((closureN)self_7312352)->elements[2];
-+c_7318805.elements[3] = ((closureN)self_7312352)->elements[3];
-+c_7318805.elements[4] = ((closureN)self_7312352)->elements[4];
-+c_7318805.elements[5] = ((closureN)self_7312352)->elements[5];
-+c_7318805.elements[6] = ((closureN)self_7312352)->elements[6];
-+c_7318805.elements[7] = r_735457_7311425_7311475_7311524_7311572_7311619;
-+c_7318805.elements[8] = ((closureN)self_7312352)->elements[7];
-+c_7318805.elements[9] = ((closureN)self_7312352)->elements[8];
-+c_7318805.elements[10] = ((closureN)self_7312352)->elements[9];
-+
-+
-+closureN_type c_7318984;
-+object e_7319023 [1];
-+c_7318984.hdr.mark = gc_color_red;
-+ c_7318984.hdr.grayed = 0;
-+c_7318984.tag = closureN_tag;
-+ c_7318984.fn = (function_type)__lambda_663;
-+c_7318984.num_args = 3;
-+c_7318984.num_elements = 1;
-+c_7318984.elements = (object *)e_7319023;
-+c_7318984.elements[0] = ((closureN)self_7312352)->elements[7];
-+
-+return_direct_with_clo1(data,(closure)&c_7318805,__lambda_644,  &c_7318984);; 
++closureN_type c_7318792;
++object e_7319032 [9];
++c_7318792.hdr.mark = gc_color_red;
++ c_7318792.hdr.grayed = 0;
++c_7318792.tag = closureN_tag;
++ c_7318792.fn = (function_type)__lambda_641;
++c_7318792.num_args = 1;
++c_7318792.num_elements = 9;
++c_7318792.elements = (object *)e_7319032;
++c_7318792.elements[0] = ((closureN)self_7312341)->elements[0];
++c_7318792.elements[1] = ((closureN)self_7312341)->elements[1];
++c_7318792.elements[2] = ((closureN)self_7312341)->elements[2];
++c_7318792.elements[3] = ((closureN)self_7312341)->elements[3];
++c_7318792.elements[4] = ((closureN)self_7312341)->elements[4];
++c_7318792.elements[5] = r_735368_7311415_7311465_7311514_7311562_7311609;
++c_7318792.elements[6] = ((closureN)self_7312341)->elements[5];
++c_7318792.elements[7] = ((closureN)self_7312341)->elements[6];
++c_7318792.elements[8] = ((closureN)self_7312341)->elements[7];
++
++return_closcall2(data,  ((closureN)self_7312341)->elements[5],  &c_7318792, quote_let);; 
++}
++
++static void __lambda_641(void *data, object self_7312342, int argc, object *args) /* object self_7312342, object r_735374_7311416_7311466_7311515_7311563_7311610 */
++ {
++ object r_735374_7311416_7311466_7311515_7311563_7311610 = args[0];
++  
++closureN_type c_7318794;
++object e_7319020 [10];
++c_7318794.hdr.mark = gc_color_red;
++ c_7318794.hdr.grayed = 0;
++c_7318794.tag = closureN_tag;
++ c_7318794.fn = (function_type)__lambda_642;
++c_7318794.num_args = 1;
++c_7318794.num_elements = 10;
++c_7318794.elements = (object *)e_7319020;
++c_7318794.elements[0] = ((closureN)self_7312342)->elements[0];
++c_7318794.elements[1] = ((closureN)self_7312342)->elements[1];
++c_7318794.elements[2] = ((closureN)self_7312342)->elements[2];
++c_7318794.elements[3] = ((closureN)self_7312342)->elements[3];
++c_7318794.elements[4] = ((closureN)self_7312342)->elements[4];
++c_7318794.elements[5] = ((closureN)self_7312342)->elements[5];
++c_7318794.elements[6] = r_735374_7311416_7311466_7311515_7311563_7311610;
++c_7318794.elements[7] = ((closureN)self_7312342)->elements[6];
++c_7318794.elements[8] = ((closureN)self_7312342)->elements[7];
++c_7318794.elements[9] = ((closureN)self_7312342)->elements[8];
++
++
++mmacro(c_7319021, (function_type)__lambda_666);c_7319021.num_args = 2;
++return_direct_with_clo1(data,(closure)&c_7318794,__lambda_642,  &c_7319021);; 
 +}
 +
-+static void __lambda_663(void *data, object self_7312353, int argc, object *args) /* object self_7312353, object k_735460_7311449_7311499_7311548_7311596_7311643, object new_73949_731063_733057_7311450_7311500_7311549_7311597_7311644, object p_73950_731064_733058_7311451_7311501_7311550_7311598_7311645, object value_73951_731065_733059_7311452_7311502_7311551_7311599_7311646 */
++static void __lambda_666(void *data, object self_7312343, int argc, object *args) /* object self_7312343, object k_735478_7311448_7311498_7311547_7311595_7311642, object old_73946_731060_733048_7311449_7311499_7311548_7311596_7311643, object p_73947_731061_733049_7311450_7311500_7311549_7311597_7311644 */
 + {
-+ object k_735460_7311449_7311499_7311548_7311596_7311643 = args[0]; object new_73949_731063_733057_7311450_7311500_7311549_7311597_7311644 = args[1]; object p_73950_731064_733058_7311451_7311501_7311550_7311598_7311645 = args[2]; object value_73951_731065_733059_7311452_7311502_7311551_7311599_7311646 = args[3];
++ object k_735478_7311448_7311498_7311547_7311595_7311642 = args[0]; object old_73946_731060_733048_7311449_7311499_7311548_7311596_7311643 = args[1]; object p_73947_731061_733049_7311450_7311500_7311549_7311597_7311644 = args[2];
 +  
-+closureN_type c_7318987;
-+object e_7319022 [5];
-+c_7318987.hdr.mark = gc_color_red;
-+ c_7318987.hdr.grayed = 0;
-+c_7318987.tag = closureN_tag;
-+ c_7318987.fn = (function_type)__lambda_664;
-+c_7318987.num_args = 1;
-+c_7318987.num_elements = 5;
-+c_7318987.elements = (object *)e_7319022;
-+c_7318987.elements[0] = k_735460_7311449_7311499_7311548_7311596_7311643;
-+c_7318987.elements[1] = new_73949_731063_733057_7311450_7311500_7311549_7311597_7311644;
-+c_7318987.elements[2] = p_73950_731064_733058_7311451_7311501_7311550_7311598_7311645;
-+c_7318987.elements[3] = ((closureN)self_7312353)->elements[0];
-+c_7318987.elements[4] = value_73951_731065_733059_7311452_7311502_7311551_7311599_7311646;
-+
-+return_closcall2(data,  ((closureN)self_7312353)->elements[0],  &c_7318987, quote_quote);; 
++pair_type local_7319025; 
++
++pair_type local_7319028; 
++
++pair_type local_7319031; 
++return_direct_with_clo1(data,  k_735478_7311448_7311498_7311547_7311595_7311642, (((closure)  k_735478_7311448_7311498_7311547_7311595_7311642)->fn),  set_pair_as_expr(&local_7319025, old_73946_731060_733048_7311449_7311499_7311548_7311596_7311643, set_pair_as_expr(&local_7319028, set_pair_as_expr(&local_7319031, p_73947_731061_733049_7311450_7311500_7311549_7311597_7311644, NULL), NULL)));; 
 +}
 +
-+static void __lambda_664(void *data, object self_7312354, int argc, object *args) /* object self_7312354, object r_735476_7311453_7311503_7311552_7311600_7311647 */
++static void __lambda_642(void *data, object self_7312344, int argc, object *args) /* object self_7312344, object r_735477_7311417_7311467_7311516_7311564_7311611 */
 + {
-+ object r_735476_7311453_7311503_7311552_7311600_7311647 = args[0];
++ object r_735477_7311417_7311467_7311516_7311564_7311611 = args[0];
 +  
-+closureN_type c_7318990;
-+object e_7319021 [5];
-+c_7318990.hdr.mark = gc_color_red;
-+ c_7318990.hdr.grayed = 0;
-+c_7318990.tag = closureN_tag;
-+ c_7318990.fn = (function_type)__lambda_665;
-+c_7318990.num_args = 1;
-+c_7318990.num_elements = 5;
-+c_7318990.elements = (object *)e_7319021;
-+c_7318990.elements[0] = ((closureN)self_7312354)->elements[0];
-+c_7318990.elements[1] = ((closureN)self_7312354)->elements[1];
-+c_7318990.elements[2] = ((closureN)self_7312354)->elements[2];
-+c_7318990.elements[3] = r_735476_7311453_7311503_7311552_7311600_7311647;
-+c_7318990.elements[4] = ((closureN)self_7312354)->elements[4];
-+
-+return_closcall2(data,  ((closureN)self_7312354)->elements[3],  &c_7318990, quote__121param_91convert_125);; 
++closureN_type c_7318796;
++object e_7319017 [10];
++c_7318796.hdr.mark = gc_color_red;
++ c_7318796.hdr.grayed = 0;
++c_7318796.tag = closureN_tag;
++ c_7318796.fn = (function_type)__lambda_643;
++c_7318796.num_args = 1;
++c_7318796.num_elements = 10;
++c_7318796.elements = (object *)e_7319017;
++c_7318796.elements[0] = ((closureN)self_7312344)->elements[0];
++c_7318796.elements[1] = ((closureN)self_7312344)->elements[1];
++c_7318796.elements[2] = ((closureN)self_7312344)->elements[2];
++c_7318796.elements[3] = ((closureN)self_7312344)->elements[3];
++c_7318796.elements[4] = ((closureN)self_7312344)->elements[4];
++c_7318796.elements[5] = ((closureN)self_7312344)->elements[5];
++c_7318796.elements[6] = ((closureN)self_7312344)->elements[6];
++c_7318796.elements[7] = ((closureN)self_7312344)->elements[7];
++c_7318796.elements[8] = ((closureN)self_7312344)->elements[8];
++c_7318796.elements[9] = ((closureN)self_7312344)->elements[9];
++
++return_direct_with_clo4(data,  __glo_Cyc_91map_91loop_912_scheme_base, (((closure)  __glo_Cyc_91map_91loop_912_scheme_base)->fn),  &c_7318796, r_735477_7311417_7311467_7311516_7311564_7311611, ((closureN)self_7312344)->elements[2], ((closureN)self_7312344)->elements[3]);; 
 +}
 +
-+static void __lambda_665(void *data, object self_7312355, int argc, object *args) /* object self_7312355, object r_735479_7311454_7311504_7311553_7311601_7311648 */
++static void __lambda_643(void *data, object self_7312345, int argc, object *args) /* object self_7312345, object r_735450_7311418_7311468_7311517_7311565_7311612 */
 + {
-+ object r_735479_7311454_7311504_7311553_7311601_7311648 = args[0];
++ object r_735450_7311418_7311468_7311517_7311565_7311612 = args[0];
 +  
++closureN_type c_7318798;
++object e_7318976 [11];
++c_7318798.hdr.mark = gc_color_red;
++ c_7318798.hdr.grayed = 0;
++c_7318798.tag = closureN_tag;
++ c_7318798.fn = (function_type)__lambda_644;
++c_7318798.num_args = 1;
++c_7318798.num_elements = 11;
++c_7318798.elements = (object *)e_7318976;
++c_7318798.elements[0] = ((closureN)self_7312345)->elements[0];
++c_7318798.elements[1] = ((closureN)self_7312345)->elements[1];
++c_7318798.elements[2] = ((closureN)self_7312345)->elements[2];
++c_7318798.elements[3] = ((closureN)self_7312345)->elements[3];
++c_7318798.elements[4] = ((closureN)self_7312345)->elements[4];
++c_7318798.elements[5] = ((closureN)self_7312345)->elements[5];
++c_7318798.elements[6] = ((closureN)self_7312345)->elements[6];
++c_7318798.elements[7] = r_735450_7311418_7311468_7311517_7311565_7311612;
++c_7318798.elements[8] = ((closureN)self_7312345)->elements[7];
++c_7318798.elements[9] = ((closureN)self_7312345)->elements[8];
++c_7318798.elements[10] = ((closureN)self_7312345)->elements[9];
++
++
++closureN_type c_7318977;
++object e_7319016 [1];
++c_7318977.hdr.mark = gc_color_red;
++ c_7318977.hdr.grayed = 0;
++c_7318977.tag = closureN_tag;
++ c_7318977.fn = (function_type)__lambda_663;
++c_7318977.num_args = 3;
++c_7318977.num_elements = 1;
++c_7318977.elements = (object *)e_7319016;
++c_7318977.elements[0] = ((closureN)self_7312345)->elements[7];
++
++return_direct_with_clo1(data,(closure)&c_7318798,__lambda_644,  &c_7318977);; 
++}
++
++static void __lambda_663(void *data, object self_7312346, int argc, object *args) /* object self_7312346, object k_735453_7311442_7311492_7311541_7311589_7311636, object new_73948_731062_733050_7311443_7311493_7311542_7311590_7311637, object p_73949_731063_733051_7311444_7311494_7311543_7311591_7311638, object value_73950_731064_733052_7311445_7311495_7311544_7311592_7311639 */
++ {
++ object k_735453_7311442_7311492_7311541_7311589_7311636 = args[0]; object new_73948_731062_733050_7311443_7311493_7311542_7311590_7311637 = args[1]; object p_73949_731063_733051_7311444_7311494_7311543_7311591_7311638 = args[2]; object value_73950_731064_733052_7311445_7311495_7311544_7311592_7311639 = args[3];
++  
++closureN_type c_7318980;
++object e_7319015 [5];
++c_7318980.hdr.mark = gc_color_red;
++ c_7318980.hdr.grayed = 0;
++c_7318980.tag = closureN_tag;
++ c_7318980.fn = (function_type)__lambda_664;
++c_7318980.num_args = 1;
++c_7318980.num_elements = 5;
++c_7318980.elements = (object *)e_7319015;
++c_7318980.elements[0] = k_735453_7311442_7311492_7311541_7311589_7311636;
++c_7318980.elements[1] = new_73948_731062_733050_7311443_7311493_7311542_7311590_7311637;
++c_7318980.elements[2] = p_73949_731063_733051_7311444_7311494_7311543_7311591_7311638;
++c_7318980.elements[3] = ((closureN)self_7312346)->elements[0];
++c_7318980.elements[4] = value_73950_731064_733052_7311445_7311495_7311544_7311592_7311639;
++
++return_closcall2(data,  ((closureN)self_7312346)->elements[0],  &c_7318980, quote_quote);; 
++}
++
++static void __lambda_664(void *data, object self_7312347, int argc, object *args) /* object self_7312347, object r_735469_7311446_7311496_7311545_7311593_7311640 */
++ {
++ object r_735469_7311446_7311496_7311545_7311593_7311640 = args[0];
++  
++closureN_type c_7318983;
++object e_7319014 [5];
++c_7318983.hdr.mark = gc_color_red;
++ c_7318983.hdr.grayed = 0;
++c_7318983.tag = closureN_tag;
++ c_7318983.fn = (function_type)__lambda_665;
++c_7318983.num_args = 1;
++c_7318983.num_elements = 5;
++c_7318983.elements = (object *)e_7319014;
++c_7318983.elements[0] = ((closureN)self_7312347)->elements[0];
++c_7318983.elements[1] = ((closureN)self_7312347)->elements[1];
++c_7318983.elements[2] = ((closureN)self_7312347)->elements[2];
++c_7318983.elements[3] = r_735469_7311446_7311496_7311545_7311593_7311640;
++c_7318983.elements[4] = ((closureN)self_7312347)->elements[4];
++
++return_closcall2(data,  ((closureN)self_7312347)->elements[3],  &c_7318983, quote__121param_91convert_125);; 
++}
++
++static void __lambda_665(void *data, object self_7312348, int argc, object *args) /* object self_7312348, object r_735472_7311447_7311497_7311546_7311594_7311641 */
++ {
++ object r_735472_7311447_7311497_7311546_7311594_7311641 = args[0];
++  
++pair_type local_7318988; 
++
++pair_type local_7318992; 
++
 +pair_type local_7318995; 
 +
-+pair_type local_7318999; 
++pair_type local_7318998; 
 +
 +pair_type local_7319002; 
 +
@@ -40648,444 +40830,466 @@ Make let-values be the same as let*-values, to work around
 +pair_type local_7319009; 
 +
 +pair_type local_7319012; 
-+
-+pair_type local_7319016; 
-+
-+pair_type local_7319019; 
-+return_direct_with_clo1(data,  ((closureN)self_7312355)->elements[0], (((closure)  ((closureN)self_7312355)->elements[0])->fn),  set_pair_as_expr(&local_7318995, ((closureN)self_7312355)->elements[1], set_pair_as_expr(&local_7318999, set_pair_as_expr(&local_7319002, set_pair_as_expr(&local_7319005, ((closureN)self_7312355)->elements[2], set_pair_as_expr(&local_7319009, set_pair_as_expr(&local_7319012, ((closureN)self_7312355)->elements[3], set_pair_as_expr(&local_7319016, r_735479_7311454_7311504_7311553_7311601_7311648, NULL)), NULL)), set_pair_as_expr(&local_7319019, ((closureN)self_7312355)->elements[4], NULL)), NULL)));; 
++return_direct_with_clo1(data,  ((closureN)self_7312348)->elements[0], (((closure)  ((closureN)self_7312348)->elements[0])->fn),  set_pair_as_expr(&local_7318988, ((closureN)self_7312348)->elements[1], set_pair_as_expr(&local_7318992, set_pair_as_expr(&local_7318995, set_pair_as_expr(&local_7318998, ((closureN)self_7312348)->elements[2], set_pair_as_expr(&local_7319002, set_pair_as_expr(&local_7319005, ((closureN)self_7312348)->elements[3], set_pair_as_expr(&local_7319009, r_735472_7311447_7311497_7311546_7311594_7311641, NULL)), NULL)), set_pair_as_expr(&local_7319012, ((closureN)self_7312348)->elements[4], NULL)), NULL)));; 
 +}
 +
-+static void __lambda_644(void *data, object self_7312356, int argc, object *args) /* object self_7312356, object r_735459_7311426_7311476_7311525_7311573_7311620 */
++static void __lambda_644(void *data, object self_7312349, int argc, object *args) /* object self_7312349, object r_735452_7311419_7311469_7311518_7311566_7311613 */
 + {
-+ object r_735459_7311426_7311476_7311525_7311573_7311620 = args[0];
++ object r_735452_7311419_7311469_7311518_7311566_7311613 = args[0];
 +  
-+closureN_type c_7318807;
-+object e_7318979 [10];
-+c_7318807.hdr.mark = gc_color_red;
-+ c_7318807.hdr.grayed = 0;
-+c_7318807.tag = closureN_tag;
-+ c_7318807.fn = (function_type)__lambda_645;
-+c_7318807.num_args = 1;
-+c_7318807.num_elements = 10;
-+c_7318807.elements = (object *)e_7318979;
-+c_7318807.elements[0] = ((closureN)self_7312356)->elements[0];
-+c_7318807.elements[1] = ((closureN)self_7312356)->elements[1];
-+c_7318807.elements[2] = ((closureN)self_7312356)->elements[2];
-+c_7318807.elements[3] = ((closureN)self_7312356)->elements[3];
-+c_7318807.elements[4] = ((closureN)self_7312356)->elements[4];
-+c_7318807.elements[5] = ((closureN)self_7312356)->elements[5];
-+c_7318807.elements[6] = ((closureN)self_7312356)->elements[6];
-+c_7318807.elements[7] = ((closureN)self_7312356)->elements[7];
-+c_7318807.elements[8] = ((closureN)self_7312356)->elements[8];
-+c_7318807.elements[9] = ((closureN)self_7312356)->elements[9];
-+
-+return_direct_with_clo5(data,  __glo_map_scheme_base, (((closure)  __glo_map_scheme_base)->fn),  &c_7318807, r_735459_7311426_7311476_7311525_7311573_7311620, ((closureN)self_7312356)->elements[1], ((closureN)self_7312356)->elements[3], ((closureN)self_7312356)->elements[10]);; 
++closureN_type c_7318800;
++object e_7318972 [10];
++c_7318800.hdr.mark = gc_color_red;
++ c_7318800.hdr.grayed = 0;
++c_7318800.tag = closureN_tag;
++ c_7318800.fn = (function_type)__lambda_645;
++c_7318800.num_args = 1;
++c_7318800.num_elements = 10;
++c_7318800.elements = (object *)e_7318972;
++c_7318800.elements[0] = ((closureN)self_7312349)->elements[0];
++c_7318800.elements[1] = ((closureN)self_7312349)->elements[1];
++c_7318800.elements[2] = ((closureN)self_7312349)->elements[2];
++c_7318800.elements[3] = ((closureN)self_7312349)->elements[3];
++c_7318800.elements[4] = ((closureN)self_7312349)->elements[4];
++c_7318800.elements[5] = ((closureN)self_7312349)->elements[5];
++c_7318800.elements[6] = ((closureN)self_7312349)->elements[6];
++c_7318800.elements[7] = ((closureN)self_7312349)->elements[7];
++c_7318800.elements[8] = ((closureN)self_7312349)->elements[8];
++c_7318800.elements[9] = ((closureN)self_7312349)->elements[9];
++
++return_direct_with_clo5(data,  __glo_map_scheme_base, (((closure)  __glo_map_scheme_base)->fn),  &c_7318800, r_735452_7311419_7311469_7311518_7311566_7311613, ((closureN)self_7312349)->elements[1], ((closureN)self_7312349)->elements[3], ((closureN)self_7312349)->elements[10]);; 
 +}
 +
-+static void __lambda_645(void *data, object self_7312357, int argc, object *args) /* object self_7312357, object r_735458_7311427_7311477_7311526_7311574_7311621 */
++static void __lambda_645(void *data, object self_7312350, int argc, object *args) /* object self_7312350, object r_735451_7311420_7311470_7311519_7311567_7311614 */
 + {
-+ object r_735458_7311427_7311477_7311526_7311574_7311621 = args[0];
++ object r_735451_7311420_7311470_7311519_7311567_7311614 = args[0];
 +  
-+closureN_type c_7318809;
-+object e_7318977 [9];
-+c_7318809.hdr.mark = gc_color_red;
-+ c_7318809.hdr.grayed = 0;
-+c_7318809.tag = closureN_tag;
-+ c_7318809.fn = (function_type)__lambda_646;
-+c_7318809.num_args = 1;
-+c_7318809.num_elements = 9;
-+c_7318809.elements = (object *)e_7318977;
-+c_7318809.elements[0] = ((closureN)self_7312357)->elements[0];
-+c_7318809.elements[1] = ((closureN)self_7312357)->elements[1];
-+c_7318809.elements[2] = ((closureN)self_7312357)->elements[2];
-+c_7318809.elements[3] = ((closureN)self_7312357)->elements[3];
-+c_7318809.elements[4] = ((closureN)self_7312357)->elements[4];
-+c_7318809.elements[5] = ((closureN)self_7312357)->elements[5];
-+c_7318809.elements[6] = ((closureN)self_7312357)->elements[6];
-+c_7318809.elements[7] = ((closureN)self_7312357)->elements[8];
-+c_7318809.elements[8] = ((closureN)self_7312357)->elements[9];
-+
-+return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7318809, ((closureN)self_7312357)->elements[7], r_735458_7311427_7311477_7311526_7311574_7311621);; 
++closureN_type c_7318802;
++object e_7318970 [9];
++c_7318802.hdr.mark = gc_color_red;
++ c_7318802.hdr.grayed = 0;
++c_7318802.tag = closureN_tag;
++ c_7318802.fn = (function_type)__lambda_646;
++c_7318802.num_args = 1;
++c_7318802.num_elements = 9;
++c_7318802.elements = (object *)e_7318970;
++c_7318802.elements[0] = ((closureN)self_7312350)->elements[0];
++c_7318802.elements[1] = ((closureN)self_7312350)->elements[1];
++c_7318802.elements[2] = ((closureN)self_7312350)->elements[2];
++c_7318802.elements[3] = ((closureN)self_7312350)->elements[3];
++c_7318802.elements[4] = ((closureN)self_7312350)->elements[4];
++c_7318802.elements[5] = ((closureN)self_7312350)->elements[5];
++c_7318802.elements[6] = ((closureN)self_7312350)->elements[6];
++c_7318802.elements[7] = ((closureN)self_7312350)->elements[8];
++c_7318802.elements[8] = ((closureN)self_7312350)->elements[9];
++
++return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7318802, ((closureN)self_7312350)->elements[7], r_735451_7311420_7311470_7311519_7311567_7311614);; 
 +}
 +
-+static void __lambda_646(void *data, object self_7312358, int argc, object *args) /* object self_7312358, object r_735384_7311428_7311478_7311527_7311575_7311622 */
++static void __lambda_646(void *data, object self_7312351, int argc, object *args) /* object self_7312351, object r_735377_7311421_7311471_7311520_7311568_7311615 */
 + {
-+ object r_735384_7311428_7311478_7311527_7311575_7311622 = args[0];
++ object r_735377_7311421_7311471_7311520_7311568_7311615 = args[0];
 +  
-+closureN_type c_7318812;
-+object e_7318976 [10];
-+c_7318812.hdr.mark = gc_color_red;
-+ c_7318812.hdr.grayed = 0;
-+c_7318812.tag = closureN_tag;
-+ c_7318812.fn = (function_type)__lambda_647;
-+c_7318812.num_args = 1;
-+c_7318812.num_elements = 10;
-+c_7318812.elements = (object *)e_7318976;
-+c_7318812.elements[0] = ((closureN)self_7312358)->elements[0];
-+c_7318812.elements[1] = ((closureN)self_7312358)->elements[1];
-+c_7318812.elements[2] = ((closureN)self_7312358)->elements[2];
-+c_7318812.elements[3] = ((closureN)self_7312358)->elements[3];
-+c_7318812.elements[4] = ((closureN)self_7312358)->elements[4];
-+c_7318812.elements[5] = ((closureN)self_7312358)->elements[5];
-+c_7318812.elements[6] = ((closureN)self_7312358)->elements[6];
-+c_7318812.elements[7] = r_735384_7311428_7311478_7311527_7311575_7311622;
-+c_7318812.elements[8] = ((closureN)self_7312358)->elements[7];
-+c_7318812.elements[9] = ((closureN)self_7312358)->elements[8];
-+
-+return_closcall2(data,  ((closureN)self_7312358)->elements[7],  &c_7318812, quote_dynamic_91wind);; 
++closureN_type c_7318805;
++object e_7318969 [10];
++c_7318805.hdr.mark = gc_color_red;
++ c_7318805.hdr.grayed = 0;
++c_7318805.tag = closureN_tag;
++ c_7318805.fn = (function_type)__lambda_647;
++c_7318805.num_args = 1;
++c_7318805.num_elements = 10;
++c_7318805.elements = (object *)e_7318969;
++c_7318805.elements[0] = ((closureN)self_7312351)->elements[0];
++c_7318805.elements[1] = ((closureN)self_7312351)->elements[1];
++c_7318805.elements[2] = ((closureN)self_7312351)->elements[2];
++c_7318805.elements[3] = ((closureN)self_7312351)->elements[3];
++c_7318805.elements[4] = ((closureN)self_7312351)->elements[4];
++c_7318805.elements[5] = ((closureN)self_7312351)->elements[5];
++c_7318805.elements[6] = ((closureN)self_7312351)->elements[6];
++c_7318805.elements[7] = r_735377_7311421_7311471_7311520_7311568_7311615;
++c_7318805.elements[8] = ((closureN)self_7312351)->elements[7];
++c_7318805.elements[9] = ((closureN)self_7312351)->elements[8];
++
++return_closcall2(data,  ((closureN)self_7312351)->elements[7],  &c_7318805, quote_dynamic_91wind);; 
 +}
 +
-+static void __lambda_647(void *data, object self_7312359, int argc, object *args) /* object self_7312359, object r_735390_7311429_7311479_7311528_7311576_7311623 */
++static void __lambda_647(void *data, object self_7312352, int argc, object *args) /* object self_7312352, object r_735383_7311422_7311472_7311521_7311569_7311616 */
 + {
-+ object r_735390_7311429_7311479_7311528_7311576_7311623 = args[0];
++ object r_735383_7311422_7311472_7311521_7311569_7311616 = args[0];
 +  
-+closureN_type c_7318815;
-+object e_7318975 [11];
-+c_7318815.hdr.mark = gc_color_red;
-+ c_7318815.hdr.grayed = 0;
-+c_7318815.tag = closureN_tag;
-+ c_7318815.fn = (function_type)__lambda_648;
-+c_7318815.num_args = 1;
-+c_7318815.num_elements = 11;
-+c_7318815.elements = (object *)e_7318975;
-+c_7318815.elements[0] = ((closureN)self_7312359)->elements[0];
-+c_7318815.elements[1] = ((closureN)self_7312359)->elements[1];
-+c_7318815.elements[2] = ((closureN)self_7312359)->elements[2];
-+c_7318815.elements[3] = ((closureN)self_7312359)->elements[3];
-+c_7318815.elements[4] = ((closureN)self_7312359)->elements[4];
-+c_7318815.elements[5] = ((closureN)self_7312359)->elements[5];
-+c_7318815.elements[6] = ((closureN)self_7312359)->elements[6];
-+c_7318815.elements[7] = ((closureN)self_7312359)->elements[7];
-+c_7318815.elements[8] = r_735390_7311429_7311479_7311528_7311576_7311623;
-+c_7318815.elements[9] = ((closureN)self_7312359)->elements[8];
-+c_7318815.elements[10] = ((closureN)self_7312359)->elements[9];
-+
-+return_closcall2(data,  ((closureN)self_7312359)->elements[8],  &c_7318815, quote_lambda);; 
++closureN_type c_7318808;
++object e_7318968 [11];
++c_7318808.hdr.mark = gc_color_red;
++ c_7318808.hdr.grayed = 0;
++c_7318808.tag = closureN_tag;
++ c_7318808.fn = (function_type)__lambda_648;
++c_7318808.num_args = 1;
++c_7318808.num_elements = 11;
++c_7318808.elements = (object *)e_7318968;
++c_7318808.elements[0] = ((closureN)self_7312352)->elements[0];
++c_7318808.elements[1] = ((closureN)self_7312352)->elements[1];
++c_7318808.elements[2] = ((closureN)self_7312352)->elements[2];
++c_7318808.elements[3] = ((closureN)self_7312352)->elements[3];
++c_7318808.elements[4] = ((closureN)self_7312352)->elements[4];
++c_7318808.elements[5] = ((closureN)self_7312352)->elements[5];
++c_7318808.elements[6] = ((closureN)self_7312352)->elements[6];
++c_7318808.elements[7] = ((closureN)self_7312352)->elements[7];
++c_7318808.elements[8] = r_735383_7311422_7311472_7311521_7311569_7311616;
++c_7318808.elements[9] = ((closureN)self_7312352)->elements[8];
++c_7318808.elements[10] = ((closureN)self_7312352)->elements[9];
++
++return_closcall2(data,  ((closureN)self_7312352)->elements[8],  &c_7318808, quote_lambda);; 
 +}
 +
-+static void __lambda_648(void *data, object self_7312360, int argc, object *args) /* object self_7312360, object r_735432_7311430_7311480_7311529_7311577_7311624 */
++static void __lambda_648(void *data, object self_7312353, int argc, object *args) /* object self_7312353, object r_735425_7311423_7311473_7311522_7311570_7311617 */
 + {
-+ object r_735432_7311430_7311480_7311529_7311577_7311624 = args[0];
++ object r_735425_7311423_7311473_7311522_7311570_7311617 = args[0];
 +  
-+closureN_type c_7318817;
-+object e_7318944 [12];
-+c_7318817.hdr.mark = gc_color_red;
-+ c_7318817.hdr.grayed = 0;
-+c_7318817.tag = closureN_tag;
-+ c_7318817.fn = (function_type)__lambda_649;
-+c_7318817.num_args = 1;
-+c_7318817.num_elements = 12;
-+c_7318817.elements = (object *)e_7318944;
-+c_7318817.elements[0] = ((closureN)self_7312360)->elements[0];
-+c_7318817.elements[1] = ((closureN)self_7312360)->elements[1];
-+c_7318817.elements[2] = ((closureN)self_7312360)->elements[2];
-+c_7318817.elements[3] = ((closureN)self_7312360)->elements[3];
-+c_7318817.elements[4] = ((closureN)self_7312360)->elements[4];
-+c_7318817.elements[5] = ((closureN)self_7312360)->elements[5];
-+c_7318817.elements[6] = ((closureN)self_7312360)->elements[6];
-+c_7318817.elements[7] = ((closureN)self_7312360)->elements[7];
-+c_7318817.elements[8] = ((closureN)self_7312360)->elements[8];
-+c_7318817.elements[9] = r_735432_7311430_7311480_7311529_7311577_7311624;
-+c_7318817.elements[10] = ((closureN)self_7312360)->elements[9];
-+c_7318817.elements[11] = ((closureN)self_7312360)->elements[10];
-+
-+
-+closureN_type c_7318945;
-+object e_7318974 [1];
-+c_7318945.hdr.mark = gc_color_red;
-+ c_7318945.hdr.grayed = 0;
-+c_7318945.tag = closureN_tag;
-+ c_7318945.fn = (function_type)__lambda_660;
-+c_7318945.num_args = 2;
-+c_7318945.num_elements = 1;
-+c_7318945.elements = (object *)e_7318974;
-+c_7318945.elements[0] = ((closureN)self_7312360)->elements[9];
-+
-+return_direct_with_clo1(data,(closure)&c_7318817,__lambda_649,  &c_7318945);; 
++closureN_type c_7318810;
++object e_7318937 [12];
++c_7318810.hdr.mark = gc_color_red;
++ c_7318810.hdr.grayed = 0;
++c_7318810.tag = closureN_tag;
++ c_7318810.fn = (function_type)__lambda_649;
++c_7318810.num_args = 1;
++c_7318810.num_elements = 12;
++c_7318810.elements = (object *)e_7318937;
++c_7318810.elements[0] = ((closureN)self_7312353)->elements[0];
++c_7318810.elements[1] = ((closureN)self_7312353)->elements[1];
++c_7318810.elements[2] = ((closureN)self_7312353)->elements[2];
++c_7318810.elements[3] = ((closureN)self_7312353)->elements[3];
++c_7318810.elements[4] = ((closureN)self_7312353)->elements[4];
++c_7318810.elements[5] = ((closureN)self_7312353)->elements[5];
++c_7318810.elements[6] = ((closureN)self_7312353)->elements[6];
++c_7318810.elements[7] = ((closureN)self_7312353)->elements[7];
++c_7318810.elements[8] = ((closureN)self_7312353)->elements[8];
++c_7318810.elements[9] = r_735425_7311423_7311473_7311522_7311570_7311617;
++c_7318810.elements[10] = ((closureN)self_7312353)->elements[9];
++c_7318810.elements[11] = ((closureN)self_7312353)->elements[10];
+ 
+-return_closcall2(data,  ((closureN)self_7313615)->elements[0],  &c_7320201, quote_quote);; 
+-}
+ 
+-static void __lambda_658(void *data, object self_7313616, int argc, object *args) /* object self_7313616, object r_735862_738377_738405_738431_738456_7312688_7312738_7312787_7312835_7312882 */
+- {
+- object r_735862_738377_738405_738431_738456_7312688_7312738_7312787_7312835_7312882 = args[0];
+-  
+-closureN_type c_7320204;
+-object e_7320225 [4];
+-c_7320204.hdr.mark = gc_color_red;
+- c_7320204.hdr.grayed = 0;
+-c_7320204.tag = closureN_tag;
+- c_7320204.fn = (function_type)__lambda_659;
+-c_7320204.num_args = 1;
+-c_7320204.num_elements = 4;
+-c_7320204.elements = (object *)e_7320225;
+-c_7320204.elements[0] = ((closureN)self_7313616)->elements[0];
+-c_7320204.elements[1] = ((closureN)self_7313616)->elements[1];
+-c_7320204.elements[2] = ((closureN)self_7313616)->elements[2];
+-c_7320204.elements[3] = r_735862_738377_738405_738431_738456_7312688_7312738_7312787_7312835_7312882;
++closureN_type c_7318938;
++object e_7318967 [1];
++c_7318938.hdr.mark = gc_color_red;
++ c_7318938.hdr.grayed = 0;
++c_7318938.tag = closureN_tag;
++ c_7318938.fn = (function_type)__lambda_660;
++c_7318938.num_args = 2;
++c_7318938.num_elements = 1;
++c_7318938.elements = (object *)e_7318967;
++c_7318938.elements[0] = ((closureN)self_7312353)->elements[9];
++
++return_direct_with_clo1(data,(closure)&c_7318810,__lambda_649,  &c_7318938);; 
 +}
 +
-+static void __lambda_660(void *data, object self_7312361, int argc, object *args) /* object self_7312361, object k_735439_7311444_7311494_7311543_7311591_7311638, object p_73952_731066_733060_7311445_7311495_7311544_7311592_7311639, object new_73953_731067_733061_7311446_7311496_7311545_7311593_7311640 */
++static void __lambda_660(void *data, object self_7312354, int argc, object *args) /* object self_7312354, object k_735432_7311437_7311487_7311536_7311584_7311631, object p_73951_731065_733053_7311438_7311488_7311537_7311585_7311632, object new_73952_731066_733054_7311439_7311489_7311538_7311586_7311633 */
 + {
-+ object k_735439_7311444_7311494_7311543_7311591_7311638 = args[0]; object p_73952_731066_733060_7311445_7311495_7311544_7311592_7311639 = args[1]; object new_73953_731067_733061_7311446_7311496_7311545_7311593_7311640 = args[2];
++ object k_735432_7311437_7311487_7311536_7311584_7311631 = args[0]; object p_73951_731065_733053_7311438_7311488_7311537_7311585_7311632 = args[1]; object new_73952_731066_733054_7311439_7311489_7311538_7311586_7311633 = args[2];
 +  
-+closureN_type c_7318948;
-+object e_7318973 [4];
-+c_7318948.hdr.mark = gc_color_red;
-+ c_7318948.hdr.grayed = 0;
-+c_7318948.tag = closureN_tag;
-+ c_7318948.fn = (function_type)__lambda_661;
-+c_7318948.num_args = 1;
-+c_7318948.num_elements = 4;
-+c_7318948.elements = (object *)e_7318973;
-+c_7318948.elements[0] = k_735439_7311444_7311494_7311543_7311591_7311638;
-+c_7318948.elements[1] = new_73953_731067_733061_7311446_7311496_7311545_7311593_7311640;
-+c_7318948.elements[2] = p_73952_731066_733060_7311445_7311495_7311544_7311592_7311639;
-+c_7318948.elements[3] = ((closureN)self_7312361)->elements[0];
-+
-+return_closcall2(data,  ((closureN)self_7312361)->elements[0],  &c_7318948, quote_quote);; 
++closureN_type c_7318941;
++object e_7318966 [4];
++c_7318941.hdr.mark = gc_color_red;
++ c_7318941.hdr.grayed = 0;
++c_7318941.tag = closureN_tag;
++ c_7318941.fn = (function_type)__lambda_661;
++c_7318941.num_args = 1;
++c_7318941.num_elements = 4;
++c_7318941.elements = (object *)e_7318966;
++c_7318941.elements[0] = k_735432_7311437_7311487_7311536_7311584_7311631;
++c_7318941.elements[1] = new_73952_731066_733054_7311439_7311489_7311538_7311586_7311633;
++c_7318941.elements[2] = p_73951_731065_733053_7311438_7311488_7311537_7311585_7311632;
++c_7318941.elements[3] = ((closureN)self_7312354)->elements[0];
++
++return_closcall2(data,  ((closureN)self_7312354)->elements[0],  &c_7318941, quote_quote);; 
 +}
 +
-+static void __lambda_661(void *data, object self_7312362, int argc, object *args) /* object self_7312362, object r_735447_7311447_7311497_7311546_7311594_7311641 */
++static void __lambda_661(void *data, object self_7312355, int argc, object *args) /* object self_7312355, object r_735440_7311440_7311490_7311539_7311587_7311634 */
 + {
-+ object r_735447_7311447_7311497_7311546_7311594_7311641 = args[0];
++ object r_735440_7311440_7311490_7311539_7311587_7311634 = args[0];
 +  
-+closureN_type c_7318951;
-+object e_7318972 [4];
-+c_7318951.hdr.mark = gc_color_red;
-+ c_7318951.hdr.grayed = 0;
-+c_7318951.tag = closureN_tag;
-+ c_7318951.fn = (function_type)__lambda_662;
-+c_7318951.num_args = 1;
-+c_7318951.num_elements = 4;
-+c_7318951.elements = (object *)e_7318972;
-+c_7318951.elements[0] = ((closureN)self_7312362)->elements[0];
-+c_7318951.elements[1] = ((closureN)self_7312362)->elements[1];
-+c_7318951.elements[2] = ((closureN)self_7312362)->elements[2];
-+c_7318951.elements[3] = r_735447_7311447_7311497_7311546_7311594_7311641;
-+
-+return_closcall2(data,  ((closureN)self_7312362)->elements[3],  &c_7318951, quote__121param_91set_67_125);; 
++closureN_type c_7318944;
++object e_7318965 [4];
++c_7318944.hdr.mark = gc_color_red;
++ c_7318944.hdr.grayed = 0;
++c_7318944.tag = closureN_tag;
++ c_7318944.fn = (function_type)__lambda_662;
++c_7318944.num_args = 1;
++c_7318944.num_elements = 4;
++c_7318944.elements = (object *)e_7318965;
++c_7318944.elements[0] = ((closureN)self_7312355)->elements[0];
++c_7318944.elements[1] = ((closureN)self_7312355)->elements[1];
++c_7318944.elements[2] = ((closureN)self_7312355)->elements[2];
++c_7318944.elements[3] = r_735440_7311440_7311490_7311539_7311587_7311634;
++
++return_closcall2(data,  ((closureN)self_7312355)->elements[3],  &c_7318944, quote__121param_91set_67_125);; 
 +}
 +
-+static void __lambda_662(void *data, object self_7312363, int argc, object *args) /* object self_7312363, object r_735450_7311448_7311498_7311547_7311595_7311642 */
++static void __lambda_662(void *data, object self_7312356, int argc, object *args) /* object self_7312356, object r_735443_7311441_7311491_7311540_7311588_7311635 */
 + {
-+ object r_735450_7311448_7311498_7311547_7311595_7311642 = args[0];
++ object r_735443_7311441_7311491_7311540_7311588_7311635 = args[0];
 +  
++pair_type local_7318949; 
++
++pair_type local_7318953; 
++
 +pair_type local_7318956; 
 +
 +pair_type local_7318960; 
 +
 +pair_type local_7318963; 
-+
-+pair_type local_7318967; 
-+
-+pair_type local_7318970; 
-+return_direct_with_clo1(data,  ((closureN)self_7312363)->elements[0], (((closure)  ((closureN)self_7312363)->elements[0])->fn),  set_pair_as_expr(&local_7318956, ((closureN)self_7312363)->elements[2], set_pair_as_expr(&local_7318960, set_pair_as_expr(&local_7318963, ((closureN)self_7312363)->elements[3], set_pair_as_expr(&local_7318967, r_735450_7311448_7311498_7311547_7311595_7311642, NULL)), set_pair_as_expr(&local_7318970, ((closureN)self_7312363)->elements[1], NULL))));; 
-+}
-+
-+static void __lambda_649(void *data, object self_7312364, int argc, object *args) /* object self_7312364, object r_735438_7311431_7311481_7311530_7311578_7311625 */
-+ {
-+ object r_735438_7311431_7311481_7311530_7311578_7311625 = args[0];
-+  
-+closureN_type c_7318819;
-+object e_7318941 [11];
-+c_7318819.hdr.mark = gc_color_red;
-+ c_7318819.hdr.grayed = 0;
-+c_7318819.tag = closureN_tag;
-+ c_7318819.fn = (function_type)__lambda_650;
-+c_7318819.num_args = 1;
-+c_7318819.num_elements = 11;
-+c_7318819.elements = (object *)e_7318941;
-+c_7318819.elements[0] = ((closureN)self_7312364)->elements[0];
-+c_7318819.elements[1] = ((closureN)self_7312364)->elements[2];
-+c_7318819.elements[2] = ((closureN)self_7312364)->elements[3];
-+c_7318819.elements[3] = ((closureN)self_7312364)->elements[4];
-+c_7318819.elements[4] = ((closureN)self_7312364)->elements[5];
-+c_7318819.elements[5] = ((closureN)self_7312364)->elements[6];
-+c_7318819.elements[6] = ((closureN)self_7312364)->elements[7];
-+c_7318819.elements[7] = ((closureN)self_7312364)->elements[8];
-+c_7318819.elements[8] = ((closureN)self_7312364)->elements[9];
-+c_7318819.elements[9] = ((closureN)self_7312364)->elements[10];
-+c_7318819.elements[10] = ((closureN)self_7312364)->elements[11];
-+
-+return_direct_with_clo4(data,  __glo_Cyc_91map_91loop_912_scheme_base, (((closure)  __glo_Cyc_91map_91loop_912_scheme_base)->fn),  &c_7318819, r_735438_7311431_7311481_7311530_7311578_7311625, ((closureN)self_7312364)->elements[3], ((closureN)self_7312364)->elements[1]);; 
++return_direct_with_clo1(data,  ((closureN)self_7312356)->elements[0], (((closure)  ((closureN)self_7312356)->elements[0])->fn),  set_pair_as_expr(&local_7318949, ((closureN)self_7312356)->elements[2], set_pair_as_expr(&local_7318953, set_pair_as_expr(&local_7318956, ((closureN)self_7312356)->elements[3], set_pair_as_expr(&local_7318960, r_735443_7311441_7311491_7311540_7311588_7311635, NULL)), set_pair_as_expr(&local_7318963, ((closureN)self_7312356)->elements[1], NULL))));; 
 +}
 +
-+static void __lambda_650(void *data, object self_7312365, int argc, object *args) /* object self_7312365, object r_735436_7311432_7311482_7311531_7311579_7311626 */
++static void __lambda_649(void *data, object self_7312357, int argc, object *args) /* object self_7312357, object r_735431_7311424_7311474_7311523_7311571_7311618 */
 + {
-+ object r_735436_7311432_7311482_7311531_7311579_7311626 = args[0];
++ object r_735431_7311424_7311474_7311523_7311571_7311618 = args[0];
 +  
-+closureN_type c_7318821;
-+object e_7318937 [11];
-+c_7318821.hdr.mark = gc_color_red;
-+ c_7318821.hdr.grayed = 0;
-+c_7318821.tag = closureN_tag;
-+ c_7318821.fn = (function_type)__lambda_651;
-+c_7318821.num_args = 1;
-+c_7318821.num_elements = 11;
-+c_7318821.elements = (object *)e_7318937;
-+c_7318821.elements[0] = ((closureN)self_7312365)->elements[0];
-+c_7318821.elements[1] = ((closureN)self_7312365)->elements[1];
-+c_7318821.elements[2] = ((closureN)self_7312365)->elements[2];
-+c_7318821.elements[3] = ((closureN)self_7312365)->elements[3];
-+c_7318821.elements[4] = ((closureN)self_7312365)->elements[4];
-+c_7318821.elements[5] = ((closureN)self_7312365)->elements[5];
-+c_7318821.elements[6] = ((closureN)self_7312365)->elements[6];
-+c_7318821.elements[7] = ((closureN)self_7312365)->elements[7];
-+c_7318821.elements[8] = ((closureN)self_7312365)->elements[8];
-+c_7318821.elements[9] = ((closureN)self_7312365)->elements[9];
-+c_7318821.elements[10] = ((closureN)self_7312365)->elements[10];
-+
-+
-+pair_type local_7318940; 
-+return_direct_with_clo1(data,(closure)&c_7318821,__lambda_651,  set_pair_as_expr(&local_7318940, NULL, r_735436_7311432_7311482_7311531_7311579_7311626));; 
++closureN_type c_7318812;
++object e_7318934 [11];
++c_7318812.hdr.mark = gc_color_red;
++ c_7318812.hdr.grayed = 0;
++c_7318812.tag = closureN_tag;
++ c_7318812.fn = (function_type)__lambda_650;
++c_7318812.num_args = 1;
++c_7318812.num_elements = 11;
++c_7318812.elements = (object *)e_7318934;
++c_7318812.elements[0] = ((closureN)self_7312357)->elements[0];
++c_7318812.elements[1] = ((closureN)self_7312357)->elements[2];
++c_7318812.elements[2] = ((closureN)self_7312357)->elements[3];
++c_7318812.elements[3] = ((closureN)self_7312357)->elements[4];
++c_7318812.elements[4] = ((closureN)self_7312357)->elements[5];
++c_7318812.elements[5] = ((closureN)self_7312357)->elements[6];
++c_7318812.elements[6] = ((closureN)self_7312357)->elements[7];
++c_7318812.elements[7] = ((closureN)self_7312357)->elements[8];
++c_7318812.elements[8] = ((closureN)self_7312357)->elements[9];
++c_7318812.elements[9] = ((closureN)self_7312357)->elements[10];
++c_7318812.elements[10] = ((closureN)self_7312357)->elements[11];
++
++return_direct_with_clo4(data,  __glo_Cyc_91map_91loop_912_scheme_base, (((closure)  __glo_Cyc_91map_91loop_912_scheme_base)->fn),  &c_7318812, r_735431_7311424_7311474_7311523_7311571_7311618, ((closureN)self_7312357)->elements[3], ((closureN)self_7312357)->elements[1]);; 
 +}
 +
-+static void __lambda_651(void *data, object self_7312366, int argc, object *args) /* object self_7312366, object r_735433_737586_7311433_7311483_7311532_7311580_7311627 */
++static void __lambda_650(void *data, object self_7312358, int argc, object *args) /* object self_7312358, object r_735429_7311425_7311475_7311524_7311572_7311619 */
 + {
-+ object r_735433_737586_7311433_7311483_7311532_7311580_7311627 = args[0];
++ object r_735429_7311425_7311475_7311524_7311572_7311619 = args[0];
 +  
-+closureN_type c_7318824;
-+object e_7318936 [12];
-+c_7318824.hdr.mark = gc_color_red;
-+ c_7318824.hdr.grayed = 0;
-+c_7318824.tag = closureN_tag;
-+ c_7318824.fn = (function_type)__lambda_652;
-+c_7318824.num_args = 1;
-+c_7318824.num_elements = 12;
-+c_7318824.elements = (object *)e_7318936;
-+c_7318824.elements[0] = ((closureN)self_7312366)->elements[0];
-+c_7318824.elements[1] = ((closureN)self_7312366)->elements[1];
-+c_7318824.elements[2] = ((closureN)self_7312366)->elements[2];
-+c_7318824.elements[3] = ((closureN)self_7312366)->elements[3];
-+c_7318824.elements[4] = ((closureN)self_7312366)->elements[4];
-+c_7318824.elements[5] = ((closureN)self_7312366)->elements[5];
-+c_7318824.elements[6] = ((closureN)self_7312366)->elements[6];
-+c_7318824.elements[7] = ((closureN)self_7312366)->elements[7];
-+c_7318824.elements[8] = ((closureN)self_7312366)->elements[8];
-+c_7318824.elements[9] = r_735433_737586_7311433_7311483_7311532_7311580_7311627;
-+c_7318824.elements[10] = ((closureN)self_7312366)->elements[9];
-+c_7318824.elements[11] = ((closureN)self_7312366)->elements[10];
-+
-+return_closcall2(data,  ((closureN)self_7312366)->elements[9],  &c_7318824, quote_lambda);; 
++closureN_type c_7318814;
++object e_7318930 [11];
++c_7318814.hdr.mark = gc_color_red;
++ c_7318814.hdr.grayed = 0;
++c_7318814.tag = closureN_tag;
++ c_7318814.fn = (function_type)__lambda_651;
++c_7318814.num_args = 1;
++c_7318814.num_elements = 11;
++c_7318814.elements = (object *)e_7318930;
++c_7318814.elements[0] = ((closureN)self_7312358)->elements[0];
++c_7318814.elements[1] = ((closureN)self_7312358)->elements[1];
++c_7318814.elements[2] = ((closureN)self_7312358)->elements[2];
++c_7318814.elements[3] = ((closureN)self_7312358)->elements[3];
++c_7318814.elements[4] = ((closureN)self_7312358)->elements[4];
++c_7318814.elements[5] = ((closureN)self_7312358)->elements[5];
++c_7318814.elements[6] = ((closureN)self_7312358)->elements[6];
++c_7318814.elements[7] = ((closureN)self_7312358)->elements[7];
++c_7318814.elements[8] = ((closureN)self_7312358)->elements[8];
++c_7318814.elements[9] = ((closureN)self_7312358)->elements[9];
++c_7318814.elements[10] = ((closureN)self_7312358)->elements[10];
++
++
++pair_type local_7318933; 
++return_direct_with_clo1(data,(closure)&c_7318814,__lambda_651,  set_pair_as_expr(&local_7318933, NULL, r_735429_7311425_7311475_7311524_7311572_7311619));; 
 +}
 +
-+static void __lambda_652(void *data, object self_7312367, int argc, object *args) /* object self_7312367, object r_735426_737588_737616_7311434_7311484_7311533_7311581_7311628 */
++static void __lambda_651(void *data, object self_7312359, int argc, object *args) /* object self_7312359, object r_735426_737579_7311426_7311476_7311525_7311573_7311620 */
 + {
-+ object r_735426_737588_737616_7311434_7311484_7311533_7311581_7311628 = args[0];
++ object r_735426_737579_7311426_7311476_7311525_7311573_7311620 = args[0];
 +  
-+closureN_type c_7318827;
-+object e_7318935 [13];
-+c_7318827.hdr.mark = gc_color_red;
-+ c_7318827.hdr.grayed = 0;
-+c_7318827.tag = closureN_tag;
-+ c_7318827.fn = (function_type)__lambda_653;
-+c_7318827.num_args = 1;
-+c_7318827.num_elements = 13;
-+c_7318827.elements = (object *)e_7318935;
-+c_7318827.elements[0] = ((closureN)self_7312367)->elements[0];
-+c_7318827.elements[1] = ((closureN)self_7312367)->elements[1];
-+c_7318827.elements[2] = ((closureN)self_7312367)->elements[2];
-+c_7318827.elements[3] = ((closureN)self_7312367)->elements[3];
-+c_7318827.elements[4] = ((closureN)self_7312367)->elements[4];
-+c_7318827.elements[5] = ((closureN)self_7312367)->elements[5];
-+c_7318827.elements[6] = ((closureN)self_7312367)->elements[6];
-+c_7318827.elements[7] = ((closureN)self_7312367)->elements[7];
-+c_7318827.elements[8] = r_735426_737588_737616_7311434_7311484_7311533_7311581_7311628;
-+c_7318827.elements[9] = ((closureN)self_7312367)->elements[8];
-+c_7318827.elements[10] = ((closureN)self_7312367)->elements[9];
-+c_7318827.elements[11] = ((closureN)self_7312367)->elements[10];
-+c_7318827.elements[12] = ((closureN)self_7312367)->elements[11];
-+
-+return_closcall2(data,  ((closureN)self_7312367)->elements[10],  &c_7318827, quote_lambda);; 
++closureN_type c_7318817;
++object e_7318929 [12];
++c_7318817.hdr.mark = gc_color_red;
++ c_7318817.hdr.grayed = 0;
++c_7318817.tag = closureN_tag;
++ c_7318817.fn = (function_type)__lambda_652;
++c_7318817.num_args = 1;
++c_7318817.num_elements = 12;
++c_7318817.elements = (object *)e_7318929;
++c_7318817.elements[0] = ((closureN)self_7312359)->elements[0];
++c_7318817.elements[1] = ((closureN)self_7312359)->elements[1];
++c_7318817.elements[2] = ((closureN)self_7312359)->elements[2];
++c_7318817.elements[3] = ((closureN)self_7312359)->elements[3];
++c_7318817.elements[4] = ((closureN)self_7312359)->elements[4];
++c_7318817.elements[5] = ((closureN)self_7312359)->elements[5];
++c_7318817.elements[6] = ((closureN)self_7312359)->elements[6];
++c_7318817.elements[7] = ((closureN)self_7312359)->elements[7];
++c_7318817.elements[8] = ((closureN)self_7312359)->elements[8];
++c_7318817.elements[9] = r_735426_737579_7311426_7311476_7311525_7311573_7311620;
++c_7318817.elements[10] = ((closureN)self_7312359)->elements[9];
++c_7318817.elements[11] = ((closureN)self_7312359)->elements[10];
++
++return_closcall2(data,  ((closureN)self_7312359)->elements[9],  &c_7318817, quote_lambda);; 
 +}
 +
-+static void __lambda_653(void *data, object self_7312368, int argc, object *args) /* object self_7312368, object r_735402_737591_737619_737645_737670_7311435_7311485_7311534_7311582_7311629 */
++static void __lambda_652(void *data, object self_7312360, int argc, object *args) /* object self_7312360, object r_735419_737581_737609_7311427_7311477_7311526_7311574_7311621 */
 + {
-+ object r_735402_737591_737619_737645_737670_7311435_7311485_7311534_7311582_7311629 = args[0];
++ object r_735419_737581_737609_7311427_7311477_7311526_7311574_7311621 = args[0];
 +  
-+closureN_type c_7318829;
-+object e_7318904 [13];
-+c_7318829.hdr.mark = gc_color_red;
-+ c_7318829.hdr.grayed = 0;
-+c_7318829.tag = closureN_tag;
-+ c_7318829.fn = (function_type)__lambda_654;
-+c_7318829.num_args = 1;
-+c_7318829.num_elements = 13;
-+c_7318829.elements = (object *)e_7318904;
-+c_7318829.elements[0] = ((closureN)self_7312368)->elements[0];
-+c_7318829.elements[1] = ((closureN)self_7312368)->elements[1];
-+c_7318829.elements[2] = ((closureN)self_7312368)->elements[2];
-+c_7318829.elements[3] = ((closureN)self_7312368)->elements[3];
-+c_7318829.elements[4] = ((closureN)self_7312368)->elements[4];
-+c_7318829.elements[5] = ((closureN)self_7312368)->elements[5];
-+c_7318829.elements[6] = ((closureN)self_7312368)->elements[6];
-+c_7318829.elements[7] = ((closureN)self_7312368)->elements[7];
-+c_7318829.elements[8] = r_735402_737591_737619_737645_737670_7311435_7311485_7311534_7311582_7311629;
-+c_7318829.elements[9] = ((closureN)self_7312368)->elements[8];
-+c_7318829.elements[10] = ((closureN)self_7312368)->elements[9];
-+c_7318829.elements[11] = ((closureN)self_7312368)->elements[10];
-+c_7318829.elements[12] = ((closureN)self_7312368)->elements[12];
-+
-+
-+closureN_type c_7318905;
-+object e_7318934 [1];
-+c_7318905.hdr.mark = gc_color_red;
-+ c_7318905.hdr.grayed = 0;
-+c_7318905.tag = closureN_tag;
-+ c_7318905.fn = (function_type)__lambda_657;
-+c_7318905.num_args = 2;
-+c_7318905.num_elements = 1;
-+c_7318905.elements = (object *)e_7318934;
-+c_7318905.elements[0] = ((closureN)self_7312368)->elements[11];
-+
-+return_direct_with_clo1(data,(closure)&c_7318829,__lambda_654,  &c_7318905);; 
++closureN_type c_7318820;
++object e_7318928 [13];
++c_7318820.hdr.mark = gc_color_red;
++ c_7318820.hdr.grayed = 0;
++c_7318820.tag = closureN_tag;
++ c_7318820.fn = (function_type)__lambda_653;
++c_7318820.num_args = 1;
++c_7318820.num_elements = 13;
++c_7318820.elements = (object *)e_7318928;
++c_7318820.elements[0] = ((closureN)self_7312360)->elements[0];
++c_7318820.elements[1] = ((closureN)self_7312360)->elements[1];
++c_7318820.elements[2] = ((closureN)self_7312360)->elements[2];
++c_7318820.elements[3] = ((closureN)self_7312360)->elements[3];
++c_7318820.elements[4] = ((closureN)self_7312360)->elements[4];
++c_7318820.elements[5] = ((closureN)self_7312360)->elements[5];
++c_7318820.elements[6] = ((closureN)self_7312360)->elements[6];
++c_7318820.elements[7] = ((closureN)self_7312360)->elements[7];
++c_7318820.elements[8] = r_735419_737581_737609_7311427_7311477_7311526_7311574_7311621;
++c_7318820.elements[9] = ((closureN)self_7312360)->elements[8];
++c_7318820.elements[10] = ((closureN)self_7312360)->elements[9];
++c_7318820.elements[11] = ((closureN)self_7312360)->elements[10];
++c_7318820.elements[12] = ((closureN)self_7312360)->elements[11];
++
++return_closcall2(data,  ((closureN)self_7312360)->elements[10],  &c_7318820, quote_lambda);; 
 +}
 +
-+static void __lambda_657(void *data, object self_7312369, int argc, object *args) /* object self_7312369, object k_735409_737606_737634_737660_737685_7311439_7311489_7311538_7311586_7311633, object p_73954_731068_733062_737607_737635_737661_737686_7311440_7311490_7311539_7311587_7311634, object old_73955_731069_733063_737608_737636_737662_737687_7311441_7311491_7311540_7311588_7311635 */
++static void __lambda_653(void *data, object self_7312361, int argc, object *args) /* object self_7312361, object r_735395_737584_737612_737638_737663_7311428_7311478_7311527_7311575_7311622 */
 + {
-+ object k_735409_737606_737634_737660_737685_7311439_7311489_7311538_7311586_7311633 = args[0]; object p_73954_731068_733062_737607_737635_737661_737686_7311440_7311490_7311539_7311587_7311634 = args[1]; object old_73955_731069_733063_737608_737636_737662_737687_7311441_7311491_7311540_7311588_7311635 = args[2];
++ object r_735395_737584_737612_737638_737663_7311428_7311478_7311527_7311575_7311622 = args[0];
 +  
-+closureN_type c_7318908;
-+object e_7318933 [4];
-+c_7318908.hdr.mark = gc_color_red;
-+ c_7318908.hdr.grayed = 0;
-+c_7318908.tag = closureN_tag;
-+ c_7318908.fn = (function_type)__lambda_658;
-+c_7318908.num_args = 1;
-+c_7318908.num_elements = 4;
-+c_7318908.elements = (object *)e_7318933;
-+c_7318908.elements[0] = k_735409_737606_737634_737660_737685_7311439_7311489_7311538_7311586_7311633;
-+c_7318908.elements[1] = old_73955_731069_733063_737608_737636_737662_737687_7311441_7311491_7311540_7311588_7311635;
-+c_7318908.elements[2] = p_73954_731068_733062_737607_737635_737661_737686_7311440_7311490_7311539_7311587_7311634;
-+c_7318908.elements[3] = ((closureN)self_7312369)->elements[0];
-+
-+return_closcall2(data,  ((closureN)self_7312369)->elements[0],  &c_7318908, quote_quote);; 
++closureN_type c_7318822;
++object e_7318897 [13];
++c_7318822.hdr.mark = gc_color_red;
++ c_7318822.hdr.grayed = 0;
++c_7318822.tag = closureN_tag;
++ c_7318822.fn = (function_type)__lambda_654;
++c_7318822.num_args = 1;
++c_7318822.num_elements = 13;
++c_7318822.elements = (object *)e_7318897;
++c_7318822.elements[0] = ((closureN)self_7312361)->elements[0];
++c_7318822.elements[1] = ((closureN)self_7312361)->elements[1];
++c_7318822.elements[2] = ((closureN)self_7312361)->elements[2];
++c_7318822.elements[3] = ((closureN)self_7312361)->elements[3];
++c_7318822.elements[4] = ((closureN)self_7312361)->elements[4];
++c_7318822.elements[5] = ((closureN)self_7312361)->elements[5];
++c_7318822.elements[6] = ((closureN)self_7312361)->elements[6];
++c_7318822.elements[7] = ((closureN)self_7312361)->elements[7];
++c_7318822.elements[8] = r_735395_737584_737612_737638_737663_7311428_7311478_7311527_7311575_7311622;
++c_7318822.elements[9] = ((closureN)self_7312361)->elements[8];
++c_7318822.elements[10] = ((closureN)self_7312361)->elements[9];
++c_7318822.elements[11] = ((closureN)self_7312361)->elements[10];
++c_7318822.elements[12] = ((closureN)self_7312361)->elements[12];
++
++
++closureN_type c_7318898;
++object e_7318927 [1];
++c_7318898.hdr.mark = gc_color_red;
++ c_7318898.hdr.grayed = 0;
++c_7318898.tag = closureN_tag;
++ c_7318898.fn = (function_type)__lambda_657;
++c_7318898.num_args = 2;
++c_7318898.num_elements = 1;
++c_7318898.elements = (object *)e_7318927;
++c_7318898.elements[0] = ((closureN)self_7312361)->elements[11];
++
++return_direct_with_clo1(data,(closure)&c_7318822,__lambda_654,  &c_7318898);; 
 +}
 +
-+static void __lambda_658(void *data, object self_7312370, int argc, object *args) /* object self_7312370, object r_735417_737609_737637_737663_737688_7311442_7311492_7311541_7311589_7311636 */
++static void __lambda_657(void *data, object self_7312362, int argc, object *args) /* object self_7312362, object k_735402_737599_737627_737653_737678_7311432_7311482_7311531_7311579_7311626, object p_73953_731067_733055_737600_737628_737654_737679_7311433_7311483_7311532_7311580_7311627, object old_73954_731068_733056_737601_737629_737655_737680_7311434_7311484_7311533_7311581_7311628 */
 + {
-+ object r_735417_737609_737637_737663_737688_7311442_7311492_7311541_7311589_7311636 = args[0];
++ object k_735402_737599_737627_737653_737678_7311432_7311482_7311531_7311579_7311626 = args[0]; object p_73953_731067_733055_737600_737628_737654_737679_7311433_7311483_7311532_7311580_7311627 = args[1]; object old_73954_731068_733056_737601_737629_737655_737680_7311434_7311484_7311533_7311581_7311628 = args[2];
 +  
-+closureN_type c_7318911;
-+object e_7318932 [4];
-+c_7318911.hdr.mark = gc_color_red;
-+ c_7318911.hdr.grayed = 0;
-+c_7318911.tag = closureN_tag;
-+ c_7318911.fn = (function_type)__lambda_659;
-+c_7318911.num_args = 1;
-+c_7318911.num_elements = 4;
-+c_7318911.elements = (object *)e_7318932;
-+c_7318911.elements[0] = ((closureN)self_7312370)->elements[0];
-+c_7318911.elements[1] = ((closureN)self_7312370)->elements[1];
-+c_7318911.elements[2] = ((closureN)self_7312370)->elements[2];
-+c_7318911.elements[3] = r_735417_737609_737637_737663_737688_7311442_7311492_7311541_7311589_7311636;
-+
-+return_closcall2(data,  ((closureN)self_7312370)->elements[3],  &c_7318911, quote__121param_91set_67_125);; 
++closureN_type c_7318901;
++object e_7318926 [4];
++c_7318901.hdr.mark = gc_color_red;
++ c_7318901.hdr.grayed = 0;
++c_7318901.tag = closureN_tag;
++ c_7318901.fn = (function_type)__lambda_658;
++c_7318901.num_args = 1;
++c_7318901.num_elements = 4;
++c_7318901.elements = (object *)e_7318926;
++c_7318901.elements[0] = k_735402_737599_737627_737653_737678_7311432_7311482_7311531_7311579_7311626;
++c_7318901.elements[1] = old_73954_731068_733056_737601_737629_737655_737680_7311434_7311484_7311533_7311581_7311628;
++c_7318901.elements[2] = p_73953_731067_733055_737600_737628_737654_737679_7311433_7311483_7311532_7311580_7311627;
++c_7318901.elements[3] = ((closureN)self_7312362)->elements[0];
++
++return_closcall2(data,  ((closureN)self_7312362)->elements[0],  &c_7318901, quote_quote);; 
 +}
 +
-+static void __lambda_659(void *data, object self_7312371, int argc, object *args) /* object self_7312371, object r_735420_737610_737638_737664_737689_7311443_7311493_7311542_7311590_7311637 */
++static void __lambda_658(void *data, object self_7312363, int argc, object *args) /* object self_7312363, object r_735410_737602_737630_737656_737681_7311435_7311485_7311534_7311582_7311629 */
 + {
-+ object r_735420_737610_737638_737664_737689_7311443_7311493_7311542_7311590_7311637 = args[0];
++ object r_735410_737602_737630_737656_737681_7311435_7311485_7311534_7311582_7311629 = args[0];
 +  
++closureN_type c_7318904;
++object e_7318925 [4];
++c_7318904.hdr.mark = gc_color_red;
++ c_7318904.hdr.grayed = 0;
++c_7318904.tag = closureN_tag;
++ c_7318904.fn = (function_type)__lambda_659;
++c_7318904.num_args = 1;
++c_7318904.num_elements = 4;
++c_7318904.elements = (object *)e_7318925;
++c_7318904.elements[0] = ((closureN)self_7312363)->elements[0];
++c_7318904.elements[1] = ((closureN)self_7312363)->elements[1];
++c_7318904.elements[2] = ((closureN)self_7312363)->elements[2];
++c_7318904.elements[3] = r_735410_737602_737630_737656_737681_7311435_7311485_7311534_7311582_7311629;
+ 
+-return_closcall2(data,  ((closureN)self_7313616)->elements[3],  &c_7320204, quote__121param_91set_67_125);; 
++return_closcall2(data,  ((closureN)self_7312363)->elements[3],  &c_7318904, quote__121param_91set_67_125);; 
+ }
+ 
+-static void __lambda_659(void *data, object self_7313617, int argc, object *args) /* object self_7313617, object r_735865_738378_738406_738432_738457_7312689_7312739_7312788_7312836_7312883 */
++static void __lambda_659(void *data, object self_7312364, int argc, object *args) /* object self_7312364, object r_735413_737603_737631_737657_737682_7311436_7311486_7311535_7311583_7311630 */
+  {
+- object r_735865_738378_738406_738432_738457_7312689_7312739_7312788_7312836_7312883 = args[0];
++ object r_735413_737603_737631_737657_737682_7311436_7311486_7311535_7311583_7311630 = args[0];
+   
+-pair_type local_7320209; 
++pair_type local_7318909; 
+ 
+-pair_type local_7320213; 
++pair_type local_7318913; 
+ 
+-pair_type local_7320216; 
 +pair_type local_7318916; 
-+
+ 
+-pair_type local_7320220; 
 +pair_type local_7318920; 
-+
-+pair_type local_7318923; 
-+
-+pair_type local_7318927; 
  
 -pair_type local_7320223; 
 -return_direct_with_clo1(data,  ((closureN)self_7313617)->elements[0], (((closure)  ((closureN)self_7313617)->elements[0])->fn),  set_pair_as_expr(&local_7320209, ((closureN)self_7313617)->elements[2], set_pair_as_expr(&local_7320213, set_pair_as_expr(&local_7320216, ((closureN)self_7313617)->elements[3], set_pair_as_expr(&local_7320220, r_735865_738378_738406_738432_738457_7312689_7312739_7312788_7312836_7312883, NULL)), set_pair_as_expr(&local_7320223, ((closureN)self_7313617)->elements[1], NULL))));; 
-+pair_type local_7318930; 
-+return_direct_with_clo1(data,  ((closureN)self_7312371)->elements[0], (((closure)  ((closureN)self_7312371)->elements[0])->fn),  set_pair_as_expr(&local_7318916, ((closureN)self_7312371)->elements[2], set_pair_as_expr(&local_7318920, set_pair_as_expr(&local_7318923, ((closureN)self_7312371)->elements[3], set_pair_as_expr(&local_7318927, r_735420_737610_737638_737664_737689_7311443_7311493_7311542_7311590_7311637, NULL)), set_pair_as_expr(&local_7318930, ((closureN)self_7312371)->elements[1], NULL))));; 
++pair_type local_7318923; 
++return_direct_with_clo1(data,  ((closureN)self_7312364)->elements[0], (((closure)  ((closureN)self_7312364)->elements[0])->fn),  set_pair_as_expr(&local_7318909, ((closureN)self_7312364)->elements[2], set_pair_as_expr(&local_7318913, set_pair_as_expr(&local_7318916, ((closureN)self_7312364)->elements[3], set_pair_as_expr(&local_7318920, r_735413_737603_737631_737657_737682_7311436_7311486_7311535_7311583_7311630, NULL)), set_pair_as_expr(&local_7318923, ((closureN)self_7312364)->elements[1], NULL))));; 
  }
  
 -static void __lambda_654(void *data, object self_7313618, int argc, object *args) /* object self_7313618, object r_735853_738360_738388_738414_738439_7312682_7312732_7312781_7312829_7312876 */
-+static void __lambda_654(void *data, object self_7312372, int argc, object *args) /* object self_7312372, object r_735408_737592_737620_737646_737671_7311436_7311486_7311535_7311583_7311630 */
++static void __lambda_654(void *data, object self_7312365, int argc, object *args) /* object self_7312365, object r_735401_737585_737613_737639_737664_7311429_7311479_7311528_7311576_7311623 */
   {
 - object r_735853_738360_738388_738414_738439_7312682_7312732_7312781_7312829_7312876 = args[0];
-+ object r_735408_737592_737620_737646_737671_7311436_7311486_7311535_7311583_7311630 = args[0];
++ object r_735401_737585_737613_737639_737664_7311429_7311479_7311528_7311576_7311623 = args[0];
    
 -closureN_type c_7320124;
 -object e_7320194 [11];
@@ -41107,36 +41311,36 @@ Make let-values be the same as let*-values, to work around
 -c_7320124.elements[8] = ((closureN)self_7313618)->elements[10];
 -c_7320124.elements[9] = ((closureN)self_7313618)->elements[11];
 -c_7320124.elements[10] = ((closureN)self_7313618)->elements[12];
-+closureN_type c_7318831;
-+object e_7318901 [11];
-+c_7318831.hdr.mark = gc_color_red;
-+ c_7318831.hdr.grayed = 0;
-+c_7318831.tag = closureN_tag;
-+ c_7318831.fn = (function_type)__lambda_655;
-+c_7318831.num_args = 1;
-+c_7318831.num_elements = 11;
-+c_7318831.elements = (object *)e_7318901;
-+c_7318831.elements[0] = ((closureN)self_7312372)->elements[0];
-+c_7318831.elements[1] = ((closureN)self_7312372)->elements[3];
-+c_7318831.elements[2] = ((closureN)self_7312372)->elements[4];
-+c_7318831.elements[3] = ((closureN)self_7312372)->elements[5];
-+c_7318831.elements[4] = ((closureN)self_7312372)->elements[6];
-+c_7318831.elements[5] = ((closureN)self_7312372)->elements[7];
-+c_7318831.elements[6] = ((closureN)self_7312372)->elements[8];
-+c_7318831.elements[7] = ((closureN)self_7312372)->elements[9];
-+c_7318831.elements[8] = ((closureN)self_7312372)->elements[10];
-+c_7318831.elements[9] = ((closureN)self_7312372)->elements[11];
-+c_7318831.elements[10] = ((closureN)self_7312372)->elements[12];
++closureN_type c_7318824;
++object e_7318894 [11];
++c_7318824.hdr.mark = gc_color_red;
++ c_7318824.hdr.grayed = 0;
++c_7318824.tag = closureN_tag;
++ c_7318824.fn = (function_type)__lambda_655;
++c_7318824.num_args = 1;
++c_7318824.num_elements = 11;
++c_7318824.elements = (object *)e_7318894;
++c_7318824.elements[0] = ((closureN)self_7312365)->elements[0];
++c_7318824.elements[1] = ((closureN)self_7312365)->elements[3];
++c_7318824.elements[2] = ((closureN)self_7312365)->elements[4];
++c_7318824.elements[3] = ((closureN)self_7312365)->elements[5];
++c_7318824.elements[4] = ((closureN)self_7312365)->elements[6];
++c_7318824.elements[5] = ((closureN)self_7312365)->elements[7];
++c_7318824.elements[6] = ((closureN)self_7312365)->elements[8];
++c_7318824.elements[7] = ((closureN)self_7312365)->elements[9];
++c_7318824.elements[8] = ((closureN)self_7312365)->elements[10];
++c_7318824.elements[9] = ((closureN)self_7312365)->elements[11];
++c_7318824.elements[10] = ((closureN)self_7312365)->elements[12];
  
 -return_direct_with_clo4(data,  __glo_Cyc_91map_91loop_912_scheme_base, (((closure)  __glo_Cyc_91map_91loop_912_scheme_base)->fn),  &c_7320124, r_735853_738360_738388_738414_738439_7312682_7312732_7312781_7312829_7312876, ((closureN)self_7313618)->elements[2], ((closureN)self_7313618)->elements[1]);; 
-+return_direct_with_clo4(data,  __glo_Cyc_91map_91loop_912_scheme_base, (((closure)  __glo_Cyc_91map_91loop_912_scheme_base)->fn),  &c_7318831, r_735408_737592_737620_737646_737671_7311436_7311486_7311535_7311583_7311630, ((closureN)self_7312372)->elements[2], ((closureN)self_7312372)->elements[1]);; 
++return_direct_with_clo4(data,  __glo_Cyc_91map_91loop_912_scheme_base, (((closure)  __glo_Cyc_91map_91loop_912_scheme_base)->fn),  &c_7318824, r_735401_737585_737613_737639_737664_7311429_7311479_7311528_7311576_7311623, ((closureN)self_7312365)->elements[2], ((closureN)self_7312365)->elements[1]);; 
  }
  
 -static void __lambda_655(void *data, object self_7313619, int argc, object *args) /* object self_7313619, object r_735851_738361_738389_738415_738440_7312683_7312733_7312782_7312830_7312877 */
-+static void __lambda_655(void *data, object self_7312373, int argc, object *args) /* object self_7312373, object r_735406_737593_737621_737647_737672_7311437_7311487_7311536_7311584_7311631 */
++static void __lambda_655(void *data, object self_7312366, int argc, object *args) /* object self_7312366, object r_735399_737586_737614_737640_737665_7311430_7311480_7311529_7311577_7311624 */
   {
 - object r_735851_738361_738389_738415_738440_7312683_7312733_7312782_7312830_7312877 = args[0];
-+ object r_735406_737593_737621_737647_737672_7311437_7311487_7311536_7311584_7311631 = args[0];
++ object r_735399_737586_737614_737640_737665_7311430_7311480_7311529_7311577_7311624 = args[0];
    
 -closureN_type c_7320126;
 -object e_7320190 [11];
@@ -41158,78 +41362,78 @@ Make let-values be the same as let*-values, to work around
 -c_7320126.elements[8] = ((closureN)self_7313619)->elements[8];
 -c_7320126.elements[9] = ((closureN)self_7313619)->elements[9];
 -c_7320126.elements[10] = ((closureN)self_7313619)->elements[10];
-+closureN_type c_7318833;
-+object e_7318897 [11];
-+c_7318833.hdr.mark = gc_color_red;
-+ c_7318833.hdr.grayed = 0;
-+c_7318833.tag = closureN_tag;
-+ c_7318833.fn = (function_type)__lambda_656;
-+c_7318833.num_args = 1;
-+c_7318833.num_elements = 11;
-+c_7318833.elements = (object *)e_7318897;
-+c_7318833.elements[0] = ((closureN)self_7312373)->elements[0];
-+c_7318833.elements[1] = ((closureN)self_7312373)->elements[1];
-+c_7318833.elements[2] = ((closureN)self_7312373)->elements[2];
-+c_7318833.elements[3] = ((closureN)self_7312373)->elements[3];
-+c_7318833.elements[4] = ((closureN)self_7312373)->elements[4];
-+c_7318833.elements[5] = ((closureN)self_7312373)->elements[5];
-+c_7318833.elements[6] = ((closureN)self_7312373)->elements[6];
-+c_7318833.elements[7] = ((closureN)self_7312373)->elements[7];
-+c_7318833.elements[8] = ((closureN)self_7312373)->elements[8];
-+c_7318833.elements[9] = ((closureN)self_7312373)->elements[9];
-+c_7318833.elements[10] = ((closureN)self_7312373)->elements[10];
++closureN_type c_7318826;
++object e_7318890 [11];
++c_7318826.hdr.mark = gc_color_red;
++ c_7318826.hdr.grayed = 0;
++c_7318826.tag = closureN_tag;
++ c_7318826.fn = (function_type)__lambda_656;
++c_7318826.num_args = 1;
++c_7318826.num_elements = 11;
++c_7318826.elements = (object *)e_7318890;
++c_7318826.elements[0] = ((closureN)self_7312366)->elements[0];
++c_7318826.elements[1] = ((closureN)self_7312366)->elements[1];
++c_7318826.elements[2] = ((closureN)self_7312366)->elements[2];
++c_7318826.elements[3] = ((closureN)self_7312366)->elements[3];
++c_7318826.elements[4] = ((closureN)self_7312366)->elements[4];
++c_7318826.elements[5] = ((closureN)self_7312366)->elements[5];
++c_7318826.elements[6] = ((closureN)self_7312366)->elements[6];
++c_7318826.elements[7] = ((closureN)self_7312366)->elements[7];
++c_7318826.elements[8] = ((closureN)self_7312366)->elements[8];
++c_7318826.elements[9] = ((closureN)self_7312366)->elements[9];
++c_7318826.elements[10] = ((closureN)self_7312366)->elements[10];
  
  
 -pair_type local_7320193; 
 -return_direct_with_clo1(data,(closure)&c_7320126,__lambda_656,  set_pair_as_expr(&local_7320193, NULL, r_735851_738361_738389_738415_738440_7312683_7312733_7312782_7312830_7312877));; 
-+pair_type local_7318900; 
-+return_direct_with_clo1(data,(closure)&c_7318833,__lambda_656,  set_pair_as_expr(&local_7318900, NULL, r_735406_737593_737621_737647_737672_7311437_7311487_7311536_7311584_7311631));; 
++pair_type local_7318893; 
++return_direct_with_clo1(data,(closure)&c_7318826,__lambda_656,  set_pair_as_expr(&local_7318893, NULL, r_735399_737586_737614_737640_737665_7311430_7311480_7311529_7311577_7311624));; 
  }
  
 -static void __lambda_656(void *data, object self_7313620, int argc, object *args) /* object self_7313620, object r_735848_738362_738390_738416_738441_738462_7312684_7312734_7312783_7312831_7312878 */
-+static void __lambda_656(void *data, object self_7312374, int argc, object *args) /* object self_7312374, object r_735403_737594_737622_737648_737673_737694_7311438_7311488_7311537_7311585_7311632 */
++static void __lambda_656(void *data, object self_7312367, int argc, object *args) /* object self_7312367, object r_735396_737587_737615_737641_737666_737687_7311431_7311481_7311530_7311578_7311625 */
   {
 - object r_735848_738362_738390_738416_738441_738462_7312684_7312734_7312783_7312831_7312878 = args[0];
-+ object r_735403_737594_737622_737648_737673_737694_7311438_7311488_7311537_7311585_7311632 = args[0];
++ object r_735396_737587_737615_737641_737666_737687_7311431_7311481_7311530_7311578_7311625 = args[0];
    
 -pair_type local_7320131; 
-+pair_type local_7318838; 
++pair_type local_7318831; 
  
 -pair_type local_7320134; 
-+pair_type local_7318841; 
++pair_type local_7318834; 
  
 -pair_type local_7320138; 
-+pair_type local_7318845; 
++pair_type local_7318838; 
  
 -pair_type local_7320142; 
-+pair_type local_7318849; 
++pair_type local_7318842; 
  
 -pair_type local_7320145; 
-+pair_type local_7318852; 
++pair_type local_7318845; 
  
 -pair_type local_7320149; 
-+pair_type local_7318856; 
++pair_type local_7318849; 
  
 -pair_type local_7320153; 
-+pair_type local_7318860; 
++pair_type local_7318853; 
  
 -pair_type local_7320156; 
-+pair_type local_7318863; 
++pair_type local_7318856; 
  
 -pair_type local_7320160; 
-+pair_type local_7318867; 
++pair_type local_7318860; 
  
 -pair_type local_7320163; 
-+pair_type local_7318870; 
++pair_type local_7318863; 
  
 -pair_type local_7320168; 
-+pair_type local_7318875; 
++pair_type local_7318868; 
  
 -pair_type local_7320171; 
-+pair_type local_7318878; 
++pair_type local_7318871; 
  
 -pair_type local_7320175; 
-+pair_type local_7318882; 
++pair_type local_7318875; 
  
  
  
@@ -41238,19 +41442,19 @@ Make let-values be the same as let*-values, to work around
  
  
 -pair_type local_7320185; 
-+pair_type local_7318892; 
++pair_type local_7318885; 
  
 -pair_type local_7320188; 
 -return_direct_with_clo1(data,  ((closureN)self_7313620)->elements[0], (((closure)  ((closureN)self_7313620)->elements[0])->fn),  set_pair_as_expr(&local_7320131, set_pair_as_expr(&local_7320134, ((closureN)self_7313620)->elements[1], set_pair_as_expr(&local_7320138, ((closureN)self_7313620)->elements[2], set_pair_as_expr(&local_7320142, set_pair_as_expr(&local_7320145, ((closureN)self_7313620)->elements[3], set_pair_as_expr(&local_7320149, ((closureN)self_7313620)->elements[4], set_pair_as_expr(&local_7320153, set_pair_as_expr(&local_7320156, ((closureN)self_7313620)->elements[5], set_pair_as_expr(&local_7320160, set_pair_as_expr(&local_7320163, ((closureN)self_7313620)->elements[8], ((closureN)self_7313620)->elements[9]), set_pair_as_expr(&local_7320168, set_pair_as_expr(&local_7320171, ((closureN)self_7313620)->elements[7], set_pair_as_expr(&local_7320175, NULL, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7313620)->elements[10]))))), set_pair_as_expr(&local_
7320185, set_pair_as_expr(&local_7320188, ((closureN)self_7313620)->elements[6], r_735848_738362_738390_738416_738441_738462_7312684_7312734_7312783_7312831_7312878), NULL)))), NULL))), NULL))), boolean_f));; 
-+pair_type local_7318895; 
-+return_direct_with_clo1(data,  ((closureN)self_7312374)->elements[0], (((closure)  ((closureN)self_7312374)->elements[0])->fn),  set_pair_as_expr(&local_7318838, set_pair_as_expr(&local_7318841, ((closureN)self_7312374)->elements[1], set_pair_as_expr(&local_7318845, ((closureN)self_7312374)->elements[2], set_pair_as_expr(&local_7318849, set_pair_as_expr(&local_7318852, ((closureN)self_7312374)->elements[3], set_pair_as_expr(&local_7318856, ((closureN)self_7312374)->elements[4], set_pair_as_expr(&local_7318860, set_pair_as_expr(&local_7318863, ((closureN)self_7312374)->elements[5], set_pair_as_expr(&local_7318867, set_pair_as_expr(&local_7318870, ((closureN)self_7312374)->elements[8], ((closureN)self_7312374)->elements[9]), set_pair_as_expr(&local_7318875, set_pair_as_expr(&local_7318878, ((closureN)self_7312374)->elements[7], set_pair_as_expr(&local_7318882, NULL, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312374)->elements[10]))))), set_pair_as_expr(&local_
7318892, set_pair_as_expr(&local_7318895, ((closureN)self_7312374)->elements[6], r_735403_737594_737622_737648_737673_737694_7311438_7311488_7311537_7311585_7311632), NULL)))), NULL))), NULL))), boolean_f));; 
++pair_type local_7318888; 
++return_direct_with_clo1(data,  ((closureN)self_7312367)->elements[0], (((closure)  ((closureN)self_7312367)->elements[0])->fn),  set_pair_as_expr(&local_7318831, set_pair_as_expr(&local_7318834, ((closureN)self_7312367)->elements[1], set_pair_as_expr(&local_7318838, ((closureN)self_7312367)->elements[2], set_pair_as_expr(&local_7318842, set_pair_as_expr(&local_7318845, ((closureN)self_7312367)->elements[3], set_pair_as_expr(&local_7318849, ((closureN)self_7312367)->elements[4], set_pair_as_expr(&local_7318853, set_pair_as_expr(&local_7318856, ((closureN)self_7312367)->elements[5], set_pair_as_expr(&local_7318860, set_pair_as_expr(&local_7318863, ((closureN)self_7312367)->elements[8], ((closureN)self_7312367)->elements[9]), set_pair_as_expr(&local_7318868, set_pair_as_expr(&local_7318871, ((closureN)self_7312367)->elements[7], set_pair_as_expr(&local_7318875, NULL, Cyc_car(data, Cyc_cdr(data, Cyc_cdr(data, ((closureN)self_7312367)->elements[10]))))), set_pair_as_expr(&local_
7318885, set_pair_as_expr(&local_7318888, ((closureN)self_7312367)->elements[6], r_735396_737587_737615_737641_737666_737687_7311431_7311481_7311530_7311578_7311625), NULL)))), NULL))), NULL))), boolean_f));; 
  }
  
 -static void __lambda_629(void *data, object self_7313621, int argc, object *args) /* object self_7313621, object r_735799 */
-+static void __lambda_629(void *data, object self_7312375, int argc, object *args) /* object self_7312375, object r_735354 */
++static void __lambda_629(void *data, object self_7312368, int argc, object *args) /* object self_7312368, object r_735347 */
   {
 - object r_735799 = args[0];
-+ object r_735354 = args[0];
++ object r_735347 = args[0];
    
 -closureN_type c_7320023;
 -object e_7320035 [8];
@@ -41269,38 +41473,38 @@ Make let-values be the same as let*-values, to work around
 -c_7320023.elements[5] = ((closureN)self_7313621)->elements[5];
 -c_7320023.elements[6] = ((closureN)self_7313621)->elements[6];
 -c_7320023.elements[7] = ((closureN)self_7313621)->elements[7];
-+closureN_type c_7318730;
-+object e_7318742 [8];
-+c_7318730.hdr.mark = gc_color_red;
-+ c_7318730.hdr.grayed = 0;
-+c_7318730.tag = closureN_tag;
-+ c_7318730.fn = (function_type)__lambda_630;
-+c_7318730.num_args = 1;
-+c_7318730.num_elements = 8;
-+c_7318730.elements = (object *)e_7318742;
-+c_7318730.elements[0] = ((closureN)self_7312375)->elements[0];
-+c_7318730.elements[1] = ((closureN)self_7312375)->elements[1];
-+c_7318730.elements[2] = ((closureN)self_7312375)->elements[2];
-+c_7318730.elements[3] = ((closureN)self_7312375)->elements[3];
-+c_7318730.elements[4] = ((closureN)self_7312375)->elements[4];
-+c_7318730.elements[5] = ((closureN)self_7312375)->elements[5];
-+c_7318730.elements[6] = ((closureN)self_7312375)->elements[6];
-+c_7318730.elements[7] = ((closureN)self_7312375)->elements[7];
++closureN_type c_7318723;
++object e_7318735 [8];
++c_7318723.hdr.mark = gc_color_red;
++ c_7318723.hdr.grayed = 0;
++c_7318723.tag = closureN_tag;
++ c_7318723.fn = (function_type)__lambda_630;
++c_7318723.num_args = 1;
++c_7318723.num_elements = 8;
++c_7318723.elements = (object *)e_7318735;
++c_7318723.elements[0] = ((closureN)self_7312368)->elements[0];
++c_7318723.elements[1] = ((closureN)self_7312368)->elements[1];
++c_7318723.elements[2] = ((closureN)self_7312368)->elements[2];
++c_7318723.elements[3] = ((closureN)self_7312368)->elements[3];
++c_7318723.elements[4] = ((closureN)self_7312368)->elements[4];
++c_7318723.elements[5] = ((closureN)self_7312368)->elements[5];
++c_7318723.elements[6] = ((closureN)self_7312368)->elements[6];
++c_7318723.elements[7] = ((closureN)self_7312368)->elements[7];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7320023,__lambda_630,  Cyc_set_cell(data, ((closureN)self_7313621)->elements[1], r_735799));; 
-+return_direct_with_clo1(data,(closure)&c_7318730,__lambda_630,  Cyc_set_cell(data, ((closureN)self_7312375)->elements[1], r_735354));; 
++return_direct_with_clo1(data,(closure)&c_7318723,__lambda_630,  Cyc_set_cell(data, ((closureN)self_7312368)->elements[1], r_735347));; 
  }
  
 -static void __lambda_630(void *data, object self_7313622, int argc, object *args) /* object self_7313622, object r_735798 */
-+static void __lambda_630(void *data, object self_7312376, int argc, object *args) /* object self_7312376, object r_735353 */
++static void __lambda_630(void *data, object self_7312369, int argc, object *args) /* object self_7312369, object r_735346 */
   {
  
    
  
 -return_closcall7(data,  car(((closureN)self_7313622)->elements[1]),  ((closureN)self_7313622)->elements[0], ((closureN)self_7313622)->elements[7], ((closureN)self_7313622)->elements[5], ((closureN)self_7313622)->elements[6], ((closureN)self_7313622)->elements[4], ((closureN)self_7313622)->elements[3], ((closureN)self_7313622)->elements[2]);; 
-+return_closcall7(data,  car(((closureN)self_7312376)->elements[1]),  ((closureN)self_7312376)->elements[0], ((closureN)self_7312376)->elements[7], ((closureN)self_7312376)->elements[5], ((closureN)self_7312376)->elements[6], ((closureN)self_7312376)->elements[4], ((closureN)self_7312376)->elements[3], ((closureN)self_7312376)->elements[2]);; 
++return_closcall7(data,  car(((closureN)self_7312369)->elements[1]),  ((closureN)self_7312369)->elements[0], ((closureN)self_7312369)->elements[7], ((closureN)self_7312369)->elements[5], ((closureN)self_7312369)->elements[6], ((closureN)self_7312369)->elements[4], ((closureN)self_7312369)->elements[3], ((closureN)self_7312369)->elements[2]);; 
  }
  
 -static void __lambda_1449(void *data, object _, int argc, object *args) {object k = args[0];object count = args[1];object fill = args[2]; object s = NULL;
@@ -41313,52 +41517,49 @@ Make let-values be the same as let*-values, to work around
          return_closcall1(data, k, s);
         }
 -static void __lambda_622(void *data, object _, int argc, object *args) /* closure _,object k_735654, object k_73755_733311, object fill_73756_733312_raw, ... */
-+static void __lambda_622(void *data, object _, int argc, object *args) /* closure _,object k_735209, object k_73755_732971, object fill_73756_732972_raw, ... */
++static void __lambda_622(void *data, object _, int argc, object *args) /* closure _,object k_735202, object k_73755_732964, object fill_73756_732965_raw, ... */
   {
 -object k_735654 = args[0]; object k_73755_733311 = args[1];
 -load_varargs(fill_73756_733312, args, 2, argc - 2);
 -  object r_735655;
--  Cyc_st_add(data, "scheme/base.sld:make-string");
-+object k_735209 = args[0]; object k_73755_732971 = args[1];
-+load_varargs(fill_73756_732972, args, 2, argc - 2);
-+  object r_735210;
-+  Cyc_st_add(data, "base.sld:make-string");
++object k_735202 = args[0]; object k_73755_732964 = args[1];
++load_varargs(fill_73756_732965, args, 2, argc - 2);
++  object r_735203;
+   Cyc_st_add(data, "scheme/base.sld:make-string");
    
 -if( (boolean_f != Cyc_is_null(fill_73756_733312)) ){ 
 -  r_735655 = obj_char2obj(32);
-+if( (boolean_f != Cyc_is_null(fill_73756_732972)) ){ 
-+  r_735210 = obj_char2obj(32);
++if( (boolean_f != Cyc_is_null(fill_73756_732965)) ){ 
++  r_735203 = obj_char2obj(32);
  } else { 
    
 -  r_735655 = Cyc_car(data, fill_73756_733312);}
 -;return_direct_with_clo3(data,  __glo_Cyc_91make_91string_scheme_base, (((closure)  __glo_Cyc_91make_91string_scheme_base)->fn),  k_735654, k_73755_733311, r_735655);; 
-+  r_735210 = Cyc_car(data, fill_73756_732972);}
-+;return_direct_with_clo3(data,  __glo_Cyc_91make_91string_scheme_base, (((closure)  __glo_Cyc_91make_91string_scheme_base)->fn),  k_735209, k_73755_732971, r_735210);; 
++  r_735203 = Cyc_car(data, fill_73756_732965);}
++;return_direct_with_clo3(data,  __glo_Cyc_91make_91string_scheme_base, (((closure)  __glo_Cyc_91make_91string_scheme_base)->fn),  k_735202, k_73755_732964, r_735203);; 
  }
  
 -static void __lambda_621(void *data, object _, int argc, object *args) /* closure _,object k_735651, object chars_73754_733310_raw, ... */
-+static void __lambda_621(void *data, object _, int argc, object *args) /* closure _,object k_735206, object chars_73754_732970_raw, ... */
++static void __lambda_621(void *data, object _, int argc, object *args) /* closure _,object k_735199, object chars_73754_732963_raw, ... */
   {
 -object k_735651 = args[0];
 -load_varargs(chars_73754_733310, args, 1, argc - 1);
--  Cyc_st_add(data, "scheme/base.sld:string");
-+object k_735206 = args[0];
-+load_varargs(chars_73754_732970, args, 1, argc - 1);
-+  Cyc_st_add(data, "base.sld:string");
++object k_735199 = args[0];
++load_varargs(chars_73754_732963, args, 1, argc - 1);
+   Cyc_st_add(data, "scheme/base.sld:string");
  
 -object c_7319971 = Cyc_list2string(data,  k_735651,chars_73754_733310);
 -return_direct_with_clo1(data,  k_735651, (((closure)  k_735651)->fn),  c_7319971);; 
-+object c_7318678 = Cyc_list2string(data,  k_735206,chars_73754_732970);
-+return_direct_with_clo1(data,  k_735206, (((closure)  k_735206)->fn),  c_7318678);; 
++object c_7318671 = Cyc_list2string(data,  k_735199,chars_73754_732963);
++return_direct_with_clo1(data,  k_735199, (((closure)  k_735199)->fn),  c_7318671);; 
  }
  
 -static void __lambda_614(void *data, object _, int argc, object *args) /* closure _,object k_735641, object type_127_73748_733305, object obj_73749_733306, object objs_73750_733307 */
-+static void __lambda_614(void *data, object _, int argc, object *args) /* closure _,object k_735196, object type_127_73748_732965, object obj_73749_732966, object objs_73750_732967 */
++static void __lambda_614(void *data, object _, int argc, object *args) /* closure _,object k_735189, object type_127_73748_732958, object obj_73749_732959, object objs_73750_732960 */
   {
 -object k_735641 = args[0]; object type_127_73748_733305 = args[1]; object obj_73749_733306 = args[2]; object objs_73750_733307 = args[3];
--  Cyc_st_add(data, "scheme/base.sld:Cyc-obj=?");
-+object k_735196 = args[0]; object type_127_73748_732965 = args[1]; object obj_73749_732966 = args[2]; object objs_73750_732967 = args[3];
-+  Cyc_st_add(data, "base.sld:Cyc-obj=?");
++object k_735189 = args[0]; object type_127_73748_732958 = args[1]; object obj_73749_732959 = args[2]; object objs_73750_732960 = args[3];
+   Cyc_st_add(data, "scheme/base.sld:Cyc-obj=?");
  
 -closureN_type c_7319939;
 -object e_7319966 [3];
@@ -41372,31 +41573,15 @@ Make let-values be the same as let*-values, to work around
 -c_7319939.elements[0] = k_735641;
 -c_7319939.elements[1] = obj_73749_733306;
 -c_7319939.elements[2] = objs_73750_733307;
-+closureN_type c_7318646;
-+object e_7318673 [3];
-+c_7318646.hdr.mark = gc_color_red;
-+ c_7318646.hdr.grayed = 0;
-+c_7318646.tag = closureN_tag;
-+ c_7318646.fn = (function_type)__lambda_615;
-+c_7318646.num_args = 1;
-+c_7318646.num_elements = 3;
-+c_7318646.elements = (object *)e_7318673;
-+c_7318646.elements[0] = k_735196;
-+c_7318646.elements[1] = obj_73749_732966;
-+c_7318646.elements[2] = objs_73750_732967;
- 
+-
 -return_closcall2(data,  type_127_73748_733305,  &c_7319939, obj_73749_733306);; 
-+return_closcall2(data,  type_127_73748_732965,  &c_7318646, obj_73749_732966);; 
- }
- 
+-}
+-
 -static void __lambda_615(void *data, object self_7313545, int argc, object *args) /* object self_7313545, object r_735642 */
-+static void __lambda_615(void *data, object self_7312299, int argc, object *args) /* object self_7312299, object r_735197 */
-  {
+- {
 - object r_735642 = args[0];
 -  if( (boolean_f != r_735642) ){ 
-+ object r_735197 = args[0];
-+  if( (boolean_f != r_735197) ){ 
-   
+-  
 -closureN_type c_7319941;
 -object e_7319944 [1];
 -c_7319941.hdr.mark = gc_color_red;
@@ -41407,18 +41592,8 @@ Make let-values be the same as let*-values, to work around
 -c_7319941.num_elements = 1;
 -c_7319941.elements = (object *)e_7319944;
 -c_7319941.elements[0] = ((closureN)self_7313545)->elements[0];
-+closureN_type c_7318648;
-+object e_7318651 [1];
-+c_7318648.hdr.mark = gc_color_red;
-+ c_7318648.hdr.grayed = 0;
-+c_7318648.tag = closureN_tag;
-+ c_7318648.fn = (function_type)__lambda_616;
-+c_7318648.num_args = 1;
-+c_7318648.num_elements = 1;
-+c_7318648.elements = (object *)e_7318651;
-+c_7318648.elements[0] = ((closureN)self_7312299)->elements[0];
- 
- 
+-
+-
 -closureN_type c_7319945;
 -object e_7319963 [2];
 -c_7319945.hdr.mark = gc_color_red;
@@ -41430,32 +41605,17 @@ Make let-values be the same as let*-values, to work around
 -c_7319945.elements = (object *)e_7319963;
 -c_7319945.elements[0] = ((closureN)self_7313545)->elements[1];
 -c_7319945.elements[1] = ((closureN)self_7313545)->elements[2];
-+closureN_type c_7318652;
-+object e_7318670 [2];
-+c_7318652.hdr.mark = gc_color_red;
-+ c_7318652.hdr.grayed = 0;
-+c_7318652.tag = closureN_tag;
-+ c_7318652.fn = (function_type)__lambda_617;
-+c_7318652.num_args = 1;
-+c_7318652.num_elements = 2;
-+c_7318652.elements = (object *)e_7318670;
-+c_7318652.elements[0] = ((closureN)self_7312299)->elements[1];
-+c_7318652.elements[1] = ((closureN)self_7312299)->elements[2];
- 
+-
 -return_direct_with_clo1(data,(closure)&c_7319941,__lambda_616,  &c_7319945);
-+return_direct_with_clo1(data,(closure)&c_7318648,__lambda_616,  &c_7318652);
- } else { 
+-} else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7313545)->elements[0], (((closure)  ((closureN)self_7313545)->elements[0])->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  ((closureN)self_7312299)->elements[0], (((closure)  ((closureN)self_7312299)->elements[0])->fn),  boolean_f);}
- ;; 
- }
- 
+-;; 
+-}
+-
 -static void __lambda_617(void *data, object self_7313546, int argc, object *args) /* object self_7313546, object k_735644, object return_73752_733308 */
-+static void __lambda_617(void *data, object self_7312300, int argc, object *args) /* object self_7312300, object k_735199, object return_73752_732968 */
-  {
+- {
 - object k_735644 = args[0]; object return_73752_733308 = args[1];
-+ object k_735199 = args[0]; object return_73752_732968 = args[1];
-   
+-  
 -closureN_type c_7319947;
 -object e_7319954 [2];
 -c_7319947.hdr.mark = gc_color_red;
@@ -41467,17 +41627,72 @@ Make let-values be the same as let*-values, to work around
 -c_7319947.elements = (object *)e_7319954;
 -c_7319947.elements[0] = k_735644;
 -c_7319947.elements[1] = ((closureN)self_7313546)->elements[1];
-+closureN_type c_7318654;
-+object e_7318661 [2];
-+c_7318654.hdr.mark = gc_color_red;
-+ c_7318654.hdr.grayed = 0;
-+c_7318654.tag = closureN_tag;
-+ c_7318654.fn = (function_type)__lambda_618;
-+c_7318654.num_args = 1;
-+c_7318654.num_elements = 2;
-+c_7318654.elements = (object *)e_7318661;
-+c_7318654.elements[0] = k_735199;
-+c_7318654.elements[1] = ((closureN)self_7312300)->elements[1];
++closureN_type c_7318639;
++object e_7318666 [3];
++c_7318639.hdr.mark = gc_color_red;
++ c_7318639.hdr.grayed = 0;
++c_7318639.tag = closureN_tag;
++ c_7318639.fn = (function_type)__lambda_615;
++c_7318639.num_args = 1;
++c_7318639.num_elements = 3;
++c_7318639.elements = (object *)e_7318666;
++c_7318639.elements[0] = k_735189;
++c_7318639.elements[1] = obj_73749_732959;
++c_7318639.elements[2] = objs_73750_732960;
++
++return_closcall2(data,  type_127_73748_732958,  &c_7318639, obj_73749_732959);; 
++}
++
++static void __lambda_615(void *data, object self_7312292, int argc, object *args) /* object self_7312292, object r_735190 */
++ {
++ object r_735190 = args[0];
++  if( (boolean_f != r_735190) ){ 
++  
++closureN_type c_7318641;
++object e_7318644 [1];
++c_7318641.hdr.mark = gc_color_red;
++ c_7318641.hdr.grayed = 0;
++c_7318641.tag = closureN_tag;
++ c_7318641.fn = (function_type)__lambda_616;
++c_7318641.num_args = 1;
++c_7318641.num_elements = 1;
++c_7318641.elements = (object *)e_7318644;
++c_7318641.elements[0] = ((closureN)self_7312292)->elements[0];
++
++
++closureN_type c_7318645;
++object e_7318663 [2];
++c_7318645.hdr.mark = gc_color_red;
++ c_7318645.hdr.grayed = 0;
++c_7318645.tag = closureN_tag;
++ c_7318645.fn = (function_type)__lambda_617;
++c_7318645.num_args = 1;
++c_7318645.num_elements = 2;
++c_7318645.elements = (object *)e_7318663;
++c_7318645.elements[0] = ((closureN)self_7312292)->elements[1];
++c_7318645.elements[1] = ((closureN)self_7312292)->elements[2];
++
++return_direct_with_clo1(data,(closure)&c_7318641,__lambda_616,  &c_7318645);
++} else { 
++  return_direct_with_clo1(data,  ((closureN)self_7312292)->elements[0], (((closure)  ((closureN)self_7312292)->elements[0])->fn),  boolean_f);}
++;; 
++}
++
++static void __lambda_617(void *data, object self_7312293, int argc, object *args) /* object self_7312293, object k_735192, object return_73752_732961 */
++ {
++ object k_735192 = args[0]; object return_73752_732961 = args[1];
++  
++closureN_type c_7318647;
++object e_7318654 [2];
++c_7318647.hdr.mark = gc_color_red;
++ c_7318647.hdr.grayed = 0;
++c_7318647.tag = closureN_tag;
++ c_7318647.fn = (function_type)__lambda_618;
++c_7318647.num_args = 1;
++c_7318647.num_elements = 2;
++c_7318647.elements = (object *)e_7318654;
++c_7318647.elements[0] = k_735192;
++c_7318647.elements[1] = ((closureN)self_7312293)->elements[1];
  
  
 -closureN_type c_7319955;
@@ -41491,43 +41706,43 @@ Make let-values be the same as let*-values, to work around
 -c_7319955.elements = (object *)e_7319962;
 -c_7319955.elements[0] = ((closureN)self_7313546)->elements[0];
 -c_7319955.elements[1] = return_73752_733308;
-+closureN_type c_7318662;
-+object e_7318669 [2];
-+c_7318662.hdr.mark = gc_color_red;
-+ c_7318662.hdr.grayed = 0;
-+c_7318662.tag = closureN_tag;
-+ c_7318662.fn = (function_type)__lambda_620;
-+c_7318662.num_args = 1;
-+c_7318662.num_elements = 2;
-+c_7318662.elements = (object *)e_7318669;
-+c_7318662.elements[0] = ((closureN)self_7312300)->elements[0];
-+c_7318662.elements[1] = return_73752_732968;
++closureN_type c_7318655;
++object e_7318662 [2];
++c_7318655.hdr.mark = gc_color_red;
++ c_7318655.hdr.grayed = 0;
++c_7318655.tag = closureN_tag;
++ c_7318655.fn = (function_type)__lambda_620;
++c_7318655.num_args = 1;
++c_7318655.num_elements = 2;
++c_7318655.elements = (object *)e_7318662;
++c_7318655.elements[0] = ((closureN)self_7312293)->elements[0];
++c_7318655.elements[1] = return_73752_732961;
  
 -return_direct_with_clo1(data,(closure)&c_7319947,__lambda_618,  &c_7319955);; 
-+return_direct_with_clo1(data,(closure)&c_7318654,__lambda_618,  &c_7318662);; 
++return_direct_with_clo1(data,(closure)&c_7318647,__lambda_618,  &c_7318655);; 
  }
  
 -static void __lambda_620(void *data, object self_7313547, int argc, object *args) /* object self_7313547, object k_735647, object o_73753_733309 */
-+static void __lambda_620(void *data, object self_7312301, int argc, object *args) /* object self_7312301, object k_735202, object o_73753_732969 */
++static void __lambda_620(void *data, object self_7312294, int argc, object *args) /* object self_7312294, object k_735195, object o_73753_732962 */
   {
 - object k_735647 = args[0]; object o_73753_733309 = args[1];
-+ object k_735202 = args[0]; object o_73753_732969 = args[1];
++ object k_735195 = args[0]; object o_73753_732962 = args[1];
      
 -if( (boolean_f != Cyc_eq(o_73753_733309, ((closureN)self_7313547)->elements[0])) ){ 
 -  return_direct_with_clo1(data,  k_735647, (((closure)  k_735647)->fn),  Cyc_VOID);
-+if( (boolean_f != Cyc_eq(o_73753_732969, ((closureN)self_7312301)->elements[0])) ){ 
-+  return_direct_with_clo1(data,  k_735202, (((closure)  k_735202)->fn),  Cyc_VOID);
++if( (boolean_f != Cyc_eq(o_73753_732962, ((closureN)self_7312294)->elements[0])) ){ 
++  return_direct_with_clo1(data,  k_735195, (((closure)  k_735195)->fn),  Cyc_VOID);
  } else { 
 -  return_closcall2(data,  ((closureN)self_7313547)->elements[1],  k_735647, boolean_f);}
-+  return_closcall2(data,  ((closureN)self_7312301)->elements[1],  k_735202, boolean_f);}
++  return_closcall2(data,  ((closureN)self_7312294)->elements[1],  k_735195, boolean_f);}
  ;; 
  }
  
 -static void __lambda_618(void *data, object self_7313548, int argc, object *args) /* object self_7313548, object r_735646 */
-+static void __lambda_618(void *data, object self_7312302, int argc, object *args) /* object self_7312302, object r_735201 */
++static void __lambda_618(void *data, object self_7312295, int argc, object *args) /* object self_7312295, object r_735194 */
   {
 - object r_735646 = args[0];
-+ object r_735201 = args[0];
++ object r_735194 = args[0];
    
 -closureN_type c_7319949;
 -object e_7319952 [1];
@@ -41539,79 +41754,76 @@ Make let-values be the same as let*-values, to work around
 -c_7319949.num_elements = 1;
 -c_7319949.elements = (object *)e_7319952;
 -c_7319949.elements[0] = ((closureN)self_7313548)->elements[0];
-+closureN_type c_7318656;
-+object e_7318659 [1];
-+c_7318656.hdr.mark = gc_color_red;
-+ c_7318656.hdr.grayed = 0;
-+c_7318656.tag = closureN_tag;
-+ c_7318656.fn = (function_type)__lambda_619;
-+c_7318656.num_args = 1;
-+c_7318656.num_elements = 1;
-+c_7318656.elements = (object *)e_7318659;
-+c_7318656.elements[0] = ((closureN)self_7312302)->elements[0];
++closureN_type c_7318649;
++object e_7318652 [1];
++c_7318649.hdr.mark = gc_color_red;
++ c_7318649.hdr.grayed = 0;
++c_7318649.tag = closureN_tag;
++ c_7318649.fn = (function_type)__lambda_619;
++c_7318649.num_args = 1;
++c_7318649.num_elements = 1;
++c_7318649.elements = (object *)e_7318652;
++c_7318649.elements[0] = ((closureN)self_7312295)->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_7319949, r_735646, ((closureN)self_7313548)->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_7318656, r_735201, ((closureN)self_7312302)->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_7318649, r_735194, ((closureN)self_7312295)->elements[1]);; 
  }
  
 -static void __lambda_619(void *data, object self_7313549, int argc, object *args) /* object self_7313549, object r_735645 */
-+static void __lambda_619(void *data, object self_7312303, int argc, object *args) /* object self_7312303, object r_735200 */
++static void __lambda_619(void *data, object self_7312296, int argc, object *args) /* object self_7312296, object r_735193 */
   {
  
 -  return_direct_with_clo1(data,  ((closureN)self_7313549)->elements[0], (((closure)  ((closureN)self_7313549)->elements[0])->fn),  boolean_t);; 
-+  return_direct_with_clo1(data,  ((closureN)self_7312303)->elements[0], (((closure)  ((closureN)self_7312303)->elements[0])->fn),  boolean_t);; 
++  return_direct_with_clo1(data,  ((closureN)self_7312296)->elements[0], (((closure)  ((closureN)self_7312296)->elements[0])->fn),  boolean_t);; 
  }
  
 -static void __lambda_616(void *data, object self_7313550, int argc, object *args) /* object self_7313550, object r_735643 */
-+static void __lambda_616(void *data, object self_7312304, int argc, object *args) /* object self_7312304, object r_735198 */
++static void __lambda_616(void *data, object self_7312297, int argc, object *args) /* object self_7312297, object r_735191 */
   {
 - object r_735643 = args[0];
 -  return_direct_with_clo2(data,  __glo_call_95cc_scheme_base, (((closure)  __glo_call_95cc_scheme_base)->fn),  ((closureN)self_7313550)->elements[0], r_735643);; 
-+ object r_735198 = args[0];
-+  return_direct_with_clo2(data,  __glo_call_95cc_scheme_base, (((closure)  __glo_call_95cc_scheme_base)->fn),  ((closureN)self_7312304)->elements[0], r_735198);; 
++ object r_735191 = args[0];
++  return_direct_with_clo2(data,  __glo_call_95cc_scheme_base, (((closure)  __glo_call_95cc_scheme_base)->fn),  ((closureN)self_7312297)->elements[0], r_735191);; 
  }
  
 -static void __lambda_613(void *data, object _, int argc, object *args) /* closure _,object k_735637, object sym1_73745_733302, object sym2_73746_733303, object syms_73747_733304_raw, ... */
-+static void __lambda_613(void *data, object _, int argc, object *args) /* closure _,object k_735192, object sym1_73745_732962, object sym2_73746_732963, object syms_73747_732964_raw, ... */
++static void __lambda_613(void *data, object _, int argc, object *args) /* closure _,object k_735185, object sym1_73745_732955, object sym2_73746_732956, object syms_73747_732957_raw, ... */
   {
 -object k_735637 = args[0]; object sym1_73745_733302 = args[1]; object sym2_73746_733303 = args[2];
 -load_varargs(syms_73747_733304, args, 3, argc - 3);
--  Cyc_st_add(data, "scheme/base.sld:symbol=?");
-+object k_735192 = args[0]; object sym1_73745_732962 = args[1]; object sym2_73746_732963 = args[2];
-+load_varargs(syms_73747_732964, args, 3, argc - 3);
-+  Cyc_st_add(data, "base.sld:symbol=?");
++object k_735185 = args[0]; object sym1_73745_732955 = args[1]; object sym2_73746_732956 = args[2];
++load_varargs(syms_73747_732957, args, 3, argc - 3);
+   Cyc_st_add(data, "scheme/base.sld:symbol=?");
  
 -pair_type local_7319936; 
 -return_direct_with_clo4(data,  __glo_Cyc_91obj_123_127_scheme_base, (((closure)  __glo_Cyc_91obj_123_127_scheme_base)->fn),  k_735637, primitive_symbol_127, sym1_73745_733302, set_pair_as_expr(&local_7319936, sym2_73746_733303, syms_73747_733304));; 
-+pair_type local_7318643; 
-+return_direct_with_clo4(data,  __glo_Cyc_91obj_123_127_scheme_base, (((closure)  __glo_Cyc_91obj_123_127_scheme_base)->fn),  k_735192, primitive_symbol_127, sym1_73745_732962, set_pair_as_expr(&local_7318643, sym2_73746_732963, syms_73747_732964));; 
++pair_type local_7318636; 
++return_direct_with_clo4(data,  __glo_Cyc_91obj_123_127_scheme_base, (((closure)  __glo_Cyc_91obj_123_127_scheme_base)->fn),  k_735185, primitive_symbol_127, sym1_73745_732955, set_pair_as_expr(&local_7318636, sym2_73746_732956, syms_73747_732957));; 
  }
  
 -static void __lambda_612(void *data, object _, int argc, object *args) /* closure _,object k_735633, object b1_73742_733299, object b2_73743_733300, object bs_73744_733301_raw, ... */
-+static void __lambda_612(void *data, object _, int argc, object *args) /* closure _,object k_735188, object b1_73742_732959, object b2_73743_732960, object bs_73744_732961_raw, ... */
++static void __lambda_612(void *data, object _, int argc, object *args) /* closure _,object k_735181, object b1_73742_732952, object b2_73743_732953, object bs_73744_732954_raw, ... */
   {
 -object k_735633 = args[0]; object b1_73742_733299 = args[1]; object b2_73743_733300 = args[2];
 -load_varargs(bs_73744_733301, args, 3, argc - 3);
--  Cyc_st_add(data, "scheme/base.sld:boolean=?");
-+object k_735188 = args[0]; object b1_73742_732959 = args[1]; object b2_73743_732960 = args[2];
-+load_varargs(bs_73744_732961, args, 3, argc - 3);
-+  Cyc_st_add(data, "base.sld:boolean=?");
++object k_735181 = args[0]; object b1_73742_732952 = args[1]; object b2_73743_732953 = args[2];
++load_varargs(bs_73744_732954, args, 3, argc - 3);
+   Cyc_st_add(data, "scheme/base.sld:boolean=?");
  
 -pair_type local_7319931; 
 -return_direct_with_clo4(data,  __glo_Cyc_91obj_123_127_scheme_base, (((closure)  __glo_Cyc_91obj_123_127_scheme_base)->fn),  k_735633, primitive_boolean_127, b1_73742_733299, set_pair_as_expr(&local_7319931, b2_73743_733300, bs_73744_733301));; 
-+pair_type local_7318638; 
-+return_direct_with_clo4(data,  __glo_Cyc_91obj_123_127_scheme_base, (((closure)  __glo_Cyc_91obj_123_127_scheme_base)->fn),  k_735188, primitive_boolean_127, b1_73742_732959, set_pair_as_expr(&local_7318638, b2_73743_732960, bs_73744_732961));; 
++pair_type local_7318631; 
++return_direct_with_clo4(data,  __glo_Cyc_91obj_123_127_scheme_base, (((closure)  __glo_Cyc_91obj_123_127_scheme_base)->fn),  k_735181, primitive_boolean_127, b1_73742_732952, set_pair_as_expr(&local_7318631, b2_73743_732953, bs_73744_732954));; 
  }
  
 -static void __lambda_599(void *data, object _, int argc, object *args) /* closure _,object k_735612, object vec_73730_733291, object fill_73731_733292, object opts_73732_733293_raw, ... */
-+static void __lambda_599(void *data, object _, int argc, object *args) /* closure _,object k_735167, object vec_73730_732951, object fill_73731_732952, object opts_73732_732953_raw, ... */
++static void __lambda_599(void *data, object _, int argc, object *args) /* closure _,object k_735160, object vec_73730_732944, object fill_73731_732945, object opts_73732_732946_raw, ... */
   {
 -object k_735612 = args[0]; object vec_73730_733291 = args[1]; object fill_73731_733292 = args[2];
 -load_varargs(opts_73732_733293, args, 3, argc - 3);
--  Cyc_st_add(data, "scheme/base.sld:vector-fill!");
-+object k_735167 = args[0]; object vec_73730_732951 = args[1]; object fill_73731_732952 = args[2];
-+load_varargs(opts_73732_732953, args, 3, argc - 3);
-+  Cyc_st_add(data, "base.sld:vector-fill!");
++object k_735160 = args[0]; object vec_73730_732944 = args[1]; object fill_73731_732945 = args[2];
++load_varargs(opts_73732_732946, args, 3, argc - 3);
+   Cyc_st_add(data, "scheme/base.sld:vector-fill!");
  
 -closureN_type c_7319797;
 -object e_7319926 [4];
@@ -41626,29 +41838,29 @@ Make let-values be the same as let*-values, to work around
 -c_7319797.elements[1] = k_735612;
 -c_7319797.elements[2] = opts_73732_733293;
 -c_7319797.elements[3] = vec_73730_733291;
-+closureN_type c_7318504;
-+object e_7318633 [4];
-+c_7318504.hdr.mark = gc_color_red;
-+ c_7318504.hdr.grayed = 0;
-+c_7318504.tag = closureN_tag;
-+ c_7318504.fn = (function_type)__lambda_600;
-+c_7318504.num_args = 4;
-+c_7318504.num_elements = 4;
-+c_7318504.elements = (object *)e_7318633;
-+c_7318504.elements[0] = fill_73731_732952;
-+c_7318504.elements[1] = k_735167;
-+c_7318504.elements[2] = opts_73732_732953;
-+c_7318504.elements[3] = vec_73730_732951;
++closureN_type c_7318497;
++object e_7318626 [4];
++c_7318497.hdr.mark = gc_color_red;
++ c_7318497.hdr.grayed = 0;
++c_7318497.tag = closureN_tag;
++ c_7318497.fn = (function_type)__lambda_600;
++c_7318497.num_args = 4;
++c_7318497.num_elements = 4;
++c_7318497.elements = (object *)e_7318626;
++c_7318497.elements[0] = fill_73731_732945;
++c_7318497.elements[1] = k_735160;
++c_7318497.elements[2] = opts_73732_732946;
++c_7318497.elements[3] = vec_73730_732944;
  
 -return_direct_with_clo4(data,(closure)&c_7319797,__lambda_600,  boolean_f, boolean_f, boolean_f, boolean_f);; 
-+return_direct_with_clo4(data,(closure)&c_7318504,__lambda_600,  boolean_f, boolean_f, boolean_f, boolean_f);; 
++return_direct_with_clo4(data,(closure)&c_7318497,__lambda_600,  boolean_f, boolean_f, boolean_f, boolean_f);; 
  }
  
 -static void __lambda_600(void *data, object self_7313529, int argc, object *args) /* object self_7313529, object len_73733_733294, object start_73734_733295, object end_73735_733296, object loop_73736_733297 */
-+static void __lambda_600(void *data, object self_7312283, int argc, object *args) /* object self_7312283, object len_73733_732954, object start_73734_732955, object end_73735_732956, object loop_73736_732957 */
++static void __lambda_600(void *data, object self_7312276, int argc, object *args) /* object self_7312276, object len_73733_732947, object start_73734_732948, object end_73735_732949, object loop_73736_732950 */
   {
 - object len_73733_733294 = args[0]; object start_73734_733295 = args[1]; object end_73735_733296 = args[2]; object loop_73736_733297 = args[3];
-+ object len_73733_732954 = args[0]; object start_73734_732955 = args[1]; object end_73735_732956 = args[2]; object loop_73736_732957 = args[3];
++ object len_73733_732947 = args[0]; object start_73734_732948 = args[1]; object end_73735_732949 = args[2]; object loop_73736_732950 = args[3];
    
 -closureN_type c_7319799;
 -object e_7319922 [7];
@@ -41666,35 +41878,35 @@ Make let-values be the same as let*-values, to work around
 -c_7319799.elements[4] = ((closureN)self_7313529)->elements[2];
 -c_7319799.elements[5] = start_73734_733295;
 -c_7319799.elements[6] = ((closureN)self_7313529)->elements[3];
-+closureN_type c_7318506;
-+object e_7318629 [7];
-+c_7318506.hdr.mark = gc_color_red;
-+ c_7318506.hdr.grayed = 0;
-+c_7318506.tag = closureN_tag;
-+ c_7318506.fn = (function_type)__lambda_1354;
-+c_7318506.num_args = 1;
-+c_7318506.num_elements = 7;
-+c_7318506.elements = (object *)e_7318629;
-+c_7318506.elements[0] = end_73735_732956;
-+c_7318506.elements[1] = ((closureN)self_7312283)->elements[0];
-+c_7318506.elements[2] = ((closureN)self_7312283)->elements[1];
-+c_7318506.elements[3] = loop_73736_732957;
-+c_7318506.elements[4] = ((closureN)self_7312283)->elements[2];
-+c_7318506.elements[5] = start_73734_732955;
-+c_7318506.elements[6] = ((closureN)self_7312283)->elements[3];
++closureN_type c_7318499;
++object e_7318622 [7];
++c_7318499.hdr.mark = gc_color_red;
++ c_7318499.hdr.grayed = 0;
++c_7318499.tag = closureN_tag;
++ c_7318499.fn = (function_type)__lambda_1354;
++c_7318499.num_args = 1;
++c_7318499.num_elements = 7;
++c_7318499.elements = (object *)e_7318622;
++c_7318499.elements[0] = end_73735_732949;
++c_7318499.elements[1] = ((closureN)self_7312276)->elements[0];
++c_7318499.elements[2] = ((closureN)self_7312276)->elements[1];
++c_7318499.elements[3] = loop_73736_732950;
++c_7318499.elements[4] = ((closureN)self_7312276)->elements[2];
++c_7318499.elements[5] = start_73734_732948;
++c_7318499.elements[6] = ((closureN)self_7312276)->elements[3];
  
  
 -pair_type local_7319925; 
 -return_direct_with_clo1(data,(closure)&c_7319799,__lambda_1401,  set_cell_as_expr(&local_7319925, len_73733_733294));; 
-+pair_type local_7318632; 
-+return_direct_with_clo1(data,(closure)&c_7318506,__lambda_1354,  set_cell_as_expr(&local_7318632, len_73733_732954));; 
++pair_type local_7318625; 
++return_direct_with_clo1(data,(closure)&c_7318499,__lambda_1354,  set_cell_as_expr(&local_7318625, len_73733_732947));; 
  }
  
 -static void __lambda_1401(void *data, object self_7313530, int argc, object *args) /* object self_7313530, object len_73733_733294 */
-+static void __lambda_1354(void *data, object self_7312284, int argc, object *args) /* object self_7312284, object len_73733_732954 */
++static void __lambda_1354(void *data, object self_7312277, int argc, object *args) /* object self_7312277, object len_73733_732947 */
   {
 - object len_73733_733294 = args[0];
-+ object len_73733_732954 = args[0];
++ object len_73733_732947 = args[0];
    
 -closureN_type c_7319801;
 -object e_7319917 [7];
@@ -41712,35 +41924,35 @@ Make let-values be the same as let*-values, to work around
 -c_7319801.elements[4] = ((closureN)self_7313530)->elements[3];
 -c_7319801.elements[5] = ((closureN)self_7313530)->elements[4];
 -c_7319801.elements[6] = ((closureN)self_7313530)->elements[6];
-+closureN_type c_7318508;
-+object e_7318624 [7];
-+c_7318508.hdr.mark = gc_color_red;
-+ c_7318508.hdr.grayed = 0;
-+c_7318508.tag = closureN_tag;
-+ c_7318508.fn = (function_type)__lambda_1353;
-+c_7318508.num_args = 1;
-+c_7318508.num_elements = 7;
-+c_7318508.elements = (object *)e_7318624;
-+c_7318508.elements[0] = ((closureN)self_7312284)->elements[0];
-+c_7318508.elements[1] = ((closureN)self_7312284)->elements[1];
-+c_7318508.elements[2] = ((closureN)self_7312284)->elements[2];
-+c_7318508.elements[3] = len_73733_732954;
-+c_7318508.elements[4] = ((closureN)self_7312284)->elements[3];
-+c_7318508.elements[5] = ((closureN)self_7312284)->elements[4];
-+c_7318508.elements[6] = ((closureN)self_7312284)->elements[6];
++closureN_type c_7318501;
++object e_7318617 [7];
++c_7318501.hdr.mark = gc_color_red;
++ c_7318501.hdr.grayed = 0;
++c_7318501.tag = closureN_tag;
++ c_7318501.fn = (function_type)__lambda_1353;
++c_7318501.num_args = 1;
++c_7318501.num_elements = 7;
++c_7318501.elements = (object *)e_7318617;
++c_7318501.elements[0] = ((closureN)self_7312277)->elements[0];
++c_7318501.elements[1] = ((closureN)self_7312277)->elements[1];
++c_7318501.elements[2] = ((closureN)self_7312277)->elements[2];
++c_7318501.elements[3] = len_73733_732947;
++c_7318501.elements[4] = ((closureN)self_7312277)->elements[3];
++c_7318501.elements[5] = ((closureN)self_7312277)->elements[4];
++c_7318501.elements[6] = ((closureN)self_7312277)->elements[6];
  
  
 -pair_type local_7319920; 
 -return_direct_with_clo1(data,(closure)&c_7319801,__lambda_1400,  set_cell_as_expr(&local_7319920, ((closureN)self_7313530)->elements[5]));; 
-+pair_type local_7318627; 
-+return_direct_with_clo1(data,(closure)&c_7318508,__lambda_1353,  set_cell_as_expr(&local_7318627, ((closureN)self_7312284)->elements[5]));; 
++pair_type local_7318620; 
++return_direct_with_clo1(data,(closure)&c_7318501,__lambda_1353,  set_cell_as_expr(&local_7318620, ((closureN)self_7312277)->elements[5]));; 
  }
  
 -static void __lambda_1400(void *data, object self_7313531, int argc, object *args) /* object self_7313531, object start_73734_733295 */
-+static void __lambda_1353(void *data, object self_7312285, int argc, object *args) /* object self_7312285, object start_73734_732955 */
++static void __lambda_1353(void *data, object self_7312278, int argc, object *args) /* object self_7312278, object start_73734_732948 */
   {
 - object start_73734_733295 = args[0];
-+ object start_73734_732955 = args[0];
++ object start_73734_732948 = args[0];
    
 -closureN_type c_7319803;
 -object e_7319912 [7];
@@ -41758,35 +41970,35 @@ Make let-values be the same as let*-values, to work around
 -c_7319803.elements[4] = ((closureN)self_7313531)->elements[5];
 -c_7319803.elements[5] = start_73734_733295;
 -c_7319803.elements[6] = ((closureN)self_7313531)->elements[6];
-+closureN_type c_7318510;
-+object e_7318619 [7];
-+c_7318510.hdr.mark = gc_color_red;
-+ c_7318510.hdr.grayed = 0;
-+c_7318510.tag = closureN_tag;
-+ c_7318510.fn = (function_type)__lambda_1352;
-+c_7318510.num_args = 1;
-+c_7318510.num_elements = 7;
-+c_7318510.elements = (object *)e_7318619;
-+c_7318510.elements[0] = ((closureN)self_7312285)->elements[1];
-+c_7318510.elements[1] = ((closureN)self_7312285)->elements[2];
-+c_7318510.elements[2] = ((closureN)self_7312285)->elements[3];
-+c_7318510.elements[3] = ((closureN)self_7312285)->elements[4];
-+c_7318510.elements[4] = ((closureN)self_7312285)->elements[5];
-+c_7318510.elements[5] = start_73734_732955;
-+c_7318510.elements[6] = ((closureN)self_7312285)->elements[6];
++closureN_type c_7318503;
++object e_7318612 [7];
++c_7318503.hdr.mark = gc_color_red;
++ c_7318503.hdr.grayed = 0;
++c_7318503.tag = closureN_tag;
++ c_7318503.fn = (function_type)__lambda_1352;
++c_7318503.num_args = 1;
++c_7318503.num_elements = 7;
++c_7318503.elements = (object *)e_7318612;
++c_7318503.elements[0] = ((closureN)self_7312278)->elements[1];
++c_7318503.elements[1] = ((closureN)self_7312278)->elements[2];
++c_7318503.elements[2] = ((closureN)self_7312278)->elements[3];
++c_7318503.elements[3] = ((closureN)self_7312278)->elements[4];
++c_7318503.elements[4] = ((closureN)self_7312278)->elements[5];
++c_7318503.elements[5] = start_73734_732948;
++c_7318503.elements[6] = ((closureN)self_7312278)->elements[6];
  
  
 -pair_type local_7319915; 
 -return_direct_with_clo1(data,(closure)&c_7319803,__lambda_1399,  set_cell_as_expr(&local_7319915, ((closureN)self_7313531)->elements[0]));; 
-+pair_type local_7318622; 
-+return_direct_with_clo1(data,(closure)&c_7318510,__lambda_1352,  set_cell_as_expr(&local_7318622, ((closureN)self_7312285)->elements[0]));; 
++pair_type local_7318615; 
++return_direct_with_clo1(data,(closure)&c_7318503,__lambda_1352,  set_cell_as_expr(&local_7318615, ((closureN)self_7312278)->elements[0]));; 
  }
  
 -static void __lambda_1399(void *data, object self_7313532, int argc, object *args) /* object self_7313532, object end_73735_733296 */
-+static void __lambda_1352(void *data, object self_7312286, int argc, object *args) /* object self_7312286, object end_73735_732956 */
++static void __lambda_1352(void *data, object self_7312279, int argc, object *args) /* object self_7312279, object end_73735_732949 */
   {
 - object end_73735_733296 = args[0];
-+ object end_73735_732956 = args[0];
++ object end_73735_732949 = args[0];
    
 -closureN_type c_7319805;
 -object e_7319907 [7];
@@ -41804,35 +42016,35 @@ Make let-values be the same as let*-values, to work around
 -c_7319805.elements[4] = ((closureN)self_7313532)->elements[4];
 -c_7319805.elements[5] = ((closureN)self_7313532)->elements[5];
 -c_7319805.elements[6] = ((closureN)self_7313532)->elements[6];
-+closureN_type c_7318512;
-+object e_7318614 [7];
-+c_7318512.hdr.mark = gc_color_red;
-+ c_7318512.hdr.grayed = 0;
-+c_7318512.tag = closureN_tag;
-+ c_7318512.fn = (function_type)__lambda_1351;
-+c_7318512.num_args = 1;
-+c_7318512.num_elements = 7;
-+c_7318512.elements = (object *)e_7318614;
-+c_7318512.elements[0] = end_73735_732956;
-+c_7318512.elements[1] = ((closureN)self_7312286)->elements[0];
-+c_7318512.elements[2] = ((closureN)self_7312286)->elements[1];
-+c_7318512.elements[3] = ((closureN)self_7312286)->elements[2];
-+c_7318512.elements[4] = ((closureN)self_7312286)->elements[4];
-+c_7318512.elements[5] = ((closureN)self_7312286)->elements[5];
-+c_7318512.elements[6] = ((closureN)self_7312286)->elements[6];
++closureN_type c_7318505;
++object e_7318607 [7];
++c_7318505.hdr.mark = gc_color_red;
++ c_7318505.hdr.grayed = 0;
++c_7318505.tag = closureN_tag;
++ c_7318505.fn = (function_type)__lambda_1351;
++c_7318505.num_args = 1;
++c_7318505.num_elements = 7;
++c_7318505.elements = (object *)e_7318607;
++c_7318505.elements[0] = end_73735_732949;
++c_7318505.elements[1] = ((closureN)self_7312279)->elements[0];
++c_7318505.elements[2] = ((closureN)self_7312279)->elements[1];
++c_7318505.elements[3] = ((closureN)self_7312279)->elements[2];
++c_7318505.elements[4] = ((closureN)self_7312279)->elements[4];
++c_7318505.elements[5] = ((closureN)self_7312279)->elements[5];
++c_7318505.elements[6] = ((closureN)self_7312279)->elements[6];
  
  
 -pair_type local_7319910; 
 -return_direct_with_clo1(data,(closure)&c_7319805,__lambda_1398,  set_cell_as_expr(&local_7319910, ((closureN)self_7313532)->elements[3]));; 
-+pair_type local_7318617; 
-+return_direct_with_clo1(data,(closure)&c_7318512,__lambda_1351,  set_cell_as_expr(&local_7318617, ((closureN)self_7312286)->elements[3]));; 
++pair_type local_7318610; 
++return_direct_with_clo1(data,(closure)&c_7318505,__lambda_1351,  set_cell_as_expr(&local_7318610, ((closureN)self_7312279)->elements[3]));; 
  }
  
 -static void __lambda_1398(void *data, object self_7313533, int argc, object *args) /* object self_7313533, object loop_73736_733297 */
-+static void __lambda_1351(void *data, object self_7312287, int argc, object *args) /* object self_7312287, object loop_73736_732957 */
++static void __lambda_1351(void *data, object self_7312280, int argc, object *args) /* object self_7312280, object loop_73736_732950 */
   {
 - object loop_73736_733297 = args[0];
-+ object loop_73736_732957 = args[0];
++ object loop_73736_732950 = args[0];
    
 -closureN_type c_7319807;
 -object e_7319903 [8];
@@ -41851,35 +42063,35 @@ Make let-values be the same as let*-values, to work around
 -c_7319807.elements[5] = ((closureN)self_7313533)->elements[4];
 -c_7319807.elements[6] = ((closureN)self_7313533)->elements[5];
 -c_7319807.elements[7] = ((closureN)self_7313533)->elements[6];
-+closureN_type c_7318514;
-+object e_7318610 [8];
-+c_7318514.hdr.mark = gc_color_red;
-+ c_7318514.hdr.grayed = 0;
-+c_7318514.tag = closureN_tag;
-+ c_7318514.fn = (function_type)__lambda_601;
-+c_7318514.num_args = 1;
-+c_7318514.num_elements = 8;
-+c_7318514.elements = (object *)e_7318610;
-+c_7318514.elements[0] = ((closureN)self_7312287)->elements[0];
-+c_7318514.elements[1] = ((closureN)self_7312287)->elements[1];
-+c_7318514.elements[2] = ((closureN)self_7312287)->elements[2];
-+c_7318514.elements[3] = ((closureN)self_7312287)->elements[3];
-+c_7318514.elements[4] = loop_73736_732957;
-+c_7318514.elements[5] = ((closureN)self_7312287)->elements[4];
-+c_7318514.elements[6] = ((closureN)self_7312287)->elements[5];
-+c_7318514.elements[7] = ((closureN)self_7312287)->elements[6];
++closureN_type c_7318507;
++object e_7318603 [8];
++c_7318507.hdr.mark = gc_color_red;
++ c_7318507.hdr.grayed = 0;
++c_7318507.tag = closureN_tag;
++ c_7318507.fn = (function_type)__lambda_601;
++c_7318507.num_args = 1;
++c_7318507.num_elements = 8;
++c_7318507.elements = (object *)e_7318603;
++c_7318507.elements[0] = ((closureN)self_7312280)->elements[0];
++c_7318507.elements[1] = ((closureN)self_7312280)->elements[1];
++c_7318507.elements[2] = ((closureN)self_7312280)->elements[2];
++c_7318507.elements[3] = ((closureN)self_7312280)->elements[3];
++c_7318507.elements[4] = loop_73736_732950;
++c_7318507.elements[5] = ((closureN)self_7312280)->elements[4];
++c_7318507.elements[6] = ((closureN)self_7312280)->elements[5];
++c_7318507.elements[7] = ((closureN)self_7312280)->elements[6];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7319807,__lambda_601,  Cyc_vector_length(data, ((closureN)self_7313533)->elements[6]));; 
-+return_direct_with_clo1(data,(closure)&c_7318514,__lambda_601,  Cyc_vector_length(data, ((closureN)self_7312287)->elements[6]));; 
++return_direct_with_clo1(data,(closure)&c_7318507,__lambda_601,  Cyc_vector_length(data, ((closureN)self_7312280)->elements[6]));; 
  }
  
 -static void __lambda_601(void *data, object self_7313534, int argc, object *args) /* object self_7313534, object r_735630 */
-+static void __lambda_601(void *data, object self_7312288, int argc, object *args) /* object self_7312288, object r_735185 */
++static void __lambda_601(void *data, object self_7312281, int argc, object *args) /* object self_7312281, object r_735178 */
   {
 - object r_735630 = args[0];
-+ object r_735185 = args[0];
++ object r_735178 = args[0];
    
 -closureN_type c_7319809;
 -object e_7319899 [8];
@@ -41898,46 +42110,46 @@ Make let-values be the same as let*-values, to work around
 -c_7319809.elements[5] = ((closureN)self_7313534)->elements[5];
 -c_7319809.elements[6] = ((closureN)self_7313534)->elements[6];
 -c_7319809.elements[7] = ((closureN)self_7313534)->elements[7];
-+closureN_type c_7318516;
-+object e_7318606 [8];
-+c_7318516.hdr.mark = gc_color_red;
-+ c_7318516.hdr.grayed = 0;
-+c_7318516.tag = closureN_tag;
-+ c_7318516.fn = (function_type)__lambda_602;
-+c_7318516.num_args = 1;
-+c_7318516.num_elements = 8;
-+c_7318516.elements = (object *)e_7318606;
-+c_7318516.elements[0] = ((closureN)self_7312288)->elements[0];
-+c_7318516.elements[1] = ((closureN)self_7312288)->elements[1];
-+c_7318516.elements[2] = ((closureN)self_7312288)->elements[2];
-+c_7318516.elements[3] = ((closureN)self_7312288)->elements[3];
-+c_7318516.elements[4] = ((closureN)self_7312288)->elements[4];
-+c_7318516.elements[5] = ((closureN)self_7312288)->elements[5];
-+c_7318516.elements[6] = ((closureN)self_7312288)->elements[6];
-+c_7318516.elements[7] = ((closureN)self_7312288)->elements[7];
++closureN_type c_7318509;
++object e_7318599 [8];
++c_7318509.hdr.mark = gc_color_red;
++ c_7318509.hdr.grayed = 0;
++c_7318509.tag = closureN_tag;
++ c_7318509.fn = (function_type)__lambda_602;
++c_7318509.num_args = 1;
++c_7318509.num_elements = 8;
++c_7318509.elements = (object *)e_7318599;
++c_7318509.elements[0] = ((closureN)self_7312281)->elements[0];
++c_7318509.elements[1] = ((closureN)self_7312281)->elements[1];
++c_7318509.elements[2] = ((closureN)self_7312281)->elements[2];
++c_7318509.elements[3] = ((closureN)self_7312281)->elements[3];
++c_7318509.elements[4] = ((closureN)self_7312281)->elements[4];
++c_7318509.elements[5] = ((closureN)self_7312281)->elements[5];
++c_7318509.elements[6] = ((closureN)self_7312281)->elements[6];
++c_7318509.elements[7] = ((closureN)self_7312281)->elements[7];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7319809,__lambda_602,  Cyc_set_cell(data, ((closureN)self_7313534)->elements[3], r_735630));; 
-+return_direct_with_clo1(data,(closure)&c_7318516,__lambda_602,  Cyc_set_cell(data, ((closureN)self_7312288)->elements[3], r_735185));; 
++return_direct_with_clo1(data,(closure)&c_7318509,__lambda_602,  Cyc_set_cell(data, ((closureN)self_7312281)->elements[3], r_735178));; 
  }
  
 -static void __lambda_602(void *data, object self_7313535, int argc, object *args) /* object self_7313535, object r_735613 */
-+static void __lambda_602(void *data, object self_7312289, int argc, object *args) /* object self_7312289, object r_735168 */
++static void __lambda_602(void *data, object self_7312282, int argc, object *args) /* object self_7312282, object r_735161 */
   {
  
 -  object r_735626;
-+  object r_735181;
++  object r_735174;
      
    
 -if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313535)->elements[5]), obj_int2obj(0))) ){ 
-+if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312289)->elements[5]), obj_int2obj(0))) ){ 
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312282)->elements[5]), obj_int2obj(0))) ){ 
    
 -  r_735626 = Cyc_car(data, ((closureN)self_7313535)->elements[5]);
-+  r_735181 = Cyc_car(data, ((closureN)self_7312289)->elements[5]);
++  r_735174 = Cyc_car(data, ((closureN)self_7312282)->elements[5]);
  } else { 
 -  r_735626 = obj_int2obj(0);}
-+  r_735181 = obj_int2obj(0);}
++  r_735174 = obj_int2obj(0);}
  ;
 -closureN_type c_7319822;
 -object e_7319895 [8];
@@ -41956,32 +42168,32 @@ Make let-values be the same as let*-values, to work around
 -c_7319822.elements[5] = ((closureN)self_7313535)->elements[5];
 -c_7319822.elements[6] = ((closureN)self_7313535)->elements[6];
 -c_7319822.elements[7] = ((closureN)self_7313535)->elements[7];
-+closureN_type c_7318529;
-+object e_7318602 [8];
-+c_7318529.hdr.mark = gc_color_red;
-+ c_7318529.hdr.grayed = 0;
-+c_7318529.tag = closureN_tag;
-+ c_7318529.fn = (function_type)__lambda_603;
-+c_7318529.num_args = 1;
-+c_7318529.num_elements = 8;
-+c_7318529.elements = (object *)e_7318602;
-+c_7318529.elements[0] = ((closureN)self_7312289)->elements[0];
-+c_7318529.elements[1] = ((closureN)self_7312289)->elements[1];
-+c_7318529.elements[2] = ((closureN)self_7312289)->elements[2];
-+c_7318529.elements[3] = ((closureN)self_7312289)->elements[3];
-+c_7318529.elements[4] = ((closureN)self_7312289)->elements[4];
-+c_7318529.elements[5] = ((closureN)self_7312289)->elements[5];
-+c_7318529.elements[6] = ((closureN)self_7312289)->elements[6];
-+c_7318529.elements[7] = ((closureN)self_7312289)->elements[7];
++closureN_type c_7318522;
++object e_7318595 [8];
++c_7318522.hdr.mark = gc_color_red;
++ c_7318522.hdr.grayed = 0;
++c_7318522.tag = closureN_tag;
++ c_7318522.fn = (function_type)__lambda_603;
++c_7318522.num_args = 1;
++c_7318522.num_elements = 8;
++c_7318522.elements = (object *)e_7318595;
++c_7318522.elements[0] = ((closureN)self_7312282)->elements[0];
++c_7318522.elements[1] = ((closureN)self_7312282)->elements[1];
++c_7318522.elements[2] = ((closureN)self_7312282)->elements[2];
++c_7318522.elements[3] = ((closureN)self_7312282)->elements[3];
++c_7318522.elements[4] = ((closureN)self_7312282)->elements[4];
++c_7318522.elements[5] = ((closureN)self_7312282)->elements[5];
++c_7318522.elements[6] = ((closureN)self_7312282)->elements[6];
++c_7318522.elements[7] = ((closureN)self_7312282)->elements[7];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7319822,__lambda_603,  Cyc_set_cell(data, ((closureN)self_7313535)->elements[6], r_735626));; 
-+return_direct_with_clo1(data,(closure)&c_7318529,__lambda_603,  Cyc_set_cell(data, ((closureN)self_7312289)->elements[6], r_735181));; 
++return_direct_with_clo1(data,(closure)&c_7318522,__lambda_603,  Cyc_set_cell(data, ((closureN)self_7312282)->elements[6], r_735174));; 
  }
  
 -static void __lambda_603(void *data, object self_7313536, int argc, object *args) /* object self_7313536, object r_735614 */
-+static void __lambda_603(void *data, object self_7312290, int argc, object *args) /* object self_7312290, object r_735169 */
++static void __lambda_603(void *data, object self_7312283, int argc, object *args) /* object self_7312283, object r_735162 */
   {
  
    
@@ -41996,17 +42208,17 @@ Make let-values be the same as let*-values, to work around
 -c_7319824.elements = (object *)e_7319838;
 -c_7319824.elements[0] = ((closureN)self_7313536)->elements[3];
 -c_7319824.elements[1] = ((closureN)self_7313536)->elements[5];
-+closureN_type c_7318531;
-+object e_7318545 [2];
-+c_7318531.hdr.mark = gc_color_red;
-+ c_7318531.hdr.grayed = 0;
-+c_7318531.tag = closureN_tag;
-+ c_7318531.fn = (function_type)__lambda_604;
-+c_7318531.num_args = 0;
-+c_7318531.num_elements = 2;
-+c_7318531.elements = (object *)e_7318545;
-+c_7318531.elements[0] = ((closureN)self_7312290)->elements[3];
-+c_7318531.elements[1] = ((closureN)self_7312290)->elements[5];
++closureN_type c_7318524;
++object e_7318538 [2];
++c_7318524.hdr.mark = gc_color_red;
++ c_7318524.hdr.grayed = 0;
++c_7318524.tag = closureN_tag;
++ c_7318524.fn = (function_type)__lambda_604;
++c_7318524.num_args = 0;
++c_7318524.num_elements = 2;
++c_7318524.elements = (object *)e_7318538;
++c_7318524.elements[0] = ((closureN)self_7312283)->elements[3];
++c_7318524.elements[1] = ((closureN)self_7312283)->elements[5];
  
  
 -closureN_type c_7319839;
@@ -42024,31 +42236,31 @@ Make let-values be the same as let*-values, to work around
 -c_7319839.elements[3] = ((closureN)self_7313536)->elements[4];
 -c_7319839.elements[4] = ((closureN)self_7313536)->elements[6];
 -c_7319839.elements[5] = ((closureN)self_7313536)->elements[7];
-+closureN_type c_7318546;
-+object e_7318601 [6];
-+c_7318546.hdr.mark = gc_color_red;
-+ c_7318546.hdr.grayed = 0;
-+c_7318546.tag = closureN_tag;
-+ c_7318546.fn = (function_type)__lambda_605;
-+c_7318546.num_args = 1;
-+c_7318546.num_elements = 6;
-+c_7318546.elements = (object *)e_7318601;
-+c_7318546.elements[0] = ((closureN)self_7312290)->elements[0];
-+c_7318546.elements[1] = ((closureN)self_7312290)->elements[1];
-+c_7318546.elements[2] = ((closureN)self_7312290)->elements[2];
-+c_7318546.elements[3] = ((closureN)self_7312290)->elements[4];
-+c_7318546.elements[4] = ((closureN)self_7312290)->elements[6];
-+c_7318546.elements[5] = ((closureN)self_7312290)->elements[7];
++closureN_type c_7318539;
++object e_7318594 [6];
++c_7318539.hdr.mark = gc_color_red;
++ c_7318539.hdr.grayed = 0;
++c_7318539.tag = closureN_tag;
++ c_7318539.fn = (function_type)__lambda_605;
++c_7318539.num_args = 1;
++c_7318539.num_elements = 6;
++c_7318539.elements = (object *)e_7318594;
++c_7318539.elements[0] = ((closureN)self_7312283)->elements[0];
++c_7318539.elements[1] = ((closureN)self_7312283)->elements[1];
++c_7318539.elements[2] = ((closureN)self_7312283)->elements[2];
++c_7318539.elements[3] = ((closureN)self_7312283)->elements[4];
++c_7318539.elements[4] = ((closureN)self_7312283)->elements[6];
++c_7318539.elements[5] = ((closureN)self_7312283)->elements[7];
  
 -return_direct_with_clo1(data,(closure)&c_7319824,__lambda_604,  &c_7319839);; 
-+return_direct_with_clo1(data,(closure)&c_7318531,__lambda_604,  &c_7318546);; 
++return_direct_with_clo1(data,(closure)&c_7318524,__lambda_604,  &c_7318539);; 
  }
  
 -static void __lambda_605(void *data, object self_7313537, int argc, object *args) /* object self_7313537, object r_735622 */
-+static void __lambda_605(void *data, object self_7312291, int argc, object *args) /* object self_7312291, object r_735177 */
++static void __lambda_605(void *data, object self_7312284, int argc, object *args) /* object self_7312284, object r_735170 */
   {
 - object r_735622 = args[0];
-+ object r_735177 = args[0];
++ object r_735170 = args[0];
    
 -closureN_type c_7319841;
 -object e_7319890 [6];
@@ -42065,30 +42277,30 @@ Make let-values be the same as let*-values, to work around
 -c_7319841.elements[3] = ((closureN)self_7313537)->elements[3];
 -c_7319841.elements[4] = ((closureN)self_7313537)->elements[4];
 -c_7319841.elements[5] = ((closureN)self_7313537)->elements[5];
-+closureN_type c_7318548;
-+object e_7318597 [6];
-+c_7318548.hdr.mark = gc_color_red;
-+ c_7318548.hdr.grayed = 0;
-+c_7318548.tag = closureN_tag;
-+ c_7318548.fn = (function_type)__lambda_606;
-+c_7318548.num_args = 1;
-+c_7318548.num_elements = 6;
-+c_7318548.elements = (object *)e_7318597;
-+c_7318548.elements[0] = ((closureN)self_7312291)->elements[0];
-+c_7318548.elements[1] = ((closureN)self_7312291)->elements[1];
-+c_7318548.elements[2] = ((closureN)self_7312291)->elements[2];
-+c_7318548.elements[3] = ((closureN)self_7312291)->elements[3];
-+c_7318548.elements[4] = ((closureN)self_7312291)->elements[4];
-+c_7318548.elements[5] = ((closureN)self_7312291)->elements[5];
++closureN_type c_7318541;
++object e_7318590 [6];
++c_7318541.hdr.mark = gc_color_red;
++ c_7318541.hdr.grayed = 0;
++c_7318541.tag = closureN_tag;
++ c_7318541.fn = (function_type)__lambda_606;
++c_7318541.num_args = 1;
++c_7318541.num_elements = 6;
++c_7318541.elements = (object *)e_7318590;
++c_7318541.elements[0] = ((closureN)self_7312284)->elements[0];
++c_7318541.elements[1] = ((closureN)self_7312284)->elements[1];
++c_7318541.elements[2] = ((closureN)self_7312284)->elements[2];
++c_7318541.elements[3] = ((closureN)self_7312284)->elements[3];
++c_7318541.elements[4] = ((closureN)self_7312284)->elements[4];
++c_7318541.elements[5] = ((closureN)self_7312284)->elements[5];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7319841,__lambda_606,  Cyc_set_cell(data, ((closureN)self_7313537)->elements[0], r_735622));; 
-+return_direct_with_clo1(data,(closure)&c_7318548,__lambda_606,  Cyc_set_cell(data, ((closureN)self_7312291)->elements[0], r_735177));; 
++return_direct_with_clo1(data,(closure)&c_7318541,__lambda_606,  Cyc_set_cell(data, ((closureN)self_7312284)->elements[0], r_735170));; 
  }
  
 -static void __lambda_606(void *data, object self_7313538, int argc, object *args) /* object self_7313538, object r_735615 */
-+static void __lambda_606(void *data, object self_7312292, int argc, object *args) /* object self_7312292, object r_735170 */
++static void __lambda_606(void *data, object self_7312285, int argc, object *args) /* object self_7312285, object r_735163 */
   {
  
    
@@ -42104,18 +42316,18 @@ Make let-values be the same as let*-values, to work around
 -c_7319843.elements[0] = ((closureN)self_7313538)->elements[2];
 -c_7319843.elements[1] = ((closureN)self_7313538)->elements[3];
 -c_7319843.elements[2] = ((closureN)self_7313538)->elements[4];
-+closureN_type c_7318550;
-+object e_7318565 [3];
-+c_7318550.hdr.mark = gc_color_red;
-+ c_7318550.hdr.grayed = 0;
-+c_7318550.tag = closureN_tag;
-+ c_7318550.fn = (function_type)__lambda_607;
-+c_7318550.num_args = 1;
-+c_7318550.num_elements = 3;
-+c_7318550.elements = (object *)e_7318565;
-+c_7318550.elements[0] = ((closureN)self_7312292)->elements[2];
-+c_7318550.elements[1] = ((closureN)self_7312292)->elements[3];
-+c_7318550.elements[2] = ((closureN)self_7312292)->elements[4];
++closureN_type c_7318543;
++object e_7318558 [3];
++c_7318543.hdr.mark = gc_color_red;
++ c_7318543.hdr.grayed = 0;
++c_7318543.tag = closureN_tag;
++ c_7318543.fn = (function_type)__lambda_607;
++c_7318543.num_args = 1;
++c_7318543.num_elements = 3;
++c_7318543.elements = (object *)e_7318558;
++c_7318543.elements[0] = ((closureN)self_7312285)->elements[2];
++c_7318543.elements[1] = ((closureN)self_7312285)->elements[3];
++c_7318543.elements[2] = ((closureN)self_7312285)->elements[4];
  
  
 -closureN_type c_7319859;
@@ -42131,29 +42343,29 @@ Make let-values be the same as let*-values, to work around
 -c_7319859.elements[1] = ((closureN)self_7313538)->elements[1];
 -c_7319859.elements[2] = ((closureN)self_7313538)->elements[3];
 -c_7319859.elements[3] = ((closureN)self_7313538)->elements[5];
-+closureN_type c_7318566;
-+object e_7318596 [4];
-+c_7318566.hdr.mark = gc_color_red;
-+ c_7318566.hdr.grayed = 0;
-+c_7318566.tag = closureN_tag;
-+ c_7318566.fn = (function_type)__lambda_609;
-+c_7318566.num_args = 1;
-+c_7318566.num_elements = 4;
-+c_7318566.elements = (object *)e_7318596;
-+c_7318566.elements[0] = ((closureN)self_7312292)->elements[0];
-+c_7318566.elements[1] = ((closureN)self_7312292)->elements[1];
-+c_7318566.elements[2] = ((closureN)self_7312292)->elements[3];
-+c_7318566.elements[3] = ((closureN)self_7312292)->elements[5];
++closureN_type c_7318559;
++object e_7318589 [4];
++c_7318559.hdr.mark = gc_color_red;
++ c_7318559.hdr.grayed = 0;
++c_7318559.tag = closureN_tag;
++ c_7318559.fn = (function_type)__lambda_609;
++c_7318559.num_args = 1;
++c_7318559.num_elements = 4;
++c_7318559.elements = (object *)e_7318589;
++c_7318559.elements[0] = ((closureN)self_7312285)->elements[0];
++c_7318559.elements[1] = ((closureN)self_7312285)->elements[1];
++c_7318559.elements[2] = ((closureN)self_7312285)->elements[3];
++c_7318559.elements[3] = ((closureN)self_7312285)->elements[5];
  
 -return_direct_with_clo1(data,(closure)&c_7319843,__lambda_607,  &c_7319859);; 
-+return_direct_with_clo1(data,(closure)&c_7318550,__lambda_607,  &c_7318566);; 
++return_direct_with_clo1(data,(closure)&c_7318543,__lambda_607,  &c_7318559);; 
  }
  
 -static void __lambda_609(void *data, object self_7313539, int argc, object *args) /* object self_7313539, object k_735618, object i_73737_733298 */
-+static void __lambda_609(void *data, object self_7312293, int argc, object *args) /* object self_7312293, object k_735173, object i_73737_732958 */
++static void __lambda_609(void *data, object self_7312286, int argc, object *args) /* object self_7312286, object k_735166, object i_73737_732951 */
   {
 - object k_735618 = args[0]; object i_73737_733298 = args[1];
-+ object k_735173 = args[0]; object i_73737_732958 = args[1];
++ object k_735166 = args[0]; object i_73737_732951 = args[1];
    
 -closureN_type c_7319861;
 -object e_7319883 [5];
@@ -42169,38 +42381,38 @@ Make let-values be the same as let*-values, to work around
 -c_7319861.elements[2] = k_735618;
 -c_7319861.elements[3] = ((closureN)self_7313539)->elements[2];
 -c_7319861.elements[4] = ((closureN)self_7313539)->elements[3];
-+closureN_type c_7318568;
-+object e_7318590 [5];
-+c_7318568.hdr.mark = gc_color_red;
-+ c_7318568.hdr.grayed = 0;
-+c_7318568.tag = closureN_tag;
-+ c_7318568.fn = (function_type)__lambda_610;
-+c_7318568.num_args = 1;
-+c_7318568.num_elements = 5;
-+c_7318568.elements = (object *)e_7318590;
-+c_7318568.elements[0] = ((closureN)self_7312293)->elements[1];
-+c_7318568.elements[1] = i_73737_732958;
-+c_7318568.elements[2] = k_735173;
-+c_7318568.elements[3] = ((closureN)self_7312293)->elements[2];
-+c_7318568.elements[4] = ((closureN)self_7312293)->elements[3];
++closureN_type c_7318561;
++object e_7318583 [5];
++c_7318561.hdr.mark = gc_color_red;
++ c_7318561.hdr.grayed = 0;
++c_7318561.tag = closureN_tag;
++ c_7318561.fn = (function_type)__lambda_610;
++c_7318561.num_args = 1;
++c_7318561.num_elements = 5;
++c_7318561.elements = (object *)e_7318583;
++c_7318561.elements[0] = ((closureN)self_7312286)->elements[1];
++c_7318561.elements[1] = i_73737_732951;
++c_7318561.elements[2] = k_735166;
++c_7318561.elements[3] = ((closureN)self_7312286)->elements[2];
++c_7318561.elements[4] = ((closureN)self_7312286)->elements[3];
  
  
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7319861,__lambda_610,  Cyc_num_fast_eq_op(data, i_73737_733298, car(((closureN)self_7313539)->elements[0])));; 
-+return_direct_with_clo1(data,(closure)&c_7318568,__lambda_610,  Cyc_num_fast_eq_op(data, i_73737_732958, car(((closureN)self_7312293)->elements[0])));; 
++return_direct_with_clo1(data,(closure)&c_7318561,__lambda_610,  Cyc_num_fast_eq_op(data, i_73737_732951, car(((closureN)self_7312286)->elements[0])));; 
  }
  
 -static void __lambda_610(void *data, object self_7313540, int argc, object *args) /* object self_7313540, object r_735619 */
-+static void __lambda_610(void *data, object self_7312294, int argc, object *args) /* object self_7312294, object r_735174 */
++static void __lambda_610(void *data, object self_7312287, int argc, object *args) /* object self_7312287, object r_735167 */
   {
 - object r_735619 = args[0];
 -  if( (boolean_f != r_735619) ){ 
 -  return_direct_with_clo1(data,  ((closureN)self_7313540)->elements[2], (((closure)  ((closureN)self_7313540)->elements[2])->fn),  ((closureN)self_7313540)->elements[4]);
-+ object r_735174 = args[0];
-+  if( (boolean_f != r_735174) ){ 
-+  return_direct_with_clo1(data,  ((closureN)self_7312294)->elements[2], (((closure)  ((closureN)self_7312294)->elements[2])->fn),  ((closureN)self_7312294)->elements[4]);
++ object r_735167 = args[0];
++  if( (boolean_f != r_735167) ){ 
++  return_direct_with_clo1(data,  ((closureN)self_7312287)->elements[2], (((closure)  ((closureN)self_7312287)->elements[2])->fn),  ((closureN)self_7312287)->elements[4]);
  } else { 
    
 -closureN_type c_7319866;
@@ -42215,29 +42427,29 @@ Make let-values be the same as let*-values, to work around
 -c_7319866.elements[0] = ((closureN)self_7313540)->elements[1];
 -c_7319866.elements[1] = ((closureN)self_7313540)->elements[2];
 -c_7319866.elements[2] = ((closureN)self_7313540)->elements[3];
-+closureN_type c_7318573;
-+object e_7318583 [3];
-+c_7318573.hdr.mark = gc_color_red;
-+ c_7318573.hdr.grayed = 0;
-+c_7318573.tag = closureN_tag;
-+ c_7318573.fn = (function_type)__lambda_611;
-+c_7318573.num_args = 1;
-+c_7318573.num_elements = 3;
-+c_7318573.elements = (object *)e_7318583;
-+c_7318573.elements[0] = ((closureN)self_7312294)->elements[1];
-+c_7318573.elements[1] = ((closureN)self_7312294)->elements[2];
-+c_7318573.elements[2] = ((closureN)self_7312294)->elements[3];
++closureN_type c_7318566;
++object e_7318576 [3];
++c_7318566.hdr.mark = gc_color_red;
++ c_7318566.hdr.grayed = 0;
++c_7318566.tag = closureN_tag;
++ c_7318566.fn = (function_type)__lambda_611;
++c_7318566.num_args = 1;
++c_7318566.num_elements = 3;
++c_7318566.elements = (object *)e_7318576;
++c_7318566.elements[0] = ((closureN)self_7312287)->elements[1];
++c_7318566.elements[1] = ((closureN)self_7312287)->elements[2];
++c_7318566.elements[2] = ((closureN)self_7312287)->elements[3];
  
  
 -object c_7319879 = Cyc_vector_set_cps(data,(closure)&c_7319866,((closureN)self_7313540)->elements[4], ((closureN)self_7313540)->elements[1], ((closureN)self_7313540)->elements[0]);
 -return_closcall1(data,(closure)&c_7319866,  c_7319879);}
-+object c_7318586 = Cyc_vector_set_cps(data,(closure)&c_7318573,((closureN)self_7312294)->elements[4], ((closureN)self_7312294)->elements[1], ((closureN)self_7312294)->elements[0]);
-+return_closcall1(data,(closure)&c_7318573,  c_7318586);}
++object c_7318579 = Cyc_vector_set_cps(data,(closure)&c_7318566,((closureN)self_7312287)->elements[4], ((closureN)self_7312287)->elements[1], ((closureN)self_7312287)->elements[0]);
++return_closcall1(data,(closure)&c_7318566,  c_7318579);}
  ;; 
  }
  
 -static void __lambda_611(void *data, object self_7313541, int argc, object *args) /* object self_7313541, object r_735620 */
-+static void __lambda_611(void *data, object self_7312295, int argc, object *args) /* object self_7312295, object r_735175 */
++static void __lambda_611(void *data, object self_7312288, int argc, object *args) /* object self_7312288, object r_735168 */
   {
  
    
@@ -42245,15 +42457,15 @@ Make let-values be the same as let*-values, to work around
  
 -complex_num_type local_7319874; 
 -return_closcall2(data,  car(((closureN)self_7313541)->elements[2]),  ((closureN)self_7313541)->elements[1], Cyc_fast_sum(data,&local_7319874, ((closureN)self_7313541)->elements[0], obj_int2obj(1)));; 
-+complex_num_type local_7318581; 
-+return_closcall2(data,  car(((closureN)self_7312295)->elements[2]),  ((closureN)self_7312295)->elements[1], Cyc_fast_sum(data,&local_7318581, ((closureN)self_7312295)->elements[0], obj_int2obj(1)));; 
++complex_num_type local_7318574; 
++return_closcall2(data,  car(((closureN)self_7312288)->elements[2]),  ((closureN)self_7312288)->elements[1], Cyc_fast_sum(data,&local_7318574, ((closureN)self_7312288)->elements[0], obj_int2obj(1)));; 
  }
  
 -static void __lambda_607(void *data, object self_7313542, int argc, object *args) /* object self_7313542, object r_735617 */
-+static void __lambda_607(void *data, object self_7312296, int argc, object *args) /* object self_7312296, object r_735172 */
++static void __lambda_607(void *data, object self_7312289, int argc, object *args) /* object self_7312289, object r_735165 */
   {
 - object r_735617 = args[0];
-+ object r_735172 = args[0];
++ object r_735165 = args[0];
    
 -closureN_type c_7319845;
 -object e_7319854 [3];
@@ -42267,27 +42479,27 @@ Make let-values be the same as let*-values, to work around
 -c_7319845.elements[0] = ((closureN)self_7313542)->elements[0];
 -c_7319845.elements[1] = ((closureN)self_7313542)->elements[1];
 -c_7319845.elements[2] = ((closureN)self_7313542)->elements[2];
-+closureN_type c_7318552;
-+object e_7318561 [3];
-+c_7318552.hdr.mark = gc_color_red;
-+ c_7318552.hdr.grayed = 0;
-+c_7318552.tag = closureN_tag;
-+ c_7318552.fn = (function_type)__lambda_608;
-+c_7318552.num_args = 1;
-+c_7318552.num_elements = 3;
-+c_7318552.elements = (object *)e_7318561;
-+c_7318552.elements[0] = ((closureN)self_7312296)->elements[0];
-+c_7318552.elements[1] = ((closureN)self_7312296)->elements[1];
-+c_7318552.elements[2] = ((closureN)self_7312296)->elements[2];
++closureN_type c_7318545;
++object e_7318554 [3];
++c_7318545.hdr.mark = gc_color_red;
++ c_7318545.hdr.grayed = 0;
++c_7318545.tag = closureN_tag;
++ c_7318545.fn = (function_type)__lambda_608;
++c_7318545.num_args = 1;
++c_7318545.num_elements = 3;
++c_7318545.elements = (object *)e_7318554;
++c_7318545.elements[0] = ((closureN)self_7312289)->elements[0];
++c_7318545.elements[1] = ((closureN)self_7312289)->elements[1];
++c_7318545.elements[2] = ((closureN)self_7312289)->elements[2];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7319845,__lambda_608,  Cyc_set_cell(data, ((closureN)self_7313542)->elements[1], r_735617));; 
-+return_direct_with_clo1(data,(closure)&c_7318552,__lambda_608,  Cyc_set_cell(data, ((closureN)self_7312296)->elements[1], r_735172));; 
++return_direct_with_clo1(data,(closure)&c_7318545,__lambda_608,  Cyc_set_cell(data, ((closureN)self_7312289)->elements[1], r_735165));; 
  }
  
 -static void __lambda_608(void *data, object self_7313543, int argc, object *args) /* object self_7313543, object r_735616 */
-+static void __lambda_608(void *data, object self_7312297, int argc, object *args) /* object self_7312297, object r_735171 */
++static void __lambda_608(void *data, object self_7312290, int argc, object *args) /* object self_7312290, object r_735164 */
   {
  
    
@@ -42295,39 +42507,38 @@ Make let-values be the same as let*-values, to work around
  
  
 -return_closcall2(data,  car(((closureN)self_7313543)->elements[1]),  ((closureN)self_7313543)->elements[0], car(((closureN)self_7313543)->elements[2]));; 
-+return_closcall2(data,  car(((closureN)self_7312297)->elements[1]),  ((closureN)self_7312297)->elements[0], car(((closureN)self_7312297)->elements[2]));; 
++return_closcall2(data,  car(((closureN)self_7312290)->elements[1]),  ((closureN)self_7312290)->elements[0], car(((closureN)self_7312290)->elements[2]));; 
  }
  
 -static void __lambda_604(void *data, object self_7313544, int argc, object *args) /* object self_7313544, object k_735623 */
-+static void __lambda_604(void *data, object self_7312298, int argc, object *args) /* object self_7312298, object k_735178 */
++static void __lambda_604(void *data, object self_7312291, int argc, object *args) /* object self_7312291, object k_735171 */
   {
 - object k_735623 = args[0];
-+ object k_735178 = args[0];
++ object k_735171 = args[0];
      
    
 -if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313544)->elements[1]), obj_int2obj(1))) ){ 
-+if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312298)->elements[1]), obj_int2obj(1))) ){ 
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312291)->elements[1]), obj_int2obj(1))) ){ 
    
  
 -return_direct_with_clo1(data,  k_735623,__lambda_605,  Cyc_cadr(data, ((closureN)self_7313544)->elements[1]));
-+return_direct_with_clo1(data,  k_735178,__lambda_605,  Cyc_cadr(data, ((closureN)self_7312298)->elements[1]));
++return_direct_with_clo1(data,  k_735171,__lambda_605,  Cyc_cadr(data, ((closureN)self_7312291)->elements[1]));
  } else { 
    
  
 -return_direct_with_clo1(data,  k_735623,__lambda_605,  car(((closureN)self_7313544)->elements[0]));}
-+return_direct_with_clo1(data,  k_735178,__lambda_605,  car(((closureN)self_7312298)->elements[0]));}
++return_direct_with_clo1(data,  k_735171,__lambda_605,  car(((closureN)self_7312291)->elements[0]));}
  ;; 
  }
  
 -static void __lambda_588(void *data, object _, int argc, object *args) /* closure _,object k_735589, object to_73716_733281, object at_73717_733282, object from_73718_733283, object opts_73719_733284_raw, ... */
-+static void __lambda_588(void *data, object _, int argc, object *args) /* closure _,object k_735144, object to_73716_732941, object at_73717_732942, object from_73718_732943, object opts_73719_732944_raw, ... */
++static void __lambda_588(void *data, object _, int argc, object *args) /* closure _,object k_735137, object to_73716_732934, object at_73717_732935, object from_73718_732936, object opts_73719_732937_raw, ... */
   {
 -object k_735589 = args[0]; object to_73716_733281 = args[1]; object at_73717_733282 = args[2]; object from_73718_733283 = args[3];
 -load_varargs(opts_73719_733284, args, 4, argc - 4);
--  Cyc_st_add(data, "scheme/base.sld:vector-copy!");
-+object k_735144 = args[0]; object to_73716_732941 = args[1]; object at_73717_732942 = args[2]; object from_73718_732943 = args[3];
-+load_varargs(opts_73719_732944, args, 4, argc - 4);
-+  Cyc_st_add(data, "base.sld:vector-copy!");
++object k_735137 = args[0]; object to_73716_732934 = args[1]; object at_73717_732935 = args[2]; object from_73718_732936 = args[3];
++load_varargs(opts_73719_732937, args, 4, argc - 4);
+   Cyc_st_add(data, "scheme/base.sld:vector-copy!");
  
 -closureN_type c_7319666;
 -object e_7319794 [5];
@@ -42343,31 +42554,14 @@ Make let-values be the same as let*-values, to work around
 -c_7319666.elements[2] = k_735589;
 -c_7319666.elements[3] = opts_73719_733284;
 -c_7319666.elements[4] = to_73716_733281;
-+closureN_type c_7318373;
-+object e_7318501 [5];
-+c_7318373.hdr.mark = gc_color_red;
-+ c_7318373.hdr.grayed = 0;
-+c_7318373.tag = closureN_tag;
-+ c_7318373.fn = (function_type)__lambda_589;
-+c_7318373.num_args = 4;
-+c_7318373.num_elements = 5;
-+c_7318373.elements = (object *)e_7318501;
-+c_7318373.elements[0] = at_73717_732942;
-+c_7318373.elements[1] = from_73718_732943;
-+c_7318373.elements[2] = k_735144;
-+c_7318373.elements[3] = opts_73719_732944;
-+c_7318373.elements[4] = to_73716_732941;
- 
+-
 -return_direct_with_clo4(data,(closure)&c_7319666,__lambda_589,  boolean_f, boolean_f, boolean_f, boolean_f);; 
-+return_direct_with_clo4(data,(closure)&c_7318373,__lambda_589,  boolean_f, boolean_f, boolean_f, boolean_f);; 
- }
- 
+-}
+-
 -static void __lambda_589(void *data, object self_7313515, int argc, object *args) /* object self_7313515, object len_73720_733285, object start_73721_733286, object end_73722_733287, object loop_73723_733288 */
-+static void __lambda_589(void *data, object self_7312269, int argc, object *args) /* object self_7312269, object len_73720_732945, object start_73721_732946, object end_73722_732947, object loop_73723_732948 */
-  {
+- {
 - object len_73720_733285 = args[0]; object start_73721_733286 = args[1]; object end_73722_733287 = args[2]; object loop_73723_733288 = args[3];
-+ object len_73720_732945 = args[0]; object start_73721_732946 = args[1]; object end_73722_732947 = args[2]; object loop_73723_732948 = args[3];
-   
+-  
 -closureN_type c_7319668;
 -object e_7319790 [8];
 -c_7319668.hdr.mark = gc_color_red;
@@ -42385,37 +42579,16 @@ Make let-values be the same as let*-values, to work around
 -c_7319668.elements[5] = ((closureN)self_7313515)->elements[3];
 -c_7319668.elements[6] = start_73721_733286;
 -c_7319668.elements[7] = ((closureN)self_7313515)->elements[4];
-+closureN_type c_7318375;
-+object e_7318497 [8];
-+c_7318375.hdr.mark = gc_color_red;
-+ c_7318375.hdr.grayed = 0;
-+c_7318375.tag = closureN_tag;
-+ c_7318375.fn = (function_type)__lambda_1350;
-+c_7318375.num_args = 1;
-+c_7318375.num_elements = 8;
-+c_7318375.elements = (object *)e_7318497;
-+c_7318375.elements[0] = ((closureN)self_7312269)->elements[0];
-+c_7318375.elements[1] = end_73722_732947;
-+c_7318375.elements[2] = ((closureN)self_7312269)->elements[1];
-+c_7318375.elements[3] = ((closureN)self_7312269)->elements[2];
-+c_7318375.elements[4] = loop_73723_732948;
-+c_7318375.elements[5] = ((closureN)self_7312269)->elements[3];
-+c_7318375.elements[6] = start_73721_732946;
-+c_7318375.elements[7] = ((closureN)self_7312269)->elements[4];
- 
- 
+-
+-
 -pair_type local_7319793; 
 -return_direct_with_clo1(data,(closure)&c_7319668,__lambda_1397,  set_cell_as_expr(&local_7319793, len_73720_733285));; 
-+pair_type local_7318500; 
-+return_direct_with_clo1(data,(closure)&c_7318375,__lambda_1350,  set_cell_as_expr(&local_7318500, len_73720_732945));; 
- }
- 
+-}
+-
 -static void __lambda_1397(void *data, object self_7313516, int argc, object *args) /* object self_7313516, object len_73720_733285 */
-+static void __lambda_1350(void *data, object self_7312270, int argc, object *args) /* object self_7312270, object len_73720_732945 */
-  {
+- {
 - object len_73720_733285 = args[0];
-+ object len_73720_732945 = args[0];
-   
+-  
 -closureN_type c_7319670;
 -object e_7319785 [8];
 -c_7319670.hdr.mark = gc_color_red;
@@ -42433,37 +42606,16 @@ Make let-values be the same as let*-values, to work around
 -c_7319670.elements[5] = ((closureN)self_7313516)->elements[4];
 -c_7319670.elements[6] = ((closureN)self_7313516)->elements[5];
 -c_7319670.elements[7] = ((closureN)self_7313516)->elements[7];
-+closureN_type c_7318377;
-+object e_7318492 [8];
-+c_7318377.hdr.mark = gc_color_red;
-+ c_7318377.hdr.grayed = 0;
-+c_7318377.tag = closureN_tag;
-+ c_7318377.fn = (function_type)__lambda_1349;
-+c_7318377.num_args = 1;
-+c_7318377.num_elements = 8;
-+c_7318377.elements = (object *)e_7318492;
-+c_7318377.elements[0] = ((closureN)self_7312270)->elements[0];
-+c_7318377.elements[1] = ((closureN)self_7312270)->elements[1];
-+c_7318377.elements[2] = ((closureN)self_7312270)->elements[2];
-+c_7318377.elements[3] = ((closureN)self_7312270)->elements[3];
-+c_7318377.elements[4] = len_73720_732945;
-+c_7318377.elements[5] = ((closureN)self_7312270)->elements[4];
-+c_7318377.elements[6] = ((closureN)self_7312270)->elements[5];
-+c_7318377.elements[7] = ((closureN)self_7312270)->elements[7];
- 
- 
+-
+-
 -pair_type local_7319788; 
 -return_direct_with_clo1(data,(closure)&c_7319670,__lambda_1396,  set_cell_as_expr(&local_7319788, ((closureN)self_7313516)->elements[6]));; 
-+pair_type local_7318495; 
-+return_direct_with_clo1(data,(closure)&c_7318377,__lambda_1349,  set_cell_as_expr(&local_7318495, ((closureN)self_7312270)->elements[6]));; 
- }
- 
+-}
+-
 -static void __lambda_1396(void *data, object self_7313517, int argc, object *args) /* object self_7313517, object start_73721_733286 */
-+static void __lambda_1349(void *data, object self_7312271, int argc, object *args) /* object self_7312271, object start_73721_732946 */
-  {
+- {
 - object start_73721_733286 = args[0];
-+ object start_73721_732946 = args[0];
-   
+-  
 -closureN_type c_7319672;
 -object e_7319780 [8];
 -c_7319672.hdr.mark = gc_color_red;
@@ -42481,37 +42633,16 @@ Make let-values be the same as let*-values, to work around
 -c_7319672.elements[5] = ((closureN)self_7313517)->elements[6];
 -c_7319672.elements[6] = start_73721_733286;
 -c_7319672.elements[7] = ((closureN)self_7313517)->elements[7];
-+closureN_type c_7318379;
-+object e_7318487 [8];
-+c_7318379.hdr.mark = gc_color_red;
-+ c_7318379.hdr.grayed = 0;
-+c_7318379.tag = closureN_tag;
-+ c_7318379.fn = (function_type)__lambda_1348;
-+c_7318379.num_args = 1;
-+c_7318379.num_elements = 8;
-+c_7318379.elements = (object *)e_7318487;
-+c_7318379.elements[0] = ((closureN)self_7312271)->elements[0];
-+c_7318379.elements[1] = ((closureN)self_7312271)->elements[2];
-+c_7318379.elements[2] = ((closureN)self_7312271)->elements[3];
-+c_7318379.elements[3] = ((closureN)self_7312271)->elements[4];
-+c_7318379.elements[4] = ((closureN)self_7312271)->elements[5];
-+c_7318379.elements[5] = ((closureN)self_7312271)->elements[6];
-+c_7318379.elements[6] = start_73721_732946;
-+c_7318379.elements[7] = ((closureN)self_7312271)->elements[7];
- 
- 
+-
+-
 -pair_type local_7319783; 
 -return_direct_with_clo1(data,(closure)&c_7319672,__lambda_1395,  set_cell_as_expr(&local_7319783, ((closureN)self_7313517)->elements[1]));; 
-+pair_type local_7318490; 
-+return_direct_with_clo1(data,(closure)&c_7318379,__lambda_1348,  set_cell_as_expr(&local_7318490, ((closureN)self_7312271)->elements[1]));; 
- }
- 
+-}
+-
 -static void __lambda_1395(void *data, object self_7313518, int argc, object *args) /* object self_7313518, object end_73722_733287 */
-+static void __lambda_1348(void *data, object self_7312272, int argc, object *args) /* object self_7312272, object end_73722_732947 */
-  {
+- {
 - object end_73722_733287 = args[0];
-+ object end_73722_732947 = args[0];
-   
+-  
 -closureN_type c_7319674;
 -object e_7319775 [8];
 -c_7319674.hdr.mark = gc_color_red;
@@ -42529,37 +42660,16 @@ Make let-values be the same as let*-values, to work around
 -c_7319674.elements[5] = ((closureN)self_7313518)->elements[5];
 -c_7319674.elements[6] = ((closureN)self_7313518)->elements[6];
 -c_7319674.elements[7] = ((closureN)self_7313518)->elements[7];
-+closureN_type c_7318381;
-+object e_7318482 [8];
-+c_7318381.hdr.mark = gc_color_red;
-+ c_7318381.hdr.grayed = 0;
-+c_7318381.tag = closureN_tag;
-+ c_7318381.fn = (function_type)__lambda_1347;
-+c_7318381.num_args = 1;
-+c_7318381.num_elements = 8;
-+c_7318381.elements = (object *)e_7318482;
-+c_7318381.elements[0] = ((closureN)self_7312272)->elements[0];
-+c_7318381.elements[1] = end_73722_732947;
-+c_7318381.elements[2] = ((closureN)self_7312272)->elements[1];
-+c_7318381.elements[3] = ((closureN)self_7312272)->elements[2];
-+c_7318381.elements[4] = ((closureN)self_7312272)->elements[3];
-+c_7318381.elements[5] = ((closureN)self_7312272)->elements[5];
-+c_7318381.elements[6] = ((closureN)self_7312272)->elements[6];
-+c_7318381.elements[7] = ((closureN)self_7312272)->elements[7];
- 
- 
+-
+-
 -pair_type local_7319778; 
 -return_direct_with_clo1(data,(closure)&c_7319674,__lambda_1394,  set_cell_as_expr(&local_7319778, ((closureN)self_7313518)->elements[4]));; 
-+pair_type local_7318485; 
-+return_direct_with_clo1(data,(closure)&c_7318381,__lambda_1347,  set_cell_as_expr(&local_7318485, ((closureN)self_7312272)->elements[4]));; 
- }
- 
+-}
+-
 -static void __lambda_1394(void *data, object self_7313519, int argc, object *args) /* object self_7313519, object loop_73723_733288 */
-+static void __lambda_1347(void *data, object self_7312273, int argc, object *args) /* object self_7312273, object loop_73723_732948 */
-  {
+- {
 - object loop_73723_733288 = args[0];
-+ object loop_73723_732948 = args[0];
-   
+-  
 -closureN_type c_7319676;
 -object e_7319768 [9];
 -c_7319676.hdr.mark = gc_color_red;
@@ -42578,50 +42688,26 @@ Make let-values be the same as let*-values, to work around
 -c_7319676.elements[6] = ((closureN)self_7313519)->elements[5];
 -c_7319676.elements[7] = ((closureN)self_7313519)->elements[6];
 -c_7319676.elements[8] = ((closureN)self_7313519)->elements[7];
-+closureN_type c_7318383;
-+object e_7318475 [9];
-+c_7318383.hdr.mark = gc_color_red;
-+ c_7318383.hdr.grayed = 0;
-+c_7318383.tag = closureN_tag;
-+ c_7318383.fn = (function_type)__lambda_590;
-+c_7318383.num_args = 1;
-+c_7318383.num_elements = 9;
-+c_7318383.elements = (object *)e_7318475;
-+c_7318383.elements[0] = ((closureN)self_7312273)->elements[0];
-+c_7318383.elements[1] = ((closureN)self_7312273)->elements[1];
-+c_7318383.elements[2] = ((closureN)self_7312273)->elements[2];
-+c_7318383.elements[3] = ((closureN)self_7312273)->elements[3];
-+c_7318383.elements[4] = ((closureN)self_7312273)->elements[4];
-+c_7318383.elements[5] = loop_73723_732948;
-+c_7318383.elements[6] = ((closureN)self_7312273)->elements[5];
-+c_7318383.elements[7] = ((closureN)self_7312273)->elements[6];
-+c_7318383.elements[8] = ((closureN)self_7312273)->elements[7];
- 
- 
- 
- 
- 
+-
+-
+-
+-
+-
 -return_direct_with_clo1(data,(closure)&c_7319676,__lambda_590,  Cyc_set_cell(data, ((closureN)self_7313519)->elements[4], Cyc_vector_length(data, ((closureN)self_7313519)->elements[2])));; 
-+return_direct_with_clo1(data,(closure)&c_7318383,__lambda_590,  Cyc_set_cell(data, ((closureN)self_7312273)->elements[4], Cyc_vector_length(data, ((closureN)self_7312273)->elements[2])));; 
- }
- 
+-}
+-
 -static void __lambda_590(void *data, object self_7313520, int argc, object *args) /* object self_7313520, object r_735590 */
-+static void __lambda_590(void *data, object self_7312274, int argc, object *args) /* object self_7312274, object r_735145 */
-  {
- 
+- {
+-
 -  object r_735605;
-+  object r_735160;
-     
-   
+-    
+-  
 -if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313520)->elements[6]), obj_int2obj(0))) ){ 
-+if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312274)->elements[6]), obj_int2obj(0))) ){ 
-   
+-  
 -  r_735605 = Cyc_car(data, ((closureN)self_7313520)->elements[6]);
-+  r_735160 = Cyc_car(data, ((closureN)self_7312274)->elements[6]);
- } else { 
+-} else { 
 -  r_735605 = obj_int2obj(0);}
-+  r_735160 = obj_int2obj(0);}
- ;
+-;
 -closureN_type c_7319689;
 -object e_7319764 [9];
 -c_7319689.hdr.mark = gc_color_red;
@@ -42640,36 +42726,164 @@ Make let-values be the same as let*-values, to work around
 -c_7319689.elements[6] = ((closureN)self_7313520)->elements[6];
 -c_7319689.elements[7] = ((closureN)self_7313520)->elements[7];
 -c_7319689.elements[8] = ((closureN)self_7313520)->elements[8];
-+closureN_type c_7318396;
-+object e_7318471 [9];
-+c_7318396.hdr.mark = gc_color_red;
-+ c_7318396.hdr.grayed = 0;
-+c_7318396.tag = closureN_tag;
-+ c_7318396.fn = (function_type)__lambda_591;
-+c_7318396.num_args = 1;
-+c_7318396.num_elements = 9;
-+c_7318396.elements = (object *)e_7318471;
-+c_7318396.elements[0] = ((closureN)self_7312274)->elements[0];
-+c_7318396.elements[1] = ((closureN)self_7312274)->elements[1];
-+c_7318396.elements[2] = ((closureN)self_7312274)->elements[2];
-+c_7318396.elements[3] = ((closureN)self_7312274)->elements[3];
-+c_7318396.elements[4] = ((closureN)self_7312274)->elements[4];
-+c_7318396.elements[5] = ((closureN)self_7312274)->elements[5];
-+c_7318396.elements[6] = ((closureN)self_7312274)->elements[6];
-+c_7318396.elements[7] = ((closureN)self_7312274)->elements[7];
-+c_7318396.elements[8] = ((closureN)self_7312274)->elements[8];
- 
+-
++closureN_type c_7318366;
++object e_7318494 [5];
++c_7318366.hdr.mark = gc_color_red;
++ c_7318366.hdr.grayed = 0;
++c_7318366.tag = closureN_tag;
++ c_7318366.fn = (function_type)__lambda_589;
++c_7318366.num_args = 4;
++c_7318366.num_elements = 5;
++c_7318366.elements = (object *)e_7318494;
++c_7318366.elements[0] = at_73717_732935;
++c_7318366.elements[1] = from_73718_732936;
++c_7318366.elements[2] = k_735137;
++c_7318366.elements[3] = opts_73719_732937;
++c_7318366.elements[4] = to_73716_732934;
++
++return_direct_with_clo4(data,(closure)&c_7318366,__lambda_589,  boolean_f, boolean_f, boolean_f, boolean_f);; 
++}
++
++static void __lambda_589(void *data, object self_7312262, int argc, object *args) /* object self_7312262, object len_73720_732938, object start_73721_732939, object end_73722_732940, object loop_73723_732941 */
++ {
++ object len_73720_732938 = args[0]; object start_73721_732939 = args[1]; object end_73722_732940 = args[2]; object loop_73723_732941 = args[3];
++  
++closureN_type c_7318368;
++object e_7318490 [8];
++c_7318368.hdr.mark = gc_color_red;
++ c_7318368.hdr.grayed = 0;
++c_7318368.tag = closureN_tag;
++ c_7318368.fn = (function_type)__lambda_1350;
++c_7318368.num_args = 1;
++c_7318368.num_elements = 8;
++c_7318368.elements = (object *)e_7318490;
++c_7318368.elements[0] = ((closureN)self_7312262)->elements[0];
++c_7318368.elements[1] = end_73722_732940;
++c_7318368.elements[2] = ((closureN)self_7312262)->elements[1];
++c_7318368.elements[3] = ((closureN)self_7312262)->elements[2];
++c_7318368.elements[4] = loop_73723_732941;
++c_7318368.elements[5] = ((closureN)self_7312262)->elements[3];
++c_7318368.elements[6] = start_73721_732939;
++c_7318368.elements[7] = ((closureN)self_7312262)->elements[4];
++
++
++pair_type local_7318493; 
++return_direct_with_clo1(data,(closure)&c_7318368,__lambda_1350,  set_cell_as_expr(&local_7318493, len_73720_732938));; 
++}
++
++static void __lambda_1350(void *data, object self_7312263, int argc, object *args) /* object self_7312263, object len_73720_732938 */
++ {
++ object len_73720_732938 = args[0];
++  
++closureN_type c_7318370;
++object e_7318485 [8];
++c_7318370.hdr.mark = gc_color_red;
++ c_7318370.hdr.grayed = 0;
++c_7318370.tag = closureN_tag;
++ c_7318370.fn = (function_type)__lambda_1349;
++c_7318370.num_args = 1;
++c_7318370.num_elements = 8;
++c_7318370.elements = (object *)e_7318485;
++c_7318370.elements[0] = ((closureN)self_7312263)->elements[0];
++c_7318370.elements[1] = ((closureN)self_7312263)->elements[1];
++c_7318370.elements[2] = ((closureN)self_7312263)->elements[2];
++c_7318370.elements[3] = ((closureN)self_7312263)->elements[3];
++c_7318370.elements[4] = len_73720_732938;
++c_7318370.elements[5] = ((closureN)self_7312263)->elements[4];
++c_7318370.elements[6] = ((closureN)self_7312263)->elements[5];
++c_7318370.elements[7] = ((closureN)self_7312263)->elements[7];
++
++
++pair_type local_7318488; 
++return_direct_with_clo1(data,(closure)&c_7318370,__lambda_1349,  set_cell_as_expr(&local_7318488, ((closureN)self_7312263)->elements[6]));; 
++}
++
++static void __lambda_1349(void *data, object self_7312264, int argc, object *args) /* object self_7312264, object start_73721_732939 */
++ {
++ object start_73721_732939 = args[0];
++  
++closureN_type c_7318372;
++object e_7318480 [8];
++c_7318372.hdr.mark = gc_color_red;
++ c_7318372.hdr.grayed = 0;
++c_7318372.tag = closureN_tag;
++ c_7318372.fn = (function_type)__lambda_1348;
++c_7318372.num_args = 1;
++c_7318372.num_elements = 8;
++c_7318372.elements = (object *)e_7318480;
++c_7318372.elements[0] = ((closureN)self_7312264)->elements[0];
++c_7318372.elements[1] = ((closureN)self_7312264)->elements[2];
++c_7318372.elements[2] = ((closureN)self_7312264)->elements[3];
++c_7318372.elements[3] = ((closureN)self_7312264)->elements[4];
++c_7318372.elements[4] = ((closureN)self_7312264)->elements[5];
++c_7318372.elements[5] = ((closureN)self_7312264)->elements[6];
++c_7318372.elements[6] = start_73721_732939;
++c_7318372.elements[7] = ((closureN)self_7312264)->elements[7];
++
++
++pair_type local_7318483; 
++return_direct_with_clo1(data,(closure)&c_7318372,__lambda_1348,  set_cell_as_expr(&local_7318483, ((closureN)self_7312264)->elements[1]));; 
++}
++
++static void __lambda_1348(void *data, object self_7312265, int argc, object *args) /* object self_7312265, object end_73722_732940 */
++ {
++ object end_73722_732940 = args[0];
++  
++closureN_type c_7318374;
++object e_7318475 [8];
++c_7318374.hdr.mark = gc_color_red;
++ c_7318374.hdr.grayed = 0;
++c_7318374.tag = closureN_tag;
++ c_7318374.fn = (function_type)__lambda_1347;
++c_7318374.num_args = 1;
++c_7318374.num_elements = 8;
++c_7318374.elements = (object *)e_7318475;
++c_7318374.elements[0] = ((closureN)self_7312265)->elements[0];
++c_7318374.elements[1] = end_73722_732940;
++c_7318374.elements[2] = ((closureN)self_7312265)->elements[1];
++c_7318374.elements[3] = ((closureN)self_7312265)->elements[2];
++c_7318374.elements[4] = ((closureN)self_7312265)->elements[3];
++c_7318374.elements[5] = ((closureN)self_7312265)->elements[5];
++c_7318374.elements[6] = ((closureN)self_7312265)->elements[6];
++c_7318374.elements[7] = ((closureN)self_7312265)->elements[7];
++
++
++pair_type local_7318478; 
++return_direct_with_clo1(data,(closure)&c_7318374,__lambda_1347,  set_cell_as_expr(&local_7318478, ((closureN)self_7312265)->elements[4]));; 
++}
++
++static void __lambda_1347(void *data, object self_7312266, int argc, object *args) /* object self_7312266, object loop_73723_732941 */
++ {
++ object loop_73723_732941 = args[0];
++  
++closureN_type c_7318376;
++object e_7318468 [9];
++c_7318376.hdr.mark = gc_color_red;
++ c_7318376.hdr.grayed = 0;
++c_7318376.tag = closureN_tag;
++ c_7318376.fn = (function_type)__lambda_590;
++c_7318376.num_args = 1;
++c_7318376.num_elements = 9;
++c_7318376.elements = (object *)e_7318468;
++c_7318376.elements[0] = ((closureN)self_7312266)->elements[0];
++c_7318376.elements[1] = ((closureN)self_7312266)->elements[1];
++c_7318376.elements[2] = ((closureN)self_7312266)->elements[2];
++c_7318376.elements[3] = ((closureN)self_7312266)->elements[3];
++c_7318376.elements[4] = ((closureN)self_7312266)->elements[4];
++c_7318376.elements[5] = loop_73723_732941;
++c_7318376.elements[6] = ((closureN)self_7312266)->elements[5];
++c_7318376.elements[7] = ((closureN)self_7312266)->elements[6];
++c_7318376.elements[8] = ((closureN)self_7312266)->elements[7];
  
  
 -return_direct_with_clo1(data,(closure)&c_7319689,__lambda_591,  Cyc_set_cell(data, ((closureN)self_7313520)->elements[7], r_735605));; 
-+return_direct_with_clo1(data,(closure)&c_7318396,__lambda_591,  Cyc_set_cell(data, ((closureN)self_7312274)->elements[7], r_735160));; 
- }
- 
+-}
+-
 -static void __lambda_591(void *data, object self_7313521, int argc, object *args) /* object self_7313521, object r_735591 */
-+static void __lambda_591(void *data, object self_7312275, int argc, object *args) /* object self_7312275, object r_735146 */
-  {
+- {
  
-   
+-  
 -closureN_type c_7319691;
 -object e_7319705 [2];
 -c_7319691.hdr.mark = gc_color_red;
@@ -42681,17 +42895,6 @@ Make let-values be the same as let*-values, to work around
 -c_7319691.elements = (object *)e_7319705;
 -c_7319691.elements[0] = ((closureN)self_7313521)->elements[4];
 -c_7319691.elements[1] = ((closureN)self_7313521)->elements[6];
-+closureN_type c_7318398;
-+object e_7318412 [2];
-+c_7318398.hdr.mark = gc_color_red;
-+ c_7318398.hdr.grayed = 0;
-+c_7318398.tag = closureN_tag;
-+ c_7318398.fn = (function_type)__lambda_592;
-+c_7318398.num_args = 0;
-+c_7318398.num_elements = 2;
-+c_7318398.elements = (object *)e_7318412;
-+c_7318398.elements[0] = ((closureN)self_7312275)->elements[4];
-+c_7318398.elements[1] = ((closureN)self_7312275)->elements[6];
  
  
 -closureN_type c_7319706;
@@ -42710,32 +42913,88 @@ Make let-values be the same as let*-values, to work around
 -c_7319706.elements[4] = ((closureN)self_7313521)->elements[5];
 -c_7319706.elements[5] = ((closureN)self_7313521)->elements[7];
 -c_7319706.elements[6] = ((closureN)self_7313521)->elements[8];
-+closureN_type c_7318413;
-+object e_7318470 [7];
-+c_7318413.hdr.mark = gc_color_red;
-+ c_7318413.hdr.grayed = 0;
-+c_7318413.tag = closureN_tag;
-+ c_7318413.fn = (function_type)__lambda_593;
-+c_7318413.num_args = 1;
-+c_7318413.num_elements = 7;
-+c_7318413.elements = (object *)e_7318470;
-+c_7318413.elements[0] = ((closureN)self_7312275)->elements[0];
-+c_7318413.elements[1] = ((closureN)self_7312275)->elements[1];
-+c_7318413.elements[2] = ((closureN)self_7312275)->elements[2];
-+c_7318413.elements[3] = ((closureN)self_7312275)->elements[3];
-+c_7318413.elements[4] = ((closureN)self_7312275)->elements[5];
-+c_7318413.elements[5] = ((closureN)self_7312275)->elements[7];
-+c_7318413.elements[6] = ((closureN)self_7312275)->elements[8];
++return_direct_with_clo1(data,(closure)&c_7318376,__lambda_590,  Cyc_set_cell(data, ((closureN)self_7312266)->elements[4], Cyc_vector_length(data, ((closureN)self_7312266)->elements[2])));; 
++}
++
++static void __lambda_590(void *data, object self_7312267, int argc, object *args) /* object self_7312267, object r_735138 */
++ {
++
++  object r_735153;
++    
++  
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312267)->elements[6]), obj_int2obj(0))) ){ 
++  
++  r_735153 = Cyc_car(data, ((closureN)self_7312267)->elements[6]);
++} else { 
++  r_735153 = obj_int2obj(0);}
++;
++closureN_type c_7318389;
++object e_7318464 [9];
++c_7318389.hdr.mark = gc_color_red;
++ c_7318389.hdr.grayed = 0;
++c_7318389.tag = closureN_tag;
++ c_7318389.fn = (function_type)__lambda_591;
++c_7318389.num_args = 1;
++c_7318389.num_elements = 9;
++c_7318389.elements = (object *)e_7318464;
++c_7318389.elements[0] = ((closureN)self_7312267)->elements[0];
++c_7318389.elements[1] = ((closureN)self_7312267)->elements[1];
++c_7318389.elements[2] = ((closureN)self_7312267)->elements[2];
++c_7318389.elements[3] = ((closureN)self_7312267)->elements[3];
++c_7318389.elements[4] = ((closureN)self_7312267)->elements[4];
++c_7318389.elements[5] = ((closureN)self_7312267)->elements[5];
++c_7318389.elements[6] = ((closureN)self_7312267)->elements[6];
++c_7318389.elements[7] = ((closureN)self_7312267)->elements[7];
++c_7318389.elements[8] = ((closureN)self_7312267)->elements[8];
++
++
++
++return_direct_with_clo1(data,(closure)&c_7318389,__lambda_591,  Cyc_set_cell(data, ((closureN)self_7312267)->elements[7], r_735153));; 
++}
++
++static void __lambda_591(void *data, object self_7312268, int argc, object *args) /* object self_7312268, object r_735139 */
++ {
++
++  
++closureN_type c_7318391;
++object e_7318405 [2];
++c_7318391.hdr.mark = gc_color_red;
++ c_7318391.hdr.grayed = 0;
++c_7318391.tag = closureN_tag;
++ c_7318391.fn = (function_type)__lambda_592;
++c_7318391.num_args = 0;
++c_7318391.num_elements = 2;
++c_7318391.elements = (object *)e_7318405;
++c_7318391.elements[0] = ((closureN)self_7312268)->elements[4];
++c_7318391.elements[1] = ((closureN)self_7312268)->elements[6];
++
++
++closureN_type c_7318406;
++object e_7318463 [7];
++c_7318406.hdr.mark = gc_color_red;
++ c_7318406.hdr.grayed = 0;
++c_7318406.tag = closureN_tag;
++ c_7318406.fn = (function_type)__lambda_593;
++c_7318406.num_args = 1;
++c_7318406.num_elements = 7;
++c_7318406.elements = (object *)e_7318463;
++c_7318406.elements[0] = ((closureN)self_7312268)->elements[0];
++c_7318406.elements[1] = ((closureN)self_7312268)->elements[1];
++c_7318406.elements[2] = ((closureN)self_7312268)->elements[2];
++c_7318406.elements[3] = ((closureN)self_7312268)->elements[3];
++c_7318406.elements[4] = ((closureN)self_7312268)->elements[5];
++c_7318406.elements[5] = ((closureN)self_7312268)->elements[7];
++c_7318406.elements[6] = ((closureN)self_7312268)->elements[8];
  
 -return_direct_with_clo1(data,(closure)&c_7319691,__lambda_592,  &c_7319706);; 
-+return_direct_with_clo1(data,(closure)&c_7318398,__lambda_592,  &c_7318413);; 
++return_direct_with_clo1(data,(closure)&c_7318391,__lambda_592,  &c_7318406);; 
  }
  
 -static void __lambda_593(void *data, object self_7313522, int argc, object *args) /* object self_7313522, object r_735601 */
-+static void __lambda_593(void *data, object self_7312276, int argc, object *args) /* object self_7312276, object r_735156 */
++static void __lambda_593(void *data, object self_7312269, int argc, object *args) /* object self_7312269, object r_735149 */
   {
 - object r_735601 = args[0];
-+ object r_735156 = args[0];
++ object r_735149 = args[0];
    
 -closureN_type c_7319708;
 -object e_7319759 [7];
@@ -42753,31 +43012,31 @@ Make let-values be the same as let*-values, to work around
 -c_7319708.elements[4] = ((closureN)self_7313522)->elements[4];
 -c_7319708.elements[5] = ((closureN)self_7313522)->elements[5];
 -c_7319708.elements[6] = ((closureN)self_7313522)->elements[6];
-+closureN_type c_7318415;
-+object e_7318466 [7];
-+c_7318415.hdr.mark = gc_color_red;
-+ c_7318415.hdr.grayed = 0;
-+c_7318415.tag = closureN_tag;
-+ c_7318415.fn = (function_type)__lambda_594;
-+c_7318415.num_args = 1;
-+c_7318415.num_elements = 7;
-+c_7318415.elements = (object *)e_7318466;
-+c_7318415.elements[0] = ((closureN)self_7312276)->elements[0];
-+c_7318415.elements[1] = ((closureN)self_7312276)->elements[1];
-+c_7318415.elements[2] = ((closureN)self_7312276)->elements[2];
-+c_7318415.elements[3] = ((closureN)self_7312276)->elements[3];
-+c_7318415.elements[4] = ((closureN)self_7312276)->elements[4];
-+c_7318415.elements[5] = ((closureN)self_7312276)->elements[5];
-+c_7318415.elements[6] = ((closureN)self_7312276)->elements[6];
++closureN_type c_7318408;
++object e_7318459 [7];
++c_7318408.hdr.mark = gc_color_red;
++ c_7318408.hdr.grayed = 0;
++c_7318408.tag = closureN_tag;
++ c_7318408.fn = (function_type)__lambda_594;
++c_7318408.num_args = 1;
++c_7318408.num_elements = 7;
++c_7318408.elements = (object *)e_7318459;
++c_7318408.elements[0] = ((closureN)self_7312269)->elements[0];
++c_7318408.elements[1] = ((closureN)self_7312269)->elements[1];
++c_7318408.elements[2] = ((closureN)self_7312269)->elements[2];
++c_7318408.elements[3] = ((closureN)self_7312269)->elements[3];
++c_7318408.elements[4] = ((closureN)self_7312269)->elements[4];
++c_7318408.elements[5] = ((closureN)self_7312269)->elements[5];
++c_7318408.elements[6] = ((closureN)self_7312269)->elements[6];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7319708,__lambda_594,  Cyc_set_cell(data, ((closureN)self_7313522)->elements[1], r_735601));; 
-+return_direct_with_clo1(data,(closure)&c_7318415,__lambda_594,  Cyc_set_cell(data, ((closureN)self_7312276)->elements[1], r_735156));; 
++return_direct_with_clo1(data,(closure)&c_7318408,__lambda_594,  Cyc_set_cell(data, ((closureN)self_7312269)->elements[1], r_735149));; 
  }
  
 -static void __lambda_594(void *data, object self_7313523, int argc, object *args) /* object self_7313523, object r_735592 */
-+static void __lambda_594(void *data, object self_7312277, int argc, object *args) /* object self_7312277, object r_735147 */
++static void __lambda_594(void *data, object self_7312270, int argc, object *args) /* object self_7312270, object r_735140 */
   {
  
    
@@ -42794,19 +43053,19 @@ Make let-values be the same as let*-values, to work around
 -c_7319710.elements[1] = ((closureN)self_7313523)->elements[3];
 -c_7319710.elements[2] = ((closureN)self_7313523)->elements[4];
 -c_7319710.elements[3] = ((closureN)self_7313523)->elements[5];
-+closureN_type c_7318417;
-+object e_7318433 [4];
-+c_7318417.hdr.mark = gc_color_red;
-+ c_7318417.hdr.grayed = 0;
-+c_7318417.tag = closureN_tag;
-+ c_7318417.fn = (function_type)__lambda_595;
-+c_7318417.num_args = 1;
-+c_7318417.num_elements = 4;
-+c_7318417.elements = (object *)e_7318433;
-+c_7318417.elements[0] = ((closureN)self_7312277)->elements[0];
-+c_7318417.elements[1] = ((closureN)self_7312277)->elements[3];
-+c_7318417.elements[2] = ((closureN)self_7312277)->elements[4];
-+c_7318417.elements[3] = ((closureN)self_7312277)->elements[5];
++closureN_type c_7318410;
++object e_7318426 [4];
++c_7318410.hdr.mark = gc_color_red;
++ c_7318410.hdr.grayed = 0;
++c_7318410.tag = closureN_tag;
++ c_7318410.fn = (function_type)__lambda_595;
++c_7318410.num_args = 1;
++c_7318410.num_elements = 4;
++c_7318410.elements = (object *)e_7318426;
++c_7318410.elements[0] = ((closureN)self_7312270)->elements[0];
++c_7318410.elements[1] = ((closureN)self_7312270)->elements[3];
++c_7318410.elements[2] = ((closureN)self_7312270)->elements[4];
++c_7318410.elements[3] = ((closureN)self_7312270)->elements[5];
  
  
 -closureN_type c_7319727;
@@ -42822,35 +43081,35 @@ Make let-values be the same as let*-values, to work around
 -c_7319727.elements[1] = ((closureN)self_7313523)->elements[2];
 -c_7319727.elements[2] = ((closureN)self_7313523)->elements[4];
 -c_7319727.elements[3] = ((closureN)self_7313523)->elements[6];
-+closureN_type c_7318434;
-+object e_7318465 [4];
-+c_7318434.hdr.mark = gc_color_red;
-+ c_7318434.hdr.grayed = 0;
-+c_7318434.tag = closureN_tag;
-+ c_7318434.fn = (function_type)__lambda_597;
-+c_7318434.num_args = 2;
-+c_7318434.num_elements = 4;
-+c_7318434.elements = (object *)e_7318465;
-+c_7318434.elements[0] = ((closureN)self_7312277)->elements[1];
-+c_7318434.elements[1] = ((closureN)self_7312277)->elements[2];
-+c_7318434.elements[2] = ((closureN)self_7312277)->elements[4];
-+c_7318434.elements[3] = ((closureN)self_7312277)->elements[6];
++closureN_type c_7318427;
++object e_7318458 [4];
++c_7318427.hdr.mark = gc_color_red;
++ c_7318427.hdr.grayed = 0;
++c_7318427.tag = closureN_tag;
++ c_7318427.fn = (function_type)__lambda_597;
++c_7318427.num_args = 2;
++c_7318427.num_elements = 4;
++c_7318427.elements = (object *)e_7318458;
++c_7318427.elements[0] = ((closureN)self_7312270)->elements[1];
++c_7318427.elements[1] = ((closureN)self_7312270)->elements[2];
++c_7318427.elements[2] = ((closureN)self_7312270)->elements[4];
++c_7318427.elements[3] = ((closureN)self_7312270)->elements[6];
  
 -return_direct_with_clo1(data,(closure)&c_7319710,__lambda_595,  &c_7319727);; 
-+return_direct_with_clo1(data,(closure)&c_7318417,__lambda_595,  &c_7318434);; 
++return_direct_with_clo1(data,(closure)&c_7318410,__lambda_595,  &c_7318427);; 
  }
  
 -static void __lambda_597(void *data, object self_7313524, int argc, object *args) /* object self_7313524, object k_735595, object i_91at_73724_733289, object i_91from_73725_733290 */
-+static void __lambda_597(void *data, object self_7312278, int argc, object *args) /* object self_7312278, object k_735150, object i_91at_73724_732949, object i_91from_73725_732950 */
++static void __lambda_597(void *data, object self_7312271, int argc, object *args) /* object self_7312271, object k_735143, object i_91at_73724_732942, object i_91from_73725_732943 */
   {
 - object k_735595 = args[0]; object i_91at_73724_733289 = args[1]; object i_91from_73725_733290 = args[2];
-+ object k_735150 = args[0]; object i_91at_73724_732949 = args[1]; object i_91from_73725_732950 = args[2];
++ object k_735143 = args[0]; object i_91at_73724_732942 = args[1]; object i_91from_73725_732943 = args[2];
      
    
 -if( (boolean_f != Cyc_num_fast_eq_op(data, i_91from_73725_733290, car(((closureN)self_7313524)->elements[0]))) ){ 
 -  return_direct_with_clo1(data,  k_735595, (((closure)  k_735595)->fn),  ((closureN)self_7313524)->elements[3]);
-+if( (boolean_f != Cyc_num_fast_eq_op(data, i_91from_73725_732950, car(((closureN)self_7312278)->elements[0]))) ){ 
-+  return_direct_with_clo1(data,  k_735150, (((closure)  k_735150)->fn),  ((closureN)self_7312278)->elements[3]);
++if( (boolean_f != Cyc_num_fast_eq_op(data, i_91from_73725_732943, car(((closureN)self_7312271)->elements[0]))) ){ 
++  return_direct_with_clo1(data,  k_735143, (((closure)  k_735143)->fn),  ((closureN)self_7312271)->elements[3]);
  } else { 
    
 -closureN_type c_7319736;
@@ -42866,51 +43125,51 @@ Make let-values be the same as let*-values, to work around
 -c_7319736.elements[1] = i_91from_73725_733290;
 -c_7319736.elements[2] = k_735595;
 -c_7319736.elements[3] = ((closureN)self_7313524)->elements[2];
-+closureN_type c_7318443;
-+object e_7318457 [4];
-+c_7318443.hdr.mark = gc_color_red;
-+ c_7318443.hdr.grayed = 0;
-+c_7318443.tag = closureN_tag;
-+ c_7318443.fn = (function_type)__lambda_598;
-+c_7318443.num_args = 1;
-+c_7318443.num_elements = 4;
-+c_7318443.elements = (object *)e_7318457;
-+c_7318443.elements[0] = i_91at_73724_732949;
-+c_7318443.elements[1] = i_91from_73725_732950;
-+c_7318443.elements[2] = k_735150;
-+c_7318443.elements[3] = ((closureN)self_7312278)->elements[2];
++closureN_type c_7318436;
++object e_7318450 [4];
++c_7318436.hdr.mark = gc_color_red;
++ c_7318436.hdr.grayed = 0;
++c_7318436.tag = closureN_tag;
++ c_7318436.fn = (function_type)__lambda_598;
++c_7318436.num_args = 1;
++c_7318436.num_elements = 4;
++c_7318436.elements = (object *)e_7318450;
++c_7318436.elements[0] = i_91at_73724_732942;
++c_7318436.elements[1] = i_91from_73725_732943;
++c_7318436.elements[2] = k_735143;
++c_7318436.elements[3] = ((closureN)self_7312271)->elements[2];
  
  
  
  
 -object c_7319753 = Cyc_vector_set_cps(data,(closure)&c_7319736,((closureN)self_7313524)->elements[3], i_91at_73724_733289, Cyc_vector_ref(data, ((closureN)self_7313524)->elements[1], i_91from_73725_733290));
 -return_closcall1(data,(closure)&c_7319736,  c_7319753);}
-+object c_7318460 = Cyc_vector_set_cps(data,(closure)&c_7318443,((closureN)self_7312278)->elements[3], i_91at_73724_732949, Cyc_vector_ref(data, ((closureN)self_7312278)->elements[1], i_91from_73725_732950));
-+return_closcall1(data,(closure)&c_7318443,  c_7318460);}
++object c_7318453 = Cyc_vector_set_cps(data,(closure)&c_7318436,((closureN)self_7312271)->elements[3], i_91at_73724_732942, Cyc_vector_ref(data, ((closureN)self_7312271)->elements[1], i_91from_73725_732943));
++return_closcall1(data,(closure)&c_7318436,  c_7318453);}
  ;; 
  }
  
 -static void __lambda_598(void *data, object self_7313525, int argc, object *args) /* object self_7313525, object r_735597 */
-+static void __lambda_598(void *data, object self_7312279, int argc, object *args) /* object self_7312279, object r_735152 */
++static void __lambda_598(void *data, object self_7312272, int argc, object *args) /* object self_7312272, object r_735145 */
   {
  
    
  
  
 -complex_num_type local_7319744; 
-+complex_num_type local_7318451; 
++complex_num_type local_7318444; 
  
 -complex_num_type local_7319748; 
 -return_closcall3(data,  car(((closureN)self_7313525)->elements[3]),  ((closureN)self_7313525)->elements[2], Cyc_fast_sum(data,&local_7319744, ((closureN)self_7313525)->elements[0], obj_int2obj(1)), Cyc_fast_sum(data,&local_7319748, ((closureN)self_7313525)->elements[1], obj_int2obj(1)));; 
-+complex_num_type local_7318455; 
-+return_closcall3(data,  car(((closureN)self_7312279)->elements[3]),  ((closureN)self_7312279)->elements[2], Cyc_fast_sum(data,&local_7318451, ((closureN)self_7312279)->elements[0], obj_int2obj(1)), Cyc_fast_sum(data,&local_7318455, ((closureN)self_7312279)->elements[1], obj_int2obj(1)));; 
++complex_num_type local_7318448; 
++return_closcall3(data,  car(((closureN)self_7312272)->elements[3]),  ((closureN)self_7312272)->elements[2], Cyc_fast_sum(data,&local_7318444, ((closureN)self_7312272)->elements[0], obj_int2obj(1)), Cyc_fast_sum(data,&local_7318448, ((closureN)self_7312272)->elements[1], obj_int2obj(1)));; 
  }
  
 -static void __lambda_595(void *data, object self_7313526, int argc, object *args) /* object self_7313526, object r_735594 */
-+static void __lambda_595(void *data, object self_7312280, int argc, object *args) /* object self_7312280, object r_735149 */
++static void __lambda_595(void *data, object self_7312273, int argc, object *args) /* object self_7312273, object r_735142 */
   {
 - object r_735594 = args[0];
-+ object r_735149 = args[0];
++ object r_735142 = args[0];
    
 -closureN_type c_7319712;
 -object e_7319722 [4];
@@ -42925,28 +43184,28 @@ Make let-values be the same as let*-values, to work around
 -c_7319712.elements[1] = ((closureN)self_7313526)->elements[1];
 -c_7319712.elements[2] = ((closureN)self_7313526)->elements[2];
 -c_7319712.elements[3] = ((closureN)self_7313526)->elements[3];
-+closureN_type c_7318419;
-+object e_7318429 [4];
-+c_7318419.hdr.mark = gc_color_red;
-+ c_7318419.hdr.grayed = 0;
-+c_7318419.tag = closureN_tag;
-+ c_7318419.fn = (function_type)__lambda_596;
-+c_7318419.num_args = 1;
-+c_7318419.num_elements = 4;
-+c_7318419.elements = (object *)e_7318429;
-+c_7318419.elements[0] = ((closureN)self_7312280)->elements[0];
-+c_7318419.elements[1] = ((closureN)self_7312280)->elements[1];
-+c_7318419.elements[2] = ((closureN)self_7312280)->elements[2];
-+c_7318419.elements[3] = ((closureN)self_7312280)->elements[3];
++closureN_type c_7318412;
++object e_7318422 [4];
++c_7318412.hdr.mark = gc_color_red;
++ c_7318412.hdr.grayed = 0;
++c_7318412.tag = closureN_tag;
++ c_7318412.fn = (function_type)__lambda_596;
++c_7318412.num_args = 1;
++c_7318412.num_elements = 4;
++c_7318412.elements = (object *)e_7318422;
++c_7318412.elements[0] = ((closureN)self_7312273)->elements[0];
++c_7318412.elements[1] = ((closureN)self_7312273)->elements[1];
++c_7318412.elements[2] = ((closureN)self_7312273)->elements[2];
++c_7318412.elements[3] = ((closureN)self_7312273)->elements[3];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7319712,__lambda_596,  Cyc_set_cell(data, ((closureN)self_7313526)->elements[2], r_735594));; 
-+return_direct_with_clo1(data,(closure)&c_7318419,__lambda_596,  Cyc_set_cell(data, ((closureN)self_7312280)->elements[2], r_735149));; 
++return_direct_with_clo1(data,(closure)&c_7318412,__lambda_596,  Cyc_set_cell(data, ((closureN)self_7312273)->elements[2], r_735142));; 
  }
  
 -static void __lambda_596(void *data, object self_7313527, int argc, object *args) /* object self_7313527, object r_735593 */
-+static void __lambda_596(void *data, object self_7312281, int argc, object *args) /* object self_7312281, object r_735148 */
++static void __lambda_596(void *data, object self_7312274, int argc, object *args) /* object self_7312274, object r_735141 */
   {
  
    
@@ -42954,39 +43213,38 @@ Make let-values be the same as let*-values, to work around
  
  
 -return_closcall3(data,  car(((closureN)self_7313527)->elements[2]),  ((closureN)self_7313527)->elements[1], ((closureN)self_7313527)->elements[0], car(((closureN)self_7313527)->elements[3]));; 
-+return_closcall3(data,  car(((closureN)self_7312281)->elements[2]),  ((closureN)self_7312281)->elements[1], ((closureN)self_7312281)->elements[0], car(((closureN)self_7312281)->elements[3]));; 
++return_closcall3(data,  car(((closureN)self_7312274)->elements[2]),  ((closureN)self_7312274)->elements[1], ((closureN)self_7312274)->elements[0], car(((closureN)self_7312274)->elements[3]));; 
  }
  
 -static void __lambda_592(void *data, object self_7313528, int argc, object *args) /* object self_7313528, object k_735602 */
-+static void __lambda_592(void *data, object self_7312282, int argc, object *args) /* object self_7312282, object k_735157 */
++static void __lambda_592(void *data, object self_7312275, int argc, object *args) /* object self_7312275, object k_735150 */
   {
 - object k_735602 = args[0];
-+ object k_735157 = args[0];
++ object k_735150 = args[0];
      
    
 -if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313528)->elements[1]), obj_int2obj(1))) ){ 
-+if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312282)->elements[1]), obj_int2obj(1))) ){ 
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312275)->elements[1]), obj_int2obj(1))) ){ 
    
  
 -return_direct_with_clo1(data,  k_735602,__lambda_593,  Cyc_cadr(data, ((closureN)self_7313528)->elements[1]));
-+return_direct_with_clo1(data,  k_735157,__lambda_593,  Cyc_cadr(data, ((closureN)self_7312282)->elements[1]));
++return_direct_with_clo1(data,  k_735150,__lambda_593,  Cyc_cadr(data, ((closureN)self_7312275)->elements[1]));
  } else { 
    
  
 -return_direct_with_clo1(data,  k_735602,__lambda_593,  car(((closureN)self_7313528)->elements[0]));}
-+return_direct_with_clo1(data,  k_735157,__lambda_593,  car(((closureN)self_7312282)->elements[0]));}
++return_direct_with_clo1(data,  k_735150,__lambda_593,  car(((closureN)self_7312275)->elements[0]));}
  ;; 
  }
  
 -static void __lambda_575(void *data, object _, int argc, object *args) /* closure _,object k_735564, object vec_73704_733273, object opts_73705_733274_raw, ... */
-+static void __lambda_575(void *data, object _, int argc, object *args) /* closure _,object k_735119, object vec_73704_732933, object opts_73705_732934_raw, ... */
++static void __lambda_575(void *data, object _, int argc, object *args) /* closure _,object k_735112, object vec_73704_732926, object opts_73705_732927_raw, ... */
   {
 -object k_735564 = args[0]; object vec_73704_733273 = args[1];
 -load_varargs(opts_73705_733274, args, 2, argc - 2);
--  Cyc_st_add(data, "scheme/base.sld:vector-copy");
-+object k_735119 = args[0]; object vec_73704_732933 = args[1];
-+load_varargs(opts_73705_732934, args, 2, argc - 2);
-+  Cyc_st_add(data, "base.sld:vector-copy");
++object k_735112 = args[0]; object vec_73704_732926 = args[1];
++load_varargs(opts_73705_732927, args, 2, argc - 2);
+   Cyc_st_add(data, "scheme/base.sld:vector-copy");
  
 -closureN_type c_7319517;
 -object e_7319663 [3];
@@ -43000,28 +43258,28 @@ Make let-values be the same as let*-values, to work around
 -c_7319517.elements[0] = k_735564;
 -c_7319517.elements[1] = opts_73705_733274;
 -c_7319517.elements[2] = vec_73704_733273;
-+closureN_type c_7318224;
-+object e_7318370 [3];
-+c_7318224.hdr.mark = gc_color_red;
-+ c_7318224.hdr.grayed = 0;
-+c_7318224.tag = closureN_tag;
-+ c_7318224.fn = (function_type)__lambda_576;
-+c_7318224.num_args = 4;
-+c_7318224.num_elements = 3;
-+c_7318224.elements = (object *)e_7318370;
-+c_7318224.elements[0] = k_735119;
-+c_7318224.elements[1] = opts_73705_732934;
-+c_7318224.elements[2] = vec_73704_732933;
++closureN_type c_7318217;
++object e_7318363 [3];
++c_7318217.hdr.mark = gc_color_red;
++ c_7318217.hdr.grayed = 0;
++c_7318217.tag = closureN_tag;
++ c_7318217.fn = (function_type)__lambda_576;
++c_7318217.num_args = 4;
++c_7318217.num_elements = 3;
++c_7318217.elements = (object *)e_7318363;
++c_7318217.elements[0] = k_735112;
++c_7318217.elements[1] = opts_73705_732927;
++c_7318217.elements[2] = vec_73704_732926;
  
 -return_direct_with_clo4(data,(closure)&c_7319517,__lambda_576,  boolean_f, boolean_f, boolean_f, boolean_f);; 
-+return_direct_with_clo4(data,(closure)&c_7318224,__lambda_576,  boolean_f, boolean_f, boolean_f, boolean_f);; 
++return_direct_with_clo4(data,(closure)&c_7318217,__lambda_576,  boolean_f, boolean_f, boolean_f, boolean_f);; 
  }
  
 -static void __lambda_576(void *data, object self_7313499, int argc, object *args) /* object self_7313499, object len_73706_733275, object start_73707_733276, object end_73708_733277, object loop_73709_733278 */
-+static void __lambda_576(void *data, object self_7312253, int argc, object *args) /* object self_7312253, object len_73706_732935, object start_73707_732936, object end_73708_732937, object loop_73709_732938 */
++static void __lambda_576(void *data, object self_7312246, int argc, object *args) /* object self_7312246, object len_73706_732928, object start_73707_732929, object end_73708_732930, object loop_73709_732931 */
   {
 - object len_73706_733275 = args[0]; object start_73707_733276 = args[1]; object end_73708_733277 = args[2]; object loop_73709_733278 = args[3];
-+ object len_73706_732935 = args[0]; object start_73707_732936 = args[1]; object end_73708_732937 = args[2]; object loop_73709_732938 = args[3];
++ object len_73706_732928 = args[0]; object start_73707_732929 = args[1]; object end_73708_732930 = args[2]; object loop_73709_732931 = args[3];
    
 -closureN_type c_7319519;
 -object e_7319659 [6];
@@ -43038,34 +43296,34 @@ Make let-values be the same as let*-values, to work around
 -c_7319519.elements[3] = ((closureN)self_7313499)->elements[1];
 -c_7319519.elements[4] = start_73707_733276;
 -c_7319519.elements[5] = ((closureN)self_7313499)->elements[2];
-+closureN_type c_7318226;
-+object e_7318366 [6];
-+c_7318226.hdr.mark = gc_color_red;
-+ c_7318226.hdr.grayed = 0;
-+c_7318226.tag = closureN_tag;
-+ c_7318226.fn = (function_type)__lambda_1346;
-+c_7318226.num_args = 1;
-+c_7318226.num_elements = 6;
-+c_7318226.elements = (object *)e_7318366;
-+c_7318226.elements[0] = end_73708_732937;
-+c_7318226.elements[1] = ((closureN)self_7312253)->elements[0];
-+c_7318226.elements[2] = loop_73709_732938;
-+c_7318226.elements[3] = ((closureN)self_7312253)->elements[1];
-+c_7318226.elements[4] = start_73707_732936;
-+c_7318226.elements[5] = ((closureN)self_7312253)->elements[2];
++closureN_type c_7318219;
++object e_7318359 [6];
++c_7318219.hdr.mark = gc_color_red;
++ c_7318219.hdr.grayed = 0;
++c_7318219.tag = closureN_tag;
++ c_7318219.fn = (function_type)__lambda_1346;
++c_7318219.num_args = 1;
++c_7318219.num_elements = 6;
++c_7318219.elements = (object *)e_7318359;
++c_7318219.elements[0] = end_73708_732930;
++c_7318219.elements[1] = ((closureN)self_7312246)->elements[0];
++c_7318219.elements[2] = loop_73709_732931;
++c_7318219.elements[3] = ((closureN)self_7312246)->elements[1];
++c_7318219.elements[4] = start_73707_732929;
++c_7318219.elements[5] = ((closureN)self_7312246)->elements[2];
  
  
 -pair_type local_7319662; 
 -return_direct_with_clo1(data,(closure)&c_7319519,__lambda_1393,  set_cell_as_expr(&local_7319662, len_73706_733275));; 
-+pair_type local_7318369; 
-+return_direct_with_clo1(data,(closure)&c_7318226,__lambda_1346,  set_cell_as_expr(&local_7318369, len_73706_732935));; 
++pair_type local_7318362; 
++return_direct_with_clo1(data,(closure)&c_7318219,__lambda_1346,  set_cell_as_expr(&local_7318362, len_73706_732928));; 
  }
  
 -static void __lambda_1393(void *data, object self_7313500, int argc, object *args) /* object self_7313500, object len_73706_733275 */
-+static void __lambda_1346(void *data, object self_7312254, int argc, object *args) /* object self_7312254, object len_73706_732935 */
++static void __lambda_1346(void *data, object self_7312247, int argc, object *args) /* object self_7312247, object len_73706_732928 */
   {
 - object len_73706_733275 = args[0];
-+ object len_73706_732935 = args[0];
++ object len_73706_732928 = args[0];
    
 -closureN_type c_7319521;
 -object e_7319654 [6];
@@ -43082,34 +43340,34 @@ Make let-values be the same as let*-values, to work around
 -c_7319521.elements[3] = ((closureN)self_7313500)->elements[2];
 -c_7319521.elements[4] = ((closureN)self_7313500)->elements[3];
 -c_7319521.elements[5] = ((closureN)self_7313500)->elements[5];
-+closureN_type c_7318228;
-+object e_7318361 [6];
-+c_7318228.hdr.mark = gc_color_red;
-+ c_7318228.hdr.grayed = 0;
-+c_7318228.tag = closureN_tag;
-+ c_7318228.fn = (function_type)__lambda_1345;
-+c_7318228.num_args = 1;
-+c_7318228.num_elements = 6;
-+c_7318228.elements = (object *)e_7318361;
-+c_7318228.elements[0] = ((closureN)self_7312254)->elements[0];
-+c_7318228.elements[1] = ((closureN)self_7312254)->elements[1];
-+c_7318228.elements[2] = len_73706_732935;
-+c_7318228.elements[3] = ((closureN)self_7312254)->elements[2];
-+c_7318228.elements[4] = ((closureN)self_7312254)->elements[3];
-+c_7318228.elements[5] = ((closureN)self_7312254)->elements[5];
++closureN_type c_7318221;
++object e_7318354 [6];
++c_7318221.hdr.mark = gc_color_red;
++ c_7318221.hdr.grayed = 0;
++c_7318221.tag = closureN_tag;
++ c_7318221.fn = (function_type)__lambda_1345;
++c_7318221.num_args = 1;
++c_7318221.num_elements = 6;
++c_7318221.elements = (object *)e_7318354;
++c_7318221.elements[0] = ((closureN)self_7312247)->elements[0];
++c_7318221.elements[1] = ((closureN)self_7312247)->elements[1];
++c_7318221.elements[2] = len_73706_732928;
++c_7318221.elements[3] = ((closureN)self_7312247)->elements[2];
++c_7318221.elements[4] = ((closureN)self_7312247)->elements[3];
++c_7318221.elements[5] = ((closureN)self_7312247)->elements[5];
  
  
 -pair_type local_7319657; 
 -return_direct_with_clo1(data,(closure)&c_7319521,__lambda_1392,  set_cell_as_expr(&local_7319657, ((closureN)self_7313500)->elements[4]));; 
-+pair_type local_7318364; 
-+return_direct_with_clo1(data,(closure)&c_7318228,__lambda_1345,  set_cell_as_expr(&local_7318364, ((closureN)self_7312254)->elements[4]));; 
++pair_type local_7318357; 
++return_direct_with_clo1(data,(closure)&c_7318221,__lambda_1345,  set_cell_as_expr(&local_7318357, ((closureN)self_7312247)->elements[4]));; 
  }
  
 -static void __lambda_1392(void *data, object self_7313501, int argc, object *args) /* object self_7313501, object start_73707_733276 */
-+static void __lambda_1345(void *data, object self_7312255, int argc, object *args) /* object self_7312255, object start_73707_732936 */
++static void __lambda_1345(void *data, object self_7312248, int argc, object *args) /* object self_7312248, object start_73707_732929 */
   {
 - object start_73707_733276 = args[0];
-+ object start_73707_732936 = args[0];
++ object start_73707_732929 = args[0];
    
 -closureN_type c_7319523;
 -object e_7319649 [6];
@@ -43126,34 +43384,34 @@ Make let-values be the same as let*-values, to work around
 -c_7319523.elements[3] = ((closureN)self_7313501)->elements[4];
 -c_7319523.elements[4] = start_73707_733276;
 -c_7319523.elements[5] = ((closureN)self_7313501)->elements[5];
-+closureN_type c_7318230;
-+object e_7318356 [6];
-+c_7318230.hdr.mark = gc_color_red;
-+ c_7318230.hdr.grayed = 0;
-+c_7318230.tag = closureN_tag;
-+ c_7318230.fn = (function_type)__lambda_1344;
-+c_7318230.num_args = 1;
-+c_7318230.num_elements = 6;
-+c_7318230.elements = (object *)e_7318356;
-+c_7318230.elements[0] = ((closureN)self_7312255)->elements[1];
-+c_7318230.elements[1] = ((closureN)self_7312255)->elements[2];
-+c_7318230.elements[2] = ((closureN)self_7312255)->elements[3];
-+c_7318230.elements[3] = ((closureN)self_7312255)->elements[4];
-+c_7318230.elements[4] = start_73707_732936;
-+c_7318230.elements[5] = ((closureN)self_7312255)->elements[5];
++closureN_type c_7318223;
++object e_7318349 [6];
++c_7318223.hdr.mark = gc_color_red;
++ c_7318223.hdr.grayed = 0;
++c_7318223.tag = closureN_tag;
++ c_7318223.fn = (function_type)__lambda_1344;
++c_7318223.num_args = 1;
++c_7318223.num_elements = 6;
++c_7318223.elements = (object *)e_7318349;
++c_7318223.elements[0] = ((closureN)self_7312248)->elements[1];
++c_7318223.elements[1] = ((closureN)self_7312248)->elements[2];
++c_7318223.elements[2] = ((closureN)self_7312248)->elements[3];
++c_7318223.elements[3] = ((closureN)self_7312248)->elements[4];
++c_7318223.elements[4] = start_73707_732929;
++c_7318223.elements[5] = ((closureN)self_7312248)->elements[5];
  
  
 -pair_type local_7319652; 
 -return_direct_with_clo1(data,(closure)&c_7319523,__lambda_1391,  set_cell_as_expr(&local_7319652, ((closureN)self_7313501)->elements[0]));; 
-+pair_type local_7318359; 
-+return_direct_with_clo1(data,(closure)&c_7318230,__lambda_1344,  set_cell_as_expr(&local_7318359, ((closureN)self_7312255)->elements[0]));; 
++pair_type local_7318352; 
++return_direct_with_clo1(data,(closure)&c_7318223,__lambda_1344,  set_cell_as_expr(&local_7318352, ((closureN)self_7312248)->elements[0]));; 
  }
  
 -static void __lambda_1391(void *data, object self_7313502, int argc, object *args) /* object self_7313502, object end_73708_733277 */
-+static void __lambda_1344(void *data, object self_7312256, int argc, object *args) /* object self_7312256, object end_73708_732937 */
++static void __lambda_1344(void *data, object self_7312249, int argc, object *args) /* object self_7312249, object end_73708_732930 */
   {
 - object end_73708_733277 = args[0];
-+ object end_73708_732937 = args[0];
++ object end_73708_732930 = args[0];
    
 -closureN_type c_7319525;
 -object e_7319644 [6];
@@ -43170,34 +43428,34 @@ Make let-values be the same as let*-values, to work around
 -c_7319525.elements[3] = ((closureN)self_7313502)->elements[3];
 -c_7319525.elements[4] = ((closureN)self_7313502)->elements[4];
 -c_7319525.elements[5] = ((closureN)self_7313502)->elements[5];
-+closureN_type c_7318232;
-+object e_7318351 [6];
-+c_7318232.hdr.mark = gc_color_red;
-+ c_7318232.hdr.grayed = 0;
-+c_7318232.tag = closureN_tag;
-+ c_7318232.fn = (function_type)__lambda_1343;
-+c_7318232.num_args = 1;
-+c_7318232.num_elements = 6;
-+c_7318232.elements = (object *)e_7318351;
-+c_7318232.elements[0] = end_73708_732937;
-+c_7318232.elements[1] = ((closureN)self_7312256)->elements[0];
-+c_7318232.elements[2] = ((closureN)self_7312256)->elements[1];
-+c_7318232.elements[3] = ((closureN)self_7312256)->elements[3];
-+c_7318232.elements[4] = ((closureN)self_7312256)->elements[4];
-+c_7318232.elements[5] = ((closureN)self_7312256)->elements[5];
++closureN_type c_7318225;
++object e_7318344 [6];
++c_7318225.hdr.mark = gc_color_red;
++ c_7318225.hdr.grayed = 0;
++c_7318225.tag = closureN_tag;
++ c_7318225.fn = (function_type)__lambda_1343;
++c_7318225.num_args = 1;
++c_7318225.num_elements = 6;
++c_7318225.elements = (object *)e_7318344;
++c_7318225.elements[0] = end_73708_732930;
++c_7318225.elements[1] = ((closureN)self_7312249)->elements[0];
++c_7318225.elements[2] = ((closureN)self_7312249)->elements[1];
++c_7318225.elements[3] = ((closureN)self_7312249)->elements[3];
++c_7318225.elements[4] = ((closureN)self_7312249)->elements[4];
++c_7318225.elements[5] = ((closureN)self_7312249)->elements[5];
  
  
 -pair_type local_7319647; 
 -return_direct_with_clo1(data,(closure)&c_7319525,__lambda_1390,  set_cell_as_expr(&local_7319647, ((closureN)self_7313502)->elements[2]));; 
-+pair_type local_7318354; 
-+return_direct_with_clo1(data,(closure)&c_7318232,__lambda_1343,  set_cell_as_expr(&local_7318354, ((closureN)self_7312256)->elements[2]));; 
++pair_type local_7318347; 
++return_direct_with_clo1(data,(closure)&c_7318225,__lambda_1343,  set_cell_as_expr(&local_7318347, ((closureN)self_7312249)->elements[2]));; 
  }
  
 -static void __lambda_1390(void *data, object self_7313503, int argc, object *args) /* object self_7313503, object loop_73709_733278 */
-+static void __lambda_1343(void *data, object self_7312257, int argc, object *args) /* object self_7312257, object loop_73709_732938 */
++static void __lambda_1343(void *data, object self_7312250, int argc, object *args) /* object self_7312250, object loop_73709_732931 */
   {
 - object loop_73709_733278 = args[0];
-+ object loop_73709_732938 = args[0];
++ object loop_73709_732931 = args[0];
    
 -closureN_type c_7319527;
 -object e_7319637 [7];
@@ -43215,47 +43473,47 @@ Make let-values be the same as let*-values, to work around
 -c_7319527.elements[4] = ((closureN)self_7313503)->elements[3];
 -c_7319527.elements[5] = ((closureN)self_7313503)->elements[4];
 -c_7319527.elements[6] = ((closureN)self_7313503)->elements[5];
-+closureN_type c_7318234;
-+object e_7318344 [7];
-+c_7318234.hdr.mark = gc_color_red;
-+ c_7318234.hdr.grayed = 0;
-+c_7318234.tag = closureN_tag;
-+ c_7318234.fn = (function_type)__lambda_577;
-+c_7318234.num_args = 1;
-+c_7318234.num_elements = 7;
-+c_7318234.elements = (object *)e_7318344;
-+c_7318234.elements[0] = ((closureN)self_7312257)->elements[0];
-+c_7318234.elements[1] = ((closureN)self_7312257)->elements[1];
-+c_7318234.elements[2] = ((closureN)self_7312257)->elements[2];
-+c_7318234.elements[3] = loop_73709_732938;
-+c_7318234.elements[4] = ((closureN)self_7312257)->elements[3];
-+c_7318234.elements[5] = ((closureN)self_7312257)->elements[4];
-+c_7318234.elements[6] = ((closureN)self_7312257)->elements[5];
++closureN_type c_7318227;
++object e_7318337 [7];
++c_7318227.hdr.mark = gc_color_red;
++ c_7318227.hdr.grayed = 0;
++c_7318227.tag = closureN_tag;
++ c_7318227.fn = (function_type)__lambda_577;
++c_7318227.num_args = 1;
++c_7318227.num_elements = 7;
++c_7318227.elements = (object *)e_7318337;
++c_7318227.elements[0] = ((closureN)self_7312250)->elements[0];
++c_7318227.elements[1] = ((closureN)self_7312250)->elements[1];
++c_7318227.elements[2] = ((closureN)self_7312250)->elements[2];
++c_7318227.elements[3] = loop_73709_732931;
++c_7318227.elements[4] = ((closureN)self_7312250)->elements[3];
++c_7318227.elements[5] = ((closureN)self_7312250)->elements[4];
++c_7318227.elements[6] = ((closureN)self_7312250)->elements[5];
  
  
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7319527,__lambda_577,  Cyc_set_cell(data, ((closureN)self_7313503)->elements[2], Cyc_vector_length(data, ((closureN)self_7313503)->elements[5])));; 
-+return_direct_with_clo1(data,(closure)&c_7318234,__lambda_577,  Cyc_set_cell(data, ((closureN)self_7312257)->elements[2], Cyc_vector_length(data, ((closureN)self_7312257)->elements[5])));; 
++return_direct_with_clo1(data,(closure)&c_7318227,__lambda_577,  Cyc_set_cell(data, ((closureN)self_7312250)->elements[2], Cyc_vector_length(data, ((closureN)self_7312250)->elements[5])));; 
  }
  
 -static void __lambda_577(void *data, object self_7313504, int argc, object *args) /* object self_7313504, object r_735565 */
-+static void __lambda_577(void *data, object self_7312258, int argc, object *args) /* object self_7312258, object r_735120 */
++static void __lambda_577(void *data, object self_7312251, int argc, object *args) /* object self_7312251, object r_735113 */
   {
  
 -  object r_735582;
-+  object r_735137;
++  object r_735130;
      
    
 -if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313504)->elements[4]), obj_int2obj(0))) ){ 
-+if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312258)->elements[4]), obj_int2obj(0))) ){ 
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312251)->elements[4]), obj_int2obj(0))) ){ 
    
 -  r_735582 = Cyc_car(data, ((closureN)self_7313504)->elements[4]);
-+  r_735137 = Cyc_car(data, ((closureN)self_7312258)->elements[4]);
++  r_735130 = Cyc_car(data, ((closureN)self_7312251)->elements[4]);
  } else { 
 -  r_735582 = obj_int2obj(0);}
-+  r_735137 = obj_int2obj(0);}
++  r_735130 = obj_int2obj(0);}
  ;
 -closureN_type c_7319540;
 -object e_7319633 [7];
@@ -43273,31 +43531,31 @@ Make let-values be the same as let*-values, to work around
 -c_7319540.elements[4] = ((closureN)self_7313504)->elements[4];
 -c_7319540.elements[5] = ((closureN)self_7313504)->elements[5];
 -c_7319540.elements[6] = ((closureN)self_7313504)->elements[6];
-+closureN_type c_7318247;
-+object e_7318340 [7];
-+c_7318247.hdr.mark = gc_color_red;
-+ c_7318247.hdr.grayed = 0;
-+c_7318247.tag = closureN_tag;
-+ c_7318247.fn = (function_type)__lambda_578;
-+c_7318247.num_args = 1;
-+c_7318247.num_elements = 7;
-+c_7318247.elements = (object *)e_7318340;
-+c_7318247.elements[0] = ((closureN)self_7312258)->elements[0];
-+c_7318247.elements[1] = ((closureN)self_7312258)->elements[1];
-+c_7318247.elements[2] = ((closureN)self_7312258)->elements[2];
-+c_7318247.elements[3] = ((closureN)self_7312258)->elements[3];
-+c_7318247.elements[4] = ((closureN)self_7312258)->elements[4];
-+c_7318247.elements[5] = ((closureN)self_7312258)->elements[5];
-+c_7318247.elements[6] = ((closureN)self_7312258)->elements[6];
++closureN_type c_7318240;
++object e_7318333 [7];
++c_7318240.hdr.mark = gc_color_red;
++ c_7318240.hdr.grayed = 0;
++c_7318240.tag = closureN_tag;
++ c_7318240.fn = (function_type)__lambda_578;
++c_7318240.num_args = 1;
++c_7318240.num_elements = 7;
++c_7318240.elements = (object *)e_7318333;
++c_7318240.elements[0] = ((closureN)self_7312251)->elements[0];
++c_7318240.elements[1] = ((closureN)self_7312251)->elements[1];
++c_7318240.elements[2] = ((closureN)self_7312251)->elements[2];
++c_7318240.elements[3] = ((closureN)self_7312251)->elements[3];
++c_7318240.elements[4] = ((closureN)self_7312251)->elements[4];
++c_7318240.elements[5] = ((closureN)self_7312251)->elements[5];
++c_7318240.elements[6] = ((closureN)self_7312251)->elements[6];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7319540,__lambda_578,  Cyc_set_cell(data, ((closureN)self_7313504)->elements[5], r_735582));; 
-+return_direct_with_clo1(data,(closure)&c_7318247,__lambda_578,  Cyc_set_cell(data, ((closureN)self_7312258)->elements[5], r_735137));; 
++return_direct_with_clo1(data,(closure)&c_7318240,__lambda_578,  Cyc_set_cell(data, ((closureN)self_7312251)->elements[5], r_735130));; 
  }
  
 -static void __lambda_578(void *data, object self_7313505, int argc, object *args) /* object self_7313505, object r_735566 */
-+static void __lambda_578(void *data, object self_7312259, int argc, object *args) /* object self_7312259, object r_735121 */
++static void __lambda_578(void *data, object self_7312252, int argc, object *args) /* object self_7312252, object r_735114 */
   {
  
    
@@ -43312,8 +43570,19 @@ Make let-values be the same as let*-values, to work around
 -c_7319542.elements = (object *)e_7319556;
 -c_7319542.elements[0] = ((closureN)self_7313505)->elements[2];
 -c_7319542.elements[1] = ((closureN)self_7313505)->elements[4];
--
--
++closureN_type c_7318242;
++object e_7318256 [2];
++c_7318242.hdr.mark = gc_color_red;
++ c_7318242.hdr.grayed = 0;
++c_7318242.tag = closureN_tag;
++ c_7318242.fn = (function_type)__lambda_579;
++c_7318242.num_args = 0;
++c_7318242.num_elements = 2;
++c_7318242.elements = (object *)e_7318256;
++c_7318242.elements[0] = ((closureN)self_7312252)->elements[2];
++c_7318242.elements[1] = ((closureN)self_7312252)->elements[4];
+ 
+ 
 -closureN_type c_7319557;
 -object e_7319632 [5];
 -c_7319557.hdr.mark = gc_color_red;
@@ -43328,14 +43597,31 @@ Make let-values be the same as let*-values, to work around
 -c_7319557.elements[2] = ((closureN)self_7313505)->elements[3];
 -c_7319557.elements[3] = ((closureN)self_7313505)->elements[5];
 -c_7319557.elements[4] = ((closureN)self_7313505)->elements[6];
--
++closureN_type c_7318257;
++object e_7318332 [5];
++c_7318257.hdr.mark = gc_color_red;
++ c_7318257.hdr.grayed = 0;
++c_7318257.tag = closureN_tag;
++ c_7318257.fn = (function_type)__lambda_580;
++c_7318257.num_args = 1;
++c_7318257.num_elements = 5;
++c_7318257.elements = (object *)e_7318332;
++c_7318257.elements[0] = ((closureN)self_7312252)->elements[0];
++c_7318257.elements[1] = ((closureN)self_7312252)->elements[1];
++c_7318257.elements[2] = ((closureN)self_7312252)->elements[3];
++c_7318257.elements[3] = ((closureN)self_7312252)->elements[5];
++c_7318257.elements[4] = ((closureN)self_7312252)->elements[6];
+ 
 -return_direct_with_clo1(data,(closure)&c_7319542,__lambda_579,  &c_7319557);; 
--}
--
++return_direct_with_clo1(data,(closure)&c_7318242,__lambda_579,  &c_7318257);; 
+ }
+ 
 -static void __lambda_580(void *data, object self_7313506, int argc, object *args) /* object self_7313506, object r_735578 */
-- {
++static void __lambda_580(void *data, object self_7312253, int argc, object *args) /* object self_7312253, object r_735126 */
+  {
 - object r_735578 = args[0];
--  
++ object r_735126 = args[0];
+   
 -closureN_type c_7319559;
 -object e_7319628 [5];
 -c_7319559.hdr.mark = gc_color_red;
@@ -43350,64 +43636,29 @@ Make let-values be the same as let*-values, to work around
 -c_7319559.elements[2] = ((closureN)self_7313506)->elements[2];
 -c_7319559.elements[3] = ((closureN)self_7313506)->elements[3];
 -c_7319559.elements[4] = ((closureN)self_7313506)->elements[4];
-+closureN_type c_7318249;
-+object e_7318263 [2];
-+c_7318249.hdr.mark = gc_color_red;
-+ c_7318249.hdr.grayed = 0;
-+c_7318249.tag = closureN_tag;
-+ c_7318249.fn = (function_type)__lambda_579;
-+c_7318249.num_args = 0;
-+c_7318249.num_elements = 2;
-+c_7318249.elements = (object *)e_7318263;
-+c_7318249.elements[0] = ((closureN)self_7312259)->elements[2];
-+c_7318249.elements[1] = ((closureN)self_7312259)->elements[4];
-+
-+
-+closureN_type c_7318264;
-+object e_7318339 [5];
-+c_7318264.hdr.mark = gc_color_red;
-+ c_7318264.hdr.grayed = 0;
-+c_7318264.tag = closureN_tag;
-+ c_7318264.fn = (function_type)__lambda_580;
-+c_7318264.num_args = 1;
-+c_7318264.num_elements = 5;
-+c_7318264.elements = (object *)e_7318339;
-+c_7318264.elements[0] = ((closureN)self_7312259)->elements[0];
-+c_7318264.elements[1] = ((closureN)self_7312259)->elements[1];
-+c_7318264.elements[2] = ((closureN)self_7312259)->elements[3];
-+c_7318264.elements[3] = ((closureN)self_7312259)->elements[5];
-+c_7318264.elements[4] = ((closureN)self_7312259)->elements[6];
-+
-+return_direct_with_clo1(data,(closure)&c_7318249,__lambda_579,  &c_7318264);; 
-+}
-+
-+static void __lambda_580(void *data, object self_7312260, int argc, object *args) /* object self_7312260, object r_735133 */
-+ {
-+ object r_735133 = args[0];
-+  
-+closureN_type c_7318266;
-+object e_7318335 [5];
-+c_7318266.hdr.mark = gc_color_red;
-+ c_7318266.hdr.grayed = 0;
-+c_7318266.tag = closureN_tag;
-+ c_7318266.fn = (function_type)__lambda_581;
-+c_7318266.num_args = 1;
-+c_7318266.num_elements = 5;
-+c_7318266.elements = (object *)e_7318335;
-+c_7318266.elements[0] = ((closureN)self_7312260)->elements[0];
-+c_7318266.elements[1] = ((closureN)self_7312260)->elements[1];
-+c_7318266.elements[2] = ((closureN)self_7312260)->elements[2];
-+c_7318266.elements[3] = ((closureN)self_7312260)->elements[3];
-+c_7318266.elements[4] = ((closureN)self_7312260)->elements[4];
++closureN_type c_7318259;
++object e_7318328 [5];
++c_7318259.hdr.mark = gc_color_red;
++ c_7318259.hdr.grayed = 0;
++c_7318259.tag = closureN_tag;
++ c_7318259.fn = (function_type)__lambda_581;
++c_7318259.num_args = 1;
++c_7318259.num_elements = 5;
++c_7318259.elements = (object *)e_7318328;
++c_7318259.elements[0] = ((closureN)self_7312253)->elements[0];
++c_7318259.elements[1] = ((closureN)self_7312253)->elements[1];
++c_7318259.elements[2] = ((closureN)self_7312253)->elements[2];
++c_7318259.elements[3] = ((closureN)self_7312253)->elements[3];
++c_7318259.elements[4] = ((closureN)self_7312253)->elements[4];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7319559,__lambda_581,  Cyc_set_cell(data, ((closureN)self_7313506)->elements[0], r_735578));; 
-+return_direct_with_clo1(data,(closure)&c_7318266,__lambda_581,  Cyc_set_cell(data, ((closureN)self_7312260)->elements[0], r_735133));; 
++return_direct_with_clo1(data,(closure)&c_7318259,__lambda_581,  Cyc_set_cell(data, ((closureN)self_7312253)->elements[0], r_735126));; 
  }
  
 -static void __lambda_581(void *data, object self_7313507, int argc, object *args) /* object self_7313507, object r_735567 */
-+static void __lambda_581(void *data, object self_7312261, int argc, object *args) /* object self_7312261, object r_735122 */
++static void __lambda_581(void *data, object self_7312254, int argc, object *args) /* object self_7312254, object r_735115 */
   {
  
    
@@ -43424,19 +43675,19 @@ Make let-values be the same as let*-values, to work around
 -c_7319561.elements[1] = ((closureN)self_7313507)->elements[1];
 -c_7319561.elements[2] = ((closureN)self_7313507)->elements[2];
 -c_7319561.elements[3] = ((closureN)self_7313507)->elements[3];
-+closureN_type c_7318268;
-+object e_7318301 [4];
-+c_7318268.hdr.mark = gc_color_red;
-+ c_7318268.hdr.grayed = 0;
-+c_7318268.tag = closureN_tag;
-+ c_7318268.fn = (function_type)__lambda_582;
-+c_7318268.num_args = 1;
-+c_7318268.num_elements = 4;
-+c_7318268.elements = (object *)e_7318301;
-+c_7318268.elements[0] = ((closureN)self_7312261)->elements[0];
-+c_7318268.elements[1] = ((closureN)self_7312261)->elements[1];
-+c_7318268.elements[2] = ((closureN)self_7312261)->elements[2];
-+c_7318268.elements[3] = ((closureN)self_7312261)->elements[3];
++closureN_type c_7318261;
++object e_7318294 [4];
++c_7318261.hdr.mark = gc_color_red;
++ c_7318261.hdr.grayed = 0;
++c_7318261.tag = closureN_tag;
++ c_7318261.fn = (function_type)__lambda_582;
++c_7318261.num_args = 1;
++c_7318261.num_elements = 4;
++c_7318261.elements = (object *)e_7318294;
++c_7318261.elements[0] = ((closureN)self_7312254)->elements[0];
++c_7318261.elements[1] = ((closureN)self_7312254)->elements[1];
++c_7318261.elements[2] = ((closureN)self_7312254)->elements[2];
++c_7318261.elements[3] = ((closureN)self_7312254)->elements[3];
  
  
 -closureN_type c_7319595;
@@ -43452,35 +43703,35 @@ Make let-values be the same as let*-values, to work around
 -c_7319595.elements[1] = ((closureN)self_7313507)->elements[2];
 -c_7319595.elements[2] = ((closureN)self_7313507)->elements[3];
 -c_7319595.elements[3] = ((closureN)self_7313507)->elements[4];
-+closureN_type c_7318302;
-+object e_7318334 [4];
-+c_7318302.hdr.mark = gc_color_red;
-+ c_7318302.hdr.grayed = 0;
-+c_7318302.tag = closureN_tag;
-+ c_7318302.fn = (function_type)__lambda_586;
-+c_7318302.num_args = 2;
-+c_7318302.num_elements = 4;
-+c_7318302.elements = (object *)e_7318334;
-+c_7318302.elements[0] = ((closureN)self_7312261)->elements[0];
-+c_7318302.elements[1] = ((closureN)self_7312261)->elements[2];
-+c_7318302.elements[2] = ((closureN)self_7312261)->elements[3];
-+c_7318302.elements[3] = ((closureN)self_7312261)->elements[4];
++closureN_type c_7318295;
++object e_7318327 [4];
++c_7318295.hdr.mark = gc_color_red;
++ c_7318295.hdr.grayed = 0;
++c_7318295.tag = closureN_tag;
++ c_7318295.fn = (function_type)__lambda_586;
++c_7318295.num_args = 2;
++c_7318295.num_elements = 4;
++c_7318295.elements = (object *)e_7318327;
++c_7318295.elements[0] = ((closureN)self_7312254)->elements[0];
++c_7318295.elements[1] = ((closureN)self_7312254)->elements[2];
++c_7318295.elements[2] = ((closureN)self_7312254)->elements[3];
++c_7318295.elements[3] = ((closureN)self_7312254)->elements[4];
  
 -return_direct_with_clo1(data,(closure)&c_7319561,__lambda_582,  &c_7319595);; 
-+return_direct_with_clo1(data,(closure)&c_7318268,__lambda_582,  &c_7318302);; 
++return_direct_with_clo1(data,(closure)&c_7318261,__lambda_582,  &c_7318295);; 
  }
  
 -static void __lambda_586(void *data, object self_7313508, int argc, object *args) /* object self_7313508, object k_735572, object i_73710_733279, object new_91vec_73711_733280 */
-+static void __lambda_586(void *data, object self_7312262, int argc, object *args) /* object self_7312262, object k_735127, object i_73710_732939, object new_91vec_73711_732940 */
++static void __lambda_586(void *data, object self_7312255, int argc, object *args) /* object self_7312255, object k_735120, object i_73710_732932, object new_91vec_73711_732933 */
   {
 - object k_735572 = args[0]; object i_73710_733279 = args[1]; object new_91vec_73711_733280 = args[2];
-+ object k_735127 = args[0]; object i_73710_732939 = args[1]; object new_91vec_73711_732940 = args[2];
++ object k_735120 = args[0]; object i_73710_732932 = args[1]; object new_91vec_73711_732933 = args[2];
      
    
 -if( (boolean_f != Cyc_num_fast_eq_op(data, i_73710_733279, car(((closureN)self_7313508)->elements[0]))) ){ 
 -  return_direct_with_clo1(data,  k_735572, (((closure)  k_735572)->fn),  new_91vec_73711_733280);
-+if( (boolean_f != Cyc_num_fast_eq_op(data, i_73710_732939, car(((closureN)self_7312262)->elements[0]))) ){ 
-+  return_direct_with_clo1(data,  k_735127, (((closure)  k_735127)->fn),  new_91vec_73711_732940);
++if( (boolean_f != Cyc_num_fast_eq_op(data, i_73710_732932, car(((closureN)self_7312255)->elements[0]))) ){ 
++  return_direct_with_clo1(data,  k_735120, (((closure)  k_735120)->fn),  new_91vec_73711_732933);
  } else { 
    
 -closureN_type c_7319603;
@@ -43496,23 +43747,23 @@ Make let-values be the same as let*-values, to work around
 -c_7319603.elements[1] = k_735572;
 -c_7319603.elements[2] = ((closureN)self_7313508)->elements[1];
 -c_7319603.elements[3] = new_91vec_73711_733280;
-+closureN_type c_7318310;
-+object e_7318321 [4];
-+c_7318310.hdr.mark = gc_color_red;
-+ c_7318310.hdr.grayed = 0;
-+c_7318310.tag = closureN_tag;
-+ c_7318310.fn = (function_type)__lambda_587;
-+c_7318310.num_args = 1;
-+c_7318310.num_elements = 4;
-+c_7318310.elements = (object *)e_7318321;
-+c_7318310.elements[0] = i_73710_732939;
-+c_7318310.elements[1] = k_735127;
-+c_7318310.elements[2] = ((closureN)self_7312262)->elements[1];
-+c_7318310.elements[3] = new_91vec_73711_732940;
++closureN_type c_7318303;
++object e_7318314 [4];
++c_7318303.hdr.mark = gc_color_red;
++ c_7318303.hdr.grayed = 0;
++c_7318303.tag = closureN_tag;
++ c_7318303.fn = (function_type)__lambda_587;
++c_7318303.num_args = 1;
++c_7318303.num_elements = 4;
++c_7318303.elements = (object *)e_7318314;
++c_7318303.elements[0] = i_73710_732932;
++c_7318303.elements[1] = k_735120;
++c_7318303.elements[2] = ((closureN)self_7312255)->elements[1];
++c_7318303.elements[3] = new_91vec_73711_732933;
  
  
 -complex_num_type local_7319620; 
-+complex_num_type local_7318327; 
++complex_num_type local_7318320; 
  
  
  
@@ -43520,13 +43771,13 @@ Make let-values be the same as let*-values, to work around
  
 -object c_7319617 = Cyc_vector_set_cps(data,(closure)&c_7319603,new_91vec_73711_733280, Cyc_fast_sub(data,&local_7319620, i_73710_733279, car(((closureN)self_7313508)->elements[2])), Cyc_vector_ref(data, ((closureN)self_7313508)->elements[3], i_73710_733279));
 -return_closcall1(data,(closure)&c_7319603,  c_7319617);}
-+object c_7318324 = Cyc_vector_set_cps(data,(closure)&c_7318310,new_91vec_73711_732940, Cyc_fast_sub(data,&local_7318327, i_73710_732939, car(((closureN)self_7312262)->elements[2])), Cyc_vector_ref(data, ((closureN)self_7312262)->elements[3], i_73710_732939));
-+return_closcall1(data,(closure)&c_7318310,  c_7318324);}
++object c_7318317 = Cyc_vector_set_cps(data,(closure)&c_7318303,new_91vec_73711_732933, Cyc_fast_sub(data,&local_7318320, i_73710_732932, car(((closureN)self_7312255)->elements[2])), Cyc_vector_ref(data, ((closureN)self_7312255)->elements[3], i_73710_732932));
++return_closcall1(data,(closure)&c_7318303,  c_7318317);}
  ;; 
  }
  
 -static void __lambda_587(void *data, object self_7313509, int argc, object *args) /* object self_7313509, object r_735574 */
-+static void __lambda_587(void *data, object self_7312263, int argc, object *args) /* object self_7312263, object r_735129 */
++static void __lambda_587(void *data, object self_7312256, int argc, object *args) /* object self_7312256, object r_735122 */
   {
  
    
@@ -43534,15 +43785,15 @@ Make let-values be the same as let*-values, to work around
  
 -complex_num_type local_7319611; 
 -return_closcall3(data,  car(((closureN)self_7313509)->elements[2]),  ((closureN)self_7313509)->elements[1], Cyc_fast_sum(data,&local_7319611, ((closureN)self_7313509)->elements[0], obj_int2obj(1)), ((closureN)self_7313509)->elements[3]);; 
-+complex_num_type local_7318318; 
-+return_closcall3(data,  car(((closureN)self_7312263)->elements[2]),  ((closureN)self_7312263)->elements[1], Cyc_fast_sum(data,&local_7318318, ((closureN)self_7312263)->elements[0], obj_int2obj(1)), ((closureN)self_7312263)->elements[3]);; 
++complex_num_type local_7318311; 
++return_closcall3(data,  car(((closureN)self_7312256)->elements[2]),  ((closureN)self_7312256)->elements[1], Cyc_fast_sum(data,&local_7318311, ((closureN)self_7312256)->elements[0], obj_int2obj(1)), ((closureN)self_7312256)->elements[3]);; 
  }
  
 -static void __lambda_582(void *data, object self_7313510, int argc, object *args) /* object self_7313510, object r_735571 */
-+static void __lambda_582(void *data, object self_7312264, int argc, object *args) /* object self_7312264, object r_735126 */
++static void __lambda_582(void *data, object self_7312257, int argc, object *args) /* object self_7312257, object r_735119 */
   {
 - object r_735571 = args[0];
-+ object r_735126 = args[0];
++ object r_735119 = args[0];
    
 -closureN_type c_7319563;
 -object e_7319590 [4];
@@ -43557,28 +43808,28 @@ Make let-values be the same as let*-values, to work around
 -c_7319563.elements[1] = ((closureN)self_7313510)->elements[1];
 -c_7319563.elements[2] = ((closureN)self_7313510)->elements[2];
 -c_7319563.elements[3] = ((closureN)self_7313510)->elements[3];
-+closureN_type c_7318270;
-+object e_7318297 [4];
-+c_7318270.hdr.mark = gc_color_red;
-+ c_7318270.hdr.grayed = 0;
-+c_7318270.tag = closureN_tag;
-+ c_7318270.fn = (function_type)__lambda_583;
-+c_7318270.num_args = 1;
-+c_7318270.num_elements = 4;
-+c_7318270.elements = (object *)e_7318297;
-+c_7318270.elements[0] = ((closureN)self_7312264)->elements[0];
-+c_7318270.elements[1] = ((closureN)self_7312264)->elements[1];
-+c_7318270.elements[2] = ((closureN)self_7312264)->elements[2];
-+c_7318270.elements[3] = ((closureN)self_7312264)->elements[3];
++closureN_type c_7318263;
++object e_7318290 [4];
++c_7318263.hdr.mark = gc_color_red;
++ c_7318263.hdr.grayed = 0;
++c_7318263.tag = closureN_tag;
++ c_7318263.fn = (function_type)__lambda_583;
++c_7318263.num_args = 1;
++c_7318263.num_elements = 4;
++c_7318263.elements = (object *)e_7318290;
++c_7318263.elements[0] = ((closureN)self_7312257)->elements[0];
++c_7318263.elements[1] = ((closureN)self_7312257)->elements[1];
++c_7318263.elements[2] = ((closureN)self_7312257)->elements[2];
++c_7318263.elements[3] = ((closureN)self_7312257)->elements[3];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7319563,__lambda_583,  Cyc_set_cell(data, ((closureN)self_7313510)->elements[2], r_735571));; 
-+return_direct_with_clo1(data,(closure)&c_7318270,__lambda_583,  Cyc_set_cell(data, ((closureN)self_7312264)->elements[2], r_735126));; 
++return_direct_with_clo1(data,(closure)&c_7318263,__lambda_583,  Cyc_set_cell(data, ((closureN)self_7312257)->elements[2], r_735119));; 
  }
  
 -static void __lambda_583(void *data, object self_7313511, int argc, object *args) /* object self_7313511, object r_735568 */
-+static void __lambda_583(void *data, object self_7312265, int argc, object *args) /* object self_7312265, object r_735123 */
++static void __lambda_583(void *data, object self_7312258, int argc, object *args) /* object self_7312258, object r_735116 */
   {
  
    
@@ -43594,35 +43845,35 @@ Make let-values be the same as let*-values, to work around
 -c_7319565.elements[0] = ((closureN)self_7313511)->elements[1];
 -c_7319565.elements[1] = ((closureN)self_7313511)->elements[2];
 -c_7319565.elements[2] = ((closureN)self_7313511)->elements[3];
-+closureN_type c_7318272;
-+object e_7318287 [3];
-+c_7318272.hdr.mark = gc_color_red;
-+ c_7318272.hdr.grayed = 0;
-+c_7318272.tag = closureN_tag;
-+ c_7318272.fn = (function_type)__lambda_584;
-+c_7318272.num_args = 1;
-+c_7318272.num_elements = 3;
-+c_7318272.elements = (object *)e_7318287;
-+c_7318272.elements[0] = ((closureN)self_7312265)->elements[1];
-+c_7318272.elements[1] = ((closureN)self_7312265)->elements[2];
-+c_7318272.elements[2] = ((closureN)self_7312265)->elements[3];
++closureN_type c_7318265;
++object e_7318280 [3];
++c_7318265.hdr.mark = gc_color_red;
++ c_7318265.hdr.grayed = 0;
++c_7318265.tag = closureN_tag;
++ c_7318265.fn = (function_type)__lambda_584;
++c_7318265.num_args = 1;
++c_7318265.num_elements = 3;
++c_7318265.elements = (object *)e_7318280;
++c_7318265.elements[0] = ((closureN)self_7312258)->elements[1];
++c_7318265.elements[1] = ((closureN)self_7312258)->elements[2];
++c_7318265.elements[2] = ((closureN)self_7312258)->elements[3];
  
  
 -complex_num_type local_7319583; 
-+complex_num_type local_7318290; 
++complex_num_type local_7318283; 
  
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7319565,__lambda_584,  Cyc_fast_sub(data,&local_7319583, car(((closureN)self_7313511)->elements[0]), car(((closureN)self_7313511)->elements[3])));; 
-+return_direct_with_clo1(data,(closure)&c_7318272,__lambda_584,  Cyc_fast_sub(data,&local_7318290, car(((closureN)self_7312265)->elements[0]), car(((closureN)self_7312265)->elements[3])));; 
++return_direct_with_clo1(data,(closure)&c_7318265,__lambda_584,  Cyc_fast_sub(data,&local_7318283, car(((closureN)self_7312258)->elements[0]), car(((closureN)self_7312258)->elements[3])));; 
  }
  
 -static void __lambda_584(void *data, object self_7313512, int argc, object *args) /* object self_7313512, object r_735570 */
-+static void __lambda_584(void *data, object self_7312266, int argc, object *args) /* object self_7312266, object r_735125 */
++static void __lambda_584(void *data, object self_7312259, int argc, object *args) /* object self_7312259, object r_735118 */
   {
 - object r_735570 = args[0];
-+ object r_735125 = args[0];
++ object r_735118 = args[0];
    
 -closureN_type c_7319567;
 -object e_7319576 [3];
@@ -43636,69 +43887,68 @@ Make let-values be the same as let*-values, to work around
 -c_7319567.elements[0] = ((closureN)self_7313512)->elements[0];
 -c_7319567.elements[1] = ((closureN)self_7313512)->elements[1];
 -c_7319567.elements[2] = ((closureN)self_7313512)->elements[2];
-+closureN_type c_7318274;
-+object e_7318283 [3];
-+c_7318274.hdr.mark = gc_color_red;
-+ c_7318274.hdr.grayed = 0;
-+c_7318274.tag = closureN_tag;
-+ c_7318274.fn = (function_type)__lambda_585;
-+c_7318274.num_args = 1;
-+c_7318274.num_elements = 3;
-+c_7318274.elements = (object *)e_7318283;
-+c_7318274.elements[0] = ((closureN)self_7312266)->elements[0];
-+c_7318274.elements[1] = ((closureN)self_7312266)->elements[1];
-+c_7318274.elements[2] = ((closureN)self_7312266)->elements[2];
++closureN_type c_7318267;
++object e_7318276 [3];
++c_7318267.hdr.mark = gc_color_red;
++ c_7318267.hdr.grayed = 0;
++c_7318267.tag = closureN_tag;
++ c_7318267.fn = (function_type)__lambda_585;
++c_7318267.num_args = 1;
++c_7318267.num_elements = 3;
++c_7318267.elements = (object *)e_7318276;
++c_7318267.elements[0] = ((closureN)self_7312259)->elements[0];
++c_7318267.elements[1] = ((closureN)self_7312259)->elements[1];
++c_7318267.elements[2] = ((closureN)self_7312259)->elements[2];
  
  
 -object c_7319579 = Cyc_make_vector(data,(closure)&c_7319567,2,r_735570, boolean_f);
 -return_closcall1(data,(closure)&c_7319567,  c_7319579);; 
-+object c_7318286 = Cyc_make_vector(data,(closure)&c_7318274,2,r_735125, boolean_f);
-+return_closcall1(data,(closure)&c_7318274,  c_7318286);; 
++object c_7318279 = Cyc_make_vector(data,(closure)&c_7318267,2,r_735118, boolean_f);
++return_closcall1(data,(closure)&c_7318267,  c_7318279);; 
  }
  
 -static void __lambda_585(void *data, object self_7313513, int argc, object *args) /* object self_7313513, object r_735569 */
-+static void __lambda_585(void *data, object self_7312267, int argc, object *args) /* object self_7312267, object r_735124 */
++static void __lambda_585(void *data, object self_7312260, int argc, object *args) /* object self_7312260, object r_735117 */
   {
 - object r_735569 = args[0];
-+ object r_735124 = args[0];
++ object r_735117 = args[0];
    
  
  
  
 -return_closcall3(data,  car(((closureN)self_7313513)->elements[1]),  ((closureN)self_7313513)->elements[0], car(((closureN)self_7313513)->elements[2]), r_735569);; 
-+return_closcall3(data,  car(((closureN)self_7312267)->elements[1]),  ((closureN)self_7312267)->elements[0], car(((closureN)self_7312267)->elements[2]), r_735124);; 
++return_closcall3(data,  car(((closureN)self_7312260)->elements[1]),  ((closureN)self_7312260)->elements[0], car(((closureN)self_7312260)->elements[2]), r_735117);; 
  }
  
 -static void __lambda_579(void *data, object self_7313514, int argc, object *args) /* object self_7313514, object k_735579 */
-+static void __lambda_579(void *data, object self_7312268, int argc, object *args) /* object self_7312268, object k_735134 */
++static void __lambda_579(void *data, object self_7312261, int argc, object *args) /* object self_7312261, object k_735127 */
   {
 - object k_735579 = args[0];
-+ object k_735134 = args[0];
++ object k_735127 = args[0];
      
    
 -if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313514)->elements[1]), obj_int2obj(1))) ){ 
-+if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312268)->elements[1]), obj_int2obj(1))) ){ 
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312261)->elements[1]), obj_int2obj(1))) ){ 
    
  
 -return_direct_with_clo1(data,  k_735579,__lambda_580,  Cyc_cadr(data, ((closureN)self_7313514)->elements[1]));
-+return_direct_with_clo1(data,  k_735134,__lambda_580,  Cyc_cadr(data, ((closureN)self_7312268)->elements[1]));
++return_direct_with_clo1(data,  k_735127,__lambda_580,  Cyc_cadr(data, ((closureN)self_7312261)->elements[1]));
  } else { 
    
  
 -return_direct_with_clo1(data,  k_735579,__lambda_580,  car(((closureN)self_7313514)->elements[0]));}
-+return_direct_with_clo1(data,  k_735134,__lambda_580,  car(((closureN)self_7312268)->elements[0]));}
++return_direct_with_clo1(data,  k_735127,__lambda_580,  car(((closureN)self_7312261)->elements[0]));}
  ;; 
  }
  
 -static void __lambda_572(void *data, object _, int argc, object *args) /* closure _,object k_735559, object vecs_73703_733272_raw, ... */
-+static void __lambda_572(void *data, object _, int argc, object *args) /* closure _,object k_735114, object vecs_73703_732932_raw, ... */
++static void __lambda_572(void *data, object _, int argc, object *args) /* closure _,object k_735107, object vecs_73703_732925_raw, ... */
   {
 -object k_735559 = args[0];
 -load_varargs(vecs_73703_733272, args, 1, argc - 1);
--  Cyc_st_add(data, "scheme/base.sld:vector-append");
-+object k_735114 = args[0];
-+load_varargs(vecs_73703_732932, args, 1, argc - 1);
-+  Cyc_st_add(data, "base.sld:vector-append");
++object k_735107 = args[0];
++load_varargs(vecs_73703_732925, args, 1, argc - 1);
+   Cyc_st_add(data, "scheme/base.sld:vector-append");
  
 -closureN_type c_7319502;
 -object e_7319514 [1];
@@ -43710,26 +43960,26 @@ Make let-values be the same as let*-values, to work around
 -c_7319502.num_elements = 1;
 -c_7319502.elements = (object *)e_7319514;
 -c_7319502.elements[0] = k_735559;
-+closureN_type c_7318209;
-+object e_7318221 [1];
-+c_7318209.hdr.mark = gc_color_red;
-+ c_7318209.hdr.grayed = 0;
-+c_7318209.tag = closureN_tag;
-+ c_7318209.fn = (function_type)__lambda_573;
-+c_7318209.num_args = 1;
-+c_7318209.num_elements = 1;
-+c_7318209.elements = (object *)e_7318221;
-+c_7318209.elements[0] = k_735114;
++closureN_type c_7318202;
++object e_7318214 [1];
++c_7318202.hdr.mark = gc_color_red;
++ c_7318202.hdr.grayed = 0;
++c_7318202.tag = closureN_tag;
++ c_7318202.fn = (function_type)__lambda_573;
++c_7318202.num_args = 1;
++c_7318202.num_elements = 1;
++c_7318202.elements = (object *)e_7318214;
++c_7318202.elements[0] = k_735107;
  
 -return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7319502, __glo_vector_91_125list_scheme_base, vecs_73703_733272);; 
-+return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7318209, __glo_vector_91_125list_scheme_base, vecs_73703_732932);; 
++return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7318202, __glo_vector_91_125list_scheme_base, vecs_73703_732925);; 
  }
  
 -static void __lambda_573(void *data, object self_7313497, int argc, object *args) /* object self_7313497, object r_735561 */
-+static void __lambda_573(void *data, object self_7312251, int argc, object *args) /* object self_7312251, object r_735116 */
++static void __lambda_573(void *data, object self_7312244, int argc, object *args) /* object self_7312244, object r_735109 */
   {
 - object r_735561 = args[0];
-+ object r_735116 = args[0];
++ object r_735109 = args[0];
    
 -closureN_type c_7319504;
 -object e_7319510 [1];
@@ -43741,45 +43991,44 @@ Make let-values be the same as let*-values, to work around
 -c_7319504.num_elements = 1;
 -c_7319504.elements = (object *)e_7319510;
 -c_7319504.elements[0] = ((closureN)self_7313497)->elements[0];
-+closureN_type c_7318211;
-+object e_7318217 [1];
-+c_7318211.hdr.mark = gc_color_red;
-+ c_7318211.hdr.grayed = 0;
-+c_7318211.tag = closureN_tag;
-+ c_7318211.fn = (function_type)__lambda_574;
-+c_7318211.num_args = 1;
-+c_7318211.num_elements = 1;
-+c_7318211.elements = (object *)e_7318217;
-+c_7318211.elements[0] = ((closureN)self_7312251)->elements[0];
++closureN_type c_7318204;
++object e_7318210 [1];
++c_7318204.hdr.mark = gc_color_red;
++ c_7318204.hdr.grayed = 0;
++c_7318204.tag = closureN_tag;
++ c_7318204.fn = (function_type)__lambda_574;
++c_7318204.num_args = 1;
++c_7318204.num_elements = 1;
++c_7318204.elements = (object *)e_7318210;
++c_7318204.elements[0] = ((closureN)self_7312244)->elements[0];
  
  
 -object c_7319513 = apply(data,(closure)&c_7319504,__glo_append_scheme_base, r_735561);
 -return_closcall1(data,(closure)&c_7319504,  c_7319513);; 
-+object c_7318220 = apply(data,(closure)&c_7318211,__glo_append_scheme_base, r_735116);
-+return_closcall1(data,(closure)&c_7318211,  c_7318220);; 
++object c_7318213 = apply(data,(closure)&c_7318204,__glo_append_scheme_base, r_735109);
++return_closcall1(data,(closure)&c_7318204,  c_7318213);; 
  }
  
 -static void __lambda_574(void *data, object self_7313498, int argc, object *args) /* object self_7313498, object r_735560 */
-+static void __lambda_574(void *data, object self_7312252, int argc, object *args) /* object self_7312252, object r_735115 */
++static void __lambda_574(void *data, object self_7312245, int argc, object *args) /* object self_7312245, object r_735108 */
   {
 - object r_735560 = args[0];
-+ object r_735115 = args[0];
++ object r_735108 = args[0];
    
 -object c_7319509 = Cyc_list2vector(data,  ((closureN)self_7313498)->elements[0],r_735560);
 -return_direct_with_clo1(data,  ((closureN)self_7313498)->elements[0], (((closure)  ((closureN)self_7313498)->elements[0])->fn),  c_7319509);; 
-+object c_7318216 = Cyc_list2vector(data,  ((closureN)self_7312252)->elements[0],r_735115);
-+return_direct_with_clo1(data,  ((closureN)self_7312252)->elements[0], (((closure)  ((closureN)self_7312252)->elements[0])->fn),  c_7318216);; 
++object c_7318209 = Cyc_list2vector(data,  ((closureN)self_7312245)->elements[0],r_735108);
++return_direct_with_clo1(data,  ((closureN)self_7312245)->elements[0], (((closure)  ((closureN)self_7312245)->elements[0])->fn),  c_7318209);; 
  }
  
 -static void __lambda_569(void *data, object _, int argc, object *args) /* closure _,object k_735552, object func_73697_733269, object vec1_73698_733270, object vecs_73699_733271_raw, ... */
-+static void __lambda_569(void *data, object _, int argc, object *args) /* closure _,object k_735107, object func_73697_732929, object vec1_73698_732930, object vecs_73699_732931_raw, ... */
++static void __lambda_569(void *data, object _, int argc, object *args) /* closure _,object k_735100, object func_73697_732922, object vec1_73698_732923, object vecs_73699_732924_raw, ... */
   {
 -object k_735552 = args[0]; object func_73697_733269 = args[1]; object vec1_73698_733270 = args[2];
 -load_varargs(vecs_73699_733271, args, 3, argc - 3);
--  Cyc_st_add(data, "scheme/base.sld:vector-for-each");
-+object k_735107 = args[0]; object func_73697_732929 = args[1]; object vec1_73698_732930 = args[2];
-+load_varargs(vecs_73699_732931, args, 3, argc - 3);
-+  Cyc_st_add(data, "base.sld:vector-for-each");
++object k_735100 = args[0]; object func_73697_732922 = args[1]; object vec1_73698_732923 = args[2];
++load_varargs(vecs_73699_732924, args, 3, argc - 3);
+   Cyc_st_add(data, "scheme/base.sld:vector-for-each");
  
 -closureN_type c_7319481;
 -object e_7319499 [3];
@@ -43793,28 +44042,28 @@ Make let-values be the same as let*-values, to work around
 -c_7319481.elements[0] = func_73697_733269;
 -c_7319481.elements[1] = k_735552;
 -c_7319481.elements[2] = vecs_73699_733271;
-+closureN_type c_7318188;
-+object e_7318206 [3];
-+c_7318188.hdr.mark = gc_color_red;
-+ c_7318188.hdr.grayed = 0;
-+c_7318188.tag = closureN_tag;
-+ c_7318188.fn = (function_type)__lambda_570;
-+c_7318188.num_args = 1;
-+c_7318188.num_elements = 3;
-+c_7318188.elements = (object *)e_7318206;
-+c_7318188.elements[0] = func_73697_732929;
-+c_7318188.elements[1] = k_735107;
-+c_7318188.elements[2] = vecs_73699_732931;
++closureN_type c_7318181;
++object e_7318199 [3];
++c_7318181.hdr.mark = gc_color_red;
++ c_7318181.hdr.grayed = 0;
++c_7318181.tag = closureN_tag;
++ c_7318181.fn = (function_type)__lambda_570;
++c_7318181.num_args = 1;
++c_7318181.num_elements = 3;
++c_7318181.elements = (object *)e_7318199;
++c_7318181.elements[0] = func_73697_732922;
++c_7318181.elements[1] = k_735100;
++c_7318181.elements[2] = vecs_73699_732924;
  
 -return_direct_with_clo2(data,  __glo_vector_91_125list_scheme_base, (((closure)  __glo_vector_91_125list_scheme_base)->fn),  &c_7319481, vec1_73698_733270);; 
-+return_direct_with_clo2(data,  __glo_vector_91_125list_scheme_base, (((closure)  __glo_vector_91_125list_scheme_base)->fn),  &c_7318188, vec1_73698_732930);; 
++return_direct_with_clo2(data,  __glo_vector_91_125list_scheme_base, (((closure)  __glo_vector_91_125list_scheme_base)->fn),  &c_7318181, vec1_73698_732923);; 
  }
  
 -static void __lambda_570(void *data, object self_7313495, int argc, object *args) /* object self_7313495, object r_735555 */
-+static void __lambda_570(void *data, object self_7312249, int argc, object *args) /* object self_7312249, object r_735110 */
++static void __lambda_570(void *data, object self_7312242, int argc, object *args) /* object self_7312242, object r_735103 */
   {
 - object r_735555 = args[0];
-+ object r_735110 = args[0];
++ object r_735103 = args[0];
    
 -closureN_type c_7319483;
 -object e_7319497 [3];
@@ -43828,50 +44077,49 @@ Make let-values be the same as let*-values, to work around
 -c_7319483.elements[0] = ((closureN)self_7313495)->elements[0];
 -c_7319483.elements[1] = ((closureN)self_7313495)->elements[1];
 -c_7319483.elements[2] = r_735555;
-+closureN_type c_7318190;
-+object e_7318204 [3];
-+c_7318190.hdr.mark = gc_color_red;
-+ c_7318190.hdr.grayed = 0;
-+c_7318190.tag = closureN_tag;
-+ c_7318190.fn = (function_type)__lambda_571;
-+c_7318190.num_args = 1;
-+c_7318190.num_elements = 3;
-+c_7318190.elements = (object *)e_7318204;
-+c_7318190.elements[0] = ((closureN)self_7312249)->elements[0];
-+c_7318190.elements[1] = ((closureN)self_7312249)->elements[1];
-+c_7318190.elements[2] = r_735110;
++closureN_type c_7318183;
++object e_7318197 [3];
++c_7318183.hdr.mark = gc_color_red;
++ c_7318183.hdr.grayed = 0;
++c_7318183.tag = closureN_tag;
++ c_7318183.fn = (function_type)__lambda_571;
++c_7318183.num_args = 1;
++c_7318183.num_elements = 3;
++c_7318183.elements = (object *)e_7318197;
++c_7318183.elements[0] = ((closureN)self_7312242)->elements[0];
++c_7318183.elements[1] = ((closureN)self_7312242)->elements[1];
++c_7318183.elements[2] = r_735103;
  
 -return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7319483, __glo_vector_91_125list_scheme_base, ((closureN)self_7313495)->elements[2]);; 
-+return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7318190, __glo_vector_91_125list_scheme_base, ((closureN)self_7312249)->elements[2]);; 
++return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7318183, __glo_vector_91_125list_scheme_base, ((closureN)self_7312242)->elements[2]);; 
  }
  
 -static void __lambda_571(void *data, object self_7313496, int argc, object *args) /* object self_7313496, object r_735556 */
-+static void __lambda_571(void *data, object self_7312250, int argc, object *args) /* object self_7312250, object r_735111 */
++static void __lambda_571(void *data, object self_7312243, int argc, object *args) /* object self_7312243, object r_735104 */
   {
 - object r_735556 = args[0];
-+ object r_735111 = args[0];
++ object r_735104 = args[0];
    
 -pair_type local_7319491; 
-+pair_type local_7318198; 
++pair_type local_7318191; 
  
 -pair_type local_7319495; 
-+pair_type local_7318202; 
++pair_type local_7318195; 
  
 -object c_7319488 = apply(data,  ((closureN)self_7313496)->elements[1],__glo_for_91each_scheme_base, set_pair_as_expr(&local_7319491, ((closureN)self_7313496)->elements[0], set_pair_as_expr(&local_7319495, ((closureN)self_7313496)->elements[2], r_735556)));
 -return_direct_with_clo1(data,  ((closureN)self_7313496)->elements[1], (((closure)  ((closureN)self_7313496)->elements[1])->fn),  c_7319488);; 
-+object c_7318195 = apply(data,  ((closureN)self_7312250)->elements[1],__glo_for_91each_scheme_base, set_pair_as_expr(&local_7318198, ((closureN)self_7312250)->elements[0], set_pair_as_expr(&local_7318202, ((closureN)self_7312250)->elements[2], r_735111)));
-+return_direct_with_clo1(data,  ((closureN)self_7312250)->elements[1], (((closure)  ((closureN)self_7312250)->elements[1])->fn),  c_7318195);; 
++object c_7318188 = apply(data,  ((closureN)self_7312243)->elements[1],__glo_for_91each_scheme_base, set_pair_as_expr(&local_7318191, ((closureN)self_7312243)->elements[0], set_pair_as_expr(&local_7318195, ((closureN)self_7312243)->elements[2], r_735104)));
++return_direct_with_clo1(data,  ((closureN)self_7312243)->elements[1], (((closure)  ((closureN)self_7312243)->elements[1])->fn),  c_7318188);; 
  }
  
 -static void __lambda_565(void *data, object _, int argc, object *args) /* closure _,object k_735544, object func_73691_733266, object vec1_73692_733267, object vecs_73693_733268_raw, ... */
-+static void __lambda_565(void *data, object _, int argc, object *args) /* closure _,object k_735099, object func_73691_732926, object vec1_73692_732927, object vecs_73693_732928_raw, ... */
++static void __lambda_565(void *data, object _, int argc, object *args) /* closure _,object k_735092, object func_73691_732919, object vec1_73692_732920, object vecs_73693_732921_raw, ... */
   {
 -object k_735544 = args[0]; object func_73691_733266 = args[1]; object vec1_73692_733267 = args[2];
 -load_varargs(vecs_73693_733268, args, 3, argc - 3);
--  Cyc_st_add(data, "scheme/base.sld:vector-map");
-+object k_735099 = args[0]; object func_73691_732926 = args[1]; object vec1_73692_732927 = args[2];
-+load_varargs(vecs_73693_732928, args, 3, argc - 3);
-+  Cyc_st_add(data, "base.sld:vector-map");
++object k_735092 = args[0]; object func_73691_732919 = args[1]; object vec1_73692_732920 = args[2];
++load_varargs(vecs_73693_732921, args, 3, argc - 3);
+   Cyc_st_add(data, "scheme/base.sld:vector-map");
  
 -closureN_type c_7319454;
 -object e_7319478 [3];
@@ -43885,28 +44133,28 @@ Make let-values be the same as let*-values, to work around
 -c_7319454.elements[0] = func_73691_733266;
 -c_7319454.elements[1] = k_735544;
 -c_7319454.elements[2] = vecs_73693_733268;
-+closureN_type c_7318161;
-+object e_7318185 [3];
-+c_7318161.hdr.mark = gc_color_red;
-+ c_7318161.hdr.grayed = 0;
-+c_7318161.tag = closureN_tag;
-+ c_7318161.fn = (function_type)__lambda_566;
-+c_7318161.num_args = 1;
-+c_7318161.num_elements = 3;
-+c_7318161.elements = (object *)e_7318185;
-+c_7318161.elements[0] = func_73691_732926;
-+c_7318161.elements[1] = k_735099;
-+c_7318161.elements[2] = vecs_73693_732928;
++closureN_type c_7318154;
++object e_7318178 [3];
++c_7318154.hdr.mark = gc_color_red;
++ c_7318154.hdr.grayed = 0;
++c_7318154.tag = closureN_tag;
++ c_7318154.fn = (function_type)__lambda_566;
++c_7318154.num_args = 1;
++c_7318154.num_elements = 3;
++c_7318154.elements = (object *)e_7318178;
++c_7318154.elements[0] = func_73691_732919;
++c_7318154.elements[1] = k_735092;
++c_7318154.elements[2] = vecs_73693_732921;
  
 -return_direct_with_clo2(data,  __glo_vector_91_125list_scheme_base, (((closure)  __glo_vector_91_125list_scheme_base)->fn),  &c_7319454, vec1_73692_733267);; 
-+return_direct_with_clo2(data,  __glo_vector_91_125list_scheme_base, (((closure)  __glo_vector_91_125list_scheme_base)->fn),  &c_7318161, vec1_73692_732927);; 
++return_direct_with_clo2(data,  __glo_vector_91_125list_scheme_base, (((closure)  __glo_vector_91_125list_scheme_base)->fn),  &c_7318154, vec1_73692_732920);; 
  }
  
 -static void __lambda_566(void *data, object self_7313492, int argc, object *args) /* object self_7313492, object r_735548 */
-+static void __lambda_566(void *data, object self_7312246, int argc, object *args) /* object self_7312246, object r_735103 */
++static void __lambda_566(void *data, object self_7312239, int argc, object *args) /* object self_7312239, object r_735096 */
   {
 - object r_735548 = args[0];
-+ object r_735103 = args[0];
++ object r_735096 = args[0];
    
 -closureN_type c_7319456;
 -object e_7319476 [3];
@@ -43920,28 +44168,28 @@ Make let-values be the same as let*-values, to work around
 -c_7319456.elements[0] = ((closureN)self_7313492)->elements[0];
 -c_7319456.elements[1] = ((closureN)self_7313492)->elements[1];
 -c_7319456.elements[2] = r_735548;
-+closureN_type c_7318163;
-+object e_7318183 [3];
-+c_7318163.hdr.mark = gc_color_red;
-+ c_7318163.hdr.grayed = 0;
-+c_7318163.tag = closureN_tag;
-+ c_7318163.fn = (function_type)__lambda_567;
-+c_7318163.num_args = 1;
-+c_7318163.num_elements = 3;
-+c_7318163.elements = (object *)e_7318183;
-+c_7318163.elements[0] = ((closureN)self_7312246)->elements[0];
-+c_7318163.elements[1] = ((closureN)self_7312246)->elements[1];
-+c_7318163.elements[2] = r_735103;
++closureN_type c_7318156;
++object e_7318176 [3];
++c_7318156.hdr.mark = gc_color_red;
++ c_7318156.hdr.grayed = 0;
++c_7318156.tag = closureN_tag;
++ c_7318156.fn = (function_type)__lambda_567;
++c_7318156.num_args = 1;
++c_7318156.num_elements = 3;
++c_7318156.elements = (object *)e_7318176;
++c_7318156.elements[0] = ((closureN)self_7312239)->elements[0];
++c_7318156.elements[1] = ((closureN)self_7312239)->elements[1];
++c_7318156.elements[2] = r_735096;
  
 -return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7319456, __glo_vector_91_125list_scheme_base, ((closureN)self_7313492)->elements[2]);; 
-+return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7318163, __glo_vector_91_125list_scheme_base, ((closureN)self_7312246)->elements[2]);; 
++return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7318156, __glo_vector_91_125list_scheme_base, ((closureN)self_7312239)->elements[2]);; 
  }
  
 -static void __lambda_567(void *data, object self_7313493, int argc, object *args) /* object self_7313493, object r_735549 */
-+static void __lambda_567(void *data, object self_7312247, int argc, object *args) /* object self_7312247, object r_735104 */
++static void __lambda_567(void *data, object self_7312240, int argc, object *args) /* object self_7312240, object r_735097 */
   {
 - object r_735549 = args[0];
-+ object r_735104 = args[0];
++ object r_735097 = args[0];
    
 -closureN_type c_7319458;
 -object e_7319464 [1];
@@ -43953,51 +44201,50 @@ Make let-values be the same as let*-values, to work around
 -c_7319458.num_elements = 1;
 -c_7319458.elements = (object *)e_7319464;
 -c_7319458.elements[0] = ((closureN)self_7313493)->elements[1];
-+closureN_type c_7318165;
-+object e_7318171 [1];
-+c_7318165.hdr.mark = gc_color_red;
-+ c_7318165.hdr.grayed = 0;
-+c_7318165.tag = closureN_tag;
-+ c_7318165.fn = (function_type)__lambda_568;
-+c_7318165.num_args = 1;
-+c_7318165.num_elements = 1;
-+c_7318165.elements = (object *)e_7318171;
-+c_7318165.elements[0] = ((closureN)self_7312247)->elements[1];
++closureN_type c_7318158;
++object e_7318164 [1];
++c_7318158.hdr.mark = gc_color_red;
++ c_7318158.hdr.grayed = 0;
++c_7318158.tag = closureN_tag;
++ c_7318158.fn = (function_type)__lambda_568;
++c_7318158.num_args = 1;
++c_7318158.num_elements = 1;
++c_7318158.elements = (object *)e_7318164;
++c_7318158.elements[0] = ((closureN)self_7312240)->elements[1];
  
  
 -pair_type local_7319470; 
-+pair_type local_7318177; 
++pair_type local_7318170; 
  
 -pair_type local_7319474; 
-+pair_type local_7318181; 
++pair_type local_7318174; 
  
 -object c_7319467 = apply(data,(closure)&c_7319458,__glo_map_scheme_base, set_pair_as_expr(&local_7319470, ((closureN)self_7313493)->elements[0], set_pair_as_expr(&local_7319474, ((closureN)self_7313493)->elements[2], r_735549)));
 -return_closcall1(data,(closure)&c_7319458,  c_7319467);; 
-+object c_7318174 = apply(data,(closure)&c_7318165,__glo_map_scheme_base, set_pair_as_expr(&local_7318177, ((closureN)self_7312247)->elements[0], set_pair_as_expr(&local_7318181, ((closureN)self_7312247)->elements[2], r_735104)));
-+return_closcall1(data,(closure)&c_7318165,  c_7318174);; 
++object c_7318167 = apply(data,(closure)&c_7318158,__glo_map_scheme_base, set_pair_as_expr(&local_7318170, ((closureN)self_7312240)->elements[0], set_pair_as_expr(&local_7318174, ((closureN)self_7312240)->elements[2], r_735097)));
++return_closcall1(data,(closure)&c_7318158,  c_7318167);; 
  }
  
 -static void __lambda_568(void *data, object self_7313494, int argc, object *args) /* object self_7313494, object r_735545 */
-+static void __lambda_568(void *data, object self_7312248, int argc, object *args) /* object self_7312248, object r_735100 */
++static void __lambda_568(void *data, object self_7312241, int argc, object *args) /* object self_7312241, object r_735093 */
   {
 - object r_735545 = args[0];
-+ object r_735100 = args[0];
++ object r_735093 = args[0];
    
 -object c_7319463 = Cyc_list2vector(data,  ((closureN)self_7313494)->elements[0],r_735545);
 -return_direct_with_clo1(data,  ((closureN)self_7313494)->elements[0], (((closure)  ((closureN)self_7313494)->elements[0])->fn),  c_7319463);; 
-+object c_7318170 = Cyc_list2vector(data,  ((closureN)self_7312248)->elements[0],r_735100);
-+return_direct_with_clo1(data,  ((closureN)self_7312248)->elements[0], (((closure)  ((closureN)self_7312248)->elements[0])->fn),  c_7318170);; 
++object c_7318163 = Cyc_list2vector(data,  ((closureN)self_7312241)->elements[0],r_735093);
++return_direct_with_clo1(data,  ((closureN)self_7312241)->elements[0], (((closure)  ((closureN)self_7312241)->elements[0])->fn),  c_7318163);; 
  }
  
 -static void __lambda_562(void *data, object _, int argc, object *args) /* closure _,object k_735537, object func_73685_733263, object str1_73686_733264, object strs_73687_733265_raw, ... */
-+static void __lambda_562(void *data, object _, int argc, object *args) /* closure _,object k_735092, object func_73685_732923, object str1_73686_732924, object strs_73687_732925_raw, ... */
++static void __lambda_562(void *data, object _, int argc, object *args) /* closure _,object k_735085, object func_73685_732916, object str1_73686_732917, object strs_73687_732918_raw, ... */
   {
 -object k_735537 = args[0]; object func_73685_733263 = args[1]; object str1_73686_733264 = args[2];
 -load_varargs(strs_73687_733265, args, 3, argc - 3);
--  Cyc_st_add(data, "scheme/base.sld:string-for-each");
-+object k_735092 = args[0]; object func_73685_732923 = args[1]; object str1_73686_732924 = args[2];
-+load_varargs(strs_73687_732925, args, 3, argc - 3);
-+  Cyc_st_add(data, "base.sld:string-for-each");
++object k_735085 = args[0]; object func_73685_732916 = args[1]; object str1_73686_732917 = args[2];
++load_varargs(strs_73687_732918, args, 3, argc - 3);
+   Cyc_st_add(data, "scheme/base.sld:string-for-each");
  
 -closureN_type c_7319433;
 -object e_7319451 [3];
@@ -44011,28 +44258,28 @@ Make let-values be the same as let*-values, to work around
 -c_7319433.elements[0] = func_73685_733263;
 -c_7319433.elements[1] = k_735537;
 -c_7319433.elements[2] = strs_73687_733265;
-+closureN_type c_7318140;
-+object e_7318158 [3];
-+c_7318140.hdr.mark = gc_color_red;
-+ c_7318140.hdr.grayed = 0;
-+c_7318140.tag = closureN_tag;
-+ c_7318140.fn = (function_type)__lambda_563;
-+c_7318140.num_args = 1;
-+c_7318140.num_elements = 3;
-+c_7318140.elements = (object *)e_7318158;
-+c_7318140.elements[0] = func_73685_732923;
-+c_7318140.elements[1] = k_735092;
-+c_7318140.elements[2] = strs_73687_732925;
++closureN_type c_7318133;
++object e_7318151 [3];
++c_7318133.hdr.mark = gc_color_red;
++ c_7318133.hdr.grayed = 0;
++c_7318133.tag = closureN_tag;
++ c_7318133.fn = (function_type)__lambda_563;
++c_7318133.num_args = 1;
++c_7318133.num_elements = 3;
++c_7318133.elements = (object *)e_7318151;
++c_7318133.elements[0] = func_73685_732916;
++c_7318133.elements[1] = k_735085;
++c_7318133.elements[2] = strs_73687_732918;
  
 -return_direct_with_clo2(data,  __glo_string_91_125list_scheme_base, (((closure)  __glo_string_91_125list_scheme_base)->fn),  &c_7319433, str1_73686_733264);; 
-+return_direct_with_clo2(data,  __glo_string_91_125list_scheme_base, (((closure)  __glo_string_91_125list_scheme_base)->fn),  &c_7318140, str1_73686_732924);; 
++return_direct_with_clo2(data,  __glo_string_91_125list_scheme_base, (((closure)  __glo_string_91_125list_scheme_base)->fn),  &c_7318133, str1_73686_732917);; 
  }
  
 -static void __lambda_563(void *data, object self_7313490, int argc, object *args) /* object self_7313490, object r_735540 */
-+static void __lambda_563(void *data, object self_7312244, int argc, object *args) /* object self_7312244, object r_735095 */
++static void __lambda_563(void *data, object self_7312237, int argc, object *args) /* object self_7312237, object r_735088 */
   {
 - object r_735540 = args[0];
-+ object r_735095 = args[0];
++ object r_735088 = args[0];
    
 -closureN_type c_7319435;
 -object e_7319449 [3];
@@ -44046,50 +44293,49 @@ Make let-values be the same as let*-values, to work around
 -c_7319435.elements[0] = ((closureN)self_7313490)->elements[0];
 -c_7319435.elements[1] = ((closureN)self_7313490)->elements[1];
 -c_7319435.elements[2] = r_735540;
-+closureN_type c_7318142;
-+object e_7318156 [3];
-+c_7318142.hdr.mark = gc_color_red;
-+ c_7318142.hdr.grayed = 0;
-+c_7318142.tag = closureN_tag;
-+ c_7318142.fn = (function_type)__lambda_564;
-+c_7318142.num_args = 1;
-+c_7318142.num_elements = 3;
-+c_7318142.elements = (object *)e_7318156;
-+c_7318142.elements[0] = ((closureN)self_7312244)->elements[0];
-+c_7318142.elements[1] = ((closureN)self_7312244)->elements[1];
-+c_7318142.elements[2] = r_735095;
++closureN_type c_7318135;
++object e_7318149 [3];
++c_7318135.hdr.mark = gc_color_red;
++ c_7318135.hdr.grayed = 0;
++c_7318135.tag = closureN_tag;
++ c_7318135.fn = (function_type)__lambda_564;
++c_7318135.num_args = 1;
++c_7318135.num_elements = 3;
++c_7318135.elements = (object *)e_7318149;
++c_7318135.elements[0] = ((closureN)self_7312237)->elements[0];
++c_7318135.elements[1] = ((closureN)self_7312237)->elements[1];
++c_7318135.elements[2] = r_735088;
  
 -return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7319435, __glo_string_91_125list_scheme_base, ((closureN)self_7313490)->elements[2]);; 
-+return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7318142, __glo_string_91_125list_scheme_base, ((closureN)self_7312244)->elements[2]);; 
++return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7318135, __glo_string_91_125list_scheme_base, ((closureN)self_7312237)->elements[2]);; 
  }
  
 -static void __lambda_564(void *data, object self_7313491, int argc, object *args) /* object self_7313491, object r_735541 */
-+static void __lambda_564(void *data, object self_7312245, int argc, object *args) /* object self_7312245, object r_735096 */
++static void __lambda_564(void *data, object self_7312238, int argc, object *args) /* object self_7312238, object r_735089 */
   {
 - object r_735541 = args[0];
-+ object r_735096 = args[0];
++ object r_735089 = args[0];
    
 -pair_type local_7319443; 
-+pair_type local_7318150; 
++pair_type local_7318143; 
  
 -pair_type local_7319447; 
-+pair_type local_7318154; 
++pair_type local_7318147; 
  
 -object c_7319440 = apply(data,  ((closureN)self_7313491)->elements[1],__glo_for_91each_scheme_base, set_pair_as_expr(&local_7319443, ((closureN)self_7313491)->elements[0], set_pair_as_expr(&local_7319447, ((closureN)self_7313491)->elements[2], r_735541)));
 -return_direct_with_clo1(data,  ((closureN)self_7313491)->elements[1], (((closure)  ((closureN)self_7313491)->elements[1])->fn),  c_7319440);; 
-+object c_7318147 = apply(data,  ((closureN)self_7312245)->elements[1],__glo_for_91each_scheme_base, set_pair_as_expr(&local_7318150, ((closureN)self_7312245)->elements[0], set_pair_as_expr(&local_7318154, ((closureN)self_7312245)->elements[2], r_735096)));
-+return_direct_with_clo1(data,  ((closureN)self_7312245)->elements[1], (((closure)  ((closureN)self_7312245)->elements[1])->fn),  c_7318147);; 
++object c_7318140 = apply(data,  ((closureN)self_7312238)->elements[1],__glo_for_91each_scheme_base, set_pair_as_expr(&local_7318143, ((closureN)self_7312238)->elements[0], set_pair_as_expr(&local_7318147, ((closureN)self_7312238)->elements[2], r_735089)));
++return_direct_with_clo1(data,  ((closureN)self_7312238)->elements[1], (((closure)  ((closureN)self_7312238)->elements[1])->fn),  c_7318140);; 
  }
  
 -static void __lambda_558(void *data, object _, int argc, object *args) /* closure _,object k_735529, object func_73679_733260, object str1_73680_733261, object strs_73681_733262_raw, ... */
-+static void __lambda_558(void *data, object _, int argc, object *args) /* closure _,object k_735084, object func_73679_732920, object str1_73680_732921, object strs_73681_732922_raw, ... */
++static void __lambda_558(void *data, object _, int argc, object *args) /* closure _,object k_735077, object func_73679_732913, object str1_73680_732914, object strs_73681_732915_raw, ... */
   {
 -object k_735529 = args[0]; object func_73679_733260 = args[1]; object str1_73680_733261 = args[2];
 -load_varargs(strs_73681_733262, args, 3, argc - 3);
--  Cyc_st_add(data, "scheme/base.sld:string-map");
-+object k_735084 = args[0]; object func_73679_732920 = args[1]; object str1_73680_732921 = args[2];
-+load_varargs(strs_73681_732922, args, 3, argc - 3);
-+  Cyc_st_add(data, "base.sld:string-map");
++object k_735077 = args[0]; object func_73679_732913 = args[1]; object str1_73680_732914 = args[2];
++load_varargs(strs_73681_732915, args, 3, argc - 3);
+   Cyc_st_add(data, "scheme/base.sld:string-map");
  
 -closureN_type c_7319406;
 -object e_7319430 [3];
@@ -44103,28 +44349,28 @@ Make let-values be the same as let*-values, to work around
 -c_7319406.elements[0] = func_73679_733260;
 -c_7319406.elements[1] = k_735529;
 -c_7319406.elements[2] = strs_73681_733262;
-+closureN_type c_7318113;
-+object e_7318137 [3];
-+c_7318113.hdr.mark = gc_color_red;
-+ c_7318113.hdr.grayed = 0;
-+c_7318113.tag = closureN_tag;
-+ c_7318113.fn = (function_type)__lambda_559;
-+c_7318113.num_args = 1;
-+c_7318113.num_elements = 3;
-+c_7318113.elements = (object *)e_7318137;
-+c_7318113.elements[0] = func_73679_732920;
-+c_7318113.elements[1] = k_735084;
-+c_7318113.elements[2] = strs_73681_732922;
++closureN_type c_7318106;
++object e_7318130 [3];
++c_7318106.hdr.mark = gc_color_red;
++ c_7318106.hdr.grayed = 0;
++c_7318106.tag = closureN_tag;
++ c_7318106.fn = (function_type)__lambda_559;
++c_7318106.num_args = 1;
++c_7318106.num_elements = 3;
++c_7318106.elements = (object *)e_7318130;
++c_7318106.elements[0] = func_73679_732913;
++c_7318106.elements[1] = k_735077;
++c_7318106.elements[2] = strs_73681_732915;
  
 -return_direct_with_clo2(data,  __glo_string_91_125list_scheme_base, (((closure)  __glo_string_91_125list_scheme_base)->fn),  &c_7319406, str1_73680_733261);; 
-+return_direct_with_clo2(data,  __glo_string_91_125list_scheme_base, (((closure)  __glo_string_91_125list_scheme_base)->fn),  &c_7318113, str1_73680_732921);; 
++return_direct_with_clo2(data,  __glo_string_91_125list_scheme_base, (((closure)  __glo_string_91_125list_scheme_base)->fn),  &c_7318106, str1_73680_732914);; 
  }
  
 -static void __lambda_559(void *data, object self_7313487, int argc, object *args) /* object self_7313487, object r_735533 */
-+static void __lambda_559(void *data, object self_7312241, int argc, object *args) /* object self_7312241, object r_735088 */
++static void __lambda_559(void *data, object self_7312234, int argc, object *args) /* object self_7312234, object r_735081 */
   {
 - object r_735533 = args[0];
-+ object r_735088 = args[0];
++ object r_735081 = args[0];
    
 -closureN_type c_7319408;
 -object e_7319428 [3];
@@ -44138,28 +44384,28 @@ Make let-values be the same as let*-values, to work around
 -c_7319408.elements[0] = ((closureN)self_7313487)->elements[0];
 -c_7319408.elements[1] = ((closureN)self_7313487)->elements[1];
 -c_7319408.elements[2] = r_735533;
-+closureN_type c_7318115;
-+object e_7318135 [3];
-+c_7318115.hdr.mark = gc_color_red;
-+ c_7318115.hdr.grayed = 0;
-+c_7318115.tag = closureN_tag;
-+ c_7318115.fn = (function_type)__lambda_560;
-+c_7318115.num_args = 1;
-+c_7318115.num_elements = 3;
-+c_7318115.elements = (object *)e_7318135;
-+c_7318115.elements[0] = ((closureN)self_7312241)->elements[0];
-+c_7318115.elements[1] = ((closureN)self_7312241)->elements[1];
-+c_7318115.elements[2] = r_735088;
++closureN_type c_7318108;
++object e_7318128 [3];
++c_7318108.hdr.mark = gc_color_red;
++ c_7318108.hdr.grayed = 0;
++c_7318108.tag = closureN_tag;
++ c_7318108.fn = (function_type)__lambda_560;
++c_7318108.num_args = 1;
++c_7318108.num_elements = 3;
++c_7318108.elements = (object *)e_7318128;
++c_7318108.elements[0] = ((closureN)self_7312234)->elements[0];
++c_7318108.elements[1] = ((closureN)self_7312234)->elements[1];
++c_7318108.elements[2] = r_735081;
  
 -return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7319408, __glo_string_91_125list_scheme_base, ((closureN)self_7313487)->elements[2]);; 
-+return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7318115, __glo_string_91_125list_scheme_base, ((closureN)self_7312241)->elements[2]);; 
++return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7318108, __glo_string_91_125list_scheme_base, ((closureN)self_7312234)->elements[2]);; 
  }
  
 -static void __lambda_560(void *data, object self_7313488, int argc, object *args) /* object self_7313488, object r_735534 */
-+static void __lambda_560(void *data, object self_7312242, int argc, object *args) /* object self_7312242, object r_735089 */
++static void __lambda_560(void *data, object self_7312235, int argc, object *args) /* object self_7312235, object r_735082 */
   {
 - object r_735534 = args[0];
-+ object r_735089 = args[0];
++ object r_735082 = args[0];
    
 -closureN_type c_7319410;
 -object e_7319416 [1];
@@ -44171,40 +44417,51 @@ Make let-values be the same as let*-values, to work around
 -c_7319410.num_elements = 1;
 -c_7319410.elements = (object *)e_7319416;
 -c_7319410.elements[0] = ((closureN)self_7313488)->elements[1];
--
-+closureN_type c_7318117;
-+object e_7318123 [1];
-+c_7318117.hdr.mark = gc_color_red;
-+ c_7318117.hdr.grayed = 0;
-+c_7318117.tag = closureN_tag;
-+ c_7318117.fn = (function_type)__lambda_561;
-+c_7318117.num_args = 1;
-+c_7318117.num_elements = 1;
-+c_7318117.elements = (object *)e_7318123;
-+c_7318117.elements[0] = ((closureN)self_7312242)->elements[1];
++closureN_type c_7318110;
++object e_7318116 [1];
++c_7318110.hdr.mark = gc_color_red;
++ c_7318110.hdr.grayed = 0;
++c_7318110.tag = closureN_tag;
++ c_7318110.fn = (function_type)__lambda_561;
++c_7318110.num_args = 1;
++c_7318110.num_elements = 1;
++c_7318110.elements = (object *)e_7318116;
++c_7318110.elements[0] = ((closureN)self_7312235)->elements[1];
+ 
  
 -pair_type local_7319422; 
++pair_type local_7318122; 
  
 -pair_type local_7319426; 
--
++pair_type local_7318126; 
+ 
 -object c_7319419 = apply(data,(closure)&c_7319410,__glo_map_scheme_base, set_pair_as_expr(&local_7319422, ((closureN)self_7313488)->elements[0], set_pair_as_expr(&local_7319426, ((closureN)self_7313488)->elements[2], r_735534)));
 -return_closcall1(data,(closure)&c_7319410,  c_7319419);; 
--}
--
++object c_7318119 = apply(data,(closure)&c_7318110,__glo_map_scheme_base, set_pair_as_expr(&local_7318122, ((closureN)self_7312235)->elements[0], set_pair_as_expr(&local_7318126, ((closureN)self_7312235)->elements[2], r_735082)));
++return_closcall1(data,(closure)&c_7318110,  c_7318119);; 
+ }
+ 
 -static void __lambda_561(void *data, object self_7313489, int argc, object *args) /* object self_7313489, object r_735530 */
-- {
++static void __lambda_561(void *data, object self_7312236, int argc, object *args) /* object self_7312236, object r_735078 */
+  {
 - object r_735530 = args[0];
--  
++ object r_735078 = args[0];
+   
 -object c_7319415 = Cyc_list2string(data,  ((closureN)self_7313489)->elements[0],r_735530);
 -return_direct_with_clo1(data,  ((closureN)self_7313489)->elements[0], (((closure)  ((closureN)self_7313489)->elements[0])->fn),  c_7319415);; 
--}
--
++object c_7318115 = Cyc_list2string(data,  ((closureN)self_7312236)->elements[0],r_735078);
++return_direct_with_clo1(data,  ((closureN)self_7312236)->elements[0], (((closure)  ((closureN)self_7312236)->elements[0])->fn),  c_7318115);; 
+ }
+ 
 -static void __lambda_546(void *data, object _, int argc, object *args) /* closure _,object k_735508, object str_73667_733252, object fill_73668_733253, object opts_73669_733254_raw, ... */
-- {
++static void __lambda_546(void *data, object _, int argc, object *args) /* closure _,object k_735056, object str_73667_732905, object fill_73668_732906, object opts_73669_732907_raw, ... */
+  {
 -object k_735508 = args[0]; object str_73667_733252 = args[1]; object fill_73668_733253 = args[2];
 -load_varargs(opts_73669_733254, args, 3, argc - 3);
--  Cyc_st_add(data, "scheme/base.sld:string-fill!");
--
++object k_735056 = args[0]; object str_73667_732905 = args[1]; object fill_73668_732906 = args[2];
++load_varargs(opts_73669_732907, args, 3, argc - 3);
+   Cyc_st_add(data, "scheme/base.sld:string-fill!");
+ 
 -closureN_type c_7319277;
 -object e_7319403 [4];
 -c_7319277.hdr.mark = gc_color_red;
@@ -44218,14 +44475,30 @@ Make let-values be the same as let*-values, to work around
 -c_7319277.elements[1] = k_735508;
 -c_7319277.elements[2] = opts_73669_733254;
 -c_7319277.elements[3] = str_73667_733252;
--
++closureN_type c_7317977;
++object e_7318103 [4];
++c_7317977.hdr.mark = gc_color_red;
++ c_7317977.hdr.grayed = 0;
++c_7317977.tag = closureN_tag;
++ c_7317977.fn = (function_type)__lambda_547;
++c_7317977.num_args = 4;
++c_7317977.num_elements = 4;
++c_7317977.elements = (object *)e_7318103;
++c_7317977.elements[0] = fill_73668_732906;
++c_7317977.elements[1] = k_735056;
++c_7317977.elements[2] = opts_73669_732907;
++c_7317977.elements[3] = str_73667_732905;
+ 
 -return_direct_with_clo4(data,(closure)&c_7319277,__lambda_547,  boolean_f, boolean_f, boolean_f, boolean_f);; 
--}
--
++return_direct_with_clo4(data,(closure)&c_7317977,__lambda_547,  boolean_f, boolean_f, boolean_f, boolean_f);; 
+ }
+ 
 -static void __lambda_547(void *data, object self_7313472, int argc, object *args) /* object self_7313472, object len_73670_733255, object start_73671_733256, object end_73672_733257, object loop_73673_733258 */
-- {
++static void __lambda_547(void *data, object self_7312219, int argc, object *args) /* object self_7312219, object len_73670_732908, object start_73671_732909, object end_73672_732910, object loop_73673_732911 */
+  {
 - object len_73670_733255 = args[0]; object start_73671_733256 = args[1]; object end_73672_733257 = args[2]; object loop_73673_733258 = args[3];
--  
++ object len_73670_732908 = args[0]; object start_73671_732909 = args[1]; object end_73672_732910 = args[2]; object loop_73673_732911 = args[3];
+   
 -closureN_type c_7319279;
 -object e_7319399 [7];
 -c_7319279.hdr.mark = gc_color_red;
@@ -44242,21 +44515,35 @@ Make let-values be the same as let*-values, to work around
 -c_7319279.elements[4] = ((closureN)self_7313472)->elements[2];
 -c_7319279.elements[5] = start_73671_733256;
 -c_7319279.elements[6] = ((closureN)self_7313472)->elements[3];
-+pair_type local_7318129; 
++closureN_type c_7317979;
++object e_7318099 [7];
++c_7317979.hdr.mark = gc_color_red;
++ c_7317979.hdr.grayed = 0;
++c_7317979.tag = closureN_tag;
++ c_7317979.fn = (function_type)__lambda_1342;
++c_7317979.num_args = 1;
++c_7317979.num_elements = 7;
++c_7317979.elements = (object *)e_7318099;
++c_7317979.elements[0] = end_73672_732910;
++c_7317979.elements[1] = ((closureN)self_7312219)->elements[0];
++c_7317979.elements[2] = ((closureN)self_7312219)->elements[1];
++c_7317979.elements[3] = loop_73673_732911;
++c_7317979.elements[4] = ((closureN)self_7312219)->elements[2];
++c_7317979.elements[5] = start_73671_732909;
++c_7317979.elements[6] = ((closureN)self_7312219)->elements[3];
  
-+pair_type local_7318133; 
  
 -pair_type local_7319402; 
 -return_direct_with_clo1(data,(closure)&c_7319279,__lambda_1389,  set_cell_as_expr(&local_7319402, len_73670_733255));; 
-+object c_7318126 = apply(data,(closure)&c_7318117,__glo_map_scheme_base, set_pair_as_expr(&local_7318129, ((closureN)self_7312242)->elements[0], set_pair_as_expr(&local_7318133, ((closureN)self_7312242)->elements[2], r_735089)));
-+return_closcall1(data,(closure)&c_7318117,  c_7318126);; 
++pair_type local_7318102; 
++return_direct_with_clo1(data,(closure)&c_7317979,__lambda_1342,  set_cell_as_expr(&local_7318102, len_73670_732908));; 
  }
  
 -static void __lambda_1389(void *data, object self_7313473, int argc, object *args) /* object self_7313473, object len_73670_733255 */
-+static void __lambda_561(void *data, object self_7312243, int argc, object *args) /* object self_7312243, object r_735085 */
++static void __lambda_1342(void *data, object self_7312220, int argc, object *args) /* object self_7312220, object len_73670_732908 */
   {
 - object len_73670_733255 = args[0];
-+ object r_735085 = args[0];
++ object len_73670_732908 = args[0];
    
 -closureN_type c_7319281;
 -object e_7319394 [7];
@@ -44274,19 +44561,36 @@ Make let-values be the same as let*-values, to work around
 -c_7319281.elements[4] = ((closureN)self_7313473)->elements[3];
 -c_7319281.elements[5] = ((closureN)self_7313473)->elements[4];
 -c_7319281.elements[6] = ((closureN)self_7313473)->elements[6];
--
--
++closureN_type c_7317981;
++object e_7318094 [7];
++c_7317981.hdr.mark = gc_color_red;
++ c_7317981.hdr.grayed = 0;
++c_7317981.tag = closureN_tag;
++ c_7317981.fn = (function_type)__lambda_1341;
++c_7317981.num_args = 1;
++c_7317981.num_elements = 7;
++c_7317981.elements = (object *)e_7318094;
++c_7317981.elements[0] = ((closureN)self_7312220)->elements[0];
++c_7317981.elements[1] = ((closureN)self_7312220)->elements[1];
++c_7317981.elements[2] = ((closureN)self_7312220)->elements[2];
++c_7317981.elements[3] = len_73670_732908;
++c_7317981.elements[4] = ((closureN)self_7312220)->elements[3];
++c_7317981.elements[5] = ((closureN)self_7312220)->elements[4];
++c_7317981.elements[6] = ((closureN)self_7312220)->elements[6];
+ 
+ 
 -pair_type local_7319397; 
 -return_direct_with_clo1(data,(closure)&c_7319281,__lambda_1388,  set_cell_as_expr(&local_7319397, ((closureN)self_7313473)->elements[5]));; 
-+object c_7318122 = Cyc_list2string(data,  ((closureN)self_7312243)->elements[0],r_735085);
-+return_direct_with_clo1(data,  ((closureN)self_7312243)->elements[0], (((closure)  ((closureN)self_7312243)->elements[0])->fn),  c_7318122);; 
++pair_type local_7318097; 
++return_direct_with_clo1(data,(closure)&c_7317981,__lambda_1341,  set_cell_as_expr(&local_7318097, ((closureN)self_7312220)->elements[5]));; 
  }
  
 -static void __lambda_1388(void *data, object self_7313474, int argc, object *args) /* object self_7313474, object start_73671_733256 */
-+static void __lambda_546(void *data, object _, int argc, object *args) /* closure _,object k_735063, object str_73667_732912, object fill_73668_732913, object opts_73669_732914_raw, ... */
++static void __lambda_1341(void *data, object self_7312221, int argc, object *args) /* object self_7312221, object start_73671_732909 */
   {
 - object start_73671_733256 = args[0];
--  
++ object start_73671_732909 = args[0];
+   
 -closureN_type c_7319283;
 -object e_7319389 [7];
 -c_7319283.hdr.mark = gc_color_red;
@@ -44303,34 +44607,35 @@ Make let-values be the same as let*-values, to work around
 -c_7319283.elements[4] = ((closureN)self_7313474)->elements[5];
 -c_7319283.elements[5] = start_73671_733256;
 -c_7319283.elements[6] = ((closureN)self_7313474)->elements[6];
-+object k_735063 = args[0]; object str_73667_732912 = args[1]; object fill_73668_732913 = args[2];
-+load_varargs(opts_73669_732914, args, 3, argc - 3);
-+  Cyc_st_add(data, "base.sld:string-fill!");
- 
-+closureN_type c_7317984;
-+object e_7318110 [4];
-+c_7317984.hdr.mark = gc_color_red;
-+ c_7317984.hdr.grayed = 0;
-+c_7317984.tag = closureN_tag;
-+ c_7317984.fn = (function_type)__lambda_547;
-+c_7317984.num_args = 4;
-+c_7317984.num_elements = 4;
-+c_7317984.elements = (object *)e_7318110;
-+c_7317984.elements[0] = fill_73668_732913;
-+c_7317984.elements[1] = k_735063;
-+c_7317984.elements[2] = opts_73669_732914;
-+c_7317984.elements[3] = str_73667_732912;
++closureN_type c_7317983;
++object e_7318089 [7];
++c_7317983.hdr.mark = gc_color_red;
++ c_7317983.hdr.grayed = 0;
++c_7317983.tag = closureN_tag;
++ c_7317983.fn = (function_type)__lambda_1340;
++c_7317983.num_args = 1;
++c_7317983.num_elements = 7;
++c_7317983.elements = (object *)e_7318089;
++c_7317983.elements[0] = ((closureN)self_7312221)->elements[1];
++c_7317983.elements[1] = ((closureN)self_7312221)->elements[2];
++c_7317983.elements[2] = ((closureN)self_7312221)->elements[3];
++c_7317983.elements[3] = ((closureN)self_7312221)->elements[4];
++c_7317983.elements[4] = ((closureN)self_7312221)->elements[5];
++c_7317983.elements[5] = start_73671_732909;
++c_7317983.elements[6] = ((closureN)self_7312221)->elements[6];
+ 
  
 -pair_type local_7319392; 
 -return_direct_with_clo1(data,(closure)&c_7319283,__lambda_1387,  set_cell_as_expr(&local_7319392, ((closureN)self_7313474)->elements[0]));; 
-+return_direct_with_clo4(data,(closure)&c_7317984,__lambda_547,  boolean_f, boolean_f, boolean_f, boolean_f);; 
++pair_type local_7318092; 
++return_direct_with_clo1(data,(closure)&c_7317983,__lambda_1340,  set_cell_as_expr(&local_7318092, ((closureN)self_7312221)->elements[0]));; 
  }
  
 -static void __lambda_1387(void *data, object self_7313475, int argc, object *args) /* object self_7313475, object end_73672_733257 */
-+static void __lambda_547(void *data, object self_7312226, int argc, object *args) /* object self_7312226, object len_73670_732915, object start_73671_732916, object end_73672_732917, object loop_73673_732918 */
++static void __lambda_1340(void *data, object self_7312222, int argc, object *args) /* object self_7312222, object end_73672_732910 */
   {
 - object end_73672_733257 = args[0];
-+ object len_73670_732915 = args[0]; object start_73671_732916 = args[1]; object end_73672_732917 = args[2]; object loop_73673_732918 = args[3];
++ object end_73672_732910 = args[0];
    
 -closureN_type c_7319285;
 -object e_7319384 [7];
@@ -44348,35 +44653,35 @@ Make let-values be the same as let*-values, to work around
 -c_7319285.elements[4] = ((closureN)self_7313475)->elements[4];
 -c_7319285.elements[5] = ((closureN)self_7313475)->elements[5];
 -c_7319285.elements[6] = ((closureN)self_7313475)->elements[6];
-+closureN_type c_7317986;
-+object e_7318106 [7];
-+c_7317986.hdr.mark = gc_color_red;
-+ c_7317986.hdr.grayed = 0;
-+c_7317986.tag = closureN_tag;
-+ c_7317986.fn = (function_type)__lambda_1342;
-+c_7317986.num_args = 1;
-+c_7317986.num_elements = 7;
-+c_7317986.elements = (object *)e_7318106;
-+c_7317986.elements[0] = end_73672_732917;
-+c_7317986.elements[1] = ((closureN)self_7312226)->elements[0];
-+c_7317986.elements[2] = ((closureN)self_7312226)->elements[1];
-+c_7317986.elements[3] = loop_73673_732918;
-+c_7317986.elements[4] = ((closureN)self_7312226)->elements[2];
-+c_7317986.elements[5] = start_73671_732916;
-+c_7317986.elements[6] = ((closureN)self_7312226)->elements[3];
++closureN_type c_7317985;
++object e_7318084 [7];
++c_7317985.hdr.mark = gc_color_red;
++ c_7317985.hdr.grayed = 0;
++c_7317985.tag = closureN_tag;
++ c_7317985.fn = (function_type)__lambda_1339;
++c_7317985.num_args = 1;
++c_7317985.num_elements = 7;
++c_7317985.elements = (object *)e_7318084;
++c_7317985.elements[0] = end_73672_732910;
++c_7317985.elements[1] = ((closureN)self_7312222)->elements[0];
++c_7317985.elements[2] = ((closureN)self_7312222)->elements[1];
++c_7317985.elements[3] = ((closureN)self_7312222)->elements[2];
++c_7317985.elements[4] = ((closureN)self_7312222)->elements[4];
++c_7317985.elements[5] = ((closureN)self_7312222)->elements[5];
++c_7317985.elements[6] = ((closureN)self_7312222)->elements[6];
  
  
 -pair_type local_7319387; 
 -return_direct_with_clo1(data,(closure)&c_7319285,__lambda_1386,  set_cell_as_expr(&local_7319387, ((closureN)self_7313475)->elements[3]));; 
-+pair_type local_7318109; 
-+return_direct_with_clo1(data,(closure)&c_7317986,__lambda_1342,  set_cell_as_expr(&local_7318109, len_73670_732915));; 
++pair_type local_7318087; 
++return_direct_with_clo1(data,(closure)&c_7317985,__lambda_1339,  set_cell_as_expr(&local_7318087, ((closureN)self_7312222)->elements[3]));; 
  }
  
 -static void __lambda_1386(void *data, object self_7313476, int argc, object *args) /* object self_7313476, object loop_73673_733258 */
-+static void __lambda_1342(void *data, object self_7312227, int argc, object *args) /* object self_7312227, object len_73670_732915 */
++static void __lambda_1339(void *data, object self_7312223, int argc, object *args) /* object self_7312223, object loop_73673_732911 */
   {
 - object loop_73673_733258 = args[0];
-+ object len_73670_732915 = args[0];
++ object loop_73673_732911 = args[0];
    
 -closureN_type c_7319287;
 -object e_7319380 [8];
@@ -44395,113 +44700,35 @@ Make let-values be the same as let*-values, to work around
 -c_7319287.elements[5] = ((closureN)self_7313476)->elements[4];
 -c_7319287.elements[6] = ((closureN)self_7313476)->elements[5];
 -c_7319287.elements[7] = ((closureN)self_7313476)->elements[6];
-+closureN_type c_7317988;
-+object e_7318101 [7];
-+c_7317988.hdr.mark = gc_color_red;
-+ c_7317988.hdr.grayed = 0;
-+c_7317988.tag = closureN_tag;
-+ c_7317988.fn = (function_type)__lambda_1341;
-+c_7317988.num_args = 1;
-+c_7317988.num_elements = 7;
-+c_7317988.elements = (object *)e_7318101;
-+c_7317988.elements[0] = ((closureN)self_7312227)->elements[0];
-+c_7317988.elements[1] = ((closureN)self_7312227)->elements[1];
-+c_7317988.elements[2] = ((closureN)self_7312227)->elements[2];
-+c_7317988.elements[3] = len_73670_732915;
-+c_7317988.elements[4] = ((closureN)self_7312227)->elements[3];
-+c_7317988.elements[5] = ((closureN)self_7312227)->elements[4];
-+c_7317988.elements[6] = ((closureN)self_7312227)->elements[6];
-+
-+
-+pair_type local_7318104; 
-+return_direct_with_clo1(data,(closure)&c_7317988,__lambda_1341,  set_cell_as_expr(&local_7318104, ((closureN)self_7312227)->elements[5]));; 
-+}
-+
-+static void __lambda_1341(void *data, object self_7312228, int argc, object *args) /* object self_7312228, object start_73671_732916 */
-+ {
-+ object start_73671_732916 = args[0];
-+  
-+closureN_type c_7317990;
-+object e_7318096 [7];
-+c_7317990.hdr.mark = gc_color_red;
-+ c_7317990.hdr.grayed = 0;
-+c_7317990.tag = closureN_tag;
-+ c_7317990.fn = (function_type)__lambda_1340;
-+c_7317990.num_args = 1;
-+c_7317990.num_elements = 7;
-+c_7317990.elements = (object *)e_7318096;
-+c_7317990.elements[0] = ((closureN)self_7312228)->elements[1];
-+c_7317990.elements[1] = ((closureN)self_7312228)->elements[2];
-+c_7317990.elements[2] = ((closureN)self_7312228)->elements[3];
-+c_7317990.elements[3] = ((closureN)self_7312228)->elements[4];
-+c_7317990.elements[4] = ((closureN)self_7312228)->elements[5];
-+c_7317990.elements[5] = start_73671_732916;
-+c_7317990.elements[6] = ((closureN)self_7312228)->elements[6];
-+
-+
-+pair_type local_7318099; 
-+return_direct_with_clo1(data,(closure)&c_7317990,__lambda_1340,  set_cell_as_expr(&local_7318099, ((closureN)self_7312228)->elements[0]));; 
-+}
-+
-+static void __lambda_1340(void *data, object self_7312229, int argc, object *args) /* object self_7312229, object end_73672_732917 */
-+ {
-+ object end_73672_732917 = args[0];
-+  
-+closureN_type c_7317992;
-+object e_7318091 [7];
-+c_7317992.hdr.mark = gc_color_red;
-+ c_7317992.hdr.grayed = 0;
-+c_7317992.tag = closureN_tag;
-+ c_7317992.fn = (function_type)__lambda_1339;
-+c_7317992.num_args = 1;
-+c_7317992.num_elements = 7;
-+c_7317992.elements = (object *)e_7318091;
-+c_7317992.elements[0] = end_73672_732917;
-+c_7317992.elements[1] = ((closureN)self_7312229)->elements[0];
-+c_7317992.elements[2] = ((closureN)self_7312229)->elements[1];
-+c_7317992.elements[3] = ((closureN)self_7312229)->elements[2];
-+c_7317992.elements[4] = ((closureN)self_7312229)->elements[4];
-+c_7317992.elements[5] = ((closureN)self_7312229)->elements[5];
-+c_7317992.elements[6] = ((closureN)self_7312229)->elements[6];
-+
-+
-+pair_type local_7318094; 
-+return_direct_with_clo1(data,(closure)&c_7317992,__lambda_1339,  set_cell_as_expr(&local_7318094, ((closureN)self_7312229)->elements[3]));; 
-+}
-+
-+static void __lambda_1339(void *data, object self_7312230, int argc, object *args) /* object self_7312230, object loop_73673_732918 */
-+ {
-+ object loop_73673_732918 = args[0];
-+  
-+closureN_type c_7317994;
-+object e_7318087 [8];
-+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 = 8;
-+c_7317994.elements = (object *)e_7318087;
-+c_7317994.elements[0] = ((closureN)self_7312230)->elements[0];
-+c_7317994.elements[1] = ((closureN)self_7312230)->elements[1];
-+c_7317994.elements[2] = ((closureN)self_7312230)->elements[2];
-+c_7317994.elements[3] = ((closureN)self_7312230)->elements[3];
-+c_7317994.elements[4] = loop_73673_732918;
-+c_7317994.elements[5] = ((closureN)self_7312230)->elements[4];
-+c_7317994.elements[6] = ((closureN)self_7312230)->elements[5];
-+c_7317994.elements[7] = ((closureN)self_7312230)->elements[6];
++closureN_type c_7317987;
++object e_7318080 [8];
++c_7317987.hdr.mark = gc_color_red;
++ c_7317987.hdr.grayed = 0;
++c_7317987.tag = closureN_tag;
++ c_7317987.fn = (function_type)__lambda_548;
++c_7317987.num_args = 1;
++c_7317987.num_elements = 8;
++c_7317987.elements = (object *)e_7318080;
++c_7317987.elements[0] = ((closureN)self_7312223)->elements[0];
++c_7317987.elements[1] = ((closureN)self_7312223)->elements[1];
++c_7317987.elements[2] = ((closureN)self_7312223)->elements[2];
++c_7317987.elements[3] = ((closureN)self_7312223)->elements[3];
++c_7317987.elements[4] = loop_73673_732911;
++c_7317987.elements[5] = ((closureN)self_7312223)->elements[4];
++c_7317987.elements[6] = ((closureN)self_7312223)->elements[5];
++c_7317987.elements[7] = ((closureN)self_7312223)->elements[6];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7319287,__lambda_548,  Cyc_string_length(data, ((closureN)self_7313476)->elements[6]));; 
-+return_direct_with_clo1(data,(closure)&c_7317994,__lambda_548,  Cyc_string_length(data, ((closureN)self_7312230)->elements[6]));; 
++return_direct_with_clo1(data,(closure)&c_7317987,__lambda_548,  Cyc_string_length(data, ((closureN)self_7312223)->elements[6]));; 
  }
  
 -static void __lambda_548(void *data, object self_7313477, int argc, object *args) /* object self_7313477, object r_735526 */
-+static void __lambda_548(void *data, object self_7312231, int argc, object *args) /* object self_7312231, object r_735081 */
++static void __lambda_548(void *data, object self_7312224, int argc, object *args) /* object self_7312224, object r_735074 */
   {
 - object r_735526 = args[0];
-+ object r_735081 = args[0];
++ object r_735074 = args[0];
    
 -closureN_type c_7319289;
 -object e_7319376 [8];
@@ -44520,46 +44747,46 @@ Make let-values be the same as let*-values, to work around
 -c_7319289.elements[5] = ((closureN)self_7313477)->elements[5];
 -c_7319289.elements[6] = ((closureN)self_7313477)->elements[6];
 -c_7319289.elements[7] = ((closureN)self_7313477)->elements[7];
-+closureN_type c_7317996;
-+object e_7318083 [8];
-+c_7317996.hdr.mark = gc_color_red;
-+ c_7317996.hdr.grayed = 0;
-+c_7317996.tag = closureN_tag;
-+ c_7317996.fn = (function_type)__lambda_549;
-+c_7317996.num_args = 1;
-+c_7317996.num_elements = 8;
-+c_7317996.elements = (object *)e_7318083;
-+c_7317996.elements[0] = ((closureN)self_7312231)->elements[0];
-+c_7317996.elements[1] = ((closureN)self_7312231)->elements[1];
-+c_7317996.elements[2] = ((closureN)self_7312231)->elements[2];
-+c_7317996.elements[3] = ((closureN)self_7312231)->elements[3];
-+c_7317996.elements[4] = ((closureN)self_7312231)->elements[4];
-+c_7317996.elements[5] = ((closureN)self_7312231)->elements[5];
-+c_7317996.elements[6] = ((closureN)self_7312231)->elements[6];
-+c_7317996.elements[7] = ((closureN)self_7312231)->elements[7];
++closureN_type c_7317989;
++object e_7318076 [8];
++c_7317989.hdr.mark = gc_color_red;
++ c_7317989.hdr.grayed = 0;
++c_7317989.tag = closureN_tag;
++ c_7317989.fn = (function_type)__lambda_549;
++c_7317989.num_args = 1;
++c_7317989.num_elements = 8;
++c_7317989.elements = (object *)e_7318076;
++c_7317989.elements[0] = ((closureN)self_7312224)->elements[0];
++c_7317989.elements[1] = ((closureN)self_7312224)->elements[1];
++c_7317989.elements[2] = ((closureN)self_7312224)->elements[2];
++c_7317989.elements[3] = ((closureN)self_7312224)->elements[3];
++c_7317989.elements[4] = ((closureN)self_7312224)->elements[4];
++c_7317989.elements[5] = ((closureN)self_7312224)->elements[5];
++c_7317989.elements[6] = ((closureN)self_7312224)->elements[6];
++c_7317989.elements[7] = ((closureN)self_7312224)->elements[7];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7319289,__lambda_549,  Cyc_set_cell(data, ((closureN)self_7313477)->elements[3], r_735526));; 
-+return_direct_with_clo1(data,(closure)&c_7317996,__lambda_549,  Cyc_set_cell(data, ((closureN)self_7312231)->elements[3], r_735081));; 
++return_direct_with_clo1(data,(closure)&c_7317989,__lambda_549,  Cyc_set_cell(data, ((closureN)self_7312224)->elements[3], r_735074));; 
  }
  
 -static void __lambda_549(void *data, object self_7313478, int argc, object *args) /* object self_7313478, object r_735509 */
-+static void __lambda_549(void *data, object self_7312232, int argc, object *args) /* object self_7312232, object r_735064 */
++static void __lambda_549(void *data, object self_7312225, int argc, object *args) /* object self_7312225, object r_735057 */
   {
  
 -  object r_735522;
-+  object r_735077;
++  object r_735070;
      
    
 -if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313478)->elements[5]), obj_int2obj(0))) ){ 
-+if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312232)->elements[5]), obj_int2obj(0))) ){ 
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312225)->elements[5]), obj_int2obj(0))) ){ 
    
 -  r_735522 = Cyc_car(data, ((closureN)self_7313478)->elements[5]);
-+  r_735077 = Cyc_car(data, ((closureN)self_7312232)->elements[5]);
++  r_735070 = Cyc_car(data, ((closureN)self_7312225)->elements[5]);
  } else { 
 -  r_735522 = obj_int2obj(0);}
-+  r_735077 = obj_int2obj(0);}
++  r_735070 = obj_int2obj(0);}
  ;
 -closureN_type c_7319302;
 -object e_7319372 [8];
@@ -44578,32 +44805,32 @@ Make let-values be the same as let*-values, to work around
 -c_7319302.elements[5] = ((closureN)self_7313478)->elements[5];
 -c_7319302.elements[6] = ((closureN)self_7313478)->elements[6];
 -c_7319302.elements[7] = ((closureN)self_7313478)->elements[7];
-+closureN_type c_7318009;
-+object e_7318079 [8];
-+c_7318009.hdr.mark = gc_color_red;
-+ c_7318009.hdr.grayed = 0;
-+c_7318009.tag = closureN_tag;
-+ c_7318009.fn = (function_type)__lambda_550;
-+c_7318009.num_args = 1;
-+c_7318009.num_elements = 8;
-+c_7318009.elements = (object *)e_7318079;
-+c_7318009.elements[0] = ((closureN)self_7312232)->elements[0];
-+c_7318009.elements[1] = ((closureN)self_7312232)->elements[1];
-+c_7318009.elements[2] = ((closureN)self_7312232)->elements[2];
-+c_7318009.elements[3] = ((closureN)self_7312232)->elements[3];
-+c_7318009.elements[4] = ((closureN)self_7312232)->elements[4];
-+c_7318009.elements[5] = ((closureN)self_7312232)->elements[5];
-+c_7318009.elements[6] = ((closureN)self_7312232)->elements[6];
-+c_7318009.elements[7] = ((closureN)self_7312232)->elements[7];
++closureN_type c_7318002;
++object e_7318072 [8];
++c_7318002.hdr.mark = gc_color_red;
++ c_7318002.hdr.grayed = 0;
++c_7318002.tag = closureN_tag;
++ c_7318002.fn = (function_type)__lambda_550;
++c_7318002.num_args = 1;
++c_7318002.num_elements = 8;
++c_7318002.elements = (object *)e_7318072;
++c_7318002.elements[0] = ((closureN)self_7312225)->elements[0];
++c_7318002.elements[1] = ((closureN)self_7312225)->elements[1];
++c_7318002.elements[2] = ((closureN)self_7312225)->elements[2];
++c_7318002.elements[3] = ((closureN)self_7312225)->elements[3];
++c_7318002.elements[4] = ((closureN)self_7312225)->elements[4];
++c_7318002.elements[5] = ((closureN)self_7312225)->elements[5];
++c_7318002.elements[6] = ((closureN)self_7312225)->elements[6];
++c_7318002.elements[7] = ((closureN)self_7312225)->elements[7];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7319302,__lambda_550,  Cyc_set_cell(data, ((closureN)self_7313478)->elements[6], r_735522));; 
-+return_direct_with_clo1(data,(closure)&c_7318009,__lambda_550,  Cyc_set_cell(data, ((closureN)self_7312232)->elements[6], r_735077));; 
++return_direct_with_clo1(data,(closure)&c_7318002,__lambda_550,  Cyc_set_cell(data, ((closureN)self_7312225)->elements[6], r_735070));; 
  }
  
 -static void __lambda_550(void *data, object self_7313479, int argc, object *args) /* object self_7313479, object r_735510 */
-+static void __lambda_550(void *data, object self_7312233, int argc, object *args) /* object self_7312233, object r_735065 */
++static void __lambda_550(void *data, object self_7312226, int argc, object *args) /* object self_7312226, object r_735058 */
   {
  
    
@@ -44618,17 +44845,17 @@ Make let-values be the same as let*-values, to work around
 -c_7319304.elements = (object *)e_7319318;
 -c_7319304.elements[0] = ((closureN)self_7313479)->elements[3];
 -c_7319304.elements[1] = ((closureN)self_7313479)->elements[5];
-+closureN_type c_7318011;
-+object e_7318025 [2];
-+c_7318011.hdr.mark = gc_color_red;
-+ c_7318011.hdr.grayed = 0;
-+c_7318011.tag = closureN_tag;
-+ c_7318011.fn = (function_type)__lambda_551;
-+c_7318011.num_args = 0;
-+c_7318011.num_elements = 2;
-+c_7318011.elements = (object *)e_7318025;
-+c_7318011.elements[0] = ((closureN)self_7312233)->elements[3];
-+c_7318011.elements[1] = ((closureN)self_7312233)->elements[5];
++closureN_type c_7318004;
++object e_7318018 [2];
++c_7318004.hdr.mark = gc_color_red;
++ c_7318004.hdr.grayed = 0;
++c_7318004.tag = closureN_tag;
++ c_7318004.fn = (function_type)__lambda_551;
++c_7318004.num_args = 0;
++c_7318004.num_elements = 2;
++c_7318004.elements = (object *)e_7318018;
++c_7318004.elements[0] = ((closureN)self_7312226)->elements[3];
++c_7318004.elements[1] = ((closureN)self_7312226)->elements[5];
  
  
 -closureN_type c_7319319;
@@ -44646,31 +44873,31 @@ Make let-values be the same as let*-values, to work around
 -c_7319319.elements[3] = ((closureN)self_7313479)->elements[4];
 -c_7319319.elements[4] = ((closureN)self_7313479)->elements[6];
 -c_7319319.elements[5] = ((closureN)self_7313479)->elements[7];
-+closureN_type c_7318026;
-+object e_7318078 [6];
-+c_7318026.hdr.mark = gc_color_red;
-+ c_7318026.hdr.grayed = 0;
-+c_7318026.tag = closureN_tag;
-+ c_7318026.fn = (function_type)__lambda_552;
-+c_7318026.num_args = 1;
-+c_7318026.num_elements = 6;
-+c_7318026.elements = (object *)e_7318078;
-+c_7318026.elements[0] = ((closureN)self_7312233)->elements[0];
-+c_7318026.elements[1] = ((closureN)self_7312233)->elements[1];
-+c_7318026.elements[2] = ((closureN)self_7312233)->elements[2];
-+c_7318026.elements[3] = ((closureN)self_7312233)->elements[4];
-+c_7318026.elements[4] = ((closureN)self_7312233)->elements[6];
-+c_7318026.elements[5] = ((closureN)self_7312233)->elements[7];
++closureN_type c_7318019;
++object e_7318071 [6];
++c_7318019.hdr.mark = gc_color_red;
++ c_7318019.hdr.grayed = 0;
++c_7318019.tag = closureN_tag;
++ c_7318019.fn = (function_type)__lambda_552;
++c_7318019.num_args = 1;
++c_7318019.num_elements = 6;
++c_7318019.elements = (object *)e_7318071;
++c_7318019.elements[0] = ((closureN)self_7312226)->elements[0];
++c_7318019.elements[1] = ((closureN)self_7312226)->elements[1];
++c_7318019.elements[2] = ((closureN)self_7312226)->elements[2];
++c_7318019.elements[3] = ((closureN)self_7312226)->elements[4];
++c_7318019.elements[4] = ((closureN)self_7312226)->elements[6];
++c_7318019.elements[5] = ((closureN)self_7312226)->elements[7];
  
 -return_direct_with_clo1(data,(closure)&c_7319304,__lambda_551,  &c_7319319);; 
-+return_direct_with_clo1(data,(closure)&c_7318011,__lambda_551,  &c_7318026);; 
++return_direct_with_clo1(data,(closure)&c_7318004,__lambda_551,  &c_7318019);; 
  }
  
 -static void __lambda_552(void *data, object self_7313480, int argc, object *args) /* object self_7313480, object r_735518 */
-+static void __lambda_552(void *data, object self_7312234, int argc, object *args) /* object self_7312234, object r_735073 */
++static void __lambda_552(void *data, object self_7312227, int argc, object *args) /* object self_7312227, object r_735066 */
   {
 - object r_735518 = args[0];
-+ object r_735073 = args[0];
++ object r_735066 = args[0];
    
 -closureN_type c_7319321;
 -object e_7319367 [6];
@@ -44687,30 +44914,30 @@ Make let-values be the same as let*-values, to work around
 -c_7319321.elements[3] = ((closureN)self_7313480)->elements[3];
 -c_7319321.elements[4] = ((closureN)self_7313480)->elements[4];
 -c_7319321.elements[5] = ((closureN)self_7313480)->elements[5];
-+closureN_type c_7318028;
-+object e_7318074 [6];
-+c_7318028.hdr.mark = gc_color_red;
-+ c_7318028.hdr.grayed = 0;
-+c_7318028.tag = closureN_tag;
-+ c_7318028.fn = (function_type)__lambda_553;
-+c_7318028.num_args = 1;
-+c_7318028.num_elements = 6;
-+c_7318028.elements = (object *)e_7318074;
-+c_7318028.elements[0] = ((closureN)self_7312234)->elements[0];
-+c_7318028.elements[1] = ((closureN)self_7312234)->elements[1];
-+c_7318028.elements[2] = ((closureN)self_7312234)->elements[2];
-+c_7318028.elements[3] = ((closureN)self_7312234)->elements[3];
-+c_7318028.elements[4] = ((closureN)self_7312234)->elements[4];
-+c_7318028.elements[5] = ((closureN)self_7312234)->elements[5];
++closureN_type c_7318021;
++object e_7318067 [6];
++c_7318021.hdr.mark = gc_color_red;
++ c_7318021.hdr.grayed = 0;
++c_7318021.tag = closureN_tag;
++ c_7318021.fn = (function_type)__lambda_553;
++c_7318021.num_args = 1;
++c_7318021.num_elements = 6;
++c_7318021.elements = (object *)e_7318067;
++c_7318021.elements[0] = ((closureN)self_7312227)->elements[0];
++c_7318021.elements[1] = ((closureN)self_7312227)->elements[1];
++c_7318021.elements[2] = ((closureN)self_7312227)->elements[2];
++c_7318021.elements[3] = ((closureN)self_7312227)->elements[3];
++c_7318021.elements[4] = ((closureN)self_7312227)->elements[4];
++c_7318021.elements[5] = ((closureN)self_7312227)->elements[5];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7319321,__lambda_553,  Cyc_set_cell(data, ((closureN)self_7313480)->elements[0], r_735518));; 
-+return_direct_with_clo1(data,(closure)&c_7318028,__lambda_553,  Cyc_set_cell(data, ((closureN)self_7312234)->elements[0], r_735073));; 
++return_direct_with_clo1(data,(closure)&c_7318021,__lambda_553,  Cyc_set_cell(data, ((closureN)self_7312227)->elements[0], r_735066));; 
  }
  
 -static void __lambda_553(void *data, object self_7313481, int argc, object *args) /* object self_7313481, object r_735511 */
-+static void __lambda_553(void *data, object self_7312235, int argc, object *args) /* object self_7312235, object r_735066 */
++static void __lambda_553(void *data, object self_7312228, int argc, object *args) /* object self_7312228, object r_735059 */
   {
  
    
@@ -44726,18 +44953,18 @@ Make let-values be the same as let*-values, to work around
 -c_7319323.elements[0] = ((closureN)self_7313481)->elements[2];
 -c_7319323.elements[1] = ((closureN)self_7313481)->elements[3];
 -c_7319323.elements[2] = ((closureN)self_7313481)->elements[4];
-+closureN_type c_7318030;
-+object e_7318045 [3];
-+c_7318030.hdr.mark = gc_color_red;
-+ c_7318030.hdr.grayed = 0;
-+c_7318030.tag = closureN_tag;
-+ c_7318030.fn = (function_type)__lambda_554;
-+c_7318030.num_args = 1;
-+c_7318030.num_elements = 3;
-+c_7318030.elements = (object *)e_7318045;
-+c_7318030.elements[0] = ((closureN)self_7312235)->elements[2];
-+c_7318030.elements[1] = ((closureN)self_7312235)->elements[3];
-+c_7318030.elements[2] = ((closureN)self_7312235)->elements[4];
++closureN_type c_7318023;
++object e_7318038 [3];
++c_7318023.hdr.mark = gc_color_red;
++ c_7318023.hdr.grayed = 0;
++c_7318023.tag = closureN_tag;
++ c_7318023.fn = (function_type)__lambda_554;
++c_7318023.num_args = 1;
++c_7318023.num_elements = 3;
++c_7318023.elements = (object *)e_7318038;
++c_7318023.elements[0] = ((closureN)self_7312228)->elements[2];
++c_7318023.elements[1] = ((closureN)self_7312228)->elements[3];
++c_7318023.elements[2] = ((closureN)self_7312228)->elements[4];
  
  
 -closureN_type c_7319339;
@@ -44753,29 +44980,29 @@ Make let-values be the same as let*-values, to work around
 -c_7319339.elements[1] = ((closureN)self_7313481)->elements[1];
 -c_7319339.elements[2] = ((closureN)self_7313481)->elements[3];
 -c_7319339.elements[3] = ((closureN)self_7313481)->elements[5];
-+closureN_type c_7318046;
-+object e_7318073 [4];
-+c_7318046.hdr.mark = gc_color_red;
-+ c_7318046.hdr.grayed = 0;
-+c_7318046.tag = closureN_tag;
-+ c_7318046.fn = (function_type)__lambda_556;
-+c_7318046.num_args = 1;
-+c_7318046.num_elements = 4;
-+c_7318046.elements = (object *)e_7318073;
-+c_7318046.elements[0] = ((closureN)self_7312235)->elements[0];
-+c_7318046.elements[1] = ((closureN)self_7312235)->elements[1];
-+c_7318046.elements[2] = ((closureN)self_7312235)->elements[3];
-+c_7318046.elements[3] = ((closureN)self_7312235)->elements[5];
++closureN_type c_7318039;
++object e_7318066 [4];
++c_7318039.hdr.mark = gc_color_red;
++ c_7318039.hdr.grayed = 0;
++c_7318039.tag = closureN_tag;
++ c_7318039.fn = (function_type)__lambda_556;
++c_7318039.num_args = 1;
++c_7318039.num_elements = 4;
++c_7318039.elements = (object *)e_7318066;
++c_7318039.elements[0] = ((closureN)self_7312228)->elements[0];
++c_7318039.elements[1] = ((closureN)self_7312228)->elements[1];
++c_7318039.elements[2] = ((closureN)self_7312228)->elements[3];
++c_7318039.elements[3] = ((closureN)self_7312228)->elements[5];
  
 -return_direct_with_clo1(data,(closure)&c_7319323,__lambda_554,  &c_7319339);; 
-+return_direct_with_clo1(data,(closure)&c_7318030,__lambda_554,  &c_7318046);; 
++return_direct_with_clo1(data,(closure)&c_7318023,__lambda_554,  &c_7318039);; 
  }
  
 -static void __lambda_556(void *data, object self_7313482, int argc, object *args) /* object self_7313482, object k_735514, object i_73674_733259 */
-+static void __lambda_556(void *data, object self_7312236, int argc, object *args) /* object self_7312236, object k_735069, object i_73674_732919 */
++static void __lambda_556(void *data, object self_7312229, int argc, object *args) /* object self_7312229, object k_735062, object i_73674_732912 */
   {
 - object k_735514 = args[0]; object i_73674_733259 = args[1];
-+ object k_735069 = args[0]; object i_73674_732919 = args[1];
++ object k_735062 = args[0]; object i_73674_732912 = args[1];
    
 -closureN_type c_7319341;
 -object e_7319360 [5];
@@ -44791,56 +45018,56 @@ Make let-values be the same as let*-values, to work around
 -c_7319341.elements[2] = k_735514;
 -c_7319341.elements[3] = ((closureN)self_7313482)->elements[2];
 -c_7319341.elements[4] = ((closureN)self_7313482)->elements[3];
-+closureN_type c_7318048;
-+object e_7318067 [5];
-+c_7318048.hdr.mark = gc_color_red;
-+ c_7318048.hdr.grayed = 0;
-+c_7318048.tag = closureN_tag;
-+ c_7318048.fn = (function_type)__lambda_557;
-+c_7318048.num_args = 1;
-+c_7318048.num_elements = 5;
-+c_7318048.elements = (object *)e_7318067;
-+c_7318048.elements[0] = ((closureN)self_7312236)->elements[1];
-+c_7318048.elements[1] = i_73674_732919;
-+c_7318048.elements[2] = k_735069;
-+c_7318048.elements[3] = ((closureN)self_7312236)->elements[2];
-+c_7318048.elements[4] = ((closureN)self_7312236)->elements[3];
++closureN_type c_7318041;
++object e_7318060 [5];
++c_7318041.hdr.mark = gc_color_red;
++ c_7318041.hdr.grayed = 0;
++c_7318041.tag = closureN_tag;
++ c_7318041.fn = (function_type)__lambda_557;
++c_7318041.num_args = 1;
++c_7318041.num_elements = 5;
++c_7318041.elements = (object *)e_7318060;
++c_7318041.elements[0] = ((closureN)self_7312229)->elements[1];
++c_7318041.elements[1] = i_73674_732912;
++c_7318041.elements[2] = k_735062;
++c_7318041.elements[3] = ((closureN)self_7312229)->elements[2];
++c_7318041.elements[4] = ((closureN)self_7312229)->elements[3];
  
  
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7319341,__lambda_557,  Cyc_num_fast_eq_op(data, i_73674_733259, car(((closureN)self_7313482)->elements[0])));; 
-+return_direct_with_clo1(data,(closure)&c_7318048,__lambda_557,  Cyc_num_fast_eq_op(data, i_73674_732919, car(((closureN)self_7312236)->elements[0])));; 
++return_direct_with_clo1(data,(closure)&c_7318041,__lambda_557,  Cyc_num_fast_eq_op(data, i_73674_732912, car(((closureN)self_7312229)->elements[0])));; 
  }
  
 -static void __lambda_557(void *data, object self_7313483, int argc, object *args) /* object self_7313483, object r_735515 */
-+static void __lambda_557(void *data, object self_7312237, int argc, object *args) /* object self_7312237, object r_735070 */
++static void __lambda_557(void *data, object self_7312230, int argc, object *args) /* object self_7312230, object r_735063 */
   {
 - object r_735515 = args[0];
 -  if( (boolean_f != r_735515) ){ 
 -  return_direct_with_clo1(data,  ((closureN)self_7313483)->elements[2], (((closure)  ((closureN)self_7313483)->elements[2])->fn),  ((closureN)self_7313483)->elements[4]);
-+ object r_735070 = args[0];
-+  if( (boolean_f != r_735070) ){ 
-+  return_direct_with_clo1(data,  ((closureN)self_7312237)->elements[2], (((closure)  ((closureN)self_7312237)->elements[2])->fn),  ((closureN)self_7312237)->elements[4]);
++ object r_735063 = args[0];
++  if( (boolean_f != r_735063) ){ 
++  return_direct_with_clo1(data,  ((closureN)self_7312230)->elements[2], (((closure)  ((closureN)self_7312230)->elements[2])->fn),  ((closureN)self_7312230)->elements[4]);
  } else { 
    
 -  Cyc_string_set(data, ((closureN)self_7313483)->elements[4], ((closureN)self_7313483)->elements[1], ((closureN)self_7313483)->elements[0]);
-+  Cyc_string_set(data, ((closureN)self_7312237)->elements[4], ((closureN)self_7312237)->elements[1], ((closureN)self_7312237)->elements[0]);
++  Cyc_string_set(data, ((closureN)self_7312230)->elements[4], ((closureN)self_7312230)->elements[1], ((closureN)self_7312230)->elements[0]);
  
  
 -complex_num_type local_7319353; 
 -return_closcall2(data,  car(((closureN)self_7313483)->elements[3]),  ((closureN)self_7313483)->elements[2], Cyc_fast_sum(data,&local_7319353, ((closureN)self_7313483)->elements[1], obj_int2obj(1)));;}
-+complex_num_type local_7318060; 
-+return_closcall2(data,  car(((closureN)self_7312237)->elements[3]),  ((closureN)self_7312237)->elements[2], Cyc_fast_sum(data,&local_7318060, ((closureN)self_7312237)->elements[1], obj_int2obj(1)));;}
++complex_num_type local_7318053; 
++return_closcall2(data,  car(((closureN)self_7312230)->elements[3]),  ((closureN)self_7312230)->elements[2], Cyc_fast_sum(data,&local_7318053, ((closureN)self_7312230)->elements[1], obj_int2obj(1)));;}
  ;; 
  }
  
 -static void __lambda_554(void *data, object self_7313484, int argc, object *args) /* object self_7313484, object r_735513 */
-+static void __lambda_554(void *data, object self_7312238, int argc, object *args) /* object self_7312238, object r_735068 */
++static void __lambda_554(void *data, object self_7312231, int argc, object *args) /* object self_7312231, object r_735061 */
   {
 - object r_735513 = args[0];
-+ object r_735068 = args[0];
++ object r_735061 = args[0];
    
 -closureN_type c_7319325;
 -object e_7319334 [3];
@@ -44854,27 +45081,27 @@ Make let-values be the same as let*-values, to work around
 -c_7319325.elements[0] = ((closureN)self_7313484)->elements[0];
 -c_7319325.elements[1] = ((closureN)self_7313484)->elements[1];
 -c_7319325.elements[2] = ((closureN)self_7313484)->elements[2];
-+closureN_type c_7318032;
-+object e_7318041 [3];
-+c_7318032.hdr.mark = gc_color_red;
-+ c_7318032.hdr.grayed = 0;
-+c_7318032.tag = closureN_tag;
-+ c_7318032.fn = (function_type)__lambda_555;
-+c_7318032.num_args = 1;
-+c_7318032.num_elements = 3;
-+c_7318032.elements = (object *)e_7318041;
-+c_7318032.elements[0] = ((closureN)self_7312238)->elements[0];
-+c_7318032.elements[1] = ((closureN)self_7312238)->elements[1];
-+c_7318032.elements[2] = ((closureN)self_7312238)->elements[2];
++closureN_type c_7318025;
++object e_7318034 [3];
++c_7318025.hdr.mark = gc_color_red;
++ c_7318025.hdr.grayed = 0;
++c_7318025.tag = closureN_tag;
++ c_7318025.fn = (function_type)__lambda_555;
++c_7318025.num_args = 1;
++c_7318025.num_elements = 3;
++c_7318025.elements = (object *)e_7318034;
++c_7318025.elements[0] = ((closureN)self_7312231)->elements[0];
++c_7318025.elements[1] = ((closureN)self_7312231)->elements[1];
++c_7318025.elements[2] = ((closureN)self_7312231)->elements[2];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7319325,__lambda_555,  Cyc_set_cell(data, ((closureN)self_7313484)->elements[1], r_735513));; 
-+return_direct_with_clo1(data,(closure)&c_7318032,__lambda_555,  Cyc_set_cell(data, ((closureN)self_7312238)->elements[1], r_735068));; 
++return_direct_with_clo1(data,(closure)&c_7318025,__lambda_555,  Cyc_set_cell(data, ((closureN)self_7312231)->elements[1], r_735061));; 
  }
  
 -static void __lambda_555(void *data, object self_7313485, int argc, object *args) /* object self_7313485, object r_735512 */
-+static void __lambda_555(void *data, object self_7312239, int argc, object *args) /* object self_7312239, object r_735067 */
++static void __lambda_555(void *data, object self_7312232, int argc, object *args) /* object self_7312232, object r_735060 */
   {
  
    
@@ -44882,39 +45109,38 @@ Make let-values be the same as let*-values, to work around
  
  
 -return_closcall2(data,  car(((closureN)self_7313485)->elements[1]),  ((closureN)self_7313485)->elements[0], car(((closureN)self_7313485)->elements[2]));; 
-+return_closcall2(data,  car(((closureN)self_7312239)->elements[1]),  ((closureN)self_7312239)->elements[0], car(((closureN)self_7312239)->elements[2]));; 
++return_closcall2(data,  car(((closureN)self_7312232)->elements[1]),  ((closureN)self_7312232)->elements[0], car(((closureN)self_7312232)->elements[2]));; 
  }
  
 -static void __lambda_551(void *data, object self_7313486, int argc, object *args) /* object self_7313486, object k_735519 */
-+static void __lambda_551(void *data, object self_7312240, int argc, object *args) /* object self_7312240, object k_735074 */
++static void __lambda_551(void *data, object self_7312233, int argc, object *args) /* object self_7312233, object k_735067 */
   {
 - object k_735519 = args[0];
-+ object k_735074 = args[0];
++ object k_735067 = args[0];
      
    
 -if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313486)->elements[1]), obj_int2obj(1))) ){ 
-+if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312240)->elements[1]), obj_int2obj(1))) ){ 
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312233)->elements[1]), obj_int2obj(1))) ){ 
    
  
 -return_direct_with_clo1(data,  k_735519,__lambda_552,  Cyc_cadr(data, ((closureN)self_7313486)->elements[1]));
-+return_direct_with_clo1(data,  k_735074,__lambda_552,  Cyc_cadr(data, ((closureN)self_7312240)->elements[1]));
++return_direct_with_clo1(data,  k_735067,__lambda_552,  Cyc_cadr(data, ((closureN)self_7312233)->elements[1]));
  } else { 
    
  
 -return_direct_with_clo1(data,  k_735519,__lambda_552,  car(((closureN)self_7313486)->elements[0]));}
-+return_direct_with_clo1(data,  k_735074,__lambda_552,  car(((closureN)self_7312240)->elements[0]));}
++return_direct_with_clo1(data,  k_735067,__lambda_552,  car(((closureN)self_7312233)->elements[0]));}
  ;; 
  }
  
 -static void __lambda_536(void *data, object _, int argc, object *args) /* closure _,object k_735485, object to_73653_733242, object at_73654_733243, object from_73655_733244, object opts_73656_733245_raw, ... */
-+static void __lambda_536(void *data, object _, int argc, object *args) /* closure _,object k_735040, object to_73653_732902, object at_73654_732903, object from_73655_732904, object opts_73656_732905_raw, ... */
++static void __lambda_536(void *data, object _, int argc, object *args) /* closure _,object k_735033, object to_73653_732895, object at_73654_732896, object from_73655_732897, object opts_73656_732898_raw, ... */
   {
 -object k_735485 = args[0]; object to_73653_733242 = args[1]; object at_73654_733243 = args[2]; object from_73655_733244 = args[3];
 -load_varargs(opts_73656_733245, args, 4, argc - 4);
--  Cyc_st_add(data, "scheme/base.sld:string-copy!");
-+object k_735040 = args[0]; object to_73653_732902 = args[1]; object at_73654_732903 = args[2]; object from_73655_732904 = args[3];
-+load_varargs(opts_73656_732905, args, 4, argc - 4);
-+  Cyc_st_add(data, "base.sld:string-copy!");
++object k_735033 = args[0]; object to_73653_732895 = args[1]; object at_73654_732896 = args[2]; object from_73655_732897 = args[3];
++load_varargs(opts_73656_732898, args, 4, argc - 4);
+   Cyc_st_add(data, "scheme/base.sld:string-copy!");
  
 -closureN_type c_7319152;
 -object e_7319274 [5];
@@ -44930,31 +45156,53 @@ Make let-values be the same as let*-values, to work around
 -c_7319152.elements[2] = k_735485;
 -c_7319152.elements[3] = opts_73656_733245;
 -c_7319152.elements[4] = to_73653_733242;
-+closureN_type c_7317859;
-+object e_7317981 [5];
-+c_7317859.hdr.mark = gc_color_red;
-+ c_7317859.hdr.grayed = 0;
-+c_7317859.tag = closureN_tag;
-+ c_7317859.fn = (function_type)__lambda_537;
-+c_7317859.num_args = 4;
-+c_7317859.num_elements = 5;
-+c_7317859.elements = (object *)e_7317981;
-+c_7317859.elements[0] = at_73654_732903;
-+c_7317859.elements[1] = from_73655_732904;
-+c_7317859.elements[2] = k_735040;
-+c_7317859.elements[3] = opts_73656_732905;
-+c_7317859.elements[4] = to_73653_732902;
++closureN_type c_7317852;
++object e_7317974 [5];
++c_7317852.hdr.mark = gc_color_red;
++ c_7317852.hdr.grayed = 0;
++c_7317852.tag = closureN_tag;
++ c_7317852.fn = (function_type)__lambda_537;
++c_7317852.num_args = 4;
++c_7317852.num_elements = 5;
++c_7317852.elements = (object *)e_7317974;
++c_7317852.elements[0] = at_73654_732896;
++c_7317852.elements[1] = from_73655_732897;
++c_7317852.elements[2] = k_735033;
++c_7317852.elements[3] = opts_73656_732898;
++c_7317852.elements[4] = to_73653_732895;
++
++return_direct_with_clo4(data,(closure)&c_7317852,__lambda_537,  boolean_f, boolean_f, boolean_f, boolean_f);; 
++}
++
++static void __lambda_537(void *data, object self_7312206, int argc, object *args) /* object self_7312206, object len_73657_732899, object start_73658_732900, object end_73659_732901, object loop_73660_732902 */
++ {
++ object len_73657_732899 = args[0]; object start_73658_732900 = args[1]; object end_73659_732901 = args[2]; object loop_73660_732902 = args[3];
++  
++closureN_type c_7317854;
++object e_7317970 [8];
++c_7317854.hdr.mark = gc_color_red;
++ c_7317854.hdr.grayed = 0;
++c_7317854.tag = closureN_tag;
++ c_7317854.fn = (function_type)__lambda_1338;
++c_7317854.num_args = 1;
++c_7317854.num_elements = 8;
++c_7317854.elements = (object *)e_7317970;
++c_7317854.elements[0] = ((closureN)self_7312206)->elements[0];
++c_7317854.elements[1] = end_73659_732901;
++c_7317854.elements[2] = ((closureN)self_7312206)->elements[1];
++c_7317854.elements[3] = ((closureN)self_7312206)->elements[2];
++c_7317854.elements[4] = loop_73660_732902;
++c_7317854.elements[5] = ((closureN)self_7312206)->elements[3];
++c_7317854.elements[6] = start_73658_732900;
++c_7317854.elements[7] = ((closureN)self_7312206)->elements[4];
  
 -return_direct_with_clo4(data,(closure)&c_7319152,__lambda_537,  boolean_f, boolean_f, boolean_f, boolean_f);; 
-+return_direct_with_clo4(data,(closure)&c_7317859,__lambda_537,  boolean_f, boolean_f, boolean_f, boolean_f);; 
- }
- 
+-}
+-
 -static void __lambda_537(void *data, object self_7313459, int argc, object *args) /* object self_7313459, object len_73657_733246, object start_73658_733247, object end_73659_733248, object loop_73660_733249 */
-+static void __lambda_537(void *data, object self_7312213, int argc, object *args) /* object self_7312213, object len_73657_732906, object start_73658_732907, object end_73659_732908, object loop_73660_732909 */
-  {
+- {
 - object len_73657_733246 = args[0]; object start_73658_733247 = args[1]; object end_73659_733248 = args[2]; object loop_73660_733249 = args[3];
-+ object len_73657_732906 = args[0]; object start_73658_732907 = args[1]; object end_73659_732908 = args[2]; object loop_73660_732909 = args[3];
-   
+-  
 -closureN_type c_7319154;
 -object e_7319270 [8];
 -c_7319154.hdr.mark = gc_color_red;
@@ -44972,36 +45220,19 @@ Make let-values be the same as let*-values, to work around
 -c_7319154.elements[5] = ((closureN)self_7313459)->elements[3];
 -c_7319154.elements[6] = start_73658_733247;
 -c_7319154.elements[7] = ((closureN)self_7313459)->elements[4];
-+closureN_type c_7317861;
-+object e_7317977 [8];
-+c_7317861.hdr.mark = gc_color_red;
-+ c_7317861.hdr.grayed = 0;
-+c_7317861.tag = closureN_tag;
-+ c_7317861.fn = (function_type)__lambda_1338;
-+c_7317861.num_args = 1;
-+c_7317861.num_elements = 8;
-+c_7317861.elements = (object *)e_7317977;
-+c_7317861.elements[0] = ((closureN)self_7312213)->elements[0];
-+c_7317861.elements[1] = end_73659_732908;
-+c_7317861.elements[2] = ((closureN)self_7312213)->elements[1];
-+c_7317861.elements[3] = ((closureN)self_7312213)->elements[2];
-+c_7317861.elements[4] = loop_73660_732909;
-+c_7317861.elements[5] = ((closureN)self_7312213)->elements[3];
-+c_7317861.elements[6] = start_73658_732907;
-+c_7317861.elements[7] = ((closureN)self_7312213)->elements[4];
- 
  
+-
 -pair_type local_7319273; 
 -return_direct_with_clo1(data,(closure)&c_7319154,__lambda_1385,  set_cell_as_expr(&local_7319273, len_73657_733246));; 
-+pair_type local_7317980; 
-+return_direct_with_clo1(data,(closure)&c_7317861,__lambda_1338,  set_cell_as_expr(&local_7317980, len_73657_732906));; 
++pair_type local_7317973; 
++return_direct_with_clo1(data,(closure)&c_7317854,__lambda_1338,  set_cell_as_expr(&local_7317973, len_73657_732899));; 
  }
  
 -static void __lambda_1385(void *data, object self_7313460, int argc, object *args) /* object self_7313460, object len_73657_733246 */
-+static void __lambda_1338(void *data, object self_7312214, int argc, object *args) /* object self_7312214, object len_73657_732906 */
++static void __lambda_1338(void *data, object self_7312207, int argc, object *args) /* object self_7312207, object len_73657_732899 */
   {
 - object len_73657_733246 = args[0];
-+ object len_73657_732906 = args[0];
++ object len_73657_732899 = args[0];
    
 -closureN_type c_7319156;
 -object e_7319265 [8];
@@ -45020,36 +45251,36 @@ Make let-values be the same as let*-values, to work around
 -c_7319156.elements[5] = ((closureN)self_7313460)->elements[4];
 -c_7319156.elements[6] = ((closureN)self_7313460)->elements[5];
 -c_7319156.elements[7] = ((closureN)self_7313460)->elements[7];
-+closureN_type c_7317863;
-+object e_7317972 [8];
-+c_7317863.hdr.mark = gc_color_red;
-+ c_7317863.hdr.grayed = 0;
-+c_7317863.tag = closureN_tag;
-+ c_7317863.fn = (function_type)__lambda_1337;
-+c_7317863.num_args = 1;
-+c_7317863.num_elements = 8;
-+c_7317863.elements = (object *)e_7317972;
-+c_7317863.elements[0] = ((closureN)self_7312214)->elements[0];
-+c_7317863.elements[1] = ((closureN)self_7312214)->elements[1];
-+c_7317863.elements[2] = ((closureN)self_7312214)->elements[2];
-+c_7317863.elements[3] = ((closureN)self_7312214)->elements[3];
-+c_7317863.elements[4] = len_73657_732906;
-+c_7317863.elements[5] = ((closureN)self_7312214)->elements[4];
-+c_7317863.elements[6] = ((closureN)self_7312214)->elements[5];
-+c_7317863.elements[7] = ((closureN)self_7312214)->elements[7];
++closureN_type c_7317856;
++object e_7317965 [8];
++c_7317856.hdr.mark = gc_color_red;
++ c_7317856.hdr.grayed = 0;
++c_7317856.tag = closureN_tag;
++ c_7317856.fn = (function_type)__lambda_1337;
++c_7317856.num_args = 1;
++c_7317856.num_elements = 8;
++c_7317856.elements = (object *)e_7317965;
++c_7317856.elements[0] = ((closureN)self_7312207)->elements[0];
++c_7317856.elements[1] = ((closureN)self_7312207)->elements[1];
++c_7317856.elements[2] = ((closureN)self_7312207)->elements[2];
++c_7317856.elements[3] = ((closureN)self_7312207)->elements[3];
++c_7317856.elements[4] = len_73657_732899;
++c_7317856.elements[5] = ((closureN)self_7312207)->elements[4];
++c_7317856.elements[6] = ((closureN)self_7312207)->elements[5];
++c_7317856.elements[7] = ((closureN)self_7312207)->elements[7];
  
  
 -pair_type local_7319268; 
 -return_direct_with_clo1(data,(closure)&c_7319156,__lambda_1384,  set_cell_as_expr(&local_7319268, ((closureN)self_7313460)->elements[6]));; 
-+pair_type local_7317975; 
-+return_direct_with_clo1(data,(closure)&c_7317863,__lambda_1337,  set_cell_as_expr(&local_7317975, ((closureN)self_7312214)->elements[6]));; 
++pair_type local_7317968; 
++return_direct_with_clo1(data,(closure)&c_7317856,__lambda_1337,  set_cell_as_expr(&local_7317968, ((closureN)self_7312207)->elements[6]));; 
  }
  
 -static void __lambda_1384(void *data, object self_7313461, int argc, object *args) /* object self_7313461, object start_73658_733247 */
-+static void __lambda_1337(void *data, object self_7312215, int argc, object *args) /* object self_7312215, object start_73658_732907 */
++static void __lambda_1337(void *data, object self_7312208, int argc, object *args) /* object self_7312208, object start_73658_732900 */
   {
 - object start_73658_733247 = args[0];
-+ object start_73658_732907 = args[0];
++ object start_73658_732900 = args[0];
    
 -closureN_type c_7319158;
 -object e_7319260 [8];
@@ -45068,36 +45299,36 @@ Make let-values be the same as let*-values, to work around
 -c_7319158.elements[5] = ((closureN)self_7313461)->elements[6];
 -c_7319158.elements[6] = start_73658_733247;
 -c_7319158.elements[7] = ((closureN)self_7313461)->elements[7];
-+closureN_type c_7317865;
-+object e_7317967 [8];
-+c_7317865.hdr.mark = gc_color_red;
-+ c_7317865.hdr.grayed = 0;
-+c_7317865.tag = closureN_tag;
-+ c_7317865.fn = (function_type)__lambda_1336;
-+c_7317865.num_args = 1;
-+c_7317865.num_elements = 8;
-+c_7317865.elements = (object *)e_7317967;
-+c_7317865.elements[0] = ((closureN)self_7312215)->elements[0];
-+c_7317865.elements[1] = ((closureN)self_7312215)->elements[2];
-+c_7317865.elements[2] = ((closureN)self_7312215)->elements[3];
-+c_7317865.elements[3] = ((closureN)self_7312215)->elements[4];
-+c_7317865.elements[4] = ((closureN)self_7312215)->elements[5];
-+c_7317865.elements[5] = ((closureN)self_7312215)->elements[6];
-+c_7317865.elements[6] = start_73658_732907;
-+c_7317865.elements[7] = ((closureN)self_7312215)->elements[7];
++closureN_type c_7317858;
++object e_7317960 [8];
++c_7317858.hdr.mark = gc_color_red;
++ c_7317858.hdr.grayed = 0;
++c_7317858.tag = closureN_tag;
++ c_7317858.fn = (function_type)__lambda_1336;
++c_7317858.num_args = 1;
++c_7317858.num_elements = 8;
++c_7317858.elements = (object *)e_7317960;
++c_7317858.elements[0] = ((closureN)self_7312208)->elements[0];
++c_7317858.elements[1] = ((closureN)self_7312208)->elements[2];
++c_7317858.elements[2] = ((closureN)self_7312208)->elements[3];
++c_7317858.elements[3] = ((closureN)self_7312208)->elements[4];
++c_7317858.elements[4] = ((closureN)self_7312208)->elements[5];
++c_7317858.elements[5] = ((closureN)self_7312208)->elements[6];
++c_7317858.elements[6] = start_73658_732900;
++c_7317858.elements[7] = ((closureN)self_7312208)->elements[7];
  
  
 -pair_type local_7319263; 
 -return_direct_with_clo1(data,(closure)&c_7319158,__lambda_1383,  set_cell_as_expr(&local_7319263, ((closureN)self_7313461)->elements[1]));; 
-+pair_type local_7317970; 
-+return_direct_with_clo1(data,(closure)&c_7317865,__lambda_1336,  set_cell_as_expr(&local_7317970, ((closureN)self_7312215)->elements[1]));; 
++pair_type local_7317963; 
++return_direct_with_clo1(data,(closure)&c_7317858,__lambda_1336,  set_cell_as_expr(&local_7317963, ((closureN)self_7312208)->elements[1]));; 
  }
  
 -static void __lambda_1383(void *data, object self_7313462, int argc, object *args) /* object self_7313462, object end_73659_733248 */
-+static void __lambda_1336(void *data, object self_7312216, int argc, object *args) /* object self_7312216, object end_73659_732908 */
++static void __lambda_1336(void *data, object self_7312209, int argc, object *args) /* object self_7312209, object end_73659_732901 */
   {
 - object end_73659_733248 = args[0];
-+ object end_73659_732908 = args[0];
++ object end_73659_732901 = args[0];
    
 -closureN_type c_7319160;
 -object e_7319255 [8];
@@ -45116,36 +45347,36 @@ Make let-values be the same as let*-values, to work around
 -c_7319160.elements[5] = ((closureN)self_7313462)->elements[5];
 -c_7319160.elements[6] = ((closureN)self_7313462)->elements[6];
 -c_7319160.elements[7] = ((closureN)self_7313462)->elements[7];
-+closureN_type c_7317867;
-+object e_7317962 [8];
-+c_7317867.hdr.mark = gc_color_red;
-+ c_7317867.hdr.grayed = 0;
-+c_7317867.tag = closureN_tag;
-+ c_7317867.fn = (function_type)__lambda_1335;
-+c_7317867.num_args = 1;
-+c_7317867.num_elements = 8;
-+c_7317867.elements = (object *)e_7317962;
-+c_7317867.elements[0] = ((closureN)self_7312216)->elements[0];
-+c_7317867.elements[1] = end_73659_732908;
-+c_7317867.elements[2] = ((closureN)self_7312216)->elements[1];
-+c_7317867.elements[3] = ((closureN)self_7312216)->elements[2];
-+c_7317867.elements[4] = ((closureN)self_7312216)->elements[3];
-+c_7317867.elements[5] = ((closureN)self_7312216)->elements[5];
-+c_7317867.elements[6] = ((closureN)self_7312216)->elements[6];
-+c_7317867.elements[7] = ((closureN)self_7312216)->elements[7];
++closureN_type c_7317860;
++object e_7317955 [8];
++c_7317860.hdr.mark = gc_color_red;
++ c_7317860.hdr.grayed = 0;
++c_7317860.tag = closureN_tag;
++ c_7317860.fn = (function_type)__lambda_1335;
++c_7317860.num_args = 1;
++c_7317860.num_elements = 8;
++c_7317860.elements = (object *)e_7317955;
++c_7317860.elements[0] = ((closureN)self_7312209)->elements[0];
++c_7317860.elements[1] = end_73659_732901;
++c_7317860.elements[2] = ((closureN)self_7312209)->elements[1];
++c_7317860.elements[3] = ((closureN)self_7312209)->elements[2];
++c_7317860.elements[4] = ((closureN)self_7312209)->elements[3];
++c_7317860.elements[5] = ((closureN)self_7312209)->elements[5];
++c_7317860.elements[6] = ((closureN)self_7312209)->elements[6];
++c_7317860.elements[7] = ((closureN)self_7312209)->elements[7];
  
  
 -pair_type local_7319258; 
 -return_direct_with_clo1(data,(closure)&c_7319160,__lambda_1382,  set_cell_as_expr(&local_7319258, ((closureN)self_7313462)->elements[4]));; 
-+pair_type local_7317965; 
-+return_direct_with_clo1(data,(closure)&c_7317867,__lambda_1335,  set_cell_as_expr(&local_7317965, ((closureN)self_7312216)->elements[4]));; 
++pair_type local_7317958; 
++return_direct_with_clo1(data,(closure)&c_7317860,__lambda_1335,  set_cell_as_expr(&local_7317958, ((closureN)self_7312209)->elements[4]));; 
  }
  
 -static void __lambda_1382(void *data, object self_7313463, int argc, object *args) /* object self_7313463, object loop_73660_733249 */
-+static void __lambda_1335(void *data, object self_7312217, int argc, object *args) /* object self_7312217, object loop_73660_732909 */
++static void __lambda_1335(void *data, object self_7312210, int argc, object *args) /* object self_7312210, object loop_73660_732902 */
   {
 - object loop_73660_733249 = args[0];
-+ object loop_73660_732909 = args[0];
++ object loop_73660_732902 = args[0];
    
 -closureN_type c_7319162;
 -object e_7319248 [9];
@@ -45165,49 +45396,49 @@ Make let-values be the same as let*-values, to work around
 -c_7319162.elements[6] = ((closureN)self_7313463)->elements[5];
 -c_7319162.elements[7] = ((closureN)self_7313463)->elements[6];
 -c_7319162.elements[8] = ((closureN)self_7313463)->elements[7];
-+closureN_type c_7317869;
-+object e_7317955 [9];
-+c_7317869.hdr.mark = gc_color_red;
-+ c_7317869.hdr.grayed = 0;
-+c_7317869.tag = closureN_tag;
-+ c_7317869.fn = (function_type)__lambda_538;
-+c_7317869.num_args = 1;
-+c_7317869.num_elements = 9;
-+c_7317869.elements = (object *)e_7317955;
-+c_7317869.elements[0] = ((closureN)self_7312217)->elements[0];
-+c_7317869.elements[1] = ((closureN)self_7312217)->elements[1];
-+c_7317869.elements[2] = ((closureN)self_7312217)->elements[2];
-+c_7317869.elements[3] = ((closureN)self_7312217)->elements[3];
-+c_7317869.elements[4] = ((closureN)self_7312217)->elements[4];
-+c_7317869.elements[5] = loop_73660_732909;
-+c_7317869.elements[6] = ((closureN)self_7312217)->elements[5];
-+c_7317869.elements[7] = ((closureN)self_7312217)->elements[6];
-+c_7317869.elements[8] = ((closureN)self_7312217)->elements[7];
++closureN_type c_7317862;
++object e_7317948 [9];
++c_7317862.hdr.mark = gc_color_red;
++ c_7317862.hdr.grayed = 0;
++c_7317862.tag = closureN_tag;
++ c_7317862.fn = (function_type)__lambda_538;
++c_7317862.num_args = 1;
++c_7317862.num_elements = 9;
++c_7317862.elements = (object *)e_7317948;
++c_7317862.elements[0] = ((closureN)self_7312210)->elements[0];
++c_7317862.elements[1] = ((closureN)self_7312210)->elements[1];
++c_7317862.elements[2] = ((closureN)self_7312210)->elements[2];
++c_7317862.elements[3] = ((closureN)self_7312210)->elements[3];
++c_7317862.elements[4] = ((closureN)self_7312210)->elements[4];
++c_7317862.elements[5] = loop_73660_732902;
++c_7317862.elements[6] = ((closureN)self_7312210)->elements[5];
++c_7317862.elements[7] = ((closureN)self_7312210)->elements[6];
++c_7317862.elements[8] = ((closureN)self_7312210)->elements[7];
  
  
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7319162,__lambda_538,  Cyc_set_cell(data, ((closureN)self_7313463)->elements[4], Cyc_string_length(data, ((closureN)self_7313463)->elements[2])));; 
-+return_direct_with_clo1(data,(closure)&c_7317869,__lambda_538,  Cyc_set_cell(data, ((closureN)self_7312217)->elements[4], Cyc_string_length(data, ((closureN)self_7312217)->elements[2])));; 
++return_direct_with_clo1(data,(closure)&c_7317862,__lambda_538,  Cyc_set_cell(data, ((closureN)self_7312210)->elements[4], Cyc_string_length(data, ((closureN)self_7312210)->elements[2])));; 
  }
  
 -static void __lambda_538(void *data, object self_7313464, int argc, object *args) /* object self_7313464, object r_735486 */
-+static void __lambda_538(void *data, object self_7312218, int argc, object *args) /* object self_7312218, object r_735041 */
++static void __lambda_538(void *data, object self_7312211, int argc, object *args) /* object self_7312211, object r_735034 */
   {
  
 -  object r_735501;
-+  object r_735056;
++  object r_735049;
      
    
 -if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313464)->elements[6]), obj_int2obj(0))) ){ 
-+if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312218)->elements[6]), obj_int2obj(0))) ){ 
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312211)->elements[6]), obj_int2obj(0))) ){ 
    
 -  r_735501 = Cyc_car(data, ((closureN)self_7313464)->elements[6]);
-+  r_735056 = Cyc_car(data, ((closureN)self_7312218)->elements[6]);
++  r_735049 = Cyc_car(data, ((closureN)self_7312211)->elements[6]);
  } else { 
 -  r_735501 = obj_int2obj(0);}
-+  r_735056 = obj_int2obj(0);}
++  r_735049 = obj_int2obj(0);}
  ;
 -closureN_type c_7319175;
 -object e_7319244 [9];
@@ -45227,33 +45458,33 @@ Make let-values be the same as let*-values, to work around
 -c_7319175.elements[6] = ((closureN)self_7313464)->elements[6];
 -c_7319175.elements[7] = ((closureN)self_7313464)->elements[7];
 -c_7319175.elements[8] = ((closureN)self_7313464)->elements[8];
-+closureN_type c_7317882;
-+object e_7317951 [9];
-+c_7317882.hdr.mark = gc_color_red;
-+ c_7317882.hdr.grayed = 0;
-+c_7317882.tag = closureN_tag;
-+ c_7317882.fn = (function_type)__lambda_539;
-+c_7317882.num_args = 1;
-+c_7317882.num_elements = 9;
-+c_7317882.elements = (object *)e_7317951;
-+c_7317882.elements[0] = ((closureN)self_7312218)->elements[0];
-+c_7317882.elements[1] = ((closureN)self_7312218)->elements[1];
-+c_7317882.elements[2] = ((closureN)self_7312218)->elements[2];
-+c_7317882.elements[3] = ((closureN)self_7312218)->elements[3];
-+c_7317882.elements[4] = ((closureN)self_7312218)->elements[4];
-+c_7317882.elements[5] = ((closureN)self_7312218)->elements[5];
-+c_7317882.elements[6] = ((closureN)self_7312218)->elements[6];
-+c_7317882.elements[7] = ((closureN)self_7312218)->elements[7];
-+c_7317882.elements[8] = ((closureN)self_7312218)->elements[8];
++closureN_type c_7317875;
++object e_7317944 [9];
++c_7317875.hdr.mark = gc_color_red;
++ c_7317875.hdr.grayed = 0;
++c_7317875.tag = closureN_tag;
++ c_7317875.fn = (function_type)__lambda_539;
++c_7317875.num_args = 1;
++c_7317875.num_elements = 9;
++c_7317875.elements = (object *)e_7317944;
++c_7317875.elements[0] = ((closureN)self_7312211)->elements[0];
++c_7317875.elements[1] = ((closureN)self_7312211)->elements[1];
++c_7317875.elements[2] = ((closureN)self_7312211)->elements[2];
++c_7317875.elements[3] = ((closureN)self_7312211)->elements[3];
++c_7317875.elements[4] = ((closureN)self_7312211)->elements[4];
++c_7317875.elements[5] = ((closureN)self_7312211)->elements[5];
++c_7317875.elements[6] = ((closureN)self_7312211)->elements[6];
++c_7317875.elements[7] = ((closureN)self_7312211)->elements[7];
++c_7317875.elements[8] = ((closureN)self_7312211)->elements[8];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7319175,__lambda_539,  Cyc_set_cell(data, ((closureN)self_7313464)->elements[7], r_735501));; 
-+return_direct_with_clo1(data,(closure)&c_7317882,__lambda_539,  Cyc_set_cell(data, ((closureN)self_7312218)->elements[7], r_735056));; 
++return_direct_with_clo1(data,(closure)&c_7317875,__lambda_539,  Cyc_set_cell(data, ((closureN)self_7312211)->elements[7], r_735049));; 
  }
  
 -static void __lambda_539(void *data, object self_7313465, int argc, object *args) /* object self_7313465, object r_735487 */
-+static void __lambda_539(void *data, object self_7312219, int argc, object *args) /* object self_7312219, object r_735042 */
++static void __lambda_539(void *data, object self_7312212, int argc, object *args) /* object self_7312212, object r_735035 */
   {
  
    
@@ -45268,17 +45499,17 @@ Make let-values be the same as let*-values, to work around
 -c_7319177.elements = (object *)e_7319191;
 -c_7319177.elements[0] = ((closureN)self_7313465)->elements[4];
 -c_7319177.elements[1] = ((closureN)self_7313465)->elements[6];
-+closureN_type c_7317884;
-+object e_7317898 [2];
-+c_7317884.hdr.mark = gc_color_red;
-+ c_7317884.hdr.grayed = 0;
-+c_7317884.tag = closureN_tag;
-+ c_7317884.fn = (function_type)__lambda_540;
-+c_7317884.num_args = 0;
-+c_7317884.num_elements = 2;
-+c_7317884.elements = (object *)e_7317898;
-+c_7317884.elements[0] = ((closureN)self_7312219)->elements[4];
-+c_7317884.elements[1] = ((closureN)self_7312219)->elements[6];
++closureN_type c_7317877;
++object e_7317891 [2];
++c_7317877.hdr.mark = gc_color_red;
++ c_7317877.hdr.grayed = 0;
++c_7317877.tag = closureN_tag;
++ c_7317877.fn = (function_type)__lambda_540;
++c_7317877.num_args = 0;
++c_7317877.num_elements = 2;
++c_7317877.elements = (object *)e_7317891;
++c_7317877.elements[0] = ((closureN)self_7312212)->elements[4];
++c_7317877.elements[1] = ((closureN)self_7312212)->elements[6];
  
  
 -closureN_type c_7319192;
@@ -45297,32 +45528,32 @@ Make let-values be the same as let*-values, to work around
 -c_7319192.elements[4] = ((closureN)self_7313465)->elements[5];
 -c_7319192.elements[5] = ((closureN)self_7313465)->elements[7];
 -c_7319192.elements[6] = ((closureN)self_7313465)->elements[8];
-+closureN_type c_7317899;
-+object e_7317950 [7];
-+c_7317899.hdr.mark = gc_color_red;
-+ c_7317899.hdr.grayed = 0;
-+c_7317899.tag = closureN_tag;
-+ c_7317899.fn = (function_type)__lambda_541;
-+c_7317899.num_args = 1;
-+c_7317899.num_elements = 7;
-+c_7317899.elements = (object *)e_7317950;
-+c_7317899.elements[0] = ((closureN)self_7312219)->elements[0];
-+c_7317899.elements[1] = ((closureN)self_7312219)->elements[1];
-+c_7317899.elements[2] = ((closureN)self_7312219)->elements[2];
-+c_7317899.elements[3] = ((closureN)self_7312219)->elements[3];
-+c_7317899.elements[4] = ((closureN)self_7312219)->elements[5];
-+c_7317899.elements[5] = ((closureN)self_7312219)->elements[7];
-+c_7317899.elements[6] = ((closureN)self_7312219)->elements[8];
++closureN_type c_7317892;
++object e_7317943 [7];
++c_7317892.hdr.mark = gc_color_red;
++ c_7317892.hdr.grayed = 0;
++c_7317892.tag = closureN_tag;
++ c_7317892.fn = (function_type)__lambda_541;
++c_7317892.num_args = 1;
++c_7317892.num_elements = 7;
++c_7317892.elements = (object *)e_7317943;
++c_7317892.elements[0] = ((closureN)self_7312212)->elements[0];
++c_7317892.elements[1] = ((closureN)self_7312212)->elements[1];
++c_7317892.elements[2] = ((closureN)self_7312212)->elements[2];
++c_7317892.elements[3] = ((closureN)self_7312212)->elements[3];
++c_7317892.elements[4] = ((closureN)self_7312212)->elements[5];
++c_7317892.elements[5] = ((closureN)self_7312212)->elements[7];
++c_7317892.elements[6] = ((closureN)self_7312212)->elements[8];
  
 -return_direct_with_clo1(data,(closure)&c_7319177,__lambda_540,  &c_7319192);; 
-+return_direct_with_clo1(data,(closure)&c_7317884,__lambda_540,  &c_7317899);; 
++return_direct_with_clo1(data,(closure)&c_7317877,__lambda_540,  &c_7317892);; 
  }
  
 -static void __lambda_541(void *data, object self_7313466, int argc, object *args) /* object self_7313466, object r_735497 */
-+static void __lambda_541(void *data, object self_7312220, int argc, object *args) /* object self_7312220, object r_735052 */
++static void __lambda_541(void *data, object self_7312213, int argc, object *args) /* object self_7312213, object r_735045 */
   {
 - object r_735497 = args[0];
-+ object r_735052 = args[0];
++ object r_735045 = args[0];
    
 -closureN_type c_7319194;
 -object e_7319239 [7];
@@ -45340,31 +45571,31 @@ Make let-values be the same as let*-values, to work around
 -c_7319194.elements[4] = ((closureN)self_7313466)->elements[4];
 -c_7319194.elements[5] = ((closureN)self_7313466)->elements[5];
 -c_7319194.elements[6] = ((closureN)self_7313466)->elements[6];
-+closureN_type c_7317901;
-+object e_7317946 [7];
-+c_7317901.hdr.mark = gc_color_red;
-+ c_7317901.hdr.grayed = 0;
-+c_7317901.tag = closureN_tag;
-+ c_7317901.fn = (function_type)__lambda_542;
-+c_7317901.num_args = 1;
-+c_7317901.num_elements = 7;
-+c_7317901.elements = (object *)e_7317946;
-+c_7317901.elements[0] = ((closureN)self_7312220)->elements[0];
-+c_7317901.elements[1] = ((closureN)self_7312220)->elements[1];
-+c_7317901.elements[2] = ((closureN)self_7312220)->elements[2];
-+c_7317901.elements[3] = ((closureN)self_7312220)->elements[3];
-+c_7317901.elements[4] = ((closureN)self_7312220)->elements[4];
-+c_7317901.elements[5] = ((closureN)self_7312220)->elements[5];
-+c_7317901.elements[6] = ((closureN)self_7312220)->elements[6];
++closureN_type c_7317894;
++object e_7317939 [7];
++c_7317894.hdr.mark = gc_color_red;
++ c_7317894.hdr.grayed = 0;
++c_7317894.tag = closureN_tag;
++ c_7317894.fn = (function_type)__lambda_542;
++c_7317894.num_args = 1;
++c_7317894.num_elements = 7;
++c_7317894.elements = (object *)e_7317939;
++c_7317894.elements[0] = ((closureN)self_7312213)->elements[0];
++c_7317894.elements[1] = ((closureN)self_7312213)->elements[1];
++c_7317894.elements[2] = ((closureN)self_7312213)->elements[2];
++c_7317894.elements[3] = ((closureN)self_7312213)->elements[3];
++c_7317894.elements[4] = ((closureN)self_7312213)->elements[4];
++c_7317894.elements[5] = ((closureN)self_7312213)->elements[5];
++c_7317894.elements[6] = ((closureN)self_7312213)->elements[6];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7319194,__lambda_542,  Cyc_set_cell(data, ((closureN)self_7313466)->elements[1], r_735497));; 
-+return_direct_with_clo1(data,(closure)&c_7317901,__lambda_542,  Cyc_set_cell(data, ((closureN)self_7312220)->elements[1], r_735052));; 
++return_direct_with_clo1(data,(closure)&c_7317894,__lambda_542,  Cyc_set_cell(data, ((closureN)self_7312213)->elements[1], r_735045));; 
  }
  
 -static void __lambda_542(void *data, object self_7313467, int argc, object *args) /* object self_7313467, object r_735488 */
-+static void __lambda_542(void *data, object self_7312221, int argc, object *args) /* object self_7312221, object r_735043 */
++static void __lambda_542(void *data, object self_7312214, int argc, object *args) /* object self_7312214, object r_735036 */
   {
  
    
@@ -45381,19 +45612,19 @@ Make let-values be the same as let*-values, to work around
 -c_7319196.elements[1] = ((closureN)self_7313467)->elements[3];
 -c_7319196.elements[2] = ((closureN)self_7313467)->elements[4];
 -c_7319196.elements[3] = ((closureN)self_7313467)->elements[5];
-+closureN_type c_7317903;
-+object e_7317919 [4];
-+c_7317903.hdr.mark = gc_color_red;
-+ c_7317903.hdr.grayed = 0;
-+c_7317903.tag = closureN_tag;
-+ c_7317903.fn = (function_type)__lambda_543;
-+c_7317903.num_args = 1;
-+c_7317903.num_elements = 4;
-+c_7317903.elements = (object *)e_7317919;
-+c_7317903.elements[0] = ((closureN)self_7312221)->elements[0];
-+c_7317903.elements[1] = ((closureN)self_7312221)->elements[3];
-+c_7317903.elements[2] = ((closureN)self_7312221)->elements[4];
-+c_7317903.elements[3] = ((closureN)self_7312221)->elements[5];
++closureN_type c_7317896;
++object e_7317912 [4];
++c_7317896.hdr.mark = gc_color_red;
++ c_7317896.hdr.grayed = 0;
++c_7317896.tag = closureN_tag;
++ c_7317896.fn = (function_type)__lambda_543;
++c_7317896.num_args = 1;
++c_7317896.num_elements = 4;
++c_7317896.elements = (object *)e_7317912;
++c_7317896.elements[0] = ((closureN)self_7312214)->elements[0];
++c_7317896.elements[1] = ((closureN)self_7312214)->elements[3];
++c_7317896.elements[2] = ((closureN)self_7312214)->elements[4];
++c_7317896.elements[3] = ((closureN)self_7312214)->elements[5];
  
  
 -closureN_type c_7319213;
@@ -45409,57 +45640,57 @@ Make let-values be the same as let*-values, to work around
 -c_7319213.elements[1] = ((closureN)self_7313467)->elements[2];
 -c_7319213.elements[2] = ((closureN)self_7313467)->elements[4];
 -c_7319213.elements[3] = ((closureN)self_7313467)->elements[6];
-+closureN_type c_7317920;
-+object e_7317945 [4];
-+c_7317920.hdr.mark = gc_color_red;
-+ c_7317920.hdr.grayed = 0;
-+c_7317920.tag = closureN_tag;
-+ c_7317920.fn = (function_type)__lambda_545;
-+c_7317920.num_args = 2;
-+c_7317920.num_elements = 4;
-+c_7317920.elements = (object *)e_7317945;
-+c_7317920.elements[0] = ((closureN)self_7312221)->elements[1];
-+c_7317920.elements[1] = ((closureN)self_7312221)->elements[2];
-+c_7317920.elements[2] = ((closureN)self_7312221)->elements[4];
-+c_7317920.elements[3] = ((closureN)self_7312221)->elements[6];
++closureN_type c_7317913;
++object e_7317938 [4];
++c_7317913.hdr.mark = gc_color_red;
++ c_7317913.hdr.grayed = 0;
++c_7317913.tag = closureN_tag;
++ c_7317913.fn = (function_type)__lambda_545;
++c_7317913.num_args = 2;
++c_7317913.num_elements = 4;
++c_7317913.elements = (object *)e_7317938;
++c_7317913.elements[0] = ((closureN)self_7312214)->elements[1];
++c_7317913.elements[1] = ((closureN)self_7312214)->elements[2];
++c_7317913.elements[2] = ((closureN)self_7312214)->elements[4];
++c_7317913.elements[3] = ((closureN)self_7312214)->elements[6];
  
 -return_direct_with_clo1(data,(closure)&c_7319196,__lambda_543,  &c_7319213);; 
-+return_direct_with_clo1(data,(closure)&c_7317903,__lambda_543,  &c_7317920);; 
++return_direct_with_clo1(data,(closure)&c_7317896,__lambda_543,  &c_7317913);; 
  }
  
 -static void __lambda_545(void *data, object self_7313468, int argc, object *args) /* object self_7313468, object k_735491, object i_91at_73661_733250, object i_91from_73662_733251 */
-+static void __lambda_545(void *data, object self_7312222, int argc, object *args) /* object self_7312222, object k_735046, object i_91at_73661_732910, object i_91from_73662_732911 */
++static void __lambda_545(void *data, object self_7312215, int argc, object *args) /* object self_7312215, object k_735039, object i_91at_73661_732903, object i_91from_73662_732904 */
   {
 - object k_735491 = args[0]; object i_91at_73661_733250 = args[1]; object i_91from_73662_733251 = args[2];
-+ object k_735046 = args[0]; object i_91at_73661_732910 = args[1]; object i_91from_73662_732911 = args[2];
++ object k_735039 = args[0]; object i_91at_73661_732903 = args[1]; object i_91from_73662_732904 = args[2];
      
    
 -if( (boolean_f != Cyc_num_fast_eq_op(data, i_91from_73662_733251, car(((closureN)self_7313468)->elements[0]))) ){ 
 -  return_direct_with_clo1(data,  k_735491, (((closure)  k_735491)->fn),  ((closureN)self_7313468)->elements[3]);
-+if( (boolean_f != Cyc_num_fast_eq_op(data, i_91from_73662_732911, car(((closureN)self_7312222)->elements[0]))) ){ 
-+  return_direct_with_clo1(data,  k_735046, (((closure)  k_735046)->fn),  ((closureN)self_7312222)->elements[3]);
++if( (boolean_f != Cyc_num_fast_eq_op(data, i_91from_73662_732904, car(((closureN)self_7312215)->elements[0]))) ){ 
++  return_direct_with_clo1(data,  k_735039, (((closure)  k_735039)->fn),  ((closureN)self_7312215)->elements[3]);
  } else { 
    
    
 -  Cyc_string_set(data, ((closureN)self_7313468)->elements[3], i_91at_73661_733250, Cyc_string_ref(data, ((closureN)self_7313468)->elements[1], i_91from_73662_733251));
-+  Cyc_string_set(data, ((closureN)self_7312222)->elements[3], i_91at_73661_732910, Cyc_string_ref(data, ((closureN)self_7312222)->elements[1], i_91from_73662_732911));
++  Cyc_string_set(data, ((closureN)self_7312215)->elements[3], i_91at_73661_732903, Cyc_string_ref(data, ((closureN)self_7312215)->elements[1], i_91from_73662_732904));
  
  
 -complex_num_type local_7319228; 
-+complex_num_type local_7317935; 
++complex_num_type local_7317928; 
  
 -complex_num_type local_7319231; 
 -return_closcall3(data,  car(((closureN)self_7313468)->elements[2]),  k_735491, Cyc_fast_sum(data,&local_7319228, i_91at_73661_733250, obj_int2obj(1)), Cyc_fast_sum(data,&local_7319231, i_91from_73662_733251, obj_int2obj(1)));;}
-+complex_num_type local_7317938; 
-+return_closcall3(data,  car(((closureN)self_7312222)->elements[2]),  k_735046, Cyc_fast_sum(data,&local_7317935, i_91at_73661_732910, obj_int2obj(1)), Cyc_fast_sum(data,&local_7317938, i_91from_73662_732911, obj_int2obj(1)));;}
++complex_num_type local_7317931; 
++return_closcall3(data,  car(((closureN)self_7312215)->elements[2]),  k_735039, Cyc_fast_sum(data,&local_7317928, i_91at_73661_732903, obj_int2obj(1)), Cyc_fast_sum(data,&local_7317931, i_91from_73662_732904, obj_int2obj(1)));;}
  ;; 
  }
  
 -static void __lambda_543(void *data, object self_7313469, int argc, object *args) /* object self_7313469, object r_735490 */
-+static void __lambda_543(void *data, object self_7312223, int argc, object *args) /* object self_7312223, object r_735045 */
++static void __lambda_543(void *data, object self_7312216, int argc, object *args) /* object self_7312216, object r_735038 */
   {
 - object r_735490 = args[0];
-+ object r_735045 = args[0];
++ object r_735038 = args[0];
    
 -closureN_type c_7319198;
 -object e_7319208 [4];
@@ -45474,28 +45705,28 @@ Make let-values be the same as let*-values, to work around
 -c_7319198.elements[1] = ((closureN)self_7313469)->elements[1];
 -c_7319198.elements[2] = ((closureN)self_7313469)->elements[2];
 -c_7319198.elements[3] = ((closureN)self_7313469)->elements[3];
-+closureN_type c_7317905;
-+object e_7317915 [4];
-+c_7317905.hdr.mark = gc_color_red;
-+ c_7317905.hdr.grayed = 0;
-+c_7317905.tag = closureN_tag;
-+ c_7317905.fn = (function_type)__lambda_544;
-+c_7317905.num_args = 1;
-+c_7317905.num_elements = 4;
-+c_7317905.elements = (object *)e_7317915;
-+c_7317905.elements[0] = ((closureN)self_7312223)->elements[0];
-+c_7317905.elements[1] = ((closureN)self_7312223)->elements[1];
-+c_7317905.elements[2] = ((closureN)self_7312223)->elements[2];
-+c_7317905.elements[3] = ((closureN)self_7312223)->elements[3];
++closureN_type c_7317898;
++object e_7317908 [4];
++c_7317898.hdr.mark = gc_color_red;
++ c_7317898.hdr.grayed = 0;
++c_7317898.tag = closureN_tag;
++ c_7317898.fn = (function_type)__lambda_544;
++c_7317898.num_args = 1;
++c_7317898.num_elements = 4;
++c_7317898.elements = (object *)e_7317908;
++c_7317898.elements[0] = ((closureN)self_7312216)->elements[0];
++c_7317898.elements[1] = ((closureN)self_7312216)->elements[1];
++c_7317898.elements[2] = ((closureN)self_7312216)->elements[2];
++c_7317898.elements[3] = ((closureN)self_7312216)->elements[3];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7319198,__lambda_544,  Cyc_set_cell(data, ((closureN)self_7313469)->elements[2], r_735490));; 
-+return_direct_with_clo1(data,(closure)&c_7317905,__lambda_544,  Cyc_set_cell(data, ((closureN)self_7312223)->elements[2], r_735045));; 
++return_direct_with_clo1(data,(closure)&c_7317898,__lambda_544,  Cyc_set_cell(data, ((closureN)self_7312216)->elements[2], r_735038));; 
  }
  
 -static void __lambda_544(void *data, object self_7313470, int argc, object *args) /* object self_7313470, object r_735489 */
-+static void __lambda_544(void *data, object self_7312224, int argc, object *args) /* object self_7312224, object r_735044 */
++static void __lambda_544(void *data, object self_7312217, int argc, object *args) /* object self_7312217, object r_735037 */
   {
  
    
@@ -45503,39 +45734,38 @@ Make let-values be the same as let*-values, to work around
  
  
 -return_closcall3(data,  car(((closureN)self_7313470)->elements[2]),  ((closureN)self_7313470)->elements[1], ((closureN)self_7313470)->elements[0], car(((closureN)self_7313470)->elements[3]));; 
-+return_closcall3(data,  car(((closureN)self_7312224)->elements[2]),  ((closureN)self_7312224)->elements[1], ((closureN)self_7312224)->elements[0], car(((closureN)self_7312224)->elements[3]));; 
++return_closcall3(data,  car(((closureN)self_7312217)->elements[2]),  ((closureN)self_7312217)->elements[1], ((closureN)self_7312217)->elements[0], car(((closureN)self_7312217)->elements[3]));; 
  }
  
 -static void __lambda_540(void *data, object self_7313471, int argc, object *args) /* object self_7313471, object k_735498 */
-+static void __lambda_540(void *data, object self_7312225, int argc, object *args) /* object self_7312225, object k_735053 */
++static void __lambda_540(void *data, object self_7312218, int argc, object *args) /* object self_7312218, object k_735046 */
   {
 - object k_735498 = args[0];
-+ object k_735053 = args[0];
++ object k_735046 = args[0];
      
    
 -if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313471)->elements[1]), obj_int2obj(1))) ){ 
-+if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312225)->elements[1]), obj_int2obj(1))) ){ 
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312218)->elements[1]), obj_int2obj(1))) ){ 
    
  
 -return_direct_with_clo1(data,  k_735498,__lambda_541,  Cyc_cadr(data, ((closureN)self_7313471)->elements[1]));
-+return_direct_with_clo1(data,  k_735053,__lambda_541,  Cyc_cadr(data, ((closureN)self_7312225)->elements[1]));
++return_direct_with_clo1(data,  k_735046,__lambda_541,  Cyc_cadr(data, ((closureN)self_7312218)->elements[1]));
  } else { 
    
  
 -return_direct_with_clo1(data,  k_735498,__lambda_541,  car(((closureN)self_7313471)->elements[0]));}
-+return_direct_with_clo1(data,  k_735053,__lambda_541,  car(((closureN)self_7312225)->elements[0]));}
++return_direct_with_clo1(data,  k_735046,__lambda_541,  car(((closureN)self_7312218)->elements[0]));}
  ;; 
  }
  
 -static void __lambda_529(void *data, object _, int argc, object *args) /* closure _,object k_735470, object str_73648_733237, object opts_73649_733238_raw, ... */
-+static void __lambda_529(void *data, object _, int argc, object *args) /* closure _,object k_735025, object str_73648_732897, object opts_73649_732898_raw, ... */
++static void __lambda_529(void *data, object _, int argc, object *args) /* closure _,object k_735018, object str_73648_732890, object opts_73649_732891_raw, ... */
   {
 -object k_735470 = args[0]; object str_73648_733237 = args[1];
 -load_varargs(opts_73649_733238, args, 2, argc - 2);
--  Cyc_st_add(data, "scheme/base.sld:string-copy");
-+object k_735025 = args[0]; object str_73648_732897 = args[1];
-+load_varargs(opts_73649_732898, args, 2, argc - 2);
-+  Cyc_st_add(data, "base.sld:string-copy");
++object k_735018 = args[0]; object str_73648_732890 = args[1];
++load_varargs(opts_73649_732891, args, 2, argc - 2);
+   Cyc_st_add(data, "scheme/base.sld:string-copy");
  
 -closureN_type c_7319066;
 -object e_7319149 [3];
@@ -45549,29 +45779,14 @@ Make let-values be the same as let*-values, to work around
 -c_7319066.elements[0] = k_735470;
 -c_7319066.elements[1] = opts_73649_733238;
 -c_7319066.elements[2] = str_73648_733237;
-+closureN_type c_7317773;
-+object e_7317856 [3];
-+c_7317773.hdr.mark = gc_color_red;
-+ c_7317773.hdr.grayed = 0;
-+c_7317773.tag = closureN_tag;
-+ c_7317773.fn = (function_type)__lambda_530;
-+c_7317773.num_args = 3;
-+c_7317773.num_elements = 3;
-+c_7317773.elements = (object *)e_7317856;
-+c_7317773.elements[0] = k_735025;
-+c_7317773.elements[1] = opts_73649_732898;
-+c_7317773.elements[2] = str_73648_732897;
- 
+-
 -return_direct_with_clo3(data,(closure)&c_7319066,__lambda_530,  boolean_f, boolean_f, boolean_f);; 
-+return_direct_with_clo3(data,(closure)&c_7317773,__lambda_530,  boolean_f, boolean_f, boolean_f);; 
- }
- 
+-}
+-
 -static void __lambda_530(void *data, object self_7313450, int argc, object *args) /* object self_7313450, object len_73650_733239, object start_73651_733240, object end_73652_733241 */
-+static void __lambda_530(void *data, object self_7312204, int argc, object *args) /* object self_7312204, object len_73650_732899, object start_73651_732900, object end_73652_732901 */
-  {
+- {
 - object len_73650_733239 = args[0]; object start_73651_733240 = args[1]; object end_73652_733241 = args[2];
-+ object len_73650_732899 = args[0]; object start_73651_732900 = args[1]; object end_73652_732901 = args[2];
-   
+-  
 -closureN_type c_7319068;
 -object e_7319145 [5];
 -c_7319068.hdr.mark = gc_color_red;
@@ -45586,33 +45801,53 @@ Make let-values be the same as let*-values, to work around
 -c_7319068.elements[2] = ((closureN)self_7313450)->elements[1];
 -c_7319068.elements[3] = start_73651_733240;
 -c_7319068.elements[4] = ((closureN)self_7313450)->elements[2];
-+closureN_type c_7317775;
-+object e_7317852 [5];
-+c_7317775.hdr.mark = gc_color_red;
-+ c_7317775.hdr.grayed = 0;
-+c_7317775.tag = closureN_tag;
-+ c_7317775.fn = (function_type)__lambda_1334;
-+c_7317775.num_args = 1;
-+c_7317775.num_elements = 5;
-+c_7317775.elements = (object *)e_7317852;
-+c_7317775.elements[0] = end_73652_732901;
-+c_7317775.elements[1] = ((closureN)self_7312204)->elements[0];
-+c_7317775.elements[2] = ((closureN)self_7312204)->elements[1];
-+c_7317775.elements[3] = start_73651_732900;
-+c_7317775.elements[4] = ((closureN)self_7312204)->elements[2];
- 
++closureN_type c_7317766;
++object e_7317849 [3];
++c_7317766.hdr.mark = gc_color_red;
++ c_7317766.hdr.grayed = 0;
++c_7317766.tag = closureN_tag;
++ c_7317766.fn = (function_type)__lambda_530;
++c_7317766.num_args = 3;
++c_7317766.num_elements = 3;
++c_7317766.elements = (object *)e_7317849;
++c_7317766.elements[0] = k_735018;
++c_7317766.elements[1] = opts_73649_732891;
++c_7317766.elements[2] = str_73648_732890;
+ 
++return_direct_with_clo3(data,(closure)&c_7317766,__lambda_530,  boolean_f, boolean_f, boolean_f);; 
++}
  
 -pair_type local_7319148; 
 -return_direct_with_clo1(data,(closure)&c_7319068,__lambda_1381,  set_cell_as_expr(&local_7319148, len_73650_733239));; 
-+pair_type local_7317855; 
-+return_direct_with_clo1(data,(closure)&c_7317775,__lambda_1334,  set_cell_as_expr(&local_7317855, len_73650_732899));; 
++static void __lambda_530(void *data, object self_7312197, int argc, object *args) /* object self_7312197, object len_73650_732892, object start_73651_732893, object end_73652_732894 */
++ {
++ object len_73650_732892 = args[0]; object start_73651_732893 = args[1]; object end_73652_732894 = args[2];
++  
++closureN_type c_7317768;
++object e_7317845 [5];
++c_7317768.hdr.mark = gc_color_red;
++ c_7317768.hdr.grayed = 0;
++c_7317768.tag = closureN_tag;
++ c_7317768.fn = (function_type)__lambda_1334;
++c_7317768.num_args = 1;
++c_7317768.num_elements = 5;
++c_7317768.elements = (object *)e_7317845;
++c_7317768.elements[0] = end_73652_732894;
++c_7317768.elements[1] = ((closureN)self_7312197)->elements[0];
++c_7317768.elements[2] = ((closureN)self_7312197)->elements[1];
++c_7317768.elements[3] = start_73651_732893;
++c_7317768.elements[4] = ((closureN)self_7312197)->elements[2];
++
++
++pair_type local_7317848; 
++return_direct_with_clo1(data,(closure)&c_7317768,__lambda_1334,  set_cell_as_expr(&local_7317848, len_73650_732892));; 
  }
  
 -static void __lambda_1381(void *data, object self_7313451, int argc, object *args) /* object self_7313451, object len_73650_733239 */
-+static void __lambda_1334(void *data, object self_7312205, int argc, object *args) /* object self_7312205, object len_73650_732899 */
++static void __lambda_1334(void *data, object self_7312198, int argc, object *args) /* object self_7312198, object len_73650_732892 */
   {
 - object len_73650_733239 = args[0];
-+ object len_73650_732899 = args[0];
++ object len_73650_732892 = args[0];
    
 -closureN_type c_7319070;
 -object e_7319140 [5];
@@ -45628,33 +45863,33 @@ Make let-values be the same as let*-values, to work around
 -c_7319070.elements[2] = len_73650_733239;
 -c_7319070.elements[3] = ((closureN)self_7313451)->elements[2];
 -c_7319070.elements[4] = ((closureN)self_7313451)->elements[4];
-+closureN_type c_7317777;
-+object e_7317847 [5];
-+c_7317777.hdr.mark = gc_color_red;
-+ c_7317777.hdr.grayed = 0;
-+c_7317777.tag = closureN_tag;
-+ c_7317777.fn = (function_type)__lambda_1333;
-+c_7317777.num_args = 1;
-+c_7317777.num_elements = 5;
-+c_7317777.elements = (object *)e_7317847;
-+c_7317777.elements[0] = ((closureN)self_7312205)->elements[0];
-+c_7317777.elements[1] = ((closureN)self_7312205)->elements[1];
-+c_7317777.elements[2] = len_73650_732899;
-+c_7317777.elements[3] = ((closureN)self_7312205)->elements[2];
-+c_7317777.elements[4] = ((closureN)self_7312205)->elements[4];
++closureN_type c_7317770;
++object e_7317840 [5];
++c_7317770.hdr.mark = gc_color_red;
++ c_7317770.hdr.grayed = 0;
++c_7317770.tag = closureN_tag;
++ c_7317770.fn = (function_type)__lambda_1333;
++c_7317770.num_args = 1;
++c_7317770.num_elements = 5;
++c_7317770.elements = (object *)e_7317840;
++c_7317770.elements[0] = ((closureN)self_7312198)->elements[0];
++c_7317770.elements[1] = ((closureN)self_7312198)->elements[1];
++c_7317770.elements[2] = len_73650_732892;
++c_7317770.elements[3] = ((closureN)self_7312198)->elements[2];
++c_7317770.elements[4] = ((closureN)self_7312198)->elements[4];
  
  
 -pair_type local_7319143; 
 -return_direct_with_clo1(data,(closure)&c_7319070,__lambda_1380,  set_cell_as_expr(&local_7319143, ((closureN)self_7313451)->elements[3]));; 
-+pair_type local_7317850; 
-+return_direct_with_clo1(data,(closure)&c_7317777,__lambda_1333,  set_cell_as_expr(&local_7317850, ((closureN)self_7312205)->elements[3]));; 
++pair_type local_7317843; 
++return_direct_with_clo1(data,(closure)&c_7317770,__lambda_1333,  set_cell_as_expr(&local_7317843, ((closureN)self_7312198)->elements[3]));; 
  }
  
 -static void __lambda_1380(void *data, object self_7313452, int argc, object *args) /* object self_7313452, object start_73651_733240 */
-+static void __lambda_1333(void *data, object self_7312206, int argc, object *args) /* object self_7312206, object start_73651_732900 */
++static void __lambda_1333(void *data, object self_7312199, int argc, object *args) /* object self_7312199, object start_73651_732893 */
   {
 - object start_73651_733240 = args[0];
-+ object start_73651_732900 = args[0];
++ object start_73651_732893 = args[0];
    
 -closureN_type c_7319072;
 -object e_7319135 [5];
@@ -45670,33 +45905,33 @@ Make let-values be the same as let*-values, to work around
 -c_7319072.elements[2] = ((closureN)self_7313452)->elements[3];
 -c_7319072.elements[3] = start_73651_733240;
 -c_7319072.elements[4] = ((closureN)self_7313452)->elements[4];
-+closureN_type c_7317779;
-+object e_7317842 [5];
-+c_7317779.hdr.mark = gc_color_red;
-+ c_7317779.hdr.grayed = 0;
-+c_7317779.tag = closureN_tag;
-+ c_7317779.fn = (function_type)__lambda_1332;
-+c_7317779.num_args = 1;
-+c_7317779.num_elements = 5;
-+c_7317779.elements = (object *)e_7317842;
-+c_7317779.elements[0] = ((closureN)self_7312206)->elements[1];
-+c_7317779.elements[1] = ((closureN)self_7312206)->elements[2];
-+c_7317779.elements[2] = ((closureN)self_7312206)->elements[3];
-+c_7317779.elements[3] = start_73651_732900;
-+c_7317779.elements[4] = ((closureN)self_7312206)->elements[4];
++closureN_type c_7317772;
++object e_7317835 [5];
++c_7317772.hdr.mark = gc_color_red;
++ c_7317772.hdr.grayed = 0;
++c_7317772.tag = closureN_tag;
++ c_7317772.fn = (function_type)__lambda_1332;
++c_7317772.num_args = 1;
++c_7317772.num_elements = 5;
++c_7317772.elements = (object *)e_7317835;
++c_7317772.elements[0] = ((closureN)self_7312199)->elements[1];
++c_7317772.elements[1] = ((closureN)self_7312199)->elements[2];
++c_7317772.elements[2] = ((closureN)self_7312199)->elements[3];
++c_7317772.elements[3] = start_73651_732893;
++c_7317772.elements[4] = ((closureN)self_7312199)->elements[4];
  
  
 -pair_type local_7319138; 
 -return_direct_with_clo1(data,(closure)&c_7319072,__lambda_1379,  set_cell_as_expr(&local_7319138, ((closureN)self_7313452)->elements[0]));; 
-+pair_type local_7317845; 
-+return_direct_with_clo1(data,(closure)&c_7317779,__lambda_1332,  set_cell_as_expr(&local_7317845, ((closureN)self_7312206)->elements[0]));; 
++pair_type local_7317838; 
++return_direct_with_clo1(data,(closure)&c_7317772,__lambda_1332,  set_cell_as_expr(&local_7317838, ((closureN)self_7312199)->elements[0]));; 
  }
  
 -static void __lambda_1379(void *data, object self_7313453, int argc, object *args) /* object self_7313453, object end_73652_733241 */
-+static void __lambda_1332(void *data, object self_7312207, int argc, object *args) /* object self_7312207, object end_73652_732901 */
++static void __lambda_1332(void *data, object self_7312200, int argc, object *args) /* object self_7312200, object end_73652_732894 */
   {
 - object end_73652_733241 = args[0];
-+ object end_73652_732901 = args[0];
++ object end_73652_732894 = args[0];
    
 -closureN_type c_7319074;
 -object e_7319128 [6];
@@ -45713,46 +45948,46 @@ Make let-values be the same as let*-values, to work around
 -c_7319074.elements[3] = ((closureN)self_7313453)->elements[2];
 -c_7319074.elements[4] = ((closureN)self_7313453)->elements[3];
 -c_7319074.elements[5] = ((closureN)self_7313453)->elements[4];
-+closureN_type c_7317781;
-+object e_7317835 [6];
-+c_7317781.hdr.mark = gc_color_red;
-+ c_7317781.hdr.grayed = 0;
-+c_7317781.tag = closureN_tag;
-+ c_7317781.fn = (function_type)__lambda_531;
-+c_7317781.num_args = 1;
-+c_7317781.num_elements = 6;
-+c_7317781.elements = (object *)e_7317835;
-+c_7317781.elements[0] = end_73652_732901;
-+c_7317781.elements[1] = ((closureN)self_7312207)->elements[0];
-+c_7317781.elements[2] = ((closureN)self_7312207)->elements[1];
-+c_7317781.elements[3] = ((closureN)self_7312207)->elements[2];
-+c_7317781.elements[4] = ((closureN)self_7312207)->elements[3];
-+c_7317781.elements[5] = ((closureN)self_7312207)->elements[4];
++closureN_type c_7317774;
++object e_7317828 [6];
++c_7317774.hdr.mark = gc_color_red;
++ c_7317774.hdr.grayed = 0;
++c_7317774.tag = closureN_tag;
++ c_7317774.fn = (function_type)__lambda_531;
++c_7317774.num_args = 1;
++c_7317774.num_elements = 6;
++c_7317774.elements = (object *)e_7317828;
++c_7317774.elements[0] = end_73652_732894;
++c_7317774.elements[1] = ((closureN)self_7312200)->elements[0];
++c_7317774.elements[2] = ((closureN)self_7312200)->elements[1];
++c_7317774.elements[3] = ((closureN)self_7312200)->elements[2];
++c_7317774.elements[4] = ((closureN)self_7312200)->elements[3];
++c_7317774.elements[5] = ((closureN)self_7312200)->elements[4];
  
  
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7319074,__lambda_531,  Cyc_set_cell(data, ((closureN)self_7313453)->elements[1], Cyc_string_length(data, ((closureN)self_7313453)->elements[4])));; 
-+return_direct_with_clo1(data,(closure)&c_7317781,__lambda_531,  Cyc_set_cell(data, ((closureN)self_7312207)->elements[1], Cyc_string_length(data, ((closureN)self_7312207)->elements[4])));; 
++return_direct_with_clo1(data,(closure)&c_7317774,__lambda_531,  Cyc_set_cell(data, ((closureN)self_7312200)->elements[1], Cyc_string_length(data, ((closureN)self_7312200)->elements[4])));; 
  }
  
 -static void __lambda_531(void *data, object self_7313454, int argc, object *args) /* object self_7313454, object r_735471 */
-+static void __lambda_531(void *data, object self_7312208, int argc, object *args) /* object self_7312208, object r_735026 */
++static void __lambda_531(void *data, object self_7312201, int argc, object *args) /* object self_7312201, object r_735019 */
   {
  
 -  object r_735478;
-+  object r_735033;
++  object r_735026;
      
    
 -if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313454)->elements[3]), obj_int2obj(0))) ){ 
-+if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312208)->elements[3]), obj_int2obj(0))) ){ 
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312201)->elements[3]), obj_int2obj(0))) ){ 
    
 -  r_735478 = Cyc_car(data, ((closureN)self_7313454)->elements[3]);
-+  r_735033 = Cyc_car(data, ((closureN)self_7312208)->elements[3]);
++  r_735026 = Cyc_car(data, ((closureN)self_7312201)->elements[3]);
  } else { 
 -  r_735478 = obj_int2obj(0);}
-+  r_735033 = obj_int2obj(0);}
++  r_735026 = obj_int2obj(0);}
  ;
 -closureN_type c_7319087;
 -object e_7319124 [6];
@@ -45769,30 +46004,30 @@ Make let-values be the same as let*-values, to work around
 -c_7319087.elements[3] = ((closureN)self_7313454)->elements[3];
 -c_7319087.elements[4] = ((closureN)self_7313454)->elements[4];
 -c_7319087.elements[5] = ((closureN)self_7313454)->elements[5];
-+closureN_type c_7317794;
-+object e_7317831 [6];
-+c_7317794.hdr.mark = gc_color_red;
-+ c_7317794.hdr.grayed = 0;
-+c_7317794.tag = closureN_tag;
-+ c_7317794.fn = (function_type)__lambda_532;
-+c_7317794.num_args = 1;
-+c_7317794.num_elements = 6;
-+c_7317794.elements = (object *)e_7317831;
-+c_7317794.elements[0] = ((closureN)self_7312208)->elements[0];
-+c_7317794.elements[1] = ((closureN)self_7312208)->elements[1];
-+c_7317794.elements[2] = ((closureN)self_7312208)->elements[2];
-+c_7317794.elements[3] = ((closureN)self_7312208)->elements[3];
-+c_7317794.elements[4] = ((closureN)self_7312208)->elements[4];
-+c_7317794.elements[5] = ((closureN)self_7312208)->elements[5];
++closureN_type c_7317787;
++object e_7317824 [6];
++c_7317787.hdr.mark = gc_color_red;
++ c_7317787.hdr.grayed = 0;
++c_7317787.tag = closureN_tag;
++ c_7317787.fn = (function_type)__lambda_532;
++c_7317787.num_args = 1;
++c_7317787.num_elements = 6;
++c_7317787.elements = (object *)e_7317824;
++c_7317787.elements[0] = ((closureN)self_7312201)->elements[0];
++c_7317787.elements[1] = ((closureN)self_7312201)->elements[1];
++c_7317787.elements[2] = ((closureN)self_7312201)->elements[2];
++c_7317787.elements[3] = ((closureN)self_7312201)->elements[3];
++c_7317787.elements[4] = ((closureN)self_7312201)->elements[4];
++c_7317787.elements[5] = ((closureN)self_7312201)->elements[5];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7319087,__lambda_532,  Cyc_set_cell(data, ((closureN)self_7313454)->elements[4], r_735478));; 
-+return_direct_with_clo1(data,(closure)&c_7317794,__lambda_532,  Cyc_set_cell(data, ((closureN)self_7312208)->elements[4], r_735033));; 
++return_direct_with_clo1(data,(closure)&c_7317787,__lambda_532,  Cyc_set_cell(data, ((closureN)self_7312201)->elements[4], r_735026));; 
  }
  
 -static void __lambda_532(void *data, object self_7313455, int argc, object *args) /* object self_7313455, object r_735472 */
-+static void __lambda_532(void *data, object self_7312209, int argc, object *args) /* object self_7312209, object r_735027 */
++static void __lambda_532(void *data, object self_7312202, int argc, object *args) /* object self_7312202, object r_735020 */
   {
  
    
@@ -45807,17 +46042,17 @@ Make let-values be the same as let*-values, to work around
 -c_7319089.elements = (object *)e_7319103;
 -c_7319089.elements[0] = ((closureN)self_7313455)->elements[2];
 -c_7319089.elements[1] = ((closureN)self_7313455)->elements[3];
-+closureN_type c_7317796;
-+object e_7317810 [2];
-+c_7317796.hdr.mark = gc_color_red;
-+ c_7317796.hdr.grayed = 0;
-+c_7317796.tag = closureN_tag;
-+ c_7317796.fn = (function_type)__lambda_533;
-+c_7317796.num_args = 0;
-+c_7317796.num_elements = 2;
-+c_7317796.elements = (object *)e_7317810;
-+c_7317796.elements[0] = ((closureN)self_7312209)->elements[2];
-+c_7317796.elements[1] = ((closureN)self_7312209)->elements[3];
++closureN_type c_7317789;
++object e_7317803 [2];
++c_7317789.hdr.mark = gc_color_red;
++ c_7317789.hdr.grayed = 0;
++c_7317789.tag = closureN_tag;
++ c_7317789.fn = (function_type)__lambda_533;
++c_7317789.num_args = 0;
++c_7317789.num_elements = 2;
++c_7317789.elements = (object *)e_7317803;
++c_7317789.elements[0] = ((closureN)self_7312202)->elements[2];
++c_7317789.elements[1] = ((closureN)self_7312202)->elements[3];
  
  
 -closureN_type c_7319104;
@@ -45833,29 +46068,29 @@ Make let-values be the same as let*-values, to work around
 -c_7319104.elements[1] = ((closureN)self_7313455)->elements[1];
 -c_7319104.elements[2] = ((closureN)self_7313455)->elements[4];
 -c_7319104.elements[3] = ((closureN)self_7313455)->elements[5];
-+closureN_type c_7317811;
-+object e_7317830 [4];
-+c_7317811.hdr.mark = gc_color_red;
-+ c_7317811.hdr.grayed = 0;
-+c_7317811.tag = closureN_tag;
-+ c_7317811.fn = (function_type)__lambda_534;
-+c_7317811.num_args = 1;
-+c_7317811.num_elements = 4;
-+c_7317811.elements = (object *)e_7317830;
-+c_7317811.elements[0] = ((closureN)self_7312209)->elements[0];
-+c_7317811.elements[1] = ((closureN)self_7312209)->elements[1];
-+c_7317811.elements[2] = ((closureN)self_7312209)->elements[4];
-+c_7317811.elements[3] = ((closureN)self_7312209)->elements[5];
++closureN_type c_7317804;
++object e_7317823 [4];
++c_7317804.hdr.mark = gc_color_red;
++ c_7317804.hdr.grayed = 0;
++c_7317804.tag = closureN_tag;
++ c_7317804.fn = (function_type)__lambda_534;
++c_7317804.num_args = 1;
++c_7317804.num_elements = 4;
++c_7317804.elements = (object *)e_7317823;
++c_7317804.elements[0] = ((closureN)self_7312202)->elements[0];
++c_7317804.elements[1] = ((closureN)self_7312202)->elements[1];
++c_7317804.elements[2] = ((closureN)self_7312202)->elements[4];
++c_7317804.elements[3] = ((closureN)self_7312202)->elements[5];
  
 -return_direct_with_clo1(data,(closure)&c_7319089,__lambda_533,  &c_7319104);; 
-+return_direct_with_clo1(data,(closure)&c_7317796,__lambda_533,  &c_7317811);; 
++return_direct_with_clo1(data,(closure)&c_7317789,__lambda_533,  &c_7317804);; 
  }
  
 -static void __lambda_534(void *data, object self_7313456, int argc, object *args) /* object self_7313456, object r_735474 */
-+static void __lambda_534(void *data, object self_7312210, int argc, object *args) /* object self_7312210, object r_735029 */
++static void __lambda_534(void *data, object self_7312203, int argc, object *args) /* object self_7312203, object r_735022 */
   {
 - object r_735474 = args[0];
-+ object r_735029 = args[0];
++ object r_735022 = args[0];
    
 -closureN_type c_7319106;
 -object e_7319119 [4];
@@ -45870,28 +46105,28 @@ Make let-values be the same as let*-values, to work around
 -c_7319106.elements[1] = ((closureN)self_7313456)->elements[1];
 -c_7319106.elements[2] = ((closureN)self_7313456)->elements[2];
 -c_7319106.elements[3] = ((closureN)self_7313456)->elements[3];
-+closureN_type c_7317813;
-+object e_7317826 [4];
-+c_7317813.hdr.mark = gc_color_red;
-+ c_7317813.hdr.grayed = 0;
-+c_7317813.tag = closureN_tag;
-+ c_7317813.fn = (function_type)__lambda_535;
-+c_7317813.num_args = 1;
-+c_7317813.num_elements = 4;
-+c_7317813.elements = (object *)e_7317826;
-+c_7317813.elements[0] = ((closureN)self_7312210)->elements[0];
-+c_7317813.elements[1] = ((closureN)self_7312210)->elements[1];
-+c_7317813.elements[2] = ((closureN)self_7312210)->elements[2];
-+c_7317813.elements[3] = ((closureN)self_7312210)->elements[3];
++closureN_type c_7317806;
++object e_7317819 [4];
++c_7317806.hdr.mark = gc_color_red;
++ c_7317806.hdr.grayed = 0;
++c_7317806.tag = closureN_tag;
++ c_7317806.fn = (function_type)__lambda_535;
++c_7317806.num_args = 1;
++c_7317806.num_elements = 4;
++c_7317806.elements = (object *)e_7317819;
++c_7317806.elements[0] = ((closureN)self_7312203)->elements[0];
++c_7317806.elements[1] = ((closureN)self_7312203)->elements[1];
++c_7317806.elements[2] = ((closureN)self_7312203)->elements[2];
++c_7317806.elements[3] = ((closureN)self_7312203)->elements[3];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7319106,__lambda_535,  Cyc_set_cell(data, ((closureN)self_7313456)->elements[0], r_735474));; 
-+return_direct_with_clo1(data,(closure)&c_7317813,__lambda_535,  Cyc_set_cell(data, ((closureN)self_7312210)->elements[0], r_735029));; 
++return_direct_with_clo1(data,(closure)&c_7317806,__lambda_535,  Cyc_set_cell(data, ((closureN)self_7312203)->elements[0], r_735022));; 
  }
  
 -static void __lambda_535(void *data, object self_7313457, int argc, object *args) /* object self_7313457, object r_735473 */
-+static void __lambda_535(void *data, object self_7312211, int argc, object *args) /* object self_7312211, object r_735028 */
++static void __lambda_535(void *data, object self_7312204, int argc, object *args) /* object self_7312204, object r_735021 */
   {
  
    
@@ -45901,37 +46136,40 @@ Make let-values be the same as let*-values, to work around
  
 -object c_7319111 = Cyc_substring(data,  ((closureN)self_7313457)->elements[1],((closureN)self_7313457)->elements[3], car(((closureN)self_7313457)->elements[2]), car(((closureN)self_7313457)->elements[0]));
 -return_direct_with_clo1(data,  ((closureN)self_7313457)->elements[1], (((closure)  ((closureN)self_7313457)->elements[1])->fn),  c_7319111);; 
-+object c_7317818 = Cyc_substring(data,  ((closureN)self_7312211)->elements[1],((closureN)self_7312211)->elements[3], car(((closureN)self_7312211)->elements[2]), car(((closureN)self_7312211)->elements[0]));
-+return_direct_with_clo1(data,  ((closureN)self_7312211)->elements[1], (((closure)  ((closureN)self_7312211)->elements[1])->fn),  c_7317818);; 
++object c_7317811 = Cyc_substring(data,  ((closureN)self_7312204)->elements[1],((closureN)self_7312204)->elements[3], car(((closureN)self_7312204)->elements[2]), car(((closureN)self_7312204)->elements[0]));
++return_direct_with_clo1(data,  ((closureN)self_7312204)->elements[1], (((closure)  ((closureN)self_7312204)->elements[1])->fn),  c_7317811);; 
  }
  
 -static void __lambda_533(void *data, object self_7313458, int argc, object *args) /* object self_7313458, object k_735475 */
-+static void __lambda_533(void *data, object self_7312212, int argc, object *args) /* object self_7312212, object k_735030 */
++static void __lambda_533(void *data, object self_7312205, int argc, object *args) /* object self_7312205, object k_735023 */
   {
 - object k_735475 = args[0];
-+ object k_735030 = args[0];
++ object k_735023 = args[0];
      
    
 -if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313458)->elements[1]), obj_int2obj(1))) ){ 
-+if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312212)->elements[1]), obj_int2obj(1))) ){ 
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312205)->elements[1]), obj_int2obj(1))) ){ 
    
  
 -return_direct_with_clo1(data,  k_735475,__lambda_534,  Cyc_cadr(data, ((closureN)self_7313458)->elements[1]));
-+return_direct_with_clo1(data,  k_735030,__lambda_534,  Cyc_cadr(data, ((closureN)self_7312212)->elements[1]));
++return_direct_with_clo1(data,  k_735023,__lambda_534,  Cyc_cadr(data, ((closureN)self_7312205)->elements[1]));
  } else { 
    
  
 -return_direct_with_clo1(data,  k_735475,__lambda_534,  car(((closureN)self_7313458)->elements[0]));}
-+return_direct_with_clo1(data,  k_735030,__lambda_534,  car(((closureN)self_7312212)->elements[0]));}
++return_direct_with_clo1(data,  k_735023,__lambda_534,  car(((closureN)self_7312205)->elements[0]));}
  ;; 
  }
  
 -static void __lambda_527(void *data, object _, int argc, object *args) /* closure _,object k_735465, object str_73646_733235, object opts_73647_733236_raw, ... */
-- {
++static void __lambda_527(void *data, object _, int argc, object *args) /* closure _,object k_735013, object str_73646_732888, object opts_73647_732889_raw, ... */
+  {
 -object k_735465 = args[0]; object str_73646_733235 = args[1];
 -load_varargs(opts_73647_733236, args, 2, argc - 2);
--  Cyc_st_add(data, "scheme/base.sld:string->vector");
--
++object k_735013 = args[0]; object str_73646_732888 = args[1];
++load_varargs(opts_73647_732889, args, 2, argc - 2);
+   Cyc_st_add(data, "scheme/base.sld:string->vector");
+ 
 -closureN_type c_7319051;
 -object e_7319057 [1];
 -c_7319051.hdr.mark = gc_color_red;
@@ -45942,29 +46180,48 @@ Make let-values be the same as let*-values, to work around
 -c_7319051.num_elements = 1;
 -c_7319051.elements = (object *)e_7319057;
 -c_7319051.elements[0] = k_735465;
--
--
++closureN_type c_7317751;
++object e_7317757 [1];
++c_7317751.hdr.mark = gc_color_red;
++ c_7317751.hdr.grayed = 0;
++c_7317751.tag = closureN_tag;
++ c_7317751.fn = (function_type)__lambda_528;
++c_7317751.num_args = 1;
++c_7317751.num_elements = 1;
++c_7317751.elements = (object *)e_7317757;
++c_7317751.elements[0] = k_735013;
+ 
+ 
 -pair_type local_7319063; 
--
++pair_type local_7317763; 
+ 
 -object c_7319060 = apply(data,(closure)&c_7319051,__glo_string_91_125list_scheme_base, set_pair_as_expr(&local_7319063, str_73646_733235, opts_73647_733236));
 -return_closcall1(data,(closure)&c_7319051,  c_7319060);; 
--}
--
++object c_7317760 = apply(data,(closure)&c_7317751,__glo_string_91_125list_scheme_base, set_pair_as_expr(&local_7317763, str_73646_732888, opts_73647_732889));
++return_closcall1(data,(closure)&c_7317751,  c_7317760);; 
+ }
+ 
 -static void __lambda_528(void *data, object self_7313449, int argc, object *args) /* object self_7313449, object r_735466 */
-- {
++static void __lambda_528(void *data, object self_7312196, int argc, object *args) /* object self_7312196, object r_735014 */
+  {
 - object r_735466 = args[0];
--  
++ object r_735014 = args[0];
+   
 -object c_7319056 = Cyc_list2vector(data,  ((closureN)self_7313449)->elements[0],r_735466);
 -return_direct_with_clo1(data,  ((closureN)self_7313449)->elements[0], (((closure)  ((closureN)self_7313449)->elements[0])->fn),  c_7319056);; 
--}
--
++object c_7317756 = Cyc_list2vector(data,  ((closureN)self_7312196)->elements[0],r_735014);
++return_direct_with_clo1(data,  ((closureN)self_7312196)->elements[0], (((closure)  ((closureN)self_7312196)->elements[0])->fn),  c_7317756);; 
+ }
+ 
 -static void __lambda_517(void *data, object _, int argc, object *args) /* closure _,object k_735442, object str_73638_733227, object opts_73639_733228_raw, ... */
-+static void __lambda_527(void *data, object _, int argc, object *args) /* closure _,object k_735020, object str_73646_732895, object opts_73647_732896_raw, ... */
++static void __lambda_517(void *data, object _, int argc, object *args) /* closure _,object k_734990, object str_73638_732880, object opts_73639_732881_raw, ... */
   {
 -object k_735442 = args[0]; object str_73638_733227 = args[1];
 -load_varargs(opts_73639_733228, args, 2, argc - 2);
--  Cyc_st_add(data, "scheme/base.sld:string->list");
--
++object k_734990 = args[0]; object str_73638_732880 = args[1];
++load_varargs(opts_73639_732881, args, 2, argc - 2);
+   Cyc_st_add(data, "scheme/base.sld:string->list");
+ 
 -closureN_type c_7318932;
 -object e_7319048 [3];
 -c_7318932.hdr.mark = gc_color_red;
@@ -45977,23 +46234,10 @@ Make let-values be the same as let*-values, to work around
 -c_7318932.elements[0] = k_735442;
 -c_7318932.elements[1] = opts_73639_733228;
 -c_7318932.elements[2] = str_73638_733227;
-+object k_735020 = args[0]; object str_73646_732895 = args[1];
-+load_varargs(opts_73647_732896, args, 2, argc - 2);
-+  Cyc_st_add(data, "base.sld:string->vector");
- 
+-
 -return_direct_with_clo4(data,(closure)&c_7318932,__lambda_518,  boolean_f, boolean_f, boolean_f, boolean_f);; 
 -}
-+closureN_type c_7317758;
-+object e_7317764 [1];
-+c_7317758.hdr.mark = gc_color_red;
-+ c_7317758.hdr.grayed = 0;
-+c_7317758.tag = closureN_tag;
-+ c_7317758.fn = (function_type)__lambda_528;
-+c_7317758.num_args = 1;
-+c_7317758.num_elements = 1;
-+c_7317758.elements = (object *)e_7317764;
-+c_7317758.elements[0] = k_735020;
- 
+-
 -static void __lambda_518(void *data, object self_7313436, int argc, object *args) /* object self_7313436, object len_73640_733229, object start_73641_733230, object end_73642_733231, object loop_73643_733232 */
 - {
 - object len_73640_733229 = args[0]; object start_73641_733230 = args[1]; object end_73642_733231 = args[2]; object loop_73643_733232 = args[3];
@@ -46013,21 +46257,16 @@ Make let-values be the same as let*-values, to work around
 -c_7318934.elements[3] = ((closureN)self_7313436)->elements[1];
 -c_7318934.elements[4] = start_73641_733230;
 -c_7318934.elements[5] = ((closureN)self_7313436)->elements[2];
- 
-+pair_type local_7317770; 
- 
+-
+-
 -pair_type local_7319047; 
 -return_direct_with_clo1(data,(closure)&c_7318934,__lambda_1378,  set_cell_as_expr(&local_7319047, len_73640_733229));; 
-+object c_7317767 = apply(data,(closure)&c_7317758,__glo_string_91_125list_scheme_base, set_pair_as_expr(&local_7317770, str_73646_732895, opts_73647_732896));
-+return_closcall1(data,(closure)&c_7317758,  c_7317767);; 
- }
- 
+-}
+-
 -static void __lambda_1378(void *data, object self_7313437, int argc, object *args) /* object self_7313437, object len_73640_733229 */
-+static void __lambda_528(void *data, object self_7312203, int argc, object *args) /* object self_7312203, object r_735021 */
-  {
+- {
 - object len_73640_733229 = args[0];
-+ object r_735021 = args[0];
-   
+-  
 -closureN_type c_7318936;
 -object e_7319039 [6];
 -c_7318936.hdr.mark = gc_color_red;
@@ -46043,19 +46282,55 @@ Make let-values be the same as let*-values, to work around
 -c_7318936.elements[3] = ((closureN)self_7313437)->elements[2];
 -c_7318936.elements[4] = ((closureN)self_7313437)->elements[3];
 -c_7318936.elements[5] = ((closureN)self_7313437)->elements[5];
--
--
++closureN_type c_7317632;
++object e_7317748 [3];
++c_7317632.hdr.mark = gc_color_red;
++ c_7317632.hdr.grayed = 0;
++c_7317632.tag = closureN_tag;
++ c_7317632.fn = (function_type)__lambda_518;
++c_7317632.num_args = 4;
++c_7317632.num_elements = 3;
++c_7317632.elements = (object *)e_7317748;
++c_7317632.elements[0] = k_734990;
++c_7317632.elements[1] = opts_73639_732881;
++c_7317632.elements[2] = str_73638_732880;
+ 
++return_direct_with_clo4(data,(closure)&c_7317632,__lambda_518,  boolean_f, boolean_f, boolean_f, boolean_f);; 
++}
++
++static void __lambda_518(void *data, object self_7312183, int argc, object *args) /* object self_7312183, object len_73640_732882, object start_73641_732883, object end_73642_732884, object loop_73643_732885 */
++ {
++ object len_73640_732882 = args[0]; object start_73641_732883 = args[1]; object end_73642_732884 = args[2]; object loop_73643_732885 = args[3];
++  
++closureN_type c_7317634;
++object e_7317744 [6];
++c_7317634.hdr.mark = gc_color_red;
++ c_7317634.hdr.grayed = 0;
++c_7317634.tag = closureN_tag;
++ c_7317634.fn = (function_type)__lambda_1331;
++c_7317634.num_args = 1;
++c_7317634.num_elements = 6;
++c_7317634.elements = (object *)e_7317744;
++c_7317634.elements[0] = end_73642_732884;
++c_7317634.elements[1] = ((closureN)self_7312183)->elements[0];
++c_7317634.elements[2] = loop_73643_732885;
++c_7317634.elements[3] = ((closureN)self_7312183)->elements[1];
++c_7317634.elements[4] = start_73641_732883;
++c_7317634.elements[5] = ((closureN)self_7312183)->elements[2];
+ 
 -pair_type local_7319042; 
 -return_direct_with_clo1(data,(closure)&c_7318936,__lambda_1377,  set_cell_as_expr(&local_7319042, ((closureN)self_7313437)->elements[4]));; 
-+object c_7317763 = Cyc_list2vector(data,  ((closureN)self_7312203)->elements[0],r_735021);
-+return_direct_with_clo1(data,  ((closureN)self_7312203)->elements[0], (((closure)  ((closureN)self_7312203)->elements[0])->fn),  c_7317763);; 
++
++pair_type local_7317747; 
++return_direct_with_clo1(data,(closure)&c_7317634,__lambda_1331,  set_cell_as_expr(&local_7317747, len_73640_732882));; 
  }
  
 -static void __lambda_1377(void *data, object self_7313438, int argc, object *args) /* object self_7313438, object start_73641_733230 */
-+static void __lambda_517(void *data, object _, int argc, object *args) /* closure _,object k_734997, object str_73638_732887, object opts_73639_732888_raw, ... */
++static void __lambda_1331(void *data, object self_7312184, int argc, object *args) /* object self_7312184, object len_73640_732882 */
   {
 - object start_73641_733230 = args[0];
--  
++ object len_73640_732882 = args[0];
+   
 -closureN_type c_7318938;
 -object e_7319034 [6];
 -c_7318938.hdr.mark = gc_color_red;
@@ -46071,108 +46346,59 @@ Make let-values be the same as let*-values, to work around
 -c_7318938.elements[3] = ((closureN)self_7313438)->elements[4];
 -c_7318938.elements[4] = start_73641_733230;
 -c_7318938.elements[5] = ((closureN)self_7313438)->elements[5];
-+object k_734997 = args[0]; object str_73638_732887 = args[1];
-+load_varargs(opts_73639_732888, args, 2, argc - 2);
-+  Cyc_st_add(data, "base.sld:string->list");
-+
-+closureN_type c_7317639;
-+object e_7317755 [3];
-+c_7317639.hdr.mark = gc_color_red;
-+ c_7317639.hdr.grayed = 0;
-+c_7317639.tag = closureN_tag;
-+ c_7317639.fn = (function_type)__lambda_518;
-+c_7317639.num_args = 4;
-+c_7317639.num_elements = 3;
-+c_7317639.elements = (object *)e_7317755;
-+c_7317639.elements[0] = k_734997;
-+c_7317639.elements[1] = opts_73639_732888;
-+c_7317639.elements[2] = str_73638_732887;
-+
-+return_direct_with_clo4(data,(closure)&c_7317639,__lambda_518,  boolean_f, boolean_f, boolean_f, boolean_f);; 
-+}
-+
-+static void __lambda_518(void *data, object self_7312190, int argc, object *args) /* object self_7312190, object len_73640_732889, object start_73641_732890, object end_73642_732891, object loop_73643_732892 */
-+ {
-+ object len_73640_732889 = args[0]; object start_73641_732890 = args[1]; object end_73642_732891 = args[2]; object loop_73643_732892 = args[3];
-+  
-+closureN_type c_7317641;
-+object e_7317751 [6];
-+c_7317641.hdr.mark = gc_color_red;
-+ c_7317641.hdr.grayed = 0;
-+c_7317641.tag = closureN_tag;
-+ c_7317641.fn = (function_type)__lambda_1331;
-+c_7317641.num_args = 1;
-+c_7317641.num_elements = 6;
-+c_7317641.elements = (object *)e_7317751;
-+c_7317641.elements[0] = end_73642_732891;
-+c_7317641.elements[1] = ((closureN)self_7312190)->elements[0];
-+c_7317641.elements[2] = loop_73643_732892;
-+c_7317641.elements[3] = ((closureN)self_7312190)->elements[1];
-+c_7317641.elements[4] = start_73641_732890;
-+c_7317641.elements[5] = ((closureN)self_7312190)->elements[2];
-+
-+
-+pair_type local_7317754; 
-+return_direct_with_clo1(data,(closure)&c_7317641,__lambda_1331,  set_cell_as_expr(&local_7317754, len_73640_732889));; 
++closureN_type c_7317636;
++object e_7317739 [6];
++c_7317636.hdr.mark = gc_color_red;
++ c_7317636.hdr.grayed = 0;
++c_7317636.tag = closureN_tag;
++ c_7317636.fn = (function_type)__lambda_1330;
++c_7317636.num_args = 1;
++c_7317636.num_elements = 6;
++c_7317636.elements = (object *)e_7317739;
++c_7317636.elements[0] = ((closureN)self_7312184)->elements[0];
++c_7317636.elements[1] = ((closureN)self_7312184)->elements[1];
++c_7317636.elements[2] = len_73640_732882;
++c_7317636.elements[3] = ((closureN)self_7312184)->elements[2];
++c_7317636.elements[4] = ((closureN)self_7312184)->elements[3];
++c_7317636.elements[5] = ((closureN)self_7312184)->elements[5];
++
++
++pair_type local_7317742; 
++return_direct_with_clo1(data,(closure)&c_7317636,__lambda_1330,  set_cell_as_expr(&local_7317742, ((closureN)self_7312184)->elements[4]));; 
 +}
-+
-+static void __lambda_1331(void *data, object self_7312191, int argc, object *args) /* object self_7312191, object len_73640_732889 */
-+ {
-+ object len_73640_732889 = args[0];
-+  
-+closureN_type c_7317643;
-+object e_7317746 [6];
-+c_7317643.hdr.mark = gc_color_red;
-+ c_7317643.hdr.grayed = 0;
-+c_7317643.tag = closureN_tag;
-+ c_7317643.fn = (function_type)__lambda_1330;
-+c_7317643.num_args = 1;
-+c_7317643.num_elements = 6;
-+c_7317643.elements = (object *)e_7317746;
-+c_7317643.elements[0] = ((closureN)self_7312191)->elements[0];
-+c_7317643.elements[1] = ((closureN)self_7312191)->elements[1];
-+c_7317643.elements[2] = len_73640_732889;
-+c_7317643.elements[3] = ((closureN)self_7312191)->elements[2];
-+c_7317643.elements[4] = ((closureN)self_7312191)->elements[3];
-+c_7317643.elements[5] = ((closureN)self_7312191)->elements[5];
-+
-+
-+pair_type local_7317749; 
-+return_direct_with_clo1(data,(closure)&c_7317643,__lambda_1330,  set_cell_as_expr(&local_7317749, ((closureN)self_7312191)->elements[4]));; 
-+}
-+
-+static void __lambda_1330(void *data, object self_7312192, int argc, object *args) /* object self_7312192, object start_73641_732890 */
+ 
++static void __lambda_1330(void *data, object self_7312185, int argc, object *args) /* object self_7312185, object start_73641_732883 */
 + {
-+ object start_73641_732890 = args[0];
++ object start_73641_732883 = args[0];
 +  
-+closureN_type c_7317645;
-+object e_7317741 [6];
-+c_7317645.hdr.mark = gc_color_red;
-+ c_7317645.hdr.grayed = 0;
-+c_7317645.tag = closureN_tag;
-+ c_7317645.fn = (function_type)__lambda_1329;
-+c_7317645.num_args = 1;
-+c_7317645.num_elements = 6;
-+c_7317645.elements = (object *)e_7317741;
-+c_7317645.elements[0] = ((closureN)self_7312192)->elements[1];
-+c_7317645.elements[1] = ((closureN)self_7312192)->elements[2];
-+c_7317645.elements[2] = ((closureN)self_7312192)->elements[3];
-+c_7317645.elements[3] = ((closureN)self_7312192)->elements[4];
-+c_7317645.elements[4] = start_73641_732890;
-+c_7317645.elements[5] = ((closureN)self_7312192)->elements[5];
- 
++closureN_type c_7317638;
++object e_7317734 [6];
++c_7317638.hdr.mark = gc_color_red;
++ c_7317638.hdr.grayed = 0;
++c_7317638.tag = closureN_tag;
++ c_7317638.fn = (function_type)__lambda_1329;
++c_7317638.num_args = 1;
++c_7317638.num_elements = 6;
++c_7317638.elements = (object *)e_7317734;
++c_7317638.elements[0] = ((closureN)self_7312185)->elements[1];
++c_7317638.elements[1] = ((closureN)self_7312185)->elements[2];
++c_7317638.elements[2] = ((closureN)self_7312185)->elements[3];
++c_7317638.elements[3] = ((closureN)self_7312185)->elements[4];
++c_7317638.elements[4] = start_73641_732883;
++c_7317638.elements[5] = ((closureN)self_7312185)->elements[5];
  
 -pair_type local_7319037; 
 -return_direct_with_clo1(data,(closure)&c_7318938,__lambda_1376,  set_cell_as_expr(&local_7319037, ((closureN)self_7313438)->elements[0]));; 
-+pair_type local_7317744; 
-+return_direct_with_clo1(data,(closure)&c_7317645,__lambda_1329,  set_cell_as_expr(&local_7317744, ((closureN)self_7312192)->elements[0]));; 
++
++pair_type local_7317737; 
++return_direct_with_clo1(data,(closure)&c_7317638,__lambda_1329,  set_cell_as_expr(&local_7317737, ((closureN)self_7312185)->elements[0]));; 
  }
  
 -static void __lambda_1376(void *data, object self_7313439, int argc, object *args) /* object self_7313439, object end_73642_733231 */
-+static void __lambda_1329(void *data, object self_7312193, int argc, object *args) /* object self_7312193, object end_73642_732891 */
++static void __lambda_1329(void *data, object self_7312186, int argc, object *args) /* object self_7312186, object end_73642_732884 */
   {
 - object end_73642_733231 = args[0];
-+ object end_73642_732891 = args[0];
++ object end_73642_732884 = args[0];
    
 -closureN_type c_7318940;
 -object e_7319029 [6];
@@ -46189,34 +46415,34 @@ Make let-values be the same as let*-values, to work around
 -c_7318940.elements[3] = ((closureN)self_7313439)->elements[3];
 -c_7318940.elements[4] = ((closureN)self_7313439)->elements[4];
 -c_7318940.elements[5] = ((closureN)self_7313439)->elements[5];
-+closureN_type c_7317647;
-+object e_7317736 [6];
-+c_7317647.hdr.mark = gc_color_red;
-+ c_7317647.hdr.grayed = 0;
-+c_7317647.tag = closureN_tag;
-+ c_7317647.fn = (function_type)__lambda_1328;
-+c_7317647.num_args = 1;
-+c_7317647.num_elements = 6;
-+c_7317647.elements = (object *)e_7317736;
-+c_7317647.elements[0] = end_73642_732891;
-+c_7317647.elements[1] = ((closureN)self_7312193)->elements[0];
-+c_7317647.elements[2] = ((closureN)self_7312193)->elements[1];
-+c_7317647.elements[3] = ((closureN)self_7312193)->elements[3];
-+c_7317647.elements[4] = ((closureN)self_7312193)->elements[4];
-+c_7317647.elements[5] = ((closureN)self_7312193)->elements[5];
++closureN_type c_7317640;
++object e_7317729 [6];
++c_7317640.hdr.mark = gc_color_red;
++ c_7317640.hdr.grayed = 0;
++c_7317640.tag = closureN_tag;
++ c_7317640.fn = (function_type)__lambda_1328;
++c_7317640.num_args = 1;
++c_7317640.num_elements = 6;
++c_7317640.elements = (object *)e_7317729;
++c_7317640.elements[0] = end_73642_732884;
++c_7317640.elements[1] = ((closureN)self_7312186)->elements[0];
++c_7317640.elements[2] = ((closureN)self_7312186)->elements[1];
++c_7317640.elements[3] = ((closureN)self_7312186)->elements[3];
++c_7317640.elements[4] = ((closureN)self_7312186)->elements[4];
++c_7317640.elements[5] = ((closureN)self_7312186)->elements[5];
  
  
 -pair_type local_7319032; 
 -return_direct_with_clo1(data,(closure)&c_7318940,__lambda_1375,  set_cell_as_expr(&local_7319032, ((closureN)self_7313439)->elements[2]));; 
-+pair_type local_7317739; 
-+return_direct_with_clo1(data,(closure)&c_7317647,__lambda_1328,  set_cell_as_expr(&local_7317739, ((closureN)self_7312193)->elements[2]));; 
++pair_type local_7317732; 
++return_direct_with_clo1(data,(closure)&c_7317640,__lambda_1328,  set_cell_as_expr(&local_7317732, ((closureN)self_7312186)->elements[2]));; 
  }
  
 -static void __lambda_1375(void *data, object self_7313440, int argc, object *args) /* object self_7313440, object loop_73643_733232 */
-+static void __lambda_1328(void *data, object self_7312194, int argc, object *args) /* object self_7312194, object loop_73643_732892 */
++static void __lambda_1328(void *data, object self_7312187, int argc, object *args) /* object self_7312187, object loop_73643_732885 */
   {
 - object loop_73643_733232 = args[0];
-+ object loop_73643_732892 = args[0];
++ object loop_73643_732885 = args[0];
    
 -closureN_type c_7318942;
 -object e_7319022 [7];
@@ -46234,47 +46460,47 @@ Make let-values be the same as let*-values, to work around
 -c_7318942.elements[4] = ((closureN)self_7313440)->elements[3];
 -c_7318942.elements[5] = ((closureN)self_7313440)->elements[4];
 -c_7318942.elements[6] = ((closureN)self_7313440)->elements[5];
-+closureN_type c_7317649;
-+object e_7317729 [7];
-+c_7317649.hdr.mark = gc_color_red;
-+ c_7317649.hdr.grayed = 0;
-+c_7317649.tag = closureN_tag;
-+ c_7317649.fn = (function_type)__lambda_519;
-+c_7317649.num_args = 1;
-+c_7317649.num_elements = 7;
-+c_7317649.elements = (object *)e_7317729;
-+c_7317649.elements[0] = ((closureN)self_7312194)->elements[0];
-+c_7317649.elements[1] = ((closureN)self_7312194)->elements[1];
-+c_7317649.elements[2] = ((closureN)self_7312194)->elements[2];
-+c_7317649.elements[3] = loop_73643_732892;
-+c_7317649.elements[4] = ((closureN)self_7312194)->elements[3];
-+c_7317649.elements[5] = ((closureN)self_7312194)->elements[4];
-+c_7317649.elements[6] = ((closureN)self_7312194)->elements[5];
++closureN_type c_7317642;
++object e_7317722 [7];
++c_7317642.hdr.mark = gc_color_red;
++ c_7317642.hdr.grayed = 0;
++c_7317642.tag = closureN_tag;
++ c_7317642.fn = (function_type)__lambda_519;
++c_7317642.num_args = 1;
++c_7317642.num_elements = 7;
++c_7317642.elements = (object *)e_7317722;
++c_7317642.elements[0] = ((closureN)self_7312187)->elements[0];
++c_7317642.elements[1] = ((closureN)self_7312187)->elements[1];
++c_7317642.elements[2] = ((closureN)self_7312187)->elements[2];
++c_7317642.elements[3] = loop_73643_732885;
++c_7317642.elements[4] = ((closureN)self_7312187)->elements[3];
++c_7317642.elements[5] = ((closureN)self_7312187)->elements[4];
++c_7317642.elements[6] = ((closureN)self_7312187)->elements[5];
  
  
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7318942,__lambda_519,  Cyc_set_cell(data, ((closureN)self_7313440)->elements[2], Cyc_string_length(data, ((closureN)self_7313440)->elements[5])));; 
-+return_direct_with_clo1(data,(closure)&c_7317649,__lambda_519,  Cyc_set_cell(data, ((closureN)self_7312194)->elements[2], Cyc_string_length(data, ((closureN)self_7312194)->elements[5])));; 
++return_direct_with_clo1(data,(closure)&c_7317642,__lambda_519,  Cyc_set_cell(data, ((closureN)self_7312187)->elements[2], Cyc_string_length(data, ((closureN)self_7312187)->elements[5])));; 
  }
  
 -static void __lambda_519(void *data, object self_7313441, int argc, object *args) /* object self_7313441, object r_735443 */
-+static void __lambda_519(void *data, object self_7312195, int argc, object *args) /* object self_7312195, object r_734998 */
++static void __lambda_519(void *data, object self_7312188, int argc, object *args) /* object self_7312188, object r_734991 */
   {
  
 -  object r_735458;
-+  object r_735013;
++  object r_735006;
      
    
 -if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313441)->elements[4]), obj_int2obj(0))) ){ 
-+if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312195)->elements[4]), obj_int2obj(0))) ){ 
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312188)->elements[4]), obj_int2obj(0))) ){ 
    
 -  r_735458 = Cyc_car(data, ((closureN)self_7313441)->elements[4]);
-+  r_735013 = Cyc_car(data, ((closureN)self_7312195)->elements[4]);
++  r_735006 = Cyc_car(data, ((closureN)self_7312188)->elements[4]);
  } else { 
 -  r_735458 = obj_int2obj(0);}
-+  r_735013 = obj_int2obj(0);}
++  r_735006 = obj_int2obj(0);}
  ;
 -closureN_type c_7318955;
 -object e_7319018 [7];
@@ -46292,31 +46518,31 @@ Make let-values be the same as let*-values, to work around
 -c_7318955.elements[4] = ((closureN)self_7313441)->elements[4];
 -c_7318955.elements[5] = ((closureN)self_7313441)->elements[5];
 -c_7318955.elements[6] = ((closureN)self_7313441)->elements[6];
-+closureN_type c_7317662;
-+object e_7317725 [7];
-+c_7317662.hdr.mark = gc_color_red;
-+ c_7317662.hdr.grayed = 0;
-+c_7317662.tag = closureN_tag;
-+ c_7317662.fn = (function_type)__lambda_520;
-+c_7317662.num_args = 1;
-+c_7317662.num_elements = 7;
-+c_7317662.elements = (object *)e_7317725;
-+c_7317662.elements[0] = ((closureN)self_7312195)->elements[0];
-+c_7317662.elements[1] = ((closureN)self_7312195)->elements[1];
-+c_7317662.elements[2] = ((closureN)self_7312195)->elements[2];
-+c_7317662.elements[3] = ((closureN)self_7312195)->elements[3];
-+c_7317662.elements[4] = ((closureN)self_7312195)->elements[4];
-+c_7317662.elements[5] = ((closureN)self_7312195)->elements[5];
-+c_7317662.elements[6] = ((closureN)self_7312195)->elements[6];
++closureN_type c_7317655;
++object e_7317718 [7];
++c_7317655.hdr.mark = gc_color_red;
++ c_7317655.hdr.grayed = 0;
++c_7317655.tag = closureN_tag;
++ c_7317655.fn = (function_type)__lambda_520;
++c_7317655.num_args = 1;
++c_7317655.num_elements = 7;
++c_7317655.elements = (object *)e_7317718;
++c_7317655.elements[0] = ((closureN)self_7312188)->elements[0];
++c_7317655.elements[1] = ((closureN)self_7312188)->elements[1];
++c_7317655.elements[2] = ((closureN)self_7312188)->elements[2];
++c_7317655.elements[3] = ((closureN)self_7312188)->elements[3];
++c_7317655.elements[4] = ((closureN)self_7312188)->elements[4];
++c_7317655.elements[5] = ((closureN)self_7312188)->elements[5];
++c_7317655.elements[6] = ((closureN)self_7312188)->elements[6];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7318955,__lambda_520,  Cyc_set_cell(data, ((closureN)self_7313441)->elements[5], r_735458));; 
-+return_direct_with_clo1(data,(closure)&c_7317662,__lambda_520,  Cyc_set_cell(data, ((closureN)self_7312195)->elements[5], r_735013));; 
++return_direct_with_clo1(data,(closure)&c_7317655,__lambda_520,  Cyc_set_cell(data, ((closureN)self_7312188)->elements[5], r_735006));; 
  }
  
 -static void __lambda_520(void *data, object self_7313442, int argc, object *args) /* object self_7313442, object r_735444 */
-+static void __lambda_520(void *data, object self_7312196, int argc, object *args) /* object self_7312196, object r_734999 */
++static void __lambda_520(void *data, object self_7312189, int argc, object *args) /* object self_7312189, object r_734992 */
   {
  
    
@@ -46331,17 +46557,17 @@ Make let-values be the same as let*-values, to work around
 -c_7318957.elements = (object *)e_7318971;
 -c_7318957.elements[0] = ((closureN)self_7313442)->elements[2];
 -c_7318957.elements[1] = ((closureN)self_7313442)->elements[4];
-+closureN_type c_7317664;
-+object e_7317678 [2];
-+c_7317664.hdr.mark = gc_color_red;
-+ c_7317664.hdr.grayed = 0;
-+c_7317664.tag = closureN_tag;
-+ c_7317664.fn = (function_type)__lambda_521;
-+c_7317664.num_args = 0;
-+c_7317664.num_elements = 2;
-+c_7317664.elements = (object *)e_7317678;
-+c_7317664.elements[0] = ((closureN)self_7312196)->elements[2];
-+c_7317664.elements[1] = ((closureN)self_7312196)->elements[4];
++closureN_type c_7317657;
++object e_7317671 [2];
++c_7317657.hdr.mark = gc_color_red;
++ c_7317657.hdr.grayed = 0;
++c_7317657.tag = closureN_tag;
++ c_7317657.fn = (function_type)__lambda_521;
++c_7317657.num_args = 0;
++c_7317657.num_elements = 2;
++c_7317657.elements = (object *)e_7317671;
++c_7317657.elements[0] = ((closureN)self_7312189)->elements[2];
++c_7317657.elements[1] = ((closureN)self_7312189)->elements[4];
  
  
 -closureN_type c_7318972;
@@ -46358,30 +46584,30 @@ Make let-values be the same as let*-values, to work around
 -c_7318972.elements[2] = ((closureN)self_7313442)->elements[3];
 -c_7318972.elements[3] = ((closureN)self_7313442)->elements[5];
 -c_7318972.elements[4] = ((closureN)self_7313442)->elements[6];
-+closureN_type c_7317679;
-+object e_7317724 [5];
-+c_7317679.hdr.mark = gc_color_red;
-+ c_7317679.hdr.grayed = 0;
-+c_7317679.tag = closureN_tag;
-+ c_7317679.fn = (function_type)__lambda_522;
-+c_7317679.num_args = 1;
-+c_7317679.num_elements = 5;
-+c_7317679.elements = (object *)e_7317724;
-+c_7317679.elements[0] = ((closureN)self_7312196)->elements[0];
-+c_7317679.elements[1] = ((closureN)self_7312196)->elements[1];
-+c_7317679.elements[2] = ((closureN)self_7312196)->elements[3];
-+c_7317679.elements[3] = ((closureN)self_7312196)->elements[5];
-+c_7317679.elements[4] = ((closureN)self_7312196)->elements[6];
++closureN_type c_7317672;
++object e_7317717 [5];
++c_7317672.hdr.mark = gc_color_red;
++ c_7317672.hdr.grayed = 0;
++c_7317672.tag = closureN_tag;
++ c_7317672.fn = (function_type)__lambda_522;
++c_7317672.num_args = 1;
++c_7317672.num_elements = 5;
++c_7317672.elements = (object *)e_7317717;
++c_7317672.elements[0] = ((closureN)self_7312189)->elements[0];
++c_7317672.elements[1] = ((closureN)self_7312189)->elements[1];
++c_7317672.elements[2] = ((closureN)self_7312189)->elements[3];
++c_7317672.elements[3] = ((closureN)self_7312189)->elements[5];
++c_7317672.elements[4] = ((closureN)self_7312189)->elements[6];
  
 -return_direct_with_clo1(data,(closure)&c_7318957,__lambda_521,  &c_7318972);; 
-+return_direct_with_clo1(data,(closure)&c_7317664,__lambda_521,  &c_7317679);; 
++return_direct_with_clo1(data,(closure)&c_7317657,__lambda_521,  &c_7317672);; 
  }
  
 -static void __lambda_522(void *data, object self_7313443, int argc, object *args) /* object self_7313443, object r_735454 */
-+static void __lambda_522(void *data, object self_7312197, int argc, object *args) /* object self_7312197, object r_735009 */
++static void __lambda_522(void *data, object self_7312190, int argc, object *args) /* object self_7312190, object r_735002 */
   {
 - object r_735454 = args[0];
-+ object r_735009 = args[0];
++ object r_735002 = args[0];
    
 -closureN_type c_7318974;
 -object e_7319013 [5];
@@ -46397,29 +46623,29 @@ Make let-values be the same as let*-values, to work around
 -c_7318974.elements[2] = ((closureN)self_7313443)->elements[2];
 -c_7318974.elements[3] = ((closureN)self_7313443)->elements[3];
 -c_7318974.elements[4] = ((closureN)self_7313443)->elements[4];
-+closureN_type c_7317681;
-+object e_7317720 [5];
-+c_7317681.hdr.mark = gc_color_red;
-+ c_7317681.hdr.grayed = 0;
-+c_7317681.tag = closureN_tag;
-+ c_7317681.fn = (function_type)__lambda_523;
-+c_7317681.num_args = 1;
-+c_7317681.num_elements = 5;
-+c_7317681.elements = (object *)e_7317720;
-+c_7317681.elements[0] = ((closureN)self_7312197)->elements[0];
-+c_7317681.elements[1] = ((closureN)self_7312197)->elements[1];
-+c_7317681.elements[2] = ((closureN)self_7312197)->elements[2];
-+c_7317681.elements[3] = ((closureN)self_7312197)->elements[3];
-+c_7317681.elements[4] = ((closureN)self_7312197)->elements[4];
++closureN_type c_7317674;
++object e_7317713 [5];
++c_7317674.hdr.mark = gc_color_red;
++ c_7317674.hdr.grayed = 0;
++c_7317674.tag = closureN_tag;
++ c_7317674.fn = (function_type)__lambda_523;
++c_7317674.num_args = 1;
++c_7317674.num_elements = 5;
++c_7317674.elements = (object *)e_7317713;
++c_7317674.elements[0] = ((closureN)self_7312190)->elements[0];
++c_7317674.elements[1] = ((closureN)self_7312190)->elements[1];
++c_7317674.elements[2] = ((closureN)self_7312190)->elements[2];
++c_7317674.elements[3] = ((closureN)self_7312190)->elements[3];
++c_7317674.elements[4] = ((closureN)self_7312190)->elements[4];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7318974,__lambda_523,  Cyc_set_cell(data, ((closureN)self_7313443)->elements[0], r_735454));; 
-+return_direct_with_clo1(data,(closure)&c_7317681,__lambda_523,  Cyc_set_cell(data, ((closureN)self_7312197)->elements[0], r_735009));; 
++return_direct_with_clo1(data,(closure)&c_7317674,__lambda_523,  Cyc_set_cell(data, ((closureN)self_7312190)->elements[0], r_735002));; 
  }
  
 -static void __lambda_523(void *data, object self_7313444, int argc, object *args) /* object self_7313444, object r_735445 */
-+static void __lambda_523(void *data, object self_7312198, int argc, object *args) /* object self_7312198, object r_735000 */
++static void __lambda_523(void *data, object self_7312191, int argc, object *args) /* object self_7312191, object r_734993 */
   {
  
    
@@ -46435,18 +46661,18 @@ Make let-values be the same as let*-values, to work around
 -c_7318976.elements[0] = ((closureN)self_7313444)->elements[1];
 -c_7318976.elements[1] = ((closureN)self_7313444)->elements[2];
 -c_7318976.elements[2] = ((closureN)self_7313444)->elements[3];
-+closureN_type c_7317683;
-+object e_7317698 [3];
-+c_7317683.hdr.mark = gc_color_red;
-+ c_7317683.hdr.grayed = 0;
-+c_7317683.tag = closureN_tag;
-+ c_7317683.fn = (function_type)__lambda_524;
-+c_7317683.num_args = 1;
-+c_7317683.num_elements = 3;
-+c_7317683.elements = (object *)e_7317698;
-+c_7317683.elements[0] = ((closureN)self_7312198)->elements[1];
-+c_7317683.elements[1] = ((closureN)self_7312198)->elements[2];
-+c_7317683.elements[2] = ((closureN)self_7312198)->elements[3];
++closureN_type c_7317676;
++object e_7317691 [3];
++c_7317676.hdr.mark = gc_color_red;
++ c_7317676.hdr.grayed = 0;
++c_7317676.tag = closureN_tag;
++ c_7317676.fn = (function_type)__lambda_524;
++c_7317676.num_args = 1;
++c_7317676.num_elements = 3;
++c_7317676.elements = (object *)e_7317691;
++c_7317676.elements[0] = ((closureN)self_7312191)->elements[1];
++c_7317676.elements[1] = ((closureN)self_7312191)->elements[2];
++c_7317676.elements[2] = ((closureN)self_7312191)->elements[3];
  
  
 -closureN_type c_7318992;
@@ -46461,55 +46687,55 @@ Make let-values be the same as let*-values, to work around
 -c_7318992.elements[0] = ((closureN)self_7313444)->elements[0];
 -c_7318992.elements[1] = ((closureN)self_7313444)->elements[2];
 -c_7318992.elements[2] = ((closureN)self_7313444)->elements[4];
-+closureN_type c_7317699;
-+object e_7317719 [3];
-+c_7317699.hdr.mark = gc_color_red;
-+ c_7317699.hdr.grayed = 0;
-+c_7317699.tag = closureN_tag;
-+ c_7317699.fn = (function_type)__lambda_526;
-+c_7317699.num_args = 2;
-+c_7317699.num_elements = 3;
-+c_7317699.elements = (object *)e_7317719;
-+c_7317699.elements[0] = ((closureN)self_7312198)->elements[0];
-+c_7317699.elements[1] = ((closureN)self_7312198)->elements[2];
-+c_7317699.elements[2] = ((closureN)self_7312198)->elements[4];
++closureN_type c_7317692;
++object e_7317712 [3];
++c_7317692.hdr.mark = gc_color_red;
++ c_7317692.hdr.grayed = 0;
++c_7317692.tag = closureN_tag;
++ c_7317692.fn = (function_type)__lambda_526;
++c_7317692.num_args = 2;
++c_7317692.num_elements = 3;
++c_7317692.elements = (object *)e_7317712;
++c_7317692.elements[0] = ((closureN)self_7312191)->elements[0];
++c_7317692.elements[1] = ((closureN)self_7312191)->elements[2];
++c_7317692.elements[2] = ((closureN)self_7312191)->elements[4];
  
 -return_direct_with_clo1(data,(closure)&c_7318976,__lambda_524,  &c_7318992);; 
-+return_direct_with_clo1(data,(closure)&c_7317683,__lambda_524,  &c_7317699);; 
++return_direct_with_clo1(data,(closure)&c_7317676,__lambda_524,  &c_7317692);; 
  }
  
 -static void __lambda_526(void *data, object self_7313445, int argc, object *args) /* object self_7313445, object k_735449, object i_73644_733233, object lst_73645_733234 */
-+static void __lambda_526(void *data, object self_7312199, int argc, object *args) /* object self_7312199, object k_735004, object i_73644_732893, object lst_73645_732894 */
++static void __lambda_526(void *data, object self_7312192, int argc, object *args) /* object self_7312192, object k_734997, object i_73644_732886, object lst_73645_732887 */
   {
 - object k_735449 = args[0]; object i_73644_733233 = args[1]; object lst_73645_733234 = args[2];
-+ object k_735004 = args[0]; object i_73644_732893 = args[1]; object lst_73645_732894 = args[2];
++ object k_734997 = args[0]; object i_73644_732886 = args[1]; object lst_73645_732887 = args[2];
      
    
 -if( (boolean_f != Cyc_num_fast_eq_op(data, i_73644_733233, car(((closureN)self_7313445)->elements[0]))) ){ 
 -  return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  k_735449, primitive_cons, NULL, lst_73645_733234);
-+if( (boolean_f != Cyc_num_fast_eq_op(data, i_73644_732893, car(((closureN)self_7312199)->elements[0]))) ){ 
-+  return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  k_735004, primitive_cons, NULL, lst_73645_732894);
++if( (boolean_f != Cyc_num_fast_eq_op(data, i_73644_732886, car(((closureN)self_7312192)->elements[0]))) ){ 
++  return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  k_734997, primitive_cons, NULL, lst_73645_732887);
  } else { 
    
  
  
 -complex_num_type local_7319005; 
-+complex_num_type local_7317712; 
++complex_num_type local_7317705; 
  
 -pair_type local_7319008; 
-+pair_type local_7317715; 
++pair_type local_7317708; 
  
  
 -return_closcall3(data,  car(((closureN)self_7313445)->elements[1]),  k_735449, Cyc_fast_sum(data,&local_7319005, i_73644_733233, obj_int2obj(1)), set_pair_as_expr(&local_7319008, Cyc_string_ref(data, ((closureN)self_7313445)->elements[2], i_73644_733233), lst_73645_733234));}
-+return_closcall3(data,  car(((closureN)self_7312199)->elements[1]),  k_735004, Cyc_fast_sum(data,&local_7317712, i_73644_732893, obj_int2obj(1)), set_pair_as_expr(&local_7317715, Cyc_string_ref(data, ((closureN)self_7312199)->elements[2], i_73644_732893), lst_73645_732894));}
++return_closcall3(data,  car(((closureN)self_7312192)->elements[1]),  k_734997, Cyc_fast_sum(data,&local_7317705, i_73644_732886, obj_int2obj(1)), set_pair_as_expr(&local_7317708, Cyc_string_ref(data, ((closureN)self_7312192)->elements[2], i_73644_732886), lst_73645_732887));}
  ;; 
  }
  
 -static void __lambda_524(void *data, object self_7313446, int argc, object *args) /* object self_7313446, object r_735448 */
-+static void __lambda_524(void *data, object self_7312200, int argc, object *args) /* object self_7312200, object r_735003 */
++static void __lambda_524(void *data, object self_7312193, int argc, object *args) /* object self_7312193, object r_734996 */
   {
 - object r_735448 = args[0];
-+ object r_735003 = args[0];
++ object r_734996 = args[0];
    
 -closureN_type c_7318978;
 -object e_7318987 [3];
@@ -46523,27 +46749,27 @@ Make let-values be the same as let*-values, to work around
 -c_7318978.elements[0] = ((closureN)self_7313446)->elements[0];
 -c_7318978.elements[1] = ((closureN)self_7313446)->elements[1];
 -c_7318978.elements[2] = ((closureN)self_7313446)->elements[2];
-+closureN_type c_7317685;
-+object e_7317694 [3];
-+c_7317685.hdr.mark = gc_color_red;
-+ c_7317685.hdr.grayed = 0;
-+c_7317685.tag = closureN_tag;
-+ c_7317685.fn = (function_type)__lambda_525;
-+c_7317685.num_args = 1;
-+c_7317685.num_elements = 3;
-+c_7317685.elements = (object *)e_7317694;
-+c_7317685.elements[0] = ((closureN)self_7312200)->elements[0];
-+c_7317685.elements[1] = ((closureN)self_7312200)->elements[1];
-+c_7317685.elements[2] = ((closureN)self_7312200)->elements[2];
++closureN_type c_7317678;
++object e_7317687 [3];
++c_7317678.hdr.mark = gc_color_red;
++ c_7317678.hdr.grayed = 0;
++c_7317678.tag = closureN_tag;
++ c_7317678.fn = (function_type)__lambda_525;
++c_7317678.num_args = 1;
++c_7317678.num_elements = 3;
++c_7317678.elements = (object *)e_7317687;
++c_7317678.elements[0] = ((closureN)self_7312193)->elements[0];
++c_7317678.elements[1] = ((closureN)self_7312193)->elements[1];
++c_7317678.elements[2] = ((closureN)self_7312193)->elements[2];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7318978,__lambda_525,  Cyc_set_cell(data, ((closureN)self_7313446)->elements[1], r_735448));; 
-+return_direct_with_clo1(data,(closure)&c_7317685,__lambda_525,  Cyc_set_cell(data, ((closureN)self_7312200)->elements[1], r_735003));; 
++return_direct_with_clo1(data,(closure)&c_7317678,__lambda_525,  Cyc_set_cell(data, ((closureN)self_7312193)->elements[1], r_734996));; 
  }
  
 -static void __lambda_525(void *data, object self_7313447, int argc, object *args) /* object self_7313447, object r_735446 */
-+static void __lambda_525(void *data, object self_7312201, int argc, object *args) /* object self_7312201, object r_735001 */
++static void __lambda_525(void *data, object self_7312194, int argc, object *args) /* object self_7312194, object r_734994 */
   {
  
    
@@ -46551,39 +46777,38 @@ Make let-values be the same as let*-values, to work around
  
  
 -return_closcall3(data,  car(((closureN)self_7313447)->elements[1]),  ((closureN)self_7313447)->elements[0], car(((closureN)self_7313447)->elements[2]), NULL);; 
-+return_closcall3(data,  car(((closureN)self_7312201)->elements[1]),  ((closureN)self_7312201)->elements[0], car(((closureN)self_7312201)->elements[2]), NULL);; 
++return_closcall3(data,  car(((closureN)self_7312194)->elements[1]),  ((closureN)self_7312194)->elements[0], car(((closureN)self_7312194)->elements[2]), NULL);; 
  }
  
 -static void __lambda_521(void *data, object self_7313448, int argc, object *args) /* object self_7313448, object k_735455 */
-+static void __lambda_521(void *data, object self_7312202, int argc, object *args) /* object self_7312202, object k_735010 */
++static void __lambda_521(void *data, object self_7312195, int argc, object *args) /* object self_7312195, object k_735003 */
   {
 - object k_735455 = args[0];
-+ object k_735010 = args[0];
++ object k_735003 = args[0];
      
    
 -if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313448)->elements[1]), obj_int2obj(1))) ){ 
-+if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312202)->elements[1]), obj_int2obj(1))) ){ 
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312195)->elements[1]), obj_int2obj(1))) ){ 
    
  
 -return_direct_with_clo1(data,  k_735455,__lambda_522,  Cyc_cadr(data, ((closureN)self_7313448)->elements[1]));
-+return_direct_with_clo1(data,  k_735010,__lambda_522,  Cyc_cadr(data, ((closureN)self_7312202)->elements[1]));
++return_direct_with_clo1(data,  k_735003,__lambda_522,  Cyc_cadr(data, ((closureN)self_7312195)->elements[1]));
  } else { 
    
  
 -return_direct_with_clo1(data,  k_735455,__lambda_522,  car(((closureN)self_7313448)->elements[0]));}
-+return_direct_with_clo1(data,  k_735010,__lambda_522,  car(((closureN)self_7312202)->elements[0]));}
++return_direct_with_clo1(data,  k_735003,__lambda_522,  car(((closureN)self_7312195)->elements[0]));}
  ;; 
  }
  
 -static void __lambda_515(void *data, object _, int argc, object *args) /* closure _,object k_735437, object vec_73635_733224, object opts_73636_733225_raw, ... */
-+static void __lambda_515(void *data, object _, int argc, object *args) /* closure _,object k_734992, object vec_73635_732884, object opts_73636_732885_raw, ... */
++static void __lambda_515(void *data, object _, int argc, object *args) /* closure _,object k_734985, object vec_73635_732877, object opts_73636_732878_raw, ... */
   {
 -object k_735437 = args[0]; object vec_73635_733224 = args[1];
 -load_varargs(opts_73636_733225, args, 2, argc - 2);
--  Cyc_st_add(data, "scheme/base.sld:vector->string");
-+object k_734992 = args[0]; object vec_73635_732884 = args[1];
-+load_varargs(opts_73636_732885, args, 2, argc - 2);
-+  Cyc_st_add(data, "base.sld:vector->string");
++object k_734985 = args[0]; object vec_73635_732877 = args[1];
++load_varargs(opts_73636_732878, args, 2, argc - 2);
+   Cyc_st_add(data, "scheme/base.sld:vector->string");
  
 -closureN_type c_7318917;
 -object e_7318923 [1];
@@ -46595,48 +46820,47 @@ Make let-values be the same as let*-values, to work around
 -c_7318917.num_elements = 1;
 -c_7318917.elements = (object *)e_7318923;
 -c_7318917.elements[0] = k_735437;
-+closureN_type c_7317624;
-+object e_7317630 [1];
-+c_7317624.hdr.mark = gc_color_red;
-+ c_7317624.hdr.grayed = 0;
-+c_7317624.tag = closureN_tag;
-+ c_7317624.fn = (function_type)__lambda_516;
-+c_7317624.num_args = 1;
-+c_7317624.num_elements = 1;
-+c_7317624.elements = (object *)e_7317630;
-+c_7317624.elements[0] = k_734992;
++closureN_type c_7317617;
++object e_7317623 [1];
++c_7317617.hdr.mark = gc_color_red;
++ c_7317617.hdr.grayed = 0;
++c_7317617.tag = closureN_tag;
++ c_7317617.fn = (function_type)__lambda_516;
++c_7317617.num_args = 1;
++c_7317617.num_elements = 1;
++c_7317617.elements = (object *)e_7317623;
++c_7317617.elements[0] = k_734985;
  
  
 -pair_type local_7318929; 
-+pair_type local_7317636; 
++pair_type local_7317629; 
  
 -object c_7318926 = apply(data,(closure)&c_7318917,__glo_vector_91_125list_scheme_base, set_pair_as_expr(&local_7318929, vec_73635_733224, opts_73636_733225));
 -return_closcall1(data,(closure)&c_7318917,  c_7318926);; 
-+object c_7317633 = apply(data,(closure)&c_7317624,__glo_vector_91_125list_scheme_base, set_pair_as_expr(&local_7317636, vec_73635_732884, opts_73636_732885));
-+return_closcall1(data,(closure)&c_7317624,  c_7317633);; 
++object c_7317626 = apply(data,(closure)&c_7317617,__glo_vector_91_125list_scheme_base, set_pair_as_expr(&local_7317629, vec_73635_732877, opts_73636_732878));
++return_closcall1(data,(closure)&c_7317617,  c_7317626);; 
  }
  
 -static void __lambda_516(void *data, object self_7313435, int argc, object *args) /* object self_7313435, object lst_73637_733226 */
-+static void __lambda_516(void *data, object self_7312189, int argc, object *args) /* object self_7312189, object lst_73637_732886 */
++static void __lambda_516(void *data, object self_7312182, int argc, object *args) /* object self_7312182, object lst_73637_732879 */
   {
 - object lst_73637_733226 = args[0];
-+ object lst_73637_732886 = args[0];
++ object lst_73637_732879 = args[0];
    
 -object c_7318922 = Cyc_list2string(data,  ((closureN)self_7313435)->elements[0],lst_73637_733226);
 -return_direct_with_clo1(data,  ((closureN)self_7313435)->elements[0], (((closure)  ((closureN)self_7313435)->elements[0])->fn),  c_7318922);; 
-+object c_7317629 = Cyc_list2string(data,  ((closureN)self_7312189)->elements[0],lst_73637_732886);
-+return_direct_with_clo1(data,  ((closureN)self_7312189)->elements[0], (((closure)  ((closureN)self_7312189)->elements[0])->fn),  c_7317629);; 
++object c_7317622 = Cyc_list2string(data,  ((closureN)self_7312182)->elements[0],lst_73637_732879);
++return_direct_with_clo1(data,  ((closureN)self_7312182)->elements[0], (((closure)  ((closureN)self_7312182)->elements[0])->fn),  c_7317622);; 
  }
  
 -static void __lambda_508(void *data, object _, int argc, object *args) /* closure _,object k_735422, object str_73630_733219, object opts_73631_733220_raw, ... */
-+static void __lambda_508(void *data, object _, int argc, object *args) /* closure _,object k_734977, object str_73630_732879, object opts_73631_732880_raw, ... */
++static void __lambda_508(void *data, object _, int argc, object *args) /* closure _,object k_734970, object str_73630_732872, object opts_73631_732873_raw, ... */
   {
 -object k_735422 = args[0]; object str_73630_733219 = args[1];
 -load_varargs(opts_73631_733220, args, 2, argc - 2);
--  Cyc_st_add(data, "scheme/base.sld:string->utf8");
-+object k_734977 = args[0]; object str_73630_732879 = args[1];
-+load_varargs(opts_73631_732880, args, 2, argc - 2);
-+  Cyc_st_add(data, "base.sld:string->utf8");
++object k_734970 = args[0]; object str_73630_732872 = args[1];
++load_varargs(opts_73631_732873, args, 2, argc - 2);
+   Cyc_st_add(data, "scheme/base.sld:string->utf8");
  
 -closureN_type c_7318831;
 -object e_7318914 [3];
@@ -46650,29 +46874,14 @@ Make let-values be the same as let*-values, to work around
 -c_7318831.elements[0] = k_735422;
 -c_7318831.elements[1] = opts_73631_733220;
 -c_7318831.elements[2] = str_73630_733219;
-+closureN_type c_7317538;
-+object e_7317621 [3];
-+c_7317538.hdr.mark = gc_color_red;
-+ c_7317538.hdr.grayed = 0;
-+c_7317538.tag = closureN_tag;
-+ c_7317538.fn = (function_type)__lambda_509;
-+c_7317538.num_args = 3;
-+c_7317538.num_elements = 3;
-+c_7317538.elements = (object *)e_7317621;
-+c_7317538.elements[0] = k_734977;
-+c_7317538.elements[1] = opts_73631_732880;
-+c_7317538.elements[2] = str_73630_732879;
- 
+-
 -return_direct_with_clo3(data,(closure)&c_7318831,__lambda_509,  boolean_f, boolean_f, boolean_f);; 
-+return_direct_with_clo3(data,(closure)&c_7317538,__lambda_509,  boolean_f, boolean_f, boolean_f);; 
- }
- 
+-}
+-
 -static void __lambda_509(void *data, object self_7313426, int argc, object *args) /* object self_7313426, object len_73632_733221, object start_73633_733222, object end_73634_733223 */
-+static void __lambda_509(void *data, object self_7312180, int argc, object *args) /* object self_7312180, object len_73632_732881, object start_73633_732882, object end_73634_732883 */
-  {
+- {
 - object len_73632_733221 = args[0]; object start_73633_733222 = args[1]; object end_73634_733223 = args[2];
-+ object len_73632_732881 = args[0]; object start_73633_732882 = args[1]; object end_73634_732883 = args[2];
-   
+-  
 -closureN_type c_7318833;
 -object e_7318910 [5];
 -c_7318833.hdr.mark = gc_color_red;
@@ -46687,33 +46896,53 @@ Make let-values be the same as let*-values, to work around
 -c_7318833.elements[2] = ((closureN)self_7313426)->elements[1];
 -c_7318833.elements[3] = start_73633_733222;
 -c_7318833.elements[4] = ((closureN)self_7313426)->elements[2];
-+closureN_type c_7317540;
-+object e_7317617 [5];
-+c_7317540.hdr.mark = gc_color_red;
-+ c_7317540.hdr.grayed = 0;
-+c_7317540.tag = closureN_tag;
-+ c_7317540.fn = (function_type)__lambda_1327;
-+c_7317540.num_args = 1;
-+c_7317540.num_elements = 5;
-+c_7317540.elements = (object *)e_7317617;
-+c_7317540.elements[0] = end_73634_732883;
-+c_7317540.elements[1] = ((closureN)self_7312180)->elements[0];
-+c_7317540.elements[2] = ((closureN)self_7312180)->elements[1];
-+c_7317540.elements[3] = start_73633_732882;
-+c_7317540.elements[4] = ((closureN)self_7312180)->elements[2];
++closureN_type c_7317531;
++object e_7317614 [3];
++c_7317531.hdr.mark = gc_color_red;
++ c_7317531.hdr.grayed = 0;
++c_7317531.tag = closureN_tag;
++ c_7317531.fn = (function_type)__lambda_509;
++c_7317531.num_args = 3;
++c_7317531.num_elements = 3;
++c_7317531.elements = (object *)e_7317614;
++c_7317531.elements[0] = k_734970;
++c_7317531.elements[1] = opts_73631_732873;
++c_7317531.elements[2] = str_73630_732872;
++
++return_direct_with_clo3(data,(closure)&c_7317531,__lambda_509,  boolean_f, boolean_f, boolean_f);; 
++}
  
++static void __lambda_509(void *data, object self_7312173, int argc, object *args) /* object self_7312173, object len_73632_732874, object start_73633_732875, object end_73634_732876 */
++ {
++ object len_73632_732874 = args[0]; object start_73633_732875 = args[1]; object end_73634_732876 = args[2];
++  
++closureN_type c_7317533;
++object e_7317610 [5];
++c_7317533.hdr.mark = gc_color_red;
++ c_7317533.hdr.grayed = 0;
++c_7317533.tag = closureN_tag;
++ c_7317533.fn = (function_type)__lambda_1327;
++c_7317533.num_args = 1;
++c_7317533.num_elements = 5;
++c_7317533.elements = (object *)e_7317610;
++c_7317533.elements[0] = end_73634_732876;
++c_7317533.elements[1] = ((closureN)self_7312173)->elements[0];
++c_7317533.elements[2] = ((closureN)self_7312173)->elements[1];
++c_7317533.elements[3] = start_73633_732875;
++c_7317533.elements[4] = ((closureN)self_7312173)->elements[2];
  
 -pair_type local_7318913; 
 -return_direct_with_clo1(data,(closure)&c_7318833,__lambda_1374,  set_cell_as_expr(&local_7318913, len_73632_733221));; 
-+pair_type local_7317620; 
-+return_direct_with_clo1(data,(closure)&c_7317540,__lambda_1327,  set_cell_as_expr(&local_7317620, len_73632_732881));; 
++
++pair_type local_7317613; 
++return_direct_with_clo1(data,(closure)&c_7317533,__lambda_1327,  set_cell_as_expr(&local_7317613, len_73632_732874));; 
  }
  
 -static void __lambda_1374(void *data, object self_7313427, int argc, object *args) /* object self_7313427, object len_73632_733221 */
-+static void __lambda_1327(void *data, object self_7312181, int argc, object *args) /* object self_7312181, object len_73632_732881 */
++static void __lambda_1327(void *data, object self_7312174, int argc, object *args) /* object self_7312174, object len_73632_732874 */
   {
 - object len_73632_733221 = args[0];
-+ object len_73632_732881 = args[0];
++ object len_73632_732874 = args[0];
    
 -closureN_type c_7318835;
 -object e_7318905 [5];
@@ -46729,33 +46958,33 @@ Make let-values be the same as let*-values, to work around
 -c_7318835.elements[2] = len_73632_733221;
 -c_7318835.elements[3] = ((closureN)self_7313427)->elements[2];
 -c_7318835.elements[4] = ((closureN)self_7313427)->elements[4];
-+closureN_type c_7317542;
-+object e_7317612 [5];
-+c_7317542.hdr.mark = gc_color_red;
-+ c_7317542.hdr.grayed = 0;
-+c_7317542.tag = closureN_tag;
-+ c_7317542.fn = (function_type)__lambda_1326;
-+c_7317542.num_args = 1;
-+c_7317542.num_elements = 5;
-+c_7317542.elements = (object *)e_7317612;
-+c_7317542.elements[0] = ((closureN)self_7312181)->elements[0];
-+c_7317542.elements[1] = ((closureN)self_7312181)->elements[1];
-+c_7317542.elements[2] = len_73632_732881;
-+c_7317542.elements[3] = ((closureN)self_7312181)->elements[2];
-+c_7317542.elements[4] = ((closureN)self_7312181)->elements[4];
++closureN_type c_7317535;
++object e_7317605 [5];
++c_7317535.hdr.mark = gc_color_red;
++ c_7317535.hdr.grayed = 0;
++c_7317535.tag = closureN_tag;
++ c_7317535.fn = (function_type)__lambda_1326;
++c_7317535.num_args = 1;
++c_7317535.num_elements = 5;
++c_7317535.elements = (object *)e_7317605;
++c_7317535.elements[0] = ((closureN)self_7312174)->elements[0];
++c_7317535.elements[1] = ((closureN)self_7312174)->elements[1];
++c_7317535.elements[2] = len_73632_732874;
++c_7317535.elements[3] = ((closureN)self_7312174)->elements[2];
++c_7317535.elements[4] = ((closureN)self_7312174)->elements[4];
  
  
 -pair_type local_7318908; 
 -return_direct_with_clo1(data,(closure)&c_7318835,__lambda_1373,  set_cell_as_expr(&local_7318908, ((closureN)self_7313427)->elements[3]));; 
-+pair_type local_7317615; 
-+return_direct_with_clo1(data,(closure)&c_7317542,__lambda_1326,  set_cell_as_expr(&local_7317615, ((closureN)self_7312181)->elements[3]));; 
++pair_type local_7317608; 
++return_direct_with_clo1(data,(closure)&c_7317535,__lambda_1326,  set_cell_as_expr(&local_7317608, ((closureN)self_7312174)->elements[3]));; 
  }
  
 -static void __lambda_1373(void *data, object self_7313428, int argc, object *args) /* object self_7313428, object start_73633_733222 */
-+static void __lambda_1326(void *data, object self_7312182, int argc, object *args) /* object self_7312182, object start_73633_732882 */
++static void __lambda_1326(void *data, object self_7312175, int argc, object *args) /* object self_7312175, object start_73633_732875 */
   {
 - object start_73633_733222 = args[0];
-+ object start_73633_732882 = args[0];
++ object start_73633_732875 = args[0];
    
 -closureN_type c_7318837;
 -object e_7318900 [5];
@@ -46771,33 +47000,33 @@ Make let-values be the same as let*-values, to work around
 -c_7318837.elements[2] = ((closureN)self_7313428)->elements[3];
 -c_7318837.elements[3] = start_73633_733222;
 -c_7318837.elements[4] = ((closureN)self_7313428)->elements[4];
-+closureN_type c_7317544;
-+object e_7317607 [5];
-+c_7317544.hdr.mark = gc_color_red;
-+ c_7317544.hdr.grayed = 0;
-+c_7317544.tag = closureN_tag;
-+ c_7317544.fn = (function_type)__lambda_1325;
-+c_7317544.num_args = 1;
-+c_7317544.num_elements = 5;
-+c_7317544.elements = (object *)e_7317607;
-+c_7317544.elements[0] = ((closureN)self_7312182)->elements[1];
-+c_7317544.elements[1] = ((closureN)self_7312182)->elements[2];
-+c_7317544.elements[2] = ((closureN)self_7312182)->elements[3];
-+c_7317544.elements[3] = start_73633_732882;
-+c_7317544.elements[4] = ((closureN)self_7312182)->elements[4];
++closureN_type c_7317537;
++object e_7317600 [5];
++c_7317537.hdr.mark = gc_color_red;
++ c_7317537.hdr.grayed = 0;
++c_7317537.tag = closureN_tag;
++ c_7317537.fn = (function_type)__lambda_1325;
++c_7317537.num_args = 1;
++c_7317537.num_elements = 5;
++c_7317537.elements = (object *)e_7317600;
++c_7317537.elements[0] = ((closureN)self_7312175)->elements[1];
++c_7317537.elements[1] = ((closureN)self_7312175)->elements[2];
++c_7317537.elements[2] = ((closureN)self_7312175)->elements[3];
++c_7317537.elements[3] = start_73633_732875;
++c_7317537.elements[4] = ((closureN)self_7312175)->elements[4];
  
  
 -pair_type local_7318903; 
 -return_direct_with_clo1(data,(closure)&c_7318837,__lambda_1372,  set_cell_as_expr(&local_7318903, ((closureN)self_7313428)->elements[0]));; 
-+pair_type local_7317610; 
-+return_direct_with_clo1(data,(closure)&c_7317544,__lambda_1325,  set_cell_as_expr(&local_7317610, ((closureN)self_7312182)->elements[0]));; 
++pair_type local_7317603; 
++return_direct_with_clo1(data,(closure)&c_7317537,__lambda_1325,  set_cell_as_expr(&local_7317603, ((closureN)self_7312175)->elements[0]));; 
  }
  
 -static void __lambda_1372(void *data, object self_7313429, int argc, object *args) /* object self_7313429, object end_73634_733223 */
-+static void __lambda_1325(void *data, object self_7312183, int argc, object *args) /* object self_7312183, object end_73634_732883 */
++static void __lambda_1325(void *data, object self_7312176, int argc, object *args) /* object self_7312176, object end_73634_732876 */
   {
 - object end_73634_733223 = args[0];
-+ object end_73634_732883 = args[0];
++ object end_73634_732876 = args[0];
    
 -closureN_type c_7318839;
 -object e_7318893 [6];
@@ -46814,46 +47043,46 @@ Make let-values be the same as let*-values, to work around
 -c_7318839.elements[3] = ((closureN)self_7313429)->elements[2];
 -c_7318839.elements[4] = ((closureN)self_7313429)->elements[3];
 -c_7318839.elements[5] = ((closureN)self_7313429)->elements[4];
-+closureN_type c_7317546;
-+object e_7317600 [6];
-+c_7317546.hdr.mark = gc_color_red;
-+ c_7317546.hdr.grayed = 0;
-+c_7317546.tag = closureN_tag;
-+ c_7317546.fn = (function_type)__lambda_510;
-+c_7317546.num_args = 1;
-+c_7317546.num_elements = 6;
-+c_7317546.elements = (object *)e_7317600;
-+c_7317546.elements[0] = end_73634_732883;
-+c_7317546.elements[1] = ((closureN)self_7312183)->elements[0];
-+c_7317546.elements[2] = ((closureN)self_7312183)->elements[1];
-+c_7317546.elements[3] = ((closureN)self_7312183)->elements[2];
-+c_7317546.elements[4] = ((closureN)self_7312183)->elements[3];
-+c_7317546.elements[5] = ((closureN)self_7312183)->elements[4];
++closureN_type c_7317539;
++object e_7317593 [6];
++c_7317539.hdr.mark = gc_color_red;
++ c_7317539.hdr.grayed = 0;
++c_7317539.tag = closureN_tag;
++ c_7317539.fn = (function_type)__lambda_510;
++c_7317539.num_args = 1;
++c_7317539.num_elements = 6;
++c_7317539.elements = (object *)e_7317593;
++c_7317539.elements[0] = end_73634_732876;
++c_7317539.elements[1] = ((closureN)self_7312176)->elements[0];
++c_7317539.elements[2] = ((closureN)self_7312176)->elements[1];
++c_7317539.elements[3] = ((closureN)self_7312176)->elements[2];
++c_7317539.elements[4] = ((closureN)self_7312176)->elements[3];
++c_7317539.elements[5] = ((closureN)self_7312176)->elements[4];
  
  
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7318839,__lambda_510,  Cyc_set_cell(data, ((closureN)self_7313429)->elements[1], Cyc_string_length(data, ((closureN)self_7313429)->elements[4])));; 
-+return_direct_with_clo1(data,(closure)&c_7317546,__lambda_510,  Cyc_set_cell(data, ((closureN)self_7312183)->elements[1], Cyc_string_length(data, ((closureN)self_7312183)->elements[4])));; 
++return_direct_with_clo1(data,(closure)&c_7317539,__lambda_510,  Cyc_set_cell(data, ((closureN)self_7312176)->elements[1], Cyc_string_length(data, ((closureN)self_7312176)->elements[4])));; 
  }
  
 -static void __lambda_510(void *data, object self_7313430, int argc, object *args) /* object self_7313430, object r_735423 */
-+static void __lambda_510(void *data, object self_7312184, int argc, object *args) /* object self_7312184, object r_734978 */
++static void __lambda_510(void *data, object self_7312177, int argc, object *args) /* object self_7312177, object r_734971 */
   {
  
 -  object r_735430;
-+  object r_734985;
++  object r_734978;
      
    
 -if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313430)->elements[3]), obj_int2obj(0))) ){ 
-+if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312184)->elements[3]), obj_int2obj(0))) ){ 
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312177)->elements[3]), obj_int2obj(0))) ){ 
    
 -  r_735430 = Cyc_car(data, ((closureN)self_7313430)->elements[3]);
-+  r_734985 = Cyc_car(data, ((closureN)self_7312184)->elements[3]);
++  r_734978 = Cyc_car(data, ((closureN)self_7312177)->elements[3]);
  } else { 
 -  r_735430 = obj_int2obj(0);}
-+  r_734985 = obj_int2obj(0);}
++  r_734978 = obj_int2obj(0);}
  ;
 -closureN_type c_7318852;
 -object e_7318889 [6];
@@ -46870,30 +47099,30 @@ Make let-values be the same as let*-values, to work around
 -c_7318852.elements[3] = ((closureN)self_7313430)->elements[3];
 -c_7318852.elements[4] = ((closureN)self_7313430)->elements[4];
 -c_7318852.elements[5] = ((closureN)self_7313430)->elements[5];
-+closureN_type c_7317559;
-+object e_7317596 [6];
-+c_7317559.hdr.mark = gc_color_red;
-+ c_7317559.hdr.grayed = 0;
-+c_7317559.tag = closureN_tag;
-+ c_7317559.fn = (function_type)__lambda_511;
-+c_7317559.num_args = 1;
-+c_7317559.num_elements = 6;
-+c_7317559.elements = (object *)e_7317596;
-+c_7317559.elements[0] = ((closureN)self_7312184)->elements[0];
-+c_7317559.elements[1] = ((closureN)self_7312184)->elements[1];
-+c_7317559.elements[2] = ((closureN)self_7312184)->elements[2];
-+c_7317559.elements[3] = ((closureN)self_7312184)->elements[3];
-+c_7317559.elements[4] = ((closureN)self_7312184)->elements[4];
-+c_7317559.elements[5] = ((closureN)self_7312184)->elements[5];
++closureN_type c_7317552;
++object e_7317589 [6];
++c_7317552.hdr.mark = gc_color_red;
++ c_7317552.hdr.grayed = 0;
++c_7317552.tag = closureN_tag;
++ c_7317552.fn = (function_type)__lambda_511;
++c_7317552.num_args = 1;
++c_7317552.num_elements = 6;
++c_7317552.elements = (object *)e_7317589;
++c_7317552.elements[0] = ((closureN)self_7312177)->elements[0];
++c_7317552.elements[1] = ((closureN)self_7312177)->elements[1];
++c_7317552.elements[2] = ((closureN)self_7312177)->elements[2];
++c_7317552.elements[3] = ((closureN)self_7312177)->elements[3];
++c_7317552.elements[4] = ((closureN)self_7312177)->elements[4];
++c_7317552.elements[5] = ((closureN)self_7312177)->elements[5];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7318852,__lambda_511,  Cyc_set_cell(data, ((closureN)self_7313430)->elements[4], r_735430));; 
-+return_direct_with_clo1(data,(closure)&c_7317559,__lambda_511,  Cyc_set_cell(data, ((closureN)self_7312184)->elements[4], r_734985));; 
++return_direct_with_clo1(data,(closure)&c_7317552,__lambda_511,  Cyc_set_cell(data, ((closureN)self_7312177)->elements[4], r_734978));; 
  }
  
 -static void __lambda_511(void *data, object self_7313431, int argc, object *args) /* object self_7313431, object r_735424 */
-+static void __lambda_511(void *data, object self_7312185, int argc, object *args) /* object self_7312185, object r_734979 */
++static void __lambda_511(void *data, object self_7312178, int argc, object *args) /* object self_7312178, object r_734972 */
   {
  
    
@@ -46908,17 +47137,17 @@ Make let-values be the same as let*-values, to work around
 -c_7318854.elements = (object *)e_7318868;
 -c_7318854.elements[0] = ((closureN)self_7313431)->elements[2];
 -c_7318854.elements[1] = ((closureN)self_7313431)->elements[3];
-+closureN_type c_7317561;
-+object e_7317575 [2];
-+c_7317561.hdr.mark = gc_color_red;
-+ c_7317561.hdr.grayed = 0;
-+c_7317561.tag = closureN_tag;
-+ c_7317561.fn = (function_type)__lambda_512;
-+c_7317561.num_args = 0;
-+c_7317561.num_elements = 2;
-+c_7317561.elements = (object *)e_7317575;
-+c_7317561.elements[0] = ((closureN)self_7312185)->elements[2];
-+c_7317561.elements[1] = ((closureN)self_7312185)->elements[3];
++closureN_type c_7317554;
++object e_7317568 [2];
++c_7317554.hdr.mark = gc_color_red;
++ c_7317554.hdr.grayed = 0;
++c_7317554.tag = closureN_tag;
++ c_7317554.fn = (function_type)__lambda_512;
++c_7317554.num_args = 0;
++c_7317554.num_elements = 2;
++c_7317554.elements = (object *)e_7317568;
++c_7317554.elements[0] = ((closureN)self_7312178)->elements[2];
++c_7317554.elements[1] = ((closureN)self_7312178)->elements[3];
  
  
 -closureN_type c_7318869;
@@ -46934,29 +47163,29 @@ Make let-values be the same as let*-values, to work around
 -c_7318869.elements[1] = ((closureN)self_7313431)->elements[1];
 -c_7318869.elements[2] = ((closureN)self_7313431)->elements[4];
 -c_7318869.elements[3] = ((closureN)self_7313431)->elements[5];
-+closureN_type c_7317576;
-+object e_7317595 [4];
-+c_7317576.hdr.mark = gc_color_red;
-+ c_7317576.hdr.grayed = 0;
-+c_7317576.tag = closureN_tag;
-+ c_7317576.fn = (function_type)__lambda_513;
-+c_7317576.num_args = 1;
-+c_7317576.num_elements = 4;
-+c_7317576.elements = (object *)e_7317595;
-+c_7317576.elements[0] = ((closureN)self_7312185)->elements[0];
-+c_7317576.elements[1] = ((closureN)self_7312185)->elements[1];
-+c_7317576.elements[2] = ((closureN)self_7312185)->elements[4];
-+c_7317576.elements[3] = ((closureN)self_7312185)->elements[5];
++closureN_type c_7317569;
++object e_7317588 [4];
++c_7317569.hdr.mark = gc_color_red;
++ c_7317569.hdr.grayed = 0;
++c_7317569.tag = closureN_tag;
++ c_7317569.fn = (function_type)__lambda_513;
++c_7317569.num_args = 1;
++c_7317569.num_elements = 4;
++c_7317569.elements = (object *)e_7317588;
++c_7317569.elements[0] = ((closureN)self_7312178)->elements[0];
++c_7317569.elements[1] = ((closureN)self_7312178)->elements[1];
++c_7317569.elements[2] = ((closureN)self_7312178)->elements[4];
++c_7317569.elements[3] = ((closureN)self_7312178)->elements[5];
  
 -return_direct_with_clo1(data,(closure)&c_7318854,__lambda_512,  &c_7318869);; 
-+return_direct_with_clo1(data,(closure)&c_7317561,__lambda_512,  &c_7317576);; 
++return_direct_with_clo1(data,(closure)&c_7317554,__lambda_512,  &c_7317569);; 
  }
  
 -static void __lambda_513(void *data, object self_7313432, int argc, object *args) /* object self_7313432, object r_735426 */
-+static void __lambda_513(void *data, object self_7312186, int argc, object *args) /* object self_7312186, object r_734981 */
++static void __lambda_513(void *data, object self_7312179, int argc, object *args) /* object self_7312179, object r_734974 */
   {
 - object r_735426 = args[0];
-+ object r_734981 = args[0];
++ object r_734974 = args[0];
    
 -closureN_type c_7318871;
 -object e_7318884 [4];
@@ -46971,28 +47200,28 @@ Make let-values be the same as let*-values, to work around
 -c_7318871.elements[1] = ((closureN)self_7313432)->elements[1];
 -c_7318871.elements[2] = ((closureN)self_7313432)->elements[2];
 -c_7318871.elements[3] = ((closureN)self_7313432)->elements[3];
-+closureN_type c_7317578;
-+object e_7317591 [4];
-+c_7317578.hdr.mark = gc_color_red;
-+ c_7317578.hdr.grayed = 0;
-+c_7317578.tag = closureN_tag;
-+ c_7317578.fn = (function_type)__lambda_514;
-+c_7317578.num_args = 1;
-+c_7317578.num_elements = 4;
-+c_7317578.elements = (object *)e_7317591;
-+c_7317578.elements[0] = ((closureN)self_7312186)->elements[0];
-+c_7317578.elements[1] = ((closureN)self_7312186)->elements[1];
-+c_7317578.elements[2] = ((closureN)self_7312186)->elements[2];
-+c_7317578.elements[3] = ((closureN)self_7312186)->elements[3];
++closureN_type c_7317571;
++object e_7317584 [4];
++c_7317571.hdr.mark = gc_color_red;
++ c_7317571.hdr.grayed = 0;
++c_7317571.tag = closureN_tag;
++ c_7317571.fn = (function_type)__lambda_514;
++c_7317571.num_args = 1;
++c_7317571.num_elements = 4;
++c_7317571.elements = (object *)e_7317584;
++c_7317571.elements[0] = ((closureN)self_7312179)->elements[0];
++c_7317571.elements[1] = ((closureN)self_7312179)->elements[1];
++c_7317571.elements[2] = ((closureN)self_7312179)->elements[2];
++c_7317571.elements[3] = ((closureN)self_7312179)->elements[3];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7318871,__lambda_514,  Cyc_set_cell(data, ((closureN)self_7313432)->elements[0], r_735426));; 
-+return_direct_with_clo1(data,(closure)&c_7317578,__lambda_514,  Cyc_set_cell(data, ((closureN)self_7312186)->elements[0], r_734981));; 
++return_direct_with_clo1(data,(closure)&c_7317571,__lambda_514,  Cyc_set_cell(data, ((closureN)self_7312179)->elements[0], r_734974));; 
  }
  
 -static void __lambda_514(void *data, object self_7313433, int argc, object *args) /* object self_7313433, object r_735425 */
-+static void __lambda_514(void *data, object self_7312187, int argc, object *args) /* object self_7312187, object r_734980 */
++static void __lambda_514(void *data, object self_7312180, int argc, object *args) /* object self_7312180, object r_734973 */
   {
  
    
@@ -47002,40 +47231,39 @@ Make let-values be the same as let*-values, to work around
  
 -object c_7318876 = Cyc_string2utf8(data,  ((closureN)self_7313433)->elements[1],((closureN)self_7313433)->elements[3], car(((closureN)self_7313433)->elements[2]), car(((closureN)self_7313433)->elements[0]));
 -return_direct_with_clo1(data,  ((closureN)self_7313433)->elements[1], (((closure)  ((closureN)self_7313433)->elements[1])->fn),  c_7318876);; 
-+object c_7317583 = Cyc_string2utf8(data,  ((closureN)self_7312187)->elements[1],((closureN)self_7312187)->elements[3], car(((closureN)self_7312187)->elements[2]), car(((closureN)self_7312187)->elements[0]));
-+return_direct_with_clo1(data,  ((closureN)self_7312187)->elements[1], (((closure)  ((closureN)self_7312187)->elements[1])->fn),  c_7317583);; 
++object c_7317576 = Cyc_string2utf8(data,  ((closureN)self_7312180)->elements[1],((closureN)self_7312180)->elements[3], car(((closureN)self_7312180)->elements[2]), car(((closureN)self_7312180)->elements[0]));
++return_direct_with_clo1(data,  ((closureN)self_7312180)->elements[1], (((closure)  ((closureN)self_7312180)->elements[1])->fn),  c_7317576);; 
  }
  
 -static void __lambda_512(void *data, object self_7313434, int argc, object *args) /* object self_7313434, object k_735427 */
-+static void __lambda_512(void *data, object self_7312188, int argc, object *args) /* object self_7312188, object k_734982 */
++static void __lambda_512(void *data, object self_7312181, int argc, object *args) /* object self_7312181, object k_734975 */
   {
 - object k_735427 = args[0];
-+ object k_734982 = args[0];
++ object k_734975 = args[0];
      
    
 -if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313434)->elements[1]), obj_int2obj(1))) ){ 
-+if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312188)->elements[1]), obj_int2obj(1))) ){ 
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312181)->elements[1]), obj_int2obj(1))) ){ 
    
  
 -return_direct_with_clo1(data,  k_735427,__lambda_513,  Cyc_cadr(data, ((closureN)self_7313434)->elements[1]));
-+return_direct_with_clo1(data,  k_734982,__lambda_513,  Cyc_cadr(data, ((closureN)self_7312188)->elements[1]));
++return_direct_with_clo1(data,  k_734975,__lambda_513,  Cyc_cadr(data, ((closureN)self_7312181)->elements[1]));
  } else { 
    
  
 -return_direct_with_clo1(data,  k_735427,__lambda_513,  car(((closureN)self_7313434)->elements[0]));}
-+return_direct_with_clo1(data,  k_734982,__lambda_513,  car(((closureN)self_7312188)->elements[0]));}
++return_direct_with_clo1(data,  k_734975,__lambda_513,  car(((closureN)self_7312181)->elements[0]));}
  ;; 
  }
  
 -static void __lambda_501(void *data, object _, int argc, object *args) /* closure _,object k_735407, object bv_73625_733214, object opts_73626_733215_raw, ... */
-+static void __lambda_501(void *data, object _, int argc, object *args) /* closure _,object k_734962, object bv_73625_732874, object opts_73626_732875_raw, ... */
++static void __lambda_501(void *data, object _, int argc, object *args) /* closure _,object k_734955, object bv_73625_732867, object opts_73626_732868_raw, ... */
   {
 -object k_735407 = args[0]; object bv_73625_733214 = args[1];
 -load_varargs(opts_73626_733215, args, 2, argc - 2);
--  Cyc_st_add(data, "scheme/base.sld:utf8->string");
-+object k_734962 = args[0]; object bv_73625_732874 = args[1];
-+load_varargs(opts_73626_732875, args, 2, argc - 2);
-+  Cyc_st_add(data, "base.sld:utf8->string");
++object k_734955 = args[0]; object bv_73625_732867 = args[1];
++load_varargs(opts_73626_732868, args, 2, argc - 2);
+   Cyc_st_add(data, "scheme/base.sld:utf8->string");
  
 -closureN_type c_7318745;
 -object e_7318828 [3];
@@ -47049,28 +47277,28 @@ Make let-values be the same as let*-values, to work around
 -c_7318745.elements[0] = bv_73625_733214;
 -c_7318745.elements[1] = k_735407;
 -c_7318745.elements[2] = opts_73626_733215;
-+closureN_type c_7317452;
-+object e_7317535 [3];
-+c_7317452.hdr.mark = gc_color_red;
-+ c_7317452.hdr.grayed = 0;
-+c_7317452.tag = closureN_tag;
-+ c_7317452.fn = (function_type)__lambda_502;
-+c_7317452.num_args = 3;
-+c_7317452.num_elements = 3;
-+c_7317452.elements = (object *)e_7317535;
-+c_7317452.elements[0] = bv_73625_732874;
-+c_7317452.elements[1] = k_734962;
-+c_7317452.elements[2] = opts_73626_732875;
++closureN_type c_7317445;
++object e_7317528 [3];
++c_7317445.hdr.mark = gc_color_red;
++ c_7317445.hdr.grayed = 0;
++c_7317445.tag = closureN_tag;
++ c_7317445.fn = (function_type)__lambda_502;
++c_7317445.num_args = 3;
++c_7317445.num_elements = 3;
++c_7317445.elements = (object *)e_7317528;
++c_7317445.elements[0] = bv_73625_732867;
++c_7317445.elements[1] = k_734955;
++c_7317445.elements[2] = opts_73626_732868;
  
 -return_direct_with_clo3(data,(closure)&c_7318745,__lambda_502,  boolean_f, boolean_f, boolean_f);; 
-+return_direct_with_clo3(data,(closure)&c_7317452,__lambda_502,  boolean_f, boolean_f, boolean_f);; 
++return_direct_with_clo3(data,(closure)&c_7317445,__lambda_502,  boolean_f, boolean_f, boolean_f);; 
  }
  
 -static void __lambda_502(void *data, object self_7313417, int argc, object *args) /* object self_7313417, object len_73627_733216, object start_73628_733217, object end_73629_733218 */
-+static void __lambda_502(void *data, object self_7312171, int argc, object *args) /* object self_7312171, object len_73627_732876, object start_73628_732877, object end_73629_732878 */
++static void __lambda_502(void *data, object self_7312164, int argc, object *args) /* object self_7312164, object len_73627_732869, object start_73628_732870, object end_73629_732871 */
   {
 - object len_73627_733216 = args[0]; object start_73628_733217 = args[1]; object end_73629_733218 = args[2];
-+ object len_73627_732876 = args[0]; object start_73628_732877 = args[1]; object end_73629_732878 = args[2];
++ object len_73627_732869 = args[0]; object start_73628_732870 = args[1]; object end_73629_732871 = args[2];
    
 -closureN_type c_7318747;
 -object e_7318824 [5];
@@ -47086,33 +47314,33 @@ Make let-values be the same as let*-values, to work around
 -c_7318747.elements[2] = ((closureN)self_7313417)->elements[1];
 -c_7318747.elements[3] = ((closureN)self_7313417)->elements[2];
 -c_7318747.elements[4] = start_73628_733217;
-+closureN_type c_7317454;
-+object e_7317531 [5];
-+c_7317454.hdr.mark = gc_color_red;
-+ c_7317454.hdr.grayed = 0;
-+c_7317454.tag = closureN_tag;
-+ c_7317454.fn = (function_type)__lambda_1324;
-+c_7317454.num_args = 1;
-+c_7317454.num_elements = 5;
-+c_7317454.elements = (object *)e_7317531;
-+c_7317454.elements[0] = ((closureN)self_7312171)->elements[0];
-+c_7317454.elements[1] = end_73629_732878;
-+c_7317454.elements[2] = ((closureN)self_7312171)->elements[1];
-+c_7317454.elements[3] = ((closureN)self_7312171)->elements[2];
-+c_7317454.elements[4] = start_73628_732877;
++closureN_type c_7317447;
++object e_7317524 [5];
++c_7317447.hdr.mark = gc_color_red;
++ c_7317447.hdr.grayed = 0;
++c_7317447.tag = closureN_tag;
++ c_7317447.fn = (function_type)__lambda_1324;
++c_7317447.num_args = 1;
++c_7317447.num_elements = 5;
++c_7317447.elements = (object *)e_7317524;
++c_7317447.elements[0] = ((closureN)self_7312164)->elements[0];
++c_7317447.elements[1] = end_73629_732871;
++c_7317447.elements[2] = ((closureN)self_7312164)->elements[1];
++c_7317447.elements[3] = ((closureN)self_7312164)->elements[2];
++c_7317447.elements[4] = start_73628_732870;
  
  
 -pair_type local_7318827; 
 -return_direct_with_clo1(data,(closure)&c_7318747,__lambda_1371,  set_cell_as_expr(&local_7318827, len_73627_733216));; 
-+pair_type local_7317534; 
-+return_direct_with_clo1(data,(closure)&c_7317454,__lambda_1324,  set_cell_as_expr(&local_7317534, len_73627_732876));; 
++pair_type local_7317527; 
++return_direct_with_clo1(data,(closure)&c_7317447,__lambda_1324,  set_cell_as_expr(&local_7317527, len_73627_732869));; 
  }
  
 -static void __lambda_1371(void *data, object self_7313418, int argc, object *args) /* object self_7313418, object len_73627_733216 */
-+static void __lambda_1324(void *data, object self_7312172, int argc, object *args) /* object self_7312172, object len_73627_732876 */
++static void __lambda_1324(void *data, object self_7312165, int argc, object *args) /* object self_7312165, object len_73627_732869 */
   {
 - object len_73627_733216 = args[0];
-+ object len_73627_732876 = args[0];
++ object len_73627_732869 = args[0];
    
 -closureN_type c_7318749;
 -object e_7318819 [5];
@@ -47128,33 +47356,33 @@ Make let-values be the same as let*-values, to work around
 -c_7318749.elements[2] = ((closureN)self_7313418)->elements[2];
 -c_7318749.elements[3] = len_73627_733216;
 -c_7318749.elements[4] = ((closureN)self_7313418)->elements[3];
-+closureN_type c_7317456;
-+object e_7317526 [5];
-+c_7317456.hdr.mark = gc_color_red;
-+ c_7317456.hdr.grayed = 0;
-+c_7317456.tag = closureN_tag;
-+ c_7317456.fn = (function_type)__lambda_1323;
-+c_7317456.num_args = 1;
-+c_7317456.num_elements = 5;
-+c_7317456.elements = (object *)e_7317526;
-+c_7317456.elements[0] = ((closureN)self_7312172)->elements[0];
-+c_7317456.elements[1] = ((closureN)self_7312172)->elements[1];
-+c_7317456.elements[2] = ((closureN)self_7312172)->elements[2];
-+c_7317456.elements[3] = len_73627_732876;
-+c_7317456.elements[4] = ((closureN)self_7312172)->elements[3];
++closureN_type c_7317449;
++object e_7317519 [5];
++c_7317449.hdr.mark = gc_color_red;
++ c_7317449.hdr.grayed = 0;
++c_7317449.tag = closureN_tag;
++ c_7317449.fn = (function_type)__lambda_1323;
++c_7317449.num_args = 1;
++c_7317449.num_elements = 5;
++c_7317449.elements = (object *)e_7317519;
++c_7317449.elements[0] = ((closureN)self_7312165)->elements[0];
++c_7317449.elements[1] = ((closureN)self_7312165)->elements[1];
++c_7317449.elements[2] = ((closureN)self_7312165)->elements[2];
++c_7317449.elements[3] = len_73627_732869;
++c_7317449.elements[4] = ((closureN)self_7312165)->elements[3];
  
  
 -pair_type local_7318822; 
 -return_direct_with_clo1(data,(closure)&c_7318749,__lambda_1370,  set_cell_as_expr(&local_7318822, ((closureN)self_7313418)->elements[4]));; 
-+pair_type local_7317529; 
-+return_direct_with_clo1(data,(closure)&c_7317456,__lambda_1323,  set_cell_as_expr(&local_7317529, ((closureN)self_7312172)->elements[4]));; 
++pair_type local_7317522; 
++return_direct_with_clo1(data,(closure)&c_7317449,__lambda_1323,  set_cell_as_expr(&local_7317522, ((closureN)self_7312165)->elements[4]));; 
  }
  
 -static void __lambda_1370(void *data, object self_7313419, int argc, object *args) /* object self_7313419, object start_73628_733217 */
-+static void __lambda_1323(void *data, object self_7312173, int argc, object *args) /* object self_7312173, object start_73628_732877 */
++static void __lambda_1323(void *data, object self_7312166, int argc, object *args) /* object self_7312166, object start_73628_732870 */
   {
 - object start_73628_733217 = args[0];
-+ object start_73628_732877 = args[0];
++ object start_73628_732870 = args[0];
    
 -closureN_type c_7318751;
 -object e_7318814 [5];
@@ -47170,33 +47398,33 @@ Make let-values be the same as let*-values, to work around
 -c_7318751.elements[2] = ((closureN)self_7313419)->elements[3];
 -c_7318751.elements[3] = ((closureN)self_7313419)->elements[4];
 -c_7318751.elements[4] = start_73628_733217;
-+closureN_type c_7317458;
-+object e_7317521 [5];
-+c_7317458.hdr.mark = gc_color_red;
-+ c_7317458.hdr.grayed = 0;
-+c_7317458.tag = closureN_tag;
-+ c_7317458.fn = (function_type)__lambda_1322;
-+c_7317458.num_args = 1;
-+c_7317458.num_elements = 5;
-+c_7317458.elements = (object *)e_7317521;
-+c_7317458.elements[0] = ((closureN)self_7312173)->elements[0];
-+c_7317458.elements[1] = ((closureN)self_7312173)->elements[2];
-+c_7317458.elements[2] = ((closureN)self_7312173)->elements[3];
-+c_7317458.elements[3] = ((closureN)self_7312173)->elements[4];
-+c_7317458.elements[4] = start_73628_732877;
++closureN_type c_7317451;
++object e_7317514 [5];
++c_7317451.hdr.mark = gc_color_red;
++ c_7317451.hdr.grayed = 0;
++c_7317451.tag = closureN_tag;
++ c_7317451.fn = (function_type)__lambda_1322;
++c_7317451.num_args = 1;
++c_7317451.num_elements = 5;
++c_7317451.elements = (object *)e_7317514;
++c_7317451.elements[0] = ((closureN)self_7312166)->elements[0];
++c_7317451.elements[1] = ((closureN)self_7312166)->elements[2];
++c_7317451.elements[2] = ((closureN)self_7312166)->elements[3];
++c_7317451.elements[3] = ((closureN)self_7312166)->elements[4];
++c_7317451.elements[4] = start_73628_732870;
  
  
 -pair_type local_7318817; 
 -return_direct_with_clo1(data,(closure)&c_7318751,__lambda_1369,  set_cell_as_expr(&local_7318817, ((closureN)self_7313419)->elements[1]));; 
-+pair_type local_7317524; 
-+return_direct_with_clo1(data,(closure)&c_7317458,__lambda_1322,  set_cell_as_expr(&local_7317524, ((closureN)self_7312173)->elements[1]));; 
++pair_type local_7317517; 
++return_direct_with_clo1(data,(closure)&c_7317451,__lambda_1322,  set_cell_as_expr(&local_7317517, ((closureN)self_7312166)->elements[1]));; 
  }
  
 -static void __lambda_1369(void *data, object self_7313420, int argc, object *args) /* object self_7313420, object end_73629_733218 */
-+static void __lambda_1322(void *data, object self_7312174, int argc, object *args) /* object self_7312174, object end_73629_732878 */
++static void __lambda_1322(void *data, object self_7312167, int argc, object *args) /* object self_7312167, object end_73629_732871 */
   {
 - object end_73629_733218 = args[0];
-+ object end_73629_732878 = args[0];
++ object end_73629_732871 = args[0];
    
 -closureN_type c_7318753;
 -object e_7318807 [6];
@@ -47213,46 +47441,46 @@ Make let-values be the same as let*-values, to work around
 -c_7318753.elements[3] = ((closureN)self_7313420)->elements[2];
 -c_7318753.elements[4] = ((closureN)self_7313420)->elements[3];
 -c_7318753.elements[5] = ((closureN)self_7313420)->elements[4];
-+closureN_type c_7317460;
-+object e_7317514 [6];
-+c_7317460.hdr.mark = gc_color_red;
-+ c_7317460.hdr.grayed = 0;
-+c_7317460.tag = closureN_tag;
-+ c_7317460.fn = (function_type)__lambda_503;
-+c_7317460.num_args = 1;
-+c_7317460.num_elements = 6;
-+c_7317460.elements = (object *)e_7317514;
-+c_7317460.elements[0] = ((closureN)self_7312174)->elements[0];
-+c_7317460.elements[1] = end_73629_732878;
-+c_7317460.elements[2] = ((closureN)self_7312174)->elements[1];
-+c_7317460.elements[3] = ((closureN)self_7312174)->elements[2];
-+c_7317460.elements[4] = ((closureN)self_7312174)->elements[3];
-+c_7317460.elements[5] = ((closureN)self_7312174)->elements[4];
++closureN_type c_7317453;
++object e_7317507 [6];
++c_7317453.hdr.mark = gc_color_red;
++ c_7317453.hdr.grayed = 0;
++c_7317453.tag = closureN_tag;
++ c_7317453.fn = (function_type)__lambda_503;
++c_7317453.num_args = 1;
++c_7317453.num_elements = 6;
++c_7317453.elements = (object *)e_7317507;
++c_7317453.elements[0] = ((closureN)self_7312167)->elements[0];
++c_7317453.elements[1] = end_73629_732871;
++c_7317453.elements[2] = ((closureN)self_7312167)->elements[1];
++c_7317453.elements[3] = ((closureN)self_7312167)->elements[2];
++c_7317453.elements[4] = ((closureN)self_7312167)->elements[3];
++c_7317453.elements[5] = ((closureN)self_7312167)->elements[4];
  
  
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7318753,__lambda_503,  Cyc_set_cell(data, ((closureN)self_7313420)->elements[2], Cyc_bytevector_length(data, ((closureN)self_7313420)->elements[0])));; 
-+return_direct_with_clo1(data,(closure)&c_7317460,__lambda_503,  Cyc_set_cell(data, ((closureN)self_7312174)->elements[2], Cyc_bytevector_length(data, ((closureN)self_7312174)->elements[0])));; 
++return_direct_with_clo1(data,(closure)&c_7317453,__lambda_503,  Cyc_set_cell(data, ((closureN)self_7312167)->elements[2], Cyc_bytevector_length(data, ((closureN)self_7312167)->elements[0])));; 
  }
  
 -static void __lambda_503(void *data, object self_7313421, int argc, object *args) /* object self_7313421, object r_735408 */
-+static void __lambda_503(void *data, object self_7312175, int argc, object *args) /* object self_7312175, object r_734963 */
++static void __lambda_503(void *data, object self_7312168, int argc, object *args) /* object self_7312168, object r_734956 */
   {
  
 -  object r_735415;
-+  object r_734970;
++  object r_734963;
      
    
 -if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313421)->elements[4]), obj_int2obj(0))) ){ 
-+if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312175)->elements[4]), obj_int2obj(0))) ){ 
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312168)->elements[4]), obj_int2obj(0))) ){ 
    
 -  r_735415 = Cyc_car(data, ((closureN)self_7313421)->elements[4]);
-+  r_734970 = Cyc_car(data, ((closureN)self_7312175)->elements[4]);
++  r_734963 = Cyc_car(data, ((closureN)self_7312168)->elements[4]);
  } else { 
 -  r_735415 = obj_int2obj(0);}
-+  r_734970 = obj_int2obj(0);}
++  r_734963 = obj_int2obj(0);}
  ;
 -closureN_type c_7318766;
 -object e_7318803 [6];
@@ -47269,30 +47497,30 @@ Make let-values be the same as let*-values, to work around
 -c_7318766.elements[3] = ((closureN)self_7313421)->elements[3];
 -c_7318766.elements[4] = ((closureN)self_7313421)->elements[4];
 -c_7318766.elements[5] = ((closureN)self_7313421)->elements[5];
-+closureN_type c_7317473;
-+object e_7317510 [6];
-+c_7317473.hdr.mark = gc_color_red;
-+ c_7317473.hdr.grayed = 0;
-+c_7317473.tag = closureN_tag;
-+ c_7317473.fn = (function_type)__lambda_504;
-+c_7317473.num_args = 1;
-+c_7317473.num_elements = 6;
-+c_7317473.elements = (object *)e_7317510;
-+c_7317473.elements[0] = ((closureN)self_7312175)->elements[0];
-+c_7317473.elements[1] = ((closureN)self_7312175)->elements[1];
-+c_7317473.elements[2] = ((closureN)self_7312175)->elements[2];
-+c_7317473.elements[3] = ((closureN)self_7312175)->elements[3];
-+c_7317473.elements[4] = ((closureN)self_7312175)->elements[4];
-+c_7317473.elements[5] = ((closureN)self_7312175)->elements[5];
++closureN_type c_7317466;
++object e_7317503 [6];
++c_7317466.hdr.mark = gc_color_red;
++ c_7317466.hdr.grayed = 0;
++c_7317466.tag = closureN_tag;
++ c_7317466.fn = (function_type)__lambda_504;
++c_7317466.num_args = 1;
++c_7317466.num_elements = 6;
++c_7317466.elements = (object *)e_7317503;
++c_7317466.elements[0] = ((closureN)self_7312168)->elements[0];
++c_7317466.elements[1] = ((closureN)self_7312168)->elements[1];
++c_7317466.elements[2] = ((closureN)self_7312168)->elements[2];
++c_7317466.elements[3] = ((closureN)self_7312168)->elements[3];
++c_7317466.elements[4] = ((closureN)self_7312168)->elements[4];
++c_7317466.elements[5] = ((closureN)self_7312168)->elements[5];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7318766,__lambda_504,  Cyc_set_cell(data, ((closureN)self_7313421)->elements[5], r_735415));; 
-+return_direct_with_clo1(data,(closure)&c_7317473,__lambda_504,  Cyc_set_cell(data, ((closureN)self_7312175)->elements[5], r_734970));; 
++return_direct_with_clo1(data,(closure)&c_7317466,__lambda_504,  Cyc_set_cell(data, ((closureN)self_7312168)->elements[5], r_734963));; 
  }
  
 -static void __lambda_504(void *data, object self_7313422, int argc, object *args) /* object self_7313422, object r_735409 */
-+static void __lambda_504(void *data, object self_7312176, int argc, object *args) /* object self_7312176, object r_734964 */
++static void __lambda_504(void *data, object self_7312169, int argc, object *args) /* object self_7312169, object r_734957 */
   {
  
    
@@ -47307,17 +47535,17 @@ Make let-values be the same as let*-values, to work around
 -c_7318768.elements = (object *)e_7318782;
 -c_7318768.elements[0] = ((closureN)self_7313422)->elements[3];
 -c_7318768.elements[1] = ((closureN)self_7313422)->elements[4];
-+closureN_type c_7317475;
-+object e_7317489 [2];
-+c_7317475.hdr.mark = gc_color_red;
-+ c_7317475.hdr.grayed = 0;
-+c_7317475.tag = closureN_tag;
-+ c_7317475.fn = (function_type)__lambda_505;
-+c_7317475.num_args = 0;
-+c_7317475.num_elements = 2;
-+c_7317475.elements = (object *)e_7317489;
-+c_7317475.elements[0] = ((closureN)self_7312176)->elements[3];
-+c_7317475.elements[1] = ((closureN)self_7312176)->elements[4];
++closureN_type c_7317468;
++object e_7317482 [2];
++c_7317468.hdr.mark = gc_color_red;
++ c_7317468.hdr.grayed = 0;
++c_7317468.tag = closureN_tag;
++ c_7317468.fn = (function_type)__lambda_505;
++c_7317468.num_args = 0;
++c_7317468.num_elements = 2;
++c_7317468.elements = (object *)e_7317482;
++c_7317468.elements[0] = ((closureN)self_7312169)->elements[3];
++c_7317468.elements[1] = ((closureN)self_7312169)->elements[4];
  
  
 -closureN_type c_7318783;
@@ -47333,29 +47561,29 @@ Make let-values be the same as let*-values, to work around
 -c_7318783.elements[1] = ((closureN)self_7313422)->elements[1];
 -c_7318783.elements[2] = ((closureN)self_7313422)->elements[2];
 -c_7318783.elements[3] = ((closureN)self_7313422)->elements[5];
-+closureN_type c_7317490;
-+object e_7317509 [4];
-+c_7317490.hdr.mark = gc_color_red;
-+ c_7317490.hdr.grayed = 0;
-+c_7317490.tag = closureN_tag;
-+ c_7317490.fn = (function_type)__lambda_506;
-+c_7317490.num_args = 1;
-+c_7317490.num_elements = 4;
-+c_7317490.elements = (object *)e_7317509;
-+c_7317490.elements[0] = ((closureN)self_7312176)->elements[0];
-+c_7317490.elements[1] = ((closureN)self_7312176)->elements[1];
-+c_7317490.elements[2] = ((closureN)self_7312176)->elements[2];
-+c_7317490.elements[3] = ((closureN)self_7312176)->elements[5];
++closureN_type c_7317483;
++object e_7317502 [4];
++c_7317483.hdr.mark = gc_color_red;
++ c_7317483.hdr.grayed = 0;
++c_7317483.tag = closureN_tag;
++ c_7317483.fn = (function_type)__lambda_506;
++c_7317483.num_args = 1;
++c_7317483.num_elements = 4;
++c_7317483.elements = (object *)e_7317502;
++c_7317483.elements[0] = ((closureN)self_7312169)->elements[0];
++c_7317483.elements[1] = ((closureN)self_7312169)->elements[1];
++c_7317483.elements[2] = ((closureN)self_7312169)->elements[2];
++c_7317483.elements[3] = ((closureN)self_7312169)->elements[5];
  
 -return_direct_with_clo1(data,(closure)&c_7318768,__lambda_505,  &c_7318783);; 
-+return_direct_with_clo1(data,(closure)&c_7317475,__lambda_505,  &c_7317490);; 
++return_direct_with_clo1(data,(closure)&c_7317468,__lambda_505,  &c_7317483);; 
  }
  
 -static void __lambda_506(void *data, object self_7313423, int argc, object *args) /* object self_7313423, object r_735411 */
-+static void __lambda_506(void *data, object self_7312177, int argc, object *args) /* object self_7312177, object r_734966 */
++static void __lambda_506(void *data, object self_7312170, int argc, object *args) /* object self_7312170, object r_734959 */
   {
 - object r_735411 = args[0];
-+ object r_734966 = args[0];
++ object r_734959 = args[0];
    
 -closureN_type c_7318785;
 -object e_7318798 [4];
@@ -47370,28 +47598,28 @@ Make let-values be the same as let*-values, to work around
 -c_7318785.elements[1] = ((closureN)self_7313423)->elements[1];
 -c_7318785.elements[2] = ((closureN)self_7313423)->elements[2];
 -c_7318785.elements[3] = ((closureN)self_7313423)->elements[3];
-+closureN_type c_7317492;
-+object e_7317505 [4];
-+c_7317492.hdr.mark = gc_color_red;
-+ c_7317492.hdr.grayed = 0;
-+c_7317492.tag = closureN_tag;
-+ c_7317492.fn = (function_type)__lambda_507;
-+c_7317492.num_args = 1;
-+c_7317492.num_elements = 4;
-+c_7317492.elements = (object *)e_7317505;
-+c_7317492.elements[0] = ((closureN)self_7312177)->elements[0];
-+c_7317492.elements[1] = ((closureN)self_7312177)->elements[1];
-+c_7317492.elements[2] = ((closureN)self_7312177)->elements[2];
-+c_7317492.elements[3] = ((closureN)self_7312177)->elements[3];
++closureN_type c_7317485;
++object e_7317498 [4];
++c_7317485.hdr.mark = gc_color_red;
++ c_7317485.hdr.grayed = 0;
++c_7317485.tag = closureN_tag;
++ c_7317485.fn = (function_type)__lambda_507;
++c_7317485.num_args = 1;
++c_7317485.num_elements = 4;
++c_7317485.elements = (object *)e_7317498;
++c_7317485.elements[0] = ((closureN)self_7312170)->elements[0];
++c_7317485.elements[1] = ((closureN)self_7312170)->elements[1];
++c_7317485.elements[2] = ((closureN)self_7312170)->elements[2];
++c_7317485.elements[3] = ((closureN)self_7312170)->elements[3];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7318785,__lambda_507,  Cyc_set_cell(data, ((closureN)self_7313423)->elements[1], r_735411));; 
-+return_direct_with_clo1(data,(closure)&c_7317492,__lambda_507,  Cyc_set_cell(data, ((closureN)self_7312177)->elements[1], r_734966));; 
++return_direct_with_clo1(data,(closure)&c_7317485,__lambda_507,  Cyc_set_cell(data, ((closureN)self_7312170)->elements[1], r_734959));; 
  }
  
 -static void __lambda_507(void *data, object self_7313424, int argc, object *args) /* object self_7313424, object r_735410 */
-+static void __lambda_507(void *data, object self_7312178, int argc, object *args) /* object self_7312178, object r_734965 */
++static void __lambda_507(void *data, object self_7312171, int argc, object *args) /* object self_7312171, object r_734958 */
   {
  
    
@@ -47401,51 +47629,50 @@ Make let-values be the same as let*-values, to work around
  
 -object c_7318790 = Cyc_utf82string(data,  ((closureN)self_7313424)->elements[2],((closureN)self_7313424)->elements[0], car(((closureN)self_7313424)->elements[3]), car(((closureN)self_7313424)->elements[1]));
 -return_direct_with_clo1(data,  ((closureN)self_7313424)->elements[2], (((closure)  ((closureN)self_7313424)->elements[2])->fn),  c_7318790);; 
-+object c_7317497 = Cyc_utf82string(data,  ((closureN)self_7312178)->elements[2],((closureN)self_7312178)->elements[0], car(((closureN)self_7312178)->elements[3]), car(((closureN)self_7312178)->elements[1]));
-+return_direct_with_clo1(data,  ((closureN)self_7312178)->elements[2], (((closure)  ((closureN)self_7312178)->elements[2])->fn),  c_7317497);; 
++object c_7317490 = Cyc_utf82string(data,  ((closureN)self_7312171)->elements[2],((closureN)self_7312171)->elements[0], car(((closureN)self_7312171)->elements[3]), car(((closureN)self_7312171)->elements[1]));
++return_direct_with_clo1(data,  ((closureN)self_7312171)->elements[2], (((closure)  ((closureN)self_7312171)->elements[2])->fn),  c_7317490);; 
  }
  
 -static void __lambda_505(void *data, object self_7313425, int argc, object *args) /* object self_7313425, object k_735412 */
-+static void __lambda_505(void *data, object self_7312179, int argc, object *args) /* object self_7312179, object k_734967 */
++static void __lambda_505(void *data, object self_7312172, int argc, object *args) /* object self_7312172, object k_734960 */
   {
 - object k_735412 = args[0];
-+ object k_734967 = args[0];
++ object k_734960 = args[0];
      
    
 -if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313425)->elements[1]), obj_int2obj(1))) ){ 
-+if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312179)->elements[1]), obj_int2obj(1))) ){ 
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312172)->elements[1]), obj_int2obj(1))) ){ 
    
  
 -return_direct_with_clo1(data,  k_735412,__lambda_506,  Cyc_cadr(data, ((closureN)self_7313425)->elements[1]));
-+return_direct_with_clo1(data,  k_734967,__lambda_506,  Cyc_cadr(data, ((closureN)self_7312179)->elements[1]));
++return_direct_with_clo1(data,  k_734960,__lambda_506,  Cyc_cadr(data, ((closureN)self_7312172)->elements[1]));
  } else { 
    
  
 -return_direct_with_clo1(data,  k_735412,__lambda_506,  car(((closureN)self_7313425)->elements[0]));}
-+return_direct_with_clo1(data,  k_734967,__lambda_506,  car(((closureN)self_7312179)->elements[0]));}
++return_direct_with_clo1(data,  k_734960,__lambda_506,  car(((closureN)self_7312172)->elements[0]));}
  ;; 
  }
  
 -static void __lambda_480(void *data, object _, int argc, object *args) /* closure _,object k_735370, object to_73590_733195, object at_73591_733196, object from_73592_733197, object o_73593_733198_raw, ... */
-+static void __lambda_480(void *data, object _, int argc, object *args) /* closure _,object k_734925, object to_73590_732855, object at_73591_732856, object from_73592_732857, object o_73593_732858_raw, ... */
++static void __lambda_480(void *data, object _, int argc, object *args) /* closure _,object k_734918, object to_73590_732848, object at_73591_732849, object from_73592_732850, object o_73593_732851_raw, ... */
   {
 -object k_735370 = args[0]; object to_73590_733195 = args[1]; object at_73591_733196 = args[2]; object from_73592_733197 = args[3];
 -load_varargs(o_73593_733198, args, 4, argc - 4);
 -  object start_73596_733199;
--  Cyc_st_add(data, "scheme/base.sld:bytevector-copy!");
-+object k_734925 = args[0]; object to_73590_732855 = args[1]; object at_73591_732856 = args[2]; object from_73592_732857 = args[3];
-+load_varargs(o_73593_732858, args, 4, argc - 4);
-+  object start_73596_732859;
-+  Cyc_st_add(data, "base.sld:bytevector-copy!");
++object k_734918 = args[0]; object to_73590_732848 = args[1]; object at_73591_732849 = args[2]; object from_73592_732850 = args[3];
++load_varargs(o_73593_732851, args, 4, argc - 4);
++  object start_73596_732852;
+   Cyc_st_add(data, "scheme/base.sld:bytevector-copy!");
    
 -if( (boolean_f != Cyc_is_pair(o_73593_733198)) ){ 
-+if( (boolean_f != Cyc_is_pair(o_73593_732858)) ){ 
++if( (boolean_f != Cyc_is_pair(o_73593_732851)) ){ 
    
 -  start_73596_733199 = Cyc_car(data, o_73593_733198);
-+  start_73596_732859 = Cyc_car(data, o_73593_732858);
++  start_73596_732852 = Cyc_car(data, o_73593_732851);
  } else { 
 -  start_73596_733199 = obj_int2obj(0);}
-+  start_73596_732859 = obj_int2obj(0);}
++  start_73596_732852 = obj_int2obj(0);}
  ;
 -closureN_type c_7318549;
 -object e_7318575 [2];
@@ -47458,17 +47685,17 @@ Make let-values be the same as let*-values, to work around
 -c_7318549.elements = (object *)e_7318575;
 -c_7318549.elements[0] = from_73592_733197;
 -c_7318549.elements[1] = o_73593_733198;
-+closureN_type c_7317256;
-+object e_7317282 [2];
-+c_7317256.hdr.mark = gc_color_red;
-+ c_7317256.hdr.grayed = 0;
-+c_7317256.tag = closureN_tag;
-+ c_7317256.fn = (function_type)__lambda_481;
-+c_7317256.num_args = 0;
-+c_7317256.num_elements = 2;
-+c_7317256.elements = (object *)e_7317282;
-+c_7317256.elements[0] = from_73592_732857;
-+c_7317256.elements[1] = o_73593_732858;
++closureN_type c_7317249;
++object e_7317275 [2];
++c_7317249.hdr.mark = gc_color_red;
++ c_7317249.hdr.grayed = 0;
++c_7317249.tag = closureN_tag;
++ c_7317249.fn = (function_type)__lambda_481;
++c_7317249.num_args = 0;
++c_7317249.num_elements = 2;
++c_7317249.elements = (object *)e_7317275;
++c_7317249.elements[0] = from_73592_732850;
++c_7317249.elements[1] = o_73593_732851;
  
  
 -closureN_type c_7318576;
@@ -47485,30 +47712,30 @@ Make let-values be the same as let*-values, to work around
 -c_7318576.elements[2] = k_735370;
 -c_7318576.elements[3] = start_73596_733199;
 -c_7318576.elements[4] = to_73590_733195;
-+closureN_type c_7317283;
-+object e_7317449 [5];
-+c_7317283.hdr.mark = gc_color_red;
-+ c_7317283.hdr.grayed = 0;
-+c_7317283.tag = closureN_tag;
-+ c_7317283.fn = (function_type)__lambda_484;
-+c_7317283.num_args = 1;
-+c_7317283.num_elements = 5;
-+c_7317283.elements = (object *)e_7317449;
-+c_7317283.elements[0] = at_73591_732856;
-+c_7317283.elements[1] = from_73592_732857;
-+c_7317283.elements[2] = k_734925;
-+c_7317283.elements[3] = start_73596_732859;
-+c_7317283.elements[4] = to_73590_732855;
++closureN_type c_7317276;
++object e_7317442 [5];
++c_7317276.hdr.mark = gc_color_red;
++ c_7317276.hdr.grayed = 0;
++c_7317276.tag = closureN_tag;
++ c_7317276.fn = (function_type)__lambda_484;
++c_7317276.num_args = 1;
++c_7317276.num_elements = 5;
++c_7317276.elements = (object *)e_7317442;
++c_7317276.elements[0] = at_73591_732849;
++c_7317276.elements[1] = from_73592_732850;
++c_7317276.elements[2] = k_734918;
++c_7317276.elements[3] = start_73596_732852;
++c_7317276.elements[4] = to_73590_732848;
  
 -return_direct_with_clo1(data,(closure)&c_7318549,__lambda_481,  &c_7318576);; 
-+return_direct_with_clo1(data,(closure)&c_7317256,__lambda_481,  &c_7317283);; 
++return_direct_with_clo1(data,(closure)&c_7317249,__lambda_481,  &c_7317276);; 
  }
  
 -static void __lambda_484(void *data, object self_7313395, int argc, object *args) /* object self_7313395, object end_73599_733200 */
-+static void __lambda_484(void *data, object self_7312149, int argc, object *args) /* object self_7312149, object end_73599_732860 */
++static void __lambda_484(void *data, object self_7312142, int argc, object *args) /* object self_7312142, object end_73599_732853 */
   {
 - object end_73599_733200 = args[0];
-+ object end_73599_732860 = args[0];
++ object end_73599_732853 = args[0];
    
 -closureN_type c_7318578;
 -object e_7318738 [6];
@@ -47525,33 +47752,33 @@ Make let-values be the same as let*-values, to work around
 -c_7318578.elements[3] = ((closureN)self_7313395)->elements[2];
 -c_7318578.elements[4] = ((closureN)self_7313395)->elements[3];
 -c_7318578.elements[5] = ((closureN)self_7313395)->elements[4];
-+closureN_type c_7317285;
-+object e_7317445 [6];
-+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 = 1;
-+c_7317285.num_elements = 6;
-+c_7317285.elements = (object *)e_7317445;
-+c_7317285.elements[0] = ((closureN)self_7312149)->elements[0];
-+c_7317285.elements[1] = end_73599_732860;
-+c_7317285.elements[2] = ((closureN)self_7312149)->elements[1];
-+c_7317285.elements[3] = ((closureN)self_7312149)->elements[2];
-+c_7317285.elements[4] = ((closureN)self_7312149)->elements[3];
-+c_7317285.elements[5] = ((closureN)self_7312149)->elements[4];
++closureN_type c_7317278;
++object e_7317438 [6];
++c_7317278.hdr.mark = gc_color_red;
++ c_7317278.hdr.grayed = 0;
++c_7317278.tag = closureN_tag;
++ c_7317278.fn = (function_type)__lambda_485;
++c_7317278.num_args = 1;
++c_7317278.num_elements = 6;
++c_7317278.elements = (object *)e_7317438;
++c_7317278.elements[0] = ((closureN)self_7312142)->elements[0];
++c_7317278.elements[1] = end_73599_732853;
++c_7317278.elements[2] = ((closureN)self_7312142)->elements[1];
++c_7317278.elements[3] = ((closureN)self_7312142)->elements[2];
++c_7317278.elements[4] = ((closureN)self_7312142)->elements[3];
++c_7317278.elements[5] = ((closureN)self_7312142)->elements[4];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7318578,__lambda_485,  Cyc_bytevector_length(data, ((closureN)self_7313395)->elements[4]));; 
-+return_direct_with_clo1(data,(closure)&c_7317285,__lambda_485,  Cyc_bytevector_length(data, ((closureN)self_7312149)->elements[4]));; 
++return_direct_with_clo1(data,(closure)&c_7317278,__lambda_485,  Cyc_bytevector_length(data, ((closureN)self_7312142)->elements[4]));; 
  }
  
 -static void __lambda_485(void *data, object self_7313396, int argc, object *args) /* object self_7313396, object r_735397 */
-+static void __lambda_485(void *data, object self_7312150, int argc, object *args) /* object self_7312150, object r_734952 */
++static void __lambda_485(void *data, object self_7312143, int argc, object *args) /* object self_7312143, object r_734945 */
   {
 - object r_735397 = args[0];
-+ object r_734952 = args[0];
++ object r_734945 = args[0];
    
 -closureN_type c_7318580;
 -object e_7318728 [6];
@@ -47568,40 +47795,40 @@ Make let-values be the same as let*-values, to work around
 -c_7318580.elements[3] = ((closureN)self_7313396)->elements[3];
 -c_7318580.elements[4] = ((closureN)self_7313396)->elements[4];
 -c_7318580.elements[5] = ((closureN)self_7313396)->elements[5];
-+closureN_type c_7317287;
-+object e_7317435 [6];
-+c_7317287.hdr.mark = gc_color_red;
-+ c_7317287.hdr.grayed = 0;
-+c_7317287.tag = closureN_tag;
-+ c_7317287.fn = (function_type)__lambda_486;
-+c_7317287.num_args = 1;
-+c_7317287.num_elements = 6;
-+c_7317287.elements = (object *)e_7317435;
-+c_7317287.elements[0] = ((closureN)self_7312150)->elements[0];
-+c_7317287.elements[1] = ((closureN)self_7312150)->elements[1];
-+c_7317287.elements[2] = ((closureN)self_7312150)->elements[2];
-+c_7317287.elements[3] = ((closureN)self_7312150)->elements[3];
-+c_7317287.elements[4] = ((closureN)self_7312150)->elements[4];
-+c_7317287.elements[5] = ((closureN)self_7312150)->elements[5];
++closureN_type c_7317280;
++object e_7317428 [6];
++c_7317280.hdr.mark = gc_color_red;
++ c_7317280.hdr.grayed = 0;
++c_7317280.tag = closureN_tag;
++ c_7317280.fn = (function_type)__lambda_486;
++c_7317280.num_args = 1;
++c_7317280.num_elements = 6;
++c_7317280.elements = (object *)e_7317428;
++c_7317280.elements[0] = ((closureN)self_7312143)->elements[0];
++c_7317280.elements[1] = ((closureN)self_7312143)->elements[1];
++c_7317280.elements[2] = ((closureN)self_7312143)->elements[2];
++c_7317280.elements[3] = ((closureN)self_7312143)->elements[3];
++c_7317280.elements[4] = ((closureN)self_7312143)->elements[4];
++c_7317280.elements[5] = ((closureN)self_7312143)->elements[5];
  
  
 -complex_num_type local_7318732; 
-+complex_num_type local_7317439; 
++complex_num_type local_7317432; 
  
 -complex_num_type local_7318736; 
 -return_direct_with_clo3(data,  __glo_min_scheme_base, (((closure)  __glo_min_scheme_base)->fn),  &c_7318580, ((closureN)self_7313396)->elements[1], Cyc_fast_sum(data,&local_7318732, ((closureN)self_7313396)->elements[4], Cyc_fast_sub(data,&local_7318736, r_735397, ((closureN)self_7313396)->elements[0])));; 
-+complex_num_type local_7317443; 
-+return_direct_with_clo3(data,  __glo_min_scheme_base, (((closure)  __glo_min_scheme_base)->fn),  &c_7317287, ((closureN)self_7312150)->elements[1], Cyc_fast_sum(data,&local_7317439, ((closureN)self_7312150)->elements[4], Cyc_fast_sub(data,&local_7317443, r_734952, ((closureN)self_7312150)->elements[0])));; 
++complex_num_type local_7317436; 
++return_direct_with_clo3(data,  __glo_min_scheme_base, (((closure)  __glo_min_scheme_base)->fn),  &c_7317280, ((closureN)self_7312143)->elements[1], Cyc_fast_sum(data,&local_7317432, ((closureN)self_7312143)->elements[4], Cyc_fast_sub(data,&local_7317436, r_734945, ((closureN)self_7312143)->elements[0])));; 
  }
  
 -static void __lambda_486(void *data, object self_7313397, int argc, object *args) /* object self_7313397, object limit_73602_733201 */
-+static void __lambda_486(void *data, object self_7312151, int argc, object *args) /* object self_7312151, object limit_73602_732861 */
++static void __lambda_486(void *data, object self_7312144, int argc, object *args) /* object self_7312144, object limit_73602_732854 */
   {
 - object limit_73602_733201 = args[0];
-+ object limit_73602_732861 = args[0];
++ object limit_73602_732854 = args[0];
      
 -if( (boolean_f != Cyc_num_fast_lte_op(data, ((closureN)self_7313397)->elements[0], ((closureN)self_7313397)->elements[4])) ){ 
-+if( (boolean_f != Cyc_num_fast_lte_op(data, ((closureN)self_7312151)->elements[0], ((closureN)self_7312151)->elements[4])) ){ 
++if( (boolean_f != Cyc_num_fast_lte_op(data, ((closureN)self_7312144)->elements[0], ((closureN)self_7312144)->elements[4])) ){ 
    
 -closureN_type c_7318586;
 -object e_7318647 [4];
@@ -47616,22 +47843,22 @@ Make let-values be the same as let*-values, to work around
 -c_7318586.elements[1] = ((closureN)self_7313397)->elements[3];
 -c_7318586.elements[2] = limit_73602_733201;
 -c_7318586.elements[3] = ((closureN)self_7313397)->elements[5];
-+closureN_type c_7317293;
-+object e_7317354 [4];
-+c_7317293.hdr.mark = gc_color_red;
-+ c_7317293.hdr.grayed = 0;
-+c_7317293.tag = closureN_tag;
-+ c_7317293.fn = (function_type)__lambda_487;
-+c_7317293.num_args = 2;
-+c_7317293.num_elements = 4;
-+c_7317293.elements = (object *)e_7317354;
-+c_7317293.elements[0] = ((closureN)self_7312151)->elements[2];
-+c_7317293.elements[1] = ((closureN)self_7312151)->elements[3];
-+c_7317293.elements[2] = limit_73602_732861;
-+c_7317293.elements[3] = ((closureN)self_7312151)->elements[5];
++closureN_type c_7317286;
++object e_7317347 [4];
++c_7317286.hdr.mark = gc_color_red;
++ c_7317286.hdr.grayed = 0;
++c_7317286.tag = closureN_tag;
++ c_7317286.fn = (function_type)__lambda_487;
++c_7317286.num_args = 2;
++c_7317286.num_elements = 4;
++c_7317286.elements = (object *)e_7317347;
++c_7317286.elements[0] = ((closureN)self_7312144)->elements[2];
++c_7317286.elements[1] = ((closureN)self_7312144)->elements[3];
++c_7317286.elements[2] = limit_73602_732854;
++c_7317286.elements[3] = ((closureN)self_7312144)->elements[5];
  
 -return_direct_with_clo2(data,(closure)&c_7318586,__lambda_487,  ((closureN)self_7313397)->elements[0], ((closureN)self_7313397)->elements[4]);
-+return_direct_with_clo2(data,(closure)&c_7317293,__lambda_487,  ((closureN)self_7312151)->elements[0], ((closureN)self_7312151)->elements[4]);
++return_direct_with_clo2(data,(closure)&c_7317286,__lambda_487,  ((closureN)self_7312144)->elements[0], ((closureN)self_7312144)->elements[4]);
  } else { 
    
 -closureN_type c_7318651;
@@ -47647,42 +47874,42 @@ Make let-values be the same as let*-values, to work around
 -c_7318651.elements[1] = ((closureN)self_7313397)->elements[3];
 -c_7318651.elements[2] = ((closureN)self_7313397)->elements[4];
 -c_7318651.elements[3] = ((closureN)self_7313397)->elements[5];
-+closureN_type c_7317358;
-+object e_7317419 [4];
-+c_7317358.hdr.mark = gc_color_red;
-+ c_7317358.hdr.grayed = 0;
-+c_7317358.tag = closureN_tag;
-+ c_7317358.fn = (function_type)__lambda_494;
-+c_7317358.num_args = 2;
-+c_7317358.num_elements = 4;
-+c_7317358.elements = (object *)e_7317419;
-+c_7317358.elements[0] = ((closureN)self_7312151)->elements[2];
-+c_7317358.elements[1] = ((closureN)self_7312151)->elements[3];
-+c_7317358.elements[2] = ((closureN)self_7312151)->elements[4];
-+c_7317358.elements[3] = ((closureN)self_7312151)->elements[5];
++closureN_type c_7317351;
++object e_7317412 [4];
++c_7317351.hdr.mark = gc_color_red;
++ c_7317351.hdr.grayed = 0;
++c_7317351.tag = closureN_tag;
++ c_7317351.fn = (function_type)__lambda_494;
++c_7317351.num_args = 2;
++c_7317351.num_elements = 4;
++c_7317351.elements = (object *)e_7317412;
++c_7317351.elements[0] = ((closureN)self_7312144)->elements[2];
++c_7317351.elements[1] = ((closureN)self_7312144)->elements[3];
++c_7317351.elements[2] = ((closureN)self_7312144)->elements[4];
++c_7317351.elements[3] = ((closureN)self_7312144)->elements[5];
  
  
 -complex_num_type local_7318715; 
-+complex_num_type local_7317422; 
++complex_num_type local_7317415; 
  
 -complex_num_type local_7318719; 
-+complex_num_type local_7317426; 
++complex_num_type local_7317419; 
  
 -complex_num_type local_7318722; 
-+complex_num_type local_7317429; 
++complex_num_type local_7317422; 
  
 -complex_num_type local_7318727; 
 -return_direct_with_clo2(data,(closure)&c_7318651,__lambda_494,  Cyc_fast_sum(data,&local_7318715, ((closureN)self_7313397)->elements[0], Cyc_fast_sub(data,&local_7318719, Cyc_fast_sub(data,&local_7318722, ((closureN)self_7313397)->elements[1], ((closureN)self_7313397)->elements[4]), obj_int2obj(1))), Cyc_fast_sub(data,&local_7318727, limit_73602_733201, obj_int2obj(1)));}
-+complex_num_type local_7317434; 
-+return_direct_with_clo2(data,(closure)&c_7317358,__lambda_494,  Cyc_fast_sum(data,&local_7317422, ((closureN)self_7312151)->elements[0], Cyc_fast_sub(data,&local_7317426, Cyc_fast_sub(data,&local_7317429, ((closureN)self_7312151)->elements[1], ((closureN)self_7312151)->elements[4]), obj_int2obj(1))), Cyc_fast_sub(data,&local_7317434, limit_73602_732861, obj_int2obj(1)));}
++complex_num_type local_7317427; 
++return_direct_with_clo2(data,(closure)&c_7317351,__lambda_494,  Cyc_fast_sum(data,&local_7317415, ((closureN)self_7312144)->elements[0], Cyc_fast_sub(data,&local_7317419, Cyc_fast_sub(data,&local_7317422, ((closureN)self_7312144)->elements[1], ((closureN)self_7312144)->elements[4]), obj_int2obj(1))), Cyc_fast_sub(data,&local_7317427, limit_73602_732854, obj_int2obj(1)));}
  ;; 
  }
  
 -static void __lambda_494(void *data, object self_7313406, int argc, object *args) /* object self_7313406, object i_73618_733208, object j_73619_733209 */
-+static void __lambda_494(void *data, object self_7312160, int argc, object *args) /* object self_7312160, object i_73618_732868, object j_73619_732869 */
++static void __lambda_494(void *data, object self_7312153, int argc, object *args) /* object self_7312153, object i_73618_732861, object j_73619_732862 */
   {
 - object i_73618_733208 = args[0]; object j_73619_733209 = args[1];
-+ object i_73618_732868 = args[0]; object j_73619_732869 = args[1];
++ object i_73618_732861 = args[0]; object j_73619_732862 = args[1];
    
 -closureN_type c_7318653;
 -object e_7318711 [6];
@@ -47699,31 +47926,31 @@ Make let-values be the same as let*-values, to work around
 -c_7318653.elements[3] = ((closureN)self_7313406)->elements[1];
 -c_7318653.elements[4] = ((closureN)self_7313406)->elements[2];
 -c_7318653.elements[5] = ((closureN)self_7313406)->elements[3];
-+closureN_type c_7317360;
-+object e_7317418 [6];
-+c_7317360.hdr.mark = gc_color_red;
-+ c_7317360.hdr.grayed = 0;
-+c_7317360.tag = closureN_tag;
-+ c_7317360.fn = (function_type)__lambda_495;
-+c_7317360.num_args = 1;
-+c_7317360.num_elements = 6;
-+c_7317360.elements = (object *)e_7317418;
-+c_7317360.elements[0] = ((closureN)self_7312160)->elements[0];
-+c_7317360.elements[1] = i_73618_732868;
-+c_7317360.elements[2] = j_73619_732869;
-+c_7317360.elements[3] = ((closureN)self_7312160)->elements[1];
-+c_7317360.elements[4] = ((closureN)self_7312160)->elements[2];
-+c_7317360.elements[5] = ((closureN)self_7312160)->elements[3];
++closureN_type c_7317353;
++object e_7317411 [6];
++c_7317353.hdr.mark = gc_color_red;
++ c_7317353.hdr.grayed = 0;
++c_7317353.tag = closureN_tag;
++ c_7317353.fn = (function_type)__lambda_495;
++c_7317353.num_args = 1;
++c_7317353.num_elements = 6;
++c_7317353.elements = (object *)e_7317411;
++c_7317353.elements[0] = ((closureN)self_7312153)->elements[0];
++c_7317353.elements[1] = i_73618_732861;
++c_7317353.elements[2] = j_73619_732862;
++c_7317353.elements[3] = ((closureN)self_7312153)->elements[1];
++c_7317353.elements[4] = ((closureN)self_7312153)->elements[2];
++c_7317353.elements[5] = ((closureN)self_7312153)->elements[3];
  
 -return_direct_with_clo1(data,(closure)&c_7318653,__lambda_495,  boolean_f);; 
-+return_direct_with_clo1(data,(closure)&c_7317360,__lambda_495,  boolean_f);; 
++return_direct_with_clo1(data,(closure)&c_7317353,__lambda_495,  boolean_f);; 
  }
  
 -static void __lambda_495(void *data, object self_7313407, int argc, object *args) /* object self_7313407, object lp_73614_73620_733210 */
-+static void __lambda_495(void *data, object self_7312161, int argc, object *args) /* object self_7312161, object lp_73614_73620_732870 */
++static void __lambda_495(void *data, object self_7312154, int argc, object *args) /* object self_7312154, object lp_73614_73620_732863 */
   {
 - object lp_73614_73620_733210 = args[0];
-+ object lp_73614_73620_732870 = args[0];
++ object lp_73614_73620_732863 = args[0];
    
 -closureN_type c_7318655;
 -object e_7318707 [6];
@@ -47740,34 +47967,34 @@ Make let-values be the same as let*-values, to work around
 -c_7318655.elements[3] = ((closureN)self_7313407)->elements[3];
 -c_7318655.elements[4] = ((closureN)self_7313407)->elements[4];
 -c_7318655.elements[5] = ((closureN)self_7313407)->elements[5];
-+closureN_type c_7317362;
-+object e_7317414 [6];
-+c_7317362.hdr.mark = gc_color_red;
-+ c_7317362.hdr.grayed = 0;
-+c_7317362.tag = closureN_tag;
-+ c_7317362.fn = (function_type)__lambda_1321;
-+c_7317362.num_args = 1;
-+c_7317362.num_elements = 6;
-+c_7317362.elements = (object *)e_7317414;
-+c_7317362.elements[0] = ((closureN)self_7312161)->elements[0];
-+c_7317362.elements[1] = ((closureN)self_7312161)->elements[1];
-+c_7317362.elements[2] = ((closureN)self_7312161)->elements[2];
-+c_7317362.elements[3] = ((closureN)self_7312161)->elements[3];
-+c_7317362.elements[4] = ((closureN)self_7312161)->elements[4];
-+c_7317362.elements[5] = ((closureN)self_7312161)->elements[5];
++closureN_type c_7317355;
++object e_7317407 [6];
++c_7317355.hdr.mark = gc_color_red;
++ c_7317355.hdr.grayed = 0;
++c_7317355.tag = closureN_tag;
++ c_7317355.fn = (function_type)__lambda_1321;
++c_7317355.num_args = 1;
++c_7317355.num_elements = 6;
++c_7317355.elements = (object *)e_7317407;
++c_7317355.elements[0] = ((closureN)self_7312154)->elements[0];
++c_7317355.elements[1] = ((closureN)self_7312154)->elements[1];
++c_7317355.elements[2] = ((closureN)self_7312154)->elements[2];
++c_7317355.elements[3] = ((closureN)self_7312154)->elements[3];
++c_7317355.elements[4] = ((closureN)self_7312154)->elements[4];
++c_7317355.elements[5] = ((closureN)self_7312154)->elements[5];
  
  
 -pair_type local_7318710; 
 -return_direct_with_clo1(data,(closure)&c_7318655,__lambda_1368,  set_cell_as_expr(&local_7318710, lp_73614_73620_733210));; 
-+pair_type local_7317417; 
-+return_direct_with_clo1(data,(closure)&c_7317362,__lambda_1321,  set_cell_as_expr(&local_7317417, lp_73614_73620_732870));; 
++pair_type local_7317410; 
++return_direct_with_clo1(data,(closure)&c_7317355,__lambda_1321,  set_cell_as_expr(&local_7317410, lp_73614_73620_732863));; 
  }
  
 -static void __lambda_1368(void *data, object self_7313408, int argc, object *args) /* object self_7313408, object lp_73614_73620_733210 */
-+static void __lambda_1321(void *data, object self_7312162, int argc, object *args) /* object self_7312162, object lp_73614_73620_732870 */
++static void __lambda_1321(void *data, object self_7312155, int argc, object *args) /* object self_7312155, object lp_73614_73620_732863 */
   {
 - object lp_73614_73620_733210 = args[0];
-+ object lp_73614_73620_732870 = args[0];
++ object lp_73614_73620_732863 = args[0];
    
 -closureN_type c_7318657;
 -object e_7318671 [4];
@@ -47782,19 +48009,19 @@ Make let-values be the same as let*-values, to work around
 -c_7318657.elements[1] = ((closureN)self_7313408)->elements[2];
 -c_7318657.elements[2] = ((closureN)self_7313408)->elements[3];
 -c_7318657.elements[3] = lp_73614_73620_733210;
-+closureN_type c_7317364;
-+object e_7317378 [4];
-+c_7317364.hdr.mark = gc_color_red;
-+ c_7317364.hdr.grayed = 0;
-+c_7317364.tag = closureN_tag;
-+ c_7317364.fn = (function_type)__lambda_496;
-+c_7317364.num_args = 1;
-+c_7317364.num_elements = 4;
-+c_7317364.elements = (object *)e_7317378;
-+c_7317364.elements[0] = ((closureN)self_7312162)->elements[1];
-+c_7317364.elements[1] = ((closureN)self_7312162)->elements[2];
-+c_7317364.elements[2] = ((closureN)self_7312162)->elements[3];
-+c_7317364.elements[3] = lp_73614_73620_732870;
++closureN_type c_7317357;
++object e_7317371 [4];
++c_7317357.hdr.mark = gc_color_red;
++ c_7317357.hdr.grayed = 0;
++c_7317357.tag = closureN_tag;
++ c_7317357.fn = (function_type)__lambda_496;
++c_7317357.num_args = 1;
++c_7317357.num_elements = 4;
++c_7317357.elements = (object *)e_7317371;
++c_7317357.elements[0] = ((closureN)self_7312155)->elements[1];
++c_7317357.elements[1] = ((closureN)self_7312155)->elements[2];
++c_7317357.elements[2] = ((closureN)self_7312155)->elements[3];
++c_7317357.elements[3] = lp_73614_73620_732863;
  
  
 -closureN_type c_7318672;
@@ -47810,36 +48037,36 @@ Make let-values be the same as let*-values, to work around
 -c_7318672.elements[1] = lp_73614_73620_733210;
 -c_7318672.elements[2] = ((closureN)self_7313408)->elements[4];
 -c_7318672.elements[3] = ((closureN)self_7313408)->elements[5];
-+closureN_type c_7317379;
-+object e_7317413 [4];
-+c_7317379.hdr.mark = gc_color_red;
-+ c_7317379.hdr.grayed = 0;
-+c_7317379.tag = closureN_tag;
-+ c_7317379.fn = (function_type)__lambda_498;
-+c_7317379.num_args = 2;
-+c_7317379.num_elements = 4;
-+c_7317379.elements = (object *)e_7317413;
-+c_7317379.elements[0] = ((closureN)self_7312162)->elements[0];
-+c_7317379.elements[1] = lp_73614_73620_732870;
-+c_7317379.elements[2] = ((closureN)self_7312162)->elements[4];
-+c_7317379.elements[3] = ((closureN)self_7312162)->elements[5];
++closureN_type c_7317372;
++object e_7317406 [4];
++c_7317372.hdr.mark = gc_color_red;
++ c_7317372.hdr.grayed = 0;
++c_7317372.tag = closureN_tag;
++ c_7317372.fn = (function_type)__lambda_498;
++c_7317372.num_args = 2;
++c_7317372.num_elements = 4;
++c_7317372.elements = (object *)e_7317406;
++c_7317372.elements[0] = ((closureN)self_7312155)->elements[0];
++c_7317372.elements[1] = lp_73614_73620_732863;
++c_7317372.elements[2] = ((closureN)self_7312155)->elements[4];
++c_7317372.elements[3] = ((closureN)self_7312155)->elements[5];
  
 -return_direct_with_clo1(data,(closure)&c_7318657,__lambda_496,  &c_7318672);; 
-+return_direct_with_clo1(data,(closure)&c_7317364,__lambda_496,  &c_7317379);; 
++return_direct_with_clo1(data,(closure)&c_7317357,__lambda_496,  &c_7317372);; 
  }
  
 -static void __lambda_498(void *data, object self_7313409, int argc, object *args) /* object self_7313409, object k_735387, object i_73621_733211, object j_73622_733212 */
-+static void __lambda_498(void *data, object self_7312163, int argc, object *args) /* object self_7312163, object k_734942, object i_73621_732871, object j_73622_732872 */
++static void __lambda_498(void *data, object self_7312156, int argc, object *args) /* object self_7312156, object k_734935, object i_73621_732864, object j_73622_732865 */
   {
 - object k_735387 = args[0]; object i_73621_733211 = args[1]; object j_73622_733212 = args[2];
-+ object k_734942 = args[0]; object i_73621_732871 = args[1]; object j_73622_732872 = args[2];
++ object k_734935 = args[0]; object i_73621_732864 = args[1]; object j_73622_732865 = args[2];
      
 -if( (boolean_f != Cyc_num_fast_lt_op(data, j_73622_733212, ((closureN)self_7313409)->elements[2])) ){ 
-+if( (boolean_f != Cyc_num_fast_lt_op(data, j_73622_732872, ((closureN)self_7312163)->elements[2])) ){ 
++if( (boolean_f != Cyc_num_fast_lt_op(data, j_73622_732865, ((closureN)self_7312156)->elements[2])) ){ 
    
  
 -return_direct_with_clo1(data,  k_735387, (((closure)  k_735387)->fn),  Cyc_num_fast_lt_op(data, j_73622_733212, ((closureN)self_7313409)->elements[2]));
-+return_direct_with_clo1(data,  k_734942, (((closure)  k_734942)->fn),  Cyc_num_fast_lt_op(data, j_73622_732872, ((closureN)self_7312163)->elements[2]));
++return_direct_with_clo1(data,  k_734935, (((closure)  k_734935)->fn),  Cyc_num_fast_lt_op(data, j_73622_732865, ((closureN)self_7312156)->elements[2]));
  } else { 
    
 -closureN_type c_7318681;
@@ -47856,33 +48083,33 @@ Make let-values be the same as let*-values, to work around
 -c_7318681.elements[2] = k_735387;
 -c_7318681.elements[3] = ((closureN)self_7313409)->elements[1];
 -c_7318681.elements[4] = ((closureN)self_7313409)->elements[3];
-+closureN_type c_7317388;
-+object e_7317409 [5];
-+c_7317388.hdr.mark = gc_color_red;
-+ c_7317388.hdr.grayed = 0;
-+c_7317388.tag = closureN_tag;
-+ c_7317388.fn = (function_type)__lambda_499;
-+c_7317388.num_args = 1;
-+c_7317388.num_elements = 5;
-+c_7317388.elements = (object *)e_7317409;
-+c_7317388.elements[0] = i_73621_732871;
-+c_7317388.elements[1] = j_73622_732872;
-+c_7317388.elements[2] = k_734942;
-+c_7317388.elements[3] = ((closureN)self_7312163)->elements[1];
-+c_7317388.elements[4] = ((closureN)self_7312163)->elements[3];
++closureN_type c_7317381;
++object e_7317402 [5];
++c_7317381.hdr.mark = gc_color_red;
++ c_7317381.hdr.grayed = 0;
++c_7317381.tag = closureN_tag;
++ c_7317381.fn = (function_type)__lambda_499;
++c_7317381.num_args = 1;
++c_7317381.num_elements = 5;
++c_7317381.elements = (object *)e_7317402;
++c_7317381.elements[0] = i_73621_732864;
++c_7317381.elements[1] = j_73622_732865;
++c_7317381.elements[2] = k_734935;
++c_7317381.elements[3] = ((closureN)self_7312156)->elements[1];
++c_7317381.elements[4] = ((closureN)self_7312156)->elements[3];
  
  
  
 -return_closcall1(data,(closure)&c_7318681,  Cyc_bytevector_u8_ref(data, ((closureN)self_7313409)->elements[0], j_73622_733212));}
-+return_closcall1(data,(closure)&c_7317388,  Cyc_bytevector_u8_ref(data, ((closureN)self_7312163)->elements[0], j_73622_732872));}
++return_closcall1(data,(closure)&c_7317381,  Cyc_bytevector_u8_ref(data, ((closureN)self_7312156)->elements[0], j_73622_732865));}
  ;; 
  }
  
 -static void __lambda_499(void *data, object self_7313410, int argc, object *args) /* object self_7313410, object r_735392 */
-+static void __lambda_499(void *data, object self_7312164, int argc, object *args) /* object self_7312164, object r_734947 */
++static void __lambda_499(void *data, object self_7312157, int argc, object *args) /* object self_7312157, object r_734940 */
   {
 - object r_735392 = args[0];
-+ object r_734947 = args[0];
++ object r_734940 = args[0];
    
 -closureN_type c_7318683;
 -object e_7318697 [4];
@@ -47897,47 +48124,47 @@ Make let-values be the same as let*-values, to work around
 -c_7318683.elements[1] = ((closureN)self_7313410)->elements[1];
 -c_7318683.elements[2] = ((closureN)self_7313410)->elements[2];
 -c_7318683.elements[3] = ((closureN)self_7313410)->elements[3];
-+closureN_type c_7317390;
-+object e_7317404 [4];
-+c_7317390.hdr.mark = gc_color_red;
-+ c_7317390.hdr.grayed = 0;
-+c_7317390.tag = closureN_tag;
-+ c_7317390.fn = (function_type)__lambda_500;
-+c_7317390.num_args = 1;
-+c_7317390.num_elements = 4;
-+c_7317390.elements = (object *)e_7317404;
-+c_7317390.elements[0] = ((closureN)self_7312164)->elements[0];
-+c_7317390.elements[1] = ((closureN)self_7312164)->elements[1];
-+c_7317390.elements[2] = ((closureN)self_7312164)->elements[2];
-+c_7317390.elements[3] = ((closureN)self_7312164)->elements[3];
++closureN_type c_7317383;
++object e_7317397 [4];
++c_7317383.hdr.mark = gc_color_red;
++ c_7317383.hdr.grayed = 0;
++c_7317383.tag = closureN_tag;
++ c_7317383.fn = (function_type)__lambda_500;
++c_7317383.num_args = 1;
++c_7317383.num_elements = 4;
++c_7317383.elements = (object *)e_7317397;
++c_7317383.elements[0] = ((closureN)self_7312157)->elements[0];
++c_7317383.elements[1] = ((closureN)self_7312157)->elements[1];
++c_7317383.elements[2] = ((closureN)self_7312157)->elements[2];
++c_7317383.elements[3] = ((closureN)self_7312157)->elements[3];
  
  
  
 -return_closcall1(data,(closure)&c_7318683,  Cyc_bytevector_u8_set(data, ((closureN)self_7313410)->elements[4], ((closureN)self_7313410)->elements[0], r_735392));; 
-+return_closcall1(data,(closure)&c_7317390,  Cyc_bytevector_u8_set(data, ((closureN)self_7312164)->elements[4], ((closureN)self_7312164)->elements[0], r_734947));; 
++return_closcall1(data,(closure)&c_7317383,  Cyc_bytevector_u8_set(data, ((closureN)self_7312157)->elements[4], ((closureN)self_7312157)->elements[0], r_734940));; 
  }
  
 -static void __lambda_500(void *data, object self_7313411, int argc, object *args) /* object self_7313411, object r_735389 */
-+static void __lambda_500(void *data, object self_7312165, int argc, object *args) /* object self_7312165, object r_734944 */
++static void __lambda_500(void *data, object self_7312158, int argc, object *args) /* object self_7312158, object r_734937 */
   {
  
    
  
  
 -complex_num_type local_7318691; 
-+complex_num_type local_7317398; 
++complex_num_type local_7317391; 
  
 -complex_num_type local_7318695; 
 -return_closcall3(data,  car(((closureN)self_7313411)->elements[3]),  ((closureN)self_7313411)->elements[2], Cyc_fast_sub(data,&local_7318691, ((closureN)self_7313411)->elements[0], obj_int2obj(1)), Cyc_fast_sub(data,&local_7318695, ((closureN)self_7313411)->elements[1], obj_int2obj(1)));; 
-+complex_num_type local_7317402; 
-+return_closcall3(data,  car(((closureN)self_7312165)->elements[3]),  ((closureN)self_7312165)->elements[2], Cyc_fast_sub(data,&local_7317398, ((closureN)self_7312165)->elements[0], obj_int2obj(1)), Cyc_fast_sub(data,&local_7317402, ((closureN)self_7312165)->elements[1], obj_int2obj(1)));; 
++complex_num_type local_7317395; 
++return_closcall3(data,  car(((closureN)self_7312158)->elements[3]),  ((closureN)self_7312158)->elements[2], Cyc_fast_sub(data,&local_7317391, ((closureN)self_7312158)->elements[0], obj_int2obj(1)), Cyc_fast_sub(data,&local_7317395, ((closureN)self_7312158)->elements[1], obj_int2obj(1)));; 
  }
  
 -static void __lambda_496(void *data, object self_7313412, int argc, object *args) /* object self_7313412, object r_735386 */
-+static void __lambda_496(void *data, object self_7312166, int argc, object *args) /* object self_7312166, object r_734941 */
++static void __lambda_496(void *data, object self_7312159, int argc, object *args) /* object self_7312159, object r_734934 */
   {
 - object r_735386 = args[0];
-+ object r_734941 = args[0];
++ object r_734934 = args[0];
    
 -closureN_type c_7318659;
 -object e_7318667 [4];
@@ -47952,41 +48179,41 @@ Make let-values be the same as let*-values, to work around
 -c_7318659.elements[1] = ((closureN)self_7313412)->elements[1];
 -c_7318659.elements[2] = ((closureN)self_7313412)->elements[2];
 -c_7318659.elements[3] = ((closureN)self_7313412)->elements[3];
-+closureN_type c_7317366;
-+object e_7317374 [4];
-+c_7317366.hdr.mark = gc_color_red;
-+ c_7317366.hdr.grayed = 0;
-+c_7317366.tag = closureN_tag;
-+ c_7317366.fn = (function_type)__lambda_497;
-+c_7317366.num_args = 1;
-+c_7317366.num_elements = 4;
-+c_7317366.elements = (object *)e_7317374;
-+c_7317366.elements[0] = ((closureN)self_7312166)->elements[0];
-+c_7317366.elements[1] = ((closureN)self_7312166)->elements[1];
-+c_7317366.elements[2] = ((closureN)self_7312166)->elements[2];
-+c_7317366.elements[3] = ((closureN)self_7312166)->elements[3];
++closureN_type c_7317359;
++object e_7317367 [4];
++c_7317359.hdr.mark = gc_color_red;
++ c_7317359.hdr.grayed = 0;
++c_7317359.tag = closureN_tag;
++ c_7317359.fn = (function_type)__lambda_497;
++c_7317359.num_args = 1;
++c_7317359.num_elements = 4;
++c_7317359.elements = (object *)e_7317367;
++c_7317359.elements[0] = ((closureN)self_7312159)->elements[0];
++c_7317359.elements[1] = ((closureN)self_7312159)->elements[1];
++c_7317359.elements[2] = ((closureN)self_7312159)->elements[2];
++c_7317359.elements[3] = ((closureN)self_7312159)->elements[3];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7318659,__lambda_497,  Cyc_set_cell(data, ((closureN)self_7313412)->elements[3], r_735386));; 
-+return_direct_with_clo1(data,(closure)&c_7317366,__lambda_497,  Cyc_set_cell(data, ((closureN)self_7312166)->elements[3], r_734941));; 
++return_direct_with_clo1(data,(closure)&c_7317359,__lambda_497,  Cyc_set_cell(data, ((closureN)self_7312159)->elements[3], r_734934));; 
  }
  
 -static void __lambda_497(void *data, object self_7313413, int argc, object *args) /* object self_7313413, object r_735385 */
-+static void __lambda_497(void *data, object self_7312167, int argc, object *args) /* object self_7312167, object r_734940 */
++static void __lambda_497(void *data, object self_7312160, int argc, object *args) /* object self_7312160, object r_734933 */
   {
  
    
  
 -return_closcall3(data,  car(((closureN)self_7313413)->elements[3]),  ((closureN)self_7313413)->elements[2], ((closureN)self_7313413)->elements[0], ((closureN)self_7313413)->elements[1]);; 
-+return_closcall3(data,  car(((closureN)self_7312167)->elements[3]),  ((closureN)self_7312167)->elements[2], ((closureN)self_7312167)->elements[0], ((closureN)self_7312167)->elements[1]);; 
++return_closcall3(data,  car(((closureN)self_7312160)->elements[3]),  ((closureN)self_7312160)->elements[2], ((closureN)self_7312160)->elements[0], ((closureN)self_7312160)->elements[1]);; 
  }
  
 -static void __lambda_487(void *data, object self_7313398, int argc, object *args) /* object self_7313398, object i_73608_733202, object j_73609_733203 */
-+static void __lambda_487(void *data, object self_7312152, int argc, object *args) /* object self_7312152, object i_73608_732862, object j_73609_732863 */
++static void __lambda_487(void *data, object self_7312145, int argc, object *args) /* object self_7312145, object i_73608_732855, object j_73609_732856 */
   {
 - object i_73608_733202 = args[0]; object j_73609_733203 = args[1];
-+ object i_73608_732862 = args[0]; object j_73609_732863 = args[1];
++ object i_73608_732855 = args[0]; object j_73609_732856 = args[1];
    
 -closureN_type c_7318588;
 -object e_7318646 [6];
@@ -48003,31 +48230,31 @@ Make let-values be the same as let*-values, to work around
 -c_7318588.elements[3] = ((closureN)self_7313398)->elements[1];
 -c_7318588.elements[4] = ((closureN)self_7313398)->elements[2];
 -c_7318588.elements[5] = ((closureN)self_7313398)->elements[3];
-+closureN_type c_7317295;
-+object e_7317353 [6];
-+c_7317295.hdr.mark = gc_color_red;
-+ c_7317295.hdr.grayed = 0;
-+c_7317295.tag = closureN_tag;
-+ c_7317295.fn = (function_type)__lambda_488;
-+c_7317295.num_args = 1;
-+c_7317295.num_elements = 6;
-+c_7317295.elements = (object *)e_7317353;
-+c_7317295.elements[0] = ((closureN)self_7312152)->elements[0];
-+c_7317295.elements[1] = i_73608_732862;
-+c_7317295.elements[2] = j_73609_732863;
-+c_7317295.elements[3] = ((closureN)self_7312152)->elements[1];
-+c_7317295.elements[4] = ((closureN)self_7312152)->elements[2];
-+c_7317295.elements[5] = ((closureN)self_7312152)->elements[3];
++closureN_type c_7317288;
++object e_7317346 [6];
++c_7317288.hdr.mark = gc_color_red;
++ c_7317288.hdr.grayed = 0;
++c_7317288.tag = closureN_tag;
++ c_7317288.fn = (function_type)__lambda_488;
++c_7317288.num_args = 1;
++c_7317288.num_elements = 6;
++c_7317288.elements = (object *)e_7317346;
++c_7317288.elements[0] = ((closureN)self_7312145)->elements[0];
++c_7317288.elements[1] = i_73608_732855;
++c_7317288.elements[2] = j_73609_732856;
++c_7317288.elements[3] = ((closureN)self_7312145)->elements[1];
++c_7317288.elements[4] = ((closureN)self_7312145)->elements[2];
++c_7317288.elements[5] = ((closureN)self_7312145)->elements[3];
  
 -return_direct_with_clo1(data,(closure)&c_7318588,__lambda_488,  boolean_f);; 
-+return_direct_with_clo1(data,(closure)&c_7317295,__lambda_488,  boolean_f);; 
++return_direct_with_clo1(data,(closure)&c_7317288,__lambda_488,  boolean_f);; 
  }
  
 -static void __lambda_488(void *data, object self_7313399, int argc, object *args) /* object self_7313399, object lp_73604_73610_733204 */
-+static void __lambda_488(void *data, object self_7312153, int argc, object *args) /* object self_7312153, object lp_73604_73610_732864 */
++static void __lambda_488(void *data, object self_7312146, int argc, object *args) /* object self_7312146, object lp_73604_73610_732857 */
   {
 - object lp_73604_73610_733204 = args[0];
-+ object lp_73604_73610_732864 = args[0];
++ object lp_73604_73610_732857 = args[0];
    
 -closureN_type c_7318590;
 -object e_7318642 [6];
@@ -48044,34 +48271,34 @@ Make let-values be the same as let*-values, to work around
 -c_7318590.elements[3] = ((closureN)self_7313399)->elements[3];
 -c_7318590.elements[4] = ((closureN)self_7313399)->elements[4];
 -c_7318590.elements[5] = ((closureN)self_7313399)->elements[5];
-+closureN_type c_7317297;
-+object e_7317349 [6];
-+c_7317297.hdr.mark = gc_color_red;
-+ c_7317297.hdr.grayed = 0;
-+c_7317297.tag = closureN_tag;
-+ c_7317297.fn = (function_type)__lambda_1320;
-+c_7317297.num_args = 1;
-+c_7317297.num_elements = 6;
-+c_7317297.elements = (object *)e_7317349;
-+c_7317297.elements[0] = ((closureN)self_7312153)->elements[0];
-+c_7317297.elements[1] = ((closureN)self_7312153)->elements[1];
-+c_7317297.elements[2] = ((closureN)self_7312153)->elements[2];
-+c_7317297.elements[3] = ((closureN)self_7312153)->elements[3];
-+c_7317297.elements[4] = ((closureN)self_7312153)->elements[4];
-+c_7317297.elements[5] = ((closureN)self_7312153)->elements[5];
++closureN_type c_7317290;
++object e_7317342 [6];
++c_7317290.hdr.mark = gc_color_red;
++ c_7317290.hdr.grayed = 0;
++c_7317290.tag = closureN_tag;
++ c_7317290.fn = (function_type)__lambda_1320;
++c_7317290.num_args = 1;
++c_7317290.num_elements = 6;
++c_7317290.elements = (object *)e_7317342;
++c_7317290.elements[0] = ((closureN)self_7312146)->elements[0];
++c_7317290.elements[1] = ((closureN)self_7312146)->elements[1];
++c_7317290.elements[2] = ((closureN)self_7312146)->elements[2];
++c_7317290.elements[3] = ((closureN)self_7312146)->elements[3];
++c_7317290.elements[4] = ((closureN)self_7312146)->elements[4];
++c_7317290.elements[5] = ((closureN)self_7312146)->elements[5];
  
  
 -pair_type local_7318645; 
 -return_direct_with_clo1(data,(closure)&c_7318590,__lambda_1367,  set_cell_as_expr(&local_7318645, lp_73604_73610_733204));; 
-+pair_type local_7317352; 
-+return_direct_with_clo1(data,(closure)&c_7317297,__lambda_1320,  set_cell_as_expr(&local_7317352, lp_73604_73610_732864));; 
++pair_type local_7317345; 
++return_direct_with_clo1(data,(closure)&c_7317290,__lambda_1320,  set_cell_as_expr(&local_7317345, lp_73604_73610_732857));; 
  }
  
 -static void __lambda_1367(void *data, object self_7313400, int argc, object *args) /* object self_7313400, object lp_73604_73610_733204 */
-+static void __lambda_1320(void *data, object self_7312154, int argc, object *args) /* object self_7312154, object lp_73604_73610_732864 */
++static void __lambda_1320(void *data, object self_7312147, int argc, object *args) /* object self_7312147, object lp_73604_73610_732857 */
   {
 - object lp_73604_73610_733204 = args[0];
-+ object lp_73604_73610_732864 = args[0];
++ object lp_73604_73610_732857 = args[0];
    
 -closureN_type c_7318592;
 -object e_7318606 [4];
@@ -48086,19 +48313,19 @@ Make let-values be the same as let*-values, to work around
 -c_7318592.elements[1] = ((closureN)self_7313400)->elements[2];
 -c_7318592.elements[2] = ((closureN)self_7313400)->elements[3];
 -c_7318592.elements[3] = lp_73604_73610_733204;
-+closureN_type c_7317299;
-+object e_7317313 [4];
-+c_7317299.hdr.mark = gc_color_red;
-+ c_7317299.hdr.grayed = 0;
-+c_7317299.tag = closureN_tag;
-+ c_7317299.fn = (function_type)__lambda_489;
-+c_7317299.num_args = 1;
-+c_7317299.num_elements = 4;
-+c_7317299.elements = (object *)e_7317313;
-+c_7317299.elements[0] = ((closureN)self_7312154)->elements[1];
-+c_7317299.elements[1] = ((closureN)self_7312154)->elements[2];
-+c_7317299.elements[2] = ((closureN)self_7312154)->elements[3];
-+c_7317299.elements[3] = lp_73604_73610_732864;
++closureN_type c_7317292;
++object e_7317306 [4];
++c_7317292.hdr.mark = gc_color_red;
++ c_7317292.hdr.grayed = 0;
++c_7317292.tag = closureN_tag;
++ c_7317292.fn = (function_type)__lambda_489;
++c_7317292.num_args = 1;
++c_7317292.num_elements = 4;
++c_7317292.elements = (object *)e_7317306;
++c_7317292.elements[0] = ((closureN)self_7312147)->elements[1];
++c_7317292.elements[1] = ((closureN)self_7312147)->elements[2];
++c_7317292.elements[2] = ((closureN)self_7312147)->elements[3];
++c_7317292.elements[3] = lp_73604_73610_732857;
  
  
 -closureN_type c_7318607;
@@ -48114,36 +48341,36 @@ Make let-values be the same as let*-values, to work around
 -c_7318607.elements[1] = ((closureN)self_7313400)->elements[4];
 -c_7318607.elements[2] = lp_73604_73610_733204;
 -c_7318607.elements[3] = ((closureN)self_7313400)->elements[5];
-+closureN_type c_7317314;
-+object e_7317348 [4];
-+c_7317314.hdr.mark = gc_color_red;
-+ c_7317314.hdr.grayed = 0;
-+c_7317314.tag = closureN_tag;
-+ c_7317314.fn = (function_type)__lambda_491;
-+c_7317314.num_args = 2;
-+c_7317314.num_elements = 4;
-+c_7317314.elements = (object *)e_7317348;
-+c_7317314.elements[0] = ((closureN)self_7312154)->elements[0];
-+c_7317314.elements[1] = ((closureN)self_7312154)->elements[4];
-+c_7317314.elements[2] = lp_73604_73610_732864;
-+c_7317314.elements[3] = ((closureN)self_7312154)->elements[5];
++closureN_type c_7317307;
++object e_7317341 [4];
++c_7317307.hdr.mark = gc_color_red;
++ c_7317307.hdr.grayed = 0;
++c_7317307.tag = closureN_tag;
++ c_7317307.fn = (function_type)__lambda_491;
++c_7317307.num_args = 2;
++c_7317307.num_elements = 4;
++c_7317307.elements = (object *)e_7317341;
++c_7317307.elements[0] = ((closureN)self_7312147)->elements[0];
++c_7317307.elements[1] = ((closureN)self_7312147)->elements[4];
++c_7317307.elements[2] = lp_73604_73610_732857;
++c_7317307.elements[3] = ((closureN)self_7312147)->elements[5];
  
 -return_direct_with_clo1(data,(closure)&c_7318592,__lambda_489,  &c_7318607);; 
-+return_direct_with_clo1(data,(closure)&c_7317299,__lambda_489,  &c_7317314);; 
++return_direct_with_clo1(data,(closure)&c_7317292,__lambda_489,  &c_7317307);; 
  }
  
 -static void __lambda_491(void *data, object self_7313401, int argc, object *args) /* object self_7313401, object k_735377, object i_73611_733205, object j_73612_733206 */
-+static void __lambda_491(void *data, object self_7312155, int argc, object *args) /* object self_7312155, object k_734932, object i_73611_732865, object j_73612_732866 */
++static void __lambda_491(void *data, object self_7312148, int argc, object *args) /* object self_7312148, object k_734925, object i_73611_732858, object j_73612_732859 */
   {
 - object k_735377 = args[0]; object i_73611_733205 = args[1]; object j_73612_733206 = args[2];
-+ object k_734932 = args[0]; object i_73611_732865 = args[1]; object j_73612_732866 = args[2];
++ object k_734925 = args[0]; object i_73611_732858 = args[1]; object j_73612_732859 = args[2];
      
 -if( (boolean_f != Cyc_num_fast_gte_op(data, j_73612_733206, ((closureN)self_7313401)->elements[1])) ){ 
-+if( (boolean_f != Cyc_num_fast_gte_op(data, j_73612_732866, ((closureN)self_7312155)->elements[1])) ){ 
++if( (boolean_f != Cyc_num_fast_gte_op(data, j_73612_732859, ((closureN)self_7312148)->elements[1])) ){ 
    
  
 -return_direct_with_clo1(data,  k_735377, (((closure)  k_735377)->fn),  Cyc_num_fast_gte_op(data, j_73612_733206, ((closureN)self_7313401)->elements[1]));
-+return_direct_with_clo1(data,  k_734932, (((closure)  k_734932)->fn),  Cyc_num_fast_gte_op(data, j_73612_732866, ((closureN)self_7312155)->elements[1]));
++return_direct_with_clo1(data,  k_734925, (((closure)  k_734925)->fn),  Cyc_num_fast_gte_op(data, j_73612_732859, ((closureN)self_7312148)->elements[1]));
  } else { 
    
 -closureN_type c_7318616;
@@ -48160,33 +48387,33 @@ Make let-values be the same as let*-values, to work around
 -c_7318616.elements[2] = k_735377;
 -c_7318616.elements[3] = ((closureN)self_7313401)->elements[2];
 -c_7318616.elements[4] = ((closureN)self_7313401)->elements[3];
-+closureN_type c_7317323;
-+object e_7317344 [5];
-+c_7317323.hdr.mark = gc_color_red;
-+ c_7317323.hdr.grayed = 0;
-+c_7317323.tag = closureN_tag;
-+ c_7317323.fn = (function_type)__lambda_492;
-+c_7317323.num_args = 1;
-+c_7317323.num_elements = 5;
-+c_7317323.elements = (object *)e_7317344;
-+c_7317323.elements[0] = i_73611_732865;
-+c_7317323.elements[1] = j_73612_732866;
-+c_7317323.elements[2] = k_734932;
-+c_7317323.elements[3] = ((closureN)self_7312155)->elements[2];
-+c_7317323.elements[4] = ((closureN)self_7312155)->elements[3];
++closureN_type c_7317316;
++object e_7317337 [5];
++c_7317316.hdr.mark = gc_color_red;
++ c_7317316.hdr.grayed = 0;
++c_7317316.tag = closureN_tag;
++ c_7317316.fn = (function_type)__lambda_492;
++c_7317316.num_args = 1;
++c_7317316.num_elements = 5;
++c_7317316.elements = (object *)e_7317337;
++c_7317316.elements[0] = i_73611_732858;
++c_7317316.elements[1] = j_73612_732859;
++c_7317316.elements[2] = k_734925;
++c_7317316.elements[3] = ((closureN)self_7312148)->elements[2];
++c_7317316.elements[4] = ((closureN)self_7312148)->elements[3];
  
  
  
 -return_closcall1(data,(closure)&c_7318616,  Cyc_bytevector_u8_ref(data, ((closureN)self_7313401)->elements[0], j_73612_733206));}
-+return_closcall1(data,(closure)&c_7317323,  Cyc_bytevector_u8_ref(data, ((closureN)self_7312155)->elements[0], j_73612_732866));}
++return_closcall1(data,(closure)&c_7317316,  Cyc_bytevector_u8_ref(data, ((closureN)self_7312148)->elements[0], j_73612_732859));}
  ;; 
  }
  
 -static void __lambda_492(void *data, object self_7313402, int argc, object *args) /* object self_7313402, object r_735382 */
-+static void __lambda_492(void *data, object self_7312156, int argc, object *args) /* object self_7312156, object r_734937 */
++static void __lambda_492(void *data, object self_7312149, int argc, object *args) /* object self_7312149, object r_734930 */
   {
 - object r_735382 = args[0];
-+ object r_734937 = args[0];
++ object r_734930 = args[0];
    
 -closureN_type c_7318618;
 -object e_7318632 [4];
@@ -48201,47 +48428,47 @@ Make let-values be the same as let*-values, to work around
 -c_7318618.elements[1] = ((closureN)self_7313402)->elements[1];
 -c_7318618.elements[2] = ((closureN)self_7313402)->elements[2];
 -c_7318618.elements[3] = ((closureN)self_7313402)->elements[3];
-+closureN_type c_7317325;
-+object e_7317339 [4];
-+c_7317325.hdr.mark = gc_color_red;
-+ c_7317325.hdr.grayed = 0;
-+c_7317325.tag = closureN_tag;
-+ c_7317325.fn = (function_type)__lambda_493;
-+c_7317325.num_args = 1;
-+c_7317325.num_elements = 4;
-+c_7317325.elements = (object *)e_7317339;
-+c_7317325.elements[0] = ((closureN)self_7312156)->elements[0];
-+c_7317325.elements[1] = ((closureN)self_7312156)->elements[1];
-+c_7317325.elements[2] = ((closureN)self_7312156)->elements[2];
-+c_7317325.elements[3] = ((closureN)self_7312156)->elements[3];
++closureN_type c_7317318;
++object e_7317332 [4];
++c_7317318.hdr.mark = gc_color_red;
++ c_7317318.hdr.grayed = 0;
++c_7317318.tag = closureN_tag;
++ c_7317318.fn = (function_type)__lambda_493;
++c_7317318.num_args = 1;
++c_7317318.num_elements = 4;
++c_7317318.elements = (object *)e_7317332;
++c_7317318.elements[0] = ((closureN)self_7312149)->elements[0];
++c_7317318.elements[1] = ((closureN)self_7312149)->elements[1];
++c_7317318.elements[2] = ((closureN)self_7312149)->elements[2];
++c_7317318.elements[3] = ((closureN)self_7312149)->elements[3];
  
  
  
 -return_closcall1(data,(closure)&c_7318618,  Cyc_bytevector_u8_set(data, ((closureN)self_7313402)->elements[4], ((closureN)self_7313402)->elements[0], r_735382));; 
-+return_closcall1(data,(closure)&c_7317325,  Cyc_bytevector_u8_set(data, ((closureN)self_7312156)->elements[4], ((closureN)self_7312156)->elements[0], r_734937));; 
++return_closcall1(data,(closure)&c_7317318,  Cyc_bytevector_u8_set(data, ((closureN)self_7312149)->elements[4], ((closureN)self_7312149)->elements[0], r_734930));; 
  }
  
 -static void __lambda_493(void *data, object self_7313403, int argc, object *args) /* object self_7313403, object r_735379 */
-+static void __lambda_493(void *data, object self_7312157, int argc, object *args) /* object self_7312157, object r_734934 */
++static void __lambda_493(void *data, object self_7312150, int argc, object *args) /* object self_7312150, object r_734927 */
   {
  
    
  
  
 -complex_num_type local_7318626; 
-+complex_num_type local_7317333; 
++complex_num_type local_7317326; 
  
 -complex_num_type local_7318630; 
 -return_closcall3(data,  car(((closureN)self_7313403)->elements[3]),  ((closureN)self_7313403)->elements[2], Cyc_fast_sum(data,&local_7318626, ((closureN)self_7313403)->elements[0], obj_int2obj(1)), Cyc_fast_sum(data,&local_7318630, ((closureN)self_7313403)->elements[1], obj_int2obj(1)));; 
-+complex_num_type local_7317337; 
-+return_closcall3(data,  car(((closureN)self_7312157)->elements[3]),  ((closureN)self_7312157)->elements[2], Cyc_fast_sum(data,&local_7317333, ((closureN)self_7312157)->elements[0], obj_int2obj(1)), Cyc_fast_sum(data,&local_7317337, ((closureN)self_7312157)->elements[1], obj_int2obj(1)));; 
++complex_num_type local_7317330; 
++return_closcall3(data,  car(((closureN)self_7312150)->elements[3]),  ((closureN)self_7312150)->elements[2], Cyc_fast_sum(data,&local_7317326, ((closureN)self_7312150)->elements[0], obj_int2obj(1)), Cyc_fast_sum(data,&local_7317330, ((closureN)self_7312150)->elements[1], obj_int2obj(1)));; 
  }
  
 -static void __lambda_489(void *data, object self_7313404, int argc, object *args) /* object self_7313404, object r_735376 */
-+static void __lambda_489(void *data, object self_7312158, int argc, object *args) /* object self_7312158, object r_734931 */
++static void __lambda_489(void *data, object self_7312151, int argc, object *args) /* object self_7312151, object r_734924 */
   {
 - object r_735376 = args[0];
-+ object r_734931 = args[0];
++ object r_734924 = args[0];
    
 -closureN_type c_7318594;
 -object e_7318602 [4];
@@ -48256,41 +48483,41 @@ Make let-values be the same as let*-values, to work around
 -c_7318594.elements[1] = ((closureN)self_7313404)->elements[1];
 -c_7318594.elements[2] = ((closureN)self_7313404)->elements[2];
 -c_7318594.elements[3] = ((closureN)self_7313404)->elements[3];
-+closureN_type c_7317301;
-+object e_7317309 [4];
-+c_7317301.hdr.mark = gc_color_red;
-+ c_7317301.hdr.grayed = 0;
-+c_7317301.tag = closureN_tag;
-+ c_7317301.fn = (function_type)__lambda_490;
-+c_7317301.num_args = 1;
-+c_7317301.num_elements = 4;
-+c_7317301.elements = (object *)e_7317309;
-+c_7317301.elements[0] = ((closureN)self_7312158)->elements[0];
-+c_7317301.elements[1] = ((closureN)self_7312158)->elements[1];
-+c_7317301.elements[2] = ((closureN)self_7312158)->elements[2];
-+c_7317301.elements[3] = ((closureN)self_7312158)->elements[3];
++closureN_type c_7317294;
++object e_7317302 [4];
++c_7317294.hdr.mark = gc_color_red;
++ c_7317294.hdr.grayed = 0;
++c_7317294.tag = closureN_tag;
++ c_7317294.fn = (function_type)__lambda_490;
++c_7317294.num_args = 1;
++c_7317294.num_elements = 4;
++c_7317294.elements = (object *)e_7317302;
++c_7317294.elements[0] = ((closureN)self_7312151)->elements[0];
++c_7317294.elements[1] = ((closureN)self_7312151)->elements[1];
++c_7317294.elements[2] = ((closureN)self_7312151)->elements[2];
++c_7317294.elements[3] = ((closureN)self_7312151)->elements[3];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7318594,__lambda_490,  Cyc_set_cell(data, ((closureN)self_7313404)->elements[3], r_735376));; 
-+return_direct_with_clo1(data,(closure)&c_7317301,__lambda_490,  Cyc_set_cell(data, ((closureN)self_7312158)->elements[3], r_734931));; 
++return_direct_with_clo1(data,(closure)&c_7317294,__lambda_490,  Cyc_set_cell(data, ((closureN)self_7312151)->elements[3], r_734924));; 
  }
  
 -static void __lambda_490(void *data, object self_7313405, int argc, object *args) /* object self_7313405, object r_735375 */
-+static void __lambda_490(void *data, object self_7312159, int argc, object *args) /* object self_7312159, object r_734930 */
++static void __lambda_490(void *data, object self_7312152, int argc, object *args) /* object self_7312152, object r_734923 */
   {
  
    
  
 -return_closcall3(data,  car(((closureN)self_7313405)->elements[3]),  ((closureN)self_7313405)->elements[2], ((closureN)self_7313405)->elements[0], ((closureN)self_7313405)->elements[1]);; 
-+return_closcall3(data,  car(((closureN)self_7312159)->elements[3]),  ((closureN)self_7312159)->elements[2], ((closureN)self_7312159)->elements[0], ((closureN)self_7312159)->elements[1]);; 
++return_closcall3(data,  car(((closureN)self_7312152)->elements[3]),  ((closureN)self_7312152)->elements[2], ((closureN)self_7312152)->elements[0], ((closureN)self_7312152)->elements[1]);; 
  }
  
 -static void __lambda_481(void *data, object self_7313414, int argc, object *args) /* object self_7313414, object k_735398 */
-+static void __lambda_481(void *data, object self_7312168, int argc, object *args) /* object self_7312168, object k_734953 */
++static void __lambda_481(void *data, object self_7312161, int argc, object *args) /* object self_7312161, object k_734946 */
   {
 - object k_735398 = args[0];
-+ object k_734953 = args[0];
++ object k_734946 = args[0];
    
 -closureN_type c_7318551;
 -object e_7318562 [1];
@@ -48302,16 +48529,16 @@ Make let-values be the same as let*-values, to work around
 -c_7318551.num_elements = 1;
 -c_7318551.elements = (object *)e_7318562;
 -c_7318551.elements[0] = ((closureN)self_7313414)->elements[1];
-+closureN_type c_7317258;
-+object e_7317269 [1];
-+c_7317258.hdr.mark = gc_color_red;
-+ c_7317258.hdr.grayed = 0;
-+c_7317258.tag = closureN_tag;
-+ c_7317258.fn = (function_type)__lambda_482;
-+c_7317258.num_args = 0;
-+c_7317258.num_elements = 1;
-+c_7317258.elements = (object *)e_7317269;
-+c_7317258.elements[0] = ((closureN)self_7312168)->elements[1];
++closureN_type c_7317251;
++object e_7317262 [1];
++c_7317251.hdr.mark = gc_color_red;
++ c_7317251.hdr.grayed = 0;
++c_7317251.tag = closureN_tag;
++ c_7317251.fn = (function_type)__lambda_482;
++c_7317251.num_args = 0;
++c_7317251.num_elements = 1;
++c_7317251.elements = (object *)e_7317262;
++c_7317251.elements[0] = ((closureN)self_7312161)->elements[1];
  
  
 -closureN_type c_7318563;
@@ -48326,71 +48553,70 @@ Make let-values be the same as let*-values, to work around
 -c_7318563.elements[0] = ((closureN)self_7313414)->elements[0];
 -c_7318563.elements[1] = k_735398;
 -c_7318563.elements[2] = ((closureN)self_7313414)->elements[1];
-+closureN_type c_7317270;
-+object e_7317281 [3];
-+c_7317270.hdr.mark = gc_color_red;
-+ c_7317270.hdr.grayed = 0;
-+c_7317270.tag = closureN_tag;
-+ c_7317270.fn = (function_type)__lambda_483;
-+c_7317270.num_args = 1;
-+c_7317270.num_elements = 3;
-+c_7317270.elements = (object *)e_7317281;
-+c_7317270.elements[0] = ((closureN)self_7312168)->elements[0];
-+c_7317270.elements[1] = k_734953;
-+c_7317270.elements[2] = ((closureN)self_7312168)->elements[1];
++closureN_type c_7317263;
++object e_7317274 [3];
++c_7317263.hdr.mark = gc_color_red;
++ c_7317263.hdr.grayed = 0;
++c_7317263.tag = closureN_tag;
++ c_7317263.fn = (function_type)__lambda_483;
++c_7317263.num_args = 1;
++c_7317263.num_elements = 3;
++c_7317263.elements = (object *)e_7317274;
++c_7317263.elements[0] = ((closureN)self_7312161)->elements[0];
++c_7317263.elements[1] = k_734946;
++c_7317263.elements[2] = ((closureN)self_7312161)->elements[1];
  
 -return_direct_with_clo1(data,(closure)&c_7318551,__lambda_482,  &c_7318563);; 
-+return_direct_with_clo1(data,(closure)&c_7317258,__lambda_482,  &c_7317270);; 
++return_direct_with_clo1(data,(closure)&c_7317251,__lambda_482,  &c_7317263);; 
  }
  
 -static void __lambda_483(void *data, object self_7313415, int argc, object *args) /* object self_7313415, object r_735399 */
-+static void __lambda_483(void *data, object self_7312169, int argc, object *args) /* object self_7312169, object r_734954 */
++static void __lambda_483(void *data, object self_7312162, int argc, object *args) /* object self_7312162, object r_734947 */
   {
 - object r_735399 = args[0];
 -  if( (boolean_f != r_735399) ){ 
-+ object r_734954 = args[0];
-+  if( (boolean_f != r_734954) ){ 
++ object r_734947 = args[0];
++  if( (boolean_f != r_734947) ){ 
    
  
 -return_direct_with_clo1(data,  ((closureN)self_7313415)->elements[1], (((closure)  ((closureN)self_7313415)->elements[1])->fn),  Cyc_cadr(data, ((closureN)self_7313415)->elements[2]));
-+return_direct_with_clo1(data,  ((closureN)self_7312169)->elements[1], (((closure)  ((closureN)self_7312169)->elements[1])->fn),  Cyc_cadr(data, ((closureN)self_7312169)->elements[2]));
++return_direct_with_clo1(data,  ((closureN)self_7312162)->elements[1], (((closure)  ((closureN)self_7312162)->elements[1])->fn),  Cyc_cadr(data, ((closureN)self_7312162)->elements[2]));
  } else { 
    
  
 -return_direct_with_clo1(data,  ((closureN)self_7313415)->elements[1], (((closure)  ((closureN)self_7313415)->elements[1])->fn),  Cyc_bytevector_length(data, ((closureN)self_7313415)->elements[0]));}
-+return_direct_with_clo1(data,  ((closureN)self_7312169)->elements[1], (((closure)  ((closureN)self_7312169)->elements[1])->fn),  Cyc_bytevector_length(data, ((closureN)self_7312169)->elements[0]));}
++return_direct_with_clo1(data,  ((closureN)self_7312162)->elements[1], (((closure)  ((closureN)self_7312162)->elements[1])->fn),  Cyc_bytevector_length(data, ((closureN)self_7312162)->elements[0]));}
  ;; 
  }
  
 -static void __lambda_482(void *data, object self_7313416, int argc, object *args) /* object self_7313416, object k_735400 */
-+static void __lambda_482(void *data, object self_7312170, int argc, object *args) /* object self_7312170, object k_734955 */
++static void __lambda_482(void *data, object self_7312163, int argc, object *args) /* object self_7312163, object k_734948 */
   {
 - object k_735400 = args[0];
-+ object k_734955 = args[0];
++ object k_734948 = args[0];
      
 -if( (boolean_f != Cyc_is_pair(((closureN)self_7313416)->elements[0])) ){ 
-+if( (boolean_f != Cyc_is_pair(((closureN)self_7312170)->elements[0])) ){ 
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312163)->elements[0])) ){ 
    
  
  
  
 -return_direct_with_clo1(data,  k_735400,__lambda_483,  Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7313416)->elements[0])));
-+return_direct_with_clo1(data,  k_734955,__lambda_483,  Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312170)->elements[0])));
++return_direct_with_clo1(data,  k_734948,__lambda_483,  Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312163)->elements[0])));
  } else { 
 -  return_direct_with_clo1(data,  k_735400,__lambda_483,  boolean_f);}
-+  return_direct_with_clo1(data,  k_734955,__lambda_483,  boolean_f);}
++  return_direct_with_clo1(data,  k_734948,__lambda_483,  boolean_f);}
  ;; 
  }
  
 -static void __lambda_473(void *data, object _, int argc, object *args) /* closure _,object k_735355, object bv_73585_733190, object opts_73586_733191_raw, ... */
-+static void __lambda_473(void *data, object _, int argc, object *args) /* closure _,object k_734910, object bv_73585_732850, object opts_73586_732851_raw, ... */
++static void __lambda_473(void *data, object _, int argc, object *args) /* closure _,object k_734903, object bv_73585_732843, object opts_73586_732844_raw, ... */
   {
 -object k_735355 = args[0]; object bv_73585_733190 = args[1];
 -load_varargs(opts_73586_733191, args, 2, argc - 2);
--  Cyc_st_add(data, "scheme/base.sld:bytevector-copy");
-+object k_734910 = args[0]; object bv_73585_732850 = args[1];
-+load_varargs(opts_73586_732851, args, 2, argc - 2);
-+  Cyc_st_add(data, "base.sld:bytevector-copy");
++object k_734903 = args[0]; object bv_73585_732843 = args[1];
++load_varargs(opts_73586_732844, args, 2, argc - 2);
+   Cyc_st_add(data, "scheme/base.sld:bytevector-copy");
  
 -closureN_type c_7318456;
 -object e_7318539 [3];
@@ -48404,28 +48630,28 @@ Make let-values be the same as let*-values, to work around
 -c_7318456.elements[0] = bv_73585_733190;
 -c_7318456.elements[1] = k_735355;
 -c_7318456.elements[2] = opts_73586_733191;
-+closureN_type c_7317163;
-+object e_7317246 [3];
-+c_7317163.hdr.mark = gc_color_red;
-+ c_7317163.hdr.grayed = 0;
-+c_7317163.tag = closureN_tag;
-+ c_7317163.fn = (function_type)__lambda_474;
-+c_7317163.num_args = 3;
-+c_7317163.num_elements = 3;
-+c_7317163.elements = (object *)e_7317246;
-+c_7317163.elements[0] = bv_73585_732850;
-+c_7317163.elements[1] = k_734910;
-+c_7317163.elements[2] = opts_73586_732851;
++closureN_type c_7317156;
++object e_7317239 [3];
++c_7317156.hdr.mark = gc_color_red;
++ c_7317156.hdr.grayed = 0;
++c_7317156.tag = closureN_tag;
++ c_7317156.fn = (function_type)__lambda_474;
++c_7317156.num_args = 3;
++c_7317156.num_elements = 3;
++c_7317156.elements = (object *)e_7317239;
++c_7317156.elements[0] = bv_73585_732843;
++c_7317156.elements[1] = k_734903;
++c_7317156.elements[2] = opts_73586_732844;
  
 -return_direct_with_clo3(data,(closure)&c_7318456,__lambda_474,  boolean_f, boolean_f, boolean_f);; 
-+return_direct_with_clo3(data,(closure)&c_7317163,__lambda_474,  boolean_f, boolean_f, boolean_f);; 
++return_direct_with_clo3(data,(closure)&c_7317156,__lambda_474,  boolean_f, boolean_f, boolean_f);; 
  }
  
 -static void __lambda_474(void *data, object self_7313386, int argc, object *args) /* object self_7313386, object len_73587_733192, object start_73588_733193, object end_73589_733194 */
-+static void __lambda_474(void *data, object self_7312140, int argc, object *args) /* object self_7312140, object len_73587_732852, object start_73588_732853, object end_73589_732854 */
++static void __lambda_474(void *data, object self_7312133, int argc, object *args) /* object self_7312133, object len_73587_732845, object start_73588_732846, object end_73589_732847 */
   {
 - object len_73587_733192 = args[0]; object start_73588_733193 = args[1]; object end_73589_733194 = args[2];
-+ object len_73587_732852 = args[0]; object start_73588_732853 = args[1]; object end_73589_732854 = args[2];
++ object len_73587_732845 = args[0]; object start_73588_732846 = args[1]; object end_73589_732847 = args[2];
    
 -closureN_type c_7318458;
 -object e_7318535 [5];
@@ -48441,33 +48667,33 @@ Make let-values be the same as let*-values, to work around
 -c_7318458.elements[2] = ((closureN)self_7313386)->elements[1];
 -c_7318458.elements[3] = ((closureN)self_7313386)->elements[2];
 -c_7318458.elements[4] = start_73588_733193;
-+closureN_type c_7317165;
-+object e_7317242 [5];
-+c_7317165.hdr.mark = gc_color_red;
-+ c_7317165.hdr.grayed = 0;
-+c_7317165.tag = closureN_tag;
-+ c_7317165.fn = (function_type)__lambda_1319;
-+c_7317165.num_args = 1;
-+c_7317165.num_elements = 5;
-+c_7317165.elements = (object *)e_7317242;
-+c_7317165.elements[0] = ((closureN)self_7312140)->elements[0];
-+c_7317165.elements[1] = end_73589_732854;
-+c_7317165.elements[2] = ((closureN)self_7312140)->elements[1];
-+c_7317165.elements[3] = ((closureN)self_7312140)->elements[2];
-+c_7317165.elements[4] = start_73588_732853;
++closureN_type c_7317158;
++object e_7317235 [5];
++c_7317158.hdr.mark = gc_color_red;
++ c_7317158.hdr.grayed = 0;
++c_7317158.tag = closureN_tag;
++ c_7317158.fn = (function_type)__lambda_1319;
++c_7317158.num_args = 1;
++c_7317158.num_elements = 5;
++c_7317158.elements = (object *)e_7317235;
++c_7317158.elements[0] = ((closureN)self_7312133)->elements[0];
++c_7317158.elements[1] = end_73589_732847;
++c_7317158.elements[2] = ((closureN)self_7312133)->elements[1];
++c_7317158.elements[3] = ((closureN)self_7312133)->elements[2];
++c_7317158.elements[4] = start_73588_732846;
  
  
 -pair_type local_7318538; 
 -return_direct_with_clo1(data,(closure)&c_7318458,__lambda_1366,  set_cell_as_expr(&local_7318538, len_73587_733192));; 
-+pair_type local_7317245; 
-+return_direct_with_clo1(data,(closure)&c_7317165,__lambda_1319,  set_cell_as_expr(&local_7317245, len_73587_732852));; 
++pair_type local_7317238; 
++return_direct_with_clo1(data,(closure)&c_7317158,__lambda_1319,  set_cell_as_expr(&local_7317238, len_73587_732845));; 
  }
  
 -static void __lambda_1366(void *data, object self_7313387, int argc, object *args) /* object self_7313387, object len_73587_733192 */
-+static void __lambda_1319(void *data, object self_7312141, int argc, object *args) /* object self_7312141, object len_73587_732852 */
++static void __lambda_1319(void *data, object self_7312134, int argc, object *args) /* object self_7312134, object len_73587_732845 */
   {
 - object len_73587_733192 = args[0];
-+ object len_73587_732852 = args[0];
++ object len_73587_732845 = args[0];
    
 -closureN_type c_7318460;
 -object e_7318530 [5];
@@ -48483,33 +48709,33 @@ Make let-values be the same as let*-values, to work around
 -c_7318460.elements[2] = ((closureN)self_7313387)->elements[2];
 -c_7318460.elements[3] = len_73587_733192;
 -c_7318460.elements[4] = ((closureN)self_7313387)->elements[3];
-+closureN_type c_7317167;
-+object e_7317237 [5];
-+c_7317167.hdr.mark = gc_color_red;
-+ c_7317167.hdr.grayed = 0;
-+c_7317167.tag = closureN_tag;
-+ c_7317167.fn = (function_type)__lambda_1318;
-+c_7317167.num_args = 1;
-+c_7317167.num_elements = 5;
-+c_7317167.elements = (object *)e_7317237;
-+c_7317167.elements[0] = ((closureN)self_7312141)->elements[0];
-+c_7317167.elements[1] = ((closureN)self_7312141)->elements[1];
-+c_7317167.elements[2] = ((closureN)self_7312141)->elements[2];
-+c_7317167.elements[3] = len_73587_732852;
-+c_7317167.elements[4] = ((closureN)self_7312141)->elements[3];
++closureN_type c_7317160;
++object e_7317230 [5];
++c_7317160.hdr.mark = gc_color_red;
++ c_7317160.hdr.grayed = 0;
++c_7317160.tag = closureN_tag;
++ c_7317160.fn = (function_type)__lambda_1318;
++c_7317160.num_args = 1;
++c_7317160.num_elements = 5;
++c_7317160.elements = (object *)e_7317230;
++c_7317160.elements[0] = ((closureN)self_7312134)->elements[0];
++c_7317160.elements[1] = ((closureN)self_7312134)->elements[1];
++c_7317160.elements[2] = ((closureN)self_7312134)->elements[2];
++c_7317160.elements[3] = len_73587_732845;
++c_7317160.elements[4] = ((closureN)self_7312134)->elements[3];
  
  
 -pair_type local_7318533; 
 -return_direct_with_clo1(data,(closure)&c_7318460,__lambda_1365,  set_cell_as_expr(&local_7318533, ((closureN)self_7313387)->elements[4]));; 
-+pair_type local_7317240; 
-+return_direct_with_clo1(data,(closure)&c_7317167,__lambda_1318,  set_cell_as_expr(&local_7317240, ((closureN)self_7312141)->elements[4]));; 
++pair_type local_7317233; 
++return_direct_with_clo1(data,(closure)&c_7317160,__lambda_1318,  set_cell_as_expr(&local_7317233, ((closureN)self_7312134)->elements[4]));; 
  }
  
 -static void __lambda_1365(void *data, object self_7313388, int argc, object *args) /* object self_7313388, object start_73588_733193 */
-+static void __lambda_1318(void *data, object self_7312142, int argc, object *args) /* object self_7312142, object start_73588_732853 */
++static void __lambda_1318(void *data, object self_7312135, int argc, object *args) /* object self_7312135, object start_73588_732846 */
   {
 - object start_73588_733193 = args[0];
-+ object start_73588_732853 = args[0];
++ object start_73588_732846 = args[0];
    
 -closureN_type c_7318462;
 -object e_7318525 [5];
@@ -48525,33 +48751,33 @@ Make let-values be the same as let*-values, to work around
 -c_7318462.elements[2] = ((closureN)self_7313388)->elements[3];
 -c_7318462.elements[3] = ((closureN)self_7313388)->elements[4];
 -c_7318462.elements[4] = start_73588_733193;
-+closureN_type c_7317169;
-+object e_7317232 [5];
-+c_7317169.hdr.mark = gc_color_red;
-+ c_7317169.hdr.grayed = 0;
-+c_7317169.tag = closureN_tag;
-+ c_7317169.fn = (function_type)__lambda_1317;
-+c_7317169.num_args = 1;
-+c_7317169.num_elements = 5;
-+c_7317169.elements = (object *)e_7317232;
-+c_7317169.elements[0] = ((closureN)self_7312142)->elements[0];
-+c_7317169.elements[1] = ((closureN)self_7312142)->elements[2];
-+c_7317169.elements[2] = ((closureN)self_7312142)->elements[3];
-+c_7317169.elements[3] = ((closureN)self_7312142)->elements[4];
-+c_7317169.elements[4] = start_73588_732853;
++closureN_type c_7317162;
++object e_7317225 [5];
++c_7317162.hdr.mark = gc_color_red;
++ c_7317162.hdr.grayed = 0;
++c_7317162.tag = closureN_tag;
++ c_7317162.fn = (function_type)__lambda_1317;
++c_7317162.num_args = 1;
++c_7317162.num_elements = 5;
++c_7317162.elements = (object *)e_7317225;
++c_7317162.elements[0] = ((closureN)self_7312135)->elements[0];
++c_7317162.elements[1] = ((closureN)self_7312135)->elements[2];
++c_7317162.elements[2] = ((closureN)self_7312135)->elements[3];
++c_7317162.elements[3] = ((closureN)self_7312135)->elements[4];
++c_7317162.elements[4] = start_73588_732846;
  
  
 -pair_type local_7318528; 
 -return_direct_with_clo1(data,(closure)&c_7318462,__lambda_1364,  set_cell_as_expr(&local_7318528, ((closureN)self_7313388)->elements[1]));; 
-+pair_type local_7317235; 
-+return_direct_with_clo1(data,(closure)&c_7317169,__lambda_1317,  set_cell_as_expr(&local_7317235, ((closureN)self_7312142)->elements[1]));; 
++pair_type local_7317228; 
++return_direct_with_clo1(data,(closure)&c_7317162,__lambda_1317,  set_cell_as_expr(&local_7317228, ((closureN)self_7312135)->elements[1]));; 
  }
  
 -static void __lambda_1364(void *data, object self_7313389, int argc, object *args) /* object self_7313389, object end_73589_733194 */
-+static void __lambda_1317(void *data, object self_7312143, int argc, object *args) /* object self_7312143, object end_73589_732854 */
++static void __lambda_1317(void *data, object self_7312136, int argc, object *args) /* object self_7312136, object end_73589_732847 */
   {
 - object end_73589_733194 = args[0];
-+ object end_73589_732854 = args[0];
++ object end_73589_732847 = args[0];
    
 -closureN_type c_7318464;
 -object e_7318518 [6];
@@ -48568,46 +48794,46 @@ Make let-values be the same as let*-values, to work around
 -c_7318464.elements[3] = ((closureN)self_7313389)->elements[2];
 -c_7318464.elements[4] = ((closureN)self_7313389)->elements[3];
 -c_7318464.elements[5] = ((closureN)self_7313389)->elements[4];
-+closureN_type c_7317171;
-+object e_7317225 [6];
-+c_7317171.hdr.mark = gc_color_red;
-+ c_7317171.hdr.grayed = 0;
-+c_7317171.tag = closureN_tag;
-+ c_7317171.fn = (function_type)__lambda_475;
-+c_7317171.num_args = 1;
-+c_7317171.num_elements = 6;
-+c_7317171.elements = (object *)e_7317225;
-+c_7317171.elements[0] = ((closureN)self_7312143)->elements[0];
-+c_7317171.elements[1] = end_73589_732854;
-+c_7317171.elements[2] = ((closureN)self_7312143)->elements[1];
-+c_7317171.elements[3] = ((closureN)self_7312143)->elements[2];
-+c_7317171.elements[4] = ((closureN)self_7312143)->elements[3];
-+c_7317171.elements[5] = ((closureN)self_7312143)->elements[4];
++closureN_type c_7317164;
++object e_7317218 [6];
++c_7317164.hdr.mark = gc_color_red;
++ c_7317164.hdr.grayed = 0;
++c_7317164.tag = closureN_tag;
++ c_7317164.fn = (function_type)__lambda_475;
++c_7317164.num_args = 1;
++c_7317164.num_elements = 6;
++c_7317164.elements = (object *)e_7317218;
++c_7317164.elements[0] = ((closureN)self_7312136)->elements[0];
++c_7317164.elements[1] = end_73589_732847;
++c_7317164.elements[2] = ((closureN)self_7312136)->elements[1];
++c_7317164.elements[3] = ((closureN)self_7312136)->elements[2];
++c_7317164.elements[4] = ((closureN)self_7312136)->elements[3];
++c_7317164.elements[5] = ((closureN)self_7312136)->elements[4];
  
  
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7318464,__lambda_475,  Cyc_set_cell(data, ((closureN)self_7313389)->elements[2], Cyc_bytevector_length(data, ((closureN)self_7313389)->elements[0])));; 
-+return_direct_with_clo1(data,(closure)&c_7317171,__lambda_475,  Cyc_set_cell(data, ((closureN)self_7312143)->elements[2], Cyc_bytevector_length(data, ((closureN)self_7312143)->elements[0])));; 
++return_direct_with_clo1(data,(closure)&c_7317164,__lambda_475,  Cyc_set_cell(data, ((closureN)self_7312136)->elements[2], Cyc_bytevector_length(data, ((closureN)self_7312136)->elements[0])));; 
  }
  
 -static void __lambda_475(void *data, object self_7313390, int argc, object *args) /* object self_7313390, object r_735356 */
-+static void __lambda_475(void *data, object self_7312144, int argc, object *args) /* object self_7312144, object r_734911 */
++static void __lambda_475(void *data, object self_7312137, int argc, object *args) /* object self_7312137, object r_734904 */
   {
  
 -  object r_735363;
-+  object r_734918;
++  object r_734911;
      
    
 -if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313390)->elements[4]), obj_int2obj(0))) ){ 
-+if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312144)->elements[4]), obj_int2obj(0))) ){ 
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312137)->elements[4]), obj_int2obj(0))) ){ 
    
 -  r_735363 = Cyc_car(data, ((closureN)self_7313390)->elements[4]);
-+  r_734918 = Cyc_car(data, ((closureN)self_7312144)->elements[4]);
++  r_734911 = Cyc_car(data, ((closureN)self_7312137)->elements[4]);
  } else { 
 -  r_735363 = obj_int2obj(0);}
-+  r_734918 = obj_int2obj(0);}
++  r_734911 = obj_int2obj(0);}
  ;
 -closureN_type c_7318477;
 -object e_7318514 [6];
@@ -48624,30 +48850,30 @@ Make let-values be the same as let*-values, to work around
 -c_7318477.elements[3] = ((closureN)self_7313390)->elements[3];
 -c_7318477.elements[4] = ((closureN)self_7313390)->elements[4];
 -c_7318477.elements[5] = ((closureN)self_7313390)->elements[5];
-+closureN_type c_7317184;
-+object e_7317221 [6];
-+c_7317184.hdr.mark = gc_color_red;
-+ c_7317184.hdr.grayed = 0;
-+c_7317184.tag = closureN_tag;
-+ c_7317184.fn = (function_type)__lambda_476;
-+c_7317184.num_args = 1;
-+c_7317184.num_elements = 6;
-+c_7317184.elements = (object *)e_7317221;
-+c_7317184.elements[0] = ((closureN)self_7312144)->elements[0];
-+c_7317184.elements[1] = ((closureN)self_7312144)->elements[1];
-+c_7317184.elements[2] = ((closureN)self_7312144)->elements[2];
-+c_7317184.elements[3] = ((closureN)self_7312144)->elements[3];
-+c_7317184.elements[4] = ((closureN)self_7312144)->elements[4];
-+c_7317184.elements[5] = ((closureN)self_7312144)->elements[5];
++closureN_type c_7317177;
++object e_7317214 [6];
++c_7317177.hdr.mark = gc_color_red;
++ c_7317177.hdr.grayed = 0;
++c_7317177.tag = closureN_tag;
++ c_7317177.fn = (function_type)__lambda_476;
++c_7317177.num_args = 1;
++c_7317177.num_elements = 6;
++c_7317177.elements = (object *)e_7317214;
++c_7317177.elements[0] = ((closureN)self_7312137)->elements[0];
++c_7317177.elements[1] = ((closureN)self_7312137)->elements[1];
++c_7317177.elements[2] = ((closureN)self_7312137)->elements[2];
++c_7317177.elements[3] = ((closureN)self_7312137)->elements[3];
++c_7317177.elements[4] = ((closureN)self_7312137)->elements[4];
++c_7317177.elements[5] = ((closureN)self_7312137)->elements[5];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7318477,__lambda_476,  Cyc_set_cell(data, ((closureN)self_7313390)->elements[5], r_735363));; 
-+return_direct_with_clo1(data,(closure)&c_7317184,__lambda_476,  Cyc_set_cell(data, ((closureN)self_7312144)->elements[5], r_734918));; 
++return_direct_with_clo1(data,(closure)&c_7317177,__lambda_476,  Cyc_set_cell(data, ((closureN)self_7312137)->elements[5], r_734911));; 
  }
  
 -static void __lambda_476(void *data, object self_7313391, int argc, object *args) /* object self_7313391, object r_735357 */
-+static void __lambda_476(void *data, object self_7312145, int argc, object *args) /* object self_7312145, object r_734912 */
++static void __lambda_476(void *data, object self_7312138, int argc, object *args) /* object self_7312138, object r_734905 */
   {
  
    
@@ -48662,17 +48888,17 @@ Make let-values be the same as let*-values, to work around
 -c_7318479.elements = (object *)e_7318493;
 -c_7318479.elements[0] = ((closureN)self_7313391)->elements[3];
 -c_7318479.elements[1] = ((closureN)self_7313391)->elements[4];
-+closureN_type c_7317186;
-+object e_7317200 [2];
-+c_7317186.hdr.mark = gc_color_red;
-+ c_7317186.hdr.grayed = 0;
-+c_7317186.tag = closureN_tag;
-+ c_7317186.fn = (function_type)__lambda_477;
-+c_7317186.num_args = 0;
-+c_7317186.num_elements = 2;
-+c_7317186.elements = (object *)e_7317200;
-+c_7317186.elements[0] = ((closureN)self_7312145)->elements[3];
-+c_7317186.elements[1] = ((closureN)self_7312145)->elements[4];
++closureN_type c_7317179;
++object e_7317193 [2];
++c_7317179.hdr.mark = gc_color_red;
++ c_7317179.hdr.grayed = 0;
++c_7317179.tag = closureN_tag;
++ c_7317179.fn = (function_type)__lambda_477;
++c_7317179.num_args = 0;
++c_7317179.num_elements = 2;
++c_7317179.elements = (object *)e_7317193;
++c_7317179.elements[0] = ((closureN)self_7312138)->elements[3];
++c_7317179.elements[1] = ((closureN)self_7312138)->elements[4];
  
  
 -closureN_type c_7318494;
@@ -48688,29 +48914,29 @@ Make let-values be the same as let*-values, to work around
 -c_7318494.elements[1] = ((closureN)self_7313391)->elements[1];
 -c_7318494.elements[2] = ((closureN)self_7313391)->elements[2];
 -c_7318494.elements[3] = ((closureN)self_7313391)->elements[5];
-+closureN_type c_7317201;
-+object e_7317220 [4];
-+c_7317201.hdr.mark = gc_color_red;
-+ c_7317201.hdr.grayed = 0;
-+c_7317201.tag = closureN_tag;
-+ c_7317201.fn = (function_type)__lambda_478;
-+c_7317201.num_args = 1;
-+c_7317201.num_elements = 4;
-+c_7317201.elements = (object *)e_7317220;
-+c_7317201.elements[0] = ((closureN)self_7312145)->elements[0];
-+c_7317201.elements[1] = ((closureN)self_7312145)->elements[1];
-+c_7317201.elements[2] = ((closureN)self_7312145)->elements[2];
-+c_7317201.elements[3] = ((closureN)self_7312145)->elements[5];
++closureN_type c_7317194;
++object e_7317213 [4];
++c_7317194.hdr.mark = gc_color_red;
++ c_7317194.hdr.grayed = 0;
++c_7317194.tag = closureN_tag;
++ c_7317194.fn = (function_type)__lambda_478;
++c_7317194.num_args = 1;
++c_7317194.num_elements = 4;
++c_7317194.elements = (object *)e_7317213;
++c_7317194.elements[0] = ((closureN)self_7312138)->elements[0];
++c_7317194.elements[1] = ((closureN)self_7312138)->elements[1];
++c_7317194.elements[2] = ((closureN)self_7312138)->elements[2];
++c_7317194.elements[3] = ((closureN)self_7312138)->elements[5];
  
 -return_direct_with_clo1(data,(closure)&c_7318479,__lambda_477,  &c_7318494);; 
-+return_direct_with_clo1(data,(closure)&c_7317186,__lambda_477,  &c_7317201);; 
++return_direct_with_clo1(data,(closure)&c_7317179,__lambda_477,  &c_7317194);; 
  }
  
 -static void __lambda_478(void *data, object self_7313392, int argc, object *args) /* object self_7313392, object r_735359 */
-+static void __lambda_478(void *data, object self_7312146, int argc, object *args) /* object self_7312146, object r_734914 */
++static void __lambda_478(void *data, object self_7312139, int argc, object *args) /* object self_7312139, object r_734907 */
   {
 - object r_735359 = args[0];
-+ object r_734914 = args[0];
++ object r_734907 = args[0];
    
 -closureN_type c_7318496;
 -object e_7318509 [4];
@@ -48725,28 +48951,28 @@ Make let-values be the same as let*-values, to work around
 -c_7318496.elements[1] = ((closureN)self_7313392)->elements[1];
 -c_7318496.elements[2] = ((closureN)self_7313392)->elements[2];
 -c_7318496.elements[3] = ((closureN)self_7313392)->elements[3];
-+closureN_type c_7317203;
-+object e_7317216 [4];
-+c_7317203.hdr.mark = gc_color_red;
-+ c_7317203.hdr.grayed = 0;
-+c_7317203.tag = closureN_tag;
-+ c_7317203.fn = (function_type)__lambda_479;
-+c_7317203.num_args = 1;
-+c_7317203.num_elements = 4;
-+c_7317203.elements = (object *)e_7317216;
-+c_7317203.elements[0] = ((closureN)self_7312146)->elements[0];
-+c_7317203.elements[1] = ((closureN)self_7312146)->elements[1];
-+c_7317203.elements[2] = ((closureN)self_7312146)->elements[2];
-+c_7317203.elements[3] = ((closureN)self_7312146)->elements[3];
++closureN_type c_7317196;
++object e_7317209 [4];
++c_7317196.hdr.mark = gc_color_red;
++ c_7317196.hdr.grayed = 0;
++c_7317196.tag = closureN_tag;
++ c_7317196.fn = (function_type)__lambda_479;
++c_7317196.num_args = 1;
++c_7317196.num_elements = 4;
++c_7317196.elements = (object *)e_7317209;
++c_7317196.elements[0] = ((closureN)self_7312139)->elements[0];
++c_7317196.elements[1] = ((closureN)self_7312139)->elements[1];
++c_7317196.elements[2] = ((closureN)self_7312139)->elements[2];
++c_7317196.elements[3] = ((closureN)self_7312139)->elements[3];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7318496,__lambda_479,  Cyc_set_cell(data, ((closureN)self_7313392)->elements[1], r_735359));; 
-+return_direct_with_clo1(data,(closure)&c_7317203,__lambda_479,  Cyc_set_cell(data, ((closureN)self_7312146)->elements[1], r_734914));; 
++return_direct_with_clo1(data,(closure)&c_7317196,__lambda_479,  Cyc_set_cell(data, ((closureN)self_7312139)->elements[1], r_734907));; 
  }
  
 -static void __lambda_479(void *data, object self_7313393, int argc, object *args) /* object self_7313393, object r_735358 */
-+static void __lambda_479(void *data, object self_7312147, int argc, object *args) /* object self_7312147, object r_734913 */
++static void __lambda_479(void *data, object self_7312140, int argc, object *args) /* object self_7312140, object r_734906 */
   {
  
    
@@ -48756,40 +48982,39 @@ Make let-values be the same as let*-values, to work around
  
 -object c_7318501 = Cyc_bytevector_copy(data,  ((closureN)self_7313393)->elements[2],((closureN)self_7313393)->elements[0], car(((closureN)self_7313393)->elements[3]), car(((closureN)self_7313393)->elements[1]));
 -return_direct_with_clo1(data,  ((closureN)self_7313393)->elements[2], (((closure)  ((closureN)self_7313393)->elements[2])->fn),  c_7318501);; 
-+object c_7317208 = Cyc_bytevector_copy(data,  ((closureN)self_7312147)->elements[2],((closureN)self_7312147)->elements[0], car(((closureN)self_7312147)->elements[3]), car(((closureN)self_7312147)->elements[1]));
-+return_direct_with_clo1(data,  ((closureN)self_7312147)->elements[2], (((closure)  ((closureN)self_7312147)->elements[2])->fn),  c_7317208);; 
++object c_7317201 = Cyc_bytevector_copy(data,  ((closureN)self_7312140)->elements[2],((closureN)self_7312140)->elements[0], car(((closureN)self_7312140)->elements[3]), car(((closureN)self_7312140)->elements[1]));
++return_direct_with_clo1(data,  ((closureN)self_7312140)->elements[2], (((closure)  ((closureN)self_7312140)->elements[2])->fn),  c_7317201);; 
  }
  
 -static void __lambda_477(void *data, object self_7313394, int argc, object *args) /* object self_7313394, object k_735360 */
-+static void __lambda_477(void *data, object self_7312148, int argc, object *args) /* object self_7312148, object k_734915 */
++static void __lambda_477(void *data, object self_7312141, int argc, object *args) /* object self_7312141, object k_734908 */
   {
 - object k_735360 = args[0];
-+ object k_734915 = args[0];
++ object k_734908 = args[0];
      
    
 -if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313394)->elements[1]), obj_int2obj(1))) ){ 
-+if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312148)->elements[1]), obj_int2obj(1))) ){ 
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312141)->elements[1]), obj_int2obj(1))) ){ 
    
  
 -return_direct_with_clo1(data,  k_735360,__lambda_478,  Cyc_cadr(data, ((closureN)self_7313394)->elements[1]));
-+return_direct_with_clo1(data,  k_734915,__lambda_478,  Cyc_cadr(data, ((closureN)self_7312148)->elements[1]));
++return_direct_with_clo1(data,  k_734908,__lambda_478,  Cyc_cadr(data, ((closureN)self_7312141)->elements[1]));
  } else { 
    
  
 -return_direct_with_clo1(data,  k_735360,__lambda_478,  car(((closureN)self_7313394)->elements[0]));}
-+return_direct_with_clo1(data,  k_734915,__lambda_478,  car(((closureN)self_7312148)->elements[0]));}
++return_direct_with_clo1(data,  k_734908,__lambda_478,  car(((closureN)self_7312141)->elements[0]));}
  ;; 
  }
  
 -static void __lambda_463(void *data, object _, int argc, object *args) /* closure _,object k_735332, object vec_73577_733182, object opts_73578_733183_raw, ... */
-+static void __lambda_463(void *data, object _, int argc, object *args) /* closure _,object k_734887, object vec_73577_732842, object opts_73578_732843_raw, ... */
++static void __lambda_463(void *data, object _, int argc, object *args) /* closure _,object k_734880, object vec_73577_732835, object opts_73578_732836_raw, ... */
   {
 -object k_735332 = args[0]; object vec_73577_733182 = args[1];
 -load_varargs(opts_73578_733183, args, 2, argc - 2);
--  Cyc_st_add(data, "scheme/base.sld:vector->list");
-+object k_734887 = args[0]; object vec_73577_732842 = args[1];
-+load_varargs(opts_73578_732843, args, 2, argc - 2);
-+  Cyc_st_add(data, "base.sld:vector->list");
++object k_734880 = args[0]; object vec_73577_732835 = args[1];
++load_varargs(opts_73578_732836, args, 2, argc - 2);
+   Cyc_st_add(data, "scheme/base.sld:vector->list");
  
 -closureN_type c_7318337;
 -object e_7318453 [3];
@@ -48803,28 +49028,28 @@ Make let-values be the same as let*-values, to work around
 -c_7318337.elements[0] = k_735332;
 -c_7318337.elements[1] = opts_73578_733183;
 -c_7318337.elements[2] = vec_73577_733182;
-+closureN_type c_7317044;
-+object e_7317160 [3];
-+c_7317044.hdr.mark = gc_color_red;
-+ c_7317044.hdr.grayed = 0;
-+c_7317044.tag = closureN_tag;
-+ c_7317044.fn = (function_type)__lambda_464;
-+c_7317044.num_args = 4;
-+c_7317044.num_elements = 3;
-+c_7317044.elements = (object *)e_7317160;
-+c_7317044.elements[0] = k_734887;
-+c_7317044.elements[1] = opts_73578_732843;
-+c_7317044.elements[2] = vec_73577_732842;
++closureN_type c_7317037;
++object e_7317153 [3];
++c_7317037.hdr.mark = gc_color_red;
++ c_7317037.hdr.grayed = 0;
++c_7317037.tag = closureN_tag;
++ c_7317037.fn = (function_type)__lambda_464;
++c_7317037.num_args = 4;
++c_7317037.num_elements = 3;
++c_7317037.elements = (object *)e_7317153;
++c_7317037.elements[0] = k_734880;
++c_7317037.elements[1] = opts_73578_732836;
++c_7317037.elements[2] = vec_73577_732835;
  
 -return_direct_with_clo4(data,(closure)&c_7318337,__lambda_464,  boolean_f, boolean_f, boolean_f, boolean_f);; 
-+return_direct_with_clo4(data,(closure)&c_7317044,__lambda_464,  boolean_f, boolean_f, boolean_f, boolean_f);; 
++return_direct_with_clo4(data,(closure)&c_7317037,__lambda_464,  boolean_f, boolean_f, boolean_f, boolean_f);; 
  }
  
 -static void __lambda_464(void *data, object self_7313373, int argc, object *args) /* object self_7313373, object len_73579_733184, object start_73580_733185, object end_73581_733186, object loop_73582_733187 */
-+static void __lambda_464(void *data, object self_7312127, int argc, object *args) /* object self_7312127, object len_73579_732844, object start_73580_732845, object end_73581_732846, object loop_73582_732847 */
++static void __lambda_464(void *data, object self_7312120, int argc, object *args) /* object self_7312120, object len_73579_732837, object start_73580_732838, object end_73581_732839, object loop_73582_732840 */
   {
 - object len_73579_733184 = args[0]; object start_73580_733185 = args[1]; object end_73581_733186 = args[2]; object loop_73582_733187 = args[3];
-+ object len_73579_732844 = args[0]; object start_73580_732845 = args[1]; object end_73581_732846 = args[2]; object loop_73582_732847 = args[3];
++ object len_73579_732837 = args[0]; object start_73580_732838 = args[1]; object end_73581_732839 = args[2]; object loop_73582_732840 = args[3];
    
 -closureN_type c_7318339;
 -object e_7318449 [6];
@@ -48841,34 +49066,34 @@ Make let-values be the same as let*-values, to work around
 -c_7318339.elements[3] = ((closureN)self_7313373)->elements[1];
 -c_7318339.elements[4] = start_73580_733185;
 -c_7318339.elements[5] = ((closureN)self_7313373)->elements[2];
-+closureN_type c_7317046;
-+object e_7317156 [6];
-+c_7317046.hdr.mark = gc_color_red;
-+ c_7317046.hdr.grayed = 0;
-+c_7317046.tag = closureN_tag;
-+ c_7317046.fn = (function_type)__lambda_1316;
-+c_7317046.num_args = 1;
-+c_7317046.num_elements = 6;
-+c_7317046.elements = (object *)e_7317156;
-+c_7317046.elements[0] = end_73581_732846;
-+c_7317046.elements[1] = ((closureN)self_7312127)->elements[0];
-+c_7317046.elements[2] = loop_73582_732847;
-+c_7317046.elements[3] = ((closureN)self_7312127)->elements[1];
-+c_7317046.elements[4] = start_73580_732845;
-+c_7317046.elements[5] = ((closureN)self_7312127)->elements[2];
++closureN_type c_7317039;
++object e_7317149 [6];
++c_7317039.hdr.mark = gc_color_red;
++ c_7317039.hdr.grayed = 0;
++c_7317039.tag = closureN_tag;
++ c_7317039.fn = (function_type)__lambda_1316;
++c_7317039.num_args = 1;
++c_7317039.num_elements = 6;
++c_7317039.elements = (object *)e_7317149;
++c_7317039.elements[0] = end_73581_732839;
++c_7317039.elements[1] = ((closureN)self_7312120)->elements[0];
++c_7317039.elements[2] = loop_73582_732840;
++c_7317039.elements[3] = ((closureN)self_7312120)->elements[1];
++c_7317039.elements[4] = start_73580_732838;
++c_7317039.elements[5] = ((closureN)self_7312120)->elements[2];
  
  
 -pair_type local_7318452; 
 -return_direct_with_clo1(data,(closure)&c_7318339,__lambda_1363,  set_cell_as_expr(&local_7318452, len_73579_733184));; 
-+pair_type local_7317159; 
-+return_direct_with_clo1(data,(closure)&c_7317046,__lambda_1316,  set_cell_as_expr(&local_7317159, len_73579_732844));; 
++pair_type local_7317152; 
++return_direct_with_clo1(data,(closure)&c_7317039,__lambda_1316,  set_cell_as_expr(&local_7317152, len_73579_732837));; 
  }
  
 -static void __lambda_1363(void *data, object self_7313374, int argc, object *args) /* object self_7313374, object len_73579_733184 */
-+static void __lambda_1316(void *data, object self_7312128, int argc, object *args) /* object self_7312128, object len_73579_732844 */
++static void __lambda_1316(void *data, object self_7312121, int argc, object *args) /* object self_7312121, object len_73579_732837 */
   {
 - object len_73579_733184 = args[0];
-+ object len_73579_732844 = args[0];
++ object len_73579_732837 = args[0];
    
 -closureN_type c_7318341;
 -object e_7318444 [6];
@@ -48885,34 +49110,34 @@ Make let-values be the same as let*-values, to work around
 -c_7318341.elements[3] = ((closureN)self_7313374)->elements[2];
 -c_7318341.elements[4] = ((closureN)self_7313374)->elements[3];
 -c_7318341.elements[5] = ((closureN)self_7313374)->elements[5];
-+closureN_type c_7317048;
-+object e_7317151 [6];
-+c_7317048.hdr.mark = gc_color_red;
-+ c_7317048.hdr.grayed = 0;
-+c_7317048.tag = closureN_tag;
-+ c_7317048.fn = (function_type)__lambda_1315;
-+c_7317048.num_args = 1;
-+c_7317048.num_elements = 6;
-+c_7317048.elements = (object *)e_7317151;
-+c_7317048.elements[0] = ((closureN)self_7312128)->elements[0];
-+c_7317048.elements[1] = ((closureN)self_7312128)->elements[1];
-+c_7317048.elements[2] = len_73579_732844;
-+c_7317048.elements[3] = ((closureN)self_7312128)->elements[2];
-+c_7317048.elements[4] = ((closureN)self_7312128)->elements[3];
-+c_7317048.elements[5] = ((closureN)self_7312128)->elements[5];
++closureN_type c_7317041;
++object e_7317144 [6];
++c_7317041.hdr.mark = gc_color_red;
++ c_7317041.hdr.grayed = 0;
++c_7317041.tag = closureN_tag;
++ c_7317041.fn = (function_type)__lambda_1315;
++c_7317041.num_args = 1;
++c_7317041.num_elements = 6;
++c_7317041.elements = (object *)e_7317144;
++c_7317041.elements[0] = ((closureN)self_7312121)->elements[0];
++c_7317041.elements[1] = ((closureN)self_7312121)->elements[1];
++c_7317041.elements[2] = len_73579_732837;
++c_7317041.elements[3] = ((closureN)self_7312121)->elements[2];
++c_7317041.elements[4] = ((closureN)self_7312121)->elements[3];
++c_7317041.elements[5] = ((closureN)self_7312121)->elements[5];
  
  
 -pair_type local_7318447; 
 -return_direct_with_clo1(data,(closure)&c_7318341,__lambda_1362,  set_cell_as_expr(&local_7318447, ((closureN)self_7313374)->elements[4]));; 
-+pair_type local_7317154; 
-+return_direct_with_clo1(data,(closure)&c_7317048,__lambda_1315,  set_cell_as_expr(&local_7317154, ((closureN)self_7312128)->elements[4]));; 
++pair_type local_7317147; 
++return_direct_with_clo1(data,(closure)&c_7317041,__lambda_1315,  set_cell_as_expr(&local_7317147, ((closureN)self_7312121)->elements[4]));; 
  }
  
 -static void __lambda_1362(void *data, object self_7313375, int argc, object *args) /* object self_7313375, object start_73580_733185 */
-+static void __lambda_1315(void *data, object self_7312129, int argc, object *args) /* object self_7312129, object start_73580_732845 */
++static void __lambda_1315(void *data, object self_7312122, int argc, object *args) /* object self_7312122, object start_73580_732838 */
   {
 - object start_73580_733185 = args[0];
-+ object start_73580_732845 = args[0];
++ object start_73580_732838 = args[0];
    
 -closureN_type c_7318343;
 -object e_7318439 [6];
@@ -48929,34 +49154,34 @@ Make let-values be the same as let*-values, to work around
 -c_7318343.elements[3] = ((closureN)self_7313375)->elements[4];
 -c_7318343.elements[4] = start_73580_733185;
 -c_7318343.elements[5] = ((closureN)self_7313375)->elements[5];
-+closureN_type c_7317050;
-+object e_7317146 [6];
-+c_7317050.hdr.mark = gc_color_red;
-+ c_7317050.hdr.grayed = 0;
-+c_7317050.tag = closureN_tag;
-+ c_7317050.fn = (function_type)__lambda_1314;
-+c_7317050.num_args = 1;
-+c_7317050.num_elements = 6;
-+c_7317050.elements = (object *)e_7317146;
-+c_7317050.elements[0] = ((closureN)self_7312129)->elements[1];
-+c_7317050.elements[1] = ((closureN)self_7312129)->elements[2];
-+c_7317050.elements[2] = ((closureN)self_7312129)->elements[3];
-+c_7317050.elements[3] = ((closureN)self_7312129)->elements[4];
-+c_7317050.elements[4] = start_73580_732845;
-+c_7317050.elements[5] = ((closureN)self_7312129)->elements[5];
++closureN_type c_7317043;
++object e_7317139 [6];
++c_7317043.hdr.mark = gc_color_red;
++ c_7317043.hdr.grayed = 0;
++c_7317043.tag = closureN_tag;
++ c_7317043.fn = (function_type)__lambda_1314;
++c_7317043.num_args = 1;
++c_7317043.num_elements = 6;
++c_7317043.elements = (object *)e_7317139;
++c_7317043.elements[0] = ((closureN)self_7312122)->elements[1];
++c_7317043.elements[1] = ((closureN)self_7312122)->elements[2];
++c_7317043.elements[2] = ((closureN)self_7312122)->elements[3];
++c_7317043.elements[3] = ((closureN)self_7312122)->elements[4];
++c_7317043.elements[4] = start_73580_732838;
++c_7317043.elements[5] = ((closureN)self_7312122)->elements[5];
  
  
 -pair_type local_7318442; 
 -return_direct_with_clo1(data,(closure)&c_7318343,__lambda_1361,  set_cell_as_expr(&local_7318442, ((closureN)self_7313375)->elements[0]));; 
-+pair_type local_7317149; 
-+return_direct_with_clo1(data,(closure)&c_7317050,__lambda_1314,  set_cell_as_expr(&local_7317149, ((closureN)self_7312129)->elements[0]));; 
++pair_type local_7317142; 
++return_direct_with_clo1(data,(closure)&c_7317043,__lambda_1314,  set_cell_as_expr(&local_7317142, ((closureN)self_7312122)->elements[0]));; 
  }
  
 -static void __lambda_1361(void *data, object self_7313376, int argc, object *args) /* object self_7313376, object end_73581_733186 */
-+static void __lambda_1314(void *data, object self_7312130, int argc, object *args) /* object self_7312130, object end_73581_732846 */
++static void __lambda_1314(void *data, object self_7312123, int argc, object *args) /* object self_7312123, object end_73581_732839 */
   {
 - object end_73581_733186 = args[0];
-+ object end_73581_732846 = args[0];
++ object end_73581_732839 = args[0];
    
 -closureN_type c_7318345;
 -object e_7318434 [6];
@@ -48973,34 +49198,34 @@ Make let-values be the same as let*-values, to work around
 -c_7318345.elements[3] = ((closureN)self_7313376)->elements[3];
 -c_7318345.elements[4] = ((closureN)self_7313376)->elements[4];
 -c_7318345.elements[5] = ((closureN)self_7313376)->elements[5];
-+closureN_type c_7317052;
-+object e_7317141 [6];
-+c_7317052.hdr.mark = gc_color_red;
-+ c_7317052.hdr.grayed = 0;
-+c_7317052.tag = closureN_tag;
-+ c_7317052.fn = (function_type)__lambda_1313;
-+c_7317052.num_args = 1;
-+c_7317052.num_elements = 6;
-+c_7317052.elements = (object *)e_7317141;
-+c_7317052.elements[0] = end_73581_732846;
-+c_7317052.elements[1] = ((closureN)self_7312130)->elements[0];
-+c_7317052.elements[2] = ((closureN)self_7312130)->elements[1];
-+c_7317052.elements[3] = ((closureN)self_7312130)->elements[3];
-+c_7317052.elements[4] = ((closureN)self_7312130)->elements[4];
-+c_7317052.elements[5] = ((closureN)self_7312130)->elements[5];
++closureN_type c_7317045;
++object e_7317134 [6];
++c_7317045.hdr.mark = gc_color_red;
++ c_7317045.hdr.grayed = 0;
++c_7317045.tag = closureN_tag;
++ c_7317045.fn = (function_type)__lambda_1313;
++c_7317045.num_args = 1;
++c_7317045.num_elements = 6;
++c_7317045.elements = (object *)e_7317134;
++c_7317045.elements[0] = end_73581_732839;
++c_7317045.elements[1] = ((closureN)self_7312123)->elements[0];
++c_7317045.elements[2] = ((closureN)self_7312123)->elements[1];
++c_7317045.elements[3] = ((closureN)self_7312123)->elements[3];
++c_7317045.elements[4] = ((closureN)self_7312123)->elements[4];
++c_7317045.elements[5] = ((closureN)self_7312123)->elements[5];
  
  
 -pair_type local_7318437; 
 -return_direct_with_clo1(data,(closure)&c_7318345,__lambda_1360,  set_cell_as_expr(&local_7318437, ((closureN)self_7313376)->elements[2]));; 
-+pair_type local_7317144; 
-+return_direct_with_clo1(data,(closure)&c_7317052,__lambda_1313,  set_cell_as_expr(&local_7317144, ((closureN)self_7312130)->elements[2]));; 
++pair_type local_7317137; 
++return_direct_with_clo1(data,(closure)&c_7317045,__lambda_1313,  set_cell_as_expr(&local_7317137, ((closureN)self_7312123)->elements[2]));; 
  }
  
 -static void __lambda_1360(void *data, object self_7313377, int argc, object *args) /* object self_7313377, object loop_73582_733187 */
-+static void __lambda_1313(void *data, object self_7312131, int argc, object *args) /* object self_7312131, object loop_73582_732847 */
++static void __lambda_1313(void *data, object self_7312124, int argc, object *args) /* object self_7312124, object loop_73582_732840 */
   {
 - object loop_73582_733187 = args[0];
-+ object loop_73582_732847 = args[0];
++ object loop_73582_732840 = args[0];
    
 -closureN_type c_7318347;
 -object e_7318427 [7];
@@ -49018,47 +49243,47 @@ Make let-values be the same as let*-values, to work around
 -c_7318347.elements[4] = ((closureN)self_7313377)->elements[3];
 -c_7318347.elements[5] = ((closureN)self_7313377)->elements[4];
 -c_7318347.elements[6] = ((closureN)self_7313377)->elements[5];
-+closureN_type c_7317054;
-+object e_7317134 [7];
-+c_7317054.hdr.mark = gc_color_red;
-+ c_7317054.hdr.grayed = 0;
-+c_7317054.tag = closureN_tag;
-+ c_7317054.fn = (function_type)__lambda_465;
-+c_7317054.num_args = 1;
-+c_7317054.num_elements = 7;
-+c_7317054.elements = (object *)e_7317134;
-+c_7317054.elements[0] = ((closureN)self_7312131)->elements[0];
-+c_7317054.elements[1] = ((closureN)self_7312131)->elements[1];
-+c_7317054.elements[2] = ((closureN)self_7312131)->elements[2];
-+c_7317054.elements[3] = loop_73582_732847;
-+c_7317054.elements[4] = ((closureN)self_7312131)->elements[3];
-+c_7317054.elements[5] = ((closureN)self_7312131)->elements[4];
-+c_7317054.elements[6] = ((closureN)self_7312131)->elements[5];
++closureN_type c_7317047;
++object e_7317127 [7];
++c_7317047.hdr.mark = gc_color_red;
++ c_7317047.hdr.grayed = 0;
++c_7317047.tag = closureN_tag;
++ c_7317047.fn = (function_type)__lambda_465;
++c_7317047.num_args = 1;
++c_7317047.num_elements = 7;
++c_7317047.elements = (object *)e_7317127;
++c_7317047.elements[0] = ((closureN)self_7312124)->elements[0];
++c_7317047.elements[1] = ((closureN)self_7312124)->elements[1];
++c_7317047.elements[2] = ((closureN)self_7312124)->elements[2];
++c_7317047.elements[3] = loop_73582_732840;
++c_7317047.elements[4] = ((closureN)self_7312124)->elements[3];
++c_7317047.elements[5] = ((closureN)self_7312124)->elements[4];
++c_7317047.elements[6] = ((closureN)self_7312124)->elements[5];
  
  
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7318347,__lambda_465,  Cyc_set_cell(data, ((closureN)self_7313377)->elements[2], Cyc_vector_length(data, ((closureN)self_7313377)->elements[5])));; 
-+return_direct_with_clo1(data,(closure)&c_7317054,__lambda_465,  Cyc_set_cell(data, ((closureN)self_7312131)->elements[2], Cyc_vector_length(data, ((closureN)self_7312131)->elements[5])));; 
++return_direct_with_clo1(data,(closure)&c_7317047,__lambda_465,  Cyc_set_cell(data, ((closureN)self_7312124)->elements[2], Cyc_vector_length(data, ((closureN)self_7312124)->elements[5])));; 
  }
  
 -static void __lambda_465(void *data, object self_7313378, int argc, object *args) /* object self_7313378, object r_735333 */
-+static void __lambda_465(void *data, object self_7312132, int argc, object *args) /* object self_7312132, object r_734888 */
++static void __lambda_465(void *data, object self_7312125, int argc, object *args) /* object self_7312125, object r_734881 */
   {
  
 -  object r_735348;
-+  object r_734903;
++  object r_734896;
      
    
 -if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313378)->elements[4]), obj_int2obj(0))) ){ 
-+if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312132)->elements[4]), obj_int2obj(0))) ){ 
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312125)->elements[4]), obj_int2obj(0))) ){ 
    
 -  r_735348 = Cyc_car(data, ((closureN)self_7313378)->elements[4]);
-+  r_734903 = Cyc_car(data, ((closureN)self_7312132)->elements[4]);
++  r_734896 = Cyc_car(data, ((closureN)self_7312125)->elements[4]);
  } else { 
 -  r_735348 = obj_int2obj(0);}
-+  r_734903 = obj_int2obj(0);}
++  r_734896 = obj_int2obj(0);}
  ;
 -closureN_type c_7318360;
 -object e_7318423 [7];
@@ -49076,31 +49301,31 @@ Make let-values be the same as let*-values, to work around
 -c_7318360.elements[4] = ((closureN)self_7313378)->elements[4];
 -c_7318360.elements[5] = ((closureN)self_7313378)->elements[5];
 -c_7318360.elements[6] = ((closureN)self_7313378)->elements[6];
-+closureN_type c_7317067;
-+object e_7317130 [7];
-+c_7317067.hdr.mark = gc_color_red;
-+ c_7317067.hdr.grayed = 0;
-+c_7317067.tag = closureN_tag;
-+ c_7317067.fn = (function_type)__lambda_466;
-+c_7317067.num_args = 1;
-+c_7317067.num_elements = 7;
-+c_7317067.elements = (object *)e_7317130;
-+c_7317067.elements[0] = ((closureN)self_7312132)->elements[0];
-+c_7317067.elements[1] = ((closureN)self_7312132)->elements[1];
-+c_7317067.elements[2] = ((closureN)self_7312132)->elements[2];
-+c_7317067.elements[3] = ((closureN)self_7312132)->elements[3];
-+c_7317067.elements[4] = ((closureN)self_7312132)->elements[4];
-+c_7317067.elements[5] = ((closureN)self_7312132)->elements[5];
-+c_7317067.elements[6] = ((closureN)self_7312132)->elements[6];
++closureN_type c_7317060;
++object e_7317123 [7];
++c_7317060.hdr.mark = gc_color_red;
++ c_7317060.hdr.grayed = 0;
++c_7317060.tag = closureN_tag;
++ c_7317060.fn = (function_type)__lambda_466;
++c_7317060.num_args = 1;
++c_7317060.num_elements = 7;
++c_7317060.elements = (object *)e_7317123;
++c_7317060.elements[0] = ((closureN)self_7312125)->elements[0];
++c_7317060.elements[1] = ((closureN)self_7312125)->elements[1];
++c_7317060.elements[2] = ((closureN)self_7312125)->elements[2];
++c_7317060.elements[3] = ((closureN)self_7312125)->elements[3];
++c_7317060.elements[4] = ((closureN)self_7312125)->elements[4];
++c_7317060.elements[5] = ((closureN)self_7312125)->elements[5];
++c_7317060.elements[6] = ((closureN)self_7312125)->elements[6];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7318360,__lambda_466,  Cyc_set_cell(data, ((closureN)self_7313378)->elements[5], r_735348));; 
-+return_direct_with_clo1(data,(closure)&c_7317067,__lambda_466,  Cyc_set_cell(data, ((closureN)self_7312132)->elements[5], r_734903));; 
++return_direct_with_clo1(data,(closure)&c_7317060,__lambda_466,  Cyc_set_cell(data, ((closureN)self_7312125)->elements[5], r_734896));; 
  }
  
 -static void __lambda_466(void *data, object self_7313379, int argc, object *args) /* object self_7313379, object r_735334 */
-+static void __lambda_466(void *data, object self_7312133, int argc, object *args) /* object self_7312133, object r_734889 */
++static void __lambda_466(void *data, object self_7312126, int argc, object *args) /* object self_7312126, object r_734882 */
   {
  
    
@@ -49115,8 +49340,19 @@ Make let-values be the same as let*-values, to work around
 -c_7318362.elements = (object *)e_7318376;
 -c_7318362.elements[0] = ((closureN)self_7313379)->elements[2];
 -c_7318362.elements[1] = ((closureN)self_7313379)->elements[4];
--
--
++closureN_type c_7317062;
++object e_7317076 [2];
++c_7317062.hdr.mark = gc_color_red;
++ c_7317062.hdr.grayed = 0;
++c_7317062.tag = closureN_tag;
++ c_7317062.fn = (function_type)__lambda_467;
++c_7317062.num_args = 0;
++c_7317062.num_elements = 2;
++c_7317062.elements = (object *)e_7317076;
++c_7317062.elements[0] = ((closureN)self_7312126)->elements[2];
++c_7317062.elements[1] = ((closureN)self_7312126)->elements[4];
+ 
+ 
 -closureN_type c_7318377;
 -object e_7318422 [5];
 -c_7318377.hdr.mark = gc_color_red;
@@ -49131,43 +49367,30 @@ Make let-values be the same as let*-values, to work around
 -c_7318377.elements[2] = ((closureN)self_7313379)->elements[3];
 -c_7318377.elements[3] = ((closureN)self_7313379)->elements[5];
 -c_7318377.elements[4] = ((closureN)self_7313379)->elements[6];
-+closureN_type c_7317069;
-+object e_7317083 [2];
-+c_7317069.hdr.mark = gc_color_red;
-+ c_7317069.hdr.grayed = 0;
-+c_7317069.tag = closureN_tag;
-+ c_7317069.fn = (function_type)__lambda_467;
-+c_7317069.num_args = 0;
-+c_7317069.num_elements = 2;
-+c_7317069.elements = (object *)e_7317083;
-+c_7317069.elements[0] = ((closureN)self_7312133)->elements[2];
-+c_7317069.elements[1] = ((closureN)self_7312133)->elements[4];
-+
-+
-+closureN_type c_7317084;
-+object e_7317129 [5];
-+c_7317084.hdr.mark = gc_color_red;
-+ c_7317084.hdr.grayed = 0;
-+c_7317084.tag = closureN_tag;
-+ c_7317084.fn = (function_type)__lambda_468;
-+c_7317084.num_args = 1;
-+c_7317084.num_elements = 5;
-+c_7317084.elements = (object *)e_7317129;
-+c_7317084.elements[0] = ((closureN)self_7312133)->elements[0];
-+c_7317084.elements[1] = ((closureN)self_7312133)->elements[1];
-+c_7317084.elements[2] = ((closureN)self_7312133)->elements[3];
-+c_7317084.elements[3] = ((closureN)self_7312133)->elements[5];
-+c_7317084.elements[4] = ((closureN)self_7312133)->elements[6];
++closureN_type c_7317077;
++object e_7317122 [5];
++c_7317077.hdr.mark = gc_color_red;
++ c_7317077.hdr.grayed = 0;
++c_7317077.tag = closureN_tag;
++ c_7317077.fn = (function_type)__lambda_468;
++c_7317077.num_args = 1;
++c_7317077.num_elements = 5;
++c_7317077.elements = (object *)e_7317122;
++c_7317077.elements[0] = ((closureN)self_7312126)->elements[0];
++c_7317077.elements[1] = ((closureN)self_7312126)->elements[1];
++c_7317077.elements[2] = ((closureN)self_7312126)->elements[3];
++c_7317077.elements[3] = ((closureN)self_7312126)->elements[5];
++c_7317077.elements[4] = ((closureN)self_7312126)->elements[6];
  
 -return_direct_with_clo1(data,(closure)&c_7318362,__lambda_467,  &c_7318377);; 
-+return_direct_with_clo1(data,(closure)&c_7317069,__lambda_467,  &c_7317084);; 
++return_direct_with_clo1(data,(closure)&c_7317062,__lambda_467,  &c_7317077);; 
  }
  
 -static void __lambda_468(void *data, object self_7313380, int argc, object *args) /* object self_7313380, object r_735344 */
-+static void __lambda_468(void *data, object self_7312134, int argc, object *args) /* object self_7312134, object r_734899 */
++static void __lambda_468(void *data, object self_7312127, int argc, object *args) /* object self_7312127, object r_734892 */
   {
 - object r_735344 = args[0];
-+ object r_734899 = args[0];
++ object r_734892 = args[0];
    
 -closureN_type c_7318379;
 -object e_7318418 [5];
@@ -49183,29 +49406,29 @@ Make let-values be the same as let*-values, to work around
 -c_7318379.elements[2] = ((closureN)self_7313380)->elements[2];
 -c_7318379.elements[3] = ((closureN)self_7313380)->elements[3];
 -c_7318379.elements[4] = ((closureN)self_7313380)->elements[4];
-+closureN_type c_7317086;
-+object e_7317125 [5];
-+c_7317086.hdr.mark = gc_color_red;
-+ c_7317086.hdr.grayed = 0;
-+c_7317086.tag = closureN_tag;
-+ c_7317086.fn = (function_type)__lambda_469;
-+c_7317086.num_args = 1;
-+c_7317086.num_elements = 5;
-+c_7317086.elements = (object *)e_7317125;
-+c_7317086.elements[0] = ((closureN)self_7312134)->elements[0];
-+c_7317086.elements[1] = ((closureN)self_7312134)->elements[1];
-+c_7317086.elements[2] = ((closureN)self_7312134)->elements[2];
-+c_7317086.elements[3] = ((closureN)self_7312134)->elements[3];
-+c_7317086.elements[4] = ((closureN)self_7312134)->elements[4];
++closureN_type c_7317079;
++object e_7317118 [5];
++c_7317079.hdr.mark = gc_color_red;
++ c_7317079.hdr.grayed = 0;
++c_7317079.tag = closureN_tag;
++ c_7317079.fn = (function_type)__lambda_469;
++c_7317079.num_args = 1;
++c_7317079.num_elements = 5;
++c_7317079.elements = (object *)e_7317118;
++c_7317079.elements[0] = ((closureN)self_7312127)->elements[0];
++c_7317079.elements[1] = ((closureN)self_7312127)->elements[1];
++c_7317079.elements[2] = ((closureN)self_7312127)->elements[2];
++c_7317079.elements[3] = ((closureN)self_7312127)->elements[3];
++c_7317079.elements[4] = ((closureN)self_7312127)->elements[4];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7318379,__lambda_469,  Cyc_set_cell(data, ((closureN)self_7313380)->elements[0], r_735344));; 
-+return_direct_with_clo1(data,(closure)&c_7317086,__lambda_469,  Cyc_set_cell(data, ((closureN)self_7312134)->elements[0], r_734899));; 
++return_direct_with_clo1(data,(closure)&c_7317079,__lambda_469,  Cyc_set_cell(data, ((closureN)self_7312127)->elements[0], r_734892));; 
  }
  
 -static void __lambda_469(void *data, object self_7313381, int argc, object *args) /* object self_7313381, object r_735335 */
-+static void __lambda_469(void *data, object self_7312135, int argc, object *args) /* object self_7312135, object r_734890 */
++static void __lambda_469(void *data, object self_7312128, int argc, object *args) /* object self_7312128, object r_734883 */
   {
  
    
@@ -49221,18 +49444,18 @@ Make let-values be the same as let*-values, to work around
 -c_7318381.elements[0] = ((closureN)self_7313381)->elements[1];
 -c_7318381.elements[1] = ((closureN)self_7313381)->elements[2];
 -c_7318381.elements[2] = ((closureN)self_7313381)->elements[3];
-+closureN_type c_7317088;
-+object e_7317103 [3];
-+c_7317088.hdr.mark = gc_color_red;
-+ c_7317088.hdr.grayed = 0;
-+c_7317088.tag = closureN_tag;
-+ c_7317088.fn = (function_type)__lambda_470;
-+c_7317088.num_args = 1;
-+c_7317088.num_elements = 3;
-+c_7317088.elements = (object *)e_7317103;
-+c_7317088.elements[0] = ((closureN)self_7312135)->elements[1];
-+c_7317088.elements[1] = ((closureN)self_7312135)->elements[2];
-+c_7317088.elements[2] = ((closureN)self_7312135)->elements[3];
++closureN_type c_7317081;
++object e_7317096 [3];
++c_7317081.hdr.mark = gc_color_red;
++ c_7317081.hdr.grayed = 0;
++c_7317081.tag = closureN_tag;
++ c_7317081.fn = (function_type)__lambda_470;
++c_7317081.num_args = 1;
++c_7317081.num_elements = 3;
++c_7317081.elements = (object *)e_7317096;
++c_7317081.elements[0] = ((closureN)self_7312128)->elements[1];
++c_7317081.elements[1] = ((closureN)self_7312128)->elements[2];
++c_7317081.elements[2] = ((closureN)self_7312128)->elements[3];
  
  
 -closureN_type c_7318397;
@@ -49247,55 +49470,55 @@ Make let-values be the same as let*-values, to work around
 -c_7318397.elements[0] = ((closureN)self_7313381)->elements[0];
 -c_7318397.elements[1] = ((closureN)self_7313381)->elements[2];
 -c_7318397.elements[2] = ((closureN)self_7313381)->elements[4];
-+closureN_type c_7317104;
-+object e_7317124 [3];
-+c_7317104.hdr.mark = gc_color_red;
-+ c_7317104.hdr.grayed = 0;
-+c_7317104.tag = closureN_tag;
-+ c_7317104.fn = (function_type)__lambda_472;
-+c_7317104.num_args = 2;
-+c_7317104.num_elements = 3;
-+c_7317104.elements = (object *)e_7317124;
-+c_7317104.elements[0] = ((closureN)self_7312135)->elements[0];
-+c_7317104.elements[1] = ((closureN)self_7312135)->elements[2];
-+c_7317104.elements[2] = ((closureN)self_7312135)->elements[4];
++closureN_type c_7317097;
++object e_7317117 [3];
++c_7317097.hdr.mark = gc_color_red;
++ c_7317097.hdr.grayed = 0;
++c_7317097.tag = closureN_tag;
++ c_7317097.fn = (function_type)__lambda_472;
++c_7317097.num_args = 2;
++c_7317097.num_elements = 3;
++c_7317097.elements = (object *)e_7317117;
++c_7317097.elements[0] = ((closureN)self_7312128)->elements[0];
++c_7317097.elements[1] = ((closureN)self_7312128)->elements[2];
++c_7317097.elements[2] = ((closureN)self_7312128)->elements[4];
  
 -return_direct_with_clo1(data,(closure)&c_7318381,__lambda_470,  &c_7318397);; 
-+return_direct_with_clo1(data,(closure)&c_7317088,__lambda_470,  &c_7317104);; 
++return_direct_with_clo1(data,(closure)&c_7317081,__lambda_470,  &c_7317097);; 
  }
  
 -static void __lambda_472(void *data, object self_7313382, int argc, object *args) /* object self_7313382, object k_735339, object i_73583_733188, object lst_73584_733189 */
-+static void __lambda_472(void *data, object self_7312136, int argc, object *args) /* object self_7312136, object k_734894, object i_73583_732848, object lst_73584_732849 */
++static void __lambda_472(void *data, object self_7312129, int argc, object *args) /* object self_7312129, object k_734887, object i_73583_732841, object lst_73584_732842 */
   {
 - object k_735339 = args[0]; object i_73583_733188 = args[1]; object lst_73584_733189 = args[2];
-+ object k_734894 = args[0]; object i_73583_732848 = args[1]; object lst_73584_732849 = args[2];
++ object k_734887 = args[0]; object i_73583_732841 = args[1]; object lst_73584_732842 = args[2];
      
    
 -if( (boolean_f != Cyc_num_fast_eq_op(data, i_73583_733188, car(((closureN)self_7313382)->elements[0]))) ){ 
 -  return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  k_735339, primitive_cons, NULL, lst_73584_733189);
-+if( (boolean_f != Cyc_num_fast_eq_op(data, i_73583_732848, car(((closureN)self_7312136)->elements[0]))) ){ 
-+  return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  k_734894, primitive_cons, NULL, lst_73584_732849);
++if( (boolean_f != Cyc_num_fast_eq_op(data, i_73583_732841, car(((closureN)self_7312129)->elements[0]))) ){ 
++  return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  k_734887, primitive_cons, NULL, lst_73584_732842);
  } else { 
    
  
  
 -complex_num_type local_7318410; 
-+complex_num_type local_7317117; 
++complex_num_type local_7317110; 
  
 -pair_type local_7318413; 
-+pair_type local_7317120; 
++pair_type local_7317113; 
  
  
 -return_closcall3(data,  car(((closureN)self_7313382)->elements[1]),  k_735339, Cyc_fast_sum(data,&local_7318410, i_73583_733188, obj_int2obj(1)), set_pair_as_expr(&local_7318413, Cyc_vector_ref(data, ((closureN)self_7313382)->elements[2], i_73583_733188), lst_73584_733189));}
-+return_closcall3(data,  car(((closureN)self_7312136)->elements[1]),  k_734894, Cyc_fast_sum(data,&local_7317117, i_73583_732848, obj_int2obj(1)), set_pair_as_expr(&local_7317120, Cyc_vector_ref(data, ((closureN)self_7312136)->elements[2], i_73583_732848), lst_73584_732849));}
++return_closcall3(data,  car(((closureN)self_7312129)->elements[1]),  k_734887, Cyc_fast_sum(data,&local_7317110, i_73583_732841, obj_int2obj(1)), set_pair_as_expr(&local_7317113, Cyc_vector_ref(data, ((closureN)self_7312129)->elements[2], i_73583_732841), lst_73584_732842));}
  ;; 
  }
  
 -static void __lambda_470(void *data, object self_7313383, int argc, object *args) /* object self_7313383, object r_735338 */
-+static void __lambda_470(void *data, object self_7312137, int argc, object *args) /* object self_7312137, object r_734893 */
++static void __lambda_470(void *data, object self_7312130, int argc, object *args) /* object self_7312130, object r_734886 */
   {
 - object r_735338 = args[0];
-+ object r_734893 = args[0];
++ object r_734886 = args[0];
    
 -closureN_type c_7318383;
 -object e_7318392 [3];
@@ -49309,27 +49532,27 @@ Make let-values be the same as let*-values, to work around
 -c_7318383.elements[0] = ((closureN)self_7313383)->elements[0];
 -c_7318383.elements[1] = ((closureN)self_7313383)->elements[1];
 -c_7318383.elements[2] = ((closureN)self_7313383)->elements[2];
-+closureN_type c_7317090;
-+object e_7317099 [3];
-+c_7317090.hdr.mark = gc_color_red;
-+ c_7317090.hdr.grayed = 0;
-+c_7317090.tag = closureN_tag;
-+ c_7317090.fn = (function_type)__lambda_471;
-+c_7317090.num_args = 1;
-+c_7317090.num_elements = 3;
-+c_7317090.elements = (object *)e_7317099;
-+c_7317090.elements[0] = ((closureN)self_7312137)->elements[0];
-+c_7317090.elements[1] = ((closureN)self_7312137)->elements[1];
-+c_7317090.elements[2] = ((closureN)self_7312137)->elements[2];
++closureN_type c_7317083;
++object e_7317092 [3];
++c_7317083.hdr.mark = gc_color_red;
++ c_7317083.hdr.grayed = 0;
++c_7317083.tag = closureN_tag;
++ c_7317083.fn = (function_type)__lambda_471;
++c_7317083.num_args = 1;
++c_7317083.num_elements = 3;
++c_7317083.elements = (object *)e_7317092;
++c_7317083.elements[0] = ((closureN)self_7312130)->elements[0];
++c_7317083.elements[1] = ((closureN)self_7312130)->elements[1];
++c_7317083.elements[2] = ((closureN)self_7312130)->elements[2];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7318383,__lambda_471,  Cyc_set_cell(data, ((closureN)self_7313383)->elements[1], r_735338));; 
-+return_direct_with_clo1(data,(closure)&c_7317090,__lambda_471,  Cyc_set_cell(data, ((closureN)self_7312137)->elements[1], r_734893));; 
++return_direct_with_clo1(data,(closure)&c_7317083,__lambda_471,  Cyc_set_cell(data, ((closureN)self_7312130)->elements[1], r_734886));; 
  }
  
 -static void __lambda_471(void *data, object self_7313384, int argc, object *args) /* object self_7313384, object r_735336 */
-+static void __lambda_471(void *data, object self_7312138, int argc, object *args) /* object self_7312138, object r_734891 */
++static void __lambda_471(void *data, object self_7312131, int argc, object *args) /* object self_7312131, object r_734884 */
   {
  
    
@@ -49337,64 +49560,61 @@ Make let-values be the same as let*-values, to work around
  
  
 -return_closcall3(data,  car(((closureN)self_7313384)->elements[1]),  ((closureN)self_7313384)->elements[0], car(((closureN)self_7313384)->elements[2]), NULL);; 
-+return_closcall3(data,  car(((closureN)self_7312138)->elements[1]),  ((closureN)self_7312138)->elements[0], car(((closureN)self_7312138)->elements[2]), NULL);; 
++return_closcall3(data,  car(((closureN)self_7312131)->elements[1]),  ((closureN)self_7312131)->elements[0], car(((closureN)self_7312131)->elements[2]), NULL);; 
  }
  
 -static void __lambda_467(void *data, object self_7313385, int argc, object *args) /* object self_7313385, object k_735345 */
-+static void __lambda_467(void *data, object self_7312139, int argc, object *args) /* object self_7312139, object k_734900 */
++static void __lambda_467(void *data, object self_7312132, int argc, object *args) /* object self_7312132, object k_734893 */
   {
 - object k_735345 = args[0];
-+ object k_734900 = args[0];
++ object k_734893 = args[0];
      
    
 -if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313385)->elements[1]), obj_int2obj(1))) ){ 
-+if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312139)->elements[1]), obj_int2obj(1))) ){ 
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312132)->elements[1]), obj_int2obj(1))) ){ 
    
  
 -return_direct_with_clo1(data,  k_735345,__lambda_468,  Cyc_cadr(data, ((closureN)self_7313385)->elements[1]));
-+return_direct_with_clo1(data,  k_734900,__lambda_468,  Cyc_cadr(data, ((closureN)self_7312139)->elements[1]));
++return_direct_with_clo1(data,  k_734893,__lambda_468,  Cyc_cadr(data, ((closureN)self_7312132)->elements[1]));
  } else { 
    
  
 -return_direct_with_clo1(data,  k_735345,__lambda_468,  car(((closureN)self_7313385)->elements[0]));}
-+return_direct_with_clo1(data,  k_734900,__lambda_468,  car(((closureN)self_7312139)->elements[0]));}
++return_direct_with_clo1(data,  k_734893,__lambda_468,  car(((closureN)self_7312132)->elements[0]));}
  ;; 
  }
  
 -static void __lambda_462(void *data, object _, int argc, object *args) /* closure _,object k_735329, object objs_73576_733181_raw, ... */
-+static void __lambda_462(void *data, object _, int argc, object *args) /* closure _,object k_734884, object objs_73576_732841_raw, ... */
++static void __lambda_462(void *data, object _, int argc, object *args) /* closure _,object k_734877, object objs_73576_732834_raw, ... */
   {
 -object k_735329 = args[0];
 -load_varargs(objs_73576_733181, args, 1, argc - 1);
--  Cyc_st_add(data, "scheme/base.sld:vector");
-+object k_734884 = args[0];
-+load_varargs(objs_73576_732841, args, 1, argc - 1);
-+  Cyc_st_add(data, "base.sld:vector");
++object k_734877 = args[0];
++load_varargs(objs_73576_732834, args, 1, argc - 1);
+   Cyc_st_add(data, "scheme/base.sld:vector");
  
 -object c_7318334 = Cyc_list2vector(data,  k_735329,objs_73576_733181);
 -return_direct_with_clo1(data,  k_735329, (((closure)  k_735329)->fn),  c_7318334);; 
-+object c_7317041 = Cyc_list2vector(data,  k_734884,objs_73576_732841);
-+return_direct_with_clo1(data,  k_734884, (((closure)  k_734884)->fn),  c_7317041);; 
++object c_7317034 = Cyc_list2vector(data,  k_734877,objs_73576_732834);
++return_direct_with_clo1(data,  k_734877, (((closure)  k_734877)->fn),  c_7317034);; 
  }
  
 -static void __lambda_461(void *data, object _, int argc, object *args) /* closure _,object k_735325, object lst_73575_733180 */
-+static void __lambda_461(void *data, object _, int argc, object *args) /* closure _,object k_734880, object lst_73575_732840 */
++static void __lambda_461(void *data, object _, int argc, object *args) /* closure _,object k_734873, object lst_73575_732833 */
   {
 -object k_735325 = args[0]; object lst_73575_733180 = args[1];
--  Cyc_st_add(data, "scheme/base.sld:reverse");
++object k_734873 = args[0]; object lst_73575_732833 = 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_735325, primitive_cons, NULL, lst_73575_733180);; 
-+object k_734880 = args[0]; object lst_73575_732840 = args[1];
-+  Cyc_st_add(data, "base.sld:reverse");
-+return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  k_734880, primitive_cons, NULL, lst_73575_732840);; 
++return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  k_734873, primitive_cons, NULL, lst_73575_732833);; 
  }
  
 -static void __lambda_459(void *data, object _, int argc, object *args) /* closure _,object k_735321, object lst_73571_733176, object k_73572_733177, object obj_73573_733178 */
-+static void __lambda_459(void *data, object _, int argc, object *args) /* closure _,object k_734876, object lst_73571_732836, object k_73572_732837, object obj_73573_732838 */
++static void __lambda_459(void *data, object _, int argc, object *args) /* closure _,object k_734869, object lst_73571_732829, object k_73572_732830, object obj_73573_732831 */
   {
 -object k_735321 = args[0]; object lst_73571_733176 = args[1]; object k_73572_733177 = args[2]; object obj_73573_733178 = args[3];
--  Cyc_st_add(data, "scheme/base.sld:list-set!");
-+object k_734876 = args[0]; object lst_73571_732836 = args[1]; object k_73572_732837 = args[2]; object obj_73573_732838 = args[3];
-+  Cyc_st_add(data, "base.sld:list-set!");
++object k_734869 = args[0]; object lst_73571_732829 = args[1]; object k_73572_732830 = args[2]; object obj_73573_732831 = args[3];
+   Cyc_st_add(data, "scheme/base.sld:list-set!");
  
 -closureN_type c_7318320;
 -object e_7318327 [2];
@@ -49407,41 +49627,40 @@ Make let-values be the same as let*-values, to work around
 -c_7318320.elements = (object *)e_7318327;
 -c_7318320.elements[0] = k_735321;
 -c_7318320.elements[1] = obj_73573_733178;
-+closureN_type c_7317027;
-+object e_7317034 [2];
-+c_7317027.hdr.mark = gc_color_red;
-+ c_7317027.hdr.grayed = 0;
-+c_7317027.tag = closureN_tag;
-+ c_7317027.fn = (function_type)__lambda_460;
-+c_7317027.num_args = 1;
-+c_7317027.num_elements = 2;
-+c_7317027.elements = (object *)e_7317034;
-+c_7317027.elements[0] = k_734876;
-+c_7317027.elements[1] = obj_73573_732838;
++closureN_type c_7317020;
++object e_7317027 [2];
++c_7317020.hdr.mark = gc_color_red;
++ c_7317020.hdr.grayed = 0;
++c_7317020.tag = closureN_tag;
++ c_7317020.fn = (function_type)__lambda_460;
++c_7317020.num_args = 1;
++c_7317020.num_elements = 2;
++c_7317020.elements = (object *)e_7317027;
++c_7317020.elements[0] = k_734869;
++c_7317020.elements[1] = obj_73573_732831;
  
 -return_direct_with_clo3(data,  __glo_list_91tail_scheme_base, (((closure)  __glo_list_91tail_scheme_base)->fn),  &c_7318320, lst_73571_733176, k_73572_733177);; 
-+return_direct_with_clo3(data,  __glo_list_91tail_scheme_base, (((closure)  __glo_list_91tail_scheme_base)->fn),  &c_7317027, lst_73571_732836, k_73572_732837);; 
++return_direct_with_clo3(data,  __glo_list_91tail_scheme_base, (((closure)  __glo_list_91tail_scheme_base)->fn),  &c_7317020, lst_73571_732829, k_73572_732830);; 
  }
  
 -static void __lambda_460(void *data, object self_7313372, int argc, object *args) /* object self_7313372, object kth_73574_733179 */
-+static void __lambda_460(void *data, object self_7312126, int argc, object *args) /* object self_7312126, object kth_73574_732839 */
++static void __lambda_460(void *data, object self_7312119, int argc, object *args) /* object self_7312119, object kth_73574_732832 */
   {
 - object kth_73574_733179 = args[0];
-+ object kth_73574_732839 = args[0];
++ object kth_73574_732832 = args[0];
    
 -object c_7318325 = Cyc_set_car_cps(data,  ((closureN)self_7313372)->elements[0],kth_73574_733179, ((closureN)self_7313372)->elements[1]);
 -return_direct_with_clo1(data,  ((closureN)self_7313372)->elements[0], (((closure)  ((closureN)self_7313372)->elements[0])->fn),  c_7318325);; 
-+object c_7317032 = Cyc_set_car_cps(data,  ((closureN)self_7312126)->elements[0],kth_73574_732839, ((closureN)self_7312126)->elements[1]);
-+return_direct_with_clo1(data,  ((closureN)self_7312126)->elements[0], (((closure)  ((closureN)self_7312126)->elements[0])->fn),  c_7317032);; 
++object c_7317025 = Cyc_set_car_cps(data,  ((closureN)self_7312119)->elements[0],kth_73574_732832, ((closureN)self_7312119)->elements[1]);
++return_direct_with_clo1(data,  ((closureN)self_7312119)->elements[0], (((closure)  ((closureN)self_7312119)->elements[0])->fn),  c_7317025);; 
  }
  
 -static void __lambda_457(void *data, object _, int argc, object *args) /* closure _,object k_735317, object lst_73569_733174, object k_73570_733175 */
-+static void __lambda_457(void *data, object _, int argc, object *args) /* closure _,object k_734872, object lst_73569_732834, object k_73570_732835 */
++static void __lambda_457(void *data, object _, int argc, object *args) /* closure _,object k_734865, object lst_73569_732827, object k_73570_732828 */
   {
 -object k_735317 = args[0]; object lst_73569_733174 = args[1]; object k_73570_733175 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:list-ref");
-+object k_734872 = args[0]; object lst_73569_732834 = args[1]; object k_73570_732835 = args[2];
-+  Cyc_st_add(data, "base.sld:list-ref");
++object k_734865 = args[0]; object lst_73569_732827 = args[1]; object k_73570_732828 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:list-ref");
  
 -closureN_type c_7318312;
 -object e_7318317 [1];
@@ -49453,73 +49672,71 @@ Make let-values be the same as let*-values, to work around
 -c_7318312.num_elements = 1;
 -c_7318312.elements = (object *)e_7318317;
 -c_7318312.elements[0] = k_735317;
-+closureN_type c_7317019;
-+object e_7317024 [1];
-+c_7317019.hdr.mark = gc_color_red;
-+ c_7317019.hdr.grayed = 0;
-+c_7317019.tag = closureN_tag;
-+ c_7317019.fn = (function_type)__lambda_458;
-+c_7317019.num_args = 1;
-+c_7317019.num_elements = 1;
-+c_7317019.elements = (object *)e_7317024;
-+c_7317019.elements[0] = k_734872;
++closureN_type c_7317012;
++object e_7317017 [1];
++c_7317012.hdr.mark = gc_color_red;
++ c_7317012.hdr.grayed = 0;
++c_7317012.tag = closureN_tag;
++ c_7317012.fn = (function_type)__lambda_458;
++c_7317012.num_args = 1;
++c_7317012.num_elements = 1;
++c_7317012.elements = (object *)e_7317017;
++c_7317012.elements[0] = k_734865;
  
 -return_direct_with_clo3(data,  __glo_list_91tail_scheme_base, (((closure)  __glo_list_91tail_scheme_base)->fn),  &c_7318312, lst_73569_733174, k_73570_733175);; 
-+return_direct_with_clo3(data,  __glo_list_91tail_scheme_base, (((closure)  __glo_list_91tail_scheme_base)->fn),  &c_7317019, lst_73569_732834, k_73570_732835);; 
++return_direct_with_clo3(data,  __glo_list_91tail_scheme_base, (((closure)  __glo_list_91tail_scheme_base)->fn),  &c_7317012, lst_73569_732827, k_73570_732828);; 
  }
  
 -static void __lambda_458(void *data, object self_7313371, int argc, object *args) /* object self_7313371, object r_735318 */
-+static void __lambda_458(void *data, object self_7312125, int argc, object *args) /* object self_7312125, object r_734873 */
++static void __lambda_458(void *data, object self_7312118, int argc, object *args) /* object self_7312118, object r_734866 */
   {
 - object r_735318 = args[0];
-+ object r_734873 = args[0];
++ object r_734866 = args[0];
    
  
 -return_direct_with_clo1(data,  ((closureN)self_7313371)->elements[0], (((closure)  ((closureN)self_7313371)->elements[0])->fn),  Cyc_car(data, r_735318));; 
-+return_direct_with_clo1(data,  ((closureN)self_7312125)->elements[0], (((closure)  ((closureN)self_7312125)->elements[0])->fn),  Cyc_car(data, r_734873));; 
++return_direct_with_clo1(data,  ((closureN)self_7312118)->elements[0], (((closure)  ((closureN)self_7312118)->elements[0])->fn),  Cyc_car(data, r_734866));; 
  }
  
 -static void __lambda_456(void *data, object _, int argc, object *args) /* closure _,object k_735311, object lst_73567_733172, object k_73568_733173 */
-+static void __lambda_456(void *data, object _, int argc, object *args) /* closure _,object k_734866, object lst_73567_732832, object k_73568_732833 */
++static void __lambda_456(void *data, object _, int argc, object *args) /* closure _,object k_734859, object lst_73567_732825, object k_73568_732826 */
   {
 -object k_735311 = args[0]; object lst_73567_733172 = args[1]; object k_73568_733173 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:list-tail");
-+object k_734866 = args[0]; object lst_73567_732832 = args[1]; object k_73568_732833 = args[2];
-+  Cyc_st_add(data, "base.sld:list-tail");
++object k_734859 = args[0]; object lst_73567_732825 = args[1]; object k_73568_732826 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:list-tail");
    
 -if( (boolean_f != Cyc_num_fast_eq_op(data, k_73568_733173, obj_int2obj(0))) ){ 
 -  return_direct_with_clo1(data,  k_735311, (((closure)  k_735311)->fn),  lst_73567_733172);
-+if( (boolean_f != Cyc_num_fast_eq_op(data, k_73568_732833, obj_int2obj(0))) ){ 
-+  return_direct_with_clo1(data,  k_734866, (((closure)  k_734866)->fn),  lst_73567_732832);
++if( (boolean_f != Cyc_num_fast_eq_op(data, k_73568_732826, obj_int2obj(0))) ){ 
++  return_direct_with_clo1(data,  k_734859, (((closure)  k_734859)->fn),  lst_73567_732825);
  } else { 
    
  
  
 -complex_num_type local_7318309; 
 -return_direct_with_clo3(data,  __glo_list_91tail_scheme_base, (((closure)  __glo_list_91tail_scheme_base)->fn),  k_735311, Cyc_cdr(data, lst_73567_733172), Cyc_fast_sub(data,&local_7318309, k_73568_733173, obj_int2obj(1)));}
-+complex_num_type local_7317016; 
-+return_direct_with_clo3(data,  __glo_list_91tail_scheme_base, (((closure)  __glo_list_91tail_scheme_base)->fn),  k_734866, Cyc_cdr(data, lst_73567_732832), Cyc_fast_sub(data,&local_7317016, k_73568_732833, obj_int2obj(1)));}
++complex_num_type local_7317009; 
++return_direct_with_clo3(data,  __glo_list_91tail_scheme_base, (((closure)  __glo_list_91tail_scheme_base)->fn),  k_734859, Cyc_cdr(data, lst_73567_732825), Cyc_fast_sub(data,&local_7317009, k_73568_732826, obj_int2obj(1)));}
  ;; 
  }
  
 -static void __lambda_444(void *data, object _, int argc, object *args) /* closure _,object k_735290, object f_73558_733164, object lis1_73559_733165, object lists_73560_733166_raw, ... */
-+static void __lambda_444(void *data, object _, int argc, object *args) /* closure _,object k_734845, object f_73558_732824, object lis1_73559_732825, object lists_73560_732826_raw, ... */
++static void __lambda_444(void *data, object _, int argc, object *args) /* closure _,object k_734838, object f_73558_732817, object lis1_73559_732818, object lists_73560_732819_raw, ... */
   {
 -object k_735290 = args[0]; object f_73558_733164 = args[1]; object lis1_73559_733165 = args[2];
 -load_varargs(lists_73560_733166, args, 3, argc - 3);
--  Cyc_st_add(data, "scheme/base.sld:for-each");
-+object k_734845 = args[0]; object f_73558_732824 = args[1]; object lis1_73559_732825 = args[2];
-+load_varargs(lists_73560_732826, args, 3, argc - 3);
-+  Cyc_st_add(data, "base.sld:for-each");
++object k_734838 = args[0]; object f_73558_732817 = args[1]; object lis1_73559_732818 = args[2];
++load_varargs(lists_73560_732819, args, 3, argc - 3);
+   Cyc_st_add(data, "scheme/base.sld:for-each");
    
 -if( (boolean_f != Cyc_is_null(lis1_73559_733165)) ){ 
 -  return_direct_with_clo1(data,  k_735290, (((closure)  k_735290)->fn),  Cyc_VOID);
-+if( (boolean_f != Cyc_is_null(lis1_73559_732825)) ){ 
-+  return_direct_with_clo1(data,  k_734845, (((closure)  k_734845)->fn),  Cyc_VOID);
++if( (boolean_f != Cyc_is_null(lis1_73559_732818)) ){ 
++  return_direct_with_clo1(data,  k_734838, (((closure)  k_734838)->fn),  Cyc_VOID);
  } else { 
      
 -if( (boolean_f != Cyc_is_pair(lists_73560_733166)) ){ 
-+if( (boolean_f != Cyc_is_pair(lists_73560_732826)) ){ 
++if( (boolean_f != Cyc_is_pair(lists_73560_732819)) ){ 
    
 -closureN_type c_7318220;
 -object e_7318278 [2];
@@ -49532,32 +49749,32 @@ Make let-values be the same as let*-values, to work around
 -c_7318220.elements = (object *)e_7318278;
 -c_7318220.elements[0] = f_73558_733164;
 -c_7318220.elements[1] = k_735290;
-+closureN_type c_7316927;
-+object e_7316985 [2];
-+c_7316927.hdr.mark = gc_color_red;
-+ c_7316927.hdr.grayed = 0;
-+c_7316927.tag = closureN_tag;
-+ c_7316927.fn = (function_type)__lambda_445;
-+c_7316927.num_args = 1;
-+c_7316927.num_elements = 2;
-+c_7316927.elements = (object *)e_7316985;
-+c_7316927.elements[0] = f_73558_732824;
-+c_7316927.elements[1] = k_734845;
++closureN_type c_7316920;
++object e_7316978 [2];
++c_7316920.hdr.mark = gc_color_red;
++ c_7316920.hdr.grayed = 0;
++c_7316920.tag = closureN_tag;
++ c_7316920.fn = (function_type)__lambda_445;
++c_7316920.num_args = 1;
++c_7316920.num_elements = 2;
++c_7316920.elements = (object *)e_7316978;
++c_7316920.elements[0] = f_73558_732817;
++c_7316920.elements[1] = k_734838;
  
  
 -pair_type local_7318281; 
 -return_direct_with_clo1(data,(closure)&c_7318220,__lambda_445,  set_pair_as_expr(&local_7318281, lis1_73559_733165, lists_73560_733166));
-+pair_type local_7316988; 
-+return_direct_with_clo1(data,(closure)&c_7316927,__lambda_445,  set_pair_as_expr(&local_7316988, lis1_73559_732825, lists_73560_732826));
++pair_type local_7316981; 
++return_direct_with_clo1(data,(closure)&c_7316920,__lambda_445,  set_pair_as_expr(&local_7316981, lis1_73559_732818, lists_73560_732819));
  } else { 
      
    
 -if( (boolean_f != Cyc_is_null(Cyc_cdr(data, lis1_73559_733165))) ){ 
-+if( (boolean_f != Cyc_is_null(Cyc_cdr(data, lis1_73559_732825))) ){ 
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, lis1_73559_732818))) ){ 
    
  
 -return_closcall2(data,  f_73558_733164,  k_735290, Cyc_car(data, lis1_73559_733165));
-+return_closcall2(data,  f_73558_732824,  k_734845, Cyc_car(data, lis1_73559_732825));
++return_closcall2(data,  f_73558_732817,  k_734838, Cyc_car(data, lis1_73559_732818));
  } else { 
    
 -closureN_type c_7318290;
@@ -49572,43 +49789,43 @@ Make let-values be the same as let*-values, to work around
 -c_7318290.elements[0] = f_73558_733164;
 -c_7318290.elements[1] = k_735290;
 -c_7318290.elements[2] = lis1_73559_733165;
-+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_455;
-+c_7316997.num_args = 1;
-+c_7316997.num_elements = 3;
-+c_7316997.elements = (object *)e_7317004;
-+c_7316997.elements[0] = f_73558_732824;
-+c_7316997.elements[1] = k_734845;
-+c_7316997.elements[2] = lis1_73559_732825;
++closureN_type c_7316990;
++object e_7316997 [3];
++c_7316990.hdr.mark = gc_color_red;
++ c_7316990.hdr.grayed = 0;
++c_7316990.tag = closureN_tag;
++ c_7316990.fn = (function_type)__lambda_455;
++c_7316990.num_args = 1;
++c_7316990.num_elements = 3;
++c_7316990.elements = (object *)e_7316997;
++c_7316990.elements[0] = f_73558_732817;
++c_7316990.elements[1] = k_734838;
++c_7316990.elements[2] = lis1_73559_732818;
  
  
  
 -return_closcall2(data,  f_73558_733164,  &c_7318290, Cyc_car(data, lis1_73559_733165));}
-+return_closcall2(data,  f_73558_732824,  &c_7316997, Cyc_car(data, lis1_73559_732825));}
++return_closcall2(data,  f_73558_732817,  &c_7316990, Cyc_car(data, lis1_73559_732818));}
  ;}
  ;}
  ;; 
  }
  
 -static void __lambda_455(void *data, object self_7313370, int argc, object *args) /* object self_7313370, object r_735305 */
-+static void __lambda_455(void *data, object self_7312124, int argc, object *args) /* object self_7312124, object r_734860 */
++static void __lambda_455(void *data, object self_7312117, int argc, object *args) /* object self_7312117, object r_734853 */
   {
  
    
  
 -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_7313370)->elements[1], ((closureN)self_7313370)->elements[0], Cyc_cdr(data, ((closureN)self_7313370)->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_7312124)->elements[1], ((closureN)self_7312124)->elements[0], Cyc_cdr(data, ((closureN)self_7312124)->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_7312117)->elements[1], ((closureN)self_7312117)->elements[0], Cyc_cdr(data, ((closureN)self_7312117)->elements[2]));; 
  }
  
 -static void __lambda_445(void *data, object self_7313359, int argc, object *args) /* object self_7313359, object lists_73562_733167 */
-+static void __lambda_445(void *data, object self_7312113, int argc, object *args) /* object self_7312113, object lists_73562_732827 */
++static void __lambda_445(void *data, object self_7312106, int argc, object *args) /* object self_7312106, object lists_73562_732820 */
   {
 - object lists_73562_733167 = args[0];
-+ object lists_73562_732827 = args[0];
++ object lists_73562_732820 = args[0];
    
 -closureN_type c_7318222;
 -object e_7318277 [3];
@@ -49622,28 +49839,28 @@ Make let-values be the same as let*-values, to work around
 -c_7318222.elements[0] = ((closureN)self_7313359)->elements[0];
 -c_7318222.elements[1] = ((closureN)self_7313359)->elements[1];
 -c_7318222.elements[2] = lists_73562_733167;
-+closureN_type c_7316929;
-+object e_7316984 [3];
-+c_7316929.hdr.mark = gc_color_red;
-+ c_7316929.hdr.grayed = 0;
-+c_7316929.tag = closureN_tag;
-+ c_7316929.fn = (function_type)__lambda_446;
-+c_7316929.num_args = 1;
-+c_7316929.num_elements = 3;
-+c_7316929.elements = (object *)e_7316984;
-+c_7316929.elements[0] = ((closureN)self_7312113)->elements[0];
-+c_7316929.elements[1] = ((closureN)self_7312113)->elements[1];
-+c_7316929.elements[2] = lists_73562_732827;
++closureN_type c_7316922;
++object e_7316977 [3];
++c_7316922.hdr.mark = gc_color_red;
++ c_7316922.hdr.grayed = 0;
++c_7316922.tag = closureN_tag;
++ c_7316922.fn = (function_type)__lambda_446;
++c_7316922.num_args = 1;
++c_7316922.num_elements = 3;
++c_7316922.elements = (object *)e_7316977;
++c_7316922.elements[0] = ((closureN)self_7312106)->elements[0];
++c_7316922.elements[1] = ((closureN)self_7312106)->elements[1];
++c_7316922.elements[2] = lists_73562_732820;
  
 -return_direct_with_clo1(data,(closure)&c_7318222,__lambda_446,  boolean_f);; 
-+return_direct_with_clo1(data,(closure)&c_7316929,__lambda_446,  boolean_f);; 
++return_direct_with_clo1(data,(closure)&c_7316922,__lambda_446,  boolean_f);; 
  }
  
 -static void __lambda_446(void *data, object self_7313360, int argc, object *args) /* object self_7313360, object recur_73563_733168 */
-+static void __lambda_446(void *data, object self_7312114, int argc, object *args) /* object self_7312114, object recur_73563_732828 */
++static void __lambda_446(void *data, object self_7312107, int argc, object *args) /* object self_7312107, object recur_73563_732821 */
   {
 - object recur_73563_733168 = args[0];
-+ object recur_73563_732828 = args[0];
++ object recur_73563_732821 = args[0];
    
 -closureN_type c_7318224;
 -object e_7318273 [3];
@@ -49657,31 +49874,31 @@ Make let-values be the same as let*-values, to work around
 -c_7318224.elements[0] = ((closureN)self_7313360)->elements[0];
 -c_7318224.elements[1] = ((closureN)self_7313360)->elements[1];
 -c_7318224.elements[2] = ((closureN)self_7313360)->elements[2];
-+closureN_type c_7316931;
-+object e_7316980 [3];
-+c_7316931.hdr.mark = gc_color_red;
-+ c_7316931.hdr.grayed = 0;
-+c_7316931.tag = closureN_tag;
-+ c_7316931.fn = (function_type)__lambda_1312;
-+c_7316931.num_args = 1;
-+c_7316931.num_elements = 3;
-+c_7316931.elements = (object *)e_7316980;
-+c_7316931.elements[0] = ((closureN)self_7312114)->elements[0];
-+c_7316931.elements[1] = ((closureN)self_7312114)->elements[1];
-+c_7316931.elements[2] = ((closureN)self_7312114)->elements[2];
++closureN_type c_7316924;
++object e_7316973 [3];
++c_7316924.hdr.mark = gc_color_red;
++ c_7316924.hdr.grayed = 0;
++c_7316924.tag = closureN_tag;
++ c_7316924.fn = (function_type)__lambda_1312;
++c_7316924.num_args = 1;
++c_7316924.num_elements = 3;
++c_7316924.elements = (object *)e_7316973;
++c_7316924.elements[0] = ((closureN)self_7312107)->elements[0];
++c_7316924.elements[1] = ((closureN)self_7312107)->elements[1];
++c_7316924.elements[2] = ((closureN)self_7312107)->elements[2];
  
  
 -pair_type local_7318276; 
 -return_direct_with_clo1(data,(closure)&c_7318224,__lambda_1359,  set_cell_as_expr(&local_7318276, recur_73563_733168));; 
-+pair_type local_7316983; 
-+return_direct_with_clo1(data,(closure)&c_7316931,__lambda_1312,  set_cell_as_expr(&local_7316983, recur_73563_732828));; 
++pair_type local_7316976; 
++return_direct_with_clo1(data,(closure)&c_7316924,__lambda_1312,  set_cell_as_expr(&local_7316976, recur_73563_732821));; 
  }
  
 -static void __lambda_1359(void *data, object self_7313361, int argc, object *args) /* object self_7313361, object recur_73563_733168 */
-+static void __lambda_1312(void *data, object self_7312115, int argc, object *args) /* object self_7312115, object recur_73563_732828 */
++static void __lambda_1312(void *data, object self_7312108, int argc, object *args) /* object self_7312108, object recur_73563_732821 */
   {
 - object recur_73563_733168 = args[0];
-+ object recur_73563_732828 = args[0];
++ object recur_73563_732821 = args[0];
    
 -closureN_type c_7318226;
 -object e_7318239 [3];
@@ -49695,8 +49912,20 @@ Make let-values be the same as let*-values, to work around
 -c_7318226.elements[0] = ((closureN)self_7313361)->elements[1];
 -c_7318226.elements[1] = ((closureN)self_7313361)->elements[2];
 -c_7318226.elements[2] = recur_73563_733168;
--
--
++closureN_type c_7316926;
++object e_7316939 [3];
++c_7316926.hdr.mark = gc_color_red;
++ c_7316926.hdr.grayed = 0;
++c_7316926.tag = closureN_tag;
++ c_7316926.fn = (function_type)__lambda_447;
++c_7316926.num_args = 1;
++c_7316926.num_elements = 3;
++c_7316926.elements = (object *)e_7316939;
++c_7316926.elements[0] = ((closureN)self_7312108)->elements[1];
++c_7316926.elements[1] = ((closureN)self_7312108)->elements[2];
++c_7316926.elements[2] = recur_73563_732821;
+ 
+ 
 -closureN_type c_7318240;
 -object e_7318272 [2];
 -c_7318240.hdr.mark = gc_color_red;
@@ -49708,14 +49937,28 @@ Make let-values be the same as let*-values, to work around
 -c_7318240.elements = (object *)e_7318272;
 -c_7318240.elements[0] = ((closureN)self_7313361)->elements[0];
 -c_7318240.elements[1] = recur_73563_733168;
--
++closureN_type c_7316940;
++object e_7316972 [2];
++c_7316940.hdr.mark = gc_color_red;
++ c_7316940.hdr.grayed = 0;
++c_7316940.tag = closureN_tag;
++ c_7316940.fn = (function_type)__lambda_449;
++c_7316940.num_args = 1;
++c_7316940.num_elements = 2;
++c_7316940.elements = (object *)e_7316972;
++c_7316940.elements[0] = ((closureN)self_7312108)->elements[0];
++c_7316940.elements[1] = recur_73563_732821;
+ 
 -return_direct_with_clo1(data,(closure)&c_7318226,__lambda_447,  &c_7318240);; 
--}
--
++return_direct_with_clo1(data,(closure)&c_7316926,__lambda_447,  &c_7316940);; 
+ }
+ 
 -static void __lambda_449(void *data, object self_7313362, int argc, object *args) /* object self_7313362, object k_735296, object lists_73564_733169 */
-- {
++static void __lambda_449(void *data, object self_7312109, int argc, object *args) /* object self_7312109, object k_734844, object lists_73564_732822 */
+  {
 - object k_735296 = args[0]; object lists_73564_733169 = args[1];
--  
++ object k_734844 = args[0]; object lists_73564_732822 = args[1];
+   
 -closureN_type c_7318242;
 -object e_7318267 [3];
 -c_7318242.hdr.mark = gc_color_red;
@@ -49728,18 +49971,18 @@ Make let-values be the same as let*-values, to work around
 -c_7318242.elements[0] = ((closureN)self_7313362)->elements[0];
 -c_7318242.elements[1] = k_735296;
 -c_7318242.elements[2] = ((closureN)self_7313362)->elements[1];
-+closureN_type c_7316933;
-+object e_7316946 [3];
-+c_7316933.hdr.mark = gc_color_red;
-+ c_7316933.hdr.grayed = 0;
-+c_7316933.tag = closureN_tag;
-+ c_7316933.fn = (function_type)__lambda_447;
-+c_7316933.num_args = 1;
-+c_7316933.num_elements = 3;
-+c_7316933.elements = (object *)e_7316946;
-+c_7316933.elements[0] = ((closureN)self_7312115)->elements[1];
-+c_7316933.elements[1] = ((closureN)self_7312115)->elements[2];
-+c_7316933.elements[2] = recur_73563_732828;
++closureN_type c_7316942;
++object e_7316967 [3];
++c_7316942.hdr.mark = gc_color_red;
++ c_7316942.hdr.grayed = 0;
++c_7316942.tag = closureN_tag;
++ c_7316942.fn = (function_type)__lambda_450;
++c_7316942.num_args = 1;
++c_7316942.num_elements = 3;
++c_7316942.elements = (object *)e_7316967;
++c_7316942.elements[0] = ((closureN)self_7312109)->elements[0];
++c_7316942.elements[1] = k_734844;
++c_7316942.elements[2] = ((closureN)self_7312109)->elements[1];
  
  
 -closureN_type c_7318268;
@@ -49752,68 +49995,35 @@ Make let-values be the same as let*-values, to work around
 -c_7318268.num_elements = 1;
 -c_7318268.elements = (object *)e_7318271;
 -c_7318268.elements[0] = lists_73564_733169;
-+closureN_type c_7316947;
-+object e_7316979 [2];
-+c_7316947.hdr.mark = gc_color_red;
-+ c_7316947.hdr.grayed = 0;
-+c_7316947.tag = closureN_tag;
-+ c_7316947.fn = (function_type)__lambda_449;
-+c_7316947.num_args = 1;
-+c_7316947.num_elements = 2;
-+c_7316947.elements = (object *)e_7316979;
-+c_7316947.elements[0] = ((closureN)self_7312115)->elements[0];
-+c_7316947.elements[1] = recur_73563_732828;
-+
-+return_direct_with_clo1(data,(closure)&c_7316933,__lambda_447,  &c_7316947);; 
-+}
++closureN_type c_7316968;
++object e_7316971 [1];
++c_7316968.hdr.mark = gc_color_red;
++ c_7316968.hdr.grayed = 0;
++c_7316968.tag = closureN_tag;
++ c_7316968.fn = (function_type)__lambda_454;
++c_7316968.num_args = 0;
++c_7316968.num_elements = 1;
++c_7316968.elements = (object *)e_7316971;
++c_7316968.elements[0] = lists_73564_732822;
  
 -return_direct_with_clo1(data,(closure)&c_7318242,__lambda_450,  &c_7318268);; 
-+static void __lambda_449(void *data, object self_7312116, int argc, object *args) /* object self_7312116, object k_734851, object lists_73564_732829 */
-+ {
-+ object k_734851 = args[0]; object lists_73564_732829 = args[1];
-+  
-+closureN_type c_7316949;
-+object e_7316974 [3];
-+c_7316949.hdr.mark = gc_color_red;
-+ c_7316949.hdr.grayed = 0;
-+c_7316949.tag = closureN_tag;
-+ c_7316949.fn = (function_type)__lambda_450;
-+c_7316949.num_args = 1;
-+c_7316949.num_elements = 3;
-+c_7316949.elements = (object *)e_7316974;
-+c_7316949.elements[0] = ((closureN)self_7312116)->elements[0];
-+c_7316949.elements[1] = k_734851;
-+c_7316949.elements[2] = ((closureN)self_7312116)->elements[1];
-+
-+
-+closureN_type c_7316975;
-+object e_7316978 [1];
-+c_7316975.hdr.mark = gc_color_red;
-+ c_7316975.hdr.grayed = 0;
-+c_7316975.tag = closureN_tag;
-+ c_7316975.fn = (function_type)__lambda_454;
-+c_7316975.num_args = 0;
-+c_7316975.num_elements = 1;
-+c_7316975.elements = (object *)e_7316978;
-+c_7316975.elements[0] = lists_73564_732829;
-+
-+return_direct_with_clo1(data,(closure)&c_7316949,__lambda_450,  &c_7316975);; 
++return_direct_with_clo1(data,(closure)&c_7316942,__lambda_450,  &c_7316968);; 
  }
  
 -static void __lambda_454(void *data, object self_7313363, int argc, object *args) /* object self_7313363, object k_735302 */
-+static void __lambda_454(void *data, object self_7312117, int argc, object *args) /* object self_7312117, object k_734857 */
++static void __lambda_454(void *data, object self_7312110, int argc, object *args) /* object self_7312110, object k_734850 */
   {
 - object k_735302 = args[0];
 -  return_direct_with_clo2(data,  __glo__75cars_87cdrs_scheme_base, (((closure)  __glo__75cars_87cdrs_scheme_base)->fn),  k_735302, ((closureN)self_7313363)->elements[0]);; 
-+ object k_734857 = args[0];
-+  return_direct_with_clo2(data,  __glo__75cars_87cdrs_scheme_base, (((closure)  __glo__75cars_87cdrs_scheme_base)->fn),  k_734857, ((closureN)self_7312117)->elements[0]);; 
++ object k_734850 = args[0];
++  return_direct_with_clo2(data,  __glo__75cars_87cdrs_scheme_base, (((closure)  __glo__75cars_87cdrs_scheme_base)->fn),  k_734850, ((closureN)self_7312110)->elements[0]);; 
  }
  
 -static void __lambda_450(void *data, object self_7313364, int argc, object *args) /* object self_7313364, object r_735297 */
-+static void __lambda_450(void *data, object self_7312118, int argc, object *args) /* object self_7312118, object r_734852 */
++static void __lambda_450(void *data, object self_7312111, int argc, object *args) /* object self_7312111, object r_734845 */
   {
 - object r_735297 = args[0];
-+ object r_734852 = args[0];
++ object r_734845 = args[0];
    
 -closureN_type c_7318244;
 -object e_7318248 [2];
@@ -49826,17 +50036,17 @@ Make let-values be the same as let*-values, to work around
 -c_7318244.elements = (object *)e_7318248;
 -c_7318244.elements[0] = ((closureN)self_7313364)->elements[1];
 -c_7318244.elements[1] = r_735297;
-+closureN_type c_7316951;
-+object e_7316955 [2];
-+c_7316951.hdr.mark = gc_color_red;
-+ c_7316951.hdr.grayed = 0;
-+c_7316951.tag = closureN_tag;
-+ c_7316951.fn = (function_type)__lambda_451;
-+c_7316951.num_args = 1;
-+c_7316951.num_elements = 2;
-+c_7316951.elements = (object *)e_7316955;
-+c_7316951.elements[0] = ((closureN)self_7312118)->elements[1];
-+c_7316951.elements[1] = r_734852;
++closureN_type c_7316944;
++object e_7316948 [2];
++c_7316944.hdr.mark = gc_color_red;
++ c_7316944.hdr.grayed = 0;
++c_7316944.tag = closureN_tag;
++ c_7316944.fn = (function_type)__lambda_451;
++c_7316944.num_args = 1;
++c_7316944.num_elements = 2;
++c_7316944.elements = (object *)e_7316948;
++c_7316944.elements[0] = ((closureN)self_7312111)->elements[1];
++c_7316944.elements[1] = r_734845;
  
  
 -closureN_type c_7318249;
@@ -49850,30 +50060,30 @@ Make let-values be the same as let*-values, to work around
 -c_7318249.elements = (object *)e_7318266;
 -c_7318249.elements[0] = ((closureN)self_7313364)->elements[0];
 -c_7318249.elements[1] = ((closureN)self_7313364)->elements[2];
-+closureN_type c_7316956;
-+object e_7316973 [2];
-+c_7316956.hdr.mark = gc_color_red;
-+ c_7316956.hdr.grayed = 0;
-+c_7316956.tag = closureN_tag;
-+ c_7316956.fn = (function_type)__lambda_452;
-+c_7316956.num_args = 2;
-+c_7316956.num_elements = 2;
-+c_7316956.elements = (object *)e_7316973;
-+c_7316956.elements[0] = ((closureN)self_7312118)->elements[0];
-+c_7316956.elements[1] = ((closureN)self_7312118)->elements[2];
++closureN_type c_7316949;
++object e_7316966 [2];
++c_7316949.hdr.mark = gc_color_red;
++ c_7316949.hdr.grayed = 0;
++c_7316949.tag = closureN_tag;
++ c_7316949.fn = (function_type)__lambda_452;
++c_7316949.num_args = 2;
++c_7316949.num_elements = 2;
++c_7316949.elements = (object *)e_7316966;
++c_7316949.elements[0] = ((closureN)self_7312111)->elements[0];
++c_7316949.elements[1] = ((closureN)self_7312111)->elements[2];
  
 -return_direct_with_clo1(data,(closure)&c_7318244,__lambda_451,  &c_7318249);; 
-+return_direct_with_clo1(data,(closure)&c_7316951,__lambda_451,  &c_7316956);; 
++return_direct_with_clo1(data,(closure)&c_7316944,__lambda_451,  &c_7316949);; 
  }
  
 -static void __lambda_452(void *data, object self_7313365, int argc, object *args) /* object self_7313365, object k_735299, object cars_73565_733170, object cdrs_73566_733171 */
-+static void __lambda_452(void *data, object self_7312119, int argc, object *args) /* object self_7312119, object k_734854, object cars_73565_732830, object cdrs_73566_732831 */
++static void __lambda_452(void *data, object self_7312112, int argc, object *args) /* object self_7312112, object k_734847, object cars_73565_732823, object cdrs_73566_732824 */
   {
 - object k_735299 = args[0]; object cars_73565_733170 = args[1]; object cdrs_73566_733171 = args[2];
-+ object k_734854 = args[0]; object cars_73565_732830 = args[1]; object cdrs_73566_732831 = args[2];
++ object k_734847 = args[0]; object cars_73565_732823 = args[1]; object cdrs_73566_732824 = args[2];
      
 -if( (boolean_f != Cyc_is_pair(cars_73565_733170)) ){ 
-+if( (boolean_f != Cyc_is_pair(cars_73565_732830)) ){ 
++if( (boolean_f != Cyc_is_pair(cars_73565_732823)) ){ 
    
 -closureN_type c_7318253;
 -object e_7318260 [3];
@@ -49887,54 +50097,54 @@ Make let-values be the same as let*-values, to work around
 -c_7318253.elements[0] = cdrs_73566_733171;
 -c_7318253.elements[1] = k_735299;
 -c_7318253.elements[2] = ((closureN)self_7313365)->elements[1];
-+closureN_type c_7316960;
-+object e_7316967 [3];
-+c_7316960.hdr.mark = gc_color_red;
-+ c_7316960.hdr.grayed = 0;
-+c_7316960.tag = closureN_tag;
-+ c_7316960.fn = (function_type)__lambda_453;
-+c_7316960.num_args = 1;
-+c_7316960.num_elements = 3;
-+c_7316960.elements = (object *)e_7316967;
-+c_7316960.elements[0] = cdrs_73566_732831;
-+c_7316960.elements[1] = k_734854;
-+c_7316960.elements[2] = ((closureN)self_7312119)->elements[1];
++closureN_type c_7316953;
++object e_7316960 [3];
++c_7316953.hdr.mark = gc_color_red;
++ c_7316953.hdr.grayed = 0;
++c_7316953.tag = closureN_tag;
++ c_7316953.fn = (function_type)__lambda_453;
++c_7316953.num_args = 1;
++c_7316953.num_elements = 3;
++c_7316953.elements = (object *)e_7316960;
++c_7316953.elements[0] = cdrs_73566_732824;
++c_7316953.elements[1] = k_734847;
++c_7316953.elements[2] = ((closureN)self_7312112)->elements[1];
  
  
 -object c_7318263 = apply(data,(closure)&c_7318253,((closureN)self_7313365)->elements[0], cars_73565_733170);
 -return_closcall1(data,(closure)&c_7318253,  c_7318263);
-+object c_7316970 = apply(data,(closure)&c_7316960,((closureN)self_7312119)->elements[0], cars_73565_732830);
-+return_closcall1(data,(closure)&c_7316960,  c_7316970);
++object c_7316963 = apply(data,(closure)&c_7316953,((closureN)self_7312112)->elements[0], cars_73565_732823);
++return_closcall1(data,(closure)&c_7316953,  c_7316963);
  } else { 
 -  return_direct_with_clo1(data,  k_735299, (((closure)  k_735299)->fn),  Cyc_VOID);}
-+  return_direct_with_clo1(data,  k_734854, (((closure)  k_734854)->fn),  Cyc_VOID);}
++  return_direct_with_clo1(data,  k_734847, (((closure)  k_734847)->fn),  Cyc_VOID);}
  ;; 
  }
  
 -static void __lambda_453(void *data, object self_7313366, int argc, object *args) /* object self_7313366, object r_735301 */
-+static void __lambda_453(void *data, object self_7312120, int argc, object *args) /* object self_7312120, object r_734856 */
++static void __lambda_453(void *data, object self_7312113, int argc, object *args) /* object self_7312113, object r_734849 */
   {
  
    
  
 -return_closcall2(data,  car(((closureN)self_7313366)->elements[2]),  ((closureN)self_7313366)->elements[1], ((closureN)self_7313366)->elements[0]);; 
-+return_closcall2(data,  car(((closureN)self_7312120)->elements[2]),  ((closureN)self_7312120)->elements[1], ((closureN)self_7312120)->elements[0]);; 
++return_closcall2(data,  car(((closureN)self_7312113)->elements[2]),  ((closureN)self_7312113)->elements[1], ((closureN)self_7312113)->elements[0]);; 
  }
  
 -static void __lambda_451(void *data, object self_7313367, int argc, object *args) /* object self_7313367, object r_735298 */
-+static void __lambda_451(void *data, object self_7312121, int argc, object *args) /* object self_7312121, object r_734853 */
++static void __lambda_451(void *data, object self_7312114, int argc, object *args) /* object self_7312114, object r_734846 */
   {
 - object r_735298 = args[0];
 -  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_7313367)->elements[0], ((closureN)self_7313367)->elements[1], r_735298);; 
-+ object r_734853 = args[0];
-+  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_7312121)->elements[0], ((closureN)self_7312121)->elements[1], r_734853);; 
++ object r_734846 = args[0];
++  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_7312114)->elements[0], ((closureN)self_7312114)->elements[1], r_734846);; 
  }
  
 -static void __lambda_447(void *data, object self_7313368, int argc, object *args) /* object self_7313368, object r_735295 */
-+static void __lambda_447(void *data, object self_7312122, int argc, object *args) /* object self_7312122, object r_734850 */
++static void __lambda_447(void *data, object self_7312115, int argc, object *args) /* object self_7312115, object r_734843 */
   {
 - object r_735295 = args[0];
-+ object r_734850 = args[0];
++ object r_734843 = args[0];
    
 -closureN_type c_7318228;
 -object e_7318235 [3];
@@ -49948,63 +50158,62 @@ Make let-values be the same as let*-values, to work around
 -c_7318228.elements[0] = ((closureN)self_7313368)->elements[0];
 -c_7318228.elements[1] = ((closureN)self_7313368)->elements[1];
 -c_7318228.elements[2] = ((closureN)self_7313368)->elements[2];
-+closureN_type c_7316935;
-+object e_7316942 [3];
-+c_7316935.hdr.mark = gc_color_red;
-+ c_7316935.hdr.grayed = 0;
-+c_7316935.tag = closureN_tag;
-+ c_7316935.fn = (function_type)__lambda_448;
-+c_7316935.num_args = 1;
-+c_7316935.num_elements = 3;
-+c_7316935.elements = (object *)e_7316942;
-+c_7316935.elements[0] = ((closureN)self_7312122)->elements[0];
-+c_7316935.elements[1] = ((closureN)self_7312122)->elements[1];
-+c_7316935.elements[2] = ((closureN)self_7312122)->elements[2];
++closureN_type c_7316928;
++object e_7316935 [3];
++c_7316928.hdr.mark = gc_color_red;
++ c_7316928.hdr.grayed = 0;
++c_7316928.tag = closureN_tag;
++ c_7316928.fn = (function_type)__lambda_448;
++c_7316928.num_args = 1;
++c_7316928.num_elements = 3;
++c_7316928.elements = (object *)e_7316935;
++c_7316928.elements[0] = ((closureN)self_7312115)->elements[0];
++c_7316928.elements[1] = ((closureN)self_7312115)->elements[1];
++c_7316928.elements[2] = ((closureN)self_7312115)->elements[2];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7318228,__lambda_448,  Cyc_set_cell(data, ((closureN)self_7313368)->elements[2], r_735295));; 
-+return_direct_with_clo1(data,(closure)&c_7316935,__lambda_448,  Cyc_set_cell(data, ((closureN)self_7312122)->elements[2], r_734850));; 
++return_direct_with_clo1(data,(closure)&c_7316928,__lambda_448,  Cyc_set_cell(data, ((closureN)self_7312115)->elements[2], r_734843));; 
  }
  
 -static void __lambda_448(void *data, object self_7313369, int argc, object *args) /* object self_7313369, object r_735294 */
-+static void __lambda_448(void *data, object self_7312123, int argc, object *args) /* object self_7312123, object r_734849 */
++static void __lambda_448(void *data, object self_7312116, int argc, object *args) /* object self_7312116, object r_734842 */
   {
  
    
  
 -return_closcall2(data,  car(((closureN)self_7313369)->elements[2]),  ((closureN)self_7313369)->elements[0], ((closureN)self_7313369)->elements[1]);; 
-+return_closcall2(data,  car(((closureN)self_7312123)->elements[2]),  ((closureN)self_7312123)->elements[0], ((closureN)self_7312123)->elements[1]);; 
++return_closcall2(data,  car(((closureN)self_7312116)->elements[2]),  ((closureN)self_7312116)->elements[0], ((closureN)self_7312116)->elements[1]);; 
  }
  
 -static void __lambda_442(void *data, object _, int argc, object *args) /* closure _,object k_735279, object f_73551_733160, object lst1_73552_733161, object lst2_73553_733162 */
-+static void __lambda_442(void *data, object _, int argc, object *args) /* closure _,object k_734834, object f_73551_732820, object lst1_73552_732821, object lst2_73553_732822 */
++static void __lambda_442(void *data, object _, int argc, object *args) /* closure _,object k_734827, object f_73551_732813, object lst1_73552_732814, object lst2_73553_732815 */
   {
 -object k_735279 = args[0]; object f_73551_733160 = args[1]; object lst1_73552_733161 = args[2]; object lst2_73553_733162 = args[3];
 -  object r_735280;
--  Cyc_st_add(data, "scheme/base.sld:Cyc-for-each-loop-2");
-+object k_734834 = args[0]; object f_73551_732820 = args[1]; object lst1_73552_732821 = args[2]; object lst2_73553_732822 = args[3];
-+  object r_734835;
-+  Cyc_st_add(data, "base.sld:Cyc-for-each-loop-2");
++object k_734827 = args[0]; object f_73551_732813 = args[1]; object lst1_73552_732814 = args[2]; object lst2_73553_732815 = args[3];
++  object r_734828;
+   Cyc_st_add(data, "scheme/base.sld:Cyc-for-each-loop-2");
    
 -if( (boolean_f != Cyc_is_null(lst1_73552_733161)) ){ 
-+if( (boolean_f != Cyc_is_null(lst1_73552_732821)) ){ 
++if( (boolean_f != Cyc_is_null(lst1_73552_732814)) ){ 
    
 -  r_735280 = Cyc_is_null(lst1_73552_733161);
-+  r_734835 = Cyc_is_null(lst1_73552_732821);
++  r_734828 = Cyc_is_null(lst1_73552_732814);
  } else { 
    
 -  r_735280 = Cyc_is_null(lst2_73553_733162);}
 -;if( (boolean_f != r_735280) ){ 
-+  r_734835 = Cyc_is_null(lst2_73553_732822);}
-+;if( (boolean_f != r_734835) ){ 
++  r_734828 = Cyc_is_null(lst2_73553_732815);}
++;if( (boolean_f != r_734828) ){ 
    
 -complex_num_type local_7318196; 
 -return_direct_with_clo1(data,  k_735279, (((closure)  k_735279)->fn),  ((inline_function_type)
 -                   ((closure)__glo_void_191_191inline_191_191_scheme_base)->fn)(data,&local_7318196));
-+complex_num_type local_7316903; 
-+return_direct_with_clo1(data,  k_734834, (((closure)  k_734834)->fn),  ((inline_function_type)
-+                   ((closure)__glo_void_191_191inline_191_191_scheme_base)->fn)(data,&local_7316903));
++complex_num_type local_7316896; 
++return_direct_with_clo1(data,  k_734827, (((closure)  k_734827)->fn),  ((inline_function_type)
++                   ((closure)__glo_void_191_191inline_191_191_scheme_base)->fn)(data,&local_7316896));
  } else { 
    
 -closureN_type c_7318198;
@@ -50020,31 +50229,31 @@ Make let-values be the same as let*-values, to work around
 -c_7318198.elements[1] = k_735279;
 -c_7318198.elements[2] = lst1_73552_733161;
 -c_7318198.elements[3] = lst2_73553_733162;
-+closureN_type c_7316905;
-+object e_7316915 [4];
-+c_7316905.hdr.mark = gc_color_red;
-+ c_7316905.hdr.grayed = 0;
-+c_7316905.tag = closureN_tag;
-+ c_7316905.fn = (function_type)__lambda_443;
-+c_7316905.num_args = 1;
-+c_7316905.num_elements = 4;
-+c_7316905.elements = (object *)e_7316915;
-+c_7316905.elements[0] = f_73551_732820;
-+c_7316905.elements[1] = k_734834;
-+c_7316905.elements[2] = lst1_73552_732821;
-+c_7316905.elements[3] = lst2_73553_732822;
++closureN_type c_7316898;
++object e_7316908 [4];
++c_7316898.hdr.mark = gc_color_red;
++ c_7316898.hdr.grayed = 0;
++c_7316898.tag = closureN_tag;
++ c_7316898.fn = (function_type)__lambda_443;
++c_7316898.num_args = 1;
++c_7316898.num_elements = 4;
++c_7316898.elements = (object *)e_7316908;
++c_7316898.elements[0] = f_73551_732813;
++c_7316898.elements[1] = k_734827;
++c_7316898.elements[2] = lst1_73552_732814;
++c_7316898.elements[3] = lst2_73553_732815;
  
  
  
  
  
 -return_closcall3(data,  f_73551_733160,  &c_7318198, Cyc_car(data, lst1_73552_733161), Cyc_car(data, lst2_73553_733162));}
-+return_closcall3(data,  f_73551_732820,  &c_7316905, Cyc_car(data, lst1_73552_732821), Cyc_car(data, lst2_73553_732822));}
++return_closcall3(data,  f_73551_732813,  &c_7316898, Cyc_car(data, lst1_73552_732814), Cyc_car(data, lst2_73553_732815));}
  ;; 
  }
  
 -static void __lambda_443(void *data, object self_7313358, int argc, object *args) /* object self_7313358, object r_735281 */
-+static void __lambda_443(void *data, object self_7312112, int argc, object *args) /* object self_7312112, object r_734836 */
++static void __lambda_443(void *data, object self_7312105, int argc, object *args) /* object self_7312105, object r_734829 */
   {
  
    
@@ -50052,26 +50261,25 @@ Make let-values be the same as let*-values, to work around
  
  
 -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_7313358)->elements[1], ((closureN)self_7313358)->elements[0], Cyc_cdr(data, ((closureN)self_7313358)->elements[2]), Cyc_cdr(data, ((closureN)self_7313358)->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_7312112)->elements[1], ((closureN)self_7312112)->elements[0], Cyc_cdr(data, ((closureN)self_7312112)->elements[2]), Cyc_cdr(data, ((closureN)self_7312112)->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_7312105)->elements[1], ((closureN)self_7312105)->elements[0], Cyc_cdr(data, ((closureN)self_7312105)->elements[2]), Cyc_cdr(data, ((closureN)self_7312105)->elements[3]));; 
  }
  
 -static void __lambda_440(void *data, object _, int argc, object *args) /* closure _,object k_735272, object f_73549_733158, object lst_73550_733159 */
-+static void __lambda_440(void *data, object _, int argc, object *args) /* closure _,object k_734827, object f_73549_732818, object lst_73550_732819 */
++static void __lambda_440(void *data, object _, int argc, object *args) /* closure _,object k_734820, object f_73549_732811, object lst_73550_732812 */
   {
 -object k_735272 = args[0]; object f_73549_733158 = args[1]; object lst_73550_733159 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:Cyc-for-each-loop-1");
-+object k_734827 = args[0]; object f_73549_732818 = args[1]; object lst_73550_732819 = args[2];
-+  Cyc_st_add(data, "base.sld:Cyc-for-each-loop-1");
++object k_734820 = args[0]; object f_73549_732811 = args[1]; object lst_73550_732812 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:Cyc-for-each-loop-1");
    
 -if( (boolean_f != Cyc_is_null(lst_73550_733159)) ){ 
-+if( (boolean_f != Cyc_is_null(lst_73550_732819)) ){ 
++if( (boolean_f != Cyc_is_null(lst_73550_732812)) ){ 
    
 -complex_num_type local_7318171; 
 -return_direct_with_clo1(data,  k_735272, (((closure)  k_735272)->fn),  ((inline_function_type)
 -                   ((closure)__glo_void_191_191inline_191_191_scheme_base)->fn)(data,&local_7318171));
-+complex_num_type local_7316878; 
-+return_direct_with_clo1(data,  k_734827, (((closure)  k_734827)->fn),  ((inline_function_type)
-+                   ((closure)__glo_void_191_191inline_191_191_scheme_base)->fn)(data,&local_7316878));
++complex_num_type local_7316871; 
++return_direct_with_clo1(data,  k_734820, (((closure)  k_734820)->fn),  ((inline_function_type)
++                   ((closure)__glo_void_191_191inline_191_191_scheme_base)->fn)(data,&local_7316871));
  } else { 
    
 -closureN_type c_7318173;
@@ -50086,59 +50294,58 @@ Make let-values be the same as let*-values, to work around
 -c_7318173.elements[0] = f_73549_733158;
 -c_7318173.elements[1] = k_735272;
 -c_7318173.elements[2] = lst_73550_733159;
-+closureN_type c_7316880;
-+object e_7316887 [3];
-+c_7316880.hdr.mark = gc_color_red;
-+ c_7316880.hdr.grayed = 0;
-+c_7316880.tag = closureN_tag;
-+ c_7316880.fn = (function_type)__lambda_441;
-+c_7316880.num_args = 1;
-+c_7316880.num_elements = 3;
-+c_7316880.elements = (object *)e_7316887;
-+c_7316880.elements[0] = f_73549_732818;
-+c_7316880.elements[1] = k_734827;
-+c_7316880.elements[2] = lst_73550_732819;
++closureN_type c_7316873;
++object e_7316880 [3];
++c_7316873.hdr.mark = gc_color_red;
++ c_7316873.hdr.grayed = 0;
++c_7316873.tag = closureN_tag;
++ c_7316873.fn = (function_type)__lambda_441;
++c_7316873.num_args = 1;
++c_7316873.num_elements = 3;
++c_7316873.elements = (object *)e_7316880;
++c_7316873.elements[0] = f_73549_732811;
++c_7316873.elements[1] = k_734820;
++c_7316873.elements[2] = lst_73550_732812;
  
  
  
 -return_closcall2(data,  f_73549_733158,  &c_7318173, Cyc_car(data, lst_73550_733159));}
-+return_closcall2(data,  f_73549_732818,  &c_7316880, Cyc_car(data, lst_73550_732819));}
++return_closcall2(data,  f_73549_732811,  &c_7316873, Cyc_car(data, lst_73550_732812));}
  ;; 
  }
  
 -static void __lambda_441(void *data, object self_7313357, int argc, object *args) /* object self_7313357, object r_735274 */
-+static void __lambda_441(void *data, object self_7312111, int argc, object *args) /* object self_7312111, object r_734829 */
++static void __lambda_441(void *data, object self_7312104, int argc, object *args) /* object self_7312104, object r_734822 */
   {
  
    
  
 -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_7313357)->elements[1], ((closureN)self_7313357)->elements[0], Cyc_cdr(data, ((closureN)self_7313357)->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_7312111)->elements[1], ((closureN)self_7312111)->elements[0], Cyc_cdr(data, ((closureN)self_7312111)->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_7312104)->elements[1], ((closureN)self_7312104)->elements[0], Cyc_cdr(data, ((closureN)self_7312104)->elements[2]));; 
  }
  
 -static void __lambda_437(void *data, object _, int argc, object *args) /* closure _,object k_735260, object f_73542_733154, object lst1_73543_733155, object lst2_73544_733156 */
-+static void __lambda_437(void *data, object _, int argc, object *args) /* closure _,object k_734815, object f_73542_732814, object lst1_73543_732815, object lst2_73544_732816 */
++static void __lambda_437(void *data, object _, int argc, object *args) /* closure _,object k_734808, object f_73542_732807, object lst1_73543_732808, object lst2_73544_732809 */
   {
 -object k_735260 = args[0]; object f_73542_733154 = args[1]; object lst1_73543_733155 = args[2]; object lst2_73544_733156 = args[3];
 -  object r_735261;
--  Cyc_st_add(data, "scheme/base.sld:Cyc-map-loop-2");
-+object k_734815 = args[0]; object f_73542_732814 = args[1]; object lst1_73543_732815 = args[2]; object lst2_73544_732816 = args[3];
-+  object r_734816;
-+  Cyc_st_add(data, "base.sld:Cyc-map-loop-2");
++object k_734808 = args[0]; object f_73542_732807 = args[1]; object lst1_73543_732808 = args[2]; object lst2_73544_732809 = args[3];
++  object r_734809;
+   Cyc_st_add(data, "scheme/base.sld:Cyc-map-loop-2");
    
 -if( (boolean_f != Cyc_is_null(lst1_73543_733155)) ){ 
-+if( (boolean_f != Cyc_is_null(lst1_73543_732815)) ){ 
++if( (boolean_f != Cyc_is_null(lst1_73543_732808)) ){ 
    
 -  r_735261 = Cyc_is_null(lst1_73543_733155);
-+  r_734816 = Cyc_is_null(lst1_73543_732815);
++  r_734809 = Cyc_is_null(lst1_73543_732808);
  } else { 
    
 -  r_735261 = Cyc_is_null(lst2_73544_733156);}
 -;if( (boolean_f != r_735261) ){ 
 -  return_direct_with_clo1(data,  k_735260, (((closure)  k_735260)->fn),  NULL);
-+  r_734816 = Cyc_is_null(lst2_73544_732816);}
-+;if( (boolean_f != r_734816) ){ 
-+  return_direct_with_clo1(data,  k_734815, (((closure)  k_734815)->fn),  NULL);
++  r_734809 = Cyc_is_null(lst2_73544_732809);}
++;if( (boolean_f != r_734809) ){ 
++  return_direct_with_clo1(data,  k_734808, (((closure)  k_734808)->fn),  NULL);
  } else { 
    
 -closureN_type c_7318143;
@@ -50154,34 +50361,34 @@ Make let-values be the same as let*-values, to work around
 -c_7318143.elements[1] = k_735260;
 -c_7318143.elements[2] = lst1_73543_733155;
 -c_7318143.elements[3] = lst2_73544_733156;
-+closureN_type c_7316850;
-+object e_7316867 [4];
-+c_7316850.hdr.mark = gc_color_red;
-+ c_7316850.hdr.grayed = 0;
-+c_7316850.tag = closureN_tag;
-+ c_7316850.fn = (function_type)__lambda_438;
-+c_7316850.num_args = 1;
-+c_7316850.num_elements = 4;
-+c_7316850.elements = (object *)e_7316867;
-+c_7316850.elements[0] = f_73542_732814;
-+c_7316850.elements[1] = k_734815;
-+c_7316850.elements[2] = lst1_73543_732815;
-+c_7316850.elements[3] = lst2_73544_732816;
++closureN_type c_7316843;
++object e_7316860 [4];
++c_7316843.hdr.mark = gc_color_red;
++ c_7316843.hdr.grayed = 0;
++c_7316843.tag = closureN_tag;
++ c_7316843.fn = (function_type)__lambda_438;
++c_7316843.num_args = 1;
++c_7316843.num_elements = 4;
++c_7316843.elements = (object *)e_7316860;
++c_7316843.elements[0] = f_73542_732807;
++c_7316843.elements[1] = k_734808;
++c_7316843.elements[2] = lst1_73543_732808;
++c_7316843.elements[3] = lst2_73544_732809;
  
  
  
  
  
 -return_closcall3(data,  f_73542_733154,  &c_7318143, Cyc_car(data, lst1_73543_733155), Cyc_car(data, lst2_73544_733156));}
-+return_closcall3(data,  f_73542_732814,  &c_7316850, Cyc_car(data, lst1_73543_732815), Cyc_car(data, lst2_73544_732816));}
++return_closcall3(data,  f_73542_732807,  &c_7316843, Cyc_car(data, lst1_73543_732808), Cyc_car(data, lst2_73544_732809));}
  ;; 
  }
  
 -static void __lambda_438(void *data, object self_7313355, int argc, object *args) /* object self_7313355, object r_735262 */
-+static void __lambda_438(void *data, object self_7312109, int argc, object *args) /* object self_7312109, object r_734817 */
++static void __lambda_438(void *data, object self_7312102, int argc, object *args) /* object self_7312102, object r_734810 */
   {
 - object r_735262 = args[0];
-+ object r_734817 = args[0];
++ object r_734810 = args[0];
    
 -closureN_type c_7318145;
 -object e_7318152 [2];
@@ -50194,50 +50401,49 @@ Make let-values be the same as let*-values, to work around
 -c_7318145.elements = (object *)e_7318152;
 -c_7318145.elements[0] = ((closureN)self_7313355)->elements[1];
 -c_7318145.elements[1] = r_735262;
-+closureN_type c_7316852;
-+object e_7316859 [2];
-+c_7316852.hdr.mark = gc_color_red;
-+ c_7316852.hdr.grayed = 0;
-+c_7316852.tag = closureN_tag;
-+ c_7316852.fn = (function_type)__lambda_439;
-+c_7316852.num_args = 1;
-+c_7316852.num_elements = 2;
-+c_7316852.elements = (object *)e_7316859;
-+c_7316852.elements[0] = ((closureN)self_7312109)->elements[1];
-+c_7316852.elements[1] = r_734817;
++closureN_type c_7316845;
++object e_7316852 [2];
++c_7316845.hdr.mark = gc_color_red;
++ c_7316845.hdr.grayed = 0;
++c_7316845.tag = closureN_tag;
++ c_7316845.fn = (function_type)__lambda_439;
++c_7316845.num_args = 1;
++c_7316845.num_elements = 2;
++c_7316845.elements = (object *)e_7316852;
++c_7316845.elements[0] = ((closureN)self_7312102)->elements[1];
++c_7316845.elements[1] = r_734810;
  
  
  
  
  
 -return_direct_with_clo4(data,  __glo_Cyc_91map_91loop_912_scheme_base, (((closure)  __glo_Cyc_91map_91loop_912_scheme_base)->fn),  &c_7318145, ((closureN)self_7313355)->elements[0], Cyc_cdr(data, ((closureN)self_7313355)->elements[2]), Cyc_cdr(data, ((closureN)self_7313355)->elements[3]));; 
-+return_direct_with_clo4(data,  __glo_Cyc_91map_91loop_912_scheme_base, (((closure)  __glo_Cyc_91map_91loop_912_scheme_base)->fn),  &c_7316852, ((closureN)self_7312109)->elements[0], Cyc_cdr(data, ((closureN)self_7312109)->elements[2]), Cyc_cdr(data, ((closureN)self_7312109)->elements[3]));; 
++return_direct_with_clo4(data,  __glo_Cyc_91map_91loop_912_scheme_base, (((closure)  __glo_Cyc_91map_91loop_912_scheme_base)->fn),  &c_7316845, ((closureN)self_7312102)->elements[0], Cyc_cdr(data, ((closureN)self_7312102)->elements[2]), Cyc_cdr(data, ((closureN)self_7312102)->elements[3]));; 
  }
  
 -static void __lambda_439(void *data, object self_7313356, int argc, object *args) /* object self_7313356, object r_735263 */
-+static void __lambda_439(void *data, object self_7312110, int argc, object *args) /* object self_7312110, object r_734818 */
++static void __lambda_439(void *data, object self_7312103, int argc, object *args) /* object self_7312103, object r_734811 */
   {
 - object r_735263 = args[0];
-+ object r_734818 = args[0];
++ object r_734811 = args[0];
    
 -pair_type local_7318150; 
 -return_direct_with_clo1(data,  ((closureN)self_7313356)->elements[0], (((closure)  ((closureN)self_7313356)->elements[0])->fn),  set_pair_as_expr(&local_7318150, ((closureN)self_7313356)->elements[1], r_735263));; 
-+pair_type local_7316857; 
-+return_direct_with_clo1(data,  ((closureN)self_7312110)->elements[0], (((closure)  ((closureN)self_7312110)->elements[0])->fn),  set_pair_as_expr(&local_7316857, ((closureN)self_7312110)->elements[1], r_734818));; 
++pair_type local_7316850; 
++return_direct_with_clo1(data,  ((closureN)self_7312103)->elements[0], (((closure)  ((closureN)self_7312103)->elements[0])->fn),  set_pair_as_expr(&local_7316850, ((closureN)self_7312103)->elements[1], r_734811));; 
  }
  
 -static void __lambda_434(void *data, object _, int argc, object *args) /* closure _,object k_735252, object f_73540_733152, object lst_73541_733153 */
-+static void __lambda_434(void *data, object _, int argc, object *args) /* closure _,object k_734807, object f_73540_732812, object lst_73541_732813 */
++static void __lambda_434(void *data, object _, int argc, object *args) /* closure _,object k_734800, object f_73540_732805, object lst_73541_732806 */
   {
 -object k_735252 = args[0]; object f_73540_733152 = args[1]; object lst_73541_733153 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:Cyc-map-loop-1");
-+object k_734807 = args[0]; object f_73540_732812 = args[1]; object lst_73541_732813 = args[2];
-+  Cyc_st_add(data, "base.sld:Cyc-map-loop-1");
++object k_734800 = args[0]; object f_73540_732805 = args[1]; object lst_73541_732806 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:Cyc-map-loop-1");
    
 -if( (boolean_f != Cyc_is_null(lst_73541_733153)) ){ 
 -  return_direct_with_clo1(data,  k_735252, (((closure)  k_735252)->fn),  NULL);
-+if( (boolean_f != Cyc_is_null(lst_73541_732813)) ){ 
-+  return_direct_with_clo1(data,  k_734807, (((closure)  k_734807)->fn),  NULL);
++if( (boolean_f != Cyc_is_null(lst_73541_732806)) ){ 
++  return_direct_with_clo1(data,  k_734800, (((closure)  k_734800)->fn),  NULL);
  } else { 
    
 -closureN_type c_7318114;
@@ -50252,31 +50458,31 @@ Make let-values be the same as let*-values, to work around
 -c_7318114.elements[0] = f_73540_733152;
 -c_7318114.elements[1] = k_735252;
 -c_7318114.elements[2] = lst_73541_733153;
-+closureN_type c_7316821;
-+object e_7316835 [3];
-+c_7316821.hdr.mark = gc_color_red;
-+ c_7316821.hdr.grayed = 0;
-+c_7316821.tag = closureN_tag;
-+ c_7316821.fn = (function_type)__lambda_435;
-+c_7316821.num_args = 1;
-+c_7316821.num_elements = 3;
-+c_7316821.elements = (object *)e_7316835;
-+c_7316821.elements[0] = f_73540_732812;
-+c_7316821.elements[1] = k_734807;
-+c_7316821.elements[2] = lst_73541_732813;
++closureN_type c_7316814;
++object e_7316828 [3];
++c_7316814.hdr.mark = gc_color_red;
++ c_7316814.hdr.grayed = 0;
++c_7316814.tag = closureN_tag;
++ c_7316814.fn = (function_type)__lambda_435;
++c_7316814.num_args = 1;
++c_7316814.num_elements = 3;
++c_7316814.elements = (object *)e_7316828;
++c_7316814.elements[0] = f_73540_732805;
++c_7316814.elements[1] = k_734800;
++c_7316814.elements[2] = lst_73541_732806;
  
  
  
 -return_closcall2(data,  f_73540_733152,  &c_7318114, Cyc_car(data, lst_73541_733153));}
-+return_closcall2(data,  f_73540_732812,  &c_7316821, Cyc_car(data, lst_73541_732813));}
++return_closcall2(data,  f_73540_732805,  &c_7316814, Cyc_car(data, lst_73541_732806));}
  ;; 
  }
  
 -static void __lambda_435(void *data, object self_7313353, int argc, object *args) /* object self_7313353, object r_735254 */
-+static void __lambda_435(void *data, object self_7312107, int argc, object *args) /* object self_7312107, object r_734809 */
++static void __lambda_435(void *data, object self_7312100, int argc, object *args) /* object self_7312100, object r_734802 */
   {
 - object r_735254 = args[0];
-+ object r_734809 = args[0];
++ object r_734802 = args[0];
    
 -closureN_type c_7318116;
 -object e_7318123 [2];
@@ -50289,48 +50495,47 @@ Make let-values be the same as let*-values, to work around
 -c_7318116.elements = (object *)e_7318123;
 -c_7318116.elements[0] = ((closureN)self_7313353)->elements[1];
 -c_7318116.elements[1] = r_735254;
-+closureN_type c_7316823;
-+object e_7316830 [2];
-+c_7316823.hdr.mark = gc_color_red;
-+ c_7316823.hdr.grayed = 0;
-+c_7316823.tag = closureN_tag;
-+ c_7316823.fn = (function_type)__lambda_436;
-+c_7316823.num_args = 1;
-+c_7316823.num_elements = 2;
-+c_7316823.elements = (object *)e_7316830;
-+c_7316823.elements[0] = ((closureN)self_7312107)->elements[1];
-+c_7316823.elements[1] = r_734809;
++closureN_type c_7316816;
++object e_7316823 [2];
++c_7316816.hdr.mark = gc_color_red;
++ c_7316816.hdr.grayed = 0;
++c_7316816.tag = closureN_tag;
++ c_7316816.fn = (function_type)__lambda_436;
++c_7316816.num_args = 1;
++c_7316816.num_elements = 2;
++c_7316816.elements = (object *)e_7316823;
++c_7316816.elements[0] = ((closureN)self_7312100)->elements[1];
++c_7316816.elements[1] = r_734802;
  
  
  
 -return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7318116, ((closureN)self_7313353)->elements[0], Cyc_cdr(data, ((closureN)self_7313353)->elements[2]));; 
-+return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7316823, ((closureN)self_7312107)->elements[0], Cyc_cdr(data, ((closureN)self_7312107)->elements[2]));; 
++return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7316816, ((closureN)self_7312100)->elements[0], Cyc_cdr(data, ((closureN)self_7312100)->elements[2]));; 
  }
  
 -static void __lambda_436(void *data, object self_7313354, int argc, object *args) /* object self_7313354, object r_735255 */
-+static void __lambda_436(void *data, object self_7312108, int argc, object *args) /* object self_7312108, object r_734810 */
++static void __lambda_436(void *data, object self_7312101, int argc, object *args) /* object self_7312101, object r_734803 */
   {
 - object r_735255 = args[0];
-+ object r_734810 = args[0];
++ object r_734803 = args[0];
    
 -pair_type local_7318121; 
 -return_direct_with_clo1(data,  ((closureN)self_7313354)->elements[0], (((closure)  ((closureN)self_7313354)->elements[0])->fn),  set_pair_as_expr(&local_7318121, ((closureN)self_7313354)->elements[1], r_735255));; 
-+pair_type local_7316828; 
-+return_direct_with_clo1(data,  ((closureN)self_7312108)->elements[0], (((closure)  ((closureN)self_7312108)->elements[0])->fn),  set_pair_as_expr(&local_7316828, ((closureN)self_7312108)->elements[1], r_734810));; 
++pair_type local_7316821; 
++return_direct_with_clo1(data,  ((closureN)self_7312101)->elements[0], (((closure)  ((closureN)self_7312101)->elements[0])->fn),  set_pair_as_expr(&local_7316821, ((closureN)self_7312101)->elements[1], r_734803));; 
  }
  
 -static void __lambda_419(void *data, object _, int argc, object *args) /* closure _,object k_735233, object f_73528_733141, object lis1_73529_733142, object lists_73530_733143_raw, ... */
-+static void __lambda_419(void *data, object _, int argc, object *args) /* closure _,object k_734788, object f_73528_732801, object lis1_73529_732802, object lists_73530_732803_raw, ... */
++static void __lambda_419(void *data, object _, int argc, object *args) /* closure _,object k_734781, object f_73528_732794, object lis1_73529_732795, object lists_73530_732796_raw, ... */
   {
 -object k_735233 = args[0]; object f_73528_733141 = args[1]; object lis1_73529_733142 = args[2];
 -load_varargs(lists_73530_733143, args, 3, argc - 3);
--  Cyc_st_add(data, "scheme/base.sld:map");
-+object k_734788 = args[0]; object f_73528_732801 = args[1]; object lis1_73529_732802 = args[2];
-+load_varargs(lists_73530_732803, args, 3, argc - 3);
-+  Cyc_st_add(data, "base.sld:map");
++object k_734781 = args[0]; object f_73528_732794 = args[1]; object lis1_73529_732795 = args[2];
++load_varargs(lists_73530_732796, args, 3, argc - 3);
+   Cyc_st_add(data, "scheme/base.sld:map");
    
 -if( (boolean_f != Cyc_is_pair(lists_73530_733143)) ){ 
-+if( (boolean_f != Cyc_is_pair(lists_73530_732803)) ){ 
++if( (boolean_f != Cyc_is_pair(lists_73530_732796)) ){ 
    
 -closureN_type c_7318022;
 -object e_7318087 [2];
@@ -50343,23 +50548,23 @@ Make let-values be the same as let*-values, to work around
 -c_7318022.elements = (object *)e_7318087;
 -c_7318022.elements[0] = f_73528_733141;
 -c_7318022.elements[1] = k_735233;
-+closureN_type c_7316729;
-+object e_7316794 [2];
-+c_7316729.hdr.mark = gc_color_red;
-+ c_7316729.hdr.grayed = 0;
-+c_7316729.tag = closureN_tag;
-+ c_7316729.fn = (function_type)__lambda_420;
-+c_7316729.num_args = 1;
-+c_7316729.num_elements = 2;
-+c_7316729.elements = (object *)e_7316794;
-+c_7316729.elements[0] = f_73528_732801;
-+c_7316729.elements[1] = k_734788;
++closureN_type c_7316722;
++object e_7316787 [2];
++c_7316722.hdr.mark = gc_color_red;
++ c_7316722.hdr.grayed = 0;
++c_7316722.tag = closureN_tag;
++ c_7316722.fn = (function_type)__lambda_420;
++c_7316722.num_args = 1;
++c_7316722.num_elements = 2;
++c_7316722.elements = (object *)e_7316787;
++c_7316722.elements[0] = f_73528_732794;
++c_7316722.elements[1] = k_734781;
  
  
 -pair_type local_7318090; 
 -return_direct_with_clo1(data,(closure)&c_7318022,__lambda_420,  set_pair_as_expr(&local_7318090, lis1_73529_733142, lists_73530_733143));
-+pair_type local_7316797; 
-+return_direct_with_clo1(data,(closure)&c_7316729,__lambda_420,  set_pair_as_expr(&local_7316797, lis1_73529_732802, lists_73530_732803));
++pair_type local_7316790; 
++return_direct_with_clo1(data,(closure)&c_7316722,__lambda_420,  set_pair_as_expr(&local_7316790, lis1_73529_732795, lists_73530_732796));
  } else { 
    
 -closureN_type c_7318092;
@@ -50373,17 +50578,17 @@ Make let-values be the same as let*-values, to work around
 -c_7318092.elements = (object *)e_7318096;
 -c_7318092.elements[0] = k_735233;
 -c_7318092.elements[1] = lis1_73529_733142;
-+closureN_type c_7316799;
-+object e_7316803 [2];
-+c_7316799.hdr.mark = gc_color_red;
-+ c_7316799.hdr.grayed = 0;
-+c_7316799.tag = closureN_tag;
-+ c_7316799.fn = (function_type)__lambda_431;
-+c_7316799.num_args = 1;
-+c_7316799.num_elements = 2;
-+c_7316799.elements = (object *)e_7316803;
-+c_7316799.elements[0] = k_734788;
-+c_7316799.elements[1] = lis1_73529_732802;
++closureN_type c_7316792;
++object e_7316796 [2];
++c_7316792.hdr.mark = gc_color_red;
++ c_7316792.hdr.grayed = 0;
++c_7316792.tag = closureN_tag;
++ c_7316792.fn = (function_type)__lambda_431;
++c_7316792.num_args = 1;
++c_7316792.num_elements = 2;
++c_7316792.elements = (object *)e_7316796;
++c_7316792.elements[0] = k_734781;
++c_7316792.elements[1] = lis1_73529_732795;
  
  
 -closureN_type c_7318097;
@@ -50396,27 +50601,27 @@ Make let-values be the same as let*-values, to work around
 -c_7318097.num_elements = 1;
 -c_7318097.elements = (object *)e_7318108;
 -c_7318097.elements[0] = f_73528_733141;
-+closureN_type c_7316804;
-+object e_7316815 [1];
-+c_7316804.hdr.mark = gc_color_red;
-+ c_7316804.hdr.grayed = 0;
-+c_7316804.tag = closureN_tag;
-+ c_7316804.fn = (function_type)__lambda_432;
-+c_7316804.num_args = 2;
-+c_7316804.num_elements = 1;
-+c_7316804.elements = (object *)e_7316815;
-+c_7316804.elements[0] = f_73528_732801;
++closureN_type c_7316797;
++object e_7316808 [1];
++c_7316797.hdr.mark = gc_color_red;
++ c_7316797.hdr.grayed = 0;
++c_7316797.tag = closureN_tag;
++ c_7316797.fn = (function_type)__lambda_432;
++c_7316797.num_args = 2;
++c_7316797.num_elements = 1;
++c_7316797.elements = (object *)e_7316808;
++c_7316797.elements[0] = f_73528_732794;
  
 -return_direct_with_clo1(data,(closure)&c_7318092,__lambda_431,  &c_7318097);}
-+return_direct_with_clo1(data,(closure)&c_7316799,__lambda_431,  &c_7316804);}
++return_direct_with_clo1(data,(closure)&c_7316792,__lambda_431,  &c_7316797);}
  ;; 
  }
  
 -static void __lambda_432(void *data, object self_7313350, int argc, object *args) /* object self_7313350, object k_735248, object x_73538_733150, object y_73539_733151 */
-+static void __lambda_432(void *data, object self_7312104, int argc, object *args) /* object self_7312104, object k_734803, object x_73538_732810, object y_73539_732811 */
++static void __lambda_432(void *data, object self_7312097, int argc, object *args) /* object self_7312097, object k_734796, object x_73538_732803, object y_73539_732804 */
   {
 - object k_735248 = args[0]; object x_73538_733150 = args[1]; object y_73539_733151 = args[2];
-+ object k_734803 = args[0]; object x_73538_732810 = args[1]; object y_73539_732811 = args[2];
++ object k_734796 = args[0]; object x_73538_732803 = args[1]; object y_73539_732804 = args[2];
    
 -closureN_type c_7318100;
 -object e_7318107 [2];
@@ -50429,48 +50634,48 @@ Make let-values be the same as let*-values, to work around
 -c_7318100.elements = (object *)e_7318107;
 -c_7318100.elements[0] = k_735248;
 -c_7318100.elements[1] = y_73539_733151;
-+closureN_type c_7316807;
-+object e_7316814 [2];
-+c_7316807.hdr.mark = gc_color_red;
-+ c_7316807.hdr.grayed = 0;
-+c_7316807.tag = closureN_tag;
-+ c_7316807.fn = (function_type)__lambda_433;
-+c_7316807.num_args = 1;
-+c_7316807.num_elements = 2;
-+c_7316807.elements = (object *)e_7316814;
-+c_7316807.elements[0] = k_734803;
-+c_7316807.elements[1] = y_73539_732811;
++closureN_type c_7316800;
++object e_7316807 [2];
++c_7316800.hdr.mark = gc_color_red;
++ c_7316800.hdr.grayed = 0;
++c_7316800.tag = closureN_tag;
++ c_7316800.fn = (function_type)__lambda_433;
++c_7316800.num_args = 1;
++c_7316800.num_elements = 2;
++c_7316800.elements = (object *)e_7316807;
++c_7316800.elements[0] = k_734796;
++c_7316800.elements[1] = y_73539_732804;
  
 -return_closcall2(data,  ((closureN)self_7313350)->elements[0],  &c_7318100, x_73538_733150);; 
-+return_closcall2(data,  ((closureN)self_7312104)->elements[0],  &c_7316807, x_73538_732810);; 
++return_closcall2(data,  ((closureN)self_7312097)->elements[0],  &c_7316800, x_73538_732803);; 
  }
  
 -static void __lambda_433(void *data, object self_7313351, int argc, object *args) /* object self_7313351, object r_735249 */
-+static void __lambda_433(void *data, object self_7312105, int argc, object *args) /* object self_7312105, object r_734804 */
++static void __lambda_433(void *data, object self_7312098, int argc, object *args) /* object self_7312098, object r_734797 */
   {
 - object r_735249 = args[0];
-+ object r_734804 = args[0];
++ object r_734797 = args[0];
    
 -pair_type local_7318105; 
 -return_direct_with_clo1(data,  ((closureN)self_7313351)->elements[0], (((closure)  ((closureN)self_7313351)->elements[0])->fn),  set_pair_as_expr(&local_7318105, r_735249, ((closureN)self_7313351)->elements[1]));; 
-+pair_type local_7316812; 
-+return_direct_with_clo1(data,  ((closureN)self_7312105)->elements[0], (((closure)  ((closureN)self_7312105)->elements[0])->fn),  set_pair_as_expr(&local_7316812, r_734804, ((closureN)self_7312105)->elements[1]));; 
++pair_type local_7316805; 
++return_direct_with_clo1(data,  ((closureN)self_7312098)->elements[0], (((closure)  ((closureN)self_7312098)->elements[0])->fn),  set_pair_as_expr(&local_7316805, r_734797, ((closureN)self_7312098)->elements[1]));; 
  }
  
 -static void __lambda_431(void *data, object self_7313352, int argc, object *args) /* object self_7313352, object r_735246 */
-+static void __lambda_431(void *data, object self_7312106, int argc, object *args) /* object self_7312106, object r_734801 */
++static void __lambda_431(void *data, object self_7312099, int argc, object *args) /* object self_7312099, object r_734794 */
   {
 - object r_735246 = args[0];
 -  return_direct_with_clo4(data,  __glo_foldr_scheme_base, (((closure)  __glo_foldr_scheme_base)->fn),  ((closureN)self_7313352)->elements[0], r_735246, NULL, ((closureN)self_7313352)->elements[1]);; 
-+ object r_734801 = args[0];
-+  return_direct_with_clo4(data,  __glo_foldr_scheme_base, (((closure)  __glo_foldr_scheme_base)->fn),  ((closureN)self_7312106)->elements[0], r_734801, NULL, ((closureN)self_7312106)->elements[1]);; 
++ object r_734794 = args[0];
++  return_direct_with_clo4(data,  __glo_foldr_scheme_base, (((closure)  __glo_foldr_scheme_base)->fn),  ((closureN)self_7312099)->elements[0], r_734794, NULL, ((closureN)self_7312099)->elements[1]);; 
  }
  
 -static void __lambda_420(void *data, object self_7313338, int argc, object *args) /* object self_7313338, object lists_73532_733144 */
-+static void __lambda_420(void *data, object self_7312092, int argc, object *args) /* object self_7312092, object lists_73532_732804 */
++static void __lambda_420(void *data, object self_7312085, int argc, object *args) /* object self_7312085, object lists_73532_732797 */
   {
 - object lists_73532_733144 = args[0];
-+ object lists_73532_732804 = args[0];
++ object lists_73532_732797 = args[0];
    
 -closureN_type c_7318024;
 -object e_7318086 [3];
@@ -50484,28 +50689,28 @@ Make let-values be the same as let*-values, to work around
 -c_7318024.elements[0] = ((closureN)self_7313338)->elements[0];
 -c_7318024.elements[1] = ((closureN)self_7313338)->elements[1];
 -c_7318024.elements[2] = lists_73532_733144;
-+closureN_type c_7316731;
-+object e_7316793 [3];
-+c_7316731.hdr.mark = gc_color_red;
-+ c_7316731.hdr.grayed = 0;
-+c_7316731.tag = closureN_tag;
-+ c_7316731.fn = (function_type)__lambda_421;
-+c_7316731.num_args = 1;
-+c_7316731.num_elements = 3;
-+c_7316731.elements = (object *)e_7316793;
-+c_7316731.elements[0] = ((closureN)self_7312092)->elements[0];
-+c_7316731.elements[1] = ((closureN)self_7312092)->elements[1];
-+c_7316731.elements[2] = lists_73532_732804;
++closureN_type c_7316724;
++object e_7316786 [3];
++c_7316724.hdr.mark = gc_color_red;
++ c_7316724.hdr.grayed = 0;
++c_7316724.tag = closureN_tag;
++ c_7316724.fn = (function_type)__lambda_421;
++c_7316724.num_args = 1;
++c_7316724.num_elements = 3;
++c_7316724.elements = (object *)e_7316786;
++c_7316724.elements[0] = ((closureN)self_7312085)->elements[0];
++c_7316724.elements[1] = ((closureN)self_7312085)->elements[1];
++c_7316724.elements[2] = lists_73532_732797;
  
 -return_direct_with_clo1(data,(closure)&c_7318024,__lambda_421,  boolean_f);; 
-+return_direct_with_clo1(data,(closure)&c_7316731,__lambda_421,  boolean_f);; 
++return_direct_with_clo1(data,(closure)&c_7316724,__lambda_421,  boolean_f);; 
  }
  
 -static void __lambda_421(void *data, object self_7313339, int argc, object *args) /* object self_7313339, object recur_73533_733145 */
-+static void __lambda_421(void *data, object self_7312093, int argc, object *args) /* object self_7312093, object recur_73533_732805 */
++static void __lambda_421(void *data, object self_7312086, int argc, object *args) /* object self_7312086, object recur_73533_732798 */
   {
 - object recur_73533_733145 = args[0];
-+ object recur_73533_732805 = args[0];
++ object recur_73533_732798 = args[0];
    
 -closureN_type c_7318026;
 -object e_7318082 [3];
@@ -50519,31 +50724,31 @@ Make let-values be the same as let*-values, to work around
 -c_7318026.elements[0] = ((closureN)self_7313339)->elements[0];
 -c_7318026.elements[1] = ((closureN)self_7313339)->elements[1];
 -c_7318026.elements[2] = ((closureN)self_7313339)->elements[2];
-+closureN_type c_7316733;
-+object e_7316789 [3];
-+c_7316733.hdr.mark = gc_color_red;
-+ c_7316733.hdr.grayed = 0;
-+c_7316733.tag = closureN_tag;
-+ c_7316733.fn = (function_type)__lambda_1311;
-+c_7316733.num_args = 1;
-+c_7316733.num_elements = 3;
-+c_7316733.elements = (object *)e_7316789;
-+c_7316733.elements[0] = ((closureN)self_7312093)->elements[0];
-+c_7316733.elements[1] = ((closureN)self_7312093)->elements[1];
-+c_7316733.elements[2] = ((closureN)self_7312093)->elements[2];
++closureN_type c_7316726;
++object e_7316782 [3];
++c_7316726.hdr.mark = gc_color_red;
++ c_7316726.hdr.grayed = 0;
++c_7316726.tag = closureN_tag;
++ c_7316726.fn = (function_type)__lambda_1311;
++c_7316726.num_args = 1;
++c_7316726.num_elements = 3;
++c_7316726.elements = (object *)e_7316782;
++c_7316726.elements[0] = ((closureN)self_7312086)->elements[0];
++c_7316726.elements[1] = ((closureN)self_7312086)->elements[1];
++c_7316726.elements[2] = ((closureN)self_7312086)->elements[2];
  
  
 -pair_type local_7318085; 
 -return_direct_with_clo1(data,(closure)&c_7318026,__lambda_1358,  set_cell_as_expr(&local_7318085, recur_73533_733145));; 
-+pair_type local_7316792; 
-+return_direct_with_clo1(data,(closure)&c_7316733,__lambda_1311,  set_cell_as_expr(&local_7316792, recur_73533_732805));; 
++pair_type local_7316785; 
++return_direct_with_clo1(data,(closure)&c_7316726,__lambda_1311,  set_cell_as_expr(&local_7316785, recur_73533_732798));; 
  }
  
 -static void __lambda_1358(void *data, object self_7313340, int argc, object *args) /* object self_7313340, object recur_73533_733145 */
-+static void __lambda_1311(void *data, object self_7312094, int argc, object *args) /* object self_7312094, object recur_73533_732805 */
++static void __lambda_1311(void *data, object self_7312087, int argc, object *args) /* object self_7312087, object recur_73533_732798 */
   {
 - object recur_73533_733145 = args[0];
-+ object recur_73533_732805 = args[0];
++ object recur_73533_732798 = args[0];
    
 -closureN_type c_7318028;
 -object e_7318041 [3];
@@ -50557,18 +50762,18 @@ Make let-values be the same as let*-values, to work around
 -c_7318028.elements[0] = ((closureN)self_7313340)->elements[1];
 -c_7318028.elements[1] = ((closureN)self_7313340)->elements[2];
 -c_7318028.elements[2] = recur_73533_733145;
-+closureN_type c_7316735;
-+object e_7316748 [3];
-+c_7316735.hdr.mark = gc_color_red;
-+ c_7316735.hdr.grayed = 0;
-+c_7316735.tag = closureN_tag;
-+ c_7316735.fn = (function_type)__lambda_422;
-+c_7316735.num_args = 1;
-+c_7316735.num_elements = 3;
-+c_7316735.elements = (object *)e_7316748;
-+c_7316735.elements[0] = ((closureN)self_7312094)->elements[1];
-+c_7316735.elements[1] = ((closureN)self_7312094)->elements[2];
-+c_7316735.elements[2] = recur_73533_732805;
++closureN_type c_7316728;
++object e_7316741 [3];
++c_7316728.hdr.mark = gc_color_red;
++ c_7316728.hdr.grayed = 0;
++c_7316728.tag = closureN_tag;
++ c_7316728.fn = (function_type)__lambda_422;
++c_7316728.num_args = 1;
++c_7316728.num_elements = 3;
++c_7316728.elements = (object *)e_7316741;
++c_7316728.elements[0] = ((closureN)self_7312087)->elements[1];
++c_7316728.elements[1] = ((closureN)self_7312087)->elements[2];
++c_7316728.elements[2] = recur_73533_732798;
  
  
 -closureN_type c_7318042;
@@ -50582,27 +50787,27 @@ Make let-values be the same as let*-values, to work around
 -c_7318042.elements = (object *)e_7318081;
 -c_7318042.elements[0] = ((closureN)self_7313340)->elements[0];
 -c_7318042.elements[1] = recur_73533_733145;
-+closureN_type c_7316749;
-+object e_7316788 [2];
-+c_7316749.hdr.mark = gc_color_red;
-+ c_7316749.hdr.grayed = 0;
-+c_7316749.tag = closureN_tag;
-+ c_7316749.fn = (function_type)__lambda_424;
-+c_7316749.num_args = 1;
-+c_7316749.num_elements = 2;
-+c_7316749.elements = (object *)e_7316788;
-+c_7316749.elements[0] = ((closureN)self_7312094)->elements[0];
-+c_7316749.elements[1] = recur_73533_732805;
++closureN_type c_7316742;
++object e_7316781 [2];
++c_7316742.hdr.mark = gc_color_red;
++ c_7316742.hdr.grayed = 0;
++c_7316742.tag = closureN_tag;
++ c_7316742.fn = (function_type)__lambda_424;
++c_7316742.num_args = 1;
++c_7316742.num_elements = 2;
++c_7316742.elements = (object *)e_7316781;
++c_7316742.elements[0] = ((closureN)self_7312087)->elements[0];
++c_7316742.elements[1] = recur_73533_732798;
  
 -return_direct_with_clo1(data,(closure)&c_7318028,__lambda_422,  &c_7318042);; 
-+return_direct_with_clo1(data,(closure)&c_7316735,__lambda_422,  &c_7316749);; 
++return_direct_with_clo1(data,(closure)&c_7316728,__lambda_422,  &c_7316742);; 
  }
  
 -static void __lambda_424(void *data, object self_7313341, int argc, object *args) /* object self_7313341, object k_735238, object lists_73534_733146 */
-+static void __lambda_424(void *data, object self_7312095, int argc, object *args) /* object self_7312095, object k_734793, object lists_73534_732806 */
++static void __lambda_424(void *data, object self_7312088, int argc, object *args) /* object self_7312088, object k_734786, object lists_73534_732799 */
   {
 - object k_735238 = args[0]; object lists_73534_733146 = args[1];
-+ object k_734793 = args[0]; object lists_73534_732806 = args[1];
++ object k_734786 = args[0]; object lists_73534_732799 = args[1];
    
 -closureN_type c_7318044;
 -object e_7318076 [3];
@@ -50616,18 +50821,18 @@ Make let-values be the same as let*-values, to work around
 -c_7318044.elements[0] = ((closureN)self_7313341)->elements[0];
 -c_7318044.elements[1] = k_735238;
 -c_7318044.elements[2] = ((closureN)self_7313341)->elements[1];
-+closureN_type c_7316751;
-+object e_7316783 [3];
-+c_7316751.hdr.mark = gc_color_red;
-+ c_7316751.hdr.grayed = 0;
-+c_7316751.tag = closureN_tag;
-+ c_7316751.fn = (function_type)__lambda_425;
-+c_7316751.num_args = 1;
-+c_7316751.num_elements = 3;
-+c_7316751.elements = (object *)e_7316783;
-+c_7316751.elements[0] = ((closureN)self_7312095)->elements[0];
-+c_7316751.elements[1] = k_734793;
-+c_7316751.elements[2] = ((closureN)self_7312095)->elements[1];
++closureN_type c_7316744;
++object e_7316776 [3];
++c_7316744.hdr.mark = gc_color_red;
++ c_7316744.hdr.grayed = 0;
++c_7316744.tag = closureN_tag;
++ c_7316744.fn = (function_type)__lambda_425;
++c_7316744.num_args = 1;
++c_7316744.num_elements = 3;
++c_7316744.elements = (object *)e_7316776;
++c_7316744.elements[0] = ((closureN)self_7312088)->elements[0];
++c_7316744.elements[1] = k_734786;
++c_7316744.elements[2] = ((closureN)self_7312088)->elements[1];
  
  
 -closureN_type c_7318077;
@@ -50640,35 +50845,35 @@ Make let-values be the same as let*-values, to work around
 -c_7318077.num_elements = 1;
 -c_7318077.elements = (object *)e_7318080;
 -c_7318077.elements[0] = lists_73534_733146;
-+closureN_type c_7316784;
-+object e_7316787 [1];
-+c_7316784.hdr.mark = gc_color_red;
-+ c_7316784.hdr.grayed = 0;
-+c_7316784.tag = closureN_tag;
-+ c_7316784.fn = (function_type)__lambda_430;
-+c_7316784.num_args = 0;
-+c_7316784.num_elements = 1;
-+c_7316784.elements = (object *)e_7316787;
-+c_7316784.elements[0] = lists_73534_732806;
++closureN_type c_7316777;
++object e_7316780 [1];
++c_7316777.hdr.mark = gc_color_red;
++ c_7316777.hdr.grayed = 0;
++c_7316777.tag = closureN_tag;
++ c_7316777.fn = (function_type)__lambda_430;
++c_7316777.num_args = 0;
++c_7316777.num_elements = 1;
++c_7316777.elements = (object *)e_7316780;
++c_7316777.elements[0] = lists_73534_732799;
  
 -return_direct_with_clo1(data,(closure)&c_7318044,__lambda_425,  &c_7318077);; 
-+return_direct_with_clo1(data,(closure)&c_7316751,__lambda_425,  &c_7316784);; 
++return_direct_with_clo1(data,(closure)&c_7316744,__lambda_425,  &c_7316777);; 
  }
  
 -static void __lambda_430(void *data, object self_7313342, int argc, object *args) /* object self_7313342, object k_735245 */
-+static void __lambda_430(void *data, object self_7312096, int argc, object *args) /* object self_7312096, object k_734800 */
++static void __lambda_430(void *data, object self_7312089, int argc, object *args) /* object self_7312089, object k_734793 */
   {
 - object k_735245 = args[0];
 -  return_direct_with_clo2(data,  __glo__75cars_87cdrs_scheme_base, (((closure)  __glo__75cars_87cdrs_scheme_base)->fn),  k_735245, ((closureN)self_7313342)->elements[0]);; 
-+ object k_734800 = args[0];
-+  return_direct_with_clo2(data,  __glo__75cars_87cdrs_scheme_base, (((closure)  __glo__75cars_87cdrs_scheme_base)->fn),  k_734800, ((closureN)self_7312096)->elements[0]);; 
++ object k_734793 = args[0];
++  return_direct_with_clo2(data,  __glo__75cars_87cdrs_scheme_base, (((closure)  __glo__75cars_87cdrs_scheme_base)->fn),  k_734793, ((closureN)self_7312089)->elements[0]);; 
  }
  
 -static void __lambda_425(void *data, object self_7313343, int argc, object *args) /* object self_7313343, object r_735239 */
-+static void __lambda_425(void *data, object self_7312097, int argc, object *args) /* object self_7312097, object r_734794 */
++static void __lambda_425(void *data, object self_7312090, int argc, object *args) /* object self_7312090, object r_734787 */
   {
 - object r_735239 = args[0];
-+ object r_734794 = args[0];
++ object r_734787 = args[0];
    
 -closureN_type c_7318046;
 -object e_7318050 [2];
@@ -50681,17 +50886,17 @@ Make let-values be the same as let*-values, to work around
 -c_7318046.elements = (object *)e_7318050;
 -c_7318046.elements[0] = ((closureN)self_7313343)->elements[1];
 -c_7318046.elements[1] = r_735239;
-+closureN_type c_7316753;
-+object e_7316757 [2];
-+c_7316753.hdr.mark = gc_color_red;
-+ c_7316753.hdr.grayed = 0;
-+c_7316753.tag = closureN_tag;
-+ c_7316753.fn = (function_type)__lambda_426;
-+c_7316753.num_args = 1;
-+c_7316753.num_elements = 2;
-+c_7316753.elements = (object *)e_7316757;
-+c_7316753.elements[0] = ((closureN)self_7312097)->elements[1];
-+c_7316753.elements[1] = r_734794;
++closureN_type c_7316746;
++object e_7316750 [2];
++c_7316746.hdr.mark = gc_color_red;
++ c_7316746.hdr.grayed = 0;
++c_7316746.tag = closureN_tag;
++ c_7316746.fn = (function_type)__lambda_426;
++c_7316746.num_args = 1;
++c_7316746.num_elements = 2;
++c_7316746.elements = (object *)e_7316750;
++c_7316746.elements[0] = ((closureN)self_7312090)->elements[1];
++c_7316746.elements[1] = r_734787;
  
  
 -closureN_type c_7318051;
@@ -50705,30 +50910,30 @@ Make let-values be the same as let*-values, to work around
 -c_7318051.elements = (object *)e_7318075;
 -c_7318051.elements[0] = ((closureN)self_7313343)->elements[0];
 -c_7318051.elements[1] = ((closureN)self_7313343)->elements[2];
-+closureN_type c_7316758;
-+object e_7316782 [2];
-+c_7316758.hdr.mark = gc_color_red;
-+ c_7316758.hdr.grayed = 0;
-+c_7316758.tag = closureN_tag;
-+ c_7316758.fn = (function_type)__lambda_427;
-+c_7316758.num_args = 2;
-+c_7316758.num_elements = 2;
-+c_7316758.elements = (object *)e_7316782;
-+c_7316758.elements[0] = ((closureN)self_7312097)->elements[0];
-+c_7316758.elements[1] = ((closureN)self_7312097)->elements[2];
++closureN_type c_7316751;
++object e_7316775 [2];
++c_7316751.hdr.mark = gc_color_red;
++ c_7316751.hdr.grayed = 0;
++c_7316751.tag = closureN_tag;
++ c_7316751.fn = (function_type)__lambda_427;
++c_7316751.num_args = 2;
++c_7316751.num_elements = 2;
++c_7316751.elements = (object *)e_7316775;
++c_7316751.elements[0] = ((closureN)self_7312090)->elements[0];
++c_7316751.elements[1] = ((closureN)self_7312090)->elements[2];
  
 -return_direct_with_clo1(data,(closure)&c_7318046,__lambda_426,  &c_7318051);; 
-+return_direct_with_clo1(data,(closure)&c_7316753,__lambda_426,  &c_7316758);; 
++return_direct_with_clo1(data,(closure)&c_7316746,__lambda_426,  &c_7316751);; 
  }
  
 -static void __lambda_427(void *data, object self_7313344, int argc, object *args) /* object self_7313344, object k_735241, object cars_73535_733147, object cdrs_73536_733148 */
-+static void __lambda_427(void *data, object self_7312098, int argc, object *args) /* object self_7312098, object k_734796, object cars_73535_732807, object cdrs_73536_732808 */
++static void __lambda_427(void *data, object self_7312091, int argc, object *args) /* object self_7312091, object k_734789, object cars_73535_732800, object cdrs_73536_732801 */
   {
 - object k_735241 = args[0]; object cars_73535_733147 = args[1]; object cdrs_73536_733148 = args[2];
-+ object k_734796 = args[0]; object cars_73535_732807 = args[1]; object cdrs_73536_732808 = args[2];
++ object k_734789 = args[0]; object cars_73535_732800 = args[1]; object cdrs_73536_732801 = args[2];
      
 -if( (boolean_f != Cyc_is_pair(cars_73535_733147)) ){ 
-+if( (boolean_f != Cyc_is_pair(cars_73535_732807)) ){ 
++if( (boolean_f != Cyc_is_pair(cars_73535_732800)) ){ 
    
 -closureN_type c_7318055;
 -object e_7318069 [3];
@@ -50742,35 +50947,35 @@ Make let-values be the same as let*-values, to work around
 -c_7318055.elements[0] = cdrs_73536_733148;
 -c_7318055.elements[1] = k_735241;
 -c_7318055.elements[2] = ((closureN)self_7313344)->elements[1];
-+closureN_type c_7316762;
-+object e_7316776 [3];
-+c_7316762.hdr.mark = gc_color_red;
-+ c_7316762.hdr.grayed = 0;
-+c_7316762.tag = closureN_tag;
-+ c_7316762.fn = (function_type)__lambda_428;
-+c_7316762.num_args = 1;
-+c_7316762.num_elements = 3;
-+c_7316762.elements = (object *)e_7316776;
-+c_7316762.elements[0] = cdrs_73536_732808;
-+c_7316762.elements[1] = k_734796;
-+c_7316762.elements[2] = ((closureN)self_7312098)->elements[1];
++closureN_type c_7316755;
++object e_7316769 [3];
++c_7316755.hdr.mark = gc_color_red;
++ c_7316755.hdr.grayed = 0;
++c_7316755.tag = closureN_tag;
++ c_7316755.fn = (function_type)__lambda_428;
++c_7316755.num_args = 1;
++c_7316755.num_elements = 3;
++c_7316755.elements = (object *)e_7316769;
++c_7316755.elements[0] = cdrs_73536_732801;
++c_7316755.elements[1] = k_734789;
++c_7316755.elements[2] = ((closureN)self_7312091)->elements[1];
  
  
 -object c_7318072 = apply(data,(closure)&c_7318055,((closureN)self_7313344)->elements[0], cars_73535_733147);
 -return_closcall1(data,(closure)&c_7318055,  c_7318072);
-+object c_7316779 = apply(data,(closure)&c_7316762,((closureN)self_7312098)->elements[0], cars_73535_732807);
-+return_closcall1(data,(closure)&c_7316762,  c_7316779);
++object c_7316772 = apply(data,(closure)&c_7316755,((closureN)self_7312091)->elements[0], cars_73535_732800);
++return_closcall1(data,(closure)&c_7316755,  c_7316772);
  } else { 
 -  return_direct_with_clo1(data,  k_735241, (((closure)  k_735241)->fn),  NULL);}
-+  return_direct_with_clo1(data,  k_734796, (((closure)  k_734796)->fn),  NULL);}
++  return_direct_with_clo1(data,  k_734789, (((closure)  k_734789)->fn),  NULL);}
  ;; 
  }
  
 -static void __lambda_428(void *data, object self_7313345, int argc, object *args) /* object self_7313345, object x_73537_733149 */
-+static void __lambda_428(void *data, object self_7312099, int argc, object *args) /* object self_7312099, object x_73537_732809 */
++static void __lambda_428(void *data, object self_7312092, int argc, object *args) /* object self_7312092, object x_73537_732802 */
   {
 - object x_73537_733149 = args[0];
-+ object x_73537_732809 = args[0];
++ object x_73537_732802 = args[0];
    
  
  
@@ -50785,48 +50990,48 @@ Make let-values be the same as let*-values, to work around
 -c_7318060.elements = (object *)e_7318067;
 -c_7318060.elements[0] = ((closureN)self_7313345)->elements[1];
 -c_7318060.elements[1] = x_73537_733149;
-+closureN_type c_7316767;
-+object e_7316774 [2];
-+c_7316767.hdr.mark = gc_color_red;
-+ c_7316767.hdr.grayed = 0;
-+c_7316767.tag = closureN_tag;
-+ c_7316767.fn = (function_type)__lambda_429;
-+c_7316767.num_args = 1;
-+c_7316767.num_elements = 2;
-+c_7316767.elements = (object *)e_7316774;
-+c_7316767.elements[0] = ((closureN)self_7312099)->elements[1];
-+c_7316767.elements[1] = x_73537_732809;
++closureN_type c_7316760;
++object e_7316767 [2];
++c_7316760.hdr.mark = gc_color_red;
++ c_7316760.hdr.grayed = 0;
++c_7316760.tag = closureN_tag;
++ c_7316760.fn = (function_type)__lambda_429;
++c_7316760.num_args = 1;
++c_7316760.num_elements = 2;
++c_7316760.elements = (object *)e_7316767;
++c_7316760.elements[0] = ((closureN)self_7312092)->elements[1];
++c_7316760.elements[1] = x_73537_732802;
  
 -return_closcall2(data,  car(((closureN)self_7313345)->elements[2]),  &c_7318060, ((closureN)self_7313345)->elements[0]);; 
-+return_closcall2(data,  car(((closureN)self_7312099)->elements[2]),  &c_7316767, ((closureN)self_7312099)->elements[0]);; 
++return_closcall2(data,  car(((closureN)self_7312092)->elements[2]),  &c_7316760, ((closureN)self_7312092)->elements[0]);; 
  }
  
 -static void __lambda_429(void *data, object self_7313346, int argc, object *args) /* object self_7313346, object r_735244 */
-+static void __lambda_429(void *data, object self_7312100, int argc, object *args) /* object self_7312100, object r_734799 */
++static void __lambda_429(void *data, object self_7312093, int argc, object *args) /* object self_7312093, object r_734792 */
   {
 - object r_735244 = args[0];
-+ object r_734799 = args[0];
++ object r_734792 = args[0];
    
 -pair_type local_7318065; 
 -return_direct_with_clo1(data,  ((closureN)self_7313346)->elements[0], (((closure)  ((closureN)self_7313346)->elements[0])->fn),  set_pair_as_expr(&local_7318065, ((closureN)self_7313346)->elements[1], r_735244));; 
-+pair_type local_7316772; 
-+return_direct_with_clo1(data,  ((closureN)self_7312100)->elements[0], (((closure)  ((closureN)self_7312100)->elements[0])->fn),  set_pair_as_expr(&local_7316772, ((closureN)self_7312100)->elements[1], r_734799));; 
++pair_type local_7316765; 
++return_direct_with_clo1(data,  ((closureN)self_7312093)->elements[0], (((closure)  ((closureN)self_7312093)->elements[0])->fn),  set_pair_as_expr(&local_7316765, ((closureN)self_7312093)->elements[1], r_734792));; 
  }
  
 -static void __lambda_426(void *data, object self_7313347, int argc, object *args) /* object self_7313347, object r_735240 */
-+static void __lambda_426(void *data, object self_7312101, int argc, object *args) /* object self_7312101, object r_734795 */
++static void __lambda_426(void *data, object self_7312094, int argc, object *args) /* object self_7312094, object r_734788 */
   {
 - object r_735240 = args[0];
 -  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_7313347)->elements[0], ((closureN)self_7313347)->elements[1], r_735240);; 
-+ object r_734795 = args[0];
-+  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_7312101)->elements[0], ((closureN)self_7312101)->elements[1], r_734795);; 
++ object r_734788 = args[0];
++  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_7312094)->elements[0], ((closureN)self_7312094)->elements[1], r_734788);; 
  }
  
 -static void __lambda_422(void *data, object self_7313348, int argc, object *args) /* object self_7313348, object r_735237 */
-+static void __lambda_422(void *data, object self_7312102, int argc, object *args) /* object self_7312102, object r_734792 */
++static void __lambda_422(void *data, object self_7312095, int argc, object *args) /* object self_7312095, object r_734785 */
   {
 - object r_735237 = args[0];
-+ object r_734792 = args[0];
++ object r_734785 = args[0];
    
 -closureN_type c_7318030;
 -object e_7318037 [3];
@@ -50840,42 +51045,41 @@ Make let-values be the same as let*-values, to work around
 -c_7318030.elements[0] = ((closureN)self_7313348)->elements[0];
 -c_7318030.elements[1] = ((closureN)self_7313348)->elements[1];
 -c_7318030.elements[2] = ((closureN)self_7313348)->elements[2];
-+closureN_type c_7316737;
-+object e_7316744 [3];
-+c_7316737.hdr.mark = gc_color_red;
-+ c_7316737.hdr.grayed = 0;
-+c_7316737.tag = closureN_tag;
-+ c_7316737.fn = (function_type)__lambda_423;
-+c_7316737.num_args = 1;
-+c_7316737.num_elements = 3;
-+c_7316737.elements = (object *)e_7316744;
-+c_7316737.elements[0] = ((closureN)self_7312102)->elements[0];
-+c_7316737.elements[1] = ((closureN)self_7312102)->elements[1];
-+c_7316737.elements[2] = ((closureN)self_7312102)->elements[2];
++closureN_type c_7316730;
++object e_7316737 [3];
++c_7316730.hdr.mark = gc_color_red;
++ c_7316730.hdr.grayed = 0;
++c_7316730.tag = closureN_tag;
++ c_7316730.fn = (function_type)__lambda_423;
++c_7316730.num_args = 1;
++c_7316730.num_elements = 3;
++c_7316730.elements = (object *)e_7316737;
++c_7316730.elements[0] = ((closureN)self_7312095)->elements[0];
++c_7316730.elements[1] = ((closureN)self_7312095)->elements[1];
++c_7316730.elements[2] = ((closureN)self_7312095)->elements[2];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7318030,__lambda_423,  Cyc_set_cell(data, ((closureN)self_7313348)->elements[2], r_735237));; 
-+return_direct_with_clo1(data,(closure)&c_7316737,__lambda_423,  Cyc_set_cell(data, ((closureN)self_7312102)->elements[2], r_734792));; 
++return_direct_with_clo1(data,(closure)&c_7316730,__lambda_423,  Cyc_set_cell(data, ((closureN)self_7312095)->elements[2], r_734785));; 
  }
  
 -static void __lambda_423(void *data, object self_7313349, int argc, object *args) /* object self_7313349, object r_735236 */
-+static void __lambda_423(void *data, object self_7312103, int argc, object *args) /* object self_7312103, object r_734791 */
++static void __lambda_423(void *data, object self_7312096, int argc, object *args) /* object self_7312096, object r_734784 */
   {
  
    
  
 -return_closcall2(data,  car(((closureN)self_7313349)->elements[2]),  ((closureN)self_7313349)->elements[0], ((closureN)self_7313349)->elements[1]);; 
-+return_closcall2(data,  car(((closureN)self_7312103)->elements[2]),  ((closureN)self_7312103)->elements[0], ((closureN)self_7312103)->elements[1]);; 
++return_closcall2(data,  car(((closureN)self_7312096)->elements[2]),  ((closureN)self_7312096)->elements[0], ((closureN)self_7312096)->elements[1]);; 
  }
  
 -static void __lambda_399(void *data, object _, int argc, object *args) /* closure _,object k_735205, object lists_73516_733130 */
-+static void __lambda_399(void *data, object _, int argc, object *args) /* closure _,object k_734760, object lists_73516_732790 */
++static void __lambda_399(void *data, object _, int argc, object *args) /* closure _,object k_734753, object lists_73516_732783 */
   {
 -object k_735205 = args[0]; object lists_73516_733130 = args[1];
--  Cyc_st_add(data, "scheme/base.sld:%cars+cdrs");
-+object k_734760 = args[0]; object lists_73516_732790 = args[1];
-+  Cyc_st_add(data, "base.sld:%cars+cdrs");
++object k_734753 = args[0]; object lists_73516_732783 = args[1];
+   Cyc_st_add(data, "scheme/base.sld:%cars+cdrs");
  
 -closureN_type c_7317908;
 -object e_7317911 [1];
@@ -50887,18 +51091,8 @@ Make let-values be the same as let*-values, to work around
 -c_7317908.num_elements = 1;
 -c_7317908.elements = (object *)e_7317911;
 -c_7317908.elements[0] = k_735205;
-+closureN_type c_7316615;
-+object e_7316618 [1];
-+c_7316615.hdr.mark = gc_color_red;
-+ c_7316615.hdr.grayed = 0;
-+c_7316615.tag = closureN_tag;
-+ c_7316615.fn = (function_type)__lambda_400;
-+c_7316615.num_args = 1;
-+c_7316615.num_elements = 1;
-+c_7316615.elements = (object *)e_7316618;
-+c_7316615.elements[0] = k_734760;
- 
- 
+-
+-
 -closureN_type c_7317912;
 -object e_7318017 [1];
 -c_7317912.hdr.mark = gc_color_red;
@@ -50909,27 +51103,14 @@ Make let-values be the same as let*-values, to work around
 -c_7317912.num_elements = 1;
 -c_7317912.elements = (object *)e_7318017;
 -c_7317912.elements[0] = lists_73516_733130;
-+closureN_type c_7316619;
-+object e_7316724 [1];
-+c_7316619.hdr.mark = gc_color_red;
-+ c_7316619.hdr.grayed = 0;
-+c_7316619.tag = closureN_tag;
-+ c_7316619.fn = (function_type)__lambda_401;
-+c_7316619.num_args = 1;
-+c_7316619.num_elements = 1;
-+c_7316619.elements = (object *)e_7316724;
-+c_7316619.elements[0] = lists_73516_732790;
- 
+-
 -return_direct_with_clo1(data,(closure)&c_7317908,__lambda_400,  &c_7317912);; 
-+return_direct_with_clo1(data,(closure)&c_7316615,__lambda_400,  &c_7316619);; 
- }
- 
+-}
+-
 -static void __lambda_401(void *data, object self_7313318, int argc, object *args) /* object self_7313318, object k_735207, object abort_73517_733131 */
-+static void __lambda_401(void *data, object self_7312072, int argc, object *args) /* object self_7312072, object k_734762, object abort_73517_732791 */
-  {
+- {
 - object k_735207 = args[0]; object abort_73517_733131 = args[1];
-+ object k_734762 = args[0]; object abort_73517_732791 = args[1];
-   
+-  
 -closureN_type c_7317914;
 -object e_7318015 [2];
 -c_7317914.hdr.mark = gc_color_red;
@@ -50941,28 +51122,14 @@ Make let-values be the same as let*-values, to work around
 -c_7317914.elements = (object *)e_7318015;
 -c_7317914.elements[0] = abort_73517_733131;
 -c_7317914.elements[1] = k_735207;
-+closureN_type c_7316621;
-+object e_7316722 [2];
-+c_7316621.hdr.mark = gc_color_red;
-+ c_7316621.hdr.grayed = 0;
-+c_7316621.tag = closureN_tag;
-+ c_7316621.fn = (function_type)__lambda_402;
-+c_7316621.num_args = 1;
-+c_7316621.num_elements = 2;
-+c_7316621.elements = (object *)e_7316722;
-+c_7316621.elements[0] = abort_73517_732791;
-+c_7316621.elements[1] = k_734762;
- 
+-
 -return_direct_with_clo1(data,(closure)&c_7317914,__lambda_402,  ((closureN)self_7313318)->elements[0]);; 
-+return_direct_with_clo1(data,(closure)&c_7316621,__lambda_402,  ((closureN)self_7312072)->elements[0]);; 
- }
- 
+-}
+-
 -static void __lambda_402(void *data, object self_7313319, int argc, object *args) /* object self_7313319, object lists_73519_733132 */
-+static void __lambda_402(void *data, object self_7312073, int argc, object *args) /* object self_7312073, object lists_73519_732792 */
-  {
+- {
 - object lists_73519_733132 = args[0];
-+ object lists_73519_732792 = args[0];
-   
+-  
 -closureN_type c_7317916;
 -object e_7318014 [3];
 -c_7317916.hdr.mark = gc_color_red;
@@ -50975,29 +51142,14 @@ Make let-values be the same as let*-values, to work around
 -c_7317916.elements[0] = ((closureN)self_7313319)->elements[0];
 -c_7317916.elements[1] = ((closureN)self_7313319)->elements[1];
 -c_7317916.elements[2] = lists_73519_733132;
-+closureN_type c_7316623;
-+object e_7316721 [3];
-+c_7316623.hdr.mark = gc_color_red;
-+ c_7316623.hdr.grayed = 0;
-+c_7316623.tag = closureN_tag;
-+ c_7316623.fn = (function_type)__lambda_403;
-+c_7316623.num_args = 1;
-+c_7316623.num_elements = 3;
-+c_7316623.elements = (object *)e_7316721;
-+c_7316623.elements[0] = ((closureN)self_7312073)->elements[0];
-+c_7316623.elements[1] = ((closureN)self_7312073)->elements[1];
-+c_7316623.elements[2] = lists_73519_732792;
- 
+-
 -return_direct_with_clo1(data,(closure)&c_7317916,__lambda_403,  boolean_f);; 
-+return_direct_with_clo1(data,(closure)&c_7316623,__lambda_403,  boolean_f);; 
- }
- 
+-}
+-
 -static void __lambda_403(void *data, object self_7313320, int argc, object *args) /* object self_7313320, object recur_73520_733133 */
-+static void __lambda_403(void *data, object self_7312074, int argc, object *args) /* object self_7312074, object recur_73520_732793 */
-  {
+- {
 - object recur_73520_733133 = args[0];
-+ object recur_73520_732793 = args[0];
-   
+-  
 -closureN_type c_7317918;
 -object e_7318010 [3];
 -c_7317918.hdr.mark = gc_color_red;
@@ -51010,32 +51162,16 @@ Make let-values be the same as let*-values, to work around
 -c_7317918.elements[0] = ((closureN)self_7313320)->elements[0];
 -c_7317918.elements[1] = ((closureN)self_7313320)->elements[1];
 -c_7317918.elements[2] = ((closureN)self_7313320)->elements[2];
-+closureN_type c_7316625;
-+object e_7316717 [3];
-+c_7316625.hdr.mark = gc_color_red;
-+ c_7316625.hdr.grayed = 0;
-+c_7316625.tag = closureN_tag;
-+ c_7316625.fn = (function_type)__lambda_1310;
-+c_7316625.num_args = 1;
-+c_7316625.num_elements = 3;
-+c_7316625.elements = (object *)e_7316717;
-+c_7316625.elements[0] = ((closureN)self_7312074)->elements[0];
-+c_7316625.elements[1] = ((closureN)self_7312074)->elements[1];
-+c_7316625.elements[2] = ((closureN)self_7312074)->elements[2];
- 
- 
+-
+-
 -pair_type local_7318013; 
 -return_direct_with_clo1(data,(closure)&c_7317918,__lambda_1357,  set_cell_as_expr(&local_7318013, recur_73520_733133));; 
-+pair_type local_7316720; 
-+return_direct_with_clo1(data,(closure)&c_7316625,__lambda_1310,  set_cell_as_expr(&local_7316720, recur_73520_732793));; 
- }
- 
+-}
+-
 -static void __lambda_1357(void *data, object self_7313321, int argc, object *args) /* object self_7313321, object recur_73520_733133 */
-+static void __lambda_1310(void *data, object self_7312075, int argc, object *args) /* object self_7312075, object recur_73520_732793 */
-  {
+- {
 - object recur_73520_733133 = args[0];
-+ object recur_73520_732793 = args[0];
-   
+-  
 -closureN_type c_7317920;
 -object e_7317933 [3];
 -c_7317920.hdr.mark = gc_color_red;
@@ -51048,20 +51184,8 @@ Make let-values be the same as let*-values, to work around
 -c_7317920.elements[0] = ((closureN)self_7313321)->elements[1];
 -c_7317920.elements[1] = ((closureN)self_7313321)->elements[2];
 -c_7317920.elements[2] = recur_73520_733133;
-+closureN_type c_7316627;
-+object e_7316640 [3];
-+c_7316627.hdr.mark = gc_color_red;
-+ c_7316627.hdr.grayed = 0;
-+c_7316627.tag = closureN_tag;
-+ c_7316627.fn = (function_type)__lambda_404;
-+c_7316627.num_args = 1;
-+c_7316627.num_elements = 3;
-+c_7316627.elements = (object *)e_7316640;
-+c_7316627.elements[0] = ((closureN)self_7312075)->elements[1];
-+c_7316627.elements[1] = ((closureN)self_7312075)->elements[2];
-+c_7316627.elements[2] = recur_73520_732793;
- 
- 
+-
+-
 -closureN_type c_7317934;
 -object e_7318009 [2];
 -c_7317934.hdr.mark = gc_color_red;
@@ -51073,31 +51197,16 @@ Make let-values be the same as let*-values, to work around
 -c_7317934.elements = (object *)e_7318009;
 -c_7317934.elements[0] = ((closureN)self_7313321)->elements[0];
 -c_7317934.elements[1] = recur_73520_733133;
-+closureN_type c_7316641;
-+object e_7316716 [2];
-+c_7316641.hdr.mark = gc_color_red;
-+ c_7316641.hdr.grayed = 0;
-+c_7316641.tag = closureN_tag;
-+ c_7316641.fn = (function_type)__lambda_406;
-+c_7316641.num_args = 1;
-+c_7316641.num_elements = 2;
-+c_7316641.elements = (object *)e_7316716;
-+c_7316641.elements[0] = ((closureN)self_7312075)->elements[0];
-+c_7316641.elements[1] = recur_73520_732793;
- 
+-
 -return_direct_with_clo1(data,(closure)&c_7317920,__lambda_404,  &c_7317934);; 
-+return_direct_with_clo1(data,(closure)&c_7316627,__lambda_404,  &c_7316641);; 
- }
- 
+-}
+-
 -static void __lambda_406(void *data, object self_7313322, int argc, object *args) /* object self_7313322, object k_735210, object lists_73521_733134 */
-+static void __lambda_406(void *data, object self_7312076, int argc, object *args) /* object self_7312076, object k_734765, object lists_73521_732794 */
-  {
+- {
 - object k_735210 = args[0]; object lists_73521_733134 = args[1];
-+ object k_734765 = args[0]; object lists_73521_732794 = args[1];
-     
+-    
 -if( (boolean_f != Cyc_is_pair(lists_73521_733134)) ){ 
-+if( (boolean_f != Cyc_is_pair(lists_73521_732794)) ){ 
-   
+-  
 -closureN_type c_7317938;
 -object e_7317998 [3];
 -c_7317938.hdr.mark = gc_color_red;
@@ -51110,18 +51219,144 @@ Make let-values be the same as let*-values, to work around
 -c_7317938.elements[0] = ((closureN)self_7313322)->elements[0];
 -c_7317938.elements[1] = k_735210;
 -c_7317938.elements[2] = ((closureN)self_7313322)->elements[1];
-+closureN_type c_7316645;
-+object e_7316705 [3];
-+c_7316645.hdr.mark = gc_color_red;
-+ c_7316645.hdr.grayed = 0;
-+c_7316645.tag = closureN_tag;
-+ c_7316645.fn = (function_type)__lambda_407;
-+c_7316645.num_args = 1;
-+c_7316645.num_elements = 3;
-+c_7316645.elements = (object *)e_7316705;
-+c_7316645.elements[0] = ((closureN)self_7312076)->elements[0];
-+c_7316645.elements[1] = k_734765;
-+c_7316645.elements[2] = ((closureN)self_7312076)->elements[1];
++closureN_type c_7316608;
++object e_7316611 [1];
++c_7316608.hdr.mark = gc_color_red;
++ c_7316608.hdr.grayed = 0;
++c_7316608.tag = closureN_tag;
++ c_7316608.fn = (function_type)__lambda_400;
++c_7316608.num_args = 1;
++c_7316608.num_elements = 1;
++c_7316608.elements = (object *)e_7316611;
++c_7316608.elements[0] = k_734753;
++
++
++closureN_type c_7316612;
++object e_7316717 [1];
++c_7316612.hdr.mark = gc_color_red;
++ c_7316612.hdr.grayed = 0;
++c_7316612.tag = closureN_tag;
++ c_7316612.fn = (function_type)__lambda_401;
++c_7316612.num_args = 1;
++c_7316612.num_elements = 1;
++c_7316612.elements = (object *)e_7316717;
++c_7316612.elements[0] = lists_73516_732783;
++
++return_direct_with_clo1(data,(closure)&c_7316608,__lambda_400,  &c_7316612);; 
++}
++
++static void __lambda_401(void *data, object self_7312065, int argc, object *args) /* object self_7312065, object k_734755, object abort_73517_732784 */
++ {
++ object k_734755 = args[0]; object abort_73517_732784 = args[1];
++  
++closureN_type c_7316614;
++object e_7316715 [2];
++c_7316614.hdr.mark = gc_color_red;
++ c_7316614.hdr.grayed = 0;
++c_7316614.tag = closureN_tag;
++ c_7316614.fn = (function_type)__lambda_402;
++c_7316614.num_args = 1;
++c_7316614.num_elements = 2;
++c_7316614.elements = (object *)e_7316715;
++c_7316614.elements[0] = abort_73517_732784;
++c_7316614.elements[1] = k_734755;
++
++return_direct_with_clo1(data,(closure)&c_7316614,__lambda_402,  ((closureN)self_7312065)->elements[0]);; 
++}
++
++static void __lambda_402(void *data, object self_7312066, int argc, object *args) /* object self_7312066, object lists_73519_732785 */
++ {
++ object lists_73519_732785 = args[0];
++  
++closureN_type c_7316616;
++object e_7316714 [3];
++c_7316616.hdr.mark = gc_color_red;
++ c_7316616.hdr.grayed = 0;
++c_7316616.tag = closureN_tag;
++ c_7316616.fn = (function_type)__lambda_403;
++c_7316616.num_args = 1;
++c_7316616.num_elements = 3;
++c_7316616.elements = (object *)e_7316714;
++c_7316616.elements[0] = ((closureN)self_7312066)->elements[0];
++c_7316616.elements[1] = ((closureN)self_7312066)->elements[1];
++c_7316616.elements[2] = lists_73519_732785;
++
++return_direct_with_clo1(data,(closure)&c_7316616,__lambda_403,  boolean_f);; 
++}
++
++static void __lambda_403(void *data, object self_7312067, int argc, object *args) /* object self_7312067, object recur_73520_732786 */
++ {
++ object recur_73520_732786 = args[0];
++  
++closureN_type c_7316618;
++object e_7316710 [3];
++c_7316618.hdr.mark = gc_color_red;
++ c_7316618.hdr.grayed = 0;
++c_7316618.tag = closureN_tag;
++ c_7316618.fn = (function_type)__lambda_1310;
++c_7316618.num_args = 1;
++c_7316618.num_elements = 3;
++c_7316618.elements = (object *)e_7316710;
++c_7316618.elements[0] = ((closureN)self_7312067)->elements[0];
++c_7316618.elements[1] = ((closureN)self_7312067)->elements[1];
++c_7316618.elements[2] = ((closureN)self_7312067)->elements[2];
++
++
++pair_type local_7316713; 
++return_direct_with_clo1(data,(closure)&c_7316618,__lambda_1310,  set_cell_as_expr(&local_7316713, recur_73520_732786));; 
++}
++
++static void __lambda_1310(void *data, object self_7312068, int argc, object *args) /* object self_7312068, object recur_73520_732786 */
++ {
++ object recur_73520_732786 = args[0];
++  
++closureN_type c_7316620;
++object e_7316633 [3];
++c_7316620.hdr.mark = gc_color_red;
++ c_7316620.hdr.grayed = 0;
++c_7316620.tag = closureN_tag;
++ c_7316620.fn = (function_type)__lambda_404;
++c_7316620.num_args = 1;
++c_7316620.num_elements = 3;
++c_7316620.elements = (object *)e_7316633;
++c_7316620.elements[0] = ((closureN)self_7312068)->elements[1];
++c_7316620.elements[1] = ((closureN)self_7312068)->elements[2];
++c_7316620.elements[2] = recur_73520_732786;
++
++
++closureN_type c_7316634;
++object e_7316709 [2];
++c_7316634.hdr.mark = gc_color_red;
++ c_7316634.hdr.grayed = 0;
++c_7316634.tag = closureN_tag;
++ c_7316634.fn = (function_type)__lambda_406;
++c_7316634.num_args = 1;
++c_7316634.num_elements = 2;
++c_7316634.elements = (object *)e_7316709;
++c_7316634.elements[0] = ((closureN)self_7312068)->elements[0];
++c_7316634.elements[1] = recur_73520_732786;
++
++return_direct_with_clo1(data,(closure)&c_7316620,__lambda_404,  &c_7316634);; 
++}
++
++static void __lambda_406(void *data, object self_7312069, int argc, object *args) /* object self_7312069, object k_734758, object lists_73521_732787 */
++ {
++ object k_734758 = args[0]; object lists_73521_732787 = args[1];
++    
++if( (boolean_f != Cyc_is_pair(lists_73521_732787)) ){ 
++  
++closureN_type c_7316638;
++object e_7316698 [3];
++c_7316638.hdr.mark = gc_color_red;
++ c_7316638.hdr.grayed = 0;
++c_7316638.tag = closureN_tag;
++ c_7316638.fn = (function_type)__lambda_407;
++c_7316638.num_args = 1;
++c_7316638.num_elements = 3;
++c_7316638.elements = (object *)e_7316698;
++c_7316638.elements[0] = ((closureN)self_7312069)->elements[0];
++c_7316638.elements[1] = k_734758;
++c_7316638.elements[2] = ((closureN)self_7312069)->elements[1];
  
  
 -closureN_type c_7317999;
@@ -51134,43 +51369,43 @@ Make let-values be the same as let*-values, to work around
 -c_7317999.num_elements = 1;
 -c_7317999.elements = (object *)e_7318007;
 -c_7317999.elements[0] = lists_73521_733134;
-+closureN_type c_7316706;
-+object e_7316714 [1];
-+c_7316706.hdr.mark = gc_color_red;
-+ c_7316706.hdr.grayed = 0;
-+c_7316706.tag = closureN_tag;
-+ c_7316706.fn = (function_type)__lambda_418;
-+c_7316706.num_args = 0;
-+c_7316706.num_elements = 1;
-+c_7316706.elements = (object *)e_7316714;
-+c_7316706.elements[0] = lists_73521_732794;
++closureN_type c_7316699;
++object e_7316707 [1];
++c_7316699.hdr.mark = gc_color_red;
++ c_7316699.hdr.grayed = 0;
++c_7316699.tag = closureN_tag;
++ c_7316699.fn = (function_type)__lambda_418;
++c_7316699.num_args = 0;
++c_7316699.num_elements = 1;
++c_7316699.elements = (object *)e_7316707;
++c_7316699.elements[0] = lists_73521_732787;
  
 -return_direct_with_clo1(data,(closure)&c_7317938,__lambda_407,  &c_7317999);
-+return_direct_with_clo1(data,(closure)&c_7316645,__lambda_407,  &c_7316706);
++return_direct_with_clo1(data,(closure)&c_7316638,__lambda_407,  &c_7316699);
  } else { 
 -  return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_735210, NULL, NULL);}
-+  return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_734765, NULL, NULL);}
++  return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_734758, NULL, NULL);}
  ;; 
  }
  
 -static void __lambda_418(void *data, object self_7313323, int argc, object *args) /* object self_7313323, object k_735228 */
-+static void __lambda_418(void *data, object self_7312077, int argc, object *args) /* object self_7312077, object k_734783 */
++static void __lambda_418(void *data, object self_7312070, int argc, object *args) /* object self_7312070, object k_734776 */
   {
 - object k_735228 = args[0];
-+ object k_734783 = args[0];
++ object k_734776 = args[0];
    
  
  
  
 -return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_735228, Cyc_car(data, ((closureN)self_7313323)->elements[0]), Cyc_cdr(data, ((closureN)self_7313323)->elements[0]));; 
-+return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_734783, Cyc_car(data, ((closureN)self_7312077)->elements[0]), Cyc_cdr(data, ((closureN)self_7312077)->elements[0]));; 
++return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_734776, Cyc_car(data, ((closureN)self_7312070)->elements[0]), Cyc_cdr(data, ((closureN)self_7312070)->elements[0]));; 
  }
  
 -static void __lambda_407(void *data, object self_7313324, int argc, object *args) /* object self_7313324, object r_735212 */
-+static void __lambda_407(void *data, object self_7312078, int argc, object *args) /* object self_7312078, object r_734767 */
++static void __lambda_407(void *data, object self_7312071, int argc, object *args) /* object self_7312071, object r_734760 */
   {
 - object r_735212 = args[0];
-+ object r_734767 = args[0];
++ object r_734760 = args[0];
    
 -closureN_type c_7317940;
 -object e_7317944 [2];
@@ -51183,17 +51418,17 @@ Make let-values be the same as let*-values, to work around
 -c_7317940.elements = (object *)e_7317944;
 -c_7317940.elements[0] = ((closureN)self_7313324)->elements[1];
 -c_7317940.elements[1] = r_735212;
-+closureN_type c_7316647;
-+object e_7316651 [2];
-+c_7316647.hdr.mark = gc_color_red;
-+ c_7316647.hdr.grayed = 0;
-+c_7316647.tag = closureN_tag;
-+ c_7316647.fn = (function_type)__lambda_408;
-+c_7316647.num_args = 1;
-+c_7316647.num_elements = 2;
-+c_7316647.elements = (object *)e_7316651;
-+c_7316647.elements[0] = ((closureN)self_7312078)->elements[1];
-+c_7316647.elements[1] = r_734767;
++closureN_type c_7316640;
++object e_7316644 [2];
++c_7316640.hdr.mark = gc_color_red;
++ c_7316640.hdr.grayed = 0;
++c_7316640.tag = closureN_tag;
++ c_7316640.fn = (function_type)__lambda_408;
++c_7316640.num_args = 1;
++c_7316640.num_elements = 2;
++c_7316640.elements = (object *)e_7316644;
++c_7316640.elements[0] = ((closureN)self_7312071)->elements[1];
++c_7316640.elements[1] = r_734760;
  
  
 -closureN_type c_7317945;
@@ -51207,32 +51442,32 @@ Make let-values be the same as let*-values, to work around
 -c_7317945.elements = (object *)e_7317997;
 -c_7317945.elements[0] = ((closureN)self_7313324)->elements[0];
 -c_7317945.elements[1] = ((closureN)self_7313324)->elements[2];
-+closureN_type c_7316652;
-+object e_7316704 [2];
-+c_7316652.hdr.mark = gc_color_red;
-+ c_7316652.hdr.grayed = 0;
-+c_7316652.tag = closureN_tag;
-+ c_7316652.fn = (function_type)__lambda_409;
-+c_7316652.num_args = 2;
-+c_7316652.num_elements = 2;
-+c_7316652.elements = (object *)e_7316704;
-+c_7316652.elements[0] = ((closureN)self_7312078)->elements[0];
-+c_7316652.elements[1] = ((closureN)self_7312078)->elements[2];
++closureN_type c_7316645;
++object e_7316697 [2];
++c_7316645.hdr.mark = gc_color_red;
++ c_7316645.hdr.grayed = 0;
++c_7316645.tag = closureN_tag;
++ c_7316645.fn = (function_type)__lambda_409;
++c_7316645.num_args = 2;
++c_7316645.num_elements = 2;
++c_7316645.elements = (object *)e_7316697;
++c_7316645.elements[0] = ((closureN)self_7312071)->elements[0];
++c_7316645.elements[1] = ((closureN)self_7312071)->elements[2];
  
 -return_direct_with_clo1(data,(closure)&c_7317940,__lambda_408,  &c_7317945);; 
-+return_direct_with_clo1(data,(closure)&c_7316647,__lambda_408,  &c_7316652);; 
++return_direct_with_clo1(data,(closure)&c_7316640,__lambda_408,  &c_7316645);; 
  }
  
 -static void __lambda_409(void *data, object self_7313325, int argc, object *args) /* object self_7313325, object k_735214, object list_73522_733135, object other_91lists_73523_733136 */
-+static void __lambda_409(void *data, object self_7312079, int argc, object *args) /* object self_7312079, object k_734769, object list_73522_732795, object other_91lists_73523_732796 */
++static void __lambda_409(void *data, object self_7312072, int argc, object *args) /* object self_7312072, object k_734762, object list_73522_732788, object other_91lists_73523_732789 */
   {
 - object k_735214 = args[0]; object list_73522_733135 = args[1]; object other_91lists_73523_733136 = args[2];
-+ object k_734769 = args[0]; object list_73522_732795 = args[1]; object other_91lists_73523_732796 = args[2];
++ object k_734762 = args[0]; object list_73522_732788 = args[1]; object other_91lists_73523_732789 = args[2];
      
 -if( (boolean_f != Cyc_is_null(list_73522_733135)) ){ 
 -  return_closcall3(data,  ((closureN)self_7313325)->elements[0],  k_735214, NULL, NULL);
-+if( (boolean_f != Cyc_is_null(list_73522_732795)) ){ 
-+  return_closcall3(data,  ((closureN)self_7312079)->elements[0],  k_734769, NULL, NULL);
++if( (boolean_f != Cyc_is_null(list_73522_732788)) ){ 
++  return_closcall3(data,  ((closureN)self_7312072)->elements[0],  k_734762, NULL, NULL);
  } else { 
    
 -closureN_type c_7317951;
@@ -51247,18 +51482,18 @@ Make let-values be the same as let*-values, to work around
 -c_7317951.elements[0] = k_735214;
 -c_7317951.elements[1] = other_91lists_73523_733136;
 -c_7317951.elements[2] = ((closureN)self_7313325)->elements[1];
-+closureN_type c_7316658;
-+object e_7316694 [3];
-+c_7316658.hdr.mark = gc_color_red;
-+ c_7316658.hdr.grayed = 0;
-+c_7316658.tag = closureN_tag;
-+ c_7316658.fn = (function_type)__lambda_410;
-+c_7316658.num_args = 1;
-+c_7316658.num_elements = 3;
-+c_7316658.elements = (object *)e_7316694;
-+c_7316658.elements[0] = k_734769;
-+c_7316658.elements[1] = other_91lists_73523_732796;
-+c_7316658.elements[2] = ((closureN)self_7312079)->elements[1];
++closureN_type c_7316651;
++object e_7316687 [3];
++c_7316651.hdr.mark = gc_color_red;
++ c_7316651.hdr.grayed = 0;
++c_7316651.tag = closureN_tag;
++ c_7316651.fn = (function_type)__lambda_410;
++c_7316651.num_args = 1;
++c_7316651.num_elements = 3;
++c_7316651.elements = (object *)e_7316687;
++c_7316651.elements[0] = k_734762;
++c_7316651.elements[1] = other_91lists_73523_732789;
++c_7316651.elements[2] = ((closureN)self_7312072)->elements[1];
  
  
 -closureN_type c_7317988;
@@ -51271,40 +51506,40 @@ Make let-values be the same as let*-values, to work around
 -c_7317988.num_elements = 1;
 -c_7317988.elements = (object *)e_7317996;
 -c_7317988.elements[0] = list_73522_733135;
-+closureN_type c_7316695;
-+object e_7316703 [1];
-+c_7316695.hdr.mark = gc_color_red;
-+ c_7316695.hdr.grayed = 0;
-+c_7316695.tag = closureN_tag;
-+ c_7316695.fn = (function_type)__lambda_417;
-+c_7316695.num_args = 0;
-+c_7316695.num_elements = 1;
-+c_7316695.elements = (object *)e_7316703;
-+c_7316695.elements[0] = list_73522_732795;
++closureN_type c_7316688;
++object e_7316696 [1];
++c_7316688.hdr.mark = gc_color_red;
++ c_7316688.hdr.grayed = 0;
++c_7316688.tag = closureN_tag;
++ c_7316688.fn = (function_type)__lambda_417;
++c_7316688.num_args = 0;
++c_7316688.num_elements = 1;
++c_7316688.elements = (object *)e_7316696;
++c_7316688.elements[0] = list_73522_732788;
  
 -return_direct_with_clo1(data,(closure)&c_7317951,__lambda_410,  &c_7317988);}
-+return_direct_with_clo1(data,(closure)&c_7316658,__lambda_410,  &c_7316695);}
++return_direct_with_clo1(data,(closure)&c_7316651,__lambda_410,  &c_7316688);}
  ;; 
  }
  
 -static void __lambda_417(void *data, object self_7313326, int argc, object *args) /* object self_7313326, object k_735227 */
-+static void __lambda_417(void *data, object self_7312080, int argc, object *args) /* object self_7312080, object k_734782 */
++static void __lambda_417(void *data, object self_7312073, int argc, object *args) /* object self_7312073, object k_734775 */
   {
 - object k_735227 = args[0];
-+ object k_734782 = args[0];
++ object k_734775 = args[0];
    
  
  
  
 -return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_735227, Cyc_car(data, ((closureN)self_7313326)->elements[0]), Cyc_cdr(data, ((closureN)self_7313326)->elements[0]));; 
-+return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_734782, Cyc_car(data, ((closureN)self_7312080)->elements[0]), Cyc_cdr(data, ((closureN)self_7312080)->elements[0]));; 
++return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_734775, Cyc_car(data, ((closureN)self_7312073)->elements[0]), Cyc_cdr(data, ((closureN)self_7312073)->elements[0]));; 
  }
  
 -static void __lambda_410(void *data, object self_7313327, int argc, object *args) /* object self_7313327, object r_735218 */
-+static void __lambda_410(void *data, object self_7312081, int argc, object *args) /* object self_7312081, object r_734773 */
++static void __lambda_410(void *data, object self_7312074, int argc, object *args) /* object self_7312074, object r_734766 */
   {
 - object r_735218 = args[0];
-+ object r_734773 = args[0];
++ object r_734766 = args[0];
    
 -closureN_type c_7317953;
 -object e_7317957 [2];
@@ -51317,18 +51552,18 @@ Make let-values be the same as let*-values, to work around
 -c_7317953.elements = (object *)e_7317957;
 -c_7317953.elements[0] = ((closureN)self_7313327)->elements[0];
 -c_7317953.elements[1] = r_735218;
--
-+closureN_type c_7316660;
-+object e_7316664 [2];
-+c_7316660.hdr.mark = gc_color_red;
-+ c_7316660.hdr.grayed = 0;
-+c_7316660.tag = closureN_tag;
-+ c_7316660.fn = (function_type)__lambda_411;
-+c_7316660.num_args = 1;
-+c_7316660.num_elements = 2;
-+c_7316660.elements = (object *)e_7316664;
-+c_7316660.elements[0] = ((closureN)self_7312081)->elements[0];
-+c_7316660.elements[1] = r_734773;
++closureN_type c_7316653;
++object e_7316657 [2];
++c_7316653.hdr.mark = gc_color_red;
++ c_7316653.hdr.grayed = 0;
++c_7316653.tag = closureN_tag;
++ c_7316653.fn = (function_type)__lambda_411;
++c_7316653.num_args = 1;
++c_7316653.num_elements = 2;
++c_7316653.elements = (object *)e_7316657;
++c_7316653.elements[0] = ((closureN)self_7312074)->elements[0];
++c_7316653.elements[1] = r_734766;
+ 
  
 -closureN_type c_7317958;
 -object e_7317986 [2];
@@ -51341,14 +51576,28 @@ Make let-values be the same as let*-values, to work around
 -c_7317958.elements = (object *)e_7317986;
 -c_7317958.elements[0] = ((closureN)self_7313327)->elements[1];
 -c_7317958.elements[1] = ((closureN)self_7313327)->elements[2];
++closureN_type c_7316658;
++object e_7316686 [2];
++c_7316658.hdr.mark = gc_color_red;
++ c_7316658.hdr.grayed = 0;
++c_7316658.tag = closureN_tag;
++ c_7316658.fn = (function_type)__lambda_412;
++c_7316658.num_args = 2;
++c_7316658.num_elements = 2;
++c_7316658.elements = (object *)e_7316686;
++c_7316658.elements[0] = ((closureN)self_7312074)->elements[1];
++c_7316658.elements[1] = ((closureN)self_7312074)->elements[2];
  
 -return_direct_with_clo1(data,(closure)&c_7317953,__lambda_411,  &c_7317958);; 
--}
--
++return_direct_with_clo1(data,(closure)&c_7316653,__lambda_411,  &c_7316658);; 
+ }
+ 
 -static void __lambda_412(void *data, object self_7313328, int argc, object *args) /* object self_7313328, object k_735220, object a_73524_733137, object d_73525_733138 */
-- {
++static void __lambda_412(void *data, object self_7312075, int argc, object *args) /* object self_7312075, object k_734768, object a_73524_732790, object d_73525_732791 */
+  {
 - object k_735220 = args[0]; object a_73524_733137 = args[1]; object d_73525_733138 = args[2];
--  
++ object k_734768 = args[0]; object a_73524_732790 = args[1]; object d_73525_732791 = args[2];
+   
 -closureN_type c_7317960;
 -object e_7317978 [3];
 -c_7317960.hdr.mark = gc_color_red;
@@ -51361,37 +51610,18 @@ Make let-values be the same as let*-values, to work around
 -c_7317960.elements[0] = a_73524_733137;
 -c_7317960.elements[1] = d_73525_733138;
 -c_7317960.elements[2] = k_735220;
-+closureN_type c_7316665;
-+object e_7316693 [2];
-+c_7316665.hdr.mark = gc_color_red;
-+ c_7316665.hdr.grayed = 0;
-+c_7316665.tag = closureN_tag;
-+ c_7316665.fn = (function_type)__lambda_412;
-+c_7316665.num_args = 2;
-+c_7316665.num_elements = 2;
-+c_7316665.elements = (object *)e_7316693;
-+c_7316665.elements[0] = ((closureN)self_7312081)->elements[1];
-+c_7316665.elements[1] = ((closureN)self_7312081)->elements[2];
-+
-+return_direct_with_clo1(data,(closure)&c_7316660,__lambda_411,  &c_7316665);; 
-+}
-+
-+static void __lambda_412(void *data, object self_7312082, int argc, object *args) /* object self_7312082, object k_734775, object a_73524_732797, object d_73525_732798 */
-+ {
-+ object k_734775 = args[0]; object a_73524_732797 = args[1]; object d_73525_732798 = args[2];
-+  
-+closureN_type c_7316667;
-+object e_7316685 [3];
-+c_7316667.hdr.mark = gc_color_red;
-+ c_7316667.hdr.grayed = 0;
-+c_7316667.tag = closureN_tag;
-+ c_7316667.fn = (function_type)__lambda_413;
-+c_7316667.num_args = 1;
-+c_7316667.num_elements = 3;
-+c_7316667.elements = (object *)e_7316685;
-+c_7316667.elements[0] = a_73524_732797;
-+c_7316667.elements[1] = d_73525_732798;
-+c_7316667.elements[2] = k_734775;
++closureN_type c_7316660;
++object e_7316678 [3];
++c_7316660.hdr.mark = gc_color_red;
++ c_7316660.hdr.grayed = 0;
++c_7316660.tag = closureN_tag;
++ c_7316660.fn = (function_type)__lambda_413;
++c_7316660.num_args = 1;
++c_7316660.num_elements = 3;
++c_7316660.elements = (object *)e_7316678;
++c_7316660.elements[0] = a_73524_732790;
++c_7316660.elements[1] = d_73525_732791;
++c_7316660.elements[2] = k_734768;
  
  
 -closureN_type c_7317979;
@@ -51405,38 +51635,38 @@ Make let-values be the same as let*-values, to work around
 -c_7317979.elements = (object *)e_7317985;
 -c_7317979.elements[0] = ((closureN)self_7313328)->elements[0];
 -c_7317979.elements[1] = ((closureN)self_7313328)->elements[1];
-+closureN_type c_7316686;
-+object e_7316692 [2];
-+c_7316686.hdr.mark = gc_color_red;
-+ c_7316686.hdr.grayed = 0;
-+c_7316686.tag = closureN_tag;
-+ c_7316686.fn = (function_type)__lambda_416;
-+c_7316686.num_args = 0;
-+c_7316686.num_elements = 2;
-+c_7316686.elements = (object *)e_7316692;
-+c_7316686.elements[0] = ((closureN)self_7312082)->elements[0];
-+c_7316686.elements[1] = ((closureN)self_7312082)->elements[1];
++closureN_type c_7316679;
++object e_7316685 [2];
++c_7316679.hdr.mark = gc_color_red;
++ c_7316679.hdr.grayed = 0;
++c_7316679.tag = closureN_tag;
++ c_7316679.fn = (function_type)__lambda_416;
++c_7316679.num_args = 0;
++c_7316679.num_elements = 2;
++c_7316679.elements = (object *)e_7316685;
++c_7316679.elements[0] = ((closureN)self_7312075)->elements[0];
++c_7316679.elements[1] = ((closureN)self_7312075)->elements[1];
  
 -return_direct_with_clo1(data,(closure)&c_7317960,__lambda_413,  &c_7317979);; 
-+return_direct_with_clo1(data,(closure)&c_7316667,__lambda_413,  &c_7316686);; 
++return_direct_with_clo1(data,(closure)&c_7316660,__lambda_413,  &c_7316679);; 
  }
  
 -static void __lambda_416(void *data, object self_7313329, int argc, object *args) /* object self_7313329, object k_735226 */
-+static void __lambda_416(void *data, object self_7312083, int argc, object *args) /* object self_7312083, object k_734781 */
++static void __lambda_416(void *data, object self_7312076, int argc, object *args) /* object self_7312076, object k_734774 */
   {
 - object k_735226 = args[0];
-+ object k_734781 = args[0];
++ object k_734774 = args[0];
    
  
 -return_closcall2(data,  car(((closureN)self_7313329)->elements[1]),  k_735226, ((closureN)self_7313329)->elements[0]);; 
-+return_closcall2(data,  car(((closureN)self_7312083)->elements[1]),  k_734781, ((closureN)self_7312083)->elements[0]);; 
++return_closcall2(data,  car(((closureN)self_7312076)->elements[1]),  k_734774, ((closureN)self_7312076)->elements[0]);; 
  }
  
 -static void __lambda_413(void *data, object self_7313330, int argc, object *args) /* object self_7313330, object r_735221 */
-+static void __lambda_413(void *data, object self_7312084, int argc, object *args) /* object self_7312084, object r_734776 */
++static void __lambda_413(void *data, object self_7312077, int argc, object *args) /* object self_7312077, object r_734769 */
   {
 - object r_735221 = args[0];
-+ object r_734776 = args[0];
++ object r_734769 = args[0];
    
 -closureN_type c_7317962;
 -object e_7317966 [2];
@@ -51449,8 +51679,19 @@ Make let-values be the same as let*-values, to work around
 -c_7317962.elements = (object *)e_7317966;
 -c_7317962.elements[0] = ((closureN)self_7313330)->elements[2];
 -c_7317962.elements[1] = r_735221;
--
--
++closureN_type c_7316662;
++object e_7316666 [2];
++c_7316662.hdr.mark = gc_color_red;
++ c_7316662.hdr.grayed = 0;
++c_7316662.tag = closureN_tag;
++ c_7316662.fn = (function_type)__lambda_414;
++c_7316662.num_args = 1;
++c_7316662.num_elements = 2;
++c_7316662.elements = (object *)e_7316666;
++c_7316662.elements[0] = ((closureN)self_7312077)->elements[2];
++c_7316662.elements[1] = r_734769;
+ 
+ 
 -closureN_type c_7317967;
 -object e_7317977 [2];
 -c_7317967.hdr.mark = gc_color_red;
@@ -51462,82 +51703,69 @@ Make let-values be the same as let*-values, to work around
 -c_7317967.elements = (object *)e_7317977;
 -c_7317967.elements[0] = ((closureN)self_7313330)->elements[0];
 -c_7317967.elements[1] = ((closureN)self_7313330)->elements[1];
-+closureN_type c_7316669;
-+object e_7316673 [2];
-+c_7316669.hdr.mark = gc_color_red;
-+ c_7316669.hdr.grayed = 0;
-+c_7316669.tag = closureN_tag;
-+ c_7316669.fn = (function_type)__lambda_414;
-+c_7316669.num_args = 1;
-+c_7316669.num_elements = 2;
-+c_7316669.elements = (object *)e_7316673;
-+c_7316669.elements[0] = ((closureN)self_7312084)->elements[2];
-+c_7316669.elements[1] = r_734776;
-+
++closureN_type c_7316667;
++object e_7316677 [2];
++c_7316667.hdr.mark = gc_color_red;
++ c_7316667.hdr.grayed = 0;
++c_7316667.tag = closureN_tag;
++ c_7316667.fn = (function_type)__lambda_415;
++c_7316667.num_args = 2;
++c_7316667.num_elements = 2;
++c_7316667.elements = (object *)e_7316677;
++c_7316667.elements[0] = ((closureN)self_7312077)->elements[0];
++c_7316667.elements[1] = ((closureN)self_7312077)->elements[1];
  
 -return_direct_with_clo1(data,(closure)&c_7317962,__lambda_414,  &c_7317967);; 
-+closureN_type c_7316674;
-+object e_7316684 [2];
-+c_7316674.hdr.mark = gc_color_red;
-+ c_7316674.hdr.grayed = 0;
-+c_7316674.tag = closureN_tag;
-+ c_7316674.fn = (function_type)__lambda_415;
-+c_7316674.num_args = 2;
-+c_7316674.num_elements = 2;
-+c_7316674.elements = (object *)e_7316684;
-+c_7316674.elements[0] = ((closureN)self_7312084)->elements[0];
-+c_7316674.elements[1] = ((closureN)self_7312084)->elements[1];
-+
-+return_direct_with_clo1(data,(closure)&c_7316669,__lambda_414,  &c_7316674);; 
++return_direct_with_clo1(data,(closure)&c_7316662,__lambda_414,  &c_7316667);; 
  }
  
 -static void __lambda_415(void *data, object self_7313331, int argc, object *args) /* object self_7313331, object k_735223, object cars_73526_733139, object cdrs_73527_733140 */
-+static void __lambda_415(void *data, object self_7312085, int argc, object *args) /* object self_7312085, object k_734778, object cars_73526_732799, object cdrs_73527_732800 */
++static void __lambda_415(void *data, object self_7312078, int argc, object *args) /* object self_7312078, object k_734771, object cars_73526_732792, object cdrs_73527_732793 */
   {
 - object k_735223 = args[0]; object cars_73526_733139 = args[1]; object cdrs_73527_733140 = args[2];
-+ object k_734778 = args[0]; object cars_73526_732799 = args[1]; object cdrs_73527_732800 = args[2];
++ object k_734771 = args[0]; object cars_73526_732792 = args[1]; object cdrs_73527_732793 = args[2];
    
 -pair_type local_7317971; 
-+pair_type local_7316678; 
++pair_type local_7316671; 
  
 -pair_type local_7317975; 
 -return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_735223, set_pair_as_expr(&local_7317971, ((closureN)self_7313331)->elements[0], cars_73526_733139), set_pair_as_expr(&local_7317975, ((closureN)self_7313331)->elements[1], cdrs_73527_733140));; 
-+pair_type local_7316682; 
-+return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_734778, set_pair_as_expr(&local_7316678, ((closureN)self_7312085)->elements[0], cars_73526_732799), set_pair_as_expr(&local_7316682, ((closureN)self_7312085)->elements[1], cdrs_73527_732800));; 
++pair_type local_7316675; 
++return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_734771, set_pair_as_expr(&local_7316671, ((closureN)self_7312078)->elements[0], cars_73526_732792), set_pair_as_expr(&local_7316675, ((closureN)self_7312078)->elements[1], cdrs_73527_732793));; 
  }
  
 -static void __lambda_414(void *data, object self_7313332, int argc, object *args) /* object self_7313332, object r_735222 */
-+static void __lambda_414(void *data, object self_7312086, int argc, object *args) /* object self_7312086, object r_734777 */
++static void __lambda_414(void *data, object self_7312079, int argc, object *args) /* object self_7312079, object r_734770 */
   {
 - object r_735222 = args[0];
 -  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_7313332)->elements[0], ((closureN)self_7313332)->elements[1], r_735222);; 
-+ object r_734777 = args[0];
-+  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_7312086)->elements[0], ((closureN)self_7312086)->elements[1], r_734777);; 
++ object r_734770 = args[0];
++  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_7312079)->elements[0], ((closureN)self_7312079)->elements[1], r_734770);; 
  }
  
 -static void __lambda_411(void *data, object self_7313333, int argc, object *args) /* object self_7313333, object r_735219 */
-+static void __lambda_411(void *data, object self_7312087, int argc, object *args) /* object self_7312087, object r_734774 */
++static void __lambda_411(void *data, object self_7312080, int argc, object *args) /* object self_7312080, object r_734767 */
   {
 - object r_735219 = args[0];
 -  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_7313333)->elements[0], ((closureN)self_7313333)->elements[1], r_735219);; 
-+ object r_734774 = args[0];
-+  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_7312087)->elements[0], ((closureN)self_7312087)->elements[1], r_734774);; 
++ object r_734767 = args[0];
++  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_7312080)->elements[0], ((closureN)self_7312080)->elements[1], r_734767);; 
  }
  
 -static void __lambda_408(void *data, object self_7313334, int argc, object *args) /* object self_7313334, object r_735213 */
-+static void __lambda_408(void *data, object self_7312088, int argc, object *args) /* object self_7312088, object r_734768 */
++static void __lambda_408(void *data, object self_7312081, int argc, object *args) /* object self_7312081, object r_734761 */
   {
 - object r_735213 = args[0];
 -  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_7313334)->elements[0], ((closureN)self_7313334)->elements[1], r_735213);; 
-+ object r_734768 = args[0];
-+  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_7312088)->elements[0], ((closureN)self_7312088)->elements[1], r_734768);; 
++ object r_734761 = args[0];
++  return_direct_with_clo3(data,  __glo_call_91with_91values_scheme_base, (((closure)  __glo_call_91with_91values_scheme_base)->fn),  ((closureN)self_7312081)->elements[0], ((closureN)self_7312081)->elements[1], r_734761);; 
  }
  
 -static void __lambda_404(void *data, object self_7313335, int argc, object *args) /* object self_7313335, object r_735209 */
-+static void __lambda_404(void *data, object self_7312089, int argc, object *args) /* object self_7312089, object r_734764 */
++static void __lambda_404(void *data, object self_7312082, int argc, object *args) /* object self_7312082, object r_734757 */
   {
 - object r_735209 = args[0];
-+ object r_734764 = args[0];
++ object r_734757 = args[0];
    
 -closureN_type c_7317922;
 -object e_7317929 [3];
@@ -51551,107 +51779,104 @@ Make let-values be the same as let*-values, to work around
 -c_7317922.elements[0] = ((closureN)self_7313335)->elements[0];
 -c_7317922.elements[1] = ((closureN)self_7313335)->elements[1];
 -c_7317922.elements[2] = ((closureN)self_7313335)->elements[2];
-+closureN_type c_7316629;
-+object e_7316636 [3];
-+c_7316629.hdr.mark = gc_color_red;
-+ c_7316629.hdr.grayed = 0;
-+c_7316629.tag = closureN_tag;
-+ c_7316629.fn = (function_type)__lambda_405;
-+c_7316629.num_args = 1;
-+c_7316629.num_elements = 3;
-+c_7316629.elements = (object *)e_7316636;
-+c_7316629.elements[0] = ((closureN)self_7312089)->elements[0];
-+c_7316629.elements[1] = ((closureN)self_7312089)->elements[1];
-+c_7316629.elements[2] = ((closureN)self_7312089)->elements[2];
++closureN_type c_7316622;
++object e_7316629 [3];
++c_7316622.hdr.mark = gc_color_red;
++ c_7316622.hdr.grayed = 0;
++c_7316622.tag = closureN_tag;
++ c_7316622.fn = (function_type)__lambda_405;
++c_7316622.num_args = 1;
++c_7316622.num_elements = 3;
++c_7316622.elements = (object *)e_7316629;
++c_7316622.elements[0] = ((closureN)self_7312082)->elements[0];
++c_7316622.elements[1] = ((closureN)self_7312082)->elements[1];
++c_7316622.elements[2] = ((closureN)self_7312082)->elements[2];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7317922,__lambda_405,  Cyc_set_cell(data, ((closureN)self_7313335)->elements[2], r_735209));; 
-+return_direct_with_clo1(data,(closure)&c_7316629,__lambda_405,  Cyc_set_cell(data, ((closureN)self_7312089)->elements[2], r_734764));; 
++return_direct_with_clo1(data,(closure)&c_7316622,__lambda_405,  Cyc_set_cell(data, ((closureN)self_7312082)->elements[2], r_734757));; 
  }
  
 -static void __lambda_405(void *data, object self_7313336, int argc, object *args) /* object self_7313336, object r_735208 */
-+static void __lambda_405(void *data, object self_7312090, int argc, object *args) /* object self_7312090, object r_734763 */
++static void __lambda_405(void *data, object self_7312083, int argc, object *args) /* object self_7312083, object r_734756 */
   {
  
    
  
 -return_closcall2(data,  car(((closureN)self_7313336)->elements[2]),  ((closureN)self_7313336)->elements[0], ((closureN)self_7313336)->elements[1]);; 
-+return_closcall2(data,  car(((closureN)self_7312090)->elements[2]),  ((closureN)self_7312090)->elements[0], ((closureN)self_7312090)->elements[1]);; 
++return_closcall2(data,  car(((closureN)self_7312083)->elements[2]),  ((closureN)self_7312083)->elements[0], ((closureN)self_7312083)->elements[1]);; 
  }
  
 -static void __lambda_400(void *data, object self_7313337, int argc, object *args) /* object self_7313337, object r_735206 */
-+static void __lambda_400(void *data, object self_7312091, int argc, object *args) /* object self_7312091, object r_734761 */
++static void __lambda_400(void *data, object self_7312084, int argc, object *args) /* object self_7312084, object r_734754 */
   {
 - object r_735206 = 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_7313337)->elements[0], r_735206);; 
-+ object r_734761 = 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_7312091)->elements[0], r_734761);; 
++ object r_734754 = 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_7312084)->elements[0], r_734754);; 
  }
  
 -static void __lambda_398(void *data, object _, int argc, object *args) /* closure _,object k_735200, object pair_73515_733129 */
-+static void __lambda_398(void *data, object _, int argc, object *args) /* closure _,object k_734755, object pair_73515_732789 */
++static void __lambda_398(void *data, object _, int argc, object *args) /* closure _,object k_734748, object pair_73515_732782 */
   {
 -object k_735200 = args[0]; object pair_73515_733129 = args[1];
--  Cyc_st_add(data, "scheme/base.sld:car+cdr");
-+object k_734755 = args[0]; object pair_73515_732789 = args[1];
-+  Cyc_st_add(data, "base.sld:car+cdr");
++object k_734748 = args[0]; object pair_73515_732782 = 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_735200, Cyc_car(data, pair_73515_733129), Cyc_cdr(data, pair_73515_733129));; 
-+return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_734755, Cyc_car(data, pair_73515_732789), Cyc_cdr(data, pair_73515_732789));; 
++return_direct_with_clo3(data,  __glo_values_scheme_base, (((closure)  __glo_values_scheme_base)->fn),  k_734748, Cyc_car(data, pair_73515_732782), Cyc_cdr(data, pair_73515_732782));; 
  }
  
 -static void __lambda_397(void *data, object _, int argc, object *args) /* closure _,object k_735181, object expr_73506_733123, object rename_73507_733124, object compare_73508_733125 */
-+static void __lambda_397(void *data, object _, int argc, object *args) /* closure _,object k_734736, object expr_73506_732783, object rename_73507_732784, object compare_73508_732785 */
++static void __lambda_397(void *data, object _, int argc, object *args) /* closure _,object k_734729, object expr_73506_732776, object rename_73507_732777, object compare_73508_732778 */
   {
 -object k_735181 = args[0]; object expr_73506_733123 = args[1];
--  Cyc_st_add(data, "scheme/base.sld:receive");
-+object k_734736 = args[0]; object expr_73506_732783 = args[1];
-+  Cyc_st_add(data, "base.sld:receive");
++object k_734729 = args[0]; object expr_73506_732776 = args[1];
+   Cyc_st_add(data, "scheme/base.sld:receive");
  
 -pair_type local_7317872; 
-+pair_type local_7316579; 
++pair_type local_7316572; 
  
 -pair_type local_7317875; 
-+pair_type local_7316582; 
++pair_type local_7316575; 
  
 -pair_type local_7317878; 
-+pair_type local_7316585; 
++pair_type local_7316578; 
  
 -pair_type local_7317881; 
-+pair_type local_7316588; 
++pair_type local_7316581; 
  
 -pair_type local_7317884; 
-+pair_type local_7316591; 
++pair_type local_7316584; 
  
  
  
 -pair_type local_7317889; 
-+pair_type local_7316596; 
++pair_type local_7316589; 
  
 -pair_type local_7317892; 
-+pair_type local_7316599; 
++pair_type local_7316592; 
  
 -pair_type local_7317895; 
-+pair_type local_7316602; 
++pair_type local_7316595; 
  
  
  
  
 -return_direct_with_clo1(data,  k_735181, (((closure)  k_735181)->fn),  set_pair_as_expr(&local_7317872, quote_call_91with_91values, set_pair_as_expr(&local_7317875, set_pair_as_expr(&local_7317878, quote_lambda, set_pair_as_expr(&local_7317881, NULL, set_pair_as_expr(&local_7317884, Cyc_caddr(data, expr_73506_733123), NULL))), set_pair_as_expr(&local_7317889, set_pair_as_expr(&local_7317892, quote_lambda, set_pair_as_expr(&local_7317895, Cyc_cadr(data, expr_73506_733123), Cyc_cdddr(data, expr_73506_733123))), NULL))));; 
-+return_direct_with_clo1(data,  k_734736, (((closure)  k_734736)->fn),  set_pair_as_expr(&local_7316579, quote_call_91with_91values, set_pair_as_expr(&local_7316582, set_pair_as_expr(&local_7316585, quote_lambda, set_pair_as_expr(&local_7316588, NULL, set_pair_as_expr(&local_7316591, Cyc_caddr(data, expr_73506_732783), NULL))), set_pair_as_expr(&local_7316596, set_pair_as_expr(&local_7316599, quote_lambda, set_pair_as_expr(&local_7316602, Cyc_cadr(data, expr_73506_732783), Cyc_cdddr(data, expr_73506_732783))), NULL))));; 
++return_direct_with_clo1(data,  k_734729, (((closure)  k_734729)->fn),  set_pair_as_expr(&local_7316572, quote_call_91with_91values, set_pair_as_expr(&local_7316575, set_pair_as_expr(&local_7316578, quote_lambda, set_pair_as_expr(&local_7316581, NULL, set_pair_as_expr(&local_7316584, Cyc_caddr(data, expr_73506_732776), NULL))), set_pair_as_expr(&local_7316589, set_pair_as_expr(&local_7316592, quote_lambda, set_pair_as_expr(&local_7316595, Cyc_cadr(data, expr_73506_732776), Cyc_cdddr(data, expr_73506_732776))), NULL))));; 
  }
  
 -static void __lambda_390(void *data, object _, int argc, object *args) /* closure _,object k_735169, object ls_73499_733117 */
-+static void __lambda_390(void *data, object _, int argc, object *args) /* closure _,object k_734724, object ls_73499_732777 */
++static void __lambda_390(void *data, object _, int argc, object *args) /* closure _,object k_734717, object ls_73499_732770 */
   {
 -object k_735169 = args[0]; object ls_73499_733117 = args[1];
--  Cyc_st_add(data, "scheme/base.sld:list-copy");
-+object k_734724 = args[0]; object ls_73499_732777 = args[1];
-+  Cyc_st_add(data, "base.sld:list-copy");
++object k_734717 = args[0]; object ls_73499_732770 = args[1];
+   Cyc_st_add(data, "scheme/base.sld:list-copy");
  
 -closureN_type c_7317820;
 -object e_7317867 [1];
@@ -51663,26 +51888,26 @@ Make let-values be the same as let*-values, to work around
 -c_7317820.num_elements = 1;
 -c_7317820.elements = (object *)e_7317867;
 -c_7317820.elements[0] = k_735169;
-+closureN_type c_7316527;
-+object e_7316574 [1];
-+c_7316527.hdr.mark = gc_color_red;
-+ c_7316527.hdr.grayed = 0;
-+c_7316527.tag = closureN_tag;
-+ c_7316527.fn = (function_type)__lambda_391;
-+c_7316527.num_args = 2;
-+c_7316527.num_elements = 1;
-+c_7316527.elements = (object *)e_7316574;
-+c_7316527.elements[0] = k_734724;
++closureN_type c_7316520;
++object e_7316567 [1];
++c_7316520.hdr.mark = gc_color_red;
++ c_7316520.hdr.grayed = 0;
++c_7316520.tag = closureN_tag;
++ c_7316520.fn = (function_type)__lambda_391;
++c_7316520.num_args = 2;
++c_7316520.num_elements = 1;
++c_7316520.elements = (object *)e_7316567;
++c_7316520.elements[0] = k_734717;
  
 -return_direct_with_clo2(data,(closure)&c_7317820,__lambda_391,  ls_73499_733117, NULL);; 
-+return_direct_with_clo2(data,(closure)&c_7316527,__lambda_391,  ls_73499_732777, NULL);; 
++return_direct_with_clo2(data,(closure)&c_7316520,__lambda_391,  ls_73499_732770, NULL);; 
  }
  
 -static void __lambda_391(void *data, object self_7313311, int argc, object *args) /* object self_7313311, object ls_73501_733118, object res_73502_733119 */
-+static void __lambda_391(void *data, object self_7312065, int argc, object *args) /* object self_7312065, object ls_73501_732778, object res_73502_732779 */
++static void __lambda_391(void *data, object self_7312058, int argc, object *args) /* object self_7312058, object ls_73501_732771, object res_73502_732772 */
   {
 - object ls_73501_733118 = args[0]; object res_73502_733119 = args[1];
-+ object ls_73501_732778 = args[0]; object res_73502_732779 = args[1];
++ object ls_73501_732771 = args[0]; object res_73502_732772 = args[1];
    
 -closureN_type c_7317822;
 -object e_7317866 [3];
@@ -51696,28 +51921,28 @@ Make let-values be the same as let*-values, to work around
 -c_7317822.elements[0] = ((closureN)self_7313311)->elements[0];
 -c_7317822.elements[1] = ls_73501_733118;
 -c_7317822.elements[2] = res_73502_733119;
-+closureN_type c_7316529;
-+object e_7316573 [3];
-+c_7316529.hdr.mark = gc_color_red;
-+ c_7316529.hdr.grayed = 0;
-+c_7316529.tag = closureN_tag;
-+ c_7316529.fn = (function_type)__lambda_392;
-+c_7316529.num_args = 1;
-+c_7316529.num_elements = 3;
-+c_7316529.elements = (object *)e_7316573;
-+c_7316529.elements[0] = ((closureN)self_7312065)->elements[0];
-+c_7316529.elements[1] = ls_73501_732778;
-+c_7316529.elements[2] = res_73502_732779;
++closureN_type c_7316522;
++object e_7316566 [3];
++c_7316522.hdr.mark = gc_color_red;
++ c_7316522.hdr.grayed = 0;
++c_7316522.tag = closureN_tag;
++ c_7316522.fn = (function_type)__lambda_392;
++c_7316522.num_args = 1;
++c_7316522.num_elements = 3;
++c_7316522.elements = (object *)e_7316566;
++c_7316522.elements[0] = ((closureN)self_7312058)->elements[0];
++c_7316522.elements[1] = ls_73501_732771;
++c_7316522.elements[2] = res_73502_732772;
  
 -return_direct_with_clo1(data,(closure)&c_7317822,__lambda_392,  boolean_f);; 
-+return_direct_with_clo1(data,(closure)&c_7316529,__lambda_392,  boolean_f);; 
++return_direct_with_clo1(data,(closure)&c_7316522,__lambda_392,  boolean_f);; 
  }
  
 -static void __lambda_392(void *data, object self_7313312, int argc, object *args) /* object self_7313312, object lp_73503_733120 */
-+static void __lambda_392(void *data, object self_7312066, int argc, object *args) /* object self_7312066, object lp_73503_732780 */
++static void __lambda_392(void *data, object self_7312059, int argc, object *args) /* object self_7312059, object lp_73503_732773 */
   {
 - object lp_73503_733120 = args[0];
-+ object lp_73503_732780 = args[0];
++ object lp_73503_732773 = args[0];
    
 -closureN_type c_7317824;
 -object e_7317862 [3];
@@ -51731,31 +51956,31 @@ Make let-values be the same as let*-values, to work around
 -c_7317824.elements[0] = ((closureN)self_7313312)->elements[0];
 -c_7317824.elements[1] = ((closureN)self_7313312)->elements[1];
 -c_7317824.elements[2] = ((closureN)self_7313312)->elements[2];
-+closureN_type c_7316531;
-+object e_7316569 [3];
-+c_7316531.hdr.mark = gc_color_red;
-+ c_7316531.hdr.grayed = 0;
-+c_7316531.tag = closureN_tag;
-+ c_7316531.fn = (function_type)__lambda_1309;
-+c_7316531.num_args = 1;
-+c_7316531.num_elements = 3;
-+c_7316531.elements = (object *)e_7316569;
-+c_7316531.elements[0] = ((closureN)self_7312066)->elements[0];
-+c_7316531.elements[1] = ((closureN)self_7312066)->elements[1];
-+c_7316531.elements[2] = ((closureN)self_7312066)->elements[2];
++closureN_type c_7316524;
++object e_7316562 [3];
++c_7316524.hdr.mark = gc_color_red;
++ c_7316524.hdr.grayed = 0;
++c_7316524.tag = closureN_tag;
++ c_7316524.fn = (function_type)__lambda_1309;
++c_7316524.num_args = 1;
++c_7316524.num_elements = 3;
++c_7316524.elements = (object *)e_7316562;
++c_7316524.elements[0] = ((closureN)self_7312059)->elements[0];
++c_7316524.elements[1] = ((closureN)self_7312059)->elements[1];
++c_7316524.elements[2] = ((closureN)self_7312059)->elements[2];
  
  
 -pair_type local_7317865; 
 -return_direct_with_clo1(data,(closure)&c_7317824,__lambda_1356,  set_cell_as_expr(&local_7317865, lp_73503_733120));; 
-+pair_type local_7316572; 
-+return_direct_with_clo1(data,(closure)&c_7316531,__lambda_1309,  set_cell_as_expr(&local_7316572, lp_73503_732780));; 
++pair_type local_7316565; 
++return_direct_with_clo1(data,(closure)&c_7316524,__lambda_1309,  set_cell_as_expr(&local_7316565, lp_73503_732773));; 
  }
  
 -static void __lambda_1356(void *data, object self_7313313, int argc, object *args) /* object self_7313313, object lp_73503_733120 */
-+static void __lambda_1309(void *data, object self_7312067, int argc, object *args) /* object self_7312067, object lp_73503_732780 */
++static void __lambda_1309(void *data, object self_7312060, int argc, object *args) /* object self_7312060, object lp_73503_732773 */
   {
 - object lp_73503_733120 = args[0];
-+ object lp_73503_732780 = args[0];
++ object lp_73503_732773 = args[0];
    
 -closureN_type c_7317826;
 -object e_7317840 [4];
@@ -51770,19 +51995,19 @@ Make let-values be the same as let*-values, to work around
 -c_7317826.elements[1] = lp_73503_733120;
 -c_7317826.elements[2] = ((closureN)self_7313313)->elements[1];
 -c_7317826.elements[3] = ((closureN)self_7313313)->elements[2];
-+closureN_type c_7316533;
-+object e_7316547 [4];
-+c_7316533.hdr.mark = gc_color_red;
-+ c_7316533.hdr.grayed = 0;
-+c_7316533.tag = closureN_tag;
-+ c_7316533.fn = (function_type)__lambda_393;
-+c_7316533.num_args = 1;
-+c_7316533.num_elements = 4;
-+c_7316533.elements = (object *)e_7316547;
-+c_7316533.elements[0] = ((closureN)self_7312067)->elements[0];
-+c_7316533.elements[1] = lp_73503_732780;
-+c_7316533.elements[2] = ((closureN)self_7312067)->elements[1];
-+c_7316533.elements[3] = ((closureN)self_7312067)->elements[2];
++closureN_type c_7316526;
++object e_7316540 [4];
++c_7316526.hdr.mark = gc_color_red;
++ c_7316526.hdr.grayed = 0;
++c_7316526.tag = closureN_tag;
++ c_7316526.fn = (function_type)__lambda_393;
++c_7316526.num_args = 1;
++c_7316526.num_elements = 4;
++c_7316526.elements = (object *)e_7316540;
++c_7316526.elements[0] = ((closureN)self_7312060)->elements[0];
++c_7316526.elements[1] = lp_73503_732773;
++c_7316526.elements[2] = ((closureN)self_7312060)->elements[1];
++c_7316526.elements[3] = ((closureN)self_7312060)->elements[2];
  
  
 -closureN_type c_7317841;
@@ -51795,40 +52020,40 @@ Make let-values be the same as let*-values, to work around
 -c_7317841.num_elements = 1;
 -c_7317841.elements = (object *)e_7317861;
 -c_7317841.elements[0] = lp_73503_733120;
-+closureN_type c_7316548;
-+object e_7316568 [1];
-+c_7316548.hdr.mark = gc_color_red;
-+ c_7316548.hdr.grayed = 0;
-+c_7316548.tag = closureN_tag;
-+ c_7316548.fn = (function_type)__lambda_395;
-+c_7316548.num_args = 2;
-+c_7316548.num_elements = 1;
-+c_7316548.elements = (object *)e_7316568;
-+c_7316548.elements[0] = lp_73503_732780;
++closureN_type c_7316541;
++object e_7316561 [1];
++c_7316541.hdr.mark = gc_color_red;
++ c_7316541.hdr.grayed = 0;
++c_7316541.tag = closureN_tag;
++ c_7316541.fn = (function_type)__lambda_395;
++c_7316541.num_args = 2;
++c_7316541.num_elements = 1;
++c_7316541.elements = (object *)e_7316561;
++c_7316541.elements[0] = lp_73503_732773;
  
 -return_direct_with_clo1(data,(closure)&c_7317826,__lambda_393,  &c_7317841);; 
-+return_direct_with_clo1(data,(closure)&c_7316533,__lambda_393,  &c_7316548);; 
++return_direct_with_clo1(data,(closure)&c_7316526,__lambda_393,  &c_7316541);; 
  }
  
 -static void __lambda_395(void *data, object self_7313314, int argc, object *args) /* object self_7313314, object k_735173, object ls_73504_733121, object res_73505_733122 */
-+static void __lambda_395(void *data, object self_7312068, int argc, object *args) /* object self_7312068, object k_734728, object ls_73504_732781, object res_73505_732782 */
++static void __lambda_395(void *data, object self_7312061, int argc, object *args) /* object self_7312061, object k_734721, object ls_73504_732774, object res_73505_732775 */
   {
 - object k_735173 = args[0]; object ls_73504_733121 = args[1]; object res_73505_733122 = args[2];
-+ object k_734728 = args[0]; object ls_73504_732781 = args[1]; object res_73505_732782 = args[2];
++ object k_734721 = args[0]; object ls_73504_732774 = args[1]; object res_73505_732775 = args[2];
      
 -if( (boolean_f != Cyc_is_pair(ls_73504_733121)) ){ 
-+if( (boolean_f != Cyc_is_pair(ls_73504_732781)) ){ 
++if( (boolean_f != Cyc_is_pair(ls_73504_732774)) ){ 
    
  
  
  
  
 -pair_type local_7317852; 
-+pair_type local_7316559; 
++pair_type local_7316552; 
  
  
 -return_closcall3(data,  car(((closureN)self_7313314)->elements[0]),  k_735173, Cyc_cdr(data, ls_73504_733121), set_pair_as_expr(&local_7317852, Cyc_car(data, ls_73504_733121), res_73505_733122));
-+return_closcall3(data,  car(((closureN)self_7312068)->elements[0]),  k_734728, Cyc_cdr(data, ls_73504_732781), set_pair_as_expr(&local_7316559, Cyc_car(data, ls_73504_732781), res_73505_732782));
++return_closcall3(data,  car(((closureN)self_7312061)->elements[0]),  k_734721, Cyc_cdr(data, ls_73504_732774), set_pair_as_expr(&local_7316552, Cyc_car(data, ls_73504_732774), res_73505_732775));
  } else { 
    
 -closureN_type c_7317856;
@@ -51842,37 +52067,37 @@ Make let-values be the same as let*-values, to work around
 -c_7317856.elements = (object *)e_7317860;
 -c_7317856.elements[0] = k_735173;
 -c_7317856.elements[1] = ls_73504_733121;
-+closureN_type c_7316563;
-+object e_7316567 [2];
-+c_7316563.hdr.mark = gc_color_red;
-+ c_7316563.hdr.grayed = 0;
-+c_7316563.tag = closureN_tag;
-+ c_7316563.fn = (function_type)__lambda_396;
-+c_7316563.num_args = 1;
-+c_7316563.num_elements = 2;
-+c_7316563.elements = (object *)e_7316567;
-+c_7316563.elements[0] = k_734728;
-+c_7316563.elements[1] = ls_73504_732781;
++closureN_type c_7316556;
++object e_7316560 [2];
++c_7316556.hdr.mark = gc_color_red;
++ c_7316556.hdr.grayed = 0;
++c_7316556.tag = closureN_tag;
++ c_7316556.fn = (function_type)__lambda_396;
++c_7316556.num_args = 1;
++c_7316556.num_elements = 2;
++c_7316556.elements = (object *)e_7316560;
++c_7316556.elements[0] = k_734721;
++c_7316556.elements[1] = ls_73504_732774;
  
 -return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7317856, primitive_cons, NULL, res_73505_733122);}
-+return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7316563, primitive_cons, NULL, res_73505_732782);}
++return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7316556, primitive_cons, NULL, res_73505_732775);}
  ;; 
  }
  
 -static void __lambda_396(void *data, object self_7313315, int argc, object *args) /* object self_7313315, object r_735178_7312655 */
-+static void __lambda_396(void *data, object self_7312069, int argc, object *args) /* object self_7312069, object r_734733_7311409 */
++static void __lambda_396(void *data, object self_7312062, int argc, object *args) /* object self_7312062, object r_734726_7311402 */
   {
 - object r_735178_7312655 = args[0];
 -  return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  ((closureN)self_7313315)->elements[0], r_735178_7312655, ((closureN)self_7313315)->elements[1]);; 
-+ object r_734733_7311409 = args[0];
-+  return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  ((closureN)self_7312069)->elements[0], r_734733_7311409, ((closureN)self_7312069)->elements[1]);; 
++ object r_734726_7311402 = args[0];
++  return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  ((closureN)self_7312062)->elements[0], r_734726_7311402, ((closureN)self_7312062)->elements[1]);; 
  }
  
 -static void __lambda_393(void *data, object self_7313316, int argc, object *args) /* object self_7313316, object r_735172 */
-+static void __lambda_393(void *data, object self_7312070, int argc, object *args) /* object self_7312070, object r_734727 */
++static void __lambda_393(void *data, object self_7312063, int argc, object *args) /* object self_7312063, object r_734720 */
   {
 - object r_735172 = args[0];
-+ object r_734727 = args[0];
++ object r_734720 = args[0];
    
 -closureN_type c_7317828;
 -object e_7317836 [4];
@@ -51887,45 +52112,44 @@ Make let-values be the same as let*-values, to work around
 -c_7317828.elements[1] = ((closureN)self_7313316)->elements[1];
 -c_7317828.elements[2] = ((closureN)self_7313316)->elements[2];
 -c_7317828.elements[3] = ((closureN)self_7313316)->elements[3];
-+closureN_type c_7316535;
-+object e_7316543 [4];
-+c_7316535.hdr.mark = gc_color_red;
-+ c_7316535.hdr.grayed = 0;
-+c_7316535.tag = closureN_tag;
-+ c_7316535.fn = (function_type)__lambda_394;
-+c_7316535.num_args = 1;
-+c_7316535.num_elements = 4;
-+c_7316535.elements = (object *)e_7316543;
-+c_7316535.elements[0] = ((closureN)self_7312070)->elements[0];
-+c_7316535.elements[1] = ((closureN)self_7312070)->elements[1];
-+c_7316535.elements[2] = ((closureN)self_7312070)->elements[2];
-+c_7316535.elements[3] = ((closureN)self_7312070)->elements[3];
++closureN_type c_7316528;
++object e_7316536 [4];
++c_7316528.hdr.mark = gc_color_red;
++ c_7316528.hdr.grayed = 0;
++c_7316528.tag = closureN_tag;
++ c_7316528.fn = (function_type)__lambda_394;
++c_7316528.num_args = 1;
++c_7316528.num_elements = 4;
++c_7316528.elements = (object *)e_7316536;
++c_7316528.elements[0] = ((closureN)self_7312063)->elements[0];
++c_7316528.elements[1] = ((closureN)self_7312063)->elements[1];
++c_7316528.elements[2] = ((closureN)self_7312063)->elements[2];
++c_7316528.elements[3] = ((closureN)self_7312063)->elements[3];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7317828,__lambda_394,  Cyc_set_cell(data, ((closureN)self_7313316)->elements[1], r_735172));; 
-+return_direct_with_clo1(data,(closure)&c_7316535,__lambda_394,  Cyc_set_cell(data, ((closureN)self_7312070)->elements[1], r_734727));; 
++return_direct_with_clo1(data,(closure)&c_7316528,__lambda_394,  Cyc_set_cell(data, ((closureN)self_7312063)->elements[1], r_734720));; 
  }
  
 -static void __lambda_394(void *data, object self_7313317, int argc, object *args) /* object self_7313317, object r_735171 */
-+static void __lambda_394(void *data, object self_7312071, int argc, object *args) /* object self_7312071, object r_734726 */
++static void __lambda_394(void *data, object self_7312064, int argc, object *args) /* object self_7312064, object r_734719 */
   {
  
    
  
 -return_closcall3(data,  car(((closureN)self_7313317)->elements[1]),  ((closureN)self_7313317)->elements[0], ((closureN)self_7313317)->elements[2], ((closureN)self_7313317)->elements[3]);; 
-+return_closcall3(data,  car(((closureN)self_7312071)->elements[1]),  ((closureN)self_7312071)->elements[0], ((closureN)self_7312071)->elements[2], ((closureN)self_7312071)->elements[3]);; 
++return_closcall3(data,  car(((closureN)self_7312064)->elements[1]),  ((closureN)self_7312064)->elements[0], ((closureN)self_7312064)->elements[2], ((closureN)self_7312064)->elements[3]);; 
  }
  
 -static void __lambda_383(void *data, object _, int argc, object *args) /* closure _,object k_735156, object k_73493_733111, object fill_73494_733112_raw, ... */
-+static void __lambda_383(void *data, object _, int argc, object *args) /* closure _,object k_734711, object k_73493_732771, object fill_73494_732772_raw, ... */
++static void __lambda_383(void *data, object _, int argc, object *args) /* closure _,object k_734704, object k_73493_732764, object fill_73494_732765_raw, ... */
   {
 -object k_735156 = args[0]; object k_73493_733111 = args[1];
 -load_varargs(fill_73494_733112, args, 2, argc - 2);
--  Cyc_st_add(data, "scheme/base.sld:make-list");
-+object k_734711 = args[0]; object k_73493_732771 = args[1];
-+load_varargs(fill_73494_732772, args, 2, argc - 2);
-+  Cyc_st_add(data, "base.sld:make-list");
++object k_734704 = args[0]; object k_73493_732764 = args[1];
++load_varargs(fill_73494_732765, args, 2, argc - 2);
+   Cyc_st_add(data, "scheme/base.sld:make-list");
  
 -closureN_type c_7317750;
 -object e_7317817 [3];
@@ -51939,28 +52163,28 @@ Make let-values be the same as let*-values, to work around
 -c_7317750.elements[0] = fill_73494_733112;
 -c_7317750.elements[1] = k_73493_733111;
 -c_7317750.elements[2] = k_735156;
-+closureN_type c_7316457;
-+object e_7316524 [3];
-+c_7316457.hdr.mark = gc_color_red;
-+ c_7316457.hdr.grayed = 0;
-+c_7316457.tag = closureN_tag;
-+ c_7316457.fn = (function_type)__lambda_384;
-+c_7316457.num_args = 2;
-+c_7316457.num_elements = 3;
-+c_7316457.elements = (object *)e_7316524;
-+c_7316457.elements[0] = fill_73494_732772;
-+c_7316457.elements[1] = k_734711;
-+c_7316457.elements[2] = k_73493_732771;
++closureN_type c_7316450;
++object e_7316517 [3];
++c_7316450.hdr.mark = gc_color_red;
++ c_7316450.hdr.grayed = 0;
++c_7316450.tag = closureN_tag;
++ c_7316450.fn = (function_type)__lambda_384;
++c_7316450.num_args = 2;
++c_7316450.num_elements = 3;
++c_7316450.elements = (object *)e_7316517;
++c_7316450.elements[0] = fill_73494_732765;
++c_7316450.elements[1] = k_734704;
++c_7316450.elements[2] = k_73493_732764;
  
 -return_direct_with_clo2(data,(closure)&c_7317750,__lambda_384,  boolean_f, boolean_f);; 
-+return_direct_with_clo2(data,(closure)&c_7316457,__lambda_384,  boolean_f, boolean_f);; 
++return_direct_with_clo2(data,(closure)&c_7316450,__lambda_384,  boolean_f, boolean_f);; 
  }
  
 -static void __lambda_384(void *data, object self_7313303, int argc, object *args) /* object self_7313303, object x_73495_733113, object make_73496_733114 */
-+static void __lambda_384(void *data, object self_7312057, int argc, object *args) /* object self_7312057, object x_73495_732773, object make_73496_732774 */
++static void __lambda_384(void *data, object self_7312050, int argc, object *args) /* object self_7312050, object x_73495_732766, object make_73496_732767 */
   {
 - object x_73495_733113 = args[0]; object make_73496_733114 = args[1];
-+ object x_73495_732773 = args[0]; object make_73496_732774 = args[1];
++ object x_73495_732766 = args[0]; object make_73496_732767 = args[1];
    
 -closureN_type c_7317752;
 -object e_7317813 [4];
@@ -51975,32 +52199,32 @@ Make let-values be the same as let*-values, to work around
 -c_7317752.elements[1] = ((closureN)self_7313303)->elements[1];
 -c_7317752.elements[2] = ((closureN)self_7313303)->elements[2];
 -c_7317752.elements[3] = make_73496_733114;
-+closureN_type c_7316459;
-+object e_7316520 [4];
-+c_7316459.hdr.mark = gc_color_red;
-+ c_7316459.hdr.grayed = 0;
-+c_7316459.tag = closureN_tag;
-+ c_7316459.fn = (function_type)__lambda_1308;
-+c_7316459.num_args = 1;
-+c_7316459.num_elements = 4;
-+c_7316459.elements = (object *)e_7316520;
-+c_7316459.elements[0] = ((closureN)self_7312057)->elements[0];
-+c_7316459.elements[1] = ((closureN)self_7312057)->elements[1];
-+c_7316459.elements[2] = ((closureN)self_7312057)->elements[2];
-+c_7316459.elements[3] = make_73496_732774;
++closureN_type c_7316452;
++object e_7316513 [4];
++c_7316452.hdr.mark = gc_color_red;
++ c_7316452.hdr.grayed = 0;
++c_7316452.tag = closureN_tag;
++ c_7316452.fn = (function_type)__lambda_1308;
++c_7316452.num_args = 1;
++c_7316452.num_elements = 4;
++c_7316452.elements = (object *)e_7316513;
++c_7316452.elements[0] = ((closureN)self_7312050)->elements[0];
++c_7316452.elements[1] = ((closureN)self_7312050)->elements[1];
++c_7316452.elements[2] = ((closureN)self_7312050)->elements[2];
++c_7316452.elements[3] = make_73496_732767;
  
  
 -pair_type local_7317816; 
 -return_direct_with_clo1(data,(closure)&c_7317752,__lambda_1355,  set_cell_as_expr(&local_7317816, x_73495_733113));; 
-+pair_type local_7316523; 
-+return_direct_with_clo1(data,(closure)&c_7316459,__lambda_1308,  set_cell_as_expr(&local_7316523, x_73495_732773));; 
++pair_type local_7316516; 
++return_direct_with_clo1(data,(closure)&c_7316452,__lambda_1308,  set_cell_as_expr(&local_7316516, x_73495_732766));; 
  }
  
 -static void __lambda_1355(void *data, object self_7313304, int argc, object *args) /* object self_7313304, object x_73495_733113 */
-+static void __lambda_1308(void *data, object self_7312058, int argc, object *args) /* object self_7312058, object x_73495_732773 */
++static void __lambda_1308(void *data, object self_7312051, int argc, object *args) /* object self_7312051, object x_73495_732766 */
   {
 - object x_73495_733113 = args[0];
-+ object x_73495_732773 = args[0];
++ object x_73495_732766 = args[0];
    
 -closureN_type c_7317754;
 -object e_7317808 [4];
@@ -52015,43 +52239,43 @@ Make let-values be the same as let*-values, to work around
 -c_7317754.elements[1] = ((closureN)self_7313304)->elements[1];
 -c_7317754.elements[2] = ((closureN)self_7313304)->elements[2];
 -c_7317754.elements[3] = x_73495_733113;
-+closureN_type c_7316461;
-+object e_7316515 [4];
-+c_7316461.hdr.mark = gc_color_red;
-+ c_7316461.hdr.grayed = 0;
-+c_7316461.tag = closureN_tag;
-+ c_7316461.fn = (function_type)__lambda_1307;
-+c_7316461.num_args = 1;
-+c_7316461.num_elements = 4;
-+c_7316461.elements = (object *)e_7316515;
-+c_7316461.elements[0] = ((closureN)self_7312058)->elements[0];
-+c_7316461.elements[1] = ((closureN)self_7312058)->elements[1];
-+c_7316461.elements[2] = ((closureN)self_7312058)->elements[2];
-+c_7316461.elements[3] = x_73495_732773;
++closureN_type c_7316454;
++object e_7316508 [4];
++c_7316454.hdr.mark = gc_color_red;
++ c_7316454.hdr.grayed = 0;
++c_7316454.tag = closureN_tag;
++ c_7316454.fn = (function_type)__lambda_1307;
++c_7316454.num_args = 1;
++c_7316454.num_elements = 4;
++c_7316454.elements = (object *)e_7316508;
++c_7316454.elements[0] = ((closureN)self_7312051)->elements[0];
++c_7316454.elements[1] = ((closureN)self_7312051)->elements[1];
++c_7316454.elements[2] = ((closureN)self_7312051)->elements[2];
++c_7316454.elements[3] = x_73495_732766;
  
  
 -pair_type local_7317811; 
 -return_direct_with_clo1(data,(closure)&c_7317754,__lambda_1354,  set_cell_as_expr(&local_7317811, ((closureN)self_7313304)->elements[3]));; 
-+pair_type local_7316518; 
-+return_direct_with_clo1(data,(closure)&c_7316461,__lambda_1307,  set_cell_as_expr(&local_7316518, ((closureN)self_7312058)->elements[3]));; 
++pair_type local_7316511; 
++return_direct_with_clo1(data,(closure)&c_7316454,__lambda_1307,  set_cell_as_expr(&local_7316511, ((closureN)self_7312051)->elements[3]));; 
  }
  
 -static void __lambda_1354(void *data, object self_7313305, int argc, object *args) /* object self_7313305, object make_73496_733114 */
-+static void __lambda_1307(void *data, object self_7312059, int argc, object *args) /* object self_7312059, object make_73496_732774 */
++static void __lambda_1307(void *data, object self_7312052, int argc, object *args) /* object self_7312052, object make_73496_732767 */
   {
 - object make_73496_733114 = args[0];
 -  object r_735164;
-+ object make_73496_732774 = args[0];
-+  object r_734719;
++ object make_73496_732767 = args[0];
++  object r_734712;
      
 -if( (boolean_f != Cyc_is_null(((closureN)self_7313305)->elements[0])) ){ 
 -  r_735164 = boolean_f;
-+if( (boolean_f != Cyc_is_null(((closureN)self_7312059)->elements[0])) ){ 
-+  r_734719 = boolean_f;
++if( (boolean_f != Cyc_is_null(((closureN)self_7312052)->elements[0])) ){ 
++  r_734712 = boolean_f;
  } else { 
    
 -  r_735164 = Cyc_car(data, ((closureN)self_7313305)->elements[0]);}
-+  r_734719 = Cyc_car(data, ((closureN)self_7312059)->elements[0]);}
++  r_734712 = Cyc_car(data, ((closureN)self_7312052)->elements[0]);}
  ;
 -closureN_type c_7317765;
 -object e_7317804 [4];
@@ -52066,28 +52290,28 @@ Make let-values be the same as let*-values, to work around
 -c_7317765.elements[1] = ((closureN)self_7313305)->elements[2];
 -c_7317765.elements[2] = make_73496_733114;
 -c_7317765.elements[3] = ((closureN)self_7313305)->elements[3];
-+closureN_type c_7316472;
-+object e_7316511 [4];
-+c_7316472.hdr.mark = gc_color_red;
-+ c_7316472.hdr.grayed = 0;
-+c_7316472.tag = closureN_tag;
-+ c_7316472.fn = (function_type)__lambda_385;
-+c_7316472.num_args = 1;
-+c_7316472.num_elements = 4;
-+c_7316472.elements = (object *)e_7316511;
-+c_7316472.elements[0] = ((closureN)self_7312059)->elements[1];
-+c_7316472.elements[1] = ((closureN)self_7312059)->elements[2];
-+c_7316472.elements[2] = make_73496_732774;
-+c_7316472.elements[3] = ((closureN)self_7312059)->elements[3];
++closureN_type c_7316465;
++object e_7316504 [4];
++c_7316465.hdr.mark = gc_color_red;
++ c_7316465.hdr.grayed = 0;
++c_7316465.tag = closureN_tag;
++ c_7316465.fn = (function_type)__lambda_385;
++c_7316465.num_args = 1;
++c_7316465.num_elements = 4;
++c_7316465.elements = (object *)e_7316504;
++c_7316465.elements[0] = ((closureN)self_7312052)->elements[1];
++c_7316465.elements[1] = ((closureN)self_7312052)->elements[2];
++c_7316465.elements[2] = make_73496_732767;
++c_7316465.elements[3] = ((closureN)self_7312052)->elements[3];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7317765,__lambda_385,  Cyc_set_cell(data, ((closureN)self_7313305)->elements[3], r_735164));; 
-+return_direct_with_clo1(data,(closure)&c_7316472,__lambda_385,  Cyc_set_cell(data, ((closureN)self_7312059)->elements[3], r_734719));; 
++return_direct_with_clo1(data,(closure)&c_7316465,__lambda_385,  Cyc_set_cell(data, ((closureN)self_7312052)->elements[3], r_734712));; 
  }
  
 -static void __lambda_385(void *data, object self_7313306, int argc, object *args) /* object self_7313306, object r_735157 */
-+static void __lambda_385(void *data, object self_7312060, int argc, object *args) /* object self_7312060, object r_734712 */
++static void __lambda_385(void *data, object self_7312053, int argc, object *args) /* object self_7312053, object r_734705 */
   {
  
    
@@ -52104,19 +52328,19 @@ Make let-values be the same as let*-values, to work around
 -c_7317767.elements[1] = ((closureN)self_7313306)->elements[1];
 -c_7317767.elements[2] = ((closureN)self_7313306)->elements[2];
 -c_7317767.elements[3] = ((closureN)self_7313306)->elements[3];
-+closureN_type c_7316474;
-+object e_7316490 [4];
-+c_7316474.hdr.mark = gc_color_red;
-+ c_7316474.hdr.grayed = 0;
-+c_7316474.tag = closureN_tag;
-+ c_7316474.fn = (function_type)__lambda_386;
-+c_7316474.num_args = 1;
-+c_7316474.num_elements = 4;
-+c_7316474.elements = (object *)e_7316490;
-+c_7316474.elements[0] = ((closureN)self_7312060)->elements[0];
-+c_7316474.elements[1] = ((closureN)self_7312060)->elements[1];
-+c_7316474.elements[2] = ((closureN)self_7312060)->elements[2];
-+c_7316474.elements[3] = ((closureN)self_7312060)->elements[3];
++closureN_type c_7316467;
++object e_7316483 [4];
++c_7316467.hdr.mark = gc_color_red;
++ c_7316467.hdr.grayed = 0;
++c_7316467.tag = closureN_tag;
++ c_7316467.fn = (function_type)__lambda_386;
++c_7316467.num_args = 1;
++c_7316467.num_elements = 4;
++c_7316467.elements = (object *)e_7316483;
++c_7316467.elements[0] = ((closureN)self_7312053)->elements[0];
++c_7316467.elements[1] = ((closureN)self_7312053)->elements[1];
++c_7316467.elements[2] = ((closureN)self_7312053)->elements[2];
++c_7316467.elements[3] = ((closureN)self_7312053)->elements[3];
  
  
 -closureN_type c_7317784;
@@ -52129,29 +52353,29 @@ Make let-values be the same as let*-values, to work around
 -c_7317784.num_elements = 1;
 -c_7317784.elements = (object *)e_7317803;
 -c_7317784.elements[0] = ((closureN)self_7313306)->elements[2];
-+closureN_type c_7316491;
-+object e_7316510 [1];
-+c_7316491.hdr.mark = gc_color_red;
-+ c_7316491.hdr.grayed = 0;
-+c_7316491.tag = closureN_tag;
-+ c_7316491.fn = (function_type)__lambda_388;
-+c_7316491.num_args = 2;
-+c_7316491.num_elements = 1;
-+c_7316491.elements = (object *)e_7316510;
-+c_7316491.elements[0] = ((closureN)self_7312060)->elements[2];
++closureN_type c_7316484;
++object e_7316503 [1];
++c_7316484.hdr.mark = gc_color_red;
++ c_7316484.hdr.grayed = 0;
++c_7316484.tag = closureN_tag;
++ c_7316484.fn = (function_type)__lambda_388;
++c_7316484.num_args = 2;
++c_7316484.num_elements = 1;
++c_7316484.elements = (object *)e_7316503;
++c_7316484.elements[0] = ((closureN)self_7312053)->elements[2];
  
 -return_direct_with_clo1(data,(closure)&c_7317767,__lambda_386,  &c_7317784);; 
-+return_direct_with_clo1(data,(closure)&c_7316474,__lambda_386,  &c_7316491);; 
++return_direct_with_clo1(data,(closure)&c_7316467,__lambda_386,  &c_7316484);; 
  }
  
 -static void __lambda_388(void *data, object self_7313307, int argc, object *args) /* object self_7313307, object k_735160, object n_73497_733115, object obj_73498_733116 */
-+static void __lambda_388(void *data, object self_7312061, int argc, object *args) /* object self_7312061, object k_734715, object n_73497_732775, object obj_73498_732776 */
++static void __lambda_388(void *data, object self_7312054, int argc, object *args) /* object self_7312054, object k_734708, object n_73497_732768, object obj_73498_732769 */
   {
 - object k_735160 = args[0]; object n_73497_733115 = args[1]; object obj_73498_733116 = args[2];
-+ object k_734715 = args[0]; object n_73497_732775 = args[1]; object obj_73498_732776 = args[2];
++ object k_734708 = args[0]; object n_73497_732768 = args[1]; object obj_73498_732769 = args[2];
      
 -if( (boolean_f != Cyc_num_fast_gt_op(data, n_73497_733115, obj_int2obj(0))) ){ 
-+if( (boolean_f != Cyc_num_fast_gt_op(data, n_73497_732775, obj_int2obj(0))) ){ 
++if( (boolean_f != Cyc_num_fast_gt_op(data, n_73497_732768, obj_int2obj(0))) ){ 
    
  
  
@@ -52166,46 +52390,46 @@ Make let-values be the same as let*-values, to work around
 -c_7317791.elements = (object *)e_7317798;
 -c_7317791.elements[0] = k_735160;
 -c_7317791.elements[1] = obj_73498_733116;
-+closureN_type c_7316498;
-+object e_7316505 [2];
-+c_7316498.hdr.mark = gc_color_red;
-+ c_7316498.hdr.grayed = 0;
-+c_7316498.tag = closureN_tag;
-+ c_7316498.fn = (function_type)__lambda_389;
-+c_7316498.num_args = 1;
-+c_7316498.num_elements = 2;
-+c_7316498.elements = (object *)e_7316505;
-+c_7316498.elements[0] = k_734715;
-+c_7316498.elements[1] = obj_73498_732776;
++closureN_type c_7316491;
++object e_7316498 [2];
++c_7316491.hdr.mark = gc_color_red;
++ c_7316491.hdr.grayed = 0;
++c_7316491.tag = closureN_tag;
++ c_7316491.fn = (function_type)__lambda_389;
++c_7316491.num_args = 1;
++c_7316491.num_elements = 2;
++c_7316491.elements = (object *)e_7316498;
++c_7316491.elements[0] = k_734708;
++c_7316491.elements[1] = obj_73498_732769;
  
  
 -complex_num_type local_7317801; 
 -return_closcall3(data,  car(((closureN)self_7313307)->elements[0]),  &c_7317791, Cyc_fast_sub(data,&local_7317801, n_73497_733115, obj_int2obj(1)), obj_73498_733116);
-+complex_num_type local_7316508; 
-+return_closcall3(data,  car(((closureN)self_7312061)->elements[0]),  &c_7316498, Cyc_fast_sub(data,&local_7316508, n_73497_732775, obj_int2obj(1)), obj_73498_732776);
++complex_num_type local_7316501; 
++return_closcall3(data,  car(((closureN)self_7312054)->elements[0]),  &c_7316491, Cyc_fast_sub(data,&local_7316501, n_73497_732768, obj_int2obj(1)), obj_73498_732769);
  } else { 
 -  return_direct_with_clo1(data,  k_735160, (((closure)  k_735160)->fn),  NULL);}
-+  return_direct_with_clo1(data,  k_734715, (((closure)  k_734715)->fn),  NULL);}
++  return_direct_with_clo1(data,  k_734708, (((closure)  k_734708)->fn),  NULL);}
  ;; 
  }
  
 -static void __lambda_389(void *data, object self_7313308, int argc, object *args) /* object self_7313308, object r_735162 */
-+static void __lambda_389(void *data, object self_7312062, int argc, object *args) /* object self_7312062, object r_734717 */
++static void __lambda_389(void *data, object self_7312055, int argc, object *args) /* object self_7312055, object r_734710 */
   {
 - object r_735162 = args[0];
-+ object r_734717 = args[0];
++ object r_734710 = args[0];
    
 -pair_type local_7317796; 
 -return_direct_with_clo1(data,  ((closureN)self_7313308)->elements[0], (((closure)  ((closureN)self_7313308)->elements[0])->fn),  set_pair_as_expr(&local_7317796, ((closureN)self_7313308)->elements[1], r_735162));; 
-+pair_type local_7316503; 
-+return_direct_with_clo1(data,  ((closureN)self_7312062)->elements[0], (((closure)  ((closureN)self_7312062)->elements[0])->fn),  set_pair_as_expr(&local_7316503, ((closureN)self_7312062)->elements[1], r_734717));; 
++pair_type local_7316496; 
++return_direct_with_clo1(data,  ((closureN)self_7312055)->elements[0], (((closure)  ((closureN)self_7312055)->elements[0])->fn),  set_pair_as_expr(&local_7316496, ((closureN)self_7312055)->elements[1], r_734710));; 
  }
  
 -static void __lambda_386(void *data, object self_7313309, int argc, object *args) /* object self_7313309, object r_735159 */
-+static void __lambda_386(void *data, object self_7312063, int argc, object *args) /* object self_7312063, object r_734714 */
++static void __lambda_386(void *data, object self_7312056, int argc, object *args) /* object self_7312056, object r_734707 */
   {
 - object r_735159 = args[0];
-+ object r_734714 = args[0];
++ object r_734707 = args[0];
    
 -closureN_type c_7317769;
 -object e_7317779 [4];
@@ -52220,28 +52444,28 @@ Make let-values be the same as let*-values, to work around
 -c_7317769.elements[1] = ((closureN)self_7313309)->elements[1];
 -c_7317769.elements[2] = ((closureN)self_7313309)->elements[2];
 -c_7317769.elements[3] = ((closureN)self_7313309)->elements[3];
-+closureN_type c_7316476;
-+object e_7316486 [4];
-+c_7316476.hdr.mark = gc_color_red;
-+ c_7316476.hdr.grayed = 0;
-+c_7316476.tag = closureN_tag;
-+ c_7316476.fn = (function_type)__lambda_387;
-+c_7316476.num_args = 1;
-+c_7316476.num_elements = 4;
-+c_7316476.elements = (object *)e_7316486;
-+c_7316476.elements[0] = ((closureN)self_7312063)->elements[0];
-+c_7316476.elements[1] = ((closureN)self_7312063)->elements[1];
-+c_7316476.elements[2] = ((closureN)self_7312063)->elements[2];
-+c_7316476.elements[3] = ((closureN)self_7312063)->elements[3];
++closureN_type c_7316469;
++object e_7316479 [4];
++c_7316469.hdr.mark = gc_color_red;
++ c_7316469.hdr.grayed = 0;
++c_7316469.tag = closureN_tag;
++ c_7316469.fn = (function_type)__lambda_387;
++c_7316469.num_args = 1;
++c_7316469.num_elements = 4;
++c_7316469.elements = (object *)e_7316479;
++c_7316469.elements[0] = ((closureN)self_7312056)->elements[0];
++c_7316469.elements[1] = ((closureN)self_7312056)->elements[1];
++c_7316469.elements[2] = ((closureN)self_7312056)->elements[2];
++c_7316469.elements[3] = ((closureN)self_7312056)->elements[3];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7317769,__lambda_387,  Cyc_set_cell(data, ((closureN)self_7313309)->elements[2], r_735159));; 
-+return_direct_with_clo1(data,(closure)&c_7316476,__lambda_387,  Cyc_set_cell(data, ((closureN)self_7312063)->elements[2], r_734714));; 
++return_direct_with_clo1(data,(closure)&c_7316469,__lambda_387,  Cyc_set_cell(data, ((closureN)self_7312056)->elements[2], r_734707));; 
  }
  
 -static void __lambda_387(void *data, object self_7313310, int argc, object *args) /* object self_7313310, object r_735158 */
-+static void __lambda_387(void *data, object self_7312064, int argc, object *args) /* object self_7312064, object r_734713 */
++static void __lambda_387(void *data, object self_7312057, int argc, object *args) /* object self_7312057, object r_734706 */
   {
  
    
@@ -52249,31 +52473,29 @@ Make let-values be the same as let*-values, to work around
  
  
 -return_closcall3(data,  car(((closureN)self_7313310)->elements[2]),  ((closureN)self_7313310)->elements[1], ((closureN)self_7313310)->elements[0], car(((closureN)self_7313310)->elements[3]));; 
-+return_closcall3(data,  car(((closureN)self_7312064)->elements[2]),  ((closureN)self_7312064)->elements[0], ((closureN)self_7312064)->elements[1], car(((closureN)self_7312064)->elements[3]));; 
++return_closcall3(data,  car(((closureN)self_7312057)->elements[2]),  ((closureN)self_7312057)->elements[0], ((closureN)self_7312057)->elements[1], car(((closureN)self_7312057)->elements[3]));; 
  }
  
 -static void __lambda_382(void *data, object _, int argc, object *args) /* closure _,object k_735153, object objs_73492_733110_raw, ... */
-+static void __lambda_382(void *data, object _, int argc, object *args) /* closure _,object k_734708, object objs_73492_732770_raw, ... */
++static void __lambda_382(void *data, object _, int argc, object *args) /* closure _,object k_734701, object objs_73492_732763_raw, ... */
   {
 -object k_735153 = args[0];
 -load_varargs(objs_73492_733110, args, 1, argc - 1);
--  Cyc_st_add(data, "scheme/base.sld:list");
++object k_734701 = args[0];
++load_varargs(objs_73492_732763, args, 1, argc - 1);
+   Cyc_st_add(data, "scheme/base.sld:list");
 -return_direct_with_clo1(data,  k_735153, (((closure)  k_735153)->fn),  objs_73492_733110);; 
-+object k_734708 = args[0];
-+load_varargs(objs_73492_732770, args, 1, argc - 1);
-+  Cyc_st_add(data, "base.sld:list");
-+return_direct_with_clo1(data,  k_734708, (((closure)  k_734708)->fn),  objs_73492_732770);; 
++return_direct_with_clo1(data,  k_734701, (((closure)  k_734701)->fn),  objs_73492_732763);; 
  }
  
 -static void __lambda_373(void *data, object _, int argc, object *args) /* closure _,object k_735138, object lst_73485_733100_raw, ... */
-+static void __lambda_373(void *data, object _, int argc, object *args) /* closure _,object k_734693, object lst_73485_732760_raw, ... */
++static void __lambda_373(void *data, object _, int argc, object *args) /* closure _,object k_734686, object lst_73485_732753_raw, ... */
   {
 -object k_735138 = args[0];
 -load_varargs(lst_73485_733100, args, 1, argc - 1);
--  Cyc_st_add(data, "scheme/base.sld:append");
-+object k_734693 = args[0];
-+load_varargs(lst_73485_732760, args, 1, argc - 1);
-+  Cyc_st_add(data, "base.sld:append");
++object k_734686 = args[0];
++load_varargs(lst_73485_732753, args, 1, argc - 1);
+   Cyc_st_add(data, "scheme/base.sld:append");
  
 -closureN_type c_7317683;
 -object e_7317745 [2];
@@ -52286,27 +52508,27 @@ Make let-values be the same as let*-values, to work around
 -c_7317683.elements = (object *)e_7317745;
 -c_7317683.elements[0] = k_735138;
 -c_7317683.elements[1] = lst_73485_733100;
-+closureN_type c_7316390;
-+object e_7316452 [2];
-+c_7316390.hdr.mark = gc_color_red;
-+ c_7316390.hdr.grayed = 0;
-+c_7316390.tag = closureN_tag;
-+ c_7316390.fn = (function_type)__lambda_374;
-+c_7316390.num_args = 1;
-+c_7316390.num_elements = 2;
-+c_7316390.elements = (object *)e_7316452;
-+c_7316390.elements[0] = k_734693;
-+c_7316390.elements[1] = lst_73485_732760;
++closureN_type c_7316383;
++object e_7316445 [2];
++c_7316383.hdr.mark = gc_color_red;
++ c_7316383.hdr.grayed = 0;
++c_7316383.tag = closureN_tag;
++ c_7316383.fn = (function_type)__lambda_374;
++c_7316383.num_args = 1;
++c_7316383.num_elements = 2;
++c_7316383.elements = (object *)e_7316445;
++c_7316383.elements[0] = k_734686;
++c_7316383.elements[1] = lst_73485_732753;
  
 -return_direct_with_clo1(data,(closure)&c_7317683,__lambda_374,  boolean_f);; 
-+return_direct_with_clo1(data,(closure)&c_7316390,__lambda_374,  boolean_f);; 
++return_direct_with_clo1(data,(closure)&c_7316383,__lambda_374,  boolean_f);; 
  }
  
 -static void __lambda_374(void *data, object self_7313294, int argc, object *args) /* object self_7313294, object append_912_733102 */
-+static void __lambda_374(void *data, object self_7312048, int argc, object *args) /* object self_7312048, object append_912_732762 */
++static void __lambda_374(void *data, object self_7312041, int argc, object *args) /* object self_7312041, object append_912_732755 */
   {
 - object append_912_733102 = args[0];
-+ object append_912_732762 = args[0];
++ object append_912_732755 = args[0];
    
 -closureN_type c_7317685;
 -object e_7317741 [2];
@@ -52319,30 +52541,30 @@ Make let-values be the same as let*-values, to work around
 -c_7317685.elements = (object *)e_7317741;
 -c_7317685.elements[0] = ((closureN)self_7313294)->elements[0];
 -c_7317685.elements[1] = ((closureN)self_7313294)->elements[1];
-+closureN_type c_7316392;
-+object e_7316448 [2];
-+c_7316392.hdr.mark = gc_color_red;
-+ c_7316392.hdr.grayed = 0;
-+c_7316392.tag = closureN_tag;
-+ c_7316392.fn = (function_type)__lambda_1306;
-+c_7316392.num_args = 1;
-+c_7316392.num_elements = 2;
-+c_7316392.elements = (object *)e_7316448;
-+c_7316392.elements[0] = ((closureN)self_7312048)->elements[0];
-+c_7316392.elements[1] = ((closureN)self_7312048)->elements[1];
++closureN_type c_7316385;
++object e_7316441 [2];
++c_7316385.hdr.mark = gc_color_red;
++ c_7316385.hdr.grayed = 0;
++c_7316385.tag = closureN_tag;
++ c_7316385.fn = (function_type)__lambda_1306;
++c_7316385.num_args = 1;
++c_7316385.num_elements = 2;
++c_7316385.elements = (object *)e_7316441;
++c_7316385.elements[0] = ((closureN)self_7312041)->elements[0];
++c_7316385.elements[1] = ((closureN)self_7312041)->elements[1];
  
  
 -pair_type local_7317744; 
 -return_direct_with_clo1(data,(closure)&c_7317685,__lambda_1353,  set_cell_as_expr(&local_7317744, append_912_733102));; 
-+pair_type local_7316451; 
-+return_direct_with_clo1(data,(closure)&c_7316392,__lambda_1306,  set_cell_as_expr(&local_7316451, append_912_732762));; 
++pair_type local_7316444; 
++return_direct_with_clo1(data,(closure)&c_7316385,__lambda_1306,  set_cell_as_expr(&local_7316444, append_912_732755));; 
  }
  
 -static void __lambda_1353(void *data, object self_7313295, int argc, object *args) /* object self_7313295, object append_912_733102 */
-+static void __lambda_1306(void *data, object self_7312049, int argc, object *args) /* object self_7312049, object append_912_732762 */
++static void __lambda_1306(void *data, object self_7312042, int argc, object *args) /* object self_7312042, object append_912_732755 */
   {
 - object append_912_733102 = args[0];
-+ object append_912_732762 = args[0];
++ object append_912_732755 = args[0];
    
 -closureN_type c_7317687;
 -object e_7317727 [3];
@@ -52356,31 +52578,31 @@ Make let-values be the same as let*-values, to work around
 -c_7317687.elements[0] = append_912_733102;
 -c_7317687.elements[1] = ((closureN)self_7313295)->elements[0];
 -c_7317687.elements[2] = ((closureN)self_7313295)->elements[1];
-+closureN_type c_7316394;
-+object e_7316434 [3];
-+c_7316394.hdr.mark = gc_color_red;
-+ c_7316394.hdr.grayed = 0;
-+c_7316394.tag = closureN_tag;
-+ c_7316394.fn = (function_type)__lambda_375;
-+c_7316394.num_args = 1;
-+c_7316394.num_elements = 3;
-+c_7316394.elements = (object *)e_7316434;
-+c_7316394.elements[0] = append_912_732762;
-+c_7316394.elements[1] = ((closureN)self_7312049)->elements[0];
-+c_7316394.elements[2] = ((closureN)self_7312049)->elements[1];
++closureN_type c_7316387;
++object e_7316427 [3];
++c_7316387.hdr.mark = gc_color_red;
++ c_7316387.hdr.grayed = 0;
++c_7316387.tag = closureN_tag;
++ c_7316387.fn = (function_type)__lambda_375;
++c_7316387.num_args = 1;
++c_7316387.num_elements = 3;
++c_7316387.elements = (object *)e_7316427;
++c_7316387.elements[0] = append_912_732755;
++c_7316387.elements[1] = ((closureN)self_7312042)->elements[0];
++c_7316387.elements[2] = ((closureN)self_7312042)->elements[1];
  
  
 -mclosure0(c_7317728, (function_type)__lambda_379);c_7317728.num_args = 2;
 -return_direct_with_clo1(data,(closure)&c_7317687,__lambda_375,  &c_7317728);; 
-+mclosure0(c_7316435, (function_type)__lambda_379);c_7316435.num_args = 2;
-+return_direct_with_clo1(data,(closure)&c_7316394,__lambda_375,  &c_7316435);; 
++mclosure0(c_7316428, (function_type)__lambda_379);c_7316428.num_args = 2;
++return_direct_with_clo1(data,(closure)&c_7316387,__lambda_375,  &c_7316428);; 
  }
  
 -static void __lambda_379(void *data, object self_7313296, int argc, object *args) /* object self_7313296, object k_735148, object inlist_73486_733104, object alist_73487_733105 */
-+static void __lambda_379(void *data, object self_7312050, int argc, object *args) /* object self_7312050, object k_734703, object inlist_73486_732764, object alist_73487_732765 */
++static void __lambda_379(void *data, object self_7312043, int argc, object *args) /* object self_7312043, object k_734696, object inlist_73486_732757, object alist_73487_732758 */
   {
 - object k_735148 = args[0]; object inlist_73486_733104 = args[1]; object alist_73487_733105 = args[2];
-+ object k_734703 = args[0]; object inlist_73486_732764 = args[1]; object alist_73487_732765 = args[2];
++ object k_734696 = args[0]; object inlist_73486_732757 = args[1]; object alist_73487_732758 = args[2];
    
 -closureN_type c_7317730;
 -object e_7317735 [3];
@@ -52394,52 +52616,52 @@ Make let-values be the same as let*-values, to work around
 -c_7317730.elements[0] = alist_73487_733105;
 -c_7317730.elements[1] = inlist_73486_733104;
 -c_7317730.elements[2] = k_735148;
-+closureN_type c_7316437;
-+object e_7316442 [3];
-+c_7316437.hdr.mark = gc_color_red;
-+ c_7316437.hdr.grayed = 0;
-+c_7316437.tag = closureN_tag;
-+ c_7316437.fn = (function_type)__lambda_380;
-+c_7316437.num_args = 1;
-+c_7316437.num_elements = 3;
-+c_7316437.elements = (object *)e_7316442;
-+c_7316437.elements[0] = alist_73487_732765;
-+c_7316437.elements[1] = inlist_73486_732764;
-+c_7316437.elements[2] = k_734703;
++closureN_type c_7316430;
++object e_7316435 [3];
++c_7316430.hdr.mark = gc_color_red;
++ c_7316430.hdr.grayed = 0;
++c_7316430.tag = closureN_tag;
++ c_7316430.fn = (function_type)__lambda_380;
++c_7316430.num_args = 1;
++c_7316430.num_elements = 3;
++c_7316430.elements = (object *)e_7316435;
++c_7316430.elements[0] = alist_73487_732758;
++c_7316430.elements[1] = inlist_73486_732757;
++c_7316430.elements[2] = k_734696;
  
  
 -mclosure0(c_7317736, (function_type)__lambda_381);c_7317736.num_args = 2;
 -return_direct_with_clo1(data,(closure)&c_7317730,__lambda_380,  &c_7317736);; 
-+mclosure0(c_7316443, (function_type)__lambda_381);c_7316443.num_args = 2;
-+return_direct_with_clo1(data,(closure)&c_7316437,__lambda_380,  &c_7316443);; 
++mclosure0(c_7316436, (function_type)__lambda_381);c_7316436.num_args = 2;
++return_direct_with_clo1(data,(closure)&c_7316430,__lambda_380,  &c_7316436);; 
  }
  
 -static void __lambda_381(void *data, object self_7313297, int argc, object *args) /* object self_7313297, object k_735150, object ap_73488_733106, object in_73489_733107 */
-+static void __lambda_381(void *data, object self_7312051, int argc, object *args) /* object self_7312051, object k_734705, object ap_73488_732766, object in_73489_732767 */
++static void __lambda_381(void *data, object self_7312044, int argc, object *args) /* object self_7312044, object k_734698, object ap_73488_732759, object in_73489_732760 */
   {
 - object k_735150 = args[0]; object ap_73488_733106 = args[1]; object in_73489_733107 = args[2];
-+ object k_734705 = args[0]; object ap_73488_732766 = args[1]; object in_73489_732767 = args[2];
++ object k_734698 = args[0]; object ap_73488_732759 = args[1]; object in_73489_732760 = args[2];
    
 -pair_type local_7317740; 
 -return_direct_with_clo1(data,  k_735150, (((closure)  k_735150)->fn),  set_pair_as_expr(&local_7317740, ap_73488_733106, in_73489_733107));; 
-+pair_type local_7316447; 
-+return_direct_with_clo1(data,  k_734705, (((closure)  k_734705)->fn),  set_pair_as_expr(&local_7316447, ap_73488_732766, in_73489_732767));; 
++pair_type local_7316440; 
++return_direct_with_clo1(data,  k_734698, (((closure)  k_734698)->fn),  set_pair_as_expr(&local_7316440, ap_73488_732759, in_73489_732760));; 
  }
  
 -static void __lambda_380(void *data, object self_7313298, int argc, object *args) /* object self_7313298, object r_735149 */
-+static void __lambda_380(void *data, object self_7312052, int argc, object *args) /* object self_7312052, object r_734704 */
++static void __lambda_380(void *data, object self_7312045, int argc, object *args) /* object self_7312045, object r_734697 */
   {
 - object r_735149 = args[0];
 -  return_direct_with_clo4(data,  __glo_foldr_scheme_base, (((closure)  __glo_foldr_scheme_base)->fn),  ((closureN)self_7313298)->elements[2], r_735149, ((closureN)self_7313298)->elements[0], ((closureN)self_7313298)->elements[1]);; 
-+ object r_734704 = args[0];
-+  return_direct_with_clo4(data,  __glo_foldr_scheme_base, (((closure)  __glo_foldr_scheme_base)->fn),  ((closureN)self_7312052)->elements[2], r_734704, ((closureN)self_7312052)->elements[0], ((closureN)self_7312052)->elements[1]);; 
++ object r_734697 = args[0];
++  return_direct_with_clo4(data,  __glo_foldr_scheme_base, (((closure)  __glo_foldr_scheme_base)->fn),  ((closureN)self_7312045)->elements[2], r_734697, ((closureN)self_7312045)->elements[0], ((closureN)self_7312045)->elements[1]);; 
  }
  
 -static void __lambda_375(void *data, object self_7313299, int argc, object *args) /* object self_7313299, object r_735147 */
-+static void __lambda_375(void *data, object self_7312053, int argc, object *args) /* object self_7312053, object r_734702 */
++static void __lambda_375(void *data, object self_7312046, int argc, object *args) /* object self_7312046, object r_734695 */
   {
 - object r_735147 = args[0];
-+ object r_734702 = args[0];
++ object r_734695 = args[0];
    
 -closureN_type c_7317689;
 -object e_7317723 [3];
@@ -52453,43 +52675,43 @@ Make let-values be the same as let*-values, to work around
 -c_7317689.elements[0] = ((closureN)self_7313299)->elements[0];
 -c_7317689.elements[1] = ((closureN)self_7313299)->elements[1];
 -c_7317689.elements[2] = ((closureN)self_7313299)->elements[2];
-+closureN_type c_7316396;
-+object e_7316430 [3];
-+c_7316396.hdr.mark = gc_color_red;
-+ c_7316396.hdr.grayed = 0;
-+c_7316396.tag = closureN_tag;
-+ c_7316396.fn = (function_type)__lambda_376;
-+c_7316396.num_args = 1;
-+c_7316396.num_elements = 3;
-+c_7316396.elements = (object *)e_7316430;
-+c_7316396.elements[0] = ((closureN)self_7312053)->elements[0];
-+c_7316396.elements[1] = ((closureN)self_7312053)->elements[1];
-+c_7316396.elements[2] = ((closureN)self_7312053)->elements[2];
++closureN_type c_7316389;
++object e_7316423 [3];
++c_7316389.hdr.mark = gc_color_red;
++ c_7316389.hdr.grayed = 0;
++c_7316389.tag = closureN_tag;
++ c_7316389.fn = (function_type)__lambda_376;
++c_7316389.num_args = 1;
++c_7316389.num_elements = 3;
++c_7316389.elements = (object *)e_7316423;
++c_7316389.elements[0] = ((closureN)self_7312046)->elements[0];
++c_7316389.elements[1] = ((closureN)self_7312046)->elements[1];
++c_7316389.elements[2] = ((closureN)self_7312046)->elements[2];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7317689,__lambda_376,  Cyc_set_cell(data, ((closureN)self_7313299)->elements[0], r_735147));; 
-+return_direct_with_clo1(data,(closure)&c_7316396,__lambda_376,  Cyc_set_cell(data, ((closureN)self_7312053)->elements[0], r_734702));; 
++return_direct_with_clo1(data,(closure)&c_7316389,__lambda_376,  Cyc_set_cell(data, ((closureN)self_7312046)->elements[0], r_734695));; 
  }
  
 -static void __lambda_376(void *data, object self_7313300, int argc, object *args) /* object self_7313300, object r_735139 */
-+static void __lambda_376(void *data, object self_7312054, int argc, object *args) /* object self_7312054, object r_734694 */
++static void __lambda_376(void *data, object self_7312047, int argc, object *args) /* object self_7312047, object r_734687 */
   {
  
      
 -if( (boolean_f != Cyc_is_null(((closureN)self_7313300)->elements[2])) ){ 
 -  return_direct_with_clo1(data,  ((closureN)self_7313300)->elements[1], (((closure)  ((closureN)self_7313300)->elements[1])->fn),  ((closureN)self_7313300)->elements[2]);
-+if( (boolean_f != Cyc_is_null(((closureN)self_7312054)->elements[2])) ){ 
-+  return_direct_with_clo1(data,  ((closureN)self_7312054)->elements[1], (((closure)  ((closureN)self_7312054)->elements[1])->fn),  ((closureN)self_7312054)->elements[2]);
++if( (boolean_f != Cyc_is_null(((closureN)self_7312047)->elements[2])) ){ 
++  return_direct_with_clo1(data,  ((closureN)self_7312047)->elements[1], (((closure)  ((closureN)self_7312047)->elements[1])->fn),  ((closureN)self_7312047)->elements[2]);
  } else { 
      
    
 -if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_7313300)->elements[2]))) ){ 
-+if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_7312054)->elements[2]))) ){ 
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_7312047)->elements[2]))) ){ 
    
  
 -return_direct_with_clo1(data,  ((closureN)self_7313300)->elements[1], (((closure)  ((closureN)self_7313300)->elements[1])->fn),  Cyc_car(data, ((closureN)self_7313300)->elements[2]));
-+return_direct_with_clo1(data,  ((closureN)self_7312054)->elements[1], (((closure)  ((closureN)self_7312054)->elements[1])->fn),  Cyc_car(data, ((closureN)self_7312054)->elements[2]));
++return_direct_with_clo1(data,  ((closureN)self_7312047)->elements[1], (((closure)  ((closureN)self_7312047)->elements[1])->fn),  Cyc_car(data, ((closureN)self_7312047)->elements[2]));
  } else { 
    
 -closureN_type c_7317707;
@@ -52503,17 +52725,17 @@ Make let-values be the same as let*-values, to work around
 -c_7317707.elements = (object *)e_7317716;
 -c_7317707.elements[0] = ((closureN)self_7313300)->elements[1];
 -c_7317707.elements[1] = ((closureN)self_7313300)->elements[2];
-+closureN_type c_7316414;
-+object e_7316423 [2];
-+c_7316414.hdr.mark = gc_color_red;
-+ c_7316414.hdr.grayed = 0;
-+c_7316414.tag = closureN_tag;
-+ c_7316414.fn = (function_type)__lambda_377;
-+c_7316414.num_args = 1;
-+c_7316414.num_elements = 2;
-+c_7316414.elements = (object *)e_7316423;
-+c_7316414.elements[0] = ((closureN)self_7312054)->elements[1];
-+c_7316414.elements[1] = ((closureN)self_7312054)->elements[2];
++closureN_type c_7316407;
++object e_7316416 [2];
++c_7316407.hdr.mark = gc_color_red;
++ c_7316407.hdr.grayed = 0;
++c_7316407.tag = closureN_tag;
++ c_7316407.fn = (function_type)__lambda_377;
++c_7316407.num_args = 1;
++c_7316407.num_elements = 2;
++c_7316407.elements = (object *)e_7316416;
++c_7316407.elements[0] = ((closureN)self_7312047)->elements[1];
++c_7316407.elements[1] = ((closureN)self_7312047)->elements[2];
  
  
 -closureN_type c_7317717;
@@ -52526,117 +52748,111 @@ Make let-values be the same as let*-values, to work around
 -c_7317717.num_elements = 1;
 -c_7317717.elements = (object *)e_7317722;
 -c_7317717.elements[0] = ((closureN)self_7313300)->elements[0];
-+closureN_type c_7316424;
-+object e_7316429 [1];
-+c_7316424.hdr.mark = gc_color_red;
-+ c_7316424.hdr.grayed = 0;
-+c_7316424.tag = closureN_tag;
-+ c_7316424.fn = (function_type)__lambda_378;
-+c_7316424.num_args = 2;
-+c_7316424.num_elements = 1;
-+c_7316424.elements = (object *)e_7316429;
-+c_7316424.elements[0] = ((closureN)self_7312054)->elements[0];
++closureN_type c_7316417;
++object e_7316422 [1];
++c_7316417.hdr.mark = gc_color_red;
++ c_7316417.hdr.grayed = 0;
++c_7316417.tag = closureN_tag;
++ c_7316417.fn = (function_type)__lambda_378;
++c_7316417.num_args = 2;
++c_7316417.num_elements = 1;
++c_7316417.elements = (object *)e_7316422;
++c_7316417.elements[0] = ((closureN)self_7312047)->elements[0];
  
 -return_direct_with_clo1(data,(closure)&c_7317707,__lambda_377,  &c_7317717);}
-+return_direct_with_clo1(data,(closure)&c_7316414,__lambda_377,  &c_7316424);}
++return_direct_with_clo1(data,(closure)&c_7316407,__lambda_377,  &c_7316417);}
  ;}
  ;; 
  }
  
 -static void __lambda_378(void *data, object self_7313301, int argc, object *args) /* object self_7313301, object k_735145, object a_73490_733108, object b_73491_733109 */
-+static void __lambda_378(void *data, object self_7312055, int argc, object *args) /* object self_7312055, object k_734700, object a_73490_732768, object b_73491_732769 */
++static void __lambda_378(void *data, object self_7312048, int argc, object *args) /* object self_7312048, object k_734693, object a_73490_732761, object b_73491_732762 */
   {
 - object k_735145 = args[0]; object a_73490_733108 = args[1]; object b_73491_733109 = args[2];
-+ object k_734700 = args[0]; object a_73490_732768 = args[1]; object b_73491_732769 = args[2];
++ object k_734693 = args[0]; object a_73490_732761 = args[1]; object b_73491_732762 = args[2];
    
  
 -return_closcall3(data,  car(((closureN)self_7313301)->elements[0]),  k_735145, b_73491_733109, a_73490_733108);; 
-+return_closcall3(data,  car(((closureN)self_7312055)->elements[0]),  k_734700, b_73491_732769, a_73490_732768);; 
++return_closcall3(data,  car(((closureN)self_7312048)->elements[0]),  k_734693, b_73491_732762, a_73490_732761);; 
  }
  
 -static void __lambda_377(void *data, object self_7313302, int argc, object *args) /* object self_7313302, object r_735142 */
-+static void __lambda_377(void *data, object self_7312056, int argc, object *args) /* object self_7312056, object r_734697 */
++static void __lambda_377(void *data, object self_7312049, int argc, object *args) /* object self_7312049, object r_734690 */
   {
 - object r_735142 = args[0];
-+ object r_734697 = args[0];
++ object r_734690 = args[0];
    
  
  
  
 -return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  ((closureN)self_7313302)->elements[0], r_735142, Cyc_car(data, ((closureN)self_7313302)->elements[1]), Cyc_cdr(data, ((closureN)self_7313302)->elements[1]));; 
-+return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  ((closureN)self_7312056)->elements[0], r_734697, Cyc_car(data, ((closureN)self_7312056)->elements[1]), Cyc_cdr(data, ((closureN)self_7312056)->elements[1]));; 
++return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  ((closureN)self_7312049)->elements[0], r_734690, Cyc_car(data, ((closureN)self_7312049)->elements[1]), Cyc_cdr(data, ((closureN)self_7312049)->elements[1]));; 
  }
  
 -static object __lambda_1448(void *data, object ptr,object n_73484_733099) {
-+static object __lambda_1401(void *data, object ptr,object n_73484_732759) {
++static object __lambda_1401(void *data, object ptr,object n_73484_732752) {
  
--  Cyc_st_add(data, "scheme/base.sld:negative?");
-+  Cyc_st_add(data, "base.sld:negative?");
+   Cyc_st_add(data, "scheme/base.sld:negative?");
  
  
 -return_copy(ptr,  Cyc_num_fast_lt_op(data, n_73484_733099, obj_int2obj(0)));; 
-+return_copy(ptr,  Cyc_num_fast_lt_op(data, n_73484_732759, obj_int2obj(0)));; 
++return_copy(ptr,  Cyc_num_fast_lt_op(data, n_73484_732752, obj_int2obj(0)));; 
  }
  
 -static void __lambda_372(void *data, object _, int argc, object *args) /* closure _,object k_735135, object n_73484_733099 */
-+static void __lambda_372(void *data, object _, int argc, object *args) /* closure _,object k_734690, object n_73484_732759 */
++static void __lambda_372(void *data, object _, int argc, object *args) /* closure _,object k_734683, object n_73484_732752 */
   {
 -object k_735135 = args[0]; object n_73484_733099 = args[1];
--  Cyc_st_add(data, "scheme/base.sld:negative?");
-+object k_734690 = args[0]; object n_73484_732759 = args[1];
-+  Cyc_st_add(data, "base.sld:negative?");
++object k_734683 = args[0]; object n_73484_732752 = args[1];
+   Cyc_st_add(data, "scheme/base.sld:negative?");
  
  
 -return_direct_with_clo1(data,  k_735135, (((closure)  k_735135)->fn),  Cyc_num_fast_lt_op(data, n_73484_733099, obj_int2obj(0)));; 
-+return_direct_with_clo1(data,  k_734690, (((closure)  k_734690)->fn),  Cyc_num_fast_lt_op(data, n_73484_732759, obj_int2obj(0)));; 
++return_direct_with_clo1(data,  k_734683, (((closure)  k_734683)->fn),  Cyc_num_fast_lt_op(data, n_73484_732752, obj_int2obj(0)));; 
  }
  
 -static object __lambda_1447(void *data, object ptr,object n_73483_733098) {
-+static object __lambda_1400(void *data, object ptr,object n_73483_732758) {
++static object __lambda_1400(void *data, object ptr,object n_73483_732751) {
  
--  Cyc_st_add(data, "scheme/base.sld:positive?");
-+  Cyc_st_add(data, "base.sld:positive?");
+   Cyc_st_add(data, "scheme/base.sld:positive?");
  
  
 -return_copy(ptr,  Cyc_num_fast_gt_op(data, n_73483_733098, obj_int2obj(0)));; 
-+return_copy(ptr,  Cyc_num_fast_gt_op(data, n_73483_732758, obj_int2obj(0)));; 
++return_copy(ptr,  Cyc_num_fast_gt_op(data, n_73483_732751, obj_int2obj(0)));; 
  }
  
 -static void __lambda_371(void *data, object _, int argc, object *args) /* closure _,object k_735132, object n_73483_733098 */
-+static void __lambda_371(void *data, object _, int argc, object *args) /* closure _,object k_734687, object n_73483_732758 */
++static void __lambda_371(void *data, object _, int argc, object *args) /* closure _,object k_734680, object n_73483_732751 */
   {
 -object k_735132 = args[0]; object n_73483_733098 = args[1];
--  Cyc_st_add(data, "scheme/base.sld:positive?");
-+object k_734687 = args[0]; object n_73483_732758 = args[1];
-+  Cyc_st_add(data, "base.sld:positive?");
++object k_734680 = args[0]; object n_73483_732751 = args[1];
+   Cyc_st_add(data, "scheme/base.sld:positive?");
  
  
 -return_direct_with_clo1(data,  k_735132, (((closure)  k_735132)->fn),  Cyc_num_fast_gt_op(data, n_73483_733098, obj_int2obj(0)));; 
-+return_direct_with_clo1(data,  k_734687, (((closure)  k_734687)->fn),  Cyc_num_fast_gt_op(data, n_73483_732758, obj_int2obj(0)));; 
++return_direct_with_clo1(data,  k_734680, (((closure)  k_734680)->fn),  Cyc_num_fast_gt_op(data, n_73483_732751, obj_int2obj(0)));; 
  }
  
 -static object __lambda_1446(void *data, object ptr,object n_73482_733097) {
-+static object __lambda_1399(void *data, object ptr,object n_73482_732757) {
++static object __lambda_1399(void *data, object ptr,object n_73482_732750) {
  
--  Cyc_st_add(data, "scheme/base.sld:zero?");
-+  Cyc_st_add(data, "base.sld:zero?");
+   Cyc_st_add(data, "scheme/base.sld:zero?");
  
  
 -return_copy(ptr,  Cyc_num_fast_eq_op(data, n_73482_733097, obj_int2obj(0)));; 
-+return_copy(ptr,  Cyc_num_fast_eq_op(data, n_73482_732757, obj_int2obj(0)));; 
++return_copy(ptr,  Cyc_num_fast_eq_op(data, n_73482_732750, obj_int2obj(0)));; 
  }
  
 -static void __lambda_370(void *data, object _, int argc, object *args) /* closure _,object k_735129, object n_73482_733097 */
-+static void __lambda_370(void *data, object _, int argc, object *args) /* closure _,object k_734684, object n_73482_732757 */
++static void __lambda_370(void *data, object _, int argc, object *args) /* closure _,object k_734677, object n_73482_732750 */
   {
 -object k_735129 = args[0]; object n_73482_733097 = args[1];
--  Cyc_st_add(data, "scheme/base.sld:zero?");
-+object k_734684 = args[0]; object n_73482_732757 = args[1];
-+  Cyc_st_add(data, "base.sld:zero?");
++object k_734677 = args[0]; object n_73482_732750 = args[1];
+   Cyc_st_add(data, "scheme/base.sld:zero?");
  
  
 -return_direct_with_clo1(data,  k_735129, (((closure)  k_735129)->fn),  Cyc_num_fast_eq_op(data, n_73482_733097, obj_int2obj(0)));; 
-+return_direct_with_clo1(data,  k_734684, (((closure)  k_734684)->fn),  Cyc_num_fast_eq_op(data, n_73482_732757, obj_int2obj(0)));; 
++return_direct_with_clo1(data,  k_734677, (((closure)  k_734677)->fn),  Cyc_num_fast_eq_op(data, n_73482_732750, obj_int2obj(0)));; 
  }
  
 -static object __lambda_1445(void *data, object ptr, object o) { return Cyc_is_list(o); }
@@ -52644,12 +52860,11 @@ Make let-values be the same as let*-values, to work around
 -static object __lambda_1443(void *data, object ptr,object x_73481_733096) {
 +static object __lambda_1398(void *data, object ptr, object o) { return Cyc_is_list(o); }
 +static void __lambda_1397(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_1396(void *data, object ptr,object x_73481_732756) {
++static object __lambda_1396(void *data, object ptr,object x_73481_732749) {
  
--  Cyc_st_add(data, "scheme/base.sld:not");
+   Cyc_st_add(data, "scheme/base.sld:not");
 -if( (boolean_f != x_73481_733096) ){ 
-+  Cyc_st_add(data, "base.sld:not");
-+if( (boolean_f != x_73481_732756) ){ 
++if( (boolean_f != x_73481_732749) ){ 
    return_copy(ptr,  boolean_f);
  } else { 
    return_copy(ptr,  boolean_t);}
@@ -52657,53 +52872,50 @@ Make let-values be the same as let*-values, to work around
  }
  
 -static void __lambda_369(void *data, object _, int argc, object *args) /* closure _,object k_735126, object x_73481_733096 */
-+static void __lambda_369(void *data, object _, int argc, object *args) /* closure _,object k_734681, object x_73481_732756 */
++static void __lambda_369(void *data, object _, int argc, object *args) /* closure _,object k_734674, object x_73481_732749 */
   {
 -object k_735126 = args[0]; object x_73481_733096 = args[1];
--  Cyc_st_add(data, "scheme/base.sld:not");
++object k_734674 = args[0]; object x_73481_732749 = args[1];
+   Cyc_st_add(data, "scheme/base.sld:not");
 -if( (boolean_f != x_73481_733096) ){ 
 -  return_direct_with_clo1(data,  k_735126, (((closure)  k_735126)->fn),  boolean_f);
-+object k_734681 = args[0]; object x_73481_732756 = args[1];
-+  Cyc_st_add(data, "base.sld:not");
-+if( (boolean_f != x_73481_732756) ){ 
-+  return_direct_with_clo1(data,  k_734681, (((closure)  k_734681)->fn),  boolean_f);
++if( (boolean_f != x_73481_732749) ){ 
++  return_direct_with_clo1(data,  k_734674, (((closure)  k_734674)->fn),  boolean_f);
  } else { 
 -  return_direct_with_clo1(data,  k_735126, (((closure)  k_735126)->fn),  boolean_t);}
-+  return_direct_with_clo1(data,  k_734681, (((closure)  k_734681)->fn),  boolean_t);}
++  return_direct_with_clo1(data,  k_734674, (((closure)  k_734674)->fn),  boolean_t);}
  ;; 
  }
  
 -static void __lambda_368(void *data, object _, int argc, object *args) /* closure _,object k_735122, object port_73480_733095_raw, ... */
-+static void __lambda_368(void *data, object _, int argc, object *args) /* closure _,object k_734677, object port_73480_732755_raw, ... */
++static void __lambda_368(void *data, object _, int argc, object *args) /* closure _,object k_734670, object port_73480_732748_raw, ... */
   {
 -object k_735122 = args[0];
 -load_varargs(port_73480_733095, args, 1, argc - 1);
--  Cyc_st_add(data, "scheme/base.sld:newline");
-+object k_734677 = args[0];
-+load_varargs(port_73480_732755, args, 1, argc - 1);
-+  Cyc_st_add(data, "base.sld:newline");
++object k_734670 = args[0];
++load_varargs(port_73480_732748, args, 1, argc - 1);
+   Cyc_st_add(data, "scheme/base.sld:newline");
  
 -pair_type local_7317648; 
-+pair_type local_7316355; 
++pair_type local_7316348; 
  
 -object c_7317645 = apply(data,  k_735122,__glo_write_91char_scheme_base, set_pair_as_expr(&local_7317648, obj_char2obj(10), port_73480_733095));
 -return_direct_with_clo1(data,  k_735122, (((closure)  k_735122)->fn),  c_7317645);; 
-+object c_7316352 = apply(data,  k_734677,__glo_write_91char_scheme_base, set_pair_as_expr(&local_7316355, obj_char2obj(10), port_73480_732755));
-+return_direct_with_clo1(data,  k_734677, (((closure)  k_734677)->fn),  c_7316352);; 
++object c_7316345 = apply(data,  k_734670,__glo_write_91char_scheme_base, set_pair_as_expr(&local_7316348, obj_char2obj(10), port_73480_732748));
++return_direct_with_clo1(data,  k_734670, (((closure)  k_734670)->fn),  c_7316345);; 
  }
  
 -static void __lambda_366(void *data, object _, int argc, object *args) /* closure _,object k_735116, object char_73478_733093, object port_73479_733094_raw, ... */
-+static void __lambda_366(void *data, object _, int argc, object *args) /* closure _,object k_734671, object char_73478_732753, object port_73479_732754_raw, ... */
++static void __lambda_366(void *data, object _, int argc, object *args) /* closure _,object k_734664, object char_73478_732746, object port_73479_732747_raw, ... */
   {
 -object k_735116 = args[0]; object char_73478_733093 = args[1];
 -load_varargs(port_73479_733094, args, 2, argc - 2);
--  Cyc_st_add(data, "scheme/base.sld:write-char");
-+object k_734671 = args[0]; object char_73478_732753 = args[1];
-+load_varargs(port_73479_732754, args, 2, argc - 2);
-+  Cyc_st_add(data, "base.sld:write-char");
++object k_734664 = args[0]; object char_73478_732746 = args[1];
++load_varargs(port_73479_732747, args, 2, argc - 2);
+   Cyc_st_add(data, "scheme/base.sld:write-char");
    
 -if( (boolean_f != Cyc_is_null(port_73479_733094)) ){ 
-+if( (boolean_f != Cyc_is_null(port_73479_732754)) ){ 
++if( (boolean_f != Cyc_is_null(port_73479_732747)) ){ 
    
 -closureN_type c_7317629;
 -object e_7317635 [2];
@@ -52716,39 +52928,39 @@ Make let-values be the same as let*-values, to work around
 -c_7317629.elements = (object *)e_7317635;
 -c_7317629.elements[0] = char_73478_733093;
 -c_7317629.elements[1] = k_735116;
-+closureN_type c_7316336;
-+object e_7316342 [2];
-+c_7316336.hdr.mark = gc_color_red;
-+ c_7316336.hdr.grayed = 0;
-+c_7316336.tag = closureN_tag;
-+ c_7316336.fn = (function_type)__lambda_367;
-+c_7316336.num_args = 1;
-+c_7316336.num_elements = 2;
-+c_7316336.elements = (object *)e_7316342;
-+c_7316336.elements[0] = char_73478_732753;
-+c_7316336.elements[1] = k_734671;
++closureN_type c_7316329;
++object e_7316335 [2];
++c_7316329.hdr.mark = gc_color_red;
++ c_7316329.hdr.grayed = 0;
++c_7316329.tag = closureN_tag;
++ c_7316329.fn = (function_type)__lambda_367;
++c_7316329.num_args = 1;
++c_7316329.num_elements = 2;
++c_7316329.elements = (object *)e_7316335;
++c_7316329.elements[0] = char_73478_732746;
++c_7316329.elements[1] = k_734664;
  
 -return_direct_with_clo1(data,  __glo_current_91output_91port_scheme_base, (((closure)  __glo_current_91output_91port_scheme_base)->fn),  &c_7317629);
-+return_direct_with_clo1(data,  __glo_current_91output_91port_scheme_base, (((closure)  __glo_current_91output_91port_scheme_base)->fn),  &c_7316336);
++return_direct_with_clo1(data,  __glo_current_91output_91port_scheme_base, (((closure)  __glo_current_91output_91port_scheme_base)->fn),  &c_7316329);
  } else { 
    
  
  
  
 -return_direct_with_clo1(data,  k_735116, (((closure)  k_735116)->fn),  Cyc_write_char(data, char_73478_733093, Cyc_car(data, port_73479_733094)));}
-+return_direct_with_clo1(data,  k_734671, (((closure)  k_734671)->fn),  Cyc_write_char(data, char_73478_732753, Cyc_car(data, port_73479_732754)));}
++return_direct_with_clo1(data,  k_734664, (((closure)  k_734664)->fn),  Cyc_write_char(data, char_73478_732746, Cyc_car(data, port_73479_732747)));}
  ;; 
  }
  
 -static void __lambda_367(void *data, object self_7313293, int argc, object *args) /* object self_7313293, object r_735118 */
-+static void __lambda_367(void *data, object self_7312047, int argc, object *args) /* object self_7312047, object r_734673 */
++static void __lambda_367(void *data, object self_7312040, int argc, object *args) /* object self_7312040, object r_734666 */
   {
 - object r_735118 = args[0];
-+ object r_734673 = args[0];
++ object r_734666 = args[0];
    
  
 -return_direct_with_clo1(data,  ((closureN)self_7313293)->elements[1], (((closure)  ((closureN)self_7313293)->elements[1])->fn),  Cyc_write_char(data, ((closureN)self_7313293)->elements[0], r_735118));; 
-+return_direct_with_clo1(data,  ((closureN)self_7312047)->elements[1], (((closure)  ((closureN)self_7312047)->elements[1])->fn),  Cyc_write_char(data, ((closureN)self_7312047)->elements[0], r_734673));; 
++return_direct_with_clo1(data,  ((closureN)self_7312040)->elements[1], (((closure)  ((closureN)self_7312040)->elements[1])->fn),  Cyc_write_char(data, ((closureN)self_7312040)->elements[0], r_734666));; 
  }
  
 -static object __lambda_1442(void *data, object ptr, object bv, object port, object start, object end) { return Cyc_write_bytevector(data, bv, port, start, end); }
@@ -52756,14 +52968,13 @@ Make let-values be the same as let*-values, to work around
 -static void __lambda_356(void *data, object _, int argc, object *args) /* closure _,object k_735096, object vec_73472_733087, object opts_73473_733088_raw, ... */
 +static object __lambda_1395(void *data, object ptr, object bv, object port, object start, object end) { return Cyc_write_bytevector(data, bv, port, start, end); }
 +static void __lambda_1394(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_356(void *data, object _, int argc, object *args) /* closure _,object k_734651, object vec_73472_732747, object opts_73473_732748_raw, ... */
++static void __lambda_356(void *data, object _, int argc, object *args) /* closure _,object k_734644, object vec_73472_732740, object opts_73473_732741_raw, ... */
   {
 -object k_735096 = args[0]; object vec_73472_733087 = args[1];
 -load_varargs(opts_73473_733088, args, 2, argc - 2);
--  Cyc_st_add(data, "scheme/base.sld:write-bytevector");
-+object k_734651 = args[0]; object vec_73472_732747 = args[1];
-+load_varargs(opts_73473_732748, args, 2, argc - 2);
-+  Cyc_st_add(data, "base.sld:write-bytevector");
++object k_734644 = args[0]; object vec_73472_732740 = args[1];
++load_varargs(opts_73473_732741, args, 2, argc - 2);
+   Cyc_st_add(data, "scheme/base.sld:write-bytevector");
  
 -closureN_type c_7317508;
 -object e_7317622 [3];
@@ -52777,29 +52988,14 @@ Make let-values be the same as let*-values, to work around
 -c_7317508.elements[0] = k_735096;
 -c_7317508.elements[1] = opts_73473_733088;
 -c_7317508.elements[2] = vec_73472_733087;
-+closureN_type c_7316215;
-+object e_7316329 [3];
-+c_7316215.hdr.mark = gc_color_red;
-+ c_7316215.hdr.grayed = 0;
-+c_7316215.tag = closureN_tag;
-+ c_7316215.fn = (function_type)__lambda_357;
-+c_7316215.num_args = 4;
-+c_7316215.num_elements = 3;
-+c_7316215.elements = (object *)e_7316329;
-+c_7316215.elements[0] = k_734651;
-+c_7316215.elements[1] = opts_73473_732748;
-+c_7316215.elements[2] = vec_73472_732747;
- 
+-
 -return_direct_with_clo4(data,(closure)&c_7317508,__lambda_357,  boolean_f, boolean_f, boolean_f, boolean_f);; 
-+return_direct_with_clo4(data,(closure)&c_7316215,__lambda_357,  boolean_f, boolean_f, boolean_f, boolean_f);; 
- }
- 
+-}
+-
 -static void __lambda_357(void *data, object self_7313280, int argc, object *args) /* object self_7313280, object len_73474_733089, object port_73475_733090, object start_73476_733091, object end_73477_733092 */
-+static void __lambda_357(void *data, object self_7312034, int argc, object *args) /* object self_7312034, object len_73474_732749, object port_73475_732750, object start_73476_732751, object end_73477_732752 */
-  {
+- {
 - object len_73474_733089 = args[0]; object port_73475_733090 = args[1]; object start_73476_733091 = args[2]; object end_73477_733092 = args[3];
-+ object len_73474_732749 = args[0]; object port_73475_732750 = args[1]; object start_73476_732751 = args[2]; object end_73477_732752 = args[3];
-   
+-  
 -closureN_type c_7317510;
 -object e_7317618 [6];
 -c_7317510.hdr.mark = gc_color_red;
@@ -52815,35 +53011,16 @@ Make let-values be the same as let*-values, to work around
 -c_7317510.elements[3] = port_73475_733090;
 -c_7317510.elements[4] = start_73476_733091;
 -c_7317510.elements[5] = ((closureN)self_7313280)->elements[2];
-+closureN_type c_7316217;
-+object e_7316325 [6];
-+c_7316217.hdr.mark = gc_color_red;
-+ c_7316217.hdr.grayed = 0;
-+c_7316217.tag = closureN_tag;
-+ c_7316217.fn = (function_type)__lambda_1305;
-+c_7316217.num_args = 1;
-+c_7316217.num_elements = 6;
-+c_7316217.elements = (object *)e_7316325;
-+c_7316217.elements[0] = end_73477_732752;
-+c_7316217.elements[1] = ((closureN)self_7312034)->elements[0];
-+c_7316217.elements[2] = ((closureN)self_7312034)->elements[1];
-+c_7316217.elements[3] = port_73475_732750;
-+c_7316217.elements[4] = start_73476_732751;
-+c_7316217.elements[5] = ((closureN)self_7312034)->elements[2];
- 
- 
+-
+-
 -pair_type local_7317621; 
 -return_direct_with_clo1(data,(closure)&c_7317510,__lambda_1352,  set_cell_as_expr(&local_7317621, len_73474_733089));; 
-+pair_type local_7316328; 
-+return_direct_with_clo1(data,(closure)&c_7316217,__lambda_1305,  set_cell_as_expr(&local_7316328, len_73474_732749));; 
- }
- 
+-}
+-
 -static void __lambda_1352(void *data, object self_7313281, int argc, object *args) /* object self_7313281, object len_73474_733089 */
-+static void __lambda_1305(void *data, object self_7312035, int argc, object *args) /* object self_7312035, object len_73474_732749 */
-  {
+- {
 - object len_73474_733089 = args[0];
-+ object len_73474_732749 = args[0];
-   
+-  
 -closureN_type c_7317512;
 -object e_7317613 [6];
 -c_7317512.hdr.mark = gc_color_red;
@@ -52859,35 +53036,16 @@ Make let-values be the same as let*-values, to work around
 -c_7317512.elements[3] = ((closureN)self_7313281)->elements[2];
 -c_7317512.elements[4] = ((closureN)self_7313281)->elements[4];
 -c_7317512.elements[5] = ((closureN)self_7313281)->elements[5];
-+closureN_type c_7316219;
-+object e_7316320 [6];
-+c_7316219.hdr.mark = gc_color_red;
-+ c_7316219.hdr.grayed = 0;
-+c_7316219.tag = closureN_tag;
-+ c_7316219.fn = (function_type)__lambda_1304;
-+c_7316219.num_args = 1;
-+c_7316219.num_elements = 6;
-+c_7316219.elements = (object *)e_7316320;
-+c_7316219.elements[0] = ((closureN)self_7312035)->elements[0];
-+c_7316219.elements[1] = ((closureN)self_7312035)->elements[1];
-+c_7316219.elements[2] = len_73474_732749;
-+c_7316219.elements[3] = ((closureN)self_7312035)->elements[2];
-+c_7316219.elements[4] = ((closureN)self_7312035)->elements[4];
-+c_7316219.elements[5] = ((closureN)self_7312035)->elements[5];
- 
- 
+-
+-
 -pair_type local_7317616; 
 -return_direct_with_clo1(data,(closure)&c_7317512,__lambda_1351,  set_cell_as_expr(&local_7317616, ((closureN)self_7313281)->elements[3]));; 
-+pair_type local_7316323; 
-+return_direct_with_clo1(data,(closure)&c_7316219,__lambda_1304,  set_cell_as_expr(&local_7316323, ((closureN)self_7312035)->elements[3]));; 
- }
- 
+-}
+-
 -static void __lambda_1351(void *data, object self_7313282, int argc, object *args) /* object self_7313282, object port_73475_733090 */
-+static void __lambda_1304(void *data, object self_7312036, int argc, object *args) /* object self_7312036, object port_73475_732750 */
-  {
+- {
 - object port_73475_733090 = args[0];
-+ object port_73475_732750 = args[0];
-   
+-  
 -closureN_type c_7317514;
 -object e_7317608 [6];
 -c_7317514.hdr.mark = gc_color_red;
@@ -52903,35 +53061,16 @@ Make let-values be the same as let*-values, to work around
 -c_7317514.elements[3] = ((closureN)self_7313282)->elements[3];
 -c_7317514.elements[4] = port_73475_733090;
 -c_7317514.elements[5] = ((closureN)self_7313282)->elements[5];
-+closureN_type c_7316221;
-+object e_7316315 [6];
-+c_7316221.hdr.mark = gc_color_red;
-+ c_7316221.hdr.grayed = 0;
-+c_7316221.tag = closureN_tag;
-+ c_7316221.fn = (function_type)__lambda_1303;
-+c_7316221.num_args = 1;
-+c_7316221.num_elements = 6;
-+c_7316221.elements = (object *)e_7316315;
-+c_7316221.elements[0] = ((closureN)self_7312036)->elements[0];
-+c_7316221.elements[1] = ((closureN)self_7312036)->elements[1];
-+c_7316221.elements[2] = ((closureN)self_7312036)->elements[2];
-+c_7316221.elements[3] = ((closureN)self_7312036)->elements[3];
-+c_7316221.elements[4] = port_73475_732750;
-+c_7316221.elements[5] = ((closureN)self_7312036)->elements[5];
- 
- 
+-
+-
 -pair_type local_7317611; 
 -return_direct_with_clo1(data,(closure)&c_7317514,__lambda_1350,  set_cell_as_expr(&local_7317611, ((closureN)self_7313282)->elements[4]));; 
-+pair_type local_7316318; 
-+return_direct_with_clo1(data,(closure)&c_7316221,__lambda_1303,  set_cell_as_expr(&local_7316318, ((closureN)self_7312036)->elements[4]));; 
- }
- 
+-}
+-
 -static void __lambda_1350(void *data, object self_7313283, int argc, object *args) /* object self_7313283, object start_73476_733091 */
-+static void __lambda_1303(void *data, object self_7312037, int argc, object *args) /* object self_7312037, object start_73476_732751 */
-  {
+- {
 - object start_73476_733091 = args[0];
-+ object start_73476_732751 = args[0];
-   
+-  
 -closureN_type c_7317516;
 -object e_7317603 [6];
 -c_7317516.hdr.mark = gc_color_red;
@@ -52947,35 +53086,16 @@ Make let-values be the same as let*-values, to work around
 -c_7317516.elements[3] = ((closureN)self_7313283)->elements[4];
 -c_7317516.elements[4] = start_73476_733091;
 -c_7317516.elements[5] = ((closureN)self_7313283)->elements[5];
-+closureN_type c_7316223;
-+object e_7316310 [6];
-+c_7316223.hdr.mark = gc_color_red;
-+ c_7316223.hdr.grayed = 0;
-+c_7316223.tag = closureN_tag;
-+ c_7316223.fn = (function_type)__lambda_1302;
-+c_7316223.num_args = 1;
-+c_7316223.num_elements = 6;
-+c_7316223.elements = (object *)e_7316310;
-+c_7316223.elements[0] = ((closureN)self_7312037)->elements[1];
-+c_7316223.elements[1] = ((closureN)self_7312037)->elements[2];
-+c_7316223.elements[2] = ((closureN)self_7312037)->elements[3];
-+c_7316223.elements[3] = ((closureN)self_7312037)->elements[4];
-+c_7316223.elements[4] = start_73476_732751;
-+c_7316223.elements[5] = ((closureN)self_7312037)->elements[5];
- 
- 
+-
+-
 -pair_type local_7317606; 
 -return_direct_with_clo1(data,(closure)&c_7317516,__lambda_1349,  set_cell_as_expr(&local_7317606, ((closureN)self_7313283)->elements[0]));; 
-+pair_type local_7316313; 
-+return_direct_with_clo1(data,(closure)&c_7316223,__lambda_1302,  set_cell_as_expr(&local_7316313, ((closureN)self_7312037)->elements[0]));; 
- }
- 
+-}
+-
 -static void __lambda_1349(void *data, object self_7313284, int argc, object *args) /* object self_7313284, object end_73477_733092 */
-+static void __lambda_1302(void *data, object self_7312038, int argc, object *args) /* object self_7312038, object end_73477_732752 */
-  {
+- {
 - object end_73477_733092 = args[0];
-+ object end_73477_732752 = args[0];
-   
+-  
 -closureN_type c_7317518;
 -object e_7317596 [7];
 -c_7317518.hdr.mark = gc_color_red;
@@ -52992,36 +53112,74 @@ Make let-values be the same as let*-values, to work around
 -c_7317518.elements[4] = ((closureN)self_7313284)->elements[3];
 -c_7317518.elements[5] = ((closureN)self_7313284)->elements[4];
 -c_7317518.elements[6] = ((closureN)self_7313284)->elements[5];
-+closureN_type c_7316225;
-+object e_7316303 [7];
-+c_7316225.hdr.mark = gc_color_red;
-+ c_7316225.hdr.grayed = 0;
-+c_7316225.tag = closureN_tag;
-+ c_7316225.fn = (function_type)__lambda_358;
-+c_7316225.num_args = 1;
-+c_7316225.num_elements = 7;
-+c_7316225.elements = (object *)e_7316303;
-+c_7316225.elements[0] = end_73477_732752;
-+c_7316225.elements[1] = ((closureN)self_7312038)->elements[0];
-+c_7316225.elements[2] = ((closureN)self_7312038)->elements[1];
-+c_7316225.elements[3] = ((closureN)self_7312038)->elements[2];
-+c_7316225.elements[4] = ((closureN)self_7312038)->elements[3];
-+c_7316225.elements[5] = ((closureN)self_7312038)->elements[4];
-+c_7316225.elements[6] = ((closureN)self_7312038)->elements[5];
- 
- 
++closureN_type c_7316208;
++object e_7316322 [3];
++c_7316208.hdr.mark = gc_color_red;
++ c_7316208.hdr.grayed = 0;
++c_7316208.tag = closureN_tag;
++ c_7316208.fn = (function_type)__lambda_357;
++c_7316208.num_args = 4;
++c_7316208.num_elements = 3;
++c_7316208.elements = (object *)e_7316322;
++c_7316208.elements[0] = k_734644;
++c_7316208.elements[1] = opts_73473_732741;
++c_7316208.elements[2] = vec_73472_732740;
++
++return_direct_with_clo4(data,(closure)&c_7316208,__lambda_357,  boolean_f, boolean_f, boolean_f, boolean_f);; 
++}
  
++static void __lambda_357(void *data, object self_7312027, int argc, object *args) /* object self_7312027, object len_73474_732742, object port_73475_732743, object start_73476_732744, object end_73477_732745 */
++ {
++ object len_73474_732742 = args[0]; object port_73475_732743 = args[1]; object start_73476_732744 = args[2]; object end_73477_732745 = args[3];
++  
++closureN_type c_7316210;
++object e_7316318 [6];
++c_7316210.hdr.mark = gc_color_red;
++ c_7316210.hdr.grayed = 0;
++c_7316210.tag = closureN_tag;
++ c_7316210.fn = (function_type)__lambda_1305;
++c_7316210.num_args = 1;
++c_7316210.num_elements = 6;
++c_7316210.elements = (object *)e_7316318;
++c_7316210.elements[0] = end_73477_732745;
++c_7316210.elements[1] = ((closureN)self_7312027)->elements[0];
++c_7316210.elements[2] = ((closureN)self_7312027)->elements[1];
++c_7316210.elements[3] = port_73475_732743;
++c_7316210.elements[4] = start_73476_732744;
++c_7316210.elements[5] = ((closureN)self_7312027)->elements[2];
+ 
+ 
++pair_type local_7316321; 
++return_direct_with_clo1(data,(closure)&c_7316210,__lambda_1305,  set_cell_as_expr(&local_7316321, len_73474_732742));; 
++}
  
++static void __lambda_1305(void *data, object self_7312028, int argc, object *args) /* object self_7312028, object len_73474_732742 */
++ {
++ object len_73474_732742 = args[0];
++  
++closureN_type c_7316212;
++object e_7316313 [6];
++c_7316212.hdr.mark = gc_color_red;
++ c_7316212.hdr.grayed = 0;
++c_7316212.tag = closureN_tag;
++ c_7316212.fn = (function_type)__lambda_1304;
++c_7316212.num_args = 1;
++c_7316212.num_elements = 6;
++c_7316212.elements = (object *)e_7316313;
++c_7316212.elements[0] = ((closureN)self_7312028)->elements[0];
++c_7316212.elements[1] = ((closureN)self_7312028)->elements[1];
++c_7316212.elements[2] = len_73474_732742;
++c_7316212.elements[3] = ((closureN)self_7312028)->elements[2];
++c_7316212.elements[4] = ((closureN)self_7312028)->elements[4];
++c_7316212.elements[5] = ((closureN)self_7312028)->elements[5];
  
 -return_direct_with_clo1(data,(closure)&c_7317518,__lambda_358,  Cyc_set_cell(data, ((closureN)self_7313284)->elements[1], Cyc_bytevector_length(data, ((closureN)self_7313284)->elements[5])));; 
-+return_direct_with_clo1(data,(closure)&c_7316225,__lambda_358,  Cyc_set_cell(data, ((closureN)self_7312038)->elements[1], Cyc_bytevector_length(data, ((closureN)self_7312038)->elements[5])));; 
- }
- 
+-}
+-
 -static void __lambda_358(void *data, object self_7313285, int argc, object *args) /* object self_7313285, object r_735097 */
-+static void __lambda_358(void *data, object self_7312039, int argc, object *args) /* object self_7312039, object r_734652 */
-  {
- 
-   
+- {
+-
+-  
 -closureN_type c_7317520;
 -object e_7317531 [1];
 -c_7317520.hdr.mark = gc_color_red;
@@ -53032,18 +53190,8 @@ Make let-values be the same as let*-values, to work around
 -c_7317520.num_elements = 1;
 -c_7317520.elements = (object *)e_7317531;
 -c_7317520.elements[0] = ((closureN)self_7313285)->elements[3];
-+closureN_type c_7316227;
-+object e_7316238 [1];
-+c_7316227.hdr.mark = gc_color_red;
-+ c_7316227.hdr.grayed = 0;
-+c_7316227.tag = closureN_tag;
-+ c_7316227.fn = (function_type)__lambda_359;
-+c_7316227.num_args = 0;
-+c_7316227.num_elements = 1;
-+c_7316227.elements = (object *)e_7316238;
-+c_7316227.elements[0] = ((closureN)self_7312039)->elements[3];
- 
- 
+-
+-
 -closureN_type c_7317532;
 -object e_7317595 [7];
 -c_7317532.hdr.mark = gc_color_red;
@@ -53060,32 +53208,131 @@ Make let-values be the same as let*-values, to work around
 -c_7317532.elements[4] = ((closureN)self_7313285)->elements[4];
 -c_7317532.elements[5] = ((closureN)self_7313285)->elements[5];
 -c_7317532.elements[6] = ((closureN)self_7313285)->elements[6];
-+closureN_type c_7316239;
-+object e_7316302 [7];
-+c_7316239.hdr.mark = gc_color_red;
-+ c_7316239.hdr.grayed = 0;
-+c_7316239.tag = closureN_tag;
-+ c_7316239.fn = (function_type)__lambda_360;
-+c_7316239.num_args = 1;
-+c_7316239.num_elements = 7;
-+c_7316239.elements = (object *)e_7316302;
-+c_7316239.elements[0] = ((closureN)self_7312039)->elements[0];
-+c_7316239.elements[1] = ((closureN)self_7312039)->elements[1];
-+c_7316239.elements[2] = ((closureN)self_7312039)->elements[2];
-+c_7316239.elements[3] = ((closureN)self_7312039)->elements[3];
-+c_7316239.elements[4] = ((closureN)self_7312039)->elements[4];
-+c_7316239.elements[5] = ((closureN)self_7312039)->elements[5];
-+c_7316239.elements[6] = ((closureN)self_7312039)->elements[6];
  
 -return_direct_with_clo1(data,(closure)&c_7317520,__lambda_359,  &c_7317532);; 
-+return_direct_with_clo1(data,(closure)&c_7316227,__lambda_359,  &c_7316239);; 
++pair_type local_7316316; 
++return_direct_with_clo1(data,(closure)&c_7316212,__lambda_1304,  set_cell_as_expr(&local_7316316, ((closureN)self_7312028)->elements[3]));; 
  }
  
 -static void __lambda_360(void *data, object self_7313286, int argc, object *args) /* object self_7313286, object r_735109 */
-+static void __lambda_360(void *data, object self_7312040, int argc, object *args) /* object self_7312040, object r_734664 */
++static void __lambda_1304(void *data, object self_7312029, int argc, object *args) /* object self_7312029, object port_73475_732743 */
   {
 - object r_735109 = args[0];
-+ object r_734664 = args[0];
++ object port_73475_732743 = args[0];
++  
++closureN_type c_7316214;
++object e_7316308 [6];
++c_7316214.hdr.mark = gc_color_red;
++ c_7316214.hdr.grayed = 0;
++c_7316214.tag = closureN_tag;
++ c_7316214.fn = (function_type)__lambda_1303;
++c_7316214.num_args = 1;
++c_7316214.num_elements = 6;
++c_7316214.elements = (object *)e_7316308;
++c_7316214.elements[0] = ((closureN)self_7312029)->elements[0];
++c_7316214.elements[1] = ((closureN)self_7312029)->elements[1];
++c_7316214.elements[2] = ((closureN)self_7312029)->elements[2];
++c_7316214.elements[3] = ((closureN)self_7312029)->elements[3];
++c_7316214.elements[4] = port_73475_732743;
++c_7316214.elements[5] = ((closureN)self_7312029)->elements[5];
++
++
++pair_type local_7316311; 
++return_direct_with_clo1(data,(closure)&c_7316214,__lambda_1303,  set_cell_as_expr(&local_7316311, ((closureN)self_7312029)->elements[4]));; 
++}
++
++static void __lambda_1303(void *data, object self_7312030, int argc, object *args) /* object self_7312030, object start_73476_732744 */
++ {
++ object start_73476_732744 = args[0];
++  
++closureN_type c_7316216;
++object e_7316303 [6];
++c_7316216.hdr.mark = gc_color_red;
++ c_7316216.hdr.grayed = 0;
++c_7316216.tag = closureN_tag;
++ c_7316216.fn = (function_type)__lambda_1302;
++c_7316216.num_args = 1;
++c_7316216.num_elements = 6;
++c_7316216.elements = (object *)e_7316303;
++c_7316216.elements[0] = ((closureN)self_7312030)->elements[1];
++c_7316216.elements[1] = ((closureN)self_7312030)->elements[2];
++c_7316216.elements[2] = ((closureN)self_7312030)->elements[3];
++c_7316216.elements[3] = ((closureN)self_7312030)->elements[4];
++c_7316216.elements[4] = start_73476_732744;
++c_7316216.elements[5] = ((closureN)self_7312030)->elements[5];
++
++
++pair_type local_7316306; 
++return_direct_with_clo1(data,(closure)&c_7316216,__lambda_1302,  set_cell_as_expr(&local_7316306, ((closureN)self_7312030)->elements[0]));; 
++}
++
++static void __lambda_1302(void *data, object self_7312031, int argc, object *args) /* object self_7312031, object end_73477_732745 */
++ {
++ object end_73477_732745 = args[0];
++  
++closureN_type c_7316218;
++object e_7316296 [7];
++c_7316218.hdr.mark = gc_color_red;
++ c_7316218.hdr.grayed = 0;
++c_7316218.tag = closureN_tag;
++ c_7316218.fn = (function_type)__lambda_358;
++c_7316218.num_args = 1;
++c_7316218.num_elements = 7;
++c_7316218.elements = (object *)e_7316296;
++c_7316218.elements[0] = end_73477_732745;
++c_7316218.elements[1] = ((closureN)self_7312031)->elements[0];
++c_7316218.elements[2] = ((closureN)self_7312031)->elements[1];
++c_7316218.elements[3] = ((closureN)self_7312031)->elements[2];
++c_7316218.elements[4] = ((closureN)self_7312031)->elements[3];
++c_7316218.elements[5] = ((closureN)self_7312031)->elements[4];
++c_7316218.elements[6] = ((closureN)self_7312031)->elements[5];
++
++
++
++
++
++return_direct_with_clo1(data,(closure)&c_7316218,__lambda_358,  Cyc_set_cell(data, ((closureN)self_7312031)->elements[1], Cyc_bytevector_length(data, ((closureN)self_7312031)->elements[5])));; 
++}
++
++static void __lambda_358(void *data, object self_7312032, int argc, object *args) /* object self_7312032, object r_734645 */
++ {
++
++  
++closureN_type c_7316220;
++object e_7316231 [1];
++c_7316220.hdr.mark = gc_color_red;
++ c_7316220.hdr.grayed = 0;
++c_7316220.tag = closureN_tag;
++ c_7316220.fn = (function_type)__lambda_359;
++c_7316220.num_args = 0;
++c_7316220.num_elements = 1;
++c_7316220.elements = (object *)e_7316231;
++c_7316220.elements[0] = ((closureN)self_7312032)->elements[3];
++
++
++closureN_type c_7316232;
++object e_7316295 [7];
++c_7316232.hdr.mark = gc_color_red;
++ c_7316232.hdr.grayed = 0;
++c_7316232.tag = closureN_tag;
++ c_7316232.fn = (function_type)__lambda_360;
++c_7316232.num_args = 1;
++c_7316232.num_elements = 7;
++c_7316232.elements = (object *)e_7316295;
++c_7316232.elements[0] = ((closureN)self_7312032)->elements[0];
++c_7316232.elements[1] = ((closureN)self_7312032)->elements[1];
++c_7316232.elements[2] = ((closureN)self_7312032)->elements[2];
++c_7316232.elements[3] = ((closureN)self_7312032)->elements[3];
++c_7316232.elements[4] = ((closureN)self_7312032)->elements[4];
++c_7316232.elements[5] = ((closureN)self_7312032)->elements[5];
++c_7316232.elements[6] = ((closureN)self_7312032)->elements[6];
++
++return_direct_with_clo1(data,(closure)&c_7316220,__lambda_359,  &c_7316232);; 
++}
++
++static void __lambda_360(void *data, object self_7312033, int argc, object *args) /* object self_7312033, object r_734657 */
++ {
++ object r_734657 = args[0];
    
 -closureN_type c_7317534;
 -object e_7317591 [7];
@@ -53103,45 +53350,45 @@ Make let-values be the same as let*-values, to work around
 -c_7317534.elements[4] = ((closureN)self_7313286)->elements[4];
 -c_7317534.elements[5] = ((closureN)self_7313286)->elements[5];
 -c_7317534.elements[6] = ((closureN)self_7313286)->elements[6];
-+closureN_type c_7316241;
-+object e_7316298 [7];
-+c_7316241.hdr.mark = gc_color_red;
-+ c_7316241.hdr.grayed = 0;
-+c_7316241.tag = closureN_tag;
-+ c_7316241.fn = (function_type)__lambda_361;
-+c_7316241.num_args = 1;
-+c_7316241.num_elements = 7;
-+c_7316241.elements = (object *)e_7316298;
-+c_7316241.elements[0] = ((closureN)self_7312040)->elements[0];
-+c_7316241.elements[1] = ((closureN)self_7312040)->elements[1];
-+c_7316241.elements[2] = ((closureN)self_7312040)->elements[2];
-+c_7316241.elements[3] = ((closureN)self_7312040)->elements[3];
-+c_7316241.elements[4] = ((closureN)self_7312040)->elements[4];
-+c_7316241.elements[5] = ((closureN)self_7312040)->elements[5];
-+c_7316241.elements[6] = ((closureN)self_7312040)->elements[6];
++closureN_type c_7316234;
++object e_7316291 [7];
++c_7316234.hdr.mark = gc_color_red;
++ c_7316234.hdr.grayed = 0;
++c_7316234.tag = closureN_tag;
++ c_7316234.fn = (function_type)__lambda_361;
++c_7316234.num_args = 1;
++c_7316234.num_elements = 7;
++c_7316234.elements = (object *)e_7316291;
++c_7316234.elements[0] = ((closureN)self_7312033)->elements[0];
++c_7316234.elements[1] = ((closureN)self_7312033)->elements[1];
++c_7316234.elements[2] = ((closureN)self_7312033)->elements[2];
++c_7316234.elements[3] = ((closureN)self_7312033)->elements[3];
++c_7316234.elements[4] = ((closureN)self_7312033)->elements[4];
++c_7316234.elements[5] = ((closureN)self_7312033)->elements[5];
++c_7316234.elements[6] = ((closureN)self_7312033)->elements[6];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7317534,__lambda_361,  Cyc_set_cell(data, ((closureN)self_7313286)->elements[4], r_735109));; 
-+return_direct_with_clo1(data,(closure)&c_7316241,__lambda_361,  Cyc_set_cell(data, ((closureN)self_7312040)->elements[4], r_734664));; 
++return_direct_with_clo1(data,(closure)&c_7316234,__lambda_361,  Cyc_set_cell(data, ((closureN)self_7312033)->elements[4], r_734657));; 
  }
  
 -static void __lambda_361(void *data, object self_7313287, int argc, object *args) /* object self_7313287, object r_735098 */
-+static void __lambda_361(void *data, object self_7312041, int argc, object *args) /* object self_7312041, object r_734653 */
++static void __lambda_361(void *data, object self_7312034, int argc, object *args) /* object self_7312034, object r_734646 */
   {
  
 -  object r_735105;
-+  object r_734660;
++  object r_734653;
      
    
 -if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313287)->elements[3]), obj_int2obj(1))) ){ 
-+if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312041)->elements[3]), obj_int2obj(1))) ){ 
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312034)->elements[3]), obj_int2obj(1))) ){ 
    
 -  r_735105 = Cyc_cadr(data, ((closureN)self_7313287)->elements[3]);
-+  r_734660 = Cyc_cadr(data, ((closureN)self_7312041)->elements[3]);
++  r_734653 = Cyc_cadr(data, ((closureN)self_7312034)->elements[3]);
  } else { 
 -  r_735105 = obj_int2obj(0);}
-+  r_734660 = obj_int2obj(0);}
++  r_734653 = obj_int2obj(0);}
  ;
 -closureN_type c_7317547;
 -object e_7317587 [7];
@@ -53159,31 +53406,31 @@ Make let-values be the same as let*-values, to work around
 -c_7317547.elements[4] = ((closureN)self_7313287)->elements[4];
 -c_7317547.elements[5] = ((closureN)self_7313287)->elements[5];
 -c_7317547.elements[6] = ((closureN)self_7313287)->elements[6];
-+closureN_type c_7316254;
-+object e_7316294 [7];
-+c_7316254.hdr.mark = gc_color_red;
-+ c_7316254.hdr.grayed = 0;
-+c_7316254.tag = closureN_tag;
-+ c_7316254.fn = (function_type)__lambda_362;
-+c_7316254.num_args = 1;
-+c_7316254.num_elements = 7;
-+c_7316254.elements = (object *)e_7316294;
-+c_7316254.elements[0] = ((closureN)self_7312041)->elements[0];
-+c_7316254.elements[1] = ((closureN)self_7312041)->elements[1];
-+c_7316254.elements[2] = ((closureN)self_7312041)->elements[2];
-+c_7316254.elements[3] = ((closureN)self_7312041)->elements[3];
-+c_7316254.elements[4] = ((closureN)self_7312041)->elements[4];
-+c_7316254.elements[5] = ((closureN)self_7312041)->elements[5];
-+c_7316254.elements[6] = ((closureN)self_7312041)->elements[6];
++closureN_type c_7316247;
++object e_7316287 [7];
++c_7316247.hdr.mark = gc_color_red;
++ c_7316247.hdr.grayed = 0;
++c_7316247.tag = closureN_tag;
++ c_7316247.fn = (function_type)__lambda_362;
++c_7316247.num_args = 1;
++c_7316247.num_elements = 7;
++c_7316247.elements = (object *)e_7316287;
++c_7316247.elements[0] = ((closureN)self_7312034)->elements[0];
++c_7316247.elements[1] = ((closureN)self_7312034)->elements[1];
++c_7316247.elements[2] = ((closureN)self_7312034)->elements[2];
++c_7316247.elements[3] = ((closureN)self_7312034)->elements[3];
++c_7316247.elements[4] = ((closureN)self_7312034)->elements[4];
++c_7316247.elements[5] = ((closureN)self_7312034)->elements[5];
++c_7316247.elements[6] = ((closureN)self_7312034)->elements[6];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7317547,__lambda_362,  Cyc_set_cell(data, ((closureN)self_7313287)->elements[5], r_735105));; 
-+return_direct_with_clo1(data,(closure)&c_7316254,__lambda_362,  Cyc_set_cell(data, ((closureN)self_7312041)->elements[5], r_734660));; 
++return_direct_with_clo1(data,(closure)&c_7316247,__lambda_362,  Cyc_set_cell(data, ((closureN)self_7312034)->elements[5], r_734653));; 
  }
  
 -static void __lambda_362(void *data, object self_7313288, int argc, object *args) /* object self_7313288, object r_735099 */
-+static void __lambda_362(void *data, object self_7312042, int argc, object *args) /* object self_7312042, object r_734654 */
++static void __lambda_362(void *data, object self_7312035, int argc, object *args) /* object self_7312035, object r_734647 */
   {
  
    
@@ -53198,17 +53445,17 @@ Make let-values be the same as let*-values, to work around
 -c_7317549.elements = (object *)e_7317563;
 -c_7317549.elements[0] = ((closureN)self_7313288)->elements[2];
 -c_7317549.elements[1] = ((closureN)self_7313288)->elements[3];
-+closureN_type c_7316256;
-+object e_7316270 [2];
-+c_7316256.hdr.mark = gc_color_red;
-+ c_7316256.hdr.grayed = 0;
-+c_7316256.tag = closureN_tag;
-+ c_7316256.fn = (function_type)__lambda_363;
-+c_7316256.num_args = 0;
-+c_7316256.num_elements = 2;
-+c_7316256.elements = (object *)e_7316270;
-+c_7316256.elements[0] = ((closureN)self_7312042)->elements[2];
-+c_7316256.elements[1] = ((closureN)self_7312042)->elements[3];
++closureN_type c_7316249;
++object e_7316263 [2];
++c_7316249.hdr.mark = gc_color_red;
++ c_7316249.hdr.grayed = 0;
++c_7316249.tag = closureN_tag;
++ c_7316249.fn = (function_type)__lambda_363;
++c_7316249.num_args = 0;
++c_7316249.num_elements = 2;
++c_7316249.elements = (object *)e_7316263;
++c_7316249.elements[0] = ((closureN)self_7312035)->elements[2];
++c_7316249.elements[1] = ((closureN)self_7312035)->elements[3];
  
  
 -closureN_type c_7317564;
@@ -53225,30 +53472,30 @@ Make let-values be the same as let*-values, to work around
 -c_7317564.elements[2] = ((closureN)self_7313288)->elements[4];
 -c_7317564.elements[3] = ((closureN)self_7313288)->elements[5];
 -c_7317564.elements[4] = ((closureN)self_7313288)->elements[6];
-+closureN_type c_7316271;
-+object e_7316293 [5];
-+c_7316271.hdr.mark = gc_color_red;
-+ c_7316271.hdr.grayed = 0;
-+c_7316271.tag = closureN_tag;
-+ c_7316271.fn = (function_type)__lambda_364;
-+c_7316271.num_args = 1;
-+c_7316271.num_elements = 5;
-+c_7316271.elements = (object *)e_7316293;
-+c_7316271.elements[0] = ((closureN)self_7312042)->elements[0];
-+c_7316271.elements[1] = ((closureN)self_7312042)->elements[1];
-+c_7316271.elements[2] = ((closureN)self_7312042)->elements[4];
-+c_7316271.elements[3] = ((closureN)self_7312042)->elements[5];
-+c_7316271.elements[4] = ((closureN)self_7312042)->elements[6];
++closureN_type c_7316264;
++object e_7316286 [5];
++c_7316264.hdr.mark = gc_color_red;
++ c_7316264.hdr.grayed = 0;
++c_7316264.tag = closureN_tag;
++ c_7316264.fn = (function_type)__lambda_364;
++c_7316264.num_args = 1;
++c_7316264.num_elements = 5;
++c_7316264.elements = (object *)e_7316286;
++c_7316264.elements[0] = ((closureN)self_7312035)->elements[0];
++c_7316264.elements[1] = ((closureN)self_7312035)->elements[1];
++c_7316264.elements[2] = ((closureN)self_7312035)->elements[4];
++c_7316264.elements[3] = ((closureN)self_7312035)->elements[5];
++c_7316264.elements[4] = ((closureN)self_7312035)->elements[6];
  
 -return_direct_with_clo1(data,(closure)&c_7317549,__lambda_363,  &c_7317564);; 
-+return_direct_with_clo1(data,(closure)&c_7316256,__lambda_363,  &c_7316271);; 
++return_direct_with_clo1(data,(closure)&c_7316249,__lambda_363,  &c_7316264);; 
  }
  
 -static void __lambda_364(void *data, object self_7313289, int argc, object *args) /* object self_7313289, object r_735101 */
-+static void __lambda_364(void *data, object self_7312043, int argc, object *args) /* object self_7312043, object r_734656 */
++static void __lambda_364(void *data, object self_7312036, int argc, object *args) /* object self_7312036, object r_734649 */
   {
 - object r_735101 = args[0];
-+ object r_734656 = args[0];
++ object r_734649 = args[0];
    
 -closureN_type c_7317566;
 -object e_7317582 [5];
@@ -53264,34 +53511,34 @@ Make let-values be the same as let*-values, to work around
 -c_7317566.elements[2] = ((closureN)self_7313289)->elements[2];
 -c_7317566.elements[3] = ((closureN)self_7313289)->elements[3];
 -c_7317566.elements[4] = ((closureN)self_7313289)->elements[4];
-+closureN_type c_7316273;
-+object e_7316289 [5];
-+c_7316273.hdr.mark = gc_color_red;
-+ c_7316273.hdr.grayed = 0;
-+c_7316273.tag = closureN_tag;
-+ c_7316273.fn = (function_type)__lambda_365;
-+c_7316273.num_args = 1;
-+c_7316273.num_elements = 5;
-+c_7316273.elements = (object *)e_7316289;
-+c_7316273.elements[0] = ((closureN)self_7312043)->elements[0];
-+c_7316273.elements[1] = ((closureN)self_7312043)->elements[1];
-+c_7316273.elements[2] = ((closureN)self_7312043)->elements[2];
-+c_7316273.elements[3] = ((closureN)self_7312043)->elements[3];
-+c_7316273.elements[4] = ((closureN)self_7312043)->elements[4];
++closureN_type c_7316266;
++object e_7316282 [5];
++c_7316266.hdr.mark = gc_color_red;
++ c_7316266.hdr.grayed = 0;
++c_7316266.tag = closureN_tag;
++ c_7316266.fn = (function_type)__lambda_365;
++c_7316266.num_args = 1;
++c_7316266.num_elements = 5;
++c_7316266.elements = (object *)e_7316282;
++c_7316266.elements[0] = ((closureN)self_7312036)->elements[0];
++c_7316266.elements[1] = ((closureN)self_7312036)->elements[1];
++c_7316266.elements[2] = ((closureN)self_7312036)->elements[2];
++c_7316266.elements[3] = ((closureN)self_7312036)->elements[3];
++c_7316266.elements[4] = ((closureN)self_7312036)->elements[4];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7317566,__lambda_365,  Cyc_set_cell(data, ((closureN)self_7313289)->elements[0], r_735101));; 
-+return_direct_with_clo1(data,(closure)&c_7316273,__lambda_365,  Cyc_set_cell(data, ((closureN)self_7312043)->elements[0], r_734656));; 
++return_direct_with_clo1(data,(closure)&c_7316266,__lambda_365,  Cyc_set_cell(data, ((closureN)self_7312036)->elements[0], r_734649));; 
  }
  
 -static void __lambda_365(void *data, object self_7313290, int argc, object *args) /* object self_7313290, object r_735100 */
-+static void __lambda_365(void *data, object self_7312044, int argc, object *args) /* object self_7312044, object r_734655 */
++static void __lambda_365(void *data, object self_7312037, int argc, object *args) /* object self_7312037, object r_734648 */
   {
  
    
 -complex_num_type local_7317571; 
-+complex_num_type local_7316278; 
++complex_num_type local_7316271; 
  
  
  
@@ -53300,56 +53547,59 @@ Make let-values be the same as let*-values, to work around
  
 -return_direct_with_clo1(data,  ((closureN)self_7313290)->elements[1], (((closure)  ((closureN)self_7313290)->elements[1])->fn),  ((inline_function_type)
 -                   ((closure)__glo__75write_91bytevector_191_191inline_191_191_scheme_base)->fn)(data,&local_7317571, ((closureN)self_7313290)->elements[4], car(((closureN)self_7313290)->elements[2]), car(((closureN)self_7313290)->elements[3]), car(((closureN)self_7313290)->elements[0])));; 
-+return_direct_with_clo1(data,  ((closureN)self_7312044)->elements[1], (((closure)  ((closureN)self_7312044)->elements[1])->fn),  ((inline_function_type)
-+                   ((closure)__glo__75write_91bytevector_191_191inline_191_191_scheme_base)->fn)(data,&local_7316278, ((closureN)self_7312044)->elements[4], car(((closureN)self_7312044)->elements[2]), car(((closureN)self_7312044)->elements[3]), car(((closureN)self_7312044)->elements[0])));; 
++return_direct_with_clo1(data,  ((closureN)self_7312037)->elements[1], (((closure)  ((closureN)self_7312037)->elements[1])->fn),  ((inline_function_type)
++                   ((closure)__glo__75write_91bytevector_191_191inline_191_191_scheme_base)->fn)(data,&local_7316271, ((closureN)self_7312037)->elements[4], car(((closureN)self_7312037)->elements[2]), car(((closureN)self_7312037)->elements[3]), car(((closureN)self_7312037)->elements[0])));; 
  }
  
 -static void __lambda_363(void *data, object self_7313291, int argc, object *args) /* object self_7313291, object k_735102 */
-+static void __lambda_363(void *data, object self_7312045, int argc, object *args) /* object self_7312045, object k_734657 */
++static void __lambda_363(void *data, object self_7312038, int argc, object *args) /* object self_7312038, object k_734650 */
   {
 - object k_735102 = args[0];
-+ object k_734657 = args[0];
++ object k_734650 = args[0];
      
    
 -if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313291)->elements[1]), obj_int2obj(2))) ){ 
-+if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312045)->elements[1]), obj_int2obj(2))) ){ 
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312038)->elements[1]), obj_int2obj(2))) ){ 
    
  
 -return_direct_with_clo1(data,  k_735102,__lambda_364,  Cyc_caddr(data, ((closureN)self_7313291)->elements[1]));
-+return_direct_with_clo1(data,  k_734657,__lambda_364,  Cyc_caddr(data, ((closureN)self_7312045)->elements[1]));
++return_direct_with_clo1(data,  k_734650,__lambda_364,  Cyc_caddr(data, ((closureN)self_7312038)->elements[1]));
  } else { 
    
  
 -return_direct_with_clo1(data,  k_735102,__lambda_364,  car(((closureN)self_7313291)->elements[0]));}
-+return_direct_with_clo1(data,  k_734657,__lambda_364,  car(((closureN)self_7312045)->elements[0]));}
++return_direct_with_clo1(data,  k_734650,__lambda_364,  car(((closureN)self_7312038)->elements[0]));}
  ;; 
  }
  
 -static void __lambda_359(void *data, object self_7313292, int argc, object *args) /* object self_7313292, object k_735110 */
-+static void __lambda_359(void *data, object self_7312046, int argc, object *args) /* object self_7312046, object k_734665 */
++static void __lambda_359(void *data, object self_7312039, int argc, object *args) /* object self_7312039, object k_734658 */
   {
 - object k_735110 = args[0];
-+ object k_734665 = args[0];
++ object k_734658 = args[0];
      
    
 -if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7313292)->elements[0]), obj_int2obj(0))) ){ 
-+if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312046)->elements[0]), obj_int2obj(0))) ){ 
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, ((closureN)self_7312039)->elements[0]), obj_int2obj(0))) ){ 
    
  
 -return_direct_with_clo1(data,  k_735110, (((closure)  k_735110)->fn),  Cyc_car(data, ((closureN)self_7313292)->elements[0]));
-+return_direct_with_clo1(data,  k_734665, (((closure)  k_734665)->fn),  Cyc_car(data, ((closureN)self_7312046)->elements[0]));
++return_direct_with_clo1(data,  k_734658, (((closure)  k_734658)->fn),  Cyc_car(data, ((closureN)self_7312039)->elements[0]));
  } else { 
 -  return_direct_with_clo1(data,  __glo_current_91output_91port_scheme_base, (((closure)  __glo_current_91output_91port_scheme_base)->fn),  k_735110);}
-+  return_direct_with_clo1(data,  __glo_current_91output_91port_scheme_base, (((closure)  __glo_current_91output_91port_scheme_base)->fn),  k_734665);}
++  return_direct_with_clo1(data,  __glo_current_91output_91port_scheme_base, (((closure)  __glo_current_91output_91port_scheme_base)->fn),  k_734658);}
  ;; 
  }
  
 -static void __lambda_339(void *data, object _, int argc, object *args) /* closure _,object k_735065, object vec_73444_733076, object o_73445_733077_raw, ... */
-- {
++static void __lambda_339(void *data, object _, int argc, object *args) /* closure _,object k_734613, object vec_73444_732729, object o_73445_732730_raw, ... */
+  {
 -object k_735065 = args[0]; object vec_73444_733076 = args[1];
 -load_varargs(o_73445_733077, args, 2, argc - 2);
--  Cyc_st_add(data, "scheme/base.sld:read-bytevector!");
--
++object k_734613 = args[0]; object vec_73444_732729 = args[1];
++load_varargs(o_73445_732730, args, 2, argc - 2);
+   Cyc_st_add(data, "scheme/base.sld:read-bytevector!");
+ 
 -closureN_type c_7317363;
 -object e_7317372 [1];
 -c_7317363.hdr.mark = gc_color_red;
@@ -53360,8 +53610,18 @@ Make let-values be the same as let*-values, to work around
 -c_7317363.num_elements = 1;
 -c_7317363.elements = (object *)e_7317372;
 -c_7317363.elements[0] = o_73445_733077;
--
--
++closureN_type c_7316063;
++object e_7316072 [1];
++c_7316063.hdr.mark = gc_color_red;
++ c_7316063.hdr.grayed = 0;
++c_7316063.tag = closureN_tag;
++ c_7316063.fn = (function_type)__lambda_340;
++c_7316063.num_args = 0;
++c_7316063.num_elements = 1;
++c_7316063.elements = (object *)e_7316072;
++c_7316063.elements[0] = o_73445_732730;
+ 
+ 
 -closureN_type c_7317373;
 -object e_7317505 [3];
 -c_7317373.hdr.mark = gc_color_red;
@@ -53374,21 +53634,40 @@ Make let-values be the same as let*-values, to work around
 -c_7317373.elements[0] = k_735065;
 -c_7317373.elements[1] = o_73445_733077;
 -c_7317373.elements[2] = vec_73444_733076;
--
++closureN_type c_7316073;
++object e_7316205 [3];
++c_7316073.hdr.mark = gc_color_red;
++ c_7316073.hdr.grayed = 0;
++c_7316073.tag = closureN_tag;
++ c_7316073.fn = (function_type)__lambda_341;
++c_7316073.num_args = 1;
++c_7316073.num_elements = 3;
++c_7316073.elements = (object *)e_7316205;
++c_7316073.elements[0] = k_734613;
++c_7316073.elements[1] = o_73445_732730;
++c_7316073.elements[2] = vec_73444_732729;
+ 
 -return_direct_with_clo1(data,(closure)&c_7317363,__lambda_340,  &c_7317373);; 
--}
--
++return_direct_with_clo1(data,(closure)&c_7316063,__lambda_340,  &c_7316073);; 
+ }
+ 
 -static void __lambda_341(void *data, object self_7313263, int argc, object *args) /* object self_7313263, object in_73448_733078 */
-- {
++static void __lambda_341(void *data, object self_7312010, int argc, object *args) /* object self_7312010, object in_73448_732731 */
+  {
 - object in_73448_733078 = args[0];
 -  object o_73451_733079;
--    
++ object in_73448_732731 = args[0];
++  object o_73451_732732;
+     
 -if( (boolean_f != Cyc_is_pair(((closureN)self_7313263)->elements[1])) ){ 
--  
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312010)->elements[1])) ){ 
+   
 -  o_73451_733079 = Cyc_cdr(data, ((closureN)self_7313263)->elements[1]);
--} else { 
++  o_73451_732732 = Cyc_cdr(data, ((closureN)self_7312010)->elements[1]);
+ } else { 
 -  o_73451_733079 = ((closureN)self_7313263)->elements[1];}
--;
++  o_73451_732732 = ((closureN)self_7312010)->elements[1];}
+ ;
 -closureN_type c_7317385;
 -object e_7317394 [1];
 -c_7317385.hdr.mark = gc_color_red;
@@ -53399,8 +53678,18 @@ Make let-values be the same as let*-values, to work around
 -c_7317385.num_elements = 1;
 -c_7317385.elements = (object *)e_7317394;
 -c_7317385.elements[0] = o_73451_733079;
--
--
++closureN_type c_7316085;
++object e_7316094 [1];
++c_7316085.hdr.mark = gc_color_red;
++ c_7316085.hdr.grayed = 0;
++c_7316085.tag = closureN_tag;
++ c_7316085.fn = (function_type)__lambda_342;
++c_7316085.num_args = 0;
++c_7316085.num_elements = 1;
++c_7316085.elements = (object *)e_7316094;
++c_7316085.elements[0] = o_73451_732732;
+ 
+ 
 -closureN_type c_7317395;
 -object e_7317504 [4];
 -c_7317395.hdr.mark = gc_color_red;
@@ -53414,15 +53703,30 @@ Make let-values be the same as let*-values, to work around
 -c_7317395.elements[1] = ((closureN)self_7313263)->elements[0];
 -c_7317395.elements[2] = o_73451_733079;
 -c_7317395.elements[3] = ((closureN)self_7313263)->elements[2];
--
++closureN_type c_7316095;
++object e_7316204 [4];
++c_7316095.hdr.mark = gc_color_red;
++ c_7316095.hdr.grayed = 0;
++c_7316095.tag = closureN_tag;
++ c_7316095.fn = (function_type)__lambda_343;
++c_7316095.num_args = 1;
++c_7316095.num_elements = 4;
++c_7316095.elements = (object *)e_7316204;
++c_7316095.elements[0] = in_73448_732731;
++c_7316095.elements[1] = ((closureN)self_7312010)->elements[0];
++c_7316095.elements[2] = o_73451_732732;
++c_7316095.elements[3] = ((closureN)self_7312010)->elements[2];
+ 
 -return_direct_with_clo1(data,(closure)&c_7317385,__lambda_342,  &c_7317395);; 
--}
--
++return_direct_with_clo1(data,(closure)&c_7316085,__lambda_342,  &c_7316095);; 
+ }
+ 
 -static void __lambda_343(void *data, object self_7313264, int argc, object *args) /* object self_7313264, object start_73454_733080 */
-+static void __lambda_339(void *data, object _, int argc, object *args) /* closure _,object k_734620, object vec_73444_732736, object o_73445_732737_raw, ... */
++static void __lambda_343(void *data, object self_7312011, int argc, object *args) /* object self_7312011, object start_73454_732733 */
   {
 - object start_73454_733080 = args[0];
--  
++ object start_73454_732733 = args[0];
+   
 -closureN_type c_7317397;
 -object e_7317423 [2];
 -c_7317397.hdr.mark = gc_color_red;
@@ -53434,20 +53738,18 @@ Make let-values be the same as let*-values, to work around
 -c_7317397.elements = (object *)e_7317423;
 -c_7317397.elements[0] = ((closureN)self_7313264)->elements[2];
 -c_7317397.elements[1] = ((closureN)self_7313264)->elements[3];
-+object k_734620 = args[0]; object vec_73444_732736 = args[1];
-+load_varargs(o_73445_732737, args, 2, argc - 2);
-+  Cyc_st_add(data, "base.sld:read-bytevector!");
- 
-+closureN_type c_7316070;
-+object e_7316079 [1];
-+c_7316070.hdr.mark = gc_color_red;
-+ c_7316070.hdr.grayed = 0;
-+c_7316070.tag = closureN_tag;
-+ c_7316070.fn = (function_type)__lambda_340;
-+c_7316070.num_args = 0;
-+c_7316070.num_elements = 1;
-+c_7316070.elements = (object *)e_7316079;
-+c_7316070.elements[0] = o_73445_732737;
++closureN_type c_7316097;
++object e_7316123 [2];
++c_7316097.hdr.mark = gc_color_red;
++ c_7316097.hdr.grayed = 0;
++c_7316097.tag = closureN_tag;
++ c_7316097.fn = (function_type)__lambda_344;
++c_7316097.num_args = 0;
++c_7316097.num_elements = 2;
++c_7316097.elements = (object *)e_7316123;
++c_7316097.elements[0] = ((closureN)self_7312011)->elements[2];
++c_7316097.elements[1] = ((closureN)self_7312011)->elements[3];
+ 
  
 -closureN_type c_7317424;
 -object e_7317503 [4];
@@ -53462,108 +53764,34 @@ Make let-values be the same as let*-values, to work around
 -c_7317424.elements[1] = ((closureN)self_7313264)->elements[1];
 -c_7317424.elements[2] = start_73454_733080;
 -c_7317424.elements[3] = ((closureN)self_7313264)->elements[3];
++closureN_type c_7316124;
++object e_7316203 [4];
++c_7316124.hdr.mark = gc_color_red;
++ c_7316124.hdr.grayed = 0;
++c_7316124.tag = closureN_tag;
++ c_7316124.fn = (function_type)__lambda_347;
++c_7316124.num_args = 1;
++c_7316124.num_elements = 4;
++c_7316124.elements = (object *)e_7316203;
++c_7316124.elements[0] = ((closureN)self_7312011)->elements[0];
++c_7316124.elements[1] = ((closureN)self_7312011)->elements[1];
++c_7316124.elements[2] = start_73454_732733;
++c_7316124.elements[3] = ((closureN)self_7312011)->elements[3];
  
 -return_direct_with_clo1(data,(closure)&c_7317397,__lambda_344,  &c_7317424);; 
-+closureN_type c_7316080;
-+object e_7316212 [3];
-+c_7316080.hdr.mark = gc_color_red;
-+ c_7316080.hdr.grayed = 0;
-+c_7316080.tag = closureN_tag;
-+ c_7316080.fn = (function_type)__lambda_341;
-+c_7316080.num_args = 1;
-+c_7316080.num_elements = 3;
-+c_7316080.elements = (object *)e_7316212;
-+c_7316080.elements[0] = k_734620;
-+c_7316080.elements[1] = o_73445_732737;
-+c_7316080.elements[2] = vec_73444_732736;
-+
-+return_direct_with_clo1(data,(closure)&c_7316070,__lambda_340,  &c_7316080);; 
-+}
-+
-+static void __lambda_341(void *data, object self_7312017, int argc, object *args) /* object self_7312017, object in_73448_732738 */
-+ {
-+ object in_73448_732738 = args[0];
-+  object o_73451_732739;
-+    
-+if( (boolean_f != Cyc_is_pair(((closureN)self_7312017)->elements[1])) ){ 
-+  
-+  o_73451_732739 = Cyc_cdr(data, ((closureN)self_7312017)->elements[1]);
-+} else { 
-+  o_73451_732739 = ((closureN)self_7312017)->elements[1];}
-+;
-+closureN_type c_7316092;
-+object e_7316101 [1];
-+c_7316092.hdr.mark = gc_color_red;
-+ c_7316092.hdr.grayed = 0;
-+c_7316092.tag = closureN_tag;
-+ c_7316092.fn = (function_type)__lambda_342;
-+c_7316092.num_args = 0;
-+c_7316092.num_elements = 1;
-+c_7316092.elements = (object *)e_7316101;
-+c_7316092.elements[0] = o_73451_732739;
-+
-+
-+closureN_type c_7316102;
-+object e_7316211 [4];
-+c_7316102.hdr.mark = gc_color_red;
-+ c_7316102.hdr.grayed = 0;
-+c_7316102.tag = closureN_tag;
-+ c_7316102.fn = (function_type)__lambda_343;
-+c_7316102.num_args = 1;
-+c_7316102.num_elements = 4;
-+c_7316102.elements = (object *)e_7316211;
-+c_7316102.elements[0] = in_73448_732738;
-+c_7316102.elements[1] = ((closureN)self_7312017)->elements[0];
-+c_7316102.elements[2] = o_73451_732739;
-+c_7316102.elements[3] = ((closureN)self_7312017)->elements[2];
-+
-+return_direct_with_clo1(data,(closure)&c_7316092,__lambda_342,  &c_7316102);; 
-+}
-+
-+static void __lambda_343(void *data, object self_7312018, int argc, object *args) /* object self_7312018, object start_73454_732740 */
-+ {
-+ object start_73454_732740 = args[0];
-+  
-+closureN_type c_7316104;
-+object e_7316130 [2];
-+c_7316104.hdr.mark = gc_color_red;
-+ c_7316104.hdr.grayed = 0;
-+c_7316104.tag = closureN_tag;
-+ c_7316104.fn = (function_type)__lambda_344;
-+c_7316104.num_args = 0;
-+c_7316104.num_elements = 2;
-+c_7316104.elements = (object *)e_7316130;
-+c_7316104.elements[0] = ((closureN)self_7312018)->elements[2];
-+c_7316104.elements[1] = ((closureN)self_7312018)->elements[3];
-+
-+
-+closureN_type c_7316131;
-+object e_7316210 [4];
-+c_7316131.hdr.mark = gc_color_red;
-+ c_7316131.hdr.grayed = 0;
-+c_7316131.tag = closureN_tag;
-+ c_7316131.fn = (function_type)__lambda_347;
-+c_7316131.num_args = 1;
-+c_7316131.num_elements = 4;
-+c_7316131.elements = (object *)e_7316210;
-+c_7316131.elements[0] = ((closureN)self_7312018)->elements[0];
-+c_7316131.elements[1] = ((closureN)self_7312018)->elements[1];
-+c_7316131.elements[2] = start_73454_732740;
-+c_7316131.elements[3] = ((closureN)self_7312018)->elements[3];
-+
-+return_direct_with_clo1(data,(closure)&c_7316104,__lambda_344,  &c_7316131);; 
++return_direct_with_clo1(data,(closure)&c_7316097,__lambda_344,  &c_7316124);; 
  }
  
 -static void __lambda_347(void *data, object self_7313265, int argc, object *args) /* object self_7313265, object end_73457_733081 */
-+static void __lambda_347(void *data, object self_7312019, int argc, object *args) /* object self_7312019, object end_73457_732741 */
++static void __lambda_347(void *data, object self_7312012, int argc, object *args) /* object self_7312012, object end_73457_732734 */
   {
 - object end_73457_733081 = args[0];
-+ object end_73457_732741 = args[0];
++ object end_73457_732734 = args[0];
      
 -if( (boolean_f != Cyc_num_fast_gte_op(data, ((closureN)self_7313265)->elements[2], end_73457_733081)) ){ 
 -  return_direct_with_clo1(data,  ((closureN)self_7313265)->elements[1], (((closure)  ((closureN)self_7313265)->elements[1])->fn),  obj_int2obj(0));
-+if( (boolean_f != Cyc_num_fast_gte_op(data, ((closureN)self_7312019)->elements[2], end_73457_732741)) ){ 
-+  return_direct_with_clo1(data,  ((closureN)self_7312019)->elements[1], (((closure)  ((closureN)self_7312019)->elements[1])->fn),  obj_int2obj(0));
++if( (boolean_f != Cyc_num_fast_gte_op(data, ((closureN)self_7312012)->elements[2], end_73457_732734)) ){ 
++  return_direct_with_clo1(data,  ((closureN)self_7312012)->elements[1], (((closure)  ((closureN)self_7312012)->elements[1])->fn),  obj_int2obj(0));
  } else { 
    
 -closureN_type c_7317431;
@@ -53578,37 +53806,37 @@ Make let-values be the same as let*-values, to work around
 -c_7317431.elements[0] = ((closureN)self_7313265)->elements[1];
 -c_7317431.elements[1] = ((closureN)self_7313265)->elements[2];
 -c_7317431.elements[2] = ((closureN)self_7313265)->elements[3];
-+closureN_type c_7316138;
-+object e_7316204 [3];
-+c_7316138.hdr.mark = gc_color_red;
-+ c_7316138.hdr.grayed = 0;
-+c_7316138.tag = closureN_tag;
-+ c_7316138.fn = (function_type)__lambda_348;
-+c_7316138.num_args = 1;
-+c_7316138.num_elements = 3;
-+c_7316138.elements = (object *)e_7316204;
-+c_7316138.elements[0] = ((closureN)self_7312019)->elements[1];
-+c_7316138.elements[1] = ((closureN)self_7312019)->elements[2];
-+c_7316138.elements[2] = ((closureN)self_7312019)->elements[3];
++closureN_type c_7316131;
++object e_7316197 [3];
++c_7316131.hdr.mark = gc_color_red;
++ c_7316131.hdr.grayed = 0;
++c_7316131.tag = closureN_tag;
++ c_7316131.fn = (function_type)__lambda_348;
++c_7316131.num_args = 1;
++c_7316131.num_elements = 3;
++c_7316131.elements = (object *)e_7316197;
++c_7316131.elements[0] = ((closureN)self_7312012)->elements[1];
++c_7316131.elements[1] = ((closureN)self_7312012)->elements[2];
++c_7316131.elements[2] = ((closureN)self_7312012)->elements[3];
  
  
 -complex_num_type local_7317500; 
 -return_direct_with_clo3(data,  __glo_read_91bytevector_scheme_base, (((closure)  __glo_read_91bytevector_scheme_base)->fn),  &c_7317431, Cyc_fast_sub(data,&local_7317500, end_73457_733081, ((closureN)self_7313265)->elements[2]), ((closureN)self_7313265)->elements[0]);}
-+complex_num_type local_7316207; 
-+return_direct_with_clo3(data,  __glo_read_91bytevector_scheme_base, (((closure)  __glo_read_91bytevector_scheme_base)->fn),  &c_7316138, Cyc_fast_sub(data,&local_7316207, end_73457_732741, ((closureN)self_7312019)->elements[2]), ((closureN)self_7312019)->elements[0]);}
++complex_num_type local_7316200; 
++return_direct_with_clo3(data,  __glo_read_91bytevector_scheme_base, (((closure)  __glo_read_91bytevector_scheme_base)->fn),  &c_7316131, Cyc_fast_sub(data,&local_7316200, end_73457_732734, ((closureN)self_7312012)->elements[2]), ((closureN)self_7312012)->elements[0]);}
  ;; 
  }
  
 -static void __lambda_348(void *data, object self_7313266, int argc, object *args) /* object self_7313266, object res_73459_733082 */
-+static void __lambda_348(void *data, object self_7312020, int argc, object *args) /* object self_7312020, object res_73459_732742 */
++static void __lambda_348(void *data, object self_7312013, int argc, object *args) /* object self_7312013, object res_73459_732735 */
   {
 - object res_73459_733082 = args[0];
-+ object res_73459_732742 = args[0];
++ object res_73459_732735 = args[0];
      
 -if( (boolean_f != Cyc_is_eof_object(res_73459_733082)) ){ 
 -  return_direct_with_clo1(data,  ((closureN)self_7313266)->elements[0], (((closure)  ((closureN)self_7313266)->elements[0])->fn),  res_73459_733082);
-+if( (boolean_f != Cyc_is_eof_object(res_73459_732742)) ){ 
-+  return_direct_with_clo1(data,  ((closureN)self_7312020)->elements[0], (((closure)  ((closureN)self_7312020)->elements[0])->fn),  res_73459_732742);
++if( (boolean_f != Cyc_is_eof_object(res_73459_732735)) ){ 
++  return_direct_with_clo1(data,  ((closureN)self_7312013)->elements[0], (((closure)  ((closureN)self_7312013)->elements[0])->fn),  res_73459_732735);
  } else { 
    
 -closureN_type c_7317437;
@@ -53624,32 +53852,32 @@ Make let-values be the same as let*-values, to work around
 -c_7317437.elements[1] = res_73459_733082;
 -c_7317437.elements[2] = ((closureN)self_7313266)->elements[1];
 -c_7317437.elements[3] = ((closureN)self_7313266)->elements[2];
-+closureN_type c_7316144;
-+object e_7316201 [4];
-+c_7316144.hdr.mark = gc_color_red;
-+ c_7316144.hdr.grayed = 0;
-+c_7316144.tag = closureN_tag;
-+ c_7316144.fn = (function_type)__lambda_349;
-+c_7316144.num_args = 1;
-+c_7316144.num_elements = 4;
-+c_7316144.elements = (object *)e_7316201;
-+c_7316144.elements[0] = ((closureN)self_7312020)->elements[0];
-+c_7316144.elements[1] = res_73459_732742;
-+c_7316144.elements[2] = ((closureN)self_7312020)->elements[1];
-+c_7316144.elements[3] = ((closureN)self_7312020)->elements[2];
++closureN_type c_7316137;
++object e_7316194 [4];
++c_7316137.hdr.mark = gc_color_red;
++ c_7316137.hdr.grayed = 0;
++c_7316137.tag = closureN_tag;
++ c_7316137.fn = (function_type)__lambda_349;
++c_7316137.num_args = 1;
++c_7316137.num_elements = 4;
++c_7316137.elements = (object *)e_7316194;
++c_7316137.elements[0] = ((closureN)self_7312013)->elements[0];
++c_7316137.elements[1] = res_73459_732735;
++c_7316137.elements[2] = ((closureN)self_7312013)->elements[1];
++c_7316137.elements[3] = ((closureN)self_7312013)->elements[2];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7317437,__lambda_349,  Cyc_bytevector_length(data, res_73459_733082));}
-+return_direct_with_clo1(data,(closure)&c_7316144,__lambda_349,  Cyc_bytevector_length(data, res_73459_732742));}
++return_direct_with_clo1(data,(closure)&c_7316137,__lambda_349,  Cyc_bytevector_length(data, res_73459_732735));}
  ;; 
  }
  
 -static void __lambda_349(void *data, object self_7313267, int argc, object *args) /* object self_7313267, object len_73464_733083 */
-+static void __lambda_349(void *data, object self_7312021, int argc, object *args) /* object self_7312021, object len_73464_732743 */
++static void __lambda_349(void *data, object self_7312014, int argc, object *args) /* object self_7312014, object len_73464_732736 */
   {
 - object len_73464_733083 = args[0];
-+ object len_73464_732743 = args[0];
++ object len_73464_732736 = args[0];
    
 -closureN_type c_7317439;
 -object e_7317493 [5];
@@ -53665,30 +53893,30 @@ Make let-values be the same as let*-values, to work around
 -c_7317439.elements[2] = ((closureN)self_7313267)->elements[1];
 -c_7317439.elements[3] = ((closureN)self_7313267)->elements[2];
 -c_7317439.elements[4] = ((closureN)self_7313267)->elements[3];
-+closureN_type c_7316146;
-+object e_7316200 [5];
-+c_7316146.hdr.mark = gc_color_red;
-+ c_7316146.hdr.grayed = 0;
-+c_7316146.tag = closureN_tag;
-+ c_7316146.fn = (function_type)__lambda_350;
-+c_7316146.num_args = 1;
-+c_7316146.num_elements = 5;
-+c_7316146.elements = (object *)e_7316200;
-+c_7316146.elements[0] = ((closureN)self_7312021)->elements[0];
-+c_7316146.elements[1] = len_73464_732743;
-+c_7316146.elements[2] = ((closureN)self_7312021)->elements[1];
-+c_7316146.elements[3] = ((closureN)self_7312021)->elements[2];
-+c_7316146.elements[4] = ((closureN)self_7312021)->elements[3];
++closureN_type c_7316139;
++object e_7316193 [5];
++c_7316139.hdr.mark = gc_color_red;
++ c_7316139.hdr.grayed = 0;
++c_7316139.tag = closureN_tag;
++ c_7316139.fn = (function_type)__lambda_350;
++c_7316139.num_args = 1;
++c_7316139.num_elements = 5;
++c_7316139.elements = (object *)e_7316193;
++c_7316139.elements[0] = ((closureN)self_7312014)->elements[0];
++c_7316139.elements[1] = len_73464_732736;
++c_7316139.elements[2] = ((closureN)self_7312014)->elements[1];
++c_7316139.elements[3] = ((closureN)self_7312014)->elements[2];
++c_7316139.elements[4] = ((closureN)self_7312014)->elements[3];
  
 -return_direct_with_clo1(data,(closure)&c_7317439,__lambda_350,  boolean_f);; 
-+return_direct_with_clo1(data,(closure)&c_7316146,__lambda_350,  boolean_f);; 
++return_direct_with_clo1(data,(closure)&c_7316139,__lambda_350,  boolean_f);; 
  }
  
 -static void __lambda_350(void *data, object self_7313268, int argc, object *args) /* object self_7313268, object lp_73465_73469_733085 */
-+static void __lambda_350(void *data, object self_7312022, int argc, object *args) /* object self_7312022, object lp_73465_73469_732745 */
++static void __lambda_350(void *data, object self_7312015, int argc, object *args) /* object self_7312015, object lp_73465_73469_732738 */
   {
 - object lp_73465_73469_733085 = args[0];
-+ object lp_73465_73469_732745 = args[0];
++ object lp_73465_73469_732738 = args[0];
    
 -closureN_type c_7317441;
 -object e_7317489 [5];
@@ -53704,33 +53932,33 @@ Make let-values be the same as let*-values, to work around
 -c_7317441.elements[2] = ((closureN)self_7313268)->elements[2];
 -c_7317441.elements[3] = ((closureN)self_7313268)->elements[3];
 -c_7317441.elements[4] = ((closureN)self_7313268)->elements[4];
-+closureN_type c_7316148;
-+object e_7316196 [5];
-+c_7316148.hdr.mark = gc_color_red;
-+ c_7316148.hdr.grayed = 0;
-+c_7316148.tag = closureN_tag;
-+ c_7316148.fn = (function_type)__lambda_1301;
-+c_7316148.num_args = 1;
-+c_7316148.num_elements = 5;
-+c_7316148.elements = (object *)e_7316196;
-+c_7316148.elements[0] = ((closureN)self_7312022)->elements[0];
-+c_7316148.elements[1] = ((closureN)self_7312022)->elements[1];
-+c_7316148.elements[2] = ((closureN)self_7312022)->elements[2];
-+c_7316148.elements[3] = ((closureN)self_7312022)->elements[3];
-+c_7316148.elements[4] = ((closureN)self_7312022)->elements[4];
++closureN_type c_7316141;
++object e_7316189 [5];
++c_7316141.hdr.mark = gc_color_red;
++ c_7316141.hdr.grayed = 0;
++c_7316141.tag = closureN_tag;
++ c_7316141.fn = (function_type)__lambda_1301;
++c_7316141.num_args = 1;
++c_7316141.num_elements = 5;
++c_7316141.elements = (object *)e_7316189;
++c_7316141.elements[0] = ((closureN)self_7312015)->elements[0];
++c_7316141.elements[1] = ((closureN)self_7312015)->elements[1];
++c_7316141.elements[2] = ((closureN)self_7312015)->elements[2];
++c_7316141.elements[3] = ((closureN)self_7312015)->elements[3];
++c_7316141.elements[4] = ((closureN)self_7312015)->elements[4];
  
  
 -pair_type local_7317492; 
 -return_direct_with_clo1(data,(closure)&c_7317441,__lambda_1348,  set_cell_as_expr(&local_7317492, lp_73465_73469_733085));; 
-+pair_type local_7316199; 
-+return_direct_with_clo1(data,(closure)&c_7316148,__lambda_1301,  set_cell_as_expr(&local_7316199, lp_73465_73469_732745));; 
++pair_type local_7316192; 
++return_direct_with_clo1(data,(closure)&c_7316141,__lambda_1301,  set_cell_as_expr(&local_7316192, lp_73465_73469_732738));; 
  }
  
 -static void __lambda_1348(void *data, object self_7313269, int argc, object *args) /* object self_7313269, object lp_73465_73469_733085 */
-+static void __lambda_1301(void *data, object self_7312023, int argc, object *args) /* object self_7312023, object lp_73465_73469_732745 */
++static void __lambda_1301(void *data, object self_7312016, int argc, object *args) /* object self_7312016, object lp_73465_73469_732738 */
   {
 - object lp_73465_73469_733085 = args[0];
-+ object lp_73465_73469_732745 = args[0];
++ object lp_73465_73469_732738 = args[0];
    
 -closureN_type c_7317443;
 -object e_7317455 [2];
@@ -53743,17 +53971,17 @@ Make let-values be the same as let*-values, to work around
 -c_7317443.elements = (object *)e_7317455;
 -c_7317443.elements[0] = ((closureN)self_7313269)->elements[0];
 -c_7317443.elements[1] = lp_73465_73469_733085;
-+closureN_type c_7316150;
-+object e_7316162 [2];
-+c_7316150.hdr.mark = gc_color_red;
-+ c_7316150.hdr.grayed = 0;
-+c_7316150.tag = closureN_tag;
-+ c_7316150.fn = (function_type)__lambda_351;
-+c_7316150.num_args = 1;
-+c_7316150.num_elements = 2;
-+c_7316150.elements = (object *)e_7316162;
-+c_7316150.elements[0] = ((closureN)self_7312023)->elements[0];
-+c_7316150.elements[1] = lp_73465_73469_732745;
++closureN_type c_7316143;
++object e_7316155 [2];
++c_7316143.hdr.mark = gc_color_red;
++ c_7316143.hdr.grayed = 0;
++c_7316143.tag = closureN_tag;
++ c_7316143.fn = (function_type)__lambda_351;
++c_7316143.num_args = 1;
++c_7316143.num_elements = 2;
++c_7316143.elements = (object *)e_7316155;
++c_7316143.elements[0] = ((closureN)self_7312016)->elements[0];
++c_7316143.elements[1] = lp_73465_73469_732738;
  
  
 -closureN_type c_7317456;
@@ -53770,35 +53998,35 @@ Make let-values be the same as let*-values, to work around
 -c_7317456.elements[2] = ((closureN)self_7313269)->elements[2];
 -c_7317456.elements[3] = ((closureN)self_7313269)->elements[3];
 -c_7317456.elements[4] = ((closureN)self_7313269)->elements[4];
-+closureN_type c_7316163;
-+object e_7316195 [5];
-+c_7316163.hdr.mark = gc_color_red;
-+ c_7316163.hdr.grayed = 0;
-+c_7316163.tag = closureN_tag;
-+ c_7316163.fn = (function_type)__lambda_353;
-+c_7316163.num_args = 1;
-+c_7316163.num_elements = 5;
-+c_7316163.elements = (object *)e_7316195;
-+c_7316163.elements[0] = ((closureN)self_7312023)->elements[1];
-+c_7316163.elements[1] = lp_73465_73469_732745;
-+c_7316163.elements[2] = ((closureN)self_7312023)->elements[2];
-+c_7316163.elements[3] = ((closureN)self_7312023)->elements[3];
-+c_7316163.elements[4] = ((closureN)self_7312023)->elements[4];
++closureN_type c_7316156;
++object e_7316188 [5];
++c_7316156.hdr.mark = gc_color_red;
++ c_7316156.hdr.grayed = 0;
++c_7316156.tag = closureN_tag;
++ c_7316156.fn = (function_type)__lambda_353;
++c_7316156.num_args = 1;
++c_7316156.num_elements = 5;
++c_7316156.elements = (object *)e_7316188;
++c_7316156.elements[0] = ((closureN)self_7312016)->elements[1];
++c_7316156.elements[1] = lp_73465_73469_732738;
++c_7316156.elements[2] = ((closureN)self_7312016)->elements[2];
++c_7316156.elements[3] = ((closureN)self_7312016)->elements[3];
++c_7316156.elements[4] = ((closureN)self_7312016)->elements[4];
  
 -return_direct_with_clo1(data,(closure)&c_7317443,__lambda_351,  &c_7317456);; 
-+return_direct_with_clo1(data,(closure)&c_7316150,__lambda_351,  &c_7316163);; 
++return_direct_with_clo1(data,(closure)&c_7316143,__lambda_351,  &c_7316156);; 
  }
  
 -static void __lambda_353(void *data, object self_7313270, int argc, object *args) /* object self_7313270, object k_735076, object i_73470_733086 */
-+static void __lambda_353(void *data, object self_7312024, int argc, object *args) /* object self_7312024, object k_734631, object i_73470_732746 */
++static void __lambda_353(void *data, object self_7312017, int argc, object *args) /* object self_7312017, object k_734624, object i_73470_732739 */
   {
 - object k_735076 = args[0]; object i_73470_733086 = args[1];
-+ object k_734631 = args[0]; object i_73470_732746 = args[1];
++ object k_734624 = args[0]; object i_73470_732739 = args[1];
      
 -if( (boolean_f != Cyc_num_fast_gte_op(data, i_73470_733086, ((closureN)self_7313270)->elements[0])) ){ 
 -  return_direct_with_clo1(data,  k_735076, (((closure)  k_735076)->fn),  ((closureN)self_7313270)->elements[0]);
-+if( (boolean_f != Cyc_num_fast_gte_op(data, i_73470_732746, ((closureN)self_7312024)->elements[0])) ){ 
-+  return_direct_with_clo1(data,  k_734631, (((closure)  k_734631)->fn),  ((closureN)self_7312024)->elements[0]);
++if( (boolean_f != Cyc_num_fast_gte_op(data, i_73470_732739, ((closureN)self_7312017)->elements[0])) ){ 
++  return_direct_with_clo1(data,  k_734624, (((closure)  k_734624)->fn),  ((closureN)self_7312017)->elements[0]);
  } else { 
    
 -closureN_type c_7317463;
@@ -53815,33 +54043,33 @@ Make let-values be the same as let*-values, to work around
 -c_7317463.elements[2] = ((closureN)self_7313270)->elements[1];
 -c_7317463.elements[3] = ((closureN)self_7313270)->elements[3];
 -c_7317463.elements[4] = ((closureN)self_7313270)->elements[4];
-+closureN_type c_7316170;
-+object e_7316191 [5];
-+c_7316170.hdr.mark = gc_color_red;
-+ c_7316170.hdr.grayed = 0;
-+c_7316170.tag = closureN_tag;
-+ c_7316170.fn = (function_type)__lambda_354;
-+c_7316170.num_args = 1;
-+c_7316170.num_elements = 5;
-+c_7316170.elements = (object *)e_7316191;
-+c_7316170.elements[0] = i_73470_732746;
-+c_7316170.elements[1] = k_734631;
-+c_7316170.elements[2] = ((closureN)self_7312024)->elements[1];
-+c_7316170.elements[3] = ((closureN)self_7312024)->elements[3];
-+c_7316170.elements[4] = ((closureN)self_7312024)->elements[4];
++closureN_type c_7316163;
++object e_7316184 [5];
++c_7316163.hdr.mark = gc_color_red;
++ c_7316163.hdr.grayed = 0;
++c_7316163.tag = closureN_tag;
++ c_7316163.fn = (function_type)__lambda_354;
++c_7316163.num_args = 1;
++c_7316163.num_elements = 5;
++c_7316163.elements = (object *)e_7316184;
++c_7316163.elements[0] = i_73470_732739;
++c_7316163.elements[1] = k_734624;
++c_7316163.elements[2] = ((closureN)self_7312017)->elements[1];
++c_7316163.elements[3] = ((closureN)self_7312017)->elements[3];
++c_7316163.elements[4] = ((closureN)self_7312017)->elements[4];
  
  
  
 -return_closcall1(data,(closure)&c_7317463,  Cyc_bytevector_u8_ref(data, ((closureN)self_7313270)->elements[2], i_73470_733086));}
-+return_closcall1(data,(closure)&c_7316170,  Cyc_bytevector_u8_ref(data, ((closureN)self_7312024)->elements[2], i_73470_732746));}
++return_closcall1(data,(closure)&c_7316163,  Cyc_bytevector_u8_ref(data, ((closureN)self_7312017)->elements[2], i_73470_732739));}
  ;; 
  }
  
 -static void __lambda_354(void *data, object self_7313271, int argc, object *args) /* object self_7313271, object r_735081 */
-+static void __lambda_354(void *data, object self_7312025, int argc, object *args) /* object self_7312025, object r_734636 */
++static void __lambda_354(void *data, object self_7312018, int argc, object *args) /* object self_7312018, object r_734629 */
   {
 - object r_735081 = args[0];
-+ object r_734636 = args[0];
++ object r_734629 = args[0];
    
 -closureN_type c_7317465;
 -object e_7317475 [3];
@@ -53855,30 +54083,30 @@ Make let-values be the same as let*-values, to work around
 -c_7317465.elements[0] = ((closureN)self_7313271)->elements[0];
 -c_7317465.elements[1] = ((closureN)self_7313271)->elements[1];
 -c_7317465.elements[2] = ((closureN)self_7313271)->elements[2];
-+closureN_type c_7316172;
-+object e_7316182 [3];
-+c_7316172.hdr.mark = gc_color_red;
-+ c_7316172.hdr.grayed = 0;
-+c_7316172.tag = closureN_tag;
-+ c_7316172.fn = (function_type)__lambda_355;
-+c_7316172.num_args = 1;
-+c_7316172.num_elements = 3;
-+c_7316172.elements = (object *)e_7316182;
-+c_7316172.elements[0] = ((closureN)self_7312025)->elements[0];
-+c_7316172.elements[1] = ((closureN)self_7312025)->elements[1];
-+c_7316172.elements[2] = ((closureN)self_7312025)->elements[2];
++closureN_type c_7316165;
++object e_7316175 [3];
++c_7316165.hdr.mark = gc_color_red;
++ c_7316165.hdr.grayed = 0;
++c_7316165.tag = closureN_tag;
++ c_7316165.fn = (function_type)__lambda_355;
++c_7316165.num_args = 1;
++c_7316165.num_elements = 3;
++c_7316165.elements = (object *)e_7316175;
++c_7316165.elements[0] = ((closureN)self_7312018)->elements[0];
++c_7316165.elements[1] = ((closureN)self_7312018)->elements[1];
++c_7316165.elements[2] = ((closureN)self_7312018)->elements[2];
  
  
  
  
 -complex_num_type local_7317481; 
 -return_closcall1(data,(closure)&c_7317465,  Cyc_bytevector_u8_set(data, ((closureN)self_7313271)->elements[4], Cyc_fast_sum(data,&local_7317481, ((closureN)self_7313271)->elements[0], ((closureN)self_7313271)->elements[3]), r_735081));; 
-+complex_num_type local_7316188; 
-+return_closcall1(data,(closure)&c_7316172,  Cyc_bytevector_u8_set(data, ((closureN)self_7312025)->elements[4], Cyc_fast_sum(data,&local_7316188, ((closureN)self_7312025)->elements[0], ((closureN)self_7312025)->elements[3]), r_734636));; 
++complex_num_type local_7316181; 
++return_closcall1(data,(closure)&c_7316165,  Cyc_bytevector_u8_set(data, ((closureN)self_7312018)->elements[4], Cyc_fast_sum(data,&local_7316181, ((closureN)self_7312018)->elements[0], ((closureN)self_7312018)->elements[3]), r_734629));; 
  }
  
 -static void __lambda_355(void *data, object self_7313272, int argc, object *args) /* object self_7313272, object r_735078 */
-+static void __lambda_355(void *data, object self_7312026, int argc, object *args) /* object self_7312026, object r_734633 */
++static void __lambda_355(void *data, object self_7312019, int argc, object *args) /* object self_7312019, object r_734626 */
   {
  
    
@@ -53886,15 +54114,15 @@ Make let-values be the same as let*-values, to work around
  
 -complex_num_type local_7317473; 
 -return_closcall2(data,  car(((closureN)self_7313272)->elements[2]),  ((closureN)self_7313272)->elements[1], Cyc_fast_sum(data,&local_7317473, ((closureN)self_7313272)->elements[0], obj_int2obj(1)));; 
-+complex_num_type local_7316180; 
-+return_closcall2(data,  car(((closureN)self_7312026)->elements[2]),  ((closureN)self_7312026)->elements[1], Cyc_fast_sum(data,&local_7316180, ((closureN)self_7312026)->elements[0], obj_int2obj(1)));; 
++complex_num_type local_7316173; 
++return_closcall2(data,  car(((closureN)self_7312019)->elements[2]),  ((closureN)self_7312019)->elements[1], Cyc_fast_sum(data,&local_7316173, ((closureN)self_7312019)->elements[0], obj_int2obj(1)));; 
  }
  
 -static void __lambda_351(void *data, object self_7313273, int argc, object *args) /* object self_7313273, object r_735075 */
-+static void __lambda_351(void *data, object self_7312027, int argc, object *args) /* object self_7312027, object r_734630 */
++static void __lambda_351(void *data, object self_7312020, int argc, object *args) /* object self_7312020, object r_734623 */
   {
 - object r_735075 = args[0];
-+ object r_734630 = args[0];
++ object r_734623 = args[0];
    
 -closureN_type c_7317445;
 -object e_7317451 [2];
@@ -53907,39 +54135,39 @@ Make let-values be the same as let*-values, to work around
 -c_7317445.elements = (object *)e_7317451;
 -c_7317445.elements[0] = ((closureN)self_7313273)->elements[0];
 -c_7317445.elements[1] = ((closureN)self_7313273)->elements[1];
-+closureN_type c_7316152;
-+object e_7316158 [2];
-+c_7316152.hdr.mark = gc_color_red;
-+ c_7316152.hdr.grayed = 0;
-+c_7316152.tag = closureN_tag;
-+ c_7316152.fn = (function_type)__lambda_352;
-+c_7316152.num_args = 1;
-+c_7316152.num_elements = 2;
-+c_7316152.elements = (object *)e_7316158;
-+c_7316152.elements[0] = ((closureN)self_7312027)->elements[0];
-+c_7316152.elements[1] = ((closureN)self_7312027)->elements[1];
++closureN_type c_7316145;
++object e_7316151 [2];
++c_7316145.hdr.mark = gc_color_red;
++ c_7316145.hdr.grayed = 0;
++c_7316145.tag = closureN_tag;
++ c_7316145.fn = (function_type)__lambda_352;
++c_7316145.num_args = 1;
++c_7316145.num_elements = 2;
++c_7316145.elements = (object *)e_7316151;
++c_7316145.elements[0] = ((closureN)self_7312020)->elements[0];
++c_7316145.elements[1] = ((closureN)self_7312020)->elements[1];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7317445,__lambda_352,  Cyc_set_cell(data, ((closureN)self_7313273)->elements[1], r_735075));; 
-+return_direct_with_clo1(data,(closure)&c_7316152,__lambda_352,  Cyc_set_cell(data, ((closureN)self_7312027)->elements[1], r_734630));; 
++return_direct_with_clo1(data,(closure)&c_7316145,__lambda_352,  Cyc_set_cell(data, ((closureN)self_7312020)->elements[1], r_734623));; 
  }
  
 -static void __lambda_352(void *data, object self_7313274, int argc, object *args) /* object self_7313274, object r_735074 */
-+static void __lambda_352(void *data, object self_7312028, int argc, object *args) /* object self_7312028, object r_734629 */
++static void __lambda_352(void *data, object self_7312021, int argc, object *args) /* object self_7312021, object r_734622 */
   {
  
    
  
 -return_closcall2(data,  car(((closureN)self_7313274)->elements[1]),  ((closureN)self_7313274)->elements[0], obj_int2obj(0));; 
-+return_closcall2(data,  car(((closureN)self_7312028)->elements[1]),  ((closureN)self_7312028)->elements[0], obj_int2obj(0));; 
++return_closcall2(data,  car(((closureN)self_7312021)->elements[1]),  ((closureN)self_7312021)->elements[0], obj_int2obj(0));; 
  }
  
 -static void __lambda_344(void *data, object self_7313275, int argc, object *args) /* object self_7313275, object k_735083 */
-+static void __lambda_344(void *data, object self_7312029, int argc, object *args) /* object self_7312029, object k_734638 */
++static void __lambda_344(void *data, object self_7312022, int argc, object *args) /* object self_7312022, object k_734631 */
   {
 - object k_735083 = args[0];
-+ object k_734638 = args[0];
++ object k_734631 = args[0];
    
 -closureN_type c_7317399;
 -object e_7317410 [1];
@@ -53951,16 +54179,16 @@ Make let-values be the same as let*-values, to work around
 -c_7317399.num_elements = 1;
 -c_7317399.elements = (object *)e_7317410;
 -c_7317399.elements[0] = ((closureN)self_7313275)->elements[0];
-+closureN_type c_7316106;
-+object e_7316117 [1];
-+c_7316106.hdr.mark = gc_color_red;
-+ c_7316106.hdr.grayed = 0;
-+c_7316106.tag = closureN_tag;
-+ c_7316106.fn = (function_type)__lambda_345;
-+c_7316106.num_args = 0;
-+c_7316106.num_elements = 1;
-+c_7316106.elements = (object *)e_7316117;
-+c_7316106.elements[0] = ((closureN)self_7312029)->elements[0];
++closureN_type c_7316099;
++object e_7316110 [1];
++c_7316099.hdr.mark = gc_color_red;
++ c_7316099.hdr.grayed = 0;
++c_7316099.tag = closureN_tag;
++ c_7316099.fn = (function_type)__lambda_345;
++c_7316099.num_args = 0;
++c_7316099.num_elements = 1;
++c_7316099.elements = (object *)e_7316110;
++c_7316099.elements[0] = ((closureN)self_7312022)->elements[0];
  
  
 -closureN_type c_7317411;
@@ -53975,107 +54203,106 @@ Make let-values be the same as let*-values, to work around
 -c_7317411.elements[0] = k_735083;
 -c_7317411.elements[1] = ((closureN)self_7313275)->elements[0];
 -c_7317411.elements[2] = ((closureN)self_7313275)->elements[1];
-+closureN_type c_7316118;
-+object e_7316129 [3];
-+c_7316118.hdr.mark = gc_color_red;
-+ c_7316118.hdr.grayed = 0;
-+c_7316118.tag = closureN_tag;
-+ c_7316118.fn = (function_type)__lambda_346;
-+c_7316118.num_args = 1;
-+c_7316118.num_elements = 3;
-+c_7316118.elements = (object *)e_7316129;
-+c_7316118.elements[0] = k_734638;
-+c_7316118.elements[1] = ((closureN)self_7312029)->elements[0];
-+c_7316118.elements[2] = ((closureN)self_7312029)->elements[1];
++closureN_type c_7316111;
++object e_7316122 [3];
++c_7316111.hdr.mark = gc_color_red;
++ c_7316111.hdr.grayed = 0;
++c_7316111.tag = closureN_tag;
++ c_7316111.fn = (function_type)__lambda_346;
++c_7316111.num_args = 1;
++c_7316111.num_elements = 3;
++c_7316111.elements = (object *)e_7316122;
++c_7316111.elements[0] = k_734631;
++c_7316111.elements[1] = ((closureN)self_7312022)->elements[0];
++c_7316111.elements[2] = ((closureN)self_7312022)->elements[1];
  
 -return_direct_with_clo1(data,(closure)&c_7317399,__lambda_345,  &c_7317411);; 
-+return_direct_with_clo1(data,(closure)&c_7316106,__lambda_345,  &c_7316118);; 
++return_direct_with_clo1(data,(closure)&c_7316099,__lambda_345,  &c_7316111);; 
  }
  
 -static void __lambda_346(void *data, object self_7313276, int argc, object *args) /* object self_7313276, object r_735084 */
-+static void __lambda_346(void *data, object self_7312030, int argc, object *args) /* object self_7312030, object r_734639 */
++static void __lambda_346(void *data, object self_7312023, int argc, object *args) /* object self_7312023, object r_734632 */
   {
 - object r_735084 = args[0];
 -  if( (boolean_f != r_735084) ){ 
-+ object r_734639 = args[0];
-+  if( (boolean_f != r_734639) ){ 
++ object r_734632 = args[0];
++  if( (boolean_f != r_734632) ){ 
    
  
 -return_direct_with_clo1(data,  ((closureN)self_7313276)->elements[0], (((closure)  ((closureN)self_7313276)->elements[0])->fn),  Cyc_cadr(data, ((closureN)self_7313276)->elements[1]));
-+return_direct_with_clo1(data,  ((closureN)self_7312030)->elements[0], (((closure)  ((closureN)self_7312030)->elements[0])->fn),  Cyc_cadr(data, ((closureN)self_7312030)->elements[1]));
++return_direct_with_clo1(data,  ((closureN)self_7312023)->elements[0], (((closure)  ((closureN)self_7312023)->elements[0])->fn),  Cyc_cadr(data, ((closureN)self_7312023)->elements[1]));
  } else { 
    
  
 -return_direct_with_clo1(data,  ((closureN)self_7313276)->elements[0], (((closure)  ((closureN)self_7313276)->elements[0])->fn),  Cyc_bytevector_length(data, ((closureN)self_7313276)->elements[2]));}
-+return_direct_with_clo1(data,  ((closureN)self_7312030)->elements[0], (((closure)  ((closureN)self_7312030)->elements[0])->fn),  Cyc_bytevector_length(data, ((closureN)self_7312030)->elements[2]));}
++return_direct_with_clo1(data,  ((closureN)self_7312023)->elements[0], (((closure)  ((closureN)self_7312023)->elements[0])->fn),  Cyc_bytevector_length(data, ((closureN)self_7312023)->elements[2]));}
  ;; 
  }
  
 -static void __lambda_345(void *data, object self_7313277, int argc, object *args) /* object self_7313277, object k_735085 */
-+static void __lambda_345(void *data, object self_7312031, int argc, object *args) /* object self_7312031, object k_734640 */
++static void __lambda_345(void *data, object self_7312024, int argc, object *args) /* object self_7312024, object k_734633 */
   {
 - object k_735085 = args[0];
-+ object k_734640 = args[0];
++ object k_734633 = args[0];
      
 -if( (boolean_f != Cyc_is_pair(((closureN)self_7313277)->elements[0])) ){ 
-+if( (boolean_f != Cyc_is_pair(((closureN)self_7312031)->elements[0])) ){ 
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312024)->elements[0])) ){ 
    
  
  
  
 -return_direct_with_clo1(data,  k_735085,__lambda_346,  Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7313277)->elements[0])));
-+return_direct_with_clo1(data,  k_734640,__lambda_346,  Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312031)->elements[0])));
++return_direct_with_clo1(data,  k_734633,__lambda_346,  Cyc_is_pair(Cyc_cdr(data, ((closureN)self_7312024)->elements[0])));
  } else { 
 -  return_direct_with_clo1(data,  k_735085,__lambda_346,  boolean_f);}
-+  return_direct_with_clo1(data,  k_734640,__lambda_346,  boolean_f);}
++  return_direct_with_clo1(data,  k_734633,__lambda_346,  boolean_f);}
  ;; 
  }
  
 -static void __lambda_342(void *data, object self_7313278, int argc, object *args) /* object self_7313278, object k_735088 */
-+static void __lambda_342(void *data, object self_7312032, int argc, object *args) /* object self_7312032, object k_734643 */
++static void __lambda_342(void *data, object self_7312025, int argc, object *args) /* object self_7312025, object k_734636 */
   {
 - object k_735088 = args[0];
-+ object k_734643 = args[0];
++ object k_734636 = args[0];
      
 -if( (boolean_f != Cyc_is_pair(((closureN)self_7313278)->elements[0])) ){ 
-+if( (boolean_f != Cyc_is_pair(((closureN)self_7312032)->elements[0])) ){ 
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312025)->elements[0])) ){ 
    
  
 -return_direct_with_clo1(data,  k_735088,__lambda_343,  Cyc_car(data, ((closureN)self_7313278)->elements[0]));
-+return_direct_with_clo1(data,  k_734643,__lambda_343,  Cyc_car(data, ((closureN)self_7312032)->elements[0]));
++return_direct_with_clo1(data,  k_734636,__lambda_343,  Cyc_car(data, ((closureN)self_7312025)->elements[0]));
  } else { 
 -  return_direct_with_clo1(data,  k_735088,__lambda_343,  obj_int2obj(0));}
-+  return_direct_with_clo1(data,  k_734643,__lambda_343,  obj_int2obj(0));}
++  return_direct_with_clo1(data,  k_734636,__lambda_343,  obj_int2obj(0));}
  ;; 
  }
  
 -static void __lambda_340(void *data, object self_7313279, int argc, object *args) /* object self_7313279, object k_735092 */
-+static void __lambda_340(void *data, object self_7312033, int argc, object *args) /* object self_7312033, object k_734647 */
++static void __lambda_340(void *data, object self_7312026, int argc, object *args) /* object self_7312026, object k_734640 */
   {
 - object k_735092 = args[0];
-+ object k_734647 = args[0];
++ object k_734640 = args[0];
      
 -if( (boolean_f != Cyc_is_pair(((closureN)self_7313279)->elements[0])) ){ 
-+if( (boolean_f != Cyc_is_pair(((closureN)self_7312033)->elements[0])) ){ 
++if( (boolean_f != Cyc_is_pair(((closureN)self_7312026)->elements[0])) ){ 
    
  
 -return_direct_with_clo1(data,  k_735092, (((closure)  k_735092)->fn),  Cyc_car(data, ((closureN)self_7313279)->elements[0]));
-+return_direct_with_clo1(data,  k_734647, (((closure)  k_734647)->fn),  Cyc_car(data, ((closureN)self_7312033)->elements[0]));
++return_direct_with_clo1(data,  k_734640, (((closure)  k_734640)->fn),  Cyc_car(data, ((closureN)self_7312026)->elements[0]));
  } else { 
 -  return_direct_with_clo1(data,  __glo_current_91input_91port_scheme_base, (((closure)  __glo_current_91input_91port_scheme_base)->fn),  k_735092);}
-+  return_direct_with_clo1(data,  __glo_current_91input_91port_scheme_base, (((closure)  __glo_current_91input_91port_scheme_base)->fn),  k_734647);}
++  return_direct_with_clo1(data,  __glo_current_91input_91port_scheme_base, (((closure)  __glo_current_91input_91port_scheme_base)->fn),  k_734640);}
  ;; 
  }
  
 -static void __lambda_327(void *data, object _, int argc, object *args) /* closure _,object k_735047, object k_73433_733069, object _191port_73434_733070_raw, ... */
-+static void __lambda_327(void *data, object _, int argc, object *args) /* closure _,object k_734602, object k_73433_732729, object _191port_73434_732730_raw, ... */
++static void __lambda_327(void *data, object _, int argc, object *args) /* closure _,object k_734595, object k_73433_732722, object _191port_73434_732723_raw, ... */
   {
 -object k_735047 = args[0]; object k_73433_733069 = args[1];
 -load_varargs(_191port_73434_733070, args, 2, argc - 2);
--  Cyc_st_add(data, "scheme/base.sld:read-bytevector");
-+object k_734602 = args[0]; object k_73433_732729 = args[1];
-+load_varargs(_191port_73434_732730, args, 2, argc - 2);
-+  Cyc_st_add(data, "base.sld:read-bytevector");
++object k_734595 = args[0]; object k_73433_732722 = args[1];
++load_varargs(_191port_73434_732723, args, 2, argc - 2);
+   Cyc_st_add(data, "scheme/base.sld:read-bytevector");
  
 -closureN_type c_7317245;
 -object e_7317360 [3];
@@ -54089,29 +54316,14 @@ Make let-values be the same as let*-values, to work around
 -c_7317245.elements[0] = _191port_73434_733070;
 -c_7317245.elements[1] = k_73433_733069;
 -c_7317245.elements[2] = k_735047;
-+closureN_type c_7315952;
-+object e_7316067 [3];
-+c_7315952.hdr.mark = gc_color_red;
-+ c_7315952.hdr.grayed = 0;
-+c_7315952.tag = closureN_tag;
-+ c_7315952.fn = (function_type)__lambda_328;
-+c_7315952.num_args = 3;
-+c_7315952.num_elements = 3;
-+c_7315952.elements = (object *)e_7316067;
-+c_7315952.elements[0] = _191port_73434_732730;
-+c_7315952.elements[1] = k_73433_732729;
-+c_7315952.elements[2] = k_734602;
- 
+-
 -return_direct_with_clo3(data,(closure)&c_7317245,__lambda_328,  boolean_f, boolean_f, boolean_f);; 
-+return_direct_with_clo3(data,(closure)&c_7315952,__lambda_328,  boolean_f, boolean_f, boolean_f);; 
- }
- 
+-}
+-
 -static void __lambda_328(void *data, object self_7313249, int argc, object *args) /* object self_7313249, object port_73435_733071, object bv_73436_733072, object loop_73437_733073 */
-+static void __lambda_328(void *data, object self_7312003, int argc, object *args) /* object self_7312003, object port_73435_732731, object bv_73436_732732, object loop_73437_732733 */
-  {
+- {
 - object port_73435_733071 = args[0]; object bv_73436_733072 = args[1]; object loop_73437_733073 = args[2];
-+ object port_73435_732731 = args[0]; object bv_73436_732732 = args[1]; object loop_73437_732733 = args[2];
-   
+-  
 -closureN_type c_7317247;
 -object e_7317356 [5];
 -c_7317247.hdr.mark = gc_color_red;
@@ -54126,33 +54338,53 @@ Make let-values be the same as let*-values, to work around
 -c_7317247.elements[2] = ((closureN)self_7313249)->elements[1];
 -c_7317247.elements[3] = ((closureN)self_7313249)->elements[2];
 -c_7317247.elements[4] = loop_73437_733073;
-+closureN_type c_7315954;
-+object e_7316063 [5];
-+c_7315954.hdr.mark = gc_color_red;
-+ c_7315954.hdr.grayed = 0;
-+c_7315954.tag = closureN_tag;
-+ c_7315954.fn = (function_type)__lambda_1300;
-+c_7315954.num_args = 1;
-+c_7315954.num_elements = 5;
-+c_7315954.elements = (object *)e_7316063;
-+c_7315954.elements[0] = ((closureN)self_7312003)->elements[0];
-+c_7315954.elements[1] = bv_73436_732732;
-+c_7315954.elements[2] = ((closureN)self_7312003)->elements[1];
-+c_7315954.elements[3] = ((closureN)self_7312003)->elements[2];
-+c_7315954.elements[4] = loop_73437_732733;
++closureN_type c_7315945;
++object e_7316060 [3];
++c_7315945.hdr.mark = gc_color_red;
++ c_7315945.hdr.grayed = 0;
++c_7315945.tag = closureN_tag;
++ c_7315945.fn = (function_type)__lambda_328;
++c_7315945.num_args = 3;
++c_7315945.num_elements = 3;
++c_7315945.elements = (object *)e_7316060;
++c_7315945.elements[0] = _191port_73434_732723;
++c_7315945.elements[1] = k_73433_732722;
++c_7315945.elements[2] = k_734595;
++
++return_direct_with_clo3(data,(closure)&c_7315945,__lambda_328,  boolean_f, boolean_f, boolean_f);; 
++}
++
++static void __lambda_328(void *data, object self_7311996, int argc, object *args) /* object self_7311996, object port_73435_732724, object bv_73436_732725, object loop_73437_732726 */
++ {
++ object port_73435_732724 = args[0]; object bv_73436_732725 = args[1]; object loop_73437_732726 = args[2];
++  
++closureN_type c_7315947;
++object e_7316056 [5];
++c_7315947.hdr.mark = gc_color_red;
++ c_7315947.hdr.grayed = 0;
++c_7315947.tag = closureN_tag;
++ c_7315947.fn = (function_type)__lambda_1300;
++c_7315947.num_args = 1;
++c_7315947.num_elements = 5;
++c_7315947.elements = (object *)e_7316056;
++c_7315947.elements[0] = ((closureN)self_7311996)->elements[0];
++c_7315947.elements[1] = bv_73436_732725;
++c_7315947.elements[2] = ((closureN)self_7311996)->elements[1];
++c_7315947.elements[3] = ((closureN)self_7311996)->elements[2];
++c_7315947.elements[4] = loop_73437_732726;
  
  
 -pair_type local_7317359; 
 -return_direct_with_clo1(data,(closure)&c_7317247,__lambda_1347,  set_cell_as_expr(&local_7317359, port_73435_733071));; 
-+pair_type local_7316066; 
-+return_direct_with_clo1(data,(closure)&c_7315954,__lambda_1300,  set_cell_as_expr(&local_7316066, port_73435_732731));; 
++pair_type local_7316059; 
++return_direct_with_clo1(data,(closure)&c_7315947,__lambda_1300,  set_cell_as_expr(&local_7316059, port_73435_732724));; 
  }
  
 -static void __lambda_1347(void *data, object self_7313250, int argc, object *args) /* object self_7313250, object port_73435_733071 */
-+static void __lambda_1300(void *data, object self_7312004, int argc, object *args) /* object self_7312004, object port_73435_732731 */
++static void __lambda_1300(void *data, object self_7311997, int argc, object *args) /* object self_7311997, object port_73435_732724 */
   {
 - object port_73435_733071 = args[0];
-+ object port_73435_732731 = args[0];
++ object port_73435_732724 = args[0];
    
 -closureN_type c_7317249;
 -object e_7317351 [5];
@@ -54168,33 +54400,33 @@ Make let-values be the same as let*-values, to work around
 -c_7317249.elements[2] = ((closureN)self_7313250)->elements[3];
 -c_7317249.elements[3] = ((closureN)self_7313250)->elements[4];
 -c_7317249.elements[4] = port_73435_733071;
-+closureN_type c_7315956;
-+object e_7316058 [5];
-+c_7315956.hdr.mark = gc_color_red;
-+ c_7315956.hdr.grayed = 0;
-+c_7315956.tag = closureN_tag;
-+ c_7315956.fn = (function_type)__lambda_1299;
-+c_7315956.num_args = 1;
-+c_7315956.num_elements = 5;
-+c_7315956.elements = (object *)e_7316058;
-+c_7315956.elements[0] = ((closureN)self_7312004)->elements[0];
-+c_7315956.elements[1] = ((closureN)self_7312004)->elements[2];
-+c_7315956.elements[2] = ((closureN)self_7312004)->elements[3];
-+c_7315956.elements[3] = ((closureN)self_7312004)->elements[4];
-+c_7315956.elements[4] = port_73435_732731;
++closureN_type c_7315949;
++object e_7316051 [5];
++c_7315949.hdr.mark = gc_color_red;
++ c_7315949.hdr.grayed = 0;
++c_7315949.tag = closureN_tag;
++ c_7315949.fn = (function_type)__lambda_1299;
++c_7315949.num_args = 1;
++c_7315949.num_elements = 5;
++c_7315949.elements = (object *)e_7316051;
++c_7315949.elements[0] = ((closureN)self_7311997)->elements[0];
++c_7315949.elements[1] = ((closureN)self_7311997)->elements[2];
++c_7315949.elements[2] = ((closureN)self_7311997)->elements[3];
++c_7315949.elements[3] = ((closureN)self_7311997)->elements[4];
++c_7315949.elements[4] = port_73435_732724;
  
  
 -pair_type local_7317354; 
 -return_direct_with_clo1(data,(closure)&c_7317249,__lambda_1346,  set_cell_as_expr(&local_7317354, ((closureN)self_7313250)->elements[1]));; 
-+pair_type local_7316061; 
-+return_direct_with_clo1(data,(closure)&c_7315956,__lambda_1299,  set_cell_as_expr(&local_7316061, ((closureN)self_7312004)->elements[1]));; 
++pair_type local_7316054; 
++return_direct_with_clo1(data,(closure)&c_7315949,__lambda_1299,  set_cell_as_expr(&local_7316054, ((closureN)self_7311997)->elements[1]));; 
  }
  
 -static void __lambda_1346(void *data, object self_7313251, int argc, object *args) /* object self_7313251, object bv_73436_733072 */
-+static void __lambda_1299(void *data, object self_7312005, int argc, object *args) /* object self_7312005, object bv_73436_732732 */
++static void __lambda_1299(void *data, object self_7311998, int argc, object *args) /* object self_7311998, object bv_73436_732725 */
   {
 - object bv_73436_733072 = args[0];
-+ object bv_73436_732732 = args[0];
++ object bv_73436_732725 = args[0];
    
 -closureN_type c_7317251;
 -object e_7317346 [5];
@@ -54210,33 +54442,33 @@ Make let-values be the same as let*-values, to work around
 -c_7317251.elements[2] = ((closureN)self_7313251)->elements[1];
 -c_7317251.elements[3] = ((closureN)self_7313251)->elements[2];
 -c_7317251.elements[4] = ((closureN)self_7313251)->elements[4];
-+closureN_type c_7315958;
-+object e_7316053 [5];
-+c_7315958.hdr.mark = gc_color_red;
-+ c_7315958.hdr.grayed = 0;
-+c_7315958.tag = closureN_tag;
-+ c_7315958.fn = (function_type)__lambda_1298;
-+c_7315958.num_args = 1;
-+c_7315958.num_elements = 5;
-+c_7315958.elements = (object *)e_7316053;
-+c_7315958.elements[0] = ((closureN)self_7312005)->elements[0];
-+c_7315958.elements[1] = bv_73436_732732;
-+c_7315958.elements[2] = ((closureN)self_7312005)->elements[1];
-+c_7315958.elements[3] = ((closureN)self_7312005)->elements[2];
-+c_7315958.elements[4] = ((closureN)self_7312005)->elements[4];
++closureN_type c_7315951;
++object e_7316046 [5];
++c_7315951.hdr.mark = gc_color_red;
++ c_7315951.hdr.grayed = 0;
++c_7315951.tag = closureN_tag;
++ c_7315951.fn = (function_type)__lambda_1298;
++c_7315951.num_args = 1;
++c_7315951.num_elements = 5;
++c_7315951.elements = (object *)e_7316046;
++c_7315951.elements[0] = ((closureN)self_7311998)->elements[0];
++c_7315951.elements[1] = bv_73436_732725;
++c_7315951.elements[2] = ((closureN)self_7311998)->elements[1];
++c_7315951.elements[3] = ((closureN)self_7311998)->elements[2];
++c_7315951.elements[4] = ((closureN)self_7311998)->elements[4];
  
  
 -pair_type local_7317349; 
 -return_direct_with_clo1(data,(closure)&c_7317251,__lambda_1345,  set_cell_as_expr(&local_7317349, ((closureN)self_7313251)->elements[3]));; 
-+pair_type local_7316056; 
-+return_direct_with_clo1(data,(closure)&c_7315958,__lambda_1298,  set_cell_as_expr(&local_7316056, ((closureN)self_7312005)->elements[3]));; 
++pair_type local_7316049; 
++return_direct_with_clo1(data,(closure)&c_7315951,__lambda_1298,  set_cell_as_expr(&local_7316049, ((closureN)self_7311998)->elements[3]));; 
  }
  
 -static void __lambda_1345(void *data, object self_7313252, int argc, object *args) /* object self_7313252, object loop_73437_733073 */
-+static void __lambda_1298(void *data, object self_7312006, int argc, object *args) /* object self_7312006, object loop_73437_732733 */
++static void __lambda_1298(void *data, object self_7311999, int argc, object *args) /* object self_7311999, object loop_73437_732726 */
   {
 - object loop_73437_733073 = args[0];
-+ object loop_73437_732733 = args[0];
++ object loop_73437_732726 = args[0];
    
 -closureN_type c_7317253;
 -object e_7317264 [2];
@@ -54249,17 +54481,17 @@ Make let-values be the same as let*-values, to work around
 -c_7317253.elements = (object *)e_7317264;
 -c_7317253.elements[0] = ((closureN)self_7313252)->elements[0];
 -c_7317253.elements[1] = ((closureN)self_7313252)->elements[4];
-+closureN_type c_7315960;
-+object e_7315971 [2];
-+c_7315960.hdr.mark = gc_color_red;
-+ c_7315960.hdr.grayed = 0;
-+c_7315960.tag = closureN_tag;
-+ c_7315960.fn = (function_type)__lambda_329;
-+c_7315960.num_args = 0;
-+c_7315960.num_elements = 2;
-+c_7315960.elements = (object *)e_7315971;
-+c_7315960.elements[0] = ((closureN)self_7312006)->elements[0];
-+c_7315960.elements[1] = ((closureN)self_7312006)->elements[4];
++closureN_type c_7315953;
++object e_7315964 [2];
++c_7315953.hdr.mark = gc_color_red;
++ c_7315953.hdr.grayed = 0;
++c_7315953.tag = closureN_tag;
++ c_7315953.fn = (function_type)__lambda_329;
++c_7315953.num_args = 0;
++c_7315953.num_elements = 2;
++c_7315953.elements = (object *)e_7315964;
++c_7315953.elements[0] = ((closureN)self_7311999)->elements[0];
++c_7315953.elements[1] = ((closureN)self_7311999)->elements[4];
  
  
 -closureN_type c_7317265;
@@ -54276,30 +54508,30 @@ Make let-values be the same as let*-values, to work around
 -c_7317265.elements[2] = ((closureN)self_7313252)->elements[3];
 -c_7317265.elements[3] = loop_73437_733073;
 -c_7317265.elements[4] = ((closureN)self_7313252)->elements[4];
-+closureN_type c_7315972;
-+object e_7316052 [5];
-+c_7315972.hdr.mark = gc_color_red;
-+ c_7315972.hdr.grayed = 0;
-+c_7315972.tag = closureN_tag;
-+ c_7315972.fn = (function_type)__lambda_330;
-+c_7315972.num_args = 1;
-+c_7315972.num_elements = 5;
-+c_7315972.elements = (object *)e_7316052;
-+c_7315972.elements[0] = ((closureN)self_7312006)->elements[1];
-+c_7315972.elements[1] = ((closureN)self_7312006)->elements[2];
-+c_7315972.elements[2] = ((closureN)self_7312006)->elements[3];
-+c_7315972.elements[3] = loop_73437_732733;
-+c_7315972.elements[4] = ((closureN)self_7312006)->elements[4];
++closureN_type c_7315965;
++object e_7316045 [5];
++c_7315965.hdr.mark = gc_color_red;
++ c_7315965.hdr.grayed = 0;
++c_7315965.tag = closureN_tag;
++ c_7315965.fn = (function_type)__lambda_330;
++c_7315965.num_args = 1;
++c_7315965.num_elements = 5;
++c_7315965.elements = (object *)e_7316045;
++c_7315965.elements[0] = ((closureN)self_7311999)->elements[1];
++c_7315965.elements[1] = ((closureN)self_7311999)->elements[2];
++c_7315965.elements[2] = ((closureN)self_7311999)->elements[3];
++c_7315965.elements[3] = loop_73437_732726;
++c_7315965.elements[4] = ((closureN)self_7311999)->elements[4];
  
 -return_direct_with_clo1(data,(closure)&c_7317253,__lambda_329,  &c_7317265);; 
-+return_direct_with_clo1(data,(closure)&c_7315960,__lambda_329,  &c_7315972);; 
++return_direct_with_clo1(data,(closure)&c_7315953,__lambda_329,  &c_7315965);; 
  }
  
 -static void __lambda_330(void *data, object self_7313253, int argc, object *args) /* object self_7313253, object r_735060 */
-+static void __lambda_330(void *data, object self_7312007, int argc, object *args) /* object self_7312007, object r_734615 */
++static void __lambda_330(void *data, object self_7312000, int argc, object *args) /* object self_7312000, object r_734608 */
   {
 - object r_735060 = args[0];
-+ object r_734615 = args[0];
++ object r_734608 = args[0];
    
 -closureN_type c_7317267;
 -object e_7317341 [5];
@@ -54315,29 +54547,29 @@ Make let-values be the same as let*-values, to work around
 -c_7317267.elements[2] = ((closureN)self_7313253)->elements[2];
 -c_7317267.elements[3] = ((closureN)self_7313253)->elements[3];
 -c_7317267.elements[4] = ((closureN)self_7313253)->elements[4];
-+closureN_type c_7315974;
-+object e_7316048 [5];
-+c_7315974.hdr.mark = gc_color_red;
-+ c_7315974.hdr.grayed = 0;
-+c_7315974.tag = closureN_tag;
-+ c_7315974.fn = (function_type)__lambda_331;
-+c_7315974.num_args = 1;
-+c_7315974.num_elements = 5;
-+c_7315974.elements = (object *)e_7316048;
-+c_7315974.elements[0] = ((closureN)self_7312007)->elements[0];
-+c_7315974.elements[1] = ((closureN)self_7312007)->elements[1];
-+c_7315974.elements[2] = ((closureN)self_7312007)->elements[2];
-+c_7315974.elements[3] = ((closureN)self_7312007)->elements[3];
-+c_7315974.elements[4] = ((closureN)self_7312007)->elements[4];
++closureN_type c_7315967;
++object e_7316041 [5];
++c_7315967.hdr.mark = gc_color_red;
++ c_7315967.hdr.grayed = 0;
++c_7315967.tag = closureN_tag;
++ c_7315967.fn = (function_type)__lambda_331;
++c_7315967.num_args = 1;
++c_7315967.num_elements = 5;
++c_7315967.elements = (object *)e_7316041;
++c_7315967.elements[0] = ((closureN)self_7312000)->elements[0];
++c_7315967.elements[1] = ((closureN)self_7312000)->elements[1];
++c_7315967.elements[2] = ((closureN)self_7312000)->elements[2];
++c_7315967.elements[3] = ((closureN)self_7312000)->elements[3];
++c_7315967.elements[4] = ((closureN)self_7312000)->elements[4];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7317267,__lambda_331,  Cyc_set_cell(data, ((closureN)self_7313253)->elements[4], r_735060));; 
-+return_direct_with_clo1(data,(closure)&c_7315974,__lambda_331,  Cyc_set_cell(data, ((closureN)self_7312007)->elements[4], r_734615));; 
++return_direct_with_clo1(data,(closure)&c_7315967,__lambda_331,  Cyc_set_cell(data, ((closureN)self_7312000)->elements[4], r_734608));; 
  }
  
 -static void __lambda_331(void *data, object self_7313254, int argc, object *args) /* object self_7313254, object r_735048 */
-+static void __lambda_331(void *data, object self_7312008, int argc, object *args) /* object self_7312008, object r_734603 */
++static void __lambda_331(void *data, object self_7312001, int argc, object *args) /* object self_7312001, object r_734596 */
   {
  
    
@@ -54355,33 +54587,33 @@ Make let-values be the same as let*-values, to work around
 -c_7317269.elements[2] = ((closureN)self_7313254)->elements[2];
 -c_7317269.elements[3] = ((closureN)self_7313254)->elements[3];
 -c_7317269.elements[4] = ((closureN)self_7313254)->elements[4];
-+closureN_type c_7315976;
-+object e_7316043 [5];
-+c_7315976.hdr.mark = gc_color_red;
-+ c_7315976.hdr.grayed = 0;
-+c_7315976.tag = closureN_tag;
-+ c_7315976.fn = (function_type)__lambda_332;
-+c_7315976.num_args = 1;
-+c_7315976.num_elements = 5;
-+c_7315976.elements = (object *)e_7316043;
-+c_7315976.elements[0] = ((closureN)self_7312008)->elements[0];
-+c_7315976.elements[1] = ((closureN)self_7312008)->elements[1];
-+c_7315976.elements[2] = ((closureN)self_7312008)->elements[2];
-+c_7315976.elements[3] = ((closureN)self_7312008)->elements[3];
-+c_7315976.elements[4] = ((closureN)self_7312008)->elements[4];
++closureN_type c_7315969;
++object e_7316036 [5];
++c_7315969.hdr.mark = gc_color_red;
++ c_7315969.hdr.grayed = 0;
++c_7315969.tag = closureN_tag;
++ c_7315969.fn = (function_type)__lambda_332;
++c_7315969.num_args = 1;
++c_7315969.num_elements = 5;
++c_7315969.elements = (object *)e_7316036;
++c_7315969.elements[0] = ((closureN)self_7312001)->elements[0];
++c_7315969.elements[1] = ((closureN)self_7312001)->elements[1];
++c_7315969.elements[2] = ((closureN)self_7312001)->elements[2];
++c_7315969.elements[3] = ((closureN)self_7312001)->elements[3];
++c_7315969.elements[4] = ((closureN)self_7312001)->elements[4];
  
  
 -object c_7317339 = Cyc_make_bytevector(data,(closure)&c_7317269,1,((closureN)self_7313254)->elements[1]);
 -return_closcall1(data,(closure)&c_7317269,  c_7317339);; 
-+object c_7316046 = Cyc_make_bytevector(data,(closure)&c_7315976,1,((closureN)self_7312008)->elements[1]);
-+return_closcall1(data,(closure)&c_7315976,  c_7316046);; 
++object c_7316039 = Cyc_make_bytevector(data,(closure)&c_7315969,1,((closureN)self_7312001)->elements[1]);
++return_closcall1(data,(closure)&c_7315969,  c_7316039);; 
  }
  
 -static void __lambda_332(void *data, object self_7313255, int argc, object *args) /* object self_7313255, object r_735059 */
-+static void __lambda_332(void *data, object self_7312009, int argc, object *args) /* object self_7312009, object r_734614 */
++static void __lambda_332(void *data, object self_7312002, int argc, object *args) /* object self_7312002, object r_734607 */
   {
 - object r_735059 = args[0];
-+ object r_734614 = args[0];
++ object r_734607 = args[0];
    
 -closureN_type c_7317271;
 -object e_7317332 [5];
@@ -54397,29 +54629,29 @@ Make let-values be the same as let*-values, to work around
 -c_7317271.elements[2] = ((closureN)self_7313255)->elements[2];
 -c_7317271.elements[3] = ((closureN)self_7313255)->elements[3];
 -c_7317271.elements[4] = ((closureN)self_7313255)->elements[4];
-+closureN_type c_7315978;
-+object e_7316039 [5];
-+c_7315978.hdr.mark = gc_color_red;
-+ c_7315978.hdr.grayed = 0;
-+c_7315978.tag = closureN_tag;
-+ c_7315978.fn = (function_type)__lambda_333;
-+c_7315978.num_args = 1;
-+c_7315978.num_elements = 5;
-+c_7315978.elements = (object *)e_7316039;
-+c_7315978.elements[0] = ((closureN)self_7312009)->elements[0];
-+c_7315978.elements[1] = ((closureN)self_7312009)->elements[1];
-+c_7315978.elements[2] = ((closureN)self_7312009)->elements[2];
-+c_7315978.elements[3] = ((closureN)self_7312009)->elements[3];
-+c_7315978.elements[4] = ((closureN)self_7312009)->elements[4];
++closureN_type c_7315971;
++object e_7316032 [5];
++c_7315971.hdr.mark = gc_color_red;
++ c_7315971.hdr.grayed = 0;
++c_7315971.tag = closureN_tag;
++ c_7315971.fn = (function_type)__lambda_333;
++c_7315971.num_args = 1;
++c_7315971.num_elements = 5;
++c_7315971.elements = (object *)e_7316032;
++c_7315971.elements[0] = ((closureN)self_7312002)->elements[0];
++c_7315971.elements[1] = ((closureN)self_7312002)->elements[1];
++c_7315971.elements[2] = ((closureN)self_7312002)->elements[2];
++c_7315971.elements[3] = ((closureN)self_7312002)->elements[3];
++c_7315971.elements[4] = ((closureN)self_7312002)->elements[4];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7317271,__lambda_333,  Cyc_set_cell(data, ((closureN)self_7313255)->elements[0], r_735059));; 
-+return_direct_with_clo1(data,(closure)&c_7315978,__lambda_333,  Cyc_set_cell(data, ((closureN)self_7312009)->elements[0], r_734614));; 
++return_direct_with_clo1(data,(closure)&c_7315971,__lambda_333,  Cyc_set_cell(data, ((closureN)self_7312002)->elements[0], r_734607));; 
  }
  
 -static void __lambda_333(void *data, object self_7313256, int argc, object *args) /* object self_7313256, object r_735049 */
-+static void __lambda_333(void *data, object self_7312010, int argc, object *args) /* object self_7312010, object r_734604 */
++static void __lambda_333(void *data, object self_7312003, int argc, object *args) /* object self_7312003, object r_734597 */
   {
  
    
@@ -54434,17 +54666,17 @@ Make let-values be the same as let*-values, to work around
 -c_7317273.elements = (object *)e_7317285;
 -c_7317273.elements[0] = ((closureN)self_7313256)->elements[2];
 -c_7317273.elements[1] = ((closureN)self_7313256)->elements[3];
-+closureN_type c_7315980;
-+object e_7315992 [2];
-+c_7315980.hdr.mark = gc_color_red;
-+ c_7315980.hdr.grayed = 0;
-+c_7315980.tag = closureN_tag;
-+ c_7315980.fn = (function_type)__lambda_334;
-+c_7315980.num_args = 1;
-+c_7315980.num_elements = 2;
-+c_7315980.elements = (object *)e_7315992;
-+c_7315980.elements[0] = ((closureN)self_7312010)->elements[2];
-+c_7315980.elements[1] = ((closureN)self_7312010)->elements[3];
++closureN_type c_7315973;
++object e_7315985 [2];
++c_7315973.hdr.mark = gc_color_red;
++ c_7315973.hdr.grayed = 0;
++c_7315973.tag = closureN_tag;
++ c_7315973.fn = (function_type)__lambda_334;
++c_7315973.num_args = 1;
++c_7315973.num_elements = 2;
++c_7315973.elements = (object *)e_7315985;
++c_7315973.elements[0] = ((closureN)self_7312003)->elements[2];
++c_7315973.elements[1] = ((closureN)self_7312003)->elements[3];
  
  
 -closureN_type c_7317286;
@@ -54460,36 +54692,36 @@ Make let-values be the same as let*-values, to work around
 -c_7317286.elements[1] = ((closureN)self_7313256)->elements[1];
 -c_7317286.elements[2] = ((closureN)self_7313256)->elements[3];
 -c_7317286.elements[3] = ((closureN)self_7313256)->elements[4];
-+closureN_type c_7315993;
-+object e_7316038 [4];
-+c_7315993.hdr.mark = gc_color_red;
-+ c_7315993.hdr.grayed = 0;
-+c_7315993.tag = closureN_tag;
-+ c_7315993.fn = (function_type)__lambda_336;
-+c_7315993.num_args = 1;
-+c_7315993.num_elements = 4;
-+c_7315993.elements = (object *)e_7316038;
-+c_7315993.elements[0] = ((closureN)self_7312010)->elements[0];
-+c_7315993.elements[1] = ((closureN)self_7312010)->elements[1];
-+c_7315993.elements[2] = ((closureN)self_7312010)->elements[3];
-+c_7315993.elements[3] = ((closureN)self_7312010)->elements[4];
++closureN_type c_7315986;
++object e_7316031 [4];
++c_7315986.hdr.mark = gc_color_red;
++ c_7315986.hdr.grayed = 0;
++c_7315986.tag = closureN_tag;
++ c_7315986.fn = (function_type)__lambda_336;
++c_7315986.num_args = 1;
++c_7315986.num_elements = 4;
++c_7315986.elements = (object *)e_7316031;
++c_7315986.elements[0] = ((closureN)self_7312003)->elements[0];
++c_7315986.elements[1] = ((closureN)self_7312003)->elements[1];
++c_7315986.elements[2] = ((closureN)self_7312003)->elements[3];
++c_7315986.elements[3] = ((closureN)self_7312003)->elements[4];
  
 -return_direct_with_clo1(data,(closure)&c_7317273,__lambda_334,  &c_7317286);; 
-+return_direct_with_clo1(data,(closure)&c_7315980,__lambda_334,  &c_7315993);; 
++return_direct_with_clo1(data,(closure)&c_7315973,__lambda_334,  &c_7315986);; 
  }
  
 -static void __lambda_336(void *data, object self_7313257, int argc, object *args) /* object self_7313257, object k_735052, object n_73438_733074 */
-+static void __lambda_336(void *data, object self_7312011, int argc, object *args) /* object self_7312011, object k_734607, object n_73438_732734 */
++static void __lambda_336(void *data, object self_7312004, int argc, object *args) /* object self_7312004, object k_734600, object n_73438_732727 */
   {
 - object k_735052 = args[0]; object n_73438_733074 = args[1];
-+ object k_734607 = args[0]; object n_73438_732734 = args[1];
++ object k_734600 = args[0]; object n_73438_732727 = args[1];
      
 -if( (boolean_f != Cyc_num_fast_gte_op(data, n_73438_733074, ((closureN)self_7313257)->elements[1])) ){ 
-+if( (boolean_f != Cyc_num_fast_gte_op(data, n_73438_732734, ((closureN)self_7312011)->elements[1])) ){ 
++if( (boolean_f != Cyc_num_fast_gte_op(data, n_73438_732727, ((closureN)self_7312004)->elements[1])) ){ 
    
  
 -return_direct_with_clo1(data,  k_735052, (((closure)  k_735052)->fn),  car(((closureN)self_7313257)->elements[0]));
-+return_direct_with_clo1(data,  k_734607, (((closure)  k_734607)->fn),  car(((closureN)self_7312011)->elements[0]));
++return_direct_with_clo1(data,  k_734600, (((closure)  k_734600)->fn),  car(((closureN)self_7312004)->elements[0]));
  } else { 
    
 -closureN_type c_7317295;
@@ -54505,45 +54737,45 @@ Make let-values be the same as let*-values, to work around
 -c_7317295.elements[1] = k_735052;
 -c_7317295.elements[2] = ((closureN)self_7313257)->elements[2];
 -c_7317295.elements[3] = n_73438_733074;
-+closureN_type c_7316002;
-+object e_7316034 [4];
-+c_7316002.hdr.mark = gc_color_red;
-+ c_7316002.hdr.grayed = 0;
-+c_7316002.tag = closureN_tag;
-+ c_7316002.fn = (function_type)__lambda_337;
-+c_7316002.num_args = 1;
-+c_7316002.num_elements = 4;
-+c_7316002.elements = (object *)e_7316034;
-+c_7316002.elements[0] = ((closureN)self_7312011)->elements[0];
-+c_7316002.elements[1] = k_734607;
-+c_7316002.elements[2] = ((closureN)self_7312011)->elements[2];
-+c_7316002.elements[3] = n_73438_732734;
++closureN_type c_7315995;
++object e_7316027 [4];
++c_7315995.hdr.mark = gc_color_red;
++ c_7315995.hdr.grayed = 0;
++c_7315995.tag = closureN_tag;
++ c_7315995.fn = (function_type)__lambda_337;
++c_7315995.num_args = 1;
++c_7315995.num_elements = 4;
++c_7315995.elements = (object *)e_7316027;
++c_7315995.elements[0] = ((closureN)self_7312004)->elements[0];
++c_7315995.elements[1] = k_734600;
++c_7315995.elements[2] = ((closureN)self_7312004)->elements[2];
++c_7315995.elements[3] = n_73438_732727;
  
  
  
 -return_direct_with_clo2(data,  __glo_read_91u8_scheme_base, (((closure)  __glo_read_91u8_scheme_base)->fn),  &c_7317295, car(((closureN)self_7313257)->elements[3]));}
-+return_direct_with_clo2(data,  __glo_read_91u8_scheme_base, (((closure)  __glo_read_91u8_scheme_base)->fn),  &c_7316002, car(((closureN)self_7312011)->elements[3]));}
++return_direct_with_clo2(data,  __glo_read_91u8_scheme_base, (((closure)  __glo_read_91u8_scheme_base)->fn),  &c_7315995, car(((closureN)self_7312004)->elements[3]));}
  ;; 
  }
  
 -static void __lambda_337(void *data, object self_7313258, int argc, object *args) /* object self_7313258, object b_73439_733075 */
-+static void __lambda_337(void *data, object self_7312012, int argc, object *args) /* object self_7312012, object b_73439_732735 */
++static void __lambda_337(void *data, object self_7312005, int argc, object *args) /* object self_7312005, object b_73439_732728 */
   {
 - object b_73439_733075 = args[0];
-+ object b_73439_732735 = args[0];
++ object b_73439_732728 = args[0];
      
 -if( (boolean_f != Cyc_is_eof_object(b_73439_733075)) ){ 
-+if( (boolean_f != Cyc_is_eof_object(b_73439_732735)) ){ 
++if( (boolean_f != Cyc_is_eof_object(b_73439_732728)) ){ 
      
 -if( (boolean_f != Cyc_num_fast_eq_op(data, ((closureN)self_7313258)->elements[3], obj_int2obj(0))) ){ 
 -  return_direct_with_clo1(data,  ((closureN)self_7313258)->elements[1], (((closure)  ((closureN)self_7313258)->elements[1])->fn),  b_73439_733075);
-+if( (boolean_f != Cyc_num_fast_eq_op(data, ((closureN)self_7312012)->elements[3], obj_int2obj(0))) ){ 
-+  return_direct_with_clo1(data,  ((closureN)self_7312012)->elements[1], (((closure)  ((closureN)self_7312012)->elements[1])->fn),  b_73439_732735);
++if( (boolean_f != Cyc_num_fast_eq_op(data, ((closureN)self_7312005)->elements[3], obj_int2obj(0))) ){ 
++  return_direct_with_clo1(data,  ((closureN)self_7312005)->elements[1], (((closure)  ((closureN)self_7312005)->elements[1])->fn),  b_73439_732728);
  } else { 
    
  
 -return_direct_with_clo4(data,  __glo_bytevector_91copy_scheme_base, (((closure)  __glo_bytevector_91copy_scheme_base)->fn),  ((closureN)self_7313258)->elements[1], car(((closureN)self_7313258)->elements[0]), obj_int2obj(0), ((closureN)self_7313258)->elements[3]);}
-+return_direct_with_clo4(data,  __glo_bytevector_91copy_scheme_base, (((closure)  __glo_bytevector_91copy_scheme_base)->fn),  ((closureN)self_7312012)->elements[1], car(((closureN)self_7312012)->elements[0]), obj_int2obj(0), ((closureN)self_7312012)->elements[3]);}
++return_direct_with_clo4(data,  __glo_bytevector_91copy_scheme_base, (((closure)  __glo_bytevector_91copy_scheme_base)->fn),  ((closureN)self_7312005)->elements[1], car(((closureN)self_7312005)->elements[0]), obj_int2obj(0), ((closureN)self_7312005)->elements[3]);}
  ;
  } else { 
    
@@ -54559,30 +54791,30 @@ Make let-values be the same as let*-values, to work around
 -c_7317310.elements[0] = ((closureN)self_7313258)->elements[1];
 -c_7317310.elements[1] = ((closureN)self_7313258)->elements[2];
 -c_7317310.elements[2] = ((closureN)self_7313258)->elements[3];
-+closureN_type c_7316017;
-+object e_7316027 [3];
-+c_7316017.hdr.mark = gc_color_red;
-+ c_7316017.hdr.grayed = 0;
-+c_7316017.tag = closureN_tag;
-+ c_7316017.fn = (function_type)__lambda_338;
-+c_7316017.num_args = 1;
-+c_7316017.num_elements = 3;
-+c_7316017.elements = (object *)e_7316027;
-+c_7316017.elements[0] = ((closureN)self_7312012)->elements[1];
-+c_7316017.elements[1] = ((closureN)self_7312012)->elements[2];
-+c_7316017.elements[2] = ((closureN)self_7312012)->elements[3];
++closureN_type c_7316010;
++object e_7316020 [3];
++c_7316010.hdr.mark = gc_color_red;
++ c_7316010.hdr.grayed = 0;
++c_7316010.tag = closureN_tag;
++ c_7316010.fn = (function_type)__lambda_338;
++c_7316010.num_args = 1;
++c_7316010.num_elements = 3;
++c_7316010.elements = (object *)e_7316020;
++c_7316010.elements[0] = ((closureN)self_7312005)->elements[1];
++c_7316010.elements[1] = ((closureN)self_7312005)->elements[2];
++c_7316010.elements[2] = ((closureN)self_7312005)->elements[3];
  
  
  
  
  
 -return_closcall1(data,(closure)&c_7317310,  Cyc_bytevector_u8_set(data, car(((closureN)self_7313258)->elements[0]), ((closureN)self_7313258)->elements[3], b_73439_733075));}
-+return_closcall1(data,(closure)&c_7316017,  Cyc_bytevector_u8_set(data, car(((closureN)self_7312012)->elements[0]), ((closureN)self_7312012)->elements[3], b_73439_732735));}
++return_closcall1(data,(closure)&c_7316010,  Cyc_bytevector_u8_set(data, car(((closureN)self_7312005)->elements[0]), ((closureN)self_7312005)->elements[3], b_73439_732728));}
  ;; 
  }
  
 -static void __lambda_338(void *data, object self_7313259, int argc, object *args) /* object self_7313259, object r_735057 */
-+static void __lambda_338(void *data, object self_7312013, int argc, object *args) /* object self_7312013, object r_734612 */
++static void __lambda_338(void *data, object self_7312006, int argc, object *args) /* object self_7312006, object r_734605 */
   {
  
    
@@ -54590,15 +54822,15 @@ Make let-values be the same as let*-values, to work around
  
 -complex_num_type local_7317318; 
 -return_closcall2(data,  car(((closureN)self_7313259)->elements[1]),  ((closureN)self_7313259)->elements[0], Cyc_fast_sum(data,&local_7317318, ((closureN)self_7313259)->elements[2], obj_int2obj(1)));; 
-+complex_num_type local_7316025; 
-+return_closcall2(data,  car(((closureN)self_7312013)->elements[1]),  ((closureN)self_7312013)->elements[0], Cyc_fast_sum(data,&local_7316025, ((closureN)self_7312013)->elements[2], obj_int2obj(1)));; 
++complex_num_type local_7316018; 
++return_closcall2(data,  car(((closureN)self_7312006)->elements[1]),  ((closureN)self_7312006)->elements[0], Cyc_fast_sum(data,&local_7316018, ((closureN)self_7312006)->elements[2], obj_int2obj(1)));; 
  }
  
 -static void __lambda_334(void *data, object self_7313260, int argc, object *args) /* object self_7313260, object r_735051 */
-+static void __lambda_334(void *data, object self_7312014, int argc, object *args) /* object self_7312014, object r_734606 */
++static void __lambda_334(void *data, object self_7312007, int argc, object *args) /* object self_7312007, object r_734599 */
   {
 - object r_735051 = args[0];
-+ object r_734606 = args[0];
++ object r_734599 = args[0];
    
 -closureN_type c_7317275;
 -object e_7317281 [2];
@@ -54611,65 +54843,64 @@ Make let-values be the same as let*-values, to work around
 -c_7317275.elements = (object *)e_7317281;
 -c_7317275.elements[0] = ((closureN)self_7313260)->elements[0];
 -c_7317275.elements[1] = ((closureN)self_7313260)->elements[1];
-+closureN_type c_7315982;
-+object e_7315988 [2];
-+c_7315982.hdr.mark = gc_color_red;
-+ c_7315982.hdr.grayed = 0;
-+c_7315982.tag = closureN_tag;
-+ c_7315982.fn = (function_type)__lambda_335;
-+c_7315982.num_args = 1;
-+c_7315982.num_elements = 2;
-+c_7315982.elements = (object *)e_7315988;
-+c_7315982.elements[0] = ((closureN)self_7312014)->elements[0];
-+c_7315982.elements[1] = ((closureN)self_7312014)->elements[1];
++closureN_type c_7315975;
++object e_7315981 [2];
++c_7315975.hdr.mark = gc_color_red;
++ c_7315975.hdr.grayed = 0;
++c_7315975.tag = closureN_tag;
++ c_7315975.fn = (function_type)__lambda_335;
++c_7315975.num_args = 1;
++c_7315975.num_elements = 2;
++c_7315975.elements = (object *)e_7315981;
++c_7315975.elements[0] = ((closureN)self_7312007)->elements[0];
++c_7315975.elements[1] = ((closureN)self_7312007)->elements[1];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7317275,__lambda_335,  Cyc_set_cell(data, ((closureN)self_7313260)->elements[1], r_735051));; 
-+return_direct_with_clo1(data,(closure)&c_7315982,__lambda_335,  Cyc_set_cell(data, ((closureN)self_7312014)->elements[1], r_734606));; 
++return_direct_with_clo1(data,(closure)&c_7315975,__lambda_335,  Cyc_set_cell(data, ((closureN)self_7312007)->elements[1], r_734599));; 
  }
  
 -static void __lambda_335(void *data, object self_7313261, int argc, object *args) /* object self_7313261, object r_735050 */
-+static void __lambda_335(void *data, object self_7312015, int argc, object *args) /* object self_7312015, object r_734605 */
++static void __lambda_335(void *data, object self_7312008, int argc, object *args) /* object self_7312008, object r_734598 */
   {
  
    
  
 -return_closcall2(data,  car(((closureN)self_7313261)->elements[1]),  ((closureN)self_7313261)->elements[0], obj_int2obj(0));; 
-+return_closcall2(data,  car(((closureN)self_7312015)->elements[1]),  ((closureN)self_7312015)->elements[0], obj_int2obj(0));; 
++return_closcall2(data,  car(((closureN)self_7312008)->elements[1]),  ((closureN)self_7312008)->elements[0], obj_int2obj(0));; 
  }
  
 -static void __lambda_329(void *data, object self_7313262, int argc, object *args) /* object self_7313262, object k_735061 */
-+static void __lambda_329(void *data, object self_7312016, int argc, object *args) /* object self_7312016, object k_734616 */
++static void __lambda_329(void *data, object self_7312009, int argc, object *args) /* object self_7312009, object k_734609 */
   {
 - object k_735061 = args[0];
-+ object k_734616 = args[0];
++ object k_734609 = args[0];
      
    
 -if( (boolean_f != Cyc_is_null(car(((closureN)self_7313262)->elements[1]))) ){ 
 -  return_direct_with_clo1(data,  __glo_current_91input_91port_scheme_base, (((closure)  __glo_current_91input_91port_scheme_base)->fn),  k_735061);
-+if( (boolean_f != Cyc_is_null(car(((closureN)self_7312016)->elements[1]))) ){ 
-+  return_direct_with_clo1(data,  __glo_current_91input_91port_scheme_base, (((closure)  __glo_current_91input_91port_scheme_base)->fn),  k_734616);
++if( (boolean_f != Cyc_is_null(car(((closureN)self_7312009)->elements[1]))) ){ 
++  return_direct_with_clo1(data,  __glo_current_91input_91port_scheme_base, (((closure)  __glo_current_91input_91port_scheme_base)->fn),  k_734609);
  } else { 
    
  
 -return_direct_with_clo1(data,  k_735061, (((closure)  k_735061)->fn),  Cyc_car(data, ((closureN)self_7313262)->elements[0]));}
-+return_direct_with_clo1(data,  k_734616, (((closure)  k_734616)->fn),  Cyc_car(data, ((closureN)self_7312016)->elements[0]));}
++return_direct_with_clo1(data,  k_734609, (((closure)  k_734609)->fn),  Cyc_car(data, ((closureN)self_7312009)->elements[0]));}
  ;; 
  }
  
 -static void __lambda_323(void *data, object _, int argc, object *args) /* closure _,object k_735032, object str_73422_733065, object opts_73423_733066_raw, ... */
-+static void __lambda_323(void *data, object _, int argc, object *args) /* closure _,object k_734587, object str_73422_732725, object opts_73423_732726_raw, ... */
++static void __lambda_323(void *data, object _, int argc, object *args) /* closure _,object k_734580, object str_73422_732718, object opts_73423_732719_raw, ... */
   {
 -object k_735032 = args[0]; object str_73422_733065 = args[1];
 -load_varargs(opts_73423_733066, args, 2, argc - 2);
--  Cyc_st_add(data, "scheme/base.sld:write-string");
-+object k_734587 = args[0]; object str_73422_732725 = args[1];
-+load_varargs(opts_73423_732726, args, 2, argc - 2);
-+  Cyc_st_add(data, "base.sld:write-string");
++object k_734580 = args[0]; object str_73422_732718 = args[1];
++load_varargs(opts_73423_732719, args, 2, argc - 2);
+   Cyc_st_add(data, "scheme/base.sld:write-string");
    
 -if( (boolean_f != Cyc_is_null(opts_73423_733066)) ){ 
-+if( (boolean_f != Cyc_is_null(opts_73423_732726)) ){ 
++if( (boolean_f != Cyc_is_null(opts_73423_732719)) ){ 
    
 -closureN_type c_7317197;
 -object e_7317203 [2];
@@ -54682,45 +54913,45 @@ Make let-values be the same as let*-values, to work around
 -c_7317197.elements = (object *)e_7317203;
 -c_7317197.elements[0] = k_735032;
 -c_7317197.elements[1] = str_73422_733065;
-+closureN_type c_7315904;
-+object e_7315910 [2];
-+c_7315904.hdr.mark = gc_color_red;
-+ c_7315904.hdr.grayed = 0;
-+c_7315904.tag = closureN_tag;
-+ c_7315904.fn = (function_type)__lambda_324;
-+c_7315904.num_args = 1;
-+c_7315904.num_elements = 2;
-+c_7315904.elements = (object *)e_7315910;
-+c_7315904.elements[0] = k_734587;
-+c_7315904.elements[1] = str_73422_732725;
++closureN_type c_7315897;
++object e_7315903 [2];
++c_7315897.hdr.mark = gc_color_red;
++ c_7315897.hdr.grayed = 0;
++c_7315897.tag = closureN_tag;
++ c_7315897.fn = (function_type)__lambda_324;
++c_7315897.num_args = 1;
++c_7315897.num_elements = 2;
++c_7315897.elements = (object *)e_7315903;
++c_7315897.elements[0] = k_734580;
++c_7315897.elements[1] = str_73422_732718;
  
 -return_direct_with_clo1(data,  __glo_current_91output_91port_scheme_base, (((closure)  __glo_current_91output_91port_scheme_base)->fn),  &c_7317197);
-+return_direct_with_clo1(data,  __glo_current_91output_91port_scheme_base, (((closure)  __glo_current_91output_91port_scheme_base)->fn),  &c_7315904);
++return_direct_with_clo1(data,  __glo_current_91output_91port_scheme_base, (((closure)  __glo_current_91output_91port_scheme_base)->fn),  &c_7315897);
  } else { 
      
    
 -if( (boolean_f != Cyc_is_null(Cyc_cdr(data, opts_73423_733066))) ){ 
-+if( (boolean_f != Cyc_is_null(Cyc_cdr(data, opts_73423_732726))) ){ 
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, opts_73423_732719))) ){ 
    
  
  
  
 -return_direct_with_clo1(data,  k_735032, (((closure)  k_735032)->fn),  Cyc_display_va(data, 2,str_73422_733065, Cyc_car(data, opts_73423_733066)));
-+return_direct_with_clo1(data,  k_734587, (((closure)  k_734587)->fn),  Cyc_display_va(data, 2,str_73422_732725, Cyc_car(data, opts_73423_732726)));
++return_direct_with_clo1(data,  k_734580, (((closure)  k_734580)->fn),  Cyc_display_va(data, 2,str_73422_732718, Cyc_car(data, opts_73423_732719)));
  } else { 
 -  object r_735038;
-+  object r_734593;
++  object r_734586;
      
    
 -if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, opts_73423_733066), obj_int2obj(2))) ){ 
-+if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, opts_73423_732726), obj_int2obj(2))) ){ 
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_length(data, opts_73423_732719), obj_int2obj(2))) ){ 
    
 -  r_735038 = Cyc_caddr(data, opts_73423_733066);
-+  r_734593 = Cyc_caddr(data, opts_73423_732726);
++  r_734586 = Cyc_caddr(data, opts_73423_732719);
  } else { 
    
 -  r_735038 = Cyc_string_length(data, str_73422_733065);}
-+  r_734593 = Cyc_string_length(data, str_73422_732725);}
++  r_734586 = Cyc_string_length(data, str_73422_732718);}
  ;
 -closureN_type c_7317225;
 -object e_7317240 [3];
@@ -54734,32 +54965,32 @@ Make let-values be the same as let*-values, to work around
 -c_7317225.elements[0] = k_735032;
 -c_7317225.elements[1] = opts_73423_733066;
 -c_7317225.elements[2] = str_73422_733065;
-+closureN_type c_7315932;
-+object e_7315947 [3];
-+c_7315932.hdr.mark = gc_color_red;
-+ c_7315932.hdr.grayed = 0;
-+c_7315932.tag = closureN_tag;
-+ c_7315932.fn = (function_type)__lambda_325;
-+c_7315932.num_args = 2;
-+c_7315932.num_elements = 3;
-+c_7315932.elements = (object *)e_7315947;
-+c_7315932.elements[0] = k_734587;
-+c_7315932.elements[1] = opts_73423_732726;
-+c_7315932.elements[2] = str_73422_732725;
++closureN_type c_7315925;
++object e_7315940 [3];
++c_7315925.hdr.mark = gc_color_red;
++ c_7315925.hdr.grayed = 0;
++c_7315925.tag = closureN_tag;
++ c_7315925.fn = (function_type)__lambda_325;
++c_7315925.num_args = 2;
++c_7315925.num_elements = 3;
++c_7315925.elements = (object *)e_7315940;
++c_7315925.elements[0] = k_734580;
++c_7315925.elements[1] = opts_73423_732719;
++c_7315925.elements[2] = str_73422_732718;
  
  
  
 -return_direct_with_clo2(data,(closure)&c_7317225,__lambda_325,  Cyc_cadr(data, opts_73423_733066), r_735038);}
-+return_direct_with_clo2(data,(closure)&c_7315932,__lambda_325,  Cyc_cadr(data, opts_73423_732726), r_734593);}
++return_direct_with_clo2(data,(closure)&c_7315925,__lambda_325,  Cyc_cadr(data, opts_73423_732719), r_734586);}
  ;}
  ;; 
  }
  
 -static void __lambda_325(void *data, object self_7313247, int argc, object *args) /* object self_7313247, object start_73431_733067, object end_73432_733068 */
-+static void __lambda_325(void *data, object self_7312001, int argc, object *args) /* object self_7312001, object start_73431_732727, object end_73432_732728 */
++static void __lambda_325(void *data, object self_7311994, int argc, object *args) /* object self_7311994, object start_73431_732720, object end_73432_732721 */
   {
 - object start_73431_733067 = args[0]; object end_73432_733068 = args[1];
-+ object start_73431_732727 = args[0]; object end_73432_732728 = args[1];
++ object start_73431_732720 = args[0]; object end_73432_732721 = args[1];
    
 -closureN_type c_7317227;
 -object e_7317235 [2];
@@ -54772,69 +55003,67 @@ Make let-values be the same as let*-values, to work around
 -c_7317227.elements = (object *)e_7317235;
 -c_7317227.elements[0] = ((closureN)self_7313247)->elements[0];
 -c_7317227.elements[1] = ((closureN)self_7313247)->elements[1];
-+closureN_type c_7315934;
-+object e_7315942 [2];
-+c_7315934.hdr.mark = gc_color_red;
-+ c_7315934.hdr.grayed = 0;
-+c_7315934.tag = closureN_tag;
-+ c_7315934.fn = (function_type)__lambda_326;
-+c_7315934.num_args = 1;
-+c_7315934.num_elements = 2;
-+c_7315934.elements = (object *)e_7315942;
-+c_7315934.elements[0] = ((closureN)self_7312001)->elements[0];
-+c_7315934.elements[1] = ((closureN)self_7312001)->elements[1];
++closureN_type c_7315927;
++object e_7315935 [2];
++c_7315927.hdr.mark = gc_color_red;
++ c_7315927.hdr.grayed = 0;
++c_7315927.tag = closureN_tag;
++ c_7315927.fn = (function_type)__lambda_326;
++c_7315927.num_args = 1;
++c_7315927.num_elements = 2;
++c_7315927.elements = (object *)e_7315935;
++c_7315927.elements[0] = ((closureN)self_7311994)->elements[0];
++c_7315927.elements[1] = ((closureN)self_7311994)->elements[1];
  
  
 -object c_7317238 = Cyc_substring(data,(closure)&c_7317227,((closureN)self_7313247)->elements[2], start_73431_733067, end_73432_733068);
 -return_closcall1(data,(closure)&c_7317227,  c_7317238);; 
-+object c_7315945 = Cyc_substring(data,(closure)&c_7315934,((closureN)self_7312001)->elements[2], start_73431_732727, end_73432_732728);
-+return_closcall1(data,(closure)&c_7315934,  c_7315945);; 
++object c_7315938 = Cyc_substring(data,(closure)&c_7315927,((closureN)self_7311994)->elements[2], start_73431_732720, end_73432_732721);
++return_closcall1(data,(closure)&c_7315927,  c_7315938);; 
  }
  
 -static void __lambda_326(void *data, object self_7313248, int argc, object *args) /* object self_7313248, object r_735039 */
-+static void __lambda_326(void *data, object self_7312002, int argc, object *args) /* object self_7312002, object r_734594 */
++static void __lambda_326(void *data, object self_7311995, int argc, object *args) /* object self_7311995, object r_734587 */
   {
 - object r_735039 = args[0];
-+ object r_734594 = args[0];
++ object r_734587 = args[0];
    
  
  
  
 -return_direct_with_clo1(data,  ((closureN)self_7313248)->elements[0], (((closure)  ((closureN)self_7313248)->elements[0])->fn),  Cyc_display_va(data, 2,r_735039, Cyc_car(data, ((closureN)self_7313248)->elements[1])));; 
-+return_direct_with_clo1(data,  ((closureN)self_7312002)->elements[0], (((closure)  ((closureN)self_7312002)->elements[0])->fn),  Cyc_display_va(data, 2,r_734594, Cyc_car(data, ((closureN)self_7312002)->elements[1])));; 
++return_direct_with_clo1(data,  ((closureN)self_7311995)->elements[0], (((closure)  ((closureN)self_7311995)->elements[0])->fn),  Cyc_display_va(data, 2,r_734587, Cyc_car(data, ((closureN)self_7311995)->elements[1])));; 
  }
  
 -static void __lambda_324(void *data, object self_7313246, int argc, object *args) /* object self_7313246, object r_735034 */
-+static void __lambda_324(void *data, object self_7312000, int argc, object *args) /* object self_7312000, object r_734589 */
++static void __lambda_324(void *data, object self_7311993, int argc, object *args) /* object self_7311993, object r_734582 */
   {
 - object r_735034 = args[0];
-+ object r_734589 = args[0];
++ object r_734582 = args[0];
    
  
 -return_direct_with_clo1(data,  ((closureN)self_7313246)->elements[0], (((closure)  ((closureN)self_7313246)->elements[0])->fn),  Cyc_display_va(data, 2,((closureN)self_7313246)->elements[1], r_735034));; 
-+return_direct_with_clo1(data,  ((closureN)self_7312000)->elements[0], (((closure)  ((closureN)self_7312000)->elements[0])->fn),  Cyc_display_va(data, 2,((closureN)self_7312000)->elements[1], r_734589));; 
++return_direct_with_clo1(data,  ((closureN)self_7311993)->elements[0], (((closure)  ((closureN)self_7311993)->elements[0])->fn),  Cyc_display_va(data, 2,((closureN)self_7311993)->elements[1], r_734582));; 
  }
  
 -static void __lambda_322(void *data, object _, int argc, object *args) /* closure _,object k_735029, object str_73420_733063, object port_73421_733064 */
-+static void __lambda_322(void *data, object _, int argc, object *args) /* closure _,object k_734584, object str_73420_732723, object port_73421_732724 */
++static void __lambda_322(void *data, object _, int argc, object *args) /* closure _,object k_734577, object str_73420_732716, object port_73421_732717 */
   {
 -object k_735029 = args[0]; object str_73420_733063 = args[1]; object port_73421_733064 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:write-string-2");
-+object k_734584 = args[0]; object str_73420_732723 = args[1]; object port_73421_732724 = args[2];
-+  Cyc_st_add(data, "base.sld:write-string-2");
++object k_734577 = args[0]; object str_73420_732716 = args[1]; object port_73421_732717 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:write-string-2");
  
  
 -return_direct_with_clo1(data,  k_735029, (((closure)  k_735029)->fn),  Cyc_display_va(data, 2,str_73420_733063, port_73421_733064));; 
-+return_direct_with_clo1(data,  k_734584, (((closure)  k_734584)->fn),  Cyc_display_va(data, 2,str_73420_732723, port_73421_732724));; 
++return_direct_with_clo1(data,  k_734577, (((closure)  k_734577)->fn),  Cyc_display_va(data, 2,str_73420_732716, port_73421_732717));; 
  }
  
 -static void __lambda_320(void *data, object _, int argc, object *args) /* closure _,object k_735025, object str_73419_733062 */
-+static void __lambda_320(void *data, object _, int argc, object *args) /* closure _,object k_734580, object str_73419_732722 */
++static void __lambda_320(void *data, object _, int argc, object *args) /* closure _,object k_734573, object str_73419_732715 */
   {
 -object k_735025 = args[0]; object str_73419_733062 = args[1];
--  Cyc_st_add(data, "scheme/base.sld:write-string-1");
-+object k_734580 = args[0]; object str_73419_732722 = args[1];
-+  Cyc_st_add(data, "base.sld:write-string-1");
++object k_734573 = args[0]; object str_73419_732715 = args[1];
+   Cyc_st_add(data, "scheme/base.sld:write-string-1");
  
 -closureN_type c_7317182;
 -object e_7317188 [2];
@@ -54847,45 +55076,44 @@ Make let-values be the same as let*-values, to work around
 -c_7317182.elements = (object *)e_7317188;
 -c_7317182.elements[0] = k_735025;
 -c_7317182.elements[1] = str_73419_733062;
-+closureN_type c_7315889;
-+object e_7315895 [2];
-+c_7315889.hdr.mark = gc_color_red;
-+ c_7315889.hdr.grayed = 0;
-+c_7315889.tag = closureN_tag;
-+ c_7315889.fn = (function_type)__lambda_321;
-+c_7315889.num_args = 1;
-+c_7315889.num_elements = 2;
-+c_7315889.elements = (object *)e_7315895;
-+c_7315889.elements[0] = k_734580;
-+c_7315889.elements[1] = str_73419_732722;
++closureN_type c_7315882;
++object e_7315888 [2];
++c_7315882.hdr.mark = gc_color_red;
++ c_7315882.hdr.grayed = 0;
++c_7315882.tag = closureN_tag;
++ c_7315882.fn = (function_type)__lambda_321;
++c_7315882.num_args = 1;
++c_7315882.num_elements = 2;
++c_7315882.elements = (object *)e_7315888;
++c_7315882.elements[0] = k_734573;
++c_7315882.elements[1] = str_73419_732715;
  
 -return_direct_with_clo1(data,  __glo_current_91output_91port_scheme_base, (((closure)  __glo_current_91output_91port_scheme_base)->fn),  &c_7317182);; 
-+return_direct_with_clo1(data,  __glo_current_91output_91port_scheme_base, (((closure)  __glo_current_91output_91port_scheme_base)->fn),  &c_7315889);; 
++return_direct_with_clo1(data,  __glo_current_91output_91port_scheme_base, (((closure)  __glo_current_91output_91port_scheme_base)->fn),  &c_7315882);; 
  }
  
 -static void __lambda_321(void *data, object self_7313245, int argc, object *args) /* object self_7313245, object r_735026 */
-+static void __lambda_321(void *data, object self_7311999, int argc, object *args) /* object self_7311999, object r_734581 */
++static void __lambda_321(void *data, object self_7311992, int argc, object *args) /* object self_7311992, object r_734574 */
   {
 - object r_735026 = args[0];
-+ object r_734581 = args[0];
++ object r_734574 = args[0];
    
  
 -return_direct_with_clo1(data,  ((closureN)self_7313245)->elements[0], (((closure)  ((closureN)self_7313245)->elements[0])->fn),  Cyc_display_va(data, 2,((closureN)self_7313245)->elements[1], r_735026));; 
-+return_direct_with_clo1(data,  ((closureN)self_7311999)->elements[0], (((closure)  ((closureN)self_7311999)->elements[0])->fn),  Cyc_display_va(data, 2,((closureN)self_7311999)->elements[1], r_734581));; 
++return_direct_with_clo1(data,  ((closureN)self_7311992)->elements[0], (((closure)  ((closureN)self_7311992)->elements[0])->fn),  Cyc_display_va(data, 2,((closureN)self_7311992)->elements[1], r_734574));; 
  }
  
 -static void __lambda_318(void *data, object _, int argc, object *args) /* closure _,object k_735019, object port_73418_733061_raw, ... */
-+static void __lambda_318(void *data, object _, int argc, object *args) /* closure _,object k_734574, object port_73418_732721_raw, ... */
++static void __lambda_318(void *data, object _, int argc, object *args) /* closure _,object k_734567, object port_73418_732714_raw, ... */
   {
 -object k_735019 = args[0];
 -load_varargs(port_73418_733061, args, 1, argc - 1);
--  Cyc_st_add(data, "scheme/base.sld:flush-output-port");
-+object k_734574 = args[0];
-+load_varargs(port_73418_732721, args, 1, argc - 1);
-+  Cyc_st_add(data, "base.sld:flush-output-port");
++object k_734567 = args[0];
++load_varargs(port_73418_732714, args, 1, argc - 1);
+   Cyc_st_add(data, "scheme/base.sld:flush-output-port");
    
 -if( (boolean_f != Cyc_is_null(port_73418_733061)) ){ 
-+if( (boolean_f != Cyc_is_null(port_73418_732721)) ){ 
++if( (boolean_f != Cyc_is_null(port_73418_732714)) ){ 
    
 -closureN_type c_7317169;
 -object e_7317174 [1];
@@ -54897,53 +55125,52 @@ Make let-values be the same as let*-values, to work around
 -c_7317169.num_elements = 1;
 -c_7317169.elements = (object *)e_7317174;
 -c_7317169.elements[0] = k_735019;
-+closureN_type c_7315876;
-+object e_7315881 [1];
-+c_7315876.hdr.mark = gc_color_red;
-+ c_7315876.hdr.grayed = 0;
-+c_7315876.tag = closureN_tag;
-+ c_7315876.fn = (function_type)__lambda_319;
-+c_7315876.num_args = 1;
-+c_7315876.num_elements = 1;
-+c_7315876.elements = (object *)e_7315881;
-+c_7315876.elements[0] = k_734574;
++closureN_type c_7315869;
++object e_7315874 [1];
++c_7315869.hdr.mark = gc_color_red;
++ c_7315869.hdr.grayed = 0;
++c_7315869.tag = closureN_tag;
++ c_7315869.fn = (function_type)__lambda_319;
++c_7315869.num_args = 1;
++c_7315869.num_elements = 1;
++c_7315869.elements = (object *)e_7315874;
++c_7315869.elements[0] = k_734567;
  
 -return_direct_with_clo1(data,  __glo_current_91output_91port_scheme_base, (((closure)  __glo_current_91output_91port_scheme_base)->fn),  &c_7317169);
-+return_direct_with_clo1(data,  __glo_current_91output_91port_scheme_base, (((closure)  __glo_current_91output_91port_scheme_base)->fn),  &c_7315876);
++return_direct_with_clo1(data,  __glo_current_91output_91port_scheme_base, (((closure)  __glo_current_91output_91port_scheme_base)->fn),  &c_7315869);
  } else { 
    
  
  
  
 -return_direct_with_clo1(data,  k_735019, (((closure)  k_735019)->fn),  Cyc_io_flush_output_port(data, Cyc_car(data, port_73418_733061)));}
-+return_direct_with_clo1(data,  k_734574, (((closure)  k_734574)->fn),  Cyc_io_flush_output_port(data, Cyc_car(data, port_73418_732721)));}
++return_direct_with_clo1(data,  k_734567, (((closure)  k_734567)->fn),  Cyc_io_flush_output_port(data, Cyc_car(data, port_73418_732714)));}
  ;; 
  }
  
 -static void __lambda_319(void *data, object self_7313244, int argc, object *args) /* object self_7313244, object r_735021 */
-+static void __lambda_319(void *data, object self_7311998, int argc, object *args) /* object self_7311998, object r_734576 */
++static void __lambda_319(void *data, object self_7311991, int argc, object *args) /* object self_7311991, object r_734569 */
   {
 - object r_735021 = args[0];
-+ object r_734576 = args[0];
++ object r_734569 = args[0];
    
  
 -return_direct_with_clo1(data,  ((closureN)self_7313244)->elements[0], (((closure)  ((closureN)self_7313244)->elements[0])->fn),  Cyc_io_flush_output_port(data, r_735021));; 
-+return_direct_with_clo1(data,  ((closureN)self_7311998)->elements[0], (((closure)  ((closureN)self_7311998)->elements[0])->fn),  Cyc_io_flush_output_port(data, r_734576));; 
++return_direct_with_clo1(data,  ((closureN)self_7311991)->elements[0], (((closure)  ((closureN)self_7311991)->elements[0])->fn),  Cyc_io_flush_output_port(data, r_734569));; 
  }
  
 -static void __lambda_316(void *data, object _, int argc, object *args) /* closure _,object k_735014, object obj_73416_733060 */
-+static void __lambda_316(void *data, object _, int argc, object *args) /* closure _,object k_734569, object obj_73416_732720 */
++static void __lambda_316(void *data, object _, int argc, object *args) /* closure _,object k_734562, object obj_73416_732713 */
   {
 -object k_735014 = args[0]; object obj_73416_733060 = args[1];
--  Cyc_st_add(data, "scheme/base.sld:textual-port?");
-+object k_734569 = args[0]; object obj_73416_732720 = args[1];
-+  Cyc_st_add(data, "base.sld:textual-port?");
++object k_734562 = args[0]; object obj_73416_732713 = args[1];
+   Cyc_st_add(data, "scheme/base.sld:textual-port?");
    
 -if( (boolean_f != Cyc_is_port(obj_73416_733060)) ){ 
-+if( (boolean_f != Cyc_is_port(obj_73416_732720)) ){ 
++if( (boolean_f != Cyc_is_port(obj_73416_732713)) ){ 
      
 -if( (boolean_f != Cyc_is_port(obj_73416_733060)) ){ 
-+if( (boolean_f != Cyc_is_port(obj_73416_732720)) ){ 
++if( (boolean_f != Cyc_is_port(obj_73416_732713)) ){ 
    
 -closureN_type c_7317157;
 -object e_7317162 [1];
@@ -54955,59 +55182,58 @@ Make let-values be the same as let*-values, to work around
 -c_7317157.num_elements = 1;
 -c_7317157.elements = (object *)e_7317162;
 -c_7317157.elements[0] = k_735014;
-+closureN_type c_7315864;
-+object e_7315869 [1];
-+c_7315864.hdr.mark = gc_color_red;
-+ c_7315864.hdr.grayed = 0;
-+c_7315864.tag = closureN_tag;
-+ c_7315864.fn = (function_type)__lambda_317;
-+c_7315864.num_args = 1;
-+c_7315864.num_elements = 1;
-+c_7315864.elements = (object *)e_7315869;
-+c_7315864.elements[0] = k_734569;
++closureN_type c_7315857;
++object e_7315862 [1];
++c_7315857.hdr.mark = gc_color_red;
++ c_7315857.hdr.grayed = 0;
++c_7315857.tag = closureN_tag;
++ c_7315857.fn = (function_type)__lambda_317;
++c_7315857.num_args = 1;
++c_7315857.num_elements = 1;
++c_7315857.elements = (object *)e_7315862;
++c_7315857.elements[0] = k_734562;
  
 -return_direct_with_clo2(data,  __glo__191binary_91port_127_scheme_base, (((closure)  __glo__191binary_91port_127_scheme_base)->fn),  &c_7317157, obj_73416_733060);
-+return_direct_with_clo2(data,  __glo__191binary_91port_127_scheme_base, (((closure)  __glo__191binary_91port_127_scheme_base)->fn),  &c_7315864, obj_73416_732720);
++return_direct_with_clo2(data,  __glo__191binary_91port_127_scheme_base, (((closure)  __glo__191binary_91port_127_scheme_base)->fn),  &c_7315857, obj_73416_732713);
  } else { 
 -  return_direct_with_clo1(data,  k_735014, (((closure)  k_735014)->fn),  boolean_t);}
-+  return_direct_with_clo1(data,  k_734569, (((closure)  k_734569)->fn),  boolean_t);}
++  return_direct_with_clo1(data,  k_734562, (((closure)  k_734562)->fn),  boolean_t);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_735014, (((closure)  k_735014)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_734569, (((closure)  k_734569)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_734562, (((closure)  k_734562)->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_317(void *data, object self_7313243, int argc, object *args) /* object self_7313243, object r_735016_7312653 */
-+static void __lambda_317(void *data, object self_7311997, int argc, object *args) /* object self_7311997, object r_734571_7311407 */
++static void __lambda_317(void *data, object self_7311990, int argc, object *args) /* object self_7311990, object r_734564_7311400 */
   {
 - object r_735016_7312653 = args[0];
 -  if( (boolean_f != r_735016_7312653) ){ 
 -  return_direct_with_clo1(data,  ((closureN)self_7313243)->elements[0], (((closure)  ((closureN)self_7313243)->elements[0])->fn),  boolean_f);
-+ object r_734571_7311407 = args[0];
-+  if( (boolean_f != r_734571_7311407) ){ 
-+  return_direct_with_clo1(data,  ((closureN)self_7311997)->elements[0], (((closure)  ((closureN)self_7311997)->elements[0])->fn),  boolean_f);
++ object r_734564_7311400 = args[0];
++  if( (boolean_f != r_734564_7311400) ){ 
++  return_direct_with_clo1(data,  ((closureN)self_7311990)->elements[0], (((closure)  ((closureN)self_7311990)->elements[0])->fn),  boolean_f);
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7313243)->elements[0], (((closure)  ((closureN)self_7313243)->elements[0])->fn),  boolean_t);}
-+  return_direct_with_clo1(data,  ((closureN)self_7311997)->elements[0], (((closure)  ((closureN)self_7311997)->elements[0])->fn),  boolean_t);}
++  return_direct_with_clo1(data,  ((closureN)self_7311990)->elements[0], (((closure)  ((closureN)self_7311990)->elements[0])->fn),  boolean_t);}
  ;; 
  }
  
 -static void __lambda_315(void *data, object _, int argc, object *args) /* closure _,object k_735010, object obj_73414_733059 */
-+static void __lambda_315(void *data, object _, int argc, object *args) /* closure _,object k_734565, object obj_73414_732719 */
++static void __lambda_315(void *data, object _, int argc, object *args) /* closure _,object k_734558, object obj_73414_732712 */
   {
 -object k_735010 = args[0]; object obj_73414_733059 = args[1];
--  Cyc_st_add(data, "scheme/base.sld:binary-port?");
-+object k_734565 = args[0]; object obj_73414_732719 = args[1];
-+  Cyc_st_add(data, "base.sld:binary-port?");
++object k_734558 = args[0]; object obj_73414_732712 = args[1];
+   Cyc_st_add(data, "scheme/base.sld:binary-port?");
    
 -if( (boolean_f != Cyc_is_port(obj_73414_733059)) ){ 
 -  return_direct_with_clo2(data,  __glo__191binary_91port_127_scheme_base, (((closure)  __glo__191binary_91port_127_scheme_base)->fn),  k_735010, obj_73414_733059);
-+if( (boolean_f != Cyc_is_port(obj_73414_732719)) ){ 
-+  return_direct_with_clo2(data,  __glo__191binary_91port_127_scheme_base, (((closure)  __glo__191binary_91port_127_scheme_base)->fn),  k_734565, obj_73414_732719);
++if( (boolean_f != Cyc_is_port(obj_73414_732712)) ){ 
++  return_direct_with_clo2(data,  __glo__191binary_91port_127_scheme_base, (((closure)  __glo__191binary_91port_127_scheme_base)->fn),  k_734558, obj_73414_732712);
  } else { 
 -  return_direct_with_clo1(data,  k_735010, (((closure)  k_735010)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_734565, (((closure)  k_734565)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_734558, (((closure)  k_734558)->fn),  boolean_f);}
  ;; 
  }
  
@@ -55019,11 +55245,14 @@ Make let-values be the same as let*-values, to work around
          }
          return_closcall1(data, k, rv);  }
 -static void __lambda_303(void *data, object _, int argc, object *args) /* closure _,object k_734988, object k_73396_733049, object opts_73397_733050_raw, ... */
-- {
++static void __lambda_303(void *data, object _, int argc, object *args) /* closure _,object k_734536, object k_73396_732702, object opts_73397_732703_raw, ... */
+  {
 -object k_734988 = args[0]; object k_73396_733049 = args[1];
 -load_varargs(opts_73397_733050, args, 2, argc - 2);
--  Cyc_st_add(data, "scheme/base.sld:read-string");
--
++object k_734536 = args[0]; object k_73396_732702 = args[1];
++load_varargs(opts_73397_732703, args, 2, argc - 2);
+   Cyc_st_add(data, "scheme/base.sld:read-string");
+ 
 -closureN_type c_7317040;
 -object e_7317049 [1];
 -c_7317040.hdr.mark = gc_color_red;
@@ -55052,8 +55281,7 @@ Make let-values be the same as let*-values, to work around
 -}
 -
 -static void __lambda_305(void *data, object self_7313231, int argc, object *args) /* object self_7313231, object port_73398_733051 */
-+static void __lambda_303(void *data, object _, int argc, object *args) /* closure _,object k_734543, object k_73396_732709, object opts_73397_732710_raw, ... */
-  {
+- {
 - object port_73398_733051 = args[0];
 -  
 -closureN_type c_7317052;
@@ -55068,70 +55296,18 @@ Make let-values be the same as let*-values, to work around
 -c_7317052.elements[0] = ((closureN)self_7313231)->elements[0];
 -c_7317052.elements[1] = ((closureN)self_7313231)->elements[1];
 -c_7317052.elements[2] = port_73398_733051;
-+object k_734543 = args[0]; object k_73396_732709 = args[1];
-+load_varargs(opts_73397_732710, args, 2, argc - 2);
-+  Cyc_st_add(data, "base.sld:read-string");
-+
-+closureN_type c_7315747;
-+object e_7315756 [1];
-+c_7315747.hdr.mark = gc_color_red;
-+ c_7315747.hdr.grayed = 0;
-+c_7315747.tag = closureN_tag;
-+ c_7315747.fn = (function_type)__lambda_304;
-+c_7315747.num_args = 0;
-+c_7315747.num_elements = 1;
-+c_7315747.elements = (object *)e_7315756;
-+c_7315747.elements[0] = opts_73397_732710;
-+
-+
-+closureN_type c_7315757;
-+object e_7315851 [2];
-+c_7315757.hdr.mark = gc_color_red;
-+ c_7315757.hdr.grayed = 0;
-+c_7315757.tag = closureN_tag;
-+ c_7315757.fn = (function_type)__lambda_305;
-+c_7315757.num_args = 1;
-+c_7315757.num_elements = 2;
-+c_7315757.elements = (object *)e_7315851;
-+c_7315757.elements[0] = k_73396_732709;
-+c_7315757.elements[1] = k_734543;
-+
-+return_direct_with_clo1(data,(closure)&c_7315747,__lambda_304,  &c_7315757);; 
-+}
-+
-+static void __lambda_305(void *data, object self_7311985, int argc, object *args) /* object self_7311985, object port_73398_732711 */
-+ {
-+ object port_73398_732711 = args[0];
-+  
-+closureN_type c_7315759;
-+object e_7315847 [3];
-+c_7315759.hdr.mark = gc_color_red;
-+ c_7315759.hdr.grayed = 0;
-+c_7315759.tag = closureN_tag;
-+ c_7315759.fn = (function_type)__lambda_306;
-+c_7315759.num_args = 1;
-+c_7315759.num_elements = 3;
-+c_7315759.elements = (object *)e_7315847;
-+c_7315759.elements[0] = ((closureN)self_7311985)->elements[0];
-+c_7315759.elements[1] = ((closureN)self_7311985)->elements[1];
-+c_7315759.elements[2] = port_73398_732711;
- 
- 
+-
+-
 -object c_7317143 = Cyc_io_peek_char(data,(closure)&c_7317052,port_73398_733051);
 -return_closcall1(data,(closure)&c_7317052,  c_7317143);; 
-+object c_7315850 = Cyc_io_peek_char(data,(closure)&c_7315759,port_73398_732711);
-+return_closcall1(data,(closure)&c_7315759,  c_7315850);; 
- }
- 
+-}
+-
 -static void __lambda_306(void *data, object self_7313232, int argc, object *args) /* object self_7313232, object r_735005 */
-+static void __lambda_306(void *data, object self_7311986, int argc, object *args) /* object self_7311986, object r_734560 */
-  {
+- {
 - object r_735005 = args[0];
-+ object r_734560 = args[0];
-     
+-    
 -if( (boolean_f != Cyc_is_eof_object(r_735005)) ){ 
-+if( (boolean_f != Cyc_is_eof_object(r_734560)) ){ 
-   
+-  
 -complex_num_type local_7317059; 
 -return_direct_with_clo1(data,  ((closureN)self_7313232)->elements[1], (((closure)  ((closureN)self_7313232)->elements[1])->fn),  ((inline_function_type)
 -                   ((closure)__glo_eof_91object_191_191inline_191_191_scheme_base)->fn)(data,&local_7317059));
@@ -55150,27 +55326,9 @@ Make let-values be the same as let*-values, to work around
 -c_7317061.elements[1] = ((closureN)self_7313232)->elements[2];
 -
 -return_direct_with_clo2(data,(closure)&c_7317061,__lambda_307,  NULL, ((closureN)self_7313232)->elements[0]);}
-+complex_num_type local_7315766; 
-+return_direct_with_clo1(data,  ((closureN)self_7311986)->elements[1], (((closure)  ((closureN)self_7311986)->elements[1])->fn),  ((inline_function_type)
-+                   ((closure)__glo_eof_91object_191_191inline_191_191_scheme_base)->fn)(data,&local_7315766));
-+} else { 
-+  
-+closureN_type c_7315768;
-+object e_7315845 [2];
-+c_7315768.hdr.mark = gc_color_red;
-+ c_7315768.hdr.grayed = 0;
-+c_7315768.tag = closureN_tag;
-+ c_7315768.fn = (function_type)__lambda_307;
-+c_7315768.num_args = 2;
-+c_7315768.num_elements = 2;
-+c_7315768.elements = (object *)e_7315845;
-+c_7315768.elements[0] = ((closureN)self_7311986)->elements[1];
-+c_7315768.elements[1] = ((closureN)self_7311986)->elements[2];
-+
-+return_direct_with_clo2(data,(closure)&c_7315768,__lambda_307,  NULL, ((closureN)self_7311986)->elements[0]);}
- ;; 
- }
- 
+-;; 
+-}
+-
 -static void __lambda_307(void *data, object self_7313233, int argc, object *args) /* object self_7313233, object acc_73400_733052, object i_73401_733053 */
 - {
 - object acc_73400_733052 = args[0]; object i_73401_733053 = args[1];
@@ -55188,57 +55346,14 @@ Make let-values be the same as let*-values, to work around
 -c_7317063.elements[1] = i_73401_733053;
 -c_7317063.elements[2] = ((closureN)self_7313233)->elements[0];
 -c_7317063.elements[3] = ((closureN)self_7313233)->elements[1];
-+static void __lambda_307(void *data, object self_7311987, int argc, object *args) /* object self_7311987, object acc_73400_732712, object i_73401_732713 */
-+ {
-+ object acc_73400_732712 = args[0]; object i_73401_732713 = args[1];
-+  
-+closureN_type c_7315770;
-+object e_7315844 [4];
-+c_7315770.hdr.mark = gc_color_red;
-+ c_7315770.hdr.grayed = 0;
-+c_7315770.tag = closureN_tag;
-+ c_7315770.fn = (function_type)__lambda_308;
-+c_7315770.num_args = 1;
-+c_7315770.num_elements = 4;
-+c_7315770.elements = (object *)e_7315844;
-+c_7315770.elements[0] = acc_73400_732712;
-+c_7315770.elements[1] = i_73401_732713;
-+c_7315770.elements[2] = ((closureN)self_7311987)->elements[0];
-+c_7315770.elements[3] = ((closureN)self_7311987)->elements[1];
-+
-+return_direct_with_clo1(data,(closure)&c_7315770,__lambda_308,  boolean_f);; 
-+}
-+
-+static void __lambda_308(void *data, object self_7311988, int argc, object *args) /* object self_7311988, object loop_73403_732715 */
-+ {
-+ object loop_73403_732715 = args[0];
-+  
-+closureN_type c_7315772;
-+object e_7315840 [4];
-+c_7315772.hdr.mark = gc_color_red;
-+ c_7315772.hdr.grayed = 0;
-+c_7315772.tag = closureN_tag;
-+ c_7315772.fn = (function_type)__lambda_1297;
-+c_7315772.num_args = 1;
-+c_7315772.num_elements = 4;
-+c_7315772.elements = (object *)e_7315840;
-+c_7315772.elements[0] = ((closureN)self_7311988)->elements[0];
-+c_7315772.elements[1] = ((closureN)self_7311988)->elements[1];
-+c_7315772.elements[2] = ((closureN)self_7311988)->elements[2];
-+c_7315772.elements[3] = ((closureN)self_7311988)->elements[3];
-+
- 
+-
 -return_direct_with_clo1(data,(closure)&c_7317063,__lambda_308,  boolean_f);; 
-+pair_type local_7315843; 
-+return_direct_with_clo1(data,(closure)&c_7315772,__lambda_1297,  set_cell_as_expr(&local_7315843, loop_73403_732715));; 
- }
- 
+-}
+-
 -static void __lambda_308(void *data, object self_7313234, int argc, object *args) /* object self_7313234, object loop_73403_733055 */
-+static void __lambda_1297(void *data, object self_7311989, int argc, object *args) /* object self_7311989, object loop_73403_732715 */
-  {
+- {
 - object loop_73403_733055 = args[0];
-+ object loop_73403_732715 = args[0];
-   
+-  
 -closureN_type c_7317065;
 -object e_7317133 [4];
 -c_7317065.hdr.mark = gc_color_red;
@@ -55253,24 +55368,11 @@ Make let-values be the same as let*-values, to work around
 -c_7317065.elements[2] = ((closureN)self_7313234)->elements[2];
 -c_7317065.elements[3] = ((closureN)self_7313234)->elements[3];
 -
-+closureN_type c_7315774;
-+object e_7315788 [4];
-+c_7315774.hdr.mark = gc_color_red;
-+ c_7315774.hdr.grayed = 0;
-+c_7315774.tag = closureN_tag;
-+ c_7315774.fn = (function_type)__lambda_309;
-+c_7315774.num_args = 1;
-+c_7315774.num_elements = 4;
-+c_7315774.elements = (object *)e_7315788;
-+c_7315774.elements[0] = ((closureN)self_7311989)->elements[0];
-+c_7315774.elements[1] = ((closureN)self_7311989)->elements[1];
-+c_7315774.elements[2] = ((closureN)self_7311989)->elements[2];
-+c_7315774.elements[3] = loop_73403_732715;
- 
+-
 -pair_type local_7317136; 
 -return_direct_with_clo1(data,(closure)&c_7317065,__lambda_1344,  set_cell_as_expr(&local_7317136, loop_73403_733055));; 
 -}
- 
+-
 -static void __lambda_1344(void *data, object self_7313235, int argc, object *args) /* object self_7313235, object loop_73403_733055 */
 - {
 - object loop_73403_733055 = args[0];
@@ -55301,31 +55403,16 @@ Make let-values be the same as let*-values, to work around
 -c_7317082.elements = (object *)e_7317132;
 -c_7317082.elements[0] = loop_73403_733055;
 -c_7317082.elements[1] = ((closureN)self_7313235)->elements[3];
-+closureN_type c_7315789;
-+object e_7315839 [2];
-+c_7315789.hdr.mark = gc_color_red;
-+ c_7315789.hdr.grayed = 0;
-+c_7315789.tag = closureN_tag;
-+ c_7315789.fn = (function_type)__lambda_311;
-+c_7315789.num_args = 3;
-+c_7315789.num_elements = 2;
-+c_7315789.elements = (object *)e_7315839;
-+c_7315789.elements[0] = loop_73403_732715;
-+c_7315789.elements[1] = ((closureN)self_7311989)->elements[3];
- 
+-
 -return_direct_with_clo1(data,(closure)&c_7317067,__lambda_309,  &c_7317082);; 
-+return_direct_with_clo1(data,(closure)&c_7315774,__lambda_309,  &c_7315789);; 
- }
- 
+-}
+-
 -static void __lambda_311(void *data, object self_7313236, int argc, object *args) /* object self_7313236, object k_734994, object acc_73404_733056, object i_73405_733057, object chr_73406_733058 */
-+static void __lambda_311(void *data, object self_7311990, int argc, object *args) /* object self_7311990, object k_734549, object acc_73404_732716, object i_73405_732717, object chr_73406_732718 */
-  {
+- {
 - object k_734994 = args[0]; object acc_73404_733056 = args[1]; object i_73405_733057 = args[2]; object chr_73406_733058 = args[3];
-+ object k_734549 = args[0]; object acc_73404_732716 = args[1]; object i_73405_732717 = args[2]; object chr_73406_732718 = args[3];
-     
+-    
 -if( (boolean_f != Cyc_is_eof_object(chr_73406_733058)) ){ 
-+if( (boolean_f != Cyc_is_eof_object(chr_73406_732718)) ){ 
-   
+-  
 -closureN_type c_7317086;
 -object e_7317092 [1];
 -c_7317086.hdr.mark = gc_color_red;
@@ -55381,114 +55468,274 @@ Make let-values be the same as let*-values, to work around
 -c_7317116.elements[1] = k_734994;
 -c_7317116.elements[2] = ((closureN)self_7313236)->elements[0];
 -c_7317116.elements[3] = r_735001_738350;
-+closureN_type c_7315793;
-+object e_7315799 [1];
-+c_7315793.hdr.mark = gc_color_red;
-+ c_7315793.hdr.grayed = 0;
-+c_7315793.tag = closureN_tag;
-+ c_7315793.fn = (function_type)__lambda_312;
-+c_7315793.num_args = 1;
-+c_7315793.num_elements = 1;
-+c_7315793.elements = (object *)e_7315799;
-+c_7315793.elements[0] = k_734549;
-+
-+return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7315793, primitive_cons, NULL, acc_73404_732716);
++closureN_type c_7315740;
++object e_7315749 [1];
++c_7315740.hdr.mark = gc_color_red;
++ c_7315740.hdr.grayed = 0;
++c_7315740.tag = closureN_tag;
++ c_7315740.fn = (function_type)__lambda_304;
++c_7315740.num_args = 0;
++c_7315740.num_elements = 1;
++c_7315740.elements = (object *)e_7315749;
++c_7315740.elements[0] = opts_73397_732703;
++
++
++closureN_type c_7315750;
++object e_7315844 [2];
++c_7315750.hdr.mark = gc_color_red;
++ c_7315750.hdr.grayed = 0;
++c_7315750.tag = closureN_tag;
++ c_7315750.fn = (function_type)__lambda_305;
++c_7315750.num_args = 1;
++c_7315750.num_elements = 2;
++c_7315750.elements = (object *)e_7315844;
++c_7315750.elements[0] = k_73396_732702;
++c_7315750.elements[1] = k_734536;
++
++return_direct_with_clo1(data,(closure)&c_7315740,__lambda_304,  &c_7315750);; 
++}
++
++static void __lambda_305(void *data, object self_7311978, int argc, object *args) /* object self_7311978, object port_73398_732704 */
++ {
++ object port_73398_732704 = args[0];
++  
++closureN_type c_7315752;
++object e_7315840 [3];
++c_7315752.hdr.mark = gc_color_red;
++ c_7315752.hdr.grayed = 0;
++c_7315752.tag = closureN_tag;
++ c_7315752.fn = (function_type)__lambda_306;
++c_7315752.num_args = 1;
++c_7315752.num_elements = 3;
++c_7315752.elements = (object *)e_7315840;
++c_7315752.elements[0] = ((closureN)self_7311978)->elements[0];
++c_7315752.elements[1] = ((closureN)self_7311978)->elements[1];
++c_7315752.elements[2] = port_73398_732704;
++
++
++object c_7315843 = Cyc_io_peek_char(data,(closure)&c_7315752,port_73398_732704);
++return_closcall1(data,(closure)&c_7315752,  c_7315843);; 
++}
++
++static void __lambda_306(void *data, object self_7311979, int argc, object *args) /* object self_7311979, object r_734553 */
++ {
++ object r_734553 = args[0];
++    
++if( (boolean_f != Cyc_is_eof_object(r_734553)) ){ 
++  
++complex_num_type local_7315759; 
++return_direct_with_clo1(data,  ((closureN)self_7311979)->elements[1], (((closure)  ((closureN)self_7311979)->elements[1])->fn),  ((inline_function_type)
++                   ((closure)__glo_eof_91object_191_191inline_191_191_scheme_base)->fn)(data,&local_7315759));
++} else { 
++  
++closureN_type c_7315761;
++object e_7315838 [2];
++c_7315761.hdr.mark = gc_color_red;
++ c_7315761.hdr.grayed = 0;
++c_7315761.tag = closureN_tag;
++ c_7315761.fn = (function_type)__lambda_307;
++c_7315761.num_args = 2;
++c_7315761.num_elements = 2;
++c_7315761.elements = (object *)e_7315838;
++c_7315761.elements[0] = ((closureN)self_7311979)->elements[1];
++c_7315761.elements[1] = ((closureN)self_7311979)->elements[2];
++
++return_direct_with_clo2(data,(closure)&c_7315761,__lambda_307,  NULL, ((closureN)self_7311979)->elements[0]);}
++;; 
++}
++
++static void __lambda_307(void *data, object self_7311980, int argc, object *args) /* object self_7311980, object acc_73400_732705, object i_73401_732706 */
++ {
++ object acc_73400_732705 = args[0]; object i_73401_732706 = args[1];
++  
++closureN_type c_7315763;
++object e_7315837 [4];
++c_7315763.hdr.mark = gc_color_red;
++ c_7315763.hdr.grayed = 0;
++c_7315763.tag = closureN_tag;
++ c_7315763.fn = (function_type)__lambda_308;
++c_7315763.num_args = 1;
++c_7315763.num_elements = 4;
++c_7315763.elements = (object *)e_7315837;
++c_7315763.elements[0] = acc_73400_732705;
++c_7315763.elements[1] = i_73401_732706;
++c_7315763.elements[2] = ((closureN)self_7311980)->elements[0];
++c_7315763.elements[3] = ((closureN)self_7311980)->elements[1];
++
++return_direct_with_clo1(data,(closure)&c_7315763,__lambda_308,  boolean_f);; 
++}
++
++static void __lambda_308(void *data, object self_7311981, int argc, object *args) /* object self_7311981, object loop_73403_732708 */
++ {
++ object loop_73403_732708 = args[0];
++  
++closureN_type c_7315765;
++object e_7315833 [4];
++c_7315765.hdr.mark = gc_color_red;
++ c_7315765.hdr.grayed = 0;
++c_7315765.tag = closureN_tag;
++ c_7315765.fn = (function_type)__lambda_1297;
++c_7315765.num_args = 1;
++c_7315765.num_elements = 4;
++c_7315765.elements = (object *)e_7315833;
++c_7315765.elements[0] = ((closureN)self_7311981)->elements[0];
++c_7315765.elements[1] = ((closureN)self_7311981)->elements[1];
++c_7315765.elements[2] = ((closureN)self_7311981)->elements[2];
++c_7315765.elements[3] = ((closureN)self_7311981)->elements[3];
++
++
++pair_type local_7315836; 
++return_direct_with_clo1(data,(closure)&c_7315765,__lambda_1297,  set_cell_as_expr(&local_7315836, loop_73403_732708));; 
++}
++
++static void __lambda_1297(void *data, object self_7311982, int argc, object *args) /* object self_7311982, object loop_73403_732708 */
++ {
++ object loop_73403_732708 = args[0];
++  
++closureN_type c_7315767;
++object e_7315781 [4];
++c_7315767.hdr.mark = gc_color_red;
++ c_7315767.hdr.grayed = 0;
++c_7315767.tag = closureN_tag;
++ c_7315767.fn = (function_type)__lambda_309;
++c_7315767.num_args = 1;
++c_7315767.num_elements = 4;
++c_7315767.elements = (object *)e_7315781;
++c_7315767.elements[0] = ((closureN)self_7311982)->elements[0];
++c_7315767.elements[1] = ((closureN)self_7311982)->elements[1];
++c_7315767.elements[2] = ((closureN)self_7311982)->elements[2];
++c_7315767.elements[3] = loop_73403_732708;
++
++
++closureN_type c_7315782;
++object e_7315832 [2];
++c_7315782.hdr.mark = gc_color_red;
++ c_7315782.hdr.grayed = 0;
++c_7315782.tag = closureN_tag;
++ c_7315782.fn = (function_type)__lambda_311;
++c_7315782.num_args = 3;
++c_7315782.num_elements = 2;
++c_7315782.elements = (object *)e_7315832;
++c_7315782.elements[0] = loop_73403_732708;
++c_7315782.elements[1] = ((closureN)self_7311982)->elements[3];
++
++return_direct_with_clo1(data,(closure)&c_7315767,__lambda_309,  &c_7315782);; 
++}
++
++static void __lambda_311(void *data, object self_7311983, int argc, object *args) /* object self_7311983, object k_734542, object acc_73404_732709, object i_73405_732710, object chr_73406_732711 */
++ {
++ object k_734542 = args[0]; object acc_73404_732709 = args[1]; object i_73405_732710 = args[2]; object chr_73406_732711 = args[3];
++    
++if( (boolean_f != Cyc_is_eof_object(chr_73406_732711)) ){ 
++  
++closureN_type c_7315786;
++object e_7315792 [1];
++c_7315786.hdr.mark = gc_color_red;
++ c_7315786.hdr.grayed = 0;
++c_7315786.tag = closureN_tag;
++ c_7315786.fn = (function_type)__lambda_312;
++c_7315786.num_args = 1;
++c_7315786.num_elements = 1;
++c_7315786.elements = (object *)e_7315792;
++c_7315786.elements[0] = k_734542;
++
++return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7315786, primitive_cons, NULL, acc_73404_732709);
 +} else { 
 +    
-+if( (boolean_f != Cyc_num_fast_eq_op(data, i_73405_732717, obj_int2obj(0))) ){ 
-+  object r_734554_737579;
-+  if( (boolean_f != chr_73406_732718) ){ 
-+  object local_7315806 = alloca(sizeof(pair_type)); 
-+  r_734554_737579 = set_pair_as_expr(local_7315806, chr_73406_732718, acc_73404_732716);
++if( (boolean_f != Cyc_num_fast_eq_op(data, i_73405_732710, obj_int2obj(0))) ){ 
++  object r_734547_737572;
++  if( (boolean_f != chr_73406_732711) ){ 
++  object local_7315799 = alloca(sizeof(pair_type)); 
++  r_734547_737572 = set_pair_as_expr(local_7315799, chr_73406_732711, acc_73404_732709);
 +} else { 
-+  r_734554_737579 = acc_73404_732716;}
++  r_734547_737572 = acc_73404_732709;}
 +;
-+closureN_type c_7315809;
-+object e_7315815 [1];
-+c_7315809.hdr.mark = gc_color_red;
-+ c_7315809.hdr.grayed = 0;
-+c_7315809.tag = closureN_tag;
-+ c_7315809.fn = (function_type)__lambda_313;
-+c_7315809.num_args = 1;
-+c_7315809.num_elements = 1;
-+c_7315809.elements = (object *)e_7315815;
-+c_7315809.elements[0] = k_734549;
-+
-+return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7315809, primitive_cons, NULL, r_734554_737579);
++closureN_type c_7315802;
++object e_7315808 [1];
++c_7315802.hdr.mark = gc_color_red;
++ c_7315802.hdr.grayed = 0;
++c_7315802.tag = closureN_tag;
++ c_7315802.fn = (function_type)__lambda_313;
++c_7315802.num_args = 1;
++c_7315802.num_elements = 1;
++c_7315802.elements = (object *)e_7315808;
++c_7315802.elements[0] = k_734542;
++
++return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  &c_7315802, primitive_cons, NULL, r_734547_737572);
 +} else { 
-+  object r_734556_737582;
-+  if( (boolean_f != chr_73406_732718) ){ 
-+  object local_7315820 = alloca(sizeof(pair_type)); 
-+  r_734556_737582 = set_pair_as_expr(local_7315820, chr_73406_732718, acc_73404_732716);
++  object r_734549_737575;
++  if( (boolean_f != chr_73406_732711) ){ 
++  object local_7315813 = alloca(sizeof(pair_type)); 
++  r_734549_737575 = set_pair_as_expr(local_7315813, chr_73406_732711, acc_73404_732709);
 +} else { 
-+  r_734556_737582 = acc_73404_732716;}
++  r_734549_737575 = acc_73404_732709;}
 +;
-+closureN_type c_7315823;
-+object e_7315834 [4];
-+c_7315823.hdr.mark = gc_color_red;
-+ c_7315823.hdr.grayed = 0;
-+c_7315823.tag = closureN_tag;
-+ c_7315823.fn = (function_type)__lambda_314;
-+c_7315823.num_args = 1;
-+c_7315823.num_elements = 4;
-+c_7315823.elements = (object *)e_7315834;
-+c_7315823.elements[0] = i_73405_732717;
-+c_7315823.elements[1] = k_734549;
-+c_7315823.elements[2] = ((closureN)self_7311990)->elements[0];
-+c_7315823.elements[3] = r_734556_737582;
++closureN_type c_7315816;
++object e_7315827 [4];
++c_7315816.hdr.mark = gc_color_red;
++ c_7315816.hdr.grayed = 0;
++c_7315816.tag = closureN_tag;
++ c_7315816.fn = (function_type)__lambda_314;
++c_7315816.num_args = 1;
++c_7315816.num_elements = 4;
++c_7315816.elements = (object *)e_7315827;
++c_7315816.elements[0] = i_73405_732710;
++c_7315816.elements[1] = k_734542;
++c_7315816.elements[2] = ((closureN)self_7311983)->elements[0];
++c_7315816.elements[3] = r_734549_737575;
  
  
 -object c_7317130 = Cyc_io_read_char(data,(closure)&c_7317116,((closureN)self_7313236)->elements[1]);
 -return_closcall1(data,(closure)&c_7317116,  c_7317130);}
-+object c_7315837 = Cyc_io_read_char(data,(closure)&c_7315823,((closureN)self_7311990)->elements[1]);
-+return_closcall1(data,(closure)&c_7315823,  c_7315837);}
++object c_7315830 = Cyc_io_read_char(data,(closure)&c_7315816,((closureN)self_7311983)->elements[1]);
++return_closcall1(data,(closure)&c_7315816,  c_7315830);}
  ;}
  ;; 
  }
  
 -static void __lambda_314(void *data, object self_7313239, int argc, object *args) /* object self_7313239, object r_735003_738351 */
-+static void __lambda_314(void *data, object self_7311993, int argc, object *args) /* object self_7311993, object r_734558_737583 */
++static void __lambda_314(void *data, object self_7311986, int argc, object *args) /* object self_7311986, object r_734551_737576 */
   {
 - object r_735003_738351 = args[0];
-+ object r_734558_737583 = args[0];
++ object r_734551_737576 = args[0];
    
  
  
 -complex_num_type local_7317125; 
 -return_closcall4(data,  car(((closureN)self_7313239)->elements[2]),  ((closureN)self_7313239)->elements[1], ((closureN)self_7313239)->elements[3], Cyc_fast_sub(data,&local_7317125, ((closureN)self_7313239)->elements[0], obj_int2obj(1)), r_735003_738351);; 
-+complex_num_type local_7315832; 
-+return_closcall4(data,  car(((closureN)self_7311993)->elements[2]),  ((closureN)self_7311993)->elements[1], ((closureN)self_7311993)->elements[3], Cyc_fast_sub(data,&local_7315832, ((closureN)self_7311993)->elements[0], obj_int2obj(1)), r_734558_737583);; 
++complex_num_type local_7315825; 
++return_closcall4(data,  car(((closureN)self_7311986)->elements[2]),  ((closureN)self_7311986)->elements[1], ((closureN)self_7311986)->elements[3], Cyc_fast_sub(data,&local_7315825, ((closureN)self_7311986)->elements[0], obj_int2obj(1)), r_734551_737576);; 
  }
  
 -static void __lambda_313(void *data, object self_7313238, int argc, object *args) /* object self_7313238, object r_734998_738348_7312652 */
-+static void __lambda_313(void *data, object self_7311992, int argc, object *args) /* object self_7311992, object r_734553_737580_7311406 */
++static void __lambda_313(void *data, object self_7311985, int argc, object *args) /* object self_7311985, object r_734546_737573_7311399 */
   {
 - object r_734998_738348_7312652 = args[0];
-+ object r_734553_737580_7311406 = args[0];
++ object r_734546_737573_7311399 = args[0];
    
 -object c_7317107 = Cyc_list2string(data,  ((closureN)self_7313238)->elements[0],r_734998_738348_7312652);
 -return_direct_with_clo1(data,  ((closureN)self_7313238)->elements[0], (((closure)  ((closureN)self_7313238)->elements[0])->fn),  c_7317107);; 
-+object c_7315814 = Cyc_list2string(data,  ((closureN)self_7311992)->elements[0],r_734553_737580_7311406);
-+return_direct_with_clo1(data,  ((closureN)self_7311992)->elements[0], (((closure)  ((closureN)self_7311992)->elements[0])->fn),  c_7315814);; 
++object c_7315807 = Cyc_list2string(data,  ((closureN)self_7311985)->elements[0],r_734546_737573_7311399);
++return_direct_with_clo1(data,  ((closureN)self_7311985)->elements[0], (((closure)  ((closureN)self_7311985)->elements[0])->fn),  c_7315807);; 
  }
  
 -static void __lambda_312(void *data, object self_7313237, int argc, object *args) /* object self_7313237, object r_734996_7312651 */
-+static void __lambda_312(void *data, object self_7311991, int argc, object *args) /* object self_7311991, object r_734551_7311405 */
++static void __lambda_312(void *data, object self_7311984, int argc, object *args) /* object self_7311984, object r_734544_7311398 */
   {
 - object r_734996_7312651 = args[0];
-+ object r_734551_7311405 = args[0];
++ object r_734544_7311398 = args[0];
    
 -object c_7317091 = Cyc_list2string(data,  ((closureN)self_7313237)->elements[0],r_734996_7312651);
 -return_direct_with_clo1(data,  ((closureN)self_7313237)->elements[0], (((closure)  ((closureN)self_7313237)->elements[0])->fn),  c_7317091);; 
-+object c_7315798 = Cyc_list2string(data,  ((closureN)self_7311991)->elements[0],r_734551_7311405);
-+return_direct_with_clo1(data,  ((closureN)self_7311991)->elements[0], (((closure)  ((closureN)self_7311991)->elements[0])->fn),  c_7315798);; 
++object c_7315791 = Cyc_list2string(data,  ((closureN)self_7311984)->elements[0],r_734544_7311398);
++return_direct_with_clo1(data,  ((closureN)self_7311984)->elements[0], (((closure)  ((closureN)self_7311984)->elements[0])->fn),  c_7315791);; 
  }
  
 -static void __lambda_309(void *data, object self_7313240, int argc, object *args) /* object self_7313240, object r_734993 */
-+static void __lambda_309(void *data, object self_7311994, int argc, object *args) /* object self_7311994, object r_734548 */
++static void __lambda_309(void *data, object self_7311987, int argc, object *args) /* object self_7311987, object r_734541 */
   {
 - object r_734993 = args[0];
-+ object r_734548 = args[0];
++ object r_734541 = args[0];
    
 -closureN_type c_7317069;
 -object e_7317077 [4];
@@ -55503,66 +55750,65 @@ Make let-values be the same as let*-values, to work around
 -c_7317069.elements[1] = ((closureN)self_7313240)->elements[1];
 -c_7317069.elements[2] = ((closureN)self_7313240)->elements[2];
 -c_7317069.elements[3] = ((closureN)self_7313240)->elements[3];
-+closureN_type c_7315776;
-+object e_7315784 [4];
-+c_7315776.hdr.mark = gc_color_red;
-+ c_7315776.hdr.grayed = 0;
-+c_7315776.tag = closureN_tag;
-+ c_7315776.fn = (function_type)__lambda_310;
-+c_7315776.num_args = 1;
-+c_7315776.num_elements = 4;
-+c_7315776.elements = (object *)e_7315784;
-+c_7315776.elements[0] = ((closureN)self_7311994)->elements[0];
-+c_7315776.elements[1] = ((closureN)self_7311994)->elements[1];
-+c_7315776.elements[2] = ((closureN)self_7311994)->elements[2];
-+c_7315776.elements[3] = ((closureN)self_7311994)->elements[3];
++closureN_type c_7315769;
++object e_7315777 [4];
++c_7315769.hdr.mark = gc_color_red;
++ c_7315769.hdr.grayed = 0;
++c_7315769.tag = closureN_tag;
++ c_7315769.fn = (function_type)__lambda_310;
++c_7315769.num_args = 1;
++c_7315769.num_elements = 4;
++c_7315769.elements = (object *)e_7315777;
++c_7315769.elements[0] = ((closureN)self_7311987)->elements[0];
++c_7315769.elements[1] = ((closureN)self_7311987)->elements[1];
++c_7315769.elements[2] = ((closureN)self_7311987)->elements[2];
++c_7315769.elements[3] = ((closureN)self_7311987)->elements[3];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7317069,__lambda_310,  Cyc_set_cell(data, ((closureN)self_7313240)->elements[3], r_734993));; 
-+return_direct_with_clo1(data,(closure)&c_7315776,__lambda_310,  Cyc_set_cell(data, ((closureN)self_7311994)->elements[3], r_734548));; 
++return_direct_with_clo1(data,(closure)&c_7315769,__lambda_310,  Cyc_set_cell(data, ((closureN)self_7311987)->elements[3], r_734541));; 
  }
  
 -static void __lambda_310(void *data, object self_7313241, int argc, object *args) /* object self_7313241, object r_734992 */
-+static void __lambda_310(void *data, object self_7311995, int argc, object *args) /* object self_7311995, object r_734547 */
++static void __lambda_310(void *data, object self_7311988, int argc, object *args) /* object self_7311988, object r_734540 */
   {
  
    
  
 -return_closcall4(data,  car(((closureN)self_7313241)->elements[3]),  ((closureN)self_7313241)->elements[2], ((closureN)self_7313241)->elements[0], ((closureN)self_7313241)->elements[1], boolean_f);; 
-+return_closcall4(data,  car(((closureN)self_7311995)->elements[3]),  ((closureN)self_7311995)->elements[2], ((closureN)self_7311995)->elements[0], ((closureN)self_7311995)->elements[1], boolean_f);; 
++return_closcall4(data,  car(((closureN)self_7311988)->elements[3]),  ((closureN)self_7311988)->elements[2], ((closureN)self_7311988)->elements[0], ((closureN)self_7311988)->elements[1], boolean_f);; 
  }
  
 -static void __lambda_304(void *data, object self_7313242, int argc, object *args) /* object self_7313242, object k_735006 */
-+static void __lambda_304(void *data, object self_7311996, int argc, object *args) /* object self_7311996, object k_734561 */
++static void __lambda_304(void *data, object self_7311989, int argc, object *args) /* object self_7311989, object k_734554 */
   {
 - object k_735006 = args[0];
-+ object k_734561 = args[0];
++ object k_734554 = args[0];
      
 -if( (boolean_f != Cyc_is_null(((closureN)self_7313242)->elements[0])) ){ 
 -  return_direct_with_clo1(data,  __glo_current_91input_91port_scheme_base, (((closure)  __glo_current_91input_91port_scheme_base)->fn),  k_735006);
-+if( (boolean_f != Cyc_is_null(((closureN)self_7311996)->elements[0])) ){ 
-+  return_direct_with_clo1(data,  __glo_current_91input_91port_scheme_base, (((closure)  __glo_current_91input_91port_scheme_base)->fn),  k_734561);
++if( (boolean_f != Cyc_is_null(((closureN)self_7311989)->elements[0])) ){ 
++  return_direct_with_clo1(data,  __glo_current_91input_91port_scheme_base, (((closure)  __glo_current_91input_91port_scheme_base)->fn),  k_734554);
  } else { 
    
  
 -return_direct_with_clo1(data,  k_735006, (((closure)  k_735006)->fn),  Cyc_car(data, ((closureN)self_7313242)->elements[0]));}
-+return_direct_with_clo1(data,  k_734561, (((closure)  k_734561)->fn),  Cyc_car(data, ((closureN)self_7311996)->elements[0]));}
++return_direct_with_clo1(data,  k_734554, (((closure)  k_734554)->fn),  Cyc_car(data, ((closureN)self_7311989)->elements[0]));}
  ;; 
  }
  
 -static void __lambda_301(void *data, object _, int argc, object *args) /* closure _,object k_734982, object port_73395_733048_raw, ... */
-+static void __lambda_301(void *data, object _, int argc, object *args) /* closure _,object k_734537, object port_73395_732708_raw, ... */
++static void __lambda_301(void *data, object _, int argc, object *args) /* closure _,object k_734530, object port_73395_732701_raw, ... */
   {
 -object k_734982 = args[0];
 -load_varargs(port_73395_733048, args, 1, argc - 1);
--  Cyc_st_add(data, "scheme/base.sld:read-line");
-+object k_734537 = args[0];
-+load_varargs(port_73395_732708, args, 1, argc - 1);
-+  Cyc_st_add(data, "base.sld:read-line");
++object k_734530 = args[0];
++load_varargs(port_73395_732701, args, 1, argc - 1);
+   Cyc_st_add(data, "scheme/base.sld:read-line");
    
 -if( (boolean_f != Cyc_is_null(port_73395_733048)) ){ 
-+if( (boolean_f != Cyc_is_null(port_73395_732708)) ){ 
++if( (boolean_f != Cyc_is_null(port_73395_732701)) ){ 
    
 -closureN_type c_7317025;
 -object e_7317031 [1];
@@ -55574,54 +55820,53 @@ Make let-values be the same as let*-values, to work around
 -c_7317025.num_elements = 1;
 -c_7317025.elements = (object *)e_7317031;
 -c_7317025.elements[0] = k_734982;
-+closureN_type c_7315732;
-+object e_7315738 [1];
-+c_7315732.hdr.mark = gc_color_red;
-+ c_7315732.hdr.grayed = 0;
-+c_7315732.tag = closureN_tag;
-+ c_7315732.fn = (function_type)__lambda_302;
-+c_7315732.num_args = 1;
-+c_7315732.num_elements = 1;
-+c_7315732.elements = (object *)e_7315738;
-+c_7315732.elements[0] = k_734537;
++closureN_type c_7315725;
++object e_7315731 [1];
++c_7315725.hdr.mark = gc_color_red;
++ c_7315725.hdr.grayed = 0;
++c_7315725.tag = closureN_tag;
++ c_7315725.fn = (function_type)__lambda_302;
++c_7315725.num_args = 1;
++c_7315725.num_elements = 1;
++c_7315725.elements = (object *)e_7315731;
++c_7315725.elements[0] = k_734530;
  
 -return_direct_with_clo1(data,  __glo_current_91input_91port_scheme_base, (((closure)  __glo_current_91input_91port_scheme_base)->fn),  &c_7317025);
-+return_direct_with_clo1(data,  __glo_current_91input_91port_scheme_base, (((closure)  __glo_current_91input_91port_scheme_base)->fn),  &c_7315732);
++return_direct_with_clo1(data,  __glo_current_91input_91port_scheme_base, (((closure)  __glo_current_91input_91port_scheme_base)->fn),  &c_7315725);
  } else { 
    
  
  
 -object c_7317035 = Cyc_io_read_line(data,  k_734982,Cyc_car(data, port_73395_733048));
 -return_direct_with_clo1(data,  k_734982, (((closure)  k_734982)->fn),  c_7317035);}
-+object c_7315742 = Cyc_io_read_line(data,  k_734537,Cyc_car(data, port_73395_732708));
-+return_direct_with_clo1(data,  k_734537, (((closure)  k_734537)->fn),  c_7315742);}
++object c_7315735 = Cyc_io_read_line(data,  k_734530,Cyc_car(data, port_73395_732701));
++return_direct_with_clo1(data,  k_734530, (((closure)  k_734530)->fn),  c_7315735);}
  ;; 
  }
  
 -static void __lambda_302(void *data, object self_7313230, int argc, object *args) /* object self_7313230, object r_734984 */
-+static void __lambda_302(void *data, object self_7311984, int argc, object *args) /* object self_7311984, object r_734539 */
++static void __lambda_302(void *data, object self_7311977, int argc, object *args) /* object self_7311977, object r_734532 */
   {
 - object r_734984 = args[0];
-+ object r_734539 = args[0];
++ object r_734532 = args[0];
    
 -object c_7317030 = Cyc_io_read_line(data,  ((closureN)self_7313230)->elements[0],r_734984);
 -return_direct_with_clo1(data,  ((closureN)self_7313230)->elements[0], (((closure)  ((closureN)self_7313230)->elements[0])->fn),  c_7317030);; 
-+object c_7315737 = Cyc_io_read_line(data,  ((closureN)self_7311984)->elements[0],r_734539);
-+return_direct_with_clo1(data,  ((closureN)self_7311984)->elements[0], (((closure)  ((closureN)self_7311984)->elements[0])->fn),  c_7315737);; 
++object c_7315730 = Cyc_io_read_line(data,  ((closureN)self_7311977)->elements[0],r_734532);
++return_direct_with_clo1(data,  ((closureN)self_7311977)->elements[0], (((closure)  ((closureN)self_7311977)->elements[0])->fn),  c_7315730);; 
  }
  
 -static void __lambda_299(void *data, object _, int argc, object *args) /* closure _,object k_734976, object port_73394_733047_raw, ... */
-+static void __lambda_299(void *data, object _, int argc, object *args) /* closure _,object k_734531, object port_73394_732707_raw, ... */
++static void __lambda_299(void *data, object _, int argc, object *args) /* closure _,object k_734524, object port_73394_732700_raw, ... */
   {
 -object k_734976 = args[0];
 -load_varargs(port_73394_733047, args, 1, argc - 1);
--  Cyc_st_add(data, "scheme/base.sld:read-char");
-+object k_734531 = args[0];
-+load_varargs(port_73394_732707, args, 1, argc - 1);
-+  Cyc_st_add(data, "base.sld:read-char");
++object k_734524 = args[0];
++load_varargs(port_73394_732700, args, 1, argc - 1);
+   Cyc_st_add(data, "scheme/base.sld:read-char");
    
 -if( (boolean_f != Cyc_is_null(port_73394_733047)) ){ 
-+if( (boolean_f != Cyc_is_null(port_73394_732707)) ){ 
++if( (boolean_f != Cyc_is_null(port_73394_732700)) ){ 
    
 -closureN_type c_7317008;
 -object e_7317014 [1];
@@ -55633,54 +55878,53 @@ Make let-values be the same as let*-values, to work around
 -c_7317008.num_elements = 1;
 -c_7317008.elements = (object *)e_7317014;
 -c_7317008.elements[0] = k_734976;
-+closureN_type c_7315715;
-+object e_7315721 [1];
-+c_7315715.hdr.mark = gc_color_red;
-+ c_7315715.hdr.grayed = 0;
-+c_7315715.tag = closureN_tag;
-+ c_7315715.fn = (function_type)__lambda_300;
-+c_7315715.num_args = 1;
-+c_7315715.num_elements = 1;
-+c_7315715.elements = (object *)e_7315721;
-+c_7315715.elements[0] = k_734531;
++closureN_type c_7315708;
++object e_7315714 [1];
++c_7315708.hdr.mark = gc_color_red;
++ c_7315708.hdr.grayed = 0;
++c_7315708.tag = closureN_tag;
++ c_7315708.fn = (function_type)__lambda_300;
++c_7315708.num_args = 1;
++c_7315708.num_elements = 1;
++c_7315708.elements = (object *)e_7315714;
++c_7315708.elements[0] = k_734524;
  
 -return_direct_with_clo1(data,  __glo_current_91input_91port_scheme_base, (((closure)  __glo_current_91input_91port_scheme_base)->fn),  &c_7317008);
-+return_direct_with_clo1(data,  __glo_current_91input_91port_scheme_base, (((closure)  __glo_current_91input_91port_scheme_base)->fn),  &c_7315715);
++return_direct_with_clo1(data,  __glo_current_91input_91port_scheme_base, (((closure)  __glo_current_91input_91port_scheme_base)->fn),  &c_7315708);
  } else { 
    
  
  
 -object c_7317018 = Cyc_io_read_char(data,  k_734976,Cyc_car(data, port_73394_733047));
 -return_direct_with_clo1(data,  k_734976, (((closure)  k_734976)->fn),  c_7317018);}
-+object c_7315725 = Cyc_io_read_char(data,  k_734531,Cyc_car(data, port_73394_732707));
-+return_direct_with_clo1(data,  k_734531, (((closure)  k_734531)->fn),  c_7315725);}
++object c_7315718 = Cyc_io_read_char(data,  k_734524,Cyc_car(data, port_73394_732700));
++return_direct_with_clo1(data,  k_734524, (((closure)  k_734524)->fn),  c_7315718);}
  ;; 
  }
  
 -static void __lambda_300(void *data, object self_7313229, int argc, object *args) /* object self_7313229, object r_734978 */
-+static void __lambda_300(void *data, object self_7311983, int argc, object *args) /* object self_7311983, object r_734533 */
++static void __lambda_300(void *data, object self_7311976, int argc, object *args) /* object self_7311976, object r_734526 */
   {
 - object r_734978 = args[0];
-+ object r_734533 = args[0];
++ object r_734526 = args[0];
    
 -object c_7317013 = Cyc_io_read_char(data,  ((closureN)self_7313229)->elements[0],r_734978);
 -return_direct_with_clo1(data,  ((closureN)self_7313229)->elements[0], (((closure)  ((closureN)self_7313229)->elements[0])->fn),  c_7317013);; 
-+object c_7315720 = Cyc_io_read_char(data,  ((closureN)self_7311983)->elements[0],r_734533);
-+return_direct_with_clo1(data,  ((closureN)self_7311983)->elements[0], (((closure)  ((closureN)self_7311983)->elements[0])->fn),  c_7315720);; 
++object c_7315713 = Cyc_io_read_char(data,  ((closureN)self_7311976)->elements[0],r_734526);
++return_direct_with_clo1(data,  ((closureN)self_7311976)->elements[0], (((closure)  ((closureN)self_7311976)->elements[0])->fn),  c_7315713);; 
  }
  
 -static void __lambda_297(void *data, object _, int argc, object *args) /* closure _,object k_734970, object port_73393_733046_raw, ... */
-+static void __lambda_297(void *data, object _, int argc, object *args) /* closure _,object k_734525, object port_73393_732706_raw, ... */
++static void __lambda_297(void *data, object _, int argc, object *args) /* closure _,object k_734518, object port_73393_732699_raw, ... */
   {
 -object k_734970 = args[0];
 -load_varargs(port_73393_733046, args, 1, argc - 1);
--  Cyc_st_add(data, "scheme/base.sld:peek-char");
-+object k_734525 = args[0];
-+load_varargs(port_73393_732706, args, 1, argc - 1);
-+  Cyc_st_add(data, "base.sld:peek-char");
++object k_734518 = args[0];
++load_varargs(port_73393_732699, args, 1, argc - 1);
+   Cyc_st_add(data, "scheme/base.sld:peek-char");
    
 -if( (boolean_f != Cyc_is_null(port_73393_733046)) ){ 
-+if( (boolean_f != Cyc_is_null(port_73393_732706)) ){ 
++if( (boolean_f != Cyc_is_null(port_73393_732699)) ){ 
    
 -closureN_type c_7316991;
 -object e_7316997 [1];
@@ -55692,54 +55936,53 @@ Make let-values be the same as let*-values, to work around
 -c_7316991.num_elements = 1;
 -c_7316991.elements = (object *)e_7316997;
 -c_7316991.elements[0] = k_734970;
-+closureN_type c_7315698;
-+object e_7315704 [1];
-+c_7315698.hdr.mark = gc_color_red;
-+ c_7315698.hdr.grayed = 0;
-+c_7315698.tag = closureN_tag;
-+ c_7315698.fn = (function_type)__lambda_298;
-+c_7315698.num_args = 1;
-+c_7315698.num_elements = 1;
-+c_7315698.elements = (object *)e_7315704;
-+c_7315698.elements[0] = k_734525;
++closureN_type c_7315691;
++object e_7315697 [1];
++c_7315691.hdr.mark = gc_color_red;
++ c_7315691.hdr.grayed = 0;
++c_7315691.tag = closureN_tag;
++ c_7315691.fn = (function_type)__lambda_298;
++c_7315691.num_args = 1;
++c_7315691.num_elements = 1;
++c_7315691.elements = (object *)e_7315697;
++c_7315691.elements[0] = k_734518;
  
 -return_direct_with_clo1(data,  __glo_current_91input_91port_scheme_base, (((closure)  __glo_current_91input_91port_scheme_base)->fn),  &c_7316991);
-+return_direct_with_clo1(data,  __glo_current_91input_91port_scheme_base, (((closure)  __glo_current_91input_91port_scheme_base)->fn),  &c_7315698);
++return_direct_with_clo1(data,  __glo_current_91input_91port_scheme_base, (((closure)  __glo_current_91input_91port_scheme_base)->fn),  &c_7315691);
  } else { 
    
  
  
 -object c_7317001 = Cyc_io_peek_char(data,  k_734970,Cyc_car(data, port_73393_733046));
 -return_direct_with_clo1(data,  k_734970, (((closure)  k_734970)->fn),  c_7317001);}
-+object c_7315708 = Cyc_io_peek_char(data,  k_734525,Cyc_car(data, port_73393_732706));
-+return_direct_with_clo1(data,  k_734525, (((closure)  k_734525)->fn),  c_7315708);}
++object c_7315701 = Cyc_io_peek_char(data,  k_734518,Cyc_car(data, port_73393_732699));
++return_direct_with_clo1(data,  k_734518, (((closure)  k_734518)->fn),  c_7315701);}
  ;; 
  }
  
 -static void __lambda_298(void *data, object self_7313228, int argc, object *args) /* object self_7313228, object r_734972 */
-+static void __lambda_298(void *data, object self_7311982, int argc, object *args) /* object self_7311982, object r_734527 */
++static void __lambda_298(void *data, object self_7311975, int argc, object *args) /* object self_7311975, object r_734520 */
   {
 - object r_734972 = args[0];
-+ object r_734527 = args[0];
++ object r_734520 = args[0];
    
 -object c_7316996 = Cyc_io_peek_char(data,  ((closureN)self_7313228)->elements[0],r_734972);
 -return_direct_with_clo1(data,  ((closureN)self_7313228)->elements[0], (((closure)  ((closureN)self_7313228)->elements[0])->fn),  c_7316996);; 
-+object c_7315703 = Cyc_io_peek_char(data,  ((closureN)self_7311982)->elements[0],r_734527);
-+return_direct_with_clo1(data,  ((closureN)self_7311982)->elements[0], (((closure)  ((closureN)self_7311982)->elements[0])->fn),  c_7315703);; 
++object c_7315696 = Cyc_io_peek_char(data,  ((closureN)self_7311975)->elements[0],r_734520);
++return_direct_with_clo1(data,  ((closureN)self_7311975)->elements[0], (((closure)  ((closureN)self_7311975)->elements[0])->fn),  c_7315696);; 
  }
  
 -static void __lambda_295(void *data, object _, int argc, object *args) /* closure _,object k_734964, object port_73392_733045_raw, ... */
-+static void __lambda_295(void *data, object _, int argc, object *args) /* closure _,object k_734519, object port_73392_732705_raw, ... */
++static void __lambda_295(void *data, object _, int argc, object *args) /* closure _,object k_734512, object port_73392_732698_raw, ... */
   {
 -object k_734964 = args[0];
 -load_varargs(port_73392_733045, args, 1, argc - 1);
--  Cyc_st_add(data, "scheme/base.sld:char-ready?");
-+object k_734519 = args[0];
-+load_varargs(port_73392_732705, args, 1, argc - 1);
-+  Cyc_st_add(data, "base.sld:char-ready?");
++object k_734512 = args[0];
++load_varargs(port_73392_732698, args, 1, argc - 1);
+   Cyc_st_add(data, "scheme/base.sld:char-ready?");
    
 -if( (boolean_f != Cyc_is_null(port_73392_733045)) ){ 
-+if( (boolean_f != Cyc_is_null(port_73392_732705)) ){ 
++if( (boolean_f != Cyc_is_null(port_73392_732698)) ){ 
    
 -closureN_type c_7316980;
 -object e_7316983 [1];
@@ -55751,51 +55994,50 @@ Make let-values be the same as let*-values, to work around
 -c_7316980.num_elements = 1;
 -c_7316980.elements = (object *)e_7316983;
 -c_7316980.elements[0] = k_734964;
-+closureN_type c_7315687;
-+object e_7315690 [1];
-+c_7315687.hdr.mark = gc_color_red;
-+ c_7315687.hdr.grayed = 0;
-+c_7315687.tag = closureN_tag;
-+ c_7315687.fn = (function_type)__lambda_296;
-+c_7315687.num_args = 1;
-+c_7315687.num_elements = 1;
-+c_7315687.elements = (object *)e_7315690;
-+c_7315687.elements[0] = k_734519;
++closureN_type c_7315680;
++object e_7315683 [1];
++c_7315680.hdr.mark = gc_color_red;
++ c_7315680.hdr.grayed = 0;
++c_7315680.tag = closureN_tag;
++ c_7315680.fn = (function_type)__lambda_296;
++c_7315680.num_args = 1;
++c_7315680.num_elements = 1;
++c_7315680.elements = (object *)e_7315683;
++c_7315680.elements[0] = k_734512;
  
 -return_direct_with_clo1(data,  __glo_current_91input_91port_scheme_base, (((closure)  __glo_current_91input_91port_scheme_base)->fn),  &c_7316980);
-+return_direct_with_clo1(data,  __glo_current_91input_91port_scheme_base, (((closure)  __glo_current_91input_91port_scheme_base)->fn),  &c_7315687);
++return_direct_with_clo1(data,  __glo_current_91input_91port_scheme_base, (((closure)  __glo_current_91input_91port_scheme_base)->fn),  &c_7315680);
  } else { 
    
  
 -return_direct_with_clo2(data,  __glo_Cyc_91char_91ready_127_scheme_base, (((closure)  __glo_Cyc_91char_91ready_127_scheme_base)->fn),  k_734964, Cyc_car(data, port_73392_733045));}
-+return_direct_with_clo2(data,  __glo_Cyc_91char_91ready_127_scheme_base, (((closure)  __glo_Cyc_91char_91ready_127_scheme_base)->fn),  k_734519, Cyc_car(data, port_73392_732705));}
++return_direct_with_clo2(data,  __glo_Cyc_91char_91ready_127_scheme_base, (((closure)  __glo_Cyc_91char_91ready_127_scheme_base)->fn),  k_734512, Cyc_car(data, port_73392_732698));}
  ;; 
  }
  
 -static void __lambda_296(void *data, object self_7313227, int argc, object *args) /* object self_7313227, object r_734966 */
-+static void __lambda_296(void *data, object self_7311981, int argc, object *args) /* object self_7311981, object r_734521 */
++static void __lambda_296(void *data, object self_7311974, int argc, object *args) /* object self_7311974, object r_734514 */
   {
 - object r_734966 = 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_7313227)->elements[0], r_734966);; 
-+ object r_734521 = 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_7311981)->elements[0], r_734521);; 
++ object r_734514 = 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_7311974)->elements[0], r_734514);; 
  }
  
 -static void __lambda_1439(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_1392(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_734958, object chr_73390_733043, object port_73391_733044_raw, ... */
-+static void __lambda_293(void *data, object _, int argc, object *args) /* closure _,object k_734513, object chr_73390_732703, object port_73391_732704_raw, ... */
++static void __lambda_293(void *data, object _, int argc, object *args) /* closure _,object k_734506, object chr_73390_732696, object port_73391_732697_raw, ... */
   {
 -object k_734958 = args[0]; object chr_73390_733043 = args[1];
 -load_varargs(port_73391_733044, args, 2, argc - 2);
--  Cyc_st_add(data, "scheme/base.sld:write-u8");
-+object k_734513 = args[0]; object chr_73390_732703 = args[1];
-+load_varargs(port_73391_732704, args, 2, argc - 2);
-+  Cyc_st_add(data, "base.sld:write-u8");
++object k_734506 = args[0]; object chr_73390_732696 = args[1];
++load_varargs(port_73391_732697, args, 2, argc - 2);
+   Cyc_st_add(data, "scheme/base.sld:write-u8");
    
 -if( (boolean_f != Cyc_is_null(port_73391_733044)) ){ 
-+if( (boolean_f != Cyc_is_null(port_73391_732704)) ){ 
++if( (boolean_f != Cyc_is_null(port_73391_732697)) ){ 
    
 -closureN_type c_7316967;
 -object e_7316971 [2];
@@ -55808,49 +56050,48 @@ Make let-values be the same as let*-values, to work around
 -c_7316967.elements = (object *)e_7316971;
 -c_7316967.elements[0] = chr_73390_733043;
 -c_7316967.elements[1] = k_734958;
-+closureN_type c_7315674;
-+object e_7315678 [2];
-+c_7315674.hdr.mark = gc_color_red;
-+ c_7315674.hdr.grayed = 0;
-+c_7315674.tag = closureN_tag;
-+ c_7315674.fn = (function_type)__lambda_294;
-+c_7315674.num_args = 1;
-+c_7315674.num_elements = 2;
-+c_7315674.elements = (object *)e_7315678;
-+c_7315674.elements[0] = chr_73390_732703;
-+c_7315674.elements[1] = k_734513;
++closureN_type c_7315667;
++object e_7315671 [2];
++c_7315667.hdr.mark = gc_color_red;
++ c_7315667.hdr.grayed = 0;
++c_7315667.tag = closureN_tag;
++ c_7315667.fn = (function_type)__lambda_294;
++c_7315667.num_args = 1;
++c_7315667.num_elements = 2;
++c_7315667.elements = (object *)e_7315671;
++c_7315667.elements[0] = chr_73390_732696;
++c_7315667.elements[1] = k_734506;
  
 -return_direct_with_clo1(data,  __glo_current_91output_91port_scheme_base, (((closure)  __glo_current_91output_91port_scheme_base)->fn),  &c_7316967);
-+return_direct_with_clo1(data,  __glo_current_91output_91port_scheme_base, (((closure)  __glo_current_91output_91port_scheme_base)->fn),  &c_7315674);
++return_direct_with_clo1(data,  __glo_current_91output_91port_scheme_base, (((closure)  __glo_current_91output_91port_scheme_base)->fn),  &c_7315667);
  } else { 
    
  
 -return_direct_with_clo3(data,  __glo__191write_91u8_scheme_base, (((closure)  __glo__191write_91u8_scheme_base)->fn),  k_734958, chr_73390_733043, Cyc_car(data, port_73391_733044));}
-+return_direct_with_clo3(data,  __glo__191write_91u8_scheme_base, (((closure)  __glo__191write_91u8_scheme_base)->fn),  k_734513, chr_73390_732703, Cyc_car(data, port_73391_732704));}
++return_direct_with_clo3(data,  __glo__191write_91u8_scheme_base, (((closure)  __glo__191write_91u8_scheme_base)->fn),  k_734506, chr_73390_732696, Cyc_car(data, port_73391_732697));}
  ;; 
  }
  
 -static void __lambda_294(void *data, object self_7313226, int argc, object *args) /* object self_7313226, object r_734960 */
-+static void __lambda_294(void *data, object self_7311980, int argc, object *args) /* object self_7311980, object r_734515 */
++static void __lambda_294(void *data, object self_7311973, int argc, object *args) /* object self_7311973, object r_734508 */
   {
 - object r_734960 = args[0];
 -  return_direct_with_clo3(data,  __glo__191write_91u8_scheme_base, (((closure)  __glo__191write_91u8_scheme_base)->fn),  ((closureN)self_7313226)->elements[1], ((closureN)self_7313226)->elements[0], r_734960);; 
-+ object r_734515 = args[0];
-+  return_direct_with_clo3(data,  __glo__191write_91u8_scheme_base, (((closure)  __glo__191write_91u8_scheme_base)->fn),  ((closureN)self_7311980)->elements[1], ((closureN)self_7311980)->elements[0], r_734515);; 
++ object r_734508 = args[0];
++  return_direct_with_clo3(data,  __glo__191write_91u8_scheme_base, (((closure)  __glo__191write_91u8_scheme_base)->fn),  ((closureN)self_7311973)->elements[1], ((closureN)self_7311973)->elements[0], r_734508);; 
  }
  
 -static void __lambda_291(void *data, object _, int argc, object *args) /* closure _,object k_734952, object port_73389_733042_raw, ... */
-+static void __lambda_291(void *data, object _, int argc, object *args) /* closure _,object k_734507, object port_73389_732702_raw, ... */
++static void __lambda_291(void *data, object _, int argc, object *args) /* closure _,object k_734500, object port_73389_732695_raw, ... */
   {
 -object k_734952 = args[0];
 -load_varargs(port_73389_733042, args, 1, argc - 1);
--  Cyc_st_add(data, "scheme/base.sld:peek-u8");
-+object k_734507 = args[0];
-+load_varargs(port_73389_732702, args, 1, argc - 1);
-+  Cyc_st_add(data, "base.sld:peek-u8");
++object k_734500 = args[0];
++load_varargs(port_73389_732695, args, 1, argc - 1);
+   Cyc_st_add(data, "scheme/base.sld:peek-u8");
    
 -if( (boolean_f != Cyc_is_null(port_73389_733042)) ){ 
-+if( (boolean_f != Cyc_is_null(port_73389_732702)) ){ 
++if( (boolean_f != Cyc_is_null(port_73389_732695)) ){ 
    
 -closureN_type c_7316956;
 -object e_7316959 [1];
@@ -55862,48 +56103,47 @@ Make let-values be the same as let*-values, to work around
 -c_7316956.num_elements = 1;
 -c_7316956.elements = (object *)e_7316959;
 -c_7316956.elements[0] = k_734952;
-+closureN_type c_7315663;
-+object e_7315666 [1];
-+c_7315663.hdr.mark = gc_color_red;
-+ c_7315663.hdr.grayed = 0;
-+c_7315663.tag = closureN_tag;
-+ c_7315663.fn = (function_type)__lambda_292;
-+c_7315663.num_args = 1;
-+c_7315663.num_elements = 1;
-+c_7315663.elements = (object *)e_7315666;
-+c_7315663.elements[0] = k_734507;
++closureN_type c_7315656;
++object e_7315659 [1];
++c_7315656.hdr.mark = gc_color_red;
++ c_7315656.hdr.grayed = 0;
++c_7315656.tag = closureN_tag;
++ c_7315656.fn = (function_type)__lambda_292;
++c_7315656.num_args = 1;
++c_7315656.num_elements = 1;
++c_7315656.elements = (object *)e_7315659;
++c_7315656.elements[0] = k_734500;
  
 -return_direct_with_clo1(data,  __glo_current_91input_91port_scheme_base, (((closure)  __glo_current_91input_91port_scheme_base)->fn),  &c_7316956);
-+return_direct_with_clo1(data,  __glo_current_91input_91port_scheme_base, (((closure)  __glo_current_91input_91port_scheme_base)->fn),  &c_7315663);
++return_direct_with_clo1(data,  __glo_current_91input_91port_scheme_base, (((closure)  __glo_current_91input_91port_scheme_base)->fn),  &c_7315656);
  } else { 
    
  
 -return_direct_with_clo2(data,  __glo__191peek_91u8_scheme_base, (((closure)  __glo__191peek_91u8_scheme_base)->fn),  k_734952, Cyc_car(data, port_73389_733042));}
-+return_direct_with_clo2(data,  __glo__191peek_91u8_scheme_base, (((closure)  __glo__191peek_91u8_scheme_base)->fn),  k_734507, Cyc_car(data, port_73389_732702));}
++return_direct_with_clo2(data,  __glo__191peek_91u8_scheme_base, (((closure)  __glo__191peek_91u8_scheme_base)->fn),  k_734500, Cyc_car(data, port_73389_732695));}
  ;; 
  }
  
 -static void __lambda_292(void *data, object self_7313225, int argc, object *args) /* object self_7313225, object r_734954 */
-+static void __lambda_292(void *data, object self_7311979, int argc, object *args) /* object self_7311979, object r_734509 */
++static void __lambda_292(void *data, object self_7311972, int argc, object *args) /* object self_7311972, object r_734502 */
   {
 - object r_734954 = args[0];
 -  return_direct_with_clo2(data,  __glo__191peek_91u8_scheme_base, (((closure)  __glo__191peek_91u8_scheme_base)->fn),  ((closureN)self_7313225)->elements[0], r_734954);; 
-+ object r_734509 = args[0];
-+  return_direct_with_clo2(data,  __glo__191peek_91u8_scheme_base, (((closure)  __glo__191peek_91u8_scheme_base)->fn),  ((closureN)self_7311979)->elements[0], r_734509);; 
++ object r_734502 = args[0];
++  return_direct_with_clo2(data,  __glo__191peek_91u8_scheme_base, (((closure)  __glo__191peek_91u8_scheme_base)->fn),  ((closureN)self_7311972)->elements[0], r_734502);; 
  }
  
 -static void __lambda_289(void *data, object _, int argc, object *args) /* closure _,object k_734946, object port_73388_733041_raw, ... */
-+static void __lambda_289(void *data, object _, int argc, object *args) /* closure _,object k_734501, object port_73388_732701_raw, ... */
++static void __lambda_289(void *data, object _, int argc, object *args) /* closure _,object k_734494, object port_73388_732694_raw, ... */
   {
 -object k_734946 = args[0];
 -load_varargs(port_73388_733041, args, 1, argc - 1);
--  Cyc_st_add(data, "scheme/base.sld:read-u8");
-+object k_734501 = args[0];
-+load_varargs(port_73388_732701, args, 1, argc - 1);
-+  Cyc_st_add(data, "base.sld:read-u8");
++object k_734494 = args[0];
++load_varargs(port_73388_732694, args, 1, argc - 1);
+   Cyc_st_add(data, "scheme/base.sld:read-u8");
    
 -if( (boolean_f != Cyc_is_null(port_73388_733041)) ){ 
-+if( (boolean_f != Cyc_is_null(port_73388_732701)) ){ 
++if( (boolean_f != Cyc_is_null(port_73388_732694)) ){ 
    
 -closureN_type c_7316945;
 -object e_7316948 [1];
@@ -55915,34 +56155,34 @@ Make let-values be the same as let*-values, to work around
 -c_7316945.num_elements = 1;
 -c_7316945.elements = (object *)e_7316948;
 -c_7316945.elements[0] = k_734946;
-+closureN_type c_7315652;
-+object e_7315655 [1];
-+c_7315652.hdr.mark = gc_color_red;
-+ c_7315652.hdr.grayed = 0;
-+c_7315652.tag = closureN_tag;
-+ c_7315652.fn = (function_type)__lambda_290;
-+c_7315652.num_args = 1;
-+c_7315652.num_elements = 1;
-+c_7315652.elements = (object *)e_7315655;
-+c_7315652.elements[0] = k_734501;
++closureN_type c_7315645;
++object e_7315648 [1];
++c_7315645.hdr.mark = gc_color_red;
++ c_7315645.hdr.grayed = 0;
++c_7315645.tag = closureN_tag;
++ c_7315645.fn = (function_type)__lambda_290;
++c_7315645.num_args = 1;
++c_7315645.num_elements = 1;
++c_7315645.elements = (object *)e_7315648;
++c_7315645.elements[0] = k_734494;
  
 -return_direct_with_clo1(data,  __glo_current_91input_91port_scheme_base, (((closure)  __glo_current_91input_91port_scheme_base)->fn),  &c_7316945);
-+return_direct_with_clo1(data,  __glo_current_91input_91port_scheme_base, (((closure)  __glo_current_91input_91port_scheme_base)->fn),  &c_7315652);
++return_direct_with_clo1(data,  __glo_current_91input_91port_scheme_base, (((closure)  __glo_current_91input_91port_scheme_base)->fn),  &c_7315645);
  } else { 
    
  
 -return_direct_with_clo2(data,  __glo__191read_91u8_scheme_base, (((closure)  __glo__191read_91u8_scheme_base)->fn),  k_734946, Cyc_car(data, port_73388_733041));}
-+return_direct_with_clo2(data,  __glo__191read_91u8_scheme_base, (((closure)  __glo__191read_91u8_scheme_base)->fn),  k_734501, Cyc_car(data, port_73388_732701));}
++return_direct_with_clo2(data,  __glo__191read_91u8_scheme_base, (((closure)  __glo__191read_91u8_scheme_base)->fn),  k_734494, Cyc_car(data, port_73388_732694));}
  ;; 
  }
  
 -static void __lambda_290(void *data, object self_7313224, int argc, object *args) /* object self_7313224, object r_734948 */
-+static void __lambda_290(void *data, object self_7311978, int argc, object *args) /* object self_7311978, object r_734503 */
++static void __lambda_290(void *data, object self_7311971, int argc, object *args) /* object self_7311971, object r_734496 */
   {
 - object r_734948 = args[0];
 -  return_direct_with_clo2(data,  __glo__191read_91u8_scheme_base, (((closure)  __glo__191read_91u8_scheme_base)->fn),  ((closureN)self_7313224)->elements[0], r_734948);; 
-+ object r_734503 = args[0];
-+  return_direct_with_clo2(data,  __glo__191read_91u8_scheme_base, (((closure)  __glo__191read_91u8_scheme_base)->fn),  ((closureN)self_7311978)->elements[0], r_734503);; 
++ object r_734496 = args[0];
++  return_direct_with_clo2(data,  __glo__191read_91u8_scheme_base, (((closure)  __glo__191read_91u8_scheme_base)->fn),  ((closureN)self_7311971)->elements[0], r_734496);; 
  }
  
 -static void __lambda_1438(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)); }
@@ -55952,17 +56192,16 @@ Make let-values be the same as let*-values, to work around
 +static void __lambda_1391(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_1390(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_1389(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_734494, object func_73385_732698, object end_73386_732699, object lst_73387_732700 */
++static void __lambda_287(void *data, object _, int argc, object *args) /* closure _,object k_734487, object func_73385_732691, object end_73386_732692, object lst_73387_732693 */
   {
 -object k_734939 = args[0]; object func_73385_733038 = args[1]; object end_73386_733039 = args[2]; object lst_73387_733040 = args[3];
--  Cyc_st_add(data, "scheme/base.sld:foldr");
-+object k_734494 = args[0]; object func_73385_732698 = args[1]; object end_73386_732699 = args[2]; object lst_73387_732700 = args[3];
-+  Cyc_st_add(data, "base.sld:foldr");
++object k_734487 = args[0]; object func_73385_732691 = args[1]; object end_73386_732692 = args[2]; object lst_73387_732693 = args[3];
+   Cyc_st_add(data, "scheme/base.sld:foldr");
    
 -if( (boolean_f != Cyc_is_null(lst_73387_733040)) ){ 
 -  return_direct_with_clo1(data,  k_734939, (((closure)  k_734939)->fn),  end_73386_733039);
-+if( (boolean_f != Cyc_is_null(lst_73387_732700)) ){ 
-+  return_direct_with_clo1(data,  k_734494, (((closure)  k_734494)->fn),  end_73386_732699);
++if( (boolean_f != Cyc_is_null(lst_73387_732693)) ){ 
++  return_direct_with_clo1(data,  k_734487, (((closure)  k_734487)->fn),  end_73386_732692);
  } else { 
    
 -closureN_type c_7316928;
@@ -55977,49 +56216,48 @@ Make let-values be the same as let*-values, to work around
 -c_7316928.elements[0] = func_73385_733038;
 -c_7316928.elements[1] = k_734939;
 -c_7316928.elements[2] = lst_73387_733040;
-+closureN_type c_7315635;
-+object e_7315642 [3];
-+c_7315635.hdr.mark = gc_color_red;
-+ c_7315635.hdr.grayed = 0;
-+c_7315635.tag = closureN_tag;
-+ c_7315635.fn = (function_type)__lambda_288;
-+c_7315635.num_args = 1;
-+c_7315635.num_elements = 3;
-+c_7315635.elements = (object *)e_7315642;
-+c_7315635.elements[0] = func_73385_732698;
-+c_7315635.elements[1] = k_734494;
-+c_7315635.elements[2] = lst_73387_732700;
++closureN_type c_7315628;
++object e_7315635 [3];
++c_7315628.hdr.mark = gc_color_red;
++ c_7315628.hdr.grayed = 0;
++c_7315628.tag = closureN_tag;
++ c_7315628.fn = (function_type)__lambda_288;
++c_7315628.num_args = 1;
++c_7315628.num_elements = 3;
++c_7315628.elements = (object *)e_7315635;
++c_7315628.elements[0] = func_73385_732691;
++c_7315628.elements[1] = k_734487;
++c_7315628.elements[2] = lst_73387_732693;
  
  
  
 -return_direct_with_clo4(data,  __glo_foldr_scheme_base, (((closure)  __glo_foldr_scheme_base)->fn),  &c_7316928, func_73385_733038, end_73386_733039, Cyc_cdr(data, lst_73387_733040));}
-+return_direct_with_clo4(data,  __glo_foldr_scheme_base, (((closure)  __glo_foldr_scheme_base)->fn),  &c_7315635, func_73385_732698, end_73386_732699, Cyc_cdr(data, lst_73387_732700));}
++return_direct_with_clo4(data,  __glo_foldr_scheme_base, (((closure)  __glo_foldr_scheme_base)->fn),  &c_7315628, func_73385_732691, end_73386_732692, Cyc_cdr(data, lst_73387_732693));}
  ;; 
  }
  
 -static void __lambda_288(void *data, object self_7313223, int argc, object *args) /* object self_7313223, object r_734942 */
-+static void __lambda_288(void *data, object self_7311977, int argc, object *args) /* object self_7311977, object r_734497 */
++static void __lambda_288(void *data, object self_7311970, int argc, object *args) /* object self_7311970, object r_734490 */
   {
 - object r_734942 = args[0];
-+ object r_734497 = args[0];
++ object r_734490 = args[0];
    
  
 -return_closcall3(data,  ((closureN)self_7313223)->elements[0],  ((closureN)self_7313223)->elements[1], Cyc_car(data, ((closureN)self_7313223)->elements[2]), r_734942);; 
-+return_closcall3(data,  ((closureN)self_7311977)->elements[0],  ((closureN)self_7311977)->elements[1], Cyc_car(data, ((closureN)self_7311977)->elements[2]), r_734497);; 
++return_closcall3(data,  ((closureN)self_7311970)->elements[0],  ((closureN)self_7311970)->elements[1], Cyc_car(data, ((closureN)self_7311970)->elements[2]), r_734490);; 
  }
  
 -static void __lambda_285(void *data, object _, int argc, object *args) /* closure _,object k_734932, object func_73382_733035, object accum_73383_733036, object lst_73384_733037 */
-+static void __lambda_285(void *data, object _, int argc, object *args) /* closure _,object k_734487, object func_73382_732695, object accum_73383_732696, object lst_73384_732697 */
++static void __lambda_285(void *data, object _, int argc, object *args) /* closure _,object k_734480, object func_73382_732688, object accum_73383_732689, object lst_73384_732690 */
   {
 -object k_734932 = args[0]; object func_73382_733035 = args[1]; object accum_73383_733036 = args[2]; object lst_73384_733037 = args[3];
--  Cyc_st_add(data, "scheme/base.sld:foldl");
-+object k_734487 = args[0]; object func_73382_732695 = args[1]; object accum_73383_732696 = args[2]; object lst_73384_732697 = args[3];
-+  Cyc_st_add(data, "base.sld:foldl");
++object k_734480 = args[0]; object func_73382_732688 = args[1]; object accum_73383_732689 = args[2]; object lst_73384_732690 = args[3];
+   Cyc_st_add(data, "scheme/base.sld:foldl");
    
 -if( (boolean_f != Cyc_is_null(lst_73384_733037)) ){ 
 -  return_direct_with_clo1(data,  k_734932, (((closure)  k_734932)->fn),  accum_73383_733036);
-+if( (boolean_f != Cyc_is_null(lst_73384_732697)) ){ 
-+  return_direct_with_clo1(data,  k_734487, (((closure)  k_734487)->fn),  accum_73383_732696);
++if( (boolean_f != Cyc_is_null(lst_73384_732690)) ){ 
++  return_direct_with_clo1(data,  k_734480, (((closure)  k_734480)->fn),  accum_73383_732689);
  } else { 
    
 -closureN_type c_7316913;
@@ -56034,71 +56272,69 @@ Make let-values be the same as let*-values, to work around
 -c_7316913.elements[0] = func_73382_733035;
 -c_7316913.elements[1] = k_734932;
 -c_7316913.elements[2] = lst_73384_733037;
-+closureN_type c_7315620;
-+object e_7315627 [3];
-+c_7315620.hdr.mark = gc_color_red;
-+ c_7315620.hdr.grayed = 0;
-+c_7315620.tag = closureN_tag;
-+ c_7315620.fn = (function_type)__lambda_286;
-+c_7315620.num_args = 1;
-+c_7315620.num_elements = 3;
-+c_7315620.elements = (object *)e_7315627;
-+c_7315620.elements[0] = func_73382_732695;
-+c_7315620.elements[1] = k_734487;
-+c_7315620.elements[2] = lst_73384_732697;
++closureN_type c_7315613;
++object e_7315620 [3];
++c_7315613.hdr.mark = gc_color_red;
++ c_7315613.hdr.grayed = 0;
++c_7315613.tag = closureN_tag;
++ c_7315613.fn = (function_type)__lambda_286;
++c_7315613.num_args = 1;
++c_7315613.num_elements = 3;
++c_7315613.elements = (object *)e_7315620;
++c_7315613.elements[0] = func_73382_732688;
++c_7315613.elements[1] = k_734480;
++c_7315613.elements[2] = lst_73384_732690;
  
  
  
 -return_closcall3(data,  func_73382_733035,  &c_7316913, Cyc_car(data, lst_73384_733037), accum_73383_733036);}
-+return_closcall3(data,  func_73382_732695,  &c_7315620, Cyc_car(data, lst_73384_732697), accum_73383_732696);}
++return_closcall3(data,  func_73382_732688,  &c_7315613, Cyc_car(data, lst_73384_732690), accum_73383_732689);}
  ;; 
  }
  
 -static void __lambda_286(void *data, object self_7313222, int argc, object *args) /* object self_7313222, object r_734934 */
-+static void __lambda_286(void *data, object self_7311976, int argc, object *args) /* object self_7311976, object r_734489 */
++static void __lambda_286(void *data, object self_7311969, int argc, object *args) /* object self_7311969, object r_734482 */
   {
 - object r_734934 = args[0];
-+ object r_734489 = args[0];
++ object r_734482 = args[0];
    
  
 -return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  ((closureN)self_7313222)->elements[1], ((closureN)self_7313222)->elements[0], r_734934, Cyc_cdr(data, ((closureN)self_7313222)->elements[2]));; 
-+return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  ((closureN)self_7311976)->elements[1], ((closureN)self_7311976)->elements[0], r_734489, Cyc_cdr(data, ((closureN)self_7311976)->elements[2]));; 
++return_direct_with_clo4(data,  __glo_foldl_scheme_base, (((closure)  __glo_foldl_scheme_base)->fn),  ((closureN)self_7311969)->elements[1], ((closureN)self_7311969)->elements[0], r_734482, Cyc_cdr(data, ((closureN)self_7311969)->elements[2]));; 
  }
  
 -static void __lambda_284(void *data, object _, int argc, object *args) /* closure _,object k_734927, object obj_73379_733032, object alist_73380_733033, object compare_73381_733034_raw, ... */
-+static void __lambda_284(void *data, object _, int argc, object *args) /* closure _,object k_734482, object obj_73379_732692, object alist_73380_732693, object compare_73381_732694_raw, ... */
++static void __lambda_284(void *data, object _, int argc, object *args) /* closure _,object k_734475, object obj_73379_732685, object alist_73380_732686, object compare_73381_732687_raw, ... */
   {
 -object k_734927 = args[0]; object obj_73379_733032 = args[1]; object alist_73380_733033 = args[2];
 -load_varargs(compare_73381_733034, args, 3, argc - 3);
--  Cyc_st_add(data, "scheme/base.sld:assoc");
-+object k_734482 = args[0]; object obj_73379_732692 = args[1]; object alist_73380_732693 = args[2];
-+load_varargs(compare_73381_732694, args, 3, argc - 3);
-+  Cyc_st_add(data, "base.sld:assoc");
++object k_734475 = args[0]; object obj_73379_732685 = args[1]; object alist_73380_732686 = args[2];
++load_varargs(compare_73381_732687, args, 3, argc - 3);
+   Cyc_st_add(data, "scheme/base.sld:assoc");
    
 -if( (boolean_f != Cyc_is_pair(compare_73381_733034)) ){ 
-+if( (boolean_f != Cyc_is_pair(compare_73381_732694)) ){ 
++if( (boolean_f != Cyc_is_pair(compare_73381_732687)) ){ 
    
  
 -return_direct_with_clo4(data,  __glo_assoc_91helper_scheme_base, (((closure)  __glo_assoc_91helper_scheme_base)->fn),  k_734927, obj_73379_733032, alist_73380_733033, Cyc_car(data, compare_73381_733034));
-+return_direct_with_clo4(data,  __glo_assoc_91helper_scheme_base, (((closure)  __glo_assoc_91helper_scheme_base)->fn),  k_734482, obj_73379_732692, alist_73380_732693, Cyc_car(data, compare_73381_732694));
++return_direct_with_clo4(data,  __glo_assoc_91helper_scheme_base, (((closure)  __glo_assoc_91helper_scheme_base)->fn),  k_734475, obj_73379_732685, alist_73380_732686, Cyc_car(data, compare_73381_732687));
  } else { 
 -  return_direct_with_clo4(data,  __glo_assoc_91helper_scheme_base, (((closure)  __glo_assoc_91helper_scheme_base)->fn),  k_734927, obj_73379_733032, alist_73380_733033, primitive_equal_127);}
-+  return_direct_with_clo4(data,  __glo_assoc_91helper_scheme_base, (((closure)  __glo_assoc_91helper_scheme_base)->fn),  k_734482, obj_73379_732692, alist_73380_732693, primitive_equal_127);}
++  return_direct_with_clo4(data,  __glo_assoc_91helper_scheme_base, (((closure)  __glo_assoc_91helper_scheme_base)->fn),  k_734475, obj_73379_732685, alist_73380_732686, primitive_equal_127);}
  ;; 
  }
  
 -static void __lambda_281(void *data, object _, int argc, object *args) /* closure _,object k_734916, object obj_73368_733029, object lst_73369_733030, object cmp_127_73370_733031 */
-+static void __lambda_281(void *data, object _, int argc, object *args) /* closure _,object k_734471, object obj_73368_732689, object lst_73369_732690, object cmp_127_73370_732691 */
++static void __lambda_281(void *data, object _, int argc, object *args) /* closure _,object k_734464, object obj_73368_732682, object lst_73369_732683, object cmp_127_73370_732684 */
   {
 -object k_734916 = args[0]; object obj_73368_733029 = args[1]; object lst_73369_733030 = args[2]; object cmp_127_73370_733031 = args[3];
--  Cyc_st_add(data, "scheme/base.sld:assoc-helper");
-+object k_734471 = args[0]; object obj_73368_732689 = args[1]; object lst_73369_732690 = args[2]; object cmp_127_73370_732691 = args[3];
-+  Cyc_st_add(data, "base.sld:assoc-helper");
++object k_734464 = args[0]; object obj_73368_732682 = args[1]; object lst_73369_732683 = args[2]; object cmp_127_73370_732684 = args[3];
+   Cyc_st_add(data, "scheme/base.sld:assoc-helper");
    
 -if( (boolean_f != Cyc_is_null(lst_73369_733030)) ){ 
 -  return_direct_with_clo1(data,  k_734916, (((closure)  k_734916)->fn),  boolean_f);
-+if( (boolean_f != Cyc_is_null(lst_73369_732690)) ){ 
-+  return_direct_with_clo1(data,  k_734471, (((closure)  k_734471)->fn),  boolean_f);
++if( (boolean_f != Cyc_is_null(lst_73369_732683)) ){ 
++  return_direct_with_clo1(data,  k_734464, (((closure)  k_734464)->fn),  boolean_f);
  } else { 
    
 -closureN_type c_7316871;
@@ -56113,18 +56349,18 @@ Make let-values be the same as let*-values, to work around
 -c_7316871.elements[0] = cmp_127_73370_733031;
 -c_7316871.elements[1] = lst_73369_733030;
 -c_7316871.elements[2] = obj_73368_733029;
-+closureN_type c_7315578;
-+object e_7315593 [3];
-+c_7315578.hdr.mark = gc_color_red;
-+ c_7315578.hdr.grayed = 0;
-+c_7315578.tag = closureN_tag;
-+ c_7315578.fn = (function_type)__lambda_282;
-+c_7315578.num_args = 0;
-+c_7315578.num_elements = 3;
-+c_7315578.elements = (object *)e_7315593;
-+c_7315578.elements[0] = cmp_127_73370_732691;
-+c_7315578.elements[1] = lst_73369_732690;
-+c_7315578.elements[2] = obj_73368_732689;
++closureN_type c_7315571;
++object e_7315586 [3];
++c_7315571.hdr.mark = gc_color_red;
++ c_7315571.hdr.grayed = 0;
++c_7315571.tag = closureN_tag;
++ c_7315571.fn = (function_type)__lambda_282;
++c_7315571.num_args = 0;
++c_7315571.num_elements = 3;
++c_7315571.elements = (object *)e_7315586;
++c_7315571.elements[0] = cmp_127_73370_732684;
++c_7315571.elements[1] = lst_73369_732683;
++c_7315571.elements[2] = obj_73368_732682;
  
  
 -closureN_type c_7316887;
@@ -56140,99 +56376,97 @@ Make let-values be the same as let*-values, to work around
 -c_7316887.elements[1] = k_734916;
 -c_7316887.elements[2] = lst_73369_733030;
 -c_7316887.elements[3] = obj_73368_733029;
-+closureN_type c_7315594;
-+object e_7315607 [4];
-+c_7315594.hdr.mark = gc_color_red;
-+ c_7315594.hdr.grayed = 0;
-+c_7315594.tag = closureN_tag;
-+ c_7315594.fn = (function_type)__lambda_283;
-+c_7315594.num_args = 1;
-+c_7315594.num_elements = 4;
-+c_7315594.elements = (object *)e_7315607;
-+c_7315594.elements[0] = cmp_127_73370_732691;
-+c_7315594.elements[1] = k_734471;
-+c_7315594.elements[2] = lst_73369_732690;
-+c_7315594.elements[3] = obj_73368_732689;
++closureN_type c_7315587;
++object e_7315600 [4];
++c_7315587.hdr.mark = gc_color_red;
++ c_7315587.hdr.grayed = 0;
++c_7315587.tag = closureN_tag;
++ c_7315587.fn = (function_type)__lambda_283;
++c_7315587.num_args = 1;
++c_7315587.num_elements = 4;
++c_7315587.elements = (object *)e_7315600;
++c_7315587.elements[0] = cmp_127_73370_732684;
++c_7315587.elements[1] = k_734464;
++c_7315587.elements[2] = lst_73369_732683;
++c_7315587.elements[3] = obj_73368_732682;
  
 -return_direct_with_clo1(data,(closure)&c_7316871,__lambda_282,  &c_7316887);}
-+return_direct_with_clo1(data,(closure)&c_7315578,__lambda_282,  &c_7315594);}
++return_direct_with_clo1(data,(closure)&c_7315571,__lambda_282,  &c_7315587);}
  ;; 
  }
  
 -static void __lambda_283(void *data, object self_7313220, int argc, object *args) /* object self_7313220, object r_734918 */
-+static void __lambda_283(void *data, object self_7311974, int argc, object *args) /* object self_7311974, object r_734473 */
++static void __lambda_283(void *data, object self_7311967, int argc, object *args) /* object self_7311967, object r_734466 */
   {
 - object r_734918 = args[0];
 -  if( (boolean_f != r_734918) ){ 
-+ object r_734473 = args[0];
-+  if( (boolean_f != r_734473) ){ 
++ object r_734466 = args[0];
++  if( (boolean_f != r_734466) ){ 
    
  
 -return_direct_with_clo1(data,  ((closureN)self_7313220)->elements[1], (((closure)  ((closureN)self_7313220)->elements[1])->fn),  Cyc_car(data, ((closureN)self_7313220)->elements[2]));
-+return_direct_with_clo1(data,  ((closureN)self_7311974)->elements[1], (((closure)  ((closureN)self_7311974)->elements[1])->fn),  Cyc_car(data, ((closureN)self_7311974)->elements[2]));
++return_direct_with_clo1(data,  ((closureN)self_7311967)->elements[1], (((closure)  ((closureN)self_7311967)->elements[1])->fn),  Cyc_car(data, ((closureN)self_7311967)->elements[2]));
  } else { 
    
  
 -return_direct_with_clo4(data,  __glo_assoc_91helper_scheme_base, (((closure)  __glo_assoc_91helper_scheme_base)->fn),  ((closureN)self_7313220)->elements[1], ((closureN)self_7313220)->elements[3], Cyc_cdr(data, ((closureN)self_7313220)->elements[2]), ((closureN)self_7313220)->elements[0]);}
-+return_direct_with_clo4(data,  __glo_assoc_91helper_scheme_base, (((closure)  __glo_assoc_91helper_scheme_base)->fn),  ((closureN)self_7311974)->elements[1], ((closureN)self_7311974)->elements[3], Cyc_cdr(data, ((closureN)self_7311974)->elements[2]), ((closureN)self_7311974)->elements[0]);}
++return_direct_with_clo4(data,  __glo_assoc_91helper_scheme_base, (((closure)  __glo_assoc_91helper_scheme_base)->fn),  ((closureN)self_7311967)->elements[1], ((closureN)self_7311967)->elements[3], Cyc_cdr(data, ((closureN)self_7311967)->elements[2]), ((closureN)self_7311967)->elements[0]);}
  ;; 
  }
  
 -static void __lambda_282(void *data, object self_7313221, int argc, object *args) /* object self_7313221, object k_734920 */
-+static void __lambda_282(void *data, object self_7311975, int argc, object *args) /* object self_7311975, object k_734475 */
++static void __lambda_282(void *data, object self_7311968, int argc, object *args) /* object self_7311968, object k_734468 */
   {
 - object k_734920 = args[0];
-+ object k_734475 = args[0];
++ object k_734468 = args[0];
      
    
 -if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7313221)->elements[1]))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7311975)->elements[1]))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7311968)->elements[1]))) ){ 
    
  
  
  
 -return_closcall3(data,  ((closureN)self_7313221)->elements[0],  k_734920, ((closureN)self_7313221)->elements[2], Cyc_car(data, Cyc_car(data, ((closureN)self_7313221)->elements[1])));
-+return_closcall3(data,  ((closureN)self_7311975)->elements[0],  k_734475, ((closureN)self_7311975)->elements[2], Cyc_car(data, Cyc_car(data, ((closureN)self_7311975)->elements[1])));
++return_closcall3(data,  ((closureN)self_7311968)->elements[0],  k_734468, ((closureN)self_7311968)->elements[2], Cyc_car(data, Cyc_car(data, ((closureN)self_7311968)->elements[1])));
  } else { 
 -  return_direct_with_clo1(data,  k_734920, (((closure)  k_734920)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_734475, (((closure)  k_734475)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_734468, (((closure)  k_734468)->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_280(void *data, object _, int argc, object *args) /* closure _,object k_734911, object obj_73365_733026, object lst_73366_733027, object compare_73367_733028_raw, ... */
-+static void __lambda_280(void *data, object _, int argc, object *args) /* closure _,object k_734466, object obj_73365_732686, object lst_73366_732687, object compare_73367_732688_raw, ... */
++static void __lambda_280(void *data, object _, int argc, object *args) /* closure _,object k_734459, object obj_73365_732679, object lst_73366_732680, object compare_73367_732681_raw, ... */
   {
 -object k_734911 = args[0]; object obj_73365_733026 = args[1]; object lst_73366_733027 = args[2];
 -load_varargs(compare_73367_733028, args, 3, argc - 3);
--  Cyc_st_add(data, "scheme/base.sld:member");
-+object k_734466 = args[0]; object obj_73365_732686 = args[1]; object lst_73366_732687 = args[2];
-+load_varargs(compare_73367_732688, args, 3, argc - 3);
-+  Cyc_st_add(data, "base.sld:member");
++object k_734459 = args[0]; object obj_73365_732679 = args[1]; object lst_73366_732680 = args[2];
++load_varargs(compare_73367_732681, args, 3, argc - 3);
+   Cyc_st_add(data, "scheme/base.sld:member");
    
 -if( (boolean_f != Cyc_is_pair(compare_73367_733028)) ){ 
-+if( (boolean_f != Cyc_is_pair(compare_73367_732688)) ){ 
++if( (boolean_f != Cyc_is_pair(compare_73367_732681)) ){ 
    
  
 -return_direct_with_clo4(data,  __glo_member_91helper_scheme_base, (((closure)  __glo_member_91helper_scheme_base)->fn),  k_734911, obj_73365_733026, lst_73366_733027, Cyc_car(data, compare_73367_733028));
-+return_direct_with_clo4(data,  __glo_member_91helper_scheme_base, (((closure)  __glo_member_91helper_scheme_base)->fn),  k_734466, obj_73365_732686, lst_73366_732687, Cyc_car(data, compare_73367_732688));
++return_direct_with_clo4(data,  __glo_member_91helper_scheme_base, (((closure)  __glo_member_91helper_scheme_base)->fn),  k_734459, obj_73365_732679, lst_73366_732680, Cyc_car(data, compare_73367_732681));
  } else { 
 -  return_direct_with_clo4(data,  __glo_member_91helper_scheme_base, (((closure)  __glo_member_91helper_scheme_base)->fn),  k_734911, obj_73365_733026, lst_73366_733027, primitive_equal_127);}
-+  return_direct_with_clo4(data,  __glo_member_91helper_scheme_base, (((closure)  __glo_member_91helper_scheme_base)->fn),  k_734466, obj_73365_732686, lst_73366_732687, primitive_equal_127);}
++  return_direct_with_clo4(data,  __glo_member_91helper_scheme_base, (((closure)  __glo_member_91helper_scheme_base)->fn),  k_734459, obj_73365_732679, lst_73366_732680, primitive_equal_127);}
  ;; 
  }
  
 -static void __lambda_278(void *data, object _, int argc, object *args) /* closure _,object k_734904, object obj_73355_733023, object lst_73356_733024, object cmp_91proc_73357_733025 */
-+static void __lambda_278(void *data, object _, int argc, object *args) /* closure _,object k_734459, object obj_73355_732683, object lst_73356_732684, object cmp_91proc_73357_732685 */
++static void __lambda_278(void *data, object _, int argc, object *args) /* closure _,object k_734452, object obj_73355_732676, object lst_73356_732677, object cmp_91proc_73357_732678 */
   {
 -object k_734904 = args[0]; object obj_73355_733023 = args[1]; object lst_73356_733024 = args[2]; object cmp_91proc_73357_733025 = args[3];
--  Cyc_st_add(data, "scheme/base.sld:member-helper");
-+object k_734459 = args[0]; object obj_73355_732683 = args[1]; object lst_73356_732684 = args[2]; object cmp_91proc_73357_732685 = args[3];
-+  Cyc_st_add(data, "base.sld:member-helper");
++object k_734452 = args[0]; object obj_73355_732676 = args[1]; object lst_73356_732677 = args[2]; object cmp_91proc_73357_732678 = args[3];
+   Cyc_st_add(data, "scheme/base.sld:member-helper");
    
 -if( (boolean_f != Cyc_is_null(lst_73356_733024)) ){ 
 -  return_direct_with_clo1(data,  k_734904, (((closure)  k_734904)->fn),  boolean_f);
-+if( (boolean_f != Cyc_is_null(lst_73356_732684)) ){ 
-+  return_direct_with_clo1(data,  k_734459, (((closure)  k_734459)->fn),  boolean_f);
++if( (boolean_f != Cyc_is_null(lst_73356_732677)) ){ 
++  return_direct_with_clo1(data,  k_734452, (((closure)  k_734452)->fn),  boolean_f);
  } else { 
    
 -closureN_type c_7316845;
@@ -56248,351 +56482,330 @@ Make let-values be the same as let*-values, to work around
 -c_7316845.elements[1] = k_734904;
 -c_7316845.elements[2] = lst_73356_733024;
 -c_7316845.elements[3] = obj_73355_733023;
-+closureN_type c_7315552;
-+object e_7315563 [4];
-+c_7315552.hdr.mark = gc_color_red;
-+ c_7315552.hdr.grayed = 0;
-+c_7315552.tag = closureN_tag;
-+ c_7315552.fn = (function_type)__lambda_279;
-+c_7315552.num_args = 1;
-+c_7315552.num_elements = 4;
-+c_7315552.elements = (object *)e_7315563;
-+c_7315552.elements[0] = cmp_91proc_73357_732685;
-+c_7315552.elements[1] = k_734459;
-+c_7315552.elements[2] = lst_73356_732684;
-+c_7315552.elements[3] = obj_73355_732683;
++closureN_type c_7315545;
++object e_7315556 [4];
++c_7315545.hdr.mark = gc_color_red;
++ c_7315545.hdr.grayed = 0;
++c_7315545.tag = closureN_tag;
++ c_7315545.fn = (function_type)__lambda_279;
++c_7315545.num_args = 1;
++c_7315545.num_elements = 4;
++c_7315545.elements = (object *)e_7315556;
++c_7315545.elements[0] = cmp_91proc_73357_732678;
++c_7315545.elements[1] = k_734452;
++c_7315545.elements[2] = lst_73356_732677;
++c_7315545.elements[3] = obj_73355_732676;
  
  
  
 -return_closcall3(data,  cmp_91proc_73357_733025,  &c_7316845, obj_73355_733023, Cyc_car(data, lst_73356_733024));}
-+return_closcall3(data,  cmp_91proc_73357_732685,  &c_7315552, obj_73355_732683, Cyc_car(data, lst_73356_732684));}
++return_closcall3(data,  cmp_91proc_73357_732678,  &c_7315545, obj_73355_732676, Cyc_car(data, lst_73356_732677));}
  ;; 
  }
  
 -static void __lambda_279(void *data, object self_7313219, int argc, object *args) /* object self_7313219, object r_734906 */
-+static void __lambda_279(void *data, object self_7311973, int argc, object *args) /* object self_7311973, object r_734461 */
++static void __lambda_279(void *data, object self_7311966, int argc, object *args) /* object self_7311966, object r_734454 */
   {
 - object r_734906 = args[0];
 -  if( (boolean_f != r_734906) ){ 
 -  return_direct_with_clo1(data,  ((closureN)self_7313219)->elements[1], (((closure)  ((closureN)self_7313219)->elements[1])->fn),  ((closureN)self_7313219)->elements[2]);
-+ object r_734461 = args[0];
-+  if( (boolean_f != r_734461) ){ 
-+  return_direct_with_clo1(data,  ((closureN)self_7311973)->elements[1], (((closure)  ((closureN)self_7311973)->elements[1])->fn),  ((closureN)self_7311973)->elements[2]);
++ object r_734454 = args[0];
++  if( (boolean_f != r_734454) ){ 
++  return_direct_with_clo1(data,  ((closureN)self_7311966)->elements[1], (((closure)  ((closureN)self_7311966)->elements[1])->fn),  ((closureN)self_7311966)->elements[2]);
  } else { 
    
  
 -return_direct_with_clo4(data,  __glo_member_91helper_scheme_base, (((closure)  __glo_member_91helper_scheme_base)->fn),  ((closureN)self_7313219)->elements[1], ((closureN)self_7313219)->elements[3], Cyc_cdr(data, ((closureN)self_7313219)->elements[2]), ((closureN)self_7313219)->elements[0]);}
-+return_direct_with_clo4(data,  __glo_member_91helper_scheme_base, (((closure)  __glo_member_91helper_scheme_base)->fn),  ((closureN)self_7311973)->elements[1], ((closureN)self_7311973)->elements[3], Cyc_cdr(data, ((closureN)self_7311973)->elements[2]), ((closureN)self_7311973)->elements[0]);}
++return_direct_with_clo4(data,  __glo_member_91helper_scheme_base, (((closure)  __glo_member_91helper_scheme_base)->fn),  ((closureN)self_7311966)->elements[1], ((closureN)self_7311966)->elements[3], Cyc_cdr(data, ((closureN)self_7311966)->elements[2]), ((closureN)self_7311966)->elements[0]);}
  ;; 
  }
  
 -static object __lambda_1435(void *data, object ptr,object str1_73353_733021, object str2_73354_733022) {
-+static object __lambda_1388(void *data, object ptr,object str1_73353_732681, object str2_73354_732682) {
++static object __lambda_1388(void *data, object ptr,object str1_73353_732674, object str2_73354_732675) {
  
--  Cyc_st_add(data, "scheme/base.sld:fast-string>=?");
-+  Cyc_st_add(data, "base.sld:fast-string>=?");
+   Cyc_st_add(data, "scheme/base.sld:fast-string>=?");
  
  
  
  
 -return_copy(ptr,  Cyc_num_fast_gte_op(data, Cyc_string_cmp(data, str1_73353_733021, str2_73354_733022), obj_int2obj(0)));; 
-+return_copy(ptr,  Cyc_num_fast_gte_op(data, Cyc_string_cmp(data, str1_73353_732681, str2_73354_732682), obj_int2obj(0)));; 
++return_copy(ptr,  Cyc_num_fast_gte_op(data, Cyc_string_cmp(data, str1_73353_732674, str2_73354_732675), obj_int2obj(0)));; 
  }
  
 -static void __lambda_277(void *data, object _, int argc, object *args) /* closure _,object k_734900, object str1_73353_733021, object str2_73354_733022 */
-+static void __lambda_277(void *data, object _, int argc, object *args) /* closure _,object k_734455, object str1_73353_732681, object str2_73354_732682 */
++static void __lambda_277(void *data, object _, int argc, object *args) /* closure _,object k_734448, object str1_73353_732674, object str2_73354_732675 */
   {
 -object k_734900 = args[0]; object str1_73353_733021 = args[1]; object str2_73354_733022 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:fast-string>=?");
-+object k_734455 = args[0]; object str1_73353_732681 = args[1]; object str2_73354_732682 = args[2];
-+  Cyc_st_add(data, "base.sld:fast-string>=?");
++object k_734448 = args[0]; object str1_73353_732674 = args[1]; object str2_73354_732675 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:fast-string>=?");
  
  
  
  
 -return_direct_with_clo1(data,  k_734900, (((closure)  k_734900)->fn),  Cyc_num_fast_gte_op(data, Cyc_string_cmp(data, str1_73353_733021, str2_73354_733022), obj_int2obj(0)));; 
-+return_direct_with_clo1(data,  k_734455, (((closure)  k_734455)->fn),  Cyc_num_fast_gte_op(data, Cyc_string_cmp(data, str1_73353_732681, str2_73354_732682), obj_int2obj(0)));; 
++return_direct_with_clo1(data,  k_734448, (((closure)  k_734448)->fn),  Cyc_num_fast_gte_op(data, Cyc_string_cmp(data, str1_73353_732674, str2_73354_732675), obj_int2obj(0)));; 
  }
  
 -static object __lambda_1434(void *data, object ptr,object str1_73351_733019, object str2_73352_733020) {
-+static object __lambda_1387(void *data, object ptr,object str1_73351_732679, object str2_73352_732680) {
++static object __lambda_1387(void *data, object ptr,object str1_73351_732672, object str2_73352_732673) {
  
--  Cyc_st_add(data, "scheme/base.sld:fast-string>?");
-+  Cyc_st_add(data, "base.sld:fast-string>?");
+   Cyc_st_add(data, "scheme/base.sld:fast-string>?");
  
  
  
  
 -return_copy(ptr,  Cyc_num_fast_gt_op(data, Cyc_string_cmp(data, str1_73351_733019, str2_73352_733020), obj_int2obj(0)));; 
-+return_copy(ptr,  Cyc_num_fast_gt_op(data, Cyc_string_cmp(data, str1_73351_732679, str2_73352_732680), obj_int2obj(0)));; 
++return_copy(ptr,  Cyc_num_fast_gt_op(data, Cyc_string_cmp(data, str1_73351_732672, str2_73352_732673), obj_int2obj(0)));; 
  }
  
 -static void __lambda_276(void *data, object _, int argc, object *args) /* closure _,object k_734896, object str1_73351_733019, object str2_73352_733020 */
-+static void __lambda_276(void *data, object _, int argc, object *args) /* closure _,object k_734451, object str1_73351_732679, object str2_73352_732680 */
++static void __lambda_276(void *data, object _, int argc, object *args) /* closure _,object k_734444, object str1_73351_732672, object str2_73352_732673 */
   {
 -object k_734896 = args[0]; object str1_73351_733019 = args[1]; object str2_73352_733020 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:fast-string>?");
-+object k_734451 = args[0]; object str1_73351_732679 = args[1]; object str2_73352_732680 = args[2];
-+  Cyc_st_add(data, "base.sld:fast-string>?");
++object k_734444 = args[0]; object str1_73351_732672 = args[1]; object str2_73352_732673 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:fast-string>?");
  
  
  
  
 -return_direct_with_clo1(data,  k_734896, (((closure)  k_734896)->fn),  Cyc_num_fast_gt_op(data, Cyc_string_cmp(data, str1_73351_733019, str2_73352_733020), obj_int2obj(0)));; 
-+return_direct_with_clo1(data,  k_734451, (((closure)  k_734451)->fn),  Cyc_num_fast_gt_op(data, Cyc_string_cmp(data, str1_73351_732679, str2_73352_732680), obj_int2obj(0)));; 
++return_direct_with_clo1(data,  k_734444, (((closure)  k_734444)->fn),  Cyc_num_fast_gt_op(data, Cyc_string_cmp(data, str1_73351_732672, str2_73352_732673), obj_int2obj(0)));; 
  }
  
 -static object __lambda_1433(void *data, object ptr,object str1_73349_733017, object str2_73350_733018) {
-+static object __lambda_1386(void *data, object ptr,object str1_73349_732677, object str2_73350_732678) {
++static object __lambda_1386(void *data, object ptr,object str1_73349_732670, object str2_73350_732671) {
  
--  Cyc_st_add(data, "scheme/base.sld:fast-string<=?");
-+  Cyc_st_add(data, "base.sld:fast-string<=?");
+   Cyc_st_add(data, "scheme/base.sld:fast-string<=?");
  
  
  
  
 -return_copy(ptr,  Cyc_num_fast_lte_op(data, Cyc_string_cmp(data, str1_73349_733017, str2_73350_733018), obj_int2obj(0)));; 
-+return_copy(ptr,  Cyc_num_fast_lte_op(data, Cyc_string_cmp(data, str1_73349_732677, str2_73350_732678), obj_int2obj(0)));; 
++return_copy(ptr,  Cyc_num_fast_lte_op(data, Cyc_string_cmp(data, str1_73349_732670, str2_73350_732671), obj_int2obj(0)));; 
  }
  
 -static void __lambda_275(void *data, object _, int argc, object *args) /* closure _,object k_734892, object str1_73349_733017, object str2_73350_733018 */
-+static void __lambda_275(void *data, object _, int argc, object *args) /* closure _,object k_734447, object str1_73349_732677, object str2_73350_732678 */
++static void __lambda_275(void *data, object _, int argc, object *args) /* closure _,object k_734440, object str1_73349_732670, object str2_73350_732671 */
   {
 -object k_734892 = args[0]; object str1_73349_733017 = args[1]; object str2_73350_733018 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:fast-string<=?");
-+object k_734447 = args[0]; object str1_73349_732677 = args[1]; object str2_73350_732678 = args[2];
-+  Cyc_st_add(data, "base.sld:fast-string<=?");
++object k_734440 = args[0]; object str1_73349_732670 = args[1]; object str2_73350_732671 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:fast-string<=?");
  
  
  
  
 -return_direct_with_clo1(data,  k_734892, (((closure)  k_734892)->fn),  Cyc_num_fast_lte_op(data, Cyc_string_cmp(data, str1_73349_733017, str2_73350_733018), obj_int2obj(0)));; 
-+return_direct_with_clo1(data,  k_734447, (((closure)  k_734447)->fn),  Cyc_num_fast_lte_op(data, Cyc_string_cmp(data, str1_73349_732677, str2_73350_732678), obj_int2obj(0)));; 
++return_direct_with_clo1(data,  k_734440, (((closure)  k_734440)->fn),  Cyc_num_fast_lte_op(data, Cyc_string_cmp(data, str1_73349_732670, str2_73350_732671), obj_int2obj(0)));; 
  }
  
 -static object __lambda_1432(void *data, object ptr,object str1_73347_733015, object str2_73348_733016) {
-+static object __lambda_1385(void *data, object ptr,object str1_73347_732675, object str2_73348_732676) {
++static object __lambda_1385(void *data, object ptr,object str1_73347_732668, object str2_73348_732669) {
  
--  Cyc_st_add(data, "scheme/base.sld:fast-string<?");
-+  Cyc_st_add(data, "base.sld:fast-string<?");
+   Cyc_st_add(data, "scheme/base.sld:fast-string<?");
  
  
  
  
 -return_copy(ptr,  Cyc_num_fast_lt_op(data, Cyc_string_cmp(data, str1_73347_733015, str2_73348_733016), obj_int2obj(0)));; 
-+return_copy(ptr,  Cyc_num_fast_lt_op(data, Cyc_string_cmp(data, str1_73347_732675, str2_73348_732676), obj_int2obj(0)));; 
++return_copy(ptr,  Cyc_num_fast_lt_op(data, Cyc_string_cmp(data, str1_73347_732668, str2_73348_732669), obj_int2obj(0)));; 
  }
  
 -static void __lambda_274(void *data, object _, int argc, object *args) /* closure _,object k_734888, object str1_73347_733015, object str2_73348_733016 */
-+static void __lambda_274(void *data, object _, int argc, object *args) /* closure _,object k_734443, object str1_73347_732675, object str2_73348_732676 */
++static void __lambda_274(void *data, object _, int argc, object *args) /* closure _,object k_734436, object str1_73347_732668, object str2_73348_732669 */
   {
 -object k_734888 = args[0]; object str1_73347_733015 = args[1]; object str2_73348_733016 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:fast-string<?");
-+object k_734443 = args[0]; object str1_73347_732675 = args[1]; object str2_73348_732676 = args[2];
-+  Cyc_st_add(data, "base.sld:fast-string<?");
++object k_734436 = args[0]; object str1_73347_732668 = args[1]; object str2_73348_732669 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:fast-string<?");
  
  
  
  
 -return_direct_with_clo1(data,  k_734888, (((closure)  k_734888)->fn),  Cyc_num_fast_lt_op(data, Cyc_string_cmp(data, str1_73347_733015, str2_73348_733016), obj_int2obj(0)));; 
-+return_direct_with_clo1(data,  k_734443, (((closure)  k_734443)->fn),  Cyc_num_fast_lt_op(data, Cyc_string_cmp(data, str1_73347_732675, str2_73348_732676), obj_int2obj(0)));; 
++return_direct_with_clo1(data,  k_734436, (((closure)  k_734436)->fn),  Cyc_num_fast_lt_op(data, Cyc_string_cmp(data, str1_73347_732668, str2_73348_732669), obj_int2obj(0)));; 
  }
  
 -static object __lambda_1431(void *data, object ptr,object str1_73345_733013, object str2_73346_733014) {
-+static object __lambda_1384(void *data, object ptr,object str1_73345_732673, object str2_73346_732674) {
++static object __lambda_1384(void *data, object ptr,object str1_73345_732666, object str2_73346_732667) {
  
--  Cyc_st_add(data, "scheme/base.sld:fast-string=?");
-+  Cyc_st_add(data, "base.sld:fast-string=?");
+   Cyc_st_add(data, "scheme/base.sld:fast-string=?");
  
  
  
  
 -return_copy(ptr,  equalp(Cyc_string_cmp(data, str1_73345_733013, str2_73346_733014), obj_int2obj(0)));; 
-+return_copy(ptr,  equalp(Cyc_string_cmp(data, str1_73345_732673, str2_73346_732674), obj_int2obj(0)));; 
++return_copy(ptr,  equalp(Cyc_string_cmp(data, str1_73345_732666, str2_73346_732667), obj_int2obj(0)));; 
  }
  
 -static void __lambda_273(void *data, object _, int argc, object *args) /* closure _,object k_734884, object str1_73345_733013, object str2_73346_733014 */
-+static void __lambda_273(void *data, object _, int argc, object *args) /* closure _,object k_734439, object str1_73345_732673, object str2_73346_732674 */
++static void __lambda_273(void *data, object _, int argc, object *args) /* closure _,object k_734432, object str1_73345_732666, object str2_73346_732667 */
   {
 -object k_734884 = args[0]; object str1_73345_733013 = args[1]; object str2_73346_733014 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:fast-string=?");
-+object k_734439 = args[0]; object str1_73345_732673 = args[1]; object str2_73346_732674 = args[2];
-+  Cyc_st_add(data, "base.sld:fast-string=?");
++object k_734432 = args[0]; object str1_73345_732666 = args[1]; object str2_73346_732667 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:fast-string=?");
  
  
  
  
 -return_direct_with_clo1(data,  k_734884, (((closure)  k_734884)->fn),  equalp(Cyc_string_cmp(data, str1_73345_733013, str2_73346_733014), obj_int2obj(0)));; 
-+return_direct_with_clo1(data,  k_734439, (((closure)  k_734439)->fn),  equalp(Cyc_string_cmp(data, str1_73345_732673, str2_73346_732674), obj_int2obj(0)));; 
++return_direct_with_clo1(data,  k_734432, (((closure)  k_734432)->fn),  equalp(Cyc_string_cmp(data, str1_73345_732666, str2_73346_732667), obj_int2obj(0)));; 
  }
  
 -static void __lambda_272(void *data, object _, int argc, object *args) /* closure _,object k_734880, object str1_73342_733010, object str2_73343_733011, object strs_73344_733012_raw, ... */
-+static void __lambda_272(void *data, object _, int argc, object *args) /* closure _,object k_734435, object str1_73342_732670, object str2_73343_732671, object strs_73344_732672_raw, ... */
++static void __lambda_272(void *data, object _, int argc, object *args) /* closure _,object k_734428, object str1_73342_732663, object str2_73343_732664, object strs_73344_732665_raw, ... */
   {
 -object k_734880 = args[0]; object str1_73342_733010 = args[1]; object str2_73343_733011 = args[2];
 -load_varargs(strs_73344_733012, args, 3, argc - 3);
--  Cyc_st_add(data, "scheme/base.sld:string>=?");
-+object k_734435 = args[0]; object str1_73342_732670 = args[1]; object str2_73343_732671 = args[2];
-+load_varargs(strs_73344_732672, args, 3, argc - 3);
-+  Cyc_st_add(data, "base.sld:string>=?");
++object k_734428 = args[0]; object str1_73342_732663 = args[1]; object str2_73343_732664 = args[2];
++load_varargs(strs_73344_732665, args, 3, argc - 3);
+   Cyc_st_add(data, "scheme/base.sld:string>=?");
  
 -pair_type local_7316779; 
 -return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_scheme_base, (((closure)  __glo_Cyc_91bin_91op_scheme_base)->fn),  k_734880, __glo_fast_91string_125_123_127_scheme_base, str1_73342_733010, set_pair_as_expr(&local_7316779, str2_73343_733011, strs_73344_733012));; 
-+pair_type local_7315486; 
-+return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_scheme_base, (((closure)  __glo_Cyc_91bin_91op_scheme_base)->fn),  k_734435, __glo_fast_91string_125_123_127_scheme_base, str1_73342_732670, set_pair_as_expr(&local_7315486, str2_73343_732671, strs_73344_732672));; 
++pair_type local_7315479; 
++return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_scheme_base, (((closure)  __glo_Cyc_91bin_91op_scheme_base)->fn),  k_734428, __glo_fast_91string_125_123_127_scheme_base, str1_73342_732663, set_pair_as_expr(&local_7315479, str2_73343_732664, strs_73344_732665));; 
  }
  
 -static void __lambda_271(void *data, object _, int argc, object *args) /* closure _,object k_734876, object str1_73339_733007, object str2_73340_733008, object strs_73341_733009_raw, ... */
-+static void __lambda_271(void *data, object _, int argc, object *args) /* closure _,object k_734431, object str1_73339_732667, object str2_73340_732668, object strs_73341_732669_raw, ... */
++static void __lambda_271(void *data, object _, int argc, object *args) /* closure _,object k_734424, object str1_73339_732660, object str2_73340_732661, object strs_73341_732662_raw, ... */
   {
 -object k_734876 = args[0]; object str1_73339_733007 = args[1]; object str2_73340_733008 = args[2];
 -load_varargs(strs_73341_733009, args, 3, argc - 3);
--  Cyc_st_add(data, "scheme/base.sld:string>?");
-+object k_734431 = args[0]; object str1_73339_732667 = args[1]; object str2_73340_732668 = args[2];
-+load_varargs(strs_73341_732669, args, 3, argc - 3);
-+  Cyc_st_add(data, "base.sld:string>?");
++object k_734424 = args[0]; object str1_73339_732660 = args[1]; object str2_73340_732661 = args[2];
++load_varargs(strs_73341_732662, args, 3, argc - 3);
+   Cyc_st_add(data, "scheme/base.sld:string>?");
  
 -pair_type local_7316774; 
 -return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_scheme_base, (((closure)  __glo_Cyc_91bin_91op_scheme_base)->fn),  k_734876, __glo_fast_91string_125_127_scheme_base, str1_73339_733007, set_pair_as_expr(&local_7316774, str2_73340_733008, strs_73341_733009));; 
-+pair_type local_7315481; 
-+return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_scheme_base, (((closure)  __glo_Cyc_91bin_91op_scheme_base)->fn),  k_734431, __glo_fast_91string_125_127_scheme_base, str1_73339_732667, set_pair_as_expr(&local_7315481, str2_73340_732668, strs_73341_732669));; 
++pair_type local_7315474; 
++return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_scheme_base, (((closure)  __glo_Cyc_91bin_91op_scheme_base)->fn),  k_734424, __glo_fast_91string_125_127_scheme_base, str1_73339_732660, set_pair_as_expr(&local_7315474, str2_73340_732661, strs_73341_732662));; 
  }
  
 -static void __lambda_270(void *data, object _, int argc, object *args) /* closure _,object k_734872, object str1_73336_733004, object str2_73337_733005, object strs_73338_733006_raw, ... */
-+static void __lambda_270(void *data, object _, int argc, object *args) /* closure _,object k_734427, object str1_73336_732664, object str2_73337_732665, object strs_73338_732666_raw, ... */
++static void __lambda_270(void *data, object _, int argc, object *args) /* closure _,object k_734420, object str1_73336_732657, object str2_73337_732658, object strs_73338_732659_raw, ... */
   {
 -object k_734872 = args[0]; object str1_73336_733004 = args[1]; object str2_73337_733005 = args[2];
 -load_varargs(strs_73338_733006, args, 3, argc - 3);
--  Cyc_st_add(data, "scheme/base.sld:string<=?");
-+object k_734427 = args[0]; object str1_73336_732664 = args[1]; object str2_73337_732665 = args[2];
-+load_varargs(strs_73338_732666, args, 3, argc - 3);
-+  Cyc_st_add(data, "base.sld:string<=?");
++object k_734420 = args[0]; object str1_73336_732657 = args[1]; object str2_73337_732658 = args[2];
++load_varargs(strs_73338_732659, args, 3, argc - 3);
+   Cyc_st_add(data, "scheme/base.sld:string<=?");
  
 -pair_type local_7316769; 
 -return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_scheme_base, (((closure)  __glo_Cyc_91bin_91op_scheme_base)->fn),  k_734872, __glo_fast_91string_121_123_127_scheme_base, str1_73336_733004, set_pair_as_expr(&local_7316769, str2_73337_733005, strs_73338_733006));; 
-+pair_type local_7315476; 
-+return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_scheme_base, (((closure)  __glo_Cyc_91bin_91op_scheme_base)->fn),  k_734427, __glo_fast_91string_121_123_127_scheme_base, str1_73336_732664, set_pair_as_expr(&local_7315476, str2_73337_732665, strs_73338_732666));; 
++pair_type local_7315469; 
++return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_scheme_base, (((closure)  __glo_Cyc_91bin_91op_scheme_base)->fn),  k_734420, __glo_fast_91string_121_123_127_scheme_base, str1_73336_732657, set_pair_as_expr(&local_7315469, str2_73337_732658, strs_73338_732659));; 
  }
  
 -static void __lambda_269(void *data, object _, int argc, object *args) /* closure _,object k_734868, object str1_73333_733001, object str2_73334_733002, object strs_73335_733003_raw, ... */
-+static void __lambda_269(void *data, object _, int argc, object *args) /* closure _,object k_734423, object str1_73333_732661, object str2_73334_732662, object strs_73335_732663_raw, ... */
++static void __lambda_269(void *data, object _, int argc, object *args) /* closure _,object k_734416, object str1_73333_732654, object str2_73334_732655, object strs_73335_732656_raw, ... */
   {
 -object k_734868 = args[0]; object str1_73333_733001 = args[1]; object str2_73334_733002 = args[2];
 -load_varargs(strs_73335_733003, args, 3, argc - 3);
--  Cyc_st_add(data, "scheme/base.sld:string<?");
-+object k_734423 = args[0]; object str1_73333_732661 = args[1]; object str2_73334_732662 = args[2];
-+load_varargs(strs_73335_732663, args, 3, argc - 3);
-+  Cyc_st_add(data, "base.sld:string<?");
++object k_734416 = args[0]; object str1_73333_732654 = args[1]; object str2_73334_732655 = args[2];
++load_varargs(strs_73335_732656, args, 3, argc - 3);
+   Cyc_st_add(data, "scheme/base.sld:string<?");
  
 -pair_type local_7316764; 
 -return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_scheme_base, (((closure)  __glo_Cyc_91bin_91op_scheme_base)->fn),  k_734868, __glo_fast_91string_121_127_scheme_base, str1_73333_733001, set_pair_as_expr(&local_7316764, str2_73334_733002, strs_73335_733003));; 
-+pair_type local_7315471; 
-+return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_scheme_base, (((closure)  __glo_Cyc_91bin_91op_scheme_base)->fn),  k_734423, __glo_fast_91string_121_127_scheme_base, str1_73333_732661, set_pair_as_expr(&local_7315471, str2_73334_732662, strs_73335_732663));; 
++pair_type local_7315464; 
++return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_scheme_base, (((closure)  __glo_Cyc_91bin_91op_scheme_base)->fn),  k_734416, __glo_fast_91string_121_127_scheme_base, str1_73333_732654, set_pair_as_expr(&local_7315464, str2_73334_732655, strs_73335_732656));; 
  }
  
 -static void __lambda_268(void *data, object _, int argc, object *args) /* closure _,object k_734864, object str1_73330_732998, object str2_73331_732999, object strs_73332_733000_raw, ... */
-+static void __lambda_268(void *data, object _, int argc, object *args) /* closure _,object k_734419, object str1_73330_732658, object str2_73331_732659, object strs_73332_732660_raw, ... */
++static void __lambda_268(void *data, object _, int argc, object *args) /* closure _,object k_734412, object str1_73330_732651, object str2_73331_732652, object strs_73332_732653_raw, ... */
   {
 -object k_734864 = args[0]; object str1_73330_732998 = args[1]; object str2_73331_732999 = args[2];
 -load_varargs(strs_73332_733000, args, 3, argc - 3);
--  Cyc_st_add(data, "scheme/base.sld:string=?");
-+object k_734419 = args[0]; object str1_73330_732658 = args[1]; object str2_73331_732659 = args[2];
-+load_varargs(strs_73332_732660, args, 3, argc - 3);
-+  Cyc_st_add(data, "base.sld:string=?");
++object k_734412 = args[0]; object str1_73330_732651 = args[1]; object str2_73331_732652 = args[2];
++load_varargs(strs_73332_732653, args, 3, argc - 3);
+   Cyc_st_add(data, "scheme/base.sld:string=?");
  
 -pair_type local_7316759; 
 -return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_scheme_base, (((closure)  __glo_Cyc_91bin_91op_scheme_base)->fn),  k_734864, __glo_fast_91string_123_127_scheme_base, str1_73330_732998, set_pair_as_expr(&local_7316759, str2_73331_732999, strs_73332_733000));; 
-+pair_type local_7315466; 
-+return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_scheme_base, (((closure)  __glo_Cyc_91bin_91op_scheme_base)->fn),  k_734419, __glo_fast_91string_123_127_scheme_base, str1_73330_732658, set_pair_as_expr(&local_7315466, str2_73331_732659, strs_73332_732660));; 
++pair_type local_7315459; 
++return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_scheme_base, (((closure)  __glo_Cyc_91bin_91op_scheme_base)->fn),  k_734412, __glo_fast_91string_123_127_scheme_base, str1_73330_732651, set_pair_as_expr(&local_7315459, str2_73331_732652, strs_73332_732653));; 
  }
  
 -static void __lambda_267(void *data, object _, int argc, object *args) /* closure _,object k_734860, object c1_73327_732995, object c2_73328_732996, object cs_73329_732997_raw, ... */
-+static void __lambda_267(void *data, object _, int argc, object *args) /* closure _,object k_734415, object c1_73327_732655, object c2_73328_732656, object cs_73329_732657_raw, ... */
++static void __lambda_267(void *data, object _, int argc, object *args) /* closure _,object k_734408, object c1_73327_732648, object c2_73328_732649, object cs_73329_732650_raw, ... */
   {
 -object k_734860 = args[0]; object c1_73327_732995 = args[1]; object c2_73328_732996 = args[2];
 -load_varargs(cs_73329_732997, args, 3, argc - 3);
--  Cyc_st_add(data, "scheme/base.sld:char>=?");
-+object k_734415 = args[0]; object c1_73327_732655 = args[1]; object c2_73328_732656 = args[2];
-+load_varargs(cs_73329_732657, args, 3, argc - 3);
-+  Cyc_st_add(data, "base.sld:char>=?");
++object k_734408 = args[0]; object c1_73327_732648 = args[1]; object c2_73328_732649 = args[2];
++load_varargs(cs_73329_732650, args, 3, argc - 3);
+   Cyc_st_add(data, "scheme/base.sld:char>=?");
  
 -pair_type local_7316754; 
 -return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_91char_scheme_base, (((closure)  __glo_Cyc_91bin_91op_91char_scheme_base)->fn),  k_734860, primitive__125_123, c1_73327_732995, set_pair_as_expr(&local_7316754, c2_73328_732996, cs_73329_732997));; 
-+pair_type local_7315461; 
-+return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_91char_scheme_base, (((closure)  __glo_Cyc_91bin_91op_91char_scheme_base)->fn),  k_734415, primitive__125_123, c1_73327_732655, set_pair_as_expr(&local_7315461, c2_73328_732656, cs_73329_732657));; 
++pair_type local_7315454; 
++return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_91char_scheme_base, (((closure)  __glo_Cyc_91bin_91op_91char_scheme_base)->fn),  k_734408, primitive__125_123, c1_73327_732648, set_pair_as_expr(&local_7315454, c2_73328_732649, cs_73329_732650));; 
  }
  
 -static void __lambda_266(void *data, object _, int argc, object *args) /* closure _,object k_734856, object c1_73324_732992, object c2_73325_732993, object cs_73326_732994_raw, ... */
-+static void __lambda_266(void *data, object _, int argc, object *args) /* closure _,object k_734411, object c1_73324_732652, object c2_73325_732653, object cs_73326_732654_raw, ... */
++static void __lambda_266(void *data, object _, int argc, object *args) /* closure _,object k_734404, object c1_73324_732645, object c2_73325_732646, object cs_73326_732647_raw, ... */
   {
 -object k_734856 = args[0]; object c1_73324_732992 = args[1]; object c2_73325_732993 = args[2];
 -load_varargs(cs_73326_732994, args, 3, argc - 3);
--  Cyc_st_add(data, "scheme/base.sld:char<=?");
-+object k_734411 = args[0]; object c1_73324_732652 = args[1]; object c2_73325_732653 = args[2];
-+load_varargs(cs_73326_732654, args, 3, argc - 3);
-+  Cyc_st_add(data, "base.sld:char<=?");
++object k_734404 = args[0]; object c1_73324_732645 = args[1]; object c2_73325_732646 = args[2];
++load_varargs(cs_73326_732647, args, 3, argc - 3);
+   Cyc_st_add(data, "scheme/base.sld:char<=?");
  
 -pair_type local_7316749; 
 -return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_91char_scheme_base, (((closure)  __glo_Cyc_91bin_91op_91char_scheme_base)->fn),  k_734856, primitive__121_123, c1_73324_732992, set_pair_as_expr(&local_7316749, c2_73325_732993, cs_73326_732994));; 
-+pair_type local_7315456; 
-+return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_91char_scheme_base, (((closure)  __glo_Cyc_91bin_91op_91char_scheme_base)->fn),  k_734411, primitive__121_123, c1_73324_732652, set_pair_as_expr(&local_7315456, c2_73325_732653, cs_73326_732654));; 
++pair_type local_7315449; 
++return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_91char_scheme_base, (((closure)  __glo_Cyc_91bin_91op_91char_scheme_base)->fn),  k_734404, primitive__121_123, c1_73324_732645, set_pair_as_expr(&local_7315449, c2_73325_732646, cs_73326_732647));; 
  }
  
 -static void __lambda_265(void *data, object _, int argc, object *args) /* closure _,object k_734852, object c1_73321_732989, object c2_73322_732990, object cs_73323_732991_raw, ... */
-+static void __lambda_265(void *data, object _, int argc, object *args) /* closure _,object k_734407, object c1_73321_732649, object c2_73322_732650, object cs_73323_732651_raw, ... */
++static void __lambda_265(void *data, object _, int argc, object *args) /* closure _,object k_734400, object c1_73321_732642, object c2_73322_732643, object cs_73323_732644_raw, ... */
   {
 -object k_734852 = args[0]; object c1_73321_732989 = args[1]; object c2_73322_732990 = args[2];
 -load_varargs(cs_73323_732991, args, 3, argc - 3);
--  Cyc_st_add(data, "scheme/base.sld:char>?");
-+object k_734407 = args[0]; object c1_73321_732649 = args[1]; object c2_73322_732650 = args[2];
-+load_varargs(cs_73323_732651, args, 3, argc - 3);
-+  Cyc_st_add(data, "base.sld:char>?");
++object k_734400 = args[0]; object c1_73321_732642 = args[1]; object c2_73322_732643 = args[2];
++load_varargs(cs_73323_732644, args, 3, argc - 3);
+   Cyc_st_add(data, "scheme/base.sld:char>?");
  
 -pair_type local_7316744; 
 -return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_91char_scheme_base, (((closure)  __glo_Cyc_91bin_91op_91char_scheme_base)->fn),  k_734852, primitive__125, c1_73321_732989, set_pair_as_expr(&local_7316744, c2_73322_732990, cs_73323_732991));; 
-+pair_type local_7315451; 
-+return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_91char_scheme_base, (((closure)  __glo_Cyc_91bin_91op_91char_scheme_base)->fn),  k_734407, primitive__125, c1_73321_732649, set_pair_as_expr(&local_7315451, c2_73322_732650, cs_73323_732651));; 
++pair_type local_7315444; 
++return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_91char_scheme_base, (((closure)  __glo_Cyc_91bin_91op_91char_scheme_base)->fn),  k_734400, primitive__125, c1_73321_732642, set_pair_as_expr(&local_7315444, c2_73322_732643, cs_73323_732644));; 
  }
  
 -static void __lambda_264(void *data, object _, int argc, object *args) /* closure _,object k_734848, object c1_73318_732986, object c2_73319_732987, object cs_73320_732988_raw, ... */
-+static void __lambda_264(void *data, object _, int argc, object *args) /* closure _,object k_734403, object c1_73318_732646, object c2_73319_732647, object cs_73320_732648_raw, ... */
++static void __lambda_264(void *data, object _, int argc, object *args) /* closure _,object k_734396, object c1_73318_732639, object c2_73319_732640, object cs_73320_732641_raw, ... */
   {
 -object k_734848 = args[0]; object c1_73318_732986 = args[1]; object c2_73319_732987 = args[2];
 -load_varargs(cs_73320_732988, args, 3, argc - 3);
--  Cyc_st_add(data, "scheme/base.sld:char<?");
-+object k_734403 = args[0]; object c1_73318_732646 = args[1]; object c2_73319_732647 = args[2];
-+load_varargs(cs_73320_732648, args, 3, argc - 3);
-+  Cyc_st_add(data, "base.sld:char<?");
++object k_734396 = args[0]; object c1_73318_732639 = args[1]; object c2_73319_732640 = args[2];
++load_varargs(cs_73320_732641, args, 3, argc - 3);
+   Cyc_st_add(data, "scheme/base.sld:char<?");
  
 -pair_type local_7316739; 
 -return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_91char_scheme_base, (((closure)  __glo_Cyc_91bin_91op_91char_scheme_base)->fn),  k_734848, primitive__121, c1_73318_732986, set_pair_as_expr(&local_7316739, c2_73319_732987, cs_73320_732988));; 
-+pair_type local_7315446; 
-+return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_91char_scheme_base, (((closure)  __glo_Cyc_91bin_91op_91char_scheme_base)->fn),  k_734403, primitive__121, c1_73318_732646, set_pair_as_expr(&local_7315446, c2_73319_732647, cs_73320_732648));; 
++pair_type local_7315439; 
++return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_91char_scheme_base, (((closure)  __glo_Cyc_91bin_91op_91char_scheme_base)->fn),  k_734396, primitive__121, c1_73318_732639, set_pair_as_expr(&local_7315439, c2_73319_732640, cs_73320_732641));; 
  }
  
 -static void __lambda_263(void *data, object _, int argc, object *args) /* closure _,object k_734844, object c1_73315_732983, object c2_73316_732984, object cs_73317_732985_raw, ... */
-+static void __lambda_263(void *data, object _, int argc, object *args) /* closure _,object k_734399, object c1_73315_732643, object c2_73316_732644, object cs_73317_732645_raw, ... */
++static void __lambda_263(void *data, object _, int argc, object *args) /* closure _,object k_734392, object c1_73315_732636, object c2_73316_732637, object cs_73317_732638_raw, ... */
   {
 -object k_734844 = args[0]; object c1_73315_732983 = args[1]; object c2_73316_732984 = args[2];
 -load_varargs(cs_73317_732985, args, 3, argc - 3);
--  Cyc_st_add(data, "scheme/base.sld:char=?");
-+object k_734399 = args[0]; object c1_73315_732643 = args[1]; object c2_73316_732644 = args[2];
-+load_varargs(cs_73317_732645, args, 3, argc - 3);
-+  Cyc_st_add(data, "base.sld:char=?");
++object k_734392 = args[0]; object c1_73315_732636 = args[1]; object c2_73316_732637 = args[2];
++load_varargs(cs_73317_732638, args, 3, argc - 3);
+   Cyc_st_add(data, "scheme/base.sld:char=?");
  
 -pair_type local_7316734; 
 -return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_91char_scheme_base, (((closure)  __glo_Cyc_91bin_91op_91char_scheme_base)->fn),  k_734844, primitive__123, c1_73315_732983, set_pair_as_expr(&local_7316734, c2_73316_732984, cs_73317_732985));; 
-+pair_type local_7315441; 
-+return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_91char_scheme_base, (((closure)  __glo_Cyc_91bin_91op_91char_scheme_base)->fn),  k_734399, primitive__123, c1_73315_732643, set_pair_as_expr(&local_7315441, c2_73316_732644, cs_73317_732645));; 
++pair_type local_7315434; 
++return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_91char_scheme_base, (((closure)  __glo_Cyc_91bin_91op_91char_scheme_base)->fn),  k_734392, primitive__123, c1_73315_732636, set_pair_as_expr(&local_7315434, c2_73316_732637, cs_73317_732638));; 
  }
  
 -static void __lambda_260(void *data, object _, int argc, object *args) /* closure _,object k_734837, object cmp_73310_732978, object c_73311_732979, object cs_73312_732980 */
-+static void __lambda_260(void *data, object _, int argc, object *args) /* closure _,object k_734392, object cmp_73310_732638, object c_73311_732639, object cs_73312_732640 */
++static void __lambda_260(void *data, object _, int argc, object *args) /* closure _,object k_734385, object cmp_73310_732631, object c_73311_732632, object cs_73312_732633 */
   {
 -object k_734837 = args[0]; object cmp_73310_732978 = args[1]; object c_73311_732979 = args[2]; object cs_73312_732980 = args[3];
--  Cyc_st_add(data, "scheme/base.sld:Cyc-bin-op-char");
-+object k_734392 = args[0]; object cmp_73310_732638 = args[1]; object c_73311_732639 = args[2]; object cs_73312_732640 = args[3];
-+  Cyc_st_add(data, "base.sld:Cyc-bin-op-char");
++object k_734385 = args[0]; object cmp_73310_732631 = args[1]; object c_73311_732632 = args[2]; object cs_73312_732633 = args[3];
+   Cyc_st_add(data, "scheme/base.sld:Cyc-bin-op-char");
  
 -closureN_type c_7316716;
 -object e_7316721 [3];
@@ -56606,18 +56819,18 @@ Make let-values be the same as let*-values, to work around
 -c_7316716.elements[0] = c_73311_732979;
 -c_7316716.elements[1] = cs_73312_732980;
 -c_7316716.elements[2] = k_734837;
-+closureN_type c_7315423;
-+object e_7315428 [3];
-+c_7315423.hdr.mark = gc_color_red;
-+ c_7315423.hdr.grayed = 0;
-+c_7315423.tag = closureN_tag;
-+ c_7315423.fn = (function_type)__lambda_261;
-+c_7315423.num_args = 1;
-+c_7315423.num_elements = 3;
-+c_7315423.elements = (object *)e_7315428;
-+c_7315423.elements[0] = c_73311_732639;
-+c_7315423.elements[1] = cs_73312_732640;
-+c_7315423.elements[2] = k_734392;
++closureN_type c_7315416;
++object e_7315421 [3];
++c_7315416.hdr.mark = gc_color_red;
++ c_7315416.hdr.grayed = 0;
++c_7315416.tag = closureN_tag;
++ c_7315416.fn = (function_type)__lambda_261;
++c_7315416.num_args = 1;
++c_7315416.num_elements = 3;
++c_7315416.elements = (object *)e_7315421;
++c_7315416.elements[0] = c_73311_732632;
++c_7315416.elements[1] = cs_73312_732633;
++c_7315416.elements[2] = k_734385;
  
  
 -closureN_type c_7316722;
@@ -56630,55 +56843,54 @@ Make let-values be the same as let*-values, to work around
 -c_7316722.num_elements = 1;
 -c_7316722.elements = (object *)e_7316729;
 -c_7316722.elements[0] = cmp_73310_732978;
-+closureN_type c_7315429;
-+object e_7315436 [1];
-+c_7315429.hdr.mark = gc_color_red;
-+ c_7315429.hdr.grayed = 0;
-+c_7315429.tag = closureN_tag;
-+ c_7315429.fn = (function_type)__lambda_262;
-+c_7315429.num_args = 2;
-+c_7315429.num_elements = 1;
-+c_7315429.elements = (object *)e_7315436;
-+c_7315429.elements[0] = cmp_73310_732638;
++closureN_type c_7315422;
++object e_7315429 [1];
++c_7315422.hdr.mark = gc_color_red;
++ c_7315422.hdr.grayed = 0;
++c_7315422.tag = closureN_tag;
++ c_7315422.fn = (function_type)__lambda_262;
++c_7315422.num_args = 2;
++c_7315422.num_elements = 1;
++c_7315422.elements = (object *)e_7315429;
++c_7315422.elements[0] = cmp_73310_732631;
  
 -return_direct_with_clo1(data,(closure)&c_7316716,__lambda_261,  &c_7316722);; 
-+return_direct_with_clo1(data,(closure)&c_7315423,__lambda_261,  &c_7315429);; 
++return_direct_with_clo1(data,(closure)&c_7315416,__lambda_261,  &c_7315422);; 
  }
  
 -static void __lambda_262(void *data, object self_7313217, int argc, object *args) /* object self_7313217, object k_734839, object x_73313_732981, object y_73314_732982 */
-+static void __lambda_262(void *data, object self_7311971, int argc, object *args) /* object self_7311971, object k_734394, object x_73313_732641, object y_73314_732642 */
++static void __lambda_262(void *data, object self_7311964, int argc, object *args) /* object self_7311964, object k_734387, object x_73313_732634, object y_73314_732635 */
   {
 - object k_734839 = args[0]; object x_73313_732981 = args[1]; object y_73314_732982 = args[2];
-+ object k_734394 = args[0]; object x_73313_732641 = args[1]; object y_73314_732642 = args[2];
++ object k_734387 = args[0]; object x_73313_732634 = args[1]; object y_73314_732635 = args[2];
    
  
  
  
 -return_closcall3(data,  ((closureN)self_7313217)->elements[0],  k_734839, Cyc_char2integer(x_73313_732981), Cyc_char2integer(y_73314_732982));; 
-+return_closcall3(data,  ((closureN)self_7311971)->elements[0],  k_734394, Cyc_char2integer(x_73313_732641), Cyc_char2integer(y_73314_732642));; 
++return_closcall3(data,  ((closureN)self_7311964)->elements[0],  k_734387, Cyc_char2integer(x_73313_732634), Cyc_char2integer(y_73314_732635));; 
  }
  
 -static void __lambda_261(void *data, object self_7313218, int argc, object *args) /* object self_7313218, object r_734838 */
-+static void __lambda_261(void *data, object self_7311972, int argc, object *args) /* object self_7311972, object r_734393 */
++static void __lambda_261(void *data, object self_7311965, int argc, object *args) /* object self_7311965, object r_734386 */
   {
 - object r_734838 = args[0];
 -  return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_scheme_base, (((closure)  __glo_Cyc_91bin_91op_scheme_base)->fn),  ((closureN)self_7313218)->elements[2], r_734838, ((closureN)self_7313218)->elements[0], ((closureN)self_7313218)->elements[1]);; 
-+ object r_734393 = args[0];
-+  return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_scheme_base, (((closure)  __glo_Cyc_91bin_91op_scheme_base)->fn),  ((closureN)self_7311972)->elements[2], r_734393, ((closureN)self_7311972)->elements[0], ((closureN)self_7311972)->elements[1]);; 
++ object r_734386 = args[0];
++  return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_scheme_base, (((closure)  __glo_Cyc_91bin_91op_scheme_base)->fn),  ((closureN)self_7311965)->elements[2], r_734386, ((closureN)self_7311965)->elements[0], ((closureN)self_7311965)->elements[1]);; 
  }
  
 -static void __lambda_258(void *data, object _, int argc, object *args) /* closure _,object k_734829, object cmp_73300_732975, object x_73301_732976, object lst_73302_732977 */
-+static void __lambda_258(void *data, object _, int argc, object *args) /* closure _,object k_734384, object cmp_73300_732635, object x_73301_732636, object lst_73302_732637 */
++static void __lambda_258(void *data, object _, int argc, object *args) /* closure _,object k_734377, object cmp_73300_732628, object x_73301_732629, object lst_73302_732630 */
   {
 -object k_734829 = args[0]; object cmp_73300_732975 = args[1]; object x_73301_732976 = args[2]; object lst_73302_732977 = args[3];
--  Cyc_st_add(data, "scheme/base.sld:Cyc-bin-op");
-+object k_734384 = args[0]; object cmp_73300_732635 = args[1]; object x_73301_732636 = args[2]; object lst_73302_732637 = args[3];
-+  Cyc_st_add(data, "base.sld:Cyc-bin-op");
++object k_734377 = args[0]; object cmp_73300_732628 = args[1]; object x_73301_732629 = args[2]; object lst_73302_732630 = args[3];
+   Cyc_st_add(data, "scheme/base.sld:Cyc-bin-op");
    
 -if( (boolean_f != Cyc_is_null(lst_73302_732977)) ){ 
 -  return_direct_with_clo1(data,  k_734829, (((closure)  k_734829)->fn),  boolean_t);
-+if( (boolean_f != Cyc_is_null(lst_73302_732637)) ){ 
-+  return_direct_with_clo1(data,  k_734384, (((closure)  k_734384)->fn),  boolean_t);
++if( (boolean_f != Cyc_is_null(lst_73302_732630)) ){ 
++  return_direct_with_clo1(data,  k_734377, (((closure)  k_734377)->fn),  boolean_t);
  } else { 
    
 -closureN_type c_7316699;
@@ -56693,52 +56905,51 @@ Make let-values be the same as let*-values, to work around
 -c_7316699.elements[0] = cmp_73300_732975;
 -c_7316699.elements[1] = k_734829;
 -c_7316699.elements[2] = lst_73302_732977;
-+closureN_type c_7315406;
-+object e_7315418 [3];
-+c_7315406.hdr.mark = gc_color_red;
-+ c_7315406.hdr.grayed = 0;
-+c_7315406.tag = closureN_tag;
-+ c_7315406.fn = (function_type)__lambda_259;
-+c_7315406.num_args = 1;
-+c_7315406.num_elements = 3;
-+c_7315406.elements = (object *)e_7315418;
-+c_7315406.elements[0] = cmp_73300_732635;
-+c_7315406.elements[1] = k_734384;
-+c_7315406.elements[2] = lst_73302_732637;
++closureN_type c_7315399;
++object e_7315411 [3];
++c_7315399.hdr.mark = gc_color_red;
++ c_7315399.hdr.grayed = 0;
++c_7315399.tag = closureN_tag;
++ c_7315399.fn = (function_type)__lambda_259;
++c_7315399.num_args = 1;
++c_7315399.num_elements = 3;
++c_7315399.elements = (object *)e_7315411;
++c_7315399.elements[0] = cmp_73300_732628;
++c_7315399.elements[1] = k_734377;
++c_7315399.elements[2] = lst_73302_732630;
  
  
  
 -return_closcall3(data,  cmp_73300_732975,  &c_7316699, x_73301_732976, Cyc_car(data, lst_73302_732977));}
-+return_closcall3(data,  cmp_73300_732635,  &c_7315406, x_73301_732636, Cyc_car(data, lst_73302_732637));}
++return_closcall3(data,  cmp_73300_732628,  &c_7315399, x_73301_732629, Cyc_car(data, lst_73302_732630));}
  ;; 
  }
  
 -static void __lambda_259(void *data, object self_7313216, int argc, object *args) /* object self_7313216, object r_734831 */
-+static void __lambda_259(void *data, object self_7311970, int argc, object *args) /* object self_7311970, object r_734386 */
++static void __lambda_259(void *data, object self_7311963, int argc, object *args) /* object self_7311963, object r_734379 */
   {
 - object r_734831 = args[0];
 -  if( (boolean_f != r_734831) ){ 
-+ object r_734386 = args[0];
-+  if( (boolean_f != r_734386) ){ 
++ object r_734379 = args[0];
++  if( (boolean_f != r_734379) ){ 
    
  
  
  
 -return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_scheme_base, (((closure)  __glo_Cyc_91bin_91op_scheme_base)->fn),  ((closureN)self_7313216)->elements[1], ((closureN)self_7313216)->elements[0], Cyc_car(data, ((closureN)self_7313216)->elements[2]), Cyc_cdr(data, ((closureN)self_7313216)->elements[2]));
-+return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_scheme_base, (((closure)  __glo_Cyc_91bin_91op_scheme_base)->fn),  ((closureN)self_7311970)->elements[1], ((closureN)self_7311970)->elements[0], Cyc_car(data, ((closureN)self_7311970)->elements[2]), Cyc_cdr(data, ((closureN)self_7311970)->elements[2]));
++return_direct_with_clo4(data,  __glo_Cyc_91bin_91op_scheme_base, (((closure)  __glo_Cyc_91bin_91op_scheme_base)->fn),  ((closureN)self_7311963)->elements[1], ((closureN)self_7311963)->elements[0], Cyc_car(data, ((closureN)self_7311963)->elements[2]), Cyc_cdr(data, ((closureN)self_7311963)->elements[2]));
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7313216)->elements[1], (((closure)  ((closureN)self_7313216)->elements[1])->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  ((closureN)self_7311970)->elements[1], (((closure)  ((closureN)self_7311970)->elements[1])->fn),  boolean_f);}
++  return_direct_with_clo1(data,  ((closureN)self_7311963)->elements[1], (((closure)  ((closureN)self_7311963)->elements[1])->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_256(void *data, object _, int argc, object *args) /* closure _,object k_734824, object port_73297_732972, object proc_73298_732973 */
-+static void __lambda_256(void *data, object _, int argc, object *args) /* closure _,object k_734379, object port_73297_732632, object proc_73298_732633 */
++static void __lambda_256(void *data, object _, int argc, object *args) /* closure _,object k_734372, object port_73297_732625, object proc_73298_732626 */
   {
 -object k_734824 = args[0]; object port_73297_732972 = args[1]; object proc_73298_732973 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:call-with-port");
-+object k_734379 = args[0]; object port_73297_732632 = args[1]; object proc_73298_732633 = args[2];
-+  Cyc_st_add(data, "base.sld:call-with-port");
++object k_734372 = args[0]; object port_73297_732625 = args[1]; object proc_73298_732626 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:call-with-port");
  
 -closureN_type c_7316686;
 -object e_7316693 [2];
@@ -56751,39 +56962,38 @@ Make let-values be the same as let*-values, to work around
 -c_7316686.elements = (object *)e_7316693;
 -c_7316686.elements[0] = k_734824;
 -c_7316686.elements[1] = port_73297_732972;
-+closureN_type c_7315393;
-+object e_7315400 [2];
-+c_7315393.hdr.mark = gc_color_red;
-+ c_7315393.hdr.grayed = 0;
-+c_7315393.tag = closureN_tag;
-+ c_7315393.fn = (function_type)__lambda_257;
-+c_7315393.num_args = 1;
-+c_7315393.num_elements = 2;
-+c_7315393.elements = (object *)e_7315400;
-+c_7315393.elements[0] = k_734379;
-+c_7315393.elements[1] = port_73297_732632;
++closureN_type c_7315386;
++object e_7315393 [2];
++c_7315386.hdr.mark = gc_color_red;
++ c_7315386.hdr.grayed = 0;
++c_7315386.tag = closureN_tag;
++ c_7315386.fn = (function_type)__lambda_257;
++c_7315386.num_args = 1;
++c_7315386.num_elements = 2;
++c_7315386.elements = (object *)e_7315393;
++c_7315386.elements[0] = k_734372;
++c_7315386.elements[1] = port_73297_732625;
  
 -return_closcall2(data,  proc_73298_732973,  &c_7316686, port_73297_732972);; 
-+return_closcall2(data,  proc_73298_732633,  &c_7315393, port_73297_732632);; 
++return_closcall2(data,  proc_73298_732626,  &c_7315386, port_73297_732625);; 
  }
  
 -static void __lambda_257(void *data, object self_7313215, int argc, object *args) /* object self_7313215, object result_73299_732974 */
-+static void __lambda_257(void *data, object self_7311969, int argc, object *args) /* object self_7311969, object result_73299_732634 */
++static void __lambda_257(void *data, object self_7311962, int argc, object *args) /* object self_7311962, object result_73299_732627 */
   {
 - object result_73299_732974 = args[0];
-+ object result_73299_732634 = args[0];
++ object result_73299_732627 = args[0];
    
 -  Cyc_io_close_port(data, ((closureN)self_7313215)->elements[1]);return_direct_with_clo1(data,  ((closureN)self_7313215)->elements[0], (((closure)  ((closureN)self_7313215)->elements[0])->fn),  result_73299_732974);;; 
-+  Cyc_io_close_port(data, ((closureN)self_7311969)->elements[1]);return_direct_with_clo1(data,  ((closureN)self_7311969)->elements[0], (((closure)  ((closureN)self_7311969)->elements[0])->fn),  result_73299_732634);;; 
++  Cyc_io_close_port(data, ((closureN)self_7311962)->elements[1]);return_direct_with_clo1(data,  ((closureN)self_7311962)->elements[0], (((closure)  ((closureN)self_7311962)->elements[0])->fn),  result_73299_732627);;; 
  }
  
 -static void __lambda_252(void *data, object _, int argc, object *args) /* closure _,object k_734818, object before_73293_732968, object thunk_73294_732969, object after_73295_732970 */
-+static void __lambda_252(void *data, object _, int argc, object *args) /* closure _,object k_734373, object before_73293_732628, object thunk_73294_732629, object after_73295_732630 */
++static void __lambda_252(void *data, object _, int argc, object *args) /* closure _,object k_734366, object before_73293_732621, object thunk_73294_732622, object after_73295_732623 */
   {
 -object k_734818 = args[0]; object before_73293_732968 = args[1]; object thunk_73294_732969 = args[2]; object after_73295_732970 = args[3];
--  Cyc_st_add(data, "scheme/base.sld:dynamic-wind");
-+object k_734373 = args[0]; object before_73293_732628 = args[1]; object thunk_73294_732629 = args[2]; object after_73295_732630 = args[3];
-+  Cyc_st_add(data, "base.sld:dynamic-wind");
++object k_734366 = args[0]; object before_73293_732621 = args[1]; object thunk_73294_732622 = args[2]; object after_73295_732623 = args[3];
+   Cyc_st_add(data, "scheme/base.sld:dynamic-wind");
  
 -closureN_type c_7316671;
 -object e_7316683 [3];
@@ -56797,25 +57007,25 @@ Make let-values be the same as let*-values, to work around
 -c_7316671.elements[0] = after_73295_732970;
 -c_7316671.elements[1] = k_734818;
 -c_7316671.elements[2] = thunk_73294_732969;
-+closureN_type c_7315378;
-+object e_7315390 [3];
-+c_7315378.hdr.mark = gc_color_red;
-+ c_7315378.hdr.grayed = 0;
-+c_7315378.tag = closureN_tag;
-+ c_7315378.fn = (function_type)__lambda_253;
-+c_7315378.num_args = 1;
-+c_7315378.num_elements = 3;
-+c_7315378.elements = (object *)e_7315390;
-+c_7315378.elements[0] = after_73295_732630;
-+c_7315378.elements[1] = k_734373;
-+c_7315378.elements[2] = thunk_73294_732629;
++closureN_type c_7315371;
++object e_7315383 [3];
++c_7315371.hdr.mark = gc_color_red;
++ c_7315371.hdr.grayed = 0;
++c_7315371.tag = closureN_tag;
++ c_7315371.fn = (function_type)__lambda_253;
++c_7315371.num_args = 1;
++c_7315371.num_elements = 3;
++c_7315371.elements = (object *)e_7315383;
++c_7315371.elements[0] = after_73295_732623;
++c_7315371.elements[1] = k_734366;
++c_7315371.elements[2] = thunk_73294_732622;
  
 -return_closcall1(data,  before_73293_732968,  &c_7316671);; 
-+return_closcall1(data,  before_73293_732628,  &c_7315378);; 
++return_closcall1(data,  before_73293_732621,  &c_7315371);; 
  }
  
 -static void __lambda_253(void *data, object self_7313212, int argc, object *args) /* object self_7313212, object r_734819 */
-+static void __lambda_253(void *data, object self_7311966, int argc, object *args) /* object self_7311966, object r_734374 */
++static void __lambda_253(void *data, object self_7311959, int argc, object *args) /* object self_7311959, object r_734367 */
   {
  
    
@@ -56830,27 +57040,27 @@ Make let-values be the same as let*-values, to work around
 -c_7316674.elements = (object *)e_7316682;
 -c_7316674.elements[0] = ((closureN)self_7313212)->elements[0];
 -c_7316674.elements[1] = ((closureN)self_7313212)->elements[1];
-+closureN_type c_7315381;
-+object e_7315389 [2];
-+c_7315381.hdr.mark = gc_color_red;
-+ c_7315381.hdr.grayed = 0;
-+c_7315381.tag = closureN_tag;
-+ c_7315381.fn = (function_type)__lambda_254;
-+c_7315381.num_args = 1;
-+c_7315381.num_elements = 2;
-+c_7315381.elements = (object *)e_7315389;
-+c_7315381.elements[0] = ((closureN)self_7311966)->elements[0];
-+c_7315381.elements[1] = ((closureN)self_7311966)->elements[1];
++closureN_type c_7315374;
++object e_7315382 [2];
++c_7315374.hdr.mark = gc_color_red;
++ c_7315374.hdr.grayed = 0;
++c_7315374.tag = closureN_tag;
++ c_7315374.fn = (function_type)__lambda_254;
++c_7315374.num_args = 1;
++c_7315374.num_elements = 2;
++c_7315374.elements = (object *)e_7315382;
++c_7315374.elements[0] = ((closureN)self_7311959)->elements[0];
++c_7315374.elements[1] = ((closureN)self_7311959)->elements[1];
  
 -return_closcall1(data,  ((closureN)self_7313212)->elements[2],  &c_7316674);; 
-+return_closcall1(data,  ((closureN)self_7311966)->elements[2],  &c_7315381);; 
++return_closcall1(data,  ((closureN)self_7311959)->elements[2],  &c_7315374);; 
  }
  
 -static void __lambda_254(void *data, object self_7313213, int argc, object *args) /* object self_7313213, object result_73296_732971 */
-+static void __lambda_254(void *data, object self_7311967, int argc, object *args) /* object self_7311967, object result_73296_732631 */
++static void __lambda_254(void *data, object self_7311960, int argc, object *args) /* object self_7311960, object result_73296_732624 */
   {
 - object result_73296_732971 = args[0];
-+ object result_73296_732631 = args[0];
++ object result_73296_732624 = args[0];
    
 -closureN_type c_7316677;
 -object e_7316681 [2];
@@ -56863,37 +57073,36 @@ Make let-values be the same as let*-values, to work around
 -c_7316677.elements = (object *)e_7316681;
 -c_7316677.elements[0] = ((closureN)self_7313213)->elements[1];
 -c_7316677.elements[1] = result_73296_732971;
-+closureN_type c_7315384;
-+object e_7315388 [2];
-+c_7315384.hdr.mark = gc_color_red;
-+ c_7315384.hdr.grayed = 0;
-+c_7315384.tag = closureN_tag;
-+ c_7315384.fn = (function_type)__lambda_255;
-+c_7315384.num_args = 1;
-+c_7315384.num_elements = 2;
-+c_7315384.elements = (object *)e_7315388;
-+c_7315384.elements[0] = ((closureN)self_7311967)->elements[1];
-+c_7315384.elements[1] = result_73296_732631;
++closureN_type c_7315377;
++object e_7315381 [2];
++c_7315377.hdr.mark = gc_color_red;
++ c_7315377.hdr.grayed = 0;
++c_7315377.tag = closureN_tag;
++ c_7315377.fn = (function_type)__lambda_255;
++c_7315377.num_args = 1;
++c_7315377.num_elements = 2;
++c_7315377.elements = (object *)e_7315381;
++c_7315377.elements[0] = ((closureN)self_7311960)->elements[1];
++c_7315377.elements[1] = result_73296_732624;
  
 -return_closcall1(data,  ((closureN)self_7313213)->elements[0],  &c_7316677);; 
-+return_closcall1(data,  ((closureN)self_7311967)->elements[0],  &c_7315384);; 
++return_closcall1(data,  ((closureN)self_7311960)->elements[0],  &c_7315377);; 
  }
  
 -static void __lambda_255(void *data, object self_7313214, int argc, object *args) /* object self_7313214, object r_734821 */
-+static void __lambda_255(void *data, object self_7311968, int argc, object *args) /* object self_7311968, object r_734376 */
++static void __lambda_255(void *data, object self_7311961, int argc, object *args) /* object self_7311961, object r_734369 */
   {
  
 -  return_direct_with_clo1(data,  ((closureN)self_7313214)->elements[0], (((closure)  ((closureN)self_7313214)->elements[0])->fn),  ((closureN)self_7313214)->elements[1]);; 
-+  return_direct_with_clo1(data,  ((closureN)self_7311968)->elements[0], (((closure)  ((closureN)self_7311968)->elements[0])->fn),  ((closureN)self_7311968)->elements[1]);; 
++  return_direct_with_clo1(data,  ((closureN)self_7311961)->elements[0], (((closure)  ((closureN)self_7311961)->elements[0])->fn),  ((closureN)self_7311961)->elements[1]);; 
  }
  
 -static void __lambda_250(void *data, object _, int argc, object *args) /* closure _,object k_734806, object producer_73289_732965, object consumer_73290_732966 */
-+static void __lambda_250(void *data, object _, int argc, object *args) /* closure _,object k_734361, object producer_73289_732625, object consumer_73290_732626 */
++static void __lambda_250(void *data, object _, int argc, object *args) /* closure _,object k_734354, object producer_73289_732618, object consumer_73290_732619 */
   {
 -object k_734806 = args[0]; object producer_73289_732965 = args[1]; object consumer_73290_732966 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:call-with-values");
-+object k_734361 = args[0]; object producer_73289_732625 = args[1]; object consumer_73290_732626 = args[2];
-+  Cyc_st_add(data, "base.sld:call-with-values");
++object k_734354 = args[0]; object producer_73289_732618 = args[1]; object consumer_73290_732619 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:call-with-values");
  
 -closureN_type c_7316644;
 -object e_7316668 [2];
@@ -56906,118 +57115,115 @@ Make let-values be the same as let*-values, to work around
 -c_7316644.elements = (object *)e_7316668;
 -c_7316644.elements[0] = consumer_73290_732966;
 -c_7316644.elements[1] = k_734806;
-+closureN_type c_7315351;
-+object e_7315375 [2];
-+c_7315351.hdr.mark = gc_color_red;
-+ c_7315351.hdr.grayed = 0;
-+c_7315351.tag = closureN_tag;
-+ c_7315351.fn = (function_type)__lambda_251;
-+c_7315351.num_args = 1;
-+c_7315351.num_elements = 2;
-+c_7315351.elements = (object *)e_7315375;
-+c_7315351.elements[0] = consumer_73290_732626;
-+c_7315351.elements[1] = k_734361;
++closureN_type c_7315344;
++object e_7315368 [2];
++c_7315344.hdr.mark = gc_color_red;
++ c_7315344.hdr.grayed = 0;
++c_7315344.tag = closureN_tag;
++ c_7315344.fn = (function_type)__lambda_251;
++c_7315344.num_args = 1;
++c_7315344.num_elements = 2;
++c_7315344.elements = (object *)e_7315368;
++c_7315344.elements[0] = consumer_73290_732619;
++c_7315344.elements[1] = k_734354;
  
 -return_closcall1(data,  producer_73289_732965,  &c_7316644);; 
-+return_closcall1(data,  producer_73289_732625,  &c_7315351);; 
++return_closcall1(data,  producer_73289_732618,  &c_7315344);; 
  }
  
 -static void __lambda_251(void *data, object self_7313211, int argc, object *args) /* object self_7313211, object x_73291_732967 */
-+static void __lambda_251(void *data, object self_7311965, int argc, object *args) /* object self_7311965, object x_73291_732627 */
++static void __lambda_251(void *data, object self_7311958, int argc, object *args) /* object self_7311958, object x_73291_732620 */
   {
 - object x_73291_732967 = args[0];
 -  object r_734808;
-+ object x_73291_732627 = args[0];
-+  object r_734363;
++ object x_73291_732620 = args[0];
++  object r_734356;
      
 -if( (boolean_f != Cyc_is_pair(x_73291_732967)) ){ 
-+if( (boolean_f != Cyc_is_pair(x_73291_732627)) ){ 
++if( (boolean_f != Cyc_is_pair(x_73291_732620)) ){ 
    
    
 -  object local_7316655 = alloca(sizeof(pair_type)); 
 -  r_734808 = equalp(Cyc_car(data, x_73291_732967), set_pair_as_expr(local_7316655, quote_multiple, quote_values));
-+  object local_7315362 = alloca(sizeof(pair_type)); 
-+  r_734363 = equalp(Cyc_car(data, x_73291_732627), set_pair_as_expr(local_7315362, quote_multiple, quote_values));
++  object local_7315355 = alloca(sizeof(pair_type)); 
++  r_734356 = equalp(Cyc_car(data, x_73291_732620), set_pair_as_expr(local_7315355, quote_multiple, quote_values));
  } else { 
 -  r_734808 = boolean_f;}
 -;if( (boolean_f != r_734808) ){ 
-+  r_734363 = boolean_f;}
-+;if( (boolean_f != r_734363) ){ 
++  r_734356 = boolean_f;}
++;if( (boolean_f != r_734356) ){ 
    
  
  
 -object c_7316661 = apply(data,  ((closureN)self_7313211)->elements[1],((closureN)self_7313211)->elements[0], Cyc_cdr(data, x_73291_732967));
 -return_direct_with_clo1(data,  ((closureN)self_7313211)->elements[1], (((closure)  ((closureN)self_7313211)->elements[1])->fn),  c_7316661);
-+object c_7315368 = apply(data,  ((closureN)self_7311965)->elements[1],((closureN)self_7311965)->elements[0], Cyc_cdr(data, x_73291_732627));
-+return_direct_with_clo1(data,  ((closureN)self_7311965)->elements[1], (((closure)  ((closureN)self_7311965)->elements[1])->fn),  c_7315368);
++object c_7315361 = apply(data,  ((closureN)self_7311958)->elements[1],((closureN)self_7311958)->elements[0], Cyc_cdr(data, x_73291_732620));
++return_direct_with_clo1(data,  ((closureN)self_7311958)->elements[1], (((closure)  ((closureN)self_7311958)->elements[1])->fn),  c_7315361);
  } else { 
 -  return_closcall2(data,  ((closureN)self_7313211)->elements[0],  ((closureN)self_7313211)->elements[1], x_73291_732967);}
-+  return_closcall2(data,  ((closureN)self_7311965)->elements[0],  ((closureN)self_7311965)->elements[1], x_73291_732627);}
++  return_closcall2(data,  ((closureN)self_7311958)->elements[0],  ((closureN)self_7311958)->elements[1], x_73291_732620);}
  ;; 
  }
  
 -static void __lambda_249(void *data, object _, int argc, object *args) /* closure _,object k_734796, object args_73287_732964_raw, ... */
-+static void __lambda_249(void *data, object _, int argc, object *args) /* closure _,object k_734351, object args_73287_732624_raw, ... */
++static void __lambda_249(void *data, object _, int argc, object *args) /* closure _,object k_734344, object args_73287_732617_raw, ... */
   {
 -object k_734796 = args[0];
 -load_varargs(args_73287_732964, args, 1, argc - 1);
 -  object r_734797;
--  Cyc_st_add(data, "scheme/base.sld:values");
-+object k_734351 = args[0];
-+load_varargs(args_73287_732624, args, 1, argc - 1);
-+  object r_734352;
-+  Cyc_st_add(data, "base.sld:values");
++object k_734344 = args[0];
++load_varargs(args_73287_732617, args, 1, argc - 1);
++  object r_734345;
+   Cyc_st_add(data, "scheme/base.sld:values");
    
 -if( (boolean_f != Cyc_is_null(args_73287_732964)) ){ 
 -  r_734797 = boolean_f;
-+if( (boolean_f != Cyc_is_null(args_73287_732624)) ){ 
-+  r_734352 = boolean_f;
++if( (boolean_f != Cyc_is_null(args_73287_732617)) ){ 
++  r_734345 = boolean_f;
  } else { 
    
    
 -  r_734797 = Cyc_is_null(Cyc_cdr(data, args_73287_732964));}
 -;if( (boolean_f != r_734797) ){ 
-+  r_734352 = Cyc_is_null(Cyc_cdr(data, args_73287_732624));}
-+;if( (boolean_f != r_734352) ){ 
++  r_734345 = Cyc_is_null(Cyc_cdr(data, args_73287_732617));}
++;if( (boolean_f != r_734345) ){ 
    
  
 -return_direct_with_clo1(data,  k_734796, (((closure)  k_734796)->fn),  Cyc_car(data, args_73287_732964));
-+return_direct_with_clo1(data,  k_734351, (((closure)  k_734351)->fn),  Cyc_car(data, args_73287_732624));
++return_direct_with_clo1(data,  k_734344, (((closure)  k_734344)->fn),  Cyc_car(data, args_73287_732617));
  } else { 
    
 -pair_type local_7316638; 
-+pair_type local_7315345; 
++pair_type local_7315338; 
  
 -pair_type local_7316641; 
 -return_direct_with_clo1(data,  k_734796, (((closure)  k_734796)->fn),  set_pair_as_expr(&local_7316638, set_pair_as_expr(&local_7316641, quote_multiple, quote_values), args_73287_732964));}
-+pair_type local_7315348; 
-+return_direct_with_clo1(data,  k_734351, (((closure)  k_734351)->fn),  set_pair_as_expr(&local_7315345, set_pair_as_expr(&local_7315348, quote_multiple, quote_values), args_73287_732624));}
++pair_type local_7315341; 
++return_direct_with_clo1(data,  k_734344, (((closure)  k_734344)->fn),  set_pair_as_expr(&local_7315338, set_pair_as_expr(&local_7315341, quote_multiple, quote_values), args_73287_732617));}
  ;; 
  }
  
 -static void __lambda_248(void *data, object _, int argc, object *args) /* closure _,object k_734790, object expr_73284_732961, object rename_73285_732962, object compare_73286_732963 */
-+static void __lambda_248(void *data, object _, int argc, object *args) /* closure _,object k_734345, object expr_73284_732621, object rename_73285_732622, object compare_73286_732623 */
++static void __lambda_248(void *data, object _, int argc, object *args) /* closure _,object k_734338, object expr_73284_732614, object rename_73285_732615, object compare_73286_732616 */
   {
 -object k_734790 = args[0]; object expr_73284_732961 = args[1];
--  Cyc_st_add(data, "scheme/base.sld:syntax-error");
-+object k_734345 = args[0]; object expr_73284_732621 = args[1];
-+  Cyc_st_add(data, "base.sld:syntax-error");
++object k_734338 = args[0]; object expr_73284_732614 = args[1];
+   Cyc_st_add(data, "scheme/base.sld:syntax-error");
  
  
  
 -object c_7316619 = apply(data,  k_734790,__glo_error_scheme_base, Cyc_cdr(data, expr_73284_732961));
 -return_direct_with_clo1(data,  k_734790, (((closure)  k_734790)->fn),  c_7316619);; 
-+object c_7315326 = apply(data,  k_734345,__glo_error_scheme_base, Cyc_cdr(data, expr_73284_732621));
-+return_direct_with_clo1(data,  k_734345, (((closure)  k_734345)->fn),  c_7315326);; 
++object c_7315319 = apply(data,  k_734338,__glo_error_scheme_base, Cyc_cdr(data, expr_73284_732614));
++return_direct_with_clo1(data,  k_734338, (((closure)  k_734338)->fn),  c_7315319);; 
  }
  
 -static void __lambda_213(void *data, object _, int argc, object *args) /* closure _,object k_734702, object expr_73254_732953, object rename_73255_732954, object compare_73256_732955 */
-+static void __lambda_213(void *data, object _, int argc, object *args) /* closure _,object k_734257, object expr_73254_732613, object rename_73255_732614, object compare_73256_732615 */
++static void __lambda_213(void *data, object _, int argc, object *args) /* closure _,object k_734250, object expr_73254_732606, object rename_73255_732607, object compare_73256_732608 */
   {
 -object k_734702 = args[0]; object expr_73254_732953 = args[1]; object rename_73255_732954 = args[2]; object compare_73256_732955 = args[3];
--  Cyc_st_add(data, "scheme/base.sld:quasiquote");
-+object k_734257 = args[0]; object expr_73254_732613 = args[1]; object rename_73255_732614 = args[2]; object compare_73256_732615 = args[3];
-+  Cyc_st_add(data, "base.sld:quasiquote");
++object k_734250 = args[0]; object expr_73254_732606 = args[1]; object rename_73255_732607 = args[2]; object compare_73256_732608 = args[3];
+   Cyc_st_add(data, "scheme/base.sld:quasiquote");
  
 -closureN_type c_7316284;
 -object e_7316614 [4];
@@ -57032,30 +57238,14 @@ Make let-values be the same as let*-values, to work around
 -c_7316284.elements[1] = expr_73254_732953;
 -c_7316284.elements[2] = k_734702;
 -c_7316284.elements[3] = rename_73255_732954;
-+closureN_type c_7314991;
-+object e_7315321 [4];
-+c_7314991.hdr.mark = gc_color_red;
-+ c_7314991.hdr.grayed = 0;
-+c_7314991.tag = closureN_tag;
-+ c_7314991.fn = (function_type)__lambda_214;
-+c_7314991.num_args = 1;
-+c_7314991.num_elements = 4;
-+c_7314991.elements = (object *)e_7315321;
-+c_7314991.elements[0] = compare_73256_732615;
-+c_7314991.elements[1] = expr_73254_732613;
-+c_7314991.elements[2] = k_734257;
-+c_7314991.elements[3] = rename_73255_732614;
- 
+-
 -return_direct_with_clo1(data,(closure)&c_7316284,__lambda_214,  boolean_f);; 
-+return_direct_with_clo1(data,(closure)&c_7314991,__lambda_214,  boolean_f);; 
- }
- 
+-}
+-
 -static void __lambda_214(void *data, object self_7313176, int argc, object *args) /* object self_7313176, object qq_732957 */
-+static void __lambda_214(void *data, object self_7311930, int argc, object *args) /* object self_7311930, object qq_732617 */
-  {
+- {
 - object qq_732957 = args[0];
-+ object qq_732617 = args[0];
-   
+-  
 -closureN_type c_7316286;
 -object e_7316610 [4];
 -c_7316286.hdr.mark = gc_color_red;
@@ -57069,33 +57259,16 @@ Make let-values be the same as let*-values, to work around
 -c_7316286.elements[1] = ((closureN)self_7313176)->elements[1];
 -c_7316286.elements[2] = ((closureN)self_7313176)->elements[2];
 -c_7316286.elements[3] = ((closureN)self_7313176)->elements[3];
-+closureN_type c_7314993;
-+object e_7315317 [4];
-+c_7314993.hdr.mark = gc_color_red;
-+ c_7314993.hdr.grayed = 0;
-+c_7314993.tag = closureN_tag;
-+ c_7314993.fn = (function_type)__lambda_1296;
-+c_7314993.num_args = 1;
-+c_7314993.num_elements = 4;
-+c_7314993.elements = (object *)e_7315317;
-+c_7314993.elements[0] = ((closureN)self_7311930)->elements[0];
-+c_7314993.elements[1] = ((closureN)self_7311930)->elements[1];
-+c_7314993.elements[2] = ((closureN)self_7311930)->elements[2];
-+c_7314993.elements[3] = ((closureN)self_7311930)->elements[3];
- 
- 
+-
+-
 -pair_type local_7316613; 
 -return_direct_with_clo1(data,(closure)&c_7316286,__lambda_1343,  set_cell_as_expr(&local_7316613, qq_732957));; 
-+pair_type local_7315320; 
-+return_direct_with_clo1(data,(closure)&c_7314993,__lambda_1296,  set_cell_as_expr(&local_7315320, qq_732617));; 
- }
- 
+-}
+-
 -static void __lambda_1343(void *data, object self_7313177, int argc, object *args) /* object self_7313177, object qq_732957 */
-+static void __lambda_1296(void *data, object self_7311931, int argc, object *args) /* object self_7311931, object qq_732617 */
-  {
+- {
 - object qq_732957 = args[0];
-+ object qq_732617 = args[0];
-   
+-  
 -closureN_type c_7316288;
 -object e_7316303 [3];
 -c_7316288.hdr.mark = gc_color_red;
@@ -57108,20 +57281,8 @@ Make let-values be the same as let*-values, to work around
 -c_7316288.elements[0] = ((closureN)self_7313177)->elements[1];
 -c_7316288.elements[1] = ((closureN)self_7313177)->elements[2];
 -c_7316288.elements[2] = qq_732957;
-+closureN_type c_7314995;
-+object e_7315010 [3];
-+c_7314995.hdr.mark = gc_color_red;
-+ c_7314995.hdr.grayed = 0;
-+c_7314995.tag = closureN_tag;
-+ c_7314995.fn = (function_type)__lambda_215;
-+c_7314995.num_args = 1;
-+c_7314995.num_elements = 3;
-+c_7314995.elements = (object *)e_7315010;
-+c_7314995.elements[0] = ((closureN)self_7311931)->elements[1];
-+c_7314995.elements[1] = ((closureN)self_7311931)->elements[2];
-+c_7314995.elements[2] = qq_732617;
- 
- 
+-
+-
 -closureN_type c_7316304;
 -object e_7316609 [3];
 -c_7316304.hdr.mark = gc_color_red;
@@ -57134,32 +57295,16 @@ Make let-values be the same as let*-values, to work around
 -c_7316304.elements[0] = ((closureN)self_7313177)->elements[0];
 -c_7316304.elements[1] = qq_732957;
 -c_7316304.elements[2] = ((closureN)self_7313177)->elements[3];
-+closureN_type c_7315011;
-+object e_7315316 [3];
-+c_7315011.hdr.mark = gc_color_red;
-+ c_7315011.hdr.grayed = 0;
-+c_7315011.tag = closureN_tag;
-+ c_7315011.fn = (function_type)__lambda_217;
-+c_7315011.num_args = 2;
-+c_7315011.num_elements = 3;
-+c_7315011.elements = (object *)e_7315316;
-+c_7315011.elements[0] = ((closureN)self_7311931)->elements[0];
-+c_7315011.elements[1] = qq_732617;
-+c_7315011.elements[2] = ((closureN)self_7311931)->elements[3];
- 
+-
 -return_direct_with_clo1(data,(closure)&c_7316288,__lambda_215,  &c_7316304);; 
-+return_direct_with_clo1(data,(closure)&c_7314995,__lambda_215,  &c_7315011);; 
- }
- 
+-}
+-
 -static void __lambda_217(void *data, object self_7313178, int argc, object *args) /* object self_7313178, object k_734706, object x_73257_732959, object d_73258_732960 */
-+static void __lambda_217(void *data, object self_7311932, int argc, object *args) /* object self_7311932, object k_734261, object x_73257_732619, object d_73258_732620 */
-  {
+- {
 - object k_734706 = args[0]; object x_73257_732959 = args[1]; object d_73258_732960 = args[2];
-+ object k_734261 = args[0]; object x_73257_732619 = args[1]; object d_73258_732620 = args[2];
-     
+-    
 -if( (boolean_f != Cyc_is_pair(x_73257_732959)) ){ 
-+if( (boolean_f != Cyc_is_pair(x_73257_732619)) ){ 
-   
+-  
 -closureN_type c_7316309;
 -object e_7316567 [6];
 -c_7316309.hdr.mark = gc_color_red;
@@ -57175,29 +57320,12 @@ Make let-values be the same as let*-values, to work around
 -c_7316309.elements[3] = ((closureN)self_7313178)->elements[1];
 -c_7316309.elements[4] = ((closureN)self_7313178)->elements[2];
 -c_7316309.elements[5] = x_73257_732959;
-+closureN_type c_7315016;
-+object e_7315274 [6];
-+c_7315016.hdr.mark = gc_color_red;
-+ c_7315016.hdr.grayed = 0;
-+c_7315016.tag = closureN_tag;
-+ c_7315016.fn = (function_type)__lambda_218;
-+c_7315016.num_args = 1;
-+c_7315016.num_elements = 6;
-+c_7315016.elements = (object *)e_7315274;
-+c_7315016.elements[0] = ((closureN)self_7311932)->elements[0];
-+c_7315016.elements[1] = d_73258_732620;
-+c_7315016.elements[2] = k_734261;
-+c_7315016.elements[3] = ((closureN)self_7311932)->elements[1];
-+c_7315016.elements[4] = ((closureN)self_7311932)->elements[2];
-+c_7315016.elements[5] = x_73257_732619;
- 
+-
 -return_closcall2(data,  ((closureN)self_7313178)->elements[2],  &c_7316309, quote_unquote);
-+return_closcall2(data,  ((closureN)self_7311932)->elements[2],  &c_7315016, quote_unquote);
- } else { 
-     
+-} else { 
+-    
 -if( (boolean_f != Cyc_is_vector_not_record_type(x_73257_732959)) ){ 
-+if( (boolean_f != Cyc_is_vector_not_record_type(x_73257_732619)) ){ 
-   
+-  
 -closureN_type c_7316572;
 -object e_7316590 [4];
 -c_7316572.hdr.mark = gc_color_red;
@@ -57211,37 +57339,18 @@ Make let-values be the same as let*-values, to work around
 -c_7316572.elements[1] = k_734706;
 -c_7316572.elements[2] = ((closureN)self_7313178)->elements[1];
 -c_7316572.elements[3] = x_73257_732959;
-+closureN_type c_7315279;
-+object e_7315297 [4];
-+c_7315279.hdr.mark = gc_color_red;
-+ c_7315279.hdr.grayed = 0;
-+c_7315279.tag = closureN_tag;
-+ c_7315279.fn = (function_type)__lambda_244;
-+c_7315279.num_args = 1;
-+c_7315279.num_elements = 4;
-+c_7315279.elements = (object *)e_7315297;
-+c_7315279.elements[0] = d_73258_732620;
-+c_7315279.elements[1] = k_734261;
-+c_7315279.elements[2] = ((closureN)self_7311932)->elements[1];
-+c_7315279.elements[3] = x_73257_732619;
- 
+-
 -return_closcall2(data,  ((closureN)self_7313178)->elements[2],  &c_7316572, quote_list_91_125vector);
-+return_closcall2(data,  ((closureN)self_7311932)->elements[2],  &c_7315279, quote_list_91_125vector);
- } else { 
+-} else { 
 -  object r_734783;
-+  object r_734338;
-     
+-    
 -if( (boolean_f != Cyc_is_symbol(x_73257_732959)) ){ 
 -  r_734783 = boolean_t;
-+if( (boolean_f != Cyc_is_symbol(x_73257_732619)) ){ 
-+  r_734338 = boolean_t;
- } else { 
-   
+-} else { 
+-  
 -  r_734783 = Cyc_is_null(x_73257_732959);}
 -;if( (boolean_f != r_734783) ){ 
-+  r_734338 = Cyc_is_null(x_73257_732619);}
-+;if( (boolean_f != r_734338) ){ 
-   
+-  
 -closureN_type c_7316600;
 -object e_7316607 [2];
 -c_7316600.hdr.mark = gc_color_red;
@@ -57253,45 +57362,171 @@ Make let-values be the same as let*-values, to work around
 -c_7316600.elements = (object *)e_7316607;
 -c_7316600.elements[0] = k_734706;
 -c_7316600.elements[1] = x_73257_732959;
-+closureN_type c_7315307;
-+object e_7315314 [2];
-+c_7315307.hdr.mark = gc_color_red;
-+ c_7315307.hdr.grayed = 0;
-+c_7315307.tag = closureN_tag;
-+ c_7315307.fn = (function_type)__lambda_247;
-+c_7315307.num_args = 1;
-+c_7315307.num_elements = 2;
-+c_7315307.elements = (object *)e_7315314;
-+c_7315307.elements[0] = k_734261;
-+c_7315307.elements[1] = x_73257_732619;
++closureN_type c_7314984;
++object e_7315314 [4];
++c_7314984.hdr.mark = gc_color_red;
++ c_7314984.hdr.grayed = 0;
++c_7314984.tag = closureN_tag;
++ c_7314984.fn = (function_type)__lambda_214;
++c_7314984.num_args = 1;
++c_7314984.num_elements = 4;
++c_7314984.elements = (object *)e_7315314;
++c_7314984.elements[0] = compare_73256_732608;
++c_7314984.elements[1] = expr_73254_732606;
++c_7314984.elements[2] = k_734250;
++c_7314984.elements[3] = rename_73255_732607;
++
++return_direct_with_clo1(data,(closure)&c_7314984,__lambda_214,  boolean_f);; 
++}
++
++static void __lambda_214(void *data, object self_7311923, int argc, object *args) /* object self_7311923, object qq_732610 */
++ {
++ object qq_732610 = args[0];
++  
++closureN_type c_7314986;
++object e_7315310 [4];
++c_7314986.hdr.mark = gc_color_red;
++ c_7314986.hdr.grayed = 0;
++c_7314986.tag = closureN_tag;
++ c_7314986.fn = (function_type)__lambda_1296;
++c_7314986.num_args = 1;
++c_7314986.num_elements = 4;
++c_7314986.elements = (object *)e_7315310;
++c_7314986.elements[0] = ((closureN)self_7311923)->elements[0];
++c_7314986.elements[1] = ((closureN)self_7311923)->elements[1];
++c_7314986.elements[2] = ((closureN)self_7311923)->elements[2];
++c_7314986.elements[3] = ((closureN)self_7311923)->elements[3];
++
++
++pair_type local_7315313; 
++return_direct_with_clo1(data,(closure)&c_7314986,__lambda_1296,  set_cell_as_expr(&local_7315313, qq_732610));; 
++}
++
++static void __lambda_1296(void *data, object self_7311924, int argc, object *args) /* object self_7311924, object qq_732610 */
++ {
++ object qq_732610 = args[0];
++  
++closureN_type c_7314988;
++object e_7315003 [3];
++c_7314988.hdr.mark = gc_color_red;
++ c_7314988.hdr.grayed = 0;
++c_7314988.tag = closureN_tag;
++ c_7314988.fn = (function_type)__lambda_215;
++c_7314988.num_args = 1;
++c_7314988.num_elements = 3;
++c_7314988.elements = (object *)e_7315003;
++c_7314988.elements[0] = ((closureN)self_7311924)->elements[1];
++c_7314988.elements[1] = ((closureN)self_7311924)->elements[2];
++c_7314988.elements[2] = qq_732610;
++
++
++closureN_type c_7315004;
++object e_7315309 [3];
++c_7315004.hdr.mark = gc_color_red;
++ c_7315004.hdr.grayed = 0;
++c_7315004.tag = closureN_tag;
++ c_7315004.fn = (function_type)__lambda_217;
++c_7315004.num_args = 2;
++c_7315004.num_elements = 3;
++c_7315004.elements = (object *)e_7315309;
++c_7315004.elements[0] = ((closureN)self_7311924)->elements[0];
++c_7315004.elements[1] = qq_732610;
++c_7315004.elements[2] = ((closureN)self_7311924)->elements[3];
++
++return_direct_with_clo1(data,(closure)&c_7314988,__lambda_215,  &c_7315004);; 
++}
++
++static void __lambda_217(void *data, object self_7311925, int argc, object *args) /* object self_7311925, object k_734254, object x_73257_732612, object d_73258_732613 */
++ {
++ object k_734254 = args[0]; object x_73257_732612 = args[1]; object d_73258_732613 = args[2];
++    
++if( (boolean_f != Cyc_is_pair(x_73257_732612)) ){ 
++  
++closureN_type c_7315009;
++object e_7315267 [6];
++c_7315009.hdr.mark = gc_color_red;
++ c_7315009.hdr.grayed = 0;
++c_7315009.tag = closureN_tag;
++ c_7315009.fn = (function_type)__lambda_218;
++c_7315009.num_args = 1;
++c_7315009.num_elements = 6;
++c_7315009.elements = (object *)e_7315267;
++c_7315009.elements[0] = ((closureN)self_7311925)->elements[0];
++c_7315009.elements[1] = d_73258_732613;
++c_7315009.elements[2] = k_734254;
++c_7315009.elements[3] = ((closureN)self_7311925)->elements[1];
++c_7315009.elements[4] = ((closureN)self_7311925)->elements[2];
++c_7315009.elements[5] = x_73257_732612;
++
++return_closcall2(data,  ((closureN)self_7311925)->elements[2],  &c_7315009, quote_unquote);
++} else { 
++    
++if( (boolean_f != Cyc_is_vector_not_record_type(x_73257_732612)) ){ 
++  
++closureN_type c_7315272;
++object e_7315290 [4];
++c_7315272.hdr.mark = gc_color_red;
++ c_7315272.hdr.grayed = 0;
++c_7315272.tag = closureN_tag;
++ c_7315272.fn = (function_type)__lambda_244;
++c_7315272.num_args = 1;
++c_7315272.num_elements = 4;
++c_7315272.elements = (object *)e_7315290;
++c_7315272.elements[0] = d_73258_732613;
++c_7315272.elements[1] = k_734254;
++c_7315272.elements[2] = ((closureN)self_7311925)->elements[1];
++c_7315272.elements[3] = x_73257_732612;
++
++return_closcall2(data,  ((closureN)self_7311925)->elements[2],  &c_7315272, quote_list_91_125vector);
++} else { 
++  object r_734331;
++    
++if( (boolean_f != Cyc_is_symbol(x_73257_732612)) ){ 
++  r_734331 = boolean_t;
++} else { 
++  
++  r_734331 = Cyc_is_null(x_73257_732612);}
++;if( (boolean_f != r_734331) ){ 
++  
++closureN_type c_7315300;
++object e_7315307 [2];
++c_7315300.hdr.mark = gc_color_red;
++ c_7315300.hdr.grayed = 0;
++c_7315300.tag = closureN_tag;
++ c_7315300.fn = (function_type)__lambda_247;
++c_7315300.num_args = 1;
++c_7315300.num_elements = 2;
++c_7315300.elements = (object *)e_7315307;
++c_7315300.elements[0] = k_734254;
++c_7315300.elements[1] = x_73257_732612;
  
 -return_closcall2(data,  ((closureN)self_7313178)->elements[2],  &c_7316600, quote_quote);
-+return_closcall2(data,  ((closureN)self_7311932)->elements[2],  &c_7315307, quote_quote);
++return_closcall2(data,  ((closureN)self_7311925)->elements[2],  &c_7315300, quote_quote);
  } else { 
 -  return_direct_with_clo1(data,  k_734706, (((closure)  k_734706)->fn),  x_73257_732959);}
-+  return_direct_with_clo1(data,  k_734261, (((closure)  k_734261)->fn),  x_73257_732619);}
++  return_direct_with_clo1(data,  k_734254, (((closure)  k_734254)->fn),  x_73257_732612);}
  ;}
  ;}
  ;; 
  }
  
 -static void __lambda_247(void *data, object self_7313208, int argc, object *args) /* object self_7313208, object r_734784 */
-+static void __lambda_247(void *data, object self_7311962, int argc, object *args) /* object self_7311962, object r_734339 */
++static void __lambda_247(void *data, object self_7311955, int argc, object *args) /* object self_7311955, object r_734332 */
   {
 - object r_734784 = args[0];
-+ object r_734339 = args[0];
++ object r_734332 = args[0];
    
 -list_2_type local_7316605; 
 -return_direct_with_clo1(data,  ((closureN)self_7313208)->elements[0], (((closure)  ((closureN)self_7313208)->elements[0])->fn),  Cyc_fast_list_2(&local_7316605, r_734784, ((closureN)self_7313208)->elements[1]));; 
-+list_2_type local_7315312; 
-+return_direct_with_clo1(data,  ((closureN)self_7311962)->elements[0], (((closure)  ((closureN)self_7311962)->elements[0])->fn),  Cyc_fast_list_2(&local_7315312, r_734339, ((closureN)self_7311962)->elements[1]));; 
++list_2_type local_7315305; 
++return_direct_with_clo1(data,  ((closureN)self_7311955)->elements[0], (((closure)  ((closureN)self_7311955)->elements[0])->fn),  Cyc_fast_list_2(&local_7315305, r_734332, ((closureN)self_7311955)->elements[1]));; 
  }
  
 -static void __lambda_244(void *data, object self_7313205, int argc, object *args) /* object self_7313205, object r_734779 */
-+static void __lambda_244(void *data, object self_7311959, int argc, object *args) /* object self_7311959, object r_734334 */
++static void __lambda_244(void *data, object self_7311952, int argc, object *args) /* object self_7311952, object r_734327 */
   {
 - object r_734779 = args[0];
-+ object r_734334 = args[0];
++ object r_734327 = args[0];
    
 -closureN_type c_7316574;
 -object e_7316588 [4];
@@ -57306,29 +57541,29 @@ Make let-values be the same as let*-values, to work around
 -c_7316574.elements[1] = ((closureN)self_7313205)->elements[1];
 -c_7316574.elements[2] = ((closureN)self_7313205)->elements[2];
 -c_7316574.elements[3] = r_734779;
-+closureN_type c_7315281;
-+object e_7315295 [4];
-+c_7315281.hdr.mark = gc_color_red;
-+ c_7315281.hdr.grayed = 0;
-+c_7315281.tag = closureN_tag;
-+ c_7315281.fn = (function_type)__lambda_245;
-+c_7315281.num_args = 1;
-+c_7315281.num_elements = 4;
-+c_7315281.elements = (object *)e_7315295;
-+c_7315281.elements[0] = ((closureN)self_7311959)->elements[0];
-+c_7315281.elements[1] = ((closureN)self_7311959)->elements[1];
-+c_7315281.elements[2] = ((closureN)self_7311959)->elements[2];
-+c_7315281.elements[3] = r_734334;
++closureN_type c_7315274;
++object e_7315288 [4];
++c_7315274.hdr.mark = gc_color_red;
++ c_7315274.hdr.grayed = 0;
++c_7315274.tag = closureN_tag;
++ c_7315274.fn = (function_type)__lambda_245;
++c_7315274.num_args = 1;
++c_7315274.num_elements = 4;
++c_7315274.elements = (object *)e_7315288;
++c_7315274.elements[0] = ((closureN)self_7311952)->elements[0];
++c_7315274.elements[1] = ((closureN)self_7311952)->elements[1];
++c_7315274.elements[2] = ((closureN)self_7311952)->elements[2];
++c_7315274.elements[3] = r_734327;
  
 -return_direct_with_clo2(data,  __glo_vector_91_125list_scheme_base, (((closure)  __glo_vector_91_125list_scheme_base)->fn),  &c_7316574, ((closureN)self_7313205)->elements[3]);; 
-+return_direct_with_clo2(data,  __glo_vector_91_125list_scheme_base, (((closure)  __glo_vector_91_125list_scheme_base)->fn),  &c_7315281, ((closureN)self_7311959)->elements[3]);; 
++return_direct_with_clo2(data,  __glo_vector_91_125list_scheme_base, (((closure)  __glo_vector_91_125list_scheme_base)->fn),  &c_7315274, ((closureN)self_7311952)->elements[3]);; 
  }
  
 -static void __lambda_245(void *data, object self_7313206, int argc, object *args) /* object self_7313206, object r_734781 */
-+static void __lambda_245(void *data, object self_7311960, int argc, object *args) /* object self_7311960, object r_734336 */
++static void __lambda_245(void *data, object self_7311953, int argc, object *args) /* object self_7311953, object r_734329 */
   {
 - object r_734781 = args[0];
-+ object r_734336 = args[0];
++ object r_734329 = args[0];
    
  
  
@@ -57343,39 +57578,39 @@ Make let-values be the same as let*-values, to work around
 -c_7316579.elements = (object *)e_7316586;
 -c_7316579.elements[0] = ((closureN)self_7313206)->elements[1];
 -c_7316579.elements[1] = ((closureN)self_7313206)->elements[3];
-+closureN_type c_7315286;
-+object e_7315293 [2];
-+c_7315286.hdr.mark = gc_color_red;
-+ c_7315286.hdr.grayed = 0;
-+c_7315286.tag = closureN_tag;
-+ c_7315286.fn = (function_type)__lambda_246;
-+c_7315286.num_args = 1;
-+c_7315286.num_elements = 2;
-+c_7315286.elements = (object *)e_7315293;
-+c_7315286.elements[0] = ((closureN)self_7311960)->elements[1];
-+c_7315286.elements[1] = ((closureN)self_7311960)->elements[3];
++closureN_type c_7315279;
++object e_7315286 [2];
++c_7315279.hdr.mark = gc_color_red;
++ c_7315279.hdr.grayed = 0;
++c_7315279.tag = closureN_tag;
++ c_7315279.fn = (function_type)__lambda_246;
++c_7315279.num_args = 1;
++c_7315279.num_elements = 2;
++c_7315279.elements = (object *)e_7315286;
++c_7315279.elements[0] = ((closureN)self_7311953)->elements[1];
++c_7315279.elements[1] = ((closureN)self_7311953)->elements[3];
  
 -return_closcall3(data,  car(((closureN)self_7313206)->elements[2]),  &c_7316579, r_734781, ((closureN)self_7313206)->elements[0]);; 
-+return_closcall3(data,  car(((closureN)self_7311960)->elements[2]),  &c_7315286, r_734336, ((closureN)self_7311960)->elements[0]);; 
++return_closcall3(data,  car(((closureN)self_7311953)->elements[2]),  &c_7315279, r_734329, ((closureN)self_7311953)->elements[0]);; 
  }
  
 -static void __lambda_246(void *data, object self_7313207, int argc, object *args) /* object self_7313207, object r_734780 */
-+static void __lambda_246(void *data, object self_7311961, int argc, object *args) /* object self_7311961, object r_734335 */
++static void __lambda_246(void *data, object self_7311954, int argc, object *args) /* object self_7311954, object r_734328 */
   {
 - object r_734780 = args[0];
-+ object r_734335 = args[0];
++ object r_734328 = args[0];
    
 -list_2_type local_7316584; 
 -return_direct_with_clo1(data,  ((closureN)self_7313207)->elements[0], (((closure)  ((closureN)self_7313207)->elements[0])->fn),  Cyc_fast_list_2(&local_7316584, ((closureN)self_7313207)->elements[1], r_734780));; 
-+list_2_type local_7315291; 
-+return_direct_with_clo1(data,  ((closureN)self_7311961)->elements[0], (((closure)  ((closureN)self_7311961)->elements[0])->fn),  Cyc_fast_list_2(&local_7315291, ((closureN)self_7311961)->elements[1], r_734335));; 
++list_2_type local_7315284; 
++return_direct_with_clo1(data,  ((closureN)self_7311954)->elements[0], (((closure)  ((closureN)self_7311954)->elements[0])->fn),  Cyc_fast_list_2(&local_7315284, ((closureN)self_7311954)->elements[1], r_734328));; 
  }
  
 -static void __lambda_218(void *data, object self_7313179, int argc, object *args) /* object self_7313179, object r_734775 */
-+static void __lambda_218(void *data, object self_7311933, int argc, object *args) /* object self_7311933, object r_734330 */
++static void __lambda_218(void *data, object self_7311926, int argc, object *args) /* object self_7311926, object r_734323 */
   {
 - object r_734775 = args[0];
-+ object r_734330 = args[0];
++ object r_734323 = args[0];
    
 -closureN_type c_7316312;
 -object e_7316563 [6];
@@ -57392,42 +57627,42 @@ Make let-values be the same as let*-values, to work around
 -c_7316312.elements[3] = ((closureN)self_7313179)->elements[3];
 -c_7316312.elements[4] = ((closureN)self_7313179)->elements[4];
 -c_7316312.elements[5] = ((closureN)self_7313179)->elements[5];
-+closureN_type c_7315019;
-+object e_7315270 [6];
-+c_7315019.hdr.mark = gc_color_red;
-+ c_7315019.hdr.grayed = 0;
-+c_7315019.tag = closureN_tag;
-+ c_7315019.fn = (function_type)__lambda_219;
-+c_7315019.num_args = 1;
-+c_7315019.num_elements = 6;
-+c_7315019.elements = (object *)e_7315270;
-+c_7315019.elements[0] = ((closureN)self_7311933)->elements[0];
-+c_7315019.elements[1] = ((closureN)self_7311933)->elements[1];
-+c_7315019.elements[2] = ((closureN)self_7311933)->elements[2];
-+c_7315019.elements[3] = ((closureN)self_7311933)->elements[3];
-+c_7315019.elements[4] = ((closureN)self_7311933)->elements[4];
-+c_7315019.elements[5] = ((closureN)self_7311933)->elements[5];
++closureN_type c_7315012;
++object e_7315263 [6];
++c_7315012.hdr.mark = gc_color_red;
++ c_7315012.hdr.grayed = 0;
++c_7315012.tag = closureN_tag;
++ c_7315012.fn = (function_type)__lambda_219;
++c_7315012.num_args = 1;
++c_7315012.num_elements = 6;
++c_7315012.elements = (object *)e_7315263;
++c_7315012.elements[0] = ((closureN)self_7311926)->elements[0];
++c_7315012.elements[1] = ((closureN)self_7311926)->elements[1];
++c_7315012.elements[2] = ((closureN)self_7311926)->elements[2];
++c_7315012.elements[3] = ((closureN)self_7311926)->elements[3];
++c_7315012.elements[4] = ((closureN)self_7311926)->elements[4];
++c_7315012.elements[5] = ((closureN)self_7311926)->elements[5];
  
  
  
 -return_closcall3(data,  ((closureN)self_7313179)->elements[0],  &c_7316312, r_734775, Cyc_car(data, ((closureN)self_7313179)->elements[5]));; 
-+return_closcall3(data,  ((closureN)self_7311933)->elements[0],  &c_7315019, r_734330, Cyc_car(data, ((closureN)self_7311933)->elements[5]));; 
++return_closcall3(data,  ((closureN)self_7311926)->elements[0],  &c_7315012, r_734323, Cyc_car(data, ((closureN)self_7311926)->elements[5]));; 
  }
  
 -static void __lambda_219(void *data, object self_7313180, int argc, object *args) /* object self_7313180, object r_734708 */
-+static void __lambda_219(void *data, object self_7311934, int argc, object *args) /* object self_7311934, object r_734263 */
++static void __lambda_219(void *data, object self_7311927, int argc, object *args) /* object self_7311927, object r_734256 */
   {
 - object r_734708 = args[0];
 -  if( (boolean_f != r_734708) ){ 
-+ object r_734263 = args[0];
-+  if( (boolean_f != r_734263) ){ 
++ object r_734256 = args[0];
++  if( (boolean_f != r_734256) ){ 
      
 -if( (boolean_f != Cyc_num_fast_lte_op(data, ((closureN)self_7313180)->elements[1], obj_int2obj(0))) ){ 
-+if( (boolean_f != Cyc_num_fast_lte_op(data, ((closureN)self_7311934)->elements[1], obj_int2obj(0))) ){ 
++if( (boolean_f != Cyc_num_fast_lte_op(data, ((closureN)self_7311927)->elements[1], obj_int2obj(0))) ){ 
    
  
 -return_direct_with_clo1(data,  ((closureN)self_7313180)->elements[2], (((closure)  ((closureN)self_7313180)->elements[2])->fn),  Cyc_cadr(data, ((closureN)self_7313180)->elements[5]));
-+return_direct_with_clo1(data,  ((closureN)self_7311934)->elements[2], (((closure)  ((closureN)self_7311934)->elements[2])->fn),  Cyc_cadr(data, ((closureN)self_7311934)->elements[5]));
++return_direct_with_clo1(data,  ((closureN)self_7311927)->elements[2], (((closure)  ((closureN)self_7311927)->elements[2])->fn),  Cyc_cadr(data, ((closureN)self_7311927)->elements[5]));
  } else { 
    
 -closureN_type c_7316323;
@@ -57444,23 +57679,23 @@ Make let-values be the same as let*-values, to work around
 -c_7316323.elements[2] = ((closureN)self_7313180)->elements[3];
 -c_7316323.elements[3] = ((closureN)self_7313180)->elements[4];
 -c_7316323.elements[4] = ((closureN)self_7313180)->elements[5];
-+closureN_type c_7315030;
-+object e_7315058 [5];
-+c_7315030.hdr.mark = gc_color_red;
-+ c_7315030.hdr.grayed = 0;
-+c_7315030.tag = closureN_tag;
-+ c_7315030.fn = (function_type)__lambda_220;
-+c_7315030.num_args = 1;
-+c_7315030.num_elements = 5;
-+c_7315030.elements = (object *)e_7315058;
-+c_7315030.elements[0] = ((closureN)self_7311934)->elements[1];
-+c_7315030.elements[1] = ((closureN)self_7311934)->elements[2];
-+c_7315030.elements[2] = ((closureN)self_7311934)->elements[3];
-+c_7315030.elements[3] = ((closureN)self_7311934)->elements[4];
-+c_7315030.elements[4] = ((closureN)self_7311934)->elements[5];
++closureN_type c_7315023;
++object e_7315051 [5];
++c_7315023.hdr.mark = gc_color_red;
++ c_7315023.hdr.grayed = 0;
++c_7315023.tag = closureN_tag;
++ c_7315023.fn = (function_type)__lambda_220;
++c_7315023.num_args = 1;
++c_7315023.num_elements = 5;
++c_7315023.elements = (object *)e_7315051;
++c_7315023.elements[0] = ((closureN)self_7311927)->elements[1];
++c_7315023.elements[1] = ((closureN)self_7311927)->elements[2];
++c_7315023.elements[2] = ((closureN)self_7311927)->elements[3];
++c_7315023.elements[3] = ((closureN)self_7311927)->elements[4];
++c_7315023.elements[4] = ((closureN)self_7311927)->elements[5];
  
 -return_closcall2(data,  ((closureN)self_7313180)->elements[4],  &c_7316323, quote__list);}
-+return_closcall2(data,  ((closureN)self_7311934)->elements[4],  &c_7315030, quote__list);}
++return_closcall2(data,  ((closureN)self_7311927)->elements[4],  &c_7315023, quote__list);}
  ;
  } else { 
    
@@ -57479,32 +57714,32 @@ Make let-values be the same as let*-values, to work around
 -c_7316354.elements[3] = ((closureN)self_7313180)->elements[3];
 -c_7316354.elements[4] = ((closureN)self_7313180)->elements[4];
 -c_7316354.elements[5] = ((closureN)self_7313180)->elements[5];
-+closureN_type c_7315061;
-+object e_7315269 [6];
-+c_7315061.hdr.mark = gc_color_red;
-+ c_7315061.hdr.grayed = 0;
-+c_7315061.tag = closureN_tag;
-+ c_7315061.fn = (function_type)__lambda_223;
-+c_7315061.num_args = 1;
-+c_7315061.num_elements = 6;
-+c_7315061.elements = (object *)e_7315269;
-+c_7315061.elements[0] = ((closureN)self_7311934)->elements[0];
-+c_7315061.elements[1] = ((closureN)self_7311934)->elements[1];
-+c_7315061.elements[2] = ((closureN)self_7311934)->elements[2];
-+c_7315061.elements[3] = ((closureN)self_7311934)->elements[3];
-+c_7315061.elements[4] = ((closureN)self_7311934)->elements[4];
-+c_7315061.elements[5] = ((closureN)self_7311934)->elements[5];
++closureN_type c_7315054;
++object e_7315262 [6];
++c_7315054.hdr.mark = gc_color_red;
++ c_7315054.hdr.grayed = 0;
++c_7315054.tag = closureN_tag;
++ c_7315054.fn = (function_type)__lambda_223;
++c_7315054.num_args = 1;
++c_7315054.num_elements = 6;
++c_7315054.elements = (object *)e_7315262;
++c_7315054.elements[0] = ((closureN)self_7311927)->elements[0];
++c_7315054.elements[1] = ((closureN)self_7311927)->elements[1];
++c_7315054.elements[2] = ((closureN)self_7311927)->elements[2];
++c_7315054.elements[3] = ((closureN)self_7311927)->elements[3];
++c_7315054.elements[4] = ((closureN)self_7311927)->elements[4];
++c_7315054.elements[5] = ((closureN)self_7311927)->elements[5];
  
 -return_closcall2(data,  ((closureN)self_7313180)->elements[4],  &c_7316354, quote_unquote_91splicing);}
-+return_closcall2(data,  ((closureN)self_7311934)->elements[4],  &c_7315061, quote_unquote_91splicing);}
++return_closcall2(data,  ((closureN)self_7311927)->elements[4],  &c_7315054, quote_unquote_91splicing);}
  ;; 
  }
  
 -static void __lambda_223(void *data, object self_7313184, int argc, object *args) /* object self_7313184, object r_734772 */
-+static void __lambda_223(void *data, object self_7311938, int argc, object *args) /* object self_7311938, object r_734327 */
++static void __lambda_223(void *data, object self_7311931, int argc, object *args) /* object self_7311931, object r_734320 */
   {
 - object r_734772 = args[0];
-+ object r_734327 = args[0];
++ object r_734320 = args[0];
    
 -closureN_type c_7316357;
 -object e_7316558 [6];
@@ -57521,38 +57756,38 @@ Make let-values be the same as let*-values, to work around
 -c_7316357.elements[3] = ((closureN)self_7313184)->elements[3];
 -c_7316357.elements[4] = ((closureN)self_7313184)->elements[4];
 -c_7316357.elements[5] = ((closureN)self_7313184)->elements[5];
-+closureN_type c_7315064;
-+object e_7315265 [6];
-+c_7315064.hdr.mark = gc_color_red;
-+ c_7315064.hdr.grayed = 0;
-+c_7315064.tag = closureN_tag;
-+ c_7315064.fn = (function_type)__lambda_224;
-+c_7315064.num_args = 1;
-+c_7315064.num_elements = 6;
-+c_7315064.elements = (object *)e_7315265;
-+c_7315064.elements[0] = ((closureN)self_7311938)->elements[0];
-+c_7315064.elements[1] = ((closureN)self_7311938)->elements[1];
-+c_7315064.elements[2] = ((closureN)self_7311938)->elements[2];
-+c_7315064.elements[3] = ((closureN)self_7311938)->elements[3];
-+c_7315064.elements[4] = ((closureN)self_7311938)->elements[4];
-+c_7315064.elements[5] = ((closureN)self_7311938)->elements[5];
++closureN_type c_7315057;
++object e_7315258 [6];
++c_7315057.hdr.mark = gc_color_red;
++ c_7315057.hdr.grayed = 0;
++c_7315057.tag = closureN_tag;
++ c_7315057.fn = (function_type)__lambda_224;
++c_7315057.num_args = 1;
++c_7315057.num_elements = 6;
++c_7315057.elements = (object *)e_7315258;
++c_7315057.elements[0] = ((closureN)self_7311931)->elements[0];
++c_7315057.elements[1] = ((closureN)self_7311931)->elements[1];
++c_7315057.elements[2] = ((closureN)self_7311931)->elements[2];
++c_7315057.elements[3] = ((closureN)self_7311931)->elements[3];
++c_7315057.elements[4] = ((closureN)self_7311931)->elements[4];
++c_7315057.elements[5] = ((closureN)self_7311931)->elements[5];
  
  
  
 -return_closcall3(data,  ((closureN)self_7313184)->elements[0],  &c_7316357, r_734772, Cyc_car(data, ((closureN)self_7313184)->elements[5]));; 
-+return_closcall3(data,  ((closureN)self_7311938)->elements[0],  &c_7315064, r_734327, Cyc_car(data, ((closureN)self_7311938)->elements[5]));; 
++return_closcall3(data,  ((closureN)self_7311931)->elements[0],  &c_7315057, r_734320, Cyc_car(data, ((closureN)self_7311931)->elements[5]));; 
  }
  
 -static void __lambda_224(void *data, object self_7313185, int argc, object *args) /* object self_7313185, object r_734719 */
-+static void __lambda_224(void *data, object self_7311939, int argc, object *args) /* object self_7311939, object r_734274 */
++static void __lambda_224(void *data, object self_7311932, int argc, object *args) /* object self_7311932, object r_734267 */
   {
 - object r_734719 = args[0];
 -  if( (boolean_f != r_734719) ){ 
-+ object r_734274 = args[0];
-+  if( (boolean_f != r_734274) ){ 
++ object r_734267 = args[0];
++  if( (boolean_f != r_734267) ){ 
      
 -if( (boolean_f != Cyc_num_fast_lte_op(data, ((closureN)self_7313185)->elements[1], obj_int2obj(0))) ){ 
-+if( (boolean_f != Cyc_num_fast_lte_op(data, ((closureN)self_7311939)->elements[1], obj_int2obj(0))) ){ 
++if( (boolean_f != Cyc_num_fast_lte_op(data, ((closureN)self_7311932)->elements[1], obj_int2obj(0))) ){ 
    
 -closureN_type c_7316363;
 -object e_7316391 [4];
@@ -57567,22 +57802,22 @@ Make let-values be the same as let*-values, to work around
 -c_7316363.elements[1] = ((closureN)self_7313185)->elements[2];
 -c_7316363.elements[2] = ((closureN)self_7313185)->elements[3];
 -c_7316363.elements[3] = ((closureN)self_7313185)->elements[5];
-+closureN_type c_7315070;
-+object e_7315098 [4];
-+c_7315070.hdr.mark = gc_color_red;
-+ c_7315070.hdr.grayed = 0;
-+c_7315070.tag = closureN_tag;
-+ c_7315070.fn = (function_type)__lambda_225;
-+c_7315070.num_args = 1;
-+c_7315070.num_elements = 4;
-+c_7315070.elements = (object *)e_7315098;
-+c_7315070.elements[0] = ((closureN)self_7311939)->elements[1];
-+c_7315070.elements[1] = ((closureN)self_7311939)->elements[2];
-+c_7315070.elements[2] = ((closureN)self_7311939)->elements[3];
-+c_7315070.elements[3] = ((closureN)self_7311939)->elements[5];
++closureN_type c_7315063;
++object e_7315091 [4];
++c_7315063.hdr.mark = gc_color_red;
++ c_7315063.hdr.grayed = 0;
++c_7315063.tag = closureN_tag;
++ c_7315063.fn = (function_type)__lambda_225;
++c_7315063.num_args = 1;
++c_7315063.num_elements = 4;
++c_7315063.elements = (object *)e_7315091;
++c_7315063.elements[0] = ((closureN)self_7311932)->elements[1];
++c_7315063.elements[1] = ((closureN)self_7311932)->elements[2];
++c_7315063.elements[2] = ((closureN)self_7311932)->elements[3];
++c_7315063.elements[3] = ((closureN)self_7311932)->elements[5];
  
 -return_closcall2(data,  ((closureN)self_7313185)->elements[4],  &c_7316363, quote_cons);
-+return_closcall2(data,  ((closureN)self_7311939)->elements[4],  &c_7315070, quote_cons);
++return_closcall2(data,  ((closureN)self_7311932)->elements[4],  &c_7315063, quote_cons);
  } else { 
    
 -closureN_type c_7316394;
@@ -57599,11 +57834,26 @@ Make let-values be the same as let*-values, to work around
 -c_7316394.elements[2] = ((closureN)self_7313185)->elements[3];
 -c_7316394.elements[3] = ((closureN)self_7313185)->elements[4];
 -c_7316394.elements[4] = ((closureN)self_7313185)->elements[5];
--
++closureN_type c_7315094;
++object e_7315122 [5];
++c_7315094.hdr.mark = gc_color_red;
++ c_7315094.hdr.grayed = 0;
++c_7315094.tag = closureN_tag;
++ c_7315094.fn = (function_type)__lambda_228;
++c_7315094.num_args = 1;
++c_7315094.num_elements = 5;
++c_7315094.elements = (object *)e_7315122;
++c_7315094.elements[0] = ((closureN)self_7311932)->elements[1];
++c_7315094.elements[1] = ((closureN)self_7311932)->elements[2];
++c_7315094.elements[2] = ((closureN)self_7311932)->elements[3];
++c_7315094.elements[3] = ((closureN)self_7311932)->elements[4];
++c_7315094.elements[4] = ((closureN)self_7311932)->elements[5];
+ 
 -return_closcall2(data,  ((closureN)self_7313185)->elements[4],  &c_7316394, quote__list);}
--;
--} else { 
--  
++return_closcall2(data,  ((closureN)self_7311932)->elements[4],  &c_7315094, quote__list);}
+ ;
+ } else { 
+   
 -closureN_type c_7316425;
 -object e_7316557 [6];
 -c_7316425.hdr.mark = gc_color_red;
@@ -57619,15 +57869,33 @@ Make let-values be the same as let*-values, to work around
 -c_7316425.elements[3] = ((closureN)self_7313185)->elements[3];
 -c_7316425.elements[4] = ((closureN)self_7313185)->elements[4];
 -c_7316425.elements[5] = ((closureN)self_7313185)->elements[5];
--
++closureN_type c_7315125;
++object e_7315257 [6];
++c_7315125.hdr.mark = gc_color_red;
++ c_7315125.hdr.grayed = 0;
++c_7315125.tag = closureN_tag;
++ c_7315125.fn = (function_type)__lambda_231;
++c_7315125.num_args = 1;
++c_7315125.num_elements = 6;
++c_7315125.elements = (object *)e_7315257;
++c_7315125.elements[0] = ((closureN)self_7311932)->elements[0];
++c_7315125.elements[1] = ((closureN)self_7311932)->elements[1];
++c_7315125.elements[2] = ((closureN)self_7311932)->elements[2];
++c_7315125.elements[3] = ((closureN)self_7311932)->elements[3];
++c_7315125.elements[4] = ((closureN)self_7311932)->elements[4];
++c_7315125.elements[5] = ((closureN)self_7311932)->elements[5];
+ 
 -return_closcall2(data,  ((closureN)self_7313185)->elements[4],  &c_7316425, quote_quasiquote);}
--;; 
--}
--
++return_closcall2(data,  ((closureN)self_7311932)->elements[4],  &c_7315125, quote_quasiquote);}
+ ;; 
+ }
+ 
 -static void __lambda_231(void *data, object self_7313192, int argc, object *args) /* object self_7313192, object r_734769 */
-- {
++static void __lambda_231(void *data, object self_7311939, int argc, object *args) /* object self_7311939, object r_734317 */
+  {
 - object r_734769 = args[0];
--  
++ object r_734317 = args[0];
+   
 -closureN_type c_7316428;
 -object e_7316553 [6];
 -c_7316428.hdr.mark = gc_color_red;
@@ -57643,17 +57911,36 @@ Make let-values be the same as let*-values, to work around
 -c_7316428.elements[3] = ((closureN)self_7313192)->elements[3];
 -c_7316428.elements[4] = ((closureN)self_7313192)->elements[4];
 -c_7316428.elements[5] = ((closureN)self_7313192)->elements[5];
--
--
--
++closureN_type c_7315128;
++object e_7315253 [6];
++c_7315128.hdr.mark = gc_color_red;
++ c_7315128.hdr.grayed = 0;
++c_7315128.tag = closureN_tag;
++ c_7315128.fn = (function_type)__lambda_232;
++c_7315128.num_args = 1;
++c_7315128.num_elements = 6;
++c_7315128.elements = (object *)e_7315253;
++c_7315128.elements[0] = ((closureN)self_7311939)->elements[0];
++c_7315128.elements[1] = ((closureN)self_7311939)->elements[1];
++c_7315128.elements[2] = ((closureN)self_7311939)->elements[2];
++c_7315128.elements[3] = ((closureN)self_7311939)->elements[3];
++c_7315128.elements[4] = ((closureN)self_7311939)->elements[4];
++c_7315128.elements[5] = ((closureN)self_7311939)->elements[5];
+ 
+ 
+ 
 -return_closcall3(data,  ((closureN)self_7313192)->elements[0],  &c_7316428, r_734769, Cyc_car(data, ((closureN)self_7313192)->elements[5]));; 
--}
--
++return_closcall3(data,  ((closureN)self_7311939)->elements[0],  &c_7315128, r_734317, Cyc_car(data, ((closureN)self_7311939)->elements[5]));; 
+ }
+ 
 -static void __lambda_232(void *data, object self_7313193, int argc, object *args) /* object self_7313193, object r_734736 */
-- {
++static void __lambda_232(void *data, object self_7311940, int argc, object *args) /* object self_7311940, object r_734284 */
+  {
 - object r_734736 = args[0];
 -  if( (boolean_f != r_734736) ){ 
--  
++ object r_734284 = args[0];
++  if( (boolean_f != r_734284) ){ 
+   
 -closureN_type c_7316431;
 -object e_7316459 [5];
 -c_7316431.hdr.mark = gc_color_red;
@@ -57668,24 +57955,23 @@ Make let-values be the same as let*-values, to work around
 -c_7316431.elements[2] = ((closureN)self_7313193)->elements[3];
 -c_7316431.elements[3] = ((closureN)self_7313193)->elements[4];
 -c_7316431.elements[4] = ((closureN)self_7313193)->elements[5];
-+closureN_type c_7315101;
-+object e_7315129 [5];
-+c_7315101.hdr.mark = gc_color_red;
-+ c_7315101.hdr.grayed = 0;
-+c_7315101.tag = closureN_tag;
-+ c_7315101.fn = (function_type)__lambda_228;
-+c_7315101.num_args = 1;
-+c_7315101.num_elements = 5;
-+c_7315101.elements = (object *)e_7315129;
-+c_7315101.elements[0] = ((closureN)self_7311939)->elements[1];
-+c_7315101.elements[1] = ((closureN)self_7311939)->elements[2];
-+c_7315101.elements[2] = ((closureN)self_7311939)->elements[3];
-+c_7315101.elements[3] = ((closureN)self_7311939)->elements[4];
-+c_7315101.elements[4] = ((closureN)self_7311939)->elements[5];
++closureN_type c_7315131;
++object e_7315159 [5];
++c_7315131.hdr.mark = gc_color_red;
++ c_7315131.hdr.grayed = 0;
++c_7315131.tag = closureN_tag;
++ c_7315131.fn = (function_type)__lambda_233;
++c_7315131.num_args = 1;
++c_7315131.num_elements = 5;
++c_7315131.elements = (object *)e_7315159;
++c_7315131.elements[0] = ((closureN)self_7311940)->elements[1];
++c_7315131.elements[1] = ((closureN)self_7311940)->elements[2];
++c_7315131.elements[2] = ((closureN)self_7311940)->elements[3];
++c_7315131.elements[3] = ((closureN)self_7311940)->elements[4];
++c_7315131.elements[4] = ((closureN)self_7311940)->elements[5];
  
 -return_closcall2(data,  ((closureN)self_7313193)->elements[4],  &c_7316431, quote__list);
-+return_closcall2(data,  ((closureN)self_7311939)->elements[4],  &c_7315101, quote__list);}
-+;
++return_closcall2(data,  ((closureN)self_7311940)->elements[4],  &c_7315131, quote__list);
  } else { 
    
 -closureN_type c_7316461;
@@ -57701,87 +57987,19 @@ Make let-values be the same as let*-values, to work around
 -c_7316461.elements[1] = ((closureN)self_7313193)->elements[1];
 -c_7316461.elements[2] = ((closureN)self_7313193)->elements[4];
 -c_7316461.elements[3] = ((closureN)self_7313193)->elements[5];
-+closureN_type c_7315132;
-+object e_7315264 [6];
-+c_7315132.hdr.mark = gc_color_red;
-+ c_7315132.hdr.grayed = 0;
-+c_7315132.tag = closureN_tag;
-+ c_7315132.fn = (function_type)__lambda_231;
-+c_7315132.num_args = 1;
-+c_7315132.num_elements = 6;
-+c_7315132.elements = (object *)e_7315264;
-+c_7315132.elements[0] = ((closureN)self_7311939)->elements[0];
-+c_7315132.elements[1] = ((closureN)self_7311939)->elements[1];
-+c_7315132.elements[2] = ((closureN)self_7311939)->elements[2];
-+c_7315132.elements[3] = ((closureN)self_7311939)->elements[3];
-+c_7315132.elements[4] = ((closureN)self_7311939)->elements[4];
-+c_7315132.elements[5] = ((closureN)self_7311939)->elements[5];
-+
-+return_closcall2(data,  ((closureN)self_7311939)->elements[4],  &c_7315132, quote_quasiquote);}
-+;; 
-+}
-+
-+static void __lambda_231(void *data, object self_7311946, int argc, object *args) /* object self_7311946, object r_734324 */
-+ {
-+ object r_734324 = args[0];
-+  
-+closureN_type c_7315135;
-+object e_7315260 [6];
-+c_7315135.hdr.mark = gc_color_red;
-+ c_7315135.hdr.grayed = 0;
-+c_7315135.tag = closureN_tag;
-+ c_7315135.fn = (function_type)__lambda_232;
-+c_7315135.num_args = 1;
-+c_7315135.num_elements = 6;
-+c_7315135.elements = (object *)e_7315260;
-+c_7315135.elements[0] = ((closureN)self_7311946)->elements[0];
-+c_7315135.elements[1] = ((closureN)self_7311946)->elements[1];
-+c_7315135.elements[2] = ((closureN)self_7311946)->elements[2];
-+c_7315135.elements[3] = ((closureN)self_7311946)->elements[3];
-+c_7315135.elements[4] = ((closureN)self_7311946)->elements[4];
-+c_7315135.elements[5] = ((closureN)self_7311946)->elements[5];
-+
-+
-+
-+return_closcall3(data,  ((closureN)self_7311946)->elements[0],  &c_7315135, r_734324, Cyc_car(data, ((closureN)self_7311946)->elements[5]));; 
-+}
-+
-+static void __lambda_232(void *data, object self_7311947, int argc, object *args) /* object self_7311947, object r_734291 */
-+ {
-+ object r_734291 = args[0];
-+  if( (boolean_f != r_734291) ){ 
-+  
-+closureN_type c_7315138;
-+object e_7315166 [5];
-+c_7315138.hdr.mark = gc_color_red;
-+ c_7315138.hdr.grayed = 0;
-+c_7315138.tag = closureN_tag;
-+ c_7315138.fn = (function_type)__lambda_233;
-+c_7315138.num_args = 1;
-+c_7315138.num_elements = 5;
-+c_7315138.elements = (object *)e_7315166;
-+c_7315138.elements[0] = ((closureN)self_7311947)->elements[1];
-+c_7315138.elements[1] = ((closureN)self_7311947)->elements[2];
-+c_7315138.elements[2] = ((closureN)self_7311947)->elements[3];
-+c_7315138.elements[3] = ((closureN)self_7311947)->elements[4];
-+c_7315138.elements[4] = ((closureN)self_7311947)->elements[5];
-+
-+return_closcall2(data,  ((closureN)self_7311947)->elements[4],  &c_7315138, quote__list);
-+} else { 
-+  
-+closureN_type c_7315168;
-+object e_7315189 [4];
-+c_7315168.hdr.mark = gc_color_red;
-+ c_7315168.hdr.grayed = 0;
-+c_7315168.tag = closureN_tag;
-+ c_7315168.fn = (function_type)__lambda_236;
-+c_7315168.num_args = 0;
-+c_7315168.num_elements = 4;
-+c_7315168.elements = (object *)e_7315189;
-+c_7315168.elements[0] = ((closureN)self_7311947)->elements[0];
-+c_7315168.elements[1] = ((closureN)self_7311947)->elements[1];
-+c_7315168.elements[2] = ((closureN)self_7311947)->elements[4];
-+c_7315168.elements[3] = ((closureN)self_7311947)->elements[5];
++closureN_type c_7315161;
++object e_7315182 [4];
++c_7315161.hdr.mark = gc_color_red;
++ c_7315161.hdr.grayed = 0;
++c_7315161.tag = closureN_tag;
++ c_7315161.fn = (function_type)__lambda_236;
++c_7315161.num_args = 0;
++c_7315161.num_elements = 4;
++c_7315161.elements = (object *)e_7315182;
++c_7315161.elements[0] = ((closureN)self_7311940)->elements[0];
++c_7315161.elements[1] = ((closureN)self_7311940)->elements[1];
++c_7315161.elements[2] = ((closureN)self_7311940)->elements[4];
++c_7315161.elements[3] = ((closureN)self_7311940)->elements[5];
  
  
 -closureN_type c_7316483;
@@ -57798,43 +58016,43 @@ Make let-values be the same as let*-values, to work around
 -c_7316483.elements[2] = ((closureN)self_7313193)->elements[3];
 -c_7316483.elements[3] = ((closureN)self_7313193)->elements[4];
 -c_7316483.elements[4] = ((closureN)self_7313193)->elements[5];
-+closureN_type c_7315190;
-+object e_7315259 [5];
-+c_7315190.hdr.mark = gc_color_red;
-+ c_7315190.hdr.grayed = 0;
-+c_7315190.tag = closureN_tag;
-+ c_7315190.fn = (function_type)__lambda_238;
-+c_7315190.num_args = 1;
-+c_7315190.num_elements = 5;
-+c_7315190.elements = (object *)e_7315259;
-+c_7315190.elements[0] = ((closureN)self_7311947)->elements[1];
-+c_7315190.elements[1] = ((closureN)self_7311947)->elements[2];
-+c_7315190.elements[2] = ((closureN)self_7311947)->elements[3];
-+c_7315190.elements[3] = ((closureN)self_7311947)->elements[4];
-+c_7315190.elements[4] = ((closureN)self_7311947)->elements[5];
++closureN_type c_7315183;
++object e_7315252 [5];
++c_7315183.hdr.mark = gc_color_red;
++ c_7315183.hdr.grayed = 0;
++c_7315183.tag = closureN_tag;
++ c_7315183.fn = (function_type)__lambda_238;
++c_7315183.num_args = 1;
++c_7315183.num_elements = 5;
++c_7315183.elements = (object *)e_7315252;
++c_7315183.elements[0] = ((closureN)self_7311940)->elements[1];
++c_7315183.elements[1] = ((closureN)self_7311940)->elements[2];
++c_7315183.elements[2] = ((closureN)self_7311940)->elements[3];
++c_7315183.elements[3] = ((closureN)self_7311940)->elements[4];
++c_7315183.elements[4] = ((closureN)self_7311940)->elements[5];
  
 -return_direct_with_clo1(data,(closure)&c_7316461,__lambda_236,  &c_7316483);}
-+return_direct_with_clo1(data,(closure)&c_7315168,__lambda_236,  &c_7315190);}
++return_direct_with_clo1(data,(closure)&c_7315161,__lambda_236,  &c_7315183);}
  ;; 
  }
  
 -static void __lambda_238(void *data, object self_7313197, int argc, object *args) /* object self_7313197, object r_734746 */
-+static void __lambda_238(void *data, object self_7311951, int argc, object *args) /* object self_7311951, object r_734301 */
++static void __lambda_238(void *data, object self_7311944, int argc, object *args) /* object self_7311944, object r_734294 */
   {
 - object r_734746 = args[0];
 -  if( (boolean_f != r_734746) ){ 
-+ object r_734301 = args[0];
-+  if( (boolean_f != r_734301) ){ 
++ object r_734294 = args[0];
++  if( (boolean_f != r_734294) ){ 
      
    
 -if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_7313197)->elements[4]))) ){ 
-+if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_7311951)->elements[4]))) ){ 
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_7311944)->elements[4]))) ){ 
    
  
  
  
 -return_direct_with_clo1(data,  ((closureN)self_7313197)->elements[1], (((closure)  ((closureN)self_7313197)->elements[1])->fn),  Cyc_cadr(data, Cyc_car(data, ((closureN)self_7313197)->elements[4])));
-+return_direct_with_clo1(data,  ((closureN)self_7311951)->elements[1], (((closure)  ((closureN)self_7311951)->elements[1])->fn),  Cyc_cadr(data, Cyc_car(data, ((closureN)self_7311951)->elements[4])));
++return_direct_with_clo1(data,  ((closureN)self_7311944)->elements[1], (((closure)  ((closureN)self_7311944)->elements[1])->fn),  Cyc_cadr(data, Cyc_car(data, ((closureN)self_7311944)->elements[4])));
  } else { 
    
 -closureN_type c_7316498;
@@ -57850,22 +58068,22 @@ Make let-values be the same as let*-values, to work around
 -c_7316498.elements[1] = ((closureN)self_7313197)->elements[1];
 -c_7316498.elements[2] = ((closureN)self_7313197)->elements[2];
 -c_7316498.elements[3] = ((closureN)self_7313197)->elements[4];
-+closureN_type c_7315205;
-+object e_7315227 [4];
-+c_7315205.hdr.mark = gc_color_red;
-+ c_7315205.hdr.grayed = 0;
-+c_7315205.tag = closureN_tag;
-+ c_7315205.fn = (function_type)__lambda_239;
-+c_7315205.num_args = 1;
-+c_7315205.num_elements = 4;
-+c_7315205.elements = (object *)e_7315227;
-+c_7315205.elements[0] = ((closureN)self_7311951)->elements[0];
-+c_7315205.elements[1] = ((closureN)self_7311951)->elements[1];
-+c_7315205.elements[2] = ((closureN)self_7311951)->elements[2];
-+c_7315205.elements[3] = ((closureN)self_7311951)->elements[4];
++closureN_type c_7315198;
++object e_7315220 [4];
++c_7315198.hdr.mark = gc_color_red;
++ c_7315198.hdr.grayed = 0;
++c_7315198.tag = closureN_tag;
++ c_7315198.fn = (function_type)__lambda_239;
++c_7315198.num_args = 1;
++c_7315198.num_elements = 4;
++c_7315198.elements = (object *)e_7315220;
++c_7315198.elements[0] = ((closureN)self_7311944)->elements[0];
++c_7315198.elements[1] = ((closureN)self_7311944)->elements[1];
++c_7315198.elements[2] = ((closureN)self_7311944)->elements[2];
++c_7315198.elements[3] = ((closureN)self_7311944)->elements[4];
  
 -return_closcall2(data,  ((closureN)self_7313197)->elements[3],  &c_7316498, quote_append);}
-+return_closcall2(data,  ((closureN)self_7311951)->elements[3],  &c_7315205, quote_append);}
++return_closcall2(data,  ((closureN)self_7311944)->elements[3],  &c_7315198, quote_append);}
  ;
  } else { 
    
@@ -57882,30 +58100,30 @@ Make let-values be the same as let*-values, to work around
 -c_7316523.elements[1] = ((closureN)self_7313197)->elements[1];
 -c_7316523.elements[2] = ((closureN)self_7313197)->elements[2];
 -c_7316523.elements[3] = ((closureN)self_7313197)->elements[4];
-+closureN_type c_7315230;
-+object e_7315258 [4];
-+c_7315230.hdr.mark = gc_color_red;
-+ c_7315230.hdr.grayed = 0;
-+c_7315230.tag = closureN_tag;
-+ c_7315230.fn = (function_type)__lambda_241;
-+c_7315230.num_args = 1;
-+c_7315230.num_elements = 4;
-+c_7315230.elements = (object *)e_7315258;
-+c_7315230.elements[0] = ((closureN)self_7311951)->elements[0];
-+c_7315230.elements[1] = ((closureN)self_7311951)->elements[1];
-+c_7315230.elements[2] = ((closureN)self_7311951)->elements[2];
-+c_7315230.elements[3] = ((closureN)self_7311951)->elements[4];
++closureN_type c_7315223;
++object e_7315251 [4];
++c_7315223.hdr.mark = gc_color_red;
++ c_7315223.hdr.grayed = 0;
++c_7315223.tag = closureN_tag;
++ c_7315223.fn = (function_type)__lambda_241;
++c_7315223.num_args = 1;
++c_7315223.num_elements = 4;
++c_7315223.elements = (object *)e_7315251;
++c_7315223.elements[0] = ((closureN)self_7311944)->elements[0];
++c_7315223.elements[1] = ((closureN)self_7311944)->elements[1];
++c_7315223.elements[2] = ((closureN)self_7311944)->elements[2];
++c_7315223.elements[3] = ((closureN)self_7311944)->elements[4];
  
 -return_closcall2(data,  ((closureN)self_7313197)->elements[3],  &c_7316523, quote_cons);}
-+return_closcall2(data,  ((closureN)self_7311951)->elements[3],  &c_7315230, quote_cons);}
++return_closcall2(data,  ((closureN)self_7311944)->elements[3],  &c_7315223, quote_cons);}
  ;; 
  }
  
 -static void __lambda_241(void *data, object self_7313200, int argc, object *args) /* object self_7313200, object r_734756 */
-+static void __lambda_241(void *data, object self_7311954, int argc, object *args) /* object self_7311954, object r_734311 */
++static void __lambda_241(void *data, object self_7311947, int argc, object *args) /* object self_7311947, object r_734304 */
   {
 - object r_734756 = args[0];
-+ object r_734311 = args[0];
++ object r_734304 = args[0];
    
  
  
@@ -57923,32 +58141,32 @@ Make let-values be the same as let*-values, to work around
 -c_7316528.elements[2] = ((closureN)self_7313200)->elements[2];
 -c_7316528.elements[3] = r_734756;
 -c_7316528.elements[4] = ((closureN)self_7313200)->elements[3];
-+closureN_type c_7315235;
-+object e_7315253 [5];
-+c_7315235.hdr.mark = gc_color_red;
-+ c_7315235.hdr.grayed = 0;
-+c_7315235.tag = closureN_tag;
-+ c_7315235.fn = (function_type)__lambda_242;
-+c_7315235.num_args = 1;
-+c_7315235.num_elements = 5;
-+c_7315235.elements = (object *)e_7315253;
-+c_7315235.elements[0] = ((closureN)self_7311954)->elements[0];
-+c_7315235.elements[1] = ((closureN)self_7311954)->elements[1];
-+c_7315235.elements[2] = ((closureN)self_7311954)->elements[2];
-+c_7315235.elements[3] = r_734311;
-+c_7315235.elements[4] = ((closureN)self_7311954)->elements[3];
++closureN_type c_7315228;
++object e_7315246 [5];
++c_7315228.hdr.mark = gc_color_red;
++ c_7315228.hdr.grayed = 0;
++c_7315228.tag = closureN_tag;
++ c_7315228.fn = (function_type)__lambda_242;
++c_7315228.num_args = 1;
++c_7315228.num_elements = 5;
++c_7315228.elements = (object *)e_7315246;
++c_7315228.elements[0] = ((closureN)self_7311947)->elements[0];
++c_7315228.elements[1] = ((closureN)self_7311947)->elements[1];
++c_7315228.elements[2] = ((closureN)self_7311947)->elements[2];
++c_7315228.elements[3] = r_734304;
++c_7315228.elements[4] = ((closureN)self_7311947)->elements[3];
  
  
  
 -return_closcall3(data,  car(((closureN)self_7313200)->elements[2]),  &c_7316528, Cyc_car(data, ((closureN)self_7313200)->elements[3]), ((closureN)self_7313200)->elements[0]);; 
-+return_closcall3(data,  car(((closureN)self_7311954)->elements[2]),  &c_7315235, Cyc_car(data, ((closureN)self_7311954)->elements[3]), ((closureN)self_7311954)->elements[0]);; 
++return_closcall3(data,  car(((closureN)self_7311947)->elements[2]),  &c_7315228, Cyc_car(data, ((closureN)self_7311947)->elements[3]), ((closureN)self_7311947)->elements[0]);; 
  }
  
 -static void __lambda_242(void *data, object self_7313201, int argc, object *args) /* object self_7313201, object r_734757 */
-+static void __lambda_242(void *data, object self_7311955, int argc, object *args) /* object self_7311955, object r_734312 */
++static void __lambda_242(void *data, object self_7311948, int argc, object *args) /* object self_7311948, object r_734305 */
   {
 - object r_734757 = args[0];
-+ object r_734312 = args[0];
++ object r_734305 = args[0];
    
  
  
@@ -57964,42 +58182,42 @@ Make let-values be the same as let*-values, to work around
 -c_7316533.elements[0] = ((closureN)self_7313201)->elements[1];
 -c_7316533.elements[1] = ((closureN)self_7313201)->elements[3];
 -c_7316533.elements[2] = r_734757;
-+closureN_type c_7315240;
-+object e_7315248 [3];
-+c_7315240.hdr.mark = gc_color_red;
-+ c_7315240.hdr.grayed = 0;
-+c_7315240.tag = closureN_tag;
-+ c_7315240.fn = (function_type)__lambda_243;
-+c_7315240.num_args = 1;
-+c_7315240.num_elements = 3;
-+c_7315240.elements = (object *)e_7315248;
-+c_7315240.elements[0] = ((closureN)self_7311955)->elements[1];
-+c_7315240.elements[1] = ((closureN)self_7311955)->elements[3];
-+c_7315240.elements[2] = r_734312;
++closureN_type c_7315233;
++object e_7315241 [3];
++c_7315233.hdr.mark = gc_color_red;
++ c_7315233.hdr.grayed = 0;
++c_7315233.tag = closureN_tag;
++ c_7315233.fn = (function_type)__lambda_243;
++c_7315233.num_args = 1;
++c_7315233.num_elements = 3;
++c_7315233.elements = (object *)e_7315241;
++c_7315233.elements[0] = ((closureN)self_7311948)->elements[1];
++c_7315233.elements[1] = ((closureN)self_7311948)->elements[3];
++c_7315233.elements[2] = r_734305;
  
  
  
 -return_closcall3(data,  car(((closureN)self_7313201)->elements[2]),  &c_7316533, Cyc_cdr(data, ((closureN)self_7313201)->elements[4]), ((closureN)self_7313201)->elements[0]);; 
-+return_closcall3(data,  car(((closureN)self_7311955)->elements[2]),  &c_7315240, Cyc_cdr(data, ((closureN)self_7311955)->elements[4]), ((closureN)self_7311955)->elements[0]);; 
++return_closcall3(data,  car(((closureN)self_7311948)->elements[2]),  &c_7315233, Cyc_cdr(data, ((closureN)self_7311948)->elements[4]), ((closureN)self_7311948)->elements[0]);; 
  }
  
 -static void __lambda_243(void *data, object self_7313202, int argc, object *args) /* object self_7313202, object r_734758 */
-+static void __lambda_243(void *data, object self_7311956, int argc, object *args) /* object self_7311956, object r_734313 */
++static void __lambda_243(void *data, object self_7311949, int argc, object *args) /* object self_7311949, object r_734306 */
   {
 - object r_734758 = args[0];
-+ object r_734313 = args[0];
++ object r_734306 = args[0];
    
 -list_3_type local_7316538; 
 -return_direct_with_clo1(data,  ((closureN)self_7313202)->elements[0], (((closure)  ((closureN)self_7313202)->elements[0])->fn),  Cyc_fast_list_3(&local_7316538, ((closureN)self_7313202)->elements[1], ((closureN)self_7313202)->elements[2], r_734758));; 
-+list_3_type local_7315245; 
-+return_direct_with_clo1(data,  ((closureN)self_7311956)->elements[0], (((closure)  ((closureN)self_7311956)->elements[0])->fn),  Cyc_fast_list_3(&local_7315245, ((closureN)self_7311956)->elements[1], ((closureN)self_7311956)->elements[2], r_734313));; 
++list_3_type local_7315238; 
++return_direct_with_clo1(data,  ((closureN)self_7311949)->elements[0], (((closure)  ((closureN)self_7311949)->elements[0])->fn),  Cyc_fast_list_3(&local_7315238, ((closureN)self_7311949)->elements[1], ((closureN)self_7311949)->elements[2], r_734306));; 
  }
  
 -static void __lambda_239(void *data, object self_7313198, int argc, object *args) /* object self_7313198, object r_734749 */
-+static void __lambda_239(void *data, object self_7311952, int argc, object *args) /* object self_7311952, object r_734304 */
++static void __lambda_239(void *data, object self_7311945, int argc, object *args) /* object self_7311945, object r_734297 */
   {
 - object r_734749 = args[0];
-+ object r_734304 = args[0];
++ object r_734297 = args[0];
    
  
  
@@ -58015,53 +58233,53 @@ Make let-values be the same as let*-values, to work around
 -c_7316503.elements[0] = ((closureN)self_7313198)->elements[1];
 -c_7316503.elements[1] = r_734749;
 -c_7316503.elements[2] = ((closureN)self_7313198)->elements[3];
-+closureN_type c_7315210;
-+object e_7315222 [3];
-+c_7315210.hdr.mark = gc_color_red;
-+ c_7315210.hdr.grayed = 0;
-+c_7315210.tag = closureN_tag;
-+ c_7315210.fn = (function_type)__lambda_240;
-+c_7315210.num_args = 1;
-+c_7315210.num_elements = 3;
-+c_7315210.elements = (object *)e_7315222;
-+c_7315210.elements[0] = ((closureN)self_7311952)->elements[1];
-+c_7315210.elements[1] = r_734304;
-+c_7315210.elements[2] = ((closureN)self_7311952)->elements[3];
++closureN_type c_7315203;
++object e_7315215 [3];
++c_7315203.hdr.mark = gc_color_red;
++ c_7315203.hdr.grayed = 0;
++c_7315203.tag = closureN_tag;
++ c_7315203.fn = (function_type)__lambda_240;
++c_7315203.num_args = 1;
++c_7315203.num_elements = 3;
++c_7315203.elements = (object *)e_7315215;
++c_7315203.elements[0] = ((closureN)self_7311945)->elements[1];
++c_7315203.elements[1] = r_734297;
++c_7315203.elements[2] = ((closureN)self_7311945)->elements[3];
  
  
  
 -return_closcall3(data,  car(((closureN)self_7313198)->elements[2]),  &c_7316503, Cyc_cdr(data, ((closureN)self_7313198)->elements[3]), ((closureN)self_7313198)->elements[0]);; 
-+return_closcall3(data,  car(((closureN)self_7311952)->elements[2]),  &c_7315210, Cyc_cdr(data, ((closureN)self_7311952)->elements[3]), ((closureN)self_7311952)->elements[0]);; 
++return_closcall3(data,  car(((closureN)self_7311945)->elements[2]),  &c_7315203, Cyc_cdr(data, ((closureN)self_7311945)->elements[3]), ((closureN)self_7311945)->elements[0]);; 
  }
  
 -static void __lambda_240(void *data, object self_7313199, int argc, object *args) /* object self_7313199, object r_734751 */
-+static void __lambda_240(void *data, object self_7311953, int argc, object *args) /* object self_7311953, object r_734306 */
++static void __lambda_240(void *data, object self_7311946, int argc, object *args) /* object self_7311946, object r_734299 */
   {
 - object r_734751 = args[0];
-+ object r_734306 = args[0];
++ object r_734299 = args[0];
    
 -list_3_type local_7316508; 
-+list_3_type local_7315215; 
++list_3_type local_7315208; 
  
  
  
  
 -return_direct_with_clo1(data,  ((closureN)self_7313199)->elements[0], (((closure)  ((closureN)self_7313199)->elements[0])->fn),  Cyc_fast_list_3(&local_7316508, ((closureN)self_7313199)->elements[1], Cyc_cadr(data, Cyc_car(data, ((closureN)self_7313199)->elements[2])), r_734751));; 
-+return_direct_with_clo1(data,  ((closureN)self_7311953)->elements[0], (((closure)  ((closureN)self_7311953)->elements[0])->fn),  Cyc_fast_list_3(&local_7315215, ((closureN)self_7311953)->elements[1], Cyc_cadr(data, Cyc_car(data, ((closureN)self_7311953)->elements[2])), r_734306));; 
++return_direct_with_clo1(data,  ((closureN)self_7311946)->elements[0], (((closure)  ((closureN)self_7311946)->elements[0])->fn),  Cyc_fast_list_3(&local_7315208, ((closureN)self_7311946)->elements[1], Cyc_cadr(data, Cyc_car(data, ((closureN)self_7311946)->elements[2])), r_734299));; 
  }
  
 -static void __lambda_236(void *data, object self_7313203, int argc, object *args) /* object self_7313203, object k_734762 */
-+static void __lambda_236(void *data, object self_7311957, int argc, object *args) /* object self_7311957, object k_734317 */
++static void __lambda_236(void *data, object self_7311950, int argc, object *args) /* object self_7311950, object k_734310 */
   {
 - object k_734762 = args[0];
-+ object k_734317 = args[0];
++ object k_734310 = args[0];
      
 -if( (boolean_f != Cyc_num_fast_lte_op(data, ((closureN)self_7313203)->elements[1], obj_int2obj(0))) ){ 
-+if( (boolean_f != Cyc_num_fast_lte_op(data, ((closureN)self_7311957)->elements[1], obj_int2obj(0))) ){ 
++if( (boolean_f != Cyc_num_fast_lte_op(data, ((closureN)self_7311950)->elements[1], obj_int2obj(0))) ){ 
      
    
 -if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7313203)->elements[3]))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7311957)->elements[3]))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, ((closureN)self_7311950)->elements[3]))) ){ 
    
 -closureN_type c_7316472;
 -object e_7316479 [3];
@@ -58075,47 +58293,47 @@ Make let-values be the same as let*-values, to work around
 -c_7316472.elements[0] = ((closureN)self_7313203)->elements[0];
 -c_7316472.elements[1] = k_734762;
 -c_7316472.elements[2] = ((closureN)self_7313203)->elements[3];
-+closureN_type c_7315179;
-+object e_7315186 [3];
-+c_7315179.hdr.mark = gc_color_red;
-+ c_7315179.hdr.grayed = 0;
-+c_7315179.tag = closureN_tag;
-+ c_7315179.fn = (function_type)__lambda_237;
-+c_7315179.num_args = 1;
-+c_7315179.num_elements = 3;
-+c_7315179.elements = (object *)e_7315186;
-+c_7315179.elements[0] = ((closureN)self_7311957)->elements[0];
-+c_7315179.elements[1] = k_734317;
-+c_7315179.elements[2] = ((closureN)self_7311957)->elements[3];
++closureN_type c_7315172;
++object e_7315179 [3];
++c_7315172.hdr.mark = gc_color_red;
++ c_7315172.hdr.grayed = 0;
++c_7315172.tag = closureN_tag;
++ c_7315172.fn = (function_type)__lambda_237;
++c_7315172.num_args = 1;
++c_7315172.num_elements = 3;
++c_7315172.elements = (object *)e_7315179;
++c_7315172.elements[0] = ((closureN)self_7311950)->elements[0];
++c_7315172.elements[1] = k_734310;
++c_7315172.elements[2] = ((closureN)self_7311950)->elements[3];
  
 -return_closcall2(data,  ((closureN)self_7313203)->elements[2],  &c_7316472, quote_unquote_91splicing);
-+return_closcall2(data,  ((closureN)self_7311957)->elements[2],  &c_7315179, quote_unquote_91splicing);
++return_closcall2(data,  ((closureN)self_7311950)->elements[2],  &c_7315172, quote_unquote_91splicing);
  } else { 
 -  return_direct_with_clo1(data,  k_734762, (((closure)  k_734762)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_734317, (((closure)  k_734317)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_734310, (((closure)  k_734310)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_734762, (((closure)  k_734762)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_734317, (((closure)  k_734317)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_734310, (((closure)  k_734310)->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_237(void *data, object self_7313204, int argc, object *args) /* object self_7313204, object r_734765 */
-+static void __lambda_237(void *data, object self_7311958, int argc, object *args) /* object self_7311958, object r_734320 */
++static void __lambda_237(void *data, object self_7311951, int argc, object *args) /* object self_7311951, object r_734313 */
   {
 - object r_734765 = args[0];
-+ object r_734320 = args[0];
++ object r_734313 = args[0];
    
  
 -return_closcall3(data,  ((closureN)self_7313204)->elements[0],  ((closureN)self_7313204)->elements[1], r_734765, Cyc_caar(data, ((closureN)self_7313204)->elements[2]));; 
-+return_closcall3(data,  ((closureN)self_7311958)->elements[0],  ((closureN)self_7311958)->elements[1], r_734320, Cyc_caar(data, ((closureN)self_7311958)->elements[2]));; 
++return_closcall3(data,  ((closureN)self_7311951)->elements[0],  ((closureN)self_7311951)->elements[1], r_734313, Cyc_caar(data, ((closureN)self_7311951)->elements[2]));; 
  }
  
 -static void __lambda_233(void *data, object self_7313194, int argc, object *args) /* object self_7313194, object r_734737 */
-+static void __lambda_233(void *data, object self_7311948, int argc, object *args) /* object self_7311948, object r_734292 */
++static void __lambda_233(void *data, object self_7311941, int argc, object *args) /* object self_7311941, object r_734285 */
   {
 - object r_734737 = args[0];
-+ object r_734292 = args[0];
++ object r_734285 = args[0];
    
 -closureN_type c_7316434;
 -object e_7316458 [5];
@@ -58131,30 +58349,30 @@ Make let-values be the same as let*-values, to work around
 -c_7316434.elements[2] = ((closureN)self_7313194)->elements[2];
 -c_7316434.elements[3] = r_734737;
 -c_7316434.elements[4] = ((closureN)self_7313194)->elements[4];
-+closureN_type c_7315141;
-+object e_7315165 [5];
-+c_7315141.hdr.mark = gc_color_red;
-+ c_7315141.hdr.grayed = 0;
-+c_7315141.tag = closureN_tag;
-+ c_7315141.fn = (function_type)__lambda_234;
-+c_7315141.num_args = 1;
-+c_7315141.num_elements = 5;
-+c_7315141.elements = (object *)e_7315165;
-+c_7315141.elements[0] = ((closureN)self_7311948)->elements[0];
-+c_7315141.elements[1] = ((closureN)self_7311948)->elements[1];
-+c_7315141.elements[2] = ((closureN)self_7311948)->elements[2];
-+c_7315141.elements[3] = r_734292;
-+c_7315141.elements[4] = ((closureN)self_7311948)->elements[4];
++closureN_type c_7315134;
++object e_7315158 [5];
++c_7315134.hdr.mark = gc_color_red;
++ c_7315134.hdr.grayed = 0;
++c_7315134.tag = closureN_tag;
++ c_7315134.fn = (function_type)__lambda_234;
++c_7315134.num_args = 1;
++c_7315134.num_elements = 5;
++c_7315134.elements = (object *)e_7315158;
++c_7315134.elements[0] = ((closureN)self_7311941)->elements[0];
++c_7315134.elements[1] = ((closureN)self_7311941)->elements[1];
++c_7315134.elements[2] = ((closureN)self_7311941)->elements[2];
++c_7315134.elements[3] = r_734285;
++c_7315134.elements[4] = ((closureN)self_7311941)->elements[4];
  
 -return_closcall2(data,  ((closureN)self_7313194)->elements[3],  &c_7316434, quote_quote);; 
-+return_closcall2(data,  ((closureN)self_7311948)->elements[3],  &c_7315141, quote_quote);; 
++return_closcall2(data,  ((closureN)self_7311941)->elements[3],  &c_7315134, quote_quote);; 
  }
  
 -static void __lambda_234(void *data, object self_7313195, int argc, object *args) /* object self_7313195, object r_734742 */
-+static void __lambda_234(void *data, object self_7311949, int argc, object *args) /* object self_7311949, object r_734297 */
++static void __lambda_234(void *data, object self_7311942, int argc, object *args) /* object self_7311942, object r_734290 */
   {
 - object r_734742 = args[0];
-+ object r_734297 = args[0];
++ object r_734290 = args[0];
    
  
  
@@ -58170,48 +58388,48 @@ Make let-values be the same as let*-values, to work around
 -c_7316439.elements[0] = ((closureN)self_7313195)->elements[1];
 -c_7316439.elements[1] = ((closureN)self_7313195)->elements[3];
 -c_7316439.elements[2] = r_734742;
-+closureN_type c_7315146;
-+object e_7315157 [3];
-+c_7315146.hdr.mark = gc_color_red;
-+ c_7315146.hdr.grayed = 0;
-+c_7315146.tag = closureN_tag;
-+ c_7315146.fn = (function_type)__lambda_235;
-+c_7315146.num_args = 1;
-+c_7315146.num_elements = 3;
-+c_7315146.elements = (object *)e_7315157;
-+c_7315146.elements[0] = ((closureN)self_7311949)->elements[1];
-+c_7315146.elements[1] = ((closureN)self_7311949)->elements[3];
-+c_7315146.elements[2] = r_734297;
++closureN_type c_7315139;
++object e_7315150 [3];
++c_7315139.hdr.mark = gc_color_red;
++ c_7315139.hdr.grayed = 0;
++c_7315139.tag = closureN_tag;
++ c_7315139.fn = (function_type)__lambda_235;
++c_7315139.num_args = 1;
++c_7315139.num_elements = 3;
++c_7315139.elements = (object *)e_7315150;
++c_7315139.elements[0] = ((closureN)self_7311942)->elements[1];
++c_7315139.elements[1] = ((closureN)self_7311942)->elements[3];
++c_7315139.elements[2] = r_734290;
  
  
  
  
 -complex_num_type local_7316456; 
 -return_closcall3(data,  car(((closureN)self_7313195)->elements[2]),  &c_7316439, Cyc_cadr(data, ((closureN)self_7313195)->elements[4]), Cyc_fast_sum(data,&local_7316456, ((closureN)self_7313195)->elements[0], obj_int2obj(1)));; 
-+complex_num_type local_7315163; 
-+return_closcall3(data,  car(((closureN)self_7311949)->elements[2]),  &c_7315146, Cyc_cadr(data, ((closureN)self_7311949)->elements[4]), Cyc_fast_sum(data,&local_7315163, ((closureN)self_7311949)->elements[0], obj_int2obj(1)));; 
++complex_num_type local_7315156; 
++return_closcall3(data,  car(((closureN)self_7311942)->elements[2]),  &c_7315139, Cyc_cadr(data, ((closureN)self_7311942)->elements[4]), Cyc_fast_sum(data,&local_7315156, ((closureN)self_7311942)->elements[0], obj_int2obj(1)));; 
  }
  
 -static void __lambda_235(void *data, object self_7313196, int argc, object *args) /* object self_7313196, object r_734739 */
-+static void __lambda_235(void *data, object self_7311950, int argc, object *args) /* object self_7311950, object r_734294 */
++static void __lambda_235(void *data, object self_7311943, int argc, object *args) /* object self_7311943, object r_734287 */
   {
 - object r_734739 = args[0];
-+ object r_734294 = args[0];
++ object r_734287 = args[0];
    
 -list_3_type local_7316444; 
-+list_3_type local_7315151; 
++list_3_type local_7315144; 
  
 -list_2_type local_7316448; 
 -return_direct_with_clo1(data,  ((closureN)self_7313196)->elements[0], (((closure)  ((closureN)self_7313196)->elements[0])->fn),  Cyc_fast_list_3(&local_7316444, ((closureN)self_7313196)->elements[1], Cyc_fast_list_2(&local_7316448, ((closureN)self_7313196)->elements[2], quote_quasiquote), r_734739));; 
-+list_2_type local_7315155; 
-+return_direct_with_clo1(data,  ((closureN)self_7311950)->elements[0], (((closure)  ((closureN)self_7311950)->elements[0])->fn),  Cyc_fast_list_3(&local_7315151, ((closureN)self_7311950)->elements[1], Cyc_fast_list_2(&local_7315155, ((closureN)self_7311950)->elements[2], quote_quasiquote), r_734294));; 
++list_2_type local_7315148; 
++return_direct_with_clo1(data,  ((closureN)self_7311943)->elements[0], (((closure)  ((closureN)self_7311943)->elements[0])->fn),  Cyc_fast_list_3(&local_7315144, ((closureN)self_7311943)->elements[1], Cyc_fast_list_2(&local_7315148, ((closureN)self_7311943)->elements[2], quote_quasiquote), r_734287));; 
  }
  
 -static void __lambda_228(void *data, object self_7313189, int argc, object *args) /* object self_7313189, object r_734727 */
-+static void __lambda_228(void *data, object self_7311943, int argc, object *args) /* object self_7311943, object r_734282 */
++static void __lambda_228(void *data, object self_7311936, int argc, object *args) /* object self_7311936, object r_734275 */
   {
 - object r_734727 = args[0];
-+ object r_734282 = args[0];
++ object r_734275 = args[0];
    
 -closureN_type c_7316397;
 -object e_7316421 [5];
@@ -58227,30 +58445,30 @@ Make let-values be the same as let*-values, to work around
 -c_7316397.elements[2] = ((closureN)self_7313189)->elements[2];
 -c_7316397.elements[3] = r_734727;
 -c_7316397.elements[4] = ((closureN)self_7313189)->elements[4];
-+closureN_type c_7315104;
-+object e_7315128 [5];
-+c_7315104.hdr.mark = gc_color_red;
-+ c_7315104.hdr.grayed = 0;
-+c_7315104.tag = closureN_tag;
-+ c_7315104.fn = (function_type)__lambda_229;
-+c_7315104.num_args = 1;
-+c_7315104.num_elements = 5;
-+c_7315104.elements = (object *)e_7315128;
-+c_7315104.elements[0] = ((closureN)self_7311943)->elements[0];
-+c_7315104.elements[1] = ((closureN)self_7311943)->elements[1];
-+c_7315104.elements[2] = ((closureN)self_7311943)->elements[2];
-+c_7315104.elements[3] = r_734282;
-+c_7315104.elements[4] = ((closureN)self_7311943)->elements[4];
++closureN_type c_7315097;
++object e_7315121 [5];
++c_7315097.hdr.mark = gc_color_red;
++ c_7315097.hdr.grayed = 0;
++c_7315097.tag = closureN_tag;
++ c_7315097.fn = (function_type)__lambda_229;
++c_7315097.num_args = 1;
++c_7315097.num_elements = 5;
++c_7315097.elements = (object *)e_7315121;
++c_7315097.elements[0] = ((closureN)self_7311936)->elements[0];
++c_7315097.elements[1] = ((closureN)self_7311936)->elements[1];
++c_7315097.elements[2] = ((closureN)self_7311936)->elements[2];
++c_7315097.elements[3] = r_734275;
++c_7315097.elements[4] = ((closureN)self_7311936)->elements[4];
  
 -return_closcall2(data,  ((closureN)self_7313189)->elements[3],  &c_7316397, quote_quote);; 
-+return_closcall2(data,  ((closureN)self_7311943)->elements[3],  &c_7315104, quote_quote);; 
++return_closcall2(data,  ((closureN)self_7311936)->elements[3],  &c_7315097, quote_quote);; 
  }
  
 -static void __lambda_229(void *data, object self_7313190, int argc, object *args) /* object self_7313190, object r_734732 */
-+static void __lambda_229(void *data, object self_7311944, int argc, object *args) /* object self_7311944, object r_734287 */
++static void __lambda_229(void *data, object self_7311937, int argc, object *args) /* object self_7311937, object r_734280 */
   {
 - object r_734732 = args[0];
-+ object r_734287 = args[0];
++ object r_734280 = args[0];
    
  
  
@@ -58266,48 +58484,48 @@ Make let-values be the same as let*-values, to work around
 -c_7316402.elements[0] = ((closureN)self_7313190)->elements[1];
 -c_7316402.elements[1] = ((closureN)self_7313190)->elements[3];
 -c_7316402.elements[2] = r_734732;
-+closureN_type c_7315109;
-+object e_7315120 [3];
-+c_7315109.hdr.mark = gc_color_red;
-+ c_7315109.hdr.grayed = 0;
-+c_7315109.tag = closureN_tag;
-+ c_7315109.fn = (function_type)__lambda_230;
-+c_7315109.num_args = 1;
-+c_7315109.num_elements = 3;
-+c_7315109.elements = (object *)e_7315120;
-+c_7315109.elements[0] = ((closureN)self_7311944)->elements[1];
-+c_7315109.elements[1] = ((closureN)self_7311944)->elements[3];
-+c_7315109.elements[2] = r_734287;
++closureN_type c_7315102;
++object e_7315113 [3];
++c_7315102.hdr.mark = gc_color_red;
++ c_7315102.hdr.grayed = 0;
++c_7315102.tag = closureN_tag;
++ c_7315102.fn = (function_type)__lambda_230;
++c_7315102.num_args = 1;
++c_7315102.num_elements = 3;
++c_7315102.elements = (object *)e_7315113;
++c_7315102.elements[0] = ((closureN)self_7311937)->elements[1];
++c_7315102.elements[1] = ((closureN)self_7311937)->elements[3];
++c_7315102.elements[2] = r_734280;
  
  
  
  
 -complex_num_type local_7316419; 
 -return_closcall3(data,  car(((closureN)self_7313190)->elements[2]),  &c_7316402, Cyc_cadr(data, ((closureN)self_7313190)->elements[4]), Cyc_fast_sub(data,&local_7316419, ((closureN)self_7313190)->elements[0], obj_int2obj(1)));; 
-+complex_num_type local_7315126; 
-+return_closcall3(data,  car(((closureN)self_7311944)->elements[2]),  &c_7315109, Cyc_cadr(data, ((closureN)self_7311944)->elements[4]), Cyc_fast_sub(data,&local_7315126, ((closureN)self_7311944)->elements[0], obj_int2obj(1)));; 
++complex_num_type local_7315119; 
++return_closcall3(data,  car(((closureN)self_7311937)->elements[2]),  &c_7315102, Cyc_cadr(data, ((closureN)self_7311937)->elements[4]), Cyc_fast_sub(data,&local_7315119, ((closureN)self_7311937)->elements[0], obj_int2obj(1)));; 
  }
  
 -static void __lambda_230(void *data, object self_7313191, int argc, object *args) /* object self_7313191, object r_734729 */
-+static void __lambda_230(void *data, object self_7311945, int argc, object *args) /* object self_7311945, object r_734284 */
++static void __lambda_230(void *data, object self_7311938, int argc, object *args) /* object self_7311938, object r_734277 */
   {
 - object r_734729 = args[0];
-+ object r_734284 = args[0];
++ object r_734277 = args[0];
    
 -list_3_type local_7316407; 
-+list_3_type local_7315114; 
++list_3_type local_7315107; 
  
 -list_2_type local_7316411; 
 -return_direct_with_clo1(data,  ((closureN)self_7313191)->elements[0], (((closure)  ((closureN)self_7313191)->elements[0])->fn),  Cyc_fast_list_3(&local_7316407, ((closureN)self_7313191)->elements[1], Cyc_fast_list_2(&local_7316411, ((closureN)self_7313191)->elements[2], quote_unquote_91splicing), r_734729));; 
-+list_2_type local_7315118; 
-+return_direct_with_clo1(data,  ((closureN)self_7311945)->elements[0], (((closure)  ((closureN)self_7311945)->elements[0])->fn),  Cyc_fast_list_3(&local_7315114, ((closureN)self_7311945)->elements[1], Cyc_fast_list_2(&local_7315118, ((closureN)self_7311945)->elements[2], quote_unquote_91splicing), r_734284));; 
++list_2_type local_7315111; 
++return_direct_with_clo1(data,  ((closureN)self_7311938)->elements[0], (((closure)  ((closureN)self_7311938)->elements[0])->fn),  Cyc_fast_list_3(&local_7315107, ((closureN)self_7311938)->elements[1], Cyc_fast_list_2(&local_7315111, ((closureN)self_7311938)->elements[2], quote_unquote_91splicing), r_734277));; 
  }
  
 -static void __lambda_225(void *data, object self_7313186, int argc, object *args) /* object self_7313186, object r_734721 */
-+static void __lambda_225(void *data, object self_7311940, int argc, object *args) /* object self_7311940, object r_734276 */
++static void __lambda_225(void *data, object self_7311933, int argc, object *args) /* object self_7311933, object r_734269 */
   {
 - object r_734721 = args[0];
-+ object r_734276 = args[0];
++ object r_734269 = args[0];
    
  
  
@@ -58325,32 +58543,32 @@ Make let-values be the same as let*-values, to work around
 -c_7316368.elements[2] = ((closureN)self_7313186)->elements[2];
 -c_7316368.elements[3] = r_734721;
 -c_7316368.elements[4] = ((closureN)self_7313186)->elements[3];
-+closureN_type c_7315075;
-+object e_7315093 [5];
-+c_7315075.hdr.mark = gc_color_red;
-+ c_7315075.hdr.grayed = 0;
-+c_7315075.tag = closureN_tag;
-+ c_7315075.fn = (function_type)__lambda_226;
-+c_7315075.num_args = 1;
-+c_7315075.num_elements = 5;
-+c_7315075.elements = (object *)e_7315093;
-+c_7315075.elements[0] = ((closureN)self_7311940)->elements[0];
-+c_7315075.elements[1] = ((closureN)self_7311940)->elements[1];
-+c_7315075.elements[2] = ((closureN)self_7311940)->elements[2];
-+c_7315075.elements[3] = r_734276;
-+c_7315075.elements[4] = ((closureN)self_7311940)->elements[3];
++closureN_type c_7315068;
++object e_7315086 [5];
++c_7315068.hdr.mark = gc_color_red;
++ c_7315068.hdr.grayed = 0;
++c_7315068.tag = closureN_tag;
++ c_7315068.fn = (function_type)__lambda_226;
++c_7315068.num_args = 1;
++c_7315068.num_elements = 5;
++c_7315068.elements = (object *)e_7315086;
++c_7315068.elements[0] = ((closureN)self_7311933)->elements[0];
++c_7315068.elements[1] = ((closureN)self_7311933)->elements[1];
++c_7315068.elements[2] = ((closureN)self_7311933)->elements[2];
++c_7315068.elements[3] = r_734269;
++c_7315068.elements[4] = ((closureN)self_7311933)->elements[3];
  
  
  
 -return_closcall3(data,  car(((closureN)self_7313186)->elements[2]),  &c_7316368, Cyc_car(data, ((closureN)self_7313186)->elements[3]), ((closureN)self_7313186)->elements[0]);; 
-+return_closcall3(data,  car(((closureN)self_7311940)->elements[2]),  &c_7315075, Cyc_car(data, ((closureN)self_7311940)->elements[3]), ((closureN)self_7311940)->elements[0]);; 
++return_closcall3(data,  car(((closureN)self_7311933)->elements[2]),  &c_7315068, Cyc_car(data, ((closureN)self_7311933)->elements[3]), ((closureN)self_7311933)->elements[0]);; 
  }
  
 -static void __lambda_226(void *data, object self_7313187, int argc, object *args) /* object self_7313187, object r_734722 */
-+static void __lambda_226(void *data, object self_7311941, int argc, object *args) /* object self_7311941, object r_734277 */
++static void __lambda_226(void *data, object self_7311934, int argc, object *args) /* object self_7311934, object r_734270 */
   {
 - object r_734722 = args[0];
-+ object r_734277 = args[0];
++ object r_734270 = args[0];
    
  
  
@@ -58366,42 +58584,42 @@ Make let-values be the same as let*-values, to work around
 -c_7316373.elements[0] = ((closureN)self_7313187)->elements[1];
 -c_7316373.elements[1] = ((closureN)self_7313187)->elements[3];
 -c_7316373.elements[2] = r_734722;
-+closureN_type c_7315080;
-+object e_7315088 [3];
-+c_7315080.hdr.mark = gc_color_red;
-+ c_7315080.hdr.grayed = 0;
-+c_7315080.tag = closureN_tag;
-+ c_7315080.fn = (function_type)__lambda_227;
-+c_7315080.num_args = 1;
-+c_7315080.num_elements = 3;
-+c_7315080.elements = (object *)e_7315088;
-+c_7315080.elements[0] = ((closureN)self_7311941)->elements[1];
-+c_7315080.elements[1] = ((closureN)self_7311941)->elements[3];
-+c_7315080.elements[2] = r_734277;
++closureN_type c_7315073;
++object e_7315081 [3];
++c_7315073.hdr.mark = gc_color_red;
++ c_7315073.hdr.grayed = 0;
++c_7315073.tag = closureN_tag;
++ c_7315073.fn = (function_type)__lambda_227;
++c_7315073.num_args = 1;
++c_7315073.num_elements = 3;
++c_7315073.elements = (object *)e_7315081;
++c_7315073.elements[0] = ((closureN)self_7311934)->elements[1];
++c_7315073.elements[1] = ((closureN)self_7311934)->elements[3];
++c_7315073.elements[2] = r_734270;
  
  
  
 -return_closcall3(data,  car(((closureN)self_7313187)->elements[2]),  &c_7316373, Cyc_cdr(data, ((closureN)self_7313187)->elements[4]), ((closureN)self_7313187)->elements[0]);; 
-+return_closcall3(data,  car(((closureN)self_7311941)->elements[2]),  &c_7315080, Cyc_cdr(data, ((closureN)self_7311941)->elements[4]), ((closureN)self_7311941)->elements[0]);; 
++return_closcall3(data,  car(((closureN)self_7311934)->elements[2]),  &c_7315073, Cyc_cdr(data, ((closureN)self_7311934)->elements[4]), ((closureN)self_7311934)->elements[0]);; 
  }
  
 -static void __lambda_227(void *data, object self_7313188, int argc, object *args) /* object self_7313188, object r_734723 */
-+static void __lambda_227(void *data, object self_7311942, int argc, object *args) /* object self_7311942, object r_734278 */
++static void __lambda_227(void *data, object self_7311935, int argc, object *args) /* object self_7311935, object r_734271 */
   {
 - object r_734723 = args[0];
-+ object r_734278 = args[0];
++ object r_734271 = args[0];
    
 -list_3_type local_7316378; 
 -return_direct_with_clo1(data,  ((closureN)self_7313188)->elements[0], (((closure)  ((closureN)self_7313188)->elements[0])->fn),  Cyc_fast_list_3(&local_7316378, ((closureN)self_7313188)->elements[1], ((closureN)self_7313188)->elements[2], r_734723));; 
-+list_3_type local_7315085; 
-+return_direct_with_clo1(data,  ((closureN)self_7311942)->elements[0], (((closure)  ((closureN)self_7311942)->elements[0])->fn),  Cyc_fast_list_3(&local_7315085, ((closureN)self_7311942)->elements[1], ((closureN)self_7311942)->elements[2], r_734278));; 
++list_3_type local_7315078; 
++return_direct_with_clo1(data,  ((closureN)self_7311935)->elements[0], (((closure)  ((closureN)self_7311935)->elements[0])->fn),  Cyc_fast_list_3(&local_7315078, ((closureN)self_7311935)->elements[1], ((closureN)self_7311935)->elements[2], r_734271));; 
  }
  
 -static void __lambda_220(void *data, object self_7313181, int argc, object *args) /* object self_7313181, object r_734710 */
-+static void __lambda_220(void *data, object self_7311935, int argc, object *args) /* object self_7311935, object r_734265 */
++static void __lambda_220(void *data, object self_7311928, int argc, object *args) /* object self_7311928, object r_734258 */
   {
 - object r_734710 = args[0];
-+ object r_734265 = args[0];
++ object r_734258 = args[0];
    
 -closureN_type c_7316326;
 -object e_7316350 [5];
@@ -58417,30 +58635,30 @@ Make let-values be the same as let*-values, to work around
 -c_7316326.elements[2] = ((closureN)self_7313181)->elements[2];
 -c_7316326.elements[3] = r_734710;
 -c_7316326.elements[4] = ((closureN)self_7313181)->elements[4];
-+closureN_type c_7315033;
-+object e_7315057 [5];
-+c_7315033.hdr.mark = gc_color_red;
-+ c_7315033.hdr.grayed = 0;
-+c_7315033.tag = closureN_tag;
-+ c_7315033.fn = (function_type)__lambda_221;
-+c_7315033.num_args = 1;
-+c_7315033.num_elements = 5;
-+c_7315033.elements = (object *)e_7315057;
-+c_7315033.elements[0] = ((closureN)self_7311935)->elements[0];
-+c_7315033.elements[1] = ((closureN)self_7311935)->elements[1];
-+c_7315033.elements[2] = ((closureN)self_7311935)->elements[2];
-+c_7315033.elements[3] = r_734265;
-+c_7315033.elements[4] = ((closureN)self_7311935)->elements[4];
++closureN_type c_7315026;
++object e_7315050 [5];
++c_7315026.hdr.mark = gc_color_red;
++ c_7315026.hdr.grayed = 0;
++c_7315026.tag = closureN_tag;
++ c_7315026.fn = (function_type)__lambda_221;
++c_7315026.num_args = 1;
++c_7315026.num_elements = 5;
++c_7315026.elements = (object *)e_7315050;
++c_7315026.elements[0] = ((closureN)self_7311928)->elements[0];
++c_7315026.elements[1] = ((closureN)self_7311928)->elements[1];
++c_7315026.elements[2] = ((closureN)self_7311928)->elements[2];
++c_7315026.elements[3] = r_734258;
++c_7315026.elements[4] = ((closureN)self_7311928)->elements[4];
  
 -return_closcall2(data,  ((closureN)self_7313181)->elements[3],  &c_7316326, quote_quote);; 
-+return_closcall2(data,  ((closureN)self_7311935)->elements[3],  &c_7315033, quote_quote);; 
++return_closcall2(data,  ((closureN)self_7311928)->elements[3],  &c_7315026, quote_quote);; 
  }
  
 -static void __lambda_221(void *data, object self_7313182, int argc, object *args) /* object self_7313182, object r_734715 */
-+static void __lambda_221(void *data, object self_7311936, int argc, object *args) /* object self_7311936, object r_734270 */
++static void __lambda_221(void *data, object self_7311929, int argc, object *args) /* object self_7311929, object r_734263 */
   {
 - object r_734715 = args[0];
-+ object r_734270 = args[0];
++ object r_734263 = args[0];
    
  
  
@@ -58456,48 +58674,48 @@ Make let-values be the same as let*-values, to work around
 -c_7316331.elements[0] = ((closureN)self_7313182)->elements[1];
 -c_7316331.elements[1] = ((closureN)self_7313182)->elements[3];
 -c_7316331.elements[2] = r_734715;
-+closureN_type c_7315038;
-+object e_7315049 [3];
-+c_7315038.hdr.mark = gc_color_red;
-+ c_7315038.hdr.grayed = 0;
-+c_7315038.tag = closureN_tag;
-+ c_7315038.fn = (function_type)__lambda_222;
-+c_7315038.num_args = 1;
-+c_7315038.num_elements = 3;
-+c_7315038.elements = (object *)e_7315049;
-+c_7315038.elements[0] = ((closureN)self_7311936)->elements[1];
-+c_7315038.elements[1] = ((closureN)self_7311936)->elements[3];
-+c_7315038.elements[2] = r_734270;
++closureN_type c_7315031;
++object e_7315042 [3];
++c_7315031.hdr.mark = gc_color_red;
++ c_7315031.hdr.grayed = 0;
++c_7315031.tag = closureN_tag;
++ c_7315031.fn = (function_type)__lambda_222;
++c_7315031.num_args = 1;
++c_7315031.num_elements = 3;
++c_7315031.elements = (object *)e_7315042;
++c_7315031.elements[0] = ((closureN)self_7311929)->elements[1];
++c_7315031.elements[1] = ((closureN)self_7311929)->elements[3];
++c_7315031.elements[2] = r_734263;
  
  
  
  
 -complex_num_type local_7316348; 
 -return_closcall3(data,  car(((closureN)self_7313182)->elements[2]),  &c_7316331, Cyc_cadr(data, ((closureN)self_7313182)->elements[4]), Cyc_fast_sub(data,&local_7316348, ((closureN)self_7313182)->elements[0], obj_int2obj(1)));; 
-+complex_num_type local_7315055; 
-+return_closcall3(data,  car(((closureN)self_7311936)->elements[2]),  &c_7315038, Cyc_cadr(data, ((closureN)self_7311936)->elements[4]), Cyc_fast_sub(data,&local_7315055, ((closureN)self_7311936)->elements[0], obj_int2obj(1)));; 
++complex_num_type local_7315048; 
++return_closcall3(data,  car(((closureN)self_7311929)->elements[2]),  &c_7315031, Cyc_cadr(data, ((closureN)self_7311929)->elements[4]), Cyc_fast_sub(data,&local_7315048, ((closureN)self_7311929)->elements[0], obj_int2obj(1)));; 
  }
  
 -static void __lambda_222(void *data, object self_7313183, int argc, object *args) /* object self_7313183, object r_734712 */
-+static void __lambda_222(void *data, object self_7311937, int argc, object *args) /* object self_7311937, object r_734267 */
++static void __lambda_222(void *data, object self_7311930, int argc, object *args) /* object self_7311930, object r_734260 */
   {
 - object r_734712 = args[0];
-+ object r_734267 = args[0];
++ object r_734260 = args[0];
    
 -list_3_type local_7316336; 
-+list_3_type local_7315043; 
++list_3_type local_7315036; 
  
 -list_2_type local_7316340; 
 -return_direct_with_clo1(data,  ((closureN)self_7313183)->elements[0], (((closure)  ((closureN)self_7313183)->elements[0])->fn),  Cyc_fast_list_3(&local_7316336, ((closureN)self_7313183)->elements[1], Cyc_fast_list_2(&local_7316340, ((closureN)self_7313183)->elements[2], quote_unquote), r_734712));; 
-+list_2_type local_7315047; 
-+return_direct_with_clo1(data,  ((closureN)self_7311937)->elements[0], (((closure)  ((closureN)self_7311937)->elements[0])->fn),  Cyc_fast_list_3(&local_7315043, ((closureN)self_7311937)->elements[1], Cyc_fast_list_2(&local_7315047, ((closureN)self_7311937)->elements[2], quote_unquote), r_734267));; 
++list_2_type local_7315040; 
++return_direct_with_clo1(data,  ((closureN)self_7311930)->elements[0], (((closure)  ((closureN)self_7311930)->elements[0])->fn),  Cyc_fast_list_3(&local_7315036, ((closureN)self_7311930)->elements[1], Cyc_fast_list_2(&local_7315040, ((closureN)self_7311930)->elements[2], quote_unquote), r_734260));; 
  }
  
 -static void __lambda_215(void *data, object self_7313209, int argc, object *args) /* object self_7313209, object r_734705 */
-+static void __lambda_215(void *data, object self_7311963, int argc, object *args) /* object self_7311963, object r_734260 */
++static void __lambda_215(void *data, object self_7311956, int argc, object *args) /* object self_7311956, object r_734253 */
   {
 - object r_734705 = args[0];
-+ object r_734260 = args[0];
++ object r_734253 = args[0];
    
 -closureN_type c_7316290;
 -object e_7316299 [3];
@@ -58511,27 +58729,27 @@ Make let-values be the same as let*-values, to work around
 -c_7316290.elements[0] = ((closureN)self_7313209)->elements[0];
 -c_7316290.elements[1] = ((closureN)self_7313209)->elements[1];
 -c_7316290.elements[2] = ((closureN)self_7313209)->elements[2];
-+closureN_type c_7314997;
-+object e_7315006 [3];
-+c_7314997.hdr.mark = gc_color_red;
-+ c_7314997.hdr.grayed = 0;
-+c_7314997.tag = closureN_tag;
-+ c_7314997.fn = (function_type)__lambda_216;
-+c_7314997.num_args = 1;
-+c_7314997.num_elements = 3;
-+c_7314997.elements = (object *)e_7315006;
-+c_7314997.elements[0] = ((closureN)self_7311963)->elements[0];
-+c_7314997.elements[1] = ((closureN)self_7311963)->elements[1];
-+c_7314997.elements[2] = ((closureN)self_7311963)->elements[2];
++closureN_type c_7314990;
++object e_7314999 [3];
++c_7314990.hdr.mark = gc_color_red;
++ c_7314990.hdr.grayed = 0;
++c_7314990.tag = closureN_tag;
++ c_7314990.fn = (function_type)__lambda_216;
++c_7314990.num_args = 1;
++c_7314990.num_elements = 3;
++c_7314990.elements = (object *)e_7314999;
++c_7314990.elements[0] = ((closureN)self_7311956)->elements[0];
++c_7314990.elements[1] = ((closureN)self_7311956)->elements[1];
++c_7314990.elements[2] = ((closureN)self_7311956)->elements[2];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7316290,__lambda_216,  Cyc_set_cell(data, ((closureN)self_7313209)->elements[2], r_734705));; 
-+return_direct_with_clo1(data,(closure)&c_7314997,__lambda_216,  Cyc_set_cell(data, ((closureN)self_7311963)->elements[2], r_734260));; 
++return_direct_with_clo1(data,(closure)&c_7314990,__lambda_216,  Cyc_set_cell(data, ((closureN)self_7311956)->elements[2], r_734253));; 
  }
  
 -static void __lambda_216(void *data, object self_7313210, int argc, object *args) /* object self_7313210, object r_734703 */
-+static void __lambda_216(void *data, object self_7311964, int argc, object *args) /* object self_7311964, object r_734258 */
++static void __lambda_216(void *data, object self_7311957, int argc, object *args) /* object self_7311957, object r_734251 */
   {
  
    
@@ -58539,16 +58757,15 @@ Make let-values be the same as let*-values, to work around
  
  
 -return_closcall3(data,  car(((closureN)self_7313210)->elements[2]),  ((closureN)self_7313210)->elements[1], Cyc_cadr(data, ((closureN)self_7313210)->elements[0]), obj_int2obj(0));; 
-+return_closcall3(data,  car(((closureN)self_7311964)->elements[2]),  ((closureN)self_7311964)->elements[1], Cyc_cadr(data, ((closureN)self_7311964)->elements[0]), obj_int2obj(0));; 
++return_closcall3(data,  car(((closureN)self_7311957)->elements[2]),  ((closureN)self_7311957)->elements[1], Cyc_cadr(data, ((closureN)self_7311957)->elements[0]), obj_int2obj(0));; 
  }
  
 -static void __lambda_189(void *data, object _, int argc, object *args) /* closure _,object k_734623, object expr_73227_732945, object rename_73228_732946, object compare_73229_732947 */
-+static void __lambda_189(void *data, object _, int argc, object *args) /* closure _,object k_734178, object expr_73227_732605, object rename_73228_732606, object compare_73229_732607 */
++static void __lambda_189(void *data, object _, int argc, object *args) /* closure _,object k_734171, object expr_73227_732598, object rename_73228_732599, object compare_73229_732600 */
   {
 -object k_734623 = args[0]; object expr_73227_732945 = args[1]; object rename_73228_732946 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:do");
-+object k_734178 = args[0]; object expr_73227_732605 = args[1]; object rename_73228_732606 = args[2];
-+  Cyc_st_add(data, "base.sld:do");
++object k_734171 = args[0]; object expr_73227_732598 = args[1]; object rename_73228_732599 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:do");
  
 -closureN_type c_7316049;
 -object e_7316281 [3];
@@ -58562,28 +58779,28 @@ Make let-values be the same as let*-values, to work around
 -c_7316049.elements[0] = expr_73227_732945;
 -c_7316049.elements[1] = k_734623;
 -c_7316049.elements[2] = rename_73228_732946;
-+closureN_type c_7314756;
-+object e_7314988 [3];
-+c_7314756.hdr.mark = gc_color_red;
-+ c_7314756.hdr.grayed = 0;
-+c_7314756.tag = closureN_tag;
-+ c_7314756.fn = (function_type)__lambda_190;
-+c_7314756.num_args = 1;
-+c_7314756.num_elements = 3;
-+c_7314756.elements = (object *)e_7314988;
-+c_7314756.elements[0] = expr_73227_732605;
-+c_7314756.elements[1] = k_734178;
-+c_7314756.elements[2] = rename_73228_732606;
++closureN_type c_7314749;
++object e_7314981 [3];
++c_7314749.hdr.mark = gc_color_red;
++ c_7314749.hdr.grayed = 0;
++c_7314749.tag = closureN_tag;
++ c_7314749.fn = (function_type)__lambda_190;
++c_7314749.num_args = 1;
++c_7314749.num_elements = 3;
++c_7314749.elements = (object *)e_7314981;
++c_7314749.elements[0] = expr_73227_732598;
++c_7314749.elements[1] = k_734171;
++c_7314749.elements[2] = rename_73228_732599;
  
 -return_closcall2(data,  rename_73228_732946,  &c_7316049, quote_begin);; 
-+return_closcall2(data,  rename_73228_732606,  &c_7314756, quote_begin);; 
++return_closcall2(data,  rename_73228_732599,  &c_7314749, quote_begin);; 
  }
  
 -static void __lambda_190(void *data, object self_7313153, int argc, object *args) /* object self_7313153, object r_734680 */
-+static void __lambda_190(void *data, object self_7311907, int argc, object *args) /* object self_7311907, object r_734235 */
++static void __lambda_190(void *data, object self_7311900, int argc, object *args) /* object self_7311900, object r_734228 */
   {
 - object r_734680 = args[0];
-+ object r_734235 = args[0];
++ object r_734228 = args[0];
    
 -closureN_type c_7316052;
 -object e_7316280 [4];
@@ -58598,29 +58815,29 @@ Make let-values be the same as let*-values, to work around
 -c_7316052.elements[1] = ((closureN)self_7313153)->elements[1];
 -c_7316052.elements[2] = r_734680;
 -c_7316052.elements[3] = ((closureN)self_7313153)->elements[2];
-+closureN_type c_7314759;
-+object e_7314987 [4];
-+c_7314759.hdr.mark = gc_color_red;
-+ c_7314759.hdr.grayed = 0;
-+c_7314759.tag = closureN_tag;
-+ c_7314759.fn = (function_type)__lambda_191;
-+c_7314759.num_args = 1;
-+c_7314759.num_elements = 4;
-+c_7314759.elements = (object *)e_7314987;
-+c_7314759.elements[0] = ((closureN)self_7311907)->elements[0];
-+c_7314759.elements[1] = ((closureN)self_7311907)->elements[1];
-+c_7314759.elements[2] = r_734235;
-+c_7314759.elements[3] = ((closureN)self_7311907)->elements[2];
++closureN_type c_7314752;
++object e_7314980 [4];
++c_7314752.hdr.mark = gc_color_red;
++ c_7314752.hdr.grayed = 0;
++c_7314752.tag = closureN_tag;
++ c_7314752.fn = (function_type)__lambda_191;
++c_7314752.num_args = 1;
++c_7314752.num_elements = 4;
++c_7314752.elements = (object *)e_7314980;
++c_7314752.elements[0] = ((closureN)self_7311900)->elements[0];
++c_7314752.elements[1] = ((closureN)self_7311900)->elements[1];
++c_7314752.elements[2] = r_734228;
++c_7314752.elements[3] = ((closureN)self_7311900)->elements[2];
  
 -return_closcall2(data,  ((closureN)self_7313153)->elements[2],  &c_7316052, quote_lp);; 
-+return_closcall2(data,  ((closureN)self_7311907)->elements[2],  &c_7314759, quote_lp);; 
++return_closcall2(data,  ((closureN)self_7311900)->elements[2],  &c_7314752, quote_lp);; 
  }
  
 -static void __lambda_191(void *data, object self_7313154, int argc, object *args) /* object self_7313154, object r_734686 */
-+static void __lambda_191(void *data, object self_7311908, int argc, object *args) /* object self_7311908, object r_734241 */
++static void __lambda_191(void *data, object self_7311901, int argc, object *args) /* object self_7311901, object r_734234 */
   {
 - object r_734686 = args[0];
-+ object r_734241 = args[0];
++ object r_734234 = args[0];
    
 -closureN_type c_7316054;
 -object e_7316245 [5];
@@ -58636,33 +58853,33 @@ Make let-values be the same as let*-values, to work around
 -c_7316054.elements[2] = ((closureN)self_7313154)->elements[2];
 -c_7316054.elements[3] = r_734686;
 -c_7316054.elements[4] = ((closureN)self_7313154)->elements[3];
-+closureN_type c_7314761;
-+object e_7314952 [5];
-+c_7314761.hdr.mark = gc_color_red;
-+ c_7314761.hdr.grayed = 0;
-+c_7314761.tag = closureN_tag;
-+ c_7314761.fn = (function_type)__lambda_192;
-+c_7314761.num_args = 1;
-+c_7314761.num_elements = 5;
-+c_7314761.elements = (object *)e_7314952;
-+c_7314761.elements[0] = ((closureN)self_7311908)->elements[0];
-+c_7314761.elements[1] = ((closureN)self_7311908)->elements[1];
-+c_7314761.elements[2] = ((closureN)self_7311908)->elements[2];
-+c_7314761.elements[3] = r_734241;
-+c_7314761.elements[4] = ((closureN)self_7311908)->elements[3];
++closureN_type c_7314754;
++object e_7314945 [5];
++c_7314754.hdr.mark = gc_color_red;
++ c_7314754.hdr.grayed = 0;
++c_7314754.tag = closureN_tag;
++ c_7314754.fn = (function_type)__lambda_192;
++c_7314754.num_args = 1;
++c_7314754.num_elements = 5;
++c_7314754.elements = (object *)e_7314945;
++c_7314754.elements[0] = ((closureN)self_7311901)->elements[0];
++c_7314754.elements[1] = ((closureN)self_7311901)->elements[1];
++c_7314754.elements[2] = ((closureN)self_7311901)->elements[2];
++c_7314754.elements[3] = r_734234;
++c_7314754.elements[4] = ((closureN)self_7311901)->elements[3];
  
  
 -mmacro(c_7316246, (function_type)__lambda_210);c_7316246.num_args = 1;
 -return_direct_with_clo1(data,(closure)&c_7316054,__lambda_192,  &c_7316246);; 
-+mmacro(c_7314953, (function_type)__lambda_210);c_7314953.num_args = 1;
-+return_direct_with_clo1(data,(closure)&c_7314761,__lambda_192,  &c_7314953);; 
++mmacro(c_7314946, (function_type)__lambda_210);c_7314946.num_args = 1;
++return_direct_with_clo1(data,(closure)&c_7314754,__lambda_192,  &c_7314946);; 
  }
  
 -static void __lambda_210(void *data, object self_7313155, int argc, object *args) /* object self_7313155, object k_734690, object x_73253_732952 */
-+static void __lambda_210(void *data, object self_7311909, int argc, object *args) /* object self_7311909, object k_734245, object x_73253_732612 */
++static void __lambda_210(void *data, object self_7311902, int argc, object *args) /* object self_7311902, object k_734238, object x_73253_732605 */
   {
 - object k_734690 = args[0]; object x_73253_732952 = args[1];
-+ object k_734245 = args[0]; object x_73253_732612 = args[1];
++ object k_734238 = args[0]; object x_73253_732605 = args[1];
    
 -closureN_type c_7316248;
 -object e_7316277 [2];
@@ -58675,32 +58892,32 @@ Make let-values be the same as let*-values, to work around
 -c_7316248.elements = (object *)e_7316277;
 -c_7316248.elements[0] = k_734690;
 -c_7316248.elements[1] = x_73253_732952;
-+closureN_type c_7314955;
-+object e_7314984 [2];
-+c_7314955.hdr.mark = gc_color_red;
-+ c_7314955.hdr.grayed = 0;
-+c_7314955.tag = closureN_tag;
-+ c_7314955.fn = (function_type)__lambda_211;
-+c_7314955.num_args = 1;
-+c_7314955.num_elements = 2;
-+c_7314955.elements = (object *)e_7314984;
-+c_7314955.elements[0] = k_734245;
-+c_7314955.elements[1] = x_73253_732612;
++closureN_type c_7314948;
++object e_7314977 [2];
++c_7314948.hdr.mark = gc_color_red;
++ c_7314948.hdr.grayed = 0;
++c_7314948.tag = closureN_tag;
++ c_7314948.fn = (function_type)__lambda_211;
++c_7314948.num_args = 1;
++c_7314948.num_elements = 2;
++c_7314948.elements = (object *)e_7314977;
++c_7314948.elements[0] = k_734238;
++c_7314948.elements[1] = x_73253_732605;
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7316248,__lambda_211,  Cyc_cddr(data, x_73253_732952));; 
-+return_direct_with_clo1(data,(closure)&c_7314955,__lambda_211,  Cyc_cddr(data, x_73253_732612));; 
++return_direct_with_clo1(data,(closure)&c_7314948,__lambda_211,  Cyc_cddr(data, x_73253_732605));; 
  }
  
 -static void __lambda_211(void *data, object self_7313156, int argc, object *args) /* object self_7313156, object r_734696 */
-+static void __lambda_211(void *data, object self_7311910, int argc, object *args) /* object self_7311910, object r_734251 */
++static void __lambda_211(void *data, object self_7311903, int argc, object *args) /* object self_7311903, object r_734244 */
   {
 - object r_734696 = args[0];
-+ object r_734251 = args[0];
++ object r_734244 = args[0];
      
 -if( (boolean_f != Cyc_is_pair(r_734696)) ){ 
-+if( (boolean_f != Cyc_is_pair(r_734251)) ){ 
++if( (boolean_f != Cyc_is_pair(r_734244)) ){ 
    
 -closureN_type c_7316252;
 -object e_7316268 [2];
@@ -58713,59 +58930,59 @@ Make let-values be the same as let*-values, to work around
 -c_7316252.elements = (object *)e_7316268;
 -c_7316252.elements[0] = ((closureN)self_7313156)->elements[0];
 -c_7316252.elements[1] = ((closureN)self_7313156)->elements[1];
-+closureN_type c_7314959;
-+object e_7314975 [2];
-+c_7314959.hdr.mark = gc_color_red;
-+ c_7314959.hdr.grayed = 0;
-+c_7314959.tag = closureN_tag;
-+ c_7314959.fn = (function_type)__lambda_212;
-+c_7314959.num_args = 1;
-+c_7314959.num_elements = 2;
-+c_7314959.elements = (object *)e_7314975;
-+c_7314959.elements[0] = ((closureN)self_7311910)->elements[0];
-+c_7314959.elements[1] = ((closureN)self_7311910)->elements[1];
++closureN_type c_7314952;
++object e_7314968 [2];
++c_7314952.hdr.mark = gc_color_red;
++ c_7314952.hdr.grayed = 0;
++c_7314952.tag = closureN_tag;
++ c_7314952.fn = (function_type)__lambda_212;
++c_7314952.num_args = 1;
++c_7314952.num_elements = 2;
++c_7314952.elements = (object *)e_7314968;
++c_7314952.elements[0] = ((closureN)self_7311903)->elements[0];
++c_7314952.elements[1] = ((closureN)self_7311903)->elements[1];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7316252,__lambda_212,  Cyc_cddr(data, ((closureN)self_7313156)->elements[1]));
-+return_direct_with_clo1(data,(closure)&c_7314959,__lambda_212,  Cyc_cddr(data, ((closureN)self_7311910)->elements[1]));
++return_direct_with_clo1(data,(closure)&c_7314952,__lambda_212,  Cyc_cddr(data, ((closureN)self_7311903)->elements[1]));
  } else { 
    
  
 -return_direct_with_clo1(data,  ((closureN)self_7313156)->elements[0], (((closure)  ((closureN)self_7313156)->elements[0])->fn),  Cyc_car(data, ((closureN)self_7313156)->elements[1]));}
-+return_direct_with_clo1(data,  ((closureN)self_7311910)->elements[0], (((closure)  ((closureN)self_7311910)->elements[0])->fn),  Cyc_car(data, ((closureN)self_7311910)->elements[1]));}
++return_direct_with_clo1(data,  ((closureN)self_7311903)->elements[0], (((closure)  ((closureN)self_7311903)->elements[0])->fn),  Cyc_car(data, ((closureN)self_7311903)->elements[1]));}
  ;; 
  }
  
 -static void __lambda_212(void *data, object self_7313157, int argc, object *args) /* object self_7313157, object r_734695 */
-+static void __lambda_212(void *data, object self_7311911, int argc, object *args) /* object self_7311911, object r_734250 */
++static void __lambda_212(void *data, object self_7311904, int argc, object *args) /* object self_7311904, object r_734243 */
   {
 - object r_734695 = args[0];
-+ object r_734250 = args[0];
++ object r_734243 = args[0];
      
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, r_734695))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, r_734250))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, r_734243))) ){ 
    
 -make_utf8_string_with_len(c_7316259, "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_7313157)->elements[0], &c_7316259, ((closureN)self_7313157)->elements[1]);
-+make_utf8_string_with_len(c_7314966, "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_7311911)->elements[0], &c_7314966, ((closureN)self_7311911)->elements[1]);
++make_utf8_string_with_len(c_7314959, "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_7311904)->elements[0], &c_7314959, ((closureN)self_7311904)->elements[1]);
  } else { 
    
  
  
  
 -return_direct_with_clo1(data,  ((closureN)self_7313157)->elements[0], (((closure)  ((closureN)self_7313157)->elements[0])->fn),  Cyc_car(data, Cyc_cddr(data, ((closureN)self_7313157)->elements[1])));}
-+return_direct_with_clo1(data,  ((closureN)self_7311911)->elements[0], (((closure)  ((closureN)self_7311911)->elements[0])->fn),  Cyc_car(data, Cyc_cddr(data, ((closureN)self_7311911)->elements[1])));}
++return_direct_with_clo1(data,  ((closureN)self_7311904)->elements[0], (((closure)  ((closureN)self_7311904)->elements[0])->fn),  Cyc_car(data, Cyc_cddr(data, ((closureN)self_7311904)->elements[1])));}
  ;; 
  }
  
 -static void __lambda_192(void *data, object self_7313158, int argc, object *args) /* object self_7313158, object r_734688 */
-+static void __lambda_192(void *data, object self_7311912, int argc, object *args) /* object self_7311912, object r_734243 */
++static void __lambda_192(void *data, object self_7311905, int argc, object *args) /* object self_7311905, object r_734236 */
   {
 - object r_734688 = args[0];
-+ object r_734243 = args[0];
++ object r_734236 = args[0];
    
 -closureN_type c_7316056;
 -object e_7316241 [5];
@@ -58781,32 +58998,32 @@ Make let-values be the same as let*-values, to work around
 -c_7316056.elements[2] = ((closureN)self_7313158)->elements[2];
 -c_7316056.elements[3] = ((closureN)self_7313158)->elements[3];
 -c_7316056.elements[4] = ((closureN)self_7313158)->elements[4];
-+closureN_type c_7314763;
-+object e_7314948 [5];
-+c_7314763.hdr.mark = gc_color_red;
-+ c_7314763.hdr.grayed = 0;
-+c_7314763.tag = closureN_tag;
-+ c_7314763.fn = (function_type)__lambda_193;
-+c_7314763.num_args = 1;
-+c_7314763.num_elements = 5;
-+c_7314763.elements = (object *)e_7314948;
-+c_7314763.elements[0] = ((closureN)self_7311912)->elements[0];
-+c_7314763.elements[1] = ((closureN)self_7311912)->elements[1];
-+c_7314763.elements[2] = ((closureN)self_7311912)->elements[2];
-+c_7314763.elements[3] = ((closureN)self_7311912)->elements[3];
-+c_7314763.elements[4] = ((closureN)self_7311912)->elements[4];
++closureN_type c_7314756;
++object e_7314941 [5];
++c_7314756.hdr.mark = gc_color_red;
++ c_7314756.hdr.grayed = 0;
++c_7314756.tag = closureN_tag;
++ c_7314756.fn = (function_type)__lambda_193;
++c_7314756.num_args = 1;
++c_7314756.num_elements = 5;
++c_7314756.elements = (object *)e_7314941;
++c_7314756.elements[0] = ((closureN)self_7311905)->elements[0];
++c_7314756.elements[1] = ((closureN)self_7311905)->elements[1];
++c_7314756.elements[2] = ((closureN)self_7311905)->elements[2];
++c_7314756.elements[3] = ((closureN)self_7311905)->elements[3];
++c_7314756.elements[4] = ((closureN)self_7311905)->elements[4];
  
  
  
 -return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7316056, r_734688, Cyc_cadr(data, ((closureN)self_7313158)->elements[0]));; 
-+return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7314763, r_734243, Cyc_cadr(data, ((closureN)self_7311912)->elements[0]));; 
++return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7314756, r_734236, Cyc_cadr(data, ((closureN)self_7311905)->elements[0]));; 
  }
  
 -static void __lambda_193(void *data, object self_7313159, int argc, object *args) /* object self_7313159, object r_734687 */
-+static void __lambda_193(void *data, object self_7311913, int argc, object *args) /* object self_7311913, object r_734242 */
++static void __lambda_193(void *data, object self_7311906, int argc, object *args) /* object self_7311906, object r_734235 */
   {
 - object r_734687 = args[0];
-+ object r_734242 = args[0];
++ object r_734235 = args[0];
    
 -closureN_type c_7316058;
 -object e_7316228 [4];
@@ -58821,19 +59038,19 @@ Make let-values be the same as let*-values, to work around
 -c_7316058.elements[1] = ((closureN)self_7313159)->elements[1];
 -c_7316058.elements[2] = ((closureN)self_7313159)->elements[2];
 -c_7316058.elements[3] = ((closureN)self_7313159)->elements[4];
-+closureN_type c_7314765;
-+object e_7314935 [4];
-+c_7314765.hdr.mark = gc_color_red;
-+ c_7314765.hdr.grayed = 0;
-+c_7314765.tag = closureN_tag;
-+ c_7314765.fn = (function_type)__lambda_194;
-+c_7314765.num_args = 1;
-+c_7314765.num_elements = 4;
-+c_7314765.elements = (object *)e_7314935;
-+c_7314765.elements[0] = ((closureN)self_7311913)->elements[0];
-+c_7314765.elements[1] = ((closureN)self_7311913)->elements[1];
-+c_7314765.elements[2] = ((closureN)self_7311913)->elements[2];
-+c_7314765.elements[3] = ((closureN)self_7311913)->elements[4];
++closureN_type c_7314758;
++object e_7314928 [4];
++c_7314758.hdr.mark = gc_color_red;
++ c_7314758.hdr.grayed = 0;
++c_7314758.tag = closureN_tag;
++ c_7314758.fn = (function_type)__lambda_194;
++c_7314758.num_args = 1;
++c_7314758.num_elements = 4;
++c_7314758.elements = (object *)e_7314928;
++c_7314758.elements[0] = ((closureN)self_7311906)->elements[0];
++c_7314758.elements[1] = ((closureN)self_7311906)->elements[1];
++c_7314758.elements[2] = ((closureN)self_7311906)->elements[2];
++c_7314758.elements[3] = ((closureN)self_7311906)->elements[4];
  
  
  
@@ -58841,19 +59058,19 @@ Make let-values be the same as let*-values, to work around
  
  
 -pair_type local_7316236; 
-+pair_type local_7314943; 
++pair_type local_7314936; 
  
 -pair_type local_7316239; 
 -return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7316058, Cyc_cdr(data, Cyc_cddr(data, ((closureN)self_7313159)->elements[0])), set_pair_as_expr(&local_7316236, set_pair_as_expr(&local_7316239, ((closureN)self_7313159)->elements[3], r_734687), NULL));; 
-+pair_type local_7314946; 
-+return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7314765, Cyc_cdr(data, Cyc_cddr(data, ((closureN)self_7311913)->elements[0])), set_pair_as_expr(&local_7314943, set_pair_as_expr(&local_7314946, ((closureN)self_7311913)->elements[3], r_734242), NULL));; 
++pair_type local_7314939; 
++return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7314758, Cyc_cdr(data, Cyc_cddr(data, ((closureN)self_7311906)->elements[0])), set_pair_as_expr(&local_7314936, set_pair_as_expr(&local_7314939, ((closureN)self_7311906)->elements[3], r_734235), NULL));; 
  }
  
 -static void __lambda_194(void *data, object self_7313160, int argc, object *args) /* object self_7313160, object r_734681 */
-+static void __lambda_194(void *data, object self_7311914, int argc, object *args) /* object self_7311914, object r_734236 */
++static void __lambda_194(void *data, object self_7311907, int argc, object *args) /* object self_7311907, object r_734229 */
   {
 - object r_734681 = args[0];
-+ object r_734236 = args[0];
++ object r_734229 = args[0];
    
 -closureN_type c_7316060;
 -object e_7316223 [3];
@@ -58867,31 +59084,31 @@ Make let-values be the same as let*-values, to work around
 -c_7316060.elements[0] = ((closureN)self_7313160)->elements[0];
 -c_7316060.elements[1] = ((closureN)self_7313160)->elements[1];
 -c_7316060.elements[2] = ((closureN)self_7313160)->elements[3];
-+closureN_type c_7314767;
-+object e_7314930 [3];
-+c_7314767.hdr.mark = gc_color_red;
-+ c_7314767.hdr.grayed = 0;
-+c_7314767.tag = closureN_tag;
-+ c_7314767.fn = (function_type)__lambda_195;
-+c_7314767.num_args = 1;
-+c_7314767.num_elements = 3;
-+c_7314767.elements = (object *)e_7314930;
-+c_7314767.elements[0] = ((closureN)self_7311914)->elements[0];
-+c_7314767.elements[1] = ((closureN)self_7311914)->elements[1];
-+c_7314767.elements[2] = ((closureN)self_7311914)->elements[3];
++closureN_type c_7314760;
++object e_7314923 [3];
++c_7314760.hdr.mark = gc_color_red;
++ c_7314760.hdr.grayed = 0;
++c_7314760.tag = closureN_tag;
++ c_7314760.fn = (function_type)__lambda_195;
++c_7314760.num_args = 1;
++c_7314760.num_elements = 3;
++c_7314760.elements = (object *)e_7314923;
++c_7314760.elements[0] = ((closureN)self_7311907)->elements[0];
++c_7314760.elements[1] = ((closureN)self_7311907)->elements[1];
++c_7314760.elements[2] = ((closureN)self_7311907)->elements[3];
  
  
 -pair_type local_7316226; 
 -return_direct_with_clo1(data,(closure)&c_7316060,__lambda_195,  set_pair_as_expr(&local_7316226, ((closureN)self_7313160)->elements[2], r_734681));; 
-+pair_type local_7314933; 
-+return_direct_with_clo1(data,(closure)&c_7314767,__lambda_195,  set_pair_as_expr(&local_7314933, ((closureN)self_7311914)->elements[2], r_734236));; 
++pair_type local_7314926; 
++return_direct_with_clo1(data,(closure)&c_7314760,__lambda_195,  set_pair_as_expr(&local_7314926, ((closureN)self_7311907)->elements[2], r_734229));; 
  }
  
 -static void __lambda_195(void *data, object self_7313161, int argc, object *args) /* object self_7313161, object body_73232_732948 */
-+static void __lambda_195(void *data, object self_7311915, int argc, object *args) /* object self_7311915, object body_73232_732608 */
++static void __lambda_195(void *data, object self_7311908, int argc, object *args) /* object self_7311908, object body_73232_732601 */
   {
 - object body_73232_732948 = args[0];
-+ object body_73232_732608 = args[0];
++ object body_73232_732601 = args[0];
    
 -closureN_type c_7316062;
 -object e_7316177 [3];
@@ -58905,8 +59122,20 @@ Make let-values be the same as let*-values, to work around
 -c_7316062.elements[0] = body_73232_732948;
 -c_7316062.elements[1] = ((closureN)self_7313161)->elements[0];
 -c_7316062.elements[2] = ((closureN)self_7313161)->elements[2];
--
--
++closureN_type c_7314762;
++object e_7314877 [3];
++c_7314762.hdr.mark = gc_color_red;
++ c_7314762.hdr.grayed = 0;
++c_7314762.tag = closureN_tag;
++ c_7314762.fn = (function_type)__lambda_196;
++c_7314762.num_args = 0;
++c_7314762.num_elements = 3;
++c_7314762.elements = (object *)e_7314877;
++c_7314762.elements[0] = body_73232_732601;
++c_7314762.elements[1] = ((closureN)self_7311908)->elements[0];
++c_7314762.elements[2] = ((closureN)self_7311908)->elements[2];
+ 
+ 
 -closureN_type c_7316178;
 -object e_7316222 [3];
 -c_7316178.hdr.mark = gc_color_red;
@@ -58919,26 +59148,29 @@ Make let-values be the same as let*-values, to work around
 -c_7316178.elements[0] = ((closureN)self_7313161)->elements[0];
 -c_7316178.elements[1] = ((closureN)self_7313161)->elements[1];
 -c_7316178.elements[2] = ((closureN)self_7313161)->elements[2];
-+closureN_type c_7314769;
-+object e_7314884 [3];
-+c_7314769.hdr.mark = gc_color_red;
-+ c_7314769.hdr.grayed = 0;
-+c_7314769.tag = closureN_tag;
-+ c_7314769.fn = (function_type)__lambda_196;
-+c_7314769.num_args = 0;
-+c_7314769.num_elements = 3;
-+c_7314769.elements = (object *)e_7314884;
-+c_7314769.elements[0] = body_73232_732608;
-+c_7314769.elements[1] = ((closureN)self_7311915)->elements[0];
-+c_7314769.elements[2] = ((closureN)self_7311915)->elements[2];
++closureN_type c_7314878;
++object e_7314922 [3];
++c_7314878.hdr.mark = gc_color_red;
++ c_7314878.hdr.grayed = 0;
++c_7314878.tag = closureN_tag;
++ c_7314878.fn = (function_type)__lambda_204;
++c_7314878.num_args = 1;
++c_7314878.num_elements = 3;
++c_7314878.elements = (object *)e_7314922;
++c_7314878.elements[0] = ((closureN)self_7311908)->elements[0];
++c_7314878.elements[1] = ((closureN)self_7311908)->elements[1];
++c_7314878.elements[2] = ((closureN)self_7311908)->elements[2];
  
 -return_direct_with_clo1(data,(closure)&c_7316062,__lambda_196,  &c_7316178);; 
--}
++return_direct_with_clo1(data,(closure)&c_7314762,__lambda_196,  &c_7314878);; 
+ }
  
 -static void __lambda_204(void *data, object self_7313162, int argc, object *args) /* object self_7313162, object wrap_73238_732950 */
-- {
++static void __lambda_204(void *data, object self_7311909, int argc, object *args) /* object self_7311909, object wrap_73238_732603 */
+  {
 - object wrap_73238_732950 = args[0];
--  
++ object wrap_73238_732603 = args[0];
+   
 -closureN_type c_7316181;
 -object e_7316221 [4];
 -c_7316181.hdr.mark = gc_color_red;
@@ -58952,28 +59184,29 @@ Make let-values be the same as let*-values, to work around
 -c_7316181.elements[1] = ((closureN)self_7313162)->elements[1];
 -c_7316181.elements[2] = ((closureN)self_7313162)->elements[2];
 -c_7316181.elements[3] = wrap_73238_732950;
-+closureN_type c_7314885;
-+object e_7314929 [3];
-+c_7314885.hdr.mark = gc_color_red;
-+ c_7314885.hdr.grayed = 0;
-+c_7314885.tag = closureN_tag;
-+ c_7314885.fn = (function_type)__lambda_204;
-+c_7314885.num_args = 1;
-+c_7314885.num_elements = 3;
-+c_7314885.elements = (object *)e_7314929;
-+c_7314885.elements[0] = ((closureN)self_7311915)->elements[0];
-+c_7314885.elements[1] = ((closureN)self_7311915)->elements[1];
-+c_7314885.elements[2] = ((closureN)self_7311915)->elements[2];
++closureN_type c_7314881;
++object e_7314921 [4];
++c_7314881.hdr.mark = gc_color_red;
++ c_7314881.hdr.grayed = 0;
++c_7314881.tag = closureN_tag;
++ c_7314881.fn = (function_type)__lambda_205;
++c_7314881.num_args = 1;
++c_7314881.num_elements = 4;
++c_7314881.elements = (object *)e_7314921;
++c_7314881.elements[0] = ((closureN)self_7311909)->elements[0];
++c_7314881.elements[1] = ((closureN)self_7311909)->elements[1];
++c_7314881.elements[2] = ((closureN)self_7311909)->elements[2];
++c_7314881.elements[3] = wrap_73238_732603;
  
 -return_closcall2(data,  ((closureN)self_7313162)->elements[2],  &c_7316181, quote_let);; 
-+return_direct_with_clo1(data,(closure)&c_7314769,__lambda_196,  &c_7314885);; 
++return_closcall2(data,  ((closureN)self_7311909)->elements[2],  &c_7314881, quote_let);; 
  }
  
 -static void __lambda_205(void *data, object self_7313163, int argc, object *args) /* object self_7313163, object r_734627 */
-+static void __lambda_204(void *data, object self_7311916, int argc, object *args) /* object self_7311916, object wrap_73238_732610 */
++static void __lambda_205(void *data, object self_7311910, int argc, object *args) /* object self_7311910, object r_734175 */
   {
 - object r_734627 = args[0];
-+ object wrap_73238_732610 = args[0];
++ object r_734175 = args[0];
    
 -closureN_type c_7316184;
 -object e_7316220 [4];
@@ -58988,50 +59221,29 @@ Make let-values be the same as let*-values, to work around
 -c_7316184.elements[1] = ((closureN)self_7313163)->elements[1];
 -c_7316184.elements[2] = r_734627;
 -c_7316184.elements[3] = ((closureN)self_7313163)->elements[3];
-+closureN_type c_7314888;
-+object e_7314928 [4];
-+c_7314888.hdr.mark = gc_color_red;
-+ c_7314888.hdr.grayed = 0;
-+c_7314888.tag = closureN_tag;
-+ c_7314888.fn = (function_type)__lambda_205;
-+c_7314888.num_args = 1;
-+c_7314888.num_elements = 4;
-+c_7314888.elements = (object *)e_7314928;
-+c_7314888.elements[0] = ((closureN)self_7311916)->elements[0];
-+c_7314888.elements[1] = ((closureN)self_7311916)->elements[1];
-+c_7314888.elements[2] = ((closureN)self_7311916)->elements[2];
-+c_7314888.elements[3] = wrap_73238_732610;
-+
-+return_closcall2(data,  ((closureN)self_7311916)->elements[2],  &c_7314888, quote_let);; 
-+}
-+
-+static void __lambda_205(void *data, object self_7311917, int argc, object *args) /* object self_7311917, object r_734182 */
-+ {
-+ object r_734182 = args[0];
-+  
-+closureN_type c_7314891;
-+object e_7314927 [4];
-+c_7314891.hdr.mark = gc_color_red;
-+ c_7314891.hdr.grayed = 0;
-+c_7314891.tag = closureN_tag;
-+ c_7314891.fn = (function_type)__lambda_206;
-+c_7314891.num_args = 1;
-+c_7314891.num_elements = 4;
-+c_7314891.elements = (object *)e_7314927;
-+c_7314891.elements[0] = ((closureN)self_7311917)->elements[0];
-+c_7314891.elements[1] = ((closureN)self_7311917)->elements[1];
-+c_7314891.elements[2] = r_734182;
-+c_7314891.elements[3] = ((closureN)self_7311917)->elements[3];
++closureN_type c_7314884;
++object e_7314920 [4];
++c_7314884.hdr.mark = gc_color_red;
++ c_7314884.hdr.grayed = 0;
++c_7314884.tag = closureN_tag;
++ c_7314884.fn = (function_type)__lambda_206;
++c_7314884.num_args = 1;
++c_7314884.num_elements = 4;
++c_7314884.elements = (object *)e_7314920;
++c_7314884.elements[0] = ((closureN)self_7311910)->elements[0];
++c_7314884.elements[1] = ((closureN)self_7311910)->elements[1];
++c_7314884.elements[2] = r_734175;
++c_7314884.elements[3] = ((closureN)self_7311910)->elements[3];
  
 -return_closcall2(data,  ((closureN)self_7313163)->elements[2],  &c_7316184, quote_lp);; 
-+return_closcall2(data,  ((closureN)self_7311917)->elements[2],  &c_7314891, quote_lp);; 
++return_closcall2(data,  ((closureN)self_7311910)->elements[2],  &c_7314884, quote_lp);; 
  }
  
 -static void __lambda_206(void *data, object self_7313164, int argc, object *args) /* object self_7313164, object r_734629 */
-+static void __lambda_206(void *data, object self_7311918, int argc, object *args) /* object self_7311918, object r_734184 */
++static void __lambda_206(void *data, object self_7311911, int argc, object *args) /* object self_7311911, object r_734177 */
   {
 - object r_734629 = args[0];
-+ object r_734184 = args[0];
++ object r_734177 = args[0];
    
 -closureN_type c_7316186;
 -object e_7316210 [5];
@@ -59047,49 +59259,49 @@ Make let-values be the same as let*-values, to work around
 -c_7316186.elements[2] = ((closureN)self_7313164)->elements[2];
 -c_7316186.elements[3] = r_734629;
 -c_7316186.elements[4] = ((closureN)self_7313164)->elements[3];
-+closureN_type c_7314893;
-+object e_7314917 [5];
-+c_7314893.hdr.mark = gc_color_red;
-+ c_7314893.hdr.grayed = 0;
-+c_7314893.tag = closureN_tag;
-+ c_7314893.fn = (function_type)__lambda_207;
-+c_7314893.num_args = 1;
-+c_7314893.num_elements = 5;
-+c_7314893.elements = (object *)e_7314917;
-+c_7314893.elements[0] = ((closureN)self_7311918)->elements[0];
-+c_7314893.elements[1] = ((closureN)self_7311918)->elements[1];
-+c_7314893.elements[2] = ((closureN)self_7311918)->elements[2];
-+c_7314893.elements[3] = r_734184;
-+c_7314893.elements[4] = ((closureN)self_7311918)->elements[3];
++closureN_type c_7314886;
++object e_7314910 [5];
++c_7314886.hdr.mark = gc_color_red;
++ c_7314886.hdr.grayed = 0;
++c_7314886.tag = closureN_tag;
++ c_7314886.fn = (function_type)__lambda_207;
++c_7314886.num_args = 1;
++c_7314886.num_elements = 5;
++c_7314886.elements = (object *)e_7314910;
++c_7314886.elements[0] = ((closureN)self_7311911)->elements[0];
++c_7314886.elements[1] = ((closureN)self_7311911)->elements[1];
++c_7314886.elements[2] = ((closureN)self_7311911)->elements[2];
++c_7314886.elements[3] = r_734177;
++c_7314886.elements[4] = ((closureN)self_7311911)->elements[3];
  
  
 -mmacro(c_7316211, (function_type)__lambda_209);c_7316211.num_args = 1;
 -return_direct_with_clo1(data,(closure)&c_7316186,__lambda_207,  &c_7316211);; 
-+mmacro(c_7314918, (function_type)__lambda_209);c_7314918.num_args = 1;
-+return_direct_with_clo1(data,(closure)&c_7314893,__lambda_207,  &c_7314918);; 
++mmacro(c_7314911, (function_type)__lambda_209);c_7314911.num_args = 1;
++return_direct_with_clo1(data,(closure)&c_7314886,__lambda_207,  &c_7314911);; 
  }
  
 -static void __lambda_209(void *data, object self_7313165, int argc, object *args) /* object self_7313165, object k_734636, object x_73243_732951 */
-+static void __lambda_209(void *data, object self_7311919, int argc, object *args) /* object self_7311919, object k_734191, object x_73243_732611 */
++static void __lambda_209(void *data, object self_7311912, int argc, object *args) /* object self_7311912, object k_734184, object x_73243_732604 */
   {
 - object k_734636 = args[0]; object x_73243_732951 = args[1];
-+ object k_734191 = args[0]; object x_73243_732611 = args[1];
++ object k_734184 = args[0]; object x_73243_732604 = args[1];
    
 -list_2_type local_7316215; 
-+list_2_type local_7314922; 
++list_2_type local_7314915; 
  
  
  
  
 -return_direct_with_clo1(data,  k_734636, (((closure)  k_734636)->fn),  Cyc_fast_list_2(&local_7316215, Cyc_car(data, x_73243_732951), Cyc_cadr(data, x_73243_732951)));; 
-+return_direct_with_clo1(data,  k_734191, (((closure)  k_734191)->fn),  Cyc_fast_list_2(&local_7314922, Cyc_car(data, x_73243_732611), Cyc_cadr(data, x_73243_732611)));; 
++return_direct_with_clo1(data,  k_734184, (((closure)  k_734184)->fn),  Cyc_fast_list_2(&local_7314915, Cyc_car(data, x_73243_732604), Cyc_cadr(data, x_73243_732604)));; 
  }
  
 -static void __lambda_207(void *data, object self_7313166, int argc, object *args) /* object self_7313166, object r_734634 */
-+static void __lambda_207(void *data, object self_7311920, int argc, object *args) /* object self_7311920, object r_734189 */
++static void __lambda_207(void *data, object self_7311913, int argc, object *args) /* object self_7311913, object r_734182 */
   {
 - object r_734634 = args[0];
-+ object r_734189 = args[0];
++ object r_734182 = args[0];
    
 -closureN_type c_7316188;
 -object e_7316206 [4];
@@ -59104,58 +59316,58 @@ Make let-values be the same as let*-values, to work around
 -c_7316188.elements[1] = ((closureN)self_7313166)->elements[2];
 -c_7316188.elements[2] = ((closureN)self_7313166)->elements[3];
 -c_7316188.elements[3] = ((closureN)self_7313166)->elements[4];
-+closureN_type c_7314895;
-+object e_7314913 [4];
-+c_7314895.hdr.mark = gc_color_red;
-+ c_7314895.hdr.grayed = 0;
-+c_7314895.tag = closureN_tag;
-+ c_7314895.fn = (function_type)__lambda_208;
-+c_7314895.num_args = 1;
-+c_7314895.num_elements = 4;
-+c_7314895.elements = (object *)e_7314913;
-+c_7314895.elements[0] = ((closureN)self_7311920)->elements[1];
-+c_7314895.elements[1] = ((closureN)self_7311920)->elements[2];
-+c_7314895.elements[2] = ((closureN)self_7311920)->elements[3];
-+c_7314895.elements[3] = ((closureN)self_7311920)->elements[4];
++closureN_type c_7314888;
++object e_7314906 [4];
++c_7314888.hdr.mark = gc_color_red;
++ c_7314888.hdr.grayed = 0;
++c_7314888.tag = closureN_tag;
++ c_7314888.fn = (function_type)__lambda_208;
++c_7314888.num_args = 1;
++c_7314888.num_elements = 4;
++c_7314888.elements = (object *)e_7314906;
++c_7314888.elements[0] = ((closureN)self_7311913)->elements[1];
++c_7314888.elements[1] = ((closureN)self_7311913)->elements[2];
++c_7314888.elements[2] = ((closureN)self_7311913)->elements[3];
++c_7314888.elements[3] = ((closureN)self_7311913)->elements[4];
  
  
  
 -return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7316188, r_734634, Cyc_cadr(data, ((closureN)self_7313166)->elements[0]));; 
-+return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7314895, r_734189, Cyc_cadr(data, ((closureN)self_7311920)->elements[0]));; 
++return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7314888, r_734182, Cyc_cadr(data, ((closureN)self_7311913)->elements[0]));; 
  }
  
 -static void __lambda_208(void *data, object self_7313167, int argc, object *args) /* object self_7313167, object r_734631 */
-+static void __lambda_208(void *data, object self_7311921, int argc, object *args) /* object self_7311921, object r_734186 */
++static void __lambda_208(void *data, object self_7311914, int argc, object *args) /* object self_7311914, object r_734179 */
   {
 - object r_734631 = args[0];
-+ object r_734186 = args[0];
++ object r_734179 = args[0];
    
 -pair_type local_7316193; 
-+pair_type local_7314900; 
++pair_type local_7314893; 
  
 -pair_type local_7316197; 
-+pair_type local_7314904; 
++pair_type local_7314897; 
  
 -pair_type local_7316201; 
-+pair_type local_7314908; 
++pair_type local_7314901; 
  
 -pair_type local_7316204; 
 -return_direct_with_clo1(data,  ((closureN)self_7313167)->elements[0], (((closure)  ((closureN)self_7313167)->elements[0])->fn),  set_pair_as_expr(&local_7316193, ((closureN)self_7313167)->elements[1], set_pair_as_expr(&local_7316197, ((closureN)self_7313167)->elements[2], set_pair_as_expr(&local_7316201, r_734631, set_pair_as_expr(&local_7316204, ((closureN)self_7313167)->elements[3], NULL)))));; 
-+pair_type local_7314911; 
-+return_direct_with_clo1(data,  ((closureN)self_7311921)->elements[0], (((closure)  ((closureN)self_7311921)->elements[0])->fn),  set_pair_as_expr(&local_7314900, ((closureN)self_7311921)->elements[1], set_pair_as_expr(&local_7314904, ((closureN)self_7311921)->elements[2], set_pair_as_expr(&local_7314908, r_734186, set_pair_as_expr(&local_7314911, ((closureN)self_7311921)->elements[3], NULL)))));; 
++pair_type local_7314904; 
++return_direct_with_clo1(data,  ((closureN)self_7311914)->elements[0], (((closure)  ((closureN)self_7311914)->elements[0])->fn),  set_pair_as_expr(&local_7314893, ((closureN)self_7311914)->elements[1], set_pair_as_expr(&local_7314897, ((closureN)self_7311914)->elements[2], set_pair_as_expr(&local_7314901, r_734179, set_pair_as_expr(&local_7314904, ((closureN)self_7311914)->elements[3], NULL)))));; 
  }
  
 -static void __lambda_196(void *data, object self_7313168, int argc, object *args) /* object self_7313168, object k_734641 */
-+static void __lambda_196(void *data, object self_7311922, int argc, object *args) /* object self_7311922, object k_734196 */
++static void __lambda_196(void *data, object self_7311915, int argc, object *args) /* object self_7311915, object k_734189 */
   {
 - object k_734641 = args[0];
-+ object k_734196 = args[0];
++ object k_734189 = args[0];
      
    
    
    
 -if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, Cyc_cddr(data, ((closureN)self_7313168)->elements[1]))))) ){ 
-+if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, Cyc_cddr(data, ((closureN)self_7311922)->elements[1]))))) ){ 
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, Cyc_car(data, Cyc_cddr(data, ((closureN)self_7311915)->elements[1]))))) ){ 
    
 -closureN_type c_7316074;
 -object e_7316135 [4];
@@ -59170,22 +59382,22 @@ Make let-values be the same as let*-values, to work around
 -c_7316074.elements[1] = ((closureN)self_7313168)->elements[1];
 -c_7316074.elements[2] = k_734641;
 -c_7316074.elements[3] = ((closureN)self_7313168)->elements[2];
-+closureN_type c_7314781;
-+object e_7314842 [4];
-+c_7314781.hdr.mark = gc_color_red;
-+ c_7314781.hdr.grayed = 0;
-+c_7314781.tag = closureN_tag;
-+ c_7314781.fn = (function_type)__lambda_197;
-+c_7314781.num_args = 1;
-+c_7314781.num_elements = 4;
-+c_7314781.elements = (object *)e_7314842;
-+c_7314781.elements[0] = ((closureN)self_7311922)->elements[0];
-+c_7314781.elements[1] = ((closureN)self_7311922)->elements[1];
-+c_7314781.elements[2] = k_734196;
-+c_7314781.elements[3] = ((closureN)self_7311922)->elements[2];
++closureN_type c_7314774;
++object e_7314835 [4];
++c_7314774.hdr.mark = gc_color_red;
++ c_7314774.hdr.grayed = 0;
++c_7314774.tag = closureN_tag;
++ c_7314774.fn = (function_type)__lambda_197;
++c_7314774.num_args = 1;
++c_7314774.num_elements = 4;
++c_7314774.elements = (object *)e_7314835;
++c_7314774.elements[0] = ((closureN)self_7311915)->elements[0];
++c_7314774.elements[1] = ((closureN)self_7311915)->elements[1];
++c_7314774.elements[2] = k_734189;
++c_7314774.elements[3] = ((closureN)self_7311915)->elements[2];
  
 -return_closcall2(data,  ((closureN)self_7313168)->elements[2],  &c_7316074, quote_let);
-+return_closcall2(data,  ((closureN)self_7311922)->elements[2],  &c_7314781, quote_let);
++return_closcall2(data,  ((closureN)self_7311915)->elements[2],  &c_7314774, quote_let);
  } else { 
    
 -closureN_type c_7316138;
@@ -59201,30 +59413,30 @@ Make let-values be the same as let*-values, to work around
 -c_7316138.elements[1] = ((closureN)self_7313168)->elements[1];
 -c_7316138.elements[2] = k_734641;
 -c_7316138.elements[3] = ((closureN)self_7313168)->elements[2];
-+closureN_type c_7314845;
-+object e_7314883 [4];
-+c_7314845.hdr.mark = gc_color_red;
-+ c_7314845.hdr.grayed = 0;
-+c_7314845.tag = closureN_tag;
-+ c_7314845.fn = (function_type)__lambda_202;
-+c_7314845.num_args = 1;
-+c_7314845.num_elements = 4;
-+c_7314845.elements = (object *)e_7314883;
-+c_7314845.elements[0] = ((closureN)self_7311922)->elements[0];
-+c_7314845.elements[1] = ((closureN)self_7311922)->elements[1];
-+c_7314845.elements[2] = k_734196;
-+c_7314845.elements[3] = ((closureN)self_7311922)->elements[2];
++closureN_type c_7314838;
++object e_7314876 [4];
++c_7314838.hdr.mark = gc_color_red;
++ c_7314838.hdr.grayed = 0;
++c_7314838.tag = closureN_tag;
++ c_7314838.fn = (function_type)__lambda_202;
++c_7314838.num_args = 1;
++c_7314838.num_elements = 4;
++c_7314838.elements = (object *)e_7314876;
++c_7314838.elements[0] = ((closureN)self_7311915)->elements[0];
++c_7314838.elements[1] = ((closureN)self_7311915)->elements[1];
++c_7314838.elements[2] = k_734189;
++c_7314838.elements[3] = ((closureN)self_7311915)->elements[2];
  
 -return_closcall2(data,  ((closureN)self_7313168)->elements[2],  &c_7316138, quote__if);}
-+return_closcall2(data,  ((closureN)self_7311922)->elements[2],  &c_7314845, quote__if);}
++return_closcall2(data,  ((closureN)self_7311915)->elements[2],  &c_7314838, quote__if);}
  ;; 
  }
  
 -static void __lambda_202(void *data, object self_7313174, int argc, object *args) /* object self_7313174, object r_734667 */
-+static void __lambda_202(void *data, object self_7311928, int argc, object *args) /* object self_7311928, object r_734222 */
++static void __lambda_202(void *data, object self_7311921, int argc, object *args) /* object self_7311921, object r_734215 */
   {
 - object r_734667 = args[0];
-+ object r_734222 = args[0];
++ object r_734215 = args[0];
    
 -closureN_type c_7316141;
 -object e_7316175 [4];
@@ -59239,36 +59451,36 @@ Make let-values be the same as let*-values, to work around
 -c_7316141.elements[1] = ((closureN)self_7313174)->elements[1];
 -c_7316141.elements[2] = ((closureN)self_7313174)->elements[2];
 -c_7316141.elements[3] = r_734667;
-+closureN_type c_7314848;
-+object e_7314882 [4];
-+c_7314848.hdr.mark = gc_color_red;
-+ c_7314848.hdr.grayed = 0;
-+c_7314848.tag = closureN_tag;
-+ c_7314848.fn = (function_type)__lambda_203;
-+c_7314848.num_args = 1;
-+c_7314848.num_elements = 4;
-+c_7314848.elements = (object *)e_7314882;
-+c_7314848.elements[0] = ((closureN)self_7311928)->elements[0];
-+c_7314848.elements[1] = ((closureN)self_7311928)->elements[1];
-+c_7314848.elements[2] = ((closureN)self_7311928)->elements[2];
-+c_7314848.elements[3] = r_734222;
++closureN_type c_7314841;
++object e_7314875 [4];
++c_7314841.hdr.mark = gc_color_red;
++ c_7314841.hdr.grayed = 0;
++c_7314841.tag = closureN_tag;
++ c_7314841.fn = (function_type)__lambda_203;
++c_7314841.num_args = 1;
++c_7314841.num_elements = 4;
++c_7314841.elements = (object *)e_7314875;
++c_7314841.elements[0] = ((closureN)self_7311921)->elements[0];
++c_7314841.elements[1] = ((closureN)self_7311921)->elements[1];
++c_7314841.elements[2] = ((closureN)self_7311921)->elements[2];
++c_7314841.elements[3] = r_734215;
  
 -return_closcall2(data,  ((closureN)self_7313174)->elements[3],  &c_7316141, quote_begin);; 
-+return_closcall2(data,  ((closureN)self_7311928)->elements[3],  &c_7314848, quote_begin);; 
++return_closcall2(data,  ((closureN)self_7311921)->elements[3],  &c_7314841, quote_begin);; 
  }
  
 -static void __lambda_203(void *data, object self_7313175, int argc, object *args) /* object self_7313175, object r_734674 */
-+static void __lambda_203(void *data, object self_7311929, int argc, object *args) /* object self_7311929, object r_734229 */
++static void __lambda_203(void *data, object self_7311922, int argc, object *args) /* object self_7311922, object r_734222 */
   {
 - object r_734674 = args[0];
-+ object r_734229 = args[0];
++ object r_734222 = args[0];
    
 -pair_type local_7316146; 
 -
 -pair_type local_7316150; 
-+pair_type local_7314853; 
++pair_type local_7314846; 
  
-+pair_type local_7314857; 
++pair_type local_7314850; 
  
  
  
@@ -59278,9 +59490,9 @@ Make let-values be the same as let*-values, to work around
 -pair_type local_7316160; 
  
 -pair_type local_7316163; 
-+pair_type local_7314867; 
++pair_type local_7314860; 
  
-+pair_type local_7314870; 
++pair_type local_7314863; 
  
  
  
@@ -59309,18 +59521,14 @@ Make let-values be the same as let*-values, to work around
 -c_7316077.elements[2] = ((closureN)self_7313169)->elements[2];
 -c_7316077.elements[3] = r_734643;
 -c_7316077.elements[4] = ((closureN)self_7313169)->elements[3];
- 
+-
 -return_closcall2(data,  ((closureN)self_7313169)->elements[3],  &c_7316077, quote_tmp);; 
-+pair_type local_7314880; 
-+return_direct_with_clo1(data,  ((closureN)self_7311929)->elements[2], (((closure)  ((closureN)self_7311929)->elements[2])->fn),  set_pair_as_expr(&local_7314853, ((closureN)self_7311929)->elements[3], set_pair_as_expr(&local_7314857, Cyc_car(data, Cyc_car(data, Cyc_cddr(data, ((closureN)self_7311929)->elements[1]))), set_pair_as_expr(&local_7314867, set_pair_as_expr(&local_7314870, r_734229, Cyc_cdr(data, Cyc_car(data, Cyc_cddr(data, ((closureN)self_7311929)->elements[1])))), set_pair_as_expr(&local_7314880, ((closureN)self_7311929)->elements[0], NULL)))));; 
- }
- 
+-}
+-
 -static void __lambda_198(void *data, object self_7313170, int argc, object *args) /* object self_7313170, object r_734661 */
-+static void __lambda_197(void *data, object self_7311923, int argc, object *args) /* object self_7311923, object r_734198 */
-  {
+- {
 - object r_734661 = args[0];
-+ object r_734198 = args[0];
-   
+-  
 -closureN_type c_7316080;
 -object e_7316133 [6];
 -c_7316080.hdr.mark = gc_color_red;
@@ -59336,30 +59544,17 @@ Make let-values be the same as let*-values, to work around
 -c_7316080.elements[3] = ((closureN)self_7313170)->elements[3];
 -c_7316080.elements[4] = r_734661;
 -c_7316080.elements[5] = ((closureN)self_7313170)->elements[4];
-+closureN_type c_7314784;
-+object e_7314841 [5];
-+c_7314784.hdr.mark = gc_color_red;
-+ c_7314784.hdr.grayed = 0;
-+c_7314784.tag = closureN_tag;
-+ c_7314784.fn = (function_type)__lambda_198;
-+c_7314784.num_args = 1;
-+c_7314784.num_elements = 5;
-+c_7314784.elements = (object *)e_7314841;
-+c_7314784.elements[0] = ((closureN)self_7311923)->elements[0];
-+c_7314784.elements[1] = ((closureN)self_7311923)->elements[1];
-+c_7314784.elements[2] = ((closureN)self_7311923)->elements[2];
-+c_7314784.elements[3] = r_734198;
-+c_7314784.elements[4] = ((closureN)self_7311923)->elements[3];
  
 -return_closcall2(data,  ((closureN)self_7313170)->elements[4],  &c_7316080, quote__if);; 
-+return_closcall2(data,  ((closureN)self_7311923)->elements[3],  &c_7314784, quote_tmp);; 
++pair_type local_7314873; 
++return_direct_with_clo1(data,  ((closureN)self_7311922)->elements[2], (((closure)  ((closureN)self_7311922)->elements[2])->fn),  set_pair_as_expr(&local_7314846, ((closureN)self_7311922)->elements[3], set_pair_as_expr(&local_7314850, Cyc_car(data, Cyc_car(data, Cyc_cddr(data, ((closureN)self_7311922)->elements[1]))), set_pair_as_expr(&local_7314860, set_pair_as_expr(&local_7314863, r_734222, Cyc_cdr(data, Cyc_car(data, Cyc_cddr(data, ((closureN)self_7311922)->elements[1])))), set_pair_as_expr(&local_7314873, ((closureN)self_7311922)->elements[0], NULL)))));; 
  }
  
 -static void __lambda_199(void *data, object self_7313171, int argc, object *args) /* object self_7313171, object r_734649 */
-+static void __lambda_198(void *data, object self_7311924, int argc, object *args) /* object self_7311924, object r_734216 */
++static void __lambda_197(void *data, object self_7311916, int argc, object *args) /* object self_7311916, object r_734191 */
   {
 - object r_734649 = args[0];
-+ object r_734216 = args[0];
++ object r_734191 = args[0];
    
 -closureN_type c_7316083;
 -object e_7316132 [7];
@@ -59377,55 +59572,30 @@ Make let-values be the same as let*-values, to work around
 -c_7316083.elements[4] = r_734649;
 -c_7316083.elements[5] = ((closureN)self_7313171)->elements[4];
 -c_7316083.elements[6] = ((closureN)self_7313171)->elements[5];
-+closureN_type c_7314787;
-+object e_7314840 [6];
-+c_7314787.hdr.mark = gc_color_red;
-+ c_7314787.hdr.grayed = 0;
-+c_7314787.tag = closureN_tag;
-+ c_7314787.fn = (function_type)__lambda_199;
-+c_7314787.num_args = 1;
-+c_7314787.num_elements = 6;
-+c_7314787.elements = (object *)e_7314840;
-+c_7314787.elements[0] = ((closureN)self_7311924)->elements[0];
-+c_7314787.elements[1] = ((closureN)self_7311924)->elements[1];
-+c_7314787.elements[2] = ((closureN)self_7311924)->elements[2];
-+c_7314787.elements[3] = ((closureN)self_7311924)->elements[3];
-+c_7314787.elements[4] = r_734216;
-+c_7314787.elements[5] = ((closureN)self_7311924)->elements[4];
-+
-+return_closcall2(data,  ((closureN)self_7311924)->elements[4],  &c_7314787, quote__if);; 
-+}
-+
-+static void __lambda_199(void *data, object self_7311925, int argc, object *args) /* object self_7311925, object r_734204 */
-+ {
-+ object r_734204 = args[0];
-+  
-+closureN_type c_7314790;
-+object e_7314839 [7];
-+c_7314790.hdr.mark = gc_color_red;
-+ c_7314790.hdr.grayed = 0;
-+c_7314790.tag = closureN_tag;
-+ c_7314790.fn = (function_type)__lambda_200;
-+c_7314790.num_args = 1;
-+c_7314790.num_elements = 7;
-+c_7314790.elements = (object *)e_7314839;
-+c_7314790.elements[0] = ((closureN)self_7311925)->elements[0];
-+c_7314790.elements[1] = ((closureN)self_7311925)->elements[1];
-+c_7314790.elements[2] = ((closureN)self_7311925)->elements[2];
-+c_7314790.elements[3] = ((closureN)self_7311925)->elements[3];
-+c_7314790.elements[4] = r_734204;
-+c_7314790.elements[5] = ((closureN)self_7311925)->elements[4];
-+c_7314790.elements[6] = ((closureN)self_7311925)->elements[5];
++closureN_type c_7314777;
++object e_7314834 [5];
++c_7314777.hdr.mark = gc_color_red;
++ c_7314777.hdr.grayed = 0;
++c_7314777.tag = closureN_tag;
++ c_7314777.fn = (function_type)__lambda_198;
++c_7314777.num_args = 1;
++c_7314777.num_elements = 5;
++c_7314777.elements = (object *)e_7314834;
++c_7314777.elements[0] = ((closureN)self_7311916)->elements[0];
++c_7314777.elements[1] = ((closureN)self_7311916)->elements[1];
++c_7314777.elements[2] = ((closureN)self_7311916)->elements[2];
++c_7314777.elements[3] = r_734191;
++c_7314777.elements[4] = ((closureN)self_7311916)->elements[3];
  
 -return_closcall2(data,  ((closureN)self_7313171)->elements[5],  &c_7316083, quote_tmp);; 
-+return_closcall2(data,  ((closureN)self_7311925)->elements[5],  &c_7314790, quote_tmp);; 
++return_closcall2(data,  ((closureN)self_7311916)->elements[3],  &c_7314777, quote_tmp);; 
  }
  
 -static void __lambda_200(void *data, object self_7313172, int argc, object *args) /* object self_7313172, object r_734651 */
-+static void __lambda_200(void *data, object self_7311926, int argc, object *args) /* object self_7311926, object r_734206 */
++static void __lambda_198(void *data, object self_7311917, int argc, object *args) /* object self_7311917, object r_734209 */
   {
 - object r_734651 = args[0];
-+ object r_734206 = args[0];
++ object r_734209 = args[0];
    
 -closureN_type c_7316086;
 -object e_7316131 [7];
@@ -59443,79 +59613,125 @@ Make let-values be the same as let*-values, to work around
 -c_7316086.elements[4] = ((closureN)self_7313172)->elements[4];
 -c_7316086.elements[5] = r_734651;
 -c_7316086.elements[6] = ((closureN)self_7313172)->elements[5];
-+closureN_type c_7314793;
-+object e_7314838 [7];
-+c_7314793.hdr.mark = gc_color_red;
-+ c_7314793.hdr.grayed = 0;
-+c_7314793.tag = closureN_tag;
-+ c_7314793.fn = (function_type)__lambda_201;
-+c_7314793.num_args = 1;
-+c_7314793.num_elements = 7;
-+c_7314793.elements = (object *)e_7314838;
-+c_7314793.elements[0] = ((closureN)self_7311926)->elements[0];
-+c_7314793.elements[1] = ((closureN)self_7311926)->elements[1];
-+c_7314793.elements[2] = ((closureN)self_7311926)->elements[2];
-+c_7314793.elements[3] = ((closureN)self_7311926)->elements[3];
-+c_7314793.elements[4] = ((closureN)self_7311926)->elements[4];
-+c_7314793.elements[5] = r_734206;
-+c_7314793.elements[6] = ((closureN)self_7311926)->elements[5];
++closureN_type c_7314780;
++object e_7314833 [6];
++c_7314780.hdr.mark = gc_color_red;
++ c_7314780.hdr.grayed = 0;
++c_7314780.tag = closureN_tag;
++ c_7314780.fn = (function_type)__lambda_199;
++c_7314780.num_args = 1;
++c_7314780.num_elements = 6;
++c_7314780.elements = (object *)e_7314833;
++c_7314780.elements[0] = ((closureN)self_7311917)->elements[0];
++c_7314780.elements[1] = ((closureN)self_7311917)->elements[1];
++c_7314780.elements[2] = ((closureN)self_7311917)->elements[2];
++c_7314780.elements[3] = ((closureN)self_7311917)->elements[3];
++c_7314780.elements[4] = r_734209;
++c_7314780.elements[5] = ((closureN)self_7311917)->elements[4];
++
++return_closcall2(data,  ((closureN)self_7311917)->elements[4],  &c_7314780, quote__if);; 
++}
++
++static void __lambda_199(void *data, object self_7311918, int argc, object *args) /* object self_7311918, object r_734197 */
++ {
++ object r_734197 = args[0];
++  
++closureN_type c_7314783;
++object e_7314832 [7];
++c_7314783.hdr.mark = gc_color_red;
++ c_7314783.hdr.grayed = 0;
++c_7314783.tag = closureN_tag;
++ c_7314783.fn = (function_type)__lambda_200;
++c_7314783.num_args = 1;
++c_7314783.num_elements = 7;
++c_7314783.elements = (object *)e_7314832;
++c_7314783.elements[0] = ((closureN)self_7311918)->elements[0];
++c_7314783.elements[1] = ((closureN)self_7311918)->elements[1];
++c_7314783.elements[2] = ((closureN)self_7311918)->elements[2];
++c_7314783.elements[3] = ((closureN)self_7311918)->elements[3];
++c_7314783.elements[4] = r_734197;
++c_7314783.elements[5] = ((closureN)self_7311918)->elements[4];
++c_7314783.elements[6] = ((closureN)self_7311918)->elements[5];
++
++return_closcall2(data,  ((closureN)self_7311918)->elements[5],  &c_7314783, quote_tmp);; 
++}
++
++static void __lambda_200(void *data, object self_7311919, int argc, object *args) /* object self_7311919, object r_734199 */
++ {
++ object r_734199 = args[0];
++  
++closureN_type c_7314786;
++object e_7314831 [7];
++c_7314786.hdr.mark = gc_color_red;
++ c_7314786.hdr.grayed = 0;
++c_7314786.tag = closureN_tag;
++ c_7314786.fn = (function_type)__lambda_201;
++c_7314786.num_args = 1;
++c_7314786.num_elements = 7;
++c_7314786.elements = (object *)e_7314831;
++c_7314786.elements[0] = ((closureN)self_7311919)->elements[0];
++c_7314786.elements[1] = ((closureN)self_7311919)->elements[1];
++c_7314786.elements[2] = ((closureN)self_7311919)->elements[2];
++c_7314786.elements[3] = ((closureN)self_7311919)->elements[3];
++c_7314786.elements[4] = ((closureN)self_7311919)->elements[4];
++c_7314786.elements[5] = r_734199;
++c_7314786.elements[6] = ((closureN)self_7311919)->elements[5];
  
 -return_closcall2(data,  ((closureN)self_7313172)->elements[6],  &c_7316086, quote_tmp);; 
-+return_closcall2(data,  ((closureN)self_7311926)->elements[6],  &c_7314793, quote_tmp);; 
++return_closcall2(data,  ((closureN)self_7311919)->elements[6],  &c_7314786, quote_tmp);; 
  }
  
 -static void __lambda_201(void *data, object self_7313173, int argc, object *args) /* object self_7313173, object r_734653 */
-+static void __lambda_201(void *data, object self_7311927, int argc, object *args) /* object self_7311927, object r_734208 */
++static void __lambda_201(void *data, object self_7311920, int argc, object *args) /* object self_7311920, object r_734201 */
   {
 - object r_734653 = args[0];
-+ object r_734208 = args[0];
++ object r_734201 = args[0];
    
 -pair_type local_7316091; 
-+pair_type local_7314798; 
++pair_type local_7314791; 
  
 -pair_type local_7316095; 
-+pair_type local_7314802; 
++pair_type local_7314795; 
  
 -pair_type local_7316098; 
-+pair_type local_7314805; 
++pair_type local_7314798; 
  
 -pair_type local_7316101; 
-+pair_type local_7314808; 
++pair_type local_7314801; 
  
 -pair_type local_7316105; 
-+pair_type local_7314812; 
++pair_type local_7314805; 
  
  
  
-@@ -35790,4796 +33993,4795 @@ pair_type local_7316105; 
+@@ -35790,4715 +33993,4715 @@ pair_type local_7316105; 
  
  
  
 -pair_type local_7316115; 
-+pair_type local_7314822; 
++pair_type local_7314815; 
  
 -pair_type local_7316118; 
-+pair_type local_7314825; 
++pair_type local_7314818; 
  
 -pair_type local_7316122; 
-+pair_type local_7314829; 
++pair_type local_7314822; 
  
 -pair_type local_7316126; 
-+pair_type local_7314833; 
++pair_type local_7314826; 
  
 -pair_type local_7316129; 
 -return_direct_with_clo1(data,  ((closureN)self_7313173)->elements[2], (((closure)  ((closureN)self_7313173)->elements[2])->fn),  set_pair_as_expr(&local_7316091, ((closureN)self_7313173)->elements[3], set_pair_as_expr(&local_7316095, set_pair_as_expr(&local_7316098, set_pair_as_expr(&local_7316101, ((closureN)self_7313173)->elements[6], set_pair_as_expr(&local_7316105, Cyc_car(data, Cyc_car(data, Cyc_cddr(data, ((closureN)self_7313173)->elements[1]))), NULL)), NULL), set_pair_as_expr(&local_7316115, set_pair_as_expr(&local_7316118, ((closureN)self_7313173)->elements[4], set_pair_as_expr(&local_7316122, ((closureN)self_7313173)->elements[5], set_pair_as_expr(&local_7316126, r_734653, set_pair_as_expr(&local_7316129, ((closureN)self_7313173)->elements[0], NULL)))), NULL))));; 
-+pair_type local_7314836; 
-+return_direct_with_clo1(data,  ((closureN)self_7311927)->elements[2], (((closure)  ((closureN)self_7311927)->elements[2])->fn),  set_pair_as_expr(&local_7314798, ((closureN)self_7311927)->elements[3], set_pair_as_expr(&local_7314802, set_pair_as_expr(&local_7314805, set_pair_as_expr(&local_7314808, ((closureN)self_7311927)->elements[6], set_pair_as_expr(&local_7314812, Cyc_car(data, Cyc_car(data, Cyc_cddr(data, ((closureN)self_7311927)->elements[1]))), NULL)), NULL), set_pair_as_expr(&local_7314822, set_pair_as_expr(&local_7314825, ((closureN)self_7311927)->elements[4], set_pair_as_expr(&local_7314829, ((closureN)self_7311927)->elements[5], set_pair_as_expr(&local_7314833, r_734208, set_pair_as_expr(&local_7314836, ((closureN)self_7311927)->elements[0], NULL)))), NULL))));; 
++pair_type local_7314829; 
++return_direct_with_clo1(data,  ((closureN)self_7311920)->elements[2], (((closure)  ((closureN)self_7311920)->elements[2])->fn),  set_pair_as_expr(&local_7314791, ((closureN)self_7311920)->elements[3], set_pair_as_expr(&local_7314795, set_pair_as_expr(&local_7314798, set_pair_as_expr(&local_7314801, ((closureN)self_7311920)->elements[6], set_pair_as_expr(&local_7314805, Cyc_car(data, Cyc_car(data, Cyc_cddr(data, ((closureN)self_7311920)->elements[1]))), NULL)), NULL), set_pair_as_expr(&local_7314815, set_pair_as_expr(&local_7314818, ((closureN)self_7311920)->elements[4], set_pair_as_expr(&local_7314822, ((closureN)self_7311920)->elements[5], set_pair_as_expr(&local_7314826, r_734201, set_pair_as_expr(&local_7314829, ((closureN)self_7311920)->elements[0], NULL)))), NULL))));; 
  }
  
 -static void __lambda_182(void *data, object _, int argc, object *args) /* closure _,object k_734596, object exp_73221_732942, object rename_73222_732943, object compare_73223_732944 */
-+static void __lambda_182(void *data, object _, int argc, object *args) /* closure _,object k_734151, object exp_73221_732602, object rename_73222_732603, object compare_73223_732604 */
++static void __lambda_182(void *data, object _, int argc, object *args) /* closure _,object k_734144, object exp_73221_732595, object rename_73222_732596, object compare_73223_732597 */
   {
 -object k_734596 = args[0]; object exp_73221_732942 = args[1];
--  Cyc_st_add(data, "scheme/base.sld:unless");
-+object k_734151 = args[0]; object exp_73221_732602 = args[1];
-+  Cyc_st_add(data, "base.sld:unless");
++object k_734144 = args[0]; object exp_73221_732595 = args[1];
+   Cyc_st_add(data, "scheme/base.sld:unless");
  
 -closureN_type c_7315978;
 -object e_7315993 [1];
@@ -59527,16 +59743,16 @@ Make let-values be the same as let*-values, to work around
 -c_7315978.num_elements = 1;
 -c_7315978.elements = (object *)e_7315993;
 -c_7315978.elements[0] = exp_73221_732942;
-+closureN_type c_7314685;
-+object e_7314700 [1];
-+c_7314685.hdr.mark = gc_color_red;
-+ c_7314685.hdr.grayed = 0;
-+c_7314685.tag = closureN_tag;
-+ c_7314685.fn = (function_type)__lambda_183;
-+c_7314685.num_args = 0;
-+c_7314685.num_elements = 1;
-+c_7314685.elements = (object *)e_7314700;
-+c_7314685.elements[0] = exp_73221_732602;
++closureN_type c_7314678;
++object e_7314693 [1];
++c_7314678.hdr.mark = gc_color_red;
++ c_7314678.hdr.grayed = 0;
++c_7314678.tag = closureN_tag;
++ c_7314678.fn = (function_type)__lambda_183;
++c_7314678.num_args = 0;
++c_7314678.num_elements = 1;
++c_7314678.elements = (object *)e_7314693;
++c_7314678.elements[0] = exp_73221_732595;
  
  
 -closureN_type c_7315994;
@@ -59550,24 +59766,24 @@ Make let-values be the same as let*-values, to work around
 -c_7315994.elements = (object *)e_7316046;
 -c_7315994.elements[0] = exp_73221_732942;
 -c_7315994.elements[1] = k_734596;
-+closureN_type c_7314701;
-+object e_7314753 [2];
-+c_7314701.hdr.mark = gc_color_red;
-+ c_7314701.hdr.grayed = 0;
-+c_7314701.tag = closureN_tag;
-+ c_7314701.fn = (function_type)__lambda_185;
-+c_7314701.num_args = 1;
-+c_7314701.num_elements = 2;
-+c_7314701.elements = (object *)e_7314753;
-+c_7314701.elements[0] = exp_73221_732602;
-+c_7314701.elements[1] = k_734151;
++closureN_type c_7314694;
++object e_7314746 [2];
++c_7314694.hdr.mark = gc_color_red;
++ c_7314694.hdr.grayed = 0;
++c_7314694.tag = closureN_tag;
++ c_7314694.fn = (function_type)__lambda_185;
++c_7314694.num_args = 1;
++c_7314694.num_elements = 2;
++c_7314694.elements = (object *)e_7314746;
++c_7314694.elements[0] = exp_73221_732595;
++c_7314694.elements[1] = k_734144;
  
 -return_direct_with_clo1(data,(closure)&c_7315978,__lambda_183,  &c_7315994);; 
-+return_direct_with_clo1(data,(closure)&c_7314685,__lambda_183,  &c_7314701);; 
++return_direct_with_clo1(data,(closure)&c_7314678,__lambda_183,  &c_7314694);; 
  }
  
 -static void __lambda_185(void *data, object self_7313147, int argc, object *args) /* object self_7313147, object r_734597 */
-+static void __lambda_185(void *data, object self_7311901, int argc, object *args) /* object self_7311901, object r_734152 */
++static void __lambda_185(void *data, object self_7311894, int argc, object *args) /* object self_7311894, object r_734145 */
   {
  
    
@@ -59581,16 +59797,16 @@ Make let-values be the same as let*-values, to work around
 -c_7315996.num_elements = 1;
 -c_7315996.elements = (object *)e_7316011;
 -c_7315996.elements[0] = ((closureN)self_7313147)->elements[0];
-+closureN_type c_7314703;
-+object e_7314718 [1];
-+c_7314703.hdr.mark = gc_color_red;
-+ c_7314703.hdr.grayed = 0;
-+c_7314703.tag = closureN_tag;
-+ c_7314703.fn = (function_type)__lambda_186;
-+c_7314703.num_args = 0;
-+c_7314703.num_elements = 1;
-+c_7314703.elements = (object *)e_7314718;
-+c_7314703.elements[0] = ((closureN)self_7311901)->elements[0];
++closureN_type c_7314696;
++object e_7314711 [1];
++c_7314696.hdr.mark = gc_color_red;
++ c_7314696.hdr.grayed = 0;
++c_7314696.tag = closureN_tag;
++ c_7314696.fn = (function_type)__lambda_186;
++c_7314696.num_args = 0;
++c_7314696.num_elements = 1;
++c_7314696.elements = (object *)e_7314711;
++c_7314696.elements[0] = ((closureN)self_7311894)->elements[0];
  
  
 -closureN_type c_7316012;
@@ -59604,63 +59820,63 @@ Make let-values be the same as let*-values, to work around
 -c_7316012.elements = (object *)e_7316045;
 -c_7316012.elements[0] = ((closureN)self_7313147)->elements[0];
 -c_7316012.elements[1] = ((closureN)self_7313147)->elements[1];
-+closureN_type c_7314719;
-+object e_7314752 [2];
-+c_7314719.hdr.mark = gc_color_red;
-+ c_7314719.hdr.grayed = 0;
-+c_7314719.tag = closureN_tag;
-+ c_7314719.fn = (function_type)__lambda_188;
-+c_7314719.num_args = 1;
-+c_7314719.num_elements = 2;
-+c_7314719.elements = (object *)e_7314752;
-+c_7314719.elements[0] = ((closureN)self_7311901)->elements[0];
-+c_7314719.elements[1] = ((closureN)self_7311901)->elements[1];
++closureN_type c_7314712;
++object e_7314745 [2];
++c_7314712.hdr.mark = gc_color_red;
++ c_7314712.hdr.grayed = 0;
++c_7314712.tag = closureN_tag;
++ c_7314712.fn = (function_type)__lambda_188;
++c_7314712.num_args = 1;
++c_7314712.num_elements = 2;
++c_7314712.elements = (object *)e_7314745;
++c_7314712.elements[0] = ((closureN)self_7311894)->elements[0];
++c_7314712.elements[1] = ((closureN)self_7311894)->elements[1];
  
 -return_direct_with_clo1(data,(closure)&c_7315996,__lambda_186,  &c_7316012);; 
-+return_direct_with_clo1(data,(closure)&c_7314703,__lambda_186,  &c_7314719);; 
++return_direct_with_clo1(data,(closure)&c_7314696,__lambda_186,  &c_7314712);; 
  }
  
 -static void __lambda_188(void *data, object self_7313148, int argc, object *args) /* object self_7313148, object r_734598 */
-+static void __lambda_188(void *data, object self_7311902, int argc, object *args) /* object self_7311902, object r_734153 */
++static void __lambda_188(void *data, object self_7311895, int argc, object *args) /* object self_7311895, object r_734146 */
   {
  
    
 -pair_type local_7316017; 
-+pair_type local_7314724; 
++pair_type local_7314717; 
  
 -pair_type local_7316020; 
-+pair_type local_7314727; 
++pair_type local_7314720; 
  
 -pair_type local_7316023; 
-+pair_type local_7314730; 
++pair_type local_7314723; 
  
 -pair_type local_7316026; 
-+pair_type local_7314733; 
++pair_type local_7314726; 
  
  
  
 -pair_type local_7316032; 
-+pair_type local_7314739; 
++pair_type local_7314732; 
  
 -pair_type local_7316035; 
-+pair_type local_7314742; 
++pair_type local_7314735; 
  
 -pair_type local_7316038; 
-+pair_type local_7314745; 
++pair_type local_7314738; 
  
 -pair_type local_7316041; 
-+pair_type local_7314748; 
++pair_type local_7314741; 
  
  
 -return_direct_with_clo1(data,  ((closureN)self_7313148)->elements[1], (((closure)  ((closureN)self_7313148)->elements[1])->fn),  set_pair_as_expr(&local_7316017, quote__if, set_pair_as_expr(&local_7316020, set_pair_as_expr(&local_7316023, quote_not, set_pair_as_expr(&local_7316026, Cyc_cadr(data, ((closureN)self_7313148)->elements[0]), NULL)), set_pair_as_expr(&local_7316032, set_pair_as_expr(&local_7316035, set_pair_as_expr(&local_7316038, quote_lambda, set_pair_as_expr(&local_7316041, NULL, Cyc_cddr(data, ((closureN)self_7313148)->elements[0]))), NULL), NULL))));; 
-+return_direct_with_clo1(data,  ((closureN)self_7311902)->elements[1], (((closure)  ((closureN)self_7311902)->elements[1])->fn),  set_pair_as_expr(&local_7314724, quote__if, set_pair_as_expr(&local_7314727, set_pair_as_expr(&local_7314730, quote_not, set_pair_as_expr(&local_7314733, Cyc_cadr(data, ((closureN)self_7311902)->elements[0]), NULL)), set_pair_as_expr(&local_7314739, set_pair_as_expr(&local_7314742, set_pair_as_expr(&local_7314745, quote_lambda, set_pair_as_expr(&local_7314748, NULL, Cyc_cddr(data, ((closureN)self_7311902)->elements[0]))), NULL), NULL))));; 
++return_direct_with_clo1(data,  ((closureN)self_7311895)->elements[1], (((closure)  ((closureN)self_7311895)->elements[1])->fn),  set_pair_as_expr(&local_7314717, quote__if, set_pair_as_expr(&local_7314720, set_pair_as_expr(&local_7314723, quote_not, set_pair_as_expr(&local_7314726, Cyc_cadr(data, ((closureN)self_7311895)->elements[0]), NULL)), set_pair_as_expr(&local_7314732, set_pair_as_expr(&local_7314735, set_pair_as_expr(&local_7314738, quote_lambda, set_pair_as_expr(&local_7314741, NULL, Cyc_cddr(data, ((closureN)self_7311895)->elements[0]))), NULL), NULL))));; 
  }
  
 -static void __lambda_186(void *data, object self_7313149, int argc, object *args) /* object self_7313149, object k_734615 */
-+static void __lambda_186(void *data, object self_7311903, int argc, object *args) /* object self_7311903, object k_734170 */
++static void __lambda_186(void *data, object self_7311896, int argc, object *args) /* object self_7311896, object k_734163 */
   {
 - object k_734615 = args[0];
-+ object k_734170 = args[0];
++ object k_734163 = args[0];
    
 -closureN_type c_7315998;
 -object e_7316007 [2];
@@ -59673,48 +59889,48 @@ Make let-values be the same as let*-values, to work around
 -c_7315998.elements = (object *)e_7316007;
 -c_7315998.elements[0] = ((closureN)self_7313149)->elements[0];
 -c_7315998.elements[1] = k_734615;
-+closureN_type c_7314705;
-+object e_7314714 [2];
-+c_7314705.hdr.mark = gc_color_red;
-+ c_7314705.hdr.grayed = 0;
-+c_7314705.tag = closureN_tag;
-+ c_7314705.fn = (function_type)__lambda_187;
-+c_7314705.num_args = 1;
-+c_7314705.num_elements = 2;
-+c_7314705.elements = (object *)e_7314714;
-+c_7314705.elements[0] = ((closureN)self_7311903)->elements[0];
-+c_7314705.elements[1] = k_734170;
++closureN_type c_7314698;
++object e_7314707 [2];
++c_7314698.hdr.mark = gc_color_red;
++ c_7314698.hdr.grayed = 0;
++c_7314698.tag = closureN_tag;
++ c_7314698.fn = (function_type)__lambda_187;
++c_7314698.num_args = 1;
++c_7314698.num_elements = 2;
++c_7314698.elements = (object *)e_7314707;
++c_7314698.elements[0] = ((closureN)self_7311896)->elements[0];
++c_7314698.elements[1] = k_734163;
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7315998,__lambda_187,  Cyc_cddr(data, ((closureN)self_7313149)->elements[0]));; 
-+return_direct_with_clo1(data,(closure)&c_7314705,__lambda_187,  Cyc_cddr(data, ((closureN)self_7311903)->elements[0]));; 
++return_direct_with_clo1(data,(closure)&c_7314698,__lambda_187,  Cyc_cddr(data, ((closureN)self_7311896)->elements[0]));; 
  }
  
 -static void __lambda_187(void *data, object self_7313150, int argc, object *args) /* object self_7313150, object r_734617 */
-+static void __lambda_187(void *data, object self_7311904, int argc, object *args) /* object self_7311904, object r_734172 */
++static void __lambda_187(void *data, object self_7311897, int argc, object *args) /* object self_7311897, object r_734165 */
   {
 - object r_734617 = args[0];
-+ object r_734172 = args[0];
++ object r_734165 = args[0];
      
 -if( (boolean_f != Cyc_is_null(r_734617)) ){ 
-+if( (boolean_f != Cyc_is_null(r_734172)) ){ 
++if( (boolean_f != Cyc_is_null(r_734165)) ){ 
    
 -make_utf8_string_with_len(c_7316003, "no unless body", 14, 14);
 -return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7313150)->elements[1], &c_7316003, ((closureN)self_7313150)->elements[0]);
-+make_utf8_string_with_len(c_7314710, "no unless body", 14, 14);
-+return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7311904)->elements[1], &c_7314710, ((closureN)self_7311904)->elements[0]);
++make_utf8_string_with_len(c_7314703, "no unless body", 14, 14);
++return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7311897)->elements[1], &c_7314703, ((closureN)self_7311897)->elements[0]);
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7313150)->elements[1], (((closure)  ((closureN)self_7313150)->elements[1])->fn),  Cyc_VOID);}
-+  return_direct_with_clo1(data,  ((closureN)self_7311904)->elements[1], (((closure)  ((closureN)self_7311904)->elements[1])->fn),  Cyc_VOID);}
++  return_direct_with_clo1(data,  ((closureN)self_7311897)->elements[1], (((closure)  ((closureN)self_7311897)->elements[1])->fn),  Cyc_VOID);}
  ;; 
  }
  
 -static void __lambda_183(void *data, object self_7313151, int argc, object *args) /* object self_7313151, object k_734618 */
-+static void __lambda_183(void *data, object self_7311905, int argc, object *args) /* object self_7311905, object k_734173 */
++static void __lambda_183(void *data, object self_7311898, int argc, object *args) /* object self_7311898, object k_734166 */
   {
 - object k_734618 = args[0];
-+ object k_734173 = args[0];
++ object k_734166 = args[0];
    
 -closureN_type c_7315980;
 -object e_7315989 [2];
@@ -59727,50 +59943,49 @@ Make let-values be the same as let*-values, to work around
 -c_7315980.elements = (object *)e_7315989;
 -c_7315980.elements[0] = ((closureN)self_7313151)->elements[0];
 -c_7315980.elements[1] = k_734618;
-+closureN_type c_7314687;
-+object e_7314696 [2];
-+c_7314687.hdr.mark = gc_color_red;
-+ c_7314687.hdr.grayed = 0;
-+c_7314687.tag = closureN_tag;
-+ c_7314687.fn = (function_type)__lambda_184;
-+c_7314687.num_args = 1;
-+c_7314687.num_elements = 2;
-+c_7314687.elements = (object *)e_7314696;
-+c_7314687.elements[0] = ((closureN)self_7311905)->elements[0];
-+c_7314687.elements[1] = k_734173;
++closureN_type c_7314680;
++object e_7314689 [2];
++c_7314680.hdr.mark = gc_color_red;
++ c_7314680.hdr.grayed = 0;
++c_7314680.tag = closureN_tag;
++ c_7314680.fn = (function_type)__lambda_184;
++c_7314680.num_args = 1;
++c_7314680.num_elements = 2;
++c_7314680.elements = (object *)e_7314689;
++c_7314680.elements[0] = ((closureN)self_7311898)->elements[0];
++c_7314680.elements[1] = k_734166;
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7315980,__lambda_184,  Cyc_cdr(data, ((closureN)self_7313151)->elements[0]));; 
-+return_direct_with_clo1(data,(closure)&c_7314687,__lambda_184,  Cyc_cdr(data, ((closureN)self_7311905)->elements[0]));; 
++return_direct_with_clo1(data,(closure)&c_7314680,__lambda_184,  Cyc_cdr(data, ((closureN)self_7311898)->elements[0]));; 
  }
  
 -static void __lambda_184(void *data, object self_7313152, int argc, object *args) /* object self_7313152, object r_734620 */
-+static void __lambda_184(void *data, object self_7311906, int argc, object *args) /* object self_7311906, object r_734175 */
++static void __lambda_184(void *data, object self_7311899, int argc, object *args) /* object self_7311899, object r_734168 */
   {
 - object r_734620 = args[0];
-+ object r_734175 = args[0];
++ object r_734168 = args[0];
      
 -if( (boolean_f != Cyc_is_null(r_734620)) ){ 
-+if( (boolean_f != Cyc_is_null(r_734175)) ){ 
++if( (boolean_f != Cyc_is_null(r_734168)) ){ 
    
 -make_utf8_string_with_len(c_7315985, "empty unless", 12, 12);
 -return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7313152)->elements[1], &c_7315985, ((closureN)self_7313152)->elements[0]);
-+make_utf8_string_with_len(c_7314692, "empty unless", 12, 12);
-+return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7311906)->elements[1], &c_7314692, ((closureN)self_7311906)->elements[0]);
++make_utf8_string_with_len(c_7314685, "empty unless", 12, 12);
++return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7311899)->elements[1], &c_7314685, ((closureN)self_7311899)->elements[0]);
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7313152)->elements[1], (((closure)  ((closureN)self_7313152)->elements[1])->fn),  Cyc_VOID);}
-+  return_direct_with_clo1(data,  ((closureN)self_7311906)->elements[1], (((closure)  ((closureN)self_7311906)->elements[1])->fn),  Cyc_VOID);}
++  return_direct_with_clo1(data,  ((closureN)self_7311899)->elements[1], (((closure)  ((closureN)self_7311899)->elements[1])->fn),  Cyc_VOID);}
  ;; 
  }
  
 -static void __lambda_175(void *data, object _, int argc, object *args) /* closure _,object k_734573, object exp_73215_732939, object rename_73216_732940, object compare_73217_732941 */
-+static void __lambda_175(void *data, object _, int argc, object *args) /* closure _,object k_734128, object exp_73215_732599, object rename_73216_732600, object compare_73217_732601 */
++static void __lambda_175(void *data, object _, int argc, object *args) /* closure _,object k_734121, object exp_73215_732592, object rename_73216_732593, object compare_73217_732594 */
   {
 -object k_734573 = args[0]; object exp_73215_732939 = args[1];
--  Cyc_st_add(data, "scheme/base.sld:when");
-+object k_734128 = args[0]; object exp_73215_732599 = args[1];
-+  Cyc_st_add(data, "base.sld:when");
++object k_734121 = args[0]; object exp_73215_732592 = args[1];
+   Cyc_st_add(data, "scheme/base.sld:when");
  
 -closureN_type c_7315913;
 -object e_7315928 [1];
@@ -59782,18 +59997,8 @@ Make let-values be the same as let*-values, to work around
 -c_7315913.num_elements = 1;
 -c_7315913.elements = (object *)e_7315928;
 -c_7315913.elements[0] = exp_73215_732939;
-+closureN_type c_7314620;
-+object e_7314635 [1];
-+c_7314620.hdr.mark = gc_color_red;
-+ c_7314620.hdr.grayed = 0;
-+c_7314620.tag = closureN_tag;
-+ c_7314620.fn = (function_type)__lambda_176;
-+c_7314620.num_args = 0;
-+c_7314620.num_elements = 1;
-+c_7314620.elements = (object *)e_7314635;
-+c_7314620.elements[0] = exp_73215_732599;
- 
- 
+-
+-
 -closureN_type c_7315929;
 -object e_7315975 [2];
 -c_7315929.hdr.mark = gc_color_red;
@@ -59805,24 +60010,39 @@ Make let-values be the same as let*-values, to work around
 -c_7315929.elements = (object *)e_7315975;
 -c_7315929.elements[0] = exp_73215_732939;
 -c_7315929.elements[1] = k_734573;
-+closureN_type c_7314636;
-+object e_7314682 [2];
-+c_7314636.hdr.mark = gc_color_red;
-+ c_7314636.hdr.grayed = 0;
-+c_7314636.tag = closureN_tag;
-+ c_7314636.fn = (function_type)__lambda_178;
-+c_7314636.num_args = 1;
-+c_7314636.num_elements = 2;
-+c_7314636.elements = (object *)e_7314682;
-+c_7314636.elements[0] = exp_73215_732599;
-+c_7314636.elements[1] = k_734128;
- 
+-
 -return_direct_with_clo1(data,(closure)&c_7315913,__lambda_176,  &c_7315929);; 
-+return_direct_with_clo1(data,(closure)&c_7314620,__lambda_176,  &c_7314636);; 
- }
- 
+-}
+-
 -static void __lambda_178(void *data, object self_7313141, int argc, object *args) /* object self_7313141, object r_734574 */
-+static void __lambda_178(void *data, object self_7311895, int argc, object *args) /* object self_7311895, object r_734129 */
++closureN_type c_7314613;
++object e_7314628 [1];
++c_7314613.hdr.mark = gc_color_red;
++ c_7314613.hdr.grayed = 0;
++c_7314613.tag = closureN_tag;
++ c_7314613.fn = (function_type)__lambda_176;
++c_7314613.num_args = 0;
++c_7314613.num_elements = 1;
++c_7314613.elements = (object *)e_7314628;
++c_7314613.elements[0] = exp_73215_732592;
++
++
++closureN_type c_7314629;
++object e_7314675 [2];
++c_7314629.hdr.mark = gc_color_red;
++ c_7314629.hdr.grayed = 0;
++c_7314629.tag = closureN_tag;
++ c_7314629.fn = (function_type)__lambda_178;
++c_7314629.num_args = 1;
++c_7314629.num_elements = 2;
++c_7314629.elements = (object *)e_7314675;
++c_7314629.elements[0] = exp_73215_732592;
++c_7314629.elements[1] = k_734121;
++
++return_direct_with_clo1(data,(closure)&c_7314613,__lambda_176,  &c_7314629);; 
++}
++
++static void __lambda_178(void *data, object self_7311888, int argc, object *args) /* object self_7311888, object r_734122 */
   {
  
    
@@ -59836,16 +60056,16 @@ Make let-values be the same as let*-values, to work around
 -c_7315931.num_elements = 1;
 -c_7315931.elements = (object *)e_7315946;
 -c_7315931.elements[0] = ((closureN)self_7313141)->elements[0];
-+closureN_type c_7314638;
-+object e_7314653 [1];
-+c_7314638.hdr.mark = gc_color_red;
-+ c_7314638.hdr.grayed = 0;
-+c_7314638.tag = closureN_tag;
-+ c_7314638.fn = (function_type)__lambda_179;
-+c_7314638.num_args = 0;
-+c_7314638.num_elements = 1;
-+c_7314638.elements = (object *)e_7314653;
-+c_7314638.elements[0] = ((closureN)self_7311895)->elements[0];
++closureN_type c_7314631;
++object e_7314646 [1];
++c_7314631.hdr.mark = gc_color_red;
++ c_7314631.hdr.grayed = 0;
++c_7314631.tag = closureN_tag;
++ c_7314631.fn = (function_type)__lambda_179;
++c_7314631.num_args = 0;
++c_7314631.num_elements = 1;
++c_7314631.elements = (object *)e_7314646;
++c_7314631.elements[0] = ((closureN)self_7311888)->elements[0];
  
  
 -closureN_type c_7315947;
@@ -59859,57 +60079,57 @@ Make let-values be the same as let*-values, to work around
 -c_7315947.elements = (object *)e_7315974;
 -c_7315947.elements[0] = ((closureN)self_7313141)->elements[0];
 -c_7315947.elements[1] = ((closureN)self_7313141)->elements[1];
-+closureN_type c_7314654;
-+object e_7314681 [2];
-+c_7314654.hdr.mark = gc_color_red;
-+ c_7314654.hdr.grayed = 0;
-+c_7314654.tag = closureN_tag;
-+ c_7314654.fn = (function_type)__lambda_181;
-+c_7314654.num_args = 1;
-+c_7314654.num_elements = 2;
-+c_7314654.elements = (object *)e_7314681;
-+c_7314654.elements[0] = ((closureN)self_7311895)->elements[0];
-+c_7314654.elements[1] = ((closureN)self_7311895)->elements[1];
++closureN_type c_7314647;
++object e_7314674 [2];
++c_7314647.hdr.mark = gc_color_red;
++ c_7314647.hdr.grayed = 0;
++c_7314647.tag = closureN_tag;
++ c_7314647.fn = (function_type)__lambda_181;
++c_7314647.num_args = 1;
++c_7314647.num_elements = 2;
++c_7314647.elements = (object *)e_7314674;
++c_7314647.elements[0] = ((closureN)self_7311888)->elements[0];
++c_7314647.elements[1] = ((closureN)self_7311888)->elements[1];
  
 -return_direct_with_clo1(data,(closure)&c_7315931,__lambda_179,  &c_7315947);; 
-+return_direct_with_clo1(data,(closure)&c_7314638,__lambda_179,  &c_7314654);; 
++return_direct_with_clo1(data,(closure)&c_7314631,__lambda_179,  &c_7314647);; 
  }
  
 -static void __lambda_181(void *data, object self_7313142, int argc, object *args) /* object self_7313142, object r_734575 */
-+static void __lambda_181(void *data, object self_7311896, int argc, object *args) /* object self_7311896, object r_734130 */
++static void __lambda_181(void *data, object self_7311889, int argc, object *args) /* object self_7311889, object r_734123 */
   {
  
    
 -pair_type local_7315952; 
-+pair_type local_7314659; 
++pair_type local_7314652; 
  
 -pair_type local_7315955; 
-+pair_type local_7314662; 
++pair_type local_7314655; 
  
  
  
 -pair_type local_7315961; 
-+pair_type local_7314668; 
++pair_type local_7314661; 
  
 -pair_type local_7315964; 
-+pair_type local_7314671; 
++pair_type local_7314664; 
  
 -pair_type local_7315967; 
-+pair_type local_7314674; 
++pair_type local_7314667; 
  
 -pair_type local_7315970; 
-+pair_type local_7314677; 
++pair_type local_7314670; 
  
  
 -return_direct_with_clo1(data,  ((closureN)self_7313142)->elements[1], (((closure)  ((closureN)self_7313142)->elements[1])->fn),  set_pair_as_expr(&local_7315952, quote__if, set_pair_as_expr(&local_7315955, Cyc_cadr(data, ((closureN)self_7313142)->elements[0]), set_pair_as_expr(&local_7315961, set_pair_as_expr(&local_7315964, set_pair_as_expr(&local_7315967, quote_lambda, set_pair_as_expr(&local_7315970, NULL, Cyc_cddr(data, ((closureN)self_7313142)->elements[0]))), NULL), NULL))));; 
-+return_direct_with_clo1(data,  ((closureN)self_7311896)->elements[1], (((closure)  ((closureN)self_7311896)->elements[1])->fn),  set_pair_as_expr(&local_7314659, quote__if, set_pair_as_expr(&local_7314662, Cyc_cadr(data, ((closureN)self_7311896)->elements[0]), set_pair_as_expr(&local_7314668, set_pair_as_expr(&local_7314671, set_pair_as_expr(&local_7314674, quote_lambda, set_pair_as_expr(&local_7314677, NULL, Cyc_cddr(data, ((closureN)self_7311896)->elements[0]))), NULL), NULL))));; 
++return_direct_with_clo1(data,  ((closureN)self_7311889)->elements[1], (((closure)  ((closureN)self_7311889)->elements[1])->fn),  set_pair_as_expr(&local_7314652, quote__if, set_pair_as_expr(&local_7314655, Cyc_cadr(data, ((closureN)self_7311889)->elements[0]), set_pair_as_expr(&local_7314661, set_pair_as_expr(&local_7314664, set_pair_as_expr(&local_7314667, quote_lambda, set_pair_as_expr(&local_7314670, NULL, Cyc_cddr(data, ((closureN)self_7311889)->elements[0]))), NULL), NULL))));; 
  }
  
 -static void __lambda_179(void *data, object self_7313143, int argc, object *args) /* object self_7313143, object k_734588 */
-+static void __lambda_179(void *data, object self_7311897, int argc, object *args) /* object self_7311897, object k_734143 */
++static void __lambda_179(void *data, object self_7311890, int argc, object *args) /* object self_7311890, object k_734136 */
   {
 - object k_734588 = args[0];
-+ object k_734143 = args[0];
++ object k_734136 = args[0];
    
 -closureN_type c_7315933;
 -object e_7315942 [2];
@@ -59922,48 +60142,48 @@ Make let-values be the same as let*-values, to work around
 -c_7315933.elements = (object *)e_7315942;
 -c_7315933.elements[0] = ((closureN)self_7313143)->elements[0];
 -c_7315933.elements[1] = k_734588;
-+closureN_type c_7314640;
-+object e_7314649 [2];
-+c_7314640.hdr.mark = gc_color_red;
-+ c_7314640.hdr.grayed = 0;
-+c_7314640.tag = closureN_tag;
-+ c_7314640.fn = (function_type)__lambda_180;
-+c_7314640.num_args = 1;
-+c_7314640.num_elements = 2;
-+c_7314640.elements = (object *)e_7314649;
-+c_7314640.elements[0] = ((closureN)self_7311897)->elements[0];
-+c_7314640.elements[1] = k_734143;
++closureN_type c_7314633;
++object e_7314642 [2];
++c_7314633.hdr.mark = gc_color_red;
++ c_7314633.hdr.grayed = 0;
++c_7314633.tag = closureN_tag;
++ c_7314633.fn = (function_type)__lambda_180;
++c_7314633.num_args = 1;
++c_7314633.num_elements = 2;
++c_7314633.elements = (object *)e_7314642;
++c_7314633.elements[0] = ((closureN)self_7311890)->elements[0];
++c_7314633.elements[1] = k_734136;
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7315933,__lambda_180,  Cyc_cddr(data, ((closureN)self_7313143)->elements[0]));; 
-+return_direct_with_clo1(data,(closure)&c_7314640,__lambda_180,  Cyc_cddr(data, ((closureN)self_7311897)->elements[0]));; 
++return_direct_with_clo1(data,(closure)&c_7314633,__lambda_180,  Cyc_cddr(data, ((closureN)self_7311890)->elements[0]));; 
  }
  
 -static void __lambda_180(void *data, object self_7313144, int argc, object *args) /* object self_7313144, object r_734590 */
-+static void __lambda_180(void *data, object self_7311898, int argc, object *args) /* object self_7311898, object r_734145 */
++static void __lambda_180(void *data, object self_7311891, int argc, object *args) /* object self_7311891, object r_734138 */
   {
 - object r_734590 = args[0];
-+ object r_734145 = args[0];
++ object r_734138 = args[0];
      
 -if( (boolean_f != Cyc_is_null(r_734590)) ){ 
-+if( (boolean_f != Cyc_is_null(r_734145)) ){ 
++if( (boolean_f != Cyc_is_null(r_734138)) ){ 
    
 -make_utf8_string_with_len(c_7315938, "no when body", 12, 12);
 -return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7313144)->elements[1], &c_7315938, ((closureN)self_7313144)->elements[0]);
-+make_utf8_string_with_len(c_7314645, "no when body", 12, 12);
-+return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7311898)->elements[1], &c_7314645, ((closureN)self_7311898)->elements[0]);
++make_utf8_string_with_len(c_7314638, "no when body", 12, 12);
++return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7311891)->elements[1], &c_7314638, ((closureN)self_7311891)->elements[0]);
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7313144)->elements[1], (((closure)  ((closureN)self_7313144)->elements[1])->fn),  Cyc_VOID);}
-+  return_direct_with_clo1(data,  ((closureN)self_7311898)->elements[1], (((closure)  ((closureN)self_7311898)->elements[1])->fn),  Cyc_VOID);}
++  return_direct_with_clo1(data,  ((closureN)self_7311891)->elements[1], (((closure)  ((closureN)self_7311891)->elements[1])->fn),  Cyc_VOID);}
  ;; 
  }
  
 -static void __lambda_176(void *data, object self_7313145, int argc, object *args) /* object self_7313145, object k_734591 */
-+static void __lambda_176(void *data, object self_7311899, int argc, object *args) /* object self_7311899, object k_734146 */
++static void __lambda_176(void *data, object self_7311892, int argc, object *args) /* object self_7311892, object k_734139 */
   {
 - object k_734591 = args[0];
-+ object k_734146 = args[0];
++ object k_734139 = args[0];
    
 -closureN_type c_7315915;
 -object e_7315924 [2];
@@ -59976,50 +60196,49 @@ Make let-values be the same as let*-values, to work around
 -c_7315915.elements = (object *)e_7315924;
 -c_7315915.elements[0] = ((closureN)self_7313145)->elements[0];
 -c_7315915.elements[1] = k_734591;
-+closureN_type c_7314622;
-+object e_7314631 [2];
-+c_7314622.hdr.mark = gc_color_red;
-+ c_7314622.hdr.grayed = 0;
-+c_7314622.tag = closureN_tag;
-+ c_7314622.fn = (function_type)__lambda_177;
-+c_7314622.num_args = 1;
-+c_7314622.num_elements = 2;
-+c_7314622.elements = (object *)e_7314631;
-+c_7314622.elements[0] = ((closureN)self_7311899)->elements[0];
-+c_7314622.elements[1] = k_734146;
++closureN_type c_7314615;
++object e_7314624 [2];
++c_7314615.hdr.mark = gc_color_red;
++ c_7314615.hdr.grayed = 0;
++c_7314615.tag = closureN_tag;
++ c_7314615.fn = (function_type)__lambda_177;
++c_7314615.num_args = 1;
++c_7314615.num_elements = 2;
++c_7314615.elements = (object *)e_7314624;
++c_7314615.elements[0] = ((closureN)self_7311892)->elements[0];
++c_7314615.elements[1] = k_734139;
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7315915,__lambda_177,  Cyc_cdr(data, ((closureN)self_7313145)->elements[0]));; 
-+return_direct_with_clo1(data,(closure)&c_7314622,__lambda_177,  Cyc_cdr(data, ((closureN)self_7311899)->elements[0]));; 
++return_direct_with_clo1(data,(closure)&c_7314615,__lambda_177,  Cyc_cdr(data, ((closureN)self_7311892)->elements[0]));; 
  }
  
 -static void __lambda_177(void *data, object self_7313146, int argc, object *args) /* object self_7313146, object r_734593 */
-+static void __lambda_177(void *data, object self_7311900, int argc, object *args) /* object self_7311900, object r_734148 */
++static void __lambda_177(void *data, object self_7311893, int argc, object *args) /* object self_7311893, object r_734141 */
   {
 - object r_734593 = args[0];
-+ object r_734148 = args[0];
++ object r_734141 = args[0];
      
 -if( (boolean_f != Cyc_is_null(r_734593)) ){ 
-+if( (boolean_f != Cyc_is_null(r_734148)) ){ 
++if( (boolean_f != Cyc_is_null(r_734141)) ){ 
    
 -make_utf8_string_with_len(c_7315920, "empty when", 10, 10);
 -return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7313146)->elements[1], &c_7315920, ((closureN)self_7313146)->elements[0]);
-+make_utf8_string_with_len(c_7314627, "empty when", 10, 10);
-+return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7311900)->elements[1], &c_7314627, ((closureN)self_7311900)->elements[0]);
++make_utf8_string_with_len(c_7314620, "empty when", 10, 10);
++return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7311893)->elements[1], &c_7314620, ((closureN)self_7311893)->elements[0]);
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7313146)->elements[1], (((closure)  ((closureN)self_7313146)->elements[1])->fn),  Cyc_VOID);}
-+  return_direct_with_clo1(data,  ((closureN)self_7311900)->elements[1], (((closure)  ((closureN)self_7311900)->elements[1])->fn),  Cyc_VOID);}
++  return_direct_with_clo1(data,  ((closureN)self_7311893)->elements[1], (((closure)  ((closureN)self_7311893)->elements[1])->fn),  Cyc_VOID);}
  ;; 
  }
  
 -static void __lambda_142(void *data, object _, int argc, object *args) /* closure _,object k_734462, object expr_73172_732923, object rename_73173_732924, object compare_73174_732925 */
-+static void __lambda_142(void *data, object _, int argc, object *args) /* closure _,object k_734017, object expr_73172_732583, object rename_73173_732584, object compare_73174_732585 */
++static void __lambda_142(void *data, object _, int argc, object *args) /* closure _,object k_734010, object expr_73172_732576, object rename_73173_732577, object compare_73174_732578 */
   {
 -object k_734462 = args[0]; object expr_73172_732923 = args[1]; object rename_73173_732924 = args[2]; object compare_73174_732925 = args[3];
--  Cyc_st_add(data, "scheme/base.sld:case");
-+object k_734017 = args[0]; object expr_73172_732583 = args[1]; object rename_73173_732584 = args[2]; object compare_73174_732585 = args[3];
-+  Cyc_st_add(data, "base.sld:case");
++object k_734010 = args[0]; object expr_73172_732576 = args[1]; object rename_73173_732577 = args[2]; object compare_73174_732578 = args[3];
+   Cyc_st_add(data, "scheme/base.sld:case");
  
 -closureN_type c_7315559;
 -object e_7315910 [4];
@@ -60034,30 +60253,14 @@ Make let-values be the same as let*-values, to work around
 -c_7315559.elements[1] = expr_73172_732923;
 -c_7315559.elements[2] = k_734462;
 -c_7315559.elements[3] = rename_73173_732924;
-+closureN_type c_7314266;
-+object e_7314617 [4];
-+c_7314266.hdr.mark = gc_color_red;
-+ c_7314266.hdr.grayed = 0;
-+c_7314266.tag = closureN_tag;
-+ c_7314266.fn = (function_type)__lambda_143;
-+c_7314266.num_args = 3;
-+c_7314266.num_elements = 4;
-+c_7314266.elements = (object *)e_7314617;
-+c_7314266.elements[0] = compare_73174_732585;
-+c_7314266.elements[1] = expr_73172_732583;
-+c_7314266.elements[2] = k_734017;
-+c_7314266.elements[3] = rename_73173_732584;
- 
+-
 -return_direct_with_clo3(data,(closure)&c_7315559,__lambda_143,  boolean_f, boolean_f, boolean_f);; 
-+return_direct_with_clo3(data,(closure)&c_7314266,__lambda_143,  boolean_f, boolean_f, boolean_f);; 
- }
- 
+-}
+-
 -static void __lambda_143(void *data, object self_7313106, int argc, object *args) /* object self_7313106, object agg_91cond_732929, object body_732930, object clause_732931 */
-+static void __lambda_143(void *data, object self_7311860, int argc, object *args) /* object self_7311860, object agg_91cond_732589, object body_732590, object clause_732591 */
-  {
+- {
 - object agg_91cond_732929 = args[0]; object body_732930 = args[1]; object clause_732931 = args[2];
-+ object agg_91cond_732589 = args[0]; object body_732590 = args[1]; object clause_732591 = args[2];
-   
+-  
 -closureN_type c_7315561;
 -object e_7315906 [6];
 -c_7315561.hdr.mark = gc_color_red;
@@ -60073,35 +60276,16 @@ Make let-values be the same as let*-values, to work around
 -c_7315561.elements[3] = ((closureN)self_7313106)->elements[1];
 -c_7315561.elements[4] = ((closureN)self_7313106)->elements[2];
 -c_7315561.elements[5] = ((closureN)self_7313106)->elements[3];
-+closureN_type c_7314268;
-+object e_7314613 [6];
-+c_7314268.hdr.mark = gc_color_red;
-+ c_7314268.hdr.grayed = 0;
-+c_7314268.tag = closureN_tag;
-+ c_7314268.fn = (function_type)__lambda_1295;
-+c_7314268.num_args = 1;
-+c_7314268.num_elements = 6;
-+c_7314268.elements = (object *)e_7314613;
-+c_7314268.elements[0] = body_732590;
-+c_7314268.elements[1] = clause_732591;
-+c_7314268.elements[2] = ((closureN)self_7311860)->elements[0];
-+c_7314268.elements[3] = ((closureN)self_7311860)->elements[1];
-+c_7314268.elements[4] = ((closureN)self_7311860)->elements[2];
-+c_7314268.elements[5] = ((closureN)self_7311860)->elements[3];
- 
- 
+-
+-
 -pair_type local_7315909; 
 -return_direct_with_clo1(data,(closure)&c_7315561,__lambda_1342,  set_cell_as_expr(&local_7315909, agg_91cond_732929));; 
-+pair_type local_7314616; 
-+return_direct_with_clo1(data,(closure)&c_7314268,__lambda_1295,  set_cell_as_expr(&local_7314616, agg_91cond_732589));; 
- }
- 
+-}
+-
 -static void __lambda_1342(void *data, object self_7313107, int argc, object *args) /* object self_7313107, object agg_91cond_732929 */
-+static void __lambda_1295(void *data, object self_7311861, int argc, object *args) /* object self_7311861, object agg_91cond_732589 */
-  {
+- {
 - object agg_91cond_732929 = args[0];
-+ object agg_91cond_732589 = args[0];
-   
+-  
 -closureN_type c_7315563;
 -object e_7315901 [6];
 -c_7315563.hdr.mark = gc_color_red;
@@ -60117,35 +60301,16 @@ Make let-values be the same as let*-values, to work around
 -c_7315563.elements[3] = ((closureN)self_7313107)->elements[3];
 -c_7315563.elements[4] = ((closureN)self_7313107)->elements[4];
 -c_7315563.elements[5] = ((closureN)self_7313107)->elements[5];
-+closureN_type c_7314270;
-+object e_7314608 [6];
-+c_7314270.hdr.mark = gc_color_red;
-+ c_7314270.hdr.grayed = 0;
-+c_7314270.tag = closureN_tag;
-+ c_7314270.fn = (function_type)__lambda_1294;
-+c_7314270.num_args = 1;
-+c_7314270.num_elements = 6;
-+c_7314270.elements = (object *)e_7314608;
-+c_7314270.elements[0] = agg_91cond_732589;
-+c_7314270.elements[1] = ((closureN)self_7311861)->elements[1];
-+c_7314270.elements[2] = ((closureN)self_7311861)->elements[2];
-+c_7314270.elements[3] = ((closureN)self_7311861)->elements[3];
-+c_7314270.elements[4] = ((closureN)self_7311861)->elements[4];
-+c_7314270.elements[5] = ((closureN)self_7311861)->elements[5];
- 
- 
+-
+-
 -pair_type local_7315904; 
 -return_direct_with_clo1(data,(closure)&c_7315563,__lambda_1341,  set_cell_as_expr(&local_7315904, ((closureN)self_7313107)->elements[0]));; 
-+pair_type local_7314611; 
-+return_direct_with_clo1(data,(closure)&c_7314270,__lambda_1294,  set_cell_as_expr(&local_7314611, ((closureN)self_7311861)->elements[0]));; 
- }
- 
+-}
+-
 -static void __lambda_1341(void *data, object self_7313108, int argc, object *args) /* object self_7313108, object body_732930 */
-+static void __lambda_1294(void *data, object self_7311862, int argc, object *args) /* object self_7311862, object body_732590 */
-  {
+- {
 - object body_732930 = args[0];
-+ object body_732590 = args[0];
-   
+-  
 -closureN_type c_7315565;
 -object e_7315896 [6];
 -c_7315565.hdr.mark = gc_color_red;
@@ -60161,35 +60326,16 @@ Make let-values be the same as let*-values, to work around
 -c_7315565.elements[3] = ((closureN)self_7313108)->elements[3];
 -c_7315565.elements[4] = ((closureN)self_7313108)->elements[4];
 -c_7315565.elements[5] = ((closureN)self_7313108)->elements[5];
-+closureN_type c_7314272;
-+object e_7314603 [6];
-+c_7314272.hdr.mark = gc_color_red;
-+ c_7314272.hdr.grayed = 0;
-+c_7314272.tag = closureN_tag;
-+ c_7314272.fn = (function_type)__lambda_1293;
-+c_7314272.num_args = 1;
-+c_7314272.num_elements = 6;
-+c_7314272.elements = (object *)e_7314603;
-+c_7314272.elements[0] = ((closureN)self_7311862)->elements[0];
-+c_7314272.elements[1] = body_732590;
-+c_7314272.elements[2] = ((closureN)self_7311862)->elements[2];
-+c_7314272.elements[3] = ((closureN)self_7311862)->elements[3];
-+c_7314272.elements[4] = ((closureN)self_7311862)->elements[4];
-+c_7314272.elements[5] = ((closureN)self_7311862)->elements[5];
- 
- 
+-
+-
 -pair_type local_7315899; 
 -return_direct_with_clo1(data,(closure)&c_7315565,__lambda_1340,  set_cell_as_expr(&local_7315899, ((closureN)self_7313108)->elements[1]));; 
-+pair_type local_7314606; 
-+return_direct_with_clo1(data,(closure)&c_7314272,__lambda_1293,  set_cell_as_expr(&local_7314606, ((closureN)self_7311862)->elements[1]));; 
- }
- 
+-}
+-
 -static void __lambda_1340(void *data, object self_7313109, int argc, object *args) /* object self_7313109, object clause_732931 */
-+static void __lambda_1293(void *data, object self_7311863, int argc, object *args) /* object self_7311863, object clause_732591 */
-  {
+- {
 - object clause_732931 = args[0];
-+ object clause_732591 = args[0];
-   
+-  
 -closureN_type c_7315567;
 -object e_7315853 [7];
 -c_7315567.hdr.mark = gc_color_red;
@@ -60206,24 +60352,8 @@ Make let-values be the same as let*-values, to work around
 -c_7315567.elements[4] = ((closureN)self_7313109)->elements[3];
 -c_7315567.elements[5] = ((closureN)self_7313109)->elements[4];
 -c_7315567.elements[6] = ((closureN)self_7313109)->elements[5];
-+closureN_type c_7314274;
-+object e_7314560 [7];
-+c_7314274.hdr.mark = gc_color_red;
-+ c_7314274.hdr.grayed = 0;
-+c_7314274.tag = closureN_tag;
-+ c_7314274.fn = (function_type)__lambda_144;
-+c_7314274.num_args = 1;
-+c_7314274.num_elements = 7;
-+c_7314274.elements = (object *)e_7314560;
-+c_7314274.elements[0] = ((closureN)self_7311863)->elements[0];
-+c_7314274.elements[1] = ((closureN)self_7311863)->elements[1];
-+c_7314274.elements[2] = clause_732591;
-+c_7314274.elements[3] = ((closureN)self_7311863)->elements[2];
-+c_7314274.elements[4] = ((closureN)self_7311863)->elements[3];
-+c_7314274.elements[5] = ((closureN)self_7311863)->elements[4];
-+c_7314274.elements[6] = ((closureN)self_7311863)->elements[5];
- 
- 
+-
+-
 -closureN_type c_7315854;
 -object e_7315895 [2];
 -c_7315854.hdr.mark = gc_color_red;
@@ -60235,34 +60365,18 @@ Make let-values be the same as let*-values, to work around
 -c_7315854.elements = (object *)e_7315895;
 -c_7315854.elements[0] = ((closureN)self_7313109)->elements[2];
 -c_7315854.elements[1] = ((closureN)self_7313109)->elements[5];
-+closureN_type c_7314561;
-+object e_7314602 [2];
-+c_7314561.hdr.mark = gc_color_red;
-+ c_7314561.hdr.grayed = 0;
-+c_7314561.tag = closureN_tag;
-+ c_7314561.fn = (function_type)__lambda_170;
-+c_7314561.num_args = 1;
-+c_7314561.num_elements = 2;
-+c_7314561.elements = (object *)e_7314602;
-+c_7314561.elements[0] = ((closureN)self_7311863)->elements[2];
-+c_7314561.elements[1] = ((closureN)self_7311863)->elements[5];
- 
+-
 -return_direct_with_clo1(data,(closure)&c_7315567,__lambda_144,  &c_7315854);; 
-+return_direct_with_clo1(data,(closure)&c_7314274,__lambda_144,  &c_7314561);; 
- }
- 
+-}
+-
 -static void __lambda_170(void *data, object self_7313110, int argc, object *args) /* object self_7313110, object k_734557, object exprs_73175_732935 */
-+static void __lambda_170(void *data, object self_7311864, int argc, object *args) /* object self_7311864, object k_734112, object exprs_73175_732595 */
-  {
+- {
 - object k_734557 = args[0]; object exprs_73175_732935 = args[1];
-+ object k_734112 = args[0]; object exprs_73175_732595 = args[1];
-     
+-    
 -if( (boolean_f != Cyc_is_null(exprs_73175_732935)) ){ 
 -  return_closcall2(data,  ((closureN)self_7313110)->elements[1],  k_734557, quote_tmp);
-+if( (boolean_f != Cyc_is_null(exprs_73175_732595)) ){ 
-+  return_closcall2(data,  ((closureN)self_7311864)->elements[1],  k_734112, quote_tmp);
- } else { 
-   
+-} else { 
+-  
 -closureN_type c_7315861;
 -object e_7315894 [4];
 -c_7315861.hdr.mark = gc_color_red;
@@ -60276,31 +60390,15 @@ Make let-values be the same as let*-values, to work around
 -c_7315861.elements[1] = exprs_73175_732935;
 -c_7315861.elements[2] = k_734557;
 -c_7315861.elements[3] = ((closureN)self_7313110)->elements[1];
-+closureN_type c_7314568;
-+object e_7314601 [4];
-+c_7314568.hdr.mark = gc_color_red;
-+ c_7314568.hdr.grayed = 0;
-+c_7314568.tag = closureN_tag;
-+ c_7314568.fn = (function_type)__lambda_171;
-+c_7314568.num_args = 1;
-+c_7314568.num_elements = 4;
-+c_7314568.elements = (object *)e_7314601;
-+c_7314568.elements[0] = ((closureN)self_7311864)->elements[0];
-+c_7314568.elements[1] = exprs_73175_732595;
-+c_7314568.elements[2] = k_734112;
-+c_7314568.elements[3] = ((closureN)self_7311864)->elements[1];
- 
+-
 -return_closcall2(data,  ((closureN)self_7313110)->elements[1],  &c_7315861, quote__123_125);}
-+return_closcall2(data,  ((closureN)self_7311864)->elements[1],  &c_7314568, quote__123_125);}
- ;; 
- }
- 
+-;; 
+-}
+-
 -static void __lambda_171(void *data, object self_7313111, int argc, object *args) /* object self_7313111, object r_734568 */
-+static void __lambda_171(void *data, object self_7311865, int argc, object *args) /* object self_7311865, object r_734123 */
-  {
+- {
 - object r_734568 = args[0];
-+ object r_734123 = args[0];
-   
+-  
 -closureN_type c_7315864;
 -object e_7315890 [3];
 -c_7315864.hdr.mark = gc_color_red;
@@ -60313,33 +60411,17 @@ Make let-values be the same as let*-values, to work around
 -c_7315864.elements[0] = ((closureN)self_7313111)->elements[1];
 -c_7315864.elements[1] = ((closureN)self_7313111)->elements[2];
 -c_7315864.elements[2] = ((closureN)self_7313111)->elements[3];
-+closureN_type c_7314571;
-+object e_7314597 [3];
-+c_7314571.hdr.mark = gc_color_red;
-+ c_7314571.hdr.grayed = 0;
-+c_7314571.tag = closureN_tag;
-+ c_7314571.fn = (function_type)__lambda_172;
-+c_7314571.num_args = 1;
-+c_7314571.num_elements = 3;
-+c_7314571.elements = (object *)e_7314597;
-+c_7314571.elements[0] = ((closureN)self_7311865)->elements[1];
-+c_7314571.elements[1] = ((closureN)self_7311865)->elements[2];
-+c_7314571.elements[2] = ((closureN)self_7311865)->elements[3];
- 
- 
- 
+-
+-
+-
 -return_closcall3(data,  ((closureN)self_7313111)->elements[0],  &c_7315864, r_734568, Cyc_car(data, ((closureN)self_7313111)->elements[1]));; 
-+return_closcall3(data,  ((closureN)self_7311865)->elements[0],  &c_7314571, r_734123, Cyc_car(data, ((closureN)self_7311865)->elements[1]));; 
- }
- 
+-}
+-
 -static void __lambda_172(void *data, object self_7313112, int argc, object *args) /* object self_7313112, object r_734560 */
-+static void __lambda_172(void *data, object self_7311866, int argc, object *args) /* object self_7311866, object r_734115 */
-  {
+- {
 - object r_734560 = args[0];
 -  if( (boolean_f != r_734560) ){ 
-+ object r_734115 = args[0];
-+  if( (boolean_f != r_734115) ){ 
-   
+-  
 -closureN_type c_7315867;
 -object e_7315879 [2];
 -c_7315867.hdr.mark = gc_color_red;
@@ -60351,20 +60433,202 @@ Make let-values be the same as let*-values, to work around
 -c_7315867.elements = (object *)e_7315879;
 -c_7315867.elements[0] = ((closureN)self_7313112)->elements[0];
 -c_7315867.elements[1] = ((closureN)self_7313112)->elements[1];
-+closureN_type c_7314574;
-+object e_7314586 [2];
-+c_7314574.hdr.mark = gc_color_red;
-+ c_7314574.hdr.grayed = 0;
-+c_7314574.tag = closureN_tag;
-+ c_7314574.fn = (function_type)__lambda_173;
-+c_7314574.num_args = 1;
-+c_7314574.num_elements = 2;
-+c_7314574.elements = (object *)e_7314586;
-+c_7314574.elements[0] = ((closureN)self_7311866)->elements[0];
-+c_7314574.elements[1] = ((closureN)self_7311866)->elements[1];
++closureN_type c_7314259;
++object e_7314610 [4];
++c_7314259.hdr.mark = gc_color_red;
++ c_7314259.hdr.grayed = 0;
++c_7314259.tag = closureN_tag;
++ c_7314259.fn = (function_type)__lambda_143;
++c_7314259.num_args = 3;
++c_7314259.num_elements = 4;
++c_7314259.elements = (object *)e_7314610;
++c_7314259.elements[0] = compare_73174_732578;
++c_7314259.elements[1] = expr_73172_732576;
++c_7314259.elements[2] = k_734010;
++c_7314259.elements[3] = rename_73173_732577;
++
++return_direct_with_clo3(data,(closure)&c_7314259,__lambda_143,  boolean_f, boolean_f, boolean_f);; 
++}
++
++static void __lambda_143(void *data, object self_7311853, int argc, object *args) /* object self_7311853, object agg_91cond_732582, object body_732583, object clause_732584 */
++ {
++ object agg_91cond_732582 = args[0]; object body_732583 = args[1]; object clause_732584 = args[2];
++  
++closureN_type c_7314261;
++object e_7314606 [6];
++c_7314261.hdr.mark = gc_color_red;
++ c_7314261.hdr.grayed = 0;
++c_7314261.tag = closureN_tag;
++ c_7314261.fn = (function_type)__lambda_1295;
++c_7314261.num_args = 1;
++c_7314261.num_elements = 6;
++c_7314261.elements = (object *)e_7314606;
++c_7314261.elements[0] = body_732583;
++c_7314261.elements[1] = clause_732584;
++c_7314261.elements[2] = ((closureN)self_7311853)->elements[0];
++c_7314261.elements[3] = ((closureN)self_7311853)->elements[1];
++c_7314261.elements[4] = ((closureN)self_7311853)->elements[2];
++c_7314261.elements[5] = ((closureN)self_7311853)->elements[3];
++
++
++pair_type local_7314609; 
++return_direct_with_clo1(data,(closure)&c_7314261,__lambda_1295,  set_cell_as_expr(&local_7314609, agg_91cond_732582));; 
++}
++
++static void __lambda_1295(void *data, object self_7311854, int argc, object *args) /* object self_7311854, object agg_91cond_732582 */
++ {
++ object agg_91cond_732582 = args[0];
++  
++closureN_type c_7314263;
++object e_7314601 [6];
++c_7314263.hdr.mark = gc_color_red;
++ c_7314263.hdr.grayed = 0;
++c_7314263.tag = closureN_tag;
++ c_7314263.fn = (function_type)__lambda_1294;
++c_7314263.num_args = 1;
++c_7314263.num_elements = 6;
++c_7314263.elements = (object *)e_7314601;
++c_7314263.elements[0] = agg_91cond_732582;
++c_7314263.elements[1] = ((closureN)self_7311854)->elements[1];
++c_7314263.elements[2] = ((closureN)self_7311854)->elements[2];
++c_7314263.elements[3] = ((closureN)self_7311854)->elements[3];
++c_7314263.elements[4] = ((closureN)self_7311854)->elements[4];
++c_7314263.elements[5] = ((closureN)self_7311854)->elements[5];
++
++
++pair_type local_7314604; 
++return_direct_with_clo1(data,(closure)&c_7314263,__lambda_1294,  set_cell_as_expr(&local_7314604, ((closureN)self_7311854)->elements[0]));; 
++}
++
++static void __lambda_1294(void *data, object self_7311855, int argc, object *args) /* object self_7311855, object body_732583 */
++ {
++ object body_732583 = args[0];
++  
++closureN_type c_7314265;
++object e_7314596 [6];
++c_7314265.hdr.mark = gc_color_red;
++ c_7314265.hdr.grayed = 0;
++c_7314265.tag = closureN_tag;
++ c_7314265.fn = (function_type)__lambda_1293;
++c_7314265.num_args = 1;
++c_7314265.num_elements = 6;
++c_7314265.elements = (object *)e_7314596;
++c_7314265.elements[0] = ((closureN)self_7311855)->elements[0];
++c_7314265.elements[1] = body_732583;
++c_7314265.elements[2] = ((closureN)self_7311855)->elements[2];
++c_7314265.elements[3] = ((closureN)self_7311855)->elements[3];
++c_7314265.elements[4] = ((closureN)self_7311855)->elements[4];
++c_7314265.elements[5] = ((closureN)self_7311855)->elements[5];
++
++
++pair_type local_7314599; 
++return_direct_with_clo1(data,(closure)&c_7314265,__lambda_1293,  set_cell_as_expr(&local_7314599, ((closureN)self_7311855)->elements[1]));; 
++}
++
++static void __lambda_1293(void *data, object self_7311856, int argc, object *args) /* object self_7311856, object clause_732584 */
++ {
++ object clause_732584 = args[0];
++  
++closureN_type c_7314267;
++object e_7314553 [7];
++c_7314267.hdr.mark = gc_color_red;
++ c_7314267.hdr.grayed = 0;
++c_7314267.tag = closureN_tag;
++ c_7314267.fn = (function_type)__lambda_144;
++c_7314267.num_args = 1;
++c_7314267.num_elements = 7;
++c_7314267.elements = (object *)e_7314553;
++c_7314267.elements[0] = ((closureN)self_7311856)->elements[0];
++c_7314267.elements[1] = ((closureN)self_7311856)->elements[1];
++c_7314267.elements[2] = clause_732584;
++c_7314267.elements[3] = ((closureN)self_7311856)->elements[2];
++c_7314267.elements[4] = ((closureN)self_7311856)->elements[3];
++c_7314267.elements[5] = ((closureN)self_7311856)->elements[4];
++c_7314267.elements[6] = ((closureN)self_7311856)->elements[5];
++
++
++closureN_type c_7314554;
++object e_7314595 [2];
++c_7314554.hdr.mark = gc_color_red;
++ c_7314554.hdr.grayed = 0;
++c_7314554.tag = closureN_tag;
++ c_7314554.fn = (function_type)__lambda_170;
++c_7314554.num_args = 1;
++c_7314554.num_elements = 2;
++c_7314554.elements = (object *)e_7314595;
++c_7314554.elements[0] = ((closureN)self_7311856)->elements[2];
++c_7314554.elements[1] = ((closureN)self_7311856)->elements[5];
++
++return_direct_with_clo1(data,(closure)&c_7314267,__lambda_144,  &c_7314554);; 
++}
++
++static void __lambda_170(void *data, object self_7311857, int argc, object *args) /* object self_7311857, object k_734105, object exprs_73175_732588 */
++ {
++ object k_734105 = args[0]; object exprs_73175_732588 = args[1];
++    
++if( (boolean_f != Cyc_is_null(exprs_73175_732588)) ){ 
++  return_closcall2(data,  ((closureN)self_7311857)->elements[1],  k_734105, quote_tmp);
++} else { 
++  
++closureN_type c_7314561;
++object e_7314594 [4];
++c_7314561.hdr.mark = gc_color_red;
++ c_7314561.hdr.grayed = 0;
++c_7314561.tag = closureN_tag;
++ c_7314561.fn = (function_type)__lambda_171;
++c_7314561.num_args = 1;
++c_7314561.num_elements = 4;
++c_7314561.elements = (object *)e_7314594;
++c_7314561.elements[0] = ((closureN)self_7311857)->elements[0];
++c_7314561.elements[1] = exprs_73175_732588;
++c_7314561.elements[2] = k_734105;
++c_7314561.elements[3] = ((closureN)self_7311857)->elements[1];
++
++return_closcall2(data,  ((closureN)self_7311857)->elements[1],  &c_7314561, quote__123_125);}
++;; 
++}
++
++static void __lambda_171(void *data, object self_7311858, int argc, object *args) /* object self_7311858, object r_734116 */
++ {
++ object r_734116 = args[0];
++  
++closureN_type c_7314564;
++object e_7314590 [3];
++c_7314564.hdr.mark = gc_color_red;
++ c_7314564.hdr.grayed = 0;
++c_7314564.tag = closureN_tag;
++ c_7314564.fn = (function_type)__lambda_172;
++c_7314564.num_args = 1;
++c_7314564.num_elements = 3;
++c_7314564.elements = (object *)e_7314590;
++c_7314564.elements[0] = ((closureN)self_7311858)->elements[1];
++c_7314564.elements[1] = ((closureN)self_7311858)->elements[2];
++c_7314564.elements[2] = ((closureN)self_7311858)->elements[3];
++
++
++
++return_closcall3(data,  ((closureN)self_7311858)->elements[0],  &c_7314564, r_734116, Cyc_car(data, ((closureN)self_7311858)->elements[1]));; 
++}
++
++static void __lambda_172(void *data, object self_7311859, int argc, object *args) /* object self_7311859, object r_734108 */
++ {
++ object r_734108 = args[0];
++  if( (boolean_f != r_734108) ){ 
++  
++closureN_type c_7314567;
++object e_7314579 [2];
++c_7314567.hdr.mark = gc_color_red;
++ c_7314567.hdr.grayed = 0;
++c_7314567.tag = closureN_tag;
++ c_7314567.fn = (function_type)__lambda_173;
++c_7314567.num_args = 1;
++c_7314567.num_elements = 2;
++c_7314567.elements = (object *)e_7314579;
++c_7314567.elements[0] = ((closureN)self_7311859)->elements[0];
++c_7314567.elements[1] = ((closureN)self_7311859)->elements[1];
  
 -return_closcall2(data,  ((closureN)self_7313112)->elements[2],  &c_7315867, quote_tmp);
-+return_closcall2(data,  ((closureN)self_7311866)->elements[2],  &c_7314574, quote_tmp);
++return_closcall2(data,  ((closureN)self_7311859)->elements[2],  &c_7314567, quote_tmp);
  } else { 
    
 -closureN_type c_7315882;
@@ -60378,57 +60642,57 @@ Make let-values be the same as let*-values, to work around
 -c_7315882.elements = (object *)e_7315889;
 -c_7315882.elements[0] = ((closureN)self_7313112)->elements[0];
 -c_7315882.elements[1] = ((closureN)self_7313112)->elements[1];
-+closureN_type c_7314589;
-+object e_7314596 [2];
-+c_7314589.hdr.mark = gc_color_red;
-+ c_7314589.hdr.grayed = 0;
-+c_7314589.tag = closureN_tag;
-+ c_7314589.fn = (function_type)__lambda_174;
-+c_7314589.num_args = 1;
-+c_7314589.num_elements = 2;
-+c_7314589.elements = (object *)e_7314596;
-+c_7314589.elements[0] = ((closureN)self_7311866)->elements[0];
-+c_7314589.elements[1] = ((closureN)self_7311866)->elements[1];
++closureN_type c_7314582;
++object e_7314589 [2];
++c_7314582.hdr.mark = gc_color_red;
++ c_7314582.hdr.grayed = 0;
++c_7314582.tag = closureN_tag;
++ c_7314582.fn = (function_type)__lambda_174;
++c_7314582.num_args = 1;
++c_7314582.num_elements = 2;
++c_7314582.elements = (object *)e_7314589;
++c_7314582.elements[0] = ((closureN)self_7311859)->elements[0];
++c_7314582.elements[1] = ((closureN)self_7311859)->elements[1];
  
 -return_closcall2(data,  ((closureN)self_7313112)->elements[2],  &c_7315882, quote_begin);}
-+return_closcall2(data,  ((closureN)self_7311866)->elements[2],  &c_7314589, quote_begin);}
++return_closcall2(data,  ((closureN)self_7311859)->elements[2],  &c_7314582, quote_begin);}
  ;; 
  }
  
 -static void __lambda_174(void *data, object self_7313114, int argc, object *args) /* object self_7313114, object r_734566 */
-+static void __lambda_174(void *data, object self_7311868, int argc, object *args) /* object self_7311868, object r_734121 */
++static void __lambda_174(void *data, object self_7311861, int argc, object *args) /* object self_7311861, object r_734114 */
   {
 - object r_734566 = args[0];
-+ object r_734121 = args[0];
++ object r_734114 = args[0];
    
 -pair_type local_7315887; 
 -return_direct_with_clo1(data,  ((closureN)self_7313114)->elements[1], (((closure)  ((closureN)self_7313114)->elements[1])->fn),  set_pair_as_expr(&local_7315887, r_734566, ((closureN)self_7313114)->elements[0]));; 
-+pair_type local_7314594; 
-+return_direct_with_clo1(data,  ((closureN)self_7311868)->elements[1], (((closure)  ((closureN)self_7311868)->elements[1])->fn),  set_pair_as_expr(&local_7314594, r_734121, ((closureN)self_7311868)->elements[0]));; 
++pair_type local_7314587; 
++return_direct_with_clo1(data,  ((closureN)self_7311861)->elements[1], (((closure)  ((closureN)self_7311861)->elements[1])->fn),  set_pair_as_expr(&local_7314587, r_734114, ((closureN)self_7311861)->elements[0]));; 
  }
  
 -static void __lambda_173(void *data, object self_7313113, int argc, object *args) /* object self_7313113, object r_734563 */
-+static void __lambda_173(void *data, object self_7311867, int argc, object *args) /* object self_7311867, object r_734118 */
++static void __lambda_173(void *data, object self_7311860, int argc, object *args) /* object self_7311860, object r_734111 */
   {
 - object r_734563 = args[0];
-+ object r_734118 = args[0];
++ object r_734111 = args[0];
    
 -pair_type local_7315872; 
-+pair_type local_7314579; 
++pair_type local_7314572; 
  
  
  
 -pair_type local_7315878; 
 -return_direct_with_clo1(data,  ((closureN)self_7313113)->elements[1], (((closure)  ((closureN)self_7313113)->elements[1])->fn),  set_pair_as_expr(&local_7315872, Cyc_cadr(data, ((closureN)self_7313113)->elements[0]), set_pair_as_expr(&local_7315878, r_734563, NULL)));; 
-+pair_type local_7314585; 
-+return_direct_with_clo1(data,  ((closureN)self_7311867)->elements[1], (((closure)  ((closureN)self_7311867)->elements[1])->fn),  set_pair_as_expr(&local_7314579, Cyc_cadr(data, ((closureN)self_7311867)->elements[0]), set_pair_as_expr(&local_7314585, r_734118, NULL)));; 
++pair_type local_7314578; 
++return_direct_with_clo1(data,  ((closureN)self_7311860)->elements[1], (((closure)  ((closureN)self_7311860)->elements[1])->fn),  set_pair_as_expr(&local_7314572, Cyc_cadr(data, ((closureN)self_7311860)->elements[0]), set_pair_as_expr(&local_7314578, r_734111, NULL)));; 
  }
  
 -static void __lambda_144(void *data, object self_7313115, int argc, object *args) /* object self_7313115, object r_734556 */
-+static void __lambda_144(void *data, object self_7311869, int argc, object *args) /* object self_7311869, object r_734111 */
++static void __lambda_144(void *data, object self_7311862, int argc, object *args) /* object self_7311862, object r_734104 */
   {
 - object r_734556 = args[0];
-+ object r_734111 = args[0];
++ object r_734104 = args[0];
    
 -closureN_type c_7315569;
 -object e_7315849 [7];
@@ -60446,31 +60710,31 @@ Make let-values be the same as let*-values, to work around
 -c_7315569.elements[4] = ((closureN)self_7313115)->elements[4];
 -c_7315569.elements[5] = ((closureN)self_7313115)->elements[5];
 -c_7315569.elements[6] = ((closureN)self_7313115)->elements[6];
-+closureN_type c_7314276;
-+object e_7314556 [7];
-+c_7314276.hdr.mark = gc_color_red;
-+ c_7314276.hdr.grayed = 0;
-+c_7314276.tag = closureN_tag;
-+ c_7314276.fn = (function_type)__lambda_145;
-+c_7314276.num_args = 1;
-+c_7314276.num_elements = 7;
-+c_7314276.elements = (object *)e_7314556;
-+c_7314276.elements[0] = ((closureN)self_7311869)->elements[0];
-+c_7314276.elements[1] = ((closureN)self_7311869)->elements[1];
-+c_7314276.elements[2] = ((closureN)self_7311869)->elements[2];
-+c_7314276.elements[3] = ((closureN)self_7311869)->elements[3];
-+c_7314276.elements[4] = ((closureN)self_7311869)->elements[4];
-+c_7314276.elements[5] = ((closureN)self_7311869)->elements[5];
-+c_7314276.elements[6] = ((closureN)self_7311869)->elements[6];
++closureN_type c_7314269;
++object e_7314549 [7];
++c_7314269.hdr.mark = gc_color_red;
++ c_7314269.hdr.grayed = 0;
++c_7314269.tag = closureN_tag;
++ c_7314269.fn = (function_type)__lambda_145;
++c_7314269.num_args = 1;
++c_7314269.num_elements = 7;
++c_7314269.elements = (object *)e_7314549;
++c_7314269.elements[0] = ((closureN)self_7311862)->elements[0];
++c_7314269.elements[1] = ((closureN)self_7311862)->elements[1];
++c_7314269.elements[2] = ((closureN)self_7311862)->elements[2];
++c_7314269.elements[3] = ((closureN)self_7311862)->elements[3];
++c_7314269.elements[4] = ((closureN)self_7311862)->elements[4];
++c_7314269.elements[5] = ((closureN)self_7311862)->elements[5];
++c_7314269.elements[6] = ((closureN)self_7311862)->elements[6];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7315569,__lambda_145,  Cyc_set_cell(data, ((closureN)self_7313115)->elements[1], r_734556));; 
-+return_direct_with_clo1(data,(closure)&c_7314276,__lambda_145,  Cyc_set_cell(data, ((closureN)self_7311869)->elements[1], r_734111));; 
++return_direct_with_clo1(data,(closure)&c_7314269,__lambda_145,  Cyc_set_cell(data, ((closureN)self_7311862)->elements[1], r_734104));; 
  }
  
 -static void __lambda_145(void *data, object self_7313116, int argc, object *args) /* object self_7313116, object r_734463 */
-+static void __lambda_145(void *data, object self_7311870, int argc, object *args) /* object self_7311870, object r_734018 */
++static void __lambda_145(void *data, object self_7311863, int argc, object *args) /* object self_7311863, object r_734011 */
   {
  
    
@@ -60490,22 +60754,22 @@ Make let-values be the same as let*-values, to work around
 -c_7315571.elements[4] = ((closureN)self_7313116)->elements[4];
 -c_7315571.elements[5] = ((closureN)self_7313116)->elements[5];
 -c_7315571.elements[6] = ((closureN)self_7313116)->elements[6];
-+closureN_type c_7314278;
-+object e_7314499 [7];
-+c_7314278.hdr.mark = gc_color_red;
-+ c_7314278.hdr.grayed = 0;
-+c_7314278.tag = closureN_tag;
-+ c_7314278.fn = (function_type)__lambda_146;
-+c_7314278.num_args = 1;
-+c_7314278.num_elements = 7;
-+c_7314278.elements = (object *)e_7314499;
-+c_7314278.elements[0] = ((closureN)self_7311870)->elements[0];
-+c_7314278.elements[1] = ((closureN)self_7311870)->elements[1];
-+c_7314278.elements[2] = ((closureN)self_7311870)->elements[2];
-+c_7314278.elements[3] = ((closureN)self_7311870)->elements[3];
-+c_7314278.elements[4] = ((closureN)self_7311870)->elements[4];
-+c_7314278.elements[5] = ((closureN)self_7311870)->elements[5];
-+c_7314278.elements[6] = ((closureN)self_7311870)->elements[6];
++closureN_type c_7314271;
++object e_7314492 [7];
++c_7314271.hdr.mark = gc_color_red;
++ c_7314271.hdr.grayed = 0;
++c_7314271.tag = closureN_tag;
++ c_7314271.fn = (function_type)__lambda_146;
++c_7314271.num_args = 1;
++c_7314271.num_elements = 7;
++c_7314271.elements = (object *)e_7314492;
++c_7314271.elements[0] = ((closureN)self_7311863)->elements[0];
++c_7314271.elements[1] = ((closureN)self_7311863)->elements[1];
++c_7314271.elements[2] = ((closureN)self_7311863)->elements[2];
++c_7314271.elements[3] = ((closureN)self_7311863)->elements[3];
++c_7314271.elements[4] = ((closureN)self_7311863)->elements[4];
++c_7314271.elements[5] = ((closureN)self_7311863)->elements[5];
++c_7314271.elements[6] = ((closureN)self_7311863)->elements[6];
  
  
 -closureN_type c_7315793;
@@ -60519,32 +60783,32 @@ Make let-values be the same as let*-values, to work around
 -c_7315793.elements = (object *)e_7315848;
 -c_7315793.elements[0] = ((closureN)self_7313116)->elements[0];
 -c_7315793.elements[1] = ((closureN)self_7313116)->elements[6];
-+closureN_type c_7314500;
-+object e_7314555 [2];
-+c_7314500.hdr.mark = gc_color_red;
-+ c_7314500.hdr.grayed = 0;
-+c_7314500.tag = closureN_tag;
-+ c_7314500.fn = (function_type)__lambda_166;
-+c_7314500.num_args = 2;
-+c_7314500.num_elements = 2;
-+c_7314500.elements = (object *)e_7314555;
-+c_7314500.elements[0] = ((closureN)self_7311870)->elements[0];
-+c_7314500.elements[1] = ((closureN)self_7311870)->elements[6];
++closureN_type c_7314493;
++object e_7314548 [2];
++c_7314493.hdr.mark = gc_color_red;
++ c_7314493.hdr.grayed = 0;
++c_7314493.tag = closureN_tag;
++ c_7314493.fn = (function_type)__lambda_166;
++c_7314493.num_args = 2;
++c_7314493.num_elements = 2;
++c_7314493.elements = (object *)e_7314548;
++c_7314493.elements[0] = ((closureN)self_7311863)->elements[0];
++c_7314493.elements[1] = ((closureN)self_7311863)->elements[6];
  
 -return_direct_with_clo1(data,(closure)&c_7315571,__lambda_146,  &c_7315793);; 
-+return_direct_with_clo1(data,(closure)&c_7314278,__lambda_146,  &c_7314500);; 
++return_direct_with_clo1(data,(closure)&c_7314271,__lambda_146,  &c_7314493);; 
  }
  
 -static void __lambda_166(void *data, object self_7313117, int argc, object *args) /* object self_7313117, object k_734536, object tmp_91sym_73189_732936, object lis_73190_732937 */
-+static void __lambda_166(void *data, object self_7311871, int argc, object *args) /* object self_7311871, object k_734091, object tmp_91sym_73189_732596, object lis_73190_732597 */
++static void __lambda_166(void *data, object self_7311864, int argc, object *args) /* object self_7311864, object k_734084, object tmp_91sym_73189_732589, object lis_73190_732590 */
   {
 - object k_734536 = args[0]; object tmp_91sym_73189_732936 = args[1]; object lis_73190_732937 = args[2];
-+ object k_734091 = args[0]; object tmp_91sym_73189_732596 = args[1]; object lis_73190_732597 = args[2];
++ object k_734084 = args[0]; object tmp_91sym_73189_732589 = args[1]; object lis_73190_732590 = args[2];
      
 -if( (boolean_f != Cyc_is_null(lis_73190_732937)) ){ 
 -  return_direct_with_clo1(data,  k_734536, (((closure)  k_734536)->fn),  boolean_f);
-+if( (boolean_f != Cyc_is_null(lis_73190_732597)) ){ 
-+  return_direct_with_clo1(data,  k_734091, (((closure)  k_734091)->fn),  boolean_f);
++if( (boolean_f != Cyc_is_null(lis_73190_732590)) ){ 
++  return_direct_with_clo1(data,  k_734084, (((closure)  k_734084)->fn),  boolean_f);
  } else { 
    
 -closureN_type c_7315799;
@@ -60560,30 +60824,30 @@ Make let-values be the same as let*-values, to work around
 -c_7315799.elements[1] = k_734536;
 -c_7315799.elements[2] = lis_73190_732937;
 -c_7315799.elements[3] = tmp_91sym_73189_732936;
-+closureN_type c_7314506;
-+object e_7314554 [4];
-+c_7314506.hdr.mark = gc_color_red;
-+ c_7314506.hdr.grayed = 0;
-+c_7314506.tag = closureN_tag;
-+ c_7314506.fn = (function_type)__lambda_167;
-+c_7314506.num_args = 1;
-+c_7314506.num_elements = 4;
-+c_7314506.elements = (object *)e_7314554;
-+c_7314506.elements[0] = ((closureN)self_7311871)->elements[0];
-+c_7314506.elements[1] = k_734091;
-+c_7314506.elements[2] = lis_73190_732597;
-+c_7314506.elements[3] = tmp_91sym_73189_732596;
++closureN_type c_7314499;
++object e_7314547 [4];
++c_7314499.hdr.mark = gc_color_red;
++ c_7314499.hdr.grayed = 0;
++c_7314499.tag = closureN_tag;
++ c_7314499.fn = (function_type)__lambda_167;
++c_7314499.num_args = 1;
++c_7314499.num_elements = 4;
++c_7314499.elements = (object *)e_7314547;
++c_7314499.elements[0] = ((closureN)self_7311864)->elements[0];
++c_7314499.elements[1] = k_734084;
++c_7314499.elements[2] = lis_73190_732590;
++c_7314499.elements[3] = tmp_91sym_73189_732589;
  
 -return_closcall2(data,  ((closureN)self_7313117)->elements[1],  &c_7315799, quote_quote);}
-+return_closcall2(data,  ((closureN)self_7311871)->elements[1],  &c_7314506, quote_quote);}
++return_closcall2(data,  ((closureN)self_7311864)->elements[1],  &c_7314499, quote_quote);}
  ;; 
  }
  
 -static void __lambda_167(void *data, object self_7313118, int argc, object *args) /* object self_7313118, object r_734551 */
-+static void __lambda_167(void *data, object self_7311872, int argc, object *args) /* object self_7311872, object r_734106 */
++static void __lambda_167(void *data, object self_7311865, int argc, object *args) /* object self_7311865, object r_734099 */
   {
 - object r_734551 = args[0];
-+ object r_734106 = args[0];
++ object r_734099 = args[0];
    
 -closureN_type c_7315801;
 -object e_7315830 [4];
@@ -60598,43 +60862,43 @@ Make let-values be the same as let*-values, to work around
 -c_7315801.elements[1] = ((closureN)self_7313118)->elements[1];
 -c_7315801.elements[2] = ((closureN)self_7313118)->elements[2];
 -c_7315801.elements[3] = ((closureN)self_7313118)->elements[3];
-+closureN_type c_7314508;
-+object e_7314537 [4];
-+c_7314508.hdr.mark = gc_color_red;
-+ c_7314508.hdr.grayed = 0;
-+c_7314508.tag = closureN_tag;
-+ c_7314508.fn = (function_type)__lambda_168;
-+c_7314508.num_args = 1;
-+c_7314508.num_elements = 4;
-+c_7314508.elements = (object *)e_7314537;
-+c_7314508.elements[0] = ((closureN)self_7311872)->elements[0];
-+c_7314508.elements[1] = ((closureN)self_7311872)->elements[1];
-+c_7314508.elements[2] = ((closureN)self_7311872)->elements[2];
-+c_7314508.elements[3] = ((closureN)self_7311872)->elements[3];
++closureN_type c_7314501;
++object e_7314530 [4];
++c_7314501.hdr.mark = gc_color_red;
++ c_7314501.hdr.grayed = 0;
++c_7314501.tag = closureN_tag;
++ c_7314501.fn = (function_type)__lambda_168;
++c_7314501.num_args = 1;
++c_7314501.num_elements = 4;
++c_7314501.elements = (object *)e_7314530;
++c_7314501.elements[0] = ((closureN)self_7311865)->elements[0];
++c_7314501.elements[1] = ((closureN)self_7311865)->elements[1];
++c_7314501.elements[2] = ((closureN)self_7311865)->elements[2];
++c_7314501.elements[3] = ((closureN)self_7311865)->elements[3];
  
  
 -pair_type local_7315833; 
-+pair_type local_7314540; 
++pair_type local_7314533; 
  
 -pair_type local_7315837; 
-+pair_type local_7314544; 
++pair_type local_7314537; 
  
 -pair_type local_7315840; 
-+pair_type local_7314547; 
++pair_type local_7314540; 
  
 -pair_type local_7315843; 
-+pair_type local_7314550; 
++pair_type local_7314543; 
  
  
 -return_direct_with_clo1(data,(closure)&c_7315801,__lambda_168,  set_pair_as_expr(&local_7315833, ((closureN)self_7313118)->elements[3], set_pair_as_expr(&local_7315837, set_pair_as_expr(&local_7315840, r_734551, set_pair_as_expr(&local_7315843, Cyc_car(data, ((closureN)self_7313118)->elements[2]), NULL)), NULL)));; 
-+return_direct_with_clo1(data,(closure)&c_7314508,__lambda_168,  set_pair_as_expr(&local_7314540, ((closureN)self_7311872)->elements[3], set_pair_as_expr(&local_7314544, set_pair_as_expr(&local_7314547, r_734106, set_pair_as_expr(&local_7314550, Cyc_car(data, ((closureN)self_7311872)->elements[2]), NULL)), NULL)));; 
++return_direct_with_clo1(data,(closure)&c_7314501,__lambda_168,  set_pair_as_expr(&local_7314533, ((closureN)self_7311865)->elements[3], set_pair_as_expr(&local_7314537, set_pair_as_expr(&local_7314540, r_734099, set_pair_as_expr(&local_7314543, Cyc_car(data, ((closureN)self_7311865)->elements[2]), NULL)), NULL)));; 
  }
  
 -static void __lambda_168(void *data, object self_7313119, int argc, object *args) /* object self_7313119, object r_734547 */
-+static void __lambda_168(void *data, object self_7311873, int argc, object *args) /* object self_7311873, object r_734102 */
++static void __lambda_168(void *data, object self_7311866, int argc, object *args) /* object self_7311866, object r_734095 */
   {
 - object r_734547 = args[0];
-+ object r_734102 = args[0];
++ object r_734095 = args[0];
    
  
  
@@ -60649,53 +60913,53 @@ Make let-values be the same as let*-values, to work around
 -c_7315806.elements = (object *)e_7315825;
 -c_7315806.elements[0] = ((closureN)self_7313119)->elements[1];
 -c_7315806.elements[1] = r_734547;
-+closureN_type c_7314513;
-+object e_7314532 [2];
-+c_7314513.hdr.mark = gc_color_red;
-+ c_7314513.hdr.grayed = 0;
-+c_7314513.tag = closureN_tag;
-+ c_7314513.fn = (function_type)__lambda_169;
-+c_7314513.num_args = 1;
-+c_7314513.num_elements = 2;
-+c_7314513.elements = (object *)e_7314532;
-+c_7314513.elements[0] = ((closureN)self_7311873)->elements[1];
-+c_7314513.elements[1] = r_734102;
++closureN_type c_7314506;
++object e_7314525 [2];
++c_7314506.hdr.mark = gc_color_red;
++ c_7314506.hdr.grayed = 0;
++c_7314506.tag = closureN_tag;
++ c_7314506.fn = (function_type)__lambda_169;
++c_7314506.num_args = 1;
++c_7314506.num_elements = 2;
++c_7314506.elements = (object *)e_7314525;
++c_7314506.elements[0] = ((closureN)self_7311866)->elements[1];
++c_7314506.elements[1] = r_734095;
  
  
  
 -return_closcall3(data,  car(((closureN)self_7313119)->elements[0]),  &c_7315806, ((closureN)self_7313119)->elements[3], Cyc_cdr(data, ((closureN)self_7313119)->elements[2]));; 
-+return_closcall3(data,  car(((closureN)self_7311873)->elements[0]),  &c_7314513, ((closureN)self_7311873)->elements[3], Cyc_cdr(data, ((closureN)self_7311873)->elements[2]));; 
++return_closcall3(data,  car(((closureN)self_7311866)->elements[0]),  &c_7314506, ((closureN)self_7311866)->elements[3], Cyc_cdr(data, ((closureN)self_7311866)->elements[2]));; 
  }
  
 -static void __lambda_169(void *data, object self_7313120, int argc, object *args) /* object self_7313120, object r_734543 */
-+static void __lambda_169(void *data, object self_7311874, int argc, object *args) /* object self_7311874, object r_734098 */
++static void __lambda_169(void *data, object self_7311867, int argc, object *args) /* object self_7311867, object r_734091 */
   {
 - object r_734543 = args[0];
-+ object r_734098 = args[0];
++ object r_734091 = args[0];
    
 -pair_type local_7315811; 
-+pair_type local_7314518; 
++pair_type local_7314511; 
  
 -pair_type local_7315814; 
-+pair_type local_7314521; 
++pair_type local_7314514; 
  
 -pair_type local_7315817; 
-+pair_type local_7314524; 
++pair_type local_7314517; 
  
 -pair_type local_7315821; 
-+pair_type local_7314528; 
++pair_type local_7314521; 
  
 -pair_type local_7315824; 
 -return_direct_with_clo1(data,  ((closureN)self_7313120)->elements[0], (((closure)  ((closureN)self_7313120)->elements[0])->fn),  set_pair_as_expr(&local_7315811, quote__if, set_pair_as_expr(&local_7315814, set_pair_as_expr(&local_7315817, quote_eq_127, ((closureN)self_7313120)->elements[1]), set_pair_as_expr(&local_7315821, boolean_t, set_pair_as_expr(&local_7315824, r_734543, NULL)))));; 
-+pair_type local_7314531; 
-+return_direct_with_clo1(data,  ((closureN)self_7311874)->elements[0], (((closure)  ((closureN)self_7311874)->elements[0])->fn),  set_pair_as_expr(&local_7314518, quote__if, set_pair_as_expr(&local_7314521, set_pair_as_expr(&local_7314524, quote_eq_127, ((closureN)self_7311874)->elements[1]), set_pair_as_expr(&local_7314528, boolean_t, set_pair_as_expr(&local_7314531, r_734098, NULL)))));; 
++pair_type local_7314524; 
++return_direct_with_clo1(data,  ((closureN)self_7311867)->elements[0], (((closure)  ((closureN)self_7311867)->elements[0])->fn),  set_pair_as_expr(&local_7314511, quote__if, set_pair_as_expr(&local_7314514, set_pair_as_expr(&local_7314517, quote_eq_127, ((closureN)self_7311867)->elements[1]), set_pair_as_expr(&local_7314521, boolean_t, set_pair_as_expr(&local_7314524, r_734091, NULL)))));; 
  }
  
 -static void __lambda_146(void *data, object self_7313121, int argc, object *args) /* object self_7313121, object r_734535 */
-+static void __lambda_146(void *data, object self_7311875, int argc, object *args) /* object self_7311875, object r_734090 */
++static void __lambda_146(void *data, object self_7311868, int argc, object *args) /* object self_7311868, object r_734083 */
   {
 - object r_734535 = args[0];
-+ object r_734090 = args[0];
++ object r_734083 = args[0];
    
 -closureN_type c_7315573;
 -object e_7315788 [7];
@@ -60713,31 +60977,31 @@ Make let-values be the same as let*-values, to work around
 -c_7315573.elements[4] = ((closureN)self_7313121)->elements[4];
 -c_7315573.elements[5] = ((closureN)self_7313121)->elements[5];
 -c_7315573.elements[6] = ((closureN)self_7313121)->elements[6];
-+closureN_type c_7314280;
-+object e_7314495 [7];
-+c_7314280.hdr.mark = gc_color_red;
-+ c_7314280.hdr.grayed = 0;
-+c_7314280.tag = closureN_tag;
-+ c_7314280.fn = (function_type)__lambda_147;
-+c_7314280.num_args = 1;
-+c_7314280.num_elements = 7;
-+c_7314280.elements = (object *)e_7314495;
-+c_7314280.elements[0] = ((closureN)self_7311875)->elements[0];
-+c_7314280.elements[1] = ((closureN)self_7311875)->elements[1];
-+c_7314280.elements[2] = ((closureN)self_7311875)->elements[2];
-+c_7314280.elements[3] = ((closureN)self_7311875)->elements[3];
-+c_7314280.elements[4] = ((closureN)self_7311875)->elements[4];
-+c_7314280.elements[5] = ((closureN)self_7311875)->elements[5];
-+c_7314280.elements[6] = ((closureN)self_7311875)->elements[6];
++closureN_type c_7314273;
++object e_7314488 [7];
++c_7314273.hdr.mark = gc_color_red;
++ c_7314273.hdr.grayed = 0;
++c_7314273.tag = closureN_tag;
++ c_7314273.fn = (function_type)__lambda_147;
++c_7314273.num_args = 1;
++c_7314273.num_elements = 7;
++c_7314273.elements = (object *)e_7314488;
++c_7314273.elements[0] = ((closureN)self_7311868)->elements[0];
++c_7314273.elements[1] = ((closureN)self_7311868)->elements[1];
++c_7314273.elements[2] = ((closureN)self_7311868)->elements[2];
++c_7314273.elements[3] = ((closureN)self_7311868)->elements[3];
++c_7314273.elements[4] = ((closureN)self_7311868)->elements[4];
++c_7314273.elements[5] = ((closureN)self_7311868)->elements[5];
++c_7314273.elements[6] = ((closureN)self_7311868)->elements[6];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7315573,__lambda_147,  Cyc_set_cell(data, ((closureN)self_7313121)->elements[0], r_734535));; 
-+return_direct_with_clo1(data,(closure)&c_7314280,__lambda_147,  Cyc_set_cell(data, ((closureN)self_7311875)->elements[0], r_734090));; 
++return_direct_with_clo1(data,(closure)&c_7314273,__lambda_147,  Cyc_set_cell(data, ((closureN)self_7311868)->elements[0], r_734083));; 
  }
  
 -static void __lambda_147(void *data, object self_7313122, int argc, object *args) /* object self_7313122, object r_734464 */
-+static void __lambda_147(void *data, object self_7311876, int argc, object *args) /* object self_7311876, object r_734019 */
++static void __lambda_147(void *data, object self_7311869, int argc, object *args) /* object self_7311869, object r_734012 */
   {
  
    
@@ -60754,19 +61018,19 @@ Make let-values be the same as let*-values, to work around
 -c_7315575.elements[1] = ((closureN)self_7313122)->elements[4];
 -c_7315575.elements[2] = ((closureN)self_7313122)->elements[5];
 -c_7315575.elements[3] = ((closureN)self_7313122)->elements[6];
-+closureN_type c_7314282;
-+object e_7314326 [4];
-+c_7314282.hdr.mark = gc_color_red;
-+ c_7314282.hdr.grayed = 0;
-+c_7314282.tag = closureN_tag;
-+ c_7314282.fn = (function_type)__lambda_148;
-+c_7314282.num_args = 1;
-+c_7314282.num_elements = 4;
-+c_7314282.elements = (object *)e_7314326;
-+c_7314282.elements[0] = ((closureN)self_7311876)->elements[2];
-+c_7314282.elements[1] = ((closureN)self_7311876)->elements[4];
-+c_7314282.elements[2] = ((closureN)self_7311876)->elements[5];
-+c_7314282.elements[3] = ((closureN)self_7311876)->elements[6];
++closureN_type c_7314275;
++object e_7314319 [4];
++c_7314275.hdr.mark = gc_color_red;
++ c_7314275.hdr.grayed = 0;
++c_7314275.tag = closureN_tag;
++ c_7314275.fn = (function_type)__lambda_148;
++c_7314275.num_args = 1;
++c_7314275.num_elements = 4;
++c_7314275.elements = (object *)e_7314319;
++c_7314275.elements[0] = ((closureN)self_7311869)->elements[2];
++c_7314275.elements[1] = ((closureN)self_7311869)->elements[4];
++c_7314275.elements[2] = ((closureN)self_7311869)->elements[5];
++c_7314275.elements[3] = ((closureN)self_7311869)->elements[6];
  
  
 -closureN_type c_7315620;
@@ -60783,35 +61047,35 @@ Make let-values be the same as let*-values, to work around
 -c_7315620.elements[2] = ((closureN)self_7313122)->elements[2];
 -c_7315620.elements[3] = ((closureN)self_7313122)->elements[3];
 -c_7315620.elements[4] = ((closureN)self_7313122)->elements[6];
-+closureN_type c_7314327;
-+object e_7314494 [5];
-+c_7314327.hdr.mark = gc_color_red;
-+ c_7314327.hdr.grayed = 0;
-+c_7314327.tag = closureN_tag;
-+ c_7314327.fn = (function_type)__lambda_152;
-+c_7314327.num_args = 1;
-+c_7314327.num_elements = 5;
-+c_7314327.elements = (object *)e_7314494;
-+c_7314327.elements[0] = ((closureN)self_7311876)->elements[0];
-+c_7314327.elements[1] = ((closureN)self_7311876)->elements[1];
-+c_7314327.elements[2] = ((closureN)self_7311876)->elements[2];
-+c_7314327.elements[3] = ((closureN)self_7311876)->elements[3];
-+c_7314327.elements[4] = ((closureN)self_7311876)->elements[6];
++closureN_type c_7314320;
++object e_7314487 [5];
++c_7314320.hdr.mark = gc_color_red;
++ c_7314320.hdr.grayed = 0;
++c_7314320.tag = closureN_tag;
++ c_7314320.fn = (function_type)__lambda_152;
++c_7314320.num_args = 1;
++c_7314320.num_elements = 5;
++c_7314320.elements = (object *)e_7314487;
++c_7314320.elements[0] = ((closureN)self_7311869)->elements[0];
++c_7314320.elements[1] = ((closureN)self_7311869)->elements[1];
++c_7314320.elements[2] = ((closureN)self_7311869)->elements[2];
++c_7314320.elements[3] = ((closureN)self_7311869)->elements[3];
++c_7314320.elements[4] = ((closureN)self_7311869)->elements[6];
  
 -return_direct_with_clo1(data,(closure)&c_7315575,__lambda_148,  &c_7315620);; 
-+return_direct_with_clo1(data,(closure)&c_7314282,__lambda_148,  &c_7314327);; 
++return_direct_with_clo1(data,(closure)&c_7314275,__lambda_148,  &c_7314320);; 
  }
  
 -static void __lambda_152(void *data, object self_7313123, int argc, object *args) /* object self_7313123, object k_734481, object ls_73194_732938 */
-+static void __lambda_152(void *data, object self_7311877, int argc, object *args) /* object self_7311877, object k_734036, object ls_73194_732598 */
++static void __lambda_152(void *data, object self_7311870, int argc, object *args) /* object self_7311870, object k_734029, object ls_73194_732591 */
   {
 - object k_734481 = args[0]; object ls_73194_732938 = args[1];
-+ object k_734036 = args[0]; object ls_73194_732598 = args[1];
++ object k_734029 = args[0]; object ls_73194_732591 = args[1];
      
 -if( (boolean_f != Cyc_is_null(ls_73194_732938)) ){ 
 -  return_direct_with_clo1(data,  k_734481, (((closure)  k_734481)->fn),  boolean_f);
-+if( (boolean_f != Cyc_is_null(ls_73194_732598)) ){ 
-+  return_direct_with_clo1(data,  k_734036, (((closure)  k_734036)->fn),  boolean_f);
++if( (boolean_f != Cyc_is_null(ls_73194_732591)) ){ 
++  return_direct_with_clo1(data,  k_734029, (((closure)  k_734029)->fn),  boolean_f);
  } else { 
    
 -closureN_type c_7315626;
@@ -60830,33 +61094,33 @@ Make let-values be the same as let*-values, to work around
 -c_7315626.elements[4] = k_734481;
 -c_7315626.elements[5] = ls_73194_732938;
 -c_7315626.elements[6] = ((closureN)self_7313123)->elements[4];
-+closureN_type c_7314333;
-+object e_7314493 [7];
-+c_7314333.hdr.mark = gc_color_red;
-+ c_7314333.hdr.grayed = 0;
-+c_7314333.tag = closureN_tag;
-+ c_7314333.fn = (function_type)__lambda_153;
-+c_7314333.num_args = 1;
-+c_7314333.num_elements = 7;
-+c_7314333.elements = (object *)e_7314493;
-+c_7314333.elements[0] = ((closureN)self_7311877)->elements[0];
-+c_7314333.elements[1] = ((closureN)self_7311877)->elements[1];
-+c_7314333.elements[2] = ((closureN)self_7311877)->elements[2];
-+c_7314333.elements[3] = ((closureN)self_7311877)->elements[3];
-+c_7314333.elements[4] = k_734036;
-+c_7314333.elements[5] = ls_73194_732598;
-+c_7314333.elements[6] = ((closureN)self_7311877)->elements[4];
++closureN_type c_7314326;
++object e_7314486 [7];
++c_7314326.hdr.mark = gc_color_red;
++ c_7314326.hdr.grayed = 0;
++c_7314326.tag = closureN_tag;
++ c_7314326.fn = (function_type)__lambda_153;
++c_7314326.num_args = 1;
++c_7314326.num_elements = 7;
++c_7314326.elements = (object *)e_7314486;
++c_7314326.elements[0] = ((closureN)self_7311870)->elements[0];
++c_7314326.elements[1] = ((closureN)self_7311870)->elements[1];
++c_7314326.elements[2] = ((closureN)self_7311870)->elements[2];
++c_7314326.elements[3] = ((closureN)self_7311870)->elements[3];
++c_7314326.elements[4] = k_734029;
++c_7314326.elements[5] = ls_73194_732591;
++c_7314326.elements[6] = ((closureN)self_7311870)->elements[4];
  
 -return_closcall2(data,  ((closureN)self_7313123)->elements[4],  &c_7315626, quote__else);}
-+return_closcall2(data,  ((closureN)self_7311877)->elements[4],  &c_7314333, quote__else);}
++return_closcall2(data,  ((closureN)self_7311870)->elements[4],  &c_7314326, quote__else);}
  ;; 
  }
  
 -static void __lambda_153(void *data, object self_7313124, int argc, object *args) /* object self_7313124, object r_734532 */
-+static void __lambda_153(void *data, object self_7311878, int argc, object *args) /* object self_7311878, object r_734087 */
++static void __lambda_153(void *data, object self_7311871, int argc, object *args) /* object self_7311871, object r_734080 */
   {
 - object r_734532 = args[0];
-+ object r_734087 = args[0];
++ object r_734080 = args[0];
    
 -closureN_type c_7315629;
 -object e_7315782 [6];
@@ -60873,60 +61137,60 @@ Make let-values be the same as let*-values, to work around
 -c_7315629.elements[3] = ((closureN)self_7313124)->elements[4];
 -c_7315629.elements[4] = ((closureN)self_7313124)->elements[5];
 -c_7315629.elements[5] = ((closureN)self_7313124)->elements[6];
-+closureN_type c_7314336;
-+object e_7314489 [6];
-+c_7314336.hdr.mark = gc_color_red;
-+ c_7314336.hdr.grayed = 0;
-+c_7314336.tag = closureN_tag;
-+ c_7314336.fn = (function_type)__lambda_154;
-+c_7314336.num_args = 1;
-+c_7314336.num_elements = 6;
-+c_7314336.elements = (object *)e_7314489;
-+c_7314336.elements[0] = ((closureN)self_7311878)->elements[0];
-+c_7314336.elements[1] = ((closureN)self_7311878)->elements[1];
-+c_7314336.elements[2] = ((closureN)self_7311878)->elements[2];
-+c_7314336.elements[3] = ((closureN)self_7311878)->elements[4];
-+c_7314336.elements[4] = ((closureN)self_7311878)->elements[5];
-+c_7314336.elements[5] = ((closureN)self_7311878)->elements[6];
++closureN_type c_7314329;
++object e_7314482 [6];
++c_7314329.hdr.mark = gc_color_red;
++ c_7314329.hdr.grayed = 0;
++c_7314329.tag = closureN_tag;
++ c_7314329.fn = (function_type)__lambda_154;
++c_7314329.num_args = 1;
++c_7314329.num_elements = 6;
++c_7314329.elements = (object *)e_7314482;
++c_7314329.elements[0] = ((closureN)self_7311871)->elements[0];
++c_7314329.elements[1] = ((closureN)self_7311871)->elements[1];
++c_7314329.elements[2] = ((closureN)self_7311871)->elements[2];
++c_7314329.elements[3] = ((closureN)self_7311871)->elements[4];
++c_7314329.elements[4] = ((closureN)self_7311871)->elements[5];
++c_7314329.elements[5] = ((closureN)self_7311871)->elements[6];
  
  
  
 -return_closcall3(data,  ((closureN)self_7313124)->elements[3],  &c_7315629, r_734532, Cyc_caar(data, ((closureN)self_7313124)->elements[5]));; 
-+return_closcall3(data,  ((closureN)self_7311878)->elements[3],  &c_7314336, r_734087, Cyc_caar(data, ((closureN)self_7311878)->elements[5]));; 
++return_closcall3(data,  ((closureN)self_7311871)->elements[3],  &c_7314329, r_734080, Cyc_caar(data, ((closureN)self_7311871)->elements[5]));; 
  }
  
 -static void __lambda_154(void *data, object self_7313125, int argc, object *args) /* object self_7313125, object r_734483 */
-+static void __lambda_154(void *data, object self_7311879, int argc, object *args) /* object self_7311879, object r_734038 */
++static void __lambda_154(void *data, object self_7311872, int argc, object *args) /* object self_7311872, object r_734031 */
   {
 - object r_734483 = args[0];
 -  if( (boolean_f != r_734483) ){ 
-+ object r_734038 = args[0];
-+  if( (boolean_f != r_734038) ){ 
++ object r_734031 = args[0];
++  if( (boolean_f != r_734031) ){ 
    
  
  
  
 -return_closcall2(data,  car(((closureN)self_7313125)->elements[1]),  ((closureN)self_7313125)->elements[3], Cyc_cdar(data, ((closureN)self_7313125)->elements[4]));
-+return_closcall2(data,  car(((closureN)self_7311879)->elements[1]),  ((closureN)self_7311879)->elements[3], Cyc_cdar(data, ((closureN)self_7311879)->elements[4]));
++return_closcall2(data,  car(((closureN)self_7311872)->elements[1]),  ((closureN)self_7311872)->elements[3], Cyc_cdar(data, ((closureN)self_7311872)->elements[4]));
  } else { 
 -  object r_734485;
-+  object r_734040;
++  object r_734033;
      
    
    
 -if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_car(data, ((closureN)self_7313125)->elements[4])))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_car(data, ((closureN)self_7311879)->elements[4])))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, Cyc_car(data, ((closureN)self_7311872)->elements[4])))) ){ 
    
    
    
    
 -  r_734485 = Cyc_is_null(Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7313125)->elements[4]))));
-+  r_734040 = Cyc_is_null(Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7311879)->elements[4]))));
++  r_734033 = Cyc_is_null(Cyc_cdr(data, Cyc_car(data, Cyc_car(data, ((closureN)self_7311872)->elements[4]))));
  } else { 
 -  r_734485 = boolean_f;}
 -;if( (boolean_f != r_734485) ){ 
-+  r_734040 = boolean_f;}
-+;if( (boolean_f != r_734040) ){ 
++  r_734033 = boolean_f;}
++;if( (boolean_f != r_734033) ){ 
    
 -closureN_type c_7315659;
 -object e_7315729 [5];
@@ -60942,23 +61206,23 @@ Make let-values be the same as let*-values, to work around
 -c_7315659.elements[2] = ((closureN)self_7313125)->elements[3];
 -c_7315659.elements[3] = ((closureN)self_7313125)->elements[4];
 -c_7315659.elements[4] = ((closureN)self_7313125)->elements[5];
-+closureN_type c_7314366;
-+object e_7314436 [5];
-+c_7314366.hdr.mark = gc_color_red;
-+ c_7314366.hdr.grayed = 0;
-+c_7314366.tag = closureN_tag;
-+ c_7314366.fn = (function_type)__lambda_155;
-+c_7314366.num_args = 1;
-+c_7314366.num_elements = 5;
-+c_7314366.elements = (object *)e_7314436;
-+c_7314366.elements[0] = ((closureN)self_7311879)->elements[1];
-+c_7314366.elements[1] = ((closureN)self_7311879)->elements[2];
-+c_7314366.elements[2] = ((closureN)self_7311879)->elements[3];
-+c_7314366.elements[3] = ((closureN)self_7311879)->elements[4];
-+c_7314366.elements[4] = ((closureN)self_7311879)->elements[5];
++closureN_type c_7314359;
++object e_7314429 [5];
++c_7314359.hdr.mark = gc_color_red;
++ c_7314359.hdr.grayed = 0;
++c_7314359.tag = closureN_tag;
++ c_7314359.fn = (function_type)__lambda_155;
++c_7314359.num_args = 1;
++c_7314359.num_elements = 5;
++c_7314359.elements = (object *)e_7314429;
++c_7314359.elements[0] = ((closureN)self_7311872)->elements[1];
++c_7314359.elements[1] = ((closureN)self_7311872)->elements[2];
++c_7314359.elements[2] = ((closureN)self_7311872)->elements[3];
++c_7314359.elements[3] = ((closureN)self_7311872)->elements[4];
++c_7314359.elements[4] = ((closureN)self_7311872)->elements[5];
  
 -return_closcall2(data,  ((closureN)self_7313125)->elements[5],  &c_7315659, quote__if);
-+return_closcall2(data,  ((closureN)self_7311879)->elements[5],  &c_7314366, quote__if);
++return_closcall2(data,  ((closureN)self_7311872)->elements[5],  &c_7314359, quote__if);
  } else { 
    
 -closureN_type c_7315732;
@@ -60976,33 +61240,33 @@ Make let-values be the same as let*-values, to work around
 -c_7315732.elements[3] = ((closureN)self_7313125)->elements[3];
 -c_7315732.elements[4] = ((closureN)self_7313125)->elements[4];
 -c_7315732.elements[5] = ((closureN)self_7313125)->elements[5];
-+closureN_type c_7314439;
-+object e_7314488 [6];
-+c_7314439.hdr.mark = gc_color_red;
-+ c_7314439.hdr.grayed = 0;
-+c_7314439.tag = closureN_tag;
-+ c_7314439.fn = (function_type)__lambda_161;
-+c_7314439.num_args = 1;
-+c_7314439.num_elements = 6;
-+c_7314439.elements = (object *)e_7314488;
-+c_7314439.elements[0] = ((closureN)self_7311879)->elements[0];
-+c_7314439.elements[1] = ((closureN)self_7311879)->elements[1];
-+c_7314439.elements[2] = ((closureN)self_7311879)->elements[2];
-+c_7314439.elements[3] = ((closureN)self_7311879)->elements[3];
-+c_7314439.elements[4] = ((closureN)self_7311879)->elements[4];
-+c_7314439.elements[5] = ((closureN)self_7311879)->elements[5];
++closureN_type c_7314432;
++object e_7314481 [6];
++c_7314432.hdr.mark = gc_color_red;
++ c_7314432.hdr.grayed = 0;
++c_7314432.tag = closureN_tag;
++ c_7314432.fn = (function_type)__lambda_161;
++c_7314432.num_args = 1;
++c_7314432.num_elements = 6;
++c_7314432.elements = (object *)e_7314481;
++c_7314432.elements[0] = ((closureN)self_7311872)->elements[0];
++c_7314432.elements[1] = ((closureN)self_7311872)->elements[1];
++c_7314432.elements[2] = ((closureN)self_7311872)->elements[2];
++c_7314432.elements[3] = ((closureN)self_7311872)->elements[3];
++c_7314432.elements[4] = ((closureN)self_7311872)->elements[4];
++c_7314432.elements[5] = ((closureN)self_7311872)->elements[5];
  
 -return_closcall2(data,  ((closureN)self_7313125)->elements[5],  &c_7315732, quote__if);}
-+return_closcall2(data,  ((closureN)self_7311879)->elements[5],  &c_7314439, quote__if);}
++return_closcall2(data,  ((closureN)self_7311872)->elements[5],  &c_7314432, quote__if);}
  ;}
  ;; 
  }
  
 -static void __lambda_161(void *data, object self_7313132, int argc, object *args) /* object self_7313132, object r_734511 */
-+static void __lambda_161(void *data, object self_7311886, int argc, object *args) /* object self_7311886, object r_734066 */
++static void __lambda_161(void *data, object self_7311879, int argc, object *args) /* object self_7311879, object r_734059 */
   {
 - object r_734511 = args[0];
-+ object r_734066 = args[0];
++ object r_734059 = args[0];
    
 -closureN_type c_7315735;
 -object e_7315780 [6];
@@ -61019,31 +61283,31 @@ Make let-values be the same as let*-values, to work around
 -c_7315735.elements[3] = ((closureN)self_7313132)->elements[3];
 -c_7315735.elements[4] = ((closureN)self_7313132)->elements[4];
 -c_7315735.elements[5] = r_734511;
-+closureN_type c_7314442;
-+object e_7314487 [6];
-+c_7314442.hdr.mark = gc_color_red;
-+ c_7314442.hdr.grayed = 0;
-+c_7314442.tag = closureN_tag;
-+ c_7314442.fn = (function_type)__lambda_162;
-+c_7314442.num_args = 1;
-+c_7314442.num_elements = 6;
-+c_7314442.elements = (object *)e_7314487;
-+c_7314442.elements[0] = ((closureN)self_7311886)->elements[0];
-+c_7314442.elements[1] = ((closureN)self_7311886)->elements[1];
-+c_7314442.elements[2] = ((closureN)self_7311886)->elements[2];
-+c_7314442.elements[3] = ((closureN)self_7311886)->elements[3];
-+c_7314442.elements[4] = ((closureN)self_7311886)->elements[4];
-+c_7314442.elements[5] = r_734066;
++closureN_type c_7314435;
++object e_7314480 [6];
++c_7314435.hdr.mark = gc_color_red;
++ c_7314435.hdr.grayed = 0;
++c_7314435.tag = closureN_tag;
++ c_7314435.fn = (function_type)__lambda_162;
++c_7314435.num_args = 1;
++c_7314435.num_elements = 6;
++c_7314435.elements = (object *)e_7314480;
++c_7314435.elements[0] = ((closureN)self_7311879)->elements[0];
++c_7314435.elements[1] = ((closureN)self_7311879)->elements[1];
++c_7314435.elements[2] = ((closureN)self_7311879)->elements[2];
++c_7314435.elements[3] = ((closureN)self_7311879)->elements[3];
++c_7314435.elements[4] = ((closureN)self_7311879)->elements[4];
++c_7314435.elements[5] = r_734059;
  
 -return_closcall2(data,  ((closureN)self_7313132)->elements[5],  &c_7315735, quote_tmp);; 
-+return_closcall2(data,  ((closureN)self_7311886)->elements[5],  &c_7314442, quote_tmp);; 
++return_closcall2(data,  ((closureN)self_7311879)->elements[5],  &c_7314435, quote_tmp);; 
  }
  
 -static void __lambda_162(void *data, object self_7313133, int argc, object *args) /* object self_7313133, object r_734521 */
-+static void __lambda_162(void *data, object self_7311887, int argc, object *args) /* object self_7311887, object r_734076 */
++static void __lambda_162(void *data, object self_7311880, int argc, object *args) /* object self_7311880, object r_734069 */
   {
 - object r_734521 = args[0];
-+ object r_734076 = args[0];
++ object r_734069 = args[0];
    
  
  
@@ -61061,32 +61325,32 @@ Make let-values be the same as let*-values, to work around
 -c_7315740.elements[2] = ((closureN)self_7313133)->elements[3];
 -c_7315740.elements[3] = ((closureN)self_7313133)->elements[4];
 -c_7315740.elements[4] = ((closureN)self_7313133)->elements[5];
-+closureN_type c_7314447;
-+object e_7314483 [5];
-+c_7314447.hdr.mark = gc_color_red;
-+ c_7314447.hdr.grayed = 0;
-+c_7314447.tag = closureN_tag;
-+ c_7314447.fn = (function_type)__lambda_163;
-+c_7314447.num_args = 1;
-+c_7314447.num_elements = 5;
-+c_7314447.elements = (object *)e_7314483;
-+c_7314447.elements[0] = ((closureN)self_7311887)->elements[1];
-+c_7314447.elements[1] = ((closureN)self_7311887)->elements[2];
-+c_7314447.elements[2] = ((closureN)self_7311887)->elements[3];
-+c_7314447.elements[3] = ((closureN)self_7311887)->elements[4];
-+c_7314447.elements[4] = ((closureN)self_7311887)->elements[5];
++closureN_type c_7314440;
++object e_7314476 [5];
++c_7314440.hdr.mark = gc_color_red;
++ c_7314440.hdr.grayed = 0;
++c_7314440.tag = closureN_tag;
++ c_7314440.fn = (function_type)__lambda_163;
++c_7314440.num_args = 1;
++c_7314440.num_elements = 5;
++c_7314440.elements = (object *)e_7314476;
++c_7314440.elements[0] = ((closureN)self_7311880)->elements[1];
++c_7314440.elements[1] = ((closureN)self_7311880)->elements[2];
++c_7314440.elements[2] = ((closureN)self_7311880)->elements[3];
++c_7314440.elements[3] = ((closureN)self_7311880)->elements[4];
++c_7314440.elements[4] = ((closureN)self_7311880)->elements[5];
  
  
  
 -return_closcall3(data,  car(((closureN)self_7313133)->elements[0]),  &c_7315740, r_734521, Cyc_caar(data, ((closureN)self_7313133)->elements[4]));; 
-+return_closcall3(data,  car(((closureN)self_7311887)->elements[0]),  &c_7314447, r_734076, Cyc_caar(data, ((closureN)self_7311887)->elements[4]));; 
++return_closcall3(data,  car(((closureN)self_7311880)->elements[0]),  &c_7314440, r_734069, Cyc_caar(data, ((closureN)self_7311880)->elements[4]));; 
  }
  
 -static void __lambda_163(void *data, object self_7313134, int argc, object *args) /* object self_7313134, object r_734513 */
-+static void __lambda_163(void *data, object self_7311888, int argc, object *args) /* object self_7311888, object r_734068 */
++static void __lambda_163(void *data, object self_7311881, int argc, object *args) /* object self_7311881, object r_734061 */
   {
 - object r_734513 = args[0];
-+ object r_734068 = args[0];
++ object r_734061 = args[0];
    
  
  
@@ -61104,32 +61368,32 @@ Make let-values be the same as let*-values, to work around
 -c_7315745.elements[2] = ((closureN)self_7313134)->elements[3];
 -c_7315745.elements[3] = ((closureN)self_7313134)->elements[4];
 -c_7315745.elements[4] = r_734513;
-+closureN_type c_7314452;
-+object e_7314479 [5];
-+c_7314452.hdr.mark = gc_color_red;
-+ c_7314452.hdr.grayed = 0;
-+c_7314452.tag = closureN_tag;
-+ c_7314452.fn = (function_type)__lambda_164;
-+c_7314452.num_args = 1;
-+c_7314452.num_elements = 5;
-+c_7314452.elements = (object *)e_7314479;
-+c_7314452.elements[0] = ((closureN)self_7311888)->elements[1];
-+c_7314452.elements[1] = ((closureN)self_7311888)->elements[2];
-+c_7314452.elements[2] = ((closureN)self_7311888)->elements[3];
-+c_7314452.elements[3] = ((closureN)self_7311888)->elements[4];
-+c_7314452.elements[4] = r_734068;
++closureN_type c_7314445;
++object e_7314472 [5];
++c_7314445.hdr.mark = gc_color_red;
++ c_7314445.hdr.grayed = 0;
++c_7314445.tag = closureN_tag;
++ c_7314445.fn = (function_type)__lambda_164;
++c_7314445.num_args = 1;
++c_7314445.num_elements = 5;
++c_7314445.elements = (object *)e_7314472;
++c_7314445.elements[0] = ((closureN)self_7311881)->elements[1];
++c_7314445.elements[1] = ((closureN)self_7311881)->elements[2];
++c_7314445.elements[2] = ((closureN)self_7311881)->elements[3];
++c_7314445.elements[3] = ((closureN)self_7311881)->elements[4];
++c_7314445.elements[4] = r_734061;
  
  
  
 -return_closcall2(data,  car(((closureN)self_7313134)->elements[0]),  &c_7315745, Cyc_cdar(data, ((closureN)self_7313134)->elements[3]));; 
-+return_closcall2(data,  car(((closureN)self_7311888)->elements[0]),  &c_7314452, Cyc_cdar(data, ((closureN)self_7311888)->elements[3]));; 
++return_closcall2(data,  car(((closureN)self_7311881)->elements[0]),  &c_7314445, Cyc_cdar(data, ((closureN)self_7311881)->elements[3]));; 
  }
  
 -static void __lambda_164(void *data, object self_7313135, int argc, object *args) /* object self_7313135, object r_734515 */
-+static void __lambda_164(void *data, object self_7311889, int argc, object *args) /* object self_7311889, object r_734070 */
++static void __lambda_164(void *data, object self_7311882, int argc, object *args) /* object self_7311882, object r_734063 */
   {
 - object r_734515 = args[0];
-+ object r_734070 = args[0];
++ object r_734063 = args[0];
    
  
  
@@ -61146,52 +61410,52 @@ Make let-values be the same as let*-values, to work around
 -c_7315750.elements[1] = ((closureN)self_7313135)->elements[3];
 -c_7315750.elements[2] = ((closureN)self_7313135)->elements[4];
 -c_7315750.elements[3] = r_734515;
-+closureN_type c_7314457;
-+object e_7314475 [4];
-+c_7314457.hdr.mark = gc_color_red;
-+ c_7314457.hdr.grayed = 0;
-+c_7314457.tag = closureN_tag;
-+ c_7314457.fn = (function_type)__lambda_165;
-+c_7314457.num_args = 1;
-+c_7314457.num_elements = 4;
-+c_7314457.elements = (object *)e_7314475;
-+c_7314457.elements[0] = ((closureN)self_7311889)->elements[1];
-+c_7314457.elements[1] = ((closureN)self_7311889)->elements[3];
-+c_7314457.elements[2] = ((closureN)self_7311889)->elements[4];
-+c_7314457.elements[3] = r_734070;
++closureN_type c_7314450;
++object e_7314468 [4];
++c_7314450.hdr.mark = gc_color_red;
++ c_7314450.hdr.grayed = 0;
++c_7314450.tag = closureN_tag;
++ c_7314450.fn = (function_type)__lambda_165;
++c_7314450.num_args = 1;
++c_7314450.num_elements = 4;
++c_7314450.elements = (object *)e_7314468;
++c_7314450.elements[0] = ((closureN)self_7311882)->elements[1];
++c_7314450.elements[1] = ((closureN)self_7311882)->elements[3];
++c_7314450.elements[2] = ((closureN)self_7311882)->elements[4];
++c_7314450.elements[3] = r_734063;
  
  
  
 -return_closcall2(data,  car(((closureN)self_7313135)->elements[0]),  &c_7315750, Cyc_cdr(data, ((closureN)self_7313135)->elements[2]));; 
-+return_closcall2(data,  car(((closureN)self_7311889)->elements[0]),  &c_7314457, Cyc_cdr(data, ((closureN)self_7311889)->elements[2]));; 
++return_closcall2(data,  car(((closureN)self_7311882)->elements[0]),  &c_7314450, Cyc_cdr(data, ((closureN)self_7311882)->elements[2]));; 
  }
  
 -static void __lambda_165(void *data, object self_7313136, int argc, object *args) /* object self_7313136, object r_734517 */
-+static void __lambda_165(void *data, object self_7311890, int argc, object *args) /* object self_7311890, object r_734072 */
++static void __lambda_165(void *data, object self_7311883, int argc, object *args) /* object self_7311883, object r_734065 */
   {
 - object r_734517 = args[0];
-+ object r_734072 = args[0];
++ object r_734065 = args[0];
    
 -pair_type local_7315755; 
-+pair_type local_7314462; 
++pair_type local_7314455; 
  
 -pair_type local_7315759; 
-+pair_type local_7314466; 
++pair_type local_7314459; 
  
 -pair_type local_7315763; 
-+pair_type local_7314470; 
++pair_type local_7314463; 
  
 -pair_type local_7315767; 
 -return_direct_with_clo1(data,  ((closureN)self_7313136)->elements[0], (((closure)  ((closureN)self_7313136)->elements[0])->fn),  set_pair_as_expr(&local_7315755, ((closureN)self_7313136)->elements[1], set_pair_as_expr(&local_7315759, ((closureN)self_7313136)->elements[2], set_pair_as_expr(&local_7315763, ((closureN)self_7313136)->elements[3], set_pair_as_expr(&local_7315767, r_734517, NULL)))));; 
-+pair_type local_7314474; 
-+return_direct_with_clo1(data,  ((closureN)self_7311890)->elements[0], (((closure)  ((closureN)self_7311890)->elements[0])->fn),  set_pair_as_expr(&local_7314462, ((closureN)self_7311890)->elements[1], set_pair_as_expr(&local_7314466, ((closureN)self_7311890)->elements[2], set_pair_as_expr(&local_7314470, ((closureN)self_7311890)->elements[3], set_pair_as_expr(&local_7314474, r_734072, NULL)))));; 
++pair_type local_7314467; 
++return_direct_with_clo1(data,  ((closureN)self_7311883)->elements[0], (((closure)  ((closureN)self_7311883)->elements[0])->fn),  set_pair_as_expr(&local_7314455, ((closureN)self_7311883)->elements[1], set_pair_as_expr(&local_7314459, ((closureN)self_7311883)->elements[2], set_pair_as_expr(&local_7314463, ((closureN)self_7311883)->elements[3], set_pair_as_expr(&local_7314467, r_734065, NULL)))));; 
  }
  
 -static void __lambda_155(void *data, object self_7313126, int argc, object *args) /* object self_7313126, object r_734486 */
-+static void __lambda_155(void *data, object self_7311880, int argc, object *args) /* object self_7311880, object r_734041 */
++static void __lambda_155(void *data, object self_7311873, int argc, object *args) /* object self_7311873, object r_734034 */
   {
 - object r_734486 = args[0];
-+ object r_734041 = args[0];
++ object r_734034 = args[0];
    
 -closureN_type c_7315662;
 -object e_7315728 [6];
@@ -61208,31 +61472,31 @@ Make let-values be the same as let*-values, to work around
 -c_7315662.elements[3] = ((closureN)self_7313126)->elements[3];
 -c_7315662.elements[4] = r_734486;
 -c_7315662.elements[5] = ((closureN)self_7313126)->elements[4];
-+closureN_type c_7314369;
-+object e_7314435 [6];
-+c_7314369.hdr.mark = gc_color_red;
-+ c_7314369.hdr.grayed = 0;
-+c_7314369.tag = closureN_tag;
-+ c_7314369.fn = (function_type)__lambda_156;
-+c_7314369.num_args = 1;
-+c_7314369.num_elements = 6;
-+c_7314369.elements = (object *)e_7314435;
-+c_7314369.elements[0] = ((closureN)self_7311880)->elements[0];
-+c_7314369.elements[1] = ((closureN)self_7311880)->elements[1];
-+c_7314369.elements[2] = ((closureN)self_7311880)->elements[2];
-+c_7314369.elements[3] = ((closureN)self_7311880)->elements[3];
-+c_7314369.elements[4] = r_734041;
-+c_7314369.elements[5] = ((closureN)self_7311880)->elements[4];
++closureN_type c_7314362;
++object e_7314428 [6];
++c_7314362.hdr.mark = gc_color_red;
++ c_7314362.hdr.grayed = 0;
++c_7314362.tag = closureN_tag;
++ c_7314362.fn = (function_type)__lambda_156;
++c_7314362.num_args = 1;
++c_7314362.num_elements = 6;
++c_7314362.elements = (object *)e_7314428;
++c_7314362.elements[0] = ((closureN)self_7311873)->elements[0];
++c_7314362.elements[1] = ((closureN)self_7311873)->elements[1];
++c_7314362.elements[2] = ((closureN)self_7311873)->elements[2];
++c_7314362.elements[3] = ((closureN)self_7311873)->elements[3];
++c_7314362.elements[4] = r_734034;
++c_7314362.elements[5] = ((closureN)self_7311873)->elements[4];
  
 -return_closcall2(data,  ((closureN)self_7313126)->elements[4],  &c_7315662, quote_eqv_127);; 
-+return_closcall2(data,  ((closureN)self_7311880)->elements[4],  &c_7314369, quote_eqv_127);; 
++return_closcall2(data,  ((closureN)self_7311873)->elements[4],  &c_7314362, quote_eqv_127);; 
  }
  
 -static void __lambda_156(void *data, object self_7313127, int argc, object *args) /* object self_7313127, object r_734496 */
-+static void __lambda_156(void *data, object self_7311881, int argc, object *args) /* object self_7311881, object r_734051 */
++static void __lambda_156(void *data, object self_7311874, int argc, object *args) /* object self_7311874, object r_734044 */
   {
 - object r_734496 = args[0];
-+ object r_734051 = args[0];
++ object r_734044 = args[0];
    
 -closureN_type c_7315665;
 -object e_7315727 [7];
@@ -61250,33 +61514,14 @@ Make let-values be the same as let*-values, to work around
 -c_7315665.elements[4] = ((closureN)self_7313127)->elements[4];
 -c_7315665.elements[5] = r_734496;
 -c_7315665.elements[6] = ((closureN)self_7313127)->elements[5];
-+closureN_type c_7314372;
-+object e_7314434 [7];
-+c_7314372.hdr.mark = gc_color_red;
-+ c_7314372.hdr.grayed = 0;
-+c_7314372.tag = closureN_tag;
-+ c_7314372.fn = (function_type)__lambda_157;
-+c_7314372.num_args = 1;
-+c_7314372.num_elements = 7;
-+c_7314372.elements = (object *)e_7314434;
-+c_7314372.elements[0] = ((closureN)self_7311881)->elements[0];
-+c_7314372.elements[1] = ((closureN)self_7311881)->elements[1];
-+c_7314372.elements[2] = ((closureN)self_7311881)->elements[2];
-+c_7314372.elements[3] = ((closureN)self_7311881)->elements[3];
-+c_7314372.elements[4] = ((closureN)self_7311881)->elements[4];
-+c_7314372.elements[5] = r_734051;
-+c_7314372.elements[6] = ((closureN)self_7311881)->elements[5];
- 
+-
 -return_closcall2(data,  ((closureN)self_7313127)->elements[5],  &c_7315665, quote_tmp);; 
-+return_closcall2(data,  ((closureN)self_7311881)->elements[5],  &c_7314372, quote_tmp);; 
- }
- 
+-}
+-
 -static void __lambda_157(void *data, object self_7313128, int argc, object *args) /* object self_7313128, object r_734498 */
-+static void __lambda_157(void *data, object self_7311882, int argc, object *args) /* object self_7311882, object r_734053 */
-  {
+- {
 - object r_734498 = args[0];
-+ object r_734053 = args[0];
-   
+-  
 -closureN_type c_7315668;
 -object e_7315726 [7];
 -c_7315668.hdr.mark = gc_color_red;
@@ -61293,32 +61538,56 @@ Make let-values be the same as let*-values, to work around
 -c_7315668.elements[4] = ((closureN)self_7313128)->elements[4];
 -c_7315668.elements[5] = ((closureN)self_7313128)->elements[5];
 -c_7315668.elements[6] = r_734498;
-+closureN_type c_7314375;
-+object e_7314433 [7];
-+c_7314375.hdr.mark = gc_color_red;
-+ c_7314375.hdr.grayed = 0;
-+c_7314375.tag = closureN_tag;
-+ c_7314375.fn = (function_type)__lambda_158;
-+c_7314375.num_args = 1;
-+c_7314375.num_elements = 7;
-+c_7314375.elements = (object *)e_7314433;
-+c_7314375.elements[0] = ((closureN)self_7311882)->elements[0];
-+c_7314375.elements[1] = ((closureN)self_7311882)->elements[1];
-+c_7314375.elements[2] = ((closureN)self_7311882)->elements[2];
-+c_7314375.elements[3] = ((closureN)self_7311882)->elements[3];
-+c_7314375.elements[4] = ((closureN)self_7311882)->elements[4];
-+c_7314375.elements[5] = ((closureN)self_7311882)->elements[5];
-+c_7314375.elements[6] = r_734053;
++closureN_type c_7314365;
++object e_7314427 [7];
++c_7314365.hdr.mark = gc_color_red;
++ c_7314365.hdr.grayed = 0;
++c_7314365.tag = closureN_tag;
++ c_7314365.fn = (function_type)__lambda_157;
++c_7314365.num_args = 1;
++c_7314365.num_elements = 7;
++c_7314365.elements = (object *)e_7314427;
++c_7314365.elements[0] = ((closureN)self_7311874)->elements[0];
++c_7314365.elements[1] = ((closureN)self_7311874)->elements[1];
++c_7314365.elements[2] = ((closureN)self_7311874)->elements[2];
++c_7314365.elements[3] = ((closureN)self_7311874)->elements[3];
++c_7314365.elements[4] = ((closureN)self_7311874)->elements[4];
++c_7314365.elements[5] = r_734044;
++c_7314365.elements[6] = ((closureN)self_7311874)->elements[5];
  
 -return_closcall2(data,  ((closureN)self_7313128)->elements[6],  &c_7315668, quote_quote);; 
-+return_closcall2(data,  ((closureN)self_7311882)->elements[6],  &c_7314375, quote_quote);; 
++return_closcall2(data,  ((closureN)self_7311874)->elements[5],  &c_7314365, quote_tmp);; 
  }
  
 -static void __lambda_158(void *data, object self_7313129, int argc, object *args) /* object self_7313129, object r_734502 */
-+static void __lambda_158(void *data, object self_7311883, int argc, object *args) /* object self_7311883, object r_734057 */
++static void __lambda_157(void *data, object self_7311875, int argc, object *args) /* object self_7311875, object r_734046 */
   {
 - object r_734502 = args[0];
-+ object r_734057 = args[0];
++ object r_734046 = args[0];
++  
++closureN_type c_7314368;
++object e_7314426 [7];
++c_7314368.hdr.mark = gc_color_red;
++ c_7314368.hdr.grayed = 0;
++c_7314368.tag = closureN_tag;
++ c_7314368.fn = (function_type)__lambda_158;
++c_7314368.num_args = 1;
++c_7314368.num_elements = 7;
++c_7314368.elements = (object *)e_7314426;
++c_7314368.elements[0] = ((closureN)self_7311875)->elements[0];
++c_7314368.elements[1] = ((closureN)self_7311875)->elements[1];
++c_7314368.elements[2] = ((closureN)self_7311875)->elements[2];
++c_7314368.elements[3] = ((closureN)self_7311875)->elements[3];
++c_7314368.elements[4] = ((closureN)self_7311875)->elements[4];
++c_7314368.elements[5] = ((closureN)self_7311875)->elements[5];
++c_7314368.elements[6] = r_734046;
++
++return_closcall2(data,  ((closureN)self_7311875)->elements[6],  &c_7314368, quote_quote);; 
++}
++
++static void __lambda_158(void *data, object self_7311876, int argc, object *args) /* object self_7311876, object r_734050 */
++ {
++ object r_734050 = args[0];
    
  
  
@@ -61338,34 +61607,34 @@ Make let-values be the same as let*-values, to work around
 -c_7315673.elements[4] = ((closureN)self_7313129)->elements[5];
 -c_7315673.elements[5] = ((closureN)self_7313129)->elements[6];
 -c_7315673.elements[6] = r_734502;
-+closureN_type c_7314380;
-+object e_7314429 [7];
-+c_7314380.hdr.mark = gc_color_red;
-+ c_7314380.hdr.grayed = 0;
-+c_7314380.tag = closureN_tag;
-+ c_7314380.fn = (function_type)__lambda_159;
-+c_7314380.num_args = 1;
-+c_7314380.num_elements = 7;
-+c_7314380.elements = (object *)e_7314429;
-+c_7314380.elements[0] = ((closureN)self_7311883)->elements[1];
-+c_7314380.elements[1] = ((closureN)self_7311883)->elements[2];
-+c_7314380.elements[2] = ((closureN)self_7311883)->elements[3];
-+c_7314380.elements[3] = ((closureN)self_7311883)->elements[4];
-+c_7314380.elements[4] = ((closureN)self_7311883)->elements[5];
-+c_7314380.elements[5] = ((closureN)self_7311883)->elements[6];
-+c_7314380.elements[6] = r_734057;
++closureN_type c_7314373;
++object e_7314422 [7];
++c_7314373.hdr.mark = gc_color_red;
++ c_7314373.hdr.grayed = 0;
++c_7314373.tag = closureN_tag;
++ c_7314373.fn = (function_type)__lambda_159;
++c_7314373.num_args = 1;
++c_7314373.num_elements = 7;
++c_7314373.elements = (object *)e_7314422;
++c_7314373.elements[0] = ((closureN)self_7311876)->elements[1];
++c_7314373.elements[1] = ((closureN)self_7311876)->elements[2];
++c_7314373.elements[2] = ((closureN)self_7311876)->elements[3];
++c_7314373.elements[3] = ((closureN)self_7311876)->elements[4];
++c_7314373.elements[4] = ((closureN)self_7311876)->elements[5];
++c_7314373.elements[5] = ((closureN)self_7311876)->elements[6];
++c_7314373.elements[6] = r_734050;
  
  
  
 -return_closcall2(data,  car(((closureN)self_7313129)->elements[0]),  &c_7315673, Cyc_cdar(data, ((closureN)self_7313129)->elements[3]));; 
-+return_closcall2(data,  car(((closureN)self_7311883)->elements[0]),  &c_7314380, Cyc_cdar(data, ((closureN)self_7311883)->elements[3]));; 
++return_closcall2(data,  car(((closureN)self_7311876)->elements[0]),  &c_7314373, Cyc_cdar(data, ((closureN)self_7311876)->elements[3]));; 
  }
  
 -static void __lambda_159(void *data, object self_7313130, int argc, object *args) /* object self_7313130, object r_734490 */
-+static void __lambda_159(void *data, object self_7311884, int argc, object *args) /* object self_7311884, object r_734045 */
++static void __lambda_159(void *data, object self_7311877, int argc, object *args) /* object self_7311877, object r_734038 */
   {
 - object r_734490 = args[0];
-+ object r_734045 = args[0];
++ object r_734038 = args[0];
    
  
  
@@ -61385,74 +61654,74 @@ Make let-values be the same as let*-values, to work around
 -c_7315678.elements[4] = ((closureN)self_7313130)->elements[4];
 -c_7315678.elements[5] = ((closureN)self_7313130)->elements[5];
 -c_7315678.elements[6] = ((closureN)self_7313130)->elements[6];
-+closureN_type c_7314385;
-+object e_7314425 [7];
-+c_7314385.hdr.mark = gc_color_red;
-+ c_7314385.hdr.grayed = 0;
-+c_7314385.tag = closureN_tag;
-+ c_7314385.fn = (function_type)__lambda_160;
-+c_7314385.num_args = 1;
-+c_7314385.num_elements = 7;
-+c_7314385.elements = (object *)e_7314425;
-+c_7314385.elements[0] = ((closureN)self_7311884)->elements[1];
-+c_7314385.elements[1] = ((closureN)self_7311884)->elements[2];
-+c_7314385.elements[2] = ((closureN)self_7311884)->elements[3];
-+c_7314385.elements[3] = r_734045;
-+c_7314385.elements[4] = ((closureN)self_7311884)->elements[4];
-+c_7314385.elements[5] = ((closureN)self_7311884)->elements[5];
-+c_7314385.elements[6] = ((closureN)self_7311884)->elements[6];
++closureN_type c_7314378;
++object e_7314418 [7];
++c_7314378.hdr.mark = gc_color_red;
++ c_7314378.hdr.grayed = 0;
++c_7314378.tag = closureN_tag;
++ c_7314378.fn = (function_type)__lambda_160;
++c_7314378.num_args = 1;
++c_7314378.num_elements = 7;
++c_7314378.elements = (object *)e_7314418;
++c_7314378.elements[0] = ((closureN)self_7311877)->elements[1];
++c_7314378.elements[1] = ((closureN)self_7311877)->elements[2];
++c_7314378.elements[2] = ((closureN)self_7311877)->elements[3];
++c_7314378.elements[3] = r_734038;
++c_7314378.elements[4] = ((closureN)self_7311877)->elements[4];
++c_7314378.elements[5] = ((closureN)self_7311877)->elements[5];
++c_7314378.elements[6] = ((closureN)self_7311877)->elements[6];
  
  
  
 -return_closcall2(data,  car(((closureN)self_7313130)->elements[0]),  &c_7315678, Cyc_cdr(data, ((closureN)self_7313130)->elements[2]));; 
-+return_closcall2(data,  car(((closureN)self_7311884)->elements[0]),  &c_7314385, Cyc_cdr(data, ((closureN)self_7311884)->elements[2]));; 
++return_closcall2(data,  car(((closureN)self_7311877)->elements[0]),  &c_7314378, Cyc_cdr(data, ((closureN)self_7311877)->elements[2]));; 
  }
  
 -static void __lambda_160(void *data, object self_7313131, int argc, object *args) /* object self_7313131, object r_734492 */
-+static void __lambda_160(void *data, object self_7311885, int argc, object *args) /* object self_7311885, object r_734047 */
++static void __lambda_160(void *data, object self_7311878, int argc, object *args) /* object self_7311878, object r_734040 */
   {
 - object r_734492 = args[0];
-+ object r_734047 = args[0];
++ object r_734040 = args[0];
    
 -pair_type local_7315683; 
-+pair_type local_7314390; 
++pair_type local_7314383; 
  
 -pair_type local_7315687; 
-+pair_type local_7314394; 
++pair_type local_7314387; 
  
 -pair_type local_7315690; 
-+pair_type local_7314397; 
++pair_type local_7314390; 
  
 -pair_type local_7315694; 
-+pair_type local_7314401; 
++pair_type local_7314394; 
  
 -pair_type local_7315698; 
-+pair_type local_7314405; 
++pair_type local_7314398; 
  
 -pair_type local_7315701; 
-+pair_type local_7314408; 
++pair_type local_7314401; 
  
 -pair_type local_7315705; 
-+pair_type local_7314412; 
++pair_type local_7314405; 
  
  
  
  
  
 -pair_type local_7315713; 
-+pair_type local_7314420; 
++pair_type local_7314413; 
  
 -pair_type local_7315717; 
 -return_direct_with_clo1(data,  ((closureN)self_7313131)->elements[0], (((closure)  ((closureN)self_7313131)->elements[0])->fn),  set_pair_as_expr(&local_7315683, ((closureN)self_7313131)->elements[2], set_pair_as_expr(&local_7315687, set_pair_as_expr(&local_7315690, ((closureN)self_7313131)->elements[4], set_pair_as_expr(&local_7315694, ((closureN)self_7313131)->elements[5], set_pair_as_expr(&local_7315698, set_pair_as_expr(&local_7315701, ((closureN)self_7313131)->elements[6], set_pair_as_expr(&local_7315705, Cyc_car(data, Cyc_caar(data, ((closureN)self_7313131)->elements[1])), NULL)), NULL))), set_pair_as_expr(&local_7315713, ((closureN)self_7313131)->elements[3], set_pair_as_expr(&local_7315717, r_734492, NULL)))));; 
-+pair_type local_7314424; 
-+return_direct_with_clo1(data,  ((closureN)self_7311885)->elements[0], (((closure)  ((closureN)self_7311885)->elements[0])->fn),  set_pair_as_expr(&local_7314390, ((closureN)self_7311885)->elements[2], set_pair_as_expr(&local_7314394, set_pair_as_expr(&local_7314397, ((closureN)self_7311885)->elements[4], set_pair_as_expr(&local_7314401, ((closureN)self_7311885)->elements[5], set_pair_as_expr(&local_7314405, set_pair_as_expr(&local_7314408, ((closureN)self_7311885)->elements[6], set_pair_as_expr(&local_7314412, Cyc_car(data, Cyc_caar(data, ((closureN)self_7311885)->elements[1])), NULL)), NULL))), set_pair_as_expr(&local_7314420, ((closureN)self_7311885)->elements[3], set_pair_as_expr(&local_7314424, r_734047, NULL)))));; 
++pair_type local_7314417; 
++return_direct_with_clo1(data,  ((closureN)self_7311878)->elements[0], (((closure)  ((closureN)self_7311878)->elements[0])->fn),  set_pair_as_expr(&local_7314383, ((closureN)self_7311878)->elements[2], set_pair_as_expr(&local_7314387, set_pair_as_expr(&local_7314390, ((closureN)self_7311878)->elements[4], set_pair_as_expr(&local_7314394, ((closureN)self_7311878)->elements[5], set_pair_as_expr(&local_7314398, set_pair_as_expr(&local_7314401, ((closureN)self_7311878)->elements[6], set_pair_as_expr(&local_7314405, Cyc_car(data, Cyc_caar(data, ((closureN)self_7311878)->elements[1])), NULL)), NULL))), set_pair_as_expr(&local_7314413, ((closureN)self_7311878)->elements[3], set_pair_as_expr(&local_7314417, r_734040, NULL)))));; 
  }
  
 -static void __lambda_148(void *data, object self_7313137, int argc, object *args) /* object self_7313137, object r_734480 */
-+static void __lambda_148(void *data, object self_7311891, int argc, object *args) /* object self_7311891, object r_734035 */
++static void __lambda_148(void *data, object self_7311884, int argc, object *args) /* object self_7311884, object r_734028 */
   {
 - object r_734480 = args[0];
-+ object r_734035 = args[0];
++ object r_734028 = args[0];
    
 -closureN_type c_7315577;
 -object e_7315615 [4];
@@ -61467,28 +61736,28 @@ Make let-values be the same as let*-values, to work around
 -c_7315577.elements[1] = ((closureN)self_7313137)->elements[1];
 -c_7315577.elements[2] = ((closureN)self_7313137)->elements[2];
 -c_7315577.elements[3] = ((closureN)self_7313137)->elements[3];
-+closureN_type c_7314284;
-+object e_7314322 [4];
-+c_7314284.hdr.mark = gc_color_red;
-+ c_7314284.hdr.grayed = 0;
-+c_7314284.tag = closureN_tag;
-+ c_7314284.fn = (function_type)__lambda_149;
-+c_7314284.num_args = 1;
-+c_7314284.num_elements = 4;
-+c_7314284.elements = (object *)e_7314322;
-+c_7314284.elements[0] = ((closureN)self_7311891)->elements[0];
-+c_7314284.elements[1] = ((closureN)self_7311891)->elements[1];
-+c_7314284.elements[2] = ((closureN)self_7311891)->elements[2];
-+c_7314284.elements[3] = ((closureN)self_7311891)->elements[3];
++closureN_type c_7314277;
++object e_7314315 [4];
++c_7314277.hdr.mark = gc_color_red;
++ c_7314277.hdr.grayed = 0;
++c_7314277.tag = closureN_tag;
++ c_7314277.fn = (function_type)__lambda_149;
++c_7314277.num_args = 1;
++c_7314277.num_elements = 4;
++c_7314277.elements = (object *)e_7314315;
++c_7314277.elements[0] = ((closureN)self_7311884)->elements[0];
++c_7314277.elements[1] = ((closureN)self_7311884)->elements[1];
++c_7314277.elements[2] = ((closureN)self_7311884)->elements[2];
++c_7314277.elements[3] = ((closureN)self_7311884)->elements[3];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7315577,__lambda_149,  Cyc_set_cell(data, ((closureN)self_7313137)->elements[0], r_734480));; 
-+return_direct_with_clo1(data,(closure)&c_7314284,__lambda_149,  Cyc_set_cell(data, ((closureN)self_7311891)->elements[0], r_734035));; 
++return_direct_with_clo1(data,(closure)&c_7314277,__lambda_149,  Cyc_set_cell(data, ((closureN)self_7311884)->elements[0], r_734028));; 
  }
  
 -static void __lambda_149(void *data, object self_7313138, int argc, object *args) /* object self_7313138, object r_734465 */
-+static void __lambda_149(void *data, object self_7311892, int argc, object *args) /* object self_7311892, object r_734020 */
++static void __lambda_149(void *data, object self_7311885, int argc, object *args) /* object self_7311885, object r_734013 */
   {
  
    
@@ -61504,28 +61773,28 @@ Make let-values be the same as let*-values, to work around
 -c_7315580.elements[0] = ((closureN)self_7313138)->elements[0];
 -c_7315580.elements[1] = ((closureN)self_7313138)->elements[1];
 -c_7315580.elements[2] = ((closureN)self_7313138)->elements[2];
-+closureN_type c_7314287;
-+object e_7314321 [3];
-+c_7314287.hdr.mark = gc_color_red;
-+ c_7314287.hdr.grayed = 0;
-+c_7314287.tag = closureN_tag;
-+ c_7314287.fn = (function_type)__lambda_150;
-+c_7314287.num_args = 1;
-+c_7314287.num_elements = 3;
-+c_7314287.elements = (object *)e_7314321;
-+c_7314287.elements[0] = ((closureN)self_7311892)->elements[0];
-+c_7314287.elements[1] = ((closureN)self_7311892)->elements[1];
-+c_7314287.elements[2] = ((closureN)self_7311892)->elements[2];
++closureN_type c_7314280;
++object e_7314314 [3];
++c_7314280.hdr.mark = gc_color_red;
++ c_7314280.hdr.grayed = 0;
++c_7314280.tag = closureN_tag;
++ c_7314280.fn = (function_type)__lambda_150;
++c_7314280.num_args = 1;
++c_7314280.num_elements = 3;
++c_7314280.elements = (object *)e_7314314;
++c_7314280.elements[0] = ((closureN)self_7311885)->elements[0];
++c_7314280.elements[1] = ((closureN)self_7311885)->elements[1];
++c_7314280.elements[2] = ((closureN)self_7311885)->elements[2];
  
 -return_closcall2(data,  ((closureN)self_7313138)->elements[3],  &c_7315580, quote_tmp);; 
-+return_closcall2(data,  ((closureN)self_7311892)->elements[3],  &c_7314287, quote_tmp);; 
++return_closcall2(data,  ((closureN)self_7311885)->elements[3],  &c_7314280, quote_tmp);; 
  }
  
 -static void __lambda_150(void *data, object self_7313139, int argc, object *args) /* object self_7313139, object r_734475 */
-+static void __lambda_150(void *data, object self_7311893, int argc, object *args) /* object self_7311893, object r_734030 */
++static void __lambda_150(void *data, object self_7311886, int argc, object *args) /* object self_7311886, object r_734023 */
   {
 - object r_734475 = args[0];
-+ object r_734030 = args[0];
++ object r_734023 = args[0];
    
  
  
@@ -61541,61 +61810,60 @@ Make let-values be the same as let*-values, to work around
 -c_7315585.elements[0] = ((closureN)self_7313139)->elements[1];
 -c_7315585.elements[1] = ((closureN)self_7313139)->elements[2];
 -c_7315585.elements[2] = r_734475;
-+closureN_type c_7314292;
-+object e_7314317 [3];
-+c_7314292.hdr.mark = gc_color_red;
-+ c_7314292.hdr.grayed = 0;
-+c_7314292.tag = closureN_tag;
-+ c_7314292.fn = (function_type)__lambda_151;
-+c_7314292.num_args = 1;
-+c_7314292.num_elements = 3;
-+c_7314292.elements = (object *)e_7314317;
-+c_7314292.elements[0] = ((closureN)self_7311893)->elements[1];
-+c_7314292.elements[1] = ((closureN)self_7311893)->elements[2];
-+c_7314292.elements[2] = r_734030;
++closureN_type c_7314285;
++object e_7314310 [3];
++c_7314285.hdr.mark = gc_color_red;
++ c_7314285.hdr.grayed = 0;
++c_7314285.tag = closureN_tag;
++ c_7314285.fn = (function_type)__lambda_151;
++c_7314285.num_args = 1;
++c_7314285.num_elements = 3;
++c_7314285.elements = (object *)e_7314310;
++c_7314285.elements[0] = ((closureN)self_7311886)->elements[1];
++c_7314285.elements[1] = ((closureN)self_7311886)->elements[2];
++c_7314285.elements[2] = r_734023;
  
  
  
 -return_closcall2(data,  car(((closureN)self_7313139)->elements[0]),  &c_7315585, Cyc_cddr(data, ((closureN)self_7313139)->elements[1]));; 
-+return_closcall2(data,  car(((closureN)self_7311893)->elements[0]),  &c_7314292, Cyc_cddr(data, ((closureN)self_7311893)->elements[1]));; 
++return_closcall2(data,  car(((closureN)self_7311886)->elements[0]),  &c_7314285, Cyc_cddr(data, ((closureN)self_7311886)->elements[1]));; 
  }
  
 -static void __lambda_151(void *data, object self_7313140, int argc, object *args) /* object self_7313140, object r_734470 */
-+static void __lambda_151(void *data, object self_7311894, int argc, object *args) /* object self_7311894, object r_734025 */
++static void __lambda_151(void *data, object self_7311887, int argc, object *args) /* object self_7311887, object r_734018 */
   {
 - object r_734470 = args[0];
-+ object r_734025 = args[0];
++ object r_734018 = args[0];
    
 -pair_type local_7315590; 
-+pair_type local_7314297; 
++pair_type local_7314290; 
  
 -pair_type local_7315593; 
-+pair_type local_7314300; 
++pair_type local_7314293; 
  
 -pair_type local_7315596; 
-+pair_type local_7314303; 
++pair_type local_7314296; 
  
 -pair_type local_7315599; 
-+pair_type local_7314306; 
++pair_type local_7314299; 
  
 -pair_type local_7315603; 
-+pair_type local_7314310; 
++pair_type local_7314303; 
  
  
  
 -pair_type local_7315609; 
 -return_direct_with_clo1(data,  ((closureN)self_7313140)->elements[1], (((closure)  ((closureN)self_7313140)->elements[1])->fn),  set_pair_as_expr(&local_7315590, quote_let, set_pair_as_expr(&local_7315593, set_pair_as_expr(&local_7315596, set_pair_as_expr(&local_7315599, ((closureN)self_7313140)->elements[2], set_pair_as_expr(&local_7315603, Cyc_cadr(data, ((closureN)self_7313140)->elements[0]), NULL)), NULL), set_pair_as_expr(&local_7315609, r_734470, NULL))));; 
-+pair_type local_7314316; 
-+return_direct_with_clo1(data,  ((closureN)self_7311894)->elements[1], (((closure)  ((closureN)self_7311894)->elements[1])->fn),  set_pair_as_expr(&local_7314297, quote_let, set_pair_as_expr(&local_7314300, set_pair_as_expr(&local_7314303, set_pair_as_expr(&local_7314306, ((closureN)self_7311894)->elements[2], set_pair_as_expr(&local_7314310, Cyc_cadr(data, ((closureN)self_7311894)->elements[0]), NULL)), NULL), set_pair_as_expr(&local_7314316, r_734025, NULL))));; 
++pair_type local_7314309; 
++return_direct_with_clo1(data,  ((closureN)self_7311887)->elements[1], (((closure)  ((closureN)self_7311887)->elements[1])->fn),  set_pair_as_expr(&local_7314290, quote_let, set_pair_as_expr(&local_7314293, set_pair_as_expr(&local_7314296, set_pair_as_expr(&local_7314299, ((closureN)self_7311887)->elements[2], set_pair_as_expr(&local_7314303, Cyc_cadr(data, ((closureN)self_7311887)->elements[0]), NULL)), NULL), set_pair_as_expr(&local_7314309, r_734018, NULL))));; 
  }
  
 -static void __lambda_121(void *data, object _, int argc, object *args) /* closure _,object k_734398, object expr_73168_732919, object rename_73169_732920, object compare_73170_732921 */
-+static void __lambda_121(void *data, object _, int argc, object *args) /* closure _,object k_733953, object expr_73168_732579, object rename_73169_732580, object compare_73170_732581 */
++static void __lambda_121(void *data, object _, int argc, object *args) /* closure _,object k_733946, object expr_73168_732572, object rename_73169_732573, object compare_73170_732574 */
   {
 -object k_734398 = args[0]; object expr_73168_732919 = args[1]; object rename_73169_732920 = args[2]; object compare_73170_732921 = args[3];
--  Cyc_st_add(data, "scheme/base.sld:cond");
-+object k_733953 = args[0]; object expr_73168_732579 = args[1]; object rename_73169_732580 = args[2]; object compare_73170_732581 = args[3];
-+  Cyc_st_add(data, "base.sld:cond");
++object k_733946 = args[0]; object expr_73168_732572 = args[1]; object rename_73169_732573 = args[2]; object compare_73170_732574 = args[3];
+   Cyc_st_add(data, "scheme/base.sld:cond");
  
 -closureN_type c_7315367;
 -object e_7315554 [4];
@@ -61610,36 +61878,36 @@ Make let-values be the same as let*-values, to work around
 -c_7315367.elements[1] = expr_73168_732919;
 -c_7315367.elements[2] = k_734398;
 -c_7315367.elements[3] = rename_73169_732920;
-+closureN_type c_7314074;
-+object e_7314261 [4];
-+c_7314074.hdr.mark = gc_color_red;
-+ c_7314074.hdr.grayed = 0;
-+c_7314074.tag = closureN_tag;
-+ c_7314074.fn = (function_type)__lambda_122;
-+c_7314074.num_args = 1;
-+c_7314074.num_elements = 4;
-+c_7314074.elements = (object *)e_7314261;
-+c_7314074.elements[0] = compare_73170_732581;
-+c_7314074.elements[1] = expr_73168_732579;
-+c_7314074.elements[2] = k_733953;
-+c_7314074.elements[3] = rename_73169_732580;
++closureN_type c_7314067;
++object e_7314254 [4];
++c_7314067.hdr.mark = gc_color_red;
++ c_7314067.hdr.grayed = 0;
++c_7314067.tag = closureN_tag;
++ c_7314067.fn = (function_type)__lambda_122;
++c_7314067.num_args = 1;
++c_7314067.num_elements = 4;
++c_7314067.elements = (object *)e_7314254;
++c_7314067.elements[0] = compare_73170_732574;
++c_7314067.elements[1] = expr_73168_732572;
++c_7314067.elements[2] = k_733946;
++c_7314067.elements[3] = rename_73169_732573;
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7315367,__lambda_122,  Cyc_cdr(data, expr_73168_732919));; 
-+return_direct_with_clo1(data,(closure)&c_7314074,__lambda_122,  Cyc_cdr(data, expr_73168_732579));; 
++return_direct_with_clo1(data,(closure)&c_7314067,__lambda_122,  Cyc_cdr(data, expr_73168_732572));; 
  }
  
 -static void __lambda_122(void *data, object self_7313086, int argc, object *args) /* object self_7313086, object r_734459 */
-+static void __lambda_122(void *data, object self_7311840, int argc, object *args) /* object self_7311840, object r_734014 */
++static void __lambda_122(void *data, object self_7311833, int argc, object *args) /* object self_7311833, object r_734007 */
   {
 - object r_734459 = args[0];
-+ object r_734014 = args[0];
++ object r_734007 = args[0];
      
 -if( (boolean_f != Cyc_is_null(r_734459)) ){ 
 -  return_direct_with_clo1(data,  ((closureN)self_7313086)->elements[2], (((closure)  ((closureN)self_7313086)->elements[2])->fn),  boolean_f);
-+if( (boolean_f != Cyc_is_null(r_734014)) ){ 
-+  return_direct_with_clo1(data,  ((closureN)self_7311840)->elements[2], (((closure)  ((closureN)self_7311840)->elements[2])->fn),  boolean_f);
++if( (boolean_f != Cyc_is_null(r_734007)) ){ 
++  return_direct_with_clo1(data,  ((closureN)self_7311833)->elements[2], (((closure)  ((closureN)self_7311833)->elements[2])->fn),  boolean_f);
  } else { 
    
 -closureN_type c_7315373;
@@ -61655,32 +61923,32 @@ Make let-values be the same as let*-values, to work around
 -c_7315373.elements[1] = ((closureN)self_7313086)->elements[1];
 -c_7315373.elements[2] = ((closureN)self_7313086)->elements[2];
 -c_7315373.elements[3] = ((closureN)self_7313086)->elements[3];
-+closureN_type c_7314080;
-+object e_7314257 [4];
-+c_7314080.hdr.mark = gc_color_red;
-+ c_7314080.hdr.grayed = 0;
-+c_7314080.tag = closureN_tag;
-+ c_7314080.fn = (function_type)__lambda_123;
-+c_7314080.num_args = 1;
-+c_7314080.num_elements = 4;
-+c_7314080.elements = (object *)e_7314257;
-+c_7314080.elements[0] = ((closureN)self_7311840)->elements[0];
-+c_7314080.elements[1] = ((closureN)self_7311840)->elements[1];
-+c_7314080.elements[2] = ((closureN)self_7311840)->elements[2];
-+c_7314080.elements[3] = ((closureN)self_7311840)->elements[3];
++closureN_type c_7314073;
++object e_7314250 [4];
++c_7314073.hdr.mark = gc_color_red;
++ c_7314073.hdr.grayed = 0;
++c_7314073.tag = closureN_tag;
++ c_7314073.fn = (function_type)__lambda_123;
++c_7314073.num_args = 1;
++c_7314073.num_elements = 4;
++c_7314073.elements = (object *)e_7314250;
++c_7314073.elements[0] = ((closureN)self_7311833)->elements[0];
++c_7314073.elements[1] = ((closureN)self_7311833)->elements[1];
++c_7314073.elements[2] = ((closureN)self_7311833)->elements[2];
++c_7314073.elements[3] = ((closureN)self_7311833)->elements[3];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7315373,__lambda_123,  Cyc_cadr(data, ((closureN)self_7313086)->elements[1]));}
-+return_direct_with_clo1(data,(closure)&c_7314080,__lambda_123,  Cyc_cadr(data, ((closureN)self_7311840)->elements[1]));}
++return_direct_with_clo1(data,(closure)&c_7314073,__lambda_123,  Cyc_cadr(data, ((closureN)self_7311833)->elements[1]));}
  ;; 
  }
  
 -static void __lambda_123(void *data, object self_7313087, int argc, object *args) /* object self_7313087, object cl_73171_732922 */
-+static void __lambda_123(void *data, object self_7311841, int argc, object *args) /* object self_7311841, object cl_73171_732582 */
++static void __lambda_123(void *data, object self_7311834, int argc, object *args) /* object self_7311834, object cl_73171_732575 */
   {
 - object cl_73171_732922 = args[0];
-+ object cl_73171_732582 = args[0];
++ object cl_73171_732575 = args[0];
    
 -closureN_type c_7315376;
 -object e_7315549 [5];
@@ -61696,30 +61964,30 @@ Make let-values be the same as let*-values, to work around
 -c_7315376.elements[2] = ((closureN)self_7313087)->elements[1];
 -c_7315376.elements[3] = ((closureN)self_7313087)->elements[2];
 -c_7315376.elements[4] = ((closureN)self_7313087)->elements[3];
-+closureN_type c_7314083;
-+object e_7314256 [5];
-+c_7314083.hdr.mark = gc_color_red;
-+ c_7314083.hdr.grayed = 0;
-+c_7314083.tag = closureN_tag;
-+ c_7314083.fn = (function_type)__lambda_124;
-+c_7314083.num_args = 1;
-+c_7314083.num_elements = 5;
-+c_7314083.elements = (object *)e_7314256;
-+c_7314083.elements[0] = cl_73171_732582;
-+c_7314083.elements[1] = ((closureN)self_7311841)->elements[0];
-+c_7314083.elements[2] = ((closureN)self_7311841)->elements[1];
-+c_7314083.elements[3] = ((closureN)self_7311841)->elements[2];
-+c_7314083.elements[4] = ((closureN)self_7311841)->elements[3];
++closureN_type c_7314076;
++object e_7314249 [5];
++c_7314076.hdr.mark = gc_color_red;
++ c_7314076.hdr.grayed = 0;
++c_7314076.tag = closureN_tag;
++ c_7314076.fn = (function_type)__lambda_124;
++c_7314076.num_args = 1;
++c_7314076.num_elements = 5;
++c_7314076.elements = (object *)e_7314249;
++c_7314076.elements[0] = cl_73171_732575;
++c_7314076.elements[1] = ((closureN)self_7311834)->elements[0];
++c_7314076.elements[2] = ((closureN)self_7311834)->elements[1];
++c_7314076.elements[3] = ((closureN)self_7311834)->elements[2];
++c_7314076.elements[4] = ((closureN)self_7311834)->elements[3];
  
 -return_closcall2(data,  ((closureN)self_7313087)->elements[3],  &c_7315376, quote__else);; 
-+return_closcall2(data,  ((closureN)self_7311841)->elements[3],  &c_7314083, quote__else);; 
++return_closcall2(data,  ((closureN)self_7311834)->elements[3],  &c_7314076, quote__else);; 
  }
  
 -static void __lambda_124(void *data, object self_7313088, int argc, object *args) /* object self_7313088, object r_734456 */
-+static void __lambda_124(void *data, object self_7311842, int argc, object *args) /* object self_7311842, object r_734011 */
++static void __lambda_124(void *data, object self_7311835, int argc, object *args) /* object self_7311835, object r_734004 */
   {
 - object r_734456 = args[0];
-+ object r_734011 = args[0];
++ object r_734004 = args[0];
    
 -closureN_type c_7315379;
 -object e_7315545 [5];
@@ -61735,34 +62003,34 @@ Make let-values be the same as let*-values, to work around
 -c_7315379.elements[2] = ((closureN)self_7313088)->elements[2];
 -c_7315379.elements[3] = ((closureN)self_7313088)->elements[3];
 -c_7315379.elements[4] = ((closureN)self_7313088)->elements[4];
-+closureN_type c_7314086;
-+object e_7314252 [5];
-+c_7314086.hdr.mark = gc_color_red;
-+ c_7314086.hdr.grayed = 0;
-+c_7314086.tag = closureN_tag;
-+ c_7314086.fn = (function_type)__lambda_125;
-+c_7314086.num_args = 1;
-+c_7314086.num_elements = 5;
-+c_7314086.elements = (object *)e_7314252;
-+c_7314086.elements[0] = ((closureN)self_7311842)->elements[0];
-+c_7314086.elements[1] = ((closureN)self_7311842)->elements[1];
-+c_7314086.elements[2] = ((closureN)self_7311842)->elements[2];
-+c_7314086.elements[3] = ((closureN)self_7311842)->elements[3];
-+c_7314086.elements[4] = ((closureN)self_7311842)->elements[4];
++closureN_type c_7314079;
++object e_7314245 [5];
++c_7314079.hdr.mark = gc_color_red;
++ c_7314079.hdr.grayed = 0;
++c_7314079.tag = closureN_tag;
++ c_7314079.fn = (function_type)__lambda_125;
++c_7314079.num_args = 1;
++c_7314079.num_elements = 5;
++c_7314079.elements = (object *)e_7314245;
++c_7314079.elements[0] = ((closureN)self_7311835)->elements[0];
++c_7314079.elements[1] = ((closureN)self_7311835)->elements[1];
++c_7314079.elements[2] = ((closureN)self_7311835)->elements[2];
++c_7314079.elements[3] = ((closureN)self_7311835)->elements[3];
++c_7314079.elements[4] = ((closureN)self_7311835)->elements[4];
  
  
  
 -return_closcall3(data,  ((closureN)self_7313088)->elements[1],  &c_7315379, r_734456, Cyc_car(data, ((closureN)self_7313088)->elements[0]));; 
-+return_closcall3(data,  ((closureN)self_7311842)->elements[1],  &c_7314086, r_734011, Cyc_car(data, ((closureN)self_7311842)->elements[0]));; 
++return_closcall3(data,  ((closureN)self_7311835)->elements[1],  &c_7314079, r_734004, Cyc_car(data, ((closureN)self_7311835)->elements[0]));; 
  }
  
 -static void __lambda_125(void *data, object self_7313089, int argc, object *args) /* object self_7313089, object r_734401 */
-+static void __lambda_125(void *data, object self_7311843, int argc, object *args) /* object self_7311843, object r_733956 */
++static void __lambda_125(void *data, object self_7311836, int argc, object *args) /* object self_7311836, object r_733949 */
   {
 - object r_734401 = args[0];
 -  if( (boolean_f != r_734401) ){ 
-+ object r_733956 = args[0];
-+  if( (boolean_f != r_733956) ){ 
++ object r_733949 = args[0];
++  if( (boolean_f != r_733949) ){ 
    
 -closureN_type c_7315381;
 -object e_7315406 [4];
@@ -61777,24 +62045,24 @@ Make let-values be the same as let*-values, to work around
 -c_7315381.elements[1] = ((closureN)self_7313089)->elements[2];
 -c_7315381.elements[2] = ((closureN)self_7313089)->elements[3];
 -c_7315381.elements[3] = ((closureN)self_7313089)->elements[4];
-+closureN_type c_7314088;
-+object e_7314113 [4];
-+c_7314088.hdr.mark = gc_color_red;
-+ c_7314088.hdr.grayed = 0;
-+c_7314088.tag = closureN_tag;
-+ c_7314088.fn = (function_type)__lambda_126;
-+c_7314088.num_args = 1;
-+c_7314088.num_elements = 4;
-+c_7314088.elements = (object *)e_7314113;
-+c_7314088.elements[0] = ((closureN)self_7311843)->elements[0];
-+c_7314088.elements[1] = ((closureN)self_7311843)->elements[2];
-+c_7314088.elements[2] = ((closureN)self_7311843)->elements[3];
-+c_7314088.elements[3] = ((closureN)self_7311843)->elements[4];
++closureN_type c_7314081;
++object e_7314106 [4];
++c_7314081.hdr.mark = gc_color_red;
++ c_7314081.hdr.grayed = 0;
++c_7314081.tag = closureN_tag;
++ c_7314081.fn = (function_type)__lambda_126;
++c_7314081.num_args = 1;
++c_7314081.num_elements = 4;
++c_7314081.elements = (object *)e_7314106;
++c_7314081.elements[0] = ((closureN)self_7311836)->elements[0];
++c_7314081.elements[1] = ((closureN)self_7311836)->elements[2];
++c_7314081.elements[2] = ((closureN)self_7311836)->elements[3];
++c_7314081.elements[3] = ((closureN)self_7311836)->elements[4];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7315381,__lambda_126,  Cyc_cddr(data, ((closureN)self_7313089)->elements[2]));
-+return_direct_with_clo1(data,(closure)&c_7314088,__lambda_126,  Cyc_cddr(data, ((closureN)self_7311843)->elements[2]));
++return_direct_with_clo1(data,(closure)&c_7314081,__lambda_126,  Cyc_cddr(data, ((closureN)self_7311836)->elements[2]));
  } else { 
    
 -closureN_type c_7315411;
@@ -61809,18 +62077,18 @@ Make let-values be the same as let*-values, to work around
 -c_7315411.elements[0] = ((closureN)self_7313089)->elements[0];
 -c_7315411.elements[1] = ((closureN)self_7313089)->elements[1];
 -c_7315411.elements[2] = ((closureN)self_7313089)->elements[4];
-+closureN_type c_7314118;
-+object e_7314135 [3];
-+c_7314118.hdr.mark = gc_color_red;
-+ c_7314118.hdr.grayed = 0;
-+c_7314118.tag = closureN_tag;
-+ c_7314118.fn = (function_type)__lambda_128;
-+c_7314118.num_args = 0;
-+c_7314118.num_elements = 3;
-+c_7314118.elements = (object *)e_7314135;
-+c_7314118.elements[0] = ((closureN)self_7311843)->elements[0];
-+c_7314118.elements[1] = ((closureN)self_7311843)->elements[1];
-+c_7314118.elements[2] = ((closureN)self_7311843)->elements[4];
++closureN_type c_7314111;
++object e_7314128 [3];
++c_7314111.hdr.mark = gc_color_red;
++ c_7314111.hdr.grayed = 0;
++c_7314111.tag = closureN_tag;
++ c_7314111.fn = (function_type)__lambda_128;
++c_7314111.num_args = 0;
++c_7314111.num_elements = 3;
++c_7314111.elements = (object *)e_7314128;
++c_7314111.elements[0] = ((closureN)self_7311836)->elements[0];
++c_7314111.elements[1] = ((closureN)self_7311836)->elements[1];
++c_7314111.elements[2] = ((closureN)self_7311836)->elements[4];
  
  
 -closureN_type c_7315429;
@@ -61836,32 +62104,32 @@ Make let-values be the same as let*-values, to work around
 -c_7315429.elements[1] = ((closureN)self_7313089)->elements[2];
 -c_7315429.elements[2] = ((closureN)self_7313089)->elements[3];
 -c_7315429.elements[3] = ((closureN)self_7313089)->elements[4];
-+closureN_type c_7314136;
-+object e_7314251 [4];
-+c_7314136.hdr.mark = gc_color_red;
-+ c_7314136.hdr.grayed = 0;
-+c_7314136.tag = closureN_tag;
-+ c_7314136.fn = (function_type)__lambda_130;
-+c_7314136.num_args = 1;
-+c_7314136.num_elements = 4;
-+c_7314136.elements = (object *)e_7314251;
-+c_7314136.elements[0] = ((closureN)self_7311843)->elements[0];
-+c_7314136.elements[1] = ((closureN)self_7311843)->elements[2];
-+c_7314136.elements[2] = ((closureN)self_7311843)->elements[3];
-+c_7314136.elements[3] = ((closureN)self_7311843)->elements[4];
++closureN_type c_7314129;
++object e_7314244 [4];
++c_7314129.hdr.mark = gc_color_red;
++ c_7314129.hdr.grayed = 0;
++c_7314129.tag = closureN_tag;
++ c_7314129.fn = (function_type)__lambda_130;
++c_7314129.num_args = 1;
++c_7314129.num_elements = 4;
++c_7314129.elements = (object *)e_7314244;
++c_7314129.elements[0] = ((closureN)self_7311836)->elements[0];
++c_7314129.elements[1] = ((closureN)self_7311836)->elements[2];
++c_7314129.elements[2] = ((closureN)self_7311836)->elements[3];
++c_7314129.elements[3] = ((closureN)self_7311836)->elements[4];
  
 -return_direct_with_clo1(data,(closure)&c_7315411,__lambda_128,  &c_7315429);}
-+return_direct_with_clo1(data,(closure)&c_7314118,__lambda_128,  &c_7314136);}
++return_direct_with_clo1(data,(closure)&c_7314111,__lambda_128,  &c_7314129);}
  ;; 
  }
  
 -static void __lambda_130(void *data, object self_7313092, int argc, object *args) /* object self_7313092, object r_734410 */
-+static void __lambda_130(void *data, object self_7311846, int argc, object *args) /* object self_7311846, object r_733965 */
++static void __lambda_130(void *data, object self_7311839, int argc, object *args) /* object self_7311839, object r_733958 */
   {
 - object r_734410 = args[0];
 -  if( (boolean_f != r_734410) ){ 
-+ object r_733965 = args[0];
-+  if( (boolean_f != r_733965) ){ 
++ object r_733958 = args[0];
++  if( (boolean_f != r_733958) ){ 
    
 -closureN_type c_7315432;
 -object e_7315503 [4];
@@ -61876,22 +62144,22 @@ Make let-values be the same as let*-values, to work around
 -c_7315432.elements[1] = ((closureN)self_7313092)->elements[1];
 -c_7315432.elements[2] = ((closureN)self_7313092)->elements[2];
 -c_7315432.elements[3] = ((closureN)self_7313092)->elements[3];
-+closureN_type c_7314139;
-+object e_7314210 [4];
-+c_7314139.hdr.mark = gc_color_red;
-+ c_7314139.hdr.grayed = 0;
-+c_7314139.tag = closureN_tag;
-+ c_7314139.fn = (function_type)__lambda_131;
-+c_7314139.num_args = 1;
-+c_7314139.num_elements = 4;
-+c_7314139.elements = (object *)e_7314210;
-+c_7314139.elements[0] = ((closureN)self_7311846)->elements[0];
-+c_7314139.elements[1] = ((closureN)self_7311846)->elements[1];
-+c_7314139.elements[2] = ((closureN)self_7311846)->elements[2];
-+c_7314139.elements[3] = ((closureN)self_7311846)->elements[3];
++closureN_type c_7314132;
++object e_7314203 [4];
++c_7314132.hdr.mark = gc_color_red;
++ c_7314132.hdr.grayed = 0;
++c_7314132.tag = closureN_tag;
++ c_7314132.fn = (function_type)__lambda_131;
++c_7314132.num_args = 1;
++c_7314132.num_elements = 4;
++c_7314132.elements = (object *)e_7314203;
++c_7314132.elements[0] = ((closureN)self_7311839)->elements[0];
++c_7314132.elements[1] = ((closureN)self_7311839)->elements[1];
++c_7314132.elements[2] = ((closureN)self_7311839)->elements[2];
++c_7314132.elements[3] = ((closureN)self_7311839)->elements[3];
  
 -return_closcall2(data,  ((closureN)self_7313092)->elements[3],  &c_7315432, quote_lambda);
-+return_closcall2(data,  ((closureN)self_7311846)->elements[3],  &c_7314139, quote_lambda);
++return_closcall2(data,  ((closureN)self_7311839)->elements[3],  &c_7314132, quote_lambda);
  } else { 
    
 -closureN_type c_7315506;
@@ -61907,30 +62175,30 @@ Make let-values be the same as let*-values, to work around
 -c_7315506.elements[1] = ((closureN)self_7313092)->elements[1];
 -c_7315506.elements[2] = ((closureN)self_7313092)->elements[2];
 -c_7315506.elements[3] = ((closureN)self_7313092)->elements[3];
-+closureN_type c_7314213;
-+object e_7314250 [4];
-+c_7314213.hdr.mark = gc_color_red;
-+ c_7314213.hdr.grayed = 0;
-+c_7314213.tag = closureN_tag;
-+ c_7314213.fn = (function_type)__lambda_139;
-+c_7314213.num_args = 1;
-+c_7314213.num_elements = 4;
-+c_7314213.elements = (object *)e_7314250;
-+c_7314213.elements[0] = ((closureN)self_7311846)->elements[0];
-+c_7314213.elements[1] = ((closureN)self_7311846)->elements[1];
-+c_7314213.elements[2] = ((closureN)self_7311846)->elements[2];
-+c_7314213.elements[3] = ((closureN)self_7311846)->elements[3];
++closureN_type c_7314206;
++object e_7314243 [4];
++c_7314206.hdr.mark = gc_color_red;
++ c_7314206.hdr.grayed = 0;
++c_7314206.tag = closureN_tag;
++ c_7314206.fn = (function_type)__lambda_139;
++c_7314206.num_args = 1;
++c_7314206.num_elements = 4;
++c_7314206.elements = (object *)e_7314243;
++c_7314206.elements[0] = ((closureN)self_7311839)->elements[0];
++c_7314206.elements[1] = ((closureN)self_7311839)->elements[1];
++c_7314206.elements[2] = ((closureN)self_7311839)->elements[2];
++c_7314206.elements[3] = ((closureN)self_7311839)->elements[3];
  
 -return_closcall2(data,  ((closureN)self_7313092)->elements[3],  &c_7315506, quote__if);}
-+return_closcall2(data,  ((closureN)self_7311846)->elements[3],  &c_7314213, quote__if);}
++return_closcall2(data,  ((closureN)self_7311839)->elements[3],  &c_7314206, quote__if);}
  ;; 
  }
  
 -static void __lambda_139(void *data, object self_7313101, int argc, object *args) /* object self_7313101, object r_734436 */
-+static void __lambda_139(void *data, object self_7311855, int argc, object *args) /* object self_7311855, object r_733991 */
++static void __lambda_139(void *data, object self_7311848, int argc, object *args) /* object self_7311848, object r_733984 */
   {
 - object r_734436 = args[0];
-+ object r_733991 = args[0];
++ object r_733984 = args[0];
    
 -closureN_type c_7315509;
 -object e_7315542 [5];
@@ -61946,30 +62214,30 @@ Make let-values be the same as let*-values, to work around
 -c_7315509.elements[2] = ((closureN)self_7313101)->elements[2];
 -c_7315509.elements[3] = r_734436;
 -c_7315509.elements[4] = ((closureN)self_7313101)->elements[3];
-+closureN_type c_7314216;
-+object e_7314249 [5];
-+c_7314216.hdr.mark = gc_color_red;
-+ c_7314216.hdr.grayed = 0;
-+c_7314216.tag = closureN_tag;
-+ c_7314216.fn = (function_type)__lambda_140;
-+c_7314216.num_args = 1;
-+c_7314216.num_elements = 5;
-+c_7314216.elements = (object *)e_7314249;
-+c_7314216.elements[0] = ((closureN)self_7311855)->elements[0];
-+c_7314216.elements[1] = ((closureN)self_7311855)->elements[1];
-+c_7314216.elements[2] = ((closureN)self_7311855)->elements[2];
-+c_7314216.elements[3] = r_733991;
-+c_7314216.elements[4] = ((closureN)self_7311855)->elements[3];
++closureN_type c_7314209;
++object e_7314242 [5];
++c_7314209.hdr.mark = gc_color_red;
++ c_7314209.hdr.grayed = 0;
++c_7314209.tag = closureN_tag;
++ c_7314209.fn = (function_type)__lambda_140;
++c_7314209.num_args = 1;
++c_7314209.num_elements = 5;
++c_7314209.elements = (object *)e_7314242;
++c_7314209.elements[0] = ((closureN)self_7311848)->elements[0];
++c_7314209.elements[1] = ((closureN)self_7311848)->elements[1];
++c_7314209.elements[2] = ((closureN)self_7311848)->elements[2];
++c_7314209.elements[3] = r_733984;
++c_7314209.elements[4] = ((closureN)self_7311848)->elements[3];
  
 -return_closcall2(data,  ((closureN)self_7313101)->elements[3],  &c_7315509, quote_lambda);; 
-+return_closcall2(data,  ((closureN)self_7311855)->elements[3],  &c_7314216, quote_lambda);; 
++return_closcall2(data,  ((closureN)self_7311848)->elements[3],  &c_7314209, quote_lambda);; 
  }
  
 -static void __lambda_140(void *data, object self_7313102, int argc, object *args) /* object self_7313102, object r_734444 */
-+static void __lambda_140(void *data, object self_7311856, int argc, object *args) /* object self_7311856, object r_733999 */
++static void __lambda_140(void *data, object self_7311849, int argc, object *args) /* object self_7311849, object r_733992 */
   {
 - object r_734444 = args[0];
-+ object r_733999 = args[0];
++ object r_733992 = args[0];
    
 -closureN_type c_7315512;
 -object e_7315541 [5];
@@ -61985,60 +62253,60 @@ Make let-values be the same as let*-values, to work around
 -c_7315512.elements[2] = ((closureN)self_7313102)->elements[2];
 -c_7315512.elements[3] = ((closureN)self_7313102)->elements[3];
 -c_7315512.elements[4] = r_734444;
-+closureN_type c_7314219;
-+object e_7314248 [5];
-+c_7314219.hdr.mark = gc_color_red;
-+ c_7314219.hdr.grayed = 0;
-+c_7314219.tag = closureN_tag;
-+ c_7314219.fn = (function_type)__lambda_141;
-+c_7314219.num_args = 1;
-+c_7314219.num_elements = 5;
-+c_7314219.elements = (object *)e_7314248;
-+c_7314219.elements[0] = ((closureN)self_7311856)->elements[0];
-+c_7314219.elements[1] = ((closureN)self_7311856)->elements[1];
-+c_7314219.elements[2] = ((closureN)self_7311856)->elements[2];
-+c_7314219.elements[3] = ((closureN)self_7311856)->elements[3];
-+c_7314219.elements[4] = r_733999;
++closureN_type c_7314212;
++object e_7314241 [5];
++c_7314212.hdr.mark = gc_color_red;
++ c_7314212.hdr.grayed = 0;
++c_7314212.tag = closureN_tag;
++ c_7314212.fn = (function_type)__lambda_141;
++c_7314212.num_args = 1;
++c_7314212.num_elements = 5;
++c_7314212.elements = (object *)e_7314241;
++c_7314212.elements[0] = ((closureN)self_7311849)->elements[0];
++c_7314212.elements[1] = ((closureN)self_7311849)->elements[1];
++c_7314212.elements[2] = ((closureN)self_7311849)->elements[2];
++c_7314212.elements[3] = ((closureN)self_7311849)->elements[3];
++c_7314212.elements[4] = r_733992;
  
 -return_closcall2(data,  ((closureN)self_7313102)->elements[4],  &c_7315512, quote_cond);; 
-+return_closcall2(data,  ((closureN)self_7311856)->elements[4],  &c_7314219, quote_cond);; 
++return_closcall2(data,  ((closureN)self_7311849)->elements[4],  &c_7314212, quote_cond);; 
  }
  
 -static void __lambda_141(void *data, object self_7313103, int argc, object *args) /* object self_7313103, object r_734440 */
-+static void __lambda_141(void *data, object self_7311857, int argc, object *args) /* object self_7311857, object r_733995 */
++static void __lambda_141(void *data, object self_7311850, int argc, object *args) /* object self_7311850, object r_733988 */
   {
 - object r_734440 = args[0];
-+ object r_733995 = args[0];
++ object r_733988 = args[0];
    
 -list_4_type local_7315517; 
-+list_4_type local_7314224; 
++list_4_type local_7314217; 
  
  
  
 -pair_type local_7315524; 
-+pair_type local_7314231; 
++pair_type local_7314224; 
  
 -pair_type local_7315527; 
-+pair_type local_7314234; 
++pair_type local_7314227; 
  
 -pair_type local_7315531; 
-+pair_type local_7314238; 
++pair_type local_7314231; 
  
  
  
 -pair_type local_7315537; 
-+pair_type local_7314244; 
++pair_type local_7314237; 
  
  
 -return_direct_with_clo1(data,  ((closureN)self_7313103)->elements[2], (((closure)  ((closureN)self_7313103)->elements[2])->fn),  Cyc_fast_list_4(&local_7315517, ((closureN)self_7313103)->elements[3], Cyc_car(data, ((closureN)self_7313103)->elements[0]), set_cell_as_expr(&local_7315524, set_pair_as_expr(&local_7315527, ((closureN)self_7313103)->elements[4], set_pair_as_expr(&local_7315531, NULL, Cyc_cdr(data, ((closureN)self_7313103)->elements[0])))), set_pair_as_expr(&local_7315537, r_734440, Cyc_cddr(data, ((closureN)self_7313103)->elements[1]))));; 
-+return_direct_with_clo1(data,  ((closureN)self_7311857)->elements[2], (((closure)  ((closureN)self_7311857)->elements[2])->fn),  Cyc_fast_list_4(&local_7314224, ((closureN)self_7311857)->elements[3], Cyc_car(data, ((closureN)self_7311857)->elements[0]), set_cell_as_expr(&local_7314231, set_pair_as_expr(&local_7314234, ((closureN)self_7311857)->elements[4], set_pair_as_expr(&local_7314238, NULL, Cyc_cdr(data, ((closureN)self_7311857)->elements[0])))), set_pair_as_expr(&local_7314244, r_733995, Cyc_cddr(data, ((closureN)self_7311857)->elements[1]))));; 
++return_direct_with_clo1(data,  ((closureN)self_7311850)->elements[2], (((closure)  ((closureN)self_7311850)->elements[2])->fn),  Cyc_fast_list_4(&local_7314217, ((closureN)self_7311850)->elements[3], Cyc_car(data, ((closureN)self_7311850)->elements[0]), set_cell_as_expr(&local_7314224, set_pair_as_expr(&local_7314227, ((closureN)self_7311850)->elements[4], set_pair_as_expr(&local_7314231, NULL, Cyc_cdr(data, ((closureN)self_7311850)->elements[0])))), set_pair_as_expr(&local_7314237, r_733988, Cyc_cddr(data, ((closureN)self_7311850)->elements[1]))));; 
  }
  
 -static void __lambda_131(void *data, object self_7313093, int argc, object *args) /* object self_7313093, object r_734413 */
-+static void __lambda_131(void *data, object self_7311847, int argc, object *args) /* object self_7311847, object r_733968 */
++static void __lambda_131(void *data, object self_7311840, int argc, object *args) /* object self_7311840, object r_733961 */
   {
 - object r_734413 = args[0];
-+ object r_733968 = args[0];
++ object r_733961 = args[0];
    
 -closureN_type c_7315435;
 -object e_7315502 [5];
@@ -62054,30 +62322,30 @@ Make let-values be the same as let*-values, to work around
 -c_7315435.elements[2] = ((closureN)self_7313093)->elements[2];
 -c_7315435.elements[3] = r_734413;
 -c_7315435.elements[4] = ((closureN)self_7313093)->elements[3];
-+closureN_type c_7314142;
-+object e_7314209 [5];
-+c_7314142.hdr.mark = gc_color_red;
-+ c_7314142.hdr.grayed = 0;
-+c_7314142.tag = closureN_tag;
-+ c_7314142.fn = (function_type)__lambda_132;
-+c_7314142.num_args = 1;
-+c_7314142.num_elements = 5;
-+c_7314142.elements = (object *)e_7314209;
-+c_7314142.elements[0] = ((closureN)self_7311847)->elements[0];
-+c_7314142.elements[1] = ((closureN)self_7311847)->elements[1];
-+c_7314142.elements[2] = ((closureN)self_7311847)->elements[2];
-+c_7314142.elements[3] = r_733968;
-+c_7314142.elements[4] = ((closureN)self_7311847)->elements[3];
++closureN_type c_7314135;
++object e_7314202 [5];
++c_7314135.hdr.mark = gc_color_red;
++ c_7314135.hdr.grayed = 0;
++c_7314135.tag = closureN_tag;
++ c_7314135.fn = (function_type)__lambda_132;
++c_7314135.num_args = 1;
++c_7314135.num_elements = 5;
++c_7314135.elements = (object *)e_7314202;
++c_7314135.elements[0] = ((closureN)self_7311840)->elements[0];
++c_7314135.elements[1] = ((closureN)self_7311840)->elements[1];
++c_7314135.elements[2] = ((closureN)self_7311840)->elements[2];
++c_7314135.elements[3] = r_733961;
++c_7314135.elements[4] = ((closureN)self_7311840)->elements[3];
  
 -return_closcall2(data,  ((closureN)self_7313093)->elements[3],  &c_7315435, quote_tmp);; 
-+return_closcall2(data,  ((closureN)self_7311847)->elements[3],  &c_7314142, quote_tmp);; 
++return_closcall2(data,  ((closureN)self_7311840)->elements[3],  &c_7314135, quote_tmp);; 
  }
  
 -static void __lambda_132(void *data, object self_7313094, int argc, object *args) /* object self_7313094, object r_734433 */
-+static void __lambda_132(void *data, object self_7311848, int argc, object *args) /* object self_7311848, object r_733988 */
++static void __lambda_132(void *data, object self_7311841, int argc, object *args) /* object self_7311841, object r_733981 */
   {
 - object r_734433 = args[0];
-+ object r_733988 = args[0];
++ object r_733981 = args[0];
    
 -closureN_type c_7315438;
 -object e_7315501 [6];
@@ -62094,31 +62362,31 @@ Make let-values be the same as let*-values, to work around
 -c_7315438.elements[3] = ((closureN)self_7313094)->elements[3];
 -c_7315438.elements[4] = r_734433;
 -c_7315438.elements[5] = ((closureN)self_7313094)->elements[4];
-+closureN_type c_7314145;
-+object e_7314208 [6];
-+c_7314145.hdr.mark = gc_color_red;
-+ c_7314145.hdr.grayed = 0;
-+c_7314145.tag = closureN_tag;
-+ c_7314145.fn = (function_type)__lambda_133;
-+c_7314145.num_args = 1;
-+c_7314145.num_elements = 6;
-+c_7314145.elements = (object *)e_7314208;
-+c_7314145.elements[0] = ((closureN)self_7311848)->elements[0];
-+c_7314145.elements[1] = ((closureN)self_7311848)->elements[1];
-+c_7314145.elements[2] = ((closureN)self_7311848)->elements[2];
-+c_7314145.elements[3] = ((closureN)self_7311848)->elements[3];
-+c_7314145.elements[4] = r_733988;
-+c_7314145.elements[5] = ((closureN)self_7311848)->elements[4];
++closureN_type c_7314138;
++object e_7314201 [6];
++c_7314138.hdr.mark = gc_color_red;
++ c_7314138.hdr.grayed = 0;
++c_7314138.tag = closureN_tag;
++ c_7314138.fn = (function_type)__lambda_133;
++c_7314138.num_args = 1;
++c_7314138.num_elements = 6;
++c_7314138.elements = (object *)e_7314201;
++c_7314138.elements[0] = ((closureN)self_7311841)->elements[0];
++c_7314138.elements[1] = ((closureN)self_7311841)->elements[1];
++c_7314138.elements[2] = ((closureN)self_7311841)->elements[2];
++c_7314138.elements[3] = ((closureN)self_7311841)->elements[3];
++c_7314138.elements[4] = r_733981;
++c_7314138.elements[5] = ((closureN)self_7311841)->elements[4];
  
 -return_closcall2(data,  ((closureN)self_7313094)->elements[4],  &c_7315438, quote__if);; 
-+return_closcall2(data,  ((closureN)self_7311848)->elements[4],  &c_7314145, quote__if);; 
++return_closcall2(data,  ((closureN)self_7311841)->elements[4],  &c_7314138, quote__if);; 
  }
  
 -static void __lambda_133(void *data, object self_7313095, int argc, object *args) /* object self_7313095, object r_734416 */
-+static void __lambda_133(void *data, object self_7311849, int argc, object *args) /* object self_7311849, object r_733971 */
++static void __lambda_133(void *data, object self_7311842, int argc, object *args) /* object self_7311842, object r_733964 */
   {
 - object r_734416 = args[0];
-+ object r_733971 = args[0];
++ object r_733964 = args[0];
    
 -closureN_type c_7315441;
 -object e_7315500 [7];
@@ -62136,32 +62404,32 @@ Make let-values be the same as let*-values, to work around
 -c_7315441.elements[4] = r_734416;
 -c_7315441.elements[5] = ((closureN)self_7313095)->elements[4];
 -c_7315441.elements[6] = ((closureN)self_7313095)->elements[5];
-+closureN_type c_7314148;
-+object e_7314207 [7];
-+c_7314148.hdr.mark = gc_color_red;
-+ c_7314148.hdr.grayed = 0;
-+c_7314148.tag = closureN_tag;
-+ c_7314148.fn = (function_type)__lambda_134;
-+c_7314148.num_args = 1;
-+c_7314148.num_elements = 7;
-+c_7314148.elements = (object *)e_7314207;
-+c_7314148.elements[0] = ((closureN)self_7311849)->elements[0];
-+c_7314148.elements[1] = ((closureN)self_7311849)->elements[1];
-+c_7314148.elements[2] = ((closureN)self_7311849)->elements[2];
-+c_7314148.elements[3] = ((closureN)self_7311849)->elements[3];
-+c_7314148.elements[4] = r_733971;
-+c_7314148.elements[5] = ((closureN)self_7311849)->elements[4];
-+c_7314148.elements[6] = ((closureN)self_7311849)->elements[5];
++closureN_type c_7314141;
++object e_7314200 [7];
++c_7314141.hdr.mark = gc_color_red;
++ c_7314141.hdr.grayed = 0;
++c_7314141.tag = closureN_tag;
++ c_7314141.fn = (function_type)__lambda_134;
++c_7314141.num_args = 1;
++c_7314141.num_elements = 7;
++c_7314141.elements = (object *)e_7314200;
++c_7314141.elements[0] = ((closureN)self_7311842)->elements[0];
++c_7314141.elements[1] = ((closureN)self_7311842)->elements[1];
++c_7314141.elements[2] = ((closureN)self_7311842)->elements[2];
++c_7314141.elements[3] = ((closureN)self_7311842)->elements[3];
++c_7314141.elements[4] = r_733964;
++c_7314141.elements[5] = ((closureN)self_7311842)->elements[4];
++c_7314141.elements[6] = ((closureN)self_7311842)->elements[5];
  
 -return_closcall2(data,  ((closureN)self_7313095)->elements[5],  &c_7315441, quote_tmp);; 
-+return_closcall2(data,  ((closureN)self_7311849)->elements[5],  &c_7314148, quote_tmp);; 
++return_closcall2(data,  ((closureN)self_7311842)->elements[5],  &c_7314141, quote_tmp);; 
  }
  
 -static void __lambda_134(void *data, object self_7313096, int argc, object *args) /* object self_7313096, object r_734417 */
-+static void __lambda_134(void *data, object self_7311850, int argc, object *args) /* object self_7311850, object r_733972 */
++static void __lambda_134(void *data, object self_7311843, int argc, object *args) /* object self_7311843, object r_733965 */
   {
 - object r_734417 = args[0];
-+ object r_733972 = args[0];
++ object r_733965 = args[0];
    
 -closureN_type c_7315443;
 -object e_7315465 [2];
@@ -62174,17 +62442,17 @@ Make let-values be the same as let*-values, to work around
 -c_7315443.elements = (object *)e_7315465;
 -c_7315443.elements[0] = ((closureN)self_7313096)->elements[0];
 -c_7315443.elements[1] = ((closureN)self_7313096)->elements[6];
-+closureN_type c_7314150;
-+object e_7314172 [2];
-+c_7314150.hdr.mark = gc_color_red;
-+ c_7314150.hdr.grayed = 0;
-+c_7314150.tag = closureN_tag;
-+ c_7314150.fn = (function_type)__lambda_135;
-+c_7314150.num_args = 0;
-+c_7314150.num_elements = 2;
-+c_7314150.elements = (object *)e_7314172;
-+c_7314150.elements[0] = ((closureN)self_7311850)->elements[0];
-+c_7314150.elements[1] = ((closureN)self_7311850)->elements[6];
++closureN_type c_7314143;
++object e_7314165 [2];
++c_7314143.hdr.mark = gc_color_red;
++ c_7314143.hdr.grayed = 0;
++c_7314143.tag = closureN_tag;
++ c_7314143.fn = (function_type)__lambda_135;
++c_7314143.num_args = 0;
++c_7314143.num_elements = 2;
++c_7314143.elements = (object *)e_7314165;
++c_7314143.elements[0] = ((closureN)self_7311843)->elements[0];
++c_7314143.elements[1] = ((closureN)self_7311843)->elements[6];
  
  
 -closureN_type c_7315466;
@@ -62204,33 +62472,33 @@ Make let-values be the same as let*-values, to work around
 -c_7315466.elements[5] = r_734417;
 -c_7315466.elements[6] = ((closureN)self_7313096)->elements[5];
 -c_7315466.elements[7] = ((closureN)self_7313096)->elements[6];
-+closureN_type c_7314173;
-+object e_7314206 [8];
-+c_7314173.hdr.mark = gc_color_red;
-+ c_7314173.hdr.grayed = 0;
-+c_7314173.tag = closureN_tag;
-+ c_7314173.fn = (function_type)__lambda_137;
-+c_7314173.num_args = 1;
-+c_7314173.num_elements = 8;
-+c_7314173.elements = (object *)e_7314206;
-+c_7314173.elements[0] = ((closureN)self_7311850)->elements[0];
-+c_7314173.elements[1] = ((closureN)self_7311850)->elements[1];
-+c_7314173.elements[2] = ((closureN)self_7311850)->elements[2];
-+c_7314173.elements[3] = ((closureN)self_7311850)->elements[3];
-+c_7314173.elements[4] = ((closureN)self_7311850)->elements[4];
-+c_7314173.elements[5] = r_733972;
-+c_7314173.elements[6] = ((closureN)self_7311850)->elements[5];
-+c_7314173.elements[7] = ((closureN)self_7311850)->elements[6];
++closureN_type c_7314166;
++object e_7314199 [8];
++c_7314166.hdr.mark = gc_color_red;
++ c_7314166.hdr.grayed = 0;
++c_7314166.tag = closureN_tag;
++ c_7314166.fn = (function_type)__lambda_137;
++c_7314166.num_args = 1;
++c_7314166.num_elements = 8;
++c_7314166.elements = (object *)e_7314199;
++c_7314166.elements[0] = ((closureN)self_7311843)->elements[0];
++c_7314166.elements[1] = ((closureN)self_7311843)->elements[1];
++c_7314166.elements[2] = ((closureN)self_7311843)->elements[2];
++c_7314166.elements[3] = ((closureN)self_7311843)->elements[3];
++c_7314166.elements[4] = ((closureN)self_7311843)->elements[4];
++c_7314166.elements[5] = r_733965;
++c_7314166.elements[6] = ((closureN)self_7311843)->elements[5];
++c_7314166.elements[7] = ((closureN)self_7311843)->elements[6];
  
 -return_direct_with_clo1(data,(closure)&c_7315443,__lambda_135,  &c_7315466);; 
-+return_direct_with_clo1(data,(closure)&c_7314150,__lambda_135,  &c_7314173);; 
++return_direct_with_clo1(data,(closure)&c_7314143,__lambda_135,  &c_7314166);; 
  }
  
 -static void __lambda_137(void *data, object self_7313097, int argc, object *args) /* object self_7313097, object r_734418 */
-+static void __lambda_137(void *data, object self_7311851, int argc, object *args) /* object self_7311851, object r_733973 */
++static void __lambda_137(void *data, object self_7311844, int argc, object *args) /* object self_7311844, object r_733966 */
   {
 - object r_734418 = args[0];
-+ object r_733973 = args[0];
++ object r_733966 = args[0];
    
 -closureN_type c_7315469;
 -object e_7315498 [8];
@@ -62249,67 +62517,67 @@ Make let-values be the same as let*-values, to work around
 -c_7315469.elements[5] = ((closureN)self_7313097)->elements[5];
 -c_7315469.elements[6] = r_734418;
 -c_7315469.elements[7] = ((closureN)self_7313097)->elements[6];
-+closureN_type c_7314176;
-+object e_7314205 [8];
-+c_7314176.hdr.mark = gc_color_red;
-+ c_7314176.hdr.grayed = 0;
-+c_7314176.tag = closureN_tag;
-+ c_7314176.fn = (function_type)__lambda_138;
-+c_7314176.num_args = 1;
-+c_7314176.num_elements = 8;
-+c_7314176.elements = (object *)e_7314205;
-+c_7314176.elements[0] = ((closureN)self_7311851)->elements[0];
-+c_7314176.elements[1] = ((closureN)self_7311851)->elements[1];
-+c_7314176.elements[2] = ((closureN)self_7311851)->elements[2];
-+c_7314176.elements[3] = ((closureN)self_7311851)->elements[3];
-+c_7314176.elements[4] = ((closureN)self_7311851)->elements[4];
-+c_7314176.elements[5] = ((closureN)self_7311851)->elements[5];
-+c_7314176.elements[6] = r_733973;
-+c_7314176.elements[7] = ((closureN)self_7311851)->elements[6];
++closureN_type c_7314169;
++object e_7314198 [8];
++c_7314169.hdr.mark = gc_color_red;
++ c_7314169.hdr.grayed = 0;
++c_7314169.tag = closureN_tag;
++ c_7314169.fn = (function_type)__lambda_138;
++c_7314169.num_args = 1;
++c_7314169.num_elements = 8;
++c_7314169.elements = (object *)e_7314198;
++c_7314169.elements[0] = ((closureN)self_7311844)->elements[0];
++c_7314169.elements[1] = ((closureN)self_7311844)->elements[1];
++c_7314169.elements[2] = ((closureN)self_7311844)->elements[2];
++c_7314169.elements[3] = ((closureN)self_7311844)->elements[3];
++c_7314169.elements[4] = ((closureN)self_7311844)->elements[4];
++c_7314169.elements[5] = ((closureN)self_7311844)->elements[5];
++c_7314169.elements[6] = r_733966;
++c_7314169.elements[7] = ((closureN)self_7311844)->elements[6];
  
 -return_closcall2(data,  ((closureN)self_7313097)->elements[7],  &c_7315469, quote_cond);; 
-+return_closcall2(data,  ((closureN)self_7311851)->elements[7],  &c_7314176, quote_cond);; 
++return_closcall2(data,  ((closureN)self_7311844)->elements[7],  &c_7314169, quote_cond);; 
  }
  
 -static void __lambda_138(void *data, object self_7313098, int argc, object *args) /* object self_7313098, object r_734420 */
-+static void __lambda_138(void *data, object self_7311852, int argc, object *args) /* object self_7311852, object r_733975 */
++static void __lambda_138(void *data, object self_7311845, int argc, object *args) /* object self_7311845, object r_733968 */
   {
 - object r_734420 = args[0];
-+ object r_733975 = args[0];
++ object r_733968 = args[0];
    
 -list_2_type local_7315474; 
-+list_2_type local_7314181; 
++list_2_type local_7314174; 
  
 -list_3_type local_7315477; 
-+list_3_type local_7314184; 
++list_3_type local_7314177; 
  
 -pair_type local_7315481; 
-+pair_type local_7314188; 
++pair_type local_7314181; 
  
 -list_4_type local_7315485; 
-+list_4_type local_7314192; 
++list_4_type local_7314185; 
  
 -pair_type local_7315491; 
-+pair_type local_7314198; 
++pair_type local_7314191; 
  
  
  
  
 -return_direct_with_clo1(data,  ((closureN)self_7313098)->elements[2], (((closure)  ((closureN)self_7313098)->elements[2])->fn),  Cyc_fast_list_2(&local_7315474, Cyc_fast_list_3(&local_7315477, ((closureN)self_7313098)->elements[3], set_cell_as_expr(&local_7315481, ((closureN)self_7313098)->elements[7]), Cyc_fast_list_4(&local_7315485, ((closureN)self_7313098)->elements[4], ((closureN)self_7313098)->elements[5], ((closureN)self_7313098)->elements[6], set_pair_as_expr(&local_7315491, r_734420, Cyc_cddr(data, ((closureN)self_7313098)->elements[1])))), Cyc_car(data, ((closureN)self_7313098)->elements[0])));; 
-+return_direct_with_clo1(data,  ((closureN)self_7311852)->elements[2], (((closure)  ((closureN)self_7311852)->elements[2])->fn),  Cyc_fast_list_2(&local_7314181, Cyc_fast_list_3(&local_7314184, ((closureN)self_7311852)->elements[3], set_cell_as_expr(&local_7314188, ((closureN)self_7311852)->elements[7]), Cyc_fast_list_4(&local_7314192, ((closureN)self_7311852)->elements[4], ((closureN)self_7311852)->elements[5], ((closureN)self_7311852)->elements[6], set_pair_as_expr(&local_7314198, r_733975, Cyc_cddr(data, ((closureN)self_7311852)->elements[1])))), Cyc_car(data, ((closureN)self_7311852)->elements[0])));; 
++return_direct_with_clo1(data,  ((closureN)self_7311845)->elements[2], (((closure)  ((closureN)self_7311845)->elements[2])->fn),  Cyc_fast_list_2(&local_7314174, Cyc_fast_list_3(&local_7314177, ((closureN)self_7311845)->elements[3], set_cell_as_expr(&local_7314181, ((closureN)self_7311845)->elements[7]), Cyc_fast_list_4(&local_7314185, ((closureN)self_7311845)->elements[4], ((closureN)self_7311845)->elements[5], ((closureN)self_7311845)->elements[6], set_pair_as_expr(&local_7314191, r_733968, Cyc_cddr(data, ((closureN)self_7311845)->elements[1])))), Cyc_car(data, ((closureN)self_7311845)->elements[0])));; 
  }
  
 -static void __lambda_135(void *data, object self_7313099, int argc, object *args) /* object self_7313099, object k_734423 */
-+static void __lambda_135(void *data, object self_7311853, int argc, object *args) /* object self_7311853, object k_733978 */
++static void __lambda_135(void *data, object self_7311846, int argc, object *args) /* object self_7311846, object k_733971 */
   {
 - object k_734423 = args[0];
-+ object k_733978 = args[0];
++ object k_733971 = args[0];
      
    
 -if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_7313099)->elements[0]))) ){ 
 -  return_closcall2(data,  ((closureN)self_7313099)->elements[1],  k_734423, quote_tmp);
-+if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_7311853)->elements[0]))) ){ 
-+  return_closcall2(data,  ((closureN)self_7311853)->elements[1],  k_733978, quote_tmp);
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_7311846)->elements[0]))) ){ 
++  return_closcall2(data,  ((closureN)self_7311846)->elements[1],  k_733971, quote_tmp);
  } else { 
    
 -closureN_type c_7315453;
@@ -62323,50 +62591,50 @@ Make let-values be the same as let*-values, to work around
 -c_7315453.elements = (object *)e_7315464;
 -c_7315453.elements[0] = ((closureN)self_7313099)->elements[0];
 -c_7315453.elements[1] = k_734423;
-+closureN_type c_7314160;
-+object e_7314171 [2];
-+c_7314160.hdr.mark = gc_color_red;
-+ c_7314160.hdr.grayed = 0;
-+c_7314160.tag = closureN_tag;
-+ c_7314160.fn = (function_type)__lambda_136;
-+c_7314160.num_args = 1;
-+c_7314160.num_elements = 2;
-+c_7314160.elements = (object *)e_7314171;
-+c_7314160.elements[0] = ((closureN)self_7311853)->elements[0];
-+c_7314160.elements[1] = k_733978;
++closureN_type c_7314153;
++object e_7314164 [2];
++c_7314153.hdr.mark = gc_color_red;
++ c_7314153.hdr.grayed = 0;
++c_7314153.tag = closureN_tag;
++ c_7314153.fn = (function_type)__lambda_136;
++c_7314153.num_args = 1;
++c_7314153.num_elements = 2;
++c_7314153.elements = (object *)e_7314164;
++c_7314153.elements[0] = ((closureN)self_7311846)->elements[0];
++c_7314153.elements[1] = k_733971;
  
 -return_closcall2(data,  ((closureN)self_7313099)->elements[1],  &c_7315453, quote_tmp);}
-+return_closcall2(data,  ((closureN)self_7311853)->elements[1],  &c_7314160, quote_tmp);}
++return_closcall2(data,  ((closureN)self_7311846)->elements[1],  &c_7314153, quote_tmp);}
  ;; 
  }
  
 -static void __lambda_136(void *data, object self_7313100, int argc, object *args) /* object self_7313100, object r_734427 */
-+static void __lambda_136(void *data, object self_7311854, int argc, object *args) /* object self_7311854, object r_733982 */
++static void __lambda_136(void *data, object self_7311847, int argc, object *args) /* object self_7311847, object r_733975 */
   {
 - object r_734427 = args[0];
-+ object r_733982 = args[0];
++ object r_733975 = args[0];
    
 -list_2_type local_7315458; 
-+list_2_type local_7314165; 
++list_2_type local_7314158; 
  
  
  
  
 -return_direct_with_clo1(data,  ((closureN)self_7313100)->elements[1], (((closure)  ((closureN)self_7313100)->elements[1])->fn),  Cyc_fast_list_2(&local_7315458, Cyc_car(data, Cyc_cddr(data, ((closureN)self_7313100)->elements[0])), r_734427));; 
-+return_direct_with_clo1(data,  ((closureN)self_7311854)->elements[1], (((closure)  ((closureN)self_7311854)->elements[1])->fn),  Cyc_fast_list_2(&local_7314165, Cyc_car(data, Cyc_cddr(data, ((closureN)self_7311854)->elements[0])), r_733982));; 
++return_direct_with_clo1(data,  ((closureN)self_7311847)->elements[1], (((closure)  ((closureN)self_7311847)->elements[1])->fn),  Cyc_fast_list_2(&local_7314158, Cyc_car(data, Cyc_cddr(data, ((closureN)self_7311847)->elements[0])), r_733975));; 
  }
  
 -static void __lambda_128(void *data, object self_7313104, int argc, object *args) /* object self_7313104, object k_734450 */
-+static void __lambda_128(void *data, object self_7311858, int argc, object *args) /* object self_7311858, object k_734005 */
++static void __lambda_128(void *data, object self_7311851, int argc, object *args) /* object self_7311851, object k_733998 */
   {
 - object k_734450 = args[0];
-+ object k_734005 = args[0];
++ object k_733998 = args[0];
      
    
 -if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_7313104)->elements[0]))) ){ 
 -  return_direct_with_clo1(data,  k_734450, (((closure)  k_734450)->fn),  boolean_t);
-+if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_7311858)->elements[0]))) ){ 
-+  return_direct_with_clo1(data,  k_734005, (((closure)  k_734005)->fn),  boolean_t);
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, ((closureN)self_7311851)->elements[0]))) ){ 
++  return_direct_with_clo1(data,  k_733998, (((closure)  k_733998)->fn),  boolean_t);
  } else { 
    
 -closureN_type c_7315420;
@@ -62381,48 +62649,48 @@ Make let-values be the same as let*-values, to work around
 -c_7315420.elements[0] = ((closureN)self_7313104)->elements[0];
 -c_7315420.elements[1] = ((closureN)self_7313104)->elements[1];
 -c_7315420.elements[2] = k_734450;
-+closureN_type c_7314127;
-+object e_7314134 [3];
-+c_7314127.hdr.mark = gc_color_red;
-+ c_7314127.hdr.grayed = 0;
-+c_7314127.tag = closureN_tag;
-+ c_7314127.fn = (function_type)__lambda_129;
-+c_7314127.num_args = 1;
-+c_7314127.num_elements = 3;
-+c_7314127.elements = (object *)e_7314134;
-+c_7314127.elements[0] = ((closureN)self_7311858)->elements[0];
-+c_7314127.elements[1] = ((closureN)self_7311858)->elements[1];
-+c_7314127.elements[2] = k_734005;
++closureN_type c_7314120;
++object e_7314127 [3];
++c_7314120.hdr.mark = gc_color_red;
++ c_7314120.hdr.grayed = 0;
++c_7314120.tag = closureN_tag;
++ c_7314120.fn = (function_type)__lambda_129;
++c_7314120.num_args = 1;
++c_7314120.num_elements = 3;
++c_7314120.elements = (object *)e_7314127;
++c_7314120.elements[0] = ((closureN)self_7311851)->elements[0];
++c_7314120.elements[1] = ((closureN)self_7311851)->elements[1];
++c_7314120.elements[2] = k_733998;
  
 -return_closcall2(data,  ((closureN)self_7313104)->elements[2],  &c_7315420, quote__123_125);}
-+return_closcall2(data,  ((closureN)self_7311858)->elements[2],  &c_7314127, quote__123_125);}
++return_closcall2(data,  ((closureN)self_7311851)->elements[2],  &c_7314120, quote__123_125);}
  ;; 
  }
  
 -static void __lambda_129(void *data, object self_7313105, int argc, object *args) /* object self_7313105, object r_734452 */
-+static void __lambda_129(void *data, object self_7311859, int argc, object *args) /* object self_7311859, object r_734007 */
++static void __lambda_129(void *data, object self_7311852, int argc, object *args) /* object self_7311852, object r_734000 */
   {
 - object r_734452 = args[0];
-+ object r_734007 = args[0];
++ object r_734000 = args[0];
    
  
 -return_closcall3(data,  ((closureN)self_7313105)->elements[1],  ((closureN)self_7313105)->elements[2], r_734452, Cyc_cadr(data, ((closureN)self_7313105)->elements[0]));; 
-+return_closcall3(data,  ((closureN)self_7311859)->elements[1],  ((closureN)self_7311859)->elements[2], r_734007, Cyc_cadr(data, ((closureN)self_7311859)->elements[0]));; 
++return_closcall3(data,  ((closureN)self_7311852)->elements[1],  ((closureN)self_7311852)->elements[2], r_734000, Cyc_cadr(data, ((closureN)self_7311852)->elements[0]));; 
  }
  
 -static void __lambda_126(void *data, object self_7313090, int argc, object *args) /* object self_7313090, object r_734409 */
-+static void __lambda_126(void *data, object self_7311844, int argc, object *args) /* object self_7311844, object r_733964 */
++static void __lambda_126(void *data, object self_7311837, int argc, object *args) /* object self_7311837, object r_733957 */
   {
 - object r_734409 = args[0];
-+ object r_733964 = args[0];
++ object r_733957 = args[0];
      
 -if( (boolean_f != Cyc_is_pair(r_734409)) ){ 
-+if( (boolean_f != Cyc_is_pair(r_733964)) ){ 
++if( (boolean_f != Cyc_is_pair(r_733957)) ){ 
    
 -make_utf8_string_with_len(c_7315386, "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_7313090)->elements[2], &c_7315386, ((closureN)self_7313090)->elements[1]);
-+make_utf8_string_with_len(c_7314093, "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_7311844)->elements[2], &c_7314093, ((closureN)self_7311844)->elements[1]);
++make_utf8_string_with_len(c_7314086, "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_7311837)->elements[2], &c_7314086, ((closureN)self_7311837)->elements[1]);
  } else { 
    
 -closureN_type c_7315390;
@@ -62436,50 +62704,49 @@ Make let-values be the same as let*-values, to work around
 -c_7315390.elements = (object *)e_7315405;
 -c_7315390.elements[0] = ((closureN)self_7313090)->elements[0];
 -c_7315390.elements[1] = ((closureN)self_7313090)->elements[2];
-+closureN_type c_7314097;
-+object e_7314112 [2];
-+c_7314097.hdr.mark = gc_color_red;
-+ c_7314097.hdr.grayed = 0;
-+c_7314097.tag = closureN_tag;
-+ c_7314097.fn = (function_type)__lambda_127;
-+c_7314097.num_args = 1;
-+c_7314097.num_elements = 2;
-+c_7314097.elements = (object *)e_7314112;
-+c_7314097.elements[0] = ((closureN)self_7311844)->elements[0];
-+c_7314097.elements[1] = ((closureN)self_7311844)->elements[2];
++closureN_type c_7314090;
++object e_7314105 [2];
++c_7314090.hdr.mark = gc_color_red;
++ c_7314090.hdr.grayed = 0;
++c_7314090.tag = closureN_tag;
++ c_7314090.fn = (function_type)__lambda_127;
++c_7314090.num_args = 1;
++c_7314090.num_elements = 2;
++c_7314090.elements = (object *)e_7314105;
++c_7314090.elements[0] = ((closureN)self_7311837)->elements[0];
++c_7314090.elements[1] = ((closureN)self_7311837)->elements[2];
  
 -return_closcall2(data,  ((closureN)self_7313090)->elements[3],  &c_7315390, quote_lambda);}
-+return_closcall2(data,  ((closureN)self_7311844)->elements[3],  &c_7314097, quote_lambda);}
++return_closcall2(data,  ((closureN)self_7311837)->elements[3],  &c_7314090, quote_lambda);}
  ;; 
  }
  
 -static void __lambda_127(void *data, object self_7313091, int argc, object *args) /* object self_7313091, object r_734404 */
-+static void __lambda_127(void *data, object self_7311845, int argc, object *args) /* object self_7311845, object r_733959 */
++static void __lambda_127(void *data, object self_7311838, int argc, object *args) /* object self_7311838, object r_733952 */
   {
 - object r_734404 = args[0];
-+ object r_733959 = args[0];
++ object r_733952 = args[0];
    
 -pair_type local_7315395; 
-+pair_type local_7314102; 
++pair_type local_7314095; 
  
 -pair_type local_7315398; 
-+pair_type local_7314105; 
++pair_type local_7314098; 
  
 -pair_type local_7315401; 
-+pair_type local_7314108; 
++pair_type local_7314101; 
  
  
 -return_direct_with_clo1(data,  ((closureN)self_7313091)->elements[1], (((closure)  ((closureN)self_7313091)->elements[1])->fn),  set_cell_as_expr(&local_7315395, set_pair_as_expr(&local_7315398, r_734404, set_pair_as_expr(&local_7315401, NULL, Cyc_cdr(data, ((closureN)self_7313091)->elements[0])))));; 
-+return_direct_with_clo1(data,  ((closureN)self_7311845)->elements[1], (((closure)  ((closureN)self_7311845)->elements[1])->fn),  set_cell_as_expr(&local_7314102, set_pair_as_expr(&local_7314105, r_733959, set_pair_as_expr(&local_7314108, NULL, Cyc_cdr(data, ((closureN)self_7311845)->elements[0])))));; 
++return_direct_with_clo1(data,  ((closureN)self_7311838)->elements[1], (((closure)  ((closureN)self_7311838)->elements[1])->fn),  set_cell_as_expr(&local_7314095, set_pair_as_expr(&local_7314098, r_733952, set_pair_as_expr(&local_7314101, NULL, Cyc_cdr(data, ((closureN)self_7311838)->elements[0])))));; 
  }
  
 -static void __lambda_84(void *data, object _, int argc, object *args) /* closure _,object k_734299, object expr_7388_732884, object rename_7389_732885, object compare_7390_732886 */
-+static void __lambda_84(void *data, object _, int argc, object *args) /* closure _,object k_733854, object expr_7388_732544, object rename_7389_732545, object compare_7390_732546 */
++static void __lambda_84(void *data, object _, int argc, object *args) /* closure _,object k_733847, object expr_7388_732537, object rename_7389_732538, object compare_7390_732539 */
   {
 -object k_734299 = args[0]; object expr_7388_732884 = args[1]; object rename_7389_732885 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:cond-expand");
-+object k_733854 = args[0]; object expr_7388_732544 = args[1]; object rename_7389_732545 = args[2];
-+  Cyc_st_add(data, "base.sld:cond-expand");
++object k_733847 = args[0]; object expr_7388_732537 = args[1]; object rename_7389_732538 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:cond-expand");
  
 -closureN_type c_7314951;
 -object e_7315364 [3];
@@ -62493,28 +62760,28 @@ Make let-values be the same as let*-values, to work around
 -c_7314951.elements[0] = expr_7388_732884;
 -c_7314951.elements[1] = k_734299;
 -c_7314951.elements[2] = rename_7389_732885;
-+closureN_type c_7313658;
-+object e_7314071 [3];
-+c_7313658.hdr.mark = gc_color_red;
-+ c_7313658.hdr.grayed = 0;
-+c_7313658.tag = closureN_tag;
-+ c_7313658.fn = (function_type)__lambda_85;
-+c_7313658.num_args = 4;
-+c_7313658.num_elements = 3;
-+c_7313658.elements = (object *)e_7314071;
-+c_7313658.elements[0] = expr_7388_732544;
-+c_7313658.elements[1] = k_733854;
-+c_7313658.elements[2] = rename_7389_732545;
++closureN_type c_7313651;
++object e_7314064 [3];
++c_7313651.hdr.mark = gc_color_red;
++ c_7313651.hdr.grayed = 0;
++c_7313651.tag = closureN_tag;
++ c_7313651.fn = (function_type)__lambda_85;
++c_7313651.num_args = 4;
++c_7313651.num_elements = 3;
++c_7313651.elements = (object *)e_7314064;
++c_7313651.elements[0] = expr_7388_732537;
++c_7313651.elements[1] = k_733847;
++c_7313651.elements[2] = rename_7389_732538;
  
 -return_direct_with_clo4(data,(closure)&c_7314951,__lambda_85,  boolean_f, boolean_f, boolean_f, boolean_f);; 
-+return_direct_with_clo4(data,(closure)&c_7313658,__lambda_85,  boolean_f, boolean_f, boolean_f, boolean_f);; 
++return_direct_with_clo4(data,(closure)&c_7313651,__lambda_85,  boolean_f, boolean_f, boolean_f, boolean_f);; 
  }
  
 -static void __lambda_85(void *data, object self_7313045, int argc, object *args) /* object self_7313045, object _191lib_117import_91_125filename_732891, object _191lib_117import_91_125library_91name_732892, object _191library_91exists_127_732893, object check_732894 */
-+static void __lambda_85(void *data, object self_7311799, int argc, object *args) /* object self_7311799, object _191lib_117import_91_125filename_732551, object _191lib_117import_91_125library_91name_732552, object _191library_91exists_127_732553, object check_732554 */
++static void __lambda_85(void *data, object self_7311792, int argc, object *args) /* object self_7311792, object _191lib_117import_91_125filename_732544, object _191lib_117import_91_125library_91name_732545, object _191library_91exists_127_732546, object check_732547 */
   {
 - object _191lib_117import_91_125filename_732891 = args[0]; object _191lib_117import_91_125library_91name_732892 = args[1]; object _191library_91exists_127_732893 = args[2]; object check_732894 = args[3];
-+ object _191lib_117import_91_125filename_732551 = args[0]; object _191lib_117import_91_125library_91name_732552 = args[1]; object _191library_91exists_127_732553 = args[2]; object check_732554 = args[3];
++ object _191lib_117import_91_125filename_732544 = args[0]; object _191lib_117import_91_125library_91name_732545 = args[1]; object _191library_91exists_127_732546 = args[2]; object check_732547 = args[3];
    
 -closureN_type c_7314953;
 -object e_7315360 [6];
@@ -62531,34 +62798,34 @@ Make let-values be the same as let*-values, to work around
 -c_7314953.elements[3] = ((closureN)self_7313045)->elements[0];
 -c_7314953.elements[4] = ((closureN)self_7313045)->elements[1];
 -c_7314953.elements[5] = ((closureN)self_7313045)->elements[2];
-+closureN_type c_7313660;
-+object e_7314067 [6];
-+c_7313660.hdr.mark = gc_color_red;
-+ c_7313660.hdr.grayed = 0;
-+c_7313660.tag = closureN_tag;
-+ c_7313660.fn = (function_type)__lambda_1292;
-+c_7313660.num_args = 1;
-+c_7313660.num_elements = 6;
-+c_7313660.elements = (object *)e_7314067;
-+c_7313660.elements[0] = _191lib_117import_91_125library_91name_732552;
-+c_7313660.elements[1] = _191library_91exists_127_732553;
-+c_7313660.elements[2] = check_732554;
-+c_7313660.elements[3] = ((closureN)self_7311799)->elements[0];
-+c_7313660.elements[4] = ((closureN)self_7311799)->elements[1];
-+c_7313660.elements[5] = ((closureN)self_7311799)->elements[2];
++closureN_type c_7313653;
++object e_7314060 [6];
++c_7313653.hdr.mark = gc_color_red;
++ c_7313653.hdr.grayed = 0;
++c_7313653.tag = closureN_tag;
++ c_7313653.fn = (function_type)__lambda_1292;
++c_7313653.num_args = 1;
++c_7313653.num_elements = 6;
++c_7313653.elements = (object *)e_7314060;
++c_7313653.elements[0] = _191lib_117import_91_125library_91name_732545;
++c_7313653.elements[1] = _191library_91exists_127_732546;
++c_7313653.elements[2] = check_732547;
++c_7313653.elements[3] = ((closureN)self_7311792)->elements[0];
++c_7313653.elements[4] = ((closureN)self_7311792)->elements[1];
++c_7313653.elements[5] = ((closureN)self_7311792)->elements[2];
  
  
 -pair_type local_7315363; 
 -return_direct_with_clo1(data,(closure)&c_7314953,__lambda_1339,  set_cell_as_expr(&local_7315363, _191lib_117import_91_125filename_732891));; 
-+pair_type local_7314070; 
-+return_direct_with_clo1(data,(closure)&c_7313660,__lambda_1292,  set_cell_as_expr(&local_7314070, _191lib_117import_91_125filename_732551));; 
++pair_type local_7314063; 
++return_direct_with_clo1(data,(closure)&c_7313653,__lambda_1292,  set_cell_as_expr(&local_7314063, _191lib_117import_91_125filename_732544));; 
  }
  
 -static void __lambda_1339(void *data, object self_7313046, int argc, object *args) /* object self_7313046, object _191lib_117import_91_125filename_732891 */
-+static void __lambda_1292(void *data, object self_7311800, int argc, object *args) /* object self_7311800, object _191lib_117import_91_125filename_732551 */
++static void __lambda_1292(void *data, object self_7311793, int argc, object *args) /* object self_7311793, object _191lib_117import_91_125filename_732544 */
   {
 - object _191lib_117import_91_125filename_732891 = args[0];
-+ object _191lib_117import_91_125filename_732551 = args[0];
++ object _191lib_117import_91_125filename_732544 = args[0];
    
 -closureN_type c_7314955;
 -object e_7315355 [6];
@@ -62575,34 +62842,34 @@ Make let-values be the same as let*-values, to work around
 -c_7314955.elements[3] = ((closureN)self_7313046)->elements[3];
 -c_7314955.elements[4] = ((closureN)self_7313046)->elements[4];
 -c_7314955.elements[5] = ((closureN)self_7313046)->elements[5];
-+closureN_type c_7313662;
-+object e_7314062 [6];
-+c_7313662.hdr.mark = gc_color_red;
-+ c_7313662.hdr.grayed = 0;
-+c_7313662.tag = closureN_tag;
-+ c_7313662.fn = (function_type)__lambda_1291;
-+c_7313662.num_args = 1;
-+c_7313662.num_elements = 6;
-+c_7313662.elements = (object *)e_7314062;
-+c_7313662.elements[0] = _191lib_117import_91_125filename_732551;
-+c_7313662.elements[1] = ((closureN)self_7311800)->elements[1];
-+c_7313662.elements[2] = ((closureN)self_7311800)->elements[2];
-+c_7313662.elements[3] = ((closureN)self_7311800)->elements[3];
-+c_7313662.elements[4] = ((closureN)self_7311800)->elements[4];
-+c_7313662.elements[5] = ((closureN)self_7311800)->elements[5];
++closureN_type c_7313655;
++object e_7314055 [6];
++c_7313655.hdr.mark = gc_color_red;
++ c_7313655.hdr.grayed = 0;
++c_7313655.tag = closureN_tag;
++ c_7313655.fn = (function_type)__lambda_1291;
++c_7313655.num_args = 1;
++c_7313655.num_elements = 6;
++c_7313655.elements = (object *)e_7314055;
++c_7313655.elements[0] = _191lib_117import_91_125filename_732544;
++c_7313655.elements[1] = ((closureN)self_7311793)->elements[1];
++c_7313655.elements[2] = ((closureN)self_7311793)->elements[2];
++c_7313655.elements[3] = ((closureN)self_7311793)->elements[3];
++c_7313655.elements[4] = ((closureN)self_7311793)->elements[4];
++c_7313655.elements[5] = ((closureN)self_7311793)->elements[5];
  
  
 -pair_type local_7315358; 
 -return_direct_with_clo1(data,(closure)&c_7314955,__lambda_1338,  set_cell_as_expr(&local_7315358, ((closureN)self_7313046)->elements[0]));; 
-+pair_type local_7314065; 
-+return_direct_with_clo1(data,(closure)&c_7313662,__lambda_1291,  set_cell_as_expr(&local_7314065, ((closureN)self_7311800)->elements[0]));; 
++pair_type local_7314058; 
++return_direct_with_clo1(data,(closure)&c_7313655,__lambda_1291,  set_cell_as_expr(&local_7314058, ((closureN)self_7311793)->elements[0]));; 
  }
  
 -static void __lambda_1338(void *data, object self_7313047, int argc, object *args) /* object self_7313047, object _191lib_117import_91_125library_91name_732892 */
-+static void __lambda_1291(void *data, object self_7311801, int argc, object *args) /* object self_7311801, object _191lib_117import_91_125library_91name_732552 */
++static void __lambda_1291(void *data, object self_7311794, int argc, object *args) /* object self_7311794, object _191lib_117import_91_125library_91name_732545 */
   {
 - object _191lib_117import_91_125library_91name_732892 = args[0];
-+ object _191lib_117import_91_125library_91name_732552 = args[0];
++ object _191lib_117import_91_125library_91name_732545 = args[0];
    
 -closureN_type c_7314957;
 -object e_7315350 [6];
@@ -62619,34 +62886,34 @@ Make let-values be the same as let*-values, to work around
 -c_7314957.elements[3] = ((closureN)self_7313047)->elements[3];
 -c_7314957.elements[4] = ((closureN)self_7313047)->elements[4];
 -c_7314957.elements[5] = ((closureN)self_7313047)->elements[5];
-+closureN_type c_7313664;
-+object e_7314057 [6];
-+c_7313664.hdr.mark = gc_color_red;
-+ c_7313664.hdr.grayed = 0;
-+c_7313664.tag = closureN_tag;
-+ c_7313664.fn = (function_type)__lambda_1290;
-+c_7313664.num_args = 1;
-+c_7313664.num_elements = 6;
-+c_7313664.elements = (object *)e_7314057;
-+c_7313664.elements[0] = ((closureN)self_7311801)->elements[0];
-+c_7313664.elements[1] = _191lib_117import_91_125library_91name_732552;
-+c_7313664.elements[2] = ((closureN)self_7311801)->elements[2];
-+c_7313664.elements[3] = ((closureN)self_7311801)->elements[3];
-+c_7313664.elements[4] = ((closureN)self_7311801)->elements[4];
-+c_7313664.elements[5] = ((closureN)self_7311801)->elements[5];
++closureN_type c_7313657;
++object e_7314050 [6];
++c_7313657.hdr.mark = gc_color_red;
++ c_7313657.hdr.grayed = 0;
++c_7313657.tag = closureN_tag;
++ c_7313657.fn = (function_type)__lambda_1290;
++c_7313657.num_args = 1;
++c_7313657.num_elements = 6;
++c_7313657.elements = (object *)e_7314050;
++c_7313657.elements[0] = ((closureN)self_7311794)->elements[0];
++c_7313657.elements[1] = _191lib_117import_91_125library_91name_732545;
++c_7313657.elements[2] = ((closureN)self_7311794)->elements[2];
++c_7313657.elements[3] = ((closureN)self_7311794)->elements[3];
++c_7313657.elements[4] = ((closureN)self_7311794)->elements[4];
++c_7313657.elements[5] = ((closureN)self_7311794)->elements[5];
  
  
 -pair_type local_7315353; 
 -return_direct_with_clo1(data,(closure)&c_7314957,__lambda_1337,  set_cell_as_expr(&local_7315353, ((closureN)self_7313047)->elements[1]));; 
-+pair_type local_7314060; 
-+return_direct_with_clo1(data,(closure)&c_7313664,__lambda_1290,  set_cell_as_expr(&local_7314060, ((closureN)self_7311801)->elements[1]));; 
++pair_type local_7314053; 
++return_direct_with_clo1(data,(closure)&c_7313657,__lambda_1290,  set_cell_as_expr(&local_7314053, ((closureN)self_7311794)->elements[1]));; 
  }
  
 -static void __lambda_1337(void *data, object self_7313048, int argc, object *args) /* object self_7313048, object _191library_91exists_127_732893 */
-+static void __lambda_1290(void *data, object self_7311802, int argc, object *args) /* object self_7311802, object _191library_91exists_127_732553 */
++static void __lambda_1290(void *data, object self_7311795, int argc, object *args) /* object self_7311795, object _191library_91exists_127_732546 */
   {
 - object _191library_91exists_127_732893 = args[0];
-+ object _191library_91exists_127_732553 = args[0];
++ object _191library_91exists_127_732546 = args[0];
    
 -closureN_type c_7314959;
 -object e_7315345 [6];
@@ -62663,34 +62930,34 @@ Make let-values be the same as let*-values, to work around
 -c_7314959.elements[3] = ((closureN)self_7313048)->elements[3];
 -c_7314959.elements[4] = ((closureN)self_7313048)->elements[4];
 -c_7314959.elements[5] = ((closureN)self_7313048)->elements[5];
-+closureN_type c_7313666;
-+object e_7314052 [6];
-+c_7313666.hdr.mark = gc_color_red;
-+ c_7313666.hdr.grayed = 0;
-+c_7313666.tag = closureN_tag;
-+ c_7313666.fn = (function_type)__lambda_1289;
-+c_7313666.num_args = 1;
-+c_7313666.num_elements = 6;
-+c_7313666.elements = (object *)e_7314052;
-+c_7313666.elements[0] = ((closureN)self_7311802)->elements[0];
-+c_7313666.elements[1] = ((closureN)self_7311802)->elements[1];
-+c_7313666.elements[2] = _191library_91exists_127_732553;
-+c_7313666.elements[3] = ((closureN)self_7311802)->elements[3];
-+c_7313666.elements[4] = ((closureN)self_7311802)->elements[4];
-+c_7313666.elements[5] = ((closureN)self_7311802)->elements[5];
++closureN_type c_7313659;
++object e_7314045 [6];
++c_7313659.hdr.mark = gc_color_red;
++ c_7313659.hdr.grayed = 0;
++c_7313659.tag = closureN_tag;
++ c_7313659.fn = (function_type)__lambda_1289;
++c_7313659.num_args = 1;
++c_7313659.num_elements = 6;
++c_7313659.elements = (object *)e_7314045;
++c_7313659.elements[0] = ((closureN)self_7311795)->elements[0];
++c_7313659.elements[1] = ((closureN)self_7311795)->elements[1];
++c_7313659.elements[2] = _191library_91exists_127_732546;
++c_7313659.elements[3] = ((closureN)self_7311795)->elements[3];
++c_7313659.elements[4] = ((closureN)self_7311795)->elements[4];
++c_7313659.elements[5] = ((closureN)self_7311795)->elements[5];
  
  
 -pair_type local_7315348; 
 -return_direct_with_clo1(data,(closure)&c_7314959,__lambda_1336,  set_cell_as_expr(&local_7315348, ((closureN)self_7313048)->elements[2]));; 
-+pair_type local_7314055; 
-+return_direct_with_clo1(data,(closure)&c_7313666,__lambda_1289,  set_cell_as_expr(&local_7314055, ((closureN)self_7311802)->elements[2]));; 
++pair_type local_7314048; 
++return_direct_with_clo1(data,(closure)&c_7313659,__lambda_1289,  set_cell_as_expr(&local_7314048, ((closureN)self_7311795)->elements[2]));; 
  }
  
 -static void __lambda_1336(void *data, object self_7313049, int argc, object *args) /* object self_7313049, object check_732894 */
-+static void __lambda_1289(void *data, object self_7311803, int argc, object *args) /* object self_7311803, object check_732554 */
++static void __lambda_1289(void *data, object self_7311796, int argc, object *args) /* object self_7311796, object check_732547 */
   {
 - object check_732894 = args[0];
-+ object check_732554 = args[0];
++ object check_732547 = args[0];
    
 -closureN_type c_7314961;
 -object e_7315315 [7];
@@ -62708,22 +62975,22 @@ Make let-values be the same as let*-values, to work around
 -c_7314961.elements[4] = ((closureN)self_7313049)->elements[3];
 -c_7314961.elements[5] = ((closureN)self_7313049)->elements[4];
 -c_7314961.elements[6] = ((closureN)self_7313049)->elements[5];
-+closureN_type c_7313668;
-+object e_7314022 [7];
-+c_7313668.hdr.mark = gc_color_red;
-+ c_7313668.hdr.grayed = 0;
-+c_7313668.tag = closureN_tag;
-+ c_7313668.fn = (function_type)__lambda_86;
-+c_7313668.num_args = 1;
-+c_7313668.num_elements = 7;
-+c_7313668.elements = (object *)e_7314022;
-+c_7313668.elements[0] = ((closureN)self_7311803)->elements[0];
-+c_7313668.elements[1] = ((closureN)self_7311803)->elements[1];
-+c_7313668.elements[2] = ((closureN)self_7311803)->elements[2];
-+c_7313668.elements[3] = check_732554;
-+c_7313668.elements[4] = ((closureN)self_7311803)->elements[3];
-+c_7313668.elements[5] = ((closureN)self_7311803)->elements[4];
-+c_7313668.elements[6] = ((closureN)self_7311803)->elements[5];
++closureN_type c_7313661;
++object e_7314015 [7];
++c_7313661.hdr.mark = gc_color_red;
++ c_7313661.hdr.grayed = 0;
++c_7313661.tag = closureN_tag;
++ c_7313661.fn = (function_type)__lambda_86;
++c_7313661.num_args = 1;
++c_7313661.num_elements = 7;
++c_7313661.elements = (object *)e_7314015;
++c_7313661.elements[0] = ((closureN)self_7311796)->elements[0];
++c_7313661.elements[1] = ((closureN)self_7311796)->elements[1];
++c_7313661.elements[2] = ((closureN)self_7311796)->elements[2];
++c_7313661.elements[3] = check_732547;
++c_7313661.elements[4] = ((closureN)self_7311796)->elements[3];
++c_7313661.elements[5] = ((closureN)self_7311796)->elements[4];
++c_7313661.elements[6] = ((closureN)self_7311796)->elements[5];
  
  
 -closureN_type c_7315316;
@@ -62737,29 +63004,29 @@ Make let-values be the same as let*-values, to work around
 -c_7315316.elements = (object *)e_7315344;
 -c_7315316.elements[0] = ((closureN)self_7313049)->elements[0];
 -c_7315316.elements[1] = ((closureN)self_7313049)->elements[1];
-+closureN_type c_7314023;
-+object e_7314051 [2];
-+c_7314023.hdr.mark = gc_color_red;
-+ c_7314023.hdr.grayed = 0;
-+c_7314023.tag = closureN_tag;
-+ c_7314023.fn = (function_type)__lambda_118;
-+c_7314023.num_args = 1;
-+c_7314023.num_elements = 2;
-+c_7314023.elements = (object *)e_7314051;
-+c_7314023.elements[0] = ((closureN)self_7311803)->elements[0];
-+c_7314023.elements[1] = ((closureN)self_7311803)->elements[1];
++closureN_type c_7314016;
++object e_7314044 [2];
++c_7314016.hdr.mark = gc_color_red;
++ c_7314016.hdr.grayed = 0;
++c_7314016.tag = closureN_tag;
++ c_7314016.fn = (function_type)__lambda_118;
++c_7314016.num_args = 1;
++c_7314016.num_elements = 2;
++c_7314016.elements = (object *)e_7314044;
++c_7314016.elements[0] = ((closureN)self_7311796)->elements[0];
++c_7314016.elements[1] = ((closureN)self_7311796)->elements[1];
  
 -return_direct_with_clo1(data,(closure)&c_7314961,__lambda_86,  &c_7315316);; 
-+return_direct_with_clo1(data,(closure)&c_7313668,__lambda_86,  &c_7314023);; 
++return_direct_with_clo1(data,(closure)&c_7313661,__lambda_86,  &c_7314016);; 
  }
  
 -static void __lambda_118(void *data, object self_7313050, int argc, object *args) /* object self_7313050, object k_734390, object import_7391_732899, object ext_7392_732900_raw, ... */
-+static void __lambda_118(void *data, object self_7311804, int argc, object *args) /* object self_7311804, object k_733945, object import_7391_732559, object ext_7392_732560_raw, ... */
++static void __lambda_118(void *data, object self_7311797, int argc, object *args) /* object self_7311797, object k_733938, object import_7391_732552, object ext_7392_732553_raw, ... */
   {
 - object k_734390 = args[0]; object import_7391_732899 = args[1];
 -load_varargs(ext_7392_732900, args, 2, argc - 2);
-+ object k_733945 = args[0]; object import_7391_732559 = args[1];
-+load_varargs(ext_7392_732560, args, 2, argc - 2);
++ object k_733938 = args[0]; object import_7391_732552 = args[1];
++load_varargs(ext_7392_732553, args, 2, argc - 2);
    
  
  
@@ -62775,30 +63042,30 @@ Make let-values be the same as let*-values, to work around
 -c_7315321.elements[0] = ((closureN)self_7313050)->elements[0];
 -c_7315321.elements[1] = ext_7392_732900;
 -c_7315321.elements[2] = k_734390;
-+closureN_type c_7314028;
-+object e_7314050 [3];
-+c_7314028.hdr.mark = gc_color_red;
-+ c_7314028.hdr.grayed = 0;
-+c_7314028.tag = closureN_tag;
-+ c_7314028.fn = (function_type)__lambda_119;
-+c_7314028.num_args = 1;
-+c_7314028.num_elements = 3;
-+c_7314028.elements = (object *)e_7314050;
-+c_7314028.elements[0] = ((closureN)self_7311804)->elements[0];
-+c_7314028.elements[1] = ext_7392_732560;
-+c_7314028.elements[2] = k_733945;
++closureN_type c_7314021;
++object e_7314043 [3];
++c_7314021.hdr.mark = gc_color_red;
++ c_7314021.hdr.grayed = 0;
++c_7314021.tag = closureN_tag;
++ c_7314021.fn = (function_type)__lambda_119;
++c_7314021.num_args = 1;
++c_7314021.num_elements = 3;
++c_7314021.elements = (object *)e_7314043;
++c_7314021.elements[0] = ((closureN)self_7311797)->elements[0];
++c_7314021.elements[1] = ext_7392_732553;
++c_7314021.elements[2] = k_733938;
  
 -return_closcall2(data,  car(((closureN)self_7313050)->elements[1]),  &c_7315321, import_7391_732899);; 
-+return_closcall2(data,  car(((closureN)self_7311804)->elements[1]),  &c_7314028, import_7391_732559);; 
++return_closcall2(data,  car(((closureN)self_7311797)->elements[1]),  &c_7314021, import_7391_732552);; 
  }
  
 -static void __lambda_119(void *data, object self_7313051, int argc, object *args) /* object self_7313051, object r_734392 */
-+static void __lambda_119(void *data, object self_7311805, int argc, object *args) /* object self_7311805, object r_733947 */
++static void __lambda_119(void *data, object self_7311798, int argc, object *args) /* object self_7311798, object r_733940 */
   {
 - object r_734392 = args[0];
 -  object r_734393;
-+ object r_733947 = args[0];
-+  object r_733948;
++ object r_733940 = args[0];
++  object r_733941;
      
 -if( (boolean_f != Cyc_is_null(((closureN)self_7313051)->elements[1])) ){ 
 -  object c_7315327;
@@ -62807,17 +63074,17 @@ Make let-values be the same as let*-values, to work around
 -memcpy(((string_type *)c_7315327)->str, tmp_7315328,4);
 -((string_type *)c_7315327)->str[4] = '\0';
 -  r_734393 = c_7315327;
-+if( (boolean_f != Cyc_is_null(((closureN)self_7311805)->elements[1])) ){ 
-+  object c_7314034;
-+ alloc_string(data,c_7314034, 4, 4);
-+char tmp_7314035[] = ".sld";
-+memcpy(((string_type *)c_7314034)->str, tmp_7314035,4);
-+((string_type *)c_7314034)->str[4] = '\0';
-+  r_733948 = c_7314034;
++if( (boolean_f != Cyc_is_null(((closureN)self_7311798)->elements[1])) ){ 
++  object c_7314027;
++ alloc_string(data,c_7314027, 4, 4);
++char tmp_7314028[] = ".sld";
++memcpy(((string_type *)c_7314027)->str, tmp_7314028,4);
++((string_type *)c_7314027)->str[4] = '\0';
++  r_733941 = c_7314027;
  } else { 
    
 -  r_734393 = Cyc_car(data, ((closureN)self_7313051)->elements[1]);}
-+  r_733948 = Cyc_car(data, ((closureN)self_7311805)->elements[1]);}
++  r_733941 = Cyc_car(data, ((closureN)self_7311798)->elements[1]);}
  ;
  
  
@@ -62831,37 +63098,37 @@ Make let-values be the same as let*-values, to work around
 -c_7315337.num_elements = 1;
 -c_7315337.elements = (object *)e_7315342;
 -c_7315337.elements[0] = ((closureN)self_7313051)->elements[2];
-+closureN_type c_7314044;
-+object e_7314049 [1];
-+c_7314044.hdr.mark = gc_color_red;
-+ c_7314044.hdr.grayed = 0;
-+c_7314044.tag = closureN_tag;
-+ c_7314044.fn = (function_type)__lambda_120;
-+c_7314044.num_args = 1;
-+c_7314044.num_elements = 1;
-+c_7314044.elements = (object *)e_7314049;
-+c_7314044.elements[0] = ((closureN)self_7311805)->elements[2];
++closureN_type c_7314037;
++object e_7314042 [1];
++c_7314037.hdr.mark = gc_color_red;
++ c_7314037.hdr.grayed = 0;
++c_7314037.tag = closureN_tag;
++ c_7314037.fn = (function_type)__lambda_120;
++c_7314037.num_args = 1;
++c_7314037.num_elements = 1;
++c_7314037.elements = (object *)e_7314042;
++c_7314037.elements[0] = ((closureN)self_7311798)->elements[2];
  
 -return_closcall3(data,  car(((closureN)self_7313051)->elements[0]),  &c_7315337, r_734392, r_734393);; 
-+return_closcall3(data,  car(((closureN)self_7311805)->elements[0]),  &c_7314044, r_733947, r_733948);; 
++return_closcall3(data,  car(((closureN)self_7311798)->elements[0]),  &c_7314037, r_733940, r_733941);; 
  }
  
 -static void __lambda_120(void *data, object self_7313052, int argc, object *args) /* object self_7313052, object r_734391 */
-+static void __lambda_120(void *data, object self_7311806, int argc, object *args) /* object self_7311806, object r_733946 */
++static void __lambda_120(void *data, object self_7311799, int argc, object *args) /* object self_7311799, object r_733939 */
   {
 - object r_734391 = args[0];
-+ object r_733946 = args[0];
++ object r_733939 = args[0];
    
  
 -return_direct_with_clo1(data,  ((closureN)self_7313052)->elements[0], (((closure)  ((closureN)self_7313052)->elements[0])->fn),  Cyc_io_file_exists(data, r_734391));; 
-+return_direct_with_clo1(data,  ((closureN)self_7311806)->elements[0], (((closure)  ((closureN)self_7311806)->elements[0])->fn),  Cyc_io_file_exists(data, r_733946));; 
++return_direct_with_clo1(data,  ((closureN)self_7311799)->elements[0], (((closure)  ((closureN)self_7311799)->elements[0])->fn),  Cyc_io_file_exists(data, r_733939));; 
  }
  
 -static void __lambda_86(void *data, object self_7313053, int argc, object *args) /* object self_7313053, object r_734389 */
-+static void __lambda_86(void *data, object self_7311807, int argc, object *args) /* object self_7311807, object r_733944 */
++static void __lambda_86(void *data, object self_7311800, int argc, object *args) /* object self_7311800, object r_733937 */
   {
 - object r_734389 = args[0];
-+ object r_733944 = args[0];
++ object r_733937 = args[0];
    
 -closureN_type c_7314963;
 -object e_7315311 [7];
@@ -62879,31 +63146,31 @@ Make let-values be the same as let*-values, to work around
 -c_7314963.elements[4] = ((closureN)self_7313053)->elements[4];
 -c_7314963.elements[5] = ((closureN)self_7313053)->elements[5];
 -c_7314963.elements[6] = ((closureN)self_7313053)->elements[6];
-+closureN_type c_7313670;
-+object e_7314018 [7];
-+c_7313670.hdr.mark = gc_color_red;
-+ c_7313670.hdr.grayed = 0;
-+c_7313670.tag = closureN_tag;
-+ c_7313670.fn = (function_type)__lambda_87;
-+c_7313670.num_args = 1;
-+c_7313670.num_elements = 7;
-+c_7313670.elements = (object *)e_7314018;
-+c_7313670.elements[0] = ((closureN)self_7311807)->elements[0];
-+c_7313670.elements[1] = ((closureN)self_7311807)->elements[1];
-+c_7313670.elements[2] = ((closureN)self_7311807)->elements[2];
-+c_7313670.elements[3] = ((closureN)self_7311807)->elements[3];
-+c_7313670.elements[4] = ((closureN)self_7311807)->elements[4];
-+c_7313670.elements[5] = ((closureN)self_7311807)->elements[5];
-+c_7313670.elements[6] = ((closureN)self_7311807)->elements[6];
++closureN_type c_7313663;
++object e_7314011 [7];
++c_7313663.hdr.mark = gc_color_red;
++ c_7313663.hdr.grayed = 0;
++c_7313663.tag = closureN_tag;
++ c_7313663.fn = (function_type)__lambda_87;
++c_7313663.num_args = 1;
++c_7313663.num_elements = 7;
++c_7313663.elements = (object *)e_7314011;
++c_7313663.elements[0] = ((closureN)self_7311800)->elements[0];
++c_7313663.elements[1] = ((closureN)self_7311800)->elements[1];
++c_7313663.elements[2] = ((closureN)self_7311800)->elements[2];
++c_7313663.elements[3] = ((closureN)self_7311800)->elements[3];
++c_7313663.elements[4] = ((closureN)self_7311800)->elements[4];
++c_7313663.elements[5] = ((closureN)self_7311800)->elements[5];
++c_7313663.elements[6] = ((closureN)self_7311800)->elements[6];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7314963,__lambda_87,  Cyc_set_cell(data, ((closureN)self_7313053)->elements[2], r_734389));; 
-+return_direct_with_clo1(data,(closure)&c_7313670,__lambda_87,  Cyc_set_cell(data, ((closureN)self_7311807)->elements[2], r_733944));; 
++return_direct_with_clo1(data,(closure)&c_7313663,__lambda_87,  Cyc_set_cell(data, ((closureN)self_7311800)->elements[2], r_733937));; 
  }
  
 -static void __lambda_87(void *data, object self_7313054, int argc, object *args) /* object self_7313054, object r_734300 */
-+static void __lambda_87(void *data, object self_7311808, int argc, object *args) /* object self_7311808, object r_733855 */
++static void __lambda_87(void *data, object self_7311801, int argc, object *args) /* object self_7311801, object r_733848 */
   {
  
    
@@ -62923,22 +63190,22 @@ Make let-values be the same as let*-values, to work around
 -c_7314965.elements[4] = ((closureN)self_7313054)->elements[4];
 -c_7314965.elements[5] = ((closureN)self_7313054)->elements[5];
 -c_7314965.elements[6] = ((closureN)self_7313054)->elements[6];
-+closureN_type c_7313672;
-+object e_7313897 [7];
-+c_7313672.hdr.mark = gc_color_red;
-+ c_7313672.hdr.grayed = 0;
-+c_7313672.tag = closureN_tag;
-+ c_7313672.fn = (function_type)__lambda_88;
-+c_7313672.num_args = 1;
-+c_7313672.num_elements = 7;
-+c_7313672.elements = (object *)e_7313897;
-+c_7313672.elements[0] = ((closureN)self_7311808)->elements[0];
-+c_7313672.elements[1] = ((closureN)self_7311808)->elements[1];
-+c_7313672.elements[2] = ((closureN)self_7311808)->elements[2];
-+c_7313672.elements[3] = ((closureN)self_7311808)->elements[3];
-+c_7313672.elements[4] = ((closureN)self_7311808)->elements[4];
-+c_7313672.elements[5] = ((closureN)self_7311808)->elements[5];
-+c_7313672.elements[6] = ((closureN)self_7311808)->elements[6];
++closureN_type c_7313665;
++object e_7313890 [7];
++c_7313665.hdr.mark = gc_color_red;
++ c_7313665.hdr.grayed = 0;
++c_7313665.tag = closureN_tag;
++ c_7313665.fn = (function_type)__lambda_88;
++c_7313665.num_args = 1;
++c_7313665.num_elements = 7;
++c_7313665.elements = (object *)e_7313890;
++c_7313665.elements[0] = ((closureN)self_7311801)->elements[0];
++c_7313665.elements[1] = ((closureN)self_7311801)->elements[1];
++c_7313665.elements[2] = ((closureN)self_7311801)->elements[2];
++c_7313665.elements[3] = ((closureN)self_7311801)->elements[3];
++c_7313665.elements[4] = ((closureN)self_7311801)->elements[4];
++c_7313665.elements[5] = ((closureN)self_7311801)->elements[5];
++c_7313665.elements[6] = ((closureN)self_7311801)->elements[6];
  
  
 -closureN_type c_7315191;
@@ -62951,30 +63218,30 @@ Make let-values be the same as let*-values, to work around
 -c_7315191.num_elements = 1;
 -c_7315191.elements = (object *)e_7315310;
 -c_7315191.elements[0] = ((closureN)self_7313054)->elements[4];
-+closureN_type c_7313898;
-+object e_7314017 [1];
-+c_7313898.hdr.mark = gc_color_red;
-+ c_7313898.hdr.grayed = 0;
-+c_7313898.tag = closureN_tag;
-+ c_7313898.fn = (function_type)__lambda_106;
-+c_7313898.num_args = 1;
-+c_7313898.num_elements = 1;
-+c_7313898.elements = (object *)e_7314017;
-+c_7313898.elements[0] = ((closureN)self_7311808)->elements[4];
++closureN_type c_7313891;
++object e_7314010 [1];
++c_7313891.hdr.mark = gc_color_red;
++ c_7313891.hdr.grayed = 0;
++c_7313891.tag = closureN_tag;
++ c_7313891.fn = (function_type)__lambda_106;
++c_7313891.num_args = 1;
++c_7313891.num_elements = 1;
++c_7313891.elements = (object *)e_7314010;
++c_7313891.elements[0] = ((closureN)self_7311801)->elements[4];
  
 -return_direct_with_clo1(data,(closure)&c_7314965,__lambda_88,  &c_7315191);; 
-+return_direct_with_clo1(data,(closure)&c_7313672,__lambda_88,  &c_7313898);; 
++return_direct_with_clo1(data,(closure)&c_7313665,__lambda_88,  &c_7313891);; 
  }
  
 -static void __lambda_106(void *data, object self_7313055, int argc, object *args) /* object self_7313055, object k_734362, object import_7393_732901, object ext_7394_732902_raw, ... */
-+static void __lambda_106(void *data, object self_7311809, int argc, object *args) /* object self_7311809, object k_733917, object import_7393_732561, object ext_7394_732562_raw, ... */
++static void __lambda_106(void *data, object self_7311802, int argc, object *args) /* object self_7311802, object k_733910, object import_7393_732554, object ext_7394_732555_raw, ... */
   {
 - object k_734362 = args[0]; object import_7393_732901 = args[1];
 -load_varargs(ext_7394_732902, args, 2, argc - 2);
 -  object file_91ext_7397_732903;
-+ object k_733917 = args[0]; object import_7393_732561 = args[1];
-+load_varargs(ext_7394_732562, args, 2, argc - 2);
-+  object file_91ext_7397_732563;
++ object k_733910 = args[0]; object import_7393_732554 = args[1];
++load_varargs(ext_7394_732555, args, 2, argc - 2);
++  object file_91ext_7397_732556;
      
 -if( (boolean_f != Cyc_is_null(ext_7394_732902)) ){ 
 -  object c_7315196;
@@ -62983,17 +63250,17 @@ Make let-values be the same as let*-values, to work around
 -memcpy(((string_type *)c_7315196)->str, tmp_7315197,4);
 -((string_type *)c_7315196)->str[4] = '\0';
 -  file_91ext_7397_732903 = c_7315196;
-+if( (boolean_f != Cyc_is_null(ext_7394_732562)) ){ 
-+  object c_7313903;
-+ alloc_string(data,c_7313903, 4, 4);
-+char tmp_7313904[] = ".sld";
-+memcpy(((string_type *)c_7313903)->str, tmp_7313904,4);
-+((string_type *)c_7313903)->str[4] = '\0';
-+  file_91ext_7397_732563 = c_7313903;
++if( (boolean_f != Cyc_is_null(ext_7394_732555)) ){ 
++  object c_7313896;
++ alloc_string(data,c_7313896, 4, 4);
++char tmp_7313897[] = ".sld";
++memcpy(((string_type *)c_7313896)->str, tmp_7313897,4);
++((string_type *)c_7313896)->str[4] = '\0';
++  file_91ext_7397_732556 = c_7313896;
  } else { 
    
 -  file_91ext_7397_732903 = Cyc_car(data, ext_7394_732902);}
-+  file_91ext_7397_732563 = Cyc_car(data, ext_7394_732562);}
++  file_91ext_7397_732556 = Cyc_car(data, ext_7394_732555);}
  ;
 -closureN_type c_7315202;
 -object e_7315277 [3];
@@ -63007,18 +63274,18 @@ Make let-values be the same as let*-values, to work around
 -c_7315202.elements[0] = file_91ext_7397_732903;
 -c_7315202.elements[1] = import_7393_732901;
 -c_7315202.elements[2] = k_734362;
-+closureN_type c_7313909;
-+object e_7313984 [3];
-+c_7313909.hdr.mark = gc_color_red;
-+ c_7313909.hdr.grayed = 0;
-+c_7313909.tag = closureN_tag;
-+ c_7313909.fn = (function_type)__lambda_107;
-+c_7313909.num_args = 1;
-+c_7313909.num_elements = 3;
-+c_7313909.elements = (object *)e_7313984;
-+c_7313909.elements[0] = file_91ext_7397_732563;
-+c_7313909.elements[1] = import_7393_732561;
-+c_7313909.elements[2] = k_733917;
++closureN_type c_7313902;
++object e_7313977 [3];
++c_7313902.hdr.mark = gc_color_red;
++ c_7313902.hdr.grayed = 0;
++c_7313902.tag = closureN_tag;
++ c_7313902.fn = (function_type)__lambda_107;
++c_7313902.num_args = 1;
++c_7313902.num_elements = 3;
++c_7313902.elements = (object *)e_7313977;
++c_7313902.elements[0] = file_91ext_7397_732556;
++c_7313902.elements[1] = import_7393_732554;
++c_7313902.elements[2] = k_733910;
  
  
 -closureN_type c_7315278;
@@ -63031,26 +63298,26 @@ Make let-values be the same as let*-values, to work around
 -c_7315278.num_elements = 1;
 -c_7315278.elements = (object *)e_7315309;
 -c_7315278.elements[0] = ((closureN)self_7313055)->elements[0];
-+closureN_type c_7313985;
-+object e_7314016 [1];
-+c_7313985.hdr.mark = gc_color_red;
-+ c_7313985.hdr.grayed = 0;
-+c_7313985.tag = closureN_tag;
-+ c_7313985.fn = (function_type)__lambda_115;
-+c_7313985.num_args = 1;
-+c_7313985.num_elements = 1;
-+c_7313985.elements = (object *)e_7314016;
-+c_7313985.elements[0] = ((closureN)self_7311809)->elements[0];
++closureN_type c_7313978;
++object e_7314009 [1];
++c_7313978.hdr.mark = gc_color_red;
++ c_7313978.hdr.grayed = 0;
++c_7313978.tag = closureN_tag;
++ c_7313978.fn = (function_type)__lambda_115;
++c_7313978.num_args = 1;
++c_7313978.num_elements = 1;
++c_7313978.elements = (object *)e_7314009;
++c_7313978.elements[0] = ((closureN)self_7311802)->elements[0];
  
 -return_direct_with_clo1(data,(closure)&c_7315202,__lambda_107,  &c_7315278);; 
-+return_direct_with_clo1(data,(closure)&c_7313909,__lambda_107,  &c_7313985);; 
++return_direct_with_clo1(data,(closure)&c_7313902,__lambda_107,  &c_7313978);; 
  }
  
 -static void __lambda_115(void *data, object self_7313056, int argc, object *args) /* object self_7313056, object k_734382, object i_73113_732908 */
-+static void __lambda_115(void *data, object self_7311810, int argc, object *args) /* object self_7311810, object k_733937, object i_73113_732568 */
++static void __lambda_115(void *data, object self_7311803, int argc, object *args) /* object self_7311803, object k_733930, object i_73113_732561 */
   {
 - object k_734382 = args[0]; object i_73113_732908 = args[1];
-+ object k_733937 = args[0]; object i_73113_732568 = args[1];
++ object k_733930 = args[0]; object i_73113_732561 = args[1];
    
 -closureN_type c_7315280;
 -object e_7315300 [2];
@@ -63063,17 +63330,17 @@ Make let-values be the same as let*-values, to work around
 -c_7315280.elements = (object *)e_7315300;
 -c_7315280.elements[0] = ((closureN)self_7313056)->elements[0];
 -c_7315280.elements[1] = i_73113_732908;
-+closureN_type c_7313987;
-+object e_7314007 [2];
-+c_7313987.hdr.mark = gc_color_red;
-+ c_7313987.hdr.grayed = 0;
-+c_7313987.tag = closureN_tag;
-+ c_7313987.fn = (function_type)__lambda_116;
-+c_7313987.num_args = 0;
-+c_7313987.num_elements = 2;
-+c_7313987.elements = (object *)e_7314007;
-+c_7313987.elements[0] = ((closureN)self_7311810)->elements[0];
-+c_7313987.elements[1] = i_73113_732568;
++closureN_type c_7313980;
++object e_7314000 [2];
++c_7313980.hdr.mark = gc_color_red;
++ c_7313980.hdr.grayed = 0;
++c_7313980.tag = closureN_tag;
++ c_7313980.fn = (function_type)__lambda_116;
++c_7313980.num_args = 0;
++c_7313980.num_elements = 2;
++c_7313980.elements = (object *)e_7314000;
++c_7313980.elements[0] = ((closureN)self_7311803)->elements[0];
++c_7313980.elements[1] = i_73113_732561;
  
  
 -closureN_type c_7315301;
@@ -63086,73 +63353,73 @@ Make let-values be the same as let*-values, to work around
 -c_7315301.num_elements = 1;
 -c_7315301.elements = (object *)e_7315308;
 -c_7315301.elements[0] = k_734382;
-+closureN_type c_7314008;
-+object e_7314015 [1];
-+c_7314008.hdr.mark = gc_color_red;
-+ c_7314008.hdr.grayed = 0;
-+c_7314008.tag = closureN_tag;
-+ c_7314008.fn = (function_type)__lambda_117;
-+c_7314008.num_args = 1;
-+c_7314008.num_elements = 1;
-+c_7314008.elements = (object *)e_7314015;
-+c_7314008.elements[0] = k_733937;
++closureN_type c_7314001;
++object e_7314008 [1];
++c_7314001.hdr.mark = gc_color_red;
++ c_7314001.hdr.grayed = 0;
++c_7314001.tag = closureN_tag;
++ c_7314001.fn = (function_type)__lambda_117;
++c_7314001.num_args = 1;
++c_7314001.num_elements = 1;
++c_7314001.elements = (object *)e_7314008;
++c_7314001.elements[0] = k_733930;
  
 -return_direct_with_clo1(data,(closure)&c_7315280,__lambda_116,  &c_7315301);; 
-+return_direct_with_clo1(data,(closure)&c_7313987,__lambda_116,  &c_7314008);; 
++return_direct_with_clo1(data,(closure)&c_7313980,__lambda_116,  &c_7314001);; 
  }
  
 -static void __lambda_117(void *data, object self_7313057, int argc, object *args) /* object self_7313057, object r_734383 */
-+static void __lambda_117(void *data, object self_7311811, int argc, object *args) /* object self_7311811, object r_733938 */
++static void __lambda_117(void *data, object self_7311804, int argc, object *args) /* object self_7311804, object r_733931 */
   {
 - object r_734383 = args[0];
-+ object r_733938 = args[0];
++ object r_733931 = args[0];
    
 -make_utf8_string_with_len(c_7315307, "/", 1, 1);
-+make_utf8_string_with_len(c_7314014, "/", 1, 1);
++make_utf8_string_with_len(c_7314007, "/", 1, 1);
  
 -object c_7315306 = Cyc_string_append(data,  ((closureN)self_7313057)->elements[0],2,&c_7315307, r_734383);
 -return_direct_with_clo1(data,  ((closureN)self_7313057)->elements[0], (((closure)  ((closureN)self_7313057)->elements[0])->fn),  c_7315306);; 
-+object c_7314013 = Cyc_string_append(data,  ((closureN)self_7311811)->elements[0],2,&c_7314014, r_733938);
-+return_direct_with_clo1(data,  ((closureN)self_7311811)->elements[0], (((closure)  ((closureN)self_7311811)->elements[0])->fn),  c_7314013);; 
++object c_7314006 = Cyc_string_append(data,  ((closureN)self_7311804)->elements[0],2,&c_7314007, r_733931);
++return_direct_with_clo1(data,  ((closureN)self_7311804)->elements[0], (((closure)  ((closureN)self_7311804)->elements[0])->fn),  c_7314006);; 
  }
  
 -static void __lambda_116(void *data, object self_7313058, int argc, object *args) /* object self_7313058, object k_734384 */
-+static void __lambda_116(void *data, object self_7311812, int argc, object *args) /* object self_7311812, object k_733939 */
++static void __lambda_116(void *data, object self_7311805, int argc, object *args) /* object self_7311805, object k_733932 */
   {
 - object k_734384 = args[0];
-+ object k_733939 = args[0];
++ object k_733932 = args[0];
      
 -if( (boolean_f != Cyc_is_symbol(((closureN)self_7313058)->elements[1])) ){ 
-+if( (boolean_f != Cyc_is_symbol(((closureN)self_7311812)->elements[1])) ){ 
++if( (boolean_f != Cyc_is_symbol(((closureN)self_7311805)->elements[1])) ){ 
    
 -object c_7315287 = Cyc_symbol2string(data,  k_734384,((closureN)self_7313058)->elements[1]);
 -return_direct_with_clo1(data,  k_734384, (((closure)  k_734384)->fn),  c_7315287);
-+object c_7313994 = Cyc_symbol2string(data,  k_733939,((closureN)self_7311812)->elements[1]);
-+return_direct_with_clo1(data,  k_733939, (((closure)  k_733939)->fn),  c_7313994);
++object c_7313987 = Cyc_symbol2string(data,  k_733932,((closureN)self_7311805)->elements[1]);
++return_direct_with_clo1(data,  k_733932, (((closure)  k_733932)->fn),  c_7313987);
  } else { 
      
 -if( (boolean_f != Cyc_is_number(((closureN)self_7313058)->elements[1])) ){ 
-+if( (boolean_f != Cyc_is_number(((closureN)self_7311812)->elements[1])) ){ 
++if( (boolean_f != Cyc_is_number(((closureN)self_7311805)->elements[1])) ){ 
    
 -object c_7315295 = Cyc_number2string2(data,  k_734384,1,((closureN)self_7313058)->elements[1]);
 -return_direct_with_clo1(data,  k_734384, (((closure)  k_734384)->fn),  c_7315295);
-+object c_7314002 = Cyc_number2string2(data,  k_733939,1,((closureN)self_7311812)->elements[1]);
-+return_direct_with_clo1(data,  k_733939, (((closure)  k_733939)->fn),  c_7314002);
++object c_7313995 = Cyc_number2string2(data,  k_733932,1,((closureN)self_7311805)->elements[1]);
++return_direct_with_clo1(data,  k_733932, (((closure)  k_733932)->fn),  c_7313995);
  } else { 
    
 -make_utf8_string_with_len(c_7315298, "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_734384, &c_7315298, ((closureN)self_7313058)->elements[0]);}
-+make_utf8_string_with_len(c_7314005, "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_733939, &c_7314005, ((closureN)self_7311812)->elements[0]);}
++make_utf8_string_with_len(c_7313998, "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_733932, &c_7313998, ((closureN)self_7311805)->elements[0]);}
  ;}
  ;; 
  }
  
 -static void __lambda_107(void *data, object self_7313059, int argc, object *args) /* object self_7313059, object r_734381 */
-+static void __lambda_107(void *data, object self_7311813, int argc, object *args) /* object self_7311813, object r_733936 */
++static void __lambda_107(void *data, object self_7311806, int argc, object *args) /* object self_7311806, object r_733929 */
   {
 - object r_734381 = args[0];
-+ object r_733936 = args[0];
++ object r_733929 = args[0];
    
 -closureN_type c_7315204;
 -object e_7315275 [3];
@@ -63166,28 +63433,28 @@ Make let-values be the same as let*-values, to work around
 -c_7315204.elements[0] = ((closureN)self_7313059)->elements[0];
 -c_7315204.elements[1] = ((closureN)self_7313059)->elements[1];
 -c_7315204.elements[2] = ((closureN)self_7313059)->elements[2];
-+closureN_type c_7313911;
-+object e_7313982 [3];
-+c_7313911.hdr.mark = gc_color_red;
-+ c_7313911.hdr.grayed = 0;
-+c_7313911.tag = closureN_tag;
-+ c_7313911.fn = (function_type)__lambda_108;
-+c_7313911.num_args = 1;
-+c_7313911.num_elements = 3;
-+c_7313911.elements = (object *)e_7313982;
-+c_7313911.elements[0] = ((closureN)self_7311813)->elements[0];
-+c_7313911.elements[1] = ((closureN)self_7311813)->elements[1];
-+c_7313911.elements[2] = ((closureN)self_7311813)->elements[2];
++closureN_type c_7313904;
++object e_7313975 [3];
++c_7313904.hdr.mark = gc_color_red;
++ c_7313904.hdr.grayed = 0;
++c_7313904.tag = closureN_tag;
++ c_7313904.fn = (function_type)__lambda_108;
++c_7313904.num_args = 1;
++c_7313904.num_elements = 3;
++c_7313904.elements = (object *)e_7313975;
++c_7313904.elements[0] = ((closureN)self_7311806)->elements[0];
++c_7313904.elements[1] = ((closureN)self_7311806)->elements[1];
++c_7313904.elements[2] = ((closureN)self_7311806)->elements[2];
  
 -return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7315204, r_734381, ((closureN)self_7313059)->elements[1]);; 
-+return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7313911, r_733936, ((closureN)self_7311813)->elements[1]);; 
++return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7313904, r_733929, ((closureN)self_7311806)->elements[1]);; 
  }
  
 -static void __lambda_108(void *data, object self_7313060, int argc, object *args) /* object self_7313060, object r_734380 */
-+static void __lambda_108(void *data, object self_7311814, int argc, object *args) /* object self_7311814, object r_733935 */
++static void __lambda_108(void *data, object self_7311807, int argc, object *args) /* object self_7311807, object r_733928 */
   {
 - object r_734380 = args[0];
-+ object r_733935 = args[0];
++ object r_733928 = args[0];
    
 -closureN_type c_7315206;
 -object e_7315271 [3];
@@ -63201,31 +63468,31 @@ Make let-values be the same as let*-values, to work around
 -c_7315206.elements[0] = ((closureN)self_7313060)->elements[0];
 -c_7315206.elements[1] = ((closureN)self_7313060)->elements[1];
 -c_7315206.elements[2] = ((closureN)self_7313060)->elements[2];
-+closureN_type c_7313913;
-+object e_7313978 [3];
-+c_7313913.hdr.mark = gc_color_red;
-+ c_7313913.hdr.grayed = 0;
-+c_7313913.tag = closureN_tag;
-+ c_7313913.fn = (function_type)__lambda_109;
-+c_7313913.num_args = 1;
-+c_7313913.num_elements = 3;
-+c_7313913.elements = (object *)e_7313978;
-+c_7313913.elements[0] = ((closureN)self_7311814)->elements[0];
-+c_7313913.elements[1] = ((closureN)self_7311814)->elements[1];
-+c_7313913.elements[2] = ((closureN)self_7311814)->elements[2];
++closureN_type c_7313906;
++object e_7313971 [3];
++c_7313906.hdr.mark = gc_color_red;
++ c_7313906.hdr.grayed = 0;
++c_7313906.tag = closureN_tag;
++ c_7313906.fn = (function_type)__lambda_109;
++c_7313906.num_args = 1;
++c_7313906.num_elements = 3;
++c_7313906.elements = (object *)e_7313971;
++c_7313906.elements[0] = ((closureN)self_7311807)->elements[0];
++c_7313906.elements[1] = ((closureN)self_7311807)->elements[1];
++c_7313906.elements[2] = ((closureN)self_7311807)->elements[2];
  
  
 -object c_7315274 = apply(data,(closure)&c_7315206,primitive_string_91append, r_734380);
 -return_closcall1(data,(closure)&c_7315206,  c_7315274);; 
-+object c_7313981 = apply(data,(closure)&c_7313913,primitive_string_91append, r_733935);
-+return_closcall1(data,(closure)&c_7313913,  c_7313981);; 
++object c_7313974 = apply(data,(closure)&c_7313906,primitive_string_91append, r_733928);
++return_closcall1(data,(closure)&c_7313906,  c_7313974);; 
  }
  
 -static void __lambda_109(void *data, object self_7313061, int argc, object *args) /* object self_7313061, object r_734379 */
-+static void __lambda_109(void *data, object self_7311815, int argc, object *args) /* object self_7311815, object r_733934 */
++static void __lambda_109(void *data, object self_7311808, int argc, object *args) /* object self_7311808, object r_733927 */
   {
 - object r_734379 = args[0];
-+ object r_733934 = args[0];
++ object r_733927 = args[0];
    
 -closureN_type c_7315208;
 -object e_7315266 [2];
@@ -63238,30 +63505,30 @@ Make let-values be the same as let*-values, to work around
 -c_7315208.elements = (object *)e_7315266;
 -c_7315208.elements[0] = ((closureN)self_7313061)->elements[1];
 -c_7315208.elements[1] = ((closureN)self_7313061)->elements[2];
-+closureN_type c_7313915;
-+object e_7313973 [2];
-+c_7313915.hdr.mark = gc_color_red;
-+ c_7313915.hdr.grayed = 0;
-+c_7313915.tag = closureN_tag;
-+ c_7313915.fn = (function_type)__lambda_110;
-+c_7313915.num_args = 1;
-+c_7313915.num_elements = 2;
-+c_7313915.elements = (object *)e_7313973;
-+c_7313915.elements[0] = ((closureN)self_7311815)->elements[1];
-+c_7313915.elements[1] = ((closureN)self_7311815)->elements[2];
++closureN_type c_7313908;
++object e_7313966 [2];
++c_7313908.hdr.mark = gc_color_red;
++ c_7313908.hdr.grayed = 0;
++c_7313908.tag = closureN_tag;
++ c_7313908.fn = (function_type)__lambda_110;
++c_7313908.num_args = 1;
++c_7313908.num_elements = 2;
++c_7313908.elements = (object *)e_7313966;
++c_7313908.elements[0] = ((closureN)self_7311808)->elements[1];
++c_7313908.elements[1] = ((closureN)self_7311808)->elements[2];
  
  
 -object c_7315269 = Cyc_string_append(data,(closure)&c_7315208,2,r_734379, ((closureN)self_7313061)->elements[0]);
 -return_closcall1(data,(closure)&c_7315208,  c_7315269);; 
-+object c_7313976 = Cyc_string_append(data,(closure)&c_7313915,2,r_733934, ((closureN)self_7311815)->elements[0]);
-+return_closcall1(data,(closure)&c_7313915,  c_7313976);; 
++object c_7313969 = Cyc_string_append(data,(closure)&c_7313908,2,r_733927, ((closureN)self_7311808)->elements[0]);
++return_closcall1(data,(closure)&c_7313908,  c_7313969);; 
  }
  
 -static void __lambda_110(void *data, object self_7313062, int argc, object *args) /* object self_7313062, object filename_85_73100_732904 */
-+static void __lambda_110(void *data, object self_7311816, int argc, object *args) /* object self_7311816, object filename_85_73100_732564 */
++static void __lambda_110(void *data, object self_7311809, int argc, object *args) /* object self_7311809, object filename_85_73100_732557 */
   {
 - object filename_85_73100_732904 = args[0];
-+ object filename_85_73100_732564 = args[0];
++ object filename_85_73100_732557 = args[0];
    
 -closureN_type c_7315210;
 -object e_7315260 [2];
@@ -63274,32 +63541,32 @@ Make let-values be the same as let*-values, to work around
 -c_7315210.elements = (object *)e_7315260;
 -c_7315210.elements[0] = ((closureN)self_7313062)->elements[0];
 -c_7315210.elements[1] = ((closureN)self_7313062)->elements[1];
-+closureN_type c_7313917;
-+object e_7313967 [2];
-+c_7313917.hdr.mark = gc_color_red;
-+ c_7313917.hdr.grayed = 0;
-+c_7313917.tag = closureN_tag;
-+ c_7313917.fn = (function_type)__lambda_111;
-+c_7313917.num_args = 1;
-+c_7313917.num_elements = 2;
-+c_7313917.elements = (object *)e_7313967;
-+c_7313917.elements[0] = ((closureN)self_7311816)->elements[0];
-+c_7313917.elements[1] = ((closureN)self_7311816)->elements[1];
++closureN_type c_7313910;
++object e_7313960 [2];
++c_7313910.hdr.mark = gc_color_red;
++ c_7313910.hdr.grayed = 0;
++c_7313910.tag = closureN_tag;
++ c_7313910.fn = (function_type)__lambda_111;
++c_7313910.num_args = 1;
++c_7313910.num_elements = 2;
++c_7313910.elements = (object *)e_7313960;
++c_7313910.elements[0] = ((closureN)self_7311809)->elements[0];
++c_7313910.elements[1] = ((closureN)self_7311809)->elements[1];
  
  
  
  
 -object c_7315263 = Cyc_substring(data,(closure)&c_7315210,filename_85_73100_732904, obj_int2obj(1), Cyc_string_length(data, filename_85_73100_732904));
 -return_closcall1(data,(closure)&c_7315210,  c_7315263);; 
-+object c_7313970 = Cyc_substring(data,(closure)&c_7313917,filename_85_73100_732564, obj_int2obj(1), Cyc_string_length(data, filename_85_73100_732564));
-+return_closcall1(data,(closure)&c_7313917,  c_7313970);; 
++object c_7313963 = Cyc_substring(data,(closure)&c_7313910,filename_85_73100_732557, obj_int2obj(1), Cyc_string_length(data, filename_85_73100_732557));
++return_closcall1(data,(closure)&c_7313910,  c_7313963);; 
  }
  
 -static void __lambda_111(void *data, object self_7313063, int argc, object *args) /* object self_7313063, object filename_73103_732905 */
-+static void __lambda_111(void *data, object self_7311817, int argc, object *args) /* object self_7311817, object filename_73103_732565 */
++static void __lambda_111(void *data, object self_7311810, int argc, object *args) /* object self_7311810, object filename_73103_732558 */
   {
 - object filename_73103_732905 = args[0];
-+ object filename_73103_732565 = args[0];
++ object filename_73103_732558 = args[0];
    
 -closureN_type c_7315212;
 -object e_7315241 [1];
@@ -63311,16 +63578,16 @@ Make let-values be the same as let*-values, to work around
 -c_7315212.num_elements = 1;
 -c_7315212.elements = (object *)e_7315241;
 -c_7315212.elements[0] = ((closureN)self_7313063)->elements[0];
-+closureN_type c_7313919;
-+object e_7313948 [1];
-+c_7313919.hdr.mark = gc_color_red;
-+ c_7313919.hdr.grayed = 0;
-+c_7313919.tag = closureN_tag;
-+ c_7313919.fn = (function_type)__lambda_112;
-+c_7313919.num_args = 0;
-+c_7313919.num_elements = 1;
-+c_7313919.elements = (object *)e_7313948;
-+c_7313919.elements[0] = ((closureN)self_7311817)->elements[0];
++closureN_type c_7313912;
++object e_7313941 [1];
++c_7313912.hdr.mark = gc_color_red;
++ c_7313912.hdr.grayed = 0;
++c_7313912.tag = closureN_tag;
++ c_7313912.fn = (function_type)__lambda_112;
++c_7313912.num_args = 0;
++c_7313912.num_elements = 1;
++c_7313912.elements = (object *)e_7313941;
++c_7313912.elements[0] = ((closureN)self_7311810)->elements[0];
  
  
 -closureN_type c_7315242;
@@ -63334,29 +63601,29 @@ Make let-values be the same as let*-values, to work around
 -c_7315242.elements = (object *)e_7315259;
 -c_7315242.elements[0] = filename_73103_732905;
 -c_7315242.elements[1] = ((closureN)self_7313063)->elements[1];
-+closureN_type c_7313949;
-+object e_7313966 [2];
-+c_7313949.hdr.mark = gc_color_red;
-+ c_7313949.hdr.grayed = 0;
-+c_7313949.tag = closureN_tag;
-+ c_7313949.fn = (function_type)__lambda_113;
-+c_7313949.num_args = 1;
-+c_7313949.num_elements = 2;
-+c_7313949.elements = (object *)e_7313966;
-+c_7313949.elements[0] = filename_73103_732565;
-+c_7313949.elements[1] = ((closureN)self_7311817)->elements[1];
++closureN_type c_7313942;
++object e_7313959 [2];
++c_7313942.hdr.mark = gc_color_red;
++ c_7313942.hdr.grayed = 0;
++c_7313942.tag = closureN_tag;
++ c_7313942.fn = (function_type)__lambda_113;
++c_7313942.num_args = 1;
++c_7313942.num_elements = 2;
++c_7313942.elements = (object *)e_7313959;
++c_7313942.elements[0] = filename_73103_732558;
++c_7313942.elements[1] = ((closureN)self_7311810)->elements[1];
  
 -return_direct_with_clo1(data,(closure)&c_7315212,__lambda_112,  &c_7315242);; 
-+return_direct_with_clo1(data,(closure)&c_7313919,__lambda_112,  &c_7313949);; 
++return_direct_with_clo1(data,(closure)&c_7313912,__lambda_112,  &c_7313942);; 
  }
  
 -static void __lambda_113(void *data, object self_7313064, int argc, object *args) /* object self_7313064, object r_734366 */
-+static void __lambda_113(void *data, object self_7311818, int argc, object *args) /* object self_7311818, object r_733921 */
++static void __lambda_113(void *data, object self_7311811, int argc, object *args) /* object self_7311811, object r_733914 */
   {
 - object r_734366 = args[0];
 -  if( (boolean_f != r_734366) ){ 
-+ object r_733921 = args[0];
-+  if( (boolean_f != r_733921) ){ 
++ object r_733914 = args[0];
++  if( (boolean_f != r_733914) ){ 
    
 -closureN_type c_7315244;
 -object e_7315252 [2];
@@ -63369,86 +63636,86 @@ Make let-values be the same as let*-values, to work around
 -c_7315244.elements = (object *)e_7315252;
 -c_7315244.elements[0] = ((closureN)self_7313064)->elements[0];
 -c_7315244.elements[1] = ((closureN)self_7313064)->elements[1];
-+closureN_type c_7313951;
-+object e_7313959 [2];
-+c_7313951.hdr.mark = gc_color_red;
-+ c_7313951.hdr.grayed = 0;
-+c_7313951.tag = closureN_tag;
-+ c_7313951.fn = (function_type)__lambda_114;
-+c_7313951.num_args = 1;
-+c_7313951.num_elements = 2;
-+c_7313951.elements = (object *)e_7313959;
-+c_7313951.elements[0] = ((closureN)self_7311818)->elements[0];
-+c_7313951.elements[1] = ((closureN)self_7311818)->elements[1];
++closureN_type c_7313944;
++object e_7313952 [2];
++c_7313944.hdr.mark = gc_color_red;
++ c_7313944.hdr.grayed = 0;
++c_7313944.tag = closureN_tag;
++ c_7313944.fn = (function_type)__lambda_114;
++c_7313944.num_args = 1;
++c_7313944.num_elements = 2;
++c_7313944.elements = (object *)e_7313952;
++c_7313944.elements[0] = ((closureN)self_7311811)->elements[0];
++c_7313944.elements[1] = ((closureN)self_7311811)->elements[1];
  
  
 -object c_7315255 = Cyc_installation_dir(data,(closure)&c_7315244,quote_sld);
 -return_closcall1(data,(closure)&c_7315244,  c_7315255);
-+object c_7313962 = Cyc_installation_dir(data,(closure)&c_7313951,quote_sld);
-+return_closcall1(data,(closure)&c_7313951,  c_7313962);
++object c_7313955 = Cyc_installation_dir(data,(closure)&c_7313944,quote_sld);
++return_closcall1(data,(closure)&c_7313944,  c_7313955);
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7313064)->elements[1], (((closure)  ((closureN)self_7313064)->elements[1])->fn),  ((closureN)self_7313064)->elements[0]);}
-+  return_direct_with_clo1(data,  ((closureN)self_7311818)->elements[1], (((closure)  ((closureN)self_7311818)->elements[1])->fn),  ((closureN)self_7311818)->elements[0]);}
++  return_direct_with_clo1(data,  ((closureN)self_7311811)->elements[1], (((closure)  ((closureN)self_7311811)->elements[1])->fn),  ((closureN)self_7311811)->elements[0]);}
  ;; 
  }
  
 -static void __lambda_114(void *data, object self_7313065, int argc, object *args) /* object self_7313065, object r_734367 */
-+static void __lambda_114(void *data, object self_7311819, int argc, object *args) /* object self_7311819, object r_733922 */
++static void __lambda_114(void *data, object self_7311812, int argc, object *args) /* object self_7311812, object r_733915 */
   {
 - object r_734367 = args[0];
-+ object r_733922 = args[0];
++ object r_733915 = args[0];
    
 -make_utf8_string_with_len(c_7315250, "/", 1, 1);
-+make_utf8_string_with_len(c_7313957, "/", 1, 1);
++make_utf8_string_with_len(c_7313950, "/", 1, 1);
  
 -object c_7315249 = Cyc_string_append(data,  ((closureN)self_7313065)->elements[1],3,r_734367, &c_7315250, ((closureN)self_7313065)->elements[0]);
 -return_direct_with_clo1(data,  ((closureN)self_7313065)->elements[1], (((closure)  ((closureN)self_7313065)->elements[1])->fn),  c_7315249);; 
-+object c_7313956 = Cyc_string_append(data,  ((closureN)self_7311819)->elements[1],3,r_733922, &c_7313957, ((closureN)self_7311819)->elements[0]);
-+return_direct_with_clo1(data,  ((closureN)self_7311819)->elements[1], (((closure)  ((closureN)self_7311819)->elements[1])->fn),  c_7313956);; 
++object c_7313949 = Cyc_string_append(data,  ((closureN)self_7311812)->elements[1],3,r_733915, &c_7313950, ((closureN)self_7311812)->elements[0]);
++return_direct_with_clo1(data,  ((closureN)self_7311812)->elements[1], (((closure)  ((closureN)self_7311812)->elements[1])->fn),  c_7313949);; 
  }
  
 -static void __lambda_112(void *data, object self_7313066, int argc, object *args) /* object self_7313066, object k_734370 */
-+static void __lambda_112(void *data, object self_7311820, int argc, object *args) /* object self_7311820, object k_733925 */
++static void __lambda_112(void *data, object self_7311813, int argc, object *args) /* object self_7311813, object k_733918 */
   {
 - object k_734370 = args[0];
-+ object k_733925 = args[0];
++ object k_733918 = args[0];
      
    
 -if( (boolean_f != equalp(quote_scheme, Cyc_car(data, ((closureN)self_7313066)->elements[0]))) ){ 
-+if( (boolean_f != equalp(quote_scheme, Cyc_car(data, ((closureN)self_7311820)->elements[0]))) ){ 
++if( (boolean_f != equalp(quote_scheme, Cyc_car(data, ((closureN)self_7311813)->elements[0]))) ){ 
    
  
  
  
 -return_direct_with_clo1(data,  k_734370,__lambda_113,  equalp(quote_scheme, Cyc_car(data, ((closureN)self_7313066)->elements[0])));
-+return_direct_with_clo1(data,  k_733925,__lambda_113,  equalp(quote_scheme, Cyc_car(data, ((closureN)self_7311820)->elements[0])));
++return_direct_with_clo1(data,  k_733918,__lambda_113,  equalp(quote_scheme, Cyc_car(data, ((closureN)self_7311813)->elements[0])));
  } else { 
      
    
 -if( (boolean_f != equalp(quote_srfi, Cyc_car(data, ((closureN)self_7313066)->elements[0]))) ){ 
-+if( (boolean_f != equalp(quote_srfi, Cyc_car(data, ((closureN)self_7311820)->elements[0]))) ){ 
++if( (boolean_f != equalp(quote_srfi, Cyc_car(data, ((closureN)self_7311813)->elements[0]))) ){ 
    
  
  
  
 -return_direct_with_clo1(data,  k_734370,__lambda_113,  equalp(quote_srfi, Cyc_car(data, ((closureN)self_7313066)->elements[0])));
-+return_direct_with_clo1(data,  k_733925,__lambda_113,  equalp(quote_srfi, Cyc_car(data, ((closureN)self_7311820)->elements[0])));
++return_direct_with_clo1(data,  k_733918,__lambda_113,  equalp(quote_srfi, Cyc_car(data, ((closureN)self_7311813)->elements[0])));
  } else { 
    
  
  
  
 -return_direct_with_clo1(data,  k_734370,__lambda_113,  equalp(quote_cyclone, Cyc_car(data, ((closureN)self_7313066)->elements[0])));}
-+return_direct_with_clo1(data,  k_733925,__lambda_113,  equalp(quote_cyclone, Cyc_car(data, ((closureN)self_7311820)->elements[0])));}
++return_direct_with_clo1(data,  k_733918,__lambda_113,  equalp(quote_cyclone, Cyc_car(data, ((closureN)self_7311813)->elements[0])));}
  ;}
  ;; 
  }
  
 -static void __lambda_88(void *data, object self_7313067, int argc, object *args) /* object self_7313067, object r_734361 */
-+static void __lambda_88(void *data, object self_7311821, int argc, object *args) /* object self_7311821, object r_733916 */
++static void __lambda_88(void *data, object self_7311814, int argc, object *args) /* object self_7311814, object r_733909 */
   {
 - object r_734361 = args[0];
-+ object r_733916 = args[0];
++ object r_733909 = args[0];
    
 -closureN_type c_7314967;
 -object e_7315186 [6];
@@ -63465,32 +63732,30 @@ Make let-values be the same as let*-values, to work around
 -c_7314967.elements[3] = ((closureN)self_7313067)->elements[4];
 -c_7314967.elements[4] = ((closureN)self_7313067)->elements[5];
 -c_7314967.elements[5] = ((closureN)self_7313067)->elements[6];
-+closureN_type c_7313674;
-+object e_7313893 [6];
-+c_7313674.hdr.mark = gc_color_red;
-+ c_7313674.hdr.grayed = 0;
-+c_7313674.tag = closureN_tag;
-+ c_7313674.fn = (function_type)__lambda_89;
-+c_7313674.num_args = 1;
-+c_7313674.num_elements = 6;
-+c_7313674.elements = (object *)e_7313893;
-+c_7313674.elements[0] = ((closureN)self_7311821)->elements[1];
-+c_7313674.elements[1] = ((closureN)self_7311821)->elements[2];
-+c_7313674.elements[2] = ((closureN)self_7311821)->elements[3];
-+c_7313674.elements[3] = ((closureN)self_7311821)->elements[4];
-+c_7313674.elements[4] = ((closureN)self_7311821)->elements[5];
-+c_7313674.elements[5] = ((closureN)self_7311821)->elements[6];
++closureN_type c_7313667;
++object e_7313886 [6];
++c_7313667.hdr.mark = gc_color_red;
++ c_7313667.hdr.grayed = 0;
++c_7313667.tag = closureN_tag;
++ c_7313667.fn = (function_type)__lambda_89;
++c_7313667.num_args = 1;
++c_7313667.num_elements = 6;
++c_7313667.elements = (object *)e_7313886;
++c_7313667.elements[0] = ((closureN)self_7311814)->elements[1];
++c_7313667.elements[1] = ((closureN)self_7311814)->elements[2];
++c_7313667.elements[2] = ((closureN)self_7311814)->elements[3];
++c_7313667.elements[3] = ((closureN)self_7311814)->elements[4];
++c_7313667.elements[4] = ((closureN)self_7311814)->elements[5];
++c_7313667.elements[5] = ((closureN)self_7311814)->elements[6];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7314967,__lambda_89,  Cyc_set_cell(data, ((closureN)self_7313067)->elements[0], r_734361));; 
--}
--
++return_direct_with_clo1(data,(closure)&c_7313667,__lambda_89,  Cyc_set_cell(data, ((closureN)self_7311814)->elements[0], r_733909));; 
+ }
+ 
 -static void __lambda_89(void *data, object self_7313068, int argc, object *args) /* object self_7313068, object r_734301 */
-+return_direct_with_clo1(data,(closure)&c_7313674,__lambda_89,  Cyc_set_cell(data, ((closureN)self_7311821)->elements[0], r_733916));; 
-+}
-+
-+static void __lambda_89(void *data, object self_7311822, int argc, object *args) /* object self_7311822, object r_733856 */
++static void __lambda_89(void *data, object self_7311815, int argc, object *args) /* object self_7311815, object r_733849 */
   {
  
    
@@ -63509,21 +63774,21 @@ Make let-values be the same as let*-values, to work around
 -c_7314969.elements[3] = ((closureN)self_7313068)->elements[3];
 -c_7314969.elements[4] = ((closureN)self_7313068)->elements[4];
 -c_7314969.elements[5] = ((closureN)self_7313068)->elements[5];
-+closureN_type c_7313676;
-+object e_7313847 [6];
-+c_7313676.hdr.mark = gc_color_red;
-+ c_7313676.hdr.grayed = 0;
-+c_7313676.tag = closureN_tag;
-+ c_7313676.fn = (function_type)__lambda_90;
-+c_7313676.num_args = 1;
-+c_7313676.num_elements = 6;
-+c_7313676.elements = (object *)e_7313847;
-+c_7313676.elements[0] = ((closureN)self_7311822)->elements[0];
-+c_7313676.elements[1] = ((closureN)self_7311822)->elements[1];
-+c_7313676.elements[2] = ((closureN)self_7311822)->elements[2];
-+c_7313676.elements[3] = ((closureN)self_7311822)->elements[3];
-+c_7313676.elements[4] = ((closureN)self_7311822)->elements[4];
-+c_7313676.elements[5] = ((closureN)self_7311822)->elements[5];
++closureN_type c_7313669;
++object e_7313840 [6];
++c_7313669.hdr.mark = gc_color_red;
++ c_7313669.hdr.grayed = 0;
++c_7313669.tag = closureN_tag;
++ c_7313669.fn = (function_type)__lambda_90;
++c_7313669.num_args = 1;
++c_7313669.num_elements = 6;
++c_7313669.elements = (object *)e_7313840;
++c_7313669.elements[0] = ((closureN)self_7311815)->elements[0];
++c_7313669.elements[1] = ((closureN)self_7311815)->elements[1];
++c_7313669.elements[2] = ((closureN)self_7311815)->elements[2];
++c_7313669.elements[3] = ((closureN)self_7311815)->elements[3];
++c_7313669.elements[4] = ((closureN)self_7311815)->elements[4];
++c_7313669.elements[5] = ((closureN)self_7311815)->elements[5];
  
  
 -closureN_type c_7315141;
@@ -63536,87 +63801,87 @@ Make let-values be the same as let*-values, to work around
 -c_7315141.num_elements = 1;
 -c_7315141.elements = (object *)e_7315185;
 -c_7315141.elements[0] = ((closureN)self_7313068)->elements[0];
-+closureN_type c_7313848;
-+object e_7313892 [1];
-+c_7313848.hdr.mark = gc_color_red;
-+ c_7313848.hdr.grayed = 0;
-+c_7313848.tag = closureN_tag;
-+ c_7313848.fn = (function_type)__lambda_105;
-+c_7313848.num_args = 1;
-+c_7313848.num_elements = 1;
-+c_7313848.elements = (object *)e_7313892;
-+c_7313848.elements[0] = ((closureN)self_7311822)->elements[0];
++closureN_type c_7313841;
++object e_7313885 [1];
++c_7313841.hdr.mark = gc_color_red;
++ c_7313841.hdr.grayed = 0;
++c_7313841.tag = closureN_tag;
++ c_7313841.fn = (function_type)__lambda_105;
++c_7313841.num_args = 1;
++c_7313841.num_elements = 1;
++c_7313841.elements = (object *)e_7313885;
++c_7313841.elements[0] = ((closureN)self_7311815)->elements[0];
  
 -return_direct_with_clo1(data,(closure)&c_7314969,__lambda_90,  &c_7315141);; 
-+return_direct_with_clo1(data,(closure)&c_7313676,__lambda_90,  &c_7313848);; 
++return_direct_with_clo1(data,(closure)&c_7313669,__lambda_90,  &c_7313841);; 
  }
  
 -static void __lambda_105(void *data, object self_7313069, int argc, object *args) /* object self_7313069, object k_734345, object import_73121_732909 */
-+static void __lambda_105(void *data, object self_7311823, int argc, object *args) /* object self_7311823, object k_733900, object import_73121_732569 */
++static void __lambda_105(void *data, object self_7311816, int argc, object *args) /* object self_7311816, object k_733893, object import_73121_732562 */
   {
 - object k_734345 = args[0]; object import_73121_732909 = args[1];
 -  object r_734346;
-+ object k_733900 = args[0]; object import_73121_732569 = args[1];
-+  object r_733901;
++ object k_733893 = args[0]; object import_73121_732562 = args[1];
++  object r_733894;
      
 -if( (boolean_f != Cyc_is_pair(import_73121_732909)) ){ 
-+if( (boolean_f != Cyc_is_pair(import_73121_732569)) ){ 
++if( (boolean_f != Cyc_is_pair(import_73121_732562)) ){ 
      
    
 -if( (boolean_f != equalp(quote_only, Cyc_car(data, import_73121_732909))) ){ 
-+if( (boolean_f != equalp(quote_only, Cyc_car(data, import_73121_732569))) ){ 
++if( (boolean_f != equalp(quote_only, Cyc_car(data, import_73121_732562))) ){ 
    
    
 -  r_734346 = equalp(quote_only, Cyc_car(data, import_73121_732909));
-+  r_733901 = equalp(quote_only, Cyc_car(data, import_73121_732569));
++  r_733894 = equalp(quote_only, Cyc_car(data, import_73121_732562));
  } else { 
      
    
 -if( (boolean_f != equalp(quote_except, Cyc_car(data, import_73121_732909))) ){ 
-+if( (boolean_f != equalp(quote_except, Cyc_car(data, import_73121_732569))) ){ 
++if( (boolean_f != equalp(quote_except, Cyc_car(data, import_73121_732562))) ){ 
    
    
 -  r_734346 = equalp(quote_except, Cyc_car(data, import_73121_732909));
-+  r_733901 = equalp(quote_except, Cyc_car(data, import_73121_732569));
++  r_733894 = equalp(quote_except, Cyc_car(data, import_73121_732562));
  } else { 
      
    
 -if( (boolean_f != equalp(quote_prefix, Cyc_car(data, import_73121_732909))) ){ 
-+if( (boolean_f != equalp(quote_prefix, Cyc_car(data, import_73121_732569))) ){ 
++if( (boolean_f != equalp(quote_prefix, Cyc_car(data, import_73121_732562))) ){ 
    
    
 -  r_734346 = equalp(quote_prefix, Cyc_car(data, import_73121_732909));
-+  r_733901 = equalp(quote_prefix, Cyc_car(data, import_73121_732569));
++  r_733894 = equalp(quote_prefix, Cyc_car(data, import_73121_732562));
  } else { 
    
    
 -  r_734346 = equalp(quote_rename, Cyc_car(data, import_73121_732909));}
-+  r_733901 = equalp(quote_rename, Cyc_car(data, import_73121_732569));}
++  r_733894 = equalp(quote_rename, Cyc_car(data, import_73121_732562));}
  ;}
  ;}
  ;
  } else { 
 -  r_734346 = boolean_f;}
 -;if( (boolean_f != r_734346) ){ 
-+  r_733901 = boolean_f;}
-+;if( (boolean_f != r_733901) ){ 
++  r_733894 = boolean_f;}
++;if( (boolean_f != r_733894) ){ 
    
  
  
  
 -return_closcall2(data,  car(((closureN)self_7313069)->elements[0]),  k_734345, Cyc_cadr(data, import_73121_732909));
-+return_closcall2(data,  car(((closureN)self_7311823)->elements[0]),  k_733900, Cyc_cadr(data, import_73121_732569));
++return_closcall2(data,  car(((closureN)self_7311816)->elements[0]),  k_733893, Cyc_cadr(data, import_73121_732562));
  } else { 
 -  return_direct_with_clo1(data,  k_734345, (((closure)  k_734345)->fn),  import_73121_732909);}
-+  return_direct_with_clo1(data,  k_733900, (((closure)  k_733900)->fn),  import_73121_732569);}
++  return_direct_with_clo1(data,  k_733893, (((closure)  k_733893)->fn),  import_73121_732562);}
  ;; 
  }
  
 -static void __lambda_90(void *data, object self_7313070, int argc, object *args) /* object self_7313070, object r_734344 */
-+static void __lambda_90(void *data, object self_7311824, int argc, object *args) /* object self_7311824, object r_733899 */
++static void __lambda_90(void *data, object self_7311817, int argc, object *args) /* object self_7311817, object r_733892 */
   {
 - object r_734344 = args[0];
-+ object r_733899 = args[0];
++ object r_733892 = args[0];
    
 -closureN_type c_7314971;
 -object e_7315136 [5];
@@ -63632,29 +63897,29 @@ Make let-values be the same as let*-values, to work around
 -c_7314971.elements[2] = ((closureN)self_7313070)->elements[3];
 -c_7314971.elements[3] = ((closureN)self_7313070)->elements[4];
 -c_7314971.elements[4] = ((closureN)self_7313070)->elements[5];
-+closureN_type c_7313678;
-+object e_7313843 [5];
-+c_7313678.hdr.mark = gc_color_red;
-+ c_7313678.hdr.grayed = 0;
-+c_7313678.tag = closureN_tag;
-+ c_7313678.fn = (function_type)__lambda_91;
-+c_7313678.num_args = 1;
-+c_7313678.num_elements = 5;
-+c_7313678.elements = (object *)e_7313843;
-+c_7313678.elements[0] = ((closureN)self_7311824)->elements[1];
-+c_7313678.elements[1] = ((closureN)self_7311824)->elements[2];
-+c_7313678.elements[2] = ((closureN)self_7311824)->elements[3];
-+c_7313678.elements[3] = ((closureN)self_7311824)->elements[4];
-+c_7313678.elements[4] = ((closureN)self_7311824)->elements[5];
++closureN_type c_7313671;
++object e_7313836 [5];
++c_7313671.hdr.mark = gc_color_red;
++ c_7313671.hdr.grayed = 0;
++c_7313671.tag = closureN_tag;
++ c_7313671.fn = (function_type)__lambda_91;
++c_7313671.num_args = 1;
++c_7313671.num_elements = 5;
++c_7313671.elements = (object *)e_7313836;
++c_7313671.elements[0] = ((closureN)self_7311817)->elements[1];
++c_7313671.elements[1] = ((closureN)self_7311817)->elements[2];
++c_7313671.elements[2] = ((closureN)self_7311817)->elements[3];
++c_7313671.elements[3] = ((closureN)self_7311817)->elements[4];
++c_7313671.elements[4] = ((closureN)self_7311817)->elements[5];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7314971,__lambda_91,  Cyc_set_cell(data, ((closureN)self_7313070)->elements[0], r_734344));; 
-+return_direct_with_clo1(data,(closure)&c_7313678,__lambda_91,  Cyc_set_cell(data, ((closureN)self_7311824)->elements[0], r_733899));; 
++return_direct_with_clo1(data,(closure)&c_7313671,__lambda_91,  Cyc_set_cell(data, ((closureN)self_7311817)->elements[0], r_733892));; 
  }
  
 -static void __lambda_91(void *data, object self_7313071, int argc, object *args) /* object self_7313071, object r_734302 */
-+static void __lambda_91(void *data, object self_7311825, int argc, object *args) /* object self_7311825, object r_733857 */
++static void __lambda_91(void *data, object self_7311818, int argc, object *args) /* object self_7311818, object r_733850 */
   {
  
    
@@ -63671,19 +63936,19 @@ Make let-values be the same as let*-values, to work around
 -c_7314973.elements[1] = ((closureN)self_7313071)->elements[2];
 -c_7314973.elements[2] = ((closureN)self_7313071)->elements[3];
 -c_7314973.elements[3] = ((closureN)self_7313071)->elements[4];
-+closureN_type c_7313680;
-+object e_7313782 [4];
-+c_7313680.hdr.mark = gc_color_red;
-+ c_7313680.hdr.grayed = 0;
-+c_7313680.tag = closureN_tag;
-+ c_7313680.fn = (function_type)__lambda_92;
-+c_7313680.num_args = 1;
-+c_7313680.num_elements = 4;
-+c_7313680.elements = (object *)e_7313782;
-+c_7313680.elements[0] = ((closureN)self_7311825)->elements[1];
-+c_7313680.elements[1] = ((closureN)self_7311825)->elements[2];
-+c_7313680.elements[2] = ((closureN)self_7311825)->elements[3];
-+c_7313680.elements[3] = ((closureN)self_7311825)->elements[4];
++closureN_type c_7313673;
++object e_7313775 [4];
++c_7313673.hdr.mark = gc_color_red;
++ c_7313673.hdr.grayed = 0;
++c_7313673.tag = closureN_tag;
++ c_7313673.fn = (function_type)__lambda_92;
++c_7313673.num_args = 1;
++c_7313673.num_elements = 4;
++c_7313673.elements = (object *)e_7313775;
++c_7313673.elements[0] = ((closureN)self_7311818)->elements[1];
++c_7313673.elements[1] = ((closureN)self_7311818)->elements[2];
++c_7313673.elements[2] = ((closureN)self_7311818)->elements[3];
++c_7313673.elements[3] = ((closureN)self_7311818)->elements[4];
  
  
 -closureN_type c_7315076;
@@ -63697,56 +63962,56 @@ Make let-values be the same as let*-values, to work around
 -c_7315076.elements = (object *)e_7315135;
 -c_7315076.elements[0] = ((closureN)self_7313071)->elements[0];
 -c_7315076.elements[1] = ((closureN)self_7313071)->elements[1];
-+closureN_type c_7313783;
-+object e_7313842 [2];
-+c_7313783.hdr.mark = gc_color_red;
-+ c_7313783.hdr.grayed = 0;
-+c_7313783.tag = closureN_tag;
-+ c_7313783.fn = (function_type)__lambda_102;
-+c_7313783.num_args = 1;
-+c_7313783.num_elements = 2;
-+c_7313783.elements = (object *)e_7313842;
-+c_7313783.elements[0] = ((closureN)self_7311825)->elements[0];
-+c_7313783.elements[1] = ((closureN)self_7311825)->elements[1];
++closureN_type c_7313776;
++object e_7313835 [2];
++c_7313776.hdr.mark = gc_color_red;
++ c_7313776.hdr.grayed = 0;
++c_7313776.tag = closureN_tag;
++ c_7313776.fn = (function_type)__lambda_102;
++c_7313776.num_args = 1;
++c_7313776.num_elements = 2;
++c_7313776.elements = (object *)e_7313835;
++c_7313776.elements[0] = ((closureN)self_7311818)->elements[0];
++c_7313776.elements[1] = ((closureN)self_7311818)->elements[1];
  
 -return_direct_with_clo1(data,(closure)&c_7314973,__lambda_92,  &c_7315076);; 
-+return_direct_with_clo1(data,(closure)&c_7313680,__lambda_92,  &c_7313783);; 
++return_direct_with_clo1(data,(closure)&c_7313673,__lambda_92,  &c_7313776);; 
  }
  
 -static void __lambda_102(void *data, object self_7313072, int argc, object *args) /* object self_7313072, object k_734327, object x_73139_732913 */
-+static void __lambda_102(void *data, object self_7311826, int argc, object *args) /* object self_7311826, object k_733882, object x_73139_732573 */
++static void __lambda_102(void *data, object self_7311819, int argc, object *args) /* object self_7311819, object k_733875, object x_73139_732566 */
   {
 - object k_734327 = args[0]; object x_73139_732913 = args[1];
-+ object k_733882 = args[0]; object x_73139_732573 = args[1];
++ object k_733875 = args[0]; object x_73139_732566 = args[1];
      
 -if( (boolean_f != Cyc_is_pair(x_73139_732913)) ){ 
-+if( (boolean_f != Cyc_is_pair(x_73139_732573)) ){ 
++if( (boolean_f != Cyc_is_pair(x_73139_732566)) ){ 
      
    
 -if( (boolean_f != Cyc_eqv(Cyc_car(data, x_73139_732913), quote_and)) ){ 
-+if( (boolean_f != Cyc_eqv(Cyc_car(data, x_73139_732573), quote_and)) ){ 
++if( (boolean_f != Cyc_eqv(Cyc_car(data, x_73139_732566), quote_and)) ){ 
    
  
  
  
 -return_direct_with_clo3(data,  __glo_every_scheme_base, (((closure)  __glo_every_scheme_base)->fn),  k_734327, car(((closureN)self_7313072)->elements[1]), Cyc_cdr(data, x_73139_732913));
-+return_direct_with_clo3(data,  __glo_every_scheme_base, (((closure)  __glo_every_scheme_base)->fn),  k_733882, car(((closureN)self_7311826)->elements[1]), Cyc_cdr(data, x_73139_732573));
++return_direct_with_clo3(data,  __glo_every_scheme_base, (((closure)  __glo_every_scheme_base)->fn),  k_733875, car(((closureN)self_7311819)->elements[1]), Cyc_cdr(data, x_73139_732566));
  } else { 
      
    
 -if( (boolean_f != Cyc_eqv(Cyc_car(data, x_73139_732913), quote_or)) ){ 
-+if( (boolean_f != Cyc_eqv(Cyc_car(data, x_73139_732573), quote_or)) ){ 
++if( (boolean_f != Cyc_eqv(Cyc_car(data, x_73139_732566), quote_or)) ){ 
    
  
  
  
 -return_direct_with_clo3(data,  __glo_any_scheme_base, (((closure)  __glo_any_scheme_base)->fn),  k_734327, car(((closureN)self_7313072)->elements[1]), Cyc_cdr(data, x_73139_732913));
-+return_direct_with_clo3(data,  __glo_any_scheme_base, (((closure)  __glo_any_scheme_base)->fn),  k_733882, car(((closureN)self_7311826)->elements[1]), Cyc_cdr(data, x_73139_732573));
++return_direct_with_clo3(data,  __glo_any_scheme_base, (((closure)  __glo_any_scheme_base)->fn),  k_733875, car(((closureN)self_7311819)->elements[1]), Cyc_cdr(data, x_73139_732566));
  } else { 
      
    
 -if( (boolean_f != Cyc_eqv(Cyc_car(data, x_73139_732913), quote_not)) ){ 
-+if( (boolean_f != Cyc_eqv(Cyc_car(data, x_73139_732573), quote_not)) ){ 
++if( (boolean_f != Cyc_eqv(Cyc_car(data, x_73139_732566), quote_not)) ){ 
    
  
  
@@ -63760,38 +64025,38 @@ Make let-values be the same as let*-values, to work around
 -c_7315107.num_elements = 1;
 -c_7315107.elements = (object *)e_7315112;
 -c_7315107.elements[0] = k_734327;
-+closureN_type c_7313814;
-+object e_7313819 [1];
-+c_7313814.hdr.mark = gc_color_red;
-+ c_7313814.hdr.grayed = 0;
-+c_7313814.tag = closureN_tag;
-+ c_7313814.fn = (function_type)__lambda_103;
-+c_7313814.num_args = 1;
-+c_7313814.num_elements = 1;
-+c_7313814.elements = (object *)e_7313819;
-+c_7313814.elements[0] = k_733882;
++closureN_type c_7313807;
++object e_7313812 [1];
++c_7313807.hdr.mark = gc_color_red;
++ c_7313807.hdr.grayed = 0;
++c_7313807.tag = closureN_tag;
++ c_7313807.fn = (function_type)__lambda_103;
++c_7313807.num_args = 1;
++c_7313807.num_elements = 1;
++c_7313807.elements = (object *)e_7313812;
++c_7313807.elements[0] = k_733875;
  
  
  
 -return_closcall2(data,  car(((closureN)self_7313072)->elements[1]),  &c_7315107, Cyc_cadr(data, x_73139_732913));
-+return_closcall2(data,  car(((closureN)self_7311826)->elements[1]),  &c_7313814, Cyc_cadr(data, x_73139_732573));
++return_closcall2(data,  car(((closureN)self_7311819)->elements[1]),  &c_7313807, Cyc_cadr(data, x_73139_732566));
  } else { 
      
    
 -if( (boolean_f != Cyc_eqv(Cyc_car(data, x_73139_732913), quote_library)) ){ 
-+if( (boolean_f != Cyc_eqv(Cyc_car(data, x_73139_732573), quote_library)) ){ 
++if( (boolean_f != Cyc_eqv(Cyc_car(data, x_73139_732566), quote_library)) ){ 
    
  
  
  
 -return_closcall2(data,  car(((closureN)self_7313072)->elements[0]),  k_734327, Cyc_cadr(data, x_73139_732913));
-+return_closcall2(data,  car(((closureN)self_7311826)->elements[0]),  k_733882, Cyc_cadr(data, x_73139_732573));
++return_closcall2(data,  car(((closureN)self_7311819)->elements[0]),  k_733875, Cyc_cadr(data, x_73139_732566));
  } else { 
    
 -make_utf8_string_with_len(c_7315126, "cond-expand: bad feature", 24, 24);
 -return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_734327, &c_7315126, x_73139_732913);}
-+make_utf8_string_with_len(c_7313833, "cond-expand: bad feature", 24, 24);
-+return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_733882, &c_7313833, x_73139_732573);}
++make_utf8_string_with_len(c_7313826, "cond-expand: bad feature", 24, 24);
++return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_733875, &c_7313826, x_73139_732566);}
  ;}
  ;}
  ;}
@@ -63809,54 +64074,54 @@ Make let-values be the same as let*-values, to work around
 -c_7315128.elements = (object *)e_7315134;
 -c_7315128.elements[0] = k_734327;
 -c_7315128.elements[1] = x_73139_732913;
-+closureN_type c_7313835;
-+object e_7313841 [2];
-+c_7313835.hdr.mark = gc_color_red;
-+ c_7313835.hdr.grayed = 0;
-+c_7313835.tag = closureN_tag;
-+ c_7313835.fn = (function_type)__lambda_104;
-+c_7313835.num_args = 1;
-+c_7313835.num_elements = 2;
-+c_7313835.elements = (object *)e_7313841;
-+c_7313835.elements[0] = k_733882;
-+c_7313835.elements[1] = x_73139_732573;
++closureN_type c_7313828;
++object e_7313834 [2];
++c_7313828.hdr.mark = gc_color_red;
++ c_7313828.hdr.grayed = 0;
++c_7313828.tag = closureN_tag;
++ c_7313828.fn = (function_type)__lambda_104;
++c_7313828.num_args = 1;
++c_7313828.num_elements = 2;
++c_7313828.elements = (object *)e_7313834;
++c_7313828.elements[0] = k_733875;
++c_7313828.elements[1] = x_73139_732566;
  
 -return_direct_with_clo1(data,  __glo_features_scheme_base, (((closure)  __glo_features_scheme_base)->fn),  &c_7315128);}
-+return_direct_with_clo1(data,  __glo_features_scheme_base, (((closure)  __glo_features_scheme_base)->fn),  &c_7313835);}
++return_direct_with_clo1(data,  __glo_features_scheme_base, (((closure)  __glo_features_scheme_base)->fn),  &c_7313828);}
  ;; 
  }
  
 -static void __lambda_104(void *data, object self_7313074, int argc, object *args) /* object self_7313074, object r_734343 */
-+static void __lambda_104(void *data, object self_7311828, int argc, object *args) /* object self_7311828, object r_733898 */
++static void __lambda_104(void *data, object self_7311821, int argc, object *args) /* object self_7311821, object r_733891 */
   {
 - object r_734343 = args[0];
-+ object r_733898 = args[0];
++ object r_733891 = args[0];
    
  
 -return_direct_with_clo1(data,  ((closureN)self_7313074)->elements[0], (((closure)  ((closureN)self_7313074)->elements[0])->fn),  memqp(data, ((closureN)self_7313074)->elements[1], r_734343));; 
-+return_direct_with_clo1(data,  ((closureN)self_7311828)->elements[0], (((closure)  ((closureN)self_7311828)->elements[0])->fn),  memqp(data, ((closureN)self_7311828)->elements[1], r_733898));; 
++return_direct_with_clo1(data,  ((closureN)self_7311821)->elements[0], (((closure)  ((closureN)self_7311821)->elements[0])->fn),  memqp(data, ((closureN)self_7311821)->elements[1], r_733891));; 
  }
  
 -static void __lambda_103(void *data, object self_7313073, int argc, object *args) /* object self_7313073, object r_734335 */
-+static void __lambda_103(void *data, object self_7311827, int argc, object *args) /* object self_7311827, object r_733890 */
++static void __lambda_103(void *data, object self_7311820, int argc, object *args) /* object self_7311820, object r_733883 */
   {
 - object r_734335 = args[0];
 -  if( (boolean_f != r_734335) ){ 
 -  return_direct_with_clo1(data,  ((closureN)self_7313073)->elements[0], (((closure)  ((closureN)self_7313073)->elements[0])->fn),  boolean_f);
-+ object r_733890 = args[0];
-+  if( (boolean_f != r_733890) ){ 
-+  return_direct_with_clo1(data,  ((closureN)self_7311827)->elements[0], (((closure)  ((closureN)self_7311827)->elements[0])->fn),  boolean_f);
++ object r_733883 = args[0];
++  if( (boolean_f != r_733883) ){ 
++  return_direct_with_clo1(data,  ((closureN)self_7311820)->elements[0], (((closure)  ((closureN)self_7311820)->elements[0])->fn),  boolean_f);
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7313073)->elements[0], (((closure)  ((closureN)self_7313073)->elements[0])->fn),  boolean_t);}
-+  return_direct_with_clo1(data,  ((closureN)self_7311827)->elements[0], (((closure)  ((closureN)self_7311827)->elements[0])->fn),  boolean_t);}
++  return_direct_with_clo1(data,  ((closureN)self_7311820)->elements[0], (((closure)  ((closureN)self_7311820)->elements[0])->fn),  boolean_t);}
  ;; 
  }
  
 -static void __lambda_92(void *data, object self_7313075, int argc, object *args) /* object self_7313075, object r_734326 */
-+static void __lambda_92(void *data, object self_7311829, int argc, object *args) /* object self_7311829, object r_733881 */
++static void __lambda_92(void *data, object self_7311822, int argc, object *args) /* object self_7311822, object r_733874 */
   {
 - object r_734326 = args[0];
-+ object r_733881 = args[0];
++ object r_733874 = args[0];
    
 -closureN_type c_7314975;
 -object e_7315071 [4];
@@ -63871,28 +64136,28 @@ Make let-values be the same as let*-values, to work around
 -c_7314975.elements[1] = ((closureN)self_7313075)->elements[1];
 -c_7314975.elements[2] = ((closureN)self_7313075)->elements[2];
 -c_7314975.elements[3] = ((closureN)self_7313075)->elements[3];
-+closureN_type c_7313682;
-+object e_7313778 [4];
-+c_7313682.hdr.mark = gc_color_red;
-+ c_7313682.hdr.grayed = 0;
-+c_7313682.tag = closureN_tag;
-+ c_7313682.fn = (function_type)__lambda_93;
-+c_7313682.num_args = 1;
-+c_7313682.num_elements = 4;
-+c_7313682.elements = (object *)e_7313778;
-+c_7313682.elements[0] = ((closureN)self_7311829)->elements[0];
-+c_7313682.elements[1] = ((closureN)self_7311829)->elements[1];
-+c_7313682.elements[2] = ((closureN)self_7311829)->elements[2];
-+c_7313682.elements[3] = ((closureN)self_7311829)->elements[3];
++closureN_type c_7313675;
++object e_7313771 [4];
++c_7313675.hdr.mark = gc_color_red;
++ c_7313675.hdr.grayed = 0;
++c_7313675.tag = closureN_tag;
++ c_7313675.fn = (function_type)__lambda_93;
++c_7313675.num_args = 1;
++c_7313675.num_elements = 4;
++c_7313675.elements = (object *)e_7313771;
++c_7313675.elements[0] = ((closureN)self_7311822)->elements[0];
++c_7313675.elements[1] = ((closureN)self_7311822)->elements[1];
++c_7313675.elements[2] = ((closureN)self_7311822)->elements[2];
++c_7313675.elements[3] = ((closureN)self_7311822)->elements[3];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7314975,__lambda_93,  Cyc_set_cell(data, ((closureN)self_7313075)->elements[0], r_734326));; 
-+return_direct_with_clo1(data,(closure)&c_7313682,__lambda_93,  Cyc_set_cell(data, ((closureN)self_7311829)->elements[0], r_733881));; 
++return_direct_with_clo1(data,(closure)&c_7313675,__lambda_93,  Cyc_set_cell(data, ((closureN)self_7311822)->elements[0], r_733874));; 
  }
  
 -static void __lambda_93(void *data, object self_7313076, int argc, object *args) /* object self_7313076, object r_734303 */
-+static void __lambda_93(void *data, object self_7311830, int argc, object *args) /* object self_7311830, object r_733858 */
++static void __lambda_93(void *data, object self_7311823, int argc, object *args) /* object self_7311823, object r_733851 */
   {
  
    
@@ -63908,30 +64173,30 @@ Make let-values be the same as let*-values, to work around
 -c_7314977.elements[0] = ((closureN)self_7313076)->elements[0];
 -c_7314977.elements[1] = ((closureN)self_7313076)->elements[2];
 -c_7314977.elements[2] = ((closureN)self_7313076)->elements[3];
-+closureN_type c_7313684;
-+object e_7313774 [3];
-+c_7313684.hdr.mark = gc_color_red;
-+ c_7313684.hdr.grayed = 0;
-+c_7313684.tag = closureN_tag;
-+ c_7313684.fn = (function_type)__lambda_94;
-+c_7313684.num_args = 1;
-+c_7313684.num_elements = 3;
-+c_7313684.elements = (object *)e_7313774;
-+c_7313684.elements[0] = ((closureN)self_7311830)->elements[0];
-+c_7313684.elements[1] = ((closureN)self_7311830)->elements[2];
-+c_7313684.elements[2] = ((closureN)self_7311830)->elements[3];
++closureN_type c_7313677;
++object e_7313767 [3];
++c_7313677.hdr.mark = gc_color_red;
++ c_7313677.hdr.grayed = 0;
++c_7313677.tag = closureN_tag;
++ c_7313677.fn = (function_type)__lambda_94;
++c_7313677.num_args = 1;
++c_7313677.num_elements = 3;
++c_7313677.elements = (object *)e_7313767;
++c_7313677.elements[0] = ((closureN)self_7311823)->elements[0];
++c_7313677.elements[1] = ((closureN)self_7311823)->elements[2];
++c_7313677.elements[2] = ((closureN)self_7311823)->elements[3];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7314977,__lambda_94,  Cyc_cdr(data, ((closureN)self_7313076)->elements[1]));; 
-+return_direct_with_clo1(data,(closure)&c_7313684,__lambda_94,  Cyc_cdr(data, ((closureN)self_7311830)->elements[1]));; 
++return_direct_with_clo1(data,(closure)&c_7313677,__lambda_94,  Cyc_cdr(data, ((closureN)self_7311823)->elements[1]));; 
  }
  
 -static void __lambda_94(void *data, object self_7313077, int argc, object *args) /* object self_7313077, object ls_73145_732915 */
-+static void __lambda_94(void *data, object self_7311831, int argc, object *args) /* object self_7311831, object ls_73145_732575 */
++static void __lambda_94(void *data, object self_7311824, int argc, object *args) /* object self_7311824, object ls_73145_732568 */
   {
 - object ls_73145_732915 = args[0];
-+ object ls_73145_732575 = args[0];
++ object ls_73145_732568 = args[0];
    
 -closureN_type c_7314979;
 -object e_7315066 [4];
@@ -63946,29 +64211,29 @@ Make let-values be the same as let*-values, to work around
 -c_7314979.elements[1] = ((closureN)self_7313077)->elements[1];
 -c_7314979.elements[2] = ls_73145_732915;
 -c_7314979.elements[3] = ((closureN)self_7313077)->elements[2];
-+closureN_type c_7313686;
-+object e_7313773 [4];
-+c_7313686.hdr.mark = gc_color_red;
-+ c_7313686.hdr.grayed = 0;
-+c_7313686.tag = closureN_tag;
-+ c_7313686.fn = (function_type)__lambda_95;
-+c_7313686.num_args = 1;
-+c_7313686.num_elements = 4;
-+c_7313686.elements = (object *)e_7313773;
-+c_7313686.elements[0] = ((closureN)self_7311831)->elements[0];
-+c_7313686.elements[1] = ((closureN)self_7311831)->elements[1];
-+c_7313686.elements[2] = ls_73145_732575;
-+c_7313686.elements[3] = ((closureN)self_7311831)->elements[2];
++closureN_type c_7313679;
++object e_7313766 [4];
++c_7313679.hdr.mark = gc_color_red;
++ c_7313679.hdr.grayed = 0;
++c_7313679.tag = closureN_tag;
++ c_7313679.fn = (function_type)__lambda_95;
++c_7313679.num_args = 1;
++c_7313679.num_elements = 4;
++c_7313679.elements = (object *)e_7313766;
++c_7313679.elements[0] = ((closureN)self_7311824)->elements[0];
++c_7313679.elements[1] = ((closureN)self_7311824)->elements[1];
++c_7313679.elements[2] = ls_73145_732568;
++c_7313679.elements[3] = ((closureN)self_7311824)->elements[2];
  
 -return_direct_with_clo1(data,(closure)&c_7314979,__lambda_95,  boolean_f);; 
-+return_direct_with_clo1(data,(closure)&c_7313686,__lambda_95,  boolean_f);; 
++return_direct_with_clo1(data,(closure)&c_7313679,__lambda_95,  boolean_f);; 
  }
  
 -static void __lambda_95(void *data, object self_7313078, int argc, object *args) /* object self_7313078, object expand_73146_732916 */
-+static void __lambda_95(void *data, object self_7311832, int argc, object *args) /* object self_7311832, object expand_73146_732576 */
++static void __lambda_95(void *data, object self_7311825, int argc, object *args) /* object self_7311825, object expand_73146_732569 */
   {
 - object expand_73146_732916 = args[0];
-+ object expand_73146_732576 = args[0];
++ object expand_73146_732569 = args[0];
    
 -closureN_type c_7314981;
 -object e_7315062 [4];
@@ -63983,32 +64248,32 @@ Make let-values be the same as let*-values, to work around
 -c_7314981.elements[1] = ((closureN)self_7313078)->elements[1];
 -c_7314981.elements[2] = ((closureN)self_7313078)->elements[2];
 -c_7314981.elements[3] = ((closureN)self_7313078)->elements[3];
-+closureN_type c_7313688;
-+object e_7313769 [4];
-+c_7313688.hdr.mark = gc_color_red;
-+ c_7313688.hdr.grayed = 0;
-+c_7313688.tag = closureN_tag;
-+ c_7313688.fn = (function_type)__lambda_1288;
-+c_7313688.num_args = 1;
-+c_7313688.num_elements = 4;
-+c_7313688.elements = (object *)e_7313769;
-+c_7313688.elements[0] = ((closureN)self_7311832)->elements[0];
-+c_7313688.elements[1] = ((closureN)self_7311832)->elements[1];
-+c_7313688.elements[2] = ((closureN)self_7311832)->elements[2];
-+c_7313688.elements[3] = ((closureN)self_7311832)->elements[3];
++closureN_type c_7313681;
++object e_7313762 [4];
++c_7313681.hdr.mark = gc_color_red;
++ c_7313681.hdr.grayed = 0;
++c_7313681.tag = closureN_tag;
++ c_7313681.fn = (function_type)__lambda_1288;
++c_7313681.num_args = 1;
++c_7313681.num_elements = 4;
++c_7313681.elements = (object *)e_7313762;
++c_7313681.elements[0] = ((closureN)self_7311825)->elements[0];
++c_7313681.elements[1] = ((closureN)self_7311825)->elements[1];
++c_7313681.elements[2] = ((closureN)self_7311825)->elements[2];
++c_7313681.elements[3] = ((closureN)self_7311825)->elements[3];
  
  
 -pair_type local_7315065; 
 -return_direct_with_clo1(data,(closure)&c_7314981,__lambda_1335,  set_cell_as_expr(&local_7315065, expand_73146_732916));; 
-+pair_type local_7313772; 
-+return_direct_with_clo1(data,(closure)&c_7313688,__lambda_1288,  set_cell_as_expr(&local_7313772, expand_73146_732576));; 
++pair_type local_7313765; 
++return_direct_with_clo1(data,(closure)&c_7313681,__lambda_1288,  set_cell_as_expr(&local_7313765, expand_73146_732569));; 
  }
  
 -static void __lambda_1335(void *data, object self_7313079, int argc, object *args) /* object self_7313079, object expand_73146_732916 */
-+static void __lambda_1288(void *data, object self_7311833, int argc, object *args) /* object self_7311833, object expand_73146_732576 */
++static void __lambda_1288(void *data, object self_7311826, int argc, object *args) /* object self_7311826, object expand_73146_732569 */
   {
 - object expand_73146_732916 = args[0];
-+ object expand_73146_732576 = args[0];
++ object expand_73146_732569 = args[0];
    
 -closureN_type c_7314983;
 -object e_7314996 [3];
@@ -64022,18 +64287,18 @@ Make let-values be the same as let*-values, to work around
 -c_7314983.elements[0] = expand_73146_732916;
 -c_7314983.elements[1] = ((closureN)self_7313079)->elements[1];
 -c_7314983.elements[2] = ((closureN)self_7313079)->elements[2];
-+closureN_type c_7313690;
-+object e_7313703 [3];
-+c_7313690.hdr.mark = gc_color_red;
-+ c_7313690.hdr.grayed = 0;
-+c_7313690.tag = closureN_tag;
-+ c_7313690.fn = (function_type)__lambda_96;
-+c_7313690.num_args = 1;
-+c_7313690.num_elements = 3;
-+c_7313690.elements = (object *)e_7313703;
-+c_7313690.elements[0] = expand_73146_732576;
-+c_7313690.elements[1] = ((closureN)self_7311833)->elements[1];
-+c_7313690.elements[2] = ((closureN)self_7311833)->elements[2];
++closureN_type c_7313683;
++object e_7313696 [3];
++c_7313683.hdr.mark = gc_color_red;
++ c_7313683.hdr.grayed = 0;
++c_7313683.tag = closureN_tag;
++ c_7313683.fn = (function_type)__lambda_96;
++c_7313683.num_args = 1;
++c_7313683.num_elements = 3;
++c_7313683.elements = (object *)e_7313696;
++c_7313683.elements[0] = expand_73146_732569;
++c_7313683.elements[1] = ((closureN)self_7311826)->elements[1];
++c_7313683.elements[2] = ((closureN)self_7311826)->elements[2];
  
  
 -closureN_type c_7314997;
@@ -64048,53 +64313,53 @@ Make let-values be the same as let*-values, to work around
 -c_7314997.elements[0] = ((closureN)self_7313079)->elements[0];
 -c_7314997.elements[1] = expand_73146_732916;
 -c_7314997.elements[2] = ((closureN)self_7313079)->elements[3];
-+closureN_type c_7313704;
-+object e_7313768 [3];
-+c_7313704.hdr.mark = gc_color_red;
-+ c_7313704.hdr.grayed = 0;
-+c_7313704.tag = closureN_tag;
-+ c_7313704.fn = (function_type)__lambda_98;
-+c_7313704.num_args = 1;
-+c_7313704.num_elements = 3;
-+c_7313704.elements = (object *)e_7313768;
-+c_7313704.elements[0] = ((closureN)self_7311833)->elements[0];
-+c_7313704.elements[1] = expand_73146_732576;
-+c_7313704.elements[2] = ((closureN)self_7311833)->elements[3];
++closureN_type c_7313697;
++object e_7313761 [3];
++c_7313697.hdr.mark = gc_color_red;
++ c_7313697.hdr.grayed = 0;
++c_7313697.tag = closureN_tag;
++ c_7313697.fn = (function_type)__lambda_98;
++c_7313697.num_args = 1;
++c_7313697.num_elements = 3;
++c_7313697.elements = (object *)e_7313761;
++c_7313697.elements[0] = ((closureN)self_7311826)->elements[0];
++c_7313697.elements[1] = expand_73146_732569;
++c_7313697.elements[2] = ((closureN)self_7311826)->elements[3];
  
 -return_direct_with_clo1(data,(closure)&c_7314983,__lambda_96,  &c_7314997);; 
-+return_direct_with_clo1(data,(closure)&c_7313690,__lambda_96,  &c_7313704);; 
++return_direct_with_clo1(data,(closure)&c_7313683,__lambda_96,  &c_7313697);; 
  }
  
 -static void __lambda_98(void *data, object self_7313080, int argc, object *args) /* object self_7313080, object k_734307, object ls_73147_732917 */
-+static void __lambda_98(void *data, object self_7311834, int argc, object *args) /* object self_7311834, object k_733862, object ls_73147_732577 */
++static void __lambda_98(void *data, object self_7311827, int argc, object *args) /* object self_7311827, object k_733855, object ls_73147_732570 */
   {
 - object k_734307 = args[0]; object ls_73147_732917 = args[1];
-+ object k_733862 = args[0]; object ls_73147_732577 = args[1];
++ object k_733855 = args[0]; object ls_73147_732570 = args[1];
      
 -if( (boolean_f != Cyc_is_null(ls_73147_732917)) ){ 
-+if( (boolean_f != Cyc_is_null(ls_73147_732577)) ){ 
++if( (boolean_f != Cyc_is_null(ls_73147_732570)) ){ 
    
  
 -return_direct_with_clo1(data,  k_734307, (((closure)  k_734307)->fn),  Cyc_is_null(ls_73147_732917));
-+return_direct_with_clo1(data,  k_733862, (((closure)  k_733862)->fn),  Cyc_is_null(ls_73147_732577));
++return_direct_with_clo1(data,  k_733855, (((closure)  k_733855)->fn),  Cyc_is_null(ls_73147_732570));
  } else { 
      
    
 -if( (boolean_f != Cyc_is_pair(Cyc_car(data, ls_73147_732917))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_car(data, ls_73147_732577))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_car(data, ls_73147_732570))) ){ 
      
    
 -if( (boolean_f != Cyc_eq(quote__else, Cyc_caar(data, ls_73147_732917))) ){ 
-+if( (boolean_f != Cyc_eq(quote__else, Cyc_caar(data, ls_73147_732577))) ){ 
++if( (boolean_f != Cyc_eq(quote__else, Cyc_caar(data, ls_73147_732570))) ){ 
      
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ls_73147_732917))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ls_73147_732577))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, ls_73147_732570))) ){ 
    
 -make_utf8_string_with_len(c_7315016, "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_734307, &c_7315016);
-+make_utf8_string_with_len(c_7313723, "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_733862, &c_7313723);
++make_utf8_string_with_len(c_7313716, "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_733855, &c_7313716);
  } else { 
    
 -closureN_type c_7315019;
@@ -64108,20 +64373,20 @@ Make let-values be the same as let*-values, to work around
 -c_7315019.elements = (object *)e_7315028;
 -c_7315019.elements[0] = k_734307;
 -c_7315019.elements[1] = ls_73147_732917;
-+closureN_type c_7313726;
-+object e_7313735 [2];
-+c_7313726.hdr.mark = gc_color_red;
-+ c_7313726.hdr.grayed = 0;
-+c_7313726.tag = closureN_tag;
-+ c_7313726.fn = (function_type)__lambda_99;
-+c_7313726.num_args = 1;
-+c_7313726.num_elements = 2;
-+c_7313726.elements = (object *)e_7313735;
-+c_7313726.elements[0] = k_733862;
-+c_7313726.elements[1] = ls_73147_732577;
++closureN_type c_7313719;
++object e_7313728 [2];
++c_7313719.hdr.mark = gc_color_red;
++ c_7313719.hdr.grayed = 0;
++c_7313719.tag = closureN_tag;
++ c_7313719.fn = (function_type)__lambda_99;
++c_7313719.num_args = 1;
++c_7313719.num_elements = 2;
++c_7313719.elements = (object *)e_7313728;
++c_7313719.elements[0] = k_733855;
++c_7313719.elements[1] = ls_73147_732570;
  
 -return_closcall2(data,  ((closureN)self_7313080)->elements[2],  &c_7315019, quote_begin);}
-+return_closcall2(data,  ((closureN)self_7311834)->elements[2],  &c_7313726, quote_begin);}
++return_closcall2(data,  ((closureN)self_7311827)->elements[2],  &c_7313719, quote_begin);}
  ;
  } else { 
    
@@ -64140,44 +64405,44 @@ Make let-values be the same as let*-values, to work around
 -c_7315033.elements[1] = k_734307;
 -c_7315033.elements[2] = ls_73147_732917;
 -c_7315033.elements[3] = ((closureN)self_7313080)->elements[2];
-+closureN_type c_7313740;
-+object e_7313761 [4];
-+c_7313740.hdr.mark = gc_color_red;
-+ c_7313740.hdr.grayed = 0;
-+c_7313740.tag = closureN_tag;
-+ c_7313740.fn = (function_type)__lambda_100;
-+c_7313740.num_args = 1;
-+c_7313740.num_elements = 4;
-+c_7313740.elements = (object *)e_7313761;
-+c_7313740.elements[0] = ((closureN)self_7311834)->elements[1];
-+c_7313740.elements[1] = k_733862;
-+c_7313740.elements[2] = ls_73147_732577;
-+c_7313740.elements[3] = ((closureN)self_7311834)->elements[2];
++closureN_type c_7313733;
++object e_7313754 [4];
++c_7313733.hdr.mark = gc_color_red;
++ c_7313733.hdr.grayed = 0;
++c_7313733.tag = closureN_tag;
++ c_7313733.fn = (function_type)__lambda_100;
++c_7313733.num_args = 1;
++c_7313733.num_elements = 4;
++c_7313733.elements = (object *)e_7313754;
++c_7313733.elements[0] = ((closureN)self_7311827)->elements[1];
++c_7313733.elements[1] = k_733855;
++c_7313733.elements[2] = ls_73147_732570;
++c_7313733.elements[3] = ((closureN)self_7311827)->elements[2];
  
  
  
 -return_closcall2(data,  car(((closureN)self_7313080)->elements[0]),  &c_7315033, Cyc_caar(data, ls_73147_732917));}
-+return_closcall2(data,  car(((closureN)self_7311834)->elements[0]),  &c_7313740, Cyc_caar(data, ls_73147_732577));}
++return_closcall2(data,  car(((closureN)self_7311827)->elements[0]),  &c_7313733, Cyc_caar(data, ls_73147_732570));}
  ;
  } else { 
    
 -make_utf8_string_with_len(c_7315058, "cond-expand: bad clause", 23, 23);
-+make_utf8_string_with_len(c_7313765, "cond-expand: bad clause", 23, 23);
++make_utf8_string_with_len(c_7313758, "cond-expand: bad clause", 23, 23);
  
  
 -return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_734307, &c_7315058, Cyc_car(data, ls_73147_732917));}
-+return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_733862, &c_7313765, Cyc_car(data, ls_73147_732577));}
++return_direct_with_clo3(data,  __glo_error_scheme_base, (((closure)  __glo_error_scheme_base)->fn),  k_733855, &c_7313758, Cyc_car(data, ls_73147_732570));}
  ;}
  ;; 
  }
  
 -static void __lambda_100(void *data, object self_7313082, int argc, object *args) /* object self_7313082, object r_734316 */
-+static void __lambda_100(void *data, object self_7311836, int argc, object *args) /* object self_7311836, object r_733871 */
++static void __lambda_100(void *data, object self_7311829, int argc, object *args) /* object self_7311829, object r_733864 */
   {
 - object r_734316 = args[0];
 -  if( (boolean_f != r_734316) ){ 
-+ object r_733871 = args[0];
-+  if( (boolean_f != r_733871) ){ 
++ object r_733864 = args[0];
++  if( (boolean_f != r_733864) ){ 
    
 -closureN_type c_7315036;
 -object e_7315045 [2];
@@ -64190,63 +64455,63 @@ Make let-values be the same as let*-values, to work around
 -c_7315036.elements = (object *)e_7315045;
 -c_7315036.elements[0] = ((closureN)self_7313082)->elements[1];
 -c_7315036.elements[1] = ((closureN)self_7313082)->elements[2];
-+closureN_type c_7313743;
-+object e_7313752 [2];
-+c_7313743.hdr.mark = gc_color_red;
-+ c_7313743.hdr.grayed = 0;
-+c_7313743.tag = closureN_tag;
-+ c_7313743.fn = (function_type)__lambda_101;
-+c_7313743.num_args = 1;
-+c_7313743.num_elements = 2;
-+c_7313743.elements = (object *)e_7313752;
-+c_7313743.elements[0] = ((closureN)self_7311836)->elements[1];
-+c_7313743.elements[1] = ((closureN)self_7311836)->elements[2];
++closureN_type c_7313736;
++object e_7313745 [2];
++c_7313736.hdr.mark = gc_color_red;
++ c_7313736.hdr.grayed = 0;
++c_7313736.tag = closureN_tag;
++ c_7313736.fn = (function_type)__lambda_101;
++c_7313736.num_args = 1;
++c_7313736.num_elements = 2;
++c_7313736.elements = (object *)e_7313745;
++c_7313736.elements[0] = ((closureN)self_7311829)->elements[1];
++c_7313736.elements[1] = ((closureN)self_7311829)->elements[2];
  
 -return_closcall2(data,  ((closureN)self_7313082)->elements[3],  &c_7315036, quote_begin);
-+return_closcall2(data,  ((closureN)self_7311836)->elements[3],  &c_7313743, quote_begin);
++return_closcall2(data,  ((closureN)self_7311829)->elements[3],  &c_7313736, quote_begin);
  } else { 
    
  
  
  
 -return_closcall2(data,  car(((closureN)self_7313082)->elements[0]),  ((closureN)self_7313082)->elements[1], Cyc_cdr(data, ((closureN)self_7313082)->elements[2]));}
-+return_closcall2(data,  car(((closureN)self_7311836)->elements[0]),  ((closureN)self_7311836)->elements[1], Cyc_cdr(data, ((closureN)self_7311836)->elements[2]));}
++return_closcall2(data,  car(((closureN)self_7311829)->elements[0]),  ((closureN)self_7311829)->elements[1], Cyc_cdr(data, ((closureN)self_7311829)->elements[2]));}
  ;; 
  }
  
 -static void __lambda_101(void *data, object self_7313083, int argc, object *args) /* object self_7313083, object r_734317 */
-+static void __lambda_101(void *data, object self_7311837, int argc, object *args) /* object self_7311837, object r_733872 */
++static void __lambda_101(void *data, object self_7311830, int argc, object *args) /* object self_7311830, object r_733865 */
   {
 - object r_734317 = args[0];
-+ object r_733872 = args[0];
++ object r_733865 = args[0];
    
 -pair_type local_7315041; 
-+pair_type local_7313748; 
++pair_type local_7313741; 
  
  
 -return_direct_with_clo1(data,  ((closureN)self_7313083)->elements[0], (((closure)  ((closureN)self_7313083)->elements[0])->fn),  set_pair_as_expr(&local_7315041, r_734317, Cyc_cdar(data, ((closureN)self_7313083)->elements[1])));; 
-+return_direct_with_clo1(data,  ((closureN)self_7311837)->elements[0], (((closure)  ((closureN)self_7311837)->elements[0])->fn),  set_pair_as_expr(&local_7313748, r_733872, Cyc_cdar(data, ((closureN)self_7311837)->elements[1])));; 
++return_direct_with_clo1(data,  ((closureN)self_7311830)->elements[0], (((closure)  ((closureN)self_7311830)->elements[0])->fn),  set_pair_as_expr(&local_7313741, r_733865, Cyc_cdar(data, ((closureN)self_7311830)->elements[1])));; 
  }
  
 -static void __lambda_99(void *data, object self_7313081, int argc, object *args) /* object self_7313081, object r_734312 */
-+static void __lambda_99(void *data, object self_7311835, int argc, object *args) /* object self_7311835, object r_733867 */
++static void __lambda_99(void *data, object self_7311828, int argc, object *args) /* object self_7311828, object r_733860 */
   {
 - object r_734312 = args[0];
-+ object r_733867 = args[0];
++ object r_733860 = args[0];
    
 -pair_type local_7315024; 
-+pair_type local_7313731; 
++pair_type local_7313724; 
  
  
 -return_direct_with_clo1(data,  ((closureN)self_7313081)->elements[0], (((closure)  ((closureN)self_7313081)->elements[0])->fn),  set_pair_as_expr(&local_7315024, r_734312, Cyc_cdar(data, ((closureN)self_7313081)->elements[1])));; 
-+return_direct_with_clo1(data,  ((closureN)self_7311835)->elements[0], (((closure)  ((closureN)self_7311835)->elements[0])->fn),  set_pair_as_expr(&local_7313731, r_733867, Cyc_cdar(data, ((closureN)self_7311835)->elements[1])));; 
++return_direct_with_clo1(data,  ((closureN)self_7311828)->elements[0], (((closure)  ((closureN)self_7311828)->elements[0])->fn),  set_pair_as_expr(&local_7313724, r_733860, Cyc_cdar(data, ((closureN)self_7311828)->elements[1])));; 
  }
  
 -static void __lambda_96(void *data, object self_7313084, int argc, object *args) /* object self_7313084, object r_734306 */
-+static void __lambda_96(void *data, object self_7311838, int argc, object *args) /* object self_7311838, object r_733861 */
++static void __lambda_96(void *data, object self_7311831, int argc, object *args) /* object self_7311831, object r_733854 */
   {
 - object r_734306 = args[0];
-+ object r_733861 = args[0];
++ object r_733854 = args[0];
    
 -closureN_type c_7314985;
 -object e_7314992 [3];
@@ -64260,42 +64525,41 @@ Make let-values be the same as let*-values, to work around
 -c_7314985.elements[0] = ((closureN)self_7313084)->elements[0];
 -c_7314985.elements[1] = ((closureN)self_7313084)->elements[1];
 -c_7314985.elements[2] = ((closureN)self_7313084)->elements[2];
-+closureN_type c_7313692;
-+object e_7313699 [3];
-+c_7313692.hdr.mark = gc_color_red;
-+ c_7313692.hdr.grayed = 0;
-+c_7313692.tag = closureN_tag;
-+ c_7313692.fn = (function_type)__lambda_97;
-+c_7313692.num_args = 1;
-+c_7313692.num_elements = 3;
-+c_7313692.elements = (object *)e_7313699;
-+c_7313692.elements[0] = ((closureN)self_7311838)->elements[0];
-+c_7313692.elements[1] = ((closureN)self_7311838)->elements[1];
-+c_7313692.elements[2] = ((closureN)self_7311838)->elements[2];
++closureN_type c_7313685;
++object e_7313692 [3];
++c_7313685.hdr.mark = gc_color_red;
++ c_7313685.hdr.grayed = 0;
++c_7313685.tag = closureN_tag;
++ c_7313685.fn = (function_type)__lambda_97;
++c_7313685.num_args = 1;
++c_7313685.num_elements = 3;
++c_7313685.elements = (object *)e_7313692;
++c_7313685.elements[0] = ((closureN)self_7311831)->elements[0];
++c_7313685.elements[1] = ((closureN)self_7311831)->elements[1];
++c_7313685.elements[2] = ((closureN)self_7311831)->elements[2];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7314985,__lambda_97,  Cyc_set_cell(data, ((closureN)self_7313084)->elements[0], r_734306));; 
-+return_direct_with_clo1(data,(closure)&c_7313692,__lambda_97,  Cyc_set_cell(data, ((closureN)self_7311838)->elements[0], r_733861));; 
++return_direct_with_clo1(data,(closure)&c_7313685,__lambda_97,  Cyc_set_cell(data, ((closureN)self_7311831)->elements[0], r_733854));; 
  }
  
 -static void __lambda_97(void *data, object self_7313085, int argc, object *args) /* object self_7313085, object r_734305 */
-+static void __lambda_97(void *data, object self_7311839, int argc, object *args) /* object self_7311839, object r_733860 */
++static void __lambda_97(void *data, object self_7311832, int argc, object *args) /* object self_7311832, object r_733853 */
   {
  
    
  
 -return_closcall2(data,  car(((closureN)self_7313085)->elements[0]),  ((closureN)self_7313085)->elements[1], ((closureN)self_7313085)->elements[2]);; 
-+return_closcall2(data,  car(((closureN)self_7311839)->elements[0]),  ((closureN)self_7311839)->elements[1], ((closureN)self_7311839)->elements[2]);; 
++return_closcall2(data,  car(((closureN)self_7311832)->elements[0]),  ((closureN)self_7311832)->elements[1], ((closureN)self_7311832)->elements[2]);; 
  }
  
 -static void __lambda_75(void *data, object _, int argc, object *args) /* closure _,object k_734280, object exp_7373_732873, object rename_7374_732874, object compare_7375_732875 */
-+static void __lambda_75(void *data, object _, int argc, object *args) /* closure _,object k_733835, object exp_7373_732533, object rename_7374_732534, object compare_7375_732535 */
++static void __lambda_75(void *data, object _, int argc, object *args) /* closure _,object k_733828, object exp_7373_732526, object rename_7374_732527, object compare_7375_732528 */
   {
 -object k_734280 = args[0]; object exp_7373_732873 = args[1];
--  Cyc_st_add(data, "scheme/base.sld:begin");
-+object k_733835 = args[0]; object exp_7373_732533 = args[1];
-+  Cyc_st_add(data, "base.sld:begin");
++object k_733828 = args[0]; object exp_7373_732526 = args[1];
+   Cyc_st_add(data, "scheme/base.sld:begin");
  
 -closureN_type c_7314868;
 -object e_7314948 [2];
@@ -64308,27 +64572,27 @@ Make let-values be the same as let*-values, to work around
 -c_7314868.elements = (object *)e_7314948;
 -c_7314868.elements[0] = exp_7373_732873;
 -c_7314868.elements[1] = k_734280;
-+closureN_type c_7313575;
-+object e_7313655 [2];
-+c_7313575.hdr.mark = gc_color_red;
-+ c_7313575.hdr.grayed = 0;
-+c_7313575.tag = closureN_tag;
-+ c_7313575.fn = (function_type)__lambda_76;
-+c_7313575.num_args = 2;
-+c_7313575.num_elements = 2;
-+c_7313575.elements = (object *)e_7313655;
-+c_7313575.elements[0] = exp_7373_732533;
-+c_7313575.elements[1] = k_733835;
++closureN_type c_7313568;
++object e_7313648 [2];
++c_7313568.hdr.mark = gc_color_red;
++ c_7313568.hdr.grayed = 0;
++c_7313568.tag = closureN_tag;
++ c_7313568.fn = (function_type)__lambda_76;
++c_7313568.num_args = 2;
++c_7313568.num_elements = 2;
++c_7313568.elements = (object *)e_7313648;
++c_7313568.elements[0] = exp_7373_732526;
++c_7313568.elements[1] = k_733828;
  
 -return_direct_with_clo2(data,(closure)&c_7314868,__lambda_76,  boolean_f, boolean_f);; 
-+return_direct_with_clo2(data,(closure)&c_7313575,__lambda_76,  boolean_f, boolean_f);; 
++return_direct_with_clo2(data,(closure)&c_7313568,__lambda_76,  boolean_f, boolean_f);; 
  }
  
 -static void __lambda_76(void *data, object self_7313035, int argc, object *args) /* object self_7313035, object dummy_91bind_732878, object singlet_127_732879 */
-+static void __lambda_76(void *data, object self_7311789, int argc, object *args) /* object self_7311789, object dummy_91bind_732538, object singlet_127_732539 */
++static void __lambda_76(void *data, object self_7311782, int argc, object *args) /* object self_7311782, object dummy_91bind_732531, object singlet_127_732532 */
   {
 - object dummy_91bind_732878 = args[0]; object singlet_127_732879 = args[1];
-+ object dummy_91bind_732538 = args[0]; object singlet_127_732539 = args[1];
++ object dummy_91bind_732531 = args[0]; object singlet_127_732532 = args[1];
    
 -closureN_type c_7314870;
 -object e_7314944 [3];
@@ -64342,31 +64606,31 @@ Make let-values be the same as let*-values, to work around
 -c_7314870.elements[0] = ((closureN)self_7313035)->elements[0];
 -c_7314870.elements[1] = ((closureN)self_7313035)->elements[1];
 -c_7314870.elements[2] = singlet_127_732879;
-+closureN_type c_7313577;
-+object e_7313651 [3];
-+c_7313577.hdr.mark = gc_color_red;
-+ c_7313577.hdr.grayed = 0;
-+c_7313577.tag = closureN_tag;
-+ c_7313577.fn = (function_type)__lambda_1287;
-+c_7313577.num_args = 1;
-+c_7313577.num_elements = 3;
-+c_7313577.elements = (object *)e_7313651;
-+c_7313577.elements[0] = ((closureN)self_7311789)->elements[0];
-+c_7313577.elements[1] = ((closureN)self_7311789)->elements[1];
-+c_7313577.elements[2] = singlet_127_732539;
++closureN_type c_7313570;
++object e_7313644 [3];
++c_7313570.hdr.mark = gc_color_red;
++ c_7313570.hdr.grayed = 0;
++c_7313570.tag = closureN_tag;
++ c_7313570.fn = (function_type)__lambda_1287;
++c_7313570.num_args = 1;
++c_7313570.num_elements = 3;
++c_7313570.elements = (object *)e_7313644;
++c_7313570.elements[0] = ((closureN)self_7311782)->elements[0];
++c_7313570.elements[1] = ((closureN)self_7311782)->elements[1];
++c_7313570.elements[2] = singlet_127_732532;
  
  
 -pair_type local_7314947; 
 -return_direct_with_clo1(data,(closure)&c_7314870,__lambda_1334,  set_cell_as_expr(&local_7314947, dummy_91bind_732878));; 
-+pair_type local_7313654; 
-+return_direct_with_clo1(data,(closure)&c_7313577,__lambda_1287,  set_cell_as_expr(&local_7313654, dummy_91bind_732538));; 
++pair_type local_7313647; 
++return_direct_with_clo1(data,(closure)&c_7313570,__lambda_1287,  set_cell_as_expr(&local_7313647, dummy_91bind_732531));; 
  }
  
 -static void __lambda_1334(void *data, object self_7313036, int argc, object *args) /* object self_7313036, object dummy_91bind_732878 */
-+static void __lambda_1287(void *data, object self_7311790, int argc, object *args) /* object self_7311790, object dummy_91bind_732538 */
++static void __lambda_1287(void *data, object self_7311783, int argc, object *args) /* object self_7311783, object dummy_91bind_732531 */
   {
 - object dummy_91bind_732878 = args[0];
-+ object dummy_91bind_732538 = args[0];
++ object dummy_91bind_732531 = args[0];
    
 -closureN_type c_7314872;
 -object e_7314939 [3];
@@ -64380,31 +64644,31 @@ Make let-values be the same as let*-values, to work around
 -c_7314872.elements[0] = dummy_91bind_732878;
 -c_7314872.elements[1] = ((closureN)self_7313036)->elements[0];
 -c_7314872.elements[2] = ((closureN)self_7313036)->elements[1];
-+closureN_type c_7313579;
-+object e_7313646 [3];
-+c_7313579.hdr.mark = gc_color_red;
-+ c_7313579.hdr.grayed = 0;
-+c_7313579.tag = closureN_tag;
-+ c_7313579.fn = (function_type)__lambda_1286;
-+c_7313579.num_args = 1;
-+c_7313579.num_elements = 3;
-+c_7313579.elements = (object *)e_7313646;
-+c_7313579.elements[0] = dummy_91bind_732538;
-+c_7313579.elements[1] = ((closureN)self_7311790)->elements[0];
-+c_7313579.elements[2] = ((closureN)self_7311790)->elements[1];
++closureN_type c_7313572;
++object e_7313639 [3];
++c_7313572.hdr.mark = gc_color_red;
++ c_7313572.hdr.grayed = 0;
++c_7313572.tag = closureN_tag;
++ c_7313572.fn = (function_type)__lambda_1286;
++c_7313572.num_args = 1;
++c_7313572.num_elements = 3;
++c_7313572.elements = (object *)e_7313639;
++c_7313572.elements[0] = dummy_91bind_732531;
++c_7313572.elements[1] = ((closureN)self_7311783)->elements[0];
++c_7313572.elements[2] = ((closureN)self_7311783)->elements[1];
  
  
 -pair_type local_7314942; 
 -return_direct_with_clo1(data,(closure)&c_7314872,__lambda_1333,  set_cell_as_expr(&local_7314942, ((closureN)self_7313036)->elements[2]));; 
-+pair_type local_7313649; 
-+return_direct_with_clo1(data,(closure)&c_7313579,__lambda_1286,  set_cell_as_expr(&local_7313649, ((closureN)self_7311790)->elements[2]));; 
++pair_type local_7313642; 
++return_direct_with_clo1(data,(closure)&c_7313572,__lambda_1286,  set_cell_as_expr(&local_7313642, ((closureN)self_7311783)->elements[2]));; 
  }
  
 -static void __lambda_1333(void *data, object self_7313037, int argc, object *args) /* object self_7313037, object singlet_127_732879 */
-+static void __lambda_1286(void *data, object self_7311791, int argc, object *args) /* object self_7311791, object singlet_127_732539 */
++static void __lambda_1286(void *data, object self_7311784, int argc, object *args) /* object self_7311784, object singlet_127_732532 */
   {
 - object singlet_127_732879 = args[0];
-+ object singlet_127_732539 = args[0];
++ object singlet_127_732532 = args[0];
    
 -closureN_type c_7314874;
 -object e_7314928 [4];
@@ -64419,54 +64683,54 @@ Make let-values be the same as let*-values, to work around
 -c_7314874.elements[1] = ((closureN)self_7313037)->elements[1];
 -c_7314874.elements[2] = ((closureN)self_7313037)->elements[2];
 -c_7314874.elements[3] = singlet_127_732879;
-+closureN_type c_7313581;
-+object e_7313635 [4];
-+c_7313581.hdr.mark = gc_color_red;
-+ c_7313581.hdr.grayed = 0;
-+c_7313581.tag = closureN_tag;
-+ c_7313581.fn = (function_type)__lambda_77;
-+c_7313581.num_args = 1;
-+c_7313581.num_elements = 4;
-+c_7313581.elements = (object *)e_7313635;
-+c_7313581.elements[0] = ((closureN)self_7311791)->elements[0];
-+c_7313581.elements[1] = ((closureN)self_7311791)->elements[1];
-+c_7313581.elements[2] = ((closureN)self_7311791)->elements[2];
-+c_7313581.elements[3] = singlet_127_732539;
++closureN_type c_7313574;
++object e_7313628 [4];
++c_7313574.hdr.mark = gc_color_red;
++ c_7313574.hdr.grayed = 0;
++c_7313574.tag = closureN_tag;
++ c_7313574.fn = (function_type)__lambda_77;
++c_7313574.num_args = 1;
++c_7313574.num_elements = 4;
++c_7313574.elements = (object *)e_7313628;
++c_7313574.elements[0] = ((closureN)self_7311784)->elements[0];
++c_7313574.elements[1] = ((closureN)self_7311784)->elements[1];
++c_7313574.elements[2] = ((closureN)self_7311784)->elements[2];
++c_7313574.elements[3] = singlet_127_732532;
  
  
 -mmacro(c_7314929, (function_type)__lambda_83);c_7314929.num_args = 1;
 -return_direct_with_clo1(data,(closure)&c_7314874,__lambda_77,  &c_7314929);; 
-+mmacro(c_7313636, (function_type)__lambda_83);c_7313636.num_args = 1;
-+return_direct_with_clo1(data,(closure)&c_7313581,__lambda_77,  &c_7313636);; 
++mmacro(c_7313629, (function_type)__lambda_83);c_7313629.num_args = 1;
++return_direct_with_clo1(data,(closure)&c_7313574,__lambda_77,  &c_7313629);; 
  }
  
 -static void __lambda_83(void *data, object self_7313038, int argc, object *args) /* object self_7313038, object k_734294, object l_7376_732882 */
-+static void __lambda_83(void *data, object self_7311792, int argc, object *args) /* object self_7311792, object k_733849, object l_7376_732542 */
++static void __lambda_83(void *data, object self_7311785, int argc, object *args) /* object self_7311785, object k_733842, object l_7376_732535 */
   {
 - object k_734294 = args[0]; object l_7376_732882 = args[1];
 -    complex_num_type local_7314932; 
-+ object k_733849 = args[0]; object l_7376_732542 = args[1];
-+    complex_num_type local_7313639; 
++ object k_733842 = args[0]; object l_7376_732535 = args[1];
++    complex_num_type local_7313632; 
  if( (boolean_f != ((inline_function_type)
 -                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7314932, l_7376_732882)) ){ 
-+                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7313639, l_7376_732542)) ){ 
++                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7313632, l_7376_732535)) ){ 
    
  
  
  
 -return_direct_with_clo1(data,  k_734294, (((closure)  k_734294)->fn),  Cyc_num_fast_eq_op(data, Cyc_length(data, l_7376_732882), obj_int2obj(1)));
-+return_direct_with_clo1(data,  k_733849, (((closure)  k_733849)->fn),  Cyc_num_fast_eq_op(data, Cyc_length(data, l_7376_732542), obj_int2obj(1)));
++return_direct_with_clo1(data,  k_733842, (((closure)  k_733842)->fn),  Cyc_num_fast_eq_op(data, Cyc_length(data, l_7376_732535), obj_int2obj(1)));
  } else { 
 -  return_direct_with_clo1(data,  k_734294, (((closure)  k_734294)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_733849, (((closure)  k_733849)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_733842, (((closure)  k_733842)->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_77(void *data, object self_7313039, int argc, object *args) /* object self_7313039, object r_734293 */
-+static void __lambda_77(void *data, object self_7311793, int argc, object *args) /* object self_7311793, object r_733848 */
++static void __lambda_77(void *data, object self_7311786, int argc, object *args) /* object self_7311786, object r_733841 */
   {
 - object r_734293 = args[0];
-+ object r_733848 = args[0];
++ object r_733841 = args[0];
    
 -closureN_type c_7314876;
 -object e_7314924 [4];
@@ -64481,28 +64745,28 @@ Make let-values be the same as let*-values, to work around
 -c_7314876.elements[1] = ((closureN)self_7313039)->elements[1];
 -c_7314876.elements[2] = ((closureN)self_7313039)->elements[2];
 -c_7314876.elements[3] = ((closureN)self_7313039)->elements[3];
-+closureN_type c_7313583;
-+object e_7313631 [4];
-+c_7313583.hdr.mark = gc_color_red;
-+ c_7313583.hdr.grayed = 0;
-+c_7313583.tag = closureN_tag;
-+ c_7313583.fn = (function_type)__lambda_78;
-+c_7313583.num_args = 1;
-+c_7313583.num_elements = 4;
-+c_7313583.elements = (object *)e_7313631;
-+c_7313583.elements[0] = ((closureN)self_7311793)->elements[0];
-+c_7313583.elements[1] = ((closureN)self_7311793)->elements[1];
-+c_7313583.elements[2] = ((closureN)self_7311793)->elements[2];
-+c_7313583.elements[3] = ((closureN)self_7311793)->elements[3];
++closureN_type c_7313576;
++object e_7313624 [4];
++c_7313576.hdr.mark = gc_color_red;
++ c_7313576.hdr.grayed = 0;
++c_7313576.tag = closureN_tag;
++ c_7313576.fn = (function_type)__lambda_78;
++c_7313576.num_args = 1;
++c_7313576.num_elements = 4;
++c_7313576.elements = (object *)e_7313624;
++c_7313576.elements[0] = ((closureN)self_7311786)->elements[0];
++c_7313576.elements[1] = ((closureN)self_7311786)->elements[1];
++c_7313576.elements[2] = ((closureN)self_7311786)->elements[2];
++c_7313576.elements[3] = ((closureN)self_7311786)->elements[3];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7314876,__lambda_78,  Cyc_set_cell(data, ((closureN)self_7313039)->elements[3], r_734293));; 
-+return_direct_with_clo1(data,(closure)&c_7313583,__lambda_78,  Cyc_set_cell(data, ((closureN)self_7311793)->elements[3], r_733848));; 
++return_direct_with_clo1(data,(closure)&c_7313576,__lambda_78,  Cyc_set_cell(data, ((closureN)self_7311786)->elements[3], r_733841));; 
  }
  
 -static void __lambda_78(void *data, object self_7313040, int argc, object *args) /* object self_7313040, object r_734281 */
-+static void __lambda_78(void *data, object self_7311794, int argc, object *args) /* object self_7311794, object r_733836 */
++static void __lambda_78(void *data, object self_7311787, int argc, object *args) /* object self_7311787, object r_733829 */
   {
  
    
@@ -64518,18 +64782,18 @@ Make let-values be the same as let*-values, to work around
 -c_7314878.elements[0] = ((closureN)self_7313040)->elements[0];
 -c_7314878.elements[1] = ((closureN)self_7313040)->elements[1];
 -c_7314878.elements[2] = ((closureN)self_7313040)->elements[2];
-+closureN_type c_7313585;
-+object e_7313600 [3];
-+c_7313585.hdr.mark = gc_color_red;
-+ c_7313585.hdr.grayed = 0;
-+c_7313585.tag = closureN_tag;
-+ c_7313585.fn = (function_type)__lambda_79;
-+c_7313585.num_args = 1;
-+c_7313585.num_elements = 3;
-+c_7313585.elements = (object *)e_7313600;
-+c_7313585.elements[0] = ((closureN)self_7311794)->elements[0];
-+c_7313585.elements[1] = ((closureN)self_7311794)->elements[1];
-+c_7313585.elements[2] = ((closureN)self_7311794)->elements[2];
++closureN_type c_7313578;
++object e_7313593 [3];
++c_7313578.hdr.mark = gc_color_red;
++ c_7313578.hdr.grayed = 0;
++c_7313578.tag = closureN_tag;
++ c_7313578.fn = (function_type)__lambda_79;
++c_7313578.num_args = 1;
++c_7313578.num_elements = 3;
++c_7313578.elements = (object *)e_7313593;
++c_7313578.elements[0] = ((closureN)self_7311787)->elements[0];
++c_7313578.elements[1] = ((closureN)self_7311787)->elements[1];
++c_7313578.elements[2] = ((closureN)self_7311787)->elements[2];
  
  
 -closureN_type c_7314894;
@@ -64542,26 +64806,26 @@ Make let-values be the same as let*-values, to work around
 -c_7314894.num_elements = 1;
 -c_7314894.elements = (object *)e_7314923;
 -c_7314894.elements[0] = ((closureN)self_7313040)->elements[3];
-+closureN_type c_7313601;
-+object e_7313630 [1];
-+c_7313601.hdr.mark = gc_color_red;
-+ c_7313601.hdr.grayed = 0;
-+c_7313601.tag = closureN_tag;
-+ c_7313601.fn = (function_type)__lambda_81;
-+c_7313601.num_args = 1;
-+c_7313601.num_elements = 1;
-+c_7313601.elements = (object *)e_7313630;
-+c_7313601.elements[0] = ((closureN)self_7311794)->elements[3];
++closureN_type c_7313594;
++object e_7313623 [1];
++c_7313594.hdr.mark = gc_color_red;
++ c_7313594.hdr.grayed = 0;
++c_7313594.tag = closureN_tag;
++ c_7313594.fn = (function_type)__lambda_81;
++c_7313594.num_args = 1;
++c_7313594.num_elements = 1;
++c_7313594.elements = (object *)e_7313623;
++c_7313594.elements[0] = ((closureN)self_7311787)->elements[3];
  
 -return_direct_with_clo1(data,(closure)&c_7314878,__lambda_79,  &c_7314894);; 
-+return_direct_with_clo1(data,(closure)&c_7313585,__lambda_79,  &c_7313601);; 
++return_direct_with_clo1(data,(closure)&c_7313578,__lambda_79,  &c_7313594);; 
  }
  
 -static void __lambda_81(void *data, object self_7313041, int argc, object *args) /* object self_7313041, object k_734285, object exps_7378_732883 */
-+static void __lambda_81(void *data, object self_7311795, int argc, object *args) /* object self_7311795, object k_733840, object exps_7378_732543 */
++static void __lambda_81(void *data, object self_7311788, int argc, object *args) /* object self_7311788, object k_733833, object exps_7378_732536 */
   {
 - object k_734285 = args[0]; object exps_7378_732883 = args[1];
-+ object k_733840 = args[0]; object exps_7378_732543 = args[1];
++ object k_733833 = args[0]; object exps_7378_732536 = args[1];
    
  
  
@@ -64576,60 +64840,60 @@ Make let-values be the same as let*-values, to work around
 -c_7314899.elements = (object *)e_7314922;
 -c_7314899.elements[0] = exps_7378_732883;
 -c_7314899.elements[1] = k_734285;
-+closureN_type c_7313606;
-+object e_7313629 [2];
-+c_7313606.hdr.mark = gc_color_red;
-+ c_7313606.hdr.grayed = 0;
-+c_7313606.tag = closureN_tag;
-+ c_7313606.fn = (function_type)__lambda_82;
-+c_7313606.num_args = 1;
-+c_7313606.num_elements = 2;
-+c_7313606.elements = (object *)e_7313629;
-+c_7313606.elements[0] = exps_7378_732543;
-+c_7313606.elements[1] = k_733840;
++closureN_type c_7313599;
++object e_7313622 [2];
++c_7313599.hdr.mark = gc_color_red;
++ c_7313599.hdr.grayed = 0;
++c_7313599.tag = closureN_tag;
++ c_7313599.fn = (function_type)__lambda_82;
++c_7313599.num_args = 1;
++c_7313599.num_elements = 2;
++c_7313599.elements = (object *)e_7313622;
++c_7313599.elements[0] = exps_7378_732536;
++c_7313599.elements[1] = k_733833;
  
 -return_closcall2(data,  car(((closureN)self_7313041)->elements[0]),  &c_7314899, exps_7378_732883);; 
-+return_closcall2(data,  car(((closureN)self_7311795)->elements[0]),  &c_7313606, exps_7378_732543);; 
++return_closcall2(data,  car(((closureN)self_7311788)->elements[0]),  &c_7313599, exps_7378_732536);; 
  }
  
 -static void __lambda_82(void *data, object self_7313042, int argc, object *args) /* object self_7313042, object r_734286 */
-+static void __lambda_82(void *data, object self_7311796, int argc, object *args) /* object self_7311796, object r_733841 */
++static void __lambda_82(void *data, object self_7311789, int argc, object *args) /* object self_7311789, object r_733834 */
   {
 - object r_734286 = args[0];
 -  if( (boolean_f != r_734286) ){ 
-+ object r_733841 = args[0];
-+  if( (boolean_f != r_733841) ){ 
++ object r_733834 = args[0];
++  if( (boolean_f != r_733834) ){ 
    
  
 -return_direct_with_clo1(data,  ((closureN)self_7313042)->elements[1], (((closure)  ((closureN)self_7313042)->elements[1])->fn),  Cyc_car(data, ((closureN)self_7313042)->elements[0]));
-+return_direct_with_clo1(data,  ((closureN)self_7311796)->elements[1], (((closure)  ((closureN)self_7311796)->elements[1])->fn),  Cyc_car(data, ((closureN)self_7311796)->elements[0]));
++return_direct_with_clo1(data,  ((closureN)self_7311789)->elements[1], (((closure)  ((closureN)self_7311789)->elements[1])->fn),  Cyc_car(data, ((closureN)self_7311789)->elements[0]));
  } else { 
      
 -if( (boolean_f != Cyc_is_pair(((closureN)self_7313042)->elements[0])) ){ 
-+if( (boolean_f != Cyc_is_pair(((closureN)self_7311796)->elements[0])) ){ 
++if( (boolean_f != Cyc_is_pair(((closureN)self_7311789)->elements[0])) ){ 
    
 -pair_type local_7314912; 
-+pair_type local_7313619; 
++pair_type local_7313612; 
  
 -pair_type local_7314915; 
-+pair_type local_7313622; 
++pair_type local_7313615; 
  
 -pair_type local_7314918; 
 -return_direct_with_clo1(data,  ((closureN)self_7313042)->elements[1], (((closure)  ((closureN)self_7313042)->elements[1])->fn),  set_pair_as_expr(&local_7314912, set_pair_as_expr(&local_7314915, quote_lambda, set_pair_as_expr(&local_7314918, NULL, ((closureN)self_7313042)->elements[0])), NULL));
-+pair_type local_7313625; 
-+return_direct_with_clo1(data,  ((closureN)self_7311796)->elements[1], (((closure)  ((closureN)self_7311796)->elements[1])->fn),  set_pair_as_expr(&local_7313619, set_pair_as_expr(&local_7313622, quote_lambda, set_pair_as_expr(&local_7313625, NULL, ((closureN)self_7311796)->elements[0])), NULL));
++pair_type local_7313618; 
++return_direct_with_clo1(data,  ((closureN)self_7311789)->elements[1], (((closure)  ((closureN)self_7311789)->elements[1])->fn),  set_pair_as_expr(&local_7313612, set_pair_as_expr(&local_7313615, quote_lambda, set_pair_as_expr(&local_7313618, NULL, ((closureN)self_7311789)->elements[0])), NULL));
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7313042)->elements[1], (((closure)  ((closureN)self_7313042)->elements[1])->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  ((closureN)self_7311796)->elements[1], (((closure)  ((closureN)self_7311796)->elements[1])->fn),  boolean_f);}
++  return_direct_with_clo1(data,  ((closureN)self_7311789)->elements[1], (((closure)  ((closureN)self_7311789)->elements[1])->fn),  boolean_f);}
  ;}
  ;; 
  }
  
 -static void __lambda_79(void *data, object self_7313043, int argc, object *args) /* object self_7313043, object r_734284 */
-+static void __lambda_79(void *data, object self_7311797, int argc, object *args) /* object self_7311797, object r_733839 */
++static void __lambda_79(void *data, object self_7311790, int argc, object *args) /* object self_7311790, object r_733832 */
   {
 - object r_734284 = args[0];
-+ object r_733839 = args[0];
++ object r_733832 = args[0];
    
 -closureN_type c_7314880;
 -object e_7314889 [3];
@@ -64643,27 +64907,27 @@ Make let-values be the same as let*-values, to work around
 -c_7314880.elements[0] = ((closureN)self_7313043)->elements[0];
 -c_7314880.elements[1] = ((closureN)self_7313043)->elements[1];
 -c_7314880.elements[2] = ((closureN)self_7313043)->elements[2];
-+closureN_type c_7313587;
-+object e_7313596 [3];
-+c_7313587.hdr.mark = gc_color_red;
-+ c_7313587.hdr.grayed = 0;
-+c_7313587.tag = closureN_tag;
-+ c_7313587.fn = (function_type)__lambda_80;
-+c_7313587.num_args = 1;
-+c_7313587.num_elements = 3;
-+c_7313587.elements = (object *)e_7313596;
-+c_7313587.elements[0] = ((closureN)self_7311797)->elements[0];
-+c_7313587.elements[1] = ((closureN)self_7311797)->elements[1];
-+c_7313587.elements[2] = ((closureN)self_7311797)->elements[2];
++closureN_type c_7313580;
++object e_7313589 [3];
++c_7313580.hdr.mark = gc_color_red;
++ c_7313580.hdr.grayed = 0;
++c_7313580.tag = closureN_tag;
++ c_7313580.fn = (function_type)__lambda_80;
++c_7313580.num_args = 1;
++c_7313580.num_elements = 3;
++c_7313580.elements = (object *)e_7313589;
++c_7313580.elements[0] = ((closureN)self_7311790)->elements[0];
++c_7313580.elements[1] = ((closureN)self_7311790)->elements[1];
++c_7313580.elements[2] = ((closureN)self_7311790)->elements[2];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7314880,__lambda_80,  Cyc_set_cell(data, ((closureN)self_7313043)->elements[0], r_734284));; 
-+return_direct_with_clo1(data,(closure)&c_7313587,__lambda_80,  Cyc_set_cell(data, ((closureN)self_7311797)->elements[0], r_733839));; 
++return_direct_with_clo1(data,(closure)&c_7313580,__lambda_80,  Cyc_set_cell(data, ((closureN)self_7311790)->elements[0], r_733832));; 
  }
  
 -static void __lambda_80(void *data, object self_7313044, int argc, object *args) /* object self_7313044, object r_734282 */
-+static void __lambda_80(void *data, object self_7311798, int argc, object *args) /* object self_7311798, object r_733837 */
++static void __lambda_80(void *data, object self_7311791, int argc, object *args) /* object self_7311791, object r_733830 */
   {
  
    
@@ -64671,16 +64935,15 @@ Make let-values be the same as let*-values, to work around
  
  
 -return_closcall2(data,  car(((closureN)self_7313044)->elements[0]),  ((closureN)self_7313044)->elements[2], Cyc_cdr(data, ((closureN)self_7313044)->elements[1]));; 
-+return_closcall2(data,  car(((closureN)self_7311798)->elements[0]),  ((closureN)self_7311798)->elements[2], Cyc_cdr(data, ((closureN)self_7311798)->elements[1]));; 
++return_closcall2(data,  car(((closureN)self_7311791)->elements[0]),  ((closureN)self_7311791)->elements[2], Cyc_cdr(data, ((closureN)self_7311791)->elements[1]));; 
  }
  
 -static void __lambda_58(void *data, object _, int argc, object *args) /* closure _,object k_734249, object exp_7346_732860, object rename_7347_732861, object compare_7348_732862 */
-+static void __lambda_58(void *data, object _, int argc, object *args) /* closure _,object k_733804, object exp_7346_732520, object rename_7347_732521, object compare_7348_732522 */
++static void __lambda_58(void *data, object _, int argc, object *args) /* closure _,object k_733797, object exp_7346_732513, object rename_7347_732514, object compare_7348_732515 */
   {
 -object k_734249 = args[0]; object exp_7346_732860 = args[1];
--  Cyc_st_add(data, "scheme/base.sld:letrec");
-+object k_733804 = args[0]; object exp_7346_732520 = args[1];
-+  Cyc_st_add(data, "base.sld:letrec");
++object k_733797 = args[0]; object exp_7346_732513 = args[1];
+   Cyc_st_add(data, "scheme/base.sld:letrec");
  
 -closureN_type c_7314774;
 -object e_7314777 [1];
@@ -64692,16 +64955,16 @@ Make let-values be the same as let*-values, to work around
 -c_7314774.num_elements = 1;
 -c_7314774.elements = (object *)e_7314777;
 -c_7314774.elements[0] = k_734249;
-+closureN_type c_7313481;
-+object e_7313484 [1];
-+c_7313481.hdr.mark = gc_color_red;
-+ c_7313481.hdr.grayed = 0;
-+c_7313481.tag = closureN_tag;
-+ c_7313481.fn = (function_type)__lambda_59;
-+c_7313481.num_args = 1;
-+c_7313481.num_elements = 1;
-+c_7313481.elements = (object *)e_7313484;
-+c_7313481.elements[0] = k_733804;
++closureN_type c_7313474;
++object e_7313477 [1];
++c_7313474.hdr.mark = gc_color_red;
++ c_7313474.hdr.grayed = 0;
++c_7313474.tag = closureN_tag;
++ c_7313474.fn = (function_type)__lambda_59;
++c_7313474.num_args = 1;
++c_7313474.num_elements = 1;
++c_7313474.elements = (object *)e_7313477;
++c_7313474.elements[0] = k_733797;
  
  
 -closureN_type c_7314778;
@@ -64714,26 +64977,26 @@ Make let-values be the same as let*-values, to work around
 -c_7314778.num_elements = 1;
 -c_7314778.elements = (object *)e_7314865;
 -c_7314778.elements[0] = exp_7346_732860;
-+closureN_type c_7313485;
-+object e_7313572 [1];
-+c_7313485.hdr.mark = gc_color_red;
-+ c_7313485.hdr.grayed = 0;
-+c_7313485.tag = closureN_tag;
-+ c_7313485.fn = (function_type)__lambda_60;
-+c_7313485.num_args = 1;
-+c_7313485.num_elements = 1;
-+c_7313485.elements = (object *)e_7313572;
-+c_7313485.elements[0] = exp_7346_732520;
++closureN_type c_7313478;
++object e_7313565 [1];
++c_7313478.hdr.mark = gc_color_red;
++ c_7313478.hdr.grayed = 0;
++c_7313478.tag = closureN_tag;
++ c_7313478.fn = (function_type)__lambda_60;
++c_7313478.num_args = 1;
++c_7313478.num_elements = 1;
++c_7313478.elements = (object *)e_7313565;
++c_7313478.elements[0] = exp_7346_732513;
  
 -return_direct_with_clo1(data,(closure)&c_7314774,__lambda_59,  &c_7314778);; 
-+return_direct_with_clo1(data,(closure)&c_7313481,__lambda_59,  &c_7313485);; 
++return_direct_with_clo1(data,(closure)&c_7313474,__lambda_59,  &c_7313478);; 
  }
  
 -static void __lambda_60(void *data, object self_7313019, int argc, object *args) /* object self_7313019, object k_734251, object k_7349_732863 */
-+static void __lambda_60(void *data, object self_7311773, int argc, object *args) /* object self_7311773, object k_733806, object k_7349_732523 */
++static void __lambda_60(void *data, object self_7311766, int argc, object *args) /* object self_7311766, object k_733799, object k_7349_732516 */
   {
 - object k_734251 = args[0]; object k_7349_732863 = args[1];
-+ object k_733806 = args[0]; object k_7349_732523 = args[1];
++ object k_733799 = args[0]; object k_7349_732516 = args[1];
    
 -closureN_type c_7314780;
 -object e_7314853 [2];
@@ -64746,17 +65009,17 @@ Make let-values be the same as let*-values, to work around
 -c_7314780.elements = (object *)e_7314853;
 -c_7314780.elements[0] = ((closureN)self_7313019)->elements[0];
 -c_7314780.elements[1] = k_734251;
-+closureN_type c_7313487;
-+object e_7313560 [2];
-+c_7313487.hdr.mark = gc_color_red;
-+ c_7313487.hdr.grayed = 0;
-+c_7313487.tag = closureN_tag;
-+ c_7313487.fn = (function_type)__lambda_61;
-+c_7313487.num_args = 1;
-+c_7313487.num_elements = 2;
-+c_7313487.elements = (object *)e_7313560;
-+c_7313487.elements[0] = ((closureN)self_7311773)->elements[0];
-+c_7313487.elements[1] = k_733806;
++closureN_type c_7313480;
++object e_7313553 [2];
++c_7313480.hdr.mark = gc_color_red;
++ c_7313480.hdr.grayed = 0;
++c_7313480.tag = closureN_tag;
++ c_7313480.fn = (function_type)__lambda_61;
++c_7313480.num_args = 1;
++c_7313480.num_elements = 2;
++c_7313480.elements = (object *)e_7313553;
++c_7313480.elements[0] = ((closureN)self_7311766)->elements[0];
++c_7313480.elements[1] = k_733799;
  
  
 -closureN_type c_7314854;
@@ -64770,27 +65033,27 @@ Make let-values be the same as let*-values, to work around
 -c_7314854.elements = (object *)e_7314864;
 -c_7314854.elements[0] = ((closureN)self_7313019)->elements[0];
 -c_7314854.elements[1] = k_7349_732863;
-+closureN_type c_7313561;
-+object e_7313571 [2];
-+c_7313561.hdr.mark = gc_color_red;
-+ c_7313561.hdr.grayed = 0;
-+c_7313561.tag = closureN_tag;
-+ c_7313561.fn = (function_type)__lambda_73;
-+c_7313561.num_args = 1;
-+c_7313561.num_elements = 2;
-+c_7313561.elements = (object *)e_7313571;
-+c_7313561.elements[0] = ((closureN)self_7311773)->elements[0];
-+c_7313561.elements[1] = k_7349_732523;
++closureN_type c_7313554;
++object e_7313564 [2];
++c_7313554.hdr.mark = gc_color_red;
++ c_7313554.hdr.grayed = 0;
++c_7313554.tag = closureN_tag;
++ c_7313554.fn = (function_type)__lambda_73;
++c_7313554.num_args = 1;
++c_7313554.num_elements = 2;
++c_7313554.elements = (object *)e_7313564;
++c_7313554.elements[0] = ((closureN)self_7311766)->elements[0];
++c_7313554.elements[1] = k_7349_732516;
  
 -return_direct_with_clo1(data,(closure)&c_7314780,__lambda_61,  &c_7314854);; 
-+return_direct_with_clo1(data,(closure)&c_7313487,__lambda_61,  &c_7313561);; 
++return_direct_with_clo1(data,(closure)&c_7313480,__lambda_61,  &c_7313554);; 
  }
  
 -static void __lambda_73(void *data, object self_7313020, int argc, object *args) /* object self_7313020, object k_734276, object obj_7350_732864 */
-+static void __lambda_73(void *data, object self_7311774, int argc, object *args) /* object self_7311774, object k_733831, object obj_7350_732524 */
++static void __lambda_73(void *data, object self_7311767, int argc, object *args) /* object self_7311767, object k_733824, object obj_7350_732517 */
   {
 - object k_734276 = args[0];
-+ object k_733831 = args[0];
++ object k_733824 = args[0];
    
 -closureN_type c_7314857;
 -object e_7314861 [2];
@@ -64803,39 +65066,39 @@ Make let-values be the same as let*-values, to work around
 -c_7314857.elements = (object *)e_7314861;
 -c_7314857.elements[0] = k_734276;
 -c_7314857.elements[1] = ((closureN)self_7313020)->elements[1];
-+closureN_type c_7313564;
-+object e_7313568 [2];
-+c_7313564.hdr.mark = gc_color_red;
-+ c_7313564.hdr.grayed = 0;
-+c_7313564.tag = closureN_tag;
-+ c_7313564.fn = (function_type)__lambda_74;
-+c_7313564.num_args = 1;
-+c_7313564.num_elements = 2;
-+c_7313564.elements = (object *)e_7313568;
-+c_7313564.elements[0] = k_733831;
-+c_7313564.elements[1] = ((closureN)self_7311774)->elements[1];
++closureN_type c_7313557;
++object e_7313561 [2];
++c_7313557.hdr.mark = gc_color_red;
++ c_7313557.hdr.grayed = 0;
++c_7313557.tag = closureN_tag;
++ c_7313557.fn = (function_type)__lambda_74;
++c_7313557.num_args = 1;
++c_7313557.num_elements = 2;
++c_7313557.elements = (object *)e_7313561;
++c_7313557.elements[0] = k_733824;
++c_7313557.elements[1] = ((closureN)self_7311767)->elements[1];
  
  
 -make_utf8_string_with_len(c_7314862, "unable to expand letrec", 23, 23);
 -return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_7314857, &c_7314862, ((closureN)self_7313020)->elements[0]);;; 
-+make_utf8_string_with_len(c_7313569, "unable to expand letrec", 23, 23);
-+return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_7313564, &c_7313569, ((closureN)self_7311774)->elements[0]);;; 
++make_utf8_string_with_len(c_7313562, "unable to expand letrec", 23, 23);
++return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  &c_7313557, &c_7313562, ((closureN)self_7311767)->elements[0]);;; 
  }
  
 -static void __lambda_74(void *data, object self_7313021, int argc, object *args) /* object self_7313021, object r_734277 */
-+static void __lambda_74(void *data, object self_7311775, int argc, object *args) /* object self_7311775, object r_733832 */
++static void __lambda_74(void *data, object self_7311768, int argc, object *args) /* object self_7311768, object r_733825 */
   {
 - object r_734277 = args[0];
 -  return_closcall2(data,  ((closureN)self_7313021)->elements[1],  ((closureN)self_7313021)->elements[0], r_734277);; 
-+ object r_733832 = args[0];
-+  return_closcall2(data,  ((closureN)self_7311775)->elements[1],  ((closureN)self_7311775)->elements[0], r_733832);; 
++ object r_733825 = args[0];
++  return_closcall2(data,  ((closureN)self_7311768)->elements[1],  ((closureN)self_7311768)->elements[0], r_733825);; 
  }
  
 -static void __lambda_61(void *data, object self_7313022, int argc, object *args) /* object self_7313022, object r_734252 */
-+static void __lambda_61(void *data, object self_7311776, int argc, object *args) /* object self_7311776, object r_733807 */
++static void __lambda_61(void *data, object self_7311769, int argc, object *args) /* object self_7311769, object r_733800 */
   {
 - object r_734252 = args[0];
-+ object r_733807 = args[0];
++ object r_733800 = args[0];
    
 -closureN_type c_7314782;
 -object e_7314786 [2];
@@ -64848,17 +65111,17 @@ Make let-values be the same as let*-values, to work around
 -c_7314782.elements = (object *)e_7314786;
 -c_7314782.elements[0] = ((closureN)self_7313022)->elements[1];
 -c_7314782.elements[1] = r_734252;
-+closureN_type c_7313489;
-+object e_7313493 [2];
-+c_7313489.hdr.mark = gc_color_red;
-+ c_7313489.hdr.grayed = 0;
-+c_7313489.tag = closureN_tag;
-+ c_7313489.fn = (function_type)__lambda_62;
-+c_7313489.num_args = 1;
-+c_7313489.num_elements = 2;
-+c_7313489.elements = (object *)e_7313493;
-+c_7313489.elements[0] = ((closureN)self_7311776)->elements[1];
-+c_7313489.elements[1] = r_733807;
++closureN_type c_7313482;
++object e_7313486 [2];
++c_7313482.hdr.mark = gc_color_red;
++ c_7313482.hdr.grayed = 0;
++c_7313482.tag = closureN_tag;
++ c_7313482.fn = (function_type)__lambda_62;
++c_7313482.num_args = 1;
++c_7313482.num_elements = 2;
++c_7313482.elements = (object *)e_7313486;
++c_7313482.elements[0] = ((closureN)self_7311769)->elements[1];
++c_7313482.elements[1] = r_733800;
  
  
 -closureN_type c_7314787;
@@ -64871,26 +65134,26 @@ Make let-values be the same as let*-values, to work around
 -c_7314787.num_elements = 1;
 -c_7314787.elements = (object *)e_7314852;
 -c_7314787.elements[0] = ((closureN)self_7313022)->elements[0];
-+closureN_type c_7313494;
-+object e_7313559 [1];
-+c_7313494.hdr.mark = gc_color_red;
-+ c_7313494.hdr.grayed = 0;
-+c_7313494.tag = closureN_tag;
-+ c_7313494.fn = (function_type)__lambda_63;
-+c_7313494.num_args = 0;
-+c_7313494.num_elements = 1;
-+c_7313494.elements = (object *)e_7313559;
-+c_7313494.elements[0] = ((closureN)self_7311776)->elements[0];
++closureN_type c_7313487;
++object e_7313552 [1];
++c_7313487.hdr.mark = gc_color_red;
++ c_7313487.hdr.grayed = 0;
++c_7313487.tag = closureN_tag;
++ c_7313487.fn = (function_type)__lambda_63;
++c_7313487.num_args = 0;
++c_7313487.num_elements = 1;
++c_7313487.elements = (object *)e_7313552;
++c_7313487.elements[0] = ((closureN)self_7311769)->elements[0];
  
 -return_direct_with_clo1(data,(closure)&c_7314782,__lambda_62,  &c_7314787);; 
-+return_direct_with_clo1(data,(closure)&c_7313489,__lambda_62,  &c_7313494);; 
++return_direct_with_clo1(data,(closure)&c_7313482,__lambda_62,  &c_7313487);; 
  }
  
 -static void __lambda_63(void *data, object self_7313023, int argc, object *args) /* object self_7313023, object k_734254 */
-+static void __lambda_63(void *data, object self_7311777, int argc, object *args) /* object self_7311777, object k_733809 */
++static void __lambda_63(void *data, object self_7311770, int argc, object *args) /* object self_7311770, object k_733802 */
   {
 - object k_734254 = args[0];
-+ object k_733809 = args[0];
++ object k_733802 = args[0];
    
 -closureN_type c_7314789;
 -object e_7314844 [2];
@@ -64903,44 +65166,44 @@ Make let-values be the same as let*-values, to work around
 -c_7314789.elements = (object *)e_7314844;
 -c_7314789.elements[0] = ((closureN)self_7313023)->elements[0];
 -c_7314789.elements[1] = k_734254;
-+closureN_type c_7313496;
-+object e_7313551 [2];
-+c_7313496.hdr.mark = gc_color_red;
-+ c_7313496.hdr.grayed = 0;
-+c_7313496.tag = closureN_tag;
-+ c_7313496.fn = (function_type)__lambda_64;
-+c_7313496.num_args = 1;
-+c_7313496.num_elements = 2;
-+c_7313496.elements = (object *)e_7313551;
-+c_7313496.elements[0] = ((closureN)self_7311777)->elements[0];
-+c_7313496.elements[1] = k_733809;
++closureN_type c_7313489;
++object e_7313544 [2];
++c_7313489.hdr.mark = gc_color_red;
++ c_7313489.hdr.grayed = 0;
++c_7313489.tag = closureN_tag;
++ c_7313489.fn = (function_type)__lambda_64;
++c_7313489.num_args = 1;
++c_7313489.num_elements = 2;
++c_7313489.elements = (object *)e_7313544;
++c_7313489.elements[0] = ((closureN)self_7311770)->elements[0];
++c_7313489.elements[1] = k_733802;
  
  
 -mmacro(c_7314845, (function_type)__lambda_72);c_7314845.num_args = 1;
 -return_direct_with_clo1(data,(closure)&c_7314789,__lambda_64,  &c_7314845);; 
-+mmacro(c_7313552, (function_type)__lambda_72);c_7313552.num_args = 1;
-+return_direct_with_clo1(data,(closure)&c_7313496,__lambda_64,  &c_7313552);; 
++mmacro(c_7313545, (function_type)__lambda_72);c_7313545.num_args = 1;
++return_direct_with_clo1(data,(closure)&c_7313489,__lambda_64,  &c_7313545);; 
  }
  
 -static void __lambda_72(void *data, object self_7313024, int argc, object *args) /* object self_7313024, object k_734274, object b_7372_732872 */
-+static void __lambda_72(void *data, object self_7311778, int argc, object *args) /* object self_7311778, object k_733829, object b_7372_732532 */
++static void __lambda_72(void *data, object self_7311771, int argc, object *args) /* object self_7311771, object k_733822, object b_7372_732525 */
   {
 - object k_734274 = args[0]; object b_7372_732872 = args[1];
-+ object k_733829 = args[0]; object b_7372_732532 = args[1];
++ object k_733822 = args[0]; object b_7372_732525 = args[1];
    
 -list_2_type local_7314849; 
-+list_2_type local_7313556; 
++list_2_type local_7313549; 
  
  
 -return_direct_with_clo1(data,  k_734274, (((closure)  k_734274)->fn),  Cyc_fast_list_2(&local_7314849, Cyc_car(data, b_7372_732872), boolean_f));; 
-+return_direct_with_clo1(data,  k_733829, (((closure)  k_733829)->fn),  Cyc_fast_list_2(&local_7313556, Cyc_car(data, b_7372_732532), boolean_f));; 
++return_direct_with_clo1(data,  k_733822, (((closure)  k_733822)->fn),  Cyc_fast_list_2(&local_7313549, Cyc_car(data, b_7372_732525), boolean_f));; 
  }
  
 -static void __lambda_64(void *data, object self_7313025, int argc, object *args) /* object self_7313025, object r_734273 */
-+static void __lambda_64(void *data, object self_7311779, int argc, object *args) /* object self_7311779, object r_733828 */
++static void __lambda_64(void *data, object self_7311772, int argc, object *args) /* object self_7311772, object r_733821 */
   {
 - object r_734273 = args[0];
-+ object r_733828 = args[0];
++ object r_733821 = args[0];
    
 -closureN_type c_7314791;
 -object e_7314840 [2];
@@ -64953,29 +65216,29 @@ Make let-values be the same as let*-values, to work around
 -c_7314791.elements = (object *)e_7314840;
 -c_7314791.elements[0] = ((closureN)self_7313025)->elements[0];
 -c_7314791.elements[1] = ((closureN)self_7313025)->elements[1];
-+closureN_type c_7313498;
-+object e_7313547 [2];
-+c_7313498.hdr.mark = gc_color_red;
-+ c_7313498.hdr.grayed = 0;
-+c_7313498.tag = closureN_tag;
-+ c_7313498.fn = (function_type)__lambda_65;
-+c_7313498.num_args = 1;
-+c_7313498.num_elements = 2;
-+c_7313498.elements = (object *)e_7313547;
-+c_7313498.elements[0] = ((closureN)self_7311779)->elements[0];
-+c_7313498.elements[1] = ((closureN)self_7311779)->elements[1];
++closureN_type c_7313491;
++object e_7313540 [2];
++c_7313491.hdr.mark = gc_color_red;
++ c_7313491.hdr.grayed = 0;
++c_7313491.tag = closureN_tag;
++ c_7313491.fn = (function_type)__lambda_65;
++c_7313491.num_args = 1;
++c_7313491.num_elements = 2;
++c_7313491.elements = (object *)e_7313540;
++c_7313491.elements[0] = ((closureN)self_7311772)->elements[0];
++c_7313491.elements[1] = ((closureN)self_7311772)->elements[1];
  
  
  
 -return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7314791, r_734273, Cyc_cadr(data, ((closureN)self_7313025)->elements[0]));; 
-+return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7313498, r_733828, Cyc_cadr(data, ((closureN)self_7311779)->elements[0]));; 
++return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7313491, r_733821, Cyc_cadr(data, ((closureN)self_7311772)->elements[0]));; 
  }
  
 -static void __lambda_65(void *data, object self_7313026, int argc, object *args) /* object self_7313026, object namings_7357_732867 */
-+static void __lambda_65(void *data, object self_7311780, int argc, object *args) /* object self_7311780, object namings_7357_732527 */
++static void __lambda_65(void *data, object self_7311773, int argc, object *args) /* object self_7311773, object namings_7357_732520 */
   {
 - object namings_7357_732867 = args[0];
-+ object namings_7357_732527 = args[0];
++ object namings_7357_732520 = args[0];
    
 -closureN_type c_7314793;
 -object e_7314836 [3];
@@ -64989,27 +65252,27 @@ Make let-values be the same as let*-values, to work around
 -c_7314793.elements[0] = ((closureN)self_7313026)->elements[0];
 -c_7314793.elements[1] = ((closureN)self_7313026)->elements[1];
 -c_7314793.elements[2] = namings_7357_732867;
-+closureN_type c_7313500;
-+object e_7313543 [3];
-+c_7313500.hdr.mark = gc_color_red;
-+ c_7313500.hdr.grayed = 0;
-+c_7313500.tag = closureN_tag;
-+ c_7313500.fn = (function_type)__lambda_66;
-+c_7313500.num_args = 1;
-+c_7313500.num_elements = 3;
-+c_7313500.elements = (object *)e_7313543;
-+c_7313500.elements[0] = ((closureN)self_7311780)->elements[0];
-+c_7313500.elements[1] = ((closureN)self_7311780)->elements[1];
-+c_7313500.elements[2] = namings_7357_732527;
++closureN_type c_7313493;
++object e_7313536 [3];
++c_7313493.hdr.mark = gc_color_red;
++ c_7313493.hdr.grayed = 0;
++c_7313493.tag = closureN_tag;
++ c_7313493.fn = (function_type)__lambda_66;
++c_7313493.num_args = 1;
++c_7313493.num_elements = 3;
++c_7313493.elements = (object *)e_7313536;
++c_7313493.elements[0] = ((closureN)self_7311773)->elements[0];
++c_7313493.elements[1] = ((closureN)self_7311773)->elements[1];
++c_7313493.elements[2] = namings_7357_732520;
  
  
  
 -return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7314793, primitive_car, Cyc_cadr(data, ((closureN)self_7313026)->elements[0]));; 
-+return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7313500, primitive_car, Cyc_cadr(data, ((closureN)self_7311780)->elements[0]));; 
++return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7313493, primitive_car, Cyc_cadr(data, ((closureN)self_7311773)->elements[0]));; 
  }
  
 -static void __lambda_66(void *data, object self_7313027, int argc, object *args) /* object self_7313027, object names_7360_732868 */
-+static void __lambda_66(void *data, object self_7311781, int argc, object *args) /* object self_7311781, object names_7360_732528 */
++static void __lambda_66(void *data, object self_7311774, int argc, object *args) /* object self_7311774, object names_7360_732521 */
   {
  
    
@@ -65025,43 +65288,43 @@ Make let-values be the same as let*-values, to work around
 -c_7314795.elements[0] = ((closureN)self_7313027)->elements[0];
 -c_7314795.elements[1] = ((closureN)self_7313027)->elements[1];
 -c_7314795.elements[2] = ((closureN)self_7313027)->elements[2];
-+closureN_type c_7313502;
-+object e_7313537 [3];
-+c_7313502.hdr.mark = gc_color_red;
-+ c_7313502.hdr.grayed = 0;
-+c_7313502.tag = closureN_tag;
-+ c_7313502.fn = (function_type)__lambda_67;
-+c_7313502.num_args = 1;
-+c_7313502.num_elements = 3;
-+c_7313502.elements = (object *)e_7313537;
-+c_7313502.elements[0] = ((closureN)self_7311781)->elements[0];
-+c_7313502.elements[1] = ((closureN)self_7311781)->elements[1];
-+c_7313502.elements[2] = ((closureN)self_7311781)->elements[2];
++closureN_type c_7313495;
++object e_7313530 [3];
++c_7313495.hdr.mark = gc_color_red;
++ c_7313495.hdr.grayed = 0;
++c_7313495.tag = closureN_tag;
++ c_7313495.fn = (function_type)__lambda_67;
++c_7313495.num_args = 1;
++c_7313495.num_elements = 3;
++c_7313495.elements = (object *)e_7313530;
++c_7313495.elements[0] = ((closureN)self_7311774)->elements[0];
++c_7313495.elements[1] = ((closureN)self_7311774)->elements[1];
++c_7313495.elements[2] = ((closureN)self_7311774)->elements[2];
  
  
 -mmacro(c_7314831, (function_type)__lambda_71);c_7314831.num_args = 1;
 -return_direct_with_clo1(data,(closure)&c_7314795,__lambda_67,  &c_7314831);; 
-+mmacro(c_7313538, (function_type)__lambda_71);c_7313538.num_args = 1;
-+return_direct_with_clo1(data,(closure)&c_7313502,__lambda_67,  &c_7313538);; 
++mmacro(c_7313531, (function_type)__lambda_71);c_7313531.num_args = 1;
++return_direct_with_clo1(data,(closure)&c_7313495,__lambda_67,  &c_7313531);; 
  }
  
 -static void __lambda_71(void *data, object self_7313028, int argc, object *args) /* object self_7313028, object k_734270, object binding_7371_732871 */
-+static void __lambda_71(void *data, object self_7311782, int argc, object *args) /* object self_7311782, object k_733825, object binding_7371_732531 */
++static void __lambda_71(void *data, object self_7311775, int argc, object *args) /* object self_7311775, object k_733818, object binding_7371_732524 */
   {
 - object k_734270 = args[0]; object binding_7371_732871 = args[1];
-+ object k_733825 = args[0]; object binding_7371_732531 = args[1];
++ object k_733818 = args[0]; object binding_7371_732524 = args[1];
    
 -pair_type local_7314835; 
 -return_direct_with_clo1(data,  k_734270, (((closure)  k_734270)->fn),  set_pair_as_expr(&local_7314835, quote_set_67, binding_7371_732871));; 
-+pair_type local_7313542; 
-+return_direct_with_clo1(data,  k_733825, (((closure)  k_733825)->fn),  set_pair_as_expr(&local_7313542, quote_set_67, binding_7371_732531));; 
++pair_type local_7313535; 
++return_direct_with_clo1(data,  k_733818, (((closure)  k_733818)->fn),  set_pair_as_expr(&local_7313535, quote_set_67, binding_7371_732524));; 
  }
  
 -static void __lambda_67(void *data, object self_7313029, int argc, object *args) /* object self_7313029, object r_734269 */
-+static void __lambda_67(void *data, object self_7311783, int argc, object *args) /* object self_7311783, object r_733824 */
++static void __lambda_67(void *data, object self_7311776, int argc, object *args) /* object self_7311776, object r_733817 */
   {
 - object r_734269 = args[0];
-+ object r_733824 = args[0];
++ object r_733817 = args[0];
    
 -closureN_type c_7314797;
 -object e_7314826 [3];
@@ -65075,30 +65338,30 @@ Make let-values be the same as let*-values, to work around
 -c_7314797.elements[0] = ((closureN)self_7313029)->elements[0];
 -c_7314797.elements[1] = ((closureN)self_7313029)->elements[1];
 -c_7314797.elements[2] = ((closureN)self_7313029)->elements[2];
-+closureN_type c_7313504;
-+object e_7313533 [3];
-+c_7313504.hdr.mark = gc_color_red;
-+ c_7313504.hdr.grayed = 0;
-+c_7313504.tag = closureN_tag;
-+ c_7313504.fn = (function_type)__lambda_68;
-+c_7313504.num_args = 1;
-+c_7313504.num_elements = 3;
-+c_7313504.elements = (object *)e_7313533;
-+c_7313504.elements[0] = ((closureN)self_7311783)->elements[0];
-+c_7313504.elements[1] = ((closureN)self_7311783)->elements[1];
-+c_7313504.elements[2] = ((closureN)self_7311783)->elements[2];
++closureN_type c_7313497;
++object e_7313526 [3];
++c_7313497.hdr.mark = gc_color_red;
++ c_7313497.hdr.grayed = 0;
++c_7313497.tag = closureN_tag;
++ c_7313497.fn = (function_type)__lambda_68;
++c_7313497.num_args = 1;
++c_7313497.num_elements = 3;
++c_7313497.elements = (object *)e_7313526;
++c_7313497.elements[0] = ((closureN)self_7311776)->elements[0];
++c_7313497.elements[1] = ((closureN)self_7311776)->elements[1];
++c_7313497.elements[2] = ((closureN)self_7311776)->elements[2];
  
  
  
 -return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7314797, r_734269, Cyc_cadr(data, ((closureN)self_7313029)->elements[0]));; 
-+return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7313504, r_733824, Cyc_cadr(data, ((closureN)self_7311783)->elements[0]));; 
++return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7313497, r_733817, Cyc_cadr(data, ((closureN)self_7311776)->elements[0]));; 
  }
  
 -static void __lambda_68(void *data, object self_7313030, int argc, object *args) /* object self_7313030, object sets_7363_732869 */
-+static void __lambda_68(void *data, object self_7311784, int argc, object *args) /* object self_7311784, object sets_7363_732529 */
++static void __lambda_68(void *data, object self_7311777, int argc, object *args) /* object self_7311777, object sets_7363_732522 */
   {
 - object sets_7363_732869 = args[0];
-+ object sets_7363_732529 = args[0];
++ object sets_7363_732522 = args[0];
    
 -closureN_type c_7314799;
 -object e_7314822 [4];
@@ -65113,28 +65376,28 @@ Make let-values be the same as let*-values, to work around
 -c_7314799.elements[1] = ((closureN)self_7313030)->elements[1];
 -c_7314799.elements[2] = ((closureN)self_7313030)->elements[2];
 -c_7314799.elements[3] = sets_7363_732869;
-+closureN_type c_7313506;
-+object e_7313529 [4];
-+c_7313506.hdr.mark = gc_color_red;
-+ c_7313506.hdr.grayed = 0;
-+c_7313506.tag = closureN_tag;
-+ c_7313506.fn = (function_type)__lambda_69;
-+c_7313506.num_args = 1;
-+c_7313506.num_elements = 4;
-+c_7313506.elements = (object *)e_7313529;
-+c_7313506.elements[0] = ((closureN)self_7311784)->elements[0];
-+c_7313506.elements[1] = ((closureN)self_7311784)->elements[1];
-+c_7313506.elements[2] = ((closureN)self_7311784)->elements[2];
-+c_7313506.elements[3] = sets_7363_732529;
++closureN_type c_7313499;
++object e_7313522 [4];
++c_7313499.hdr.mark = gc_color_red;
++ c_7313499.hdr.grayed = 0;
++c_7313499.tag = closureN_tag;
++ c_7313499.fn = (function_type)__lambda_69;
++c_7313499.num_args = 1;
++c_7313499.num_elements = 4;
++c_7313499.elements = (object *)e_7313522;
++c_7313499.elements[0] = ((closureN)self_7311777)->elements[0];
++c_7313499.elements[1] = ((closureN)self_7311777)->elements[1];
++c_7313499.elements[2] = ((closureN)self_7311777)->elements[2];
++c_7313499.elements[3] = sets_7363_732522;
  
  
  
 -return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7314799, primitive_cadr, Cyc_cadr(data, ((closureN)self_7313030)->elements[0]));; 
-+return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7313506, primitive_cadr, Cyc_cadr(data, ((closureN)self_7311784)->elements[0]));; 
++return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7313499, primitive_cadr, Cyc_cadr(data, ((closureN)self_7311777)->elements[0]));; 
  }
  
 -static void __lambda_69(void *data, object self_7313031, int argc, object *args) /* object self_7313031, object args_7366_732870 */
-+static void __lambda_69(void *data, object self_7311785, int argc, object *args) /* object self_7311785, object args_7366_732530 */
++static void __lambda_69(void *data, object self_7311778, int argc, object *args) /* object self_7311778, object args_7366_732523 */
   {
  
    
@@ -65149,70 +65412,69 @@ Make let-values be the same as let*-values, to work around
 -c_7314801.elements = (object *)e_7314817;
 -c_7314801.elements[0] = ((closureN)self_7313031)->elements[1];
 -c_7314801.elements[1] = ((closureN)self_7313031)->elements[2];
-+closureN_type c_7313508;
-+object e_7313524 [2];
-+c_7313508.hdr.mark = gc_color_red;
-+ c_7313508.hdr.grayed = 0;
-+c_7313508.tag = closureN_tag;
-+ c_7313508.fn = (function_type)__lambda_70;
-+c_7313508.num_args = 1;
-+c_7313508.num_elements = 2;
-+c_7313508.elements = (object *)e_7313524;
-+c_7313508.elements[0] = ((closureN)self_7311785)->elements[1];
-+c_7313508.elements[1] = ((closureN)self_7311785)->elements[2];
++closureN_type c_7313501;
++object e_7313517 [2];
++c_7313501.hdr.mark = gc_color_red;
++ c_7313501.hdr.grayed = 0;
++c_7313501.tag = closureN_tag;
++ c_7313501.fn = (function_type)__lambda_70;
++c_7313501.num_args = 1;
++c_7313501.num_elements = 2;
++c_7313501.elements = (object *)e_7313517;
++c_7313501.elements[0] = ((closureN)self_7311778)->elements[1];
++c_7313501.elements[1] = ((closureN)self_7311778)->elements[2];
  
  
  
 -return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7314801, ((closureN)self_7313031)->elements[3], Cyc_cddr(data, ((closureN)self_7313031)->elements[0]));; 
-+return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7313508, ((closureN)self_7311785)->elements[3], Cyc_cddr(data, ((closureN)self_7311785)->elements[0]));; 
++return_direct_with_clo3(data,  __glo_append_scheme_base, (((closure)  __glo_append_scheme_base)->fn),  &c_7313501, ((closureN)self_7311778)->elements[3], Cyc_cddr(data, ((closureN)self_7311778)->elements[0]));; 
  }
  
 -static void __lambda_70(void *data, object self_7313032, int argc, object *args) /* object self_7313032, object r_734266 */
-+static void __lambda_70(void *data, object self_7311786, int argc, object *args) /* object self_7311786, object r_733821 */
++static void __lambda_70(void *data, object self_7311779, int argc, object *args) /* object self_7311779, object r_733814 */
   {
 - object r_734266 = args[0];
-+ object r_733821 = args[0];
++ object r_733814 = args[0];
    
 -pair_type local_7314806; 
-+pair_type local_7313513; 
++pair_type local_7313506; 
  
 -pair_type local_7314809; 
-+pair_type local_7313516; 
++pair_type local_7313509; 
  
 -pair_type local_7314813; 
-+pair_type local_7313520; 
++pair_type local_7313513; 
  
 -pair_type local_7314816; 
 -return_direct_with_clo1(data,  ((closureN)self_7313032)->elements[0], (((closure)  ((closureN)self_7313032)->elements[0])->fn),  set_pair_as_expr(&local_7314806, quote_let, set_pair_as_expr(&local_7314809, ((closureN)self_7313032)->elements[1], set_pair_as_expr(&local_7314813, set_pair_as_expr(&local_7314816, quote_begin, r_734266), NULL))));; 
-+pair_type local_7313523; 
-+return_direct_with_clo1(data,  ((closureN)self_7311786)->elements[0], (((closure)  ((closureN)self_7311786)->elements[0])->fn),  set_pair_as_expr(&local_7313513, quote_let, set_pair_as_expr(&local_7313516, ((closureN)self_7311786)->elements[1], set_pair_as_expr(&local_7313520, set_pair_as_expr(&local_7313523, quote_begin, r_733821), NULL))));; 
++pair_type local_7313516; 
++return_direct_with_clo1(data,  ((closureN)self_7311779)->elements[0], (((closure)  ((closureN)self_7311779)->elements[0])->fn),  set_pair_as_expr(&local_7313506, quote_let, set_pair_as_expr(&local_7313509, ((closureN)self_7311779)->elements[1], set_pair_as_expr(&local_7313513, set_pair_as_expr(&local_7313516, quote_begin, r_733814), NULL))));; 
  }
  
 -static void __lambda_62(void *data, object self_7313033, int argc, object *args) /* object self_7313033, object r_734253 */
-+static void __lambda_62(void *data, object self_7311787, int argc, object *args) /* object self_7311787, object r_733808 */
++static void __lambda_62(void *data, object self_7311780, int argc, object *args) /* object self_7311780, object r_733801 */
   {
 - object r_734253 = args[0];
 -  return_direct_with_clo3(data,  __glo_with_91exception_91handler_scheme_base, (((closure)  __glo_with_91exception_91handler_scheme_base)->fn),  ((closureN)self_7313033)->elements[0], ((closureN)self_7313033)->elements[1], r_734253);; 
-+ object r_733808 = args[0];
-+  return_direct_with_clo3(data,  __glo_with_91exception_91handler_scheme_base, (((closure)  __glo_with_91exception_91handler_scheme_base)->fn),  ((closureN)self_7311787)->elements[0], ((closureN)self_7311787)->elements[1], r_733808);; 
++ object r_733801 = args[0];
++  return_direct_with_clo3(data,  __glo_with_91exception_91handler_scheme_base, (((closure)  __glo_with_91exception_91handler_scheme_base)->fn),  ((closureN)self_7311780)->elements[0], ((closureN)self_7311780)->elements[1], r_733801);; 
  }
  
 -static void __lambda_59(void *data, object self_7313034, int argc, object *args) /* object self_7313034, object r_734250 */
-+static void __lambda_59(void *data, object self_7311788, int argc, object *args) /* object self_7311788, object r_733805 */
++static void __lambda_59(void *data, object self_7311781, int argc, object *args) /* object self_7311781, object r_733798 */
   {
 - object r_734250 = args[0];
 -  return_direct_with_clo2(data,  __glo_call_95cc_scheme_base, (((closure)  __glo_call_95cc_scheme_base)->fn),  ((closureN)self_7313034)->elements[0], r_734250);; 
-+ object r_733805 = args[0];
-+  return_direct_with_clo2(data,  __glo_call_95cc_scheme_base, (((closure)  __glo_call_95cc_scheme_base)->fn),  ((closureN)self_7311788)->elements[0], r_733805);; 
++ object r_733798 = args[0];
++  return_direct_with_clo2(data,  __glo_call_95cc_scheme_base, (((closure)  __glo_call_95cc_scheme_base)->fn),  ((closureN)self_7311781)->elements[0], r_733798);; 
  }
  
 -static void __lambda_43(void *data, object _, int argc, object *args) /* closure _,object k_734204, object expr_7336_732856, object rename_7337_732857, object compare_7338_732858 */
-+static void __lambda_43(void *data, object _, int argc, object *args) /* closure _,object k_733759, object expr_7336_732516, object rename_7337_732517, object compare_7338_732518 */
++static void __lambda_43(void *data, object _, int argc, object *args) /* closure _,object k_733752, object expr_7336_732509, object rename_7337_732510, object compare_7338_732511 */
   {
 -object k_734204 = args[0]; object expr_7336_732856 = args[1]; object rename_7337_732857 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:let*");
-+object k_733759 = args[0]; object expr_7336_732516 = args[1]; object rename_7337_732517 = args[2];
-+  Cyc_st_add(data, "base.sld:let*");
++object k_733752 = args[0]; object expr_7336_732509 = args[1]; object rename_7337_732510 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:let*");
  
 -closureN_type c_7314632;
 -object e_7314647 [1];
@@ -65224,16 +65486,16 @@ Make let-values be the same as let*-values, to work around
 -c_7314632.num_elements = 1;
 -c_7314632.elements = (object *)e_7314647;
 -c_7314632.elements[0] = expr_7336_732856;
-+closureN_type c_7313339;
-+object e_7313354 [1];
-+c_7313339.hdr.mark = gc_color_red;
-+ c_7313339.hdr.grayed = 0;
-+c_7313339.tag = closureN_tag;
-+ c_7313339.fn = (function_type)__lambda_44;
-+c_7313339.num_args = 0;
-+c_7313339.num_elements = 1;
-+c_7313339.elements = (object *)e_7313354;
-+c_7313339.elements[0] = expr_7336_732516;
++closureN_type c_7313332;
++object e_7313347 [1];
++c_7313332.hdr.mark = gc_color_red;
++ c_7313332.hdr.grayed = 0;
++c_7313332.tag = closureN_tag;
++ c_7313332.fn = (function_type)__lambda_44;
++c_7313332.num_args = 0;
++c_7313332.num_elements = 1;
++c_7313332.elements = (object *)e_7313347;
++c_7313332.elements[0] = expr_7336_732509;
  
  
 -closureN_type c_7314648;
@@ -65248,25 +65510,25 @@ Make let-values be the same as let*-values, to work around
 -c_7314648.elements[0] = expr_7336_732856;
 -c_7314648.elements[1] = k_734204;
 -c_7314648.elements[2] = rename_7337_732857;
-+closureN_type c_7313355;
-+object e_7313478 [3];
-+c_7313355.hdr.mark = gc_color_red;
-+ c_7313355.hdr.grayed = 0;
-+c_7313355.tag = closureN_tag;
-+ c_7313355.fn = (function_type)__lambda_46;
-+c_7313355.num_args = 1;
-+c_7313355.num_elements = 3;
-+c_7313355.elements = (object *)e_7313478;
-+c_7313355.elements[0] = expr_7336_732516;
-+c_7313355.elements[1] = k_733759;
-+c_7313355.elements[2] = rename_7337_732517;
++closureN_type c_7313348;
++object e_7313471 [3];
++c_7313348.hdr.mark = gc_color_red;
++ c_7313348.hdr.grayed = 0;
++c_7313348.tag = closureN_tag;
++ c_7313348.fn = (function_type)__lambda_46;
++c_7313348.num_args = 1;
++c_7313348.num_elements = 3;
++c_7313348.elements = (object *)e_7313471;
++c_7313348.elements[0] = expr_7336_732509;
++c_7313348.elements[1] = k_733752;
++c_7313348.elements[2] = rename_7337_732510;
  
 -return_direct_with_clo1(data,(closure)&c_7314632,__lambda_44,  &c_7314648);; 
-+return_direct_with_clo1(data,(closure)&c_7313339,__lambda_44,  &c_7313355);; 
++return_direct_with_clo1(data,(closure)&c_7313332,__lambda_44,  &c_7313348);; 
  }
  
 -static void __lambda_46(void *data, object self_7313005, int argc, object *args) /* object self_7313005, object r_734205 */
-+static void __lambda_46(void *data, object self_7311759, int argc, object *args) /* object self_7311759, object r_733760 */
++static void __lambda_46(void *data, object self_7311752, int argc, object *args) /* object self_7311752, object r_733753 */
   {
  
    
@@ -65280,16 +65542,16 @@ Make let-values be the same as let*-values, to work around
 -c_7314650.num_elements = 1;
 -c_7314650.elements = (object *)e_7314665;
 -c_7314650.elements[0] = ((closureN)self_7313005)->elements[0];
-+closureN_type c_7313357;
-+object e_7313372 [1];
-+c_7313357.hdr.mark = gc_color_red;
-+ c_7313357.hdr.grayed = 0;
-+c_7313357.tag = closureN_tag;
-+ c_7313357.fn = (function_type)__lambda_47;
-+c_7313357.num_args = 0;
-+c_7313357.num_elements = 1;
-+c_7313357.elements = (object *)e_7313372;
-+c_7313357.elements[0] = ((closureN)self_7311759)->elements[0];
++closureN_type c_7313350;
++object e_7313365 [1];
++c_7313350.hdr.mark = gc_color_red;
++ c_7313350.hdr.grayed = 0;
++c_7313350.tag = closureN_tag;
++ c_7313350.fn = (function_type)__lambda_47;
++c_7313350.num_args = 0;
++c_7313350.num_elements = 1;
++c_7313350.elements = (object *)e_7313365;
++c_7313350.elements[0] = ((closureN)self_7311752)->elements[0];
  
  
 -closureN_type c_7314666;
@@ -65304,25 +65566,25 @@ Make let-values be the same as let*-values, to work around
 -c_7314666.elements[0] = ((closureN)self_7313005)->elements[0];
 -c_7314666.elements[1] = ((closureN)self_7313005)->elements[1];
 -c_7314666.elements[2] = ((closureN)self_7313005)->elements[2];
-+closureN_type c_7313373;
-+object e_7313477 [3];
-+c_7313373.hdr.mark = gc_color_red;
-+ c_7313373.hdr.grayed = 0;
-+c_7313373.tag = closureN_tag;
-+ c_7313373.fn = (function_type)__lambda_49;
-+c_7313373.num_args = 1;
-+c_7313373.num_elements = 3;
-+c_7313373.elements = (object *)e_7313477;
-+c_7313373.elements[0] = ((closureN)self_7311759)->elements[0];
-+c_7313373.elements[1] = ((closureN)self_7311759)->elements[1];
-+c_7313373.elements[2] = ((closureN)self_7311759)->elements[2];
++closureN_type c_7313366;
++object e_7313470 [3];
++c_7313366.hdr.mark = gc_color_red;
++ c_7313366.hdr.grayed = 0;
++c_7313366.tag = closureN_tag;
++ c_7313366.fn = (function_type)__lambda_49;
++c_7313366.num_args = 1;
++c_7313366.num_elements = 3;
++c_7313366.elements = (object *)e_7313470;
++c_7313366.elements[0] = ((closureN)self_7311752)->elements[0];
++c_7313366.elements[1] = ((closureN)self_7311752)->elements[1];
++c_7313366.elements[2] = ((closureN)self_7311752)->elements[2];
  
 -return_direct_with_clo1(data,(closure)&c_7314650,__lambda_47,  &c_7314666);; 
-+return_direct_with_clo1(data,(closure)&c_7313357,__lambda_47,  &c_7313373);; 
++return_direct_with_clo1(data,(closure)&c_7313350,__lambda_47,  &c_7313366);; 
  }
  
 -static void __lambda_49(void *data, object self_7313006, int argc, object *args) /* object self_7313006, object r_734206 */
-+static void __lambda_49(void *data, object self_7311760, int argc, object *args) /* object self_7311760, object r_733761 */
++static void __lambda_49(void *data, object self_7311753, int argc, object *args) /* object self_7311753, object r_733754 */
   {
  
    
@@ -65338,33 +65600,33 @@ Make let-values be the same as let*-values, to work around
 -c_7314668.elements[0] = ((closureN)self_7313006)->elements[0];
 -c_7314668.elements[1] = ((closureN)self_7313006)->elements[1];
 -c_7314668.elements[2] = ((closureN)self_7313006)->elements[2];
-+closureN_type c_7313375;
-+object e_7313473 [3];
-+c_7313375.hdr.mark = gc_color_red;
-+ c_7313375.hdr.grayed = 0;
-+c_7313375.tag = closureN_tag;
-+ c_7313375.fn = (function_type)__lambda_50;
-+c_7313375.num_args = 1;
-+c_7313375.num_elements = 3;
-+c_7313375.elements = (object *)e_7313473;
-+c_7313375.elements[0] = ((closureN)self_7311760)->elements[0];
-+c_7313375.elements[1] = ((closureN)self_7311760)->elements[1];
-+c_7313375.elements[2] = ((closureN)self_7311760)->elements[2];
++closureN_type c_7313368;
++object e_7313466 [3];
++c_7313368.hdr.mark = gc_color_red;
++ c_7313368.hdr.grayed = 0;
++c_7313368.tag = closureN_tag;
++ c_7313368.fn = (function_type)__lambda_50;
++c_7313368.num_args = 1;
++c_7313368.num_elements = 3;
++c_7313368.elements = (object *)e_7313466;
++c_7313368.elements[0] = ((closureN)self_7311753)->elements[0];
++c_7313368.elements[1] = ((closureN)self_7311753)->elements[1];
++c_7313368.elements[2] = ((closureN)self_7311753)->elements[2];
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7314668,__lambda_50,  Cyc_cadr(data, ((closureN)self_7313006)->elements[0]));; 
-+return_direct_with_clo1(data,(closure)&c_7313375,__lambda_50,  Cyc_cadr(data, ((closureN)self_7311760)->elements[0]));; 
++return_direct_with_clo1(data,(closure)&c_7313368,__lambda_50,  Cyc_cadr(data, ((closureN)self_7311753)->elements[0]));; 
  }
  
 -static void __lambda_50(void *data, object self_7313007, int argc, object *args) /* object self_7313007, object r_734240 */
-+static void __lambda_50(void *data, object self_7311761, int argc, object *args) /* object self_7311761, object r_733795 */
++static void __lambda_50(void *data, object self_7311754, int argc, object *args) /* object self_7311754, object r_733788 */
   {
 - object r_734240 = args[0];
-+ object r_733795 = args[0];
++ object r_733788 = args[0];
      
 -if( (boolean_f != Cyc_is_null(r_734240)) ){ 
-+if( (boolean_f != Cyc_is_null(r_733795)) ){ 
++if( (boolean_f != Cyc_is_null(r_733788)) ){ 
    
 -closureN_type c_7314673;
 -object e_7314685 [2];
@@ -65377,20 +65639,20 @@ Make let-values be the same as let*-values, to work around
 -c_7314673.elements = (object *)e_7314685;
 -c_7314673.elements[0] = ((closureN)self_7313007)->elements[0];
 -c_7314673.elements[1] = ((closureN)self_7313007)->elements[1];
-+closureN_type c_7313380;
-+object e_7313392 [2];
-+c_7313380.hdr.mark = gc_color_red;
-+ c_7313380.hdr.grayed = 0;
-+c_7313380.tag = closureN_tag;
-+ c_7313380.fn = (function_type)__lambda_51;
-+c_7313380.num_args = 1;
-+c_7313380.num_elements = 2;
-+c_7313380.elements = (object *)e_7313392;
-+c_7313380.elements[0] = ((closureN)self_7311761)->elements[0];
-+c_7313380.elements[1] = ((closureN)self_7311761)->elements[1];
++closureN_type c_7313373;
++object e_7313385 [2];
++c_7313373.hdr.mark = gc_color_red;
++ c_7313373.hdr.grayed = 0;
++c_7313373.tag = closureN_tag;
++ c_7313373.fn = (function_type)__lambda_51;
++c_7313373.num_args = 1;
++c_7313373.num_elements = 2;
++c_7313373.elements = (object *)e_7313385;
++c_7313373.elements[0] = ((closureN)self_7311754)->elements[0];
++c_7313373.elements[1] = ((closureN)self_7311754)->elements[1];
  
 -return_closcall2(data,  ((closureN)self_7313007)->elements[2],  &c_7314673, quote_let);
-+return_closcall2(data,  ((closureN)self_7311761)->elements[2],  &c_7313380, quote_let);
++return_closcall2(data,  ((closureN)self_7311754)->elements[2],  &c_7313373, quote_let);
  } else { 
    
 -closureN_type c_7314687;
@@ -65403,16 +65665,16 @@ Make let-values be the same as let*-values, to work around
 -c_7314687.num_elements = 1;
 -c_7314687.elements = (object *)e_7314717;
 -c_7314687.elements[0] = ((closureN)self_7313007)->elements[0];
-+closureN_type c_7313394;
-+object e_7313424 [1];
-+c_7313394.hdr.mark = gc_color_red;
-+ c_7313394.hdr.grayed = 0;
-+c_7313394.tag = closureN_tag;
-+ c_7313394.fn = (function_type)__lambda_52;
-+c_7313394.num_args = 0;
-+c_7313394.num_elements = 1;
-+c_7313394.elements = (object *)e_7313424;
-+c_7313394.elements[0] = ((closureN)self_7311761)->elements[0];
++closureN_type c_7313387;
++object e_7313417 [1];
++c_7313387.hdr.mark = gc_color_red;
++ c_7313387.hdr.grayed = 0;
++c_7313387.tag = closureN_tag;
++ c_7313387.fn = (function_type)__lambda_52;
++c_7313387.num_args = 0;
++c_7313387.num_elements = 1;
++c_7313387.elements = (object *)e_7313417;
++c_7313387.elements[0] = ((closureN)self_7311754)->elements[0];
  
  
 -closureN_type c_7314718;
@@ -65427,31 +65689,31 @@ Make let-values be the same as let*-values, to work around
 -c_7314718.elements[0] = ((closureN)self_7313007)->elements[0];
 -c_7314718.elements[1] = ((closureN)self_7313007)->elements[1];
 -c_7314718.elements[2] = ((closureN)self_7313007)->elements[2];
-+closureN_type c_7313425;
-+object e_7313472 [3];
-+c_7313425.hdr.mark = gc_color_red;
-+ c_7313425.hdr.grayed = 0;
-+c_7313425.tag = closureN_tag;
-+ c_7313425.fn = (function_type)__lambda_55;
-+c_7313425.num_args = 1;
-+c_7313425.num_elements = 3;
-+c_7313425.elements = (object *)e_7313472;
-+c_7313425.elements[0] = ((closureN)self_7311761)->elements[0];
-+c_7313425.elements[1] = ((closureN)self_7311761)->elements[1];
-+c_7313425.elements[2] = ((closureN)self_7311761)->elements[2];
++closureN_type c_7313418;
++object e_7313465 [3];
++c_7313418.hdr.mark = gc_color_red;
++ c_7313418.hdr.grayed = 0;
++c_7313418.tag = closureN_tag;
++ c_7313418.fn = (function_type)__lambda_55;
++c_7313418.num_args = 1;
++c_7313418.num_elements = 3;
++c_7313418.elements = (object *)e_7313465;
++c_7313418.elements[0] = ((closureN)self_7311754)->elements[0];
++c_7313418.elements[1] = ((closureN)self_7311754)->elements[1];
++c_7313418.elements[2] = ((closureN)self_7311754)->elements[2];
  
 -return_direct_with_clo1(data,(closure)&c_7314687,__lambda_52,  &c_7314718);}
-+return_direct_with_clo1(data,(closure)&c_7313394,__lambda_52,  &c_7313425);}
++return_direct_with_clo1(data,(closure)&c_7313387,__lambda_52,  &c_7313418);}
  ;; 
  }
  
 -static void __lambda_55(void *data, object self_7313009, int argc, object *args) /* object self_7313009, object r_734213 */
-+static void __lambda_55(void *data, object self_7311763, int argc, object *args) /* object self_7311763, object r_733768 */
++static void __lambda_55(void *data, object self_7311756, int argc, object *args) /* object self_7311756, object r_733761 */
   {
 - object r_734213 = args[0];
 -  if( (boolean_f != r_734213) ){ 
-+ object r_733768 = args[0];
-+  if( (boolean_f != r_733768) ){ 
++ object r_733761 = args[0];
++  if( (boolean_f != r_733761) ){ 
    
 -closureN_type c_7314721;
 -object e_7314760 [3];
@@ -65465,35 +65727,35 @@ Make let-values be the same as let*-values, to work around
 -c_7314721.elements[0] = ((closureN)self_7313009)->elements[0];
 -c_7314721.elements[1] = ((closureN)self_7313009)->elements[1];
 -c_7314721.elements[2] = ((closureN)self_7313009)->elements[2];
-+closureN_type c_7313428;
-+object e_7313467 [3];
-+c_7313428.hdr.mark = gc_color_red;
-+ c_7313428.hdr.grayed = 0;
-+c_7313428.tag = closureN_tag;
-+ c_7313428.fn = (function_type)__lambda_56;
-+c_7313428.num_args = 1;
-+c_7313428.num_elements = 3;
-+c_7313428.elements = (object *)e_7313467;
-+c_7313428.elements[0] = ((closureN)self_7311763)->elements[0];
-+c_7313428.elements[1] = ((closureN)self_7311763)->elements[1];
-+c_7313428.elements[2] = ((closureN)self_7311763)->elements[2];
++closureN_type c_7313421;
++object e_7313460 [3];
++c_7313421.hdr.mark = gc_color_red;
++ c_7313421.hdr.grayed = 0;
++c_7313421.tag = closureN_tag;
++ c_7313421.fn = (function_type)__lambda_56;
++c_7313421.num_args = 1;
++c_7313421.num_elements = 3;
++c_7313421.elements = (object *)e_7313460;
++c_7313421.elements[0] = ((closureN)self_7311756)->elements[0];
++c_7313421.elements[1] = ((closureN)self_7311756)->elements[1];
++c_7313421.elements[2] = ((closureN)self_7311756)->elements[2];
  
 -return_closcall2(data,  ((closureN)self_7313009)->elements[2],  &c_7314721, quote_let);
-+return_closcall2(data,  ((closureN)self_7311763)->elements[2],  &c_7313428, quote_let);
++return_closcall2(data,  ((closureN)self_7311756)->elements[2],  &c_7313421, quote_let);
  } else { 
    
 -make_utf8_string_with_len(c_7314763, "bad let* syntax", 15, 15);
 -return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7313009)->elements[1], &c_7314763, ((closureN)self_7313009)->elements[0]);}
-+make_utf8_string_with_len(c_7313470, "bad let* syntax", 15, 15);
-+return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7311763)->elements[1], &c_7313470, ((closureN)self_7311763)->elements[0]);}
++make_utf8_string_with_len(c_7313463, "bad let* syntax", 15, 15);
++return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7311756)->elements[1], &c_7313463, ((closureN)self_7311756)->elements[0]);}
  ;; 
  }
  
 -static void __lambda_56(void *data, object self_7313010, int argc, object *args) /* object self_7313010, object r_734214 */
-+static void __lambda_56(void *data, object self_7311764, int argc, object *args) /* object self_7311764, object r_733769 */
++static void __lambda_56(void *data, object self_7311757, int argc, object *args) /* object self_7311757, object r_733762 */
   {
 - object r_734214 = args[0];
-+ object r_733769 = args[0];
++ object r_733762 = args[0];
    
 -closureN_type c_7314724;
 -object e_7314759 [3];
@@ -65507,50 +65769,50 @@ Make let-values be the same as let*-values, to work around
 -c_7314724.elements[0] = ((closureN)self_7313010)->elements[0];
 -c_7314724.elements[1] = ((closureN)self_7313010)->elements[1];
 -c_7314724.elements[2] = r_734214;
-+closureN_type c_7313431;
-+object e_7313466 [3];
-+c_7313431.hdr.mark = gc_color_red;
-+ c_7313431.hdr.grayed = 0;
-+c_7313431.tag = closureN_tag;
-+ c_7313431.fn = (function_type)__lambda_57;
-+c_7313431.num_args = 1;
-+c_7313431.num_elements = 3;
-+c_7313431.elements = (object *)e_7313466;
-+c_7313431.elements[0] = ((closureN)self_7311764)->elements[0];
-+c_7313431.elements[1] = ((closureN)self_7311764)->elements[1];
-+c_7313431.elements[2] = r_733769;
++closureN_type c_7313424;
++object e_7313459 [3];
++c_7313424.hdr.mark = gc_color_red;
++ c_7313424.hdr.grayed = 0;
++c_7313424.tag = closureN_tag;
++ c_7313424.fn = (function_type)__lambda_57;
++c_7313424.num_args = 1;
++c_7313424.num_elements = 3;
++c_7313424.elements = (object *)e_7313459;
++c_7313424.elements[0] = ((closureN)self_7311757)->elements[0];
++c_7313424.elements[1] = ((closureN)self_7311757)->elements[1];
++c_7313424.elements[2] = r_733762;
  
 -return_closcall2(data,  ((closureN)self_7313010)->elements[2],  &c_7314724, quote_let_85);; 
-+return_closcall2(data,  ((closureN)self_7311764)->elements[2],  &c_7313431, quote_let_85);; 
++return_closcall2(data,  ((closureN)self_7311757)->elements[2],  &c_7313424, quote_let_85);; 
  }
  
 -static void __lambda_57(void *data, object self_7313011, int argc, object *args) /* object self_7313011, object r_734220 */
-+static void __lambda_57(void *data, object self_7311765, int argc, object *args) /* object self_7311765, object r_733775 */
++static void __lambda_57(void *data, object self_7311758, int argc, object *args) /* object self_7311758, object r_733768 */
   {
 - object r_734220 = args[0];
-+ object r_733775 = args[0];
++ object r_733768 = args[0];
    
 -pair_type local_7314729; 
-+pair_type local_7313436; 
++pair_type local_7313429; 
  
 -pair_type local_7314733; 
-+pair_type local_7313440; 
++pair_type local_7313433; 
  
 -pair_type local_7314736; 
-+pair_type local_7313443; 
++pair_type local_7313436; 
  
  
  
  
  
 -pair_type local_7314744; 
-+pair_type local_7313451; 
++pair_type local_7313444; 
  
 -pair_type local_7314747; 
-+pair_type local_7313454; 
++pair_type local_7313447; 
  
 -pair_type local_7314750; 
-+pair_type local_7313457; 
++pair_type local_7313450; 
  
  
  
@@ -65558,20 +65820,20 @@ Make let-values be the same as let*-values, to work around
  
  
 -return_direct_with_clo1(data,  ((closureN)self_7313011)->elements[1], (((closure)  ((closureN)self_7313011)->elements[1])->fn),  set_pair_as_expr(&local_7314729, ((closureN)self_7313011)->elements[2], set_pair_as_expr(&local_7314733, set_pair_as_expr(&local_7314736, Cyc_caar(data, Cyc_cdr(data, ((closureN)self_7313011)->elements[0])), NULL), set_pair_as_expr(&local_7314744, set_pair_as_expr(&local_7314747, r_734220, set_pair_as_expr(&local_7314750, Cyc_cdar(data, Cyc_cdr(data, ((closureN)self_7313011)->elements[0])), Cyc_cddr(data, ((closureN)self_7313011)->elements[0]))), NULL))));; 
-+return_direct_with_clo1(data,  ((closureN)self_7311765)->elements[1], (((closure)  ((closureN)self_7311765)->elements[1])->fn),  set_pair_as_expr(&local_7313436, ((closureN)self_7311765)->elements[2], set_pair_as_expr(&local_7313440, set_pair_as_expr(&local_7313443, Cyc_caar(data, Cyc_cdr(data, ((closureN)self_7311765)->elements[0])), NULL), set_pair_as_expr(&local_7313451, set_pair_as_expr(&local_7313454, r_733775, set_pair_as_expr(&local_7313457, Cyc_cdar(data, Cyc_cdr(data, ((closureN)self_7311765)->elements[0])), Cyc_cddr(data, ((closureN)self_7311765)->elements[0]))), NULL))));; 
++return_direct_with_clo1(data,  ((closureN)self_7311758)->elements[1], (((closure)  ((closureN)self_7311758)->elements[1])->fn),  set_pair_as_expr(&local_7313429, ((closureN)self_7311758)->elements[2], set_pair_as_expr(&local_7313433, set_pair_as_expr(&local_7313436, Cyc_caar(data, Cyc_cdr(data, ((closureN)self_7311758)->elements[0])), NULL), set_pair_as_expr(&local_7313444, set_pair_as_expr(&local_7313447, r_733768, set_pair_as_expr(&local_7313450, Cyc_cdar(data, Cyc_cdr(data, ((closureN)self_7311758)->elements[0])), Cyc_cddr(data, ((closureN)self_7311758)->elements[0]))), NULL))));; 
  }
  
 -static void __lambda_52(void *data, object self_7313012, int argc, object *args) /* object self_7313012, object k_734230 */
-+static void __lambda_52(void *data, object self_7311766, int argc, object *args) /* object self_7311766, object k_733785 */
++static void __lambda_52(void *data, object self_7311759, int argc, object *args) /* object self_7311759, object k_733778 */
   {
 - object k_734230 = args[0];
 -    complex_num_type local_7314690; 
-+ object k_733785 = args[0];
-+    complex_num_type local_7313397; 
++ object k_733778 = args[0];
++    complex_num_type local_7313390; 
    
  if( (boolean_f != ((inline_function_type)
 -                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7314690, Cyc_cadr(data, ((closureN)self_7313012)->elements[0]))) ){ 
-+                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7313397, Cyc_cadr(data, ((closureN)self_7311766)->elements[0]))) ){ 
++                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7313390, Cyc_cadr(data, ((closureN)self_7311759)->elements[0]))) ){ 
    
 -closureN_type c_7314695;
 -object e_7314701 [2];
@@ -65584,90 +65846,90 @@ Make let-values be the same as let*-values, to work around
 -c_7314695.elements = (object *)e_7314701;
 -c_7314695.elements[0] = ((closureN)self_7313012)->elements[0];
 -c_7314695.elements[1] = k_734230;
-+closureN_type c_7313402;
-+object e_7313408 [2];
-+c_7313402.hdr.mark = gc_color_red;
-+ c_7313402.hdr.grayed = 0;
-+c_7313402.tag = closureN_tag;
-+ c_7313402.fn = (function_type)__lambda_53;
-+c_7313402.num_args = 1;
-+c_7313402.num_elements = 2;
-+c_7313402.elements = (object *)e_7313408;
-+c_7313402.elements[0] = ((closureN)self_7311766)->elements[0];
-+c_7313402.elements[1] = k_733785;
++closureN_type c_7313395;
++object e_7313401 [2];
++c_7313395.hdr.mark = gc_color_red;
++ c_7313395.hdr.grayed = 0;
++c_7313395.tag = closureN_tag;
++ c_7313395.fn = (function_type)__lambda_53;
++c_7313395.num_args = 1;
++c_7313395.num_elements = 2;
++c_7313395.elements = (object *)e_7313401;
++c_7313395.elements[0] = ((closureN)self_7311759)->elements[0];
++c_7313395.elements[1] = k_733778;
  
  
 -mmacro(c_7314702, (function_type)__lambda_54);c_7314702.num_args = 1;
 -return_direct_with_clo1(data,(closure)&c_7314695,__lambda_53,  &c_7314702);
-+mmacro(c_7313409, (function_type)__lambda_54);c_7313409.num_args = 1;
-+return_direct_with_clo1(data,(closure)&c_7313402,__lambda_53,  &c_7313409);
++mmacro(c_7313402, (function_type)__lambda_54);c_7313402.num_args = 1;
++return_direct_with_clo1(data,(closure)&c_7313395,__lambda_53,  &c_7313402);
  } else { 
 -  return_direct_with_clo1(data,  k_734230, (((closure)  k_734230)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_733785, (((closure)  k_733785)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_733778, (((closure)  k_733778)->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_54(void *data, object self_7313013, int argc, object *args) /* object self_7313013, object k_734234, object x_7342_732859 */
-+static void __lambda_54(void *data, object self_7311767, int argc, object *args) /* object self_7311767, object k_733789, object x_7342_732519 */
++static void __lambda_54(void *data, object self_7311760, int argc, object *args) /* object self_7311760, object k_733782, object x_7342_732512 */
   {
 - object k_734234 = args[0]; object x_7342_732859 = args[1];
-+ object k_733789 = args[0]; object x_7342_732519 = args[1];
++ object k_733782 = args[0]; object x_7342_732512 = args[1];
      
 -if( (boolean_f != Cyc_is_pair(x_7342_732859)) ){ 
-+if( (boolean_f != Cyc_is_pair(x_7342_732519)) ){ 
++if( (boolean_f != Cyc_is_pair(x_7342_732512)) ){ 
      
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, x_7342_732859))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, x_7342_732519))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, x_7342_732512))) ){ 
    
  
  
  
 -return_direct_with_clo1(data,  k_734234, (((closure)  k_734234)->fn),  Cyc_is_null(Cyc_cddr(data, x_7342_732859)));
-+return_direct_with_clo1(data,  k_733789, (((closure)  k_733789)->fn),  Cyc_is_null(Cyc_cddr(data, x_7342_732519)));
++return_direct_with_clo1(data,  k_733782, (((closure)  k_733782)->fn),  Cyc_is_null(Cyc_cddr(data, x_7342_732512)));
  } else { 
 -  return_direct_with_clo1(data,  k_734234, (((closure)  k_734234)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_733789, (((closure)  k_733789)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_733782, (((closure)  k_733782)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_734234, (((closure)  k_734234)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_733789, (((closure)  k_733789)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_733782, (((closure)  k_733782)->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_53(void *data, object self_7313014, int argc, object *args) /* object self_7313014, object r_734232 */
-+static void __lambda_53(void *data, object self_7311768, int argc, object *args) /* object self_7311768, object r_733787 */
++static void __lambda_53(void *data, object self_7311761, int argc, object *args) /* object self_7311761, object r_733780 */
   {
 - object r_734232 = args[0];
-+ object r_733787 = args[0];
++ object r_733780 = args[0];
    
  
 -return_direct_with_clo3(data,  __glo_every_scheme_base, (((closure)  __glo_every_scheme_base)->fn),  ((closureN)self_7313014)->elements[1], r_734232, Cyc_cadr(data, ((closureN)self_7313014)->elements[0]));; 
-+return_direct_with_clo3(data,  __glo_every_scheme_base, (((closure)  __glo_every_scheme_base)->fn),  ((closureN)self_7311768)->elements[1], r_733787, Cyc_cadr(data, ((closureN)self_7311768)->elements[0]));; 
++return_direct_with_clo3(data,  __glo_every_scheme_base, (((closure)  __glo_every_scheme_base)->fn),  ((closureN)self_7311761)->elements[1], r_733780, Cyc_cadr(data, ((closureN)self_7311761)->elements[0]));; 
  }
  
 -static void __lambda_51(void *data, object self_7313008, int argc, object *args) /* object self_7313008, object r_734208 */
-+static void __lambda_51(void *data, object self_7311762, int argc, object *args) /* object self_7311762, object r_733763 */
++static void __lambda_51(void *data, object self_7311755, int argc, object *args) /* object self_7311755, object r_733756 */
   {
 - object r_734208 = args[0];
-+ object r_733763 = args[0];
++ object r_733756 = args[0];
    
 -pair_type local_7314678; 
-+pair_type local_7313385; 
++pair_type local_7313378; 
  
 -pair_type local_7314681; 
-+pair_type local_7313388; 
++pair_type local_7313381; 
  
  
 -return_direct_with_clo1(data,  ((closureN)self_7313008)->elements[1], (((closure)  ((closureN)self_7313008)->elements[1])->fn),  set_pair_as_expr(&local_7314678, r_734208, set_pair_as_expr(&local_7314681, NULL, Cyc_cddr(data, ((closureN)self_7313008)->elements[0]))));; 
-+return_direct_with_clo1(data,  ((closureN)self_7311762)->elements[1], (((closure)  ((closureN)self_7311762)->elements[1])->fn),  set_pair_as_expr(&local_7313385, r_733763, set_pair_as_expr(&local_7313388, NULL, Cyc_cddr(data, ((closureN)self_7311762)->elements[0]))));; 
++return_direct_with_clo1(data,  ((closureN)self_7311755)->elements[1], (((closure)  ((closureN)self_7311755)->elements[1])->fn),  set_pair_as_expr(&local_7313378, r_733756, set_pair_as_expr(&local_7313381, NULL, Cyc_cddr(data, ((closureN)self_7311755)->elements[0]))));; 
  }
  
 -static void __lambda_47(void *data, object self_7313015, int argc, object *args) /* object self_7313015, object k_734241 */
-+static void __lambda_47(void *data, object self_7311769, int argc, object *args) /* object self_7311769, object k_733796 */
++static void __lambda_47(void *data, object self_7311762, int argc, object *args) /* object self_7311762, object k_733789 */
   {
 - object k_734241 = args[0];
-+ object k_733796 = args[0];
++ object k_733789 = args[0];
    
 -closureN_type c_7314652;
 -object e_7314661 [2];
@@ -65680,48 +65942,48 @@ Make let-values be the same as let*-values, to work around
 -c_7314652.elements = (object *)e_7314661;
 -c_7314652.elements[0] = ((closureN)self_7313015)->elements[0];
 -c_7314652.elements[1] = k_734241;
-+closureN_type c_7313359;
-+object e_7313368 [2];
-+c_7313359.hdr.mark = gc_color_red;
-+ c_7313359.hdr.grayed = 0;
-+c_7313359.tag = closureN_tag;
-+ c_7313359.fn = (function_type)__lambda_48;
-+c_7313359.num_args = 1;
-+c_7313359.num_elements = 2;
-+c_7313359.elements = (object *)e_7313368;
-+c_7313359.elements[0] = ((closureN)self_7311769)->elements[0];
-+c_7313359.elements[1] = k_733796;
++closureN_type c_7313352;
++object e_7313361 [2];
++c_7313352.hdr.mark = gc_color_red;
++ c_7313352.hdr.grayed = 0;
++c_7313352.tag = closureN_tag;
++ c_7313352.fn = (function_type)__lambda_48;
++c_7313352.num_args = 1;
++c_7313352.num_elements = 2;
++c_7313352.elements = (object *)e_7313361;
++c_7313352.elements[0] = ((closureN)self_7311762)->elements[0];
++c_7313352.elements[1] = k_733789;
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7314652,__lambda_48,  Cyc_cddr(data, ((closureN)self_7313015)->elements[0]));; 
-+return_direct_with_clo1(data,(closure)&c_7313359,__lambda_48,  Cyc_cddr(data, ((closureN)self_7311769)->elements[0]));; 
++return_direct_with_clo1(data,(closure)&c_7313352,__lambda_48,  Cyc_cddr(data, ((closureN)self_7311762)->elements[0]));; 
  }
  
 -static void __lambda_48(void *data, object self_7313016, int argc, object *args) /* object self_7313016, object r_734243 */
-+static void __lambda_48(void *data, object self_7311770, int argc, object *args) /* object self_7311770, object r_733798 */
++static void __lambda_48(void *data, object self_7311763, int argc, object *args) /* object self_7311763, object r_733791 */
   {
 - object r_734243 = args[0];
-+ object r_733798 = args[0];
++ object r_733791 = args[0];
      
 -if( (boolean_f != Cyc_is_null(r_734243)) ){ 
-+if( (boolean_f != Cyc_is_null(r_733798)) ){ 
++if( (boolean_f != Cyc_is_null(r_733791)) ){ 
    
 -make_utf8_string_with_len(c_7314657, "no let* body", 12, 12);
 -return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7313016)->elements[1], &c_7314657, ((closureN)self_7313016)->elements[0]);
-+make_utf8_string_with_len(c_7313364, "no let* body", 12, 12);
-+return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7311770)->elements[1], &c_7313364, ((closureN)self_7311770)->elements[0]);
++make_utf8_string_with_len(c_7313357, "no let* body", 12, 12);
++return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7311763)->elements[1], &c_7313357, ((closureN)self_7311763)->elements[0]);
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7313016)->elements[1], (((closure)  ((closureN)self_7313016)->elements[1])->fn),  Cyc_VOID);}
-+  return_direct_with_clo1(data,  ((closureN)self_7311770)->elements[1], (((closure)  ((closureN)self_7311770)->elements[1])->fn),  Cyc_VOID);}
++  return_direct_with_clo1(data,  ((closureN)self_7311763)->elements[1], (((closure)  ((closureN)self_7311763)->elements[1])->fn),  Cyc_VOID);}
  ;; 
  }
  
 -static void __lambda_44(void *data, object self_7313017, int argc, object *args) /* object self_7313017, object k_734244 */
-+static void __lambda_44(void *data, object self_7311771, int argc, object *args) /* object self_7311771, object k_733799 */
++static void __lambda_44(void *data, object self_7311764, int argc, object *args) /* object self_7311764, object k_733792 */
   {
 - object k_734244 = args[0];
-+ object k_733799 = args[0];
++ object k_733792 = args[0];
    
 -closureN_type c_7314634;
 -object e_7314643 [2];
@@ -65734,50 +65996,49 @@ Make let-values be the same as let*-values, to work around
 -c_7314634.elements = (object *)e_7314643;
 -c_7314634.elements[0] = ((closureN)self_7313017)->elements[0];
 -c_7314634.elements[1] = k_734244;
-+closureN_type c_7313341;
-+object e_7313350 [2];
-+c_7313341.hdr.mark = gc_color_red;
-+ c_7313341.hdr.grayed = 0;
-+c_7313341.tag = closureN_tag;
-+ c_7313341.fn = (function_type)__lambda_45;
-+c_7313341.num_args = 1;
-+c_7313341.num_elements = 2;
-+c_7313341.elements = (object *)e_7313350;
-+c_7313341.elements[0] = ((closureN)self_7311771)->elements[0];
-+c_7313341.elements[1] = k_733799;
++closureN_type c_7313334;
++object e_7313343 [2];
++c_7313334.hdr.mark = gc_color_red;
++ c_7313334.hdr.grayed = 0;
++c_7313334.tag = closureN_tag;
++ c_7313334.fn = (function_type)__lambda_45;
++c_7313334.num_args = 1;
++c_7313334.num_elements = 2;
++c_7313334.elements = (object *)e_7313343;
++c_7313334.elements[0] = ((closureN)self_7311764)->elements[0];
++c_7313334.elements[1] = k_733792;
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7314634,__lambda_45,  Cyc_cdr(data, ((closureN)self_7313017)->elements[0]));; 
-+return_direct_with_clo1(data,(closure)&c_7313341,__lambda_45,  Cyc_cdr(data, ((closureN)self_7311771)->elements[0]));; 
++return_direct_with_clo1(data,(closure)&c_7313334,__lambda_45,  Cyc_cdr(data, ((closureN)self_7311764)->elements[0]));; 
  }
  
 -static void __lambda_45(void *data, object self_7313018, int argc, object *args) /* object self_7313018, object r_734246 */
-+static void __lambda_45(void *data, object self_7311772, int argc, object *args) /* object self_7311772, object r_733801 */
++static void __lambda_45(void *data, object self_7311765, int argc, object *args) /* object self_7311765, object r_733794 */
   {
 - object r_734246 = args[0];
-+ object r_733801 = args[0];
++ object r_733794 = args[0];
      
 -if( (boolean_f != Cyc_is_null(r_734246)) ){ 
-+if( (boolean_f != Cyc_is_null(r_733801)) ){ 
++if( (boolean_f != Cyc_is_null(r_733794)) ){ 
    
 -make_utf8_string_with_len(c_7314639, "empty let*", 10, 10);
 -return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7313018)->elements[1], &c_7314639, ((closureN)self_7313018)->elements[0]);
-+make_utf8_string_with_len(c_7313346, "empty let*", 10, 10);
-+return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7311772)->elements[1], &c_7313346, ((closureN)self_7311772)->elements[0]);
++make_utf8_string_with_len(c_7313339, "empty let*", 10, 10);
++return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7311765)->elements[1], &c_7313339, ((closureN)self_7311765)->elements[0]);
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7313018)->elements[1], (((closure)  ((closureN)self_7313018)->elements[1])->fn),  Cyc_VOID);}
-+  return_direct_with_clo1(data,  ((closureN)self_7311772)->elements[1], (((closure)  ((closureN)self_7311772)->elements[1])->fn),  Cyc_VOID);}
++  return_direct_with_clo1(data,  ((closureN)self_7311765)->elements[1], (((closure)  ((closureN)self_7311765)->elements[1])->fn),  Cyc_VOID);}
  ;; 
  }
  
 -static void __lambda_24(void *data, object _, int argc, object *args) /* closure _,object k_734143, object expr_7323_732849, object rename_7324_732850, object compare_7325_732851 */
-+static void __lambda_24(void *data, object _, int argc, object *args) /* closure _,object k_733698, object expr_7323_732509, object rename_7324_732510, object compare_7325_732511 */
++static void __lambda_24(void *data, object _, int argc, object *args) /* closure _,object k_733691, object expr_7323_732502, object rename_7324_732503, object compare_7325_732504 */
   {
 -object k_734143 = args[0]; object expr_7323_732849 = args[1]; object rename_7324_732850 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:let");
-+object k_733698 = args[0]; object expr_7323_732509 = args[1]; object rename_7324_732510 = args[2];
-+  Cyc_st_add(data, "base.sld:let");
++object k_733691 = args[0]; object expr_7323_732502 = args[1]; object rename_7324_732503 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:let");
  
 -closureN_type c_7314432;
 -object e_7314447 [1];
@@ -65789,18 +66050,8 @@ Make let-values be the same as let*-values, to work around
 -c_7314432.num_elements = 1;
 -c_7314432.elements = (object *)e_7314447;
 -c_7314432.elements[0] = expr_7323_732849;
-+closureN_type c_7313139;
-+object e_7313154 [1];
-+c_7313139.hdr.mark = gc_color_red;
-+ c_7313139.hdr.grayed = 0;
-+c_7313139.tag = closureN_tag;
-+ c_7313139.fn = (function_type)__lambda_25;
-+c_7313139.num_args = 0;
-+c_7313139.num_elements = 1;
-+c_7313139.elements = (object *)e_7313154;
-+c_7313139.elements[0] = expr_7323_732509;
- 
- 
+-
+-
 -closureN_type c_7314448;
 -object e_7314629 [3];
 -c_7314448.hdr.mark = gc_color_red;
@@ -65813,25 +66064,37 @@ Make let-values be the same as let*-values, to work around
 -c_7314448.elements[0] = expr_7323_732849;
 -c_7314448.elements[1] = k_734143;
 -c_7314448.elements[2] = rename_7324_732850;
-+closureN_type c_7313155;
-+object e_7313336 [3];
-+c_7313155.hdr.mark = gc_color_red;
-+ c_7313155.hdr.grayed = 0;
-+c_7313155.tag = closureN_tag;
-+ c_7313155.fn = (function_type)__lambda_27;
-+c_7313155.num_args = 1;
-+c_7313155.num_elements = 3;
-+c_7313155.elements = (object *)e_7313336;
-+c_7313155.elements[0] = expr_7323_732509;
-+c_7313155.elements[1] = k_733698;
-+c_7313155.elements[2] = rename_7324_732510;
++closureN_type c_7313132;
++object e_7313147 [1];
++c_7313132.hdr.mark = gc_color_red;
++ c_7313132.hdr.grayed = 0;
++c_7313132.tag = closureN_tag;
++ c_7313132.fn = (function_type)__lambda_25;
++c_7313132.num_args = 0;
++c_7313132.num_elements = 1;
++c_7313132.elements = (object *)e_7313147;
++c_7313132.elements[0] = expr_7323_732502;
++
  
 -return_direct_with_clo1(data,(closure)&c_7314432,__lambda_25,  &c_7314448);; 
-+return_direct_with_clo1(data,(closure)&c_7313139,__lambda_25,  &c_7313155);; 
++closureN_type c_7313148;
++object e_7313329 [3];
++c_7313148.hdr.mark = gc_color_red;
++ c_7313148.hdr.grayed = 0;
++c_7313148.tag = closureN_tag;
++ c_7313148.fn = (function_type)__lambda_27;
++c_7313148.num_args = 1;
++c_7313148.num_elements = 3;
++c_7313148.elements = (object *)e_7313329;
++c_7313148.elements[0] = expr_7323_732502;
++c_7313148.elements[1] = k_733691;
++c_7313148.elements[2] = rename_7324_732503;
++
++return_direct_with_clo1(data,(closure)&c_7313132,__lambda_25,  &c_7313148);; 
  }
  
 -static void __lambda_27(void *data, object self_7312987, int argc, object *args) /* object self_7312987, object r_734144 */
-+static void __lambda_27(void *data, object self_7311741, int argc, object *args) /* object self_7311741, object r_733699 */
++static void __lambda_27(void *data, object self_7311734, int argc, object *args) /* object self_7311734, object r_733692 */
   {
  
    
@@ -65845,16 +66108,16 @@ Make let-values be the same as let*-values, to work around
 -c_7314450.num_elements = 1;
 -c_7314450.elements = (object *)e_7314465;
 -c_7314450.elements[0] = ((closureN)self_7312987)->elements[0];
-+closureN_type c_7313157;
-+object e_7313172 [1];
-+c_7313157.hdr.mark = gc_color_red;
-+ c_7313157.hdr.grayed = 0;
-+c_7313157.tag = closureN_tag;
-+ c_7313157.fn = (function_type)__lambda_28;
-+c_7313157.num_args = 0;
-+c_7313157.num_elements = 1;
-+c_7313157.elements = (object *)e_7313172;
-+c_7313157.elements[0] = ((closureN)self_7311741)->elements[0];
++closureN_type c_7313150;
++object e_7313165 [1];
++c_7313150.hdr.mark = gc_color_red;
++ c_7313150.hdr.grayed = 0;
++c_7313150.tag = closureN_tag;
++ c_7313150.fn = (function_type)__lambda_28;
++c_7313150.num_args = 0;
++c_7313150.num_elements = 1;
++c_7313150.elements = (object *)e_7313165;
++c_7313150.elements[0] = ((closureN)self_7311734)->elements[0];
  
  
 -closureN_type c_7314466;
@@ -65869,41 +66132,41 @@ Make let-values be the same as let*-values, to work around
 -c_7314466.elements[0] = ((closureN)self_7312987)->elements[0];
 -c_7314466.elements[1] = ((closureN)self_7312987)->elements[1];
 -c_7314466.elements[2] = ((closureN)self_7312987)->elements[2];
-+closureN_type c_7313173;
-+object e_7313335 [3];
-+c_7313173.hdr.mark = gc_color_red;
-+ c_7313173.hdr.grayed = 0;
-+c_7313173.tag = closureN_tag;
-+ c_7313173.fn = (function_type)__lambda_30;
-+c_7313173.num_args = 1;
-+c_7313173.num_elements = 3;
-+c_7313173.elements = (object *)e_7313335;
-+c_7313173.elements[0] = ((closureN)self_7311741)->elements[0];
-+c_7313173.elements[1] = ((closureN)self_7311741)->elements[1];
-+c_7313173.elements[2] = ((closureN)self_7311741)->elements[2];
++closureN_type c_7313166;
++object e_7313328 [3];
++c_7313166.hdr.mark = gc_color_red;
++ c_7313166.hdr.grayed = 0;
++c_7313166.tag = closureN_tag;
++ c_7313166.fn = (function_type)__lambda_30;
++c_7313166.num_args = 1;
++c_7313166.num_elements = 3;
++c_7313166.elements = (object *)e_7313328;
++c_7313166.elements[0] = ((closureN)self_7311734)->elements[0];
++c_7313166.elements[1] = ((closureN)self_7311734)->elements[1];
++c_7313166.elements[2] = ((closureN)self_7311734)->elements[2];
  
 -return_direct_with_clo1(data,(closure)&c_7314450,__lambda_28,  &c_7314466);; 
-+return_direct_with_clo1(data,(closure)&c_7313157,__lambda_28,  &c_7313173);; 
++return_direct_with_clo1(data,(closure)&c_7313150,__lambda_28,  &c_7313166);; 
  }
  
 -static void __lambda_30(void *data, object self_7312988, int argc, object *args) /* object self_7312988, object r_734145 */
-+static void __lambda_30(void *data, object self_7311742, int argc, object *args) /* object self_7311742, object r_733700 */
++static void __lambda_30(void *data, object self_7311735, int argc, object *args) /* object self_7311735, object r_733693 */
   {
  
 -  object bindings_7326_732852;
-+  object bindings_7326_732512;
++  object bindings_7326_732505;
      
    
 -if( (boolean_f != Cyc_is_symbol(Cyc_cadr(data, ((closureN)self_7312988)->elements[0]))) ){ 
-+if( (boolean_f != Cyc_is_symbol(Cyc_cadr(data, ((closureN)self_7311742)->elements[0]))) ){ 
++if( (boolean_f != Cyc_is_symbol(Cyc_cadr(data, ((closureN)self_7311735)->elements[0]))) ){ 
    
    
 -  bindings_7326_732852 = Cyc_car(data, Cyc_cddr(data, ((closureN)self_7312988)->elements[0]));
-+  bindings_7326_732512 = Cyc_car(data, Cyc_cddr(data, ((closureN)self_7311742)->elements[0]));
++  bindings_7326_732505 = Cyc_car(data, Cyc_cddr(data, ((closureN)self_7311735)->elements[0]));
  } else { 
    
 -  bindings_7326_732852 = Cyc_cadr(data, ((closureN)self_7312988)->elements[0]);}
-+  bindings_7326_732512 = Cyc_cadr(data, ((closureN)self_7311742)->elements[0]);}
++  bindings_7326_732505 = Cyc_cadr(data, ((closureN)self_7311735)->elements[0]);}
  ;
 -closureN_type c_7314484;
 -object e_7314493 [2];
@@ -65916,17 +66179,17 @@ Make let-values be the same as let*-values, to work around
 -c_7314484.elements = (object *)e_7314493;
 -c_7314484.elements[0] = bindings_7326_732852;
 -c_7314484.elements[1] = ((closureN)self_7312988)->elements[0];
-+closureN_type c_7313191;
-+object e_7313200 [2];
-+c_7313191.hdr.mark = gc_color_red;
-+ c_7313191.hdr.grayed = 0;
-+c_7313191.tag = closureN_tag;
-+ c_7313191.fn = (function_type)__lambda_31;
-+c_7313191.num_args = 0;
-+c_7313191.num_elements = 2;
-+c_7313191.elements = (object *)e_7313200;
-+c_7313191.elements[0] = bindings_7326_732512;
-+c_7313191.elements[1] = ((closureN)self_7311742)->elements[0];
++closureN_type c_7313184;
++object e_7313193 [2];
++c_7313184.hdr.mark = gc_color_red;
++ c_7313184.hdr.grayed = 0;
++c_7313184.tag = closureN_tag;
++ c_7313184.fn = (function_type)__lambda_31;
++c_7313184.num_args = 0;
++c_7313184.num_elements = 2;
++c_7313184.elements = (object *)e_7313193;
++c_7313184.elements[0] = bindings_7326_732505;
++c_7313184.elements[1] = ((closureN)self_7311735)->elements[0];
  
  
 -closureN_type c_7314494;
@@ -65942,26 +66205,26 @@ Make let-values be the same as let*-values, to work around
 -c_7314494.elements[1] = ((closureN)self_7312988)->elements[0];
 -c_7314494.elements[2] = ((closureN)self_7312988)->elements[1];
 -c_7314494.elements[3] = ((closureN)self_7312988)->elements[2];
-+closureN_type c_7313201;
-+object e_7313334 [4];
-+c_7313201.hdr.mark = gc_color_red;
-+ c_7313201.hdr.grayed = 0;
-+c_7313201.tag = closureN_tag;
-+ c_7313201.fn = (function_type)__lambda_32;
-+c_7313201.num_args = 1;
-+c_7313201.num_elements = 4;
-+c_7313201.elements = (object *)e_7313334;
-+c_7313201.elements[0] = bindings_7326_732512;
-+c_7313201.elements[1] = ((closureN)self_7311742)->elements[0];
-+c_7313201.elements[2] = ((closureN)self_7311742)->elements[1];
-+c_7313201.elements[3] = ((closureN)self_7311742)->elements[2];
++closureN_type c_7313194;
++object e_7313327 [4];
++c_7313194.hdr.mark = gc_color_red;
++ c_7313194.hdr.grayed = 0;
++c_7313194.tag = closureN_tag;
++ c_7313194.fn = (function_type)__lambda_32;
++c_7313194.num_args = 1;
++c_7313194.num_elements = 4;
++c_7313194.elements = (object *)e_7313327;
++c_7313194.elements[0] = bindings_7326_732505;
++c_7313194.elements[1] = ((closureN)self_7311735)->elements[0];
++c_7313194.elements[2] = ((closureN)self_7311735)->elements[1];
++c_7313194.elements[3] = ((closureN)self_7311735)->elements[2];
  
 -return_direct_with_clo1(data,(closure)&c_7314484,__lambda_31,  &c_7314494);; 
-+return_direct_with_clo1(data,(closure)&c_7313191,__lambda_31,  &c_7313201);; 
++return_direct_with_clo1(data,(closure)&c_7313184,__lambda_31,  &c_7313194);; 
  }
  
 -static void __lambda_32(void *data, object self_7312989, int argc, object *args) /* object self_7312989, object r_734147 */
-+static void __lambda_32(void *data, object self_7311743, int argc, object *args) /* object self_7311743, object r_733702 */
++static void __lambda_32(void *data, object self_7311736, int argc, object *args) /* object self_7311736, object r_733695 */
   {
  
    
@@ -65978,60 +66241,60 @@ Make let-values be the same as let*-values, to work around
 -c_7314496.elements[1] = ((closureN)self_7312989)->elements[1];
 -c_7314496.elements[2] = ((closureN)self_7312989)->elements[2];
 -c_7314496.elements[3] = ((closureN)self_7312989)->elements[3];
-+closureN_type c_7313203;
-+object e_7313319 [4];
-+c_7313203.hdr.mark = gc_color_red;
-+ c_7313203.hdr.grayed = 0;
-+c_7313203.tag = closureN_tag;
-+ c_7313203.fn = (function_type)__lambda_33;
-+c_7313203.num_args = 1;
-+c_7313203.num_elements = 4;
-+c_7313203.elements = (object *)e_7313319;
-+c_7313203.elements[0] = ((closureN)self_7311743)->elements[0];
-+c_7313203.elements[1] = ((closureN)self_7311743)->elements[1];
-+c_7313203.elements[2] = ((closureN)self_7311743)->elements[2];
-+c_7313203.elements[3] = ((closureN)self_7311743)->elements[3];
++closureN_type c_7313196;
++object e_7313312 [4];
++c_7313196.hdr.mark = gc_color_red;
++ c_7313196.hdr.grayed = 0;
++c_7313196.tag = closureN_tag;
++ c_7313196.fn = (function_type)__lambda_33;
++c_7313196.num_args = 1;
++c_7313196.num_elements = 4;
++c_7313196.elements = (object *)e_7313312;
++c_7313196.elements[0] = ((closureN)self_7311736)->elements[0];
++c_7313196.elements[1] = ((closureN)self_7311736)->elements[1];
++c_7313196.elements[2] = ((closureN)self_7311736)->elements[2];
++c_7313196.elements[3] = ((closureN)self_7311736)->elements[3];
  
  
 -mmacro(c_7314613, (function_type)__lambda_42);c_7314613.num_args = 1;
 -return_direct_with_clo1(data,(closure)&c_7314496,__lambda_33,  &c_7314613);; 
-+mmacro(c_7313320, (function_type)__lambda_42);c_7313320.num_args = 1;
-+return_direct_with_clo1(data,(closure)&c_7313203,__lambda_33,  &c_7313320);; 
++mmacro(c_7313313, (function_type)__lambda_42);c_7313313.num_args = 1;
++return_direct_with_clo1(data,(closure)&c_7313196,__lambda_33,  &c_7313313);; 
  }
  
 -static void __lambda_42(void *data, object self_7312990, int argc, object *args) /* object self_7312990, object k_734185, object x_7327_732853 */
-+static void __lambda_42(void *data, object self_7311744, int argc, object *args) /* object self_7311744, object k_733740, object x_7327_732513 */
++static void __lambda_42(void *data, object self_7311737, int argc, object *args) /* object self_7311737, object k_733733, object x_7327_732506 */
   {
 - object k_734185 = args[0]; object x_7327_732853 = args[1];
-+ object k_733740 = args[0]; object x_7327_732513 = args[1];
++ object k_733733 = args[0]; object x_7327_732506 = args[1];
      
 -if( (boolean_f != Cyc_is_pair(x_7327_732853)) ){ 
-+if( (boolean_f != Cyc_is_pair(x_7327_732513)) ){ 
++if( (boolean_f != Cyc_is_pair(x_7327_732506)) ){ 
      
    
 -if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, x_7327_732853))) ){ 
-+if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, x_7327_732513))) ){ 
++if( (boolean_f != Cyc_is_pair(Cyc_cdr(data, x_7327_732506))) ){ 
    
  
  
  
 -return_direct_with_clo1(data,  k_734185, (((closure)  k_734185)->fn),  Cyc_is_null(Cyc_cddr(data, x_7327_732853)));
-+return_direct_with_clo1(data,  k_733740, (((closure)  k_733740)->fn),  Cyc_is_null(Cyc_cddr(data, x_7327_732513)));
++return_direct_with_clo1(data,  k_733733, (((closure)  k_733733)->fn),  Cyc_is_null(Cyc_cddr(data, x_7327_732506)));
  } else { 
 -  return_direct_with_clo1(data,  k_734185, (((closure)  k_734185)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_733740, (((closure)  k_733740)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_733733, (((closure)  k_733733)->fn),  boolean_f);}
  ;
  } else { 
 -  return_direct_with_clo1(data,  k_734185, (((closure)  k_734185)->fn),  boolean_f);}
-+  return_direct_with_clo1(data,  k_733740, (((closure)  k_733740)->fn),  boolean_f);}
++  return_direct_with_clo1(data,  k_733733, (((closure)  k_733733)->fn),  boolean_f);}
  ;; 
  }
  
 -static void __lambda_33(void *data, object self_7312991, int argc, object *args) /* object self_7312991, object r_734184 */
-+static void __lambda_33(void *data, object self_7311745, int argc, object *args) /* object self_7311745, object r_733739 */
++static void __lambda_33(void *data, object self_7311738, int argc, object *args) /* object self_7311738, object r_733732 */
   {
 - object r_734184 = args[0];
-+ object r_733739 = args[0];
++ object r_733732 = args[0];
    
 -closureN_type c_7314498;
 -object e_7314610 [4];
@@ -66046,32 +66309,15 @@ Make let-values be the same as let*-values, to work around
 -c_7314498.elements[1] = ((closureN)self_7312991)->elements[1];
 -c_7314498.elements[2] = ((closureN)self_7312991)->elements[2];
 -c_7314498.elements[3] = ((closureN)self_7312991)->elements[3];
-+closureN_type c_7313205;
-+object e_7313317 [4];
-+c_7313205.hdr.mark = gc_color_red;
-+ c_7313205.hdr.grayed = 0;
-+c_7313205.tag = closureN_tag;
-+ c_7313205.fn = (function_type)__lambda_34;
-+c_7313205.num_args = 1;
-+c_7313205.num_elements = 4;
-+c_7313205.elements = (object *)e_7313317;
-+c_7313205.elements[0] = ((closureN)self_7311745)->elements[0];
-+c_7313205.elements[1] = ((closureN)self_7311745)->elements[1];
-+c_7313205.elements[2] = ((closureN)self_7311745)->elements[2];
-+c_7313205.elements[3] = ((closureN)self_7311745)->elements[3];
- 
+-
 -return_direct_with_clo3(data,  __glo_every_scheme_base, (((closure)  __glo_every_scheme_base)->fn),  &c_7314498, r_734184, ((closureN)self_7312991)->elements[0]);; 
-+return_direct_with_clo3(data,  __glo_every_scheme_base, (((closure)  __glo_every_scheme_base)->fn),  &c_7313205, r_733739, ((closureN)self_7311745)->elements[0]);; 
- }
- 
+-}
+-
 -static void __lambda_34(void *data, object self_7312992, int argc, object *args) /* object self_7312992, object r_734148 */
-+static void __lambda_34(void *data, object self_7311746, int argc, object *args) /* object self_7311746, object r_733703 */
-  {
+- {
 - object r_734148 = args[0];
 -  if( (boolean_f != r_734148) ){ 
-+ object r_733703 = args[0];
-+  if( (boolean_f != r_733703) ){ 
-   
+-  
 -closureN_type c_7314500;
 -object e_7314604 [4];
 -c_7314500.hdr.mark = gc_color_red;
@@ -66085,37 +66331,19 @@ Make let-values be the same as let*-values, to work around
 -c_7314500.elements[1] = ((closureN)self_7312992)->elements[1];
 -c_7314500.elements[2] = ((closureN)self_7312992)->elements[2];
 -c_7314500.elements[3] = ((closureN)self_7312992)->elements[3];
-+closureN_type c_7313207;
-+object e_7313311 [4];
-+c_7313207.hdr.mark = gc_color_red;
-+ c_7313207.hdr.grayed = 0;
-+c_7313207.tag = closureN_tag;
-+ c_7313207.fn = (function_type)__lambda_35;
-+c_7313207.num_args = 1;
-+c_7313207.num_elements = 4;
-+c_7313207.elements = (object *)e_7313311;
-+c_7313207.elements[0] = ((closureN)self_7311746)->elements[0];
-+c_7313207.elements[1] = ((closureN)self_7311746)->elements[1];
-+c_7313207.elements[2] = ((closureN)self_7311746)->elements[2];
-+c_7313207.elements[3] = ((closureN)self_7311746)->elements[3];
- 
+-
 -return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7314500, primitive_car, ((closureN)self_7312992)->elements[0]);
-+return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7313207, primitive_car, ((closureN)self_7311746)->elements[0]);
- } else { 
-   
+-} else { 
+-  
 -make_utf8_string_with_len(c_7314608, "bad let syntax", 14, 14);
 -return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7312992)->elements[2], &c_7314608, ((closureN)self_7312992)->elements[1]);}
-+make_utf8_string_with_len(c_7313315, "bad let syntax", 14, 14);
-+return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7311746)->elements[2], &c_7313315, ((closureN)self_7311746)->elements[1]);}
- ;; 
- }
- 
+-;; 
+-}
+-
 -static void __lambda_35(void *data, object self_7312993, int argc, object *args) /* object self_7312993, object r_734149 */
-+static void __lambda_35(void *data, object self_7311747, int argc, object *args) /* object self_7311747, object r_733704 */
-  {
+- {
 - object r_734149 = args[0];
-+ object r_733704 = args[0];
-   
+-  
 -closureN_type c_7314502;
 -object e_7314602 [4];
 -c_7314502.hdr.mark = gc_color_red;
@@ -66129,30 +66357,14 @@ Make let-values be the same as let*-values, to work around
 -c_7314502.elements[1] = ((closureN)self_7312993)->elements[2];
 -c_7314502.elements[2] = r_734149;
 -c_7314502.elements[3] = ((closureN)self_7312993)->elements[3];
-+closureN_type c_7313209;
-+object e_7313309 [4];
-+c_7313209.hdr.mark = gc_color_red;
-+ c_7313209.hdr.grayed = 0;
-+c_7313209.tag = closureN_tag;
-+ c_7313209.fn = (function_type)__lambda_36;
-+c_7313209.num_args = 1;
-+c_7313209.num_elements = 4;
-+c_7313209.elements = (object *)e_7313309;
-+c_7313209.elements[0] = ((closureN)self_7311747)->elements[1];
-+c_7313209.elements[1] = ((closureN)self_7311747)->elements[2];
-+c_7313209.elements[2] = r_733704;
-+c_7313209.elements[3] = ((closureN)self_7311747)->elements[3];
- 
+-
 -return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7314502, primitive_cadr, ((closureN)self_7312993)->elements[0]);; 
-+return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7313209, primitive_cadr, ((closureN)self_7311747)->elements[0]);; 
- }
- 
+-}
+-
 -static void __lambda_36(void *data, object self_7312994, int argc, object *args) /* object self_7312994, object r_734150 */
-+static void __lambda_36(void *data, object self_7311748, int argc, object *args) /* object self_7311748, object r_733705 */
-  {
+- {
 - object r_734150 = args[0];
-+ object r_733705 = args[0];
-   
+-  
 -closureN_type c_7314504;
 -object e_7314600 [3];
 -c_7314504.hdr.mark = gc_color_red;
@@ -66165,33 +66377,17 @@ Make let-values be the same as let*-values, to work around
 -c_7314504.elements[0] = ((closureN)self_7312994)->elements[0];
 -c_7314504.elements[1] = ((closureN)self_7312994)->elements[1];
 -c_7314504.elements[2] = ((closureN)self_7312994)->elements[3];
-+closureN_type c_7313211;
-+object e_7313307 [3];
-+c_7313211.hdr.mark = gc_color_red;
-+ c_7313211.hdr.grayed = 0;
-+c_7313211.tag = closureN_tag;
-+ c_7313211.fn = (function_type)__lambda_37;
-+c_7313211.num_args = 2;
-+c_7313211.num_elements = 3;
-+c_7313211.elements = (object *)e_7313307;
-+c_7313211.elements[0] = ((closureN)self_7311748)->elements[0];
-+c_7313211.elements[1] = ((closureN)self_7311748)->elements[1];
-+c_7313211.elements[2] = ((closureN)self_7311748)->elements[3];
- 
+-
 -return_direct_with_clo2(data,(closure)&c_7314504,__lambda_37,  ((closureN)self_7312994)->elements[2], r_734150);; 
-+return_direct_with_clo2(data,(closure)&c_7313211,__lambda_37,  ((closureN)self_7311748)->elements[2], r_733705);; 
- }
- 
+-}
+-
 -static void __lambda_37(void *data, object self_7312995, int argc, object *args) /* object self_7312995, object vars_7328_732854, object vals_7329_732855 */
-+static void __lambda_37(void *data, object self_7311749, int argc, object *args) /* object self_7311749, object vars_7328_732514, object vals_7329_732515 */
-  {
+- {
 - object vars_7328_732854 = args[0]; object vals_7329_732855 = args[1];
-+ object vars_7328_732514 = args[0]; object vals_7329_732515 = args[1];
-     
-   
+-    
+-  
 -if( (boolean_f != Cyc_is_symbol(Cyc_cadr(data, ((closureN)self_7312995)->elements[0]))) ){ 
-+if( (boolean_f != Cyc_is_symbol(Cyc_cadr(data, ((closureN)self_7311749)->elements[0]))) ){ 
-   
+-  
 -closureN_type c_7314512;
 -object e_7314579 [5];
 -c_7314512.hdr.mark = gc_color_red;
@@ -66206,23 +66402,44 @@ Make let-values be the same as let*-values, to work around
 -c_7314512.elements[2] = ((closureN)self_7312995)->elements[2];
 -c_7314512.elements[3] = vals_7329_732855;
 -c_7314512.elements[4] = vars_7328_732854;
-+closureN_type c_7313219;
-+object e_7313286 [5];
-+c_7313219.hdr.mark = gc_color_red;
-+ c_7313219.hdr.grayed = 0;
-+c_7313219.tag = closureN_tag;
-+ c_7313219.fn = (function_type)__lambda_38;
-+c_7313219.num_args = 1;
-+c_7313219.num_elements = 5;
-+c_7313219.elements = (object *)e_7313286;
-+c_7313219.elements[0] = ((closureN)self_7311749)->elements[0];
-+c_7313219.elements[1] = ((closureN)self_7311749)->elements[1];
-+c_7313219.elements[2] = ((closureN)self_7311749)->elements[2];
-+c_7313219.elements[3] = vals_7329_732515;
-+c_7313219.elements[4] = vars_7328_732514;
++closureN_type c_7313198;
++object e_7313310 [4];
++c_7313198.hdr.mark = gc_color_red;
++ c_7313198.hdr.grayed = 0;
++c_7313198.tag = closureN_tag;
++ c_7313198.fn = (function_type)__lambda_34;
++c_7313198.num_args = 1;
++c_7313198.num_elements = 4;
++c_7313198.elements = (object *)e_7313310;
++c_7313198.elements[0] = ((closureN)self_7311738)->elements[0];
++c_7313198.elements[1] = ((closureN)self_7311738)->elements[1];
++c_7313198.elements[2] = ((closureN)self_7311738)->elements[2];
++c_7313198.elements[3] = ((closureN)self_7311738)->elements[3];
  
 -return_closcall2(data,  ((closureN)self_7312995)->elements[2],  &c_7314512, quote_lambda);
-+return_closcall2(data,  ((closureN)self_7311749)->elements[2],  &c_7313219, quote_lambda);
++return_direct_with_clo3(data,  __glo_every_scheme_base, (((closure)  __glo_every_scheme_base)->fn),  &c_7313198, r_733732, ((closureN)self_7311738)->elements[0]);; 
++}
++
++static void __lambda_34(void *data, object self_7311739, int argc, object *args) /* object self_7311739, object r_733696 */
++ {
++ object r_733696 = args[0];
++  if( (boolean_f != r_733696) ){ 
++  
++closureN_type c_7313200;
++object e_7313304 [4];
++c_7313200.hdr.mark = gc_color_red;
++ c_7313200.hdr.grayed = 0;
++c_7313200.tag = closureN_tag;
++ c_7313200.fn = (function_type)__lambda_35;
++c_7313200.num_args = 1;
++c_7313200.num_elements = 4;
++c_7313200.elements = (object *)e_7313304;
++c_7313200.elements[0] = ((closureN)self_7311739)->elements[0];
++c_7313200.elements[1] = ((closureN)self_7311739)->elements[1];
++c_7313200.elements[2] = ((closureN)self_7311739)->elements[2];
++c_7313200.elements[3] = ((closureN)self_7311739)->elements[3];
++
++return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7313200, primitive_car, ((closureN)self_7311739)->elements[0]);
  } else { 
    
 -closureN_type c_7314582;
@@ -66238,50 +66455,121 @@ Make let-values be the same as let*-values, to work around
 -c_7314582.elements[1] = ((closureN)self_7312995)->elements[1];
 -c_7314582.elements[2] = vals_7329_732855;
 -c_7314582.elements[3] = vars_7328_732854;
-+closureN_type c_7313289;
-+object e_7313306 [4];
-+c_7313289.hdr.mark = gc_color_red;
-+ c_7313289.hdr.grayed = 0;
-+c_7313289.tag = closureN_tag;
-+ c_7313289.fn = (function_type)__lambda_41;
-+c_7313289.num_args = 1;
-+c_7313289.num_elements = 4;
-+c_7313289.elements = (object *)e_7313306;
-+c_7313289.elements[0] = ((closureN)self_7311749)->elements[0];
-+c_7313289.elements[1] = ((closureN)self_7311749)->elements[1];
-+c_7313289.elements[2] = vals_7329_732515;
-+c_7313289.elements[3] = vars_7328_732514;
++make_utf8_string_with_len(c_7313308, "bad let syntax", 14, 14);
++return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7311739)->elements[2], &c_7313308, ((closureN)self_7311739)->elements[1]);}
++;; 
++}
++
++static void __lambda_35(void *data, object self_7311740, int argc, object *args) /* object self_7311740, object r_733697 */
++ {
++ object r_733697 = args[0];
++  
++closureN_type c_7313202;
++object e_7313302 [4];
++c_7313202.hdr.mark = gc_color_red;
++ c_7313202.hdr.grayed = 0;
++c_7313202.tag = closureN_tag;
++ c_7313202.fn = (function_type)__lambda_36;
++c_7313202.num_args = 1;
++c_7313202.num_elements = 4;
++c_7313202.elements = (object *)e_7313302;
++c_7313202.elements[0] = ((closureN)self_7311740)->elements[1];
++c_7313202.elements[1] = ((closureN)self_7311740)->elements[2];
++c_7313202.elements[2] = r_733697;
++c_7313202.elements[3] = ((closureN)self_7311740)->elements[3];
++
++return_direct_with_clo3(data,  __glo_Cyc_91map_91loop_911_scheme_base, (((closure)  __glo_Cyc_91map_91loop_911_scheme_base)->fn),  &c_7313202, primitive_cadr, ((closureN)self_7311740)->elements[0]);; 
++}
++
++static void __lambda_36(void *data, object self_7311741, int argc, object *args) /* object self_7311741, object r_733698 */
++ {
++ object r_733698 = args[0];
++  
++closureN_type c_7313204;
++object e_7313300 [3];
++c_7313204.hdr.mark = gc_color_red;
++ c_7313204.hdr.grayed = 0;
++c_7313204.tag = closureN_tag;
++ c_7313204.fn = (function_type)__lambda_37;
++c_7313204.num_args = 2;
++c_7313204.num_elements = 3;
++c_7313204.elements = (object *)e_7313300;
++c_7313204.elements[0] = ((closureN)self_7311741)->elements[0];
++c_7313204.elements[1] = ((closureN)self_7311741)->elements[1];
++c_7313204.elements[2] = ((closureN)self_7311741)->elements[3];
++
++return_direct_with_clo2(data,(closure)&c_7313204,__lambda_37,  ((closureN)self_7311741)->elements[2], r_733698);; 
++}
++
++static void __lambda_37(void *data, object self_7311742, int argc, object *args) /* object self_7311742, object vars_7328_732507, object vals_7329_732508 */
++ {
++ object vars_7328_732507 = args[0]; object vals_7329_732508 = args[1];
++    
++  
++if( (boolean_f != Cyc_is_symbol(Cyc_cadr(data, ((closureN)self_7311742)->elements[0]))) ){ 
++  
++closureN_type c_7313212;
++object e_7313279 [5];
++c_7313212.hdr.mark = gc_color_red;
++ c_7313212.hdr.grayed = 0;
++c_7313212.tag = closureN_tag;
++ c_7313212.fn = (function_type)__lambda_38;
++c_7313212.num_args = 1;
++c_7313212.num_elements = 5;
++c_7313212.elements = (object *)e_7313279;
++c_7313212.elements[0] = ((closureN)self_7311742)->elements[0];
++c_7313212.elements[1] = ((closureN)self_7311742)->elements[1];
++c_7313212.elements[2] = ((closureN)self_7311742)->elements[2];
++c_7313212.elements[3] = vals_7329_732508;
++c_7313212.elements[4] = vars_7328_732507;
++
++return_closcall2(data,  ((closureN)self_7311742)->elements[2],  &c_7313212, quote_lambda);
++} else { 
++  
++closureN_type c_7313282;
++object e_7313299 [4];
++c_7313282.hdr.mark = gc_color_red;
++ c_7313282.hdr.grayed = 0;
++c_7313282.tag = closureN_tag;
++ c_7313282.fn = (function_type)__lambda_41;
++c_7313282.num_args = 1;
++c_7313282.num_elements = 4;
++c_7313282.elements = (object *)e_7313299;
++c_7313282.elements[0] = ((closureN)self_7311742)->elements[0];
++c_7313282.elements[1] = ((closureN)self_7311742)->elements[1];
++c_7313282.elements[2] = vals_7329_732508;
++c_7313282.elements[3] = vars_7328_732507;
  
 -return_closcall2(data,  ((closureN)self_7312995)->elements[2],  &c_7314582, quote_lambda);}
-+return_closcall2(data,  ((closureN)self_7311749)->elements[2],  &c_7313289, quote_lambda);}
++return_closcall2(data,  ((closureN)self_7311742)->elements[2],  &c_7313282, quote_lambda);}
  ;; 
  }
  
 -static void __lambda_41(void *data, object self_7312999, int argc, object *args) /* object self_7312999, object r_734179 */
-+static void __lambda_41(void *data, object self_7311753, int argc, object *args) /* object self_7311753, object r_733734 */
++static void __lambda_41(void *data, object self_7311746, int argc, object *args) /* object self_7311746, object r_733727 */
   {
 - object r_734179 = args[0];
-+ object r_733734 = args[0];
++ object r_733727 = args[0];
    
 -pair_type local_7314587; 
-+pair_type local_7313294; 
++pair_type local_7313287; 
  
 -pair_type local_7314590; 
-+pair_type local_7313297; 
++pair_type local_7313290; 
  
 -pair_type local_7314593; 
-+pair_type local_7313300; 
++pair_type local_7313293; 
  
  
 -return_direct_with_clo1(data,  ((closureN)self_7312999)->elements[1], (((closure)  ((closureN)self_7312999)->elements[1])->fn),  set_pair_as_expr(&local_7314587, set_pair_as_expr(&local_7314590, r_734179, set_pair_as_expr(&local_7314593, ((closureN)self_7312999)->elements[3], Cyc_cddr(data, ((closureN)self_7312999)->elements[0]))), ((closureN)self_7312999)->elements[2]));; 
-+return_direct_with_clo1(data,  ((closureN)self_7311753)->elements[1], (((closure)  ((closureN)self_7311753)->elements[1])->fn),  set_pair_as_expr(&local_7313294, set_pair_as_expr(&local_7313297, r_733734, set_pair_as_expr(&local_7313300, ((closureN)self_7311753)->elements[3], Cyc_cddr(data, ((closureN)self_7311753)->elements[0]))), ((closureN)self_7311753)->elements[2]));; 
++return_direct_with_clo1(data,  ((closureN)self_7311746)->elements[1], (((closure)  ((closureN)self_7311746)->elements[1])->fn),  set_pair_as_expr(&local_7313287, set_pair_as_expr(&local_7313290, r_733727, set_pair_as_expr(&local_7313293, ((closureN)self_7311746)->elements[3], Cyc_cddr(data, ((closureN)self_7311746)->elements[0]))), ((closureN)self_7311746)->elements[2]));; 
  }
  
 -static void __lambda_38(void *data, object self_7312996, int argc, object *args) /* object self_7312996, object r_734153 */
-+static void __lambda_38(void *data, object self_7311750, int argc, object *args) /* object self_7311750, object r_733708 */
++static void __lambda_38(void *data, object self_7311743, int argc, object *args) /* object self_7311743, object r_733701 */
   {
 - object r_734153 = args[0];
-+ object r_733708 = args[0];
++ object r_733701 = args[0];
    
 -closureN_type c_7314515;
 -object e_7314578 [6];
@@ -66298,31 +66586,31 @@ Make let-values be the same as let*-values, to work around
 -c_7314515.elements[3] = ((closureN)self_7312996)->elements[2];
 -c_7314515.elements[4] = ((closureN)self_7312996)->elements[3];
 -c_7314515.elements[5] = ((closureN)self_7312996)->elements[4];
-+closureN_type c_7313222;
-+object e_7313285 [6];
-+c_7313222.hdr.mark = gc_color_red;
-+ c_7313222.hdr.grayed = 0;
-+c_7313222.tag = closureN_tag;
-+ c_7313222.fn = (function_type)__lambda_39;
-+c_7313222.num_args = 1;
-+c_7313222.num_elements = 6;
-+c_7313222.elements = (object *)e_7313285;
-+c_7313222.elements[0] = ((closureN)self_7311750)->elements[0];
-+c_7313222.elements[1] = ((closureN)self_7311750)->elements[1];
-+c_7313222.elements[2] = r_733708;
-+c_7313222.elements[3] = ((closureN)self_7311750)->elements[2];
-+c_7313222.elements[4] = ((closureN)self_7311750)->elements[3];
-+c_7313222.elements[5] = ((closureN)self_7311750)->elements[4];
++closureN_type c_7313215;
++object e_7313278 [6];
++c_7313215.hdr.mark = gc_color_red;
++ c_7313215.hdr.grayed = 0;
++c_7313215.tag = closureN_tag;
++ c_7313215.fn = (function_type)__lambda_39;
++c_7313215.num_args = 1;
++c_7313215.num_elements = 6;
++c_7313215.elements = (object *)e_7313278;
++c_7313215.elements[0] = ((closureN)self_7311743)->elements[0];
++c_7313215.elements[1] = ((closureN)self_7311743)->elements[1];
++c_7313215.elements[2] = r_733701;
++c_7313215.elements[3] = ((closureN)self_7311743)->elements[2];
++c_7313215.elements[4] = ((closureN)self_7311743)->elements[3];
++c_7313215.elements[5] = ((closureN)self_7311743)->elements[4];
  
 -return_closcall2(data,  ((closureN)self_7312996)->elements[2],  &c_7314515, quote_letrec);; 
-+return_closcall2(data,  ((closureN)self_7311750)->elements[2],  &c_7313222, quote_letrec);; 
++return_closcall2(data,  ((closureN)self_7311743)->elements[2],  &c_7313215, quote_letrec);; 
  }
  
 -static void __lambda_39(void *data, object self_7312997, int argc, object *args) /* object self_7312997, object r_734158 */
-+static void __lambda_39(void *data, object self_7311751, int argc, object *args) /* object self_7311751, object r_733713 */
++static void __lambda_39(void *data, object self_7311744, int argc, object *args) /* object self_7311744, object r_733706 */
   {
 - object r_734158 = args[0];
-+ object r_733713 = args[0];
++ object r_733706 = args[0];
    
 -closureN_type c_7314518;
 -object e_7314577 [6];
@@ -66339,108 +66627,108 @@ Make let-values be the same as let*-values, to work around
 -c_7314518.elements[3] = r_734158;
 -c_7314518.elements[4] = ((closureN)self_7312997)->elements[4];
 -c_7314518.elements[5] = ((closureN)self_7312997)->elements[5];
-+closureN_type c_7313225;
-+object e_7313284 [6];
-+c_7313225.hdr.mark = gc_color_red;
-+ c_7313225.hdr.grayed = 0;
-+c_7313225.tag = closureN_tag;
-+ c_7313225.fn = (function_type)__lambda_40;
-+c_7313225.num_args = 1;
-+c_7313225.num_elements = 6;
-+c_7313225.elements = (object *)e_7313284;
-+c_7313225.elements[0] = ((closureN)self_7311751)->elements[0];
-+c_7313225.elements[1] = ((closureN)self_7311751)->elements[1];
-+c_7313225.elements[2] = ((closureN)self_7311751)->elements[2];
-+c_7313225.elements[3] = r_733713;
-+c_7313225.elements[4] = ((closureN)self_7311751)->elements[4];
-+c_7313225.elements[5] = ((closureN)self_7311751)->elements[5];
++closureN_type c_7313218;
++object e_7313277 [6];
++c_7313218.hdr.mark = gc_color_red;
++ c_7313218.hdr.grayed = 0;
++c_7313218.tag = closureN_tag;
++ c_7313218.fn = (function_type)__lambda_40;
++c_7313218.num_args = 1;
++c_7313218.num_elements = 6;
++c_7313218.elements = (object *)e_7313277;
++c_7313218.elements[0] = ((closureN)self_7311744)->elements[0];
++c_7313218.elements[1] = ((closureN)self_7311744)->elements[1];
++c_7313218.elements[2] = ((closureN)self_7311744)->elements[2];
++c_7313218.elements[3] = r_733706;
++c_7313218.elements[4] = ((closureN)self_7311744)->elements[4];
++c_7313218.elements[5] = ((closureN)self_7311744)->elements[5];
  
 -return_closcall2(data,  ((closureN)self_7312997)->elements[3],  &c_7314518, quote_lambda);; 
-+return_closcall2(data,  ((closureN)self_7311751)->elements[3],  &c_7313225, quote_lambda);; 
++return_closcall2(data,  ((closureN)self_7311744)->elements[3],  &c_7313218, quote_lambda);; 
  }
  
 -static void __lambda_40(void *data, object self_7312998, int argc, object *args) /* object self_7312998, object r_734171 */
-+static void __lambda_40(void *data, object self_7311752, int argc, object *args) /* object self_7311752, object r_733726 */
++static void __lambda_40(void *data, object self_7311745, int argc, object *args) /* object self_7311745, object r_733719 */
   {
 - object r_734171 = args[0];
-+ object r_733726 = args[0];
++ object r_733719 = args[0];
    
 -pair_type local_7314523; 
-+pair_type local_7313230; 
++pair_type local_7313223; 
  
 -pair_type local_7314526; 
-+pair_type local_7313233; 
++pair_type local_7313226; 
  
 -pair_type local_7314530; 
-+pair_type local_7313237; 
++pair_type local_7313230; 
  
 -pair_type local_7314534; 
-+pair_type local_7313241; 
++pair_type local_7313234; 
  
 -pair_type local_7314537; 
-+pair_type local_7313244; 
++pair_type local_7313237; 
  
 -pair_type local_7314541; 
-+pair_type local_7313248; 
++pair_type local_7313241; 
  
 -pair_type local_7314544; 
-+pair_type local_7313251; 
++pair_type local_7313244; 
  
 -pair_type local_7314547; 
-+pair_type local_7313254; 
++pair_type local_7313247; 
  
  
  
 -pair_type local_7314553; 
-+pair_type local_7313260; 
++pair_type local_7313253; 
  
 -pair_type local_7314556; 
-+pair_type local_7313263; 
++pair_type local_7313256; 
  
 -pair_type local_7314559; 
-+pair_type local_7313266; 
++pair_type local_7313259; 
  
  
  
  
  
 -pair_type local_7314568; 
-+pair_type local_7313275; 
++pair_type local_7313268; 
  
 -pair_type local_7314571; 
-+pair_type local_7313278; 
++pair_type local_7313271; 
  
  
 -return_direct_with_clo1(data,  ((closureN)self_7312998)->elements[1], (((closure)  ((closureN)self_7312998)->elements[1])->fn),  set_pair_as_expr(&local_7314523, set_pair_as_expr(&local_7314526, ((closureN)self_7312998)->elements[2], set_pair_as_expr(&local_7314530, ((closureN)self_7312998)->elements[5], set_pair_as_expr(&local_7314534, set_pair_as_expr(&local_7314537, ((closureN)self_7312998)->elements[3], set_pair_as_expr(&local_7314541, set_pair_as_expr(&local_7314544, set_pair_as_expr(&local_7314547, Cyc_cadr(data, ((closureN)self_7312998)->elements[0]), set_pair_as_expr(&local_7314553, set_pair_as_expr(&local_7314556, r_734171, set_pair_as_expr(&local_7314559, ((closureN)self_7312998)->elements[5], Cyc_cdr(data, Cyc_cddr(data, ((closureN)self_7312998)->elements[0])))), NULL)), NULL), set_pair_as_expr(&local_7314568, set_pair_as_expr(&local_7314571, Cyc_cadr(data, ((closureN)self_7312998)->elements[0]), ((closureN)self_7312998)->elements[5]), NULL))), NULL))), ((closure
N)self_7312998)->elements[4]));; 
-+return_direct_with_clo1(data,  ((closureN)self_7311752)->elements[1], (((closure)  ((closureN)self_7311752)->elements[1])->fn),  set_pair_as_expr(&local_7313230, set_pair_as_expr(&local_7313233, ((closureN)self_7311752)->elements[2], set_pair_as_expr(&local_7313237, ((closureN)self_7311752)->elements[5], set_pair_as_expr(&local_7313241, set_pair_as_expr(&local_7313244, ((closureN)self_7311752)->elements[3], set_pair_as_expr(&local_7313248, set_pair_as_expr(&local_7313251, set_pair_as_expr(&local_7313254, Cyc_cadr(data, ((closureN)self_7311752)->elements[0]), set_pair_as_expr(&local_7313260, set_pair_as_expr(&local_7313263, r_733726, set_pair_as_expr(&local_7313266, ((closureN)self_7311752)->elements[5], Cyc_cdr(data, Cyc_cddr(data, ((closureN)self_7311752)->elements[0])))), NULL)), NULL), set_pair_as_expr(&local_7313275, set_pair_as_expr(&local_7313278, Cyc_cadr(data, ((closureN)self_7311752)->elements[0]), ((closureN)self_7311752)->elements[5]), NULL))), NULL))), ((closure
N)self_7311752)->elements[4]));; 
++return_direct_with_clo1(data,  ((closureN)self_7311745)->elements[1], (((closure)  ((closureN)self_7311745)->elements[1])->fn),  set_pair_as_expr(&local_7313223, set_pair_as_expr(&local_7313226, ((closureN)self_7311745)->elements[2], set_pair_as_expr(&local_7313230, ((closureN)self_7311745)->elements[5], set_pair_as_expr(&local_7313234, set_pair_as_expr(&local_7313237, ((closureN)self_7311745)->elements[3], set_pair_as_expr(&local_7313241, set_pair_as_expr(&local_7313244, set_pair_as_expr(&local_7313247, Cyc_cadr(data, ((closureN)self_7311745)->elements[0]), set_pair_as_expr(&local_7313253, set_pair_as_expr(&local_7313256, r_733719, set_pair_as_expr(&local_7313259, ((closureN)self_7311745)->elements[5], Cyc_cdr(data, Cyc_cddr(data, ((closureN)self_7311745)->elements[0])))), NULL)), NULL), set_pair_as_expr(&local_7313268, set_pair_as_expr(&local_7313271, Cyc_cadr(data, ((closureN)self_7311745)->elements[0]), ((closureN)self_7311745)->elements[5]), NULL))), NULL))), ((closure
N)self_7311745)->elements[4]));; 
  }
  
 -static void __lambda_31(void *data, object self_7313000, int argc, object *args) /* object self_7313000, object k_734190 */
-+static void __lambda_31(void *data, object self_7311754, int argc, object *args) /* object self_7311754, object k_733745 */
++static void __lambda_31(void *data, object self_7311747, int argc, object *args) /* object self_7311747, object k_733738 */
   {
 - object k_734190 = args[0];
 -    complex_num_type local_7314487; 
-+ object k_733745 = args[0];
-+    complex_num_type local_7313194; 
++ object k_733738 = args[0];
++    complex_num_type local_7313187; 
  if( (boolean_f != ((inline_function_type)
 -                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7314487, ((closureN)self_7313000)->elements[0])) ){ 
 -  return_direct_with_clo1(data,  k_734190, (((closure)  k_734190)->fn),  boolean_f);
-+                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7313194, ((closureN)self_7311754)->elements[0])) ){ 
-+  return_direct_with_clo1(data,  k_733745, (((closure)  k_733745)->fn),  boolean_f);
++                   ((closure)__glo_list_127_191_191inline_191_191_scheme_base)->fn)(data,&local_7313187, ((closureN)self_7311747)->elements[0])) ){ 
++  return_direct_with_clo1(data,  k_733738, (((closure)  k_733738)->fn),  boolean_f);
  } else { 
    
 -make_utf8_string_with_len(c_7314491, "bad let bindings", 16, 16);
 -return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  k_734190, &c_7314491, ((closureN)self_7313000)->elements[1]);}
-+make_utf8_string_with_len(c_7313198, "bad let bindings", 16, 16);
-+return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  k_733745, &c_7313198, ((closureN)self_7311754)->elements[1]);}
++make_utf8_string_with_len(c_7313191, "bad let bindings", 16, 16);
++return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  k_733738, &c_7313191, ((closureN)self_7311747)->elements[1]);}
  ;; 
  }
  
 -static void __lambda_28(void *data, object self_7313001, int argc, object *args) /* object self_7313001, object k_734196 */
-+static void __lambda_28(void *data, object self_7311755, int argc, object *args) /* object self_7311755, object k_733751 */
++static void __lambda_28(void *data, object self_7311748, int argc, object *args) /* object self_7311748, object k_733744 */
   {
 - object k_734196 = args[0];
-+ object k_733751 = args[0];
++ object k_733744 = args[0];
    
 -closureN_type c_7314452;
 -object e_7314461 [2];
@@ -66453,48 +66741,48 @@ Make let-values be the same as let*-values, to work around
 -c_7314452.elements = (object *)e_7314461;
 -c_7314452.elements[0] = ((closureN)self_7313001)->elements[0];
 -c_7314452.elements[1] = k_734196;
-+closureN_type c_7313159;
-+object e_7313168 [2];
-+c_7313159.hdr.mark = gc_color_red;
-+ c_7313159.hdr.grayed = 0;
-+c_7313159.tag = closureN_tag;
-+ c_7313159.fn = (function_type)__lambda_29;
-+c_7313159.num_args = 1;
-+c_7313159.num_elements = 2;
-+c_7313159.elements = (object *)e_7313168;
-+c_7313159.elements[0] = ((closureN)self_7311755)->elements[0];
-+c_7313159.elements[1] = k_733751;
++closureN_type c_7313152;
++object e_7313161 [2];
++c_7313152.hdr.mark = gc_color_red;
++ c_7313152.hdr.grayed = 0;
++c_7313152.tag = closureN_tag;
++ c_7313152.fn = (function_type)__lambda_29;
++c_7313152.num_args = 1;
++c_7313152.num_elements = 2;
++c_7313152.elements = (object *)e_7313161;
++c_7313152.elements[0] = ((closureN)self_7311748)->elements[0];
++c_7313152.elements[1] = k_733744;
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7314452,__lambda_29,  Cyc_cddr(data, ((closureN)self_7313001)->elements[0]));; 
-+return_direct_with_clo1(data,(closure)&c_7313159,__lambda_29,  Cyc_cddr(data, ((closureN)self_7311755)->elements[0]));; 
++return_direct_with_clo1(data,(closure)&c_7313152,__lambda_29,  Cyc_cddr(data, ((closureN)self_7311748)->elements[0]));; 
  }
  
 -static void __lambda_29(void *data, object self_7313002, int argc, object *args) /* object self_7313002, object r_734198 */
-+static void __lambda_29(void *data, object self_7311756, int argc, object *args) /* object self_7311756, object r_733753 */
++static void __lambda_29(void *data, object self_7311749, int argc, object *args) /* object self_7311749, object r_733746 */
   {
 - object r_734198 = args[0];
-+ object r_733753 = args[0];
++ object r_733746 = args[0];
      
 -if( (boolean_f != Cyc_is_null(r_734198)) ){ 
-+if( (boolean_f != Cyc_is_null(r_733753)) ){ 
++if( (boolean_f != Cyc_is_null(r_733746)) ){ 
    
 -make_utf8_string_with_len(c_7314457, "no let body", 11, 11);
 -return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7313002)->elements[1], &c_7314457, ((closureN)self_7313002)->elements[0]);
-+make_utf8_string_with_len(c_7313164, "no let body", 11, 11);
-+return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7311756)->elements[1], &c_7313164, ((closureN)self_7311756)->elements[0]);
++make_utf8_string_with_len(c_7313157, "no let body", 11, 11);
++return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7311749)->elements[1], &c_7313157, ((closureN)self_7311749)->elements[0]);
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7313002)->elements[1], (((closure)  ((closureN)self_7313002)->elements[1])->fn),  Cyc_VOID);}
-+  return_direct_with_clo1(data,  ((closureN)self_7311756)->elements[1], (((closure)  ((closureN)self_7311756)->elements[1])->fn),  Cyc_VOID);}
++  return_direct_with_clo1(data,  ((closureN)self_7311749)->elements[1], (((closure)  ((closureN)self_7311749)->elements[1])->fn),  Cyc_VOID);}
  ;; 
  }
  
 -static void __lambda_25(void *data, object self_7313003, int argc, object *args) /* object self_7313003, object k_734199 */
-+static void __lambda_25(void *data, object self_7311757, int argc, object *args) /* object self_7311757, object k_733754 */
++static void __lambda_25(void *data, object self_7311750, int argc, object *args) /* object self_7311750, object k_733747 */
   {
 - object k_734199 = args[0];
-+ object k_733754 = args[0];
++ object k_733747 = args[0];
    
 -closureN_type c_7314434;
 -object e_7314443 [2];
@@ -66507,65 +66795,64 @@ Make let-values be the same as let*-values, to work around
 -c_7314434.elements = (object *)e_7314443;
 -c_7314434.elements[0] = ((closureN)self_7313003)->elements[0];
 -c_7314434.elements[1] = k_734199;
-+closureN_type c_7313141;
-+object e_7313150 [2];
-+c_7313141.hdr.mark = gc_color_red;
-+ c_7313141.hdr.grayed = 0;
-+c_7313141.tag = closureN_tag;
-+ c_7313141.fn = (function_type)__lambda_26;
-+c_7313141.num_args = 1;
-+c_7313141.num_elements = 2;
-+c_7313141.elements = (object *)e_7313150;
-+c_7313141.elements[0] = ((closureN)self_7311757)->elements[0];
-+c_7313141.elements[1] = k_733754;
++closureN_type c_7313134;
++object e_7313143 [2];
++c_7313134.hdr.mark = gc_color_red;
++ c_7313134.hdr.grayed = 0;
++c_7313134.tag = closureN_tag;
++ c_7313134.fn = (function_type)__lambda_26;
++c_7313134.num_args = 1;
++c_7313134.num_elements = 2;
++c_7313134.elements = (object *)e_7313143;
++c_7313134.elements[0] = ((closureN)self_7311750)->elements[0];
++c_7313134.elements[1] = k_733747;
  
  
  
 -return_direct_with_clo1(data,(closure)&c_7314434,__lambda_26,  Cyc_cdr(data, ((closureN)self_7313003)->elements[0]));; 
-+return_direct_with_clo1(data,(closure)&c_7313141,__lambda_26,  Cyc_cdr(data, ((closureN)self_7311757)->elements[0]));; 
++return_direct_with_clo1(data,(closure)&c_7313134,__lambda_26,  Cyc_cdr(data, ((closureN)self_7311750)->elements[0]));; 
  }
  
 -static void __lambda_26(void *data, object self_7313004, int argc, object *args) /* object self_7313004, object r_734201 */
-+static void __lambda_26(void *data, object self_7311758, int argc, object *args) /* object self_7311758, object r_733756 */
++static void __lambda_26(void *data, object self_7311751, int argc, object *args) /* object self_7311751, object r_733749 */
   {
 - object r_734201 = args[0];
-+ object r_733756 = args[0];
++ object r_733749 = args[0];
      
 -if( (boolean_f != Cyc_is_null(r_734201)) ){ 
-+if( (boolean_f != Cyc_is_null(r_733756)) ){ 
++if( (boolean_f != Cyc_is_null(r_733749)) ){ 
    
 -make_utf8_string_with_len(c_7314439, "empty let", 9, 9);
 -return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7313004)->elements[1], &c_7314439, ((closureN)self_7313004)->elements[0]);
-+make_utf8_string_with_len(c_7313146, "empty let", 9, 9);
-+return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7311758)->elements[1], &c_7313146, ((closureN)self_7311758)->elements[0]);
++make_utf8_string_with_len(c_7313139, "empty let", 9, 9);
++return_direct_with_clo3(data,  __glo_error_95loc_scheme_base, (((closure)  __glo_error_95loc_scheme_base)->fn),  ((closureN)self_7311751)->elements[1], &c_7313139, ((closureN)self_7311751)->elements[0]);
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7313004)->elements[1], (((closure)  ((closureN)self_7313004)->elements[1])->fn),  Cyc_VOID);}
-+  return_direct_with_clo1(data,  ((closureN)self_7311758)->elements[1], (((closure)  ((closureN)self_7311758)->elements[1])->fn),  Cyc_VOID);}
++  return_direct_with_clo1(data,  ((closureN)self_7311751)->elements[1], (((closure)  ((closureN)self_7311751)->elements[1])->fn),  Cyc_VOID);}
  ;; 
  }
  
 -static void __lambda_17(void *data, object _, int argc, object *args) /* closure _,object k_734118, object expr_7313_732846, object rename_7314_732847, object compare_7315_732848 */
-+static void __lambda_17(void *data, object _, int argc, object *args) /* closure _,object k_733673, object expr_7313_732506, object rename_7314_732507, object compare_7315_732508 */
++static void __lambda_17(void *data, object _, int argc, object *args) /* closure _,object k_733666, object expr_7313_732499, object rename_7314_732500, object compare_7315_732501 */
   {
 -object k_734118 = args[0]; object expr_7313_732846 = args[1]; object rename_7314_732847 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:or");
-+object k_733673 = args[0]; object expr_7313_732506 = args[1]; object rename_7314_732507 = args[2];
-+  Cyc_st_add(data, "base.sld:or");
++object k_733666 = args[0]; object expr_7313_732499 = args[1]; object rename_7314_732500 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:or");
    
    
 -if( (boolean_f != Cyc_is_null(Cyc_cdr(data, expr_7313_732846))) ){ 
 -  return_direct_with_clo1(data,  k_734118, (((closure)  k_734118)->fn),  boolean_f);
-+if( (boolean_f != Cyc_is_null(Cyc_cdr(data, expr_7313_732506))) ){ 
-+  return_direct_with_clo1(data,  k_733673, (((closure)  k_733673)->fn),  boolean_f);
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, expr_7313_732499))) ){ 
++  return_direct_with_clo1(data,  k_733666, (((closure)  k_733666)->fn),  boolean_f);
  } else { 
      
    
 -if( (boolean_f != Cyc_is_null(Cyc_cddr(data, expr_7313_732846))) ){ 
-+if( (boolean_f != Cyc_is_null(Cyc_cddr(data, expr_7313_732506))) ){ 
++if( (boolean_f != Cyc_is_null(Cyc_cddr(data, expr_7313_732499))) ){ 
    
  
 -return_direct_with_clo1(data,  k_734118, (((closure)  k_734118)->fn),  Cyc_cadr(data, expr_7313_732846));
-+return_direct_with_clo1(data,  k_733673, (((closure)  k_733673)->fn),  Cyc_cadr(data, expr_7313_732506));
++return_direct_with_clo1(data,  k_733666, (((closure)  k_733666)->fn),  Cyc_cadr(data, expr_7313_732499));
  } else { 
    
 -closureN_type c_7314380;
@@ -66580,30 +66867,30 @@ Make let-values be the same as let*-values, to work around
 -c_7314380.elements[0] = expr_7313_732846;
 -c_7314380.elements[1] = k_734118;
 -c_7314380.elements[2] = rename_7314_732847;
-+closureN_type c_7313087;
-+object e_7313136 [3];
-+c_7313087.hdr.mark = gc_color_red;
-+ c_7313087.hdr.grayed = 0;
-+c_7313087.tag = closureN_tag;
-+ c_7313087.fn = (function_type)__lambda_18;
-+c_7313087.num_args = 1;
-+c_7313087.num_elements = 3;
-+c_7313087.elements = (object *)e_7313136;
-+c_7313087.elements[0] = expr_7313_732506;
-+c_7313087.elements[1] = k_733673;
-+c_7313087.elements[2] = rename_7314_732507;
++closureN_type c_7313080;
++object e_7313129 [3];
++c_7313080.hdr.mark = gc_color_red;
++ c_7313080.hdr.grayed = 0;
++c_7313080.tag = closureN_tag;
++ c_7313080.fn = (function_type)__lambda_18;
++c_7313080.num_args = 1;
++c_7313080.num_elements = 3;
++c_7313080.elements = (object *)e_7313129;
++c_7313080.elements[0] = expr_7313_732499;
++c_7313080.elements[1] = k_733666;
++c_7313080.elements[2] = rename_7314_732500;
  
 -return_closcall2(data,  rename_7314_732847,  &c_7314380, quote_let);}
-+return_closcall2(data,  rename_7314_732507,  &c_7313087, quote_let);}
++return_closcall2(data,  rename_7314_732500,  &c_7313080, quote_let);}
  ;}
  ;; 
  }
  
 -static void __lambda_18(void *data, object self_7312981, int argc, object *args) /* object self_7312981, object r_734121 */
-+static void __lambda_18(void *data, object self_7311735, int argc, object *args) /* object self_7311735, object r_733676 */
++static void __lambda_18(void *data, object self_7311728, int argc, object *args) /* object self_7311728, object r_733669 */
   {
 - object r_734121 = args[0];
-+ object r_733676 = args[0];
++ object r_733669 = args[0];
    
 -closureN_type c_7314383;
 -object e_7314428 [4];
@@ -66618,14 +66905,30 @@ Make let-values be the same as let*-values, to work around
 -c_7314383.elements[1] = ((closureN)self_7312981)->elements[1];
 -c_7314383.elements[2] = r_734121;
 -c_7314383.elements[3] = ((closureN)self_7312981)->elements[2];
--
++closureN_type c_7313083;
++object e_7313128 [4];
++c_7313083.hdr.mark = gc_color_red;
++ c_7313083.hdr.grayed = 0;
++c_7313083.tag = closureN_tag;
++ c_7313083.fn = (function_type)__lambda_19;
++c_7313083.num_args = 1;
++c_7313083.num_elements = 4;
++c_7313083.elements = (object *)e_7313128;
++c_7313083.elements[0] = ((closureN)self_7311728)->elements[0];
++c_7313083.elements[1] = ((closureN)self_7311728)->elements[1];
++c_7313083.elements[2] = r_733669;
++c_7313083.elements[3] = ((closureN)self_7311728)->elements[2];
+ 
 -return_closcall2(data,  ((closureN)self_7312981)->elements[2],  &c_7314383, quote_tmp);; 
--}
--
++return_closcall2(data,  ((closureN)self_7311728)->elements[2],  &c_7313083, quote_tmp);; 
+ }
+ 
 -static void __lambda_19(void *data, object self_7312982, int argc, object *args) /* object self_7312982, object r_734135 */
-- {
++static void __lambda_19(void *data, object self_7311729, int argc, object *args) /* object self_7311729, object r_733683 */
+  {
 - object r_734135 = args[0];
--  
++ object r_733683 = args[0];
+   
 -closureN_type c_7314386;
 -object e_7314427 [5];
 -c_7314386.hdr.mark = gc_color_red;
@@ -66640,14 +66943,31 @@ Make let-values be the same as let*-values, to work around
 -c_7314386.elements[2] = ((closureN)self_7312982)->elements[2];
 -c_7314386.elements[3] = r_734135;
 -c_7314386.elements[4] = ((closureN)self_7312982)->elements[3];
--
++closureN_type c_7313086;
++object e_7313127 [5];
++c_7313086.hdr.mark = gc_color_red;
++ c_7313086.hdr.grayed = 0;
++c_7313086.tag = closureN_tag;
++ c_7313086.fn = (function_type)__lambda_20;
++c_7313086.num_args = 1;
++c_7313086.num_elements = 5;
++c_7313086.elements = (object *)e_7313127;
++c_7313086.elements[0] = ((closureN)self_7311729)->elements[0];
++c_7313086.elements[1] = ((closureN)self_7311729)->elements[1];
++c_7313086.elements[2] = ((closureN)self_7311729)->elements[2];
++c_7313086.elements[3] = r_733683;
++c_7313086.elements[4] = ((closureN)self_7311729)->elements[3];
+ 
 -return_closcall2(data,  ((closureN)self_7312982)->elements[3],  &c_7314386, quote__if);; 
--}
--
++return_closcall2(data,  ((closureN)self_7311729)->elements[3],  &c_7313086, quote__if);; 
+ }
+ 
 -static void __lambda_20(void *data, object self_7312983, int argc, object *args) /* object self_7312983, object r_734124 */
-- {
++static void __lambda_20(void *data, object self_7311730, int argc, object *args) /* object self_7311730, object r_733672 */
+  {
 - object r_734124 = args[0];
--  
++ object r_733672 = args[0];
+   
 -closureN_type c_7314389;
 -object e_7314426 [6];
 -c_7314389.hdr.mark = gc_color_red;
@@ -66663,29 +66983,31 @@ Make let-values be the same as let*-values, to work around
 -c_7314389.elements[3] = r_734124;
 -c_7314389.elements[4] = ((closureN)self_7312983)->elements[3];
 -c_7314389.elements[5] = ((closureN)self_7312983)->elements[4];
-+closureN_type c_7313090;
-+object e_7313135 [4];
-+c_7313090.hdr.mark = gc_color_red;
-+ c_7313090.hdr.grayed = 0;
-+c_7313090.tag = closureN_tag;
-+ c_7313090.fn = (function_type)__lambda_19;
-+c_7313090.num_args = 1;
-+c_7313090.num_elements = 4;
-+c_7313090.elements = (object *)e_7313135;
-+c_7313090.elements[0] = ((closureN)self_7311735)->elements[0];
-+c_7313090.elements[1] = ((closureN)self_7311735)->elements[1];
-+c_7313090.elements[2] = r_733676;
-+c_7313090.elements[3] = ((closureN)self_7311735)->elements[2];
++closureN_type c_7313089;
++object e_7313126 [6];
++c_7313089.hdr.mark = gc_color_red;
++ c_7313089.hdr.grayed = 0;
++c_7313089.tag = closureN_tag;
++ c_7313089.fn = (function_type)__lambda_21;
++c_7313089.num_args = 1;
++c_7313089.num_elements = 6;
++c_7313089.elements = (object *)e_7313126;
++c_7313089.elements[0] = ((closureN)self_7311730)->elements[0];
++c_7313089.elements[1] = ((closureN)self_7311730)->elements[1];
++c_7313089.elements[2] = ((closureN)self_7311730)->elements[2];
++c_7313089.elements[3] = r_733672;
++c_7313089.elements[4] = ((closureN)self_7311730)->elements[3];
++c_7313089.elements[5] = ((closureN)self_7311730)->elements[4];
  
 -return_closcall2(data,  ((closureN)self_7312983)->elements[4],  &c_7314389, quote_tmp);; 
-+return_closcall2(data,  ((closureN)self_7311735)->elements[2],  &c_7313090, quote_tmp);; 
++return_closcall2(data,  ((closureN)self_7311730)->elements[4],  &c_7313089, quote_tmp);; 
  }
  
 -static void __lambda_21(void *data, object self_7312984, int argc, object *args) /* object self_7312984, object r_734125 */
-+static void __lambda_19(void *data, object self_7311736, int argc, object *args) /* object self_7311736, object r_733690 */
++static void __lambda_21(void *data, object self_7311731, int argc, object *args) /* object self_7311731, object r_733673 */
   {
 - object r_734125 = args[0];
-+ object r_733690 = args[0];
++ object r_733673 = args[0];
    
 -closureN_type c_7314392;
 -object e_7314425 [7];
@@ -66703,77 +67025,32 @@ Make let-values be the same as let*-values, to work around
 -c_7314392.elements[4] = r_734125;
 -c_7314392.elements[5] = ((closureN)self_7312984)->elements[4];
 -c_7314392.elements[6] = ((closureN)self_7312984)->elements[5];
-+closureN_type c_7313093;
-+object e_7313134 [5];
-+c_7313093.hdr.mark = gc_color_red;
-+ c_7313093.hdr.grayed = 0;
-+c_7313093.tag = closureN_tag;
-+ c_7313093.fn = (function_type)__lambda_20;
-+c_7313093.num_args = 1;
-+c_7313093.num_elements = 5;
-+c_7313093.elements = (object *)e_7313134;
-+c_7313093.elements[0] = ((closureN)self_7311736)->elements[0];
-+c_7313093.elements[1] = ((closureN)self_7311736)->elements[1];
-+c_7313093.elements[2] = ((closureN)self_7311736)->elements[2];
-+c_7313093.elements[3] = r_733690;
-+c_7313093.elements[4] = ((closureN)self_7311736)->elements[3];
-+
-+return_closcall2(data,  ((closureN)self_7311736)->elements[3],  &c_7313093, quote__if);; 
-+}
-+
-+static void __lambda_20(void *data, object self_7311737, int argc, object *args) /* object self_7311737, object r_733679 */
-+ {
-+ object r_733679 = args[0];
-+  
-+closureN_type c_7313096;
-+object e_7313133 [6];
-+c_7313096.hdr.mark = gc_color_red;
-+ c_7313096.hdr.grayed = 0;
-+c_7313096.tag = closureN_tag;
-+ c_7313096.fn = (function_type)__lambda_21;
-+c_7313096.num_args = 1;
-+c_7313096.num_elements = 6;
-+c_7313096.elements = (object *)e_7313133;
-+c_7313096.elements[0] = ((closureN)self_7311737)->elements[0];
-+c_7313096.elements[1] = ((closureN)self_7311737)->elements[1];
-+c_7313096.elements[2] = ((closureN)self_7311737)->elements[2];
-+c_7313096.elements[3] = r_733679;
-+c_7313096.elements[4] = ((closureN)self_7311737)->elements[3];
-+c_7313096.elements[5] = ((closureN)self_7311737)->elements[4];
-+
-+return_closcall2(data,  ((closureN)self_7311737)->elements[4],  &c_7313096, quote_tmp);; 
-+}
++closureN_type c_7313092;
++object e_7313125 [7];
++c_7313092.hdr.mark = gc_color_red;
++ c_7313092.hdr.grayed = 0;
++c_7313092.tag = closureN_tag;
++ c_7313092.fn = (function_type)__lambda_22;
++c_7313092.num_args = 1;
++c_7313092.num_elements = 7;
++c_7313092.elements = (object *)e_7313125;
++c_7313092.elements[0] = ((closureN)self_7311731)->elements[0];
++c_7313092.elements[1] = ((closureN)self_7311731)->elements[1];
++c_7313092.elements[2] = ((closureN)self_7311731)->elements[2];
++c_7313092.elements[3] = ((closureN)self_7311731)->elements[3];
++c_7313092.elements[4] = r_733673;
++c_7313092.elements[5] = ((closureN)self_7311731)->elements[4];
++c_7313092.elements[6] = ((closureN)self_7311731)->elements[5];
  
 -return_closcall2(data,  ((closureN)self_7312984)->elements[5],  &c_7314392, quote_tmp);; 
-+static void __lambda_21(void *data, object self_7311738, int argc, object *args) /* object self_7311738, object r_733680 */
-+ {
-+ object r_733680 = args[0];
-+  
-+closureN_type c_7313099;
-+object e_7313132 [7];
-+c_7313099.hdr.mark = gc_color_red;
-+ c_7313099.hdr.grayed = 0;
-+c_7313099.tag = closureN_tag;
-+ c_7313099.fn = (function_type)__lambda_22;
-+c_7313099.num_args = 1;
-+c_7313099.num_elements = 7;
-+c_7313099.elements = (object *)e_7313132;
-+c_7313099.elements[0] = ((closureN)self_7311738)->elements[0];
-+c_7313099.elements[1] = ((closureN)self_7311738)->elements[1];
-+c_7313099.elements[2] = ((closureN)self_7311738)->elements[2];
-+c_7313099.elements[3] = ((closureN)self_7311738)->elements[3];
-+c_7313099.elements[4] = r_733680;
-+c_7313099.elements[5] = ((closureN)self_7311738)->elements[4];
-+c_7313099.elements[6] = ((closureN)self_7311738)->elements[5];
-+
-+return_closcall2(data,  ((closureN)self_7311738)->elements[5],  &c_7313099, quote_tmp);; 
++return_closcall2(data,  ((closureN)self_7311731)->elements[5],  &c_7313092, quote_tmp);; 
  }
  
 -static void __lambda_22(void *data, object self_7312985, int argc, object *args) /* object self_7312985, object r_734126 */
-+static void __lambda_22(void *data, object self_7311739, int argc, object *args) /* object self_7311739, object r_733681 */
++static void __lambda_22(void *data, object self_7311732, int argc, object *args) /* object self_7311732, object r_733674 */
   {
 - object r_734126 = args[0];
-+ object r_733681 = args[0];
++ object r_733674 = args[0];
    
 -closureN_type c_7314395;
 -object e_7314424 [7];
@@ -66791,77 +67068,76 @@ Make let-values be the same as let*-values, to work around
 -c_7314395.elements[4] = ((closureN)self_7312985)->elements[4];
 -c_7314395.elements[5] = r_734126;
 -c_7314395.elements[6] = ((closureN)self_7312985)->elements[5];
-+closureN_type c_7313102;
-+object e_7313131 [7];
-+c_7313102.hdr.mark = gc_color_red;
-+ c_7313102.hdr.grayed = 0;
-+c_7313102.tag = closureN_tag;
-+ c_7313102.fn = (function_type)__lambda_23;
-+c_7313102.num_args = 1;
-+c_7313102.num_elements = 7;
-+c_7313102.elements = (object *)e_7313131;
-+c_7313102.elements[0] = ((closureN)self_7311739)->elements[0];
-+c_7313102.elements[1] = ((closureN)self_7311739)->elements[1];
-+c_7313102.elements[2] = ((closureN)self_7311739)->elements[2];
-+c_7313102.elements[3] = ((closureN)self_7311739)->elements[3];
-+c_7313102.elements[4] = ((closureN)self_7311739)->elements[4];
-+c_7313102.elements[5] = r_733681;
-+c_7313102.elements[6] = ((closureN)self_7311739)->elements[5];
++closureN_type c_7313095;
++object e_7313124 [7];
++c_7313095.hdr.mark = gc_color_red;
++ c_7313095.hdr.grayed = 0;
++c_7313095.tag = closureN_tag;
++ c_7313095.fn = (function_type)__lambda_23;
++c_7313095.num_args = 1;
++c_7313095.num_elements = 7;
++c_7313095.elements = (object *)e_7313124;
++c_7313095.elements[0] = ((closureN)self_7311732)->elements[0];
++c_7313095.elements[1] = ((closureN)self_7311732)->elements[1];
++c_7313095.elements[2] = ((closureN)self_7311732)->elements[2];
++c_7313095.elements[3] = ((closureN)self_7311732)->elements[3];
++c_7313095.elements[4] = ((closureN)self_7311732)->elements[4];
++c_7313095.elements[5] = r_733674;
++c_7313095.elements[6] = ((closureN)self_7311732)->elements[5];
  
 -return_closcall2(data,  ((closureN)self_7312985)->elements[6],  &c_7314395, quote_or);; 
-+return_closcall2(data,  ((closureN)self_7311739)->elements[6],  &c_7313102, quote_or);; 
++return_closcall2(data,  ((closureN)self_7311732)->elements[6],  &c_7313095, quote_or);; 
  }
  
 -static void __lambda_23(void *data, object self_7312986, int argc, object *args) /* object self_7312986, object r_734128 */
-+static void __lambda_23(void *data, object self_7311740, int argc, object *args) /* object self_7311740, object r_733683 */
++static void __lambda_23(void *data, object self_7311733, int argc, object *args) /* object self_7311733, object r_733676 */
   {
 - object r_734128 = args[0];
-+ object r_733683 = args[0];
++ object r_733676 = args[0];
    
 -list_3_type local_7314400; 
-+list_3_type local_7313107; 
++list_3_type local_7313100; 
  
 -pair_type local_7314404; 
-+pair_type local_7313111; 
++pair_type local_7313104; 
  
 -list_2_type local_7314407; 
-+list_2_type local_7313114; 
++list_2_type local_7313107; 
  
  
  
 -list_4_type local_7314414; 
-+list_4_type local_7313121; 
++list_4_type local_7313114; 
  
 -pair_type local_7314420; 
-+pair_type local_7313127; 
++pair_type local_7313120; 
  
  
 -return_direct_with_clo1(data,  ((closureN)self_7312986)->elements[1], (((closure)  ((closureN)self_7312986)->elements[1])->fn),  Cyc_fast_list_3(&local_7314400, ((closureN)self_7312986)->elements[2], set_cell_as_expr(&local_7314404, Cyc_fast_list_2(&local_7314407, ((closureN)self_7312986)->elements[6], Cyc_cadr(data, ((closureN)self_7312986)->elements[0]))), Cyc_fast_list_4(&local_7314414, ((closureN)self_7312986)->elements[3], ((closureN)self_7312986)->elements[4], ((closureN)self_7312986)->elements[5], set_pair_as_expr(&local_7314420, r_734128, Cyc_cddr(data, ((closureN)self_7312986)->elements[0])))));; 
-+return_direct_with_clo1(data,  ((closureN)self_7311740)->elements[1], (((closure)  ((closureN)self_7311740)->elements[1])->fn),  Cyc_fast_list_3(&local_7313107, ((closureN)self_7311740)->elements[2], set_cell_as_expr(&local_7313111, Cyc_fast_list_2(&local_7313114, ((closureN)self_7311740)->elements[6], Cyc_cadr(data, ((closureN)self_7311740)->elements[0]))), Cyc_fast_list_4(&local_7313121, ((closureN)self_7311740)->elements[3], ((closureN)self_7311740)->elements[4], ((closureN)self_7311740)->elements[5], set_pair_as_expr(&local_7313127, r_733683, Cyc_cddr(data, ((closureN)self_7311740)->elements[0])))));; 
++return_direct_with_clo1(data,  ((closureN)self_7311733)->elements[1], (((closure)  ((closureN)self_7311733)->elements[1])->fn),  Cyc_fast_list_3(&local_7313100, ((closureN)self_7311733)->elements[2], set_cell_as_expr(&local_7313104, Cyc_fast_list_2(&local_7313107, ((closureN)self_7311733)->elements[6], Cyc_cadr(data, ((closureN)self_7311733)->elements[0]))), Cyc_fast_list_4(&local_7313114, ((closureN)self_7311733)->elements[3], ((closureN)self_7311733)->elements[4], ((closureN)self_7311733)->elements[5], set_pair_as_expr(&local_7313120, r_733676, Cyc_cddr(data, ((closureN)self_7311733)->elements[0])))));; 
  }
  
 -static void __lambda_14(void *data, object _, int argc, object *args) /* closure _,object k_734104, object expr_733_732843, object rename_734_732844, object compare_735_732845 */
-+static void __lambda_14(void *data, object _, int argc, object *args) /* closure _,object k_733659, object expr_733_732503, object rename_734_732504, object compare_735_732505 */
++static void __lambda_14(void *data, object _, int argc, object *args) /* closure _,object k_733652, object expr_733_732496, object rename_734_732497, object compare_735_732498 */
   {
 -object k_734104 = args[0]; object expr_733_732843 = args[1]; object rename_734_732844 = args[2];
--  Cyc_st_add(data, "scheme/base.sld:and");
-+object k_733659 = args[0]; object expr_733_732503 = args[1]; object rename_734_732504 = args[2];
-+  Cyc_st_add(data, "base.sld:and");
++object k_733652 = args[0]; object expr_733_732496 = args[1]; object rename_734_732497 = args[2];
+   Cyc_st_add(data, "scheme/base.sld:and");
    
    
 -if( (boolean_f != Cyc_is_null(Cyc_cdr(data, expr_733_732843))) ){ 
 -  return_direct_with_clo1(data,  k_734104, (((closure)  k_734104)->fn),  boolean_t);
-+if( (boolean_f != Cyc_is_null(Cyc_cdr(data, expr_733_732503))) ){ 
-+  return_direct_with_clo1(data,  k_733659, (((closure)  k_733659)->fn),  boolean_t);
++if( (boolean_f != Cyc_is_null(Cyc_cdr(data, expr_733_732496))) ){ 
++  return_direct_with_clo1(data,  k_733652, (((closure)  k_733652)->fn),  boolean_t);
  } else { 
      
    
 -if( (boolean_f != Cyc_is_null(Cyc_cddr(data, expr_733_732843))) ){ 
-+if( (boolean_f != Cyc_is_null(Cyc_cddr(data, expr_733_732503))) ){ 
++if( (boolean_f != Cyc_is_null(Cyc_cddr(data, expr_733_732496))) ){ 
    
  
 -return_direct_with_clo1(data,  k_734104, (((closure)  k_734104)->fn),  Cyc_cadr(data, expr_733_732843));
-+return_direct_with_clo1(data,  k_733659, (((closure)  k_733659)->fn),  Cyc_cadr(data, expr_733_732503));
++return_direct_with_clo1(data,  k_733652, (((closure)  k_733652)->fn),  Cyc_cadr(data, expr_733_732496));
  } else { 
    
 -closureN_type c_7314345;
@@ -66876,30 +67152,30 @@ Make let-values be the same as let*-values, to work around
 -c_7314345.elements[0] = expr_733_732843;
 -c_7314345.elements[1] = k_734104;
 -c_7314345.elements[2] = rename_734_732844;
-+closureN_type c_7313052;
-+object e_7313072 [3];
-+c_7313052.hdr.mark = gc_color_red;
-+ c_7313052.hdr.grayed = 0;
-+c_7313052.tag = closureN_tag;
-+ c_7313052.fn = (function_type)__lambda_15;
-+c_7313052.num_args = 1;
-+c_7313052.num_elements = 3;
-+c_7313052.elements = (object *)e_7313072;
-+c_7313052.elements[0] = expr_733_732503;
-+c_7313052.elements[1] = k_733659;
-+c_7313052.elements[2] = rename_734_732504;
++closureN_type c_7313045;
++object e_7313065 [3];
++c_7313045.hdr.mark = gc_color_red;
++ c_7313045.hdr.grayed = 0;
++c_7313045.tag = closureN_tag;
++ c_7313045.fn = (function_type)__lambda_15;
++c_7313045.num_args = 1;
++c_7313045.num_elements = 3;
++c_7313045.elements = (object *)e_7313065;
++c_7313045.elements[0] = expr_733_732496;
++c_7313045.elements[1] = k_733652;
++c_7313045.elements[2] = rename_734_732497;
  
 -return_closcall2(data,  rename_734_732844,  &c_7314345, quote__if);}
-+return_closcall2(data,  rename_734_732504,  &c_7313052, quote__if);}
++return_closcall2(data,  rename_734_732497,  &c_7313045, quote__if);}
  ;}
  ;; 
  }
  
 -static void __lambda_15(void *data, object self_7312979, int argc, object *args) /* object self_7312979, object r_734107 */
-+static void __lambda_15(void *data, object self_7311733, int argc, object *args) /* object self_7311733, object r_733662 */
++static void __lambda_15(void *data, object self_7311726, int argc, object *args) /* object self_7311726, object r_733655 */
   {
 - object r_734107 = args[0];
-+ object r_733662 = args[0];
++ object r_733655 = args[0];
    
 -closureN_type c_7314348;
 -object e_7314364 [3];
@@ -66913,60 +67189,58 @@ Make let-values be the same as let*-values, to work around
 -c_7314348.elements[0] = ((closureN)self_7312979)->elements[0];
 -c_7314348.elements[1] = ((closureN)self_7312979)->elements[1];
 -c_7314348.elements[2] = r_734107;
-+closureN_type c_7313055;
-+object e_7313071 [3];
-+c_7313055.hdr.mark = gc_color_red;
-+ c_7313055.hdr.grayed = 0;
-+c_7313055.tag = closureN_tag;
-+ c_7313055.fn = (function_type)__lambda_16;
-+c_7313055.num_args = 1;
-+c_7313055.num_elements = 3;
-+c_7313055.elements = (object *)e_7313071;
-+c_7313055.elements[0] = ((closureN)self_7311733)->elements[0];
-+c_7313055.elements[1] = ((closureN)self_7311733)->elements[1];
-+c_7313055.elements[2] = r_733662;
++closureN_type c_7313048;
++object e_7313064 [3];
++c_7313048.hdr.mark = gc_color_red;
++ c_7313048.hdr.grayed = 0;
++c_7313048.tag = closureN_tag;
++ c_7313048.fn = (function_type)__lambda_16;
++c_7313048.num_args = 1;
++c_7313048.num_elements = 3;
++c_7313048.elements = (object *)e_7313064;
++c_7313048.elements[0] = ((closureN)self_7311726)->elements[0];
++c_7313048.elements[1] = ((closureN)self_7311726)->elements[1];
++c_7313048.elements[2] = r_733655;
  
 -return_closcall2(data,  ((closureN)self_7312979)->elements[2],  &c_7314348, quote_and);; 
-+return_closcall2(data,  ((closureN)self_7311733)->elements[2],  &c_7313055, quote_and);; 
++return_closcall2(data,  ((closureN)self_7311726)->elements[2],  &c_7313048, quote_and);; 
  }
  
 -static void __lambda_16(void *data, object self_7312980, int argc, object *args) /* object self_7312980, object r_734110 */
-+static void __lambda_16(void *data, object self_7311734, int argc, object *args) /* object self_7311734, object r_733665 */
++static void __lambda_16(void *data, object self_7311727, int argc, object *args) /* object self_7311727, object r_733658 */
   {
 - object r_734110 = args[0];
-+ object r_733665 = args[0];
++ object r_733658 = args[0];
    
 -list_4_type local_7314353; 
-+list_4_type local_7313060; 
++list_4_type local_7313053; 
  
  
  
 -pair_type local_7314360; 
-+pair_type local_7313067; 
++pair_type local_7313060; 
  
  
 -return_direct_with_clo1(data,  ((closureN)self_7312980)->elements[1], (((closure)  ((closureN)self_7312980)->elements[1])->fn),  Cyc_fast_list_4(&local_7314353, ((closureN)self_7312980)->elements[2], Cyc_cadr(data, ((closureN)self_7312980)->elements[0]), set_pair_as_expr(&local_7314360, r_734110, Cyc_cddr(data, ((closureN)self_7312980)->elements[0])), boolean_f));; 
-+return_direct_with_clo1(data,  ((closureN)self_7311734)->elements[1], (((closure)  ((closureN)self_7311734)->elements[1])->fn),  Cyc_fast_list_4(&local_7313060, ((closureN)self_7311734)->elements[2], Cyc_cadr(data, ((closureN)self_7311734)->elements[0]), set_pair_as_expr(&local_7313067, r_733665, Cyc_cddr(data, ((closureN)self_7311734)->elements[0])), boolean_f));; 
++return_direct_with_clo1(data,  ((closureN)self_7311727)->elements[1], (((closure)  ((closureN)self_7311727)->elements[1])->fn),  Cyc_fast_list_4(&local_7313053, ((closureN)self_7311727)->elements[2], Cyc_cadr(data, ((closureN)self_7311727)->elements[0]), set_pair_as_expr(&local_7313060, r_733658, Cyc_cddr(data, ((closureN)self_7311727)->elements[0])), boolean_f));; 
  }
  
 -static void __lambda_13(void *data, object _, int argc, object *args) /* closure _,object k_734101 */
-+static void __lambda_13(void *data, object _, int argc, object *args) /* closure _,object k_733656 */
++static void __lambda_13(void *data, object _, int argc, object *args) /* closure _,object k_733649 */
   {
 -object k_734101 = args[0];
--  Cyc_st_add(data, "scheme/base.sld:Cyc-version");
++object k_733649 = args[0];
+   Cyc_st_add(data, "scheme/base.sld:Cyc-version");
 -return_direct_with_clo1(data,  k_734101, (((closure)  k_734101)->fn),  __glo__85version_91number_85_scheme_cyclone_common);; 
-+object k_733656 = args[0];
-+  Cyc_st_add(data, "base.sld:Cyc-version");
-+return_direct_with_clo1(data,  k_733656, (((closure)  k_733656)->fn),  __glo__85version_91number_85_scheme_cyclone_common);; 
++return_direct_with_clo1(data,  k_733649, (((closure)  k_733649)->fn),  __glo__85version_91number_85_scheme_cyclone_common);; 
  }
  
 -static void __lambda_11(void *data, object _, int argc, object *args) /* closure _,object k_734097, object sym_732_732842 */
-+static void __lambda_11(void *data, object _, int argc, object *args) /* closure _,object k_733652, object sym_732_732502 */
++static void __lambda_11(void *data, object _, int argc, object *args) /* closure _,object k_733645, object sym_732_732495 */
   {
 -object k_734097 = args[0]; object sym_732_732842 = args[1];
--  Cyc_st_add(data, "scheme/base.sld:Cyc-add-feature!");
-+object k_733652 = args[0]; object sym_732_732502 = args[1];
-+  Cyc_st_add(data, "base.sld:Cyc-add-feature!");
++object k_733645 = args[0]; object sym_732_732495 = args[1];
+   Cyc_st_add(data, "scheme/base.sld:Cyc-add-feature!");
  
 -closureN_type c_7314319;
 -object e_7314325 [1];
@@ -66978,43 +67252,42 @@ Make let-values be the same as let*-values, to work around
 -c_7314319.num_elements = 1;
 -c_7314319.elements = (object *)e_7314325;
 -c_7314319.elements[0] = k_734097;
-+closureN_type c_7313026;
-+object e_7313032 [1];
-+c_7313026.hdr.mark = gc_color_red;
-+ c_7313026.hdr.grayed = 0;
-+c_7313026.tag = closureN_tag;
-+ c_7313026.fn = (function_type)__lambda_12;
-+c_7313026.num_args = 1;
-+c_7313026.num_elements = 1;
-+c_7313026.elements = (object *)e_7313032;
-+c_7313026.elements[0] = k_733652;
++closureN_type c_7313019;
++object e_7313025 [1];
++c_7313019.hdr.mark = gc_color_red;
++ c_7313019.hdr.grayed = 0;
++c_7313019.tag = closureN_tag;
++ c_7313019.fn = (function_type)__lambda_12;
++c_7313019.num_args = 1;
++c_7313019.num_elements = 1;
++c_7313019.elements = (object *)e_7313025;
++c_7313019.elements[0] = k_733645;
  
  
 -pair_type local_7314328; 
 -return_direct_with_clo1(data,(closure)&c_7314319,__lambda_12,  set_pair_as_expr(&local_7314328, sym_732_732842, __glo__85other_91features_85_scheme_base));; 
-+pair_type local_7313035; 
-+return_direct_with_clo1(data,(closure)&c_7313026,__lambda_12,  set_pair_as_expr(&local_7313035, sym_732_732502, __glo__85other_91features_85_scheme_base));; 
++pair_type local_7313028; 
++return_direct_with_clo1(data,(closure)&c_7313019,__lambda_12,  set_pair_as_expr(&local_7313028, sym_732_732495, __glo__85other_91features_85_scheme_base));; 
  }
  
 -static void __lambda_12(void *data, object self_7312978, int argc, object *args) /* object self_7312978, object r_734098 */
-+static void __lambda_12(void *data, object self_7311732, int argc, object *args) /* object self_7311732, object r_733653 */
++static void __lambda_12(void *data, object self_7311725, int argc, object *args) /* object self_7311725, object r_733646 */
   {
 - object r_734098 = args[0];
-+ object r_733653 = args[0];
++ object r_733646 = args[0];
    
 -object c_7314324 = global_set_cps_id(data,  ((closureN)self_7312978)->elements[0],"__glo__85other_91features_85_scheme_base", __glo__85other_91features_85_scheme_base, r_734098);
 -return_direct_with_clo1(data,  ((closureN)self_7312978)->elements[0], (((closure)  ((closureN)self_7312978)->elements[0])->fn),  c_7314324);; 
-+object c_7313031 = global_set_cps_id(data,  ((closureN)self_7311732)->elements[0],"__glo__85other_91features_85_scheme_base", __glo__85other_91features_85_scheme_base, r_733653);
-+return_direct_with_clo1(data,  ((closureN)self_7311732)->elements[0], (((closure)  ((closureN)self_7311732)->elements[0])->fn),  c_7313031);; 
++object c_7313024 = global_set_cps_id(data,  ((closureN)self_7311725)->elements[0],"__glo__85other_91features_85_scheme_base", __glo__85other_91features_85_scheme_base, r_733646);
++return_direct_with_clo1(data,  ((closureN)self_7311725)->elements[0], (((closure)  ((closureN)self_7311725)->elements[0])->fn),  c_7313024);; 
  }
  
 -static void __lambda_3(void *data, object _, int argc, object *args) /* closure _,object k_734076 */
-+static void __lambda_3(void *data, object _, int argc, object *args) /* closure _,object k_733631 */
++static void __lambda_3(void *data, object _, int argc, object *args) /* closure _,object k_733624 */
   {
 -object k_734076 = args[0];
--  Cyc_st_add(data, "scheme/base.sld:features");
-+object k_733631 = args[0];
-+  Cyc_st_add(data, "base.sld:features");
++object k_733624 = args[0];
+   Cyc_st_add(data, "scheme/base.sld:features");
  
 -closureN_type c_7314246;
 -object e_7314316 [1];
@@ -67026,27 +67299,14 @@ Make let-values be the same as let*-values, to work around
 -c_7314246.num_elements = 1;
 -c_7314246.elements = (object *)e_7314316;
 -c_7314246.elements[0] = k_734076;
-+closureN_type c_7312953;
-+object e_7313023 [1];
-+c_7312953.hdr.mark = gc_color_red;
-+ c_7312953.hdr.grayed = 0;
-+c_7312953.tag = closureN_tag;
-+ c_7312953.fn = (function_type)__lambda_4;
-+c_7312953.num_args = 1;
-+c_7312953.num_elements = 1;
-+c_7312953.elements = (object *)e_7313023;
-+c_7312953.elements[0] = k_733631;
- 
+-
 -return_direct_with_clo1(data,(closure)&c_7314246,__lambda_4,  __glo__85other_91features_85_scheme_base);; 
-+return_direct_with_clo1(data,(closure)&c_7312953,__lambda_4,  __glo__85other_91features_85_scheme_base);; 
- }
- 
+-}
+-
 -static void __lambda_4(void *data, object self_7312970, int argc, object *args) /* object self_7312970, object feats_731_732841 */
-+static void __lambda_4(void *data, object self_7311724, int argc, object *args) /* object self_7311724, object feats_731_732501 */
-  {
+- {
 - object feats_731_732841 = args[0];
-+ object feats_731_732501 = args[0];
-   
+-  
 -closureN_type c_7314248;
 -object e_7314312 [1];
 -c_7314248.hdr.mark = gc_color_red;
@@ -67057,30 +67317,16 @@ Make let-values be the same as let*-values, to work around
 -c_7314248.num_elements = 1;
 -c_7314248.elements = (object *)e_7314312;
 -c_7314248.elements[0] = ((closureN)self_7312970)->elements[0];
-+closureN_type c_7312955;
-+object e_7313019 [1];
-+c_7312955.hdr.mark = gc_color_red;
-+ c_7312955.hdr.grayed = 0;
-+c_7312955.tag = closureN_tag;
-+ c_7312955.fn = (function_type)__lambda_1285;
-+c_7312955.num_args = 1;
-+c_7312955.num_elements = 1;
-+c_7312955.elements = (object *)e_7313019;
-+c_7312955.elements[0] = ((closureN)self_7311724)->elements[0];
- 
- 
+-
+-
 -pair_type local_7314315; 
 -return_direct_with_clo1(data,(closure)&c_7314248,__lambda_1332,  set_cell_as_expr(&local_7314315, feats_731_732841));; 
-+pair_type local_7313022; 
-+return_direct_with_clo1(data,(closure)&c_7312955,__lambda_1285,  set_cell_as_expr(&local_7313022, feats_731_732501));; 
- }
- 
+-}
+-
 -static void __lambda_1332(void *data, object self_7312971, int argc, object *args) /* object self_7312971, object feats_731_732841 */
-+static void __lambda_1285(void *data, object self_7311725, int argc, object *args) /* object self_7311725, object feats_731_732501 */
-  {
+- {
 - object feats_731_732841 = args[0];
-+ object feats_731_732501 = args[0];
-   
+-  
 -closureN_type c_7314250;
 -object e_7314277 [1];
 -c_7314250.hdr.mark = gc_color_red;
@@ -67091,18 +67337,8 @@ Make let-values be the same as let*-values, to work around
 -c_7314250.num_elements = 1;
 -c_7314250.elements = (object *)e_7314277;
 -c_7314250.elements[0] = feats_731_732841;
-+closureN_type c_7312957;
-+object e_7312984 [1];
-+c_7312957.hdr.mark = gc_color_red;
-+ c_7312957.hdr.grayed = 0;
-+c_7312957.tag = closureN_tag;
-+ c_7312957.fn = (function_type)__lambda_5;
-+c_7312957.num_args = 0;
-+c_7312957.num_elements = 1;
-+c_7312957.elements = (object *)e_7312984;
-+c_7312957.elements[0] = feats_731_732501;
- 
- 
+-
+-
 -closureN_type c_7314278;
 -object e_7314311 [2];
 -c_7314278.hdr.mark = gc_color_red;
@@ -67114,26 +67350,45 @@ Make let-values be the same as let*-values, to work around
 -c_7314278.elements = (object *)e_7314311;
 -c_7314278.elements[0] = feats_731_732841;
 -c_7314278.elements[1] = ((closureN)self_7312971)->elements[0];
-+closureN_type c_7312985;
-+object e_7313018 [2];
-+c_7312985.hdr.mark = gc_color_red;
-+ c_7312985.hdr.grayed = 0;
-+c_7312985.tag = closureN_tag;
-+ c_7312985.fn = (function_type)__lambda_8;
-+c_7312985.num_args = 1;
-+c_7312985.num_elements = 2;
-+c_7312985.elements = (object *)e_7313018;
-+c_7312985.elements[0] = feats_731_732501;
-+c_7312985.elements[1] = ((closureN)self_7311725)->elements[0];
++closureN_type c_7312946;
++object e_7313016 [1];
++c_7312946.hdr.mark = gc_color_red;
++ c_7312946.hdr.grayed = 0;
++c_7312946.tag = closureN_tag;
++ c_7312946.fn = (function_type)__lambda_4;
++c_7312946.num_args = 1;
++c_7312946.num_elements = 1;
++c_7312946.elements = (object *)e_7313016;
++c_7312946.elements[0] = k_733624;
  
 -return_direct_with_clo1(data,(closure)&c_7314250,__lambda_5,  &c_7314278);; 
-+return_direct_with_clo1(data,(closure)&c_7312957,__lambda_5,  &c_7312985);; 
++return_direct_with_clo1(data,(closure)&c_7312946,__lambda_4,  __glo__85other_91features_85_scheme_base);; 
  }
  
 -static void __lambda_8(void *data, object self_7312972, int argc, object *args) /* object self_7312972, object r_734077 */
-+static void __lambda_8(void *data, object self_7311726, int argc, object *args) /* object self_7311726, object r_733632 */
++static void __lambda_4(void *data, object self_7311717, int argc, object *args) /* object self_7311717, object feats_731_732494 */
   {
- 
++ object feats_731_732494 = args[0];
++  
++closureN_type c_7312948;
++object e_7313012 [1];
++c_7312948.hdr.mark = gc_color_red;
++ c_7312948.hdr.grayed = 0;
++c_7312948.tag = closureN_tag;
++ c_7312948.fn = (function_type)__lambda_1285;
++c_7312948.num_args = 1;
++c_7312948.num_elements = 1;
++c_7312948.elements = (object *)e_7313012;
++c_7312948.elements[0] = ((closureN)self_7311717)->elements[0];
++
+ 
++pair_type local_7313015; 
++return_direct_with_clo1(data,(closure)&c_7312948,__lambda_1285,  set_cell_as_expr(&local_7313015, feats_731_732494));; 
++}
++
++static void __lambda_1285(void *data, object self_7311718, int argc, object *args) /* object self_7311718, object feats_731_732494 */
++ {
++ object feats_731_732494 = args[0];
    
 -closureN_type c_7314280;
 -object e_7314306 [2];
@@ -67146,33 +67401,41 @@ Make let-values be the same as let*-values, to work around
 -c_7314280.elements = (object *)e_7314306;
 -c_7314280.elements[0] = ((closureN)self_7312972)->elements[0];
 -c_7314280.elements[1] = ((closureN)self_7312972)->elements[1];
-+closureN_type c_7312987;
-+object e_7313013 [2];
-+c_7312987.hdr.mark = gc_color_red;
-+ c_7312987.hdr.grayed = 0;
-+c_7312987.tag = closureN_tag;
-+ c_7312987.fn = (function_type)__lambda_9;
-+c_7312987.num_args = 1;
-+c_7312987.num_elements = 2;
-+c_7312987.elements = (object *)e_7313013;
-+c_7312987.elements[0] = ((closureN)self_7311726)->elements[0];
-+c_7312987.elements[1] = ((closureN)self_7311726)->elements[1];
++closureN_type c_7312950;
++object e_7312977 [1];
++c_7312950.hdr.mark = gc_color_red;
++ c_7312950.hdr.grayed = 0;
++c_7312950.tag = closureN_tag;
++ c_7312950.fn = (function_type)__lambda_5;
++c_7312950.num_args = 0;
++c_7312950.num_elements = 1;
++c_7312950.elements = (object *)e_7312977;
++c_7312950.elements[0] = feats_731_732494;
  
  
 -make_utf8_string_with_len(c_7314310, "version-", 8, 8);
-+make_utf8_string_with_len(c_7313017, "version-", 8, 8);
++closureN_type c_7312978;
++object e_7313011 [2];
++c_7312978.hdr.mark = gc_color_red;
++ c_7312978.hdr.grayed = 0;
++c_7312978.tag = closureN_tag;
++ c_7312978.fn = (function_type)__lambda_8;
++c_7312978.num_args = 1;
++c_7312978.num_elements = 2;
++c_7312978.elements = (object *)e_7313011;
++c_7312978.elements[0] = feats_731_732494;
++c_7312978.elements[1] = ((closureN)self_7311718)->elements[0];
  
 -object c_7314309 = Cyc_string_append(data,(closure)&c_7314280,2,&c_7314310, __glo__85version_91number_85_scheme_cyclone_common);
 -return_closcall1(data,(closure)&c_7314280,  c_7314309);; 
-+object c_7313016 = Cyc_string_append(data,(closure)&c_7312987,2,&c_7313017, __glo__85version_91number_85_scheme_cyclone_common);
-+return_closcall1(data,(closure)&c_7312987,  c_7313016);; 
++return_direct_with_clo1(data,(closure)&c_7312950,__lambda_5,  &c_7312978);; 
  }
  
 -static void __lambda_9(void *data, object self_7312973, int argc, object *args) /* object self_7312973, object r_734085 */
-+static void __lambda_9(void *data, object self_7311727, int argc, object *args) /* object self_7311727, object r_733640 */
++static void __lambda_8(void *data, object self_7311719, int argc, object *args) /* object self_7311719, object r_733625 */
   {
 - object r_734085 = args[0];
-+ object r_733640 = args[0];
++
    
 -closureN_type c_7314282;
 -object e_7314302 [3];
@@ -67186,55 +67449,78 @@ Make let-values be the same as let*-values, to work around
 -c_7314282.elements[0] = ((closureN)self_7312973)->elements[0];
 -c_7314282.elements[1] = ((closureN)self_7312973)->elements[1];
 -c_7314282.elements[2] = r_734085;
-+closureN_type c_7312989;
-+object e_7313009 [3];
-+c_7312989.hdr.mark = gc_color_red;
-+ c_7312989.hdr.grayed = 0;
-+c_7312989.tag = closureN_tag;
-+ c_7312989.fn = (function_type)__lambda_10;
-+c_7312989.num_args = 1;
-+c_7312989.num_elements = 3;
-+c_7312989.elements = (object *)e_7313009;
-+c_7312989.elements[0] = ((closureN)self_7311727)->elements[0];
-+c_7312989.elements[1] = ((closureN)self_7311727)->elements[1];
-+c_7312989.elements[2] = r_733640;
++closureN_type c_7312980;
++object e_7313006 [2];
++c_7312980.hdr.mark = gc_color_red;
++ c_7312980.hdr.grayed = 0;
++c_7312980.tag = closureN_tag;
++ c_7312980.fn = (function_type)__lambda_9;
++c_7312980.num_args = 1;
++c_7312980.num_elements = 2;
++c_7312980.elements = (object *)e_7313006;
++c_7312980.elements[0] = ((closureN)self_7311719)->elements[0];
++c_7312980.elements[1] = ((closureN)self_7311719)->elements[1];
++
  
++make_utf8_string_with_len(c_7313010, "version-", 8, 8);
  
 -object c_7314305 = Cyc_compilation_environment(data,(closure)&c_7314282,quote_platform);
 -return_closcall1(data,(closure)&c_7314282,  c_7314305);; 
-+object c_7313012 = Cyc_compilation_environment(data,(closure)&c_7312989,quote_platform);
-+return_closcall1(data,(closure)&c_7312989,  c_7313012);; 
++object c_7313009 = Cyc_string_append(data,(closure)&c_7312980,2,&c_7313010, __glo__85version_91number_85_scheme_cyclone_common);
++return_closcall1(data,(closure)&c_7312980,  c_7313009);; 
  }
  
 -static void __lambda_10(void *data, object self_7312974, int argc, object *args) /* object self_7312974, object r_734083 */
-+static void __lambda_10(void *data, object self_7311728, int argc, object *args) /* object self_7311728, object r_733638 */
++static void __lambda_9(void *data, object self_7311720, int argc, object *args) /* object self_7311720, object r_733633 */
   {
 - object r_734083 = args[0];
-+ object r_733638 = args[0];
++ object r_733633 = args[0];
    
 -pair_type local_7314287; 
-+pair_type local_7312994; 
++closureN_type c_7312982;
++object e_7313002 [3];
++c_7312982.hdr.mark = gc_color_red;
++ c_7312982.hdr.grayed = 0;
++c_7312982.tag = closureN_tag;
++ c_7312982.fn = (function_type)__lambda_10;
++c_7312982.num_args = 1;
++c_7312982.num_elements = 3;
++c_7312982.elements = (object *)e_7313002;
++c_7312982.elements[0] = ((closureN)self_7311720)->elements[0];
++c_7312982.elements[1] = ((closureN)self_7311720)->elements[1];
++c_7312982.elements[2] = r_733633;
  
 -pair_type local_7314290; 
-+pair_type local_7312997; 
  
++object c_7313005 = Cyc_compilation_environment(data,(closure)&c_7312982,quote_platform);
++return_closcall1(data,(closure)&c_7312982,  c_7313005);; 
++}
  
++static void __lambda_10(void *data, object self_7311721, int argc, object *args) /* object self_7311721, object r_733631 */
++ {
++ object r_733631 = args[0];
++  
++pair_type local_7312987; 
  
 -pair_type local_7314296; 
-+pair_type local_7313003; 
++pair_type local_7312990; 
  
  
  
++pair_type local_7312996; 
  
 -return_direct_with_clo1(data,  ((closureN)self_7312974)->elements[1], (((closure)  ((closureN)self_7312974)->elements[1])->fn),  set_pair_as_expr(&local_7314287, quote_cyclone, set_pair_as_expr(&local_7314290, Cyc_string2symbol(data, ((closureN)self_7312974)->elements[2]), set_pair_as_expr(&local_7314296, Cyc_string2symbol(data, r_734083), car(((closureN)self_7312974)->elements[0])))));; 
-+return_direct_with_clo1(data,  ((closureN)self_7311728)->elements[1], (((closure)  ((closureN)self_7311728)->elements[1])->fn),  set_pair_as_expr(&local_7312994, quote_cyclone, set_pair_as_expr(&local_7312997, Cyc_string2symbol(data, ((closureN)self_7311728)->elements[2]), set_pair_as_expr(&local_7313003, Cyc_string2symbol(data, r_733638), car(((closureN)self_7311728)->elements[0])))));; 
++
++
++
++return_direct_with_clo1(data,  ((closureN)self_7311721)->elements[1], (((closure)  ((closureN)self_7311721)->elements[1])->fn),  set_pair_as_expr(&local_7312987, quote_cyclone, set_pair_as_expr(&local_7312990, Cyc_string2symbol(data, ((closureN)self_7311721)->elements[2]), set_pair_as_expr(&local_7312996, Cyc_string2symbol(data, r_733631), car(((closureN)self_7311721)->elements[0])))));; 
  }
  
 -static void __lambda_5(void *data, object self_7312975, int argc, object *args) /* object self_7312975, object k_734086 */
-+static void __lambda_5(void *data, object self_7311729, int argc, object *args) /* object self_7311729, object k_733641 */
++static void __lambda_5(void *data, object self_7311722, int argc, object *args) /* object self_7311722, object k_733634 */
   {
 - object k_734086 = args[0];
-+ object k_733641 = args[0];
++ object k_733634 = args[0];
    
 -closureN_type c_7314252;
 -object e_7314273 [2];
@@ -67247,34 +67533,34 @@ Make let-values be the same as let*-values, to work around
 -c_7314252.elements = (object *)e_7314273;
 -c_7314252.elements[0] = ((closureN)self_7312975)->elements[0];
 -c_7314252.elements[1] = k_734086;
-+closureN_type c_7312959;
-+object e_7312980 [2];
-+c_7312959.hdr.mark = gc_color_red;
-+ c_7312959.hdr.grayed = 0;
-+c_7312959.tag = closureN_tag;
-+ c_7312959.fn = (function_type)__lambda_6;
-+c_7312959.num_args = 1;
-+c_7312959.num_elements = 2;
-+c_7312959.elements = (object *)e_7312980;
-+c_7312959.elements[0] = ((closureN)self_7311729)->elements[0];
-+c_7312959.elements[1] = k_733641;
++closureN_type c_7312952;
++object e_7312973 [2];
++c_7312952.hdr.mark = gc_color_red;
++ c_7312952.hdr.grayed = 0;
++c_7312952.tag = closureN_tag;
++ c_7312952.fn = (function_type)__lambda_6;
++c_7312952.num_args = 1;
++c_7312952.num_elements = 2;
++c_7312952.elements = (object *)e_7312973;
++c_7312952.elements[0] = ((closureN)self_7311722)->elements[0];
++c_7312952.elements[1] = k_733634;
  
  
 -object c_7314276 = Cyc_compilation_environment(data,(closure)&c_7314252,quote_memory_91streams);
 -return_closcall1(data,(closure)&c_7314252,  c_7314276);; 
-+object c_7312983 = Cyc_compilation_environment(data,(closure)&c_7312959,quote_memory_91streams);
-+return_closcall1(data,(closure)&c_7312959,  c_7312983);; 
++object c_7312976 = Cyc_compilation_environment(data,(closure)&c_7312952,quote_memory_91streams);
++return_closcall1(data,(closure)&c_7312952,  c_7312976);; 
  }
  
 -static void __lambda_6(void *data, object self_7312976, int argc, object *args) /* object self_7312976, object r_734091 */
-+static void __lambda_6(void *data, object self_7311730, int argc, object *args) /* object self_7311730, object r_733646 */
++static void __lambda_6(void *data, object self_7311723, int argc, object *args) /* object self_7311723, object r_733639 */
   {
 - object r_734091 = args[0];
-+ object r_733646 = args[0];
++ object r_733639 = args[0];
      
    
 -if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_string_length(data, r_734091), obj_int2obj(0))) ){ 
-+if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_string_length(data, r_733646), obj_int2obj(0))) ){ 
++if( (boolean_f != Cyc_num_fast_gt_op(data, Cyc_string_length(data, r_733639), obj_int2obj(0))) ){ 
    
 -closureN_type c_7314258;
 -object e_7314264 [2];
@@ -67287,51 +67573,52 @@ Make let-values be the same as let*-values, to work around
 -c_7314258.elements = (object *)e_7314264;
 -c_7314258.elements[0] = ((closureN)self_7312976)->elements[0];
 -c_7314258.elements[1] = ((closureN)self_7312976)->elements[1];
-+closureN_type c_7312965;
-+object e_7312971 [2];
-+c_7312965.hdr.mark = gc_color_red;
-+ c_7312965.hdr.grayed = 0;
-+c_7312965.tag = closureN_tag;
-+ c_7312965.fn = (function_type)__lambda_7;
-+c_7312965.num_args = 1;
-+c_7312965.num_elements = 2;
-+c_7312965.elements = (object *)e_7312971;
-+c_7312965.elements[0] = ((closureN)self_7311730)->elements[0];
-+c_7312965.elements[1] = ((closureN)self_7311730)->elements[1];
++closureN_type c_7312958;
++object e_7312964 [2];
++c_7312958.hdr.mark = gc_color_red;
++ c_7312958.hdr.grayed = 0;
++c_7312958.tag = closureN_tag;
++ c_7312958.fn = (function_type)__lambda_7;
++c_7312958.num_args = 1;
++c_7312958.num_elements = 2;
++c_7312958.elements = (object *)e_7312964;
++c_7312958.elements[0] = ((closureN)self_7311723)->elements[0];
++c_7312958.elements[1] = ((closureN)self_7311723)->elements[1];
  
  
 -pair_type local_7314267; 
-+pair_type local_7312974; 
++pair_type local_7312967; 
  
  
 -return_direct_with_clo1(data,(closure)&c_7314258,__lambda_7,  set_pair_as_expr(&local_7314267, quote_memory_91streams, car(((closureN)self_7312976)->elements[0])));
-+return_direct_with_clo1(data,(closure)&c_7312965,__lambda_7,  set_pair_as_expr(&local_7312974, quote_memory_91streams, car(((closureN)self_7311730)->elements[0])));
++return_direct_with_clo1(data,(closure)&c_7312958,__lambda_7,  set_pair_as_expr(&local_7312967, quote_memory_91streams, car(((closureN)self_7311723)->elements[0])));
  } else { 
 -  return_direct_with_clo1(data,  ((closureN)self_7312976)->elements[1], (((closure)  ((closureN)self_7312976)->elements[1])->fn),  Cyc_VOID);}
-+  return_direct_with_clo1(data,  ((closureN)self_7311730)->elements[1], (((closure)  ((closureN)self_7311730)->elements[1])->fn),  Cyc_VOID);}
++  return_direct_with_clo1(data,  ((closureN)self_7311723)->elements[1], (((closure)  ((closureN)self_7311723)->elements[1])->fn),  Cyc_VOID);}
  ;; 
  }
  
 -static void __lambda_7(void *data, object self_7312977, int argc, object *args) /* object self_7312977, object r_734088 */
-+static void __lambda_7(void *data, object self_7311731, int argc, object *args) /* object self_7311731, object r_733643 */
++static void __lambda_7(void *data, object self_7311724, int argc, object *args) /* object self_7311724, object r_733636 */
   {
 - object r_734088 = args[0];
-+ object r_733643 = args[0];
++ object r_733636 = args[0];
    
  
 -return_direct_with_clo1(data,  ((closureN)self_7312977)->elements[1], (((closure)  ((closureN)self_7312977)->elements[1])->fn),  Cyc_set_cell(data, ((closureN)self_7312977)->elements[0], r_734088));; 
-+return_direct_with_clo1(data,  ((closureN)self_7311731)->elements[1], (((closure)  ((closureN)self_7311731)->elements[1])->fn),  Cyc_set_cell(data, ((closureN)self_7311731)->elements[0], r_733643));; 
++return_direct_with_clo1(data,  ((closureN)self_7311724)->elements[1], (((closure)  ((closureN)self_7311724)->elements[1])->fn),  Cyc_set_cell(data, ((closureN)self_7311724)->elements[0], r_733636));; 
  }
  
  static void __lambda_1(void *data, object _, int argc, object *args) /* closure _,object k, object f */
-  {
+@@ -40506,80 +38709,80 @@ static void __lambda_1(void *data, objec
  object k = args[0]; object f = args[1];
--  Cyc_st_add(data, "scheme/base.sld:call/cc");
-+  Cyc_st_add(data, "base.sld:call/cc");
+   Cyc_st_add(data, "scheme/base.sld:call/cc");
  
 -closureN_type c_7314240;
 -object e_7314243 [1];
--Cyc_check_proc(data, f);
++closureN_type c_7312940;
++object e_7312943 [1];
+ Cyc_check_proc(data, f);
 -c_7314240.hdr.mark = gc_color_red;
 - c_7314240.hdr.grayed = 0;
 -c_7314240.tag = closureN_tag;
@@ -67340,27 +67627,25 @@ Make let-values be the same as let*-values, to work around
 -c_7314240.num_elements = 1;
 -c_7314240.elements = (object *)e_7314243;
 -c_7314240.elements[0] = k;
-+closureN_type c_7312947;
-+object e_7312950 [1];
-+c_7312947.hdr.mark = gc_color_red;
-+ c_7312947.hdr.grayed = 0;
-+c_7312947.tag = closureN_tag;
-+ c_7312947.fn = (function_type)__lambda_2;
-+c_7312947.num_args = 2;
-+c_7312947.num_elements = 1;
-+c_7312947.elements = (object *)e_7312950;
-+c_7312947.elements[0] = k;
++c_7312940.hdr.mark = gc_color_red;
++ c_7312940.hdr.grayed = 0;
++c_7312940.tag = closureN_tag;
++ c_7312940.fn = (function_type)__lambda_2;
++c_7312940.num_args = 1;
++c_7312940.num_elements = 1;
++c_7312940.elements = (object *)e_7312943;
++c_7312940.elements[0] = k;
  
 -return_closcall2(data,  f,  k, &c_7314240);; 
-+return_closcall2(data,  f,  k, &c_7312947);; 
++return_closcall2(data,  f,  k, &c_7312940);; 
  }
  
 -static void __lambda_2(void *data, object self_7312969, int argc, object *args) /* object self_7312969, object _191, object result */
-+static void __lambda_2(void *data, object self_7311723, int argc, object *args) /* object self_7311723, object _191, object result */
++static void __lambda_2(void *data, object self_7311716, int argc, object *args) /* object self_7311716, object _191, object result */
   {
   object result = args[1];
 -  return_closcall1(data,  ((closureN)self_7312969)->elements[0],  result);; 
-+  return_closcall1(data,  ((closureN)self_7311723)->elements[0],  result);; 
++  return_closcall1(data,  ((closureN)self_7311716)->elements[0],  result);; 
  }
  
  void c_schemebase_inlinable_lambdas(void *data, object clo, int argc, object *args){ 
@@ -67414,63 +67699,63 @@ Make let-values be the same as let*-values, to work around
 -make_pair(c_7328652, &pair_7328647, &c_7328653);
 -make_pair(c_7328651, &pair_7328648, &c_7328652);
 -make_pair(c_7328650, &pair_7328649, &c_7328651);
-+make_pair(pair_7326173, find_or_add_symbol("make-record-marker"), find_or_add_symbol("make-record-marker__inline__"));
-+make_pair(pair_7326174, find_or_add_symbol("void"), find_or_add_symbol("void__inline__"));
-+make_pair(pair_7326175, find_or_add_symbol("eof-object"), find_or_add_symbol("eof-object__inline__"));
-+make_pair(pair_7326176, find_or_add_symbol("square"), find_or_add_symbol("square__inline__"));
-+make_pair(pair_7326177, find_or_add_symbol("quotient"), find_or_add_symbol("quotient__inline__"));
-+make_pair(pair_7326178, find_or_add_symbol("complex?"), find_or_add_symbol("complex?__inline__"));
-+make_pair(pair_7326179, find_or_add_symbol("exact?"), find_or_add_symbol("exact?__inline__"));
-+make_pair(pair_7326180, find_or_add_symbol("exact-integer?"), find_or_add_symbol("exact-integer?__inline__"));
-+make_pair(pair_7326181, find_or_add_symbol("sqrt"), find_or_add_symbol("sqrt__inline__"));
-+make_pair(pair_7326182, find_or_add_symbol("inexact"), find_or_add_symbol("inexact__inline__"));
-+make_pair(pair_7326183, find_or_add_symbol("round"), find_or_add_symbol("round__inline__"));
-+make_pair(pair_7326184, find_or_add_symbol("truncate"), find_or_add_symbol("truncate__inline__"));
-+make_pair(pair_7326185, find_or_add_symbol("ceiling"), find_or_add_symbol("ceiling__inline__"));
-+make_pair(pair_7326186, find_or_add_symbol("floor"), find_or_add_symbol("floor__inline__"));
-+make_pair(pair_7326187, find_or_add_symbol("negative?"), find_or_add_symbol("negative?__inline__"));
-+make_pair(pair_7326188, find_or_add_symbol("positive?"), find_or_add_symbol("positive?__inline__"));
-+make_pair(pair_7326189, find_or_add_symbol("zero?"), find_or_add_symbol("zero?__inline__"));
-+make_pair(pair_7326190, find_or_add_symbol("list?"), find_or_add_symbol("list?__inline__"));
-+make_pair(pair_7326191, find_or_add_symbol("not"), find_or_add_symbol("not__inline__"));
-+make_pair(pair_7326192, find_or_add_symbol("%write-bytevector"), find_or_add_symbol("%write-bytevector__inline__"));
-+make_pair(pair_7326193, find_or_add_symbol("fast-string>=?"), find_or_add_symbol("fast-string>=?__inline__"));
-+make_pair(pair_7326194, find_or_add_symbol("fast-string>?"), find_or_add_symbol("fast-string>?__inline__"));
-+make_pair(pair_7326195, find_or_add_symbol("fast-string<=?"), find_or_add_symbol("fast-string<=?__inline__"));
-+make_pair(pair_7326196, find_or_add_symbol("fast-string<?"), find_or_add_symbol("fast-string<?__inline__"));
-+make_pair(pair_7326197, find_or_add_symbol("fast-string=?"), find_or_add_symbol("fast-string=?__inline__"));
-+make_pair(c_7326222, &pair_7326173, NULL);
-+make_pair(c_7326221, &pair_7326174, &c_7326222);
-+make_pair(c_7326220, &pair_7326175, &c_7326221);
-+make_pair(c_7326219, &pair_7326176, &c_7326220);
-+make_pair(c_7326218, &pair_7326177, &c_7326219);
-+make_pair(c_7326217, &pair_7326178, &c_7326218);
-+make_pair(c_7326216, &pair_7326179, &c_7326217);
-+make_pair(c_7326215, &pair_7326180, &c_7326216);
-+make_pair(c_7326214, &pair_7326181, &c_7326215);
-+make_pair(c_7326213, &pair_7326182, &c_7326214);
-+make_pair(c_7326212, &pair_7326183, &c_7326213);
-+make_pair(c_7326211, &pair_7326184, &c_7326212);
-+make_pair(c_7326210, &pair_7326185, &c_7326211);
-+make_pair(c_7326209, &pair_7326186, &c_7326210);
-+make_pair(c_7326208, &pair_7326187, &c_7326209);
-+make_pair(c_7326207, &pair_7326188, &c_7326208);
-+make_pair(c_7326206, &pair_7326189, &c_7326207);
-+make_pair(c_7326205, &pair_7326190, &c_7326206);
-+make_pair(c_7326204, &pair_7326191, &c_7326205);
-+make_pair(c_7326203, &pair_7326192, &c_7326204);
-+make_pair(c_7326202, &pair_7326193, &c_7326203);
-+make_pair(c_7326201, &pair_7326194, &c_7326202);
-+make_pair(c_7326200, &pair_7326195, &c_7326201);
-+make_pair(c_7326199, &pair_7326196, &c_7326200);
-+make_pair(c_7326198, &pair_7326197, &c_7326199);
++make_pair(pair_7326166, find_or_add_symbol("make-record-marker"), find_or_add_symbol("make-record-marker__inline__"));
++make_pair(pair_7326167, find_or_add_symbol("void"), find_or_add_symbol("void__inline__"));
++make_pair(pair_7326168, find_or_add_symbol("eof-object"), find_or_add_symbol("eof-object__inline__"));
++make_pair(pair_7326169, find_or_add_symbol("square"), find_or_add_symbol("square__inline__"));
++make_pair(pair_7326170, find_or_add_symbol("quotient"), find_or_add_symbol("quotient__inline__"));
++make_pair(pair_7326171, find_or_add_symbol("complex?"), find_or_add_symbol("complex?__inline__"));
++make_pair(pair_7326172, find_or_add_symbol("exact?"), find_or_add_symbol("exact?__inline__"));
++make_pair(pair_7326173, find_or_add_symbol("exact-integer?"), find_or_add_symbol("exact-integer?__inline__"));
++make_pair(pair_7326174, find_or_add_symbol("sqrt"), find_or_add_symbol("sqrt__inline__"));
++make_pair(pair_7326175, find_or_add_symbol("inexact"), find_or_add_symbol("inexact__inline__"));
++make_pair(pair_7326176, find_or_add_symbol("round"), find_or_add_symbol("round__inline__"));
++make_pair(pair_7326177, find_or_add_symbol("truncate"), find_or_add_symbol("truncate__inline__"));
++make_pair(pair_7326178, find_or_add_symbol("ceiling"), find_or_add_symbol("ceiling__inline__"));
++make_pair(pair_7326179, find_or_add_symbol("floor"), find_or_add_symbol("floor__inline__"));
++make_pair(pair_7326180, find_or_add_symbol("negative?"), find_or_add_symbol("negative?__inline__"));
++make_pair(pair_7326181, find_or_add_symbol("positive?"), find_or_add_symbol("positive?__inline__"));
++make_pair(pair_7326182, find_or_add_symbol("zero?"), find_or_add_symbol("zero?__inline__"));
++make_pair(pair_7326183, find_or_add_symbol("list?"), find_or_add_symbol("list?__inline__"));
++make_pair(pair_7326184, find_or_add_symbol("not"), find_or_add_symbol("not__inline__"));
++make_pair(pair_7326185, find_or_add_symbol("%write-bytevector"), find_or_add_symbol("%write-bytevector__inline__"));
++make_pair(pair_7326186, find_or_add_symbol("fast-string>=?"), find_or_add_symbol("fast-string>=?__inline__"));
++make_pair(pair_7326187, find_or_add_symbol("fast-string>?"), find_or_add_symbol("fast-string>?__inline__"));
++make_pair(pair_7326188, find_or_add_symbol("fast-string<=?"), find_or_add_symbol("fast-string<=?__inline__"));
++make_pair(pair_7326189, find_or_add_symbol("fast-string<?"), find_or_add_symbol("fast-string<?__inline__"));
++make_pair(pair_7326190, find_or_add_symbol("fast-string=?"), find_or_add_symbol("fast-string=?__inline__"));
++make_pair(c_7326215, &pair_7326166, NULL);
++make_pair(c_7326214, &pair_7326167, &c_7326215);
++make_pair(c_7326213, &pair_7326168, &c_7326214);
++make_pair(c_7326212, &pair_7326169, &c_7326213);
++make_pair(c_7326211, &pair_7326170, &c_7326212);
++make_pair(c_7326210, &pair_7326171, &c_7326211);
++make_pair(c_7326209, &pair_7326172, &c_7326210);
++make_pair(c_7326208, &pair_7326173, &c_7326209);
++make_pair(c_7326207, &pair_7326174, &c_7326208);
++make_pair(c_7326206, &pair_7326175, &c_7326207);
++make_pair(c_7326205, &pair_7326176, &c_7326206);
++make_pair(c_7326204, &pair_7326177, &c_7326205);
++make_pair(c_7326203, &pair_7326178, &c_7326204);
++make_pair(c_7326202, &pair_7326179, &c_7326203);
++make_pair(c_7326201, &pair_7326180, &c_7326202);
++make_pair(c_7326200, &pair_7326181, &c_7326201);
++make_pair(c_7326199, &pair_7326182, &c_7326200);
++make_pair(c_7326198, &pair_7326183, &c_7326199);
++make_pair(c_7326197, &pair_7326184, &c_7326198);
++make_pair(c_7326196, &pair_7326185, &c_7326197);
++make_pair(c_7326195, &pair_7326186, &c_7326196);
++make_pair(c_7326194, &pair_7326187, &c_7326195);
++make_pair(c_7326193, &pair_7326188, &c_7326194);
++make_pair(c_7326192, &pair_7326189, &c_7326193);
++make_pair(c_7326191, &pair_7326190, &c_7326192);
  object buf[1]; object cont = args[0];
 -buf[0] = &c_7328650; (((closure)cont)->fn)(data, cont, 1, buf);
-+buf[0] = &c_7326198; (((closure)cont)->fn)(data, cont, 1, buf);
++buf[0] = &c_7326191; (((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);
-@@ -40623,8 +38825,6 @@ Cyc_set_globals_changed((gc_thread_data 
+@@ -40623,8 +38826,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");
@@ -67479,7 +67764,7 @@ Make let-values be the same as let*-values, to work around
    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");
-@@ -40950,460 +39150,460 @@ Cyc_set_globals_changed((gc_thread_data 
+@@ -40950,460 +39151,460 @@ 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);
@@ -67937,464 +68222,464 @@ Make let-values be the same as let*-values, to work around
 -  __glo_features_scheme_base = &c_7314244; 
 -  mclosure0(c_7314238, (function_type)__lambda_1);c_7314238.num_args = 2; 
 -  __glo_call_95cc_scheme_base = &c_7314238; 
-+  mclosure0(c_7326052, (function_type)__lambda_1266);c_7326052.num_args = 0; 
-+  __glo_lib_91init_117schemebase_scheme_base = &c_7326052; 
-+  mmacro(c_7325310, (function_type)__lambda_1208);c_7325310.num_args = 3; 
-+  __glo_define_91values_scheme_base = &c_7325310; 
-+  mmacro(c_7324847, (function_type)__lambda_1177);c_7324847.num_args = 3; 
-+  __glo_define_91record_91type_scheme_base = &c_7324847; 
-+  mclosure0(c_7324825, (function_type)__lambda_1174);c_7324825.num_args = 2; 
-+  __glo_is_91a_127_scheme_base = &c_7324825; 
-+  mclosure0(c_7324824, (function_type)__lambda_1449);c_7324824.num_args = 1; 
-+  __glo_record_127_scheme_base = &c_7324824; 
-+  mclosure0(c_7324776, (function_type)__lambda_1168);c_7324776.num_args = 2; 
-+  __glo__191list_91index_scheme_base = &c_7324776; 
-+  mclosure0(c_7324746, (function_type)__lambda_1164);c_7324746.num_args = 3; 
-+  __glo_make_91setter_scheme_base = &c_7324746; 
-+  mclosure0(c_7324728, (function_type)__lambda_1162);c_7324728.num_args = 3; 
-+  __glo_make_91getter_scheme_base = &c_7324728; 
-+  mclosure0(c_7324705, (function_type)__lambda_1159);c_7324705.num_args = 3; 
-+  __glo_slot_91ref_scheme_base = &c_7324705; 
-+  mclosure0(c_7324689, (function_type)__lambda_1156);c_7324689.num_args = 4; 
-+  __glo_slot_91set_67_scheme_base = &c_7324689; 
-+  mclosure0(c_7324685, (function_type)__lambda_1155);c_7324685.num_args = 2; 
-+  __glo_type_91slot_91offset_scheme_base = &c_7324685; 
-+  mclosure0(c_7324649, (function_type)__lambda_1150);c_7324649.num_args = 2; 
-+  __glo_make_91constructor_95args_scheme_base = &c_7324649; 
-+  mclosure0(c_7324628, (function_type)__lambda_1147);c_7324628.num_args = 2; 
-+  __glo_make_91constructor_scheme_base = &c_7324628; 
-+  mclosure0(c_7324611, (function_type)__lambda_1144);c_7324611.num_args = 2; 
-+  __glo_make_91type_91predicate_scheme_base = &c_7324611; 
-+  mclosure0(c_7324606, (function_type)__lambda_1143);c_7324606.num_args = 3; 
-+  __glo_register_91simple_91type_scheme_base = &c_7324606; 
-+  mmacro(c_7323585, (function_type)__lambda_1092);c_7323585.num_args = 3; 
-+  __glo_guard_91aux_scheme_base = &c_7323585; 
-+  mmacro(c_7323198, (function_type)__lambda_1060);c_7323198.num_args = 3; 
-+  __glo_guard_scheme_base = &c_7323198; 
-+  mmacro(c_7323108, (function_type)__lambda_1052);c_7323108.num_args = 3; 
-+  __glo_let_91values_scheme_base = &c_7323108; 
-+  mmacro(c_7322777, (function_type)__lambda_1032);c_7322777.num_args = 3; 
-+  __glo_let_85_91values_scheme_base = &c_7322777; 
-+  mmacro(c_7322598, (function_type)__lambda_1011);c_7322598.num_args = 3; 
-+  __glo_letrec_85_scheme_base = &c_7322598; 
-+  mmacro(c_7320496, (function_type)__lambda_796);c_7320496.num_args = 3; 
-+  __glo_syntax_91rules_scheme_base = &c_7320496; 
-+  mclosure0(c_7320491, (function_type)__lambda_795);c_7320491.num_args = 3; 
-+  __glo_cons_91source_scheme_base = &c_7320491; 
-+  mclosure0(c_7320481, (function_type)__lambda_793);c_7320481.num_args = 2; 
-+  __glo_find_scheme_base = &c_7320481; 
-+  mclosure0(c_7320463, (function_type)__lambda_791);c_7320463.num_args = 2; 
-+  __glo_find_91tail_scheme_base = &c_7320463; 
-+  mclosure0(c_7320462, (function_type)__lambda_1448);c_7320462.num_args = 1; 
-+  __glo_open_91input_91bytevector_scheme_base = &c_7320462; 
-+  mclosure0(c_7320461, (function_type)__lambda_1447);c_7320461.num_args = 1; 
-+  __glo_get_91output_91bytevector_scheme_base = &c_7320461; 
-+  mclosure0(c_7320460, (function_type)__lambda_1446);c_7320460.num_args = 1; 
-+  __glo_get_91output_91string_scheme_base = &c_7320460; 
-+  mclosure0(c_7320459, (function_type)__lambda_1445);c_7320459.num_args = 0; 
-+  __glo_open_91output_91string_scheme_base = &c_7320459; 
-+  mclosure0(c_7320458, (function_type)__lambda_1444);c_7320458.num_args = 1; 
-+  __glo_open_91input_91string_scheme_base = &c_7320458; 
-+  mclosure0(c_7320457, (function_type)__lambda_1443);c_7320457.num_args = 1; 
-+  __glo_output_91port_91open_127_scheme_base = &c_7320457; 
-+  mclosure0(c_7320456, (function_type)__lambda_1442);c_7320456.num_args = 1; 
-+  __glo_input_91port_91open_127_scheme_base = &c_7320456; 
-+  mclosure0(c_7320455, (function_type)__lambda_1441);c_7320455.num_args = 1; 
-+  __glo_output_91port_127_scheme_base = &c_7320455; 
-+  mclosure0(c_7320454, (function_type)__lambda_1440);c_7320454.num_args = 1; 
-+  __glo_input_91port_127_scheme_base = &c_7320454; 
-+  mclosure0(c_7320453, (function_type)__lambda_1438);c_7320453.num_args = 0; 
-+  __glo_make_91record_91marker_scheme_base = &c_7320453; 
-+  mclosure0(c_7320452, (function_type)__lambda_1439);c_7320452.num_args = -2; 
-+  __glo_make_91record_91marker_191_191inline_191_191_scheme_base = &c_7320452; 
-+  mclosure0(c_7320451, (function_type)__lambda_1436);c_7320451.num_args = 0; 
-+  __glo__void_scheme_base = &c_7320451; 
-+  mclosure0(c_7320450, (function_type)__lambda_1437);c_7320450.num_args = -2; 
-+  __glo_void_191_191inline_191_191_scheme_base = &c_7320450; 
-+  mclosure0(c_7320449, (function_type)__lambda_1434);c_7320449.num_args = 0; 
-+  __glo_eof_91object_scheme_base = &c_7320449; 
-+  mclosure0(c_7320448, (function_type)__lambda_1435);c_7320448.num_args = -2; 
-+  __glo_eof_91object_191_191inline_191_191_scheme_base = &c_7320448; 
-+  mclosure0(c_7320447, (function_type)__lambda_1433);c_7320447.num_args = 2; 
-+  __glo_expt_scheme_base = &c_7320447; 
-+  mclosure0(c_7320442, (function_type)__lambda_1432);c_7320442.num_args = 1; 
-+  __glo_square_191_191inline_191_191_scheme_base = &c_7320442; 
-+  mclosure0(c_7320437, (function_type)__lambda_790);c_7320437.num_args = 1; 
-+  __glo_square_scheme_base = &c_7320437; 
-+  mclosure0(c_7320425, (function_type)__lambda_787);c_7320425.num_args = 2; 
-+  __glo_floor_95_scheme_base = &c_7320425; 
-+  mclosure0(c_7320411, (function_type)__lambda_785);c_7320411.num_args = 2; 
-+  __glo_floor_91remainder_scheme_base = &c_7320411; 
-+  mclosure0(c_7320387, (function_type)__lambda_784);c_7320387.num_args = 2; 
-+  __glo_floor_91quotient_scheme_base = &c_7320387; 
-+  mclosure0(c_7320375, (function_type)__lambda_781);c_7320375.num_args = 2; 
-+  __glo_truncate_95_scheme_base = &c_7320375; 
-+  mclosure0(c_7320367, (function_type)__lambda_1431);c_7320367.num_args = 2; 
-+  __glo_quotient_191_191inline_191_191_scheme_base = &c_7320367; 
-+  mclosure0(c_7320359, (function_type)__lambda_780);c_7320359.num_args = 2; 
-+  __glo_quotient_scheme_base = &c_7320359; 
-+  mclosure0(c_7320358, (function_type)__lambda_1430);c_7320358.num_args = 1; 
-+  __glo_denominator_scheme_base = &c_7320358; 
-+  mclosure0(c_7320357, (function_type)__lambda_1429);c_7320357.num_args = 1; 
-+  __glo_numerator_scheme_base = &c_7320357; 
-+  mclosure0(c_7320348, (function_type)__lambda_779);c_7320348.num_args = 0; 
-+  __glo_lcm_95entry_scheme_base = &c_7320348; 
-+  mclosure0(c_7320334, (function_type)__lambda_777);c_7320334.num_args = 2; 
-+  __glo_lcm_95main_scheme_base = &c_7320334; 
-+  mclosure0(c_7320325, (function_type)__lambda_776);c_7320325.num_args = 0; 
-+  __glo_gcd_95entry_scheme_base = &c_7320325; 
-+  mclosure0(c_7320315, (function_type)__lambda_774);c_7320315.num_args = 2; 
-+  __glo_gcd_95main_scheme_base = &c_7320315; 
-+  mclosure0(c_7320302, (function_type)__lambda_771);c_7320302.num_args = 1; 
-+  __glo_min_scheme_base = &c_7320302; 
-+  mclosure0(c_7320289, (function_type)__lambda_768);c_7320289.num_args = 1; 
-+  __glo_max_scheme_base = &c_7320289; 
-+  mclosure0(c_7320288, (function_type)__lambda_1427);c_7320288.num_args = 1; 
-+  __glo_complex_127_scheme_base = &c_7320288; 
-+  mclosure0(c_7320287, (function_type)__lambda_1428);c_7320287.num_args = -1; 
-+  __glo_complex_127_191_191inline_191_191_scheme_base = &c_7320287; 
-+  mclosure0(c_7320281, (function_type)__lambda_767);c_7320281.num_args = 1; 
-+  __glo_inexact_127_scheme_base = &c_7320281; 
-+  mclosure0(c_7320280, (function_type)__lambda_1425);c_7320280.num_args = 1; 
-+  __glo_exact_127_scheme_base = &c_7320280; 
-+  mclosure0(c_7320279, (function_type)__lambda_1426);c_7320279.num_args = -1; 
-+  __glo_exact_127_191_191inline_191_191_scheme_base = &c_7320279; 
-+  mclosure0(c_7320278, (function_type)__lambda_1423);c_7320278.num_args = 1; 
-+  __glo_exact_91integer_127_scheme_base = &c_7320278; 
-+  mclosure0(c_7320277, (function_type)__lambda_1424);c_7320277.num_args = -1; 
-+  __glo_exact_91integer_127_191_191inline_191_191_scheme_base = &c_7320277; 
-+  mclosure0(c_7320276, (function_type)__lambda_1421);c_7320276.num_args = 1; 
-+  __glo_sqrt_scheme_base = &c_7320276; 
-+  mclosure0(c_7320275, (function_type)__lambda_1422);c_7320275.num_args = -1; 
-+  __glo_sqrt_191_191inline_191_191_scheme_base = &c_7320275; 
-+  mclosure0(c_7320220, (function_type)__lambda_761);c_7320220.num_args = 1; 
-+  __glo_exact_91integer_91sqrt_scheme_base = &c_7320220; 
-+  mclosure0(c_7320219, (function_type)__lambda_1420);c_7320219.num_args = 1; 
-+  __glo_bignum_91sqrt_scheme_base = &c_7320219; 
-+  mclosure0(c_7320218, (function_type)__lambda_1419);c_7320218.num_args = 1; 
-+  __glo_bignum_127_scheme_base = &c_7320218; 
-+  mclosure0(c_7320210, (function_type)__lambda_759);c_7320210.num_args = 1; 
-+  __glo_even_127_scheme_base = &c_7320210; 
-+  mclosure0(c_7320202, (function_type)__lambda_757);c_7320202.num_args = 1; 
-+  __glo_odd_127_scheme_base = &c_7320202; 
-+  mclosure0(c_7320175, (function_type)__lambda_755);c_7320175.num_args = 2; 
-+  __glo_modulo_scheme_base = &c_7320175; 
-+  mclosure0(c_7320174, (function_type)__lambda_1418);c_7320174.num_args = 2; 
-+  __glo_remainder_scheme_base = &c_7320174; 
-+  mclosure0(c_7320173, (function_type)__lambda_1417);c_7320173.num_args = 1; 
-+  __glo_abs_scheme_base = &c_7320173; 
-+  mclosure0(c_7320172, (function_type)__lambda_1415);c_7320172.num_args = 1; 
-+  __glo_inexact_scheme_base = &c_7320172; 
-+  mclosure0(c_7320171, (function_type)__lambda_1416);c_7320171.num_args = -1; 
-+  __glo_inexact_191_191inline_191_191_scheme_base = &c_7320171; 
-+  mclosure0(c_7320170, (function_type)__lambda_1413);c_7320170.num_args = 1; 
-+  __glo_round_scheme_base = &c_7320170; 
-+  mclosure0(c_7320169, (function_type)__lambda_1414);c_7320169.num_args = -1; 
-+  __glo_round_191_191inline_191_191_scheme_base = &c_7320169; 
-+  mclosure0(c_7320168, (function_type)__lambda_1411);c_7320168.num_args = 1; 
-+  __glo_truncate_scheme_base = &c_7320168; 
-+  mclosure0(c_7320167, (function_type)__lambda_1412);c_7320167.num_args = -1; 
-+  __glo_truncate_191_191inline_191_191_scheme_base = &c_7320167; 
-+  mclosure0(c_7320166, (function_type)__lambda_1409);c_7320166.num_args = 1; 
-+  __glo_ceiling_scheme_base = &c_7320166; 
-+  mclosure0(c_7320165, (function_type)__lambda_1410);c_7320165.num_args = -1; 
-+  __glo_ceiling_191_191inline_191_191_scheme_base = &c_7320165; 
-+  mclosure0(c_7320164, (function_type)__lambda_1407);c_7320164.num_args = 1; 
-+  __glo_floor_scheme_base = &c_7320164; 
-+  mclosure0(c_7320163, (function_type)__lambda_1408);c_7320163.num_args = -1; 
-+  __glo_floor_191_191inline_191_191_scheme_base = &c_7320163; 
-+  mclosure0(c_7320121, (function_type)__lambda_749);c_7320121.num_args = 2; 
-+  __glo_every_scheme_base = &c_7320121; 
-+  mclosure0(c_7320079, (function_type)__lambda_743);c_7320079.num_args = 2; 
-+  __glo_any_scheme_base = &c_7320079; 
-+  mclosure0(c_7319961, (function_type)__lambda_729);c_7319961.num_args = 2; 
-+  __glo_error_95loc_scheme_base = &c_7319961; 
-+  mclosure0(c_7319960, (function_type)__lambda_1406);c_7319960.num_args = 0; 
-+  __glo_Cyc_91remove_91exception_91handler_scheme_base = &c_7319960; 
-+  mclosure0(c_7319959, (function_type)__lambda_1405);c_7319959.num_args = 1; 
-+  __glo_Cyc_91add_91exception_91handler_scheme_base = &c_7319959; 
-+  mclosure0(c_7319879, (function_type)__lambda_717);c_7319879.num_args = 2; 
-+  __glo_with_91exception_91handler_scheme_base = &c_7319879; 
-+  mmacro(c_7319816, (function_type)__lambda_716);c_7319816.num_args = 3; 
-+  __glo_with_91handler_scheme_base = &c_7319816; 
-+  mclosure0(c_7319801, (function_type)__lambda_715);c_7319801.num_args = 1; 
-+  __glo_raise_91continuable_scheme_base = &c_7319801; 
-+  mclosure0(c_7319786, (function_type)__lambda_714);c_7319786.num_args = 1; 
-+  __glo_raise_scheme_base = &c_7319786; 
-+  mclosure0(c_7319781, (function_type)__lambda_713);c_7319781.num_args = 1; 
-+  __glo_error_scheme_base = &c_7319781; 
-+  mclosure0(c_7319772, (function_type)__lambda_712);c_7319772.num_args = 1; 
-+  __glo_error_91object_127_scheme_base = &c_7319772; 
-+  mclosure0(c_7319642, (function_type)__lambda_694);c_7319642.num_args = 1; 
-+  __glo_make_91parameter_scheme_base = &c_7319642; 
-+  mclosure0(c_7319641, (function_type)__lambda_1404);c_7319641.num_args = 1; 
-+  __glo_set_91param_91obj_67_scheme_base = &c_7319641; 
-+  mclosure0(c_7319640, (function_type)__lambda_1403);c_7319640.num_args = 0; 
-+  __glo_get_91param_91objs_scheme_base = &c_7319640; 
-+  mmacro(c_7318689, (function_type)__lambda_623);c_7318689.num_args = 3; 
-+  __glo_parameterize_scheme_base = &c_7318689; 
-+  mclosure0(c_7318688, (function_type)__lambda_1402);c_7318688.num_args = 2; 
-+  __glo_Cyc_91make_91string_scheme_base = &c_7318688; 
-+  mclosure0(c_7318679, (function_type)__lambda_622);c_7318679.num_args = 1; 
-+  __glo_make_91string_scheme_base = &c_7318679; 
-+  mclosure0(c_7318674, (function_type)__lambda_621);c_7318674.num_args = 0; 
-+  __glo_string_scheme_base = &c_7318674; 
-+  mclosure0(c_7318644, (function_type)__lambda_614);c_7318644.num_args = 3; 
-+  __glo_Cyc_91obj_123_127_scheme_base = &c_7318644; 
-+  mclosure0(c_7318639, (function_type)__lambda_613);c_7318639.num_args = 2; 
-+  __glo_symbol_123_127_scheme_base = &c_7318639; 
-+  mclosure0(c_7318634, (function_type)__lambda_612);c_7318634.num_args = 2; 
-+  __glo_boolean_123_127_scheme_base = &c_7318634; 
-+  mclosure0(c_7318502, (function_type)__lambda_599);c_7318502.num_args = 2; 
-+  __glo_vector_91fill_67_scheme_base = &c_7318502; 
-+  mclosure0(c_7318371, (function_type)__lambda_588);c_7318371.num_args = 3; 
-+  __glo_vector_91copy_67_scheme_base = &c_7318371; 
-+  mclosure0(c_7318222, (function_type)__lambda_575);c_7318222.num_args = 1; 
-+  __glo_vector_91copy_scheme_base = &c_7318222; 
-+  mclosure0(c_7318207, (function_type)__lambda_572);c_7318207.num_args = 0; 
-+  __glo_vector_91append_scheme_base = &c_7318207; 
-+  mclosure0(c_7318186, (function_type)__lambda_569);c_7318186.num_args = 2; 
-+  __glo_vector_91for_91each_scheme_base = &c_7318186; 
-+  mclosure0(c_7318159, (function_type)__lambda_565);c_7318159.num_args = 2; 
-+  __glo_vector_91map_scheme_base = &c_7318159; 
-+  mclosure0(c_7318138, (function_type)__lambda_562);c_7318138.num_args = 2; 
-+  __glo_string_91for_91each_scheme_base = &c_7318138; 
-+  mclosure0(c_7318111, (function_type)__lambda_558);c_7318111.num_args = 2; 
-+  __glo_string_91map_scheme_base = &c_7318111; 
-+  mclosure0(c_7317982, (function_type)__lambda_546);c_7317982.num_args = 2; 
-+  __glo_string_91fill_67_scheme_base = &c_7317982; 
-+  mclosure0(c_7317857, (function_type)__lambda_536);c_7317857.num_args = 3; 
-+  __glo_string_91copy_67_scheme_base = &c_7317857; 
-+  mclosure0(c_7317771, (function_type)__lambda_529);c_7317771.num_args = 1; 
-+  __glo_string_91copy_scheme_base = &c_7317771; 
-+  mclosure0(c_7317756, (function_type)__lambda_527);c_7317756.num_args = 1; 
-+  __glo_string_91_125vector_scheme_base = &c_7317756; 
-+  mclosure0(c_7317637, (function_type)__lambda_517);c_7317637.num_args = 1; 
-+  __glo_string_91_125list_scheme_base = &c_7317637; 
-+  mclosure0(c_7317622, (function_type)__lambda_515);c_7317622.num_args = 1; 
-+  __glo_vector_91_125string_scheme_base = &c_7317622; 
-+  mclosure0(c_7317536, (function_type)__lambda_508);c_7317536.num_args = 1; 
-+  __glo_string_91_125utf8_scheme_base = &c_7317536; 
-+  mclosure0(c_7317450, (function_type)__lambda_501);c_7317450.num_args = 1; 
-+  __glo_utf8_91_125string_scheme_base = &c_7317450; 
-+  mclosure0(c_7317247, (function_type)__lambda_480);c_7317247.num_args = 3; 
-+  __glo_bytevector_91copy_67_scheme_base = &c_7317247; 
-+  mclosure0(c_7317161, (function_type)__lambda_473);c_7317161.num_args = 1; 
-+  __glo_bytevector_91copy_scheme_base = &c_7317161; 
-+  mclosure0(c_7317042, (function_type)__lambda_463);c_7317042.num_args = 1; 
-+  __glo_vector_91_125list_scheme_base = &c_7317042; 
-+  mclosure0(c_7317037, (function_type)__lambda_462);c_7317037.num_args = 0; 
-+  __glo_vector_scheme_base = &c_7317037; 
-+  mclosure0(c_7317035, (function_type)__lambda_461);c_7317035.num_args = 1; 
-+  __glo_reverse_scheme_base = &c_7317035; 
-+  mclosure0(c_7317025, (function_type)__lambda_459);c_7317025.num_args = 3; 
-+  __glo_list_91set_67_scheme_base = &c_7317025; 
-+  mclosure0(c_7317017, (function_type)__lambda_457);c_7317017.num_args = 2; 
-+  __glo_list_91ref_scheme_base = &c_7317017; 
-+  mclosure0(c_7317007, (function_type)__lambda_456);c_7317007.num_args = 2; 
-+  __glo_list_91tail_scheme_base = &c_7317007; 
-+  mclosure0(c_7316920, (function_type)__lambda_444);c_7316920.num_args = 2; 
-+  __glo_for_91each_scheme_base = &c_7316920; 
-+  mclosure0(c_7316890, (function_type)__lambda_442);c_7316890.num_args = 3; 
-+  __glo_Cyc_91for_91each_91loop_912_scheme_base = &c_7316890; 
-+  mclosure0(c_7316872, (function_type)__lambda_440);c_7316872.num_args = 2; 
-+  __glo_Cyc_91for_91each_91loop_911_scheme_base = &c_7316872; 
-+  mclosure0(c_7316838, (function_type)__lambda_437);c_7316838.num_args = 3; 
-+  __glo_Cyc_91map_91loop_912_scheme_base = &c_7316838; 
-+  mclosure0(c_7316816, (function_type)__lambda_434);c_7316816.num_args = 2; 
-+  __glo_Cyc_91map_91loop_911_scheme_base = &c_7316816; 
-+  mclosure0(c_7316725, (function_type)__lambda_419);c_7316725.num_args = 2; 
-+  __glo_map_scheme_base = &c_7316725; 
-+  mclosure0(c_7316613, (function_type)__lambda_399);c_7316613.num_args = 1; 
-+  __glo__75cars_87cdrs_scheme_base = &c_7316613; 
-+  mclosure0(c_7316607, (function_type)__lambda_398);c_7316607.num_args = 1; 
-+  __glo_car_87cdr_scheme_base = &c_7316607; 
-+  mmacro(c_7316575, (function_type)__lambda_397);c_7316575.num_args = 3; 
-+  __glo_receive_scheme_base = &c_7316575; 
-+  mclosure0(c_7316525, (function_type)__lambda_390);c_7316525.num_args = 1; 
-+  __glo_list_91copy_scheme_base = &c_7316525; 
-+  mclosure0(c_7316455, (function_type)__lambda_383);c_7316455.num_args = 1; 
-+  __glo_make_91list_scheme_base = &c_7316455; 
-+  mclosure0(c_7316453, (function_type)__lambda_382);c_7316453.num_args = 0; 
-+  __glo__list_scheme_base = &c_7316453; 
-+  mclosure0(c_7316388, (function_type)__lambda_373);c_7316388.num_args = 0; 
-+  __glo_append_scheme_base = &c_7316388; 
-+  mclosure0(c_7316384, (function_type)__lambda_1401);c_7316384.num_args = 1; 
-+  __glo_negative_127_191_191inline_191_191_scheme_base = &c_7316384; 
-+  mclosure0(c_7316380, (function_type)__lambda_372);c_7316380.num_args = 1; 
-+  __glo_negative_127_scheme_base = &c_7316380; 
-+  mclosure0(c_7316376, (function_type)__lambda_1400);c_7316376.num_args = 1; 
-+  __glo_positive_127_191_191inline_191_191_scheme_base = &c_7316376; 
-+  mclosure0(c_7316372, (function_type)__lambda_371);c_7316372.num_args = 1; 
-+  __glo_positive_127_scheme_base = &c_7316372; 
-+  mclosure0(c_7316368, (function_type)__lambda_1399);c_7316368.num_args = 1; 
-+  __glo_zero_127_191_191inline_191_191_scheme_base = &c_7316368; 
-+  mclosure0(c_7316364, (function_type)__lambda_370);c_7316364.num_args = 1; 
-+  __glo_zero_127_scheme_base = &c_7316364; 
-+  mclosure0(c_7316363, (function_type)__lambda_1397);c_7316363.num_args = 1; 
-+  __glo_list_127_scheme_base = &c_7316363; 
-+  mclosure0(c_7316362, (function_type)__lambda_1398);c_7316362.num_args = -1; 
-+  __glo_list_127_191_191inline_191_191_scheme_base = &c_7316362; 
-+  mclosure0(c_7316359, (function_type)__lambda_1396);c_7316359.num_args = 1; 
-+  __glo_not_191_191inline_191_191_scheme_base = &c_7316359; 
-+  mclosure0(c_7316356, (function_type)__lambda_369);c_7316356.num_args = 1; 
-+  __glo_not_scheme_base = &c_7316356; 
-+  mclosure0(c_7316348, (function_type)__lambda_368);c_7316348.num_args = 0; 
-+  __glo_newline_scheme_base = &c_7316348; 
-+  mclosure0(c_7316332, (function_type)__lambda_366);c_7316332.num_args = 1; 
-+  __glo_write_91char_scheme_base = &c_7316332; 
-+  mclosure0(c_7316331, (function_type)__lambda_1394);c_7316331.num_args = 4; 
-+  __glo__75write_91bytevector_scheme_base = &c_7316331; 
-+  mclosure0(c_7316330, (function_type)__lambda_1395);c_7316330.num_args = 2; 
-+  __glo__75write_91bytevector_191_191inline_191_191_scheme_base = &c_7316330; 
-+  mclosure0(c_7316213, (function_type)__lambda_356);c_7316213.num_args = 1; 
-+  __glo_write_91bytevector_scheme_base = &c_7316213; 
-+  mclosure0(c_7316068, (function_type)__lambda_339);c_7316068.num_args = 1; 
-+  __glo_read_91bytevector_67_scheme_base = &c_7316068; 
-+  mclosure0(c_7315950, (function_type)__lambda_327);c_7315950.num_args = 1; 
-+  __glo_read_91bytevector_scheme_base = &c_7315950; 
-+  mclosure0(c_7315900, (function_type)__lambda_323);c_7315900.num_args = 1; 
-+  __glo_write_91string_scheme_base = &c_7315900; 
-+  mclosure0(c_7315896, (function_type)__lambda_322);c_7315896.num_args = 2; 
-+  __glo_write_91string_912_scheme_base = &c_7315896; 
-+  mclosure0(c_7315887, (function_type)__lambda_320);c_7315887.num_args = 1; 
-+  __glo_write_91string_911_scheme_base = &c_7315887; 
-+  mclosure0(c_7315872, (function_type)__lambda_318);c_7315872.num_args = 0; 
-+  __glo_flush_91output_91port_scheme_base = &c_7315872; 
-+  mclosure0(c_7315858, (function_type)__lambda_316);c_7315858.num_args = 1; 
-+  __glo_textual_91port_127_scheme_base = &c_7315858; 
-+  mclosure0(c_7315853, (function_type)__lambda_315);c_7315853.num_args = 1; 
-+  __glo_binary_91port_127_scheme_base = &c_7315853; 
-+  mclosure0(c_7315852, (function_type)__lambda_1393);c_7315852.num_args = 1; 
-+  __glo__191binary_91port_127_scheme_base = &c_7315852; 
-+  mclosure0(c_7315745, (function_type)__lambda_303);c_7315745.num_args = 1; 
-+  __glo_read_91string_scheme_base = &c_7315745; 
-+  mclosure0(c_7315728, (function_type)__lambda_301);c_7315728.num_args = 0; 
-+  __glo_read_91line_scheme_base = &c_7315728; 
-+  mclosure0(c_7315711, (function_type)__lambda_299);c_7315711.num_args = 0; 
-+  __glo_read_91char_scheme_base = &c_7315711; 
-+  mclosure0(c_7315694, (function_type)__lambda_297);c_7315694.num_args = 0; 
-+  __glo_peek_91char_scheme_base = &c_7315694; 
-+  mclosure0(c_7315683, (function_type)__lambda_295);c_7315683.num_args = 0; 
-+  __glo_char_91ready_127_scheme_base = &c_7315683; 
-+  mclosure0(c_7315682, (function_type)__lambda_1392);c_7315682.num_args = 1; 
-+  __glo_Cyc_91char_91ready_127_scheme_base = &c_7315682; 
-+  mclosure0(c_7315670, (function_type)__lambda_293);c_7315670.num_args = 1; 
-+  __glo_write_91u8_scheme_base = &c_7315670; 
-+  mclosure0(c_7315659, (function_type)__lambda_291);c_7315659.num_args = 0; 
-+  __glo_peek_91u8_scheme_base = &c_7315659; 
-+  mclosure0(c_7315648, (function_type)__lambda_289);c_7315648.num_args = 0; 
-+  __glo_read_91u8_scheme_base = &c_7315648; 
-+  mclosure0(c_7315647, (function_type)__lambda_1391);c_7315647.num_args = 2; 
-+  __glo__191write_91u8_scheme_base = &c_7315647; 
-+  mclosure0(c_7315646, (function_type)__lambda_1390);c_7315646.num_args = 1; 
-+  __glo__191peek_91u8_scheme_base = &c_7315646; 
-+  mclosure0(c_7315645, (function_type)__lambda_1389);c_7315645.num_args = 1; 
-+  __glo__191read_91u8_scheme_base = &c_7315645; 
-+  mclosure0(c_7315630, (function_type)__lambda_287);c_7315630.num_args = 3; 
-+  __glo_foldr_scheme_base = &c_7315630; 
-+  mclosure0(c_7315615, (function_type)__lambda_285);c_7315615.num_args = 3; 
-+  __glo_foldl_scheme_base = &c_7315615; 
-+  mclosure0(c_7315608, (function_type)__lambda_284);c_7315608.num_args = 2; 
-+  __glo_assoc_scheme_base = &c_7315608; 
-+  mclosure0(c_7315573, (function_type)__lambda_281);c_7315573.num_args = 3; 
-+  __glo_assoc_91helper_scheme_base = &c_7315573; 
-+  mclosure0(c_7315566, (function_type)__lambda_280);c_7315566.num_args = 2; 
-+  __glo_member_scheme_base = &c_7315566; 
-+  mclosure0(c_7315547, (function_type)__lambda_278);c_7315547.num_args = 3; 
-+  __glo_member_91helper_scheme_base = &c_7315547; 
-+  mclosure0(c_7315541, (function_type)__lambda_1388);c_7315541.num_args = 2; 
-+  __glo_fast_91string_125_123_127_191_191inline_191_191_scheme_base = &c_7315541; 
-+  mclosure0(c_7315535, (function_type)__lambda_277);c_7315535.num_args = 2; 
-+  __glo_fast_91string_125_123_127_scheme_base = &c_7315535; 
-+  mclosure0(c_7315529, (function_type)__lambda_1387);c_7315529.num_args = 2; 
-+  __glo_fast_91string_125_127_191_191inline_191_191_scheme_base = &c_7315529; 
-+  mclosure0(c_7315523, (function_type)__lambda_276);c_7315523.num_args = 2; 
-+  __glo_fast_91string_125_127_scheme_base = &c_7315523; 
-+  mclosure0(c_7315517, (function_type)__lambda_1386);c_7315517.num_args = 2; 
-+  __glo_fast_91string_121_123_127_191_191inline_191_191_scheme_base = &c_7315517; 
-+  mclosure0(c_7315511, (function_type)__lambda_275);c_7315511.num_args = 2; 
-+  __glo_fast_91string_121_123_127_scheme_base = &c_7315511; 
-+  mclosure0(c_7315505, (function_type)__lambda_1385);c_7315505.num_args = 2; 
-+  __glo_fast_91string_121_127_191_191inline_191_191_scheme_base = &c_7315505; 
-+  mclosure0(c_7315499, (function_type)__lambda_274);c_7315499.num_args = 2; 
-+  __glo_fast_91string_121_127_scheme_base = &c_7315499; 
-+  mclosure0(c_7315493, (function_type)__lambda_1384);c_7315493.num_args = 2; 
-+  __glo_fast_91string_123_127_191_191inline_191_191_scheme_base = &c_7315493; 
-+  mclosure0(c_7315487, (function_type)__lambda_273);c_7315487.num_args = 2; 
-+  __glo_fast_91string_123_127_scheme_base = &c_7315487; 
-+  mclosure0(c_7315482, (function_type)__lambda_272);c_7315482.num_args = 2; 
-+  __glo_string_125_123_127_scheme_base = &c_7315482; 
-+  mclosure0(c_7315477, (function_type)__lambda_271);c_7315477.num_args = 2; 
-+  __glo_string_125_127_scheme_base = &c_7315477; 
-+  mclosure0(c_7315472, (function_type)__lambda_270);c_7315472.num_args = 2; 
-+  __glo_string_121_123_127_scheme_base = &c_7315472; 
-+  mclosure0(c_7315467, (function_type)__lambda_269);c_7315467.num_args = 2; 
-+  __glo_string_121_127_scheme_base = &c_7315467; 
-+  mclosure0(c_7315462, (function_type)__lambda_268);c_7315462.num_args = 2; 
-+  __glo_string_123_127_scheme_base = &c_7315462; 
-+  mclosure0(c_7315457, (function_type)__lambda_267);c_7315457.num_args = 2; 
-+  __glo_char_125_123_127_scheme_base = &c_7315457; 
-+  mclosure0(c_7315452, (function_type)__lambda_266);c_7315452.num_args = 2; 
-+  __glo_char_121_123_127_scheme_base = &c_7315452; 
-+  mclosure0(c_7315447, (function_type)__lambda_265);c_7315447.num_args = 2; 
-+  __glo_char_125_127_scheme_base = &c_7315447; 
-+  mclosure0(c_7315442, (function_type)__lambda_264);c_7315442.num_args = 2; 
-+  __glo_char_121_127_scheme_base = &c_7315442; 
-+  mclosure0(c_7315437, (function_type)__lambda_263);c_7315437.num_args = 2; 
-+  __glo_char_123_127_scheme_base = &c_7315437; 
-+  mclosure0(c_7315421, (function_type)__lambda_260);c_7315421.num_args = 3; 
-+  __glo_Cyc_91bin_91op_91char_scheme_base = &c_7315421; 
-+  mclosure0(c_7315401, (function_type)__lambda_258);c_7315401.num_args = 3; 
-+  __glo_Cyc_91bin_91op_scheme_base = &c_7315401; 
-+  mclosure0(c_7315391, (function_type)__lambda_256);c_7315391.num_args = 2; 
-+  __glo_call_91with_91port_scheme_base = &c_7315391; 
-+  mclosure0(c_7315376, (function_type)__lambda_252);c_7315376.num_args = 3; 
-+  __glo_dynamic_91wind_scheme_base = &c_7315376; 
-+  mclosure0(c_7315349, (function_type)__lambda_250);c_7315349.num_args = 2; 
-+  __glo_call_91with_91values_scheme_base = &c_7315349; 
-+  mclosure0(c_7315329, (function_type)__lambda_249);c_7315329.num_args = 0; 
-+  __glo_values_scheme_base = &c_7315329; 
-+  mmacro(c_7315322, (function_type)__lambda_248);c_7315322.num_args = 3; 
-+  __glo_syntax_91error_scheme_base = &c_7315322; 
-+  mmacro(c_7314989, (function_type)__lambda_213);c_7314989.num_args = 3; 
-+  __glo_quasiquote_scheme_base = &c_7314989; 
-+  mmacro(c_7314754, (function_type)__lambda_189);c_7314754.num_args = 3; 
-+  __glo__do_scheme_base = &c_7314754; 
-+  mmacro(c_7314683, (function_type)__lambda_182);c_7314683.num_args = 3; 
-+  __glo_unless_scheme_base = &c_7314683; 
-+  mmacro(c_7314618, (function_type)__lambda_175);c_7314618.num_args = 3; 
-+  __glo_when_scheme_base = &c_7314618; 
-+  mmacro(c_7314264, (function_type)__lambda_142);c_7314264.num_args = 3; 
-+  __glo__case_scheme_base = &c_7314264; 
-+  mmacro(c_7314072, (function_type)__lambda_121);c_7314072.num_args = 3; 
-+  __glo_cond_scheme_base = &c_7314072; 
-+  mmacro(c_7313656, (function_type)__lambda_84);c_7313656.num_args = 3; 
-+  __glo_cond_91expand_scheme_base = &c_7313656; 
-+  mmacro(c_7313573, (function_type)__lambda_75);c_7313573.num_args = 3; 
-+  __glo_begin_scheme_base = &c_7313573; 
-+  mmacro(c_7313479, (function_type)__lambda_58);c_7313479.num_args = 3; 
-+  __glo_letrec_scheme_base = &c_7313479; 
-+  mmacro(c_7313337, (function_type)__lambda_43);c_7313337.num_args = 3; 
-+  __glo_let_85_scheme_base = &c_7313337; 
-+  mmacro(c_7313137, (function_type)__lambda_24);c_7313137.num_args = 3; 
-+  __glo_let_scheme_base = &c_7313137; 
-+  mmacro(c_7313073, (function_type)__lambda_17);c_7313073.num_args = 3; 
-+  __glo_or_scheme_base = &c_7313073; 
-+  mmacro(c_7313038, (function_type)__lambda_14);c_7313038.num_args = 3; 
-+  __glo_and_scheme_base = &c_7313038; 
-+  mclosure0(c_7313036, (function_type)__lambda_13);c_7313036.num_args = 0; 
-+  __glo_Cyc_91version_scheme_base = &c_7313036; 
-+  mclosure0(c_7313024, (function_type)__lambda_11);c_7313024.num_args = 1; 
-+  __glo_Cyc_91add_91feature_67_scheme_base = &c_7313024; 
-+  mclosure0(c_7312951, (function_type)__lambda_3);c_7312951.num_args = 0; 
-+  __glo_features_scheme_base = &c_7312951; 
-+  mclosure0(c_7312945, (function_type)__lambda_1);c_7312945.num_args = 2; 
-+  __glo_call_95cc_scheme_base = &c_7312945; 
++  mclosure0(c_7326045, (function_type)__lambda_1266);c_7326045.num_args = 0; 
++  __glo_lib_91init_117schemebase_scheme_base = &c_7326045; 
++  mmacro(c_7325303, (function_type)__lambda_1208);c_7325303.num_args = 3; 
++  __glo_define_91values_scheme_base = &c_7325303; 
++  mmacro(c_7324840, (function_type)__lambda_1177);c_7324840.num_args = 3; 
++  __glo_define_91record_91type_scheme_base = &c_7324840; 
++  mclosure0(c_7324818, (function_type)__lambda_1174);c_7324818.num_args = 2; 
++  __glo_is_91a_127_scheme_base = &c_7324818; 
++  mclosure0(c_7324817, (function_type)__lambda_1449);c_7324817.num_args = 1; 
++  __glo_record_127_scheme_base = &c_7324817; 
++  mclosure0(c_7324769, (function_type)__lambda_1168);c_7324769.num_args = 2; 
++  __glo__191list_91index_scheme_base = &c_7324769; 
++  mclosure0(c_7324739, (function_type)__lambda_1164);c_7324739.num_args = 3; 
++  __glo_make_91setter_scheme_base = &c_7324739; 
++  mclosure0(c_7324721, (function_type)__lambda_1162);c_7324721.num_args = 3; 
++  __glo_make_91getter_scheme_base = &c_7324721; 
++  mclosure0(c_7324698, (function_type)__lambda_1159);c_7324698.num_args = 3; 
++  __glo_slot_91ref_scheme_base = &c_7324698; 
++  mclosure0(c_7324682, (function_type)__lambda_1156);c_7324682.num_args = 4; 
++  __glo_slot_91set_67_scheme_base = &c_7324682; 
++  mclosure0(c_7324678, (function_type)__lambda_1155);c_7324678.num_args = 2; 
++  __glo_type_91slot_91offset_scheme_base = &c_7324678; 
++  mclosure0(c_7324642, (function_type)__lambda_1150);c_7324642.num_args = 2; 
++  __glo_make_91constructor_95args_scheme_base = &c_7324642; 
++  mclosure0(c_7324621, (function_type)__lambda_1147);c_7324621.num_args = 2; 
++  __glo_make_91constructor_scheme_base = &c_7324621; 
++  mclosure0(c_7324604, (function_type)__lambda_1144);c_7324604.num_args = 2; 
++  __glo_make_91type_91predicate_scheme_base = &c_7324604; 
++  mclosure0(c_7324599, (function_type)__lambda_1143);c_7324599.num_args = 3; 
++  __glo_register_91simple_91type_scheme_base = &c_7324599; 
++  mmacro(c_7323578, (function_type)__lambda_1092);c_7323578.num_args = 3; 
++  __glo_guard_91aux_scheme_base = &c_7323578; 
++  mmacro(c_7323191, (function_type)__lambda_1060);c_7323191.num_args = 3; 
++  __glo_guard_scheme_base = &c_7323191; 
++  mmacro(c_7323101, (function_type)__lambda_1052);c_7323101.num_args = 3; 
++  __glo_let_91values_scheme_base = &c_7323101; 
++  mmacro(c_7322770, (function_type)__lambda_1032);c_7322770.num_args = 3; 
++  __glo_let_85_91values_scheme_base = &c_7322770; 
++  mmacro(c_7322591, (function_type)__lambda_1011);c_7322591.num_args = 3; 
++  __glo_letrec_85_scheme_base = &c_7322591; 
++  mmacro(c_7320489, (function_type)__lambda_796);c_7320489.num_args = 3; 
++  __glo_syntax_91rules_scheme_base = &c_7320489; 
++  mclosure0(c_7320484, (function_type)__lambda_795);c_7320484.num_args = 3; 
++  __glo_cons_91source_scheme_base = &c_7320484; 
++  mclosure0(c_7320474, (function_type)__lambda_793);c_7320474.num_args = 2; 
++  __glo_find_scheme_base = &c_7320474; 
++  mclosure0(c_7320456, (function_type)__lambda_791);c_7320456.num_args = 2; 
++  __glo_find_91tail_scheme_base = &c_7320456; 
++  mclosure0(c_7320455, (function_type)__lambda_1448);c_7320455.num_args = 1; 
++  __glo_open_91input_91bytevector_scheme_base = &c_7320455; 
++  mclosure0(c_7320454, (function_type)__lambda_1447);c_7320454.num_args = 1; 
++  __glo_get_91output_91bytevector_scheme_base = &c_7320454; 
++  mclosure0(c_7320453, (function_type)__lambda_1446);c_7320453.num_args = 1; 
++  __glo_get_91output_91string_scheme_base = &c_7320453; 
++  mclosure0(c_7320452, (function_type)__lambda_1445);c_7320452.num_args = 0; 
++  __glo_open_91output_91string_scheme_base = &c_7320452; 
++  mclosure0(c_7320451, (function_type)__lambda_1444);c_7320451.num_args = 1; 
++  __glo_open_91input_91string_scheme_base = &c_7320451; 
++  mclosure0(c_7320450, (function_type)__lambda_1443);c_7320450.num_args = 1; 
++  __glo_output_91port_91open_127_scheme_base = &c_7320450; 
++  mclosure0(c_7320449, (function_type)__lambda_1442);c_7320449.num_args = 1; 
++  __glo_input_91port_91open_127_scheme_base = &c_7320449; 
++  mclosure0(c_7320448, (function_type)__lambda_1441);c_7320448.num_args = 1; 
++  __glo_output_91port_127_scheme_base = &c_7320448; 
++  mclosure0(c_7320447, (function_type)__lambda_1440);c_7320447.num_args = 1; 
++  __glo_input_91port_127_scheme_base = &c_7320447; 
++  mclosure0(c_7320446, (function_type)__lambda_1438);c_7320446.num_args = 0; 
++  __glo_make_91record_91marker_scheme_base = &c_7320446; 
++  mclosure0(c_7320445, (function_type)__lambda_1439);c_7320445.num_args = -2; 
++  __glo_make_91record_91marker_191_191inline_191_191_scheme_base = &c_7320445; 
++  mclosure0(c_7320444, (function_type)__lambda_1436);c_7320444.num_args = 0; 
++  __glo__void_scheme_base = &c_7320444; 
++  mclosure0(c_7320443, (function_type)__lambda_1437);c_7320443.num_args = -2; 
++  __glo_void_191_191inline_191_191_scheme_base = &c_7320443; 
++  mclosure0(c_7320442, (function_type)__lambda_1434);c_7320442.num_args = 0; 
++  __glo_eof_91object_scheme_base = &c_7320442; 
++  mclosure0(c_7320441, (function_type)__lambda_1435);c_7320441.num_args = -2; 
++  __glo_eof_91object_191_191inline_191_191_scheme_base = &c_7320441; 
++  mclosure0(c_7320440, (function_type)__lambda_1433);c_7320440.num_args = 2; 
++  __glo_expt_scheme_base = &c_7320440; 
++  mclosure0(c_7320435, (function_type)__lambda_1432);c_7320435.num_args = 1; 
++  __glo_square_191_191inline_191_191_scheme_base = &c_7320435; 
++  mclosure0(c_7320430, (function_type)__lambda_790);c_7320430.num_args = 1; 
++  __glo_square_scheme_base = &c_7320430; 
++  mclosure0(c_7320418, (function_type)__lambda_787);c_7320418.num_args = 2; 
++  __glo_floor_95_scheme_base = &c_7320418; 
++  mclosure0(c_7320404, (function_type)__lambda_785);c_7320404.num_args = 2; 
++  __glo_floor_91remainder_scheme_base = &c_7320404; 
++  mclosure0(c_7320380, (function_type)__lambda_784);c_7320380.num_args = 2; 
++  __glo_floor_91quotient_scheme_base = &c_7320380; 
++  mclosure0(c_7320368, (function_type)__lambda_781);c_7320368.num_args = 2; 
++  __glo_truncate_95_scheme_base = &c_7320368; 
++  mclosure0(c_7320360, (function_type)__lambda_1431);c_7320360.num_args = 2; 
++  __glo_quotient_191_191inline_191_191_scheme_base = &c_7320360; 
++  mclosure0(c_7320352, (function_type)__lambda_780);c_7320352.num_args = 2; 
++  __glo_quotient_scheme_base = &c_7320352; 
++  mclosure0(c_7320351, (function_type)__lambda_1430);c_7320351.num_args = 1; 
++  __glo_denominator_scheme_base = &c_7320351; 
++  mclosure0(c_7320350, (function_type)__lambda_1429);c_7320350.num_args = 1; 
++  __glo_numerator_scheme_base = &c_7320350; 
++  mclosure0(c_7320341, (function_type)__lambda_779);c_7320341.num_args = 0; 
++  __glo_lcm_95entry_scheme_base = &c_7320341; 
++  mclosure0(c_7320327, (function_type)__lambda_777);c_7320327.num_args = 2; 
++  __glo_lcm_95main_scheme_base = &c_7320327; 
++  mclosure0(c_7320318, (function_type)__lambda_776);c_7320318.num_args = 0; 
++  __glo_gcd_95entry_scheme_base = &c_7320318; 
++  mclosure0(c_7320308, (function_type)__lambda_774);c_7320308.num_args = 2; 
++  __glo_gcd_95main_scheme_base = &c_7320308; 
++  mclosure0(c_7320295, (function_type)__lambda_771);c_7320295.num_args = 1; 
++  __glo_min_scheme_base = &c_7320295; 
++  mclosure0(c_7320282, (function_type)__lambda_768);c_7320282.num_args = 1; 
++  __glo_max_scheme_base = &c_7320282; 
++  mclosure0(c_7320281, (function_type)__lambda_1427);c_7320281.num_args = 1; 
++  __glo_complex_127_scheme_base = &c_7320281; 
++  mclosure0(c_7320280, (function_type)__lambda_1428);c_7320280.num_args = -1; 
++  __glo_complex_127_191_191inline_191_191_scheme_base = &c_7320280; 
++  mclosure0(c_7320274, (function_type)__lambda_767);c_7320274.num_args = 1; 
++  __glo_inexact_127_scheme_base = &c_7320274; 
++  mclosure0(c_7320273, (function_type)__lambda_1425);c_7320273.num_args = 1; 
++  __glo_exact_127_scheme_base = &c_7320273; 
++  mclosure0(c_7320272, (function_type)__lambda_1426);c_7320272.num_args = -1; 
++  __glo_exact_127_191_191inline_191_191_scheme_base = &c_7320272; 
++  mclosure0(c_7320271, (function_type)__lambda_1423);c_7320271.num_args = 1; 
++  __glo_exact_91integer_127_scheme_base = &c_7320271; 
++  mclosure0(c_7320270, (function_type)__lambda_1424);c_7320270.num_args = -1; 
++  __glo_exact_91integer_127_191_191inline_191_191_scheme_base = &c_7320270; 
++  mclosure0(c_7320269, (function_type)__lambda_1421);c_7320269.num_args = 1; 
++  __glo_sqrt_scheme_base = &c_7320269; 
++  mclosure0(c_7320268, (function_type)__lambda_1422);c_7320268.num_args = -1; 
++  __glo_sqrt_191_191inline_191_191_scheme_base = &c_7320268; 
++  mclosure0(c_7320213, (function_type)__lambda_761);c_7320213.num_args = 1; 
++  __glo_exact_91integer_91sqrt_scheme_base = &c_7320213; 
++  mclosure0(c_7320212, (function_type)__lambda_1420);c_7320212.num_args = 1; 
++  __glo_bignum_91sqrt_scheme_base = &c_7320212; 
++  mclosure0(c_7320211, (function_type)__lambda_1419);c_7320211.num_args = 1; 
++  __glo_bignum_127_scheme_base = &c_7320211; 
++  mclosure0(c_7320203, (function_type)__lambda_759);c_7320203.num_args = 1; 
++  __glo_even_127_scheme_base = &c_7320203; 
++  mclosure0(c_7320195, (function_type)__lambda_757);c_7320195.num_args = 1; 
++  __glo_odd_127_scheme_base = &c_7320195; 
++  mclosure0(c_7320168, (function_type)__lambda_755);c_7320168.num_args = 2; 
++  __glo_modulo_scheme_base = &c_7320168; 
++  mclosure0(c_7320167, (function_type)__lambda_1418);c_7320167.num_args = 2; 
++  __glo_remainder_scheme_base = &c_7320167; 
++  mclosure0(c_7320166, (function_type)__lambda_1417);c_7320166.num_args = 1; 
++  __glo_abs_scheme_base = &c_7320166; 
++  mclosure0(c_7320165, (function_type)__lambda_1415);c_7320165.num_args = 1; 
++  __glo_inexact_scheme_base = &c_7320165; 
++  mclosure0(c_7320164, (function_type)__lambda_1416);c_7320164.num_args = -1; 
++  __glo_inexact_191_191inline_191_191_scheme_base = &c_7320164; 
++  mclosure0(c_7320163, (function_type)__lambda_1413);c_7320163.num_args = 1; 
++  __glo_round_scheme_base = &c_7320163; 
++  mclosure0(c_7320162, (function_type)__lambda_1414);c_7320162.num_args = -1; 
++  __glo_round_191_191inline_191_191_scheme_base = &c_7320162; 
++  mclosure0(c_7320161, (function_type)__lambda_1411);c_7320161.num_args = 1; 
++  __glo_truncate_scheme_base = &c_7320161; 
++  mclosure0(c_7320160, (function_type)__lambda_1412);c_7320160.num_args = -1; 
++  __glo_truncate_191_191inline_191_191_scheme_base = &c_7320160; 
++  mclosure0(c_7320159, (function_type)__lambda_1409);c_7320159.num_args = 1; 
++  __glo_ceiling_scheme_base = &c_7320159; 
++  mclosure0(c_7320158, (function_type)__lambda_1410);c_7320158.num_args = -1; 
++  __glo_ceiling_191_191inline_191_191_scheme_base = &c_7320158; 
++  mclosure0(c_7320157, (function_type)__lambda_1407);c_7320157.num_args = 1; 
++  __glo_floor_scheme_base = &c_7320157; 
++  mclosure0(c_7320156, (function_type)__lambda_1408);c_7320156.num_args = -1; 
++  __glo_floor_191_191inline_191_191_scheme_base = &c_7320156; 
++  mclosure0(c_7320114, (function_type)__lambda_749);c_7320114.num_args = 2; 
++  __glo_every_scheme_base = &c_7320114; 
++  mclosure0(c_7320072, (function_type)__lambda_743);c_7320072.num_args = 2; 
++  __glo_any_scheme_base = &c_7320072; 
++  mclosure0(c_7319954, (function_type)__lambda_729);c_7319954.num_args = 2; 
++  __glo_error_95loc_scheme_base = &c_7319954; 
++  mclosure0(c_7319953, (function_type)__lambda_1406);c_7319953.num_args = 0; 
++  __glo_Cyc_91remove_91exception_91handler_scheme_base = &c_7319953; 
++  mclosure0(c_7319952, (function_type)__lambda_1405);c_7319952.num_args = 1; 
++  __glo_Cyc_91add_91exception_91handler_scheme_base = &c_7319952; 
++  mclosure0(c_7319872, (function_type)__lambda_717);c_7319872.num_args = 2; 
++  __glo_with_91exception_91handler_scheme_base = &c_7319872; 
++  mmacro(c_7319809, (function_type)__lambda_716);c_7319809.num_args = 3; 
++  __glo_with_91handler_scheme_base = &c_7319809; 
++  mclosure0(c_7319794, (function_type)__lambda_715);c_7319794.num_args = 1; 
++  __glo_raise_91continuable_scheme_base = &c_7319794; 
++  mclosure0(c_7319779, (function_type)__lambda_714);c_7319779.num_args = 1; 
++  __glo_raise_scheme_base = &c_7319779; 
++  mclosure0(c_7319774, (function_type)__lambda_713);c_7319774.num_args = 1; 
++  __glo_error_scheme_base = &c_7319774; 
++  mclosure0(c_7319765, (function_type)__lambda_712);c_7319765.num_args = 1; 
++  __glo_error_91object_127_scheme_base = &c_7319765; 
++  mclosure0(c_7319635, (function_type)__lambda_694);c_7319635.num_args = 1; 
++  __glo_make_91parameter_scheme_base = &c_7319635; 
++  mclosure0(c_7319634, (function_type)__lambda_1404);c_7319634.num_args = 1; 
++  __glo_set_91param_91obj_67_scheme_base = &c_7319634; 
++  mclosure0(c_7319633, (function_type)__lambda_1403);c_7319633.num_args = 0; 
++  __glo_get_91param_91objs_scheme_base = &c_7319633; 
++  mmacro(c_7318682, (function_type)__lambda_623);c_7318682.num_args = 3; 
++  __glo_parameterize_scheme_base = &c_7318682; 
++  mclosure0(c_7318681, (function_type)__lambda_1402);c_7318681.num_args = 2; 
++  __glo_Cyc_91make_91string_scheme_base = &c_7318681; 
++  mclosure0(c_7318672, (function_type)__lambda_622);c_7318672.num_args = 1; 
++  __glo_make_91string_scheme_base = &c_7318672; 
++  mclosure0(c_7318667, (function_type)__lambda_621);c_7318667.num_args = 0; 
++  __glo_string_scheme_base = &c_7318667; 
++  mclosure0(c_7318637, (function_type)__lambda_614);c_7318637.num_args = 3; 
++  __glo_Cyc_91obj_123_127_scheme_base = &c_7318637; 
++  mclosure0(c_7318632, (function_type)__lambda_613);c_7318632.num_args = 2; 
++  __glo_symbol_123_127_scheme_base = &c_7318632; 
++  mclosure0(c_7318627, (function_type)__lambda_612);c_7318627.num_args = 2; 
++  __glo_boolean_123_127_scheme_base = &c_7318627; 
++  mclosure0(c_7318495, (function_type)__lambda_599);c_7318495.num_args = 2; 
++  __glo_vector_91fill_67_scheme_base = &c_7318495; 
++  mclosure0(c_7318364, (function_type)__lambda_588);c_7318364.num_args = 3; 
++  __glo_vector_91copy_67_scheme_base = &c_7318364; 
++  mclosure0(c_7318215, (function_type)__lambda_575);c_7318215.num_args = 1; 
++  __glo_vector_91copy_scheme_base = &c_7318215; 
++  mclosure0(c_7318200, (function_type)__lambda_572);c_7318200.num_args = 0; 
++  __glo_vector_91append_scheme_base = &c_7318200; 
++  mclosure0(c_7318179, (function_type)__lambda_569);c_7318179.num_args = 2; 
++  __glo_vector_91for_91each_scheme_base = &c_7318179; 
++  mclosure0(c_7318152, (function_type)__lambda_565);c_7318152.num_args = 2; 
++  __glo_vector_91map_scheme_base = &c_7318152; 
++  mclosure0(c_7318131, (function_type)__lambda_562);c_7318131.num_args = 2; 
++  __glo_string_91for_91each_scheme_base = &c_7318131; 
++  mclosure0(c_7318104, (function_type)__lambda_558);c_7318104.num_args = 2; 
++  __glo_string_91map_scheme_base = &c_7318104; 
++  mclosure0(c_7317975, (function_type)__lambda_546);c_7317975.num_args = 2; 
++  __glo_string_91fill_67_scheme_base = &c_7317975; 
++  mclosure0(c_7317850, (function_type)__lambda_536);c_7317850.num_args = 3; 
++  __glo_string_91copy_67_scheme_base = &c_7317850; 
++  mclosure0(c_7317764, (function_type)__lambda_529);c_7317764.num_args = 1; 
++  __glo_string_91copy_scheme_base = &c_7317764; 
++  mclosure0(c_7317749, (function_type)__lambda_527);c_7317749.num_args = 1; 
++  __glo_string_91_125vector_scheme_base = &c_7317749; 
++  mclosure0(c_7317630, (function_type)__lambda_517);c_7317630.num_args = 1; 
++  __glo_string_91_125list_scheme_base = &c_7317630; 
++  mclosure0(c_7317615, (function_type)__lambda_515);c_7317615.num_args = 1; 
++  __glo_vector_91_125string_scheme_base = &c_7317615; 
++  mclosure0(c_7317529, (function_type)__lambda_508);c_7317529.num_args = 1; 
++  __glo_string_91_125utf8_scheme_base = &c_7317529; 
++  mclosure0(c_7317443, (function_type)__lambda_501);c_7317443.num_args = 1; 
++  __glo_utf8_91_125string_scheme_base = &c_7317443; 
++  mclosure0(c_7317240, (function_type)__lambda_480);c_7317240.num_args = 3; 
++  __glo_bytevector_91copy_67_scheme_base = &c_7317240; 
++  mclosure0(c_7317154, (function_type)__lambda_473);c_7317154.num_args = 1; 
++  __glo_bytevector_91copy_scheme_base = &c_7317154; 
++  mclosure0(c_7317035, (function_type)__lambda_463);c_7317035.num_args = 1; 
++  __glo_vector_91_125list_scheme_base = &c_7317035; 
++  mclosure0(c_7317030, (function_type)__lambda_462);c_7317030.num_args = 0; 
++  __glo_vector_scheme_base = &c_7317030; 
++  mclosure0(c_7317028, (function_type)__lambda_461);c_7317028.num_args = 1; 
++  __glo_reverse_scheme_base = &c_7317028; 
++  mclosure0(c_7317018, (function_type)__lambda_459);c_7317018.num_args = 3; 
++  __glo_list_91set_67_scheme_base = &c_7317018; 
++  mclosure0(c_7317010, (function_type)__lambda_457);c_7317010.num_args = 2; 
++  __glo_list_91ref_scheme_base = &c_7317010; 
++  mclosure0(c_7317000, (function_type)__lambda_456);c_7317000.num_args = 2; 
++  __glo_list_91tail_scheme_base = &c_7317000; 
++  mclosure0(c_7316913, (function_type)__lambda_444);c_7316913.num_args = 2; 
++  __glo_for_91each_scheme_base = &c_7316913; 
++  mclosure0(c_7316883, (function_type)__lambda_442);c_7316883.num_args = 3; 
++  __glo_Cyc_91for_91each_91loop_912_scheme_base = &c_7316883; 
++  mclosure0(c_7316865, (function_type)__lambda_440);c_7316865.num_args = 2; 
++  __glo_Cyc_91for_91each_91loop_911_scheme_base = &c_7316865; 
++  mclosure0(c_7316831, (function_type)__lambda_437);c_7316831.num_args = 3; 
++  __glo_Cyc_91map_91loop_912_scheme_base = &c_7316831; 
++  mclosure0(c_7316809, (function_type)__lambda_434);c_7316809.num_args = 2; 
++  __glo_Cyc_91map_91loop_911_scheme_base = &c_7316809; 
++  mclosure0(c_7316718, (function_type)__lambda_419);c_7316718.num_args = 2; 
++  __glo_map_scheme_base = &c_7316718; 
++  mclosure0(c_7316606, (function_type)__lambda_399);c_7316606.num_args = 1; 
++  __glo__75cars_87cdrs_scheme_base = &c_7316606; 
++  mclosure0(c_7316600, (function_type)__lambda_398);c_7316600.num_args = 1; 
++  __glo_car_87cdr_scheme_base = &c_7316600; 
++  mmacro(c_7316568, (function_type)__lambda_397);c_7316568.num_args = 3; 
++  __glo_receive_scheme_base = &c_7316568; 
++  mclosure0(c_7316518, (function_type)__lambda_390);c_7316518.num_args = 1; 
++  __glo_list_91copy_scheme_base = &c_7316518; 
++  mclosure0(c_7316448, (function_type)__lambda_383);c_7316448.num_args = 1; 
++  __glo_make_91list_scheme_base = &c_7316448; 
++  mclosure0(c_7316446, (function_type)__lambda_382);c_7316446.num_args = 0; 
++  __glo__list_scheme_base = &c_7316446; 
++  mclosure0(c_7316381, (function_type)__lambda_373);c_7316381.num_args = 0; 
++  __glo_append_scheme_base = &c_7316381; 
++  mclosure0(c_7316377, (function_type)__lambda_1401);c_7316377.num_args = 1; 
++  __glo_negative_127_191_191inline_191_191_scheme_base = &c_7316377; 
++  mclosure0(c_7316373, (function_type)__lambda_372);c_7316373.num_args = 1; 
++  __glo_negative_127_scheme_base = &c_7316373; 
++  mclosure0(c_7316369, (function_type)__lambda_1400);c_7316369.num_args = 1; 
++  __glo_positive_127_191_191inline_191_191_scheme_base = &c_7316369; 
++  mclosure0(c_7316365, (function_type)__lambda_371);c_7316365.num_args = 1; 
++  __glo_positive_127_scheme_base = &c_7316365; 
++  mclosure0(c_7316361, (function_type)__lambda_1399);c_7316361.num_args = 1; 
++  __glo_zero_127_191_191inline_191_191_scheme_base = &c_7316361; 
++  mclosure0(c_7316357, (function_type)__lambda_370);c_7316357.num_args = 1; 
++  __glo_zero_127_scheme_base = &c_7316357; 
++  mclosure0(c_7316356, (function_type)__lambda_1397);c_7316356.num_args = 1; 
++  __glo_list_127_scheme_base = &c_7316356; 
++  mclosure0(c_7316355, (function_type)__lambda_1398);c_7316355.num_args = -1; 
++  __glo_list_127_191_191inline_191_191_scheme_base = &c_7316355; 
++  mclosure0(c_7316352, (function_type)__lambda_1396);c_7316352.num_args = 1; 
++  __glo_not_191_191inline_191_191_scheme_base = &c_7316352; 
++  mclosure0(c_7316349, (function_type)__lambda_369);c_7316349.num_args = 1; 
++  __glo_not_scheme_base = &c_7316349; 
++  mclosure0(c_7316341, (function_type)__lambda_368);c_7316341.num_args = 0; 
++  __glo_newline_scheme_base = &c_7316341; 
++  mclosure0(c_7316325, (function_type)__lambda_366);c_7316325.num_args = 1; 
++  __glo_write_91char_scheme_base = &c_7316325; 
++  mclosure0(c_7316324, (function_type)__lambda_1394);c_7316324.num_args = 4; 
++  __glo__75write_91bytevector_scheme_base = &c_7316324; 
++  mclosure0(c_7316323, (function_type)__lambda_1395);c_7316323.num_args = 2; 
++  __glo__75write_91bytevector_191_191inline_191_191_scheme_base = &c_7316323; 
++  mclosure0(c_7316206, (function_type)__lambda_356);c_7316206.num_args = 1; 
++  __glo_write_91bytevector_scheme_base = &c_7316206; 
++  mclosure0(c_7316061, (function_type)__lambda_339);c_7316061.num_args = 1; 
++  __glo_read_91bytevector_67_scheme_base = &c_7316061; 
++  mclosure0(c_7315943, (function_type)__lambda_327);c_7315943.num_args = 1; 
++  __glo_read_91bytevector_scheme_base = &c_7315943; 
++  mclosure0(c_7315893, (function_type)__lambda_323);c_7315893.num_args = 1; 
++  __glo_write_91string_scheme_base = &c_7315893; 
++  mclosure0(c_7315889, (function_type)__lambda_322);c_7315889.num_args = 2; 
++  __glo_write_91string_912_scheme_base = &c_7315889; 
++  mclosure0(c_7315880, (function_type)__lambda_320);c_7315880.num_args = 1; 
++  __glo_write_91string_911_scheme_base = &c_7315880; 
++  mclosure0(c_7315865, (function_type)__lambda_318);c_7315865.num_args = 0; 
++  __glo_flush_91output_91port_scheme_base = &c_7315865; 
++  mclosure0(c_7315851, (function_type)__lambda_316);c_7315851.num_args = 1; 
++  __glo_textual_91port_127_scheme_base = &c_7315851; 
++  mclosure0(c_7315846, (function_type)__lambda_315);c_7315846.num_args = 1; 
++  __glo_binary_91port_127_scheme_base = &c_7315846; 
++  mclosure0(c_7315845, (function_type)__lambda_1393);c_7315845.num_args = 1; 
++  __glo__191binary_91port_127_scheme_base = &c_7315845; 
++  mclosure0(c_7315738, (function_type)__lambda_303);c_7315738.num_args = 1; 
++  __glo_read_91string_scheme_base = &c_7315738; 
++  mclosure0(c_7315721, (function_type)__lambda_301);c_7315721.num_args = 0; 
++  __glo_read_91line_scheme_base = &c_7315721; 
++  mclosure0(c_7315704, (function_type)__lambda_299);c_7315704.num_args = 0; 
++  __glo_read_91char_scheme_base = &c_7315704; 
++  mclosure0(c_7315687, (function_type)__lambda_297);c_7315687.num_args = 0; 
++  __glo_peek_91char_scheme_base = &c_7315687; 
++  mclosure0(c_7315676, (function_type)__lambda_295);c_7315676.num_args = 0; 
++  __glo_char_91ready_127_scheme_base = &c_7315676; 
++  mclosure0(c_7315675, (function_type)__lambda_1392);c_7315675.num_args = 1; 
++  __glo_Cyc_91char_91ready_127_scheme_base = &c_7315675; 
++  mclosure0(c_7315663, (function_type)__lambda_293);c_7315663.num_args = 1; 
++  __glo_write_91u8_scheme_base = &c_7315663; 
++  mclosure0(c_7315652, (function_type)__lambda_291);c_7315652.num_args = 0; 
++  __glo_peek_91u8_scheme_base = &c_7315652; 
++  mclosure0(c_7315641, (function_type)__lambda_289);c_7315641.num_args = 0; 
++  __glo_read_91u8_scheme_base = &c_7315641; 
++  mclosure0(c_7315640, (function_type)__lambda_1391);c_7315640.num_args = 2; 
++  __glo__191write_91u8_scheme_base = &c_7315640; 
++  mclosure0(c_7315639, (function_type)__lambda_1390);c_7315639.num_args = 1; 
++  __glo__191peek_91u8_scheme_base = &c_7315639; 
++  mclosure0(c_7315638, (function_type)__lambda_1389);c_7315638.num_args = 1; 
++  __glo__191read_91u8_scheme_base = &c_7315638; 
++  mclosure0(c_7315623, (function_type)__lambda_287);c_7315623.num_args = 3; 
++  __glo_foldr_scheme_base = &c_7315623; 
++  mclosure0(c_7315608, (function_type)__lambda_285);c_7315608.num_args = 3; 
++  __glo_foldl_scheme_base = &c_7315608; 
++  mclosure0(c_7315601, (function_type)__lambda_284);c_7315601.num_args = 2; 
++  __glo_assoc_scheme_base = &c_7315601; 
++  mclosure0(c_7315566, (function_type)__lambda_281);c_7315566.num_args = 3; 
++  __glo_assoc_91helper_scheme_base = &c_7315566; 
++  mclosure0(c_7315559, (function_type)__lambda_280);c_7315559.num_args = 2; 
++  __glo_member_scheme_base = &c_7315559; 
++  mclosure0(c_7315540, (function_type)__lambda_278);c_7315540.num_args = 3; 
++  __glo_member_91helper_scheme_base = &c_7315540; 
++  mclosure0(c_7315534, (function_type)__lambda_1388);c_7315534.num_args = 2; 
++  __glo_fast_91string_125_123_127_191_191inline_191_191_scheme_base = &c_7315534; 
++  mclosure0(c_7315528, (function_type)__lambda_277);c_7315528.num_args = 2; 
++  __glo_fast_91string_125_123_127_scheme_base = &c_7315528; 
++  mclosure0(c_7315522, (function_type)__lambda_1387);c_7315522.num_args = 2; 
++  __glo_fast_91string_125_127_191_191inline_191_191_scheme_base = &c_7315522; 
++  mclosure0(c_7315516, (function_type)__lambda_276);c_7315516.num_args = 2; 
++  __glo_fast_91string_125_127_scheme_base = &c_7315516; 
++  mclosure0(c_7315510, (function_type)__lambda_1386);c_7315510.num_args = 2; 
++  __glo_fast_91string_121_123_127_191_191inline_191_191_scheme_base = &c_7315510; 
++  mclosure0(c_7315504, (function_type)__lambda_275);c_7315504.num_args = 2; 
++  __glo_fast_91string_121_123_127_scheme_base = &c_7315504; 
++  mclosure0(c_7315498, (function_type)__lambda_1385);c_7315498.num_args = 2; 
++  __glo_fast_91string_121_127_191_191inline_191_191_scheme_base = &c_7315498; 
++  mclosure0(c_7315492, (function_type)__lambda_274);c_7315492.num_args = 2; 
++  __glo_fast_91string_121_127_scheme_base = &c_7315492; 
++  mclosure0(c_7315486, (function_type)__lambda_1384);c_7315486.num_args = 2; 
++  __glo_fast_91string_123_127_191_191inline_191_191_scheme_base = &c_7315486; 
++  mclosure0(c_7315480, (function_type)__lambda_273);c_7315480.num_args = 2; 
++  __glo_fast_91string_123_127_scheme_base = &c_7315480; 
++  mclosure0(c_7315475, (function_type)__lambda_272);c_7315475.num_args = 2; 
++  __glo_string_125_123_127_scheme_base = &c_7315475; 
++  mclosure0(c_7315470, (function_type)__lambda_271);c_7315470.num_args = 2; 
++  __glo_string_125_127_scheme_base = &c_7315470; 
++  mclosure0(c_7315465, (function_type)__lambda_270);c_7315465.num_args = 2; 
++  __glo_string_121_123_127_scheme_base = &c_7315465; 
++  mclosure0(c_7315460, (function_type)__lambda_269);c_7315460.num_args = 2; 
++  __glo_string_121_127_scheme_base = &c_7315460; 
++  mclosure0(c_7315455, (function_type)__lambda_268);c_7315455.num_args = 2; 
++  __glo_string_123_127_scheme_base = &c_7315455; 
++  mclosure0(c_7315450, (function_type)__lambda_267);c_7315450.num_args = 2; 
++  __glo_char_125_123_127_scheme_base = &c_7315450; 
++  mclosure0(c_7315445, (function_type)__lambda_266);c_7315445.num_args = 2; 
++  __glo_char_121_123_127_scheme_base = &c_7315445; 
++  mclosure0(c_7315440, (function_type)__lambda_265);c_7315440.num_args = 2; 
++  __glo_char_125_127_scheme_base = &c_7315440; 
++  mclosure0(c_7315435, (function_type)__lambda_264);c_7315435.num_args = 2; 
++  __glo_char_121_127_scheme_base = &c_7315435; 
++  mclosure0(c_7315430, (function_type)__lambda_263);c_7315430.num_args = 2; 
++  __glo_char_123_127_scheme_base = &c_7315430; 
++  mclosure0(c_7315414, (function_type)__lambda_260);c_7315414.num_args = 3; 
++  __glo_Cyc_91bin_91op_91char_scheme_base = &c_7315414; 
++  mclosure0(c_7315394, (function_type)__lambda_258);c_7315394.num_args = 3; 
++  __glo_Cyc_91bin_91op_scheme_base = &c_7315394; 
++  mclosure0(c_7315384, (function_type)__lambda_256);c_7315384.num_args = 2; 
++  __glo_call_91with_91port_scheme_base = &c_7315384; 
++  mclosure0(c_7315369, (function_type)__lambda_252);c_7315369.num_args = 3; 
++  __glo_dynamic_91wind_scheme_base = &c_7315369; 
++  mclosure0(c_7315342, (function_type)__lambda_250);c_7315342.num_args = 2; 
++  __glo_call_91with_91values_scheme_base = &c_7315342; 
++  mclosure0(c_7315322, (function_type)__lambda_249);c_7315322.num_args = 0; 
++  __glo_values_scheme_base = &c_7315322; 
++  mmacro(c_7315315, (function_type)__lambda_248);c_7315315.num_args = 3; 
++  __glo_syntax_91error_scheme_base = &c_7315315; 
++  mmacro(c_7314982, (function_type)__lambda_213);c_7314982.num_args = 3; 
++  __glo_quasiquote_scheme_base = &c_7314982; 
++  mmacro(c_7314747, (function_type)__lambda_189);c_7314747.num_args = 3; 
++  __glo__do_scheme_base = &c_7314747; 
++  mmacro(c_7314676, (function_type)__lambda_182);c_7314676.num_args = 3; 
++  __glo_unless_scheme_base = &c_7314676; 
++  mmacro(c_7314611, (function_type)__lambda_175);c_7314611.num_args = 3; 
++  __glo_when_scheme_base = &c_7314611; 
++  mmacro(c_7314257, (function_type)__lambda_142);c_7314257.num_args = 3; 
++  __glo__case_scheme_base = &c_7314257; 
++  mmacro(c_7314065, (function_type)__lambda_121);c_7314065.num_args = 3; 
++  __glo_cond_scheme_base = &c_7314065; 
++  mmacro(c_7313649, (function_type)__lambda_84);c_7313649.num_args = 3; 
++  __glo_cond_91expand_scheme_base = &c_7313649; 
++  mmacro(c_7313566, (function_type)__lambda_75);c_7313566.num_args = 3; 
++  __glo_begin_scheme_base = &c_7313566; 
++  mmacro(c_7313472, (function_type)__lambda_58);c_7313472.num_args = 3; 
++  __glo_letrec_scheme_base = &c_7313472; 
++  mmacro(c_7313330, (function_type)__lambda_43);c_7313330.num_args = 3; 
++  __glo_let_85_scheme_base = &c_7313330; 
++  mmacro(c_7313130, (function_type)__lambda_24);c_7313130.num_args = 3; 
++  __glo_let_scheme_base = &c_7313130; 
++  mmacro(c_7313066, (function_type)__lambda_17);c_7313066.num_args = 3; 
++  __glo_or_scheme_base = &c_7313066; 
++  mmacro(c_7313031, (function_type)__lambda_14);c_7313031.num_args = 3; 
++  __glo_and_scheme_base = &c_7313031; 
++  mclosure0(c_7313029, (function_type)__lambda_13);c_7313029.num_args = 0; 
++  __glo_Cyc_91version_scheme_base = &c_7313029; 
++  mclosure0(c_7313017, (function_type)__lambda_11);c_7313017.num_args = 1; 
++  __glo_Cyc_91add_91feature_67_scheme_base = &c_7313017; 
++  mclosure0(c_7312944, (function_type)__lambda_3);c_7312944.num_args = 0; 
++  __glo_features_scheme_base = &c_7312944; 
++  mclosure0(c_7312938, (function_type)__lambda_1);c_7312938.num_args = 2; 
++  __glo_call_95cc_scheme_base = &c_7312938; 
    __glo_record_91marker_scheme_base = boolean_f; 
    __glo_identifier_127_scheme_base = boolean_f; 
    __glo_open_91output_91bytevector_scheme_base = boolean_f; 
-@@ -41422,497 +39622,497 @@ Cyc_set_globals_changed((gc_thread_data 
+@@ -41422,497 +39623,497 @@ Cyc_set_globals_changed((gc_thread_data 
    __glo_call_91with_91current_91continuation_scheme_base = boolean_f; 
    __glo__85other_91features_85_scheme_base = boolean_f; 
  
@@ -68889,497 +69174,497 @@ Make let-values be the same as let*-values, to work around
 -make_pair(c_7329166, &pair_7329162, &c_7329167);
 -make_pair(c_7329165, &pair_7329164, &c_7329166);
 -Cyc_global_variables = &c_7329165;
-+  mclosure0(clo_7326224, c_schemebase_inlinable_lambdas); make_pair(pair_7326223, find_or_add_symbol("c_schemebase_inlinable_lambdas"), &clo_7326224);
-+  make_cvar(cvar_7326225, (object *)&__glo_lib_91init_117schemebase_scheme_base);make_pair(pair_7326226, find_or_add_symbol("lib-init:schemebase"), &cvar_7326225);
-+  make_cvar(cvar_7326227, (object *)&__glo_define_91values_scheme_base);make_pair(pair_7326228, find_or_add_symbol("define-values"), &cvar_7326227);
-+  make_cvar(cvar_7326229, (object *)&__glo_define_91record_91type_scheme_base);make_pair(pair_7326230, find_or_add_symbol("define-record-type"), &cvar_7326229);
-+  make_cvar(cvar_7326231, (object *)&__glo_is_91a_127_scheme_base);make_pair(pair_7326232, find_or_add_symbol("is-a?"), &cvar_7326231);
-+  make_cvar(cvar_7326233, (object *)&__glo_record_127_scheme_base);make_pair(pair_7326234, find_or_add_symbol("record?"), &cvar_7326233);
-+  make_cvar(cvar_7326235, (object *)&__glo__191list_91index_scheme_base);make_pair(pair_7326236, find_or_add_symbol("_list-index"), &cvar_7326235);
-+  make_cvar(cvar_7326237, (object *)&__glo_make_91setter_scheme_base);make_pair(pair_7326238, find_or_add_symbol("make-setter"), &cvar_7326237);
-+  make_cvar(cvar_7326239, (object *)&__glo_make_91getter_scheme_base);make_pair(pair_7326240, find_or_add_symbol("make-getter"), &cvar_7326239);
-+  make_cvar(cvar_7326241, (object *)&__glo_slot_91ref_scheme_base);make_pair(pair_7326242, find_or_add_symbol("slot-ref"), &cvar_7326241);
-+  make_cvar(cvar_7326243, (object *)&__glo_slot_91set_67_scheme_base);make_pair(pair_7326244, find_or_add_symbol("slot-set!"), &cvar_7326243);
-+  make_cvar(cvar_7326245, (object *)&__glo_type_91slot_91offset_scheme_base);make_pair(pair_7326246, find_or_add_symbol("type-slot-offset"), &cvar_7326245);
-+  make_cvar(cvar_7326247, (object *)&__glo_make_91constructor_95args_scheme_base);make_pair(pair_7326248, find_or_add_symbol("make-constructor/args"), &cvar_7326247);
-+  make_cvar(cvar_7326249, (object *)&__glo_make_91constructor_scheme_base);make_pair(pair_7326250, find_or_add_symbol("make-constructor"), &cvar_7326249);
-+  make_cvar(cvar_7326251, (object *)&__glo_make_91type_91predicate_scheme_base);make_pair(pair_7326252, find_or_add_symbol("make-type-predicate"), &cvar_7326251);
-+  make_cvar(cvar_7326253, (object *)&__glo_register_91simple_91type_scheme_base);make_pair(pair_7326254, find_or_add_symbol("register-simple-type"), &cvar_7326253);
-+  make_cvar(cvar_7326255, (object *)&__glo_record_91marker_scheme_base);make_pair(pair_7326256, find_or_add_symbol("record-marker"), &cvar_7326255);
-+  make_cvar(cvar_7326257, (object *)&__glo_guard_91aux_scheme_base);make_pair(pair_7326258, find_or_add_symbol("guard-aux"), &cvar_7326257);
-+  make_cvar(cvar_7326259, (object *)&__glo_guard_scheme_base);make_pair(pair_7326260, find_or_add_symbol("guard"), &cvar_7326259);
-+  make_cvar(cvar_7326261, (object *)&__glo_let_91values_scheme_base);make_pair(pair_7326262, find_or_add_symbol("let-values"), &cvar_7326261);
-+  make_cvar(cvar_7326263, (object *)&__glo_let_85_91values_scheme_base);make_pair(pair_7326264, find_or_add_symbol("let*-values"), &cvar_7326263);
-+  make_cvar(cvar_7326265, (object *)&__glo_letrec_85_scheme_base);make_pair(pair_7326266, find_or_add_symbol("letrec*"), &cvar_7326265);
-+  make_cvar(cvar_7326267, (object *)&__glo_syntax_91rules_scheme_base);make_pair(pair_7326268, find_or_add_symbol("syntax-rules"), &cvar_7326267);
-+  make_cvar(cvar_7326269, (object *)&__glo_cons_91source_scheme_base);make_pair(pair_7326270, find_or_add_symbol("cons-source"), &cvar_7326269);
-+  make_cvar(cvar_7326271, (object *)&__glo_find_scheme_base);make_pair(pair_7326272, find_or_add_symbol("find"), &cvar_7326271);
-+  make_cvar(cvar_7326273, (object *)&__glo_find_91tail_scheme_base);make_pair(pair_7326274, find_or_add_symbol("find-tail"), &cvar_7326273);
-+  make_cvar(cvar_7326275, (object *)&__glo_identifier_127_scheme_base);make_pair(pair_7326276, find_or_add_symbol("identifier?"), &cvar_7326275);
-+  make_cvar(cvar_7326277, (object *)&__glo_open_91output_91bytevector_scheme_base);make_pair(pair_7326278, find_or_add_symbol("open-output-bytevector"), &cvar_7326277);
-+  make_cvar(cvar_7326279, (object *)&__glo_open_91input_91bytevector_scheme_base);make_pair(pair_7326280, find_or_add_symbol("open-input-bytevector"), &cvar_7326279);
-+  make_cvar(cvar_7326281, (object *)&__glo_get_91output_91bytevector_scheme_base);make_pair(pair_7326282, find_or_add_symbol("get-output-bytevector"), &cvar_7326281);
-+  make_cvar(cvar_7326283, (object *)&__glo_get_91output_91string_scheme_base);make_pair(pair_7326284, find_or_add_symbol("get-output-string"), &cvar_7326283);
-+  make_cvar(cvar_7326285, (object *)&__glo_open_91output_91string_scheme_base);make_pair(pair_7326286, find_or_add_symbol("open-output-string"), &cvar_7326285);
-+  make_cvar(cvar_7326287, (object *)&__glo_open_91input_91string_scheme_base);make_pair(pair_7326288, find_or_add_symbol("open-input-string"), &cvar_7326287);
-+  make_cvar(cvar_7326289, (object *)&__glo_output_91port_91open_127_scheme_base);make_pair(pair_7326290, find_or_add_symbol("output-port-open?"), &cvar_7326289);
-+  make_cvar(cvar_7326291, (object *)&__glo_input_91port_91open_127_scheme_base);make_pair(pair_7326292, find_or_add_symbol("input-port-open?"), &cvar_7326291);
-+  make_cvar(cvar_7326293, (object *)&__glo_output_91port_127_scheme_base);make_pair(pair_7326294, find_or_add_symbol("output-port?"), &cvar_7326293);
-+  make_cvar(cvar_7326295, (object *)&__glo_input_91port_127_scheme_base);make_pair(pair_7326296, find_or_add_symbol("input-port?"), &cvar_7326295);
-+  make_cvar(cvar_7326297, (object *)&__glo_make_91record_91marker_scheme_base);make_pair(pair_7326298, find_or_add_symbol("make-record-marker"), &cvar_7326297);
-+  make_cvar(cvar_7326299, (object *)&__glo_make_91record_91marker_191_191inline_191_191_scheme_base);make_pair(pair_7326300, find_or_add_symbol("make-record-marker__inline__"), &cvar_7326299);
-+  make_cvar(cvar_7326301, (object *)&__glo__void_scheme_base);make_pair(pair_7326302, find_or_add_symbol("void"), &cvar_7326301);
-+  make_cvar(cvar_7326303, (object *)&__glo_void_191_191inline_191_191_scheme_base);make_pair(pair_7326304, find_or_add_symbol("void__inline__"), &cvar_7326303);
-+  make_cvar(cvar_7326305, (object *)&__glo_eof_91object_scheme_base);make_pair(pair_7326306, find_or_add_symbol("eof-object"), &cvar_7326305);
-+  make_cvar(cvar_7326307, (object *)&__glo_eof_91object_191_191inline_191_191_scheme_base);make_pair(pair_7326308, find_or_add_symbol("eof-object__inline__"), &cvar_7326307);
-+  make_cvar(cvar_7326309, (object *)&__glo_expt_scheme_base);make_pair(pair_7326310, find_or_add_symbol("expt"), &cvar_7326309);
-+  make_cvar(cvar_7326311, (object *)&__glo_square_191_191inline_191_191_scheme_base);make_pair(pair_7326312, find_or_add_symbol("square__inline__"), &cvar_7326311);
-+  make_cvar(cvar_7326313, (object *)&__glo_square_scheme_base);make_pair(pair_7326314, find_or_add_symbol("square"), &cvar_7326313);
-+  make_cvar(cvar_7326315, (object *)&__glo_floor_95_scheme_base);make_pair(pair_7326316, find_or_add_symbol("floor/"), &cvar_7326315);
-+  make_cvar(cvar_7326317, (object *)&__glo_floor_91remainder_scheme_base);make_pair(pair_7326318, find_or_add_symbol("floor-remainder"), &cvar_7326317);
-+  make_cvar(cvar_7326319, (object *)&__glo_floor_91quotient_scheme_base);make_pair(pair_7326320, find_or_add_symbol("floor-quotient"), &cvar_7326319);
-+  make_cvar(cvar_7326321, (object *)&__glo_truncate_95_scheme_base);make_pair(pair_7326322, find_or_add_symbol("truncate/"), &cvar_7326321);
-+  make_cvar(cvar_7326323, (object *)&__glo_truncate_91remainder_scheme_base);make_pair(pair_7326324, find_or_add_symbol("truncate-remainder"), &cvar_7326323);
-+  make_cvar(cvar_7326325, (object *)&__glo_truncate_91quotient_scheme_base);make_pair(pair_7326326, find_or_add_symbol("truncate-quotient"), &cvar_7326325);
-+  make_cvar(cvar_7326327, (object *)&__glo_quotient_191_191inline_191_191_scheme_base);make_pair(pair_7326328, find_or_add_symbol("quotient__inline__"), &cvar_7326327);
-+  make_cvar(cvar_7326329, (object *)&__glo_quotient_scheme_base);make_pair(pair_7326330, find_or_add_symbol("quotient"), &cvar_7326329);
-+  make_cvar(cvar_7326331, (object *)&__glo_denominator_scheme_base);make_pair(pair_7326332, find_or_add_symbol("denominator"), &cvar_7326331);
-+  make_cvar(cvar_7326333, (object *)&__glo_numerator_scheme_base);make_pair(pair_7326334, find_or_add_symbol("numerator"), &cvar_7326333);
-+  make_cvar(cvar_7326335, (object *)&__glo_lcm_95entry_scheme_base);make_pair(pair_7326336, find_or_add_symbol("lcm/entry"), &cvar_7326335);
-+  make_cvar(cvar_7326337, (object *)&__glo_lcm_95main_scheme_base);make_pair(pair_7326338, find_or_add_symbol("lcm/main"), &cvar_7326337);
-+  make_cvar(cvar_7326339, (object *)&__glo_gcd_95entry_scheme_base);make_pair(pair_7326340, find_or_add_symbol("gcd/entry"), &cvar_7326339);
-+  make_cvar(cvar_7326341, (object *)&__glo_gcd_95main_scheme_base);make_pair(pair_7326342, find_or_add_symbol("gcd/main"), &cvar_7326341);
-+  make_cvar(cvar_7326343, (object *)&__glo_lcm_scheme_base);make_pair(pair_7326344, find_or_add_symbol("lcm"), &cvar_7326343);
-+  make_cvar(cvar_7326345, (object *)&__glo_gcd_scheme_base);make_pair(pair_7326346, find_or_add_symbol("gcd"), &cvar_7326345);
-+  make_cvar(cvar_7326347, (object *)&__glo_min_scheme_base);make_pair(pair_7326348, find_or_add_symbol("min"), &cvar_7326347);
-+  make_cvar(cvar_7326349, (object *)&__glo_max_scheme_base);make_pair(pair_7326350, find_or_add_symbol("max"), &cvar_7326349);
-+  make_cvar(cvar_7326351, (object *)&__glo_rational_127_scheme_base);make_pair(pair_7326352, find_or_add_symbol("rational?"), &cvar_7326351);
-+  make_cvar(cvar_7326353, (object *)&__glo_complex_127_scheme_base);make_pair(pair_7326354, find_or_add_symbol("complex?"), &cvar_7326353);
-+  make_cvar(cvar_7326355, (object *)&__glo_complex_127_191_191inline_191_191_scheme_base);make_pair(pair_7326356, find_or_add_symbol("complex?__inline__"), &cvar_7326355);
-+  make_cvar(cvar_7326357, (object *)&__glo_inexact_127_scheme_base);make_pair(pair_7326358, find_or_add_symbol("inexact?"), &cvar_7326357);
-+  make_cvar(cvar_7326359, (object *)&__glo_exact_127_scheme_base);make_pair(pair_7326360, find_or_add_symbol("exact?"), &cvar_7326359);
-+  make_cvar(cvar_7326361, (object *)&__glo_exact_127_191_191inline_191_191_scheme_base);make_pair(pair_7326362, find_or_add_symbol("exact?__inline__"), &cvar_7326361);
-+  make_cvar(cvar_7326363, (object *)&__glo_exact_91integer_127_scheme_base);make_pair(pair_7326364, find_or_add_symbol("exact-integer?"), &cvar_7326363);
-+  make_cvar(cvar_7326365, (object *)&__glo_exact_91integer_127_191_191inline_191_191_scheme_base);make_pair(pair_7326366, find_or_add_symbol("exact-integer?__inline__"), &cvar_7326365);
-+  make_cvar(cvar_7326367, (object *)&__glo_sqrt_scheme_base);make_pair(pair_7326368, find_or_add_symbol("sqrt"), &cvar_7326367);
-+  make_cvar(cvar_7326369, (object *)&__glo_sqrt_191_191inline_191_191_scheme_base);make_pair(pair_7326370, find_or_add_symbol("sqrt__inline__"), &cvar_7326369);
-+  make_cvar(cvar_7326371, (object *)&__glo_exact_91integer_91sqrt_scheme_base);make_pair(pair_7326372, find_or_add_symbol("exact-integer-sqrt"), &cvar_7326371);
-+  make_cvar(cvar_7326373, (object *)&__glo_bignum_91sqrt_scheme_base);make_pair(pair_7326374, find_or_add_symbol("bignum-sqrt"), &cvar_7326373);
-+  make_cvar(cvar_7326375, (object *)&__glo_bignum_127_scheme_base);make_pair(pair_7326376, find_or_add_symbol("bignum?"), &cvar_7326375);
-+  make_cvar(cvar_7326377, (object *)&__glo_even_127_scheme_base);make_pair(pair_7326378, find_or_add_symbol("even?"), &cvar_7326377);
-+  make_cvar(cvar_7326379, (object *)&__glo_odd_127_scheme_base);make_pair(pair_7326380, find_or_add_symbol("odd?"), &cvar_7326379);
-+  make_cvar(cvar_7326381, (object *)&__glo_modulo_scheme_base);make_pair(pair_7326382, find_or_add_symbol("modulo"), &cvar_7326381);
-+  make_cvar(cvar_7326383, (object *)&__glo_remainder_scheme_base);make_pair(pair_7326384, find_or_add_symbol("remainder"), &cvar_7326383);
-+  make_cvar(cvar_7326385, (object *)&__glo_abs_scheme_base);make_pair(pair_7326386, find_or_add_symbol("abs"), &cvar_7326385);
-+  make_cvar(cvar_7326387, (object *)&__glo_inexact_scheme_base);make_pair(pair_7326388, find_or_add_symbol("inexact"), &cvar_7326387);
-+  make_cvar(cvar_7326389, (object *)&__glo_inexact_191_191inline_191_191_scheme_base);make_pair(pair_7326390, find_or_add_symbol("inexact__inline__"), &cvar_7326389);
-+  make_cvar(cvar_7326391, (object *)&__glo_exact_scheme_base);make_pair(pair_7326392, find_or_add_symbol("exact"), &cvar_7326391);
-+  make_cvar(cvar_7326393, (object *)&__glo_round_scheme_base);make_pair(pair_7326394, find_or_add_symbol("round"), &cvar_7326393);
-+  make_cvar(cvar_7326395, (object *)&__glo_round_191_191inline_191_191_scheme_base);make_pair(pair_7326396, find_or_add_symbol("round__inline__"), &cvar_7326395);
-+  make_cvar(cvar_7326397, (object *)&__glo_truncate_scheme_base);make_pair(pair_7326398, find_or_add_symbol("truncate"), &cvar_7326397);
-+  make_cvar(cvar_7326399, (object *)&__glo_truncate_191_191inline_191_191_scheme_base);make_pair(pair_7326400, find_or_add_symbol("truncate__inline__"), &cvar_7326399);
-+  make_cvar(cvar_7326401, (object *)&__glo_ceiling_scheme_base);make_pair(pair_7326402, find_or_add_symbol("ceiling"), &cvar_7326401);
-+  make_cvar(cvar_7326403, (object *)&__glo_ceiling_191_191inline_191_191_scheme_base);make_pair(pair_7326404, find_or_add_symbol("ceiling__inline__"), &cvar_7326403);
-+  make_cvar(cvar_7326405, (object *)&__glo_floor_scheme_base);make_pair(pair_7326406, find_or_add_symbol("floor"), &cvar_7326405);
-+  make_cvar(cvar_7326407, (object *)&__glo_floor_191_191inline_191_191_scheme_base);make_pair(pair_7326408, find_or_add_symbol("floor__inline__"), &cvar_7326407);
-+  make_cvar(cvar_7326409, (object *)&__glo_every_scheme_base);make_pair(pair_7326410, find_or_add_symbol("every"), &cvar_7326409);
-+  make_cvar(cvar_7326411, (object *)&__glo_any_scheme_base);make_pair(pair_7326412, find_or_add_symbol("any"), &cvar_7326411);
-+  make_cvar(cvar_7326413, (object *)&__glo_error_95loc_scheme_base);make_pair(pair_7326414, find_or_add_symbol("error/loc"), &cvar_7326413);
-+  make_cvar(cvar_7326415, (object *)&__glo_Cyc_91remove_91exception_91handler_scheme_base);make_pair(pair_7326416, find_or_add_symbol("Cyc-remove-exception-handler"), &cvar_7326415);
-+  make_cvar(cvar_7326417, (object *)&__glo_Cyc_91add_91exception_91handler_scheme_base);make_pair(pair_7326418, find_or_add_symbol("Cyc-add-exception-handler"), &cvar_7326417);
-+  make_cvar(cvar_7326419, (object *)&__glo_with_91exception_91handler_scheme_base);make_pair(pair_7326420, find_or_add_symbol("with-exception-handler"), &cvar_7326419);
-+  make_cvar(cvar_7326421, (object *)&__glo_with_91handler_scheme_base);make_pair(pair_7326422, find_or_add_symbol("with-handler"), &cvar_7326421);
-+  make_cvar(cvar_7326423, (object *)&__glo_raise_91continuable_scheme_base);make_pair(pair_7326424, find_or_add_symbol("raise-continuable"), &cvar_7326423);
-+  make_cvar(cvar_7326425, (object *)&__glo_raise_scheme_base);make_pair(pair_7326426, find_or_add_symbol("raise"), &cvar_7326425);
-+  make_cvar(cvar_7326427, (object *)&__glo_error_scheme_base);make_pair(pair_7326428, find_or_add_symbol("error"), &cvar_7326427);
-+  make_cvar(cvar_7326429, (object *)&__glo_error_91object_91irritants_scheme_base);make_pair(pair_7326430, find_or_add_symbol("error-object-irritants"), &cvar_7326429);
-+  make_cvar(cvar_7326431, (object *)&__glo_error_91object_91message_scheme_base);make_pair(pair_7326432, find_or_add_symbol("error-object-message"), &cvar_7326431);
-+  make_cvar(cvar_7326433, (object *)&__glo_error_91object_127_scheme_base);make_pair(pair_7326434, find_or_add_symbol("error-object?"), &cvar_7326433);
-+  make_cvar(cvar_7326435, (object *)&__glo_current_91error_91port_scheme_base);make_pair(pair_7326436, find_or_add_symbol("current-error-port"), &cvar_7326435);
-+  make_cvar(cvar_7326437, (object *)&__glo_current_91input_91port_scheme_base);make_pair(pair_7326438, find_or_add_symbol("current-input-port"), &cvar_7326437);
-+  make_cvar(cvar_7326439, (object *)&__glo_current_91output_91port_scheme_base);make_pair(pair_7326440, find_or_add_symbol("current-output-port"), &cvar_7326439);
-+  make_cvar(cvar_7326441, (object *)&__glo_make_91parameter_scheme_base);make_pair(pair_7326442, find_or_add_symbol("make-parameter"), &cvar_7326441);
-+  make_cvar(cvar_7326443, (object *)&__glo__85parameter_91id_85_scheme_base);make_pair(pair_7326444, find_or_add_symbol("*parameter-id*"), &cvar_7326443);
-+  make_cvar(cvar_7326445, (object *)&__glo_set_91param_91obj_67_scheme_base);make_pair(pair_7326446, find_or_add_symbol("set-param-obj!"), &cvar_7326445);
-+  make_cvar(cvar_7326447, (object *)&__glo_get_91param_91objs_scheme_base);make_pair(pair_7326448, find_or_add_symbol("get-param-objs"), &cvar_7326447);
-+  make_cvar(cvar_7326449, (object *)&__glo_parameterize_scheme_base);make_pair(pair_7326450, find_or_add_symbol("parameterize"), &cvar_7326449);
-+  make_cvar(cvar_7326451, (object *)&__glo_Cyc_91make_91string_scheme_base);make_pair(pair_7326452, find_or_add_symbol("Cyc-make-string"), &cvar_7326451);
-+  make_cvar(cvar_7326453, (object *)&__glo_make_91string_scheme_base);make_pair(pair_7326454, find_or_add_symbol("make-string"), &cvar_7326453);
-+  make_cvar(cvar_7326455, (object *)&__glo_string_scheme_base);make_pair(pair_7326456, find_or_add_symbol("string"), &cvar_7326455);
-+  make_cvar(cvar_7326457, (object *)&__glo_Cyc_91obj_123_127_scheme_base);make_pair(pair_7326458, find_or_add_symbol("Cyc-obj=?"), &cvar_7326457);
-+  make_cvar(cvar_7326459, (object *)&__glo_symbol_123_127_scheme_base);make_pair(pair_7326460, find_or_add_symbol("symbol=?"), &cvar_7326459);
-+  make_cvar(cvar_7326461, (object *)&__glo_boolean_123_127_scheme_base);make_pair(pair_7326462, find_or_add_symbol("boolean=?"), &cvar_7326461);
-+  make_cvar(cvar_7326463, (object *)&__glo_vector_91fill_67_scheme_base);make_pair(pair_7326464, find_or_add_symbol("vector-fill!"), &cvar_7326463);
-+  make_cvar(cvar_7326465, (object *)&__glo_vector_91copy_67_scheme_base);make_pair(pair_7326466, find_or_add_symbol("vector-copy!"), &cvar_7326465);
-+  make_cvar(cvar_7326467, (object *)&__glo_vector_91copy_scheme_base);make_pair(pair_7326468, find_or_add_symbol("vector-copy"), &cvar_7326467);
-+  make_cvar(cvar_7326469, (object *)&__glo_vector_91append_scheme_base);make_pair(pair_7326470, find_or_add_symbol("vector-append"), &cvar_7326469);
-+  make_cvar(cvar_7326471, (object *)&__glo_vector_91for_91each_scheme_base);make_pair(pair_7326472, find_or_add_symbol("vector-for-each"), &cvar_7326471);
-+  make_cvar(cvar_7326473, (object *)&__glo_vector_91map_scheme_base);make_pair(pair_7326474, find_or_add_symbol("vector-map"), &cvar_7326473);
-+  make_cvar(cvar_7326475, (object *)&__glo_string_91for_91each_scheme_base);make_pair(pair_7326476, find_or_add_symbol("string-for-each"), &cvar_7326475);
-+  make_cvar(cvar_7326477, (object *)&__glo_string_91map_scheme_base);make_pair(pair_7326478, find_or_add_symbol("string-map"), &cvar_7326477);
-+  make_cvar(cvar_7326479, (object *)&__glo_string_91fill_67_scheme_base);make_pair(pair_7326480, find_or_add_symbol("string-fill!"), &cvar_7326479);
-+  make_cvar(cvar_7326481, (object *)&__glo_string_91copy_67_scheme_base);make_pair(pair_7326482, find_or_add_symbol("string-copy!"), &cvar_7326481);
-+  make_cvar(cvar_7326483, (object *)&__glo_string_91copy_scheme_base);make_pair(pair_7326484, find_or_add_symbol("string-copy"), &cvar_7326483);
-+  make_cvar(cvar_7326485, (object *)&__glo_string_91_125vector_scheme_base);make_pair(pair_7326486, find_or_add_symbol("string->vector"), &cvar_7326485);
-+  make_cvar(cvar_7326487, (object *)&__glo_string_91_125list_scheme_base);make_pair(pair_7326488, find_or_add_symbol("string->list"), &cvar_7326487);
-+  make_cvar(cvar_7326489, (object *)&__glo_vector_91_125string_scheme_base);make_pair(pair_7326490, find_or_add_symbol("vector->string"), &cvar_7326489);
-+  make_cvar(cvar_7326491, (object *)&__glo_string_91_125utf8_scheme_base);make_pair(pair_7326492, find_or_add_symbol("string->utf8"), &cvar_7326491);
-+  make_cvar(cvar_7326493, (object *)&__glo_utf8_91_125string_scheme_base);make_pair(pair_7326494, find_or_add_symbol("utf8->string"), &cvar_7326493);
-+  make_cvar(cvar_7326495, (object *)&__glo_bytevector_91copy_67_scheme_base);make_pair(pair_7326496, find_or_add_symbol("bytevector-copy!"), &cvar_7326495);
-+  make_cvar(cvar_7326497, (object *)&__glo_bytevector_91copy_scheme_base);make_pair(pair_7326498, find_or_add_symbol("bytevector-copy"), &cvar_7326497);
-+  make_cvar(cvar_7326499, (object *)&__glo_vector_91_125list_scheme_base);make_pair(pair_7326500, find_or_add_symbol("vector->list"), &cvar_7326499);
-+  make_cvar(cvar_7326501, (object *)&__glo_vector_scheme_base);make_pair(pair_7326502, find_or_add_symbol("vector"), &cvar_7326501);
-+  make_cvar(cvar_7326503, (object *)&__glo_reverse_scheme_base);make_pair(pair_7326504, find_or_add_symbol("reverse"), &cvar_7326503);
-+  make_cvar(cvar_7326505, (object *)&__glo_list_91set_67_scheme_base);make_pair(pair_7326506, find_or_add_symbol("list-set!"), &cvar_7326505);
-+  make_cvar(cvar_7326507, (object *)&__glo_list_91ref_scheme_base);make_pair(pair_7326508, find_or_add_symbol("list-ref"), &cvar_7326507);
-+  make_cvar(cvar_7326509, (object *)&__glo_list_91tail_scheme_base);make_pair(pair_7326510, find_or_add_symbol("list-tail"), &cvar_7326509);
-+  make_cvar(cvar_7326511, (object *)&__glo_for_91each_scheme_base);make_pair(pair_7326512, find_or_add_symbol("for-each"), &cvar_7326511);
-+  make_cvar(cvar_7326513, (object *)&__glo_Cyc_91for_91each_91loop_912_scheme_base);make_pair(pair_7326514, find_or_add_symbol("Cyc-for-each-loop-2"), &cvar_7326513);
-+  make_cvar(cvar_7326515, (object *)&__glo_Cyc_91for_91each_91loop_911_scheme_base);make_pair(pair_7326516, find_or_add_symbol("Cyc-for-each-loop-1"), &cvar_7326515);
-+  make_cvar(cvar_7326517, (object *)&__glo_Cyc_91map_91loop_912_scheme_base);make_pair(pair_7326518, find_or_add_symbol("Cyc-map-loop-2"), &cvar_7326517);
-+  make_cvar(cvar_7326519, (object *)&__glo_Cyc_91map_91loop_911_scheme_base);make_pair(pair_7326520, find_or_add_symbol("Cyc-map-loop-1"), &cvar_7326519);
-+  make_cvar(cvar_7326521, (object *)&__glo_map_scheme_base);make_pair(pair_7326522, find_or_add_symbol("map"), &cvar_7326521);
-+  make_cvar(cvar_7326523, (object *)&__glo__75cars_87cdrs_scheme_base);make_pair(pair_7326524, find_or_add_symbol("%cars+cdrs"), &cvar_7326523);
-+  make_cvar(cvar_7326525, (object *)&__glo_car_87cdr_scheme_base);make_pair(pair_7326526, find_or_add_symbol("car+cdr"), &cvar_7326525);
-+  make_cvar(cvar_7326527, (object *)&__glo_receive_scheme_base);make_pair(pair_7326528, find_or_add_symbol("receive"), &cvar_7326527);
-+  make_cvar(cvar_7326529, (object *)&__glo_list_91copy_scheme_base);make_pair(pair_7326530, find_or_add_symbol("list-copy"), &cvar_7326529);
-+  make_cvar(cvar_7326531, (object *)&__glo_make_91list_scheme_base);make_pair(pair_7326532, find_or_add_symbol("make-list"), &cvar_7326531);
-+  make_cvar(cvar_7326533, (object *)&__glo__list_scheme_base);make_pair(pair_7326534, find_or_add_symbol("list"), &cvar_7326533);
-+  make_cvar(cvar_7326535, (object *)&__glo_append_scheme_base);make_pair(pair_7326536, find_or_add_symbol("append"), &cvar_7326535);
-+  make_cvar(cvar_7326537, (object *)&__glo_negative_127_191_191inline_191_191_scheme_base);make_pair(pair_7326538, find_or_add_symbol("negative?__inline__"), &cvar_7326537);
-+  make_cvar(cvar_7326539, (object *)&__glo_negative_127_scheme_base);make_pair(pair_7326540, find_or_add_symbol("negative?"), &cvar_7326539);
-+  make_cvar(cvar_7326541, (object *)&__glo_positive_127_191_191inline_191_191_scheme_base);make_pair(pair_7326542, find_or_add_symbol("positive?__inline__"), &cvar_7326541);
-+  make_cvar(cvar_7326543, (object *)&__glo_positive_127_scheme_base);make_pair(pair_7326544, find_or_add_symbol("positive?"), &cvar_7326543);
-+  make_cvar(cvar_7326545, (object *)&__glo_zero_127_191_191inline_191_191_scheme_base);make_pair(pair_7326546, find_or_add_symbol("zero?__inline__"), &cvar_7326545);
-+  make_cvar(cvar_7326547, (object *)&__glo_zero_127_scheme_base);make_pair(pair_7326548, find_or_add_symbol("zero?"), &cvar_7326547);
-+  make_cvar(cvar_7326549, (object *)&__glo_list_127_scheme_base);make_pair(pair_7326550, find_or_add_symbol("list?"), &cvar_7326549);
-+  make_cvar(cvar_7326551, (object *)&__glo_list_127_191_191inline_191_191_scheme_base);make_pair(pair_7326552, find_or_add_symbol("list?__inline__"), &cvar_7326551);
-+  make_cvar(cvar_7326553, (object *)&__glo_not_191_191inline_191_191_scheme_base);make_pair(pair_7326554, find_or_add_symbol("not__inline__"), &cvar_7326553);
-+  make_cvar(cvar_7326555, (object *)&__glo_not_scheme_base);make_pair(pair_7326556, find_or_add_symbol("not"), &cvar_7326555);
-+  make_cvar(cvar_7326557, (object *)&__glo_newline_scheme_base);make_pair(pair_7326558, find_or_add_symbol("newline"), &cvar_7326557);
-+  make_cvar(cvar_7326559, (object *)&__glo_write_91char_scheme_base);make_pair(pair_7326560, find_or_add_symbol("write-char"), &cvar_7326559);
-+  make_cvar(cvar_7326561, (object *)&__glo__75write_91bytevector_scheme_base);make_pair(pair_7326562, find_or_add_symbol("%write-bytevector"), &cvar_7326561);
-+  make_cvar(cvar_7326563, (object *)&__glo__75write_91bytevector_191_191inline_191_191_scheme_base);make_pair(pair_7326564, find_or_add_symbol("%write-bytevector__inline__"), &cvar_7326563);
-+  make_cvar(cvar_7326565, (object *)&__glo_write_91bytevector_scheme_base);make_pair(pair_7326566, find_or_add_symbol("write-bytevector"), &cvar_7326565);
-+  make_cvar(cvar_7326567, (object *)&__glo_read_91bytevector_67_scheme_base);make_pair(pair_7326568, find_or_add_symbol("read-bytevector!"), &cvar_7326567);
-+  make_cvar(cvar_7326569, (object *)&__glo_read_91bytevector_scheme_base);make_pair(pair_7326570, find_or_add_symbol("read-bytevector"), &cvar_7326569);
-+  make_cvar(cvar_7326571, (object *)&__glo_write_91string_scheme_base);make_pair(pair_7326572, find_or_add_symbol("write-string"), &cvar_7326571);
-+  make_cvar(cvar_7326573, (object *)&__glo_write_91string_912_scheme_base);make_pair(pair_7326574, find_or_add_symbol("write-string-2"), &cvar_7326573);
-+  make_cvar(cvar_7326575, (object *)&__glo_write_91string_911_scheme_base);make_pair(pair_7326576, find_or_add_symbol("write-string-1"), &cvar_7326575);
-+  make_cvar(cvar_7326577, (object *)&__glo_flush_91output_91port_scheme_base);make_pair(pair_7326578, find_or_add_symbol("flush-output-port"), &cvar_7326577);
-+  make_cvar(cvar_7326579, (object *)&__glo_textual_91port_127_scheme_base);make_pair(pair_7326580, find_or_add_symbol("textual-port?"), &cvar_7326579);
-+  make_cvar(cvar_7326581, (object *)&__glo_binary_91port_127_scheme_base);make_pair(pair_7326582, find_or_add_symbol("binary-port?"), &cvar_7326581);
-+  make_cvar(cvar_7326583, (object *)&__glo__191binary_91port_127_scheme_base);make_pair(pair_7326584, find_or_add_symbol("_binary-port?"), &cvar_7326583);
-+  make_cvar(cvar_7326585, (object *)&__glo_read_91string_scheme_base);make_pair(pair_7326586, find_or_add_symbol("read-string"), &cvar_7326585);
-+  make_cvar(cvar_7326587, (object *)&__glo_read_91line_scheme_base);make_pair(pair_7326588, find_or_add_symbol("read-line"), &cvar_7326587);
-+  make_cvar(cvar_7326589, (object *)&__glo_read_91char_scheme_base);make_pair(pair_7326590, find_or_add_symbol("read-char"), &cvar_7326589);
-+  make_cvar(cvar_7326591, (object *)&__glo_peek_91char_scheme_base);make_pair(pair_7326592, find_or_add_symbol("peek-char"), &cvar_7326591);
-+  make_cvar(cvar_7326593, (object *)&__glo_char_91ready_127_scheme_base);make_pair(pair_7326594, find_or_add_symbol("char-ready?"), &cvar_7326593);
-+  make_cvar(cvar_7326595, (object *)&__glo_Cyc_91char_91ready_127_scheme_base);make_pair(pair_7326596, find_or_add_symbol("Cyc-char-ready?"), &cvar_7326595);
-+  make_cvar(cvar_7326597, (object *)&__glo_write_91u8_scheme_base);make_pair(pair_7326598, find_or_add_symbol("write-u8"), &cvar_7326597);
-+  make_cvar(cvar_7326599, (object *)&__glo_peek_91u8_scheme_base);make_pair(pair_7326600, find_or_add_symbol("peek-u8"), &cvar_7326599);
-+  make_cvar(cvar_7326601, (object *)&__glo_read_91u8_scheme_base);make_pair(pair_7326602, find_or_add_symbol("read-u8"), &cvar_7326601);
-+  make_cvar(cvar_7326603, (object *)&__glo__191write_91u8_scheme_base);make_pair(pair_7326604, find_or_add_symbol("_write-u8"), &cvar_7326603);
-+  make_cvar(cvar_7326605, (object *)&__glo__191peek_91u8_scheme_base);make_pair(pair_7326606, find_or_add_symbol("_peek-u8"), &cvar_7326605);
-+  make_cvar(cvar_7326607, (object *)&__glo__191read_91u8_scheme_base);make_pair(pair_7326608, find_or_add_symbol("_read-u8"), &cvar_7326607);
-+  make_cvar(cvar_7326609, (object *)&__glo_foldr_scheme_base);make_pair(pair_7326610, find_or_add_symbol("foldr"), &cvar_7326609);
-+  make_cvar(cvar_7326611, (object *)&__glo_foldl_scheme_base);make_pair(pair_7326612, find_or_add_symbol("foldl"), &cvar_7326611);
-+  make_cvar(cvar_7326613, (object *)&__glo_assoc_scheme_base);make_pair(pair_7326614, find_or_add_symbol("assoc"), &cvar_7326613);
-+  make_cvar(cvar_7326615, (object *)&__glo_assoc_91helper_scheme_base);make_pair(pair_7326616, find_or_add_symbol("assoc-helper"), &cvar_7326615);
-+  make_cvar(cvar_7326617, (object *)&__glo_member_scheme_base);make_pair(pair_7326618, find_or_add_symbol("member"), &cvar_7326617);
-+  make_cvar(cvar_7326619, (object *)&__glo_member_91helper_scheme_base);make_pair(pair_7326620, find_or_add_symbol("member-helper"), &cvar_7326619);
-+  make_cvar(cvar_7326621, (object *)&__glo_fast_91string_125_123_127_191_191inline_191_191_scheme_base);make_pair(pair_7326622, find_or_add_symbol("fast-string>=?__inline__"), &cvar_7326621);
-+  make_cvar(cvar_7326623, (object *)&__glo_fast_91string_125_123_127_scheme_base);make_pair(pair_7326624, find_or_add_symbol("fast-string>=?"), &cvar_7326623);
-+  make_cvar(cvar_7326625, (object *)&__glo_fast_91string_125_127_191_191inline_191_191_scheme_base);make_pair(pair_7326626, find_or_add_symbol("fast-string>?__inline__"), &cvar_7326625);
-+  make_cvar(cvar_7326627, (object *)&__glo_fast_91string_125_127_scheme_base);make_pair(pair_7326628, find_or_add_symbol("fast-string>?"), &cvar_7326627);
-+  make_cvar(cvar_7326629, (object *)&__glo_fast_91string_121_123_127_191_191inline_191_191_scheme_base);make_pair(pair_7326630, find_or_add_symbol("fast-string<=?__inline__"), &cvar_7326629);
-+  make_cvar(cvar_7326631, (object *)&__glo_fast_91string_121_123_127_scheme_base);make_pair(pair_7326632, find_or_add_symbol("fast-string<=?"), &cvar_7326631);
-+  make_cvar(cvar_7326633, (object *)&__glo_fast_91string_121_127_191_191inline_191_191_scheme_base);make_pair(pair_7326634, find_or_add_symbol("fast-string<?__inline__"), &cvar_7326633);
-+  make_cvar(cvar_7326635, (object *)&__glo_fast_91string_121_127_scheme_base);make_pair(pair_7326636, find_or_add_symbol("fast-string<?"), &cvar_7326635);
-+  make_cvar(cvar_7326637, (object *)&__glo_fast_91string_123_127_191_191inline_191_191_scheme_base);make_pair(pair_7326638, find_or_add_symbol("fast-string=?__inline__"), &cvar_7326637);
-+  make_cvar(cvar_7326639, (object *)&__glo_fast_91string_123_127_scheme_base);make_pair(pair_7326640, find_or_add_symbol("fast-string=?"), &cvar_7326639);
-+  make_cvar(cvar_7326641, (object *)&__glo_string_125_123_127_scheme_base);make_pair(pair_7326642, find_or_add_symbol("string>=?"), &cvar_7326641);
-+  make_cvar(cvar_7326643, (object *)&__glo_string_125_127_scheme_base);make_pair(pair_7326644, find_or_add_symbol("string>?"), &cvar_7326643);
-+  make_cvar(cvar_7326645, (object *)&__glo_string_121_123_127_scheme_base);make_pair(pair_7326646, find_or_add_symbol("string<=?"), &cvar_7326645);
-+  make_cvar(cvar_7326647, (object *)&__glo_string_121_127_scheme_base);make_pair(pair_7326648, find_or_add_symbol("string<?"), &cvar_7326647);
-+  make_cvar(cvar_7326649, (object *)&__glo_string_123_127_scheme_base);make_pair(pair_7326650, find_or_add_symbol("string=?"), &cvar_7326649);
-+  make_cvar(cvar_7326651, (object *)&__glo_char_125_123_127_scheme_base);make_pair(pair_7326652, find_or_add_symbol("char>=?"), &cvar_7326651);
-+  make_cvar(cvar_7326653, (object *)&__glo_char_121_123_127_scheme_base);make_pair(pair_7326654, find_or_add_symbol("char<=?"), &cvar_7326653);
-+  make_cvar(cvar_7326655, (object *)&__glo_char_125_127_scheme_base);make_pair(pair_7326656, find_or_add_symbol("char>?"), &cvar_7326655);
-+  make_cvar(cvar_7326657, (object *)&__glo_char_121_127_scheme_base);make_pair(pair_7326658, find_or_add_symbol("char<?"), &cvar_7326657);
-+  make_cvar(cvar_7326659, (object *)&__glo_char_123_127_scheme_base);make_pair(pair_7326660, find_or_add_symbol("char=?"), &cvar_7326659);
-+  make_cvar(cvar_7326661, (object *)&__glo_Cyc_91bin_91op_91char_scheme_base);make_pair(pair_7326662, find_or_add_symbol("Cyc-bin-op-char"), &cvar_7326661);
-+  make_cvar(cvar_7326663, (object *)&__glo_Cyc_91bin_91op_scheme_base);make_pair(pair_7326664, find_or_add_symbol("Cyc-bin-op"), &cvar_7326663);
-+  make_cvar(cvar_7326665, (object *)&__glo_call_91with_91port_scheme_base);make_pair(pair_7326666, find_or_add_symbol("call-with-port"), &cvar_7326665);
-+  make_cvar(cvar_7326667, (object *)&__glo_dynamic_91wind_scheme_base);make_pair(pair_7326668, find_or_add_symbol("dynamic-wind"), &cvar_7326667);
-+  make_cvar(cvar_7326669, (object *)&__glo_call_91with_91values_scheme_base);make_pair(pair_7326670, find_or_add_symbol("call-with-values"), &cvar_7326669);
-+  make_cvar(cvar_7326671, (object *)&__glo_values_scheme_base);make_pair(pair_7326672, find_or_add_symbol("values"), &cvar_7326671);
-+  make_cvar(cvar_7326673, (object *)&__glo_call_91with_91current_91continuation_scheme_base);make_pair(pair_7326674, find_or_add_symbol("call-with-current-continuation"), &cvar_7326673);
-+  make_cvar(cvar_7326675, (object *)&__glo_syntax_91error_scheme_base);make_pair(pair_7326676, find_or_add_symbol("syntax-error"), &cvar_7326675);
-+  make_cvar(cvar_7326677, (object *)&__glo_quasiquote_scheme_base);make_pair(pair_7326678, find_or_add_symbol("quasiquote"), &cvar_7326677);
-+  make_cvar(cvar_7326679, (object *)&__glo__do_scheme_base);make_pair(pair_7326680, find_or_add_symbol("do"), &cvar_7326679);
-+  make_cvar(cvar_7326681, (object *)&__glo_unless_scheme_base);make_pair(pair_7326682, find_or_add_symbol("unless"), &cvar_7326681);
-+  make_cvar(cvar_7326683, (object *)&__glo_when_scheme_base);make_pair(pair_7326684, find_or_add_symbol("when"), &cvar_7326683);
-+  make_cvar(cvar_7326685, (object *)&__glo__case_scheme_base);make_pair(pair_7326686, find_or_add_symbol("case"), &cvar_7326685);
-+  make_cvar(cvar_7326687, (object *)&__glo_cond_scheme_base);make_pair(pair_7326688, find_or_add_symbol("cond"), &cvar_7326687);
-+  make_cvar(cvar_7326689, (object *)&__glo_cond_91expand_scheme_base);make_pair(pair_7326690, find_or_add_symbol("cond-expand"), &cvar_7326689);
-+  make_cvar(cvar_7326691, (object *)&__glo_begin_scheme_base);make_pair(pair_7326692, find_or_add_symbol("begin"), &cvar_7326691);
-+  make_cvar(cvar_7326693, (object *)&__glo_letrec_scheme_base);make_pair(pair_7326694, find_or_add_symbol("letrec"), &cvar_7326693);
-+  make_cvar(cvar_7326695, (object *)&__glo_let_85_scheme_base);make_pair(pair_7326696, find_or_add_symbol("let*"), &cvar_7326695);
-+  make_cvar(cvar_7326697, (object *)&__glo_let_scheme_base);make_pair(pair_7326698, find_or_add_symbol("let"), &cvar_7326697);
-+  make_cvar(cvar_7326699, (object *)&__glo_or_scheme_base);make_pair(pair_7326700, find_or_add_symbol("or"), &cvar_7326699);
-+  make_cvar(cvar_7326701, (object *)&__glo_and_scheme_base);make_pair(pair_7326702, find_or_add_symbol("and"), &cvar_7326701);
-+  make_cvar(cvar_7326703, (object *)&__glo_Cyc_91version_scheme_base);make_pair(pair_7326704, find_or_add_symbol("Cyc-version"), &cvar_7326703);
-+  make_cvar(cvar_7326705, (object *)&__glo_Cyc_91add_91feature_67_scheme_base);make_pair(pair_7326706, find_or_add_symbol("Cyc-add-feature!"), &cvar_7326705);
-+  make_cvar(cvar_7326707, (object *)&__glo__85other_91features_85_scheme_base);make_pair(pair_7326708, find_or_add_symbol("*other-features*"), &cvar_7326707);
-+  make_cvar(cvar_7326709, (object *)&__glo_features_scheme_base);make_pair(pair_7326710, find_or_add_symbol("features"), &cvar_7326709);
-+  make_cvar(cvar_7326711, (object *)&__glo_call_95cc_scheme_base);make_pair(pair_7326712, find_or_add_symbol("call/cc"), &cvar_7326711);
-+make_pair(c_7326957, &pair_7326223,Cyc_global_variables);
-+make_pair(c_7326956, &pair_7326226, &c_7326957);
-+make_pair(c_7326955, &pair_7326228, &c_7326956);
-+make_pair(c_7326954, &pair_7326230, &c_7326955);
-+make_pair(c_7326953, &pair_7326232, &c_7326954);
-+make_pair(c_7326952, &pair_7326234, &c_7326953);
-+make_pair(c_7326951, &pair_7326236, &c_7326952);
-+make_pair(c_7326950, &pair_7326238, &c_7326951);
-+make_pair(c_7326949, &pair_7326240, &c_7326950);
-+make_pair(c_7326948, &pair_7326242, &c_7326949);
-+make_pair(c_7326947, &pair_7326244, &c_7326948);
-+make_pair(c_7326946, &pair_7326246, &c_7326947);
-+make_pair(c_7326945, &pair_7326248, &c_7326946);
-+make_pair(c_7326944, &pair_7326250, &c_7326945);
-+make_pair(c_7326943, &pair_7326252, &c_7326944);
-+make_pair(c_7326942, &pair_7326254, &c_7326943);
-+make_pair(c_7326941, &pair_7326256, &c_7326942);
-+make_pair(c_7326940, &pair_7326258, &c_7326941);
-+make_pair(c_7326939, &pair_7326260, &c_7326940);
-+make_pair(c_7326938, &pair_7326262, &c_7326939);
-+make_pair(c_7326937, &pair_7326264, &c_7326938);
-+make_pair(c_7326936, &pair_7326266, &c_7326937);
-+make_pair(c_7326935, &pair_7326268, &c_7326936);
-+make_pair(c_7326934, &pair_7326270, &c_7326935);
-+make_pair(c_7326933, &pair_7326272, &c_7326934);
-+make_pair(c_7326932, &pair_7326274, &c_7326933);
-+make_pair(c_7326931, &pair_7326276, &c_7326932);
-+make_pair(c_7326930, &pair_7326278, &c_7326931);
-+make_pair(c_7326929, &pair_7326280, &c_7326930);
-+make_pair(c_7326928, &pair_7326282, &c_7326929);
-+make_pair(c_7326927, &pair_7326284, &c_7326928);
-+make_pair(c_7326926, &pair_7326286, &c_7326927);
-+make_pair(c_7326925, &pair_7326288, &c_7326926);
-+make_pair(c_7326924, &pair_7326290, &c_7326925);
-+make_pair(c_7326923, &pair_7326292, &c_7326924);
-+make_pair(c_7326922, &pair_7326294, &c_7326923);
-+make_pair(c_7326921, &pair_7326296, &c_7326922);
-+make_pair(c_7326920, &pair_7326298, &c_7326921);
-+make_pair(c_7326919, &pair_7326300, &c_7326920);
-+make_pair(c_7326918, &pair_7326302, &c_7326919);
-+make_pair(c_7326917, &pair_7326304, &c_7326918);
-+make_pair(c_7326916, &pair_7326306, &c_7326917);
-+make_pair(c_7326915, &pair_7326308, &c_7326916);
-+make_pair(c_7326914, &pair_7326310, &c_7326915);
-+make_pair(c_7326913, &pair_7326312, &c_7326914);
-+make_pair(c_7326912, &pair_7326314, &c_7326913);
-+make_pair(c_7326911, &pair_7326316, &c_7326912);
-+make_pair(c_7326910, &pair_7326318, &c_7326911);
-+make_pair(c_7326909, &pair_7326320, &c_7326910);
-+make_pair(c_7326908, &pair_7326322, &c_7326909);
-+make_pair(c_7326907, &pair_7326324, &c_7326908);
-+make_pair(c_7326906, &pair_7326326, &c_7326907);
-+make_pair(c_7326905, &pair_7326328, &c_7326906);
-+make_pair(c_7326904, &pair_7326330, &c_7326905);
-+make_pair(c_7326903, &pair_7326332, &c_7326904);
-+make_pair(c_7326902, &pair_7326334, &c_7326903);
-+make_pair(c_7326901, &pair_7326336, &c_7326902);
-+make_pair(c_7326900, &pair_7326338, &c_7326901);
-+make_pair(c_7326899, &pair_7326340, &c_7326900);
-+make_pair(c_7326898, &pair_7326342, &c_7326899);
-+make_pair(c_7326897, &pair_7326344, &c_7326898);
-+make_pair(c_7326896, &pair_7326346, &c_7326897);
-+make_pair(c_7326895, &pair_7326348, &c_7326896);
-+make_pair(c_7326894, &pair_7326350, &c_7326895);
-+make_pair(c_7326893, &pair_7326352, &c_7326894);
-+make_pair(c_7326892, &pair_7326354, &c_7326893);
-+make_pair(c_7326891, &pair_7326356, &c_7326892);
-+make_pair(c_7326890, &pair_7326358, &c_7326891);
-+make_pair(c_7326889, &pair_7326360, &c_7326890);
-+make_pair(c_7326888, &pair_7326362, &c_7326889);
-+make_pair(c_7326887, &pair_7326364, &c_7326888);
-+make_pair(c_7326886, &pair_7326366, &c_7326887);
-+make_pair(c_7326885, &pair_7326368, &c_7326886);
-+make_pair(c_7326884, &pair_7326370, &c_7326885);
-+make_pair(c_7326883, &pair_7326372, &c_7326884);
-+make_pair(c_7326882, &pair_7326374, &c_7326883);
-+make_pair(c_7326881, &pair_7326376, &c_7326882);
-+make_pair(c_7326880, &pair_7326378, &c_7326881);
-+make_pair(c_7326879, &pair_7326380, &c_7326880);
-+make_pair(c_7326878, &pair_7326382, &c_7326879);
-+make_pair(c_7326877, &pair_7326384, &c_7326878);
-+make_pair(c_7326876, &pair_7326386, &c_7326877);
-+make_pair(c_7326875, &pair_7326388, &c_7326876);
-+make_pair(c_7326874, &pair_7326390, &c_7326875);
-+make_pair(c_7326873, &pair_7326392, &c_7326874);
-+make_pair(c_7326872, &pair_7326394, &c_7326873);
-+make_pair(c_7326871, &pair_7326396, &c_7326872);
-+make_pair(c_7326870, &pair_7326398, &c_7326871);
-+make_pair(c_7326869, &pair_7326400, &c_7326870);
-+make_pair(c_7326868, &pair_7326402, &c_7326869);
-+make_pair(c_7326867, &pair_7326404, &c_7326868);
-+make_pair(c_7326866, &pair_7326406, &c_7326867);
-+make_pair(c_7326865, &pair_7326408, &c_7326866);
-+make_pair(c_7326864, &pair_7326410, &c_7326865);
-+make_pair(c_7326863, &pair_7326412, &c_7326864);
-+make_pair(c_7326862, &pair_7326414, &c_7326863);
-+make_pair(c_7326861, &pair_7326416, &c_7326862);
-+make_pair(c_7326860, &pair_7326418, &c_7326861);
-+make_pair(c_7326859, &pair_7326420, &c_7326860);
-+make_pair(c_7326858, &pair_7326422, &c_7326859);
-+make_pair(c_7326857, &pair_7326424, &c_7326858);
-+make_pair(c_7326856, &pair_7326426, &c_7326857);
-+make_pair(c_7326855, &pair_7326428, &c_7326856);
-+make_pair(c_7326854, &pair_7326430, &c_7326855);
-+make_pair(c_7326853, &pair_7326432, &c_7326854);
-+make_pair(c_7326852, &pair_7326434, &c_7326853);
-+make_pair(c_7326851, &pair_7326436, &c_7326852);
-+make_pair(c_7326850, &pair_7326438, &c_7326851);
-+make_pair(c_7326849, &pair_7326440, &c_7326850);
-+make_pair(c_7326848, &pair_7326442, &c_7326849);
-+make_pair(c_7326847, &pair_7326444, &c_7326848);
-+make_pair(c_7326846, &pair_7326446, &c_7326847);
-+make_pair(c_7326845, &pair_7326448, &c_7326846);
-+make_pair(c_7326844, &pair_7326450, &c_7326845);
-+make_pair(c_7326843, &pair_7326452, &c_7326844);
-+make_pair(c_7326842, &pair_7326454, &c_7326843);
-+make_pair(c_7326841, &pair_7326456, &c_7326842);
-+make_pair(c_7326840, &pair_7326458, &c_7326841);
-+make_pair(c_7326839, &pair_7326460, &c_7326840);
-+make_pair(c_7326838, &pair_7326462, &c_7326839);
-+make_pair(c_7326837, &pair_7326464, &c_7326838);
-+make_pair(c_7326836, &pair_7326466, &c_7326837);
-+make_pair(c_7326835, &pair_7326468, &c_7326836);
-+make_pair(c_7326834, &pair_7326470, &c_7326835);
-+make_pair(c_7326833, &pair_7326472, &c_7326834);
-+make_pair(c_7326832, &pair_7326474, &c_7326833);
-+make_pair(c_7326831, &pair_7326476, &c_7326832);
-+make_pair(c_7326830, &pair_7326478, &c_7326831);
-+make_pair(c_7326829, &pair_7326480, &c_7326830);
-+make_pair(c_7326828, &pair_7326482, &c_7326829);
-+make_pair(c_7326827, &pair_7326484, &c_7326828);
-+make_pair(c_7326826, &pair_7326486, &c_7326827);
-+make_pair(c_7326825, &pair_7326488, &c_7326826);
-+make_pair(c_7326824, &pair_7326490, &c_7326825);
-+make_pair(c_7326823, &pair_7326492, &c_7326824);
-+make_pair(c_7326822, &pair_7326494, &c_7326823);
-+make_pair(c_7326821, &pair_7326496, &c_7326822);
-+make_pair(c_7326820, &pair_7326498, &c_7326821);
-+make_pair(c_7326819, &pair_7326500, &c_7326820);
-+make_pair(c_7326818, &pair_7326502, &c_7326819);
-+make_pair(c_7326817, &pair_7326504, &c_7326818);
-+make_pair(c_7326816, &pair_7326506, &c_7326817);
-+make_pair(c_7326815, &pair_7326508, &c_7326816);
-+make_pair(c_7326814, &pair_7326510, &c_7326815);
-+make_pair(c_7326813, &pair_7326512, &c_7326814);
-+make_pair(c_7326812, &pair_7326514, &c_7326813);
-+make_pair(c_7326811, &pair_7326516, &c_7326812);
-+make_pair(c_7326810, &pair_7326518, &c_7326811);
-+make_pair(c_7326809, &pair_7326520, &c_7326810);
-+make_pair(c_7326808, &pair_7326522, &c_7326809);
-+make_pair(c_7326807, &pair_7326524, &c_7326808);
-+make_pair(c_7326806, &pair_7326526, &c_7326807);
-+make_pair(c_7326805, &pair_7326528, &c_7326806);
-+make_pair(c_7326804, &pair_7326530, &c_7326805);
-+make_pair(c_7326803, &pair_7326532, &c_7326804);
-+make_pair(c_7326802, &pair_7326534, &c_7326803);
-+make_pair(c_7326801, &pair_7326536, &c_7326802);
-+make_pair(c_7326800, &pair_7326538, &c_7326801);
-+make_pair(c_7326799, &pair_7326540, &c_7326800);
-+make_pair(c_7326798, &pair_7326542, &c_7326799);
-+make_pair(c_7326797, &pair_7326544, &c_7326798);
-+make_pair(c_7326796, &pair_7326546, &c_7326797);
-+make_pair(c_7326795, &pair_7326548, &c_7326796);
-+make_pair(c_7326794, &pair_7326550, &c_7326795);
-+make_pair(c_7326793, &pair_7326552, &c_7326794);
-+make_pair(c_7326792, &pair_7326554, &c_7326793);
-+make_pair(c_7326791, &pair_7326556, &c_7326792);
-+make_pair(c_7326790, &pair_7326558, &c_7326791);
-+make_pair(c_7326789, &pair_7326560, &c_7326790);
-+make_pair(c_7326788, &pair_7326562, &c_7326789);
-+make_pair(c_7326787, &pair_7326564, &c_7326788);
-+make_pair(c_7326786, &pair_7326566, &c_7326787);
-+make_pair(c_7326785, &pair_7326568, &c_7326786);
-+make_pair(c_7326784, &pair_7326570, &c_7326785);
-+make_pair(c_7326783, &pair_7326572, &c_7326784);
-+make_pair(c_7326782, &pair_7326574, &c_7326783);
-+make_pair(c_7326781, &pair_7326576, &c_7326782);
-+make_pair(c_7326780, &pair_7326578, &c_7326781);
-+make_pair(c_7326779, &pair_7326580, &c_7326780);
-+make_pair(c_7326778, &pair_7326582, &c_7326779);
-+make_pair(c_7326777, &pair_7326584, &c_7326778);
-+make_pair(c_7326776, &pair_7326586, &c_7326777);
-+make_pair(c_7326775, &pair_7326588, &c_7326776);
-+make_pair(c_7326774, &pair_7326590, &c_7326775);
-+make_pair(c_7326773, &pair_7326592, &c_7326774);
-+make_pair(c_7326772, &pair_7326594, &c_7326773);
-+make_pair(c_7326771, &pair_7326596, &c_7326772);
-+make_pair(c_7326770, &pair_7326598, &c_7326771);
-+make_pair(c_7326769, &pair_7326600, &c_7326770);
-+make_pair(c_7326768, &pair_7326602, &c_7326769);
-+make_pair(c_7326767, &pair_7326604, &c_7326768);
-+make_pair(c_7326766, &pair_7326606, &c_7326767);
-+make_pair(c_7326765, &pair_7326608, &c_7326766);
-+make_pair(c_7326764, &pair_7326610, &c_7326765);
-+make_pair(c_7326763, &pair_7326612, &c_7326764);
-+make_pair(c_7326762, &pair_7326614, &c_7326763);
-+make_pair(c_7326761, &pair_7326616, &c_7326762);
-+make_pair(c_7326760, &pair_7326618, &c_7326761);
-+make_pair(c_7326759, &pair_7326620, &c_7326760);
-+make_pair(c_7326758, &pair_7326622, &c_7326759);
-+make_pair(c_7326757, &pair_7326624, &c_7326758);
-+make_pair(c_7326756, &pair_7326626, &c_7326757);
-+make_pair(c_7326755, &pair_7326628, &c_7326756);
-+make_pair(c_7326754, &pair_7326630, &c_7326755);
-+make_pair(c_7326753, &pair_7326632, &c_7326754);
-+make_pair(c_7326752, &pair_7326634, &c_7326753);
-+make_pair(c_7326751, &pair_7326636, &c_7326752);
-+make_pair(c_7326750, &pair_7326638, &c_7326751);
-+make_pair(c_7326749, &pair_7326640, &c_7326750);
-+make_pair(c_7326748, &pair_7326642, &c_7326749);
-+make_pair(c_7326747, &pair_7326644, &c_7326748);
-+make_pair(c_7326746, &pair_7326646, &c_7326747);
-+make_pair(c_7326745, &pair_7326648, &c_7326746);
-+make_pair(c_7326744, &pair_7326650, &c_7326745);
-+make_pair(c_7326743, &pair_7326652, &c_7326744);
-+make_pair(c_7326742, &pair_7326654, &c_7326743);
-+make_pair(c_7326741, &pair_7326656, &c_7326742);
-+make_pair(c_7326740, &pair_7326658, &c_7326741);
-+make_pair(c_7326739, &pair_7326660, &c_7326740);
-+make_pair(c_7326738, &pair_7326662, &c_7326739);
-+make_pair(c_7326737, &pair_7326664, &c_7326738);
-+make_pair(c_7326736, &pair_7326666, &c_7326737);
-+make_pair(c_7326735, &pair_7326668, &c_7326736);
-+make_pair(c_7326734, &pair_7326670, &c_7326735);
-+make_pair(c_7326733, &pair_7326672, &c_7326734);
-+make_pair(c_7326732, &pair_7326674, &c_7326733);
-+make_pair(c_7326731, &pair_7326676, &c_7326732);
-+make_pair(c_7326730, &pair_7326678, &c_7326731);
-+make_pair(c_7326729, &pair_7326680, &c_7326730);
-+make_pair(c_7326728, &pair_7326682, &c_7326729);
-+make_pair(c_7326727, &pair_7326684, &c_7326728);
-+make_pair(c_7326726, &pair_7326686, &c_7326727);
-+make_pair(c_7326725, &pair_7326688, &c_7326726);
-+make_pair(c_7326724, &pair_7326690, &c_7326725);
-+make_pair(c_7326723, &pair_7326692, &c_7326724);
-+make_pair(c_7326722, &pair_7326694, &c_7326723);
-+make_pair(c_7326721, &pair_7326696, &c_7326722);
-+make_pair(c_7326720, &pair_7326698, &c_7326721);
-+make_pair(c_7326719, &pair_7326700, &c_7326720);
-+make_pair(c_7326718, &pair_7326702, &c_7326719);
-+make_pair(c_7326717, &pair_7326704, &c_7326718);
-+make_pair(c_7326716, &pair_7326706, &c_7326717);
-+make_pair(c_7326715, &pair_7326708, &c_7326716);
-+make_pair(c_7326714, &pair_7326710, &c_7326715);
-+make_pair(c_7326713, &pair_7326712, &c_7326714);
-+Cyc_global_variables = &c_7326713;
++  mclosure0(clo_7326217, c_schemebase_inlinable_lambdas); make_pair(pair_7326216, find_or_add_symbol("c_schemebase_inlinable_lambdas"), &clo_7326217);
++  make_cvar(cvar_7326218, (object *)&__glo_lib_91init_117schemebase_scheme_base);make_pair(pair_7326219, find_or_add_symbol("lib-init:schemebase"), &cvar_7326218);
++  make_cvar(cvar_7326220, (object *)&__glo_define_91values_scheme_base);make_pair(pair_7326221, find_or_add_symbol("define-values"), &cvar_7326220);
++  make_cvar(cvar_7326222, (object *)&__glo_define_91record_91type_scheme_base);make_pair(pair_7326223, find_or_add_symbol("define-record-type"), &cvar_7326222);
++  make_cvar(cvar_7326224, (object *)&__glo_is_91a_127_scheme_base);make_pair(pair_7326225, find_or_add_symbol("is-a?"), &cvar_7326224);
++  make_cvar(cvar_7326226, (object *)&__glo_record_127_scheme_base);make_pair(pair_7326227, find_or_add_symbol("record?"), &cvar_7326226);
++  make_cvar(cvar_7326228, (object *)&__glo__191list_91index_scheme_base);make_pair(pair_7326229, find_or_add_symbol("_list-index"), &cvar_7326228);
++  make_cvar(cvar_7326230, (object *)&__glo_make_91setter_scheme_base);make_pair(pair_7326231, find_or_add_symbol("make-setter"), &cvar_7326230);
++  make_cvar(cvar_7326232, (object *)&__glo_make_91getter_scheme_base);make_pair(pair_7326233, find_or_add_symbol("make-getter"), &cvar_7326232);
++  make_cvar(cvar_7326234, (object *)&__glo_slot_91ref_scheme_base);make_pair(pair_7326235, find_or_add_symbol("slot-ref"), &cvar_7326234);
++  make_cvar(cvar_7326236, (object *)&__glo_slot_91set_67_scheme_base);make_pair(pair_7326237, find_or_add_symbol("slot-set!"), &cvar_7326236);
++  make_cvar(cvar_7326238, (object *)&__glo_type_91slot_91offset_scheme_base);make_pair(pair_7326239, find_or_add_symbol("type-slot-offset"), &cvar_7326238);
++  make_cvar(cvar_7326240, (object *)&__glo_make_91constructor_95args_scheme_base);make_pair(pair_7326241, find_or_add_symbol("make-constructor/args"), &cvar_7326240);
++  make_cvar(cvar_7326242, (object *)&__glo_make_91constructor_scheme_base);make_pair(pair_7326243, find_or_add_symbol("make-constructor"), &cvar_7326242);
++  make_cvar(cvar_7326244, (object *)&__glo_make_91type_91predicate_scheme_base);make_pair(pair_7326245, find_or_add_symbol("make-type-predicate"), &cvar_7326244);
++  make_cvar(cvar_7326246, (object *)&__glo_register_91simple_91type_scheme_base);make_pair(pair_7326247, find_or_add_symbol("register-simple-type"), &cvar_7326246);
++  make_cvar(cvar_7326248, (object *)&__glo_record_91marker_scheme_base);make_pair(pair_7326249, find_or_add_symbol("record-marker"), &cvar_7326248);
++  make_cvar(cvar_7326250, (object *)&__glo_guard_91aux_scheme_base);make_pair(pair_7326251, find_or_add_symbol("guard-aux"), &cvar_7326250);
++  make_cvar(cvar_7326252, (object *)&__glo_guard_scheme_base);make_pair(pair_7326253, find_or_add_symbol("guard"), &cvar_7326252);
++  make_cvar(cvar_7326254, (object *)&__glo_let_91values_scheme_base);make_pair(pair_7326255, find_or_add_symbol("let-values"), &cvar_7326254);
++  make_cvar(cvar_7326256, (object *)&__glo_let_85_91values_scheme_base);make_pair(pair_7326257, find_or_add_symbol("let*-values"), &cvar_7326256);
++  make_cvar(cvar_7326258, (object *)&__glo_letrec_85_scheme_base);make_pair(pair_7326259, find_or_add_symbol("letrec*"), &cvar_7326258);
++  make_cvar(cvar_7326260, (object *)&__glo_syntax_91rules_scheme_base);make_pair(pair_7326261, find_or_add_symbol("syntax-rules"), &cvar_7326260);
++  make_cvar(cvar_7326262, (object *)&__glo_cons_91source_scheme_base);make_pair(pair_7326263, find_or_add_symbol("cons-source"), &cvar_7326262);
++  make_cvar(cvar_7326264, (object *)&__glo_find_scheme_base);make_pair(pair_7326265, find_or_add_symbol("find"), &cvar_7326264);
++  make_cvar(cvar_7326266, (object *)&__glo_find_91tail_scheme_base);make_pair(pair_7326267, find_or_add_symbol("find-tail"), &cvar_7326266);
++  make_cvar(cvar_7326268, (object *)&__glo_identifier_127_scheme_base);make_pair(pair_7326269, find_or_add_symbol("identifier?"), &cvar_7326268);
++  make_cvar(cvar_7326270, (object *)&__glo_open_91output_91bytevector_scheme_base);make_pair(pair_7326271, find_or_add_symbol("open-output-bytevector"), &cvar_7326270);
++  make_cvar(cvar_7326272, (object *)&__glo_open_91input_91bytevector_scheme_base);make_pair(pair_7326273, find_or_add_symbol("open-input-bytevector"), &cvar_7326272);
++  make_cvar(cvar_7326274, (object *)&__glo_get_91output_91bytevector_scheme_base);make_pair(pair_7326275, find_or_add_symbol("get-output-bytevector"), &cvar_7326274);
++  make_cvar(cvar_7326276, (object *)&__glo_get_91output_91string_scheme_base);make_pair(pair_7326277, find_or_add_symbol("get-output-string"), &cvar_7326276);
++  make_cvar(cvar_7326278, (object *)&__glo_open_91output_91string_scheme_base);make_pair(pair_7326279, find_or_add_symbol("open-output-string"), &cvar_7326278);
++  make_cvar(cvar_7326280, (object *)&__glo_open_91input_91string_scheme_base);make_pair(pair_7326281, find_or_add_symbol("open-input-string"), &cvar_7326280);
++  make_cvar(cvar_7326282, (object *)&__glo_output_91port_91open_127_scheme_base);make_pair(pair_7326283, find_or_add_symbol("output-port-open?"), &cvar_7326282);
++  make_cvar(cvar_7326284, (object *)&__glo_input_91port_91open_127_scheme_base);make_pair(pair_7326285, find_or_add_symbol("input-port-open?"), &cvar_7326284);
++  make_cvar(cvar_7326286, (object *)&__glo_output_91port_127_scheme_base);make_pair(pair_7326287, find_or_add_symbol("output-port?"), &cvar_7326286);
++  make_cvar(cvar_7326288, (object *)&__glo_input_91port_127_scheme_base);make_pair(pair_7326289, find_or_add_symbol("input-port?"), &cvar_7326288);
++  make_cvar(cvar_7326290, (object *)&__glo_make_91record_91marker_scheme_base);make_pair(pair_7326291, find_or_add_symbol("make-record-marker"), &cvar_7326290);
++  make_cvar(cvar_7326292, (object *)&__glo_make_91record_91marker_191_191inline_191_191_scheme_base);make_pair(pair_7326293, find_or_add_symbol("make-record-marker__inline__"), &cvar_7326292);
++  make_cvar(cvar_7326294, (object *)&__glo__void_scheme_base);make_pair(pair_7326295, find_or_add_symbol("void"), &cvar_7326294);
++  make_cvar(cvar_7326296, (object *)&__glo_void_191_191inline_191_191_scheme_base);make_pair(pair_7326297, find_or_add_symbol("void__inline__"), &cvar_7326296);
++  make_cvar(cvar_7326298, (object *)&__glo_eof_91object_scheme_base);make_pair(pair_7326299, find_or_add_symbol("eof-object"), &cvar_7326298);
++  make_cvar(cvar_7326300, (object *)&__glo_eof_91object_191_191inline_191_191_scheme_base);make_pair(pair_7326301, find_or_add_symbol("eof-object__inline__"), &cvar_7326300);
++  make_cvar(cvar_7326302, (object *)&__glo_expt_scheme_base);make_pair(pair_7326303, find_or_add_symbol("expt"), &cvar_7326302);
++  make_cvar(cvar_7326304, (object *)&__glo_square_191_191inline_191_191_scheme_base);make_pair(pair_7326305, find_or_add_symbol("square__inline__"), &cvar_7326304);
++  make_cvar(cvar_7326306, (object *)&__glo_square_scheme_base);make_pair(pair_7326307, find_or_add_symbol("square"), &cvar_7326306);
++  make_cvar(cvar_7326308, (object *)&__glo_floor_95_scheme_base);make_pair(pair_7326309, find_or_add_symbol("floor/"), &cvar_7326308);
++  make_cvar(cvar_7326310, (object *)&__glo_floor_91remainder_scheme_base);make_pair(pair_7326311, find_or_add_symbol("floor-remainder"), &cvar_7326310);
++  make_cvar(cvar_7326312, (object *)&__glo_floor_91quotient_scheme_base);make_pair(pair_7326313, find_or_add_symbol("floor-quotient"), &cvar_7326312);
++  make_cvar(cvar_7326314, (object *)&__glo_truncate_95_scheme_base);make_pair(pair_7326315, find_or_add_symbol("truncate/"), &cvar_7326314);
++  make_cvar(cvar_7326316, (object *)&__glo_truncate_91remainder_scheme_base);make_pair(pair_7326317, find_or_add_symbol("truncate-remainder"), &cvar_7326316);
++  make_cvar(cvar_7326318, (object *)&__glo_truncate_91quotient_scheme_base);make_pair(pair_7326319, find_or_add_symbol("truncate-quotient"), &cvar_7326318);
++  make_cvar(cvar_7326320, (object *)&__glo_quotient_191_191inline_191_191_scheme_base);make_pair(pair_7326321, find_or_add_symbol("quotient__inline__"), &cvar_7326320);
++  make_cvar(cvar_7326322, (object *)&__glo_quotient_scheme_base);make_pair(pair_7326323, find_or_add_symbol("quotient"), &cvar_7326322);
++  make_cvar(cvar_7326324, (object *)&__glo_denominator_scheme_base);make_pair(pair_7326325, find_or_add_symbol("denominator"), &cvar_7326324);
++  make_cvar(cvar_7326326, (object *)&__glo_numerator_scheme_base);make_pair(pair_7326327, find_or_add_symbol("numerator"), &cvar_7326326);
++  make_cvar(cvar_7326328, (object *)&__glo_lcm_95entry_scheme_base);make_pair(pair_7326329, find_or_add_symbol("lcm/entry"), &cvar_7326328);
++  make_cvar(cvar_7326330, (object *)&__glo_lcm_95main_scheme_base);make_pair(pair_7326331, find_or_add_symbol("lcm/main"), &cvar_7326330);
++  make_cvar(cvar_7326332, (object *)&__glo_gcd_95entry_scheme_base);make_pair(pair_7326333, find_or_add_symbol("gcd/entry"), &cvar_7326332);
++  make_cvar(cvar_7326334, (object *)&__glo_gcd_95main_scheme_base);make_pair(pair_7326335, find_or_add_symbol("gcd/main"), &cvar_7326334);
++  make_cvar(cvar_7326336, (object *)&__glo_lcm_scheme_base);make_pair(pair_7326337, find_or_add_symbol("lcm"), &cvar_7326336);
++  make_cvar(cvar_7326338, (object *)&__glo_gcd_scheme_base);make_pair(pair_7326339, find_or_add_symbol("gcd"), &cvar_7326338);
++  make_cvar(cvar_7326340, (object *)&__glo_min_scheme_base);make_pair(pair_7326341, find_or_add_symbol("min"), &cvar_7326340);
++  make_cvar(cvar_7326342, (object *)&__glo_max_scheme_base);make_pair(pair_7326343, find_or_add_symbol("max"), &cvar_7326342);
++  make_cvar(cvar_7326344, (object *)&__glo_rational_127_scheme_base);make_pair(pair_7326345, find_or_add_symbol("rational?"), &cvar_7326344);
++  make_cvar(cvar_7326346, (object *)&__glo_complex_127_scheme_base);make_pair(pair_7326347, find_or_add_symbol("complex?"), &cvar_7326346);
++  make_cvar(cvar_7326348, (object *)&__glo_complex_127_191_191inline_191_191_scheme_base);make_pair(pair_7326349, find_or_add_symbol("complex?__inline__"), &cvar_7326348);
++  make_cvar(cvar_7326350, (object *)&__glo_inexact_127_scheme_base);make_pair(pair_7326351, find_or_add_symbol("inexact?"), &cvar_7326350);
++  make_cvar(cvar_7326352, (object *)&__glo_exact_127_scheme_base);make_pair(pair_7326353, find_or_add_symbol("exact?"), &cvar_7326352);
++  make_cvar(cvar_7326354, (object *)&__glo_exact_127_191_191inline_191_191_scheme_base);make_pair(pair_7326355, find_or_add_symbol("exact?__inline__"), &cvar_7326354);
++  make_cvar(cvar_7326356, (object *)&__glo_exact_91integer_127_scheme_base);make_pair(pair_7326357, find_or_add_symbol("exact-integer?"), &cvar_7326356);
++  make_cvar(cvar_7326358, (object *)&__glo_exact_91integer_127_191_191inline_191_191_scheme_base);make_pair(pair_7326359, find_or_add_symbol("exact-integer?__inline__"), &cvar_7326358);
++  make_cvar(cvar_7326360, (object *)&__glo_sqrt_scheme_base);make_pair(pair_7326361, find_or_add_symbol("sqrt"), &cvar_7326360);
++  make_cvar(cvar_7326362, (object *)&__glo_sqrt_191_191inline_191_191_scheme_base);make_pair(pair_7326363, find_or_add_symbol("sqrt__inline__"), &cvar_7326362);
++  make_cvar(cvar_7326364, (object *)&__glo_exact_91integer_91sqrt_scheme_base);make_pair(pair_7326365, find_or_add_symbol("exact-integer-sqrt"), &cvar_7326364);
++  make_cvar(cvar_7326366, (object *)&__glo_bignum_91sqrt_scheme_base);make_pair(pair_7326367, find_or_add_symbol("bignum-sqrt"), &cvar_7326366);
++  make_cvar(cvar_7326368, (object *)&__glo_bignum_127_scheme_base);make_pair(pair_7326369, find_or_add_symbol("bignum?"), &cvar_7326368);
++  make_cvar(cvar_7326370, (object *)&__glo_even_127_scheme_base);make_pair(pair_7326371, find_or_add_symbol("even?"), &cvar_7326370);
++  make_cvar(cvar_7326372, (object *)&__glo_odd_127_scheme_base);make_pair(pair_7326373, find_or_add_symbol("odd?"), &cvar_7326372);
++  make_cvar(cvar_7326374, (object *)&__glo_modulo_scheme_base);make_pair(pair_7326375, find_or_add_symbol("modulo"), &cvar_7326374);
++  make_cvar(cvar_7326376, (object *)&__glo_remainder_scheme_base);make_pair(pair_7326377, find_or_add_symbol("remainder"), &cvar_7326376);
++  make_cvar(cvar_7326378, (object *)&__glo_abs_scheme_base);make_pair(pair_7326379, find_or_add_symbol("abs"), &cvar_7326378);
++  make_cvar(cvar_7326380, (object *)&__glo_inexact_scheme_base);make_pair(pair_7326381, find_or_add_symbol("inexact"), &cvar_7326380);
++  make_cvar(cvar_7326382, (object *)&__glo_inexact_191_191inline_191_191_scheme_base);make_pair(pair_7326383, find_or_add_symbol("inexact__inline__"), &cvar_7326382);
++  make_cvar(cvar_7326384, (object *)&__glo_exact_scheme_base);make_pair(pair_7326385, find_or_add_symbol("exact"), &cvar_7326384);
++  make_cvar(cvar_7326386, (object *)&__glo_round_scheme_base);make_pair(pair_7326387, find_or_add_symbol("round"), &cvar_7326386);
++  make_cvar(cvar_7326388, (object *)&__glo_round_191_191inline_191_191_scheme_base);make_pair(pair_7326389, find_or_add_symbol("round__inline__"), &cvar_7326388);
++  make_cvar(cvar_7326390, (object *)&__glo_truncate_scheme_base);make_pair(pair_7326391, find_or_add_symbol("truncate"), &cvar_7326390);
++  make_cvar(cvar_7326392, (object *)&__glo_truncate_191_191inline_191_191_scheme_base);make_pair(pair_7326393, find_or_add_symbol("truncate__inline__"), &cvar_7326392);
++  make_cvar(cvar_7326394, (object *)&__glo_ceiling_scheme_base);make_pair(pair_7326395, find_or_add_symbol("ceiling"), &cvar_7326394);
++  make_cvar(cvar_7326396, (object *)&__glo_ceiling_191_191inline_191_191_scheme_base);make_pair(pair_7326397, find_or_add_symbol("ceiling__inline__"), &cvar_7326396);
++  make_cvar(cvar_7326398, (object *)&__glo_floor_scheme_base);make_pair(pair_7326399, find_or_add_symbol("floor"), &cvar_7326398);
++  make_cvar(cvar_7326400, (object *)&__glo_floor_191_191inline_191_191_scheme_base);make_pair(pair_7326401, find_or_add_symbol("floor__inline__"), &cvar_7326400);
++  make_cvar(cvar_7326402, (object *)&__glo_every_scheme_base);make_pair(pair_7326403, find_or_add_symbol("every"), &cvar_7326402);
++  make_cvar(cvar_7326404, (object *)&__glo_any_scheme_base);make_pair(pair_7326405, find_or_add_symbol("any"), &cvar_7326404);
++  make_cvar(cvar_7326406, (object *)&__glo_error_95loc_scheme_base);make_pair(pair_7326407, find_or_add_symbol("error/loc"), &cvar_7326406);
++  make_cvar(cvar_7326408, (object *)&__glo_Cyc_91remove_91exception_91handler_scheme_base);make_pair(pair_7326409, find_or_add_symbol("Cyc-remove-exception-handler"), &cvar_7326408);
++  make_cvar(cvar_7326410, (object *)&__glo_Cyc_91add_91exception_91handler_scheme_base);make_pair(pair_7326411, find_or_add_symbol("Cyc-add-exception-handler"), &cvar_7326410);
++  make_cvar(cvar_7326412, (object *)&__glo_with_91exception_91handler_scheme_base);make_pair(pair_7326413, find_or_add_symbol("with-exception-handler"), &cvar_7326412);
++  make_cvar(cvar_7326414, (object *)&__glo_with_91handler_scheme_base);make_pair(pair_7326415, find_or_add_symbol("with-handler"), &cvar_7326414);
++  make_cvar(cvar_7326416, (object *)&__glo_raise_91continuable_scheme_base);make_pair(pair_7326417, find_or_add_symbol("raise-continuable"), &cvar_7326416);
++  make_cvar(cvar_7326418, (object *)&__glo_raise_scheme_base);make_pair(pair_7326419, find_or_add_symbol("raise"), &cvar_7326418);
++  make_cvar(cvar_7326420, (object *)&__glo_error_scheme_base);make_pair(pair_7326421, find_or_add_symbol("error"), &cvar_7326420);
++  make_cvar(cvar_7326422, (object *)&__glo_error_91object_91irritants_scheme_base);make_pair(pair_7326423, find_or_add_symbol("error-object-irritants"), &cvar_7326422);
++  make_cvar(cvar_7326424, (object *)&__glo_error_91object_91message_scheme_base);make_pair(pair_7326425, find_or_add_symbol("error-object-message"), &cvar_7326424);
++  make_cvar(cvar_7326426, (object *)&__glo_error_91object_127_scheme_base);make_pair(pair_7326427, find_or_add_symbol("error-object?"), &cvar_7326426);
++  make_cvar(cvar_7326428, (object *)&__glo_current_91error_91port_scheme_base);make_pair(pair_7326429, find_or_add_symbol("current-error-port"), &cvar_7326428);
++  make_cvar(cvar_7326430, (object *)&__glo_current_91input_91port_scheme_base);make_pair(pair_7326431, find_or_add_symbol("current-input-port"), &cvar_7326430);
++  make_cvar(cvar_7326432, (object *)&__glo_current_91output_91port_scheme_base);make_pair(pair_7326433, find_or_add_symbol("current-output-port"), &cvar_7326432);
++  make_cvar(cvar_7326434, (object *)&__glo_make_91parameter_scheme_base);make_pair(pair_7326435, find_or_add_symbol("make-parameter"), &cvar_7326434);
++  make_cvar(cvar_7326436, (object *)&__glo__85parameter_91id_85_scheme_base);make_pair(pair_7326437, find_or_add_symbol("*parameter-id*"), &cvar_7326436);
++  make_cvar(cvar_7326438, (object *)&__glo_set_91param_91obj_67_scheme_base);make_pair(pair_7326439, find_or_add_symbol("set-param-obj!"), &cvar_7326438);
++  make_cvar(cvar_7326440, (object *)&__glo_get_91param_91objs_scheme_base);make_pair(pair_7326441, find_or_add_symbol("get-param-objs"), &cvar_7326440);
++  make_cvar(cvar_7326442, (object *)&__glo_parameterize_scheme_base);make_pair(pair_7326443, find_or_add_symbol("parameterize"), &cvar_7326442);
++  make_cvar(cvar_7326444, (object *)&__glo_Cyc_91make_91string_scheme_base);make_pair(pair_7326445, find_or_add_symbol("Cyc-make-string"), &cvar_7326444);
++  make_cvar(cvar_7326446, (object *)&__glo_make_91string_scheme_base);make_pair(pair_7326447, find_or_add_symbol("make-string"), &cvar_7326446);
++  make_cvar(cvar_7326448, (object *)&__glo_string_scheme_base);make_pair(pair_7326449, find_or_add_symbol("string"), &cvar_7326448);
++  make_cvar(cvar_7326450, (object *)&__glo_Cyc_91obj_123_127_scheme_base);make_pair(pair_7326451, find_or_add_symbol("Cyc-obj=?"), &cvar_7326450);
++  make_cvar(cvar_7326452, (object *)&__glo_symbol_123_127_scheme_base);make_pair(pair_7326453, find_or_add_symbol("symbol=?"), &cvar_7326452);
++  make_cvar(cvar_7326454, (object *)&__glo_boolean_123_127_scheme_base);make_pair(pair_7326455, find_or_add_symbol("boolean=?"), &cvar_7326454);
++  make_cvar(cvar_7326456, (object *)&__glo_vector_91fill_67_scheme_base);make_pair(pair_7326457, find_or_add_symbol("vector-fill!"), &cvar_7326456);
++  make_cvar(cvar_7326458, (object *)&__glo_vector_91copy_67_scheme_base);make_pair(pair_7326459, find_or_add_symbol("vector-copy!"), &cvar_7326458);
++  make_cvar(cvar_7326460, (object *)&__glo_vector_91copy_scheme_base);make_pair(pair_7326461, find_or_add_symbol("vector-copy"), &cvar_7326460);
++  make_cvar(cvar_7326462, (object *)&__glo_vector_91append_scheme_base);make_pair(pair_7326463, find_or_add_symbol("vector-append"), &cvar_7326462);
++  make_cvar(cvar_7326464, (object *)&__glo_vector_91for_91each_scheme_base);make_pair(pair_7326465, find_or_add_symbol("vector-for-each"), &cvar_7326464);
++  make_cvar(cvar_7326466, (object *)&__glo_vector_91map_scheme_base);make_pair(pair_7326467, find_or_add_symbol("vector-map"), &cvar_7326466);
++  make_cvar(cvar_7326468, (object *)&__glo_string_91for_91each_scheme_base);make_pair(pair_7326469, find_or_add_symbol("string-for-each"), &cvar_7326468);
++  make_cvar(cvar_7326470, (object *)&__glo_string_91map_scheme_base);make_pair(pair_7326471, find_or_add_symbol("string-map"), &cvar_7326470);
++  make_cvar(cvar_7326472, (object *)&__glo_string_91fill_67_scheme_base);make_pair(pair_7326473, find_or_add_symbol("string-fill!"), &cvar_7326472);
++  make_cvar(cvar_7326474, (object *)&__glo_string_91copy_67_scheme_base);make_pair(pair_7326475, find_or_add_symbol("string-copy!"), &cvar_7326474);
++  make_cvar(cvar_7326476, (object *)&__glo_string_91copy_scheme_base);make_pair(pair_7326477, find_or_add_symbol("string-copy"), &cvar_7326476);
++  make_cvar(cvar_7326478, (object *)&__glo_string_91_125vector_scheme_base);make_pair(pair_7326479, find_or_add_symbol("string->vector"), &cvar_7326478);
++  make_cvar(cvar_7326480, (object *)&__glo_string_91_125list_scheme_base);make_pair(pair_7326481, find_or_add_symbol("string->list"), &cvar_7326480);
++  make_cvar(cvar_7326482, (object *)&__glo_vector_91_125string_scheme_base);make_pair(pair_7326483, find_or_add_symbol("vector->string"), &cvar_7326482);
++  make_cvar(cvar_7326484, (object *)&__glo_string_91_125utf8_scheme_base);make_pair(pair_7326485, find_or_add_symbol("string->utf8"), &cvar_7326484);
++  make_cvar(cvar_7326486, (object *)&__glo_utf8_91_125string_scheme_base);make_pair(pair_7326487, find_or_add_symbol("utf8->string"), &cvar_7326486);
++  make_cvar(cvar_7326488, (object *)&__glo_bytevector_91copy_67_scheme_base);make_pair(pair_7326489, find_or_add_symbol("bytevector-copy!"), &cvar_7326488);
++  make_cvar(cvar_7326490, (object *)&__glo_bytevector_91copy_scheme_base);make_pair(pair_7326491, find_or_add_symbol("bytevector-copy"), &cvar_7326490);
++  make_cvar(cvar_7326492, (object *)&__glo_vector_91_125list_scheme_base);make_pair(pair_7326493, find_or_add_symbol("vector->list"), &cvar_7326492);
++  make_cvar(cvar_7326494, (object *)&__glo_vector_scheme_base);make_pair(pair_7326495, find_or_add_symbol("vector"), &cvar_7326494);
++  make_cvar(cvar_7326496, (object *)&__glo_reverse_scheme_base);make_pair(pair_7326497, find_or_add_symbol("reverse"), &cvar_7326496);
++  make_cvar(cvar_7326498, (object *)&__glo_list_91set_67_scheme_base);make_pair(pair_7326499, find_or_add_symbol("list-set!"), &cvar_7326498);
++  make_cvar(cvar_7326500, (object *)&__glo_list_91ref_scheme_base);make_pair(pair_7326501, find_or_add_symbol("list-ref"), &cvar_7326500);
++  make_cvar(cvar_7326502, (object *)&__glo_list_91tail_scheme_base);make_pair(pair_7326503, find_or_add_symbol("list-tail"), &cvar_7326502);
++  make_cvar(cvar_7326504, (object *)&__glo_for_91each_scheme_base);make_pair(pair_7326505, find_or_add_symbol("for-each"), &cvar_7326504);
++  make_cvar(cvar_7326506, (object *)&__glo_Cyc_91for_91each_91loop_912_scheme_base);make_pair(pair_7326507, find_or_add_symbol("Cyc-for-each-loop-2"), &cvar_7326506);
++  make_cvar(cvar_7326508, (object *)&__glo_Cyc_91for_91each_91loop_911_scheme_base);make_pair(pair_7326509, find_or_add_symbol("Cyc-for-each-loop-1"), &cvar_7326508);
++  make_cvar(cvar_7326510, (object *)&__glo_Cyc_91map_91loop_912_scheme_base);make_pair(pair_7326511, find_or_add_symbol("Cyc-map-loop-2"), &cvar_7326510);
++  make_cvar(cvar_7326512, (object *)&__glo_Cyc_91map_91loop_911_scheme_base);make_pair(pair_7326513, find_or_add_symbol("Cyc-map-loop-1"), &cvar_7326512);
++  make_cvar(cvar_7326514, (object *)&__glo_map_scheme_base);make_pair(pair_7326515, find_or_add_symbol("map"), &cvar_7326514);
++  make_cvar(cvar_7326516, (object *)&__glo__75cars_87cdrs_scheme_base);make_pair(pair_7326517, find_or_add_symbol("%cars+cdrs"), &cvar_7326516);
++  make_cvar(cvar_7326518, (object *)&__glo_car_87cdr_scheme_base);make_pair(pair_7326519, find_or_add_symbol("car+cdr"), &cvar_7326518);
++  make_cvar(cvar_7326520, (object *)&__glo_receive_scheme_base);make_pair(pair_7326521, find_or_add_symbol("receive"), &cvar_7326520);
++  make_cvar(cvar_7326522, (object *)&__glo_list_91copy_scheme_base);make_pair(pair_7326523, find_or_add_symbol("list-copy"), &cvar_7326522);
++  make_cvar(cvar_7326524, (object *)&__glo_make_91list_scheme_base);make_pair(pair_7326525, find_or_add_symbol("make-list"), &cvar_7326524);
++  make_cvar(cvar_7326526, (object *)&__glo__list_scheme_base);make_pair(pair_7326527, find_or_add_symbol("list"), &cvar_7326526);
++  make_cvar(cvar_7326528, (object *)&__glo_append_scheme_base);make_pair(pair_7326529, find_or_add_symbol("append"), &cvar_7326528);
++  make_cvar(cvar_7326530, (object *)&__glo_negative_127_191_191inline_191_191_scheme_base);make_pair(pair_7326531, find_or_add_symbol("negative?__inline__"), &cvar_7326530);
++  make_cvar(cvar_7326532, (object *)&__glo_negative_127_scheme_base);make_pair(pair_7326533, find_or_add_symbol("negative?"), &cvar_7326532);
++  make_cvar(cvar_7326534, (object *)&__glo_positive_127_191_191inline_191_191_scheme_base);make_pair(pair_7326535, find_or_add_symbol("positive?__inline__"), &cvar_7326534);
++  make_cvar(cvar_7326536, (object *)&__glo_positive_127_scheme_base);make_pair(pair_7326537, find_or_add_symbol("positive?"), &cvar_7326536);
++  make_cvar(cvar_7326538, (object *)&__glo_zero_127_191_191inline_191_191_scheme_base);make_pair(pair_7326539, find_or_add_symbol("zero?__inline__"), &cvar_7326538);
++  make_cvar(cvar_7326540, (object *)&__glo_zero_127_scheme_base);make_pair(pair_7326541, find_or_add_symbol("zero?"), &cvar_7326540);
++  make_cvar(cvar_7326542, (object *)&__glo_list_127_scheme_base);make_pair(pair_7326543, find_or_add_symbol("list?"), &cvar_7326542);
++  make_cvar(cvar_7326544, (object *)&__glo_list_127_191_191inline_191_191_scheme_base);make_pair(pair_7326545, find_or_add_symbol("list?__inline__"), &cvar_7326544);
++  make_cvar(cvar_7326546, (object *)&__glo_not_191_191inline_191_191_scheme_base);make_pair(pair_7326547, find_or_add_symbol("not__inline__"), &cvar_7326546);
++  make_cvar(cvar_7326548, (object *)&__glo_not_scheme_base);make_pair(pair_7326549, find_or_add_symbol("not"), &cvar_7326548);
++  make_cvar(cvar_7326550, (object *)&__glo_newline_scheme_base);make_pair(pair_7326551, find_or_add_symbol("newline"), &cvar_7326550);
++  make_cvar(cvar_7326552, (object *)&__glo_write_91char_scheme_base);make_pair(pair_7326553, find_or_add_symbol("write-char"), &cvar_7326552);
++  make_cvar(cvar_7326554, (object *)&__glo__75write_91bytevector_scheme_base);make_pair(pair_7326555, find_or_add_symbol("%write-bytevector"), &cvar_7326554);
++  make_cvar(cvar_7326556, (object *)&__glo__75write_91bytevector_191_191inline_191_191_scheme_base);make_pair(pair_7326557, find_or_add_symbol("%write-bytevector__inline__"), &cvar_7326556);
++  make_cvar(cvar_7326558, (object *)&__glo_write_91bytevector_scheme_base);make_pair(pair_7326559, find_or_add_symbol("write-bytevector"), &cvar_7326558);
++  make_cvar(cvar_7326560, (object *)&__glo_read_91bytevector_67_scheme_base);make_pair(pair_7326561, find_or_add_symbol("read-bytevector!"), &cvar_7326560);
++  make_cvar(cvar_7326562, (object *)&__glo_read_91bytevector_scheme_base);make_pair(pair_7326563, find_or_add_symbol("read-bytevector"), &cvar_7326562);
++  make_cvar(cvar_7326564, (object *)&__glo_write_91string_scheme_base);make_pair(pair_7326565, find_or_add_symbol("write-string"), &cvar_7326564);
++  make_cvar(cvar_7326566, (object *)&__glo_write_91string_912_scheme_base);make_pair(pair_7326567, find_or_add_symbol("write-string-2"), &cvar_7326566);
++  make_cvar(cvar_7326568, (object *)&__glo_write_91string_911_scheme_base);make_pair(pair_7326569, find_or_add_symbol("write-string-1"), &cvar_7326568);
++  make_cvar(cvar_7326570, (object *)&__glo_flush_91output_91port_scheme_base);make_pair(pair_7326571, find_or_add_symbol("flush-output-port"), &cvar_7326570);
++  make_cvar(cvar_7326572, (object *)&__glo_textual_91port_127_scheme_base);make_pair(pair_7326573, find_or_add_symbol("textual-port?"), &cvar_7326572);
++  make_cvar(cvar_7326574, (object *)&__glo_binary_91port_127_scheme_base);make_pair(pair_7326575, find_or_add_symbol("binary-port?"), &cvar_7326574);
++  make_cvar(cvar_7326576, (object *)&__glo__191binary_91port_127_scheme_base);make_pair(pair_7326577, find_or_add_symbol("_binary-port?"), &cvar_7326576);
++  make_cvar(cvar_7326578, (object *)&__glo_read_91string_scheme_base);make_pair(pair_7326579, find_or_add_symbol("read-string"), &cvar_7326578);
++  make_cvar(cvar_7326580, (object *)&__glo_read_91line_scheme_base);make_pair(pair_7326581, find_or_add_symbol("read-line"), &cvar_7326580);
++  make_cvar(cvar_7326582, (object *)&__glo_read_91char_scheme_base);make_pair(pair_7326583, find_or_add_symbol("read-char"), &cvar_7326582);
++  make_cvar(cvar_7326584, (object *)&__glo_peek_91char_scheme_base);make_pair(pair_7326585, find_or_add_symbol("peek-char"), &cvar_7326584);
++  make_cvar(cvar_7326586, (object *)&__glo_char_91ready_127_scheme_base);make_pair(pair_7326587, find_or_add_symbol("char-ready?"), &cvar_7326586);
++  make_cvar(cvar_7326588, (object *)&__glo_Cyc_91char_91ready_127_scheme_base);make_pair(pair_7326589, find_or_add_symbol("Cyc-char-ready?"), &cvar_7326588);
++  make_cvar(cvar_7326590, (object *)&__glo_write_91u8_scheme_base);make_pair(pair_7326591, find_or_add_symbol("write-u8"), &cvar_7326590);
++  make_cvar(cvar_7326592, (object *)&__glo_peek_91u8_scheme_base);make_pair(pair_7326593, find_or_add_symbol("peek-u8"), &cvar_7326592);
++  make_cvar(cvar_7326594, (object *)&__glo_read_91u8_scheme_base);make_pair(pair_7326595, find_or_add_symbol("read-u8"), &cvar_7326594);
++  make_cvar(cvar_7326596, (object *)&__glo__191write_91u8_scheme_base);make_pair(pair_7326597, find_or_add_symbol("_write-u8"), &cvar_7326596);
++  make_cvar(cvar_7326598, (object *)&__glo__191peek_91u8_scheme_base);make_pair(pair_7326599, find_or_add_symbol("_peek-u8"), &cvar_7326598);
++  make_cvar(cvar_7326600, (object *)&__glo__191read_91u8_scheme_base);make_pair(pair_7326601, find_or_add_symbol("_read-u8"), &cvar_7326600);
++  make_cvar(cvar_7326602, (object *)&__glo_foldr_scheme_base);make_pair(pair_7326603, find_or_add_symbol("foldr"), &cvar_7326602);
++  make_cvar(cvar_7326604, (object *)&__glo_foldl_scheme_base);make_pair(pair_7326605, find_or_add_symbol("foldl"), &cvar_7326604);
++  make_cvar(cvar_7326606, (object *)&__glo_assoc_scheme_base);make_pair(pair_7326607, find_or_add_symbol("assoc"), &cvar_7326606);
++  make_cvar(cvar_7326608, (object *)&__glo_assoc_91helper_scheme_base);make_pair(pair_7326609, find_or_add_symbol("assoc-helper"), &cvar_7326608);
++  make_cvar(cvar_7326610, (object *)&__glo_member_scheme_base);make_pair(pair_7326611, find_or_add_symbol("member"), &cvar_7326610);
++  make_cvar(cvar_7326612, (object *)&__glo_member_91helper_scheme_base);make_pair(pair_7326613, find_or_add_symbol("member-helper"), &cvar_7326612);
++  make_cvar(cvar_7326614, (object *)&__glo_fast_91string_125_123_127_191_191inline_191_191_scheme_base);make_pair(pair_7326615, find_or_add_symbol("fast-string>=?__inline__"), &cvar_7326614);
++  make_cvar(cvar_7326616, (object *)&__glo_fast_91string_125_123_127_scheme_base);make_pair(pair_7326617, find_or_add_symbol("fast-string>=?"), &cvar_7326616);
++  make_cvar(cvar_7326618, (object *)&__glo_fast_91string_125_127_191_191inline_191_191_scheme_base);make_pair(pair_7326619, find_or_add_symbol("fast-string>?__inline__"), &cvar_7326618);
++  make_cvar(cvar_7326620, (object *)&__glo_fast_91string_125_127_scheme_base);make_pair(pair_7326621, find_or_add_symbol("fast-string>?"), &cvar_7326620);
++  make_cvar(cvar_7326622, (object *)&__glo_fast_91string_121_123_127_191_191inline_191_191_scheme_base);make_pair(pair_7326623, find_or_add_symbol("fast-string<=?__inline__"), &cvar_7326622);
++  make_cvar(cvar_7326624, (object *)&__glo_fast_91string_121_123_127_scheme_base);make_pair(pair_7326625, find_or_add_symbol("fast-string<=?"), &cvar_7326624);
++  make_cvar(cvar_7326626, (object *)&__glo_fast_91string_121_127_191_191inline_191_191_scheme_base);make_pair(pair_7326627, find_or_add_symbol("fast-string<?__inline__"), &cvar_7326626);
++  make_cvar(cvar_7326628, (object *)&__glo_fast_91string_121_127_scheme_base);make_pair(pair_7326629, find_or_add_symbol("fast-string<?"), &cvar_7326628);
++  make_cvar(cvar_7326630, (object *)&__glo_fast_91string_123_127_191_191inline_191_191_scheme_base);make_pair(pair_7326631, find_or_add_symbol("fast-string=?__inline__"), &cvar_7326630);
++  make_cvar(cvar_7326632, (object *)&__glo_fast_91string_123_127_scheme_base);make_pair(pair_7326633, find_or_add_symbol("fast-string=?"), &cvar_7326632);
++  make_cvar(cvar_7326634, (object *)&__glo_string_125_123_127_scheme_base);make_pair(pair_7326635, find_or_add_symbol("string>=?"), &cvar_7326634);
++  make_cvar(cvar_7326636, (object *)&__glo_string_125_127_scheme_base);make_pair(pair_7326637, find_or_add_symbol("string>?"), &cvar_7326636);
++  make_cvar(cvar_7326638, (object *)&__glo_string_121_123_127_scheme_base);make_pair(pair_7326639, find_or_add_symbol("string<=?"), &cvar_7326638);
++  make_cvar(cvar_7326640, (object *)&__glo_string_121_127_scheme_base);make_pair(pair_7326641, find_or_add_symbol("string<?"), &cvar_7326640);
++  make_cvar(cvar_7326642, (object *)&__glo_string_123_127_scheme_base);make_pair(pair_7326643, find_or_add_symbol("string=?"), &cvar_7326642);
++  make_cvar(cvar_7326644, (object *)&__glo_char_125_123_127_scheme_base);make_pair(pair_7326645, find_or_add_symbol("char>=?"), &cvar_7326644);
++  make_cvar(cvar_7326646, (object *)&__glo_char_121_123_127_scheme_base);make_pair(pair_7326647, find_or_add_symbol("char<=?"), &cvar_7326646);
++  make_cvar(cvar_7326648, (object *)&__glo_char_125_127_scheme_base);make_pair(pair_7326649, find_or_add_symbol("char>?"), &cvar_7326648);
++  make_cvar(cvar_7326650, (object *)&__glo_char_121_127_scheme_base);make_pair(pair_7326651, find_or_add_symbol("char<?"), &cvar_7326650);
++  make_cvar(cvar_7326652, (object *)&__glo_char_123_127_scheme_base);make_pair(pair_7326653, find_or_add_symbol("char=?"), &cvar_7326652);
++  make_cvar(cvar_7326654, (object *)&__glo_Cyc_91bin_91op_91char_scheme_base);make_pair(pair_7326655, find_or_add_symbol("Cyc-bin-op-char"), &cvar_7326654);
++  make_cvar(cvar_7326656, (object *)&__glo_Cyc_91bin_91op_scheme_base);make_pair(pair_7326657, find_or_add_symbol("Cyc-bin-op"), &cvar_7326656);
++  make_cvar(cvar_7326658, (object *)&__glo_call_91with_91port_scheme_base);make_pair(pair_7326659, find_or_add_symbol("call-with-port"), &cvar_7326658);
++  make_cvar(cvar_7326660, (object *)&__glo_dynamic_91wind_scheme_base);make_pair(pair_7326661, find_or_add_symbol("dynamic-wind"), &cvar_7326660);
++  make_cvar(cvar_7326662, (object *)&__glo_call_91with_91values_scheme_base);make_pair(pair_7326663, find_or_add_symbol("call-with-values"), &cvar_7326662);
++  make_cvar(cvar_7326664, (object *)&__glo_values_scheme_base);make_pair(pair_7326665, find_or_add_symbol("values"), &cvar_7326664);
++  make_cvar(cvar_7326666, (object *)&__glo_call_91with_91current_91continuation_scheme_base);make_pair(pair_7326667, find_or_add_symbol("call-with-current-continuation"), &cvar_7326666);
++  make_cvar(cvar_7326668, (object *)&__glo_syntax_91error_scheme_base);make_pair(pair_7326669, find_or_add_symbol("syntax-error"), &cvar_7326668);
++  make_cvar(cvar_7326670, (object *)&__glo_quasiquote_scheme_base);make_pair(pair_7326671, find_or_add_symbol("quasiquote"), &cvar_7326670);
++  make_cvar(cvar_7326672, (object *)&__glo__do_scheme_base);make_pair(pair_7326673, find_or_add_symbol("do"), &cvar_7326672);
++  make_cvar(cvar_7326674, (object *)&__glo_unless_scheme_base);make_pair(pair_7326675, find_or_add_symbol("unless"), &cvar_7326674);
++  make_cvar(cvar_7326676, (object *)&__glo_when_scheme_base);make_pair(pair_7326677, find_or_add_symbol("when"), &cvar_7326676);
++  make_cvar(cvar_7326678, (object *)&__glo__case_scheme_base);make_pair(pair_7326679, find_or_add_symbol("case"), &cvar_7326678);
++  make_cvar(cvar_7326680, (object *)&__glo_cond_scheme_base);make_pair(pair_7326681, find_or_add_symbol("cond"), &cvar_7326680);
++  make_cvar(cvar_7326682, (object *)&__glo_cond_91expand_scheme_base);make_pair(pair_7326683, find_or_add_symbol("cond-expand"), &cvar_7326682);
++  make_cvar(cvar_7326684, (object *)&__glo_begin_scheme_base);make_pair(pair_7326685, find_or_add_symbol("begin"), &cvar_7326684);
++  make_cvar(cvar_7326686, (object *)&__glo_letrec_scheme_base);make_pair(pair_7326687, find_or_add_symbol("letrec"), &cvar_7326686);
++  make_cvar(cvar_7326688, (object *)&__glo_let_85_scheme_base);make_pair(pair_7326689, find_or_add_symbol("let*"), &cvar_7326688);
++  make_cvar(cvar_7326690, (object *)&__glo_let_scheme_base);make_pair(pair_7326691, find_or_add_symbol("let"), &cvar_7326690);
++  make_cvar(cvar_7326692, (object *)&__glo_or_scheme_base);make_pair(pair_7326693, find_or_add_symbol("or"), &cvar_7326692);
++  make_cvar(cvar_7326694, (object *)&__glo_and_scheme_base);make_pair(pair_7326695, find_or_add_symbol("and"), &cvar_7326694);
++  make_cvar(cvar_7326696, (object *)&__glo_Cyc_91version_scheme_base);make_pair(pair_7326697, find_or_add_symbol("Cyc-version"), &cvar_7326696);
++  make_cvar(cvar_7326698, (object *)&__glo_Cyc_91add_91feature_67_scheme_base);make_pair(pair_7326699, find_or_add_symbol("Cyc-add-feature!"), &cvar_7326698);
++  make_cvar(cvar_7326700, (object *)&__glo__85other_91features_85_scheme_base);make_pair(pair_7326701, find_or_add_symbol("*other-features*"), &cvar_7326700);
++  make_cvar(cvar_7326702, (object *)&__glo_features_scheme_base);make_pair(pair_7326703, find_or_add_symbol("features"), &cvar_7326702);
++  make_cvar(cvar_7326704, (object *)&__glo_call_95cc_scheme_base);make_pair(pair_7326705, find_or_add_symbol("call/cc"), &cvar_7326704);
++make_pair(c_7326950, &pair_7326216,Cyc_global_variables);
++make_pair(c_7326949, &pair_7326219, &c_7326950);
++make_pair(c_7326948, &pair_7326221, &c_7326949);
++make_pair(c_7326947, &pair_7326223, &c_7326948);
++make_pair(c_7326946, &pair_7326225, &c_7326947);
++make_pair(c_7326945, &pair_7326227, &c_7326946);
++make_pair(c_7326944, &pair_7326229, &c_7326945);
++make_pair(c_7326943, &pair_7326231, &c_7326944);
++make_pair(c_7326942, &pair_7326233, &c_7326943);
++make_pair(c_7326941, &pair_7326235, &c_7326942);
++make_pair(c_7326940, &pair_7326237, &c_7326941);
++make_pair(c_7326939, &pair_7326239, &c_7326940);
++make_pair(c_7326938, &pair_7326241, &c_7326939);
++make_pair(c_7326937, &pair_7326243, &c_7326938);
++make_pair(c_7326936, &pair_7326245, &c_7326937);
++make_pair(c_7326935, &pair_7326247, &c_7326936);
++make_pair(c_7326934, &pair_7326249, &c_7326935);
++make_pair(c_7326933, &pair_7326251, &c_7326934);
++make_pair(c_7326932, &pair_7326253, &c_7326933);
++make_pair(c_7326931, &pair_7326255, &c_7326932);
++make_pair(c_7326930, &pair_7326257, &c_7326931);
++make_pair(c_7326929, &pair_7326259, &c_7326930);
++make_pair(c_7326928, &pair_7326261, &c_7326929);
++make_pair(c_7326927, &pair_7326263, &c_7326928);
++make_pair(c_7326926, &pair_7326265, &c_7326927);
++make_pair(c_7326925, &pair_7326267, &c_7326926);
++make_pair(c_7326924, &pair_7326269, &c_7326925);
++make_pair(c_7326923, &pair_7326271, &c_7326924);
++make_pair(c_7326922, &pair_7326273, &c_7326923);
++make_pair(c_7326921, &pair_7326275, &c_7326922);
++make_pair(c_7326920, &pair_7326277, &c_7326921);
++make_pair(c_7326919, &pair_7326279, &c_7326920);
++make_pair(c_7326918, &pair_7326281, &c_7326919);
++make_pair(c_7326917, &pair_7326283, &c_7326918);
++make_pair(c_7326916, &pair_7326285, &c_7326917);
++make_pair(c_7326915, &pair_7326287, &c_7326916);
++make_pair(c_7326914, &pair_7326289, &c_7326915);
++make_pair(c_7326913, &pair_7326291, &c_7326914);
++make_pair(c_7326912, &pair_7326293, &c_7326913);
++make_pair(c_7326911, &pair_7326295, &c_7326912);
++make_pair(c_7326910, &pair_7326297, &c_7326911);
++make_pair(c_7326909, &pair_7326299, &c_7326910);
++make_pair(c_7326908, &pair_7326301, &c_7326909);
++make_pair(c_7326907, &pair_7326303, &c_7326908);
++make_pair(c_7326906, &pair_7326305, &c_7326907);
++make_pair(c_7326905, &pair_7326307, &c_7326906);
++make_pair(c_7326904, &pair_7326309, &c_7326905);
++make_pair(c_7326903, &pair_7326311, &c_7326904);
++make_pair(c_7326902, &pair_7326313, &c_7326903);
++make_pair(c_7326901, &pair_7326315, &c_7326902);
++make_pair(c_7326900, &pair_7326317, &c_7326901);
++make_pair(c_7326899, &pair_7326319, &c_7326900);
++make_pair(c_7326898, &pair_7326321, &c_7326899);
++make_pair(c_7326897, &pair_7326323, &c_7326898);
++make_pair(c_7326896, &pair_7326325, &c_7326897);
++make_pair(c_7326895, &pair_7326327, &c_7326896);
++make_pair(c_7326894, &pair_7326329, &c_7326895);
++make_pair(c_7326893, &pair_7326331, &c_7326894);
++make_pair(c_7326892, &pair_7326333, &c_7326893);
++make_pair(c_7326891, &pair_7326335, &c_7326892);
++make_pair(c_7326890, &pair_7326337, &c_7326891);
++make_pair(c_7326889, &pair_7326339, &c_7326890);
++make_pair(c_7326888, &pair_7326341, &c_7326889);
++make_pair(c_7326887, &pair_7326343, &c_7326888);
++make_pair(c_7326886, &pair_7326345, &c_7326887);
++make_pair(c_7326885, &pair_7326347, &c_7326886);
++make_pair(c_7326884, &pair_7326349, &c_7326885);
++make_pair(c_7326883, &pair_7326351, &c_7326884);
++make_pair(c_7326882, &pair_7326353, &c_7326883);
++make_pair(c_7326881, &pair_7326355, &c_7326882);
++make_pair(c_7326880, &pair_7326357, &c_7326881);
++make_pair(c_7326879, &pair_7326359, &c_7326880);
++make_pair(c_7326878, &pair_7326361, &c_7326879);
++make_pair(c_7326877, &pair_7326363, &c_7326878);
++make_pair(c_7326876, &pair_7326365, &c_7326877);
++make_pair(c_7326875, &pair_7326367, &c_7326876);
++make_pair(c_7326874, &pair_7326369, &c_7326875);
++make_pair(c_7326873, &pair_7326371, &c_7326874);
++make_pair(c_7326872, &pair_7326373, &c_7326873);
++make_pair(c_7326871, &pair_7326375, &c_7326872);
++make_pair(c_7326870, &pair_7326377, &c_7326871);
++make_pair(c_7326869, &pair_7326379, &c_7326870);
++make_pair(c_7326868, &pair_7326381, &c_7326869);
++make_pair(c_7326867, &pair_7326383, &c_7326868);
++make_pair(c_7326866, &pair_7326385, &c_7326867);
++make_pair(c_7326865, &pair_7326387, &c_7326866);
++make_pair(c_7326864, &pair_7326389, &c_7326865);
++make_pair(c_7326863, &pair_7326391, &c_7326864);
++make_pair(c_7326862, &pair_7326393, &c_7326863);
++make_pair(c_7326861, &pair_7326395, &c_7326862);
++make_pair(c_7326860, &pair_7326397, &c_7326861);
++make_pair(c_7326859, &pair_7326399, &c_7326860);
++make_pair(c_7326858, &pair_7326401, &c_7326859);
++make_pair(c_7326857, &pair_7326403, &c_7326858);
++make_pair(c_7326856, &pair_7326405, &c_7326857);
++make_pair(c_7326855, &pair_7326407, &c_7326856);
++make_pair(c_7326854, &pair_7326409, &c_7326855);
++make_pair(c_7326853, &pair_7326411, &c_7326854);
++make_pair(c_7326852, &pair_7326413, &c_7326853);
++make_pair(c_7326851, &pair_7326415, &c_7326852);
++make_pair(c_7326850, &pair_7326417, &c_7326851);
++make_pair(c_7326849, &pair_7326419, &c_7326850);
++make_pair(c_7326848, &pair_7326421, &c_7326849);
++make_pair(c_7326847, &pair_7326423, &c_7326848);
++make_pair(c_7326846, &pair_7326425, &c_7326847);
++make_pair(c_7326845, &pair_7326427, &c_7326846);
++make_pair(c_7326844, &pair_7326429, &c_7326845);
++make_pair(c_7326843, &pair_7326431, &c_7326844);
++make_pair(c_7326842, &pair_7326433, &c_7326843);
++make_pair(c_7326841, &pair_7326435, &c_7326842);
++make_pair(c_7326840, &pair_7326437, &c_7326841);
++make_pair(c_7326839, &pair_7326439, &c_7326840);
++make_pair(c_7326838, &pair_7326441, &c_7326839);
++make_pair(c_7326837, &pair_7326443, &c_7326838);
++make_pair(c_7326836, &pair_7326445, &c_7326837);
++make_pair(c_7326835, &pair_7326447, &c_7326836);
++make_pair(c_7326834, &pair_7326449, &c_7326835);
++make_pair(c_7326833, &pair_7326451, &c_7326834);
++make_pair(c_7326832, &pair_7326453, &c_7326833);
++make_pair(c_7326831, &pair_7326455, &c_7326832);
++make_pair(c_7326830, &pair_7326457, &c_7326831);
++make_pair(c_7326829, &pair_7326459, &c_7326830);
++make_pair(c_7326828, &pair_7326461, &c_7326829);
++make_pair(c_7326827, &pair_7326463, &c_7326828);
++make_pair(c_7326826, &pair_7326465, &c_7326827);
++make_pair(c_7326825, &pair_7326467, &c_7326826);
++make_pair(c_7326824, &pair_7326469, &c_7326825);
++make_pair(c_7326823, &pair_7326471, &c_7326824);
++make_pair(c_7326822, &pair_7326473, &c_7326823);
++make_pair(c_7326821, &pair_7326475, &c_7326822);
++make_pair(c_7326820, &pair_7326477, &c_7326821);
++make_pair(c_7326819, &pair_7326479, &c_7326820);
++make_pair(c_7326818, &pair_7326481, &c_7326819);
++make_pair(c_7326817, &pair_7326483, &c_7326818);
++make_pair(c_7326816, &pair_7326485, &c_7326817);
++make_pair(c_7326815, &pair_7326487, &c_7326816);
++make_pair(c_7326814, &pair_7326489, &c_7326815);
++make_pair(c_7326813, &pair_7326491, &c_7326814);
++make_pair(c_7326812, &pair_7326493, &c_7326813);
++make_pair(c_7326811, &pair_7326495, &c_7326812);
++make_pair(c_7326810, &pair_7326497, &c_7326811);
++make_pair(c_7326809, &pair_7326499, &c_7326810);
++make_pair(c_7326808, &pair_7326501, &c_7326809);
++make_pair(c_7326807, &pair_7326503, &c_7326808);
++make_pair(c_7326806, &pair_7326505, &c_7326807);
++make_pair(c_7326805, &pair_7326507, &c_7326806);
++make_pair(c_7326804, &pair_7326509, &c_7326805);
++make_pair(c_7326803, &pair_7326511, &c_7326804);
++make_pair(c_7326802, &pair_7326513, &c_7326803);
++make_pair(c_7326801, &pair_7326515, &c_7326802);
++make_pair(c_7326800, &pair_7326517, &c_7326801);
++make_pair(c_7326799, &pair_7326519, &c_7326800);
++make_pair(c_7326798, &pair_7326521, &c_7326799);
++make_pair(c_7326797, &pair_7326523, &c_7326798);
++make_pair(c_7326796, &pair_7326525, &c_7326797);
++make_pair(c_7326795, &pair_7326527, &c_7326796);
++make_pair(c_7326794, &pair_7326529, &c_7326795);
++make_pair(c_7326793, &pair_7326531, &c_7326794);
++make_pair(c_7326792, &pair_7326533, &c_7326793);
++make_pair(c_7326791, &pair_7326535, &c_7326792);
++make_pair(c_7326790, &pair_7326537, &c_7326791);
++make_pair(c_7326789, &pair_7326539, &c_7326790);
++make_pair(c_7326788, &pair_7326541, &c_7326789);
++make_pair(c_7326787, &pair_7326543, &c_7326788);
++make_pair(c_7326786, &pair_7326545, &c_7326787);
++make_pair(c_7326785, &pair_7326547, &c_7326786);
++make_pair(c_7326784, &pair_7326549, &c_7326785);
++make_pair(c_7326783, &pair_7326551, &c_7326784);
++make_pair(c_7326782, &pair_7326553, &c_7326783);
++make_pair(c_7326781, &pair_7326555, &c_7326782);
++make_pair(c_7326780, &pair_7326557, &c_7326781);
++make_pair(c_7326779, &pair_7326559, &c_7326780);
++make_pair(c_7326778, &pair_7326561, &c_7326779);
++make_pair(c_7326777, &pair_7326563, &c_7326778);
++make_pair(c_7326776, &pair_7326565, &c_7326777);
++make_pair(c_7326775, &pair_7326567, &c_7326776);
++make_pair(c_7326774, &pair_7326569, &c_7326775);
++make_pair(c_7326773, &pair_7326571, &c_7326774);
++make_pair(c_7326772, &pair_7326573, &c_7326773);
++make_pair(c_7326771, &pair_7326575, &c_7326772);
++make_pair(c_7326770, &pair_7326577, &c_7326771);
++make_pair(c_7326769, &pair_7326579, &c_7326770);
++make_pair(c_7326768, &pair_7326581, &c_7326769);
++make_pair(c_7326767, &pair_7326583, &c_7326768);
++make_pair(c_7326766, &pair_7326585, &c_7326767);
++make_pair(c_7326765, &pair_7326587, &c_7326766);
++make_pair(c_7326764, &pair_7326589, &c_7326765);
++make_pair(c_7326763, &pair_7326591, &c_7326764);
++make_pair(c_7326762, &pair_7326593, &c_7326763);
++make_pair(c_7326761, &pair_7326595, &c_7326762);
++make_pair(c_7326760, &pair_7326597, &c_7326761);
++make_pair(c_7326759, &pair_7326599, &c_7326760);
++make_pair(c_7326758, &pair_7326601, &c_7326759);
++make_pair(c_7326757, &pair_7326603, &c_7326758);
++make_pair(c_7326756, &pair_7326605, &c_7326757);
++make_pair(c_7326755, &pair_7326607, &c_7326756);
++make_pair(c_7326754, &pair_7326609, &c_7326755);
++make_pair(c_7326753, &pair_7326611, &c_7326754);
++make_pair(c_7326752, &pair_7326613, &c_7326753);
++make_pair(c_7326751, &pair_7326615, &c_7326752);
++make_pair(c_7326750, &pair_7326617, &c_7326751);
++make_pair(c_7326749, &pair_7326619, &c_7326750);
++make_pair(c_7326748, &pair_7326621, &c_7326749);
++make_pair(c_7326747, &pair_7326623, &c_7326748);
++make_pair(c_7326746, &pair_7326625, &c_7326747);
++make_pair(c_7326745, &pair_7326627, &c_7326746);
++make_pair(c_7326744, &pair_7326629, &c_7326745);
++make_pair(c_7326743, &pair_7326631, &c_7326744);
++make_pair(c_7326742, &pair_7326633, &c_7326743);
++make_pair(c_7326741, &pair_7326635, &c_7326742);
++make_pair(c_7326740, &pair_7326637, &c_7326741);
++make_pair(c_7326739, &pair_7326639, &c_7326740);
++make_pair(c_7326738, &pair_7326641, &c_7326739);
++make_pair(c_7326737, &pair_7326643, &c_7326738);
++make_pair(c_7326736, &pair_7326645, &c_7326737);
++make_pair(c_7326735, &pair_7326647, &c_7326736);
++make_pair(c_7326734, &pair_7326649, &c_7326735);
++make_pair(c_7326733, &pair_7326651, &c_7326734);
++make_pair(c_7326732, &pair_7326653, &c_7326733);
++make_pair(c_7326731, &pair_7326655, &c_7326732);
++make_pair(c_7326730, &pair_7326657, &c_7326731);
++make_pair(c_7326729, &pair_7326659, &c_7326730);
++make_pair(c_7326728, &pair_7326661, &c_7326729);
++make_pair(c_7326727, &pair_7326663, &c_7326728);
++make_pair(c_7326726, &pair_7326665, &c_7326727);
++make_pair(c_7326725, &pair_7326667, &c_7326726);
++make_pair(c_7326724, &pair_7326669, &c_7326725);
++make_pair(c_7326723, &pair_7326671, &c_7326724);
++make_pair(c_7326722, &pair_7326673, &c_7326723);
++make_pair(c_7326721, &pair_7326675, &c_7326722);
++make_pair(c_7326720, &pair_7326677, &c_7326721);
++make_pair(c_7326719, &pair_7326679, &c_7326720);
++make_pair(c_7326718, &pair_7326681, &c_7326719);
++make_pair(c_7326717, &pair_7326683, &c_7326718);
++make_pair(c_7326716, &pair_7326685, &c_7326717);
++make_pair(c_7326715, &pair_7326687, &c_7326716);
++make_pair(c_7326714, &pair_7326689, &c_7326715);
++make_pair(c_7326713, &pair_7326691, &c_7326714);
++make_pair(c_7326712, &pair_7326693, &c_7326713);
++make_pair(c_7326711, &pair_7326695, &c_7326712);
++make_pair(c_7326710, &pair_7326697, &c_7326711);
++make_pair(c_7326709, &pair_7326699, &c_7326710);
++make_pair(c_7326708, &pair_7326701, &c_7326709);
++make_pair(c_7326707, &pair_7326703, &c_7326708);
++make_pair(c_7326706, &pair_7326705, &c_7326707);
++Cyc_global_variables = &c_7326706;
  object buf[1]; buf[0] = ((closure1_type *)clo)->element;
  (((closure)__glo_lib_91init_117schemebase_scheme_base)->fn)(data, buf[0], 1, buf);
  }