From 4e4360a0e8bcbfc519b7c4e19cbaf37129f1b451 Mon Sep 17 00:00:00 2001 From: Yuichi Nishiwaki Date: Sat, 15 Apr 2017 00:23:13 +0900 Subject: [PATCH] cleanup --- lib/Makefile | 2 +- lib/ext/eval.c | 1751 +++++++++++++++++++++++------------------------ lib/ext/main.c | 2 +- piclib/eval.scm | 12 +- 4 files changed, 883 insertions(+), 884 deletions(-) diff --git a/lib/Makefile b/lib/Makefile index fc48ca27..eaa40e01 100644 --- a/lib/Makefile +++ b/lib/Makefile @@ -37,7 +37,7 @@ LIBPICRIN_HEADERS = \ object.h\ state.h -CFLAGS += -I./include -Wall -Wextra -O0 -g +CFLAGS += -I./include -Wall -Wextra -g mini-picrin: libpicrin.so ext/main.o $(CC) $(CFLAGS) -o $@ libpicrin.so ext/main.o diff --git a/lib/ext/eval.c b/lib/ext/eval.c index b55c2b2d..40532de1 100644 --- a/lib/ext/eval.c +++ b/lib/ext/eval.c @@ -786,886 +786,885 @@ static const char eval_rom[][80] = { "1 . #f) 4)) (core#set!) (1 . #f) 4)) (core#quote) (1 . #f) 4)) (core#begin) (1 .", " #f) 4)) (core#lambda) (1 . #f) 4)) (core#define) (3 . #f) 4)) () (1 . #f) 5) ((", "(LOADU 0) (GSET 0 0) (GREF 0 1) (PROC 1 0) (PROC 2 1) (PROC 3 2) (CALL 3)) ((((P", -"ROC 0 0) (GSET 0 0) (LREF 0 3 1) (LOADU 1) (CALL 1)) ((((PROC 0 0) (PROC 1 1) (C", -"ALL 1)) ((((GREF 0 0) (PROC 1 0) (LREF 2 1 3) (CALL 2)) ((((LREF 0 0 1) (COND 0 ", -"64) (LREF 0 1 1) (GREF 1 0) (CALL 1) 64 (GREF 0 1) (LREF 1 1 1) (LREF 2 2 3) (CA", -"LL 2)) () (default-environment car) (1 . #f) 4)) (null?) (1 . #f) 4) (((GREF 0 0", -") (PROC 1 0) (LREF 2 1 2) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF ", -"2 0 1) (CALL 2)) ((((GREF 0 0) (LREF 1 3 1) (LREF 2 0 1) (CALL 2)) () (load) (1 ", -". #f) 4)) (compile) (1 . #f) 4)) (expand) (1 . #f) 5)) () (2 . #t) 3)) (eval) (1", -" . #f) 3) (((PROC 0 0) (LREF 1 0 1) (CALL 1)) ((((PROC 0 0) (LREF 1 0 1) (LOADF ", -"2) (LOADF 3) (LOADF 4) (LOADF 5) (LOADF 6) (LOADF 7) (LOADF 8) (CALL 8)) ((((PRO", -"C 0 0) (LSET 0 0 8) (PROC 0 1) (LSET 0 0 7) (PROC 0 2) (LSET 0 0 6) (PROC 0 3) (", -"LSET 0 0 5) (GREF 0 0) (PROC 1 4) (LOADN 2) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (", -"LREF 2 0 2) (CALL 2)) ((((GREF 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) () (car)", -" (1 . #f) 4)) (cddr) (2 . #f) 4) (((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (CALL 2)) ", -"((((GREF 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) () (cadr) (1 . #f) 4)) (cddr) ", -"(2 . #f) 4) (((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (LREF 3 0 3) (CALL 3)) ((((LREF", -" 0 0 1) (COND 0 65) (LREF 0 1 1) (LREF 1 1 3) (CALL 1) 65 (LREF 0 1 1) (LREF 1 1", -" 2) (CALL 1)) () () (1 . #f) 3)) (<) (3 . #f) 5) (((GREF 0 0) (PROC 1 0) (LREF 2", -" 0 2) (CALL 2)) ((((LREF 0 0 1) (COND 0 66) (GREF 0 0) (LREF 1 1 1) (LREF 2 1 2)", -" (CALL 2) 66 (LREF 0 1 1) (LOADF 1) (CALL 1)) () (exact?) (1 . #f) 4)) (number?)", -" (2 . #f) 4) (((PROC 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((PROC 0 0) (LREF ", -"1 0 1) (LOADF 2) (CALL 2)) ((((PROC 0 0) (LSET 0 0 2) (LREF 0 0 1) (LREF 1 0 2) ", -"(CALL 1)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (CALL 2)) ((((LREF 0 0 1) (COND ", -"0 67) (GREF 0 0) (PROC 1 0) (LREF 2 1 2) (LOADN 3) (CALL 3) 67 (GREF 0 1) (PROC ", -"1 1) (LREF 2 1 2) (CALL 2)) ((((GREF 0 0) (LREF 1 2 1) (LOAD 2 1) (LREF 3 0 1) (", -"CALL 3)) () (cons ref) (1 . #f) 5) (((GREF 0 0) (PROC 1 0) (LREF 2 0 1) (CALL 2)", -") ((((LREF 0 0 1) (COND 0 68) (GREF 0 0) (PROC 1 0) (LREF 2 3 2) (LOADN 3) (CALL", -" 3) 68 (GREF 0 1) (PROC 1 1) (LREF 2 3 2) (CALL 2)) ((((GREF 0 0) (LREF 1 4 1) (", -"LOAD 2 1) (LREF 3 0 1) (CALL 3)) () (cons quote) (1 . #f) 5) (((PROC 0 0) (LREF ", -"1 4 1) (LREF 2 0 1) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (LOAD 3 1) (", -"CALL 3)) ((((PROC 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0", -" 69) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 69 (LREF 0 0 1) (LOADF 1) (CALL 1)) () (", -") (2 . #f) 3) (((LREF 0 0 1) (COND 0 70) (GREF 0 0) (PROC 1 0) (LREF 2 7 2) (CAL", -"L 2) 70 (GREF 0 1) (PROC 1 1) (LREF 2 2 2) (LOAD 3 2) (CALL 3)) ((((GREF 0 0) (L", -"REF 1 3 1) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) () (cons quote) (1 . #f) 5) (((PROC", -" 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 71) (LREF 0 0 1)", -" (LREF 1 0 2) (CALL 1) 71 (LREF 0 0 1) (LOADF 1) (CALL 1)) () () (2 . #f) 3) (((", -"LREF 0 0 1) (COND 0 72) (GREF 0 0) (PROC 1 0) (LREF 2 9 2) (CALL 2) 72 (GREF 0 1", -") (PROC 1 1) (LREF 2 4 2) (LOAD 3 2) (CALL 3)) ((((LREF 0 14 8) (PROC 1 0) (LREF", -" 2 10 2) (CALL 2)) ((((PROC 0 0) (LREF 1 6 1) (LREF 2 1 1) (LREF 3 0 1) (CALL 3)", -") ((((LREF 0 14 2) (PROC 1 0) (CALL 1)) ((((GREF 0 0) (PROC 1 0) (LREF 2 1 2) (L", -"REF 3 0 1) (CALL 3)) ((((LREF 0 16 2) (PROC 1 0) (LREF 2 0 1) (CALL 2)) ((((LREF", -" 0 16 2) (PROC 1 0) (LREF 2 3 3) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 1)", -" (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 5 2) (LREF 3 0 1) (CALL 3)", -") ((((GREF 0 0) (LREF 1 6 1) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) () (cons set!) (1", -" . #f) 5)) (cons) (1 . #f) 5)) (cons) (1 . #f) 5)) () (1 . #f) 4)) () (1 . #f) 4", -")) (cons) (1 . #f) 5)) () (3 . #f) 3)) () (1 . #f) 5)) () (1 . #f) 4) (((PROC 0 ", -"0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 73) (LREF 0 0 1) (L", -"REF 1 0 2) (CALL 1) 73 (LREF 0 0 1) (LOADF 1) (CALL 1)) () () (2 . #f) 3) (((LRE", -"F 0 0 1) (COND 0 74) (GREF 0 0) (PROC 1 0) (LREF 2 11 2) (CALL 2) 74 (GREF 0 1) ", -"(PROC 1 1) (LREF 2 6 2) (LOAD 3 2) (CALL 3)) ((((LREF 0 16 8) (PROC 1 0) (LREF 2", -" 12 2) (CALL 2)) ((((PROC 0 0) (LREF 1 8 1) (LREF 2 1 1) (LREF 3 0 1) (CALL 3)) ", -"((((GREF 0 0) (PROC 1 0) (LREF 2 16 2) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1", -" 0) (LREF 2 0 1) (CALL 2)) ((((GREF 0 0) (LREF 1 2 1) (LREF 2 0 1) (PROC 3 0) (C", -"ALL 3)) ((((LREF 0 18 2) (PROC 1 0) (LREF 2 3 3) (CALL 2)) ((((PROC 0 0) (LREF 1", -" 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 21 2) (PROC 1 0) (CALL 1)) ((((GREF 0 0)", -" (PROC 1 0) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 1) (COND 0 75) (GREF 0 0) (PROC ", -"1 0) (LREF 2 2 2) (LOADN 3) (CALL 3) 75 (LREF 0 23 2) (PROC 1 1) (CALL 1)) ((((G", -"REF 0 0) (PROC 1 0) (LREF 2 8 2) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (LREF 1 4 ", -"1) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) () (cons lambda) (1 . #f) 5)) (cons) (1 . #", -"f) 5) (((GREF 0 0) (PROC 1 0) (LREF 2 3 2) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PR", -"OC 1 0) (LREF 2 1 1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LOAD 2 1) ", -"(LREF 3 0 1) (CALL 3)) ((((LREF 0 27 2) (PROC 1 0) (CALL 1)) ((((GREF 0 0) (PROC", -" 1 0) (PROC 2 1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 1) (L", -"OADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 3 1) (LREF 3 0 1) (CALL 3)) (", -"(((GREF 0 0) (PROC 1 0) (LREF 2 0 1) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0", -") (LREF 2 16 2) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (LREF 1 12 1) (LOAD 2 1) (L", -"REF 3 0 1) (CALL 3)) () (cons lambda) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons) (1", -" . #f) 5)) (cons) (1 . #f) 5)) (append) (1 . #f) 5) (((GREF 0 0) (PROC 1 0) (LOA", -"DF 2) (LOADN 3) (CALL 3)) ((((GREF 0 0) (LREF 1 1 1) (LOAD 2 1) (LREF 3 0 1) (CA", -"LL 3)) () (cons quote) (1 . #f) 5)) (cons) (2 . #f) 5)) (map) (1 . #f) 5)) () (1", -" . #f) 3)) (cons lambda) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons) (1 . #f) 5)) (c", -"ons) (1 . #f) 5)) (null?) (1 . #f) 4)) () (2 . #f) 3)) () (1 . #f) 4)) () (1 . #", -"f) 4)) (with-dynamic-environment) (1 . #f) 5)) (list) (1 . #f) 4)) (cons) (3 . #", -"f) 5)) () (1 . #f) 5)) () (1 . #f) 4) (((PROC 0 0) (PROC 1 1) (LREF 2 0 1) (CALL", -" 2)) ((((LREF 0 0 2) (COND 0 76) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 76 (LREF 0 0", -" 1) (LOADF 1) (CALL 1)) () () (2 . #f) 3) (((LREF 0 0 1) (COND 0 77) (GREF 0 0) ", -"(PROC 1 0) (LREF 2 13 2) (CALL 2) 77 (GREF 0 1) (PROC 1 1) (LREF 2 8 2) (LOAD 3 ", -"2) (CALL 3)) ((((LREF 0 18 8) (PROC 1 0) (LREF 2 14 2) (CALL 2)) ((((LREF 0 16 2", -") (PROC 1 0) (LREF 2 0 1) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 1) (LOADN", +"ROC 0 0) (GSET 0 0) (LREF 0 3 1) (LOADU 1) (CALL 1)) ((((GREF 0 0) (PROC 1 0) (G", +"REF 2 1) (LREF 3 0 2) (LREF 4 0 3) (CALL 4)) ((((GREF 0 0) (LREF 1 1 1) (LREF 2 ", +"0 1) (CALL 2)) () (load) (1 . #f) 4)) (apply compile) (2 . #t) 6)) (eval) (1 . #", +"f) 3) (((PROC 0 0) (LREF 1 0 1) (CALL 1)) ((((PROC 0 0) (LREF 1 0 1) (LOADF 2) (", +"LOADF 3) (LOADF 4) (LOADF 5) (LOADF 6) (LOADF 7) (LOADF 8) (CALL 8)) ((((PROC 0 ", +"0) (LSET 0 0 8) (PROC 0 1) (LSET 0 0 7) (PROC 0 2) (LSET 0 0 6) (PROC 0 3) (LSET", +" 0 0 5) (GREF 0 0) (PROC 1 4) (LOADN 2) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF", +" 2 0 2) (CALL 2)) ((((GREF 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) () (car) (1 ", +". #f) 4)) (cddr) (2 . #f) 4) (((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (CALL 2)) ((((", +"GREF 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) () (cadr) (1 . #f) 4)) (cddr) (2 .", +" #f) 4) (((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (LREF 3 0 3) (CALL 3)) ((((LREF 0 0", +" 1) (COND 0 64) (LREF 0 1 1) (LREF 1 1 3) (CALL 1) 64 (LREF 0 1 1) (LREF 1 1 2) ", +"(CALL 1)) () () (1 . #f) 3)) (<) (3 . #f) 5) (((GREF 0 0) (PROC 1 0) (LREF 2 0 2", +") (CALL 2)) ((((LREF 0 0 1) (COND 0 65) (GREF 0 0) (LREF 1 1 1) (LREF 2 1 2) (CA", +"LL 2) 65 (LREF 0 1 1) (LOADF 1) (CALL 1)) () (exact?) (1 . #f) 4)) (number?) (2 ", +". #f) 4) (((PROC 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((PROC 0 0) (LREF 1 0 ", +"1) (LOADF 2) (CALL 2)) ((((PROC 0 0) (LSET 0 0 2) (LREF 0 0 1) (LREF 1 0 2) (CAL", +"L 1)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (CALL 2)) ((((LREF 0 0 1) (COND 0 66", +") (GREF 0 0) (PROC 1 0) (LREF 2 1 2) (LOADN 3) (CALL 3) 66 (GREF 0 1) (PROC 1 1)", +" (LREF 2 1 2) (CALL 2)) ((((GREF 0 0) (LREF 1 2 1) (LOAD 2 1) (LREF 3 0 1) (CALL", +" 3)) () (cons ref) (1 . #f) 5) (((GREF 0 0) (PROC 1 0) (LREF 2 0 1) (CALL 2)) ((", +"((LREF 0 0 1) (COND 0 67) (GREF 0 0) (PROC 1 0) (LREF 2 3 2) (LOADN 3) (CALL 3) ", +"67 (GREF 0 1) (PROC 1 1) (LREF 2 3 2) (CALL 2)) ((((GREF 0 0) (LREF 1 4 1) (LOAD", +" 2 1) (LREF 3 0 1) (CALL 3)) () (cons quote) (1 . #f) 5) (((PROC 0 0) (LREF 1 4 ", +"1) (LREF 2 0 1) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (LOAD 3 1) (CALL", +" 3)) ((((PROC 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 68)", +" (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 68 (LREF 0 0 1) (LOADF 1) (CALL 1)) () () (2", +" . #f) 3) (((LREF 0 0 1) (COND 0 69) (GREF 0 0) (PROC 1 0) (LREF 2 7 2) (CALL 2)", +" 69 (GREF 0 1) (PROC 1 1) (LREF 2 2 2) (LOAD 3 2) (CALL 3)) ((((GREF 0 0) (LREF ", +"1 3 1) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) () (cons quote) (1 . #f) 5) (((PROC 0 0", +") (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 70) (LREF 0 0 1) (LR", +"EF 1 0 2) (CALL 1) 70 (LREF 0 0 1) (LOADF 1) (CALL 1)) () () (2 . #f) 3) (((LREF", +" 0 0 1) (COND 0 71) (GREF 0 0) (PROC 1 0) (LREF 2 9 2) (CALL 2) 71 (GREF 0 1) (P", +"ROC 1 1) (LREF 2 4 2) (LOAD 3 2) (CALL 3)) ((((LREF 0 14 8) (PROC 1 0) (LREF 2 1", +"0 2) (CALL 2)) ((((PROC 0 0) (LREF 1 6 1) (LREF 2 1 1) (LREF 3 0 1) (CALL 3)) ((", +"((LREF 0 14 2) (PROC 1 0) (CALL 1)) ((((GREF 0 0) (PROC 1 0) (LREF 2 1 2) (LREF ", +"3 0 1) (CALL 3)) ((((LREF 0 16 2) (PROC 1 0) (LREF 2 0 1) (CALL 2)) ((((LREF 0 1", +"6 2) (PROC 1 0) (LREF 2 3 3) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 1) (LO", +"ADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 5 2) (LREF 3 0 1) (CALL 3)) ((", +"((GREF 0 0) (LREF 1 6 1) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) () (cons set!) (1 . #", +"f) 5)) (cons) (1 . #f) 5)) (cons) (1 . #f) 5)) () (1 . #f) 4)) () (1 . #f) 4)) (", +"cons) (1 . #f) 5)) () (3 . #f) 3)) () (1 . #f) 5)) () (1 . #f) 4) (((PROC 0 0) (", +"PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 72) (LREF 0 0 1) (LREF ", +"1 0 2) (CALL 1) 72 (LREF 0 0 1) (LOADF 1) (CALL 1)) () () (2 . #f) 3) (((LREF 0 ", +"0 1) (COND 0 73) (GREF 0 0) (PROC 1 0) (LREF 2 11 2) (CALL 2) 73 (GREF 0 1) (PRO", +"C 1 1) (LREF 2 6 2) (LOAD 3 2) (CALL 3)) ((((LREF 0 16 8) (PROC 1 0) (LREF 2 12 ", +"2) (CALL 2)) ((((PROC 0 0) (LREF 1 8 1) (LREF 2 1 1) (LREF 3 0 1) (CALL 3)) ((((", +"GREF 0 0) (PROC 1 0) (LREF 2 16 2) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) ", +"(LREF 2 0 1) (CALL 2)) ((((GREF 0 0) (LREF 1 2 1) (LREF 2 0 1) (PROC 3 0) (CALL ", +"3)) ((((LREF 0 18 2) (PROC 1 0) (LREF 2 3 3) (CALL 2)) ((((PROC 0 0) (LREF 1 1 1", +") (LREF 2 0 1) (CALL 2)) ((((LREF 0 21 2) (PROC 1 0) (CALL 1)) ((((GREF 0 0) (PR", +"OC 1 0) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 1) (COND 0 74) (GREF 0 0) (PROC 1 0)", +" (LREF 2 2 2) (LOADN 3) (CALL 3) 74 (LREF 0 23 2) (PROC 1 1) (CALL 1)) ((((GREF ", +"0 0) (PROC 1 0) (LREF 2 8 2) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (LREF 1 4 1) (", +"LOAD 2 1) (LREF 3 0 1) (CALL 3)) () (cons lambda) (1 . #f) 5)) (cons) (1 . #f) 5", +") (((GREF 0 0) (PROC 1 0) (LREF 2 3 2) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1", +" 0) (LREF 2 1 1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LOAD 2 1) (LRE", +"F 3 0 1) (CALL 3)) ((((LREF 0 27 2) (PROC 1 0) (CALL 1)) ((((GREF 0 0) (PROC 1 0", +") (PROC 2 1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 1) (LOADN", " 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 3 1) (LREF 3 0 1) (CALL 3)) ((((G", -"REF 0 0) (LREF 1 13 1) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) () (cons set!) (1 . #f)", -" 5)) (cons) (1 . #f) 5)) (cons) (1 . #f) 5)) () (1 . #f) 4)) () (1 . #f) 4) (((P", -"ROC 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 78) (LREF 0 0", -" 1) (LREF 1 0 2) (CALL 1) 78 (LREF 0 0 1) (LOADF 1) (CALL 1)) () () (2 . #f) 3) ", -"(((LREF 0 0 1) (COND 0 79) (GREF 0 0) (PROC 1 0) (LREF 2 15 2) (CALL 2) 79 (GREF", -" 0 1) (PROC 1 1) (LREF 2 10 2) (LOAD 3 2) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LR", -"EF 2 17 2) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (LREF 1 12 1) (LOAD 2 1) (LREF 3", -" 0 1) (CALL 3)) () (cons if) (1 . #f) 5)) (map) (1 . #f) 5) (((PROC 0 0) (PROC 1", -" 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 80) (LREF 0 0 1) (LREF 1 0 2)", -" (CALL 1) 80 (LREF 0 0 1) (LOADF 1) (CALL 1)) () () (2 . #f) 3) (((LREF 0 0 1) (", -"COND 0 81) (GREF 0 0) (PROC 1 0) (LREF 2 17 2) (CALL 2) 81 (LOADT 0) (COND 0 82)", -" (GREF 0 1) (LREF 1 12 1) (LREF 2 18 2) (LREF 3 17 2) (CALL 3) 82 (LREF 0 12 1) ", -"(LOADU 1) (CALL 1)) ((((GREF 0 0) (PROC 1 0) (LREF 2 19 2) (LREF 3 0 1) (CALL 3)", -") ((((GREF 0 0) (LREF 1 14 1) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) () (cons begin) ", -"(1 . #f) 5)) (map) (1 . #f) 5)) (cdr map) (1 . #f) 5)) () (1 . #f) 4)) (cdr eqv?", -" core#begin) (1 . #f) 5)) () (1 . #f) 4)) (cadr eqv? core#if) (1 . #f) 5)) () (1", -" . #f) 4)) (cadr eqv? core#set!) (1 . #f) 5)) () (1 . #f) 4)) (cadr eqv? core#la", -"mbda) (1 . #f) 5)) () (1 . #f) 4)) (cdr eqv? core#define) (1 . #f) 5)) () (1 . #", -"f) 4)) (eqv? core#quote) (2 . #f) 5)) () (1 . #f) 4)) (cons car) (1 . #f) 5)) (n", -"ot) (1 . #f) 4)) (cons pair?) (1 . #f) 5)) (symbol?) (2 . #f) 4)) () (2 . #f) 3)", -") () (2 . #f) 4) (((LREF 0 0 1) (LSET 0 2 4) (PROC 0 0) (PROC 1 1) (CALL 1)) (((", -"(PROC 0 0) (LREF 1 0 1) (LOADF 2) (LOADF 3) (LOADF 4) (LOADF 5) (LOADF 6) (CALL ", -"6)) ((((PROC 0 0) (PROC 1 1) (LOADI 2 0) (CALL 2)) ((((LREF 0 0 1) (PROC 1 0) (C", -"ALL 1)) ((((GREF 0 0) (PROC 1 0) (LREF 2 1 2) (LOADI 3 1) (CALL 3)) ((((LREF 0 0", -" 1) (LSET 0 2 2) (GREF 0 0) (PROC 1 0) (LREF 2 2 2) (CALL 2)) ((((GREF 0 0) (PRO", -"C 1 0) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (LREF 1 3 1) (LREF 2 0 1)", -" (CALL 2)) () (string->symbol) (1 . #f) 4)) (string-append \"$\") (1 . #f) 5)) (nu", -"mber->string) (1 . #f) 4)) (+) (1 . #f) 5)) () (2 . #f) 3) (((LREF 0 0 1) (LSET ", -"0 1 6) (PROC 0 0) (LSET 0 1 5) (PROC 0 1) (LSET 0 1 4) (PROC 0 2) (LSET 0 1 3) (", -"PROC 0 3) (LSET 0 1 2) (LREF 0 1 1) (PROC 1 4) (CALL 1)) ((((GREF 0 0) (PROC 1 0", -") (LREF 2 0 2) (CALL 2)) ((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ((((G", -"REF 0 0) (PROC 1 0) (LREF 2 0 2) (LOAD 3 1) (CALL 3)) ((((PROC 0 0) (PROC 1 1) (", -"LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 83) (LREF 0 0 1) (LREF 1 0 2) (CAL", -"L 1) 83 (GREF 0 0) (PROC 1 0) (LREF 2 2 2) (LOAD 3 1) (CALL 3)) ((((PROC 0 0) (L", -"REF 1 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 84) (LREF 0 0 1) (LREF", -" 1 0 2) (CALL 1) 84 (GREF 0 0) (PROC 1 0) (LREF 2 4 2) (LOAD 3 1) (CALL 3)) ((((", -"PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 85) (LREF ", -"0 0 1) (LREF 1 0 2) (CALL 1) 85 (LREF 0 0 1) (LOADF 1) (CALL 1)) () () (2 . #f) ", -"3)) () (1 . #f) 4)) (eqv? quote) (2 . #f) 5)) () (1 . #f) 4)) (eqv? lambda) (2 .", -" #f) 5) (((LREF 0 0 1) (COND 0 86) (LREF 0 6 2) (PROC 1 0) (LREF 2 4 2) (CALL 2)", -" 86 (GREF 0 0) (PROC 1 1) (LREF 2 2 2) (LOAD 3 1) (CALL 3)) ((((LREF 0 5 3) (LRE", -"F 1 3 1) (LREF 2 0 1) (CALL 2)) () () (1 . #f) 4) (((PROC 0 0) (PROC 1 1) (LREF ", -"2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 87) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) ", -"87 (LREF 0 0 1) (LOADF 1) (CALL 1)) () () (2 . #f) 3) (((LREF 0 0 1) (COND 0 88)", -" (GREF 0 0) (PROC 1 0) (LREF 2 6 2) (CALL 2) 88 (GREF 0 1) (PROC 1 1) (LREF 2 4 ", -"2) (LOAD 3 2) (CALL 3)) ((((LREF 0 9 5) (LREF 1 5 1) (LREF 2 0 1) (PROC 3 0) (CA", -"LL 3)) ((((LREF 0 14 8) (PROC 1 0) (LREF 2 8 2) (CALL 2)) ((((LREF 0 11 5) (LREF", -" 1 1 1) (LREF 2 0 1) (LREF 3 9 3) (CALL 3)) () () (1 . #f) 5)) () (2 . #f) 4)) (", -") (1 . #f) 5) (((PROC 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (CO", -"ND 0 89) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 89 (LREF 0 0 1) (LOADF 1) (CALL 1)) ", -"() () (2 . #f) 3) (((LREF 0 0 1) (COND 0 90) (LREF 0 14 8) (PROC 1 0) (LREF 2 8 ", -"2) (CALL 2) 90 (GREF 0 0) (PROC 1 1) (LREF 2 6 2) (LOAD 3 1) (CALL 3)) ((((LREF ", -"0 11 5) (LREF 1 7 1) (LREF 2 0 1) (PROC 3 0) (CALL 3)) ((((GREF 0 0) (PROC 1 0) ", -"(LREF 2 10 2) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LOAD 2 1) (LOADN 3) (CALL 3)) ", -"((((LREF 0 12 3) (PROC 1 0) (LREF 2 0 1) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LRE", -"F 2 0 1) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 4 2) (LREF 3 0 1) ", -"(CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 4 1) (LREF 3 0 1) (CALL 3)) ((((GREF ", -"0 0) (LREF 1 6 1) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) () (cons set!) (1 . #f) 5)) ", -"(cons) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons) (1 . #f) 5)) () (1 . #f) 4)) (con", -"s undefined) (1 . #f) 5)) (cadr) (2 . #f) 4)) () (1 . #f) 5) (((PROC 0 0) (PROC ", -"1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 91) (LREF 0 0 1) (LREF 1 0 2", -") (CALL 1) 91 (LREF 0 0 1) (LOADF 1) (CALL 1)) () () (2 . #f) 3) (((LREF 0 0 1) ", -"(COND 0 92) (LREF 0 12 6) (PROC 1 0) (CALL 1) 92 (LOADT 0) (COND 0 93) (LREF 0 1", -"2 6) (PROC 1 1) (CALL 1) 93 (LREF 0 8 1) (LOADU 1) (CALL 1)) ((((LREF 0 13 6) (P", -"ROC 1 0) (CALL 1)) ((((PROC 0 0) (LREF 1 10 1) (LREF 2 1 1) (LREF 3 0 1) (CALL 3", -")) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 3) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC", -" 1 0) (LREF 2 14 2) (CALL 2)) ((((LREF 0 17 5) (PROC 1 0) (LREF 2 0 1) (PROC 3 1", -") (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 1) (LOADN 3) (CALL 3)) ((((GREF 0", -" 0) (PROC 1 0) (LREF 2 3 1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LOA", -"D 2 1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 6 2) (LOADN 3) (C", -"ALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 7 2) (LOADN 3) (CALL 3)) ((((GREF 0 0) ", -"(PROC 1 0) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) ((((LREF 0 22 3) (PROC 1 0) (LREF 2", -" 0 1) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 1) (LOADN 3) (CALL 3)) ((((GR", -"EF 0 0) (PROC 1 0) (LREF 2 4 1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) ", -"(LOAD 2 1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 1) (LOADN 3", -") (CALL 3)) ((((GREF 0 0) (LREF 1 14 1) (LREF 2 8 1) (LREF 3 0 1) (CALL 3)) () (", -"cons) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons lambda) (1 . #f) 5)) (cons) (1 . #f", -") 5)) (cons) (1 . #f) 5)) () (1 . #f) 4)) (cons ref) (1 . #f) 5)) (cons) (1 . #f", -") 5)) (cons) (1 . #f) 5)) (cons lambda) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons) ", -"(1 . #f) 5) (((LREF 0 22 8) (PROC 1 0) (LREF 2 16 2) (CALL 2)) ((((GREF 0 0) (PR", -"OC 1 0) (LREF 2 4 3) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LOAD 2 1) (LR", -"EF 3 0 1) (CALL 3)) ((((LREF 0 21 3) (PROC 1 0) (LREF 2 2 1) (LREF 3 0 1) (CALL ", -"3)) ((((LREF 0 26 7) (PROC 1 0) (LREF 2 20 2) (CALL 2)) ((((GREF 0 0) (PROC 1 0)", -" (LREF 2 8 3) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LOAD 2 1) (LREF 3 0 ", -"1) (CALL 3)) ((((LREF 0 25 3) (PROC 1 0) (LREF 2 2 1) (LREF 3 0 1) (CALL 3)) (((", -"(GREF 0 0) (PROC 1 0) (LREF 2 0 1) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) ", -"(LREF 2 5 1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 10 2) (LREF", -" 3 0 1) (CALL 3)) ((((GREF 0 0) (LREF 1 11 1) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) ", -"() (cons if) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons) (1 . #f", -") 5)) () (1 . #f) 5)) (cons ref) (1 . #f) 5)) (cons) (1 . #f) 5)) () (1 . #f) 4)", -") () (1 . #f) 5)) (cons ref) (1 . #f) 5)) (cons) (1 . #f) 5)) () (2 . #f) 4)) ()", -" (1 . #f) 5)) (cadr) (1 . #f) 4)) (cons) (3 . #f) 5)) () (1 . #f) 5)) () (1 . #f", -") 3) (((PROC 0 0) (LREF 1 9 1) (LREF 2 0 1) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (", -"LREF 2 0 2) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 1 2) (LOADN 3) ", -"(CALL 3)) ((((GREF 0 0) (PROC 1 0) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) ((((LREF 0 ", -"15 3) (PROC 1 0) (LREF 2 0 1) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 1) (L", -"OADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 4 1) (LREF 3 0 1) (CALL 3)) (", -"(((GREF 0 0) (PROC 1 0) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) ((((PROC 0 0) (LREF 1 ", -"7 1) (LREF 2 0 1) (CALL 2)) ((((PROC 0 0) (LREF 1 0 1) (CALL 1)) ((((GREF 0 0) (", -"PROC 1 0) (LREF 2 21 2) (CALL 2)) ((((LREF 0 24 5) (LREF 1 1 1) (LREF 2 0 1) (PR", -"OC 3 0) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 23 2) (CALL 2)) ((((LREF 0 26", -" 4) (LREF 1 1 1) (LREF 2 0 1) (PROC 3 0) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LRE", -"F 2 0 2) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 6 2) (LREF 3 0 1) ", -"(CALL 3)) ((((GREF 0 0) (LREF 1 2 1) (LREF 2 4 2) (LREF 3 0 1) (CALL 3)) () (con", -"s) (1 . #f) 5)) (cons) (1 . #f) 5)) (append) (2 . #f) 5)) () (1 . #f) 5)) (cdr) ", -"(2 . #f) 4)) () (1 . #f) 5)) (car) (1 . #f) 4)) () (2 . #f) 3)) () (1 . #f) 4)) ", -"(cons lambda) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons) (1 . #f) 5)) () (1 . #f) 4", -")) (cons ref) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons) (2 . #f) 5)) () (1 . #f) 4", -")) () (1 . #f) 3)) () (1 . #f) 4)) (eqv? if) (1 . #f) 5)) () (1 . #f) 4)) (cadr ", -"eqv? set!) (1 . #f) 5)) () (1 . #f) 4)) (eqv? begin) (1 . #f) 5)) () (1 . #f) 4)", -") (eqv? ref) (2 . #f) 5)) () (1 . #f) 4)) (car) (3 . #f) 4) (((GREF 0 0) (PROC 1", -" 0) (LREF 2 0 2) (CALL 2)) ((((LREF 0 0 1) (COND 0 94) (LREF 0 1 3) (LREF 1 1 1)", -" (LOADN 2) (CALL 2) 94 (GREF 0 0) (PROC 1 0) (LREF 2 1 2) (CALL 2)) ((((LREF 0 4", -" 5) (LREF 1 2 1) (LREF 2 0 1) (PROC 3 0) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LRE", -"F 2 3 2) (CALL 2)) ((((LREF 0 6 4) (LREF 1 1 1) (LREF 2 0 1) (PROC 3 0) (CALL 3)", -") ((((GREF 0 0) (PROC 1 0) (LREF 2 2 2) (LREF 3 0 2) (CALL 3)) ((((LREF 0 6 3) (", -"LREF 1 1 1) (LREF 2 0 1) (CALL 2)) () () (1 . #f) 4)) (cons) (2 . #f) 5)) () (1 ", -". #f) 5)) (cdr) (2 . #f) 4)) () (1 . #f) 5)) (car) (1 . #f) 4)) (null?) (3 . #f)", -" 4) (((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (CALL 2)) ((((PROC 0 0) (LREF 1 1 1) (L", -"REF 2 0 1) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (LOAD 3 1) (CALL 3)) ", -"((((PROC 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 95) (LRE", -"F 0 0 1) (LREF 1 0 2) (CALL 1) 95 (GREF 0 0) (PROC 1 0) (LREF 2 2 2) (LOAD 3 1) ", -"(CALL 3)) ((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (CON", -"D 0 96) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 96 (GREF 0 0) (PROC 1 0) (LREF 2 4 2)", -" (LOAD 3 1) (CALL 3)) ((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF", -" 0 0 2) (COND 0 97) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 97 (LREF 0 0 1) (LOADF 1)", -" (CALL 1)) () () (2 . #f) 3)) () (1 . #f) 4)) (eqv? quote) (2 . #f) 5)) () (1 . ", -"#f) 4)) (eqv? lambda) (2 . #f) 5) (((LREF 0 0 1) (COND 0 98) (LREF 0 6 2) (PROC ", -"1 0) (LREF 2 4 2) (CALL 2) 98 (GREF 0 0) (PROC 1 1) (LREF 2 2 2) (LOAD 3 1) (CAL", -"L 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 1) (LOADN 3) (CALL 3)) ((((GREF 0 0) (L", -"REF 1 4 1) (LREF 2 6 3) (LREF 3 0 1) (CALL 3)) () (cons) (1 . #f) 5)) (cons) (1 ", -". #f) 5) (((PROC 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 ", -"99) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 99 (LREF 0 0 1) (LOADF 1) (CALL 1)) () ()", -" (2 . #f) 3) (((LREF 0 0 1) (COND 0 100) (GREF 0 0) (PROC 1 0) (LREF 2 6 2) (CAL", -"L 2) 100 (GREF 0 1) (PROC 1 1) (LREF 2 4 2) (LOAD 3 2) (CALL 3)) ((((LREF 0 9 5)", -" (LREF 1 5 1) (LREF 2 0 1) (PROC 3 0) (CALL 3)) ((((LREF 0 14 8) (PROC 1 0) (LRE", -"F 2 8 2) (CALL 2)) ((((LREF 0 11 3) (LREF 1 1 1) (LREF 2 0 1) (LREF 3 9 3) (CALL", -" 3)) () () (1 . #f) 5)) () (2 . #f) 4)) () (1 . #f) 5) (((PROC 0 0) (PROC 1 1) (", -"LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 101) (LREF 0 0 1) (LREF 1 0 2) (CA", -"LL 1) 101 (LREF 0 0 1) (LOADF 1) (CALL 1)) () () (2 . #f) 3) (((LREF 0 0 1) (CON", -"D 0 102) (LREF 0 14 8) (PROC 1 0) (LREF 2 8 2) (CALL 2) 102 (GREF 0 0) (PROC 1 1", -") (LREF 2 6 2) (LOAD 3 1) (CALL 3)) ((((LREF 0 11 5) (LREF 1 7 1) (LREF 2 0 1) (", -"PROC 3 0) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 10 2) (CALL 2)) ((((GREF 0 ", -"0) (PROC 1 0) (LOAD 2 1) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 ", -"1) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 13 3) (LREF 3 0 1) (CALL", -" 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 1) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PR", -"OC 1 0) (LREF 2 5 2) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 5 1", -") (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (LREF 1 7 1) (LOAD 2 1) (LREF 3 0 1) (CAL", -"L 3)) () (cons set!) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons)", -" (1 . #f) 5)) (cons) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons undefined) (1 . #f) ", -"5)) (cadr) (2 . #f) 4)) () (1 . #f) 5) (((PROC 0 0) (PROC 1 1) (LREF 2 0 1) (CAL", -"L 2)) ((((LREF 0 0 2) (COND 0 103) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 103 (LREF ", -"0 0 1) (LOADF 1) (CALL 1)) () () (2 . #f) 3) (((LREF 0 0 1) (COND 0 104) (PROC 0", -" 0) (PROC 1 1) (CALL 1) 104 (LOADT 0) (COND 0 107) (GREF 0 0) (PROC 1 2) (LREF 2", -" 10 2) (CALL 2) 107 (LREF 0 8 1) (LOADU 1) (CALL 1)) ((((GREF 0 0) (PROC 1 0) (L", -"REF 2 11 3) (CALL 2)) ((((LREF 0 0 1) (COND 0 105) (GREF 0 0) (PROC 1 0) (LREF 2", -" 12 3) (CALL 2) 105 (LREF 0 1 1) (LOADF 1) (CALL 1)) ((((GREF 0 0) (LREF 1 2 1) ", -"(LOAD 2 1) (LREF 3 0 1) (CALL 3)) () (eq? lambda) (1 . #f) 5)) (car) (1 . #f) 4)", -") (pair?) (1 . #f) 4) (((LREF 0 0 1) (COND 0 106) (LREF 0 13 6) (PROC 1 0) (CALL", -" 1) 106 (GREF 0 0) (PROC 1 1) (LREF 2 11 2) (CALL 2)) ((((PROC 0 0) (LREF 1 10 1", -") (LREF 2 0 1) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (LOADN 3) (CALL 3", -")) ((((GREF 0 0) (PROC 1 0) (LREF 2 14 2) (CALL 2)) ((((LREF 0 17 5) (PROC 1 0) ", -"(LREF 2 0 1) (PROC 3 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 1) (LOADN 3", -") (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 3 1) (LREF 3 0 1) (CALL 3)) ((((GRE", -"F 0 0) (PROC 1 0) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LR", -"EF 2 19 3) (LOADN 3) (CALL 3)) ((((GREF 0 0) (LREF 1 7 1) (LREF 2 1 1) (LREF 3 0", -" 1) (CALL 3)) () (cons) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons lambda) (1 . #f) ", -"5)) (cons) (1 . #f) 5)) (cons) (1 . #f) 5) (((LREF 0 22 8) (PROC 1 0) (LREF 2 16", -" 2) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 4 2) (LOADN 3) (CALL 3)) ((((GREF", -" 0 0) (PROC 1 0) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) ((((LREF 0 21 3) (PROC 1 0) (", -"LREF 2 2 1) (LREF 3 0 1) (CALL 3)) ((((LREF 0 26 7) (PROC 1 0) (LREF 2 20 2) (CA", -"LL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 8 2) (LOADN 3) (CALL 3)) ((((GREF 0 0) (", -"PROC 1 0) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) ((((LREF 0 25 3) (PROC 1 0) (LREF 2 ", -"2 1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 1) (LOADN 3) (CAL", -"L 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 5 1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0)", -" (PROC 1 0) (LREF 2 10 2) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (LREF 1 11 1) (LO", -"AD 2 1) (LREF 3 0 1) (CALL 3)) () (cons if) (1 . #f) 5)) (cons) (1 . #f) 5)) (co", -"ns) (1 . #f) 5)) (cons) (1 . #f) 5)) () (1 . #f) 5)) (cons ref) (1 . #f) 5)) (co", -"ns) (1 . #f) 5)) () (1 . #f) 4)) () (1 . #f) 5)) (cons ref) (1 . #f) 5)) (cons) ", -"(1 . #f) 5)) () (2 . #f) 4)) () (1 . #f) 5)) (cadr) (1 . #f) 4)) (cons) (2 . #f)", -" 5)) () (1 . #f) 4) (((LREF 0 14 5) (LREF 1 10 1) (LREF 2 0 1) (PROC 3 0) (CALL ", -"3)) ((((LREF 0 19 8) (PROC 1 0) (LREF 2 13 2) (CALL 2)) ((((LREF 0 16 3) (PROC 1", -" 0) (LREF 2 0 1) (LREF 3 14 3) (CALL 3)) ((((LREF 0 21 7) (PROC 1 0) (LREF 2 15 ", -"2) (CALL 2)) ((((LREF 0 18 3) (PROC 1 0) (LREF 2 0 1) (LREF 3 16 3) (CALL 3)) ((", -"((GREF 0 0) (PROC 1 0) (LREF 2 0 1) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0)", -" (LREF 2 3 1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 6 2) (LREF", -" 3 0 1) (CALL 3)) ((((GREF 0 0) (LREF 1 7 1) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) (", -") (cons if) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons) (1 . #f)", -" 5)) () (1 . #f) 5)) () (1 . #f) 4)) () (1 . #f) 5)) () (2 . #f) 4)) () (1 . #f)", -" 5)) (cadr) (1 . #f) 4) (((LREF 0 13 5) (LREF 1 9 1) (LREF 2 0 1) (PROC 3 0) (CA", -"LL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 12 2) (CALL 2)) ((((LREF 0 15 4) (LREF 1", -" 1 1) (LREF 2 0 1) (PROC 3 0) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (L", -"OADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 15 3) (LREF 3 0 1) (CALL 3)) ", -"((((GREF 0 0) (LREF 1 2 1) (LREF 2 4 2) (LREF 3 0 1) (CALL 3)) () (cons) (1 . #f", -") 5)) (cons) (1 . #f) 5)) (append) (2 . #f) 5)) () (1 . #f) 5)) (cdr) (2 . #f) 4", -")) () (1 . #f) 5)) (car) (1 . #f) 4)) () (1 . #f) 4)) (eqv? if) (1 . #f) 5)) () ", -"(1 . #f) 4)) (cadr eqv? set!) (1 . #f) 5)) () (1 . #f) 4)) (eqv? begin) (1 . #f)", -" 5)) () (1 . #f) 4)) (eqv? ref) (2 . #f) 5)) () (1 . #f) 4)) (car) (3 . #f) 4) (", -"((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (CALL 2)) ((((PROC 0 0) (LREF 1 1 1) (LREF 2", -" 0 1) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (LOAD 3 1) (CALL 3)) ((((P", -"ROC 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 108) (LREF 0 ", -"0 1) (LREF 1 0 2) (CALL 1) 108 (GREF 0 0) (PROC 1 0) (LREF 2 2 2) (LOAD 3 1) (CA", -"LL 3)) ((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0", -" 109) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 109 (LREF 0 0 1) (LOADF 1) (CALL 1)) ()", -" () (2 . #f) 3)) () (1 . #f) 4)) (eqv? quote) (2 . #f) 5) (((LREF 0 0 1) (COND 0", -" 110) (LREF 0 2 1) (LREF 1 4 2) (CALL 1) 110 (GREF 0 0) (PROC 1 0) (LREF 2 2 2) ", -"(LOAD 3 1) (CALL 3)) ((((PROC 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 ", -"0 2) (COND 0 111) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 111 (LREF 0 0 1) (LOADF 1) ", -"(CALL 1)) () () (2 . #f) 3) (((LREF 0 0 1) (COND 0 112) (LREF 0 8 6) (PROC 1 0) ", -"(CALL 1) 112 (LREF 0 4 1) (LOADU 1) (CALL 1)) ((((PROC 0 0) (LREF 1 5 1) (LREF 2", -" 0 1) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 8 2) (CALL 2)) ((((GREF 0 0) (P", -"ROC 1 0) (LREF 2 1 2) (LREF 3 0 1) (CALL 3)) ((((LREF 0 16 8) (PROC 1 0) (LREF 2", -" 10 2) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 3 2) (LOADN 3) (CALL 3)) ((((G", -"REF 0 0) (PROC 1 0) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) ((((LREF 0 15 3) (PROC 1 0", -") (LREF 2 2 1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 1) (LOA", -"DN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 5 1) (LREF 3 0 1) (CALL 3)) (((", -"(GREF 0 0) (LREF 1 8 1) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) () (cons lambda) (1 . ", -"#f) 5)) (cons) (1 . #f) 5)) (cons) (1 . #f) 5)) () (1 . #f) 5)) (cons ref) (1 . ", -"#f) 5)) (cons) (1 . #f) 5)) () (1 . #f) 4)) (cons) (1 . #f) 5)) (cadr) (2 . #f) ", -"4)) () (1 . #f) 4)) () (1 . #f) 3)) () (1 . #f) 4)) (eqv? lambda) (1 . #f) 5)) (", -") (1 . #f) 4)) (eqv? ref) (2 . #f) 5)) () (1 . #f) 4)) (car) (2 . #f) 4) (((LREF", -" 0 2 6) (PROC 1 0) (CALL 1)) ((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) (", -"(((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0", -") (LREF 2 1 2) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LOAD 2 1) (LREF 3 0", -" 1) (CALL 3)) ((((LREF 0 7 3) (PROC 1 0) (LREF 2 5 2) (LREF 3 0 1) (CALL 3)) (((", -"(GREF 0 0) (PROC 1 0) (LREF 2 0 1) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) ", -"(LREF 2 4 1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (LREF 1 6 1) (LOAD 2 1) (LREF ", +"REF 0 0) (PROC 1 0) (LREF 2 0 1) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (L", +"REF 2 16 2) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (LREF 1 12 1) (LOAD 2 1) (LREF ", "3 0 1) (CALL 3)) () (cons lambda) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons) (1 . #", -"f) 5)) () (1 . #f) 5)) (cons ref) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons) (2 . #", -"f) 5)) () (1 . #f) 4)) () (2 . #f) 3)) () (1 . #f) 3)) () (6 . #f) 4)) () (1 . #", -"f) 8) (((LREF 0 0 1) (LSET 0 3 3) (PROC 0 0) (PROC 1 1) (CALL 1)) ((((PROC 0 0) ", -"(LREF 1 0 1) (LOADF 2) (LOADF 3) (LOADF 4) (LOADF 5) (LOADF 6) (LOADF 7) (LOADF ", -"8) (LOADF 9) (LOADF 10) (LOADF 11) (LOADF 12) (LOADF 13) (CALL 13)) ((((PROC 0 0", -") (LSET 0 0 13) (GREF 0 0) (PROC 1 1) (LOADN 2) (CALL 2)) ((((PROC 0 0) (LREF 1 ", -"0 1) (CALL 1)) ((((PROC 0 0) (LREF 1 0 1) (LOADF 2) (CALL 2)) ((((PROC 0 0) (LSE", -"T 0 0 2) (LREF 0 0 2) (LREF 1 0 1) (LOADI 2 0) (LREF 3 2 3) (CALL 3)) ((((GREF 0", -" 0) (PROC 1 0) (LREF 2 0 3) (CALL 2)) ((((LREF 0 0 1) (COND 0 113) (GREF 0 0) (P", -"ROC 1 0) (LREF 2 4 2) (LOADN 3) (CALL 3) 113 (PROC 0 1) (LREF 1 1 1) (CALL 1)) (", -"(((GREF 0 0) (LREF 1 2 1) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) () (cons global) (1 ", -". #f) 5) (((PROC 0 0) (LREF 1 0 1) (LOADF 2) (CALL 2)) ((((PROC 0 0) (LSET 0 0 2", -") (GREF 0 0) (PROC 1 1) (LREF 2 3 3) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 ", -"0 3) (CALL 2)) ((((LREF 0 0 1) (COND 0 114) (GREF 0 0) (PROC 1 0) (LREF 2 8 2) (", -"LREF 3 1 3) (CALL 3) 114 (GREF 0 1) (PROC 1 1) (LREF 2 1 3) (CALL 2)) ((((LREF 0", -" 0 1) (COND 0 115) (GREF 0 0) (PROC 1 0) (LREF 2 2 2) (LOADN 3) (CALL 3) 115 (GR", -"EF 0 1) (PROC 1 1) (LREF 2 6 2) (LOADI 3 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (", -"LREF 2 7 2) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (LREF 1 4 1) (LOAD 2 1) (LREF 3", -" 0 1) (CALL 3)) () (cons local) (1 . #f) 5)) (cons) (1 . #f) 5) (((GREF 0 0) (PR", -"OC 1 0) (LREF 2 7 3) (CALL 2)) ((((LREF 0 9 2) (LREF 1 4 1) (LREF 2 1 1) (LREF 3", -" 0 1) (CALL 3)) () () (1 . #f) 5)) (cdr) (1 . #f) 4)) (cons +) (1 . #f) 5) (((LR", -"EF 0 0 1) (COND 0 116) (GREF 0 0) (PROC 1 0) (LREF 2 6 2) (LOADI 3 1) (CALL 3) 1", -"16 (GREF 0 1) (PROC 1 1) (LREF 2 2 3) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2", -" 7 3) (CALL 2)) ((((LREF 0 9 2) (LREF 1 4 1) (LREF 2 1 1) (LREF 3 0 1) (CALL 3))", -" () () (1 . #f) 5)) (cdr) (1 . #f) 4) (((GREF 0 0) (PROC 1 0) (LREF 2 10 2) (LRE", -"F 3 0 1) (CALL 3)) ((((LREF 0 0 1) (COND 0 117) (GREF 0 0) (PROC 1 0) (LREF 2 4 ", -"2) (LOADN 3) (CALL 3) 117 (GREF 0 1) (PROC 1 1) (LREF 2 4 2) (LOADI 3 1) (CALL 3", -")) ((((GREF 0 0) (PROC 1 0) (LREF 2 9 2) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (L", -"REF 1 6 1) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) () (cons local) (1 . #f) 5)) (cons)", -" (1 . #f) 5) (((GREF 0 0) (PROC 1 0) (LREF 2 5 3) (CALL 2)) ((((LREF 0 7 2) (LRE", -"F 1 6 1) (LREF 2 1 1) (LREF 3 0 1) (CALL 3)) () () (1 . #f) 5)) (cdr) (1 . #f) 4", -")) (cons +) (1 . #f) 5)) (eq?) (1 . #f) 5)) (+ car) (1 . #f) 5)) (eq? null?) (1 ", -". #f) 5)) (symbol?) (3 . #f) 4) (((LREF 0 1 2) (LREF 1 1 1) (LOADI 2 1) (LREF 3 ", -"0 1) (CALL 3)) () () (1 . #f) 5)) (car) (2 . #f) 4)) () (1 . #f) 4)) (cons) (1 .", -" #f) 5)) (null?) (3 . #f) 4)) () (2 . #f) 5)) () (1 . #f) 4)) () (3 . #f) 3) (((", -"LREF 0 0 1) (LSET 0 1 12) (GREF 0 0) (PROC 1 0) (LOADN 2) (CALL 2)) ((((LREF 0 0", -" 1) (LSET 0 2 11) (GREF 0 0) (PROC 1 0) (LOADN 2) (CALL 2)) ((((LREF 0 0 1) (LSE", -"T 0 3 10) (GREF 0 0) (PROC 1 0) (LOADN 2) (CALL 2)) ((((LREF 0 0 1) (LSET 0 4 9)", -" (PROC 0 0) (LSET 0 4 8) (PROC 0 1) (LSET 0 4 7) (PROC 0 2) (LSET 0 4 6) (PROC 0", -" 3) (PROC 1 4) (LOADI 2 0) (CALL 2)) ((((LREF 0 5 11) (PROC 1 0) (CALL 1)) ((((G", -"REF 0 0) (PROC 1 0) (LREF 2 1 2) (LREF 3 0 1) (CALL 3)) ((((LREF 0 7 11) (LREF 1", -" 2 1) (LREF 2 0 1) (CALL 2)) () () (1 . #f) 4)) (cons) (1 . #f) 5)) () (2 . #f) ", -"3) (((LREF 0 5 10) (PROC 1 0) (CALL 1)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 1) (C", -"ALL 2)) ((((PROC 0 0) (LREF 1 2 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 8 10) (PROC", -" 1 0) (CALL 1)) ((((GREF 0 0) (PROC 1 0) (LREF 2 4 2) (LREF 3 0 1) (CALL 3)) (((", -"(LREF 0 10 10) (PROC 1 0) (LREF 2 0 1) (CALL 2)) ((((LREF 0 3 1) (LREF 1 3 2) (C", -"ALL 1)) () () (1 . #f) 3)) () (1 . #f) 4)) (cons) (1 . #f) 5)) () (2 . #f) 3)) (", -") (1 . #f) 4)) (length) (1 . #f) 4)) () (2 . #f) 3) (((LREF 0 5 9) (PROC 1 0) (C", -"ALL 1)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 1) (CALL 2)) ((((PROC 0 0) (LREF 1 2 ", -"1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 8 9) (PROC 1 0) (CALL 1)) ((((GREF 0 0) (PR", -"OC 1 0) (LREF 2 4 2) (LREF 3 0 1) (CALL 3)) ((((LREF 0 10 9) (PROC 1 0) (LREF 2 ", -"0 1) (CALL 2)) ((((LREF 0 3 1) (LREF 1 3 2) (CALL 1)) () () (1 . #f) 3)) () (1 .", -" #f) 4)) (cons) (1 . #f) 5)) () (2 . #f) 3)) () (1 . #f) 4)) (length) (1 . #f) 4", -")) () (2 . #f) 3) (((LREF 0 0 1) (PROC 1 0) (CALL 1)) ((((PROC 0 0) (LREF 1 0 1)", -" (LREF 2 1 2) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 2 2) (LOADI 3 1) (CALL ", -"3)) ((((LREF 0 0 1) (LSET 0 3 2) (LREF 0 1 1) (LREF 1 1 2) (CALL 1)) () () (1 . ", -"#f) 3)) (+) (2 . #f) 5)) () (1 . #f) 4)) () (2 . #f) 3) (((LREF 0 0 1) (LSET 0 5", -" 5) (PROC 0 0) (LSET 0 5 4) (PROC 0 1) (LSET 0 5 3) (PROC 0 2) (LSET 0 5 2) (LRE", -"F 0 5 1) (PROC 1 3) (CALL 1)) ((((LREF 0 6 11) (PROC 1 0) (CALL 1)) ((((GREF 0 0", -") (PROC 1 0) (LREF 2 1 2) (LREF 3 0 1) (CALL 3)) ((((LREF 0 8 11) (LREF 1 2 1) (", -"LREF 2 0 1) (CALL 2)) () () (1 . #f) 4)) (cons) (1 . #f) 5)) () (2 . #f) 3) (((G", -"REF 0 0) (PROC 1 0) (LREF 2 0 2) (CALL 2)) ((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 ", -"1) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (LOAD 3 1) (CALL 3)) ((((PROC", -" 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 118) (LREF 0 0 1", -") (LREF 1 0 2) (CALL 1) 118 (GREF 0 0) (PROC 1 0) (LREF 2 2 2) (LOAD 3 1) (CALL ", -"3)) ((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 11", -"9) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 119 (GREF 0 0) (PROC 1 0) (LREF 2 4 2) (LO", -"AD 3 1) (CALL 3)) ((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0", -" 2) (COND 0 120) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 120 (GREF 0 0) (PROC 1 0) (L", -"REF 2 6 2) (LOAD 3 1) (CALL 3)) ((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)", -") ((((LREF 0 0 2) (COND 0 121) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 121 (LREF 0 0 ", -"1) (LOADF 1) (CALL 1)) () () (2 . #f) 3)) () (1 . #f) 4)) (eqv? undefined) (2 . ", -"#f) 5)) () (1 . #f) 4)) (eqv? quote) (2 . #f) 5)) () (1 . #f) 4)) (eqv? lambda) ", -"(2 . #f) 5) (((LREF 0 0 1) (COND 0 122) (LREF 0 10 2) (LREF 1 2 1) (LREF 2 4 2) ", -"(LOADI 3 0) (CALL 3) 122 (GREF 0 0) (PROC 1 0) (LREF 2 2 2) (LOAD 3 1) (CALL 3))", -" ((((PROC 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 123) (L", -"REF 0 0 1) (LREF 1 0 2) (CALL 1) 123 (LREF 0 0 1) (LOADF 1) (CALL 1)) () () (2 .", -" #f) 3) (((LREF 0 0 1) (COND 0 124) (LREF 0 17 8) (PROC 1 0) (LREF 2 6 2) (CALL ", -"2) 124 (GREF 0 0) (PROC 1 1) (LREF 2 4 2) (LOAD 3 1) (CALL 3)) ((((LREF 0 13 2) ", -"(PROC 1 0) (LREF 2 0 1) (LOADI 3 0) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 8", -" 2) (CALL 2)) ((((LREF 0 15 12) (PROC 1 0) (CALL 1)) ((((LREF 0 16 13) (PROC 1 0", -") (LREF 2 1 1) (LREF 3 0 1) (CALL 3)) ((((PROC 0 0) (PROC 1 1) (LREF 2 0 1) (CAL", -"L 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (", -"LOAD 2 1) (LREF 3 0 1) (CALL 3)) ((((LREF 0 0 1) (COND 0 125) (GREF 0 0) (PROC 1", -" 0) (LREF 2 2 2) (CALL 2) 125 (GREF 0 1) (PROC 1 1) (LREF 2 2 2) (CALL 2)) ((((L", -"REF 0 21 6) (PROC 1 0) (LREF 2 0 1) (CALL 2)) ((((PROC 0 0) (LREF 1 4 1) (LREF 2", -" 0 1) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (LOADN 3) (CALL 3)) ((((GR", -"EF 0 0) (PROC 1 0) (LOADI 2 0) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (", -"LOAD 2 1) (LREF 3 0 1) (CALL 3)) ((((LREF 0 26 8) (LREF 1 3 1) (LREF 2 0 1) (CAL", -"L 2)) () () (1 . #f) 4)) (cons GSET) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons) (2 ", -". #f) 5)) () (1 . #f) 4)) () (1 . #f) 4) (((GREF 0 0) (PROC 1 0) (LOADI 2 0) (LR", -"EF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) (", -"(((LREF 0 23 8) (LREF 1 5 1) (LREF 2 0 1) (CALL 2)) () () (1 . #f) 4)) (cons LSE", -"T) (1 . #f) 5)) (cons) (1 . #f) 5)) (cadr cdr) (1 . #f) 4)) (eq? global) (1 . #f", -") 5)) (car) (2 . #f) 4) (((LREF 0 23 7) (PROC 1 0) (LREF 2 12 2) (CALL 2)) ((((L", -"REF 0 19 3) (LREF 1 11 1) (LREF 2 0 1) (CALL 2)) () () (1 . #f) 4)) () (1 . #f) ", -"4)) () (1 . #f) 4)) () (1 . #f) 5)) () (1 . #f) 3)) (cadr) (1 . #f) 4)) () (1 . ", -"#f) 5) (((PROC 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 12", -"6) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 126 (LREF 0 0 1) (LOADF 1) (CALL 1)) () ()", -" (2 . #f) 3) (((LREF 0 0 1) (COND 0 127) (GREF 0 0) (PROC 1 0) (LREF 2 8 2) (CAL", -"L 2) 127 (LOADT 0) (COND 0 128) (PROC 0 1) (PROC 1 2) (CALL 1) 128 (LREF 0 6 1) ", -"(LOADU 1) (CALL 1)) ((((LREF 0 15 2) (PROC 1 0) (LREF 2 0 1) (LOADI 3 0) (CALL 3", -")) ((((LREF 0 16 5) (PROC 1 0) (CALL 1)) ((((PROC 0 0) (LREF 1 9 1) (LREF 2 0 1)", -" (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (LOADN 3) (CALL 3)) ((((GREF 0 ", -"0) (PROC 1 0) (LOADI 2 0) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LOAD ", -"2 1) (LREF 3 0 1) (CALL 3)) ((((LREF 0 21 8) (PROC 1 0) (LREF 2 0 1) (CALL 2)) (", -"(((LREF 0 27 8) (PROC 1 0) (LREF 2 16 2) (CALL 2)) ((((LREF 0 23 3) (PROC 1 0) (", -"LREF 2 0 1) (CALL 2)) ((((LREF 0 24 4) (PROC 1 0) (LREF 2 6 2) (CALL 2)) ((((LRE", -"F 0 30 7) (PROC 1 0) (LREF 2 19 2) (CALL 2)) ((((LREF 0 26 3) (LREF 1 8 1) (LREF", -" 2 0 1) (CALL 2)) () () (1 . #f) 4)) () (1 . #f) 4)) () (1 . #f) 4)) () (1 . #f)", -" 4)) () (1 . #f) 4)) () (1 . #f) 4)) (cons COND) (1 . #f) 5)) (cons) (1 . #f) 5)", -") (cons) (2 . #f) 5)) () (1 . #f) 4)) () (1 . #f) 3)) () (1 . #f) 5) (((PROC 0 0", -") (LREF 1 0 1) (LOADF 2) (CALL 2)) ((((PROC 0 0) (LSET 0 0 2) (LREF 0 0 2) (LREF", -" 1 0 1) (LOADI 2 0) (LREF 3 10 2) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 3", -") (CALL 2)) ((((LREF 0 0 1) (COND 0 129) (LREF 0 1 1) (LOADU 1) (CALL 1) 129 (GR", -"EF 0 0) (PROC 1 0) (LREF 2 1 3) (CALL 2)) ((((LREF 0 19 2) (PROC 1 0) (LREF 2 0 ", -"1) (LREF 3 2 2) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 3 2) (LOADI 3 1) (CAL", -"L 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 4 3) (CALL 2)) ((((LREF 0 6 2) (LREF 1 5 ", -"1) (LREF 2 1 1) (LREF 3 0 1) (CALL 3)) () () (1 . #f) 5)) (cdr) (1 . #f) 4)) (+)", -" (1 . #f) 5)) () (1 . #f) 5)) (car) (1 . #f) 4)) (null?) (3 . #f) 4)) () (2 . #f", -") 5)) () (1 . #f) 4) (((GREF 0 0) (PROC 1 0) (LREF 2 9 2) (CALL 2)) ((((GREF 0 0", -") (PROC 1 0) (LREF 2 0 1) (LOADI 3 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2", -" 0 1) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LOAD 2 1) (LREF 3 0 1) (CALL", -" 3)) ((((LREF 0 19 8) (LREF 1 11 1) (LREF 2 0 1) (CALL 2)) () () (1 . #f) 4)) (c", -"ons CALL) (1 . #f) 5)) (cons) (1 . #f) 5)) (-) (1 . #f) 5)) (length) (1 . #f) 4)", -") (cadr) (1 . #f) 4)) () (1 . #f) 4)) (eqv? if) (1 . #f) 5)) () (1 . #f) 4)) (eq", -"v? set!) (1 . #f) 5)) () (1 . #f) 4)) (eqv? ref) (2 . #f) 5)) () (1 . #f) 4)) (c", -"ar) (2 . #f) 4) (((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (CALL 2)) ((((PROC 0 0) (LR", -"EF 1 1 1) (LREF 2 0 1) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (LOAD 3 1", -") (CALL 3)) ((((PROC 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (CON", -"D 0 130) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 130 (LREF 0 0 1) (LOADF 1) (CALL 1))", -" () () (2 . #f) 3) (((LREF 0 0 1) (COND 0 131) (GREF 0 0) (PROC 1 0) (LREF 2 4 2", -") (CALL 2) 131 (GREF 0 1) (PROC 1 1) (LREF 2 2 2) (LOAD 3 2) (CALL 3)) ((((LREF ", -"0 11 12) (PROC 1 0) (CALL 1)) ((((LREF 0 12 13) (PROC 1 0) (LREF 2 1 1) (LREF 3 ", -"0 1) (CALL 3)) ((((PROC 0 0) (LREF 1 5 1) (LREF 2 0 1) (CALL 2)) ((((GREF 0 0) (", -"PROC 1 0) (LREF 2 0 2) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LOAD 2 1) (LREF 3 0 1", -") (CALL 3)) ((((LREF 0 0 1) (COND 0 132) (GREF 0 0) (PROC 1 0) (LREF 2 2 2) (CAL", -"L 2) 132 (GREF 0 1) (PROC 1 1) (LREF 2 2 2) (CALL 2)) ((((LREF 0 17 6) (PROC 1 0", -") (LREF 2 0 1) (CALL 2)) ((((PROC 0 0) (LREF 1 4 1) (LREF 2 0 1) (CALL 2)) ((((G", -"REF 0 0) (PROC 1 0) (LREF 2 0 2) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (L", -"REF 2 14 3) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LOAD 2 1) (LREF 3 0", -" 1) (CALL 3)) ((((LREF 0 22 8) (LREF 1 3 1) (LREF 2 0 1) (CALL 2)) () () (1 . #f", -") 4)) (cons GREF) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons) (2 . #f) 5)) () (1 . #", -"f) 4)) () (1 . #f) 4) (((GREF 0 0) (PROC 1 0) (LREF 2 11 3) (LREF 3 0 1) (CALL 3", -")) ((((GREF 0 0) (PROC 1 0) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) ((((LREF 0 19 8) (", -"LREF 1 5 1) (LREF 2 0 1) (CALL 2)) () () (1 . #f) 4)) (cons LREF) (1 . #f) 5)) (", -"cons) (1 . #f) 5)) (cadr cdr) (1 . #f) 4)) (eq? global) (1 . #f) 5)) (car) (2 . ", -"#f) 4)) () (1 . #f) 4)) () (1 . #f) 5)) () (1 . #f) 3) (((PROC 0 0) (PROC 1 1) (", -"LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 133) (LREF 0 0 1) (LREF 1 0 2) (CA", -"LL 1) 133 (LREF 0 0 1) (LOADF 1) (CALL 1)) () () (2 . #f) 3) (((LREF 0 0 1) (CON", -"D 0 134) (GREF 0 0) (PROC 1 0) (LREF 2 6 2) (CALL 2) 134 (GREF 0 1) (PROC 1 1) (", -"LREF 2 4 2) (LOAD 3 2) (CALL 3)) ((((PROC 0 0) (LREF 1 5 1) (LREF 2 0 1) (CALL 2", -")) ((((GREF 0 0) (PROC 1 0) (LOADT 2) (LREF 3 0 2) (CALL 3)) ((((LREF 0 0 1) (CO", -"ND 0 135) (GREF 0 0) (PROC 1 0) (LREF 2 9 3) (LOADN 3) (CALL 3) 135 (GREF 0 1) (", -"PROC 1 1) (LOADF 2) (LREF 3 1 2) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LOAD 2 1) (", -"LREF 3 0 1) (CALL 3)) ((((LREF 0 17 8) (LREF 1 3 1) (LREF 2 0 1) (CALL 2)) () ()", -" (1 . #f) 4)) (cons LOADT) (1 . #f) 5) (((LREF 0 0 1) (COND 0 136) (GREF 0 0) (P", -"ROC 1 0) (LREF 2 10 3) (LOADN 3) (CALL 3) 136 (GREF 0 1) (PROC 1 1) (LREF 2 2 2)", -" (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) ((((LREF 0", -" 18 8) (LREF 1 4 1) (LREF 2 0 1) (CALL 2)) () () (1 . #f) 4)) (cons LOADF) (1 . ", -"#f) 5) (((LREF 0 0 1) (COND 0 137) (GREF 0 0) (PROC 1 0) (LREF 2 11 3) (LOADN 3)", -" (CALL 3) 137 (GREF 0 1) (PROC 1 1) (LOADU 2) (LREF 3 3 2) (CALL 3)) ((((GREF 0 ", -"0) (PROC 1 0) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) ((((LREF 0 19 8) (LREF 1 5 1) (L", -"REF 2 0 1) (CALL 2)) () () (1 . #f) 4)) (cons LOADN) (1 . #f) 5) (((LREF 0 0 1) ", -"(COND 0 138) (GREF 0 0) (PROC 1 0) (LREF 2 12 3) (LOADN 3) (CALL 3) 138 (PROC 0 ", -"1) (PROC 1 2) (CALL 1)) ((((GREF 0 0) (PROC 1 0) (LOAD 2 1) (LREF 3 0 1) (CALL 3", -")) ((((LREF 0 20 8) (LREF 1 6 1) (LREF 2 0 1) (CALL 2)) () () (1 . #f) 4)) (cons", -" LOADU) (1 . #f) 5) (((LREF 0 24 5) (PROC 1 0) (LREF 2 5 2) (CALL 2)) ((((LREF 0", -" 0 1) (COND 0 139) (GREF 0 0) (LREF 1 1 1) (LOADI 2 -127) (LREF 3 6 2) (LOADI 4 ", -"127) (CALL 4) 139 (LREF 0 1 1) (LOADF 1) (CALL 1)) () (<=) (1 . #f) 6)) () (1 . ", -"#f) 4) (((LREF 0 0 1) (COND 0 140) (GREF 0 0) (PROC 1 0) (LREF 2 5 2) (LOADN 3) ", -"(CALL 3) 140 (LREF 0 19 6) (PROC 1 1) (LREF 2 5 2) (CALL 2)) ((((GREF 0 0) (PROC", -" 1 0) (LREF 2 14 3) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LOAD 2 1) (", -"LREF 3 0 1) (CALL 3)) ((((LREF 0 22 8) (LREF 1 8 1) (LREF 2 0 1) (CALL 2)) () ()", -" (1 . #f) 4)) (cons LOADI) (1 . #f) 5)) (cons) (1 . #f) 5) (((PROC 0 0) (LREF 1 ", -"6 1) (LREF 2 0 1) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (LOADN 3) (CAL", -"L 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 16 3) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0", -") (PROC 1 0) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) ((((LREF 0 24 8) (LREF 1 3 1) (LR", -"EF 2 0 1) (CALL 2)) () () (1 . #f) 4)) (cons LOAD) (1 . #f) 5)) (cons) (1 . #f) ", -"5)) (cons) (2 . #f) 5)) () (1 . #f) 4)) (cons) (1 . #f) 5)) (cons) (1 . #f) 5)) ", -"(cons eq?) (1 . #f) 5)) (cons null?) (1 . #f) 5)) (cons eq?) (1 . #f) 5)) (eq?) ", -"(2 . #f) 5)) () (1 . #f) 4) (((PROC 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((L", -"REF 0 0 2) (COND 0 141) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 141 (LREF 0 0 1) (LOA", -"DF 1) (CALL 1)) () () (2 . #f) 3) (((LREF 0 0 1) (COND 0 142) (GREF 0 0) (PROC 1", -" 0) (LREF 2 8 3) (LOADN 3) (CALL 3) 142 (GREF 0 1) (PROC 1 1) (LREF 2 6 2) (LOAD", -" 3 2) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) ((((L", -"REF 0 16 8) (LREF 1 8 1) (LREF 2 0 1) (CALL 2)) () () (1 . #f) 4)) (cons LOADU) ", -"(1 . #f) 5) (((PROC 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND", -" 0 143) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 143 (LREF 0 0 1) (LOADF 1) (CALL 1)) ", -"() () (2 . #f) 3) (((LREF 0 0 1) (COND 0 144) (PROC 0 0) (PROC 1 1) (CALL 1) 144", -" (LREF 0 8 1) (LOADU 1) (CALL 1)) ((((PROC 0 0) (LREF 1 0 1) (LOADF 2) (CALL 2))", -" ((((PROC 0 0) (LSET 0 0 2) (LREF 0 23 8) (PROC 1 1) (LREF 2 12 2) (CALL 2)) (((", -"(GREF 0 0) (PROC 1 0) (LREF 2 0 2) (CALL 2)) ((((PROC 0 0) (LREF 1 1 1) (LREF 2 ", -"0 1) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (LOAD 3 1) (CALL 3)) ((((PR", -"OC 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 145) (LREF 0 0", -" 1) (LREF 1 0 2) (CALL 1) 145 (GREF 0 0) (PROC 1 0) (LREF 2 2 2) (LOAD 3 1) (CAL", -"L 3)) ((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 ", -"146) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 146 (GREF 0 0) (PROC 1 0) (LREF 2 4 2) (", -"LOAD 3 1) (CALL 3)) ((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0", -" 0 2) (COND 0 147) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 147 (GREF 0 0) (PROC 1 0) ", -"(LREF 2 6 2) (LOAD 3 1) (CALL 3)) ((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL ", -"2)) ((((LREF 0 0 2) (COND 0 148) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 148 (LREF 0 ", -"0 1) (LOADF 1) (CALL 1)) () () (2 . #f) 3)) () (1 . #f) 4)) (eqv? undefined) (2 ", -". #f) 5)) () (1 . #f) 4)) (eqv? quote) (2 . #f) 5)) () (1 . #f) 4)) (eqv? lambda", -") (2 . #f) 5) (((LREF 0 0 1) (COND 0 149) (LREF 0 2 1) (LOADI 1 1) (CALL 1) 149 ", -"(GREF 0 0) (PROC 1 0) (LREF 2 2 2) (LOAD 3 1) (CALL 3)) ((((PROC 0 0) (PROC 1 1)", -" (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 150) (LREF 0 0 1) (LREF 1 0 2) (", -"CALL 1) 150 (LREF 0 0 1) (LOADF 1) (CALL 1)) () () (2 . #f) 3) (((LREF 0 0 1) (C", -"OND 0 151) (LREF 0 30 8) (PROC 1 0) (LREF 2 6 2) (CALL 2) 151 (GREF 0 0) (PROC 1", -" 1) (LREF 2 4 2) (LOAD 3 1) (CALL 3)) ((((LREF 0 8 2) (PROC 1 0) (LREF 2 0 1) (C", -"ALL 2)) ((((LREF 0 32 7) (PROC 1 0) (LREF 2 8 2) (CALL 2)) ((((LREF 0 10 2) (PRO", -"C 1 0) (LREF 2 0 1) (CALL 2)) ((((LREF 0 34 6) (LREF 1 8 1) (LREF 2 2 1) (LREF 3", -" 0 1) (CALL 3)) () () (1 . #f) 5)) () (1 . #f) 4)) () (1 . #f) 4)) () (1 . #f) 4", -") (((PROC 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 152) (L", -"REF 0 0 1) (LREF 1 0 2) (CALL 1) 152 (LREF 0 0 1) (LOADF 1) (CALL 1)) () () (2 .", -" #f) 3) (((LREF 0 0 1) (COND 0 153) (LREF 0 32 7) (PROC 1 0) (LREF 2 8 2) (CALL ", -"2) 153 (LOADT 0) (COND 0 154) (GREF 0 0) (PROC 1 1) (LREF 2 8 2) (CALL 2) 154 (L", -"REF 0 6 1) (LOADU 1) (CALL 1)) ((((LREF 0 10 2) (LREF 1 7 1) (LREF 2 0 1) (CALL ", -"2)) () () (1 . #f) 4) (((GREF 0 0) (LREF 1 7 1) (LOADI 2 1) (LREF 3 0 1) (CALL 3", -")) () (+) (1 . #f) 5)) (length) (1 . #f) 4)) () (1 . #f) 4)) (eqv? set!) (1 . #f", -") 5)) () (1 . #f) 4)) (eqv? if) (1 . #f) 5)) () (1 . #f) 4)) (eqv? ref) (2 . #f)", -" 5)) () (1 . #f) 4)) (car) (2 . #f) 4) (((LREF 0 1 2) (LREF 1 1 1) (LREF 2 0 1) ", -"(CALL 2)) () () (1 . #f) 4)) () (2 . #f) 4)) () (1 . #f) 4) (((PROC 0 0) (PROC 1", -" 1) (CALL 1)) ((((PROC 0 0) (LREF 1 0 1) (LOADF 2) (CALL 2)) ((((PROC 0 0) (LSET", -" 0 0 2) (GREF 0 0) (PROC 1 1) (LREF 2 13 2) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (", -"LREF 2 0 2) (CALL 2)) ((((LREF 0 0 1) (COND 0 155) (GREF 0 0) (LREF 1 1 1) (LREF", -" 2 1 3) (LOADT 3) (CALL 3) 155 (GREF 0 1) (PROC 1 0) (LREF 2 1 2) (CALL 2)) ((((", -"LREF 0 0 1) (COND 0 156) (GREF 0 0) (LREF 1 2 1) (LREF 2 2 3) (LOADF 3) (CALL 3)", -" 156 (GREF 0 1) (PROC 1 0) (LREF 2 2 2) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LOAD", -"I 2 1) (LREF 3 3 3) (CALL 3)) ((((LREF 0 5 2) (LREF 1 4 1) (LREF 2 1 1) (LREF 3 ", -"0 1) (CALL 3)) () () (1 . #f) 5)) (+) (1 . #f) 5)) (cons cdr) (1 . #f) 5)) (cons", -" null?) (1 . #f) 5)) (symbol?) (3 . #f) 4) (((LREF 0 1 2) (LREF 1 1 1) (LREF 2 0", -" 1) (LOADI 3 0) (CALL 3)) () () (1 . #f) 5)) (cadr) (2 . #f) 4)) () (1 . #f) 4) ", -"(((PROC 0 0) (LREF 1 10 1) (LREF 2 1 1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PR", -"OC 1 0) (LREF 2 19 11) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 14 2", -") (CALL 2)) ((((LREF 0 21 12) (PROC 1 0) (CALL 1)) ((((GREF 0 0) (PROC 1 0) (LRE", -"F 2 1 1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 23 12) (LREF 3 ", -"0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 24 10) (LOADN 3) (CALL 3)) ((((G", -"REF 0 0) (PROC 1 0) (LREF 2 25 9) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (", -"LREF 2 6 1) (LREF 3 2 1) (LREF 4 1 1) (LREF 5 0 1) (CALL 5)) ((((GREF 0 0) (PROC", -" 1 0) (LREF 2 0 1) (PROC 3 1) (CALL 3)) ((((PROC 0 0) (LREF 1 9 1) (LREF 2 0 1) ", -"(CALL 2)) ((((LREF 0 29 7) (PROC 1 0) (LREF 2 0 2) (CALL 2)) ((((PROC 0 0) (LREF", -" 1 1 1) (LREF 2 0 1) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (LOADN 3) (", -"CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 26 3) (LREF 3 0 1) (CALL 3)) ((((GREF ", -"0 0) (PROC 1 0) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) ((((LREF 0 34 8) (LREF 1 3 1) ", -"(LREF 2 0 1) (CALL 2)) () () (1 . #f) 4)) (cons PROC) (1 . #f) 5)) (cons) (1 . #", -"f) 5)) (cons) (2 . #f) 5)) () (1 . #f) 4)) () (2 . #f) 4)) () (1 . #f) 4) (((LRE", -"F 0 33 8) (PROC 1 0) (LREF 2 22 2) (CALL 2)) ((((LREF 0 29 3) (PROC 1 0) (LREF 2", -" 0 1) (CALL 2)) ((((LREF 0 30 11) (PROC 1 0) (CALL 1)) ((((GREF 0 0) (PROC 1 0) ", -"(LREF 2 0 1) (CALL 2)) ((((LREF 0 32 10) (PROC 1 0) (CALL 1)) ((((GREF 0 0) (PRO", -"C 1 0) (LREF 2 0 1) (CALL 2)) ((((LREF 0 34 9) (PROC 1 0) (CALL 1)) ((((GREF 0 0", -") (PROC 1 0) (LREF 2 0 1) (CALL 2)) ((((GREF 0 0) (LREF 1 8 1) (LREF 2 4 1) (LRE", -"F 3 2 1) (LREF 4 0 1) (LREF 5 17 3) (LREF 6 17 2) (CALL 6)) () (list) (1 . #f) 8", -")) (reverse) (1 . #f) 4)) () (1 . #f) 3)) (reverse) (1 . #f) 4)) () (1 . #f) 3))", -" (reverse) (1 . #f) 4)) () (1 . #f) 3)) () (1 . #f) 4)) () (1 . #f) 4)) (with-dy", -"namic-environment) (1 . #f) 5)) (list) (1 . #f) 7)) (cons) (1 . #f) 5)) (cons) (", -"1 . #f) 5)) (cons) (1 . #f) 5)) (cons) (1 . #f) 5)) () (1 . #f) 3)) (cadr) (1 . ", -"#f) 4)) (cons) (3 . #f) 5)) () (1 . #f) 5)) () (1 . #f) 3)) () (1 . #f) 3)) () (", -"1 . #f) 4)) (cons eqv? lambda) (1 . #f) 5)) () (1 . #f) 4)) (cadr eqv? undefined", -") (1 . #f) 5)) () (1 . #f) 4)) (cadr eqv? quote) (1 . #f) 5)) () (1 . #f) 4)) (e", +"f) 5)) (cons) (1 . #f) 5)) (append) (1 . #f) 5) (((GREF 0 0) (PROC 1 0) (LOADF 2", +") (LOADN 3) (CALL 3)) ((((GREF 0 0) (LREF 1 1 1) (LOAD 2 1) (LREF 3 0 1) (CALL 3", +")) () (cons quote) (1 . #f) 5)) (cons) (2 . #f) 5)) (map) (1 . #f) 5)) () (1 . #", +"f) 3)) (cons lambda) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons)", +" (1 . #f) 5)) (null?) (1 . #f) 4)) () (2 . #f) 3)) () (1 . #f) 4)) () (1 . #f) 4", +")) (with-dynamic-environment) (1 . #f) 5)) (list) (1 . #f) 4)) (cons) (3 . #f) 5", +")) () (1 . #f) 5)) () (1 . #f) 4) (((PROC 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2))", +" ((((LREF 0 0 2) (COND 0 75) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 75 (LREF 0 0 1) ", +"(LOADF 1) (CALL 1)) () () (2 . #f) 3) (((LREF 0 0 1) (COND 0 76) (GREF 0 0) (PRO", +"C 1 0) (LREF 2 13 2) (CALL 2) 76 (GREF 0 1) (PROC 1 1) (LREF 2 8 2) (LOAD 3 2) (", +"CALL 3)) ((((LREF 0 18 8) (PROC 1 0) (LREF 2 14 2) (CALL 2)) ((((LREF 0 16 2) (P", +"ROC 1 0) (LREF 2 0 1) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 1) (LOADN 3) ", +"(CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 3 1) (LREF 3 0 1) (CALL 3)) ((((GREF ", +"0 0) (LREF 1 13 1) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) () (cons set!) (1 . #f) 5))", +" (cons) (1 . #f) 5)) (cons) (1 . #f) 5)) () (1 . #f) 4)) () (1 . #f) 4) (((PROC ", +"0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 77) (LREF 0 0 1) ", +"(LREF 1 0 2) (CALL 1) 77 (LREF 0 0 1) (LOADF 1) (CALL 1)) () () (2 . #f) 3) (((L", +"REF 0 0 1) (COND 0 78) (GREF 0 0) (PROC 1 0) (LREF 2 15 2) (CALL 2) 78 (GREF 0 1", +") (PROC 1 1) (LREF 2 10 2) (LOAD 3 2) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2", +" 17 2) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (LREF 1 12 1) (LOAD 2 1) (LREF 3 0 1", +") (CALL 3)) () (cons if) (1 . #f) 5)) (map) (1 . #f) 5) (((PROC 0 0) (PROC 1 1) ", +"(LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 79) (LREF 0 0 1) (LREF 1 0 2) (CA", +"LL 1) 79 (LREF 0 0 1) (LOADF 1) (CALL 1)) () () (2 . #f) 3) (((LREF 0 0 1) (COND", +" 0 80) (GREF 0 0) (PROC 1 0) (LREF 2 17 2) (CALL 2) 80 (LOADT 0) (COND 0 81) (GR", +"EF 0 1) (LREF 1 12 1) (LREF 2 18 2) (LREF 3 17 2) (CALL 3) 81 (LREF 0 12 1) (LOA", +"DU 1) (CALL 1)) ((((GREF 0 0) (PROC 1 0) (LREF 2 19 2) (LREF 3 0 1) (CALL 3)) ((", +"((GREF 0 0) (LREF 1 14 1) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) () (cons begin) (1 .", +" #f) 5)) (map) (1 . #f) 5)) (cdr map) (1 . #f) 5)) () (1 . #f) 4)) (cdr eqv? cor", +"e#begin) (1 . #f) 5)) () (1 . #f) 4)) (cadr eqv? core#if) (1 . #f) 5)) () (1 . #", +"f) 4)) (cadr eqv? core#set!) (1 . #f) 5)) () (1 . #f) 4)) (cadr eqv? core#lambda", +") (1 . #f) 5)) () (1 . #f) 4)) (cdr eqv? core#define) (1 . #f) 5)) () (1 . #f) 4", +")) (eqv? core#quote) (2 . #f) 5)) () (1 . #f) 4)) (cons car) (1 . #f) 5)) (not) ", +"(1 . #f) 4)) (cons pair?) (1 . #f) 5)) (symbol?) (2 . #f) 4)) () (2 . #f) 3)) ()", +" (2 . #f) 4) (((LREF 0 0 1) (LSET 0 2 4) (PROC 0 0) (PROC 1 1) (CALL 1)) ((((PRO", +"C 0 0) (LREF 1 0 1) (LOADF 2) (LOADF 3) (LOADF 4) (LOADF 5) (LOADF 6) (CALL 6)) ", +"((((PROC 0 0) (PROC 1 1) (LOADI 2 0) (CALL 2)) ((((LREF 0 0 1) (PROC 1 0) (CALL ", +"1)) ((((GREF 0 0) (PROC 1 0) (LREF 2 1 2) (LOADI 3 1) (CALL 3)) ((((LREF 0 0 1) ", +"(LSET 0 2 2) (GREF 0 0) (PROC 1 0) (LREF 2 2 2) (CALL 2)) ((((GREF 0 0) (PROC 1 ", +"0) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (LREF 1 3 1) (LREF 2 0 1) (CA", +"LL 2)) () (string->symbol) (1 . #f) 4)) (string-append \"$\") (1 . #f) 5)) (number", +"->string) (1 . #f) 4)) (+) (1 . #f) 5)) () (2 . #f) 3) (((LREF 0 0 1) (LSET 0 1 ", +"6) (PROC 0 0) (LSET 0 1 5) (PROC 0 1) (LSET 0 1 4) (PROC 0 2) (LSET 0 1 3) (PROC", +" 0 3) (LSET 0 1 2) (LREF 0 1 1) (PROC 1 4) (CALL 1)) ((((GREF 0 0) (PROC 1 0) (L", +"REF 2 0 2) (CALL 2)) ((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ((((GREF ", +"0 0) (PROC 1 0) (LREF 2 0 2) (LOAD 3 1) (CALL 3)) ((((PROC 0 0) (PROC 1 1) (LREF", +" 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 82) (LREF 0 0 1) (LREF 1 0 2) (CALL 1)", +" 82 (GREF 0 0) (PROC 1 0) (LREF 2 2 2) (LOAD 3 1) (CALL 3)) ((((PROC 0 0) (LREF ", +"1 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 83) (LREF 0 0 1) (LREF 1 0", +" 2) (CALL 1) 83 (GREF 0 0) (PROC 1 0) (LREF 2 4 2) (LOAD 3 1) (CALL 3)) ((((PROC", +" 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 84) (LREF 0 0 ", +"1) (LREF 1 0 2) (CALL 1) 84 (LREF 0 0 1) (LOADF 1) (CALL 1)) () () (2 . #f) 3)) ", +"() (1 . #f) 4)) (eqv? quote) (2 . #f) 5)) () (1 . #f) 4)) (eqv? lambda) (2 . #f)", +" 5) (((LREF 0 0 1) (COND 0 85) (LREF 0 6 2) (PROC 1 0) (LREF 2 4 2) (CALL 2) 85 ", +"(GREF 0 0) (PROC 1 1) (LREF 2 2 2) (LOAD 3 1) (CALL 3)) ((((LREF 0 5 3) (LREF 1 ", +"3 1) (LREF 2 0 1) (CALL 2)) () () (1 . #f) 4) (((PROC 0 0) (PROC 1 1) (LREF 2 0 ", +"1) (CALL 2)) ((((LREF 0 0 2) (COND 0 86) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 86 (", +"LREF 0 0 1) (LOADF 1) (CALL 1)) () () (2 . #f) 3) (((LREF 0 0 1) (COND 0 87) (GR", +"EF 0 0) (PROC 1 0) (LREF 2 6 2) (CALL 2) 87 (GREF 0 1) (PROC 1 1) (LREF 2 4 2) (", +"LOAD 3 2) (CALL 3)) ((((LREF 0 9 5) (LREF 1 5 1) (LREF 2 0 1) (PROC 3 0) (CALL 3", +")) ((((LREF 0 14 8) (PROC 1 0) (LREF 2 8 2) (CALL 2)) ((((LREF 0 11 5) (LREF 1 1", +" 1) (LREF 2 0 1) (LREF 3 9 3) (CALL 3)) () () (1 . #f) 5)) () (2 . #f) 4)) () (1", +" . #f) 5) (((PROC 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0", +" 88) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 88 (LREF 0 0 1) (LOADF 1) (CALL 1)) () (", +") (2 . #f) 3) (((LREF 0 0 1) (COND 0 89) (LREF 0 14 8) (PROC 1 0) (LREF 2 8 2) (", +"CALL 2) 89 (GREF 0 0) (PROC 1 1) (LREF 2 6 2) (LOAD 3 1) (CALL 3)) ((((LREF 0 11", +" 5) (LREF 1 7 1) (LREF 2 0 1) (PROC 3 0) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LRE", +"F 2 10 2) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LOAD 2 1) (LOADN 3) (CALL 3)) ((((", +"LREF 0 12 3) (PROC 1 0) (LREF 2 0 1) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 ", +"0 1) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 4 2) (LREF 3 0 1) (CAL", +"L 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 4 1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0)", +" (LREF 1 6 1) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) () (cons set!) (1 . #f) 5)) (con", +"s) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons) (1 . #f) 5)) () (1 . #f) 4)) (cons un", +"defined) (1 . #f) 5)) (cadr) (2 . #f) 4)) () (1 . #f) 5) (((PROC 0 0) (PROC 1 1)", +" (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 90) (LREF 0 0 1) (LREF 1 0 2) (C", +"ALL 1) 90 (LREF 0 0 1) (LOADF 1) (CALL 1)) () () (2 . #f) 3) (((LREF 0 0 1) (CON", +"D 0 91) (LREF 0 12 6) (PROC 1 0) (CALL 1) 91 (LOADT 0) (COND 0 92) (LREF 0 12 6)", +" (PROC 1 1) (CALL 1) 92 (LREF 0 8 1) (LOADU 1) (CALL 1)) ((((LREF 0 13 6) (PROC ", +"1 0) (CALL 1)) ((((PROC 0 0) (LREF 1 10 1) (LREF 2 1 1) (LREF 3 0 1) (CALL 3)) (", +"(((GREF 0 0) (PROC 1 0) (LREF 2 0 3) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0", +") (LREF 2 14 2) (CALL 2)) ((((LREF 0 17 5) (PROC 1 0) (LREF 2 0 1) (PROC 3 1) (C", +"ALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 1) (LOADN 3) (CALL 3)) ((((GREF 0 0) ", +"(PROC 1 0) (LREF 2 3 1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LOAD 2 ", +"1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 6 2) (LOADN 3) (CALL ", +"3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 7 2) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PRO", +"C 1 0) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) ((((LREF 0 22 3) (PROC 1 0) (LREF 2 0 1", +") (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 1) (LOADN 3) (CALL 3)) ((((GREF 0", +" 0) (PROC 1 0) (LREF 2 4 1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LOA", +"D 2 1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 1) (LOADN 3) (C", +"ALL 3)) ((((GREF 0 0) (LREF 1 14 1) (LREF 2 8 1) (LREF 3 0 1) (CALL 3)) () (cons", +") (1 . #f) 5)) (cons) (1 . #f) 5)) (cons lambda) (1 . #f) 5)) (cons) (1 . #f) 5)", +") (cons) (1 . #f) 5)) () (1 . #f) 4)) (cons ref) (1 . #f) 5)) (cons) (1 . #f) 5)", +") (cons) (1 . #f) 5)) (cons lambda) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons) (1 .", +" #f) 5) (((LREF 0 22 8) (PROC 1 0) (LREF 2 16 2) (CALL 2)) ((((GREF 0 0) (PROC 1", +" 0) (LREF 2 4 3) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LOAD 2 1) (LREF 3", +" 0 1) (CALL 3)) ((((LREF 0 21 3) (PROC 1 0) (LREF 2 2 1) (LREF 3 0 1) (CALL 3)) ", +"((((LREF 0 26 7) (PROC 1 0) (LREF 2 20 2) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LR", +"EF 2 8 3) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LOAD 2 1) (LREF 3 0 1) (", +"CALL 3)) ((((LREF 0 25 3) (PROC 1 0) (LREF 2 2 1) (LREF 3 0 1) (CALL 3)) ((((GRE", +"F 0 0) (PROC 1 0) (LREF 2 0 1) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LRE", +"F 2 5 1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 10 2) (LREF 3 0", +" 1) (CALL 3)) ((((GREF 0 0) (LREF 1 11 1) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) () (", +"cons if) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons) (1 . #f) 5)", +") () (1 . #f) 5)) (cons ref) (1 . #f) 5)) (cons) (1 . #f) 5)) () (1 . #f) 4)) ()", +" (1 . #f) 5)) (cons ref) (1 . #f) 5)) (cons) (1 . #f) 5)) () (2 . #f) 4)) () (1 ", +". #f) 5)) (cadr) (1 . #f) 4)) (cons) (3 . #f) 5)) () (1 . #f) 5)) () (1 . #f) 3)", +" (((PROC 0 0) (LREF 1 9 1) (LREF 2 0 1) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF", +" 2 0 2) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 1 2) (LOADN 3) (CAL", +"L 3)) ((((GREF 0 0) (PROC 1 0) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) ((((LREF 0 15 3", +") (PROC 1 0) (LREF 2 0 1) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 1) (LOADN", +" 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 4 1) (LREF 3 0 1) (CALL 3)) ((((G", +"REF 0 0) (PROC 1 0) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) ((((PROC 0 0) (LREF 1 7 1)", +" (LREF 2 0 1) (CALL 2)) ((((PROC 0 0) (LREF 1 0 1) (CALL 1)) ((((GREF 0 0) (PROC", +" 1 0) (LREF 2 21 2) (CALL 2)) ((((LREF 0 24 5) (LREF 1 1 1) (LREF 2 0 1) (PROC 3", +" 0) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 23 2) (CALL 2)) ((((LREF 0 26 4) ", +"(LREF 1 1 1) (LREF 2 0 1) (PROC 3 0) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 ", +"0 2) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 6 2) (LREF 3 0 1) (CAL", +"L 3)) ((((GREF 0 0) (LREF 1 2 1) (LREF 2 4 2) (LREF 3 0 1) (CALL 3)) () (cons) (", +"1 . #f) 5)) (cons) (1 . #f) 5)) (append) (2 . #f) 5)) () (1 . #f) 5)) (cdr) (2 .", +" #f) 4)) () (1 . #f) 5)) (car) (1 . #f) 4)) () (2 . #f) 3)) () (1 . #f) 4)) (con", +"s lambda) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons) (1 . #f) 5)) () (1 . #f) 4)) (", +"cons ref) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons) (2 . #f) 5)) () (1 . #f) 4)) (", +") (1 . #f) 3)) () (1 . #f) 4)) (eqv? if) (1 . #f) 5)) () (1 . #f) 4)) (cadr eqv?", +" set!) (1 . #f) 5)) () (1 . #f) 4)) (eqv? begin) (1 . #f) 5)) () (1 . #f) 4)) (e", "qv? ref) (2 . #f) 5)) () (1 . #f) 4)) (car) (3 . #f) 4) (((GREF 0 0) (PROC 1 0) ", -"(LREF 2 6 11) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 7 12) (LOADN ", -"3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 8 10) (LOADN 3) (CALL 3)) ((((GREF", -" 0 0) (PROC 1 0) (LREF 2 9 9) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF", -" 2 3 1) (LREF 3 2 1) (LREF 4 1 1) (LREF 5 0 1) (CALL 5)) ((((GREF 0 0) (LREF 1 5", -" 1) (LREF 2 0 1) (PROC 3 0) (CALL 3)) ((((LREF 0 12 3) (PROC 1 0) (LREF 2 6 2) (", -"CALL 2)) ((((LREF 0 13 10) (PROC 1 0) (CALL 1)) ((((GREF 0 0) (LREF 1 2 1) (LREF", -" 2 0 1) (CALL 2)) () (car) (1 . #f) 4)) () (1 . #f) 3)) () (1 . #f) 4)) (with-dy", -"namic-environment) (1 . #f) 5)) (list) (1 . #f) 7)) (cons) (1 . #f) 5)) (cons) (", -"1 . #f) 5)) (cons) (1 . #f) 5)) (cons) (2 . #f) 5)) () (1 . #f) 3)) () (1 . #f) ", -"4)) (make-parameter) (1 . #f) 4)) (make-parameter) (1 . #f) 4)) (make-parameter)", -" (1 . #f) 4)) (make-parameter) (13 . #f) 4)) () (1 . #f) 15) (((LREF 0 0 1) (LSE", -"T 0 4 2) (LREF 0 4 1) (PROC 1 0) (CALL 1)) ((((LREF 0 5 4) (PROC 1 0) (LREF 2 0 ", -"2) (CALL 2)) ((((LREF 0 6 3) (PROC 1 0) (LREF 2 0 1) (CALL 2)) ((((LREF 0 7 2) (", -"LREF 1 2 1) (LREF 2 0 1) (CALL 2)) () () (1 . #f) 4)) () (1 . #f) 4)) () (2 . #f", -") 4)) () (1 . #f) 3)) () (1 . #f) 3)) () (1 . #f) 3)) () (1 . #f) 4)) (make-para", -"meter) (8 . #f) 4)) () (1 . #f) 10)) () (1 . #f) 3) (((LREF 0 0 2) (GSET 0 0) (L", -"REF 0 0 1) (LOADU 1) (CALL 1)) () (compile) (2 . #f) 3)) (compile call-with-valu", -"es) (1 . #f) 5)) () (1 . #f) 3) (((PROC 0 0) (LREF 1 0 1) (CALL 1)) ((((PROC 0 0", -") (LREF 1 0 1) (LOADF 2) (LOADF 3) (LOADF 4) (LOADF 5) (LOADF 6) (LOADF 7) (LOAD", -"F 8) (LOADF 9) (LOADF 10) (LOADF 11) (LOADF 12) (LOADF 13) (LOADF 14) (LOADF 15)", -" (LOADF 16) (LOADF 17) (LOADF 18) (LOADF 19) (LOADF 20) (LOADF 21) (LOADF 22) (L", -"OADF 23) (LOADF 24) (LOADF 25) (CALL 25)) ((((PROC 0 0) (LSET 0 0 25) (PROC 0 1)", -" (LSET 0 0 24) (PROC 0 2) (LSET 0 0 23) (PROC 0 3) (LSET 0 0 22) (PROC 0 4) (LSE", -"T 0 0 21) (PROC 0 5) (LSET 0 0 20) (PROC 0 6) (PROC 1 7) (GREF 2 0) (CALL 2)) ((", -"((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (LREF 3 0 3) (CALL 3)) ((((GREF 0 0) (LREF 1", -" 1 1) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) () (make-record identifier) (1 . #f) 5))", -" (vector) (3 . #f) 5) (((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (CALL 2)) ((((LREF 0 ", -"0 1) (COND 0 157) (GREF 0 0) (PROC 1 0) (LREF 2 1 2) (CALL 2) 157 (LREF 0 1 1) (", -"LOADF 1) (CALL 1)) ((((GREF 0 0) (LREF 1 2 1) (LREF 2 0 1) (LOAD 3 1) (CALL 3)) ", -"() (eq? identifier) (1 . #f) 5)) (record-type) (1 . #f) 4)) (record?) (2 . #f) 4", -") (((LREF 0 1 24) (PROC 1 0) (LREF 2 0 2) (CALL 2)) ((((LREF 0 0 1) (COND 0 158)", -" (GREF 0 0) (PROC 1 0) (LREF 2 1 2) (CALL 2) 158 (GREF 0 1) (LREF 1 1 1) (LOAD 2", +"(LREF 2 0 2) (CALL 2)) ((((LREF 0 0 1) (COND 0 93) (LREF 0 1 3) (LREF 1 1 1) (LO", +"ADN 2) (CALL 2) 93 (GREF 0 0) (PROC 1 0) (LREF 2 1 2) (CALL 2)) ((((LREF 0 4 5) ", +"(LREF 1 2 1) (LREF 2 0 1) (PROC 3 0) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 ", +"3 2) (CALL 2)) ((((LREF 0 6 4) (LREF 1 1 1) (LREF 2 0 1) (PROC 3 0) (CALL 3)) ((", +"((GREF 0 0) (PROC 1 0) (LREF 2 2 2) (LREF 3 0 2) (CALL 3)) ((((LREF 0 6 3) (LREF", +" 1 1 1) (LREF 2 0 1) (CALL 2)) () () (1 . #f) 4)) (cons) (2 . #f) 5)) () (1 . #f", +") 5)) (cdr) (2 . #f) 4)) () (1 . #f) 5)) (car) (1 . #f) 4)) (null?) (3 . #f) 4) ", +"(((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (CALL 2)) ((((PROC 0 0) (LREF 1 1 1) (LREF ", +"2 0 1) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (LOAD 3 1) (CALL 3)) ((((", +"PROC 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 94) (LREF 0 ", +"0 1) (LREF 1 0 2) (CALL 1) 94 (GREF 0 0) (PROC 1 0) (LREF 2 2 2) (LOAD 3 1) (CAL", +"L 3)) ((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 ", +"95) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 95 (GREF 0 0) (PROC 1 0) (LREF 2 4 2) (LO", +"AD 3 1) (CALL 3)) ((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0", +" 2) (COND 0 96) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 96 (LREF 0 0 1) (LOADF 1) (CA", +"LL 1)) () () (2 . #f) 3)) () (1 . #f) 4)) (eqv? quote) (2 . #f) 5)) () (1 . #f) ", +"4)) (eqv? lambda) (2 . #f) 5) (((LREF 0 0 1) (COND 0 97) (LREF 0 6 2) (PROC 1 0)", +" (LREF 2 4 2) (CALL 2) 97 (GREF 0 0) (PROC 1 1) (LREF 2 2 2) (LOAD 3 1) (CALL 3)", +") ((((GREF 0 0) (PROC 1 0) (LREF 2 0 1) (LOADN 3) (CALL 3)) ((((GREF 0 0) (LREF ", +"1 4 1) (LREF 2 6 3) (LREF 3 0 1) (CALL 3)) () (cons) (1 . #f) 5)) (cons) (1 . #f", +") 5) (((PROC 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 98) ", +"(LREF 0 0 1) (LREF 1 0 2) (CALL 1) 98 (LREF 0 0 1) (LOADF 1) (CALL 1)) () () (2 ", +". #f) 3) (((LREF 0 0 1) (COND 0 99) (GREF 0 0) (PROC 1 0) (LREF 2 6 2) (CALL 2) ", +"99 (GREF 0 1) (PROC 1 1) (LREF 2 4 2) (LOAD 3 2) (CALL 3)) ((((LREF 0 9 5) (LREF", +" 1 5 1) (LREF 2 0 1) (PROC 3 0) (CALL 3)) ((((LREF 0 14 8) (PROC 1 0) (LREF 2 8 ", +"2) (CALL 2)) ((((LREF 0 11 3) (LREF 1 1 1) (LREF 2 0 1) (LREF 3 9 3) (CALL 3)) (", +") () (1 . #f) 5)) () (2 . #f) 4)) () (1 . #f) 5) (((PROC 0 0) (PROC 1 1) (LREF 2", +" 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 100) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) ", +"100 (LREF 0 0 1) (LOADF 1) (CALL 1)) () () (2 . #f) 3) (((LREF 0 0 1) (COND 0 10", +"1) (LREF 0 14 8) (PROC 1 0) (LREF 2 8 2) (CALL 2) 101 (GREF 0 0) (PROC 1 1) (LRE", +"F 2 6 2) (LOAD 3 1) (CALL 3)) ((((LREF 0 11 5) (LREF 1 7 1) (LREF 2 0 1) (PROC 3", +" 0) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 10 2) (CALL 2)) ((((GREF 0 0) (PR", +"OC 1 0) (LOAD 2 1) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 1) (LO", +"ADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 13 3) (LREF 3 0 1) (CALL 3)) (", +"(((GREF 0 0) (PROC 1 0) (LREF 2 0 1) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0", +") (LREF 2 5 2) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 5 1) (LRE", +"F 3 0 1) (CALL 3)) ((((GREF 0 0) (LREF 1 7 1) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) ", +"() (cons set!) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons) (1 . ", +"#f) 5)) (cons) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons undefined) (1 . #f) 5)) (c", +"adr) (2 . #f) 4)) () (1 . #f) 5) (((PROC 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ", +"((((LREF 0 0 2) (COND 0 102) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 102 (LREF 0 0 1)", +" (LOADF 1) (CALL 1)) () () (2 . #f) 3) (((LREF 0 0 1) (COND 0 103) (PROC 0 0) (P", +"ROC 1 1) (CALL 1) 103 (LOADT 0) (COND 0 106) (GREF 0 0) (PROC 1 2) (LREF 2 10 2)", +" (CALL 2) 106 (LREF 0 8 1) (LOADU 1) (CALL 1)) ((((GREF 0 0) (PROC 1 0) (LREF 2 ", +"11 3) (CALL 2)) ((((LREF 0 0 1) (COND 0 104) (GREF 0 0) (PROC 1 0) (LREF 2 12 3)", +" (CALL 2) 104 (LREF 0 1 1) (LOADF 1) (CALL 1)) ((((GREF 0 0) (LREF 1 2 1) (LOAD ", +"2 1) (LREF 3 0 1) (CALL 3)) () (eq? lambda) (1 . #f) 5)) (car) (1 . #f) 4)) (pai", +"r?) (1 . #f) 4) (((LREF 0 0 1) (COND 0 105) (LREF 0 13 6) (PROC 1 0) (CALL 1) 10", +"5 (GREF 0 0) (PROC 1 1) (LREF 2 11 2) (CALL 2)) ((((PROC 0 0) (LREF 1 10 1) (LRE", +"F 2 0 1) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (LOADN 3) (CALL 3)) (((", +"(GREF 0 0) (PROC 1 0) (LREF 2 14 2) (CALL 2)) ((((LREF 0 17 5) (PROC 1 0) (LREF ", +"2 0 1) (PROC 3 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 1) (LOADN 3) (CAL", +"L 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 3 1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0)", +" (PROC 1 0) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 1", +"9 3) (LOADN 3) (CALL 3)) ((((GREF 0 0) (LREF 1 7 1) (LREF 2 1 1) (LREF 3 0 1) (C", +"ALL 3)) () (cons) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons lambda) (1 . #f) 5)) (c", +"ons) (1 . #f) 5)) (cons) (1 . #f) 5) (((LREF 0 22 8) (PROC 1 0) (LREF 2 16 2) (C", +"ALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 4 2) (LOADN 3) (CALL 3)) ((((GREF 0 0) ", +"(PROC 1 0) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) ((((LREF 0 21 3) (PROC 1 0) (LREF 2", +" 2 1) (LREF 3 0 1) (CALL 3)) ((((LREF 0 26 7) (PROC 1 0) (LREF 2 20 2) (CALL 2))", +" ((((GREF 0 0) (PROC 1 0) (LREF 2 8 2) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1", +" 0) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) ((((LREF 0 25 3) (PROC 1 0) (LREF 2 2 1) (", +"LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 1) (LOADN 3) (CALL 3)) ", +"((((GREF 0 0) (PROC 1 0) (LREF 2 5 1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC", +" 1 0) (LREF 2 10 2) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (LREF 1 11 1) (LOAD 2 1", +") (LREF 3 0 1) (CALL 3)) () (cons if) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons) (1", +" . #f) 5)) (cons) (1 . #f) 5)) () (1 . #f) 5)) (cons ref) (1 . #f) 5)) (cons) (1", +" . #f) 5)) () (1 . #f) 4)) () (1 . #f) 5)) (cons ref) (1 . #f) 5)) (cons) (1 . #", +"f) 5)) () (2 . #f) 4)) () (1 . #f) 5)) (cadr) (1 . #f) 4)) (cons) (2 . #f) 5)) (", +") (1 . #f) 4) (((LREF 0 14 5) (LREF 1 10 1) (LREF 2 0 1) (PROC 3 0) (CALL 3)) ((", +"((LREF 0 19 8) (PROC 1 0) (LREF 2 13 2) (CALL 2)) ((((LREF 0 16 3) (PROC 1 0) (L", +"REF 2 0 1) (LREF 3 14 3) (CALL 3)) ((((LREF 0 21 7) (PROC 1 0) (LREF 2 15 2) (CA", +"LL 2)) ((((LREF 0 18 3) (PROC 1 0) (LREF 2 0 1) (LREF 3 16 3) (CALL 3)) ((((GREF", +" 0 0) (PROC 1 0) (LREF 2 0 1) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF", +" 2 3 1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 6 2) (LREF 3 0 1", +") (CALL 3)) ((((GREF 0 0) (LREF 1 7 1) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) () (con", +"s if) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons) (1 . #f) 5)) (", +") (1 . #f) 5)) () (1 . #f) 4)) () (1 . #f) 5)) () (2 . #f) 4)) () (1 . #f) 5)) (", +"cadr) (1 . #f) 4) (((LREF 0 13 5) (LREF 1 9 1) (LREF 2 0 1) (PROC 3 0) (CALL 3))", +" ((((GREF 0 0) (PROC 1 0) (LREF 2 12 2) (CALL 2)) ((((LREF 0 15 4) (LREF 1 1 1) ", +"(LREF 2 0 1) (PROC 3 0) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (LOADN 3", +") (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 15 3) (LREF 3 0 1) (CALL 3)) ((((GR", +"EF 0 0) (LREF 1 2 1) (LREF 2 4 2) (LREF 3 0 1) (CALL 3)) () (cons) (1 . #f) 5)) ", +"(cons) (1 . #f) 5)) (append) (2 . #f) 5)) () (1 . #f) 5)) (cdr) (2 . #f) 4)) () ", +"(1 . #f) 5)) (car) (1 . #f) 4)) () (1 . #f) 4)) (eqv? if) (1 . #f) 5)) () (1 . #", +"f) 4)) (cadr eqv? set!) (1 . #f) 5)) () (1 . #f) 4)) (eqv? begin) (1 . #f) 5)) (", +") (1 . #f) 4)) (eqv? ref) (2 . #f) 5)) () (1 . #f) 4)) (car) (3 . #f) 4) (((GREF", +" 0 0) (PROC 1 0) (LREF 2 0 2) (CALL 2)) ((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) ", +"(CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (LOAD 3 1) (CALL 3)) ((((PROC 0 ", +"0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 107) (LREF 0 0 1) (", +"LREF 1 0 2) (CALL 1) 107 (GREF 0 0) (PROC 1 0) (LREF 2 2 2) (LOAD 3 1) (CALL 3))", +" ((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 108) ", +"(LREF 0 0 1) (LREF 1 0 2) (CALL 1) 108 (LREF 0 0 1) (LOADF 1) (CALL 1)) () () (2", +" . #f) 3)) () (1 . #f) 4)) (eqv? quote) (2 . #f) 5) (((LREF 0 0 1) (COND 0 109) ", +"(LREF 0 2 1) (LREF 1 4 2) (CALL 1) 109 (GREF 0 0) (PROC 1 0) (LREF 2 2 2) (LOAD ", +"3 1) (CALL 3)) ((((PROC 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (", +"COND 0 110) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 110 (LREF 0 0 1) (LOADF 1) (CALL ", +"1)) () () (2 . #f) 3) (((LREF 0 0 1) (COND 0 111) (LREF 0 8 6) (PROC 1 0) (CALL ", +"1) 111 (LREF 0 4 1) (LOADU 1) (CALL 1)) ((((PROC 0 0) (LREF 1 5 1) (LREF 2 0 1) ", +"(CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 8 2) (CALL 2)) ((((GREF 0 0) (PROC 1 ", +"0) (LREF 2 1 2) (LREF 3 0 1) (CALL 3)) ((((LREF 0 16 8) (PROC 1 0) (LREF 2 10 2)", +" (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 3 2) (LOADN 3) (CALL 3)) ((((GREF 0 ", +"0) (PROC 1 0) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) ((((LREF 0 15 3) (PROC 1 0) (LRE", +"F 2 2 1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 1) (LOADN 3) ", +"(CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 5 1) (LREF 3 0 1) (CALL 3)) ((((GREF ", +"0 0) (LREF 1 8 1) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) () (cons lambda) (1 . #f) 5)", +") (cons) (1 . #f) 5)) (cons) (1 . #f) 5)) () (1 . #f) 5)) (cons ref) (1 . #f) 5)", +") (cons) (1 . #f) 5)) () (1 . #f) 4)) (cons) (1 . #f) 5)) (cadr) (2 . #f) 4)) ()", +" (1 . #f) 4)) () (1 . #f) 3)) () (1 . #f) 4)) (eqv? lambda) (1 . #f) 5)) () (1 .", +" #f) 4)) (eqv? ref) (2 . #f) 5)) () (1 . #f) 4)) (car) (2 . #f) 4) (((LREF 0 2 6", +") (PROC 1 0) (CALL 1)) ((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ((((GRE", +"F 0 0) (PROC 1 0) (LREF 2 0 2) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LRE", +"F 2 1 2) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LOAD 2 1) (LREF 3 0 1) (C", +"ALL 3)) ((((LREF 0 7 3) (PROC 1 0) (LREF 2 5 2) (LREF 3 0 1) (CALL 3)) ((((GREF ", +"0 0) (PROC 1 0) (LREF 2 0 1) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF ", +"2 4 1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (LREF 1 6 1) (LOAD 2 1) (LREF 3 0 1)", +" (CALL 3)) () (cons lambda) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons) (1 . #f) 5))", +" () (1 . #f) 5)) (cons ref) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons) (2 . #f) 5))", +" () (1 . #f) 4)) () (2 . #f) 3)) () (1 . #f) 3)) () (6 . #f) 4)) () (1 . #f) 8) ", +"(((LREF 0 0 1) (LSET 0 3 3) (PROC 0 0) (PROC 1 1) (CALL 1)) ((((PROC 0 0) (LREF ", +"1 0 1) (LOADF 2) (LOADF 3) (LOADF 4) (LOADF 5) (LOADF 6) (LOADF 7) (LOADF 8) (LO", +"ADF 9) (LOADF 10) (LOADF 11) (LOADF 12) (LOADF 13) (CALL 13)) ((((PROC 0 0) (LSE", +"T 0 0 13) (GREF 0 0) (PROC 1 1) (LOADN 2) (CALL 2)) ((((PROC 0 0) (LREF 1 0 1) (", +"CALL 1)) ((((PROC 0 0) (LREF 1 0 1) (LOADF 2) (CALL 2)) ((((PROC 0 0) (LSET 0 0 ", +"2) (LREF 0 0 2) (LREF 1 0 1) (LOADI 2 0) (LREF 3 2 3) (CALL 3)) ((((GREF 0 0) (P", +"ROC 1 0) (LREF 2 0 3) (CALL 2)) ((((LREF 0 0 1) (COND 0 112) (GREF 0 0) (PROC 1 ", +"0) (LREF 2 4 2) (LOADN 3) (CALL 3) 112 (PROC 0 1) (LREF 1 1 1) (CALL 1)) ((((GRE", +"F 0 0) (LREF 1 2 1) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) () (cons global) (1 . #f) ", +"5) (((PROC 0 0) (LREF 1 0 1) (LOADF 2) (CALL 2)) ((((PROC 0 0) (LSET 0 0 2) (GRE", +"F 0 0) (PROC 1 1) (LREF 2 3 3) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 3) (", +"CALL 2)) ((((LREF 0 0 1) (COND 0 113) (GREF 0 0) (PROC 1 0) (LREF 2 8 2) (LREF 3", +" 1 3) (CALL 3) 113 (GREF 0 1) (PROC 1 1) (LREF 2 1 3) (CALL 2)) ((((LREF 0 0 1) ", +"(COND 0 114) (GREF 0 0) (PROC 1 0) (LREF 2 2 2) (LOADN 3) (CALL 3) 114 (GREF 0 1", +") (PROC 1 1) (LREF 2 6 2) (LOADI 3 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2", +" 7 2) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (LREF 1 4 1) (LOAD 2 1) (LREF 3 0 1) ", +"(CALL 3)) () (cons local) (1 . #f) 5)) (cons) (1 . #f) 5) (((GREF 0 0) (PROC 1 0", +") (LREF 2 7 3) (CALL 2)) ((((LREF 0 9 2) (LREF 1 4 1) (LREF 2 1 1) (LREF 3 0 1) ", +"(CALL 3)) () () (1 . #f) 5)) (cdr) (1 . #f) 4)) (cons +) (1 . #f) 5) (((LREF 0 0", +" 1) (COND 0 115) (GREF 0 0) (PROC 1 0) (LREF 2 6 2) (LOADI 3 1) (CALL 3) 115 (GR", +"EF 0 1) (PROC 1 1) (LREF 2 2 3) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 7 3) ", +"(CALL 2)) ((((LREF 0 9 2) (LREF 1 4 1) (LREF 2 1 1) (LREF 3 0 1) (CALL 3)) () ()", +" (1 . #f) 5)) (cdr) (1 . #f) 4) (((GREF 0 0) (PROC 1 0) (LREF 2 10 2) (LREF 3 0 ", +"1) (CALL 3)) ((((LREF 0 0 1) (COND 0 116) (GREF 0 0) (PROC 1 0) (LREF 2 4 2) (LO", +"ADN 3) (CALL 3) 116 (GREF 0 1) (PROC 1 1) (LREF 2 4 2) (LOADI 3 1) (CALL 3)) (((", +"(GREF 0 0) (PROC 1 0) (LREF 2 9 2) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (LREF 1 ", +"6 1) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) () (cons local) (1 . #f) 5)) (cons) (1 . ", +"#f) 5) (((GREF 0 0) (PROC 1 0) (LREF 2 5 3) (CALL 2)) ((((LREF 0 7 2) (LREF 1 6 ", +"1) (LREF 2 1 1) (LREF 3 0 1) (CALL 3)) () () (1 . #f) 5)) (cdr) (1 . #f) 4)) (co", +"ns +) (1 . #f) 5)) (eq?) (1 . #f) 5)) (+ car) (1 . #f) 5)) (eq? null?) (1 . #f) ", +"5)) (symbol?) (3 . #f) 4) (((LREF 0 1 2) (LREF 1 1 1) (LOADI 2 1) (LREF 3 0 1) (", +"CALL 3)) () () (1 . #f) 5)) (car) (2 . #f) 4)) () (1 . #f) 4)) (cons) (1 . #f) 5", +")) (null?) (3 . #f) 4)) () (2 . #f) 5)) () (1 . #f) 4)) () (3 . #f) 3) (((LREF 0", +" 0 1) (LSET 0 1 12) (GREF 0 0) (PROC 1 0) (LOADN 2) (CALL 2)) ((((LREF 0 0 1) (L", +"SET 0 2 11) (GREF 0 0) (PROC 1 0) (LOADN 2) (CALL 2)) ((((LREF 0 0 1) (LSET 0 3 ", +"10) (GREF 0 0) (PROC 1 0) (LOADN 2) (CALL 2)) ((((LREF 0 0 1) (LSET 0 4 9) (PROC", +" 0 0) (LSET 0 4 8) (PROC 0 1) (LSET 0 4 7) (PROC 0 2) (LSET 0 4 6) (PROC 0 3) (P", +"ROC 1 4) (LOADI 2 0) (CALL 2)) ((((LREF 0 5 11) (PROC 1 0) (CALL 1)) ((((GREF 0 ", +"0) (PROC 1 0) (LREF 2 1 2) (LREF 3 0 1) (CALL 3)) ((((LREF 0 7 11) (LREF 1 2 1) ", +"(LREF 2 0 1) (CALL 2)) () () (1 . #f) 4)) (cons) (1 . #f) 5)) () (2 . #f) 3) (((", +"LREF 0 5 10) (PROC 1 0) (CALL 1)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 1) (CALL 2)", +") ((((PROC 0 0) (LREF 1 2 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 8 10) (PROC 1 0) ", +"(CALL 1)) ((((GREF 0 0) (PROC 1 0) (LREF 2 4 2) (LREF 3 0 1) (CALL 3)) ((((LREF ", +"0 10 10) (PROC 1 0) (LREF 2 0 1) (CALL 2)) ((((LREF 0 3 1) (LREF 1 3 2) (CALL 1)", +") () () (1 . #f) 3)) () (1 . #f) 4)) (cons) (1 . #f) 5)) () (2 . #f) 3)) () (1 .", +" #f) 4)) (length) (1 . #f) 4)) () (2 . #f) 3) (((LREF 0 5 9) (PROC 1 0) (CALL 1)", +") ((((GREF 0 0) (PROC 1 0) (LREF 2 0 1) (CALL 2)) ((((PROC 0 0) (LREF 1 2 1) (LR", +"EF 2 0 1) (CALL 2)) ((((LREF 0 8 9) (PROC 1 0) (CALL 1)) ((((GREF 0 0) (PROC 1 0", +") (LREF 2 4 2) (LREF 3 0 1) (CALL 3)) ((((LREF 0 10 9) (PROC 1 0) (LREF 2 0 1) (", +"CALL 2)) ((((LREF 0 3 1) (LREF 1 3 2) (CALL 1)) () () (1 . #f) 3)) () (1 . #f) 4", +")) (cons) (1 . #f) 5)) () (2 . #f) 3)) () (1 . #f) 4)) (length) (1 . #f) 4)) () ", +"(2 . #f) 3) (((LREF 0 0 1) (PROC 1 0) (CALL 1)) ((((PROC 0 0) (LREF 1 0 1) (LREF", +" 2 1 2) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 2 2) (LOADI 3 1) (CALL 3)) ((", +"((LREF 0 0 1) (LSET 0 3 2) (LREF 0 1 1) (LREF 1 1 2) (CALL 1)) () () (1 . #f) 3)", +") (+) (2 . #f) 5)) () (1 . #f) 4)) () (2 . #f) 3) (((LREF 0 0 1) (LSET 0 5 5) (P", +"ROC 0 0) (LSET 0 5 4) (PROC 0 1) (LSET 0 5 3) (PROC 0 2) (LSET 0 5 2) (LREF 0 5 ", +"1) (PROC 1 3) (CALL 1)) ((((LREF 0 6 11) (PROC 1 0) (CALL 1)) ((((GREF 0 0) (PRO", +"C 1 0) (LREF 2 1 2) (LREF 3 0 1) (CALL 3)) ((((LREF 0 8 11) (LREF 1 2 1) (LREF 2", +" 0 1) (CALL 2)) () () (1 . #f) 4)) (cons) (1 . #f) 5)) () (2 . #f) 3) (((GREF 0 ", +"0) (PROC 1 0) (LREF 2 0 2) (CALL 2)) ((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CA", +"LL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (LOAD 3 1) (CALL 3)) ((((PROC 0 0) ", +"(PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 117) (LREF 0 0 1) (LRE", +"F 1 0 2) (CALL 1) 117 (GREF 0 0) (PROC 1 0) (LREF 2 2 2) (LOAD 3 1) (CALL 3)) ((", +"((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 118) (LR", +"EF 0 0 1) (LREF 1 0 2) (CALL 1) 118 (GREF 0 0) (PROC 1 0) (LREF 2 4 2) (LOAD 3 1", +") (CALL 3)) ((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (C", +"OND 0 119) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 119 (GREF 0 0) (PROC 1 0) (LREF 2 ", +"6 2) (LOAD 3 1) (CALL 3)) ((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ((((", +"LREF 0 0 2) (COND 0 120) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 120 (LREF 0 0 1) (LO", +"ADF 1) (CALL 1)) () () (2 . #f) 3)) () (1 . #f) 4)) (eqv? undefined) (2 . #f) 5)", +") () (1 . #f) 4)) (eqv? quote) (2 . #f) 5)) () (1 . #f) 4)) (eqv? lambda) (2 . #", +"f) 5) (((LREF 0 0 1) (COND 0 121) (LREF 0 10 2) (LREF 1 2 1) (LREF 2 4 2) (LOADI", +" 3 0) (CALL 3) 121 (GREF 0 0) (PROC 1 0) (LREF 2 2 2) (LOAD 3 1) (CALL 3)) ((((P", +"ROC 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 122) (LREF 0 ", +"0 1) (LREF 1 0 2) (CALL 1) 122 (LREF 0 0 1) (LOADF 1) (CALL 1)) () () (2 . #f) 3", +") (((LREF 0 0 1) (COND 0 123) (LREF 0 17 8) (PROC 1 0) (LREF 2 6 2) (CALL 2) 123", +" (GREF 0 0) (PROC 1 1) (LREF 2 4 2) (LOAD 3 1) (CALL 3)) ((((LREF 0 13 2) (PROC ", +"1 0) (LREF 2 0 1) (LOADI 3 0) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 8 2) (C", +"ALL 2)) ((((LREF 0 15 12) (PROC 1 0) (CALL 1)) ((((LREF 0 16 13) (PROC 1 0) (LRE", +"F 2 1 1) (LREF 3 0 1) (CALL 3)) ((((PROC 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ", +"((((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LOAD 2", +" 1) (LREF 3 0 1) (CALL 3)) ((((LREF 0 0 1) (COND 0 124) (GREF 0 0) (PROC 1 0) (L", +"REF 2 2 2) (CALL 2) 124 (GREF 0 1) (PROC 1 1) (LREF 2 2 2) (CALL 2)) ((((LREF 0 ", +"21 6) (PROC 1 0) (LREF 2 0 1) (CALL 2)) ((((PROC 0 0) (LREF 1 4 1) (LREF 2 0 1) ", +"(CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (LOADN 3) (CALL 3)) ((((GREF 0 0", +") (PROC 1 0) (LOADI 2 0) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LOAD 2", +" 1) (LREF 3 0 1) (CALL 3)) ((((LREF 0 26 8) (LREF 1 3 1) (LREF 2 0 1) (CALL 2)) ", +"() () (1 . #f) 4)) (cons GSET) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons) (2 . #f) ", +"5)) () (1 . #f) 4)) () (1 . #f) 4) (((GREF 0 0) (PROC 1 0) (LOADI 2 0) (LREF 3 0", +" 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) ((((LRE", +"F 0 23 8) (LREF 1 5 1) (LREF 2 0 1) (CALL 2)) () () (1 . #f) 4)) (cons LSET) (1 ", +". #f) 5)) (cons) (1 . #f) 5)) (cadr cdr) (1 . #f) 4)) (eq? global) (1 . #f) 5)) ", +"(car) (2 . #f) 4) (((LREF 0 23 7) (PROC 1 0) (LREF 2 12 2) (CALL 2)) ((((LREF 0 ", +"19 3) (LREF 1 11 1) (LREF 2 0 1) (CALL 2)) () () (1 . #f) 4)) () (1 . #f) 4)) ()", +" (1 . #f) 4)) () (1 . #f) 5)) () (1 . #f) 3)) (cadr) (1 . #f) 4)) () (1 . #f) 5)", +" (((PROC 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 125) (LR", +"EF 0 0 1) (LREF 1 0 2) (CALL 1) 125 (LREF 0 0 1) (LOADF 1) (CALL 1)) () () (2 . ", +"#f) 3) (((LREF 0 0 1) (COND 0 126) (GREF 0 0) (PROC 1 0) (LREF 2 8 2) (CALL 2) 1", +"26 (LOADT 0) (COND 0 127) (PROC 0 1) (PROC 1 2) (CALL 1) 127 (LREF 0 6 1) (LOADU", +" 1) (CALL 1)) ((((LREF 0 15 2) (PROC 1 0) (LREF 2 0 1) (LOADI 3 0) (CALL 3)) (((", +"(LREF 0 16 5) (PROC 1 0) (CALL 1)) ((((PROC 0 0) (LREF 1 9 1) (LREF 2 0 1) (CALL", +" 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PR", +"OC 1 0) (LOADI 2 0) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LOAD 2 1) (", +"LREF 3 0 1) (CALL 3)) ((((LREF 0 21 8) (PROC 1 0) (LREF 2 0 1) (CALL 2)) ((((LRE", +"F 0 27 8) (PROC 1 0) (LREF 2 16 2) (CALL 2)) ((((LREF 0 23 3) (PROC 1 0) (LREF 2", +" 0 1) (CALL 2)) ((((LREF 0 24 4) (PROC 1 0) (LREF 2 6 2) (CALL 2)) ((((LREF 0 30", +" 7) (PROC 1 0) (LREF 2 19 2) (CALL 2)) ((((LREF 0 26 3) (LREF 1 8 1) (LREF 2 0 1", +") (CALL 2)) () () (1 . #f) 4)) () (1 . #f) 4)) () (1 . #f) 4)) () (1 . #f) 4)) (", +") (1 . #f) 4)) () (1 . #f) 4)) (cons COND) (1 . #f) 5)) (cons) (1 . #f) 5)) (con", +"s) (2 . #f) 5)) () (1 . #f) 4)) () (1 . #f) 3)) () (1 . #f) 5) (((PROC 0 0) (LRE", +"F 1 0 1) (LOADF 2) (CALL 2)) ((((PROC 0 0) (LSET 0 0 2) (LREF 0 0 2) (LREF 1 0 1", +") (LOADI 2 0) (LREF 3 10 2) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 3) (CAL", +"L 2)) ((((LREF 0 0 1) (COND 0 128) (LREF 0 1 1) (LOADU 1) (CALL 1) 128 (GREF 0 0", +") (PROC 1 0) (LREF 2 1 3) (CALL 2)) ((((LREF 0 19 2) (PROC 1 0) (LREF 2 0 1) (LR", +"EF 3 2 2) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 3 2) (LOADI 3 1) (CALL 3)) ", +"((((GREF 0 0) (PROC 1 0) (LREF 2 4 3) (CALL 2)) ((((LREF 0 6 2) (LREF 1 5 1) (LR", +"EF 2 1 1) (LREF 3 0 1) (CALL 3)) () () (1 . #f) 5)) (cdr) (1 . #f) 4)) (+) (1 . ", +"#f) 5)) () (1 . #f) 5)) (car) (1 . #f) 4)) (null?) (3 . #f) 4)) () (2 . #f) 5)) ", +"() (1 . #f) 4) (((GREF 0 0) (PROC 1 0) (LREF 2 9 2) (CALL 2)) ((((GREF 0 0) (PRO", +"C 1 0) (LREF 2 0 1) (LOADI 3 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 1) ", +"(LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) (", +"(((LREF 0 19 8) (LREF 1 11 1) (LREF 2 0 1) (CALL 2)) () () (1 . #f) 4)) (cons CA", +"LL) (1 . #f) 5)) (cons) (1 . #f) 5)) (-) (1 . #f) 5)) (length) (1 . #f) 4)) (cad", +"r) (1 . #f) 4)) () (1 . #f) 4)) (eqv? if) (1 . #f) 5)) () (1 . #f) 4)) (eqv? set", +"!) (1 . #f) 5)) () (1 . #f) 4)) (eqv? ref) (2 . #f) 5)) () (1 . #f) 4)) (car) (2", +" . #f) 4) (((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (CALL 2)) ((((PROC 0 0) (LREF 1 1", +" 1) (LREF 2 0 1) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (LOAD 3 1) (CAL", +"L 3)) ((((PROC 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 12", +"9) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 129 (LREF 0 0 1) (LOADF 1) (CALL 1)) () ()", +" (2 . #f) 3) (((LREF 0 0 1) (COND 0 130) (GREF 0 0) (PROC 1 0) (LREF 2 4 2) (CAL", +"L 2) 130 (GREF 0 1) (PROC 1 1) (LREF 2 2 2) (LOAD 3 2) (CALL 3)) ((((LREF 0 11 1", +"2) (PROC 1 0) (CALL 1)) ((((LREF 0 12 13) (PROC 1 0) (LREF 2 1 1) (LREF 3 0 1) (", +"CALL 3)) ((((PROC 0 0) (LREF 1 5 1) (LREF 2 0 1) (CALL 2)) ((((GREF 0 0) (PROC 1", +" 0) (LREF 2 0 2) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LOAD 2 1) (LREF 3 0 1) (CAL", +"L 3)) ((((LREF 0 0 1) (COND 0 131) (GREF 0 0) (PROC 1 0) (LREF 2 2 2) (CALL 2) 1", +"31 (GREF 0 1) (PROC 1 1) (LREF 2 2 2) (CALL 2)) ((((LREF 0 17 6) (PROC 1 0) (LRE", +"F 2 0 1) (CALL 2)) ((((PROC 0 0) (LREF 1 4 1) (LREF 2 0 1) (CALL 2)) ((((GREF 0 ", +"0) (PROC 1 0) (LREF 2 0 2) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 ", +"14 3) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LOAD 2 1) (LREF 3 0 1) (C", +"ALL 3)) ((((LREF 0 22 8) (LREF 1 3 1) (LREF 2 0 1) (CALL 2)) () () (1 . #f) 4)) ", +"(cons GREF) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons) (2 . #f) 5)) () (1 . #f) 4))", +" () (1 . #f) 4) (((GREF 0 0) (PROC 1 0) (LREF 2 11 3) (LREF 3 0 1) (CALL 3)) (((", +"(GREF 0 0) (PROC 1 0) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) ((((LREF 0 19 8) (LREF 1", +" 5 1) (LREF 2 0 1) (CALL 2)) () () (1 . #f) 4)) (cons LREF) (1 . #f) 5)) (cons) ", +"(1 . #f) 5)) (cadr cdr) (1 . #f) 4)) (eq? global) (1 . #f) 5)) (car) (2 . #f) 4)", +") () (1 . #f) 4)) () (1 . #f) 5)) () (1 . #f) 3) (((PROC 0 0) (PROC 1 1) (LREF 2", +" 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 132) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) ", +"132 (LREF 0 0 1) (LOADF 1) (CALL 1)) () () (2 . #f) 3) (((LREF 0 0 1) (COND 0 13", +"3) (GREF 0 0) (PROC 1 0) (LREF 2 6 2) (CALL 2) 133 (GREF 0 1) (PROC 1 1) (LREF 2", +" 4 2) (LOAD 3 2) (CALL 3)) ((((PROC 0 0) (LREF 1 5 1) (LREF 2 0 1) (CALL 2)) (((", +"(GREF 0 0) (PROC 1 0) (LOADT 2) (LREF 3 0 2) (CALL 3)) ((((LREF 0 0 1) (COND 0 1", +"34) (GREF 0 0) (PROC 1 0) (LREF 2 9 3) (LOADN 3) (CALL 3) 134 (GREF 0 1) (PROC 1", +" 1) (LOADF 2) (LREF 3 1 2) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LOAD 2 1) (LREF 3", +" 0 1) (CALL 3)) ((((LREF 0 17 8) (LREF 1 3 1) (LREF 2 0 1) (CALL 2)) () () (1 . ", +"#f) 4)) (cons LOADT) (1 . #f) 5) (((LREF 0 0 1) (COND 0 135) (GREF 0 0) (PROC 1 ", +"0) (LREF 2 10 3) (LOADN 3) (CALL 3) 135 (GREF 0 1) (PROC 1 1) (LREF 2 2 2) (CALL", +" 2)) ((((GREF 0 0) (PROC 1 0) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) ((((LREF 0 18 8)", +" (LREF 1 4 1) (LREF 2 0 1) (CALL 2)) () () (1 . #f) 4)) (cons LOADF) (1 . #f) 5)", +" (((LREF 0 0 1) (COND 0 136) (GREF 0 0) (PROC 1 0) (LREF 2 11 3) (LOADN 3) (CALL", +" 3) 136 (GREF 0 1) (PROC 1 1) (LOADU 2) (LREF 3 3 2) (CALL 3)) ((((GREF 0 0) (PR", +"OC 1 0) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) ((((LREF 0 19 8) (LREF 1 5 1) (LREF 2 ", +"0 1) (CALL 2)) () () (1 . #f) 4)) (cons LOADN) (1 . #f) 5) (((LREF 0 0 1) (COND ", +"0 137) (GREF 0 0) (PROC 1 0) (LREF 2 12 3) (LOADN 3) (CALL 3) 137 (PROC 0 1) (PR", +"OC 1 2) (CALL 1)) ((((GREF 0 0) (PROC 1 0) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) (((", +"(LREF 0 20 8) (LREF 1 6 1) (LREF 2 0 1) (CALL 2)) () () (1 . #f) 4)) (cons LOADU", +") (1 . #f) 5) (((LREF 0 24 5) (PROC 1 0) (LREF 2 5 2) (CALL 2)) ((((LREF 0 0 1) ", +"(COND 0 138) (GREF 0 0) (LREF 1 1 1) (LOADI 2 -127) (LREF 3 6 2) (LOADI 4 127) (", +"CALL 4) 138 (LREF 0 1 1) (LOADF 1) (CALL 1)) () (<=) (1 . #f) 6)) () (1 . #f) 4)", +" (((LREF 0 0 1) (COND 0 139) (GREF 0 0) (PROC 1 0) (LREF 2 5 2) (LOADN 3) (CALL ", +"3) 139 (LREF 0 19 6) (PROC 1 1) (LREF 2 5 2) (CALL 2)) ((((GREF 0 0) (PROC 1 0) ", +"(LREF 2 14 3) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LOAD 2 1) (LREF 3", +" 0 1) (CALL 3)) ((((LREF 0 22 8) (LREF 1 8 1) (LREF 2 0 1) (CALL 2)) () () (1 . ", +"#f) 4)) (cons LOADI) (1 . #f) 5)) (cons) (1 . #f) 5) (((PROC 0 0) (LREF 1 6 1) (", +"LREF 2 0 1) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (LOADN 3) (CALL 3)) ", +"((((GREF 0 0) (PROC 1 0) (LREF 2 16 3) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PRO", +"C 1 0) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) ((((LREF 0 24 8) (LREF 1 3 1) (LREF 2 0", +" 1) (CALL 2)) () () (1 . #f) 4)) (cons LOAD) (1 . #f) 5)) (cons) (1 . #f) 5)) (c", +"ons) (2 . #f) 5)) () (1 . #f) 4)) (cons) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons ", +"eq?) (1 . #f) 5)) (cons null?) (1 . #f) 5)) (cons eq?) (1 . #f) 5)) (eq?) (2 . #", +"f) 5)) () (1 . #f) 4) (((PROC 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 ", +"0 2) (COND 0 140) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 140 (LREF 0 0 1) (LOADF 1) ", +"(CALL 1)) () () (2 . #f) 3) (((LREF 0 0 1) (COND 0 141) (GREF 0 0) (PROC 1 0) (L", +"REF 2 8 3) (LOADN 3) (CALL 3) 141 (GREF 0 1) (PROC 1 1) (LREF 2 6 2) (LOAD 3 2) ", +"(CALL 3)) ((((GREF 0 0) (PROC 1 0) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) ((((LREF 0 ", +"16 8) (LREF 1 8 1) (LREF 2 0 1) (CALL 2)) () () (1 . #f) 4)) (cons LOADU) (1 . #", +"f) 5) (((PROC 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 142", +") (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 142 (LREF 0 0 1) (LOADF 1) (CALL 1)) () () ", +"(2 . #f) 3) (((LREF 0 0 1) (COND 0 143) (PROC 0 0) (PROC 1 1) (CALL 1) 143 (LREF", +" 0 8 1) (LOADU 1) (CALL 1)) ((((PROC 0 0) (LREF 1 0 1) (LOADF 2) (CALL 2)) ((((P", +"ROC 0 0) (LSET 0 0 2) (LREF 0 23 8) (PROC 1 1) (LREF 2 12 2) (CALL 2)) ((((GREF ", +"0 0) (PROC 1 0) (LREF 2 0 2) (CALL 2)) ((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (", +"CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (LOAD 3 1) (CALL 3)) ((((PROC 0 0", +") (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 144) (LREF 0 0 1) (L", +"REF 1 0 2) (CALL 1) 144 (GREF 0 0) (PROC 1 0) (LREF 2 2 2) (LOAD 3 1) (CALL 3)) ", +"((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 145) (", +"LREF 0 0 1) (LREF 1 0 2) (CALL 1) 145 (GREF 0 0) (PROC 1 0) (LREF 2 4 2) (LOAD 3", +" 1) (CALL 3)) ((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) ", +"(COND 0 146) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 146 (GREF 0 0) (PROC 1 0) (LREF ", +"2 6 2) (LOAD 3 1) (CALL 3)) ((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ((", +"((LREF 0 0 2) (COND 0 147) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 147 (LREF 0 0 1) (", +"LOADF 1) (CALL 1)) () () (2 . #f) 3)) () (1 . #f) 4)) (eqv? undefined) (2 . #f) ", +"5)) () (1 . #f) 4)) (eqv? quote) (2 . #f) 5)) () (1 . #f) 4)) (eqv? lambda) (2 .", +" #f) 5) (((LREF 0 0 1) (COND 0 148) (LREF 0 2 1) (LOADI 1 1) (CALL 1) 148 (GREF ", +"0 0) (PROC 1 0) (LREF 2 2 2) (LOAD 3 1) (CALL 3)) ((((PROC 0 0) (PROC 1 1) (LREF", +" 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 149) (LREF 0 0 1) (LREF 1 0 2) (CALL 1", +") 149 (LREF 0 0 1) (LOADF 1) (CALL 1)) () () (2 . #f) 3) (((LREF 0 0 1) (COND 0 ", +"150) (LREF 0 30 8) (PROC 1 0) (LREF 2 6 2) (CALL 2) 150 (GREF 0 0) (PROC 1 1) (L", +"REF 2 4 2) (LOAD 3 1) (CALL 3)) ((((LREF 0 8 2) (PROC 1 0) (LREF 2 0 1) (CALL 2)", +") ((((LREF 0 32 7) (PROC 1 0) (LREF 2 8 2) (CALL 2)) ((((LREF 0 10 2) (PROC 1 0)", +" (LREF 2 0 1) (CALL 2)) ((((LREF 0 34 6) (LREF 1 8 1) (LREF 2 2 1) (LREF 3 0 1) ", +"(CALL 3)) () () (1 . #f) 5)) () (1 . #f) 4)) () (1 . #f) 4)) () (1 . #f) 4) (((P", +"ROC 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 151) (LREF 0 ", +"0 1) (LREF 1 0 2) (CALL 1) 151 (LREF 0 0 1) (LOADF 1) (CALL 1)) () () (2 . #f) 3", +") (((LREF 0 0 1) (COND 0 152) (LREF 0 32 7) (PROC 1 0) (LREF 2 8 2) (CALL 2) 152", +" (LOADT 0) (COND 0 153) (GREF 0 0) (PROC 1 1) (LREF 2 8 2) (CALL 2) 153 (LREF 0 ", +"6 1) (LOADU 1) (CALL 1)) ((((LREF 0 10 2) (LREF 1 7 1) (LREF 2 0 1) (CALL 2)) ()", +" () (1 . #f) 4) (((GREF 0 0) (LREF 1 7 1) (LOADI 2 1) (LREF 3 0 1) (CALL 3)) () ", +"(+) (1 . #f) 5)) (length) (1 . #f) 4)) () (1 . #f) 4)) (eqv? set!) (1 . #f) 5)) ", +"() (1 . #f) 4)) (eqv? if) (1 . #f) 5)) () (1 . #f) 4)) (eqv? ref) (2 . #f) 5)) (", +") (1 . #f) 4)) (car) (2 . #f) 4) (((LREF 0 1 2) (LREF 1 1 1) (LREF 2 0 1) (CALL ", +"2)) () () (1 . #f) 4)) () (2 . #f) 4)) () (1 . #f) 4) (((PROC 0 0) (PROC 1 1) (C", +"ALL 1)) ((((PROC 0 0) (LREF 1 0 1) (LOADF 2) (CALL 2)) ((((PROC 0 0) (LSET 0 0 2", +") (GREF 0 0) (PROC 1 1) (LREF 2 13 2) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2", +" 0 2) (CALL 2)) ((((LREF 0 0 1) (COND 0 154) (GREF 0 0) (LREF 1 1 1) (LREF 2 1 3", +") (LOADT 3) (CALL 3) 154 (GREF 0 1) (PROC 1 0) (LREF 2 1 2) (CALL 2)) ((((LREF 0", +" 0 1) (COND 0 155) (GREF 0 0) (LREF 1 2 1) (LREF 2 2 3) (LOADF 3) (CALL 3) 155 (", +"GREF 0 1) (PROC 1 0) (LREF 2 2 2) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LOADI 2 1)", +" (LREF 3 3 3) (CALL 3)) ((((LREF 0 5 2) (LREF 1 4 1) (LREF 2 1 1) (LREF 3 0 1) (", +"CALL 3)) () () (1 . #f) 5)) (+) (1 . #f) 5)) (cons cdr) (1 . #f) 5)) (cons null?", +") (1 . #f) 5)) (symbol?) (3 . #f) 4) (((LREF 0 1 2) (LREF 1 1 1) (LREF 2 0 1) (L", +"OADI 3 0) (CALL 3)) () () (1 . #f) 5)) (cadr) (2 . #f) 4)) () (1 . #f) 4) (((PRO", +"C 0 0) (LREF 1 10 1) (LREF 2 1 1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0", +") (LREF 2 19 11) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 14 2) (CAL", +"L 2)) ((((LREF 0 21 12) (PROC 1 0) (CALL 1)) ((((GREF 0 0) (PROC 1 0) (LREF 2 1 ", +"1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 23 12) (LREF 3 0 1) (", +"CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 24 10) (LOADN 3) (CALL 3)) ((((GREF 0 ", +"0) (PROC 1 0) (LREF 2 25 9) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2", +" 6 1) (LREF 3 2 1) (LREF 4 1 1) (LREF 5 0 1) (CALL 5)) ((((GREF 0 0) (PROC 1 0) ", +"(LREF 2 0 1) (PROC 3 1) (CALL 3)) ((((PROC 0 0) (LREF 1 9 1) (LREF 2 0 1) (CALL ", +"2)) ((((LREF 0 29 7) (PROC 1 0) (LREF 2 0 2) (CALL 2)) ((((PROC 0 0) (LREF 1 1 1", +") (LREF 2 0 1) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (LOADN 3) (CALL 3", +")) ((((GREF 0 0) (PROC 1 0) (LREF 2 26 3) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (", +"PROC 1 0) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) ((((LREF 0 34 8) (LREF 1 3 1) (LREF ", +"2 0 1) (CALL 2)) () () (1 . #f) 4)) (cons PROC) (1 . #f) 5)) (cons) (1 . #f) 5))", +" (cons) (2 . #f) 5)) () (1 . #f) 4)) () (2 . #f) 4)) () (1 . #f) 4) (((LREF 0 33", +" 8) (PROC 1 0) (LREF 2 22 2) (CALL 2)) ((((LREF 0 29 3) (PROC 1 0) (LREF 2 0 1) ", +"(CALL 2)) ((((LREF 0 30 11) (PROC 1 0) (CALL 1)) ((((GREF 0 0) (PROC 1 0) (LREF ", +"2 0 1) (CALL 2)) ((((LREF 0 32 10) (PROC 1 0) (CALL 1)) ((((GREF 0 0) (PROC 1 0)", +" (LREF 2 0 1) (CALL 2)) ((((LREF 0 34 9) (PROC 1 0) (CALL 1)) ((((GREF 0 0) (PRO", +"C 1 0) (LREF 2 0 1) (CALL 2)) ((((GREF 0 0) (LREF 1 8 1) (LREF 2 4 1) (LREF 3 2 ", +"1) (LREF 4 0 1) (LREF 5 17 3) (LREF 6 17 2) (CALL 6)) () (list) (1 . #f) 8)) (re", +"verse) (1 . #f) 4)) () (1 . #f) 3)) (reverse) (1 . #f) 4)) () (1 . #f) 3)) (reve", +"rse) (1 . #f) 4)) () (1 . #f) 3)) () (1 . #f) 4)) () (1 . #f) 4)) (with-dynamic-", +"environment) (1 . #f) 5)) (list) (1 . #f) 7)) (cons) (1 . #f) 5)) (cons) (1 . #f", +") 5)) (cons) (1 . #f) 5)) (cons) (1 . #f) 5)) () (1 . #f) 3)) (cadr) (1 . #f) 4)", +") (cons) (3 . #f) 5)) () (1 . #f) 5)) () (1 . #f) 3)) () (1 . #f) 3)) () (1 . #f", +") 4)) (cons eqv? lambda) (1 . #f) 5)) () (1 . #f) 4)) (cadr eqv? undefined) (1 .", +" #f) 5)) () (1 . #f) 4)) (cadr eqv? quote) (1 . #f) 5)) () (1 . #f) 4)) (eqv? re", +"f) (2 . #f) 5)) () (1 . #f) 4)) (car) (3 . #f) 4) (((GREF 0 0) (PROC 1 0) (LREF ", +"2 6 11) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 7 12) (LOADN 3) (CA", +"LL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 8 10) (LOADN 3) (CALL 3)) ((((GREF 0 0) ", +"(PROC 1 0) (LREF 2 9 9) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 3 1", +") (LREF 3 2 1) (LREF 4 1 1) (LREF 5 0 1) (CALL 5)) ((((GREF 0 0) (LREF 1 5 1) (L", +"REF 2 0 1) (PROC 3 0) (CALL 3)) ((((LREF 0 12 3) (PROC 1 0) (LREF 2 6 2) (CALL 2", +")) ((((LREF 0 13 10) (PROC 1 0) (CALL 1)) ((((GREF 0 0) (LREF 1 2 1) (LREF 2 0 1", +") (CALL 2)) () (car) (1 . #f) 4)) () (1 . #f) 3)) () (1 . #f) 4)) (with-dynamic-", +"environment) (1 . #f) 5)) (list) (1 . #f) 7)) (cons) (1 . #f) 5)) (cons) (1 . #f", +") 5)) (cons) (1 . #f) 5)) (cons) (2 . #f) 5)) () (1 . #f) 3)) () (1 . #f) 4)) (m", +"ake-parameter) (1 . #f) 4)) (make-parameter) (1 . #f) 4)) (make-parameter) (1 . ", +"#f) 4)) (make-parameter) (13 . #f) 4)) () (1 . #f) 15) (((LREF 0 0 1) (LSET 0 4 ", +"2) (LREF 0 4 1) (PROC 1 0) (CALL 1)) ((((GREF 0 0) (PROC 1 0) (GREF 2 1) (LREF 3", +" 0 2) (LREF 4 0 3) (CALL 4)) ((((LREF 0 6 4) (PROC 1 0) (LREF 2 0 1) (CALL 2)) (", +"(((LREF 0 7 3) (PROC 1 0) (LREF 2 0 1) (CALL 2)) ((((LREF 0 8 2) (LREF 1 3 1) (L", +"REF 2 0 1) (CALL 2)) () () (1 . #f) 4)) () (1 . #f) 4)) () (1 . #f) 4)) (apply e", +"xpand) (2 . #t) 6)) () (1 . #f) 3)) () (1 . #f) 3)) () (1 . #f) 3)) () (1 . #f) ", +"4)) (make-parameter) (8 . #f) 4)) () (1 . #f) 10)) () (1 . #f) 3) (((LREF 0 0 2)", +" (GSET 0 0) (LREF 0 0 1) (LOADU 1) (CALL 1)) () (compile) (2 . #f) 3)) (compile ", +"call-with-values) (1 . #f) 5)) () (1 . #f) 3) (((PROC 0 0) (LREF 1 0 1) (CALL 1)", +") ((((PROC 0 0) (LREF 1 0 1) (LOADF 2) (LOADF 3) (LOADF 4) (LOADF 5) (LOADF 6) (", +"LOADF 7) (LOADF 8) (LOADF 9) (LOADF 10) (LOADF 11) (LOADF 12) (LOADF 13) (LOADF ", +"14) (LOADF 15) (LOADF 16) (LOADF 17) (LOADF 18) (LOADF 19) (LOADF 20) (LOADF 21)", +" (LOADF 22) (LOADF 23) (LOADF 24) (LOADF 25) (CALL 25)) ((((PROC 0 0) (LSET 0 0 ", +"25) (PROC 0 1) (LSET 0 0 24) (PROC 0 2) (LSET 0 0 23) (PROC 0 3) (LSET 0 0 22) (", +"PROC 0 4) (LSET 0 0 21) (PROC 0 5) (LSET 0 0 20) (PROC 0 6) (PROC 1 7) (GREF 2 0", +") (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (LREF 3 0 3) (CALL 3)) ((((GRE", +"F 0 0) (LREF 1 1 1) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) () (make-record identifier", +") (1 . #f) 5)) (vector) (3 . #f) 5) (((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (CALL 2", +")) ((((LREF 0 0 1) (COND 0 156) (GREF 0 0) (PROC 1 0) (LREF 2 1 2) (CALL 2) 156 ", +"(LREF 0 1 1) (LOADF 1) (CALL 1)) ((((GREF 0 0) (LREF 1 2 1) (LREF 2 0 1) (LOAD 3", +" 1) (CALL 3)) () (eq? identifier) (1 . #f) 5)) (record-type) (1 . #f) 4)) (recor", +"d?) (2 . #f) 4) (((LREF 0 1 24) (PROC 1 0) (LREF 2 0 2) (CALL 2)) ((((LREF 0 0 1", +") (COND 0 157) (GREF 0 0) (PROC 1 0) (LREF 2 1 2) (CALL 2) 157 (GREF 0 1) (LREF ", +"1 1 1) (LOAD 2 2) (LREF 3 1 2) (LOAD 4 3) (CALL 4)) ((((GREF 0 0) (LREF 1 2 1) (", +"LREF 2 0 1) (LOADI 3 1) (CALL 3)) () (vector-ref) (1 . #f) 5)) (record-datum err", +"or \"record type mismatch\" identifier) (1 . #f) 6)) () (2 . #f) 4) (((LREF 0 1 24", +") (PROC 1 0) (LREF 2 0 2) (CALL 2)) ((((LREF 0 0 1) (COND 0 158) (GREF 0 0) (PRO", +"C 1 0) (LREF 2 1 2) (CALL 2) 158 (GREF 0 1) (LREF 1 1 1) (LOAD 2 2) (LREF 3 1 2)", +" (LOAD 4 3) (CALL 4)) ((((GREF 0 0) (LREF 1 2 1) (LREF 2 0 1) (LOADI 3 0) (CALL ", +"3)) () (vector-ref) (1 . #f) 5)) (record-datum error \"record type mismatch\" iden", +"tifier) (1 . #f) 6)) () (2 . #f) 4) (((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (CALL 2", +")) ((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 159", +") (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 159 (LREF 0 3 24) (PROC 1 0) (LREF 2 2 2) (", +"CALL 2)) ((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND", +" 0 160) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 160 (LREF 0 0 1) (LOADF 1) (CALL 1)) ", +"() () (2 . #f) 3)) () (1 . #f) 4)) () (2 . #f) 4)) () (1 . #f) 4)) (symbol?) (2 ", +". #f) 4) (((PROC 0 0) (PROC 1 1) (CALL 1)) ((((GREF 0 0) (PROC 1 0) (LREF 2 1 2)", +" (CALL 2)) ((((LREF 0 0 1) (COND 0 161) (GREF 0 0) (LREF 1 1 1) (LREF 2 2 3) (CA", +"LL 2) 161 (LREF 0 1 1) (LOADF 1) (CALL 1)) () (symbol?) (1 . #f) 4)) (symbol?) (", +"1 . #f) 4) (((LREF 0 0 1) (COND 0 162) (GREF 0 0) (LREF 1 1 1) (LREF 2 1 2) (LRE", +"F 3 1 3) (CALL 3) 162 (PROC 0 0) (PROC 1 1) (CALL 1)) ((((LREF 0 3 24) (PROC 1 0", +") (LREF 2 2 2) (CALL 2)) ((((LREF 0 0 1) (COND 0 163) (LREF 0 4 24) (LREF 1 1 1)", +" (LREF 2 3 3) (CALL 2) 163 (LREF 0 1 1) (LOADF 1) (CALL 1)) () () (1 . #f) 4)) (", +") (1 . #f) 4) (((LREF 0 0 1) (COND 0 164) (LREF 0 3 22) (PROC 1 0) (LREF 2 2 2) ", +"(CALL 2) 164 (LREF 0 2 1) (LOADF 1) (CALL 1)) ((((LREF 0 4 23) (PROC 1 0) (LREF ", +"2 3 2) (CALL 2)) ((((LREF 0 5 13) (PROC 1 0) (LREF 2 1 1) (LREF 3 0 1) (CALL 3))", +" ((((LREF 0 6 22) (PROC 1 0) (LREF 2 5 3) (CALL 2)) ((((LREF 0 7 23) (PROC 1 0) ", +"(LREF 2 6 3) (CALL 2)) ((((LREF 0 8 13) (PROC 1 0) (LREF 2 1 1) (LREF 3 0 1) (CA", +"LL 3)) ((((GREF 0 0) (LREF 1 8 1) (LREF 2 3 1) (LREF 3 0 1) (CALL 3)) () (eq?) (", +"1 . #f) 5)) () (1 . #f) 5)) () (1 . #f) 4)) () (1 . #f) 4)) () (1 . #f) 5)) () (", +"1 . #f) 4)) () (1 . #f) 4)) (eq?) (1 . #f) 5)) () (3 . #f) 3) (((LREF 0 0 1) (PR", +"OC 1 0) (CALL 1)) ((((LREF 0 2 24) (PROC 1 0) (LREF 2 0 2) (CALL 2)) ((((LREF 0 ", +"0 1) (COND 0 165) (LREF 0 3 20) (LREF 1 1 1) (LREF 2 1 2) (LREF 3 1 3) (CALL 3) ", +"165 (LREF 0 2 2) (LREF 1 1 1) (LREF 2 1 2) (LREF 3 1 3) (CALL 3)) () () (1 . #f)", +" 5)) () (3 . #f) 4)) () (2 . #f) 3) (((LREF 0 0 1) (GSET 0 0) (PROC 0 0) (LSET 0", +" 1 19) (PROC 0 1) (LSET 0 1 18) (PROC 0 2) (LSET 0 1 17) (PROC 0 3) (LSET 0 1 16", +") (PROC 0 4) (LSET 0 1 15) (PROC 0 5) (LSET 0 1 14) (PROC 0 6) (LSET 0 1 13) (PR", +"OC 0 7) (PROC 1 8) (LOADI 2 0) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (", +"LREF 3 0 3) (LREF 4 0 4) (CALL 4)) ((((GREF 0 0) (LREF 1 1 1) (LOAD 2 1) (LREF 3", +" 0 1) (CALL 3)) () (make-record environment) (1 . #f) 5)) (vector) (4 . #f) 6) (", +"((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (CALL 2)) ((((LREF 0 0 1) (COND 0 166) (GREF", +" 0 0) (PROC 1 0) (LREF 2 1 2) (CALL 2) 166 (LREF 0 1 1) (LOADF 1) (CALL 1)) ((((", +"GREF 0 0) (LREF 1 2 1) (LREF 2 0 1) (LOAD 3 1) (CALL 3)) () (eq? environment) (1", +" . #f) 5)) (record-type) (1 . #f) 4)) (record?) (2 . #f) 4) (((LREF 0 2 18) (PRO", +"C 1 0) (LREF 2 0 2) (CALL 2)) ((((LREF 0 0 1) (COND 0 167) (GREF 0 0) (PROC 1 0)", +" (LREF 2 1 2) (CALL 2) 167 (GREF 0 1) (LREF 1 1 1) (LOAD 2 2) (LREF 3 1 2) (LOAD", +" 4 3) (CALL 4)) ((((GREF 0 0) (LREF 1 2 1) (LREF 2 0 1) (LOADI 3 2) (CALL 3)) ()", +" (vector-ref) (1 . #f) 5)) (record-datum error \"record type mismatch\" environmen", +"t) (1 . #f) 6)) () (2 . #f) 4) (((LREF 0 2 18) (PROC 1 0) (LREF 2 0 2) (CALL 2))", +" ((((LREF 0 0 1) (COND 0 168) (GREF 0 0) (PROC 1 0) (LREF 2 1 2) (CALL 2) 168 (G", +"REF 0 1) (LREF 1 1 1) (LOAD 2 2) (LREF 3 1 2) (LOAD 4 3) (CALL 4)) ((((GREF 0 0)", +" (LREF 1 2 1) (LREF 2 0 1) (LOADI 3 1) (CALL 3)) () (vector-ref) (1 . #f) 5)) (r", +"ecord-datum error \"record type mismatch\" environment) (1 . #f) 6)) () (2 . #f) 4", +") (((LREF 0 2 18) (PROC 1 0) (LREF 2 0 2) (CALL 2)) ((((LREF 0 0 1) (COND 0 169)", +" (GREF 0 0) (PROC 1 0) (LREF 2 1 2) (CALL 2) 169 (GREF 0 1) (LREF 1 1 1) (LOAD 2", " 2) (LREF 3 1 2) (LOAD 4 3) (CALL 4)) ((((GREF 0 0) (LREF 1 2 1) (LREF 2 0 1) (L", -"OADI 3 1) (CALL 3)) () (vector-ref) (1 . #f) 5)) (record-datum error \"record typ", -"e mismatch\" identifier) (1 . #f) 6)) () (2 . #f) 4) (((LREF 0 1 24) (PROC 1 0) (", -"LREF 2 0 2) (CALL 2)) ((((LREF 0 0 1) (COND 0 159) (GREF 0 0) (PROC 1 0) (LREF 2", -" 1 2) (CALL 2) 159 (GREF 0 1) (LREF 1 1 1) (LOAD 2 2) (LREF 3 1 2) (LOAD 4 3) (C", -"ALL 4)) ((((GREF 0 0) (LREF 1 2 1) (LREF 2 0 1) (LOADI 3 0) (CALL 3)) () (vector", -"-ref) (1 . #f) 5)) (record-datum error \"record type mismatch\" identifier) (1 . #", -"f) 6)) () (2 . #f) 4) (((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (CALL 2)) ((((PROC 0 ", -"0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 160) (LREF 0 0 1)", -" (LREF 1 0 2) (CALL 1) 160 (LREF 0 3 24) (PROC 1 0) (LREF 2 2 2) (CALL 2)) ((((P", -"ROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 161) (LREF ", -"0 0 1) (LREF 1 0 2) (CALL 1) 161 (LREF 0 0 1) (LOADF 1) (CALL 1)) () () (2 . #f)", -" 3)) () (1 . #f) 4)) () (2 . #f) 4)) () (1 . #f) 4)) (symbol?) (2 . #f) 4) (((PR", -"OC 0 0) (PROC 1 1) (CALL 1)) ((((GREF 0 0) (PROC 1 0) (LREF 2 1 2) (CALL 2)) (((", -"(LREF 0 0 1) (COND 0 162) (GREF 0 0) (LREF 1 1 1) (LREF 2 2 3) (CALL 2) 162 (LRE", -"F 0 1 1) (LOADF 1) (CALL 1)) () (symbol?) (1 . #f) 4)) (symbol?) (1 . #f) 4) (((", -"LREF 0 0 1) (COND 0 163) (GREF 0 0) (LREF 1 1 1) (LREF 2 1 2) (LREF 3 1 3) (CALL", -" 3) 163 (PROC 0 0) (PROC 1 1) (CALL 1)) ((((LREF 0 3 24) (PROC 1 0) (LREF 2 2 2)", -" (CALL 2)) ((((LREF 0 0 1) (COND 0 164) (LREF 0 4 24) (LREF 1 1 1) (LREF 2 3 3) ", -"(CALL 2) 164 (LREF 0 1 1) (LOADF 1) (CALL 1)) () () (1 . #f) 4)) () (1 . #f) 4) ", -"(((LREF 0 0 1) (COND 0 165) (LREF 0 3 22) (PROC 1 0) (LREF 2 2 2) (CALL 2) 165 (", -"LREF 0 2 1) (LOADF 1) (CALL 1)) ((((LREF 0 4 23) (PROC 1 0) (LREF 2 3 2) (CALL 2", -")) ((((LREF 0 5 13) (PROC 1 0) (LREF 2 1 1) (LREF 3 0 1) (CALL 3)) ((((LREF 0 6 ", -"22) (PROC 1 0) (LREF 2 5 3) (CALL 2)) ((((LREF 0 7 23) (PROC 1 0) (LREF 2 6 3) (", -"CALL 2)) ((((LREF 0 8 13) (PROC 1 0) (LREF 2 1 1) (LREF 3 0 1) (CALL 3)) ((((GRE", -"F 0 0) (LREF 1 8 1) (LREF 2 3 1) (LREF 3 0 1) (CALL 3)) () (eq?) (1 . #f) 5)) ()", -" (1 . #f) 5)) () (1 . #f) 4)) () (1 . #f) 4)) () (1 . #f) 5)) () (1 . #f) 4)) ()", -" (1 . #f) 4)) (eq?) (1 . #f) 5)) () (3 . #f) 3) (((LREF 0 0 1) (PROC 1 0) (CALL ", -"1)) ((((LREF 0 2 24) (PROC 1 0) (LREF 2 0 2) (CALL 2)) ((((LREF 0 0 1) (COND 0 1", -"66) (LREF 0 3 20) (LREF 1 1 1) (LREF 2 1 2) (LREF 3 1 3) (CALL 3) 166 (LREF 0 2 ", -"2) (LREF 1 1 1) (LREF 2 1 2) (LREF 3 1 3) (CALL 3)) () () (1 . #f) 5)) () (3 . #", -"f) 4)) () (2 . #f) 3) (((LREF 0 0 1) (GSET 0 0) (PROC 0 0) (LSET 0 1 19) (PROC 0", -" 1) (LSET 0 1 18) (PROC 0 2) (LSET 0 1 17) (PROC 0 3) (LSET 0 1 16) (PROC 0 4) (", -"LSET 0 1 15) (PROC 0 5) (LSET 0 1 14) (PROC 0 6) (LSET 0 1 13) (PROC 0 7) (PROC ", -"1 8) (LOADI 2 0) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (LREF 3 0 3) (L", -"REF 4 0 4) (CALL 4)) ((((GREF 0 0) (LREF 1 1 1) (LOAD 2 1) (LREF 3 0 1) (CALL 3)", -") () (make-record environment) (1 . #f) 5)) (vector) (4 . #f) 6) (((GREF 0 0) (P", -"ROC 1 0) (LREF 2 0 2) (CALL 2)) ((((LREF 0 0 1) (COND 0 167) (GREF 0 0) (PROC 1 ", -"0) (LREF 2 1 2) (CALL 2) 167 (LREF 0 1 1) (LOADF 1) (CALL 1)) ((((GREF 0 0) (LRE", -"F 1 2 1) (LREF 2 0 1) (LOAD 3 1) (CALL 3)) () (eq? environment) (1 . #f) 5)) (re", -"cord-type) (1 . #f) 4)) (record?) (2 . #f) 4) (((LREF 0 2 18) (PROC 1 0) (LREF 2", -" 0 2) (CALL 2)) ((((LREF 0 0 1) (COND 0 168) (GREF 0 0) (PROC 1 0) (LREF 2 1 2) ", -"(CALL 2) 168 (GREF 0 1) (LREF 1 1 1) (LOAD 2 2) (LREF 3 1 2) (LOAD 4 3) (CALL 4)", -") ((((GREF 0 0) (LREF 1 2 1) (LREF 2 0 1) (LOADI 3 2) (CALL 3)) () (vector-ref) ", -"(1 . #f) 5)) (record-datum error \"record type mismatch\" environment) (1 . #f) 6)", -") () (2 . #f) 4) (((LREF 0 2 18) (PROC 1 0) (LREF 2 0 2) (CALL 2)) ((((LREF 0 0 ", -"1) (COND 0 169) (GREF 0 0) (PROC 1 0) (LREF 2 1 2) (CALL 2) 169 (GREF 0 1) (LREF", -" 1 1 1) (LOAD 2 2) (LREF 3 1 2) (LOAD 4 3) (CALL 4)) ((((GREF 0 0) (LREF 1 2 1) ", -"(LREF 2 0 1) (LOADI 3 1) (CALL 3)) () (vector-ref) (1 . #f) 5)) (record-datum er", -"ror \"record type mismatch\" environment) (1 . #f) 6)) () (2 . #f) 4) (((LREF 0 2 ", -"18) (PROC 1 0) (LREF 2 0 2) (CALL 2)) ((((LREF 0 0 1) (COND 0 170) (GREF 0 0) (P", -"ROC 1 0) (LREF 2 1 2) (CALL 2) 170 (GREF 0 1) (LREF 1 1 1) (LOAD 2 2) (LREF 3 1 ", -"2) (LOAD 4 3) (CALL 4)) ((((GREF 0 0) (LREF 1 2 1) (LREF 2 0 1) (LOADI 3 0) (CAL", -"L 3)) () (vector-ref) (1 . #f) 5)) (record-datum error \"record type mismatch\" en", -"vironment) (1 . #f) 6)) () (2 . #f) 4) (((LREF 0 2 17) (PROC 1 0) (LREF 2 0 3) (", -"CALL 2)) ((((LREF 0 0 1) (LREF 1 1 1) (LREF 2 1 2) (CALL 2)) () () (1 . #f) 4)) ", -"() (3 . #f) 4) (((LREF 0 2 14) (PROC 1 0) (LREF 2 0 2) (LREF 3 0 3) (CALL 3)) ((", -"((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 171) (LR", -"EF 0 0 1) (LREF 1 0 2) (CALL 1) 171 (LREF 0 4 15) (PROC 1 0) (LREF 2 2 3) (CALL ", -"2)) ((((PROC 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 172)", -" (LREF 0 6 13) (LREF 1 0 1) (LREF 2 4 2) (LREF 3 0 2) (CALL 3) 172 (GREF 0 0) (P", -"ROC 1 0) (LREF 2 4 2) (CALL 2)) ((((LREF 0 0 1) (COND 0 173) (LREF 0 7 12) (LREF", -" 1 1 1) (LREF 2 5 2) (LREF 3 5 3) (CALL 3) 173 (LREF 0 7 22) (PROC 1 0) (LREF 2 ", -"5 2) (CALL 2)) ((((LREF 0 8 23) (PROC 1 0) (LREF 2 6 2) (CALL 2)) ((((LREF 0 9 1", -"3) (LREF 1 3 1) (LREF 2 1 1) (LREF 3 0 1) (CALL 3)) () () (1 . #f) 5)) () (1 . #", -"f) 4)) () (1 . #f) 5)) (symbol?) (2 . #f) 5) (((PROC 0 0) (LREF 1 2 1) (LREF 2 0", -" 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 174) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 17", -"4 (LREF 0 0 1) (LOADF 1) (CALL 1)) () () (2 . #f) 3)) () (1 . #f) 4)) () (1 . #f", -") 4)) () (2 . #f) 4)) () (1 . #f) 4)) () (3 . #f) 5) (((LREF 0 0 1) (PROC 1 0) (", -"CALL 1)) ((((PROC 0 0) (LREF 1 0 1) (LREF 2 1 2) (CALL 2)) ((((GREF 0 0) (PROC 1", -" 0) (LREF 2 2 2) (LOADI 3 1) (CALL 3)) ((((LREF 0 0 1) (LSET 0 3 2) (PROC 0 0) (", -"PROC 1 1) (CALL 1)) ((((PROC 0 0) (LREF 1 0 1) (LOADF 2) (CALL 2)) ((((PROC 0 0)", -" (LSET 0 0 2) (LREF 0 0 2) (LREF 1 0 1) (LREF 2 4 2) (CALL 2)) ((((GREF 0 0) (PR", -"OC 1 0) (LREF 2 0 2) (CALL 2)) ((((LREF 0 0 1) (COND 0 175) (LREF 0 1 1) (LREF 1", -" 1 2) (CALL 1) 175 (LREF 0 9 22) (PROC 1 0) (LREF 2 1 2) (CALL 2)) ((((LREF 0 3 ", -"2) (LREF 1 2 1) (LREF 2 0 1) (CALL 2)) () () (1 . #f) 4)) () (1 . #f) 4)) (symbo", -"l?) (2 . #f) 4)) () (2 . #f) 4)) () (1 . #f) 4) (((GREF 0 0) (PROC 1 0) (LREF 2 ", -"0 1) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 3 2) (CALL 2)) ((((GREF 0 0) (PR", -"OC 1 0) (LOAD 2 1) (LREF 3 1 1) (LOAD 4 2) (LREF 5 0 1) (CALL 5)) ((((GREF 0 0) ", -"(LREF 1 5 1) (LREF 2 0 1) (CALL 2)) () (string->symbol) (1 . #f) 4)) (string-app", -"end \".\" \".\") (1 . #f) 7)) (number->string) (1 . #f) 4)) (symbol->string) (1 . #f", -") 4)) () (1 . #f) 3)) (+) (2 . #f) 5)) () (2 . #f) 4)) () (2 . #f) 3) (((PROC 0 ", -"0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 1) (PROC 1 0) (CALL 1)) ((((LR", -"EF 0 4 14) (PROC 1 0) (LREF 2 0 2) (LREF 3 0 3) (CALL 3)) ((((PROC 0 0) (LREF 1 ", -"1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 176) (LREF 0 0 1) (LREF 1 0 ", -"2) (CALL 1) 176 (PROC 0 0) (PROC 1 1) (CALL 1)) ((((PROC 0 0) (PROC 1 1) (CALL 1", -")) ((((LREF 0 8 15) (PROC 1 0) (LREF 2 4 3) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (", -"LREF 2 0 1) (CALL 2)) ((((LREF 0 0 1) (COND 0 177) (GREF 0 0) (LREF 1 2 1) (LREF", -" 2 6 2) (CALL 2) 177 (LREF 0 2 1) (LOADF 1) (CALL 1)) () (symbol?) (1 . #f) 4)) ", -"(not) (1 . #f) 4)) () (1 . #f) 4) (((LREF 0 0 1) (COND 0 178) (LREF 0 8 16) (PRO", -"C 1 0) (LREF 2 4 3) (CALL 2) 178 (LREF 0 5 2) (PROC 1 1) (LREF 2 4 2) (CALL 2)) ", -"((((GREF 0 0) (PROC 1 0) (LREF 2 5 2) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2", -" 1 1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (LREF 1 4 1) (LREF 2 0 1) (CALL 2)) (", -") (string->symbol) (1 . #f) 4)) (string-append) (1 . #f) 5)) (symbol->string) (1", -" . #f) 4) (((PROC 0 0) (LREF 1 2 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 10 11) (PR", -"OC 1 0) (LREF 2 6 2) (LREF 3 0 2) (LREF 4 6 3) (CALL 4)) ((((LREF 0 1 1) (LREF 1", -" 1 2) (CALL 1)) () () (1 . #f) 3)) () (2 . #f) 6)) () (1 . #f) 4)) () (1 . #f) 4", -")) () (1 . #f) 3) (((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 ", -"2) (COND 0 179) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 179 (LREF 0 0 1) (LOADF 1) (C", -"ALL 1)) () () (2 . #f) 3)) () (1 . #f) 4)) () (2 . #f) 3)) () (1 . #f) 4)) () (3", -" . #f) 5)) () (2 . #f) 3) (((LREF 0 0 1) (LSET 0 3 12) (PROC 0 0) (LSET 0 3 11) ", -"(PROC 0 1) (LSET 0 3 10) (GREF 0 0) (PROC 1 2) (LOAD 2 1) (CALL 2)) ((((LREF 0 4", -" 17) (PROC 1 0) (LREF 2 0 4) (CALL 2)) ((((LREF 0 0 1) (LREF 1 1 1) (LREF 2 1 2)", -" (LREF 3 1 3) (CALL 3)) () () (1 . #f) 5)) () (4 . #f) 4) (((GREF 0 0) (PROC 1 0", -") (LREF 2 0 2) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (CALL 1)) ((((LREF 0 6 19) (LR", -"EF 1 2 1) (LOADF 2) (LREF 3 1 1) (LREF 4 0 1) (CALL 4)) () () (1 . #f) 6)) (make", -"-ephemeron-table) (1 . #f) 3)) (symbol->string) (2 . #f) 4) (((LREF 0 4 10) (PRO", -"C 1 0) (LREF 2 0 1) (CALL 2)) ((((PROC 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((", -"((GREF 0 0) (PROC 1 0) (LOAD 2 1) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (", -"LOAD 2 1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LOAD 2 1) (LREF 3 0 1", -") (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) ((((GREF ", -"0 0) (PROC 1 0) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LOAD", -" 2 1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LOAD 2 1) (LREF 3 0 1) (C", -"ALL 3)) ((((GREF 0 0) (PROC 1 0) (PROC 2 1) (LREF 3 0 1) (CALL 3)) ((((LREF 0 8 ", -"1) (LREF 1 8 2) (CALL 1)) () () (1 . #f) 3) (((LREF 0 14 11) (LREF 1 0 1) (LREF ", -"2 0 2) (LREF 3 0 2) (LREF 4 8 2) (CALL 4)) () () (2 . #f) 6)) (for-each) (1 . #f", -") 5)) (cons core#define) (1 . #f) 5)) (cons core#set!) (1 . #f) 5)) (cons core#q", -"uote) (1 . #f) 5)) (cons core#lambda) (1 . #f) 5)) (cons core#if) (1 . #f) 5)) (", -"cons core#begin) (1 . #f) 5)) (cons core#define-macro) (2 . #f) 5) (((LREF 0 0 1", -") (LSET 0 6 9) (PROC 0 0) (LSET 0 6 8) (GREF 0 0) (PROC 1 1) (CALL 1)) ((((GREF ", -"0 0) (PROC 1 0) (CALL 1)) ((((LREF 0 8 19) (LREF 1 1 1) (LREF 2 1 2) (LOADF 3) (", -"LREF 4 0 1) (CALL 4)) () () (1 . #f) 6)) (make-ephemeron-table) (2 . #f) 3) (((L", -"REF 0 0 1) (LSET 0 7 7) (PROC 0 0) (LSET 0 7 6) (PROC 0 1) (LSET 0 7 5) (PROC 0 ", -"2) (LSET 0 7 4) (PROC 0 3) (LSET 0 7 3) (GREF 0 0) (PROC 1 4) (LOADN 2) (CALL 2)", -") ((((GREF 0 0) (PROC 1 0) (LREF 2 8 7) (LREF 3 0 2) (CALL 3)) ((((LREF 0 0 1) (", -"COND 0 180) (GREF 0 0) (LREF 1 1 1) (LREF 2 9 7) (LREF 3 1 2) (CALL 3) 180 (LREF", -" 0 1 1) (LOADF 1) (CALL 1)) () (dictionary-ref) (1 . #f) 5)) (dictionary-has?) (", -"2 . #f) 5) (((GREF 0 0) (LREF 1 0 1) (LREF 2 8 7) (LREF 3 0 2) (LREF 4 0 3) (CAL", -"L 4)) () (dictionary-set!) (3 . #f) 6) (((GREF 0 0) (PROC 1 0) (LREF 2 8 7) (LRE", -"F 3 0 2) (CALL 3)) ((((LREF 0 0 1) (COND 0 181) (GREF 0 0) (LREF 1 1 1) (LREF 2 ", -"9 7) (LREF 3 1 2) (CALL 3) 181 (LREF 0 1 1) (LOADU 1) (CALL 1)) () (dictionary-d", -"elete!) (1 . #f) 5)) (dictionary-has?) (2 . #f) 5) (((LREF 0 0 1) (LREF 1 8 7) (", -"CALL 1)) () () (1 . #f) 3) (((PROC 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((PR", -"OC 0 0) (LREF 1 0 1) (LOADF 2) (LOADF 3) (LOADF 4) (LOADF 5) (LOADF 6) (LOADF 7)", -" (LOADF 8) (LOADF 9) (LOADF 10) (LOADF 11) (LOADF 12) (LOADF 13) (LOADF 14) (CAL", -"L 14)) ((((PROC 0 0) (LSET 0 0 14) (PROC 0 1) (LSET 0 0 13) (PROC 0 2) (LSET 0 0", -" 12) (PROC 0 3) (LSET 0 0 11) (PROC 0 4) (LSET 0 0 10) (PROC 0 5) (LSET 0 0 9) (", -"PROC 0 6) (LSET 0 0 8) (PROC 0 7) (LSET 0 0 7) (PROC 0 8) (LSET 0 0 6) (PROC 0 9", -") (LSET 0 0 5) (PROC 0 10) (LSET 0 0 4) (PROC 0 11) (LSET 0 0 3) (PROC 0 12) (LS", -"ET 0 0 2) (LREF 0 0 1) (LREF 1 0 2) (CALL 1)) ((((GREF 0 0) (PROC 1 0) (LOADF 2)", -" (LOADF 3) (CALL 3)) ((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ((((GREF ", -"0 0) (PROC 1 0) (LREF 2 0 2) (LREF 3 2 2) (CALL 3)) ((((LREF 0 5 2) (PROC 1 0) (", -"CALL 1)) ((((GREF 0 0) (PROC 1 0) (LREF 2 1 1) (LREF 3 0 1) (CALL 3)) ((((LREF 0", -" 7 2) (PROC 1 0) (LREF 2 0 1) (CALL 2)) ((((LREF 0 4 1) (LREF 1 4 2) (CALL 1)) (", -") () (1 . #f) 3)) () (1 . #f) 4)) (cons) (1 . #f) 5)) () (1 . #f) 3)) (cons) (2 ", -". #f) 5)) () (1 . #f) 4)) (cons) (2 . #f) 5) (((LREF 0 2 2) (PROC 1 0) (CALL 1))", -" ((((GREF 0 0) (PROC 1 0) (LREF 2 0 1) (CALL 2)) ((((GREF 0 0) (LREF 1 2 1) (PRO", -"C 2 0) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (CALL 2)) ((", -"((GREF 0 0) (PROC 1 0) (LREF 2 1 2) (CALL 2)) ((((PROC 0 0) (LREF 1 2 1) (LREF 2", -" 1 1) (LREF 3 0 1) (CALL 3)) ((((LREF 0 0 2) (PROC 1 0) (CALL 1)) ((((PROC 0 0) ", -"(LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (CALL ", -"2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 3 3) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (", -"PROC 1 0) (LREF 2 2 2) (CALL 2)) ((((GREF 0 0) (LREF 1 3 1) (LREF 2 5 3) (LREF 3", -" 0 1) (CALL 3)) () (set-cdr!) (1 . #f) 5)) (cdr) (1 . #f) 4)) (set-car!) (1 . #f", -") 5)) (car) (2 . #f) 4)) () (1 . #f) 4)) () (3 . #f) 3)) () (1 . #f) 5)) (car) (", -"1 . #f) 4)) (cdr) (2 . #f) 4)) (for-each) (1 . #f) 5)) (reverse) (1 . #f) 4)) ()", -" (1 . #f) 3) (((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (CALL 2)) ((((GREF 0 0) (LREF ", -"1 1 1) (LREF 2 0 1) (CALL 2)) () (car) (1 . #f) 4)) (cddr) (2 . #f) 4) (((GREF 0", -" 0) (PROC 1 0) (LREF 2 0 3) (CALL 2)) ((((LREF 0 0 1) (COND 0 182) (LREF 0 1 1) ", -"(LREF 1 1 3) (CALL 1) 182 (GREF 0 0) (PROC 1 0) (LREF 2 1 3) (CALL 2)) ((((LREF ", -"0 0 1) (COND 0 183) (GREF 0 0) (PROC 1 0) (LREF 2 2 3) (CALL 2) 183 (LREF 0 2 2)", -" (LREF 1 2 1) (LREF 2 2 3) (CALL 2)) ((((LREF 0 3 2) (PROC 1 0) (LREF 2 0 1) (CA", -"LL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 4 3) (CALL 2)) ((((LREF 0 6 11) (PROC 1 ", -"0) (LREF 2 5 2) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (LREF 1 6 1) (LREF 2 2 1) (", -"LREF 3 0 1) (CALL 3)) () (cons) (1 . #f) 5)) () (1 . #f) 5)) (cdr) (1 . #f) 4)) ", -"() (1 . #f) 4)) (car) (1 . #f) 4)) (pair?) (1 . #f) 4)) (null?) (3 . #f) 4) (((L", -"REF 0 11 21) (PROC 1 0) (LREF 2 0 2) (CALL 2)) ((((PROC 0 0) (PROC 1 1) (LREF 2 ", -"0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 184) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 1", -"84 (GREF 0 0) (PROC 1 0) (LREF 2 2 2) (CALL 2)) ((((PROC 0 0) (LREF 1 1 1) (LREF", -" 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 185) (LREF 0 0 1) (LREF 1 0 2) (CALL 1", -") 185 (LREF 0 0 1) (LOADF 1) (CALL 1)) () () (2 . #f) 3)) () (1 . #f) 4)) (pair?", -") (2 . #f) 4) (((GREF 0 0) (LREF 1 2 1) (LREF 2 0 1) (CALL 2)) () (not) (1 . #f)", -" 4)) () (1 . #f) 4)) () (2 . #f) 4) (((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (CALL 2", -")) ((((LREF 0 0 1) (COND 0 186) (GREF 0 0) (PROC 1 0) (LREF 2 1 2) (CALL 2) 186 ", -"(LREF 0 1 1) (LOADF 1) (CALL 1)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 1) (CALL 2))", -" ((((LREF 0 0 1) (COND 0 187) (GREF 0 0) (PROC 1 0) (LREF 2 3 2) (CALL 2) 187 (L", -"REF 0 3 1) (LOADF 1) (CALL 1)) ((((LREF 0 15 21) (LREF 1 4 1) (LREF 2 0 1) (CALL", -" 2)) () () (1 . #f) 4)) (car) (1 . #f) 4)) (not) (1 . #f) 4)) (null?) (1 . #f) 4", -")) (list?) (2 . #f) 4) (((LREF 0 11 13) (PROC 1 0) (LREF 2 0 2) (LREF 3 0 3) (CA", -"LL 3)) ((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 13 6) (PROC ", -"1 0) (LREF 2 0 2) (CALL 2)) ((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ((", -"((LREF 0 0 2) (COND 0 188) (LREF 0 0 2) (PROC 1 0) (LREF 2 4 2) (LREF 3 4 3) (CA", -"LL 3) 188 (LREF 0 0 1) (LREF 1 2 2) (CALL 1)) ((((LREF 0 6 3) (LREF 1 1 1) (LREF", -" 2 0 1) (LREF 3 5 3) (CALL 3)) () () (1 . #f) 5)) () (2 . #f) 5)) () (1 . #f) 4)", -") () (2 . #f) 4)) () (1 . #f) 4)) () (3 . #f) 5) (((GREF 0 0) (PROC 1 0) (LREF 2", -" 0 2) (LOADN 3) (CALL 3)) ((((GREF 0 0) (LREF 1 1 1) (LOAD 2 1) (LREF 3 0 1) (CA", -"LL 3)) () (cons core#quote) (1 . #f) 5)) (cons) (2 . #f) 5) (((LREF 0 11 12) (PR", -"OC 1 0) (LREF 2 0 2) (LREF 3 0 4) (CALL 3)) ((((PROC 0 0) (LREF 1 1 1) (LREF 2 0", -" 1) (CALL 2)) ((((LREF 0 13 4) (PROC 1 0) (LREF 2 0 2) (CALL 2)) ((((LREF 0 4 3)", -" (PROC 1 0) (LREF 2 3 3) (LREF 3 3 4) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2", -" 0 1) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 3 2) (LREF 3 0 1) (CA", -"LL 3)) ((((GREF 0 0) (LREF 1 4 1) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) () (cons cor", -"e#define) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons) (1 . #f) 5)) () (1 . #f) 5)) (", -") (2 . #f) 4)) () (1 . #f) 4)) () (4 . #f) 5) (((LREF 0 11 8) (PROC 1 0) (LREF 2", -" 0 4) (CALL 2)) ((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 3 1", -"1) (PROC 1 0) (PROC 2 1) (LREF 3 2 2) (CALL 3)) ((((PROC 0 0) (LREF 1 1 1) (LREF", -" 2 0 1) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 6 2) (LOADN 3) (CALL 3)) ((((", -"GREF 0 0) (PROC 1 0) (LREF 2 0 1) (CALL 2)) ((((GREF 0 0) (LREF 1 2 1) (LREF 2 0", -" 1) (PROC 3 0) (CALL 3)) ((((LREF 0 8 3) (PROC 1 0) (LREF 2 7 3) (LREF 3 5 2) (C", -"ALL 3)) ((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 10 13) (PRO", -"C 1 0) (CALL 1)) ((((GREF 0 0) (PROC 1 0) (LREF 2 1 2) (LOADN 3) (CALL 3)) ((((G", -"REF 0 0) (PROC 1 0) (LREF 2 7 2) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (LREF 1 3 ", -"1) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) () (cons core#lambda) (1 . #f) 5)) (cons) (", -"1 . #f) 5)) (cons) (1 . #f) 5)) () (2 . #f) 3)) () (1 . #f) 4)) () (1 . #f) 5)) ", -"(with-dynamic-environment) (1 . #f) 5)) (list) (1 . #f) 4)) (cons) (2 . #f) 5)) ", -"() (1 . #f) 4) (((LREF 0 14 12) (LREF 1 0 1) (LREF 2 0 2) (LREF 3 1 2) (CALL 3))", -" () () (2 . #f) 5)) () (2 . #f) 5)) () (1 . #f) 4)) () (4 . #f) 4) (((LREF 0 11 ", -"12) (PROC 1 0) (LREF 2 0 2) (LREF 3 0 4) (CALL 3)) ((((PROC 0 0) (LREF 1 1 1) (L", -"REF 2 0 1) (CALL 2)) ((((LREF 0 3 2) (PROC 1 0) (LREF 2 2 3) (LREF 3 2 4) (CALL ", -"3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 1) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LR", -"EF 2 0 1) (CALL 2)) ((((PROC 0 0) (LREF 1 3 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0", -" 17 5) (PROC 1 0) (LREF 2 4 2) (LREF 3 0 2) (CALL 3)) ((((LREF 0 1 1) (LOADU 1) ", -"(CALL 1)) () () (1 . #f) 3)) () (2 . #f) 5)) () (1 . #f) 4)) (load) (1 . #f) 4))", -" (compile) (1 . #f) 4)) () (2 . #f) 5)) () (1 . #f) 4)) () (4 . #f) 5) (((LREF 0", -" 1 10) (PROC 1 0) (LREF 2 0 2) (CALL 2)) ((((LREF 0 0 1) (COND 0 189) (LREF 0 1 ", -"1) (LREF 1 1 2) (CALL 1) 189 (LREF 0 12 21) (PROC 1 0) (LREF 2 1 2) (CALL 2)) ((", -"((LREF 0 0 1) (COND 0 190) (LREF 0 3 8) (LREF 1 2 1) (LREF 2 2 2) (LREF 3 2 3) (", -"CALL 3) 190 (LREF 0 3 9) (PROC 1 0) (LREF 2 2 2) (CALL 2)) ((((LREF 0 0 1) (COND", -" 0 191) (GREF 0 0) (PROC 1 0) (LREF 2 3 2) (CALL 2) 191 (GREF 0 1) (PROC 1 1) (L", -"REF 2 3 2) (CALL 2)) ((((LREF 0 15 13) (PROC 1 0) (LREF 2 0 1) (LREF 3 4 3) (CAL", -"L 3)) ((((PROC 0 0) (LREF 1 5 1) (LREF 2 0 1) (CALL 2)) ((((PROC 0 0) (LREF 1 0 ", -"1) (LREF 2 0 2) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (LOAD 3 1) (CALL", -" 3)) ((((PROC 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 192", -") (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 192 (LREF 0 0 1) (LOADF 1) (CALL 1)) () () ", -"(2 . #f) 3) (((LREF 0 0 1) (COND 0 193) (GREF 0 0) (PROC 1 0) (LREF 2 9 2) (CALL", -" 2) 193 (GREF 0 1) (PROC 1 1) (LREF 2 2 2) (LOAD 3 2) (CALL 3)) ((((LREF 0 11 7)", -" (LREF 1 3 1) (LREF 2 0 1) (CALL 2)) () () (1 . #f) 4) (((PROC 0 0) (PROC 1 1) (", -"LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 194) (LREF 0 0 1) (LREF 1 0 2) (CA", -"LL 1) 194 (LREF 0 0 1) (LOADF 1) (CALL 1)) () () (2 . #f) 3) (((LREF 0 0 1) (CON", -"D 0 195) (GREF 0 0) (PROC 1 0) (LREF 2 11 2) (CALL 2) 195 (GREF 0 1) (PROC 1 1) ", -"(LREF 2 4 2) (LOAD 3 2) (CALL 3)) ((((LREF 0 13 12) (PROC 1 0) (LREF 2 12 2) (CA", -"LL 2)) ((((LREF 0 14 6) (LREF 1 6 1) (LREF 2 1 1) (LREF 3 0 1) (LREF 4 13 3) (CA", -"LL 4)) () () (1 . #f) 6)) () (1 . #f) 4) (((PROC 0 0) (PROC 1 1) (LREF 2 0 1) (C", -"ALL 2)) ((((LREF 0 0 2) (COND 0 196) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 196 (LRE", -"F 0 0 1) (LOADF 1) (CALL 1)) () () (2 . #f) 3) (((LREF 0 0 1) (COND 0 197) (LREF", -" 0 14 14) (LREF 1 6 1) (PROC 2 0) (CALL 2) 197 (GREF 0 0) (PROC 1 1) (LREF 2 6 2", -") (LOAD 3 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 14 2) (CALL 2)) ((((LREF", -" 0 16 12) (PROC 1 0) (LREF 2 15 2) (CALL 2)) ((((LREF 0 17 5) (LREF 1 2 1) (LREF", -" 2 1 1) (LREF 3 0 1) (LREF 4 16 3) (CALL 4)) () () (1 . #f) 6)) () (1 . #f) 4)) ", -"(cadr) (1 . #f) 4) (((PROC 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2", -") (COND 0 198) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 198 (LREF 0 0 1) (LOADF 1) (CA", -"LL 1)) () () (2 . #f) 3) (((LREF 0 0 1) (COND 0 199) (GREF 0 0) (PROC 1 0) (LREF", -" 2 15 2) (CALL 2) 199 (LOADT 0) (COND 0 200) (LREF 0 26 6) (PROC 1 1) (LREF 2 9 ", -"2) (CALL 2) 200 (LREF 0 8 1) (LOADU 1) (CALL 1)) ((((LREF 0 17 12) (PROC 1 0) (L", -"REF 2 16 2) (CALL 2)) ((((LREF 0 18 4) (LREF 1 10 1) (LREF 2 1 1) (LREF 3 0 1) (", -"LREF 4 17 3) (CALL 4)) () () (1 . #f) 6)) () (1 . #f) 4) (((PROC 0 0) (LREF 1 9 ", -"1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 201) (LREF 0 0 2) (PROC 1 0) (", -"LREF 2 17 2) (LREF 3 17 3) (CALL 3) 201 (GREF 0 0) (LREF 1 0 1) (PROC 2 1) (LREF", -" 3 17 2) (CALL 3)) ((((LREF 0 19 3) (LREF 1 1 1) (LREF 2 0 1) (LREF 3 18 3) (CAL", -"L 3)) () () (1 . #f) 5) (((LREF 0 19 3) (LREF 1 0 1) (LREF 2 0 2) (LREF 3 18 3) ", -"(CALL 3)) () () (2 . #f) 5)) (map) (2 . #f) 5)) () (1 . #f) 4)) (cadr) (1 . #f) ", -"4)) () (1 . #f) 4)) (eqv? core#define-macro) (1 . #f) 5)) () (1 . #f) 4)) (cadr ", -"eqv? core#lambda) (1 . #f) 5)) () (1 . #f) 4)) (cadr eqv? core#define) (1 . #f) ", -"5)) () (1 . #f) 4)) (eqv? core#quote) (2 . #f) 5)) () (2 . #f) 4)) () (1 . #f) 4", -")) () (1 . #f) 5) (((LREF 0 0 1) (COND 0 202) (GREF 0 0) (LREF 1 4 1) (PROC 2 0)", -" (LREF 3 4 2) (CALL 3) 202 (GREF 0 1) (LREF 1 4 1) (LOAD 2 2) (LREF 3 4 2) (CALL", -" 3)) ((((LREF 0 6 3) (LREF 1 0 1) (LREF 2 0 2) (LREF 3 5 3) (CALL 3)) () () (2 .", -" #f) 5)) (map error \"invalid expression\") (1 . #f) 5)) (car list?) (1 . #f) 4)) ", -"() (1 . #f) 5)) () (1 . #f) 4)) () (3 . #f) 4) (((LREF 0 1 3) (PROC 1 0) (LREF 2", -" 0 2) (LREF 3 0 3) (CALL 3)) ((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) (", -"(((LREF 0 3 13) (PROC 1 0) (CALL 1)) ((((LREF 0 1 1) (LREF 1 1 2) (CALL 1)) () (", -") (1 . #f) 3)) () (2 . #f) 3)) () (1 . #f) 4)) () (3 . #f) 5)) () (14 . #f) 3)) ", -"() (2 . #f) 16) (((LREF 0 0 1) (LSET 0 9 2) (GREF 0 0) (LREF 1 9 1) (LREF 2 9 25", -") (LREF 3 9 21) (LREF 4 9 20) (LREF 5 9 22) (LREF 6 9 23) (LREF 7 9 10) (LREF 8 ", -"9 9) (LREF 9 9 18) (LREF 10 9 13) (LREF 11 9 12) (LREF 12 9 11) (LREF 13 9 3) (L", -"REF 14 9 2) (CALL 14)) () (values) (1 . #f) 16)) () (1 . #f) 4)) (make-parameter", -") (1 . #f) 4)) (make-dictionary) (1 . #f) 3)) () (1 . #f) 4)) () (1 . #f) 4)) (s", -"tring->symbol \"\") (1 . #f) 4)) () (1 . #f) 4)) (equal?) (1 . #f) 4)) (equal?) (2", -"5 . #f) 4)) () (1 . #f) 27)) () (1 . #f) 3) (((LREF 0 0 2) (GSET 0 0) (LREF 0 0 ", -"3) (GSET 0 1) (LREF 0 0 4) (GSET 0 2) (LREF 0 0 5) (GSET 0 3) (LREF 0 0 6) (GSET", -" 0 4) (LREF 0 0 7) (GSET 0 5) (LREF 0 0 8) (GSET 0 6) (LREF 0 0 9) (GSET 0 7) (L", -"REF 0 0 10) (GSET 0 8) (LREF 0 0 11) (GSET 0 9) (LREF 0 0 12) (GSET 0 10) (LREF ", -"0 0 13) (GSET 0 11) (LREF 0 0 14) (GSET 0 12) (LREF 0 0 1) (LOADU 1) (CALL 1)) (", -") (make-identifier identifier? identifier=? identifier-name identifier-environme", -"nt make-environment default-environment environment? find-identifier add-identif", -"ier! set-identifier! macro-objects expand) (14 . #f) 3)) (make-identifier identi", -"fier? identifier=? identifier-name identifier-environment make-environment defau", -"lt-environment environment? find-identifier add-identifier! set-identifier! macr", -"o-objects expand call-with-values) (1 . #f) 5)", +"OADI 3 0) (CALL 3)) () (vector-ref) (1 . #f) 5)) (record-datum error \"record typ", +"e mismatch\" environment) (1 . #f) 6)) () (2 . #f) 4) (((LREF 0 2 17) (PROC 1 0) ", +"(LREF 2 0 3) (CALL 2)) ((((LREF 0 0 1) (LREF 1 1 1) (LREF 2 1 2) (CALL 2)) () ()", +" (1 . #f) 4)) () (3 . #f) 4) (((LREF 0 2 14) (PROC 1 0) (LREF 2 0 2) (LREF 3 0 3", +") (CALL 3)) ((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (C", +"OND 0 170) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 170 (LREF 0 4 15) (PROC 1 0) (LREF", +" 2 2 3) (CALL 2)) ((((PROC 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2", +") (COND 0 171) (LREF 0 6 13) (LREF 1 0 1) (LREF 2 4 2) (LREF 3 0 2) (CALL 3) 171", +" (GREF 0 0) (PROC 1 0) (LREF 2 4 2) (CALL 2)) ((((LREF 0 0 1) (COND 0 172) (LREF", +" 0 7 12) (LREF 1 1 1) (LREF 2 5 2) (LREF 3 5 3) (CALL 3) 172 (LREF 0 7 22) (PROC", +" 1 0) (LREF 2 5 2) (CALL 2)) ((((LREF 0 8 23) (PROC 1 0) (LREF 2 6 2) (CALL 2)) ", +"((((LREF 0 9 13) (LREF 1 3 1) (LREF 2 1 1) (LREF 3 0 1) (CALL 3)) () () (1 . #f)", +" 5)) () (1 . #f) 4)) () (1 . #f) 5)) (symbol?) (2 . #f) 5) (((PROC 0 0) (LREF 1 ", +"2 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 173) (LREF 0 0 1) (LREF 1 0 ", +"2) (CALL 1) 173 (LREF 0 0 1) (LOADF 1) (CALL 1)) () () (2 . #f) 3)) () (1 . #f) ", +"4)) () (1 . #f) 4)) () (2 . #f) 4)) () (1 . #f) 4)) () (3 . #f) 5) (((LREF 0 0 1", +") (PROC 1 0) (CALL 1)) ((((PROC 0 0) (LREF 1 0 1) (LREF 2 1 2) (CALL 2)) ((((GRE", +"F 0 0) (PROC 1 0) (LREF 2 2 2) (LOADI 3 1) (CALL 3)) ((((LREF 0 0 1) (LSET 0 3 2", +") (PROC 0 0) (PROC 1 1) (CALL 1)) ((((PROC 0 0) (LREF 1 0 1) (LOADF 2) (CALL 2))", +" ((((PROC 0 0) (LSET 0 0 2) (LREF 0 0 2) (LREF 1 0 1) (LREF 2 4 2) (CALL 2)) (((", +"(GREF 0 0) (PROC 1 0) (LREF 2 0 2) (CALL 2)) ((((LREF 0 0 1) (COND 0 174) (LREF ", +"0 1 1) (LREF 1 1 2) (CALL 1) 174 (LREF 0 9 22) (PROC 1 0) (LREF 2 1 2) (CALL 2))", +" ((((LREF 0 3 2) (LREF 1 2 1) (LREF 2 0 1) (CALL 2)) () () (1 . #f) 4)) () (1 . ", +"#f) 4)) (symbol?) (2 . #f) 4)) () (2 . #f) 4)) () (1 . #f) 4) (((GREF 0 0) (PROC", +" 1 0) (LREF 2 0 1) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 3 2) (CALL 2)) (((", +"(GREF 0 0) (PROC 1 0) (LOAD 2 1) (LREF 3 1 1) (LOAD 4 2) (LREF 5 0 1) (CALL 5)) ", +"((((GREF 0 0) (LREF 1 5 1) (LREF 2 0 1) (CALL 2)) () (string->symbol) (1 . #f) 4", +")) (string-append \".\" \".\") (1 . #f) 7)) (number->string) (1 . #f) 4)) (symbol->s", +"tring) (1 . #f) 4)) () (1 . #f) 3)) (+) (2 . #f) 5)) () (2 . #f) 4)) () (2 . #f)", +" 3) (((PROC 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 1) (PROC 1 0) (C", +"ALL 1)) ((((LREF 0 4 14) (PROC 1 0) (LREF 2 0 2) (LREF 3 0 3) (CALL 3)) ((((PROC", +" 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 175) (LREF 0 0", +" 1) (LREF 1 0 2) (CALL 1) 175 (PROC 0 0) (PROC 1 1) (CALL 1)) ((((PROC 0 0) (PRO", +"C 1 1) (CALL 1)) ((((LREF 0 8 15) (PROC 1 0) (LREF 2 4 3) (CALL 2)) ((((GREF 0 0", +") (PROC 1 0) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 1) (COND 0 176) (GREF 0 0) (LRE", +"F 1 2 1) (LREF 2 6 2) (CALL 2) 176 (LREF 0 2 1) (LOADF 1) (CALL 1)) () (symbol?)", +" (1 . #f) 4)) (not) (1 . #f) 4)) () (1 . #f) 4) (((LREF 0 0 1) (COND 0 177) (LRE", +"F 0 8 16) (PROC 1 0) (LREF 2 4 3) (CALL 2) 177 (LREF 0 5 2) (PROC 1 1) (LREF 2 4", +" 2) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 5 2) (CALL 2)) ((((GREF 0 0) (PRO", +"C 1 0) (LREF 2 1 1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (LREF 1 4 1) (LREF 2 0 ", +"1) (CALL 2)) () (string->symbol) (1 . #f) 4)) (string-append) (1 . #f) 5)) (symb", +"ol->string) (1 . #f) 4) (((PROC 0 0) (LREF 1 2 1) (LREF 2 0 1) (CALL 2)) ((((LRE", +"F 0 10 11) (PROC 1 0) (LREF 2 6 2) (LREF 3 0 2) (LREF 4 6 3) (CALL 4)) ((((LREF ", +"0 1 1) (LREF 1 1 2) (CALL 1)) () () (1 . #f) 3)) () (2 . #f) 6)) () (1 . #f) 4))", +" () (1 . #f) 4)) () (1 . #f) 3) (((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2))", +" ((((LREF 0 0 2) (COND 0 178) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 178 (LREF 0 0 1", +") (LOADF 1) (CALL 1)) () () (2 . #f) 3)) () (1 . #f) 4)) () (2 . #f) 3)) () (1 .", +" #f) 4)) () (3 . #f) 5)) () (2 . #f) 3) (((LREF 0 0 1) (LSET 0 3 12) (PROC 0 0) ", +"(LSET 0 3 11) (PROC 0 1) (LSET 0 3 10) (GREF 0 0) (PROC 1 2) (LOAD 2 1) (CALL 2)", +") ((((LREF 0 4 17) (PROC 1 0) (LREF 2 0 4) (CALL 2)) ((((LREF 0 0 1) (LREF 1 1 1", +") (LREF 2 1 2) (LREF 3 1 3) (CALL 3)) () () (1 . #f) 5)) () (4 . #f) 4) (((GREF ", +"0 0) (PROC 1 0) (LREF 2 0 2) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (CALL 1)) ((((LR", +"EF 0 6 19) (LREF 1 2 1) (LOADF 2) (LREF 3 1 1) (LREF 4 0 1) (CALL 4)) () () (1 .", +" #f) 6)) (make-ephemeron-table) (1 . #f) 3)) (symbol->string) (2 . #f) 4) (((LRE", +"F 0 4 10) (PROC 1 0) (LREF 2 0 1) (CALL 2)) ((((PROC 0 0) (PROC 1 1) (LREF 2 0 1", +") (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LOAD 2 1) (LOADN 3) (CALL 3)) ((((GREF 0 0", +") (PROC 1 0) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LOAD 2 ", +"1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LOAD 2 1) (LREF 3 0 1) (CALL", +" 3)) ((((GREF 0 0) (PROC 1 0) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (P", +"ROC 1 0) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LOAD 2 1) (", +"LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (PROC 2 1) (LREF 3 0 1) (CALL 3))", +" ((((LREF 0 8 1) (LREF 1 8 2) (CALL 1)) () () (1 . #f) 3) (((LREF 0 14 11) (LREF", +" 1 0 1) (LREF 2 0 2) (LREF 3 0 2) (LREF 4 8 2) (CALL 4)) () () (2 . #f) 6)) (for", +"-each) (1 . #f) 5)) (cons core#define) (1 . #f) 5)) (cons core#set!) (1 . #f) 5)", +") (cons core#quote) (1 . #f) 5)) (cons core#lambda) (1 . #f) 5)) (cons core#if) ", +"(1 . #f) 5)) (cons core#begin) (1 . #f) 5)) (cons core#define-macro) (2 . #f) 5)", +" (((LREF 0 0 1) (LSET 0 6 9) (PROC 0 0) (LSET 0 6 8) (GREF 0 0) (PROC 1 1) (CALL", +" 1)) ((((GREF 0 0) (PROC 1 0) (CALL 1)) ((((LREF 0 8 19) (LREF 1 1 1) (LREF 2 1 ", +"2) (LOADF 3) (LREF 4 0 1) (CALL 4)) () () (1 . #f) 6)) (make-ephemeron-table) (2", +" . #f) 3) (((LREF 0 0 1) (LSET 0 7 7) (PROC 0 0) (LSET 0 7 6) (PROC 0 1) (LSET 0", +" 7 5) (PROC 0 2) (LSET 0 7 4) (PROC 0 3) (LSET 0 7 3) (GREF 0 0) (PROC 1 4) (LOA", +"DN 2) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 8 7) (LREF 3 0 2) (CALL 3)) (((", +"(LREF 0 0 1) (COND 0 179) (GREF 0 0) (LREF 1 1 1) (LREF 2 9 7) (LREF 3 1 2) (CAL", +"L 3) 179 (LREF 0 1 1) (LOADF 1) (CALL 1)) () (dictionary-ref) (1 . #f) 5)) (dict", +"ionary-has?) (2 . #f) 5) (((GREF 0 0) (LREF 1 0 1) (LREF 2 8 7) (LREF 3 0 2) (LR", +"EF 4 0 3) (CALL 4)) () (dictionary-set!) (3 . #f) 6) (((GREF 0 0) (PROC 1 0) (LR", +"EF 2 8 7) (LREF 3 0 2) (CALL 3)) ((((LREF 0 0 1) (COND 0 180) (GREF 0 0) (LREF 1", +" 1 1) (LREF 2 9 7) (LREF 3 1 2) (CALL 3) 180 (LREF 0 1 1) (LOADU 1) (CALL 1)) ()", +" (dictionary-delete!) (1 . #f) 5)) (dictionary-has?) (2 . #f) 5) (((LREF 0 0 1) ", +"(LREF 1 8 7) (CALL 1)) () () (1 . #f) 3) (((PROC 0 0) (PROC 1 1) (LREF 2 0 1) (C", +"ALL 2)) ((((PROC 0 0) (LREF 1 0 1) (LOADF 2) (LOADF 3) (LOADF 4) (LOADF 5) (LOAD", +"F 6) (LOADF 7) (LOADF 8) (LOADF 9) (LOADF 10) (LOADF 11) (LOADF 12) (LOADF 13) (", +"LOADF 14) (CALL 14)) ((((PROC 0 0) (LSET 0 0 14) (PROC 0 1) (LSET 0 0 13) (PROC ", +"0 2) (LSET 0 0 12) (PROC 0 3) (LSET 0 0 11) (PROC 0 4) (LSET 0 0 10) (PROC 0 5) ", +"(LSET 0 0 9) (PROC 0 6) (LSET 0 0 8) (PROC 0 7) (LSET 0 0 7) (PROC 0 8) (LSET 0 ", +"0 6) (PROC 0 9) (LSET 0 0 5) (PROC 0 10) (LSET 0 0 4) (PROC 0 11) (LSET 0 0 3) (", +"PROC 0 12) (LSET 0 0 2) (LREF 0 0 1) (LREF 1 0 2) (CALL 1)) ((((GREF 0 0) (PROC ", +"1 0) (LOADF 2) (LOADF 3) (CALL 3)) ((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL", +" 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (LREF 3 2 2) (CALL 3)) ((((LREF 0 5 2", +") (PROC 1 0) (CALL 1)) ((((GREF 0 0) (PROC 1 0) (LREF 2 1 1) (LREF 3 0 1) (CALL ", +"3)) ((((LREF 0 7 2) (PROC 1 0) (LREF 2 0 1) (CALL 2)) ((((LREF 0 4 1) (LREF 1 4 ", +"2) (CALL 1)) () () (1 . #f) 3)) () (1 . #f) 4)) (cons) (1 . #f) 5)) () (1 . #f) ", +"3)) (cons) (2 . #f) 5)) () (1 . #f) 4)) (cons) (2 . #f) 5) (((LREF 0 2 2) (PROC ", +"1 0) (CALL 1)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 1) (CALL 2)) ((((GREF 0 0) (LR", +"EF 1 2 1) (PROC 2 0) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 2", +") (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 1 2) (CALL 2)) ((((PROC 0 0) (LREF ", +"1 2 1) (LREF 2 1 1) (LREF 3 0 1) (CALL 3)) ((((LREF 0 0 2) (PROC 1 0) (CALL 1)) ", +"((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF", +" 2 0 2) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 3 3) (LREF 3 0 1) (CALL 3)) (", +"(((GREF 0 0) (PROC 1 0) (LREF 2 2 2) (CALL 2)) ((((GREF 0 0) (LREF 1 3 1) (LREF ", +"2 5 3) (LREF 3 0 1) (CALL 3)) () (set-cdr!) (1 . #f) 5)) (cdr) (1 . #f) 4)) (set", +"-car!) (1 . #f) 5)) (car) (2 . #f) 4)) () (1 . #f) 4)) () (3 . #f) 3)) () (1 . #", +"f) 5)) (car) (1 . #f) 4)) (cdr) (2 . #f) 4)) (for-each) (1 . #f) 5)) (reverse) (", +"1 . #f) 4)) () (1 . #f) 3) (((GREF 0 0) (PROC 1 0) (LREF 2 0 2) (CALL 2)) ((((GR", +"EF 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) () (car) (1 . #f) 4)) (cddr) (2 . #f", +") 4) (((GREF 0 0) (PROC 1 0) (LREF 2 0 3) (CALL 2)) ((((LREF 0 0 1) (COND 0 181)", +" (LREF 0 1 1) (LREF 1 1 3) (CALL 1) 181 (GREF 0 0) (PROC 1 0) (LREF 2 1 3) (CALL", +" 2)) ((((LREF 0 0 1) (COND 0 182) (GREF 0 0) (PROC 1 0) (LREF 2 2 3) (CALL 2) 18", +"2 (LREF 0 2 2) (LREF 1 2 1) (LREF 2 2 3) (CALL 2)) ((((LREF 0 3 2) (PROC 1 0) (L", +"REF 2 0 1) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 4 3) (CALL 2)) ((((LREF 0 ", +"6 11) (PROC 1 0) (LREF 2 5 2) (LREF 3 0 1) (CALL 3)) ((((GREF 0 0) (LREF 1 6 1) ", +"(LREF 2 2 1) (LREF 3 0 1) (CALL 3)) () (cons) (1 . #f) 5)) () (1 . #f) 5)) (cdr)", +" (1 . #f) 4)) () (1 . #f) 4)) (car) (1 . #f) 4)) (pair?) (1 . #f) 4)) (null?) (3", +" . #f) 4) (((LREF 0 11 21) (PROC 1 0) (LREF 2 0 2) (CALL 2)) ((((PROC 0 0) (PROC", +" 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 183) (LREF 0 0 1) (LREF 1 0", +" 2) (CALL 1) 183 (GREF 0 0) (PROC 1 0) (LREF 2 2 2) (CALL 2)) ((((PROC 0 0) (LRE", +"F 1 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 184) (LREF 0 0 1) (LREF ", +"1 0 2) (CALL 1) 184 (LREF 0 0 1) (LOADF 1) (CALL 1)) () () (2 . #f) 3)) () (1 . ", +"#f) 4)) (pair?) (2 . #f) 4) (((GREF 0 0) (LREF 1 2 1) (LREF 2 0 1) (CALL 2)) () ", +"(not) (1 . #f) 4)) () (1 . #f) 4)) () (2 . #f) 4) (((GREF 0 0) (PROC 1 0) (LREF ", +"2 0 2) (CALL 2)) ((((LREF 0 0 1) (COND 0 185) (GREF 0 0) (PROC 1 0) (LREF 2 1 2)", +" (CALL 2) 185 (LREF 0 1 1) (LOADF 1) (CALL 1)) ((((GREF 0 0) (PROC 1 0) (LREF 2 ", +"0 1) (CALL 2)) ((((LREF 0 0 1) (COND 0 186) (GREF 0 0) (PROC 1 0) (LREF 2 3 2) (", +"CALL 2) 186 (LREF 0 3 1) (LOADF 1) (CALL 1)) ((((LREF 0 15 21) (LREF 1 4 1) (LRE", +"F 2 0 1) (CALL 2)) () () (1 . #f) 4)) (car) (1 . #f) 4)) (not) (1 . #f) 4)) (nul", +"l?) (1 . #f) 4)) (list?) (2 . #f) 4) (((LREF 0 11 13) (PROC 1 0) (LREF 2 0 2) (L", +"REF 3 0 3) (CALL 3)) ((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF ", +"0 13 6) (PROC 1 0) (LREF 2 0 2) (CALL 2)) ((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1", +") (CALL 2)) ((((LREF 0 0 2) (COND 0 187) (LREF 0 0 2) (PROC 1 0) (LREF 2 4 2) (L", +"REF 3 4 3) (CALL 3) 187 (LREF 0 0 1) (LREF 1 2 2) (CALL 1)) ((((LREF 0 6 3) (LRE", +"F 1 1 1) (LREF 2 0 1) (LREF 3 5 3) (CALL 3)) () () (1 . #f) 5)) () (2 . #f) 5)) ", +"() (1 . #f) 4)) () (2 . #f) 4)) () (1 . #f) 4)) () (3 . #f) 5) (((GREF 0 0) (PRO", +"C 1 0) (LREF 2 0 2) (LOADN 3) (CALL 3)) ((((GREF 0 0) (LREF 1 1 1) (LOAD 2 1) (L", +"REF 3 0 1) (CALL 3)) () (cons core#quote) (1 . #f) 5)) (cons) (2 . #f) 5) (((LRE", +"F 0 11 12) (PROC 1 0) (LREF 2 0 2) (LREF 3 0 4) (CALL 3)) ((((PROC 0 0) (LREF 1 ", +"1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 13 4) (PROC 1 0) (LREF 2 0 2) (CALL 2)) (", +"(((LREF 0 4 3) (PROC 1 0) (LREF 2 3 3) (LREF 3 3 4) (CALL 3)) ((((GREF 0 0) (PRO", +"C 1 0) (LREF 2 0 1) (LOADN 3) (CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 3 2) (L", +"REF 3 0 1) (CALL 3)) ((((GREF 0 0) (LREF 1 4 1) (LOAD 2 1) (LREF 3 0 1) (CALL 3)", +") () (cons core#define) (1 . #f) 5)) (cons) (1 . #f) 5)) (cons) (1 . #f) 5)) () ", +"(1 . #f) 5)) () (2 . #f) 4)) () (1 . #f) 4)) () (4 . #f) 5) (((LREF 0 11 8) (PRO", +"C 1 0) (LREF 2 0 4) (CALL 2)) ((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ", +"((((LREF 0 3 11) (PROC 1 0) (PROC 2 1) (LREF 3 2 2) (CALL 3)) ((((PROC 0 0) (LRE", +"F 1 1 1) (LREF 2 0 1) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 6 2) (LOADN 3) ", +"(CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 0 1) (CALL 2)) ((((GREF 0 0) (LREF 1 ", +"2 1) (LREF 2 0 1) (PROC 3 0) (CALL 3)) ((((LREF 0 8 3) (PROC 1 0) (LREF 2 7 3) (", +"LREF 3 5 2) (CALL 3)) ((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF", +" 0 10 13) (PROC 1 0) (CALL 1)) ((((GREF 0 0) (PROC 1 0) (LREF 2 1 2) (LOADN 3) (", +"CALL 3)) ((((GREF 0 0) (PROC 1 0) (LREF 2 7 2) (LREF 3 0 1) (CALL 3)) ((((GREF 0", +" 0) (LREF 1 3 1) (LOAD 2 1) (LREF 3 0 1) (CALL 3)) () (cons core#lambda) (1 . #f", +") 5)) (cons) (1 . #f) 5)) (cons) (1 . #f) 5)) () (2 . #f) 3)) () (1 . #f) 4)) ()", +" (1 . #f) 5)) (with-dynamic-environment) (1 . #f) 5)) (list) (1 . #f) 4)) (cons)", +" (2 . #f) 5)) () (1 . #f) 4) (((LREF 0 14 12) (LREF 1 0 1) (LREF 2 0 2) (LREF 3 ", +"1 2) (CALL 3)) () () (2 . #f) 5)) () (2 . #f) 5)) () (1 . #f) 4)) () (4 . #f) 4)", +" (((LREF 0 11 12) (PROC 1 0) (LREF 2 0 2) (LREF 3 0 4) (CALL 3)) ((((PROC 0 0) (", +"LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ((((GREF 0 0) (PROC 1 0) (LREF 2 2 3) (LREF 3", +" 2 4) (CALL 3)) ((((PROC 0 0) (LREF 1 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 15 ", +"5) (PROC 1 0) (LREF 2 2 2) (LREF 3 0 2) (CALL 3)) ((((LREF 0 1 1) (LOADU 1) (CAL", +"L 1)) () () (1 . #f) 3)) () (2 . #f) 5)) () (1 . #f) 4)) (eval) (2 . #f) 5)) () ", +"(1 . #f) 4)) () (4 . #f) 5) (((LREF 0 1 10) (PROC 1 0) (LREF 2 0 2) (CALL 2)) ((", +"((LREF 0 0 1) (COND 0 188) (LREF 0 1 1) (LREF 1 1 2) (CALL 1) 188 (LREF 0 12 21)", +" (PROC 1 0) (LREF 2 1 2) (CALL 2)) ((((LREF 0 0 1) (COND 0 189) (LREF 0 3 8) (LR", +"EF 1 2 1) (LREF 2 2 2) (LREF 3 2 3) (CALL 3) 189 (LREF 0 3 9) (PROC 1 0) (LREF 2", +" 2 2) (CALL 2)) ((((LREF 0 0 1) (COND 0 190) (GREF 0 0) (PROC 1 0) (LREF 2 3 2) ", +"(CALL 2) 190 (GREF 0 1) (PROC 1 1) (LREF 2 3 2) (CALL 2)) ((((LREF 0 15 13) (PRO", +"C 1 0) (LREF 2 0 1) (LREF 3 4 3) (CALL 3)) ((((PROC 0 0) (LREF 1 5 1) (LREF 2 0 ", +"1) (CALL 2)) ((((PROC 0 0) (LREF 1 0 1) (LREF 2 0 2) (CALL 2)) ((((GREF 0 0) (PR", +"OC 1 0) (LREF 2 0 2) (LOAD 3 1) (CALL 3)) ((((PROC 0 0) (PROC 1 1) (LREF 2 0 1) ", +"(CALL 2)) ((((LREF 0 0 2) (COND 0 191) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 191 (L", +"REF 0 0 1) (LOADF 1) (CALL 1)) () () (2 . #f) 3) (((LREF 0 0 1) (COND 0 192) (GR", +"EF 0 0) (PROC 1 0) (LREF 2 9 2) (CALL 2) 192 (GREF 0 1) (PROC 1 1) (LREF 2 2 2) ", +"(LOAD 3 2) (CALL 3)) ((((LREF 0 11 7) (LREF 1 3 1) (LREF 2 0 1) (CALL 2)) () () ", +"(1 . #f) 4) (((PROC 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND", +" 0 193) (LREF 0 0 1) (LREF 1 0 2) (CALL 1) 193 (LREF 0 0 1) (LOADF 1) (CALL 1)) ", +"() () (2 . #f) 3) (((LREF 0 0 1) (COND 0 194) (GREF 0 0) (PROC 1 0) (LREF 2 11 2", +") (CALL 2) 194 (GREF 0 1) (PROC 1 1) (LREF 2 4 2) (LOAD 3 2) (CALL 3)) ((((LREF ", +"0 13 12) (PROC 1 0) (LREF 2 12 2) (CALL 2)) ((((LREF 0 14 6) (LREF 1 6 1) (LREF ", +"2 1 1) (LREF 3 0 1) (LREF 4 13 3) (CALL 4)) () () (1 . #f) 6)) () (1 . #f) 4) ((", +"(PROC 0 0) (PROC 1 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 195) (LREF ", +"0 0 1) (LREF 1 0 2) (CALL 1) 195 (LREF 0 0 1) (LOADF 1) (CALL 1)) () () (2 . #f)", +" 3) (((LREF 0 0 1) (COND 0 196) (LREF 0 14 14) (LREF 1 6 1) (PROC 2 0) (CALL 2) ", +"196 (GREF 0 0) (PROC 1 1) (LREF 2 6 2) (LOAD 3 1) (CALL 3)) ((((GREF 0 0) (PROC ", +"1 0) (LREF 2 14 2) (CALL 2)) ((((LREF 0 16 12) (PROC 1 0) (LREF 2 15 2) (CALL 2)", +") ((((LREF 0 17 5) (LREF 1 2 1) (LREF 2 1 1) (LREF 3 0 1) (LREF 4 16 3) (CALL 4)", +") () () (1 . #f) 6)) () (1 . #f) 4)) (cadr) (1 . #f) 4) (((PROC 0 0) (PROC 1 1) ", +"(LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (COND 0 197) (LREF 0 0 1) (LREF 1 0 2) (C", +"ALL 1) 197 (LREF 0 0 1) (LOADF 1) (CALL 1)) () () (2 . #f) 3) (((LREF 0 0 1) (CO", +"ND 0 198) (GREF 0 0) (PROC 1 0) (LREF 2 15 2) (CALL 2) 198 (LOADT 0) (COND 0 199", +") (LREF 0 26 6) (PROC 1 1) (LREF 2 9 2) (CALL 2) 199 (LREF 0 8 1) (LOADU 1) (CAL", +"L 1)) ((((LREF 0 17 12) (PROC 1 0) (LREF 2 16 2) (CALL 2)) ((((LREF 0 18 4) (LRE", +"F 1 10 1) (LREF 2 1 1) (LREF 3 0 1) (LREF 4 17 3) (CALL 4)) () () (1 . #f) 6)) (", +") (1 . #f) 4) (((PROC 0 0) (LREF 1 9 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 0 2) (", +"COND 0 200) (LREF 0 0 2) (PROC 1 0) (LREF 2 17 2) (LREF 3 17 3) (CALL 3) 200 (GR", +"EF 0 0) (LREF 1 0 1) (PROC 2 1) (LREF 3 17 2) (CALL 3)) ((((LREF 0 19 3) (LREF 1", +" 1 1) (LREF 2 0 1) (LREF 3 18 3) (CALL 3)) () () (1 . #f) 5) (((LREF 0 19 3) (LR", +"EF 1 0 1) (LREF 2 0 2) (LREF 3 18 3) (CALL 3)) () () (2 . #f) 5)) (map) (2 . #f)", +" 5)) () (1 . #f) 4)) (cadr) (1 . #f) 4)) () (1 . #f) 4)) (eqv? core#define-macro", +") (1 . #f) 5)) () (1 . #f) 4)) (cadr eqv? core#lambda) (1 . #f) 5)) () (1 . #f) ", +"4)) (cadr eqv? core#define) (1 . #f) 5)) () (1 . #f) 4)) (eqv? core#quote) (2 . ", +"#f) 5)) () (2 . #f) 4)) () (1 . #f) 4)) () (1 . #f) 5) (((LREF 0 0 1) (COND 0 20", +"1) (GREF 0 0) (LREF 1 4 1) (PROC 2 0) (LREF 3 4 2) (CALL 3) 201 (GREF 0 1) (LREF", +" 1 4 1) (LOAD 2 2) (LREF 3 4 2) (CALL 3)) ((((LREF 0 6 3) (LREF 1 0 1) (LREF 2 0", +" 2) (LREF 3 5 3) (CALL 3)) () () (2 . #f) 5)) (map error \"invalid expression\") (", +"1 . #f) 5)) (car list?) (1 . #f) 4)) () (1 . #f) 5)) () (1 . #f) 4)) () (3 . #f)", +" 4) (((PROC 0 0) (PROC 1 1) (CALL 1)) ((((GREF 0 0) (PROC 1 0) (LREF 2 1 3) (CAL", +"L 2)) ((((LREF 0 0 1) (COND 0 202) (LREF 0 1 1) (LREF 1 13 9) (CALL 1) 202 (GREF", +" 0 0) (LREF 1 1 1) (LREF 2 2 3) (CALL 2)) () (car) (1 . #f) 4)) (null?) (1 . #f)", +" 4) (((LREF 0 2 3) (PROC 1 0) (LREF 2 1 2) (LREF 3 0 1) (CALL 3)) ((((PROC 0 0) ", +"(LREF 1 2 1) (LREF 2 0 1) (CALL 2)) ((((LREF 0 4 13) (PROC 1 0) (CALL 1)) ((((LR", +"EF 0 1 1) (LREF 1 1 2) (CALL 1)) () () (1 . #f) 3)) () (2 . #f) 3)) () (1 . #f) ", +"4)) () (1 . #f) 5)) () (2 . #t) 3)) () (14 . #f) 3)) () (2 . #f) 16) (((LREF 0 0", +" 1) (LSET 0 9 2) (GREF 0 0) (LREF 1 9 1) (LREF 2 9 25) (LREF 3 9 21) (LREF 4 9 2", +"0) (LREF 5 9 22) (LREF 6 9 23) (LREF 7 9 10) (LREF 8 9 9) (LREF 9 9 18) (LREF 10", +" 9 13) (LREF 11 9 12) (LREF 12 9 11) (LREF 13 9 3) (LREF 14 9 2) (CALL 14)) () (", +"values) (1 . #f) 16)) () (1 . #f) 4)) (make-parameter) (1 . #f) 4)) (make-dictio", +"nary) (1 . #f) 3)) () (1 . #f) 4)) () (1 . #f) 4)) (string->symbol \"\") (1 . #f) ", +"4)) () (1 . #f) 4)) (equal?) (1 . #f) 4)) (equal?) (25 . #f) 4)) () (1 . #f) 27)", +") () (1 . #f) 3) (((LREF 0 0 2) (GSET 0 0) (LREF 0 0 3) (GSET 0 1) (LREF 0 0 4) ", +"(GSET 0 2) (LREF 0 0 5) (GSET 0 3) (LREF 0 0 6) (GSET 0 4) (LREF 0 0 7) (GSET 0 ", +"5) (LREF 0 0 8) (GSET 0 6) (LREF 0 0 9) (GSET 0 7) (LREF 0 0 10) (GSET 0 8) (LRE", +"F 0 0 11) (GSET 0 9) (LREF 0 0 12) (GSET 0 10) (LREF 0 0 13) (GSET 0 11) (LREF 0", +" 0 14) (GSET 0 12) (LREF 0 0 1) (LOADU 1) (CALL 1)) () (make-identifier identifi", +"er? identifier=? identifier-name identifier-environment make-environment default", +"-environment environment? find-identifier add-identifier! set-identifier! macro-", +"objects expand) (14 . #f) 3)) (make-identifier identifier? identifier=? identifi", +"er-name identifier-environment make-environment default-environment environment?", +" find-identifier add-identifier! set-identifier! macro-objects expand call-with-", +"values) (1 . #f) 5)", }; #endif diff --git a/lib/ext/main.c b/lib/ext/main.c index 6c62a875..5e04da35 100644 --- a/lib/ext/main.c +++ b/lib/ext/main.c @@ -46,7 +46,7 @@ main(int argc, char *argv[]) } port = pic_fopen(pic, file, "r"); } - pic_printf(pic, "~s\n", pic_funcall(pic, "compile", 1, pic_funcall(pic, "expand", 2, pic_read(pic, port), pic_ref(pic, "default-environment")))); + pic_printf(pic, "~s\n", pic_funcall(pic, "compile", 1, pic_read(pic, port))); } else { fprintf(stderr, "usage: mini-picrin [-c] [file]\n"); exit(1); diff --git a/piclib/eval.scm b/piclib/eval.scm index 7562a21b..a6a61ecb 100644 --- a/piclib/eval.scm +++ b/piclib/eval.scm @@ -198,7 +198,7 @@ (define (expand-define-macro var transformer env) (let ((uid (add-identifier! var env))) - (let ((expander (load (compile (expand transformer env))))) + (let ((expander (eval transformer env))) (add-macro! uid expander) #undefined))) @@ -223,8 +223,8 @@ (else (error "invalid expression" expr)))) - (define (expand expr env) - (let ((x (expand-node expr env))) + (define (expand expr . env) + (let ((x (expand-node expr (if (null? env) default-environment (car env))))) (run-all) x)) @@ -884,12 +884,12 @@ (codegen-e e) (car (reps)))))) - (lambda (e) - (codegen (transform (normalize e)))))) + (lambda (e . env) + (codegen (transform (normalize (apply expand e env))))))) ;; eval (define (eval expr . env) - (load (compile (expand expr (if (null? env) default-environment (car env))))))) + (load (apply compile expr env))))