43 return v2 = (function(){
45 if (typeof name != 'string')
46 throw 'The value ' + name + ' is not a type string.';
47 return ({name: name});
52 return v3 = (function(){
54 if (typeof name != 'string')
55 throw 'The value ' + name + ' is not a type string.';
56 return ({name: name});
61 return f1 = (function(v4){
62 ((v4)["fname"] = "NULL");
65 if (arguments.length < 1) throw 'too few arguments';
66 if (arguments.length > 1) throw 'too many arguments';
67 return ((v5 === v2)?v3: v2);
71 return f2 = (function(v6){
72 ((v6)["fname"] = "INTERNP");
75 if (arguments.length < 1) throw 'too few arguments';
76 if (arguments.length > 1) throw 'too many arguments';
77 return (((v7) in (v1))?v3: v2);
81 return f3 = (function(v8){
82 ((v8)["fname"] = "INTERN");
85 if (arguments.length < 1) throw 'too few arguments';
86 if (arguments.length > 1) throw 'too many arguments';
87 return (f2(v9) !== v2 ? (function(){
89 return tmp == undefined? v2: tmp ;
90 })() : ((v1)[v9] = (function(){
92 if (typeof name != 'string')
93 throw 'The value ' + name + ' is not a type string.';
94 return ({name: name});
99 return f4 = (function(v10){
100 ((v10)["fname"] = "FIND-SYMBOL");
103 if (arguments.length < 1) throw 'too few arguments';
104 if (arguments.length > 1) throw 'too many arguments';
107 return tmp == undefined? v2: tmp ;
115 return f5 = (function(v13){
116 ((v13)["fname"] = "GENSYM");
119 if (arguments.length > 1) throw 'too many arguments';
120 switch(arguments.length){
128 if (typeof x != 'number')
129 throw 'The value ' + x + ' is not a type number.';
130 if (typeof y != 'number')
131 throw 'The value ' + y + ' is not a type number.';
135 var name = (function(){
137 var string2 = f6(v12);
138 if (typeof string1 != 'string')
139 throw 'The value ' + string1 + ' is not a type string.';
140 if (typeof string2 != 'string')
141 throw 'The value ' + string2 + ' is not a type string.';
142 return string1.concat(string2);
144 if (typeof name != 'string')
145 throw 'The value ' + name + ' is not a type string.';
146 return ({name: name});
151 return f7 = (function(v15){
152 ((v15)["fname"] = "=");
154 })((function (v16,v17){
155 if (arguments.length < 2) throw 'too few arguments';
156 if (arguments.length > 2) throw 'too many arguments';
160 if (typeof x != 'number')
161 throw 'The value ' + x + ' is not a type number.';
162 if (typeof y != 'number')
163 throw 'The value ' + y + ' is not a type number.';
169 return f8 = (function(v18){
170 ((v18)["fname"] = "+");
172 })((function (v19,v20){
173 if (arguments.length < 2) throw 'too few arguments';
174 if (arguments.length > 2) throw 'too many arguments';
178 if (typeof x != 'number')
179 throw 'The value ' + x + ' is not a type number.';
180 if (typeof y != 'number')
181 throw 'The value ' + y + ' is not a type number.';
187 return f9 = (function(v21){
188 ((v21)["fname"] = "-");
190 })((function (v22,v23){
191 if (arguments.length < 2) throw 'too few arguments';
192 if (arguments.length > 2) throw 'too many arguments';
196 if (typeof x != 'number')
197 throw 'The value ' + x + ' is not a type number.';
198 if (typeof y != 'number')
199 throw 'The value ' + y + ' is not a type number.';
205 return f10 = (function(v24){
206 ((v24)["fname"] = "*");
208 })((function (v25,v26){
209 if (arguments.length < 2) throw 'too few arguments';
210 if (arguments.length > 2) throw 'too many arguments';
214 if (typeof x != 'number')
215 throw 'The value ' + x + ' is not a type number.';
216 if (typeof y != 'number')
217 throw 'The value ' + y + ' is not a type number.';
223 return f11 = (function(v27){
224 ((v27)["fname"] = "/");
226 })((function (v28,v29){
227 if (arguments.length < 2) throw 'too few arguments';
228 if (arguments.length > 2) throw 'too many arguments';
232 if (typeof x != 'number')
233 throw 'The value ' + x + ' is not a type number.';
234 if (typeof y != 'number')
235 throw 'The value ' + y + ' is not a type number.';
241 return f12 = (function(v30){
242 ((v30)["fname"] = "1+");
245 if (arguments.length < 1) throw 'too few arguments';
246 if (arguments.length > 1) throw 'too many arguments';
250 if (typeof x != 'number')
251 throw 'The value ' + x + ' is not a type number.';
252 if (typeof y != 'number')
253 throw 'The value ' + y + ' is not a type number.';
259 return f13 = (function(v32){
260 ((v32)["fname"] = "1-");
263 if (arguments.length < 1) throw 'too few arguments';
264 if (arguments.length > 1) throw 'too many arguments';
268 if (typeof x != 'number')
269 throw 'The value ' + x + ' is not a type number.';
270 if (typeof y != 'number')
271 throw 'The value ' + y + ' is not a type number.';
277 return f14 = (function(v34){
278 ((v34)["fname"] = "ZEROP");
281 if (arguments.length < 1) throw 'too few arguments';
282 if (arguments.length > 1) throw 'too many arguments';
286 if (typeof x != 'number')
287 throw 'The value ' + x + ' is not a type number.';
288 if (typeof y != 'number')
289 throw 'The value ' + y + ' is not a type number.';
295 return f15 = (function(v36){
296 ((v36)["fname"] = "TRUNCATE");
298 })((function (v37,v38){
299 if (arguments.length < 2) throw 'too few arguments';
300 if (arguments.length > 2) throw 'too many arguments';
305 if (typeof x != 'number')
306 throw 'The value ' + x + ' is not a type number.';
307 if (typeof y != 'number')
308 throw 'The value ' + y + ' is not a type number.';
311 if (typeof x != 'number')
312 throw 'The value ' + x + ' is not a type number.';
313 return Math.floor(x);
318 return f16 = (function(v39){
319 ((v39)["fname"] = "EQL");
321 })((function (v40,v41){
322 if (arguments.length < 2) throw 'too few arguments';
323 if (arguments.length > 2) throw 'too many arguments';
324 return ((v40 === v41)?v3: v2);
328 return f17 = (function(v42){
329 ((v42)["fname"] = "NOT");
332 if (arguments.length < 1) throw 'too few arguments';
333 if (arguments.length > 1) throw 'too many arguments';
334 return (v43 !== v2 ? v2 : v3);
338 return f18 = (function(v44){
339 ((v44)["fname"] = "CONS");
341 })((function (v45,v46){
342 if (arguments.length < 2) throw 'too few arguments';
343 if (arguments.length > 2) throw 'too many arguments';
344 return ({car: v45, cdr: v46});
348 return f19 = (function(v47){
349 ((v47)["fname"] = "CONSP");
352 if (arguments.length < 1) throw 'too few arguments';
353 if (arguments.length > 1) throw 'too many arguments';
356 return (typeof tmp == 'object' && 'car' in tmp);
361 return f20 = (function(v49){
362 ((v49)["fname"] = "CAR");
365 if (arguments.length < 1) throw 'too few arguments';
366 if (arguments.length > 1) throw 'too many arguments';
369 return tmp === v2? v2: tmp.car;
374 return f21 = (function(v51){
375 ((v51)["fname"] = "CDR");
378 if (arguments.length < 1) throw 'too few arguments';
379 if (arguments.length > 1) throw 'too many arguments';
382 return tmp === v2? v2: tmp.cdr;
387 return f22 = (function(v53){
388 ((v53)["fname"] = "CAAR");
391 if (arguments.length < 1) throw 'too few arguments';
392 if (arguments.length > 1) throw 'too many arguments';
394 var tmp = (function(){
396 return tmp === v2? v2: tmp.car;
398 return tmp === v2? v2: tmp.car;
403 return f23 = (function(v55){
404 ((v55)["fname"] = "CADR");
407 if (arguments.length < 1) throw 'too few arguments';
408 if (arguments.length > 1) throw 'too many arguments';
410 var tmp = (function(){
412 return tmp === v2? v2: tmp.cdr;
414 return tmp === v2? v2: tmp.car;
419 return f24 = (function(v57){
420 ((v57)["fname"] = "CDAR");
423 if (arguments.length < 1) throw 'too few arguments';
424 if (arguments.length > 1) throw 'too many arguments';
426 var tmp = (function(){
428 return tmp === v2? v2: tmp.car;
430 return tmp === v2? v2: tmp.cdr;
435 return f25 = (function(v59){
436 ((v59)["fname"] = "CDDR");
439 if (arguments.length < 1) throw 'too few arguments';
440 if (arguments.length > 1) throw 'too many arguments';
442 var tmp = (function(){
444 return tmp === v2? v2: tmp.cdr;
446 return tmp === v2? v2: tmp.cdr;
451 return f26 = (function(v61){
452 ((v61)["fname"] = "CADDR");
455 if (arguments.length < 1) throw 'too few arguments';
456 if (arguments.length > 1) throw 'too many arguments';
458 var tmp = (function(){
459 var tmp = (function(){
461 return tmp === v2? v2: tmp.cdr;
463 return tmp === v2? v2: tmp.cdr;
465 return tmp === v2? v2: tmp.car;
470 return f27 = (function(v63){
471 ((v63)["fname"] = "CDDDR");
474 if (arguments.length < 1) throw 'too few arguments';
475 if (arguments.length > 1) throw 'too many arguments';
477 var tmp = (function(){
478 var tmp = (function(){
480 return tmp === v2? v2: tmp.cdr;
482 return tmp === v2? v2: tmp.cdr;
484 return tmp === v2? v2: tmp.cdr;
489 return f28 = (function(v65){
490 ((v65)["fname"] = "CADDDR");
493 if (arguments.length < 1) throw 'too few arguments';
494 if (arguments.length > 1) throw 'too many arguments';
496 var tmp = (function(){
497 var tmp = (function(){
498 var tmp = (function(){
500 return tmp === v2? v2: tmp.cdr;
502 return tmp === v2? v2: tmp.cdr;
504 return tmp === v2? v2: tmp.cdr;
506 return tmp === v2? v2: tmp.car;
511 return f29 = (function(v67){
512 ((v67)["fname"] = "FIRST");
515 if (arguments.length < 1) throw 'too few arguments';
516 if (arguments.length > 1) throw 'too many arguments';
519 return tmp === v2? v2: tmp.car;
524 return f30 = (function(v69){
525 ((v69)["fname"] = "SECOND");
528 if (arguments.length < 1) throw 'too few arguments';
529 if (arguments.length > 1) throw 'too many arguments';
534 return f31 = (function(v71){
535 ((v71)["fname"] = "THIRD");
538 if (arguments.length < 1) throw 'too few arguments';
539 if (arguments.length > 1) throw 'too many arguments';
544 return f32 = (function(v73){
545 ((v73)["fname"] = "FOURTH");
548 if (arguments.length < 1) throw 'too few arguments';
549 if (arguments.length > 1) throw 'too many arguments';
554 return f33 = (function(v75){
555 ((v75)["fname"] = "LIST");
559 for (var i = arguments.length-1; i>=0; i--)
560 v76 = {car: arguments[i], cdr: v76};
565 return f34 = (function(v77){
566 ((v77)["fname"] = "ATOM");
569 if (arguments.length < 1) throw 'too few arguments';
570 if (arguments.length > 1) throw 'too many arguments';
571 return f17(((function(){
573 return (typeof tmp == 'object' && 'car' in tmp);
581 return f35 = (function(v79){
582 ((v79)["fname"] = "ENSURE-LIST");
585 if (arguments.length < 1) throw 'too few arguments';
586 if (arguments.length > 1) throw 'too many arguments';
587 return (f36(v80) !== v2 ? v80 : f33(v80));
592 return f37 = (function(v81){
593 ((v81)["fname"] = "!REDUCE");
595 })((function (v82,v83,v84){
596 if (arguments.length < 3) throw 'too few arguments';
597 if (arguments.length > 3) throw 'too many arguments';
598 return (f1(v83) !== v2 ? v84 : f37(v82, (function(){
600 return tmp === v2? v2: tmp.cdr;
601 })(), (v82)(v84, (function(){
603 return tmp === v2? v2: tmp.car;
607 var l33 = f3("STRING=");
609 var l32 = f3("ASSOC");
611 var l31 = f3("EVERY");
613 var l30 = f3("PARSE-INTEGER");
615 var l29 = f3("SUBSEQ");
617 var l28 = f3("DIGIT-CHAR-P");
619 var l27 = f3("REMOVE-IF-NOT");
621 var l26 = f3("REMOVE-IF");
623 var l25 = f3("REMOVE");
625 var l24 = f3("MEMBER");
627 var l23 = f3("BUTLAST");
629 var l22 = f3("LAST");
633 var l20 = f3("LISTP");
635 var l19 = f3("MINUSP");
637 var l18 = f3("PLUSP");
639 var l17 = f3("INTEGERP");
641 var l16 = f3("CHAR=");
643 var l15 = f3("CHAR-CODE");
645 var l14 = f3("CODE-CHAR");
647 var l13 = f3("COPY-LIST");
649 var l12 = f3("IDENTITY");
651 var l11 = f3("MAPCAR");
654 var l9 = f3("CONCAT-TWO");
656 var l8 = f3("LENGTH");
658 var l7 = f3("LIST-LENGTH");
660 var l6 = f3("REVERSE");
663 var l4 = f3("REVERSE-AUX");
665 var l3 = f3("APPEND");
668 var l1 = f3("APPEND-TWO");
673 return f38 = (function(v85){
674 ((v85)["fname"] = "APPEND-TWO");
676 })((function (v86,v87){
677 if (arguments.length < 2) throw 'too few arguments';
678 if (arguments.length > 2) throw 'too many arguments';
679 return (f1(v86) !== v2 ? v87 : ({car: (function(){
681 return tmp === v2? v2: tmp.car;
682 })(), cdr: f39((function(){
684 return tmp === v2? v2: tmp.cdr;
692 return f39 = (function(v88){
693 ((v88)["fname"] = "APPEND");
697 for (var i = arguments.length-1; i>=0; i--)
698 v89 = {car: arguments[i], cdr: v89};
699 return f37(f38, v89, l2);
706 return f40 = (function(v90){
707 ((v90)["fname"] = "REVERSE-AUX");
709 })((function (v91,v92){
710 if (arguments.length < 2) throw 'too few arguments';
711 if (arguments.length > 2) throw 'too many arguments';
712 return (f1(v91) !== v2 ? v92 : f40((function(){
714 return tmp === v2? v2: tmp.cdr;
715 })(), ({car: (function(){
717 return tmp === v2? v2: tmp.car;
725 return f41 = (function(v93){
726 ((v93)["fname"] = "REVERSE");
729 if (arguments.length < 1) throw 'too few arguments';
730 if (arguments.length > 1) throw 'too many arguments';
738 return f42 = (function(v95){
739 ((v95)["fname"] = "LIST-LENGTH");
742 if (arguments.length < 1) throw 'too few arguments';
743 if (arguments.length > 1) throw 'too many arguments';
744 return (function(v97){
746 while(f17(f1(v96)) !== v2){
750 if (typeof x != 'number')
751 throw 'The value ' + x + ' is not a type number.';
752 if (typeof y != 'number')
753 throw 'The value ' + y + ' is not a type number.';
758 return tmp === v2? v2: tmp.cdr;
769 return f43 = (function(v98){
770 ((v98)["fname"] = "LENGTH");
773 if (arguments.length < 1) throw 'too few arguments';
774 if (arguments.length > 1) throw 'too many arguments';
775 return (((typeof(v99) == "string")?v3: v2) !== v2 ? (function(){
777 if (typeof x != 'string')
778 throw 'The value ' + x + ' is not a type string.';
787 return f44 = (function(v100){
788 ((v100)["fname"] = "CONCAT-TWO");
790 })((function (v101,v102){
791 if (arguments.length < 2) throw 'too few arguments';
792 if (arguments.length > 2) throw 'too many arguments';
796 if (typeof string1 != 'string')
797 throw 'The value ' + string1 + ' is not a type string.';
798 if (typeof string2 != 'string')
799 throw 'The value ' + string2 + ' is not a type string.';
800 return string1.concat(string2);
808 return f45 = (function(v103){
809 ((v103)["fname"] = "MAPCAR");
811 })((function (v104,v105){
812 if (arguments.length < 2) throw 'too few arguments';
813 if (arguments.length > 2) throw 'too many arguments';
814 return (f1(v105) !== v2 ? l10 : ({car: (v104)((function(){
816 return tmp === v2? v2: tmp.car;
817 })()), cdr: f45(v104, (function(){
819 return tmp === v2? v2: tmp.cdr;
827 return f46 = (function(v106){
828 ((v106)["fname"] = "IDENTITY");
831 if (arguments.length < 1) throw 'too few arguments';
832 if (arguments.length > 1) throw 'too many arguments';
840 return f47 = (function(v108){
841 ((v108)["fname"] = "COPY-LIST");
844 if (arguments.length < 1) throw 'too few arguments';
845 if (arguments.length > 1) throw 'too many arguments';
846 return f45(f46, v109);
853 return f48 = (function(v110){
854 ((v110)["fname"] = "CODE-CHAR");
857 if (arguments.length < 1) throw 'too few arguments';
858 if (arguments.length > 1) throw 'too many arguments';
866 return f49 = (function(v112){
867 ((v112)["fname"] = "CHAR-CODE");
870 if (arguments.length < 1) throw 'too few arguments';
871 if (arguments.length > 1) throw 'too many arguments';
879 return f50 = (function(v114){
880 ((v114)["fname"] = "CHAR=");
882 })((function (v115,v116){
883 if (arguments.length < 2) throw 'too few arguments';
884 if (arguments.length > 2) throw 'too many arguments';
888 if (typeof x != 'number')
889 throw 'The value ' + x + ' is not a type number.';
890 if (typeof y != 'number')
891 throw 'The value ' + y + ' is not a type number.';
900 return f51 = (function(v117){
901 ((v117)["fname"] = "INTEGERP");
904 if (arguments.length < 1) throw 'too few arguments';
905 if (arguments.length > 1) throw 'too many arguments';
906 return (((typeof (v118) == "number")?v3: v2) !== v2 ? ((function(){
909 if (typeof x != 'number')
910 throw 'The value ' + x + ' is not a type number.';
911 return Math.floor(x);
914 if (typeof x != 'number')
915 throw 'The value ' + x + ' is not a type number.';
916 if (typeof y != 'number')
917 throw 'The value ' + y + ' is not a type number.';
926 return f52 = (function(v119){
927 ((v119)["fname"] = "PLUSP");
930 if (arguments.length < 1) throw 'too few arguments';
931 if (arguments.length > 1) throw 'too many arguments';
935 if (typeof x != 'number')
936 throw 'The value ' + x + ' is not a type number.';
937 if (typeof y != 'number')
938 throw 'The value ' + y + ' is not a type number.';
947 return f53 = (function(v121){
948 ((v121)["fname"] = "MINUSP");
951 if (arguments.length < 1) throw 'too few arguments';
952 if (arguments.length > 1) throw 'too many arguments';
956 if (typeof x != 'number')
957 throw 'The value ' + x + ' is not a type number.';
958 if (typeof y != 'number')
959 throw 'The value ' + y + ' is not a type number.';
968 return f36 = (function(v123){
969 ((v123)["fname"] = "LISTP");
972 if (arguments.length < 1) throw 'too few arguments';
973 if (arguments.length > 1) throw 'too many arguments';
974 return (function(v125){
975 return (v125 !== v2 ? v125 : f1(v124));
978 return (typeof tmp == 'object' && 'car' in tmp);
986 return f54 = (function(v126){
987 ((v126)["fname"] = "NTH");
989 })((function (v127,v128){
990 if (arguments.length < 2) throw 'too few arguments';
991 if (arguments.length > 2) throw 'too many arguments';
992 return (f1(v128) !== v2 ? (function(){
994 })() : (f14(v127) !== v2 ? (function(){
997 return tmp === v2? v2: tmp.car;
1000 return f54(f13(v127), (function(){
1002 return tmp === v2? v2: tmp.cdr;
1011 return f55 = (function(v129){
1012 ((v129)["fname"] = "LAST");
1014 })((function (v130){
1015 if (arguments.length < 1) throw 'too few arguments';
1016 if (arguments.length > 1) throw 'too many arguments';
1017 return (((function(){
1018 var tmp = (function(){
1020 return tmp === v2? v2: tmp.cdr;
1022 return (typeof tmp == 'object' && 'car' in tmp);
1023 })()?v3: v2) !== v2 ? f55((function(){
1025 return tmp === v2? v2: tmp.cdr;
1033 return f56 = (function(v131){
1034 ((v131)["fname"] = "BUTLAST");
1036 })((function (v132){
1037 if (arguments.length < 1) throw 'too few arguments';
1038 if (arguments.length > 1) throw 'too many arguments';
1039 return (((function(){
1040 var tmp = (function(){
1042 return tmp === v2? v2: tmp.cdr;
1044 return (typeof tmp == 'object' && 'car' in tmp);
1045 })()?v3: v2) !== v2 ? ({car: (function(){
1047 return tmp === v2? v2: tmp.car;
1048 })(), cdr: f56((function(){
1050 return tmp === v2? v2: tmp.cdr;
1058 return f57 = (function(v133){
1059 ((v133)["fname"] = "MEMBER");
1061 })((function (v134,v135){
1062 if (arguments.length < 2) throw 'too few arguments';
1063 if (arguments.length > 2) throw 'too many arguments';
1064 return (f1(v135) !== v2 ? (function(){
1066 })() : (f16(v134, (function(){
1068 return tmp === v2? v2: tmp.car;
1069 })()) !== v2 ? (function(){
1072 return f57(v134, (function(){
1074 return tmp === v2? v2: tmp.cdr;
1083 return f58 = (function(v136){
1084 ((v136)["fname"] = "REMOVE");
1086 })((function (v137,v138){
1087 if (arguments.length < 2) throw 'too few arguments';
1088 if (arguments.length > 2) throw 'too many arguments';
1089 return (f1(v138) !== v2 ? (function(){
1091 })() : (f16(v137, (function(){
1093 return tmp === v2? v2: tmp.car;
1094 })()) !== v2 ? (function(){
1095 return f58(v137, (function(){
1097 return tmp === v2? v2: tmp.cdr;
1100 return ({car: (function(){
1102 return tmp === v2? v2: tmp.car;
1103 })(), cdr: f58(v137, (function(){
1105 return tmp === v2? v2: tmp.cdr;
1114 return f59 = (function(v139){
1115 ((v139)["fname"] = "REMOVE-IF");
1117 })((function (v140,v141){
1118 if (arguments.length < 2) throw 'too few arguments';
1119 if (arguments.length > 2) throw 'too many arguments';
1120 return (f1(v141) !== v2 ? (function(){
1122 })() : ((v140)((function(){
1124 return tmp === v2? v2: tmp.car;
1125 })()) !== v2 ? (function(){
1126 return f59(v140, (function(){
1128 return tmp === v2? v2: tmp.cdr;
1131 return ({car: (function(){
1133 return tmp === v2? v2: tmp.car;
1134 })(), cdr: f59(v140, (function(){
1136 return tmp === v2? v2: tmp.cdr;
1145 return f60 = (function(v142){
1146 ((v142)["fname"] = "REMOVE-IF-NOT");
1148 })((function (v143,v144){
1149 if (arguments.length < 2) throw 'too few arguments';
1150 if (arguments.length > 2) throw 'too many arguments';
1151 return (f1(v144) !== v2 ? (function(){
1153 })() : ((v143)((function(){
1155 return tmp === v2? v2: tmp.car;
1156 })()) !== v2 ? (function(){
1157 return ({car: (function(){
1159 return tmp === v2? v2: tmp.car;
1160 })(), cdr: f60(v143, (function(){
1162 return tmp === v2? v2: tmp.cdr;
1165 return f60(v143, (function(){
1167 return tmp === v2? v2: tmp.cdr;
1176 return f61 = (function(v145){
1177 ((v145)["fname"] = "DIGIT-CHAR-P");
1179 })((function (v146){
1180 if (arguments.length < 1) throw 'too few arguments';
1181 if (arguments.length > 1) throw 'too many arguments';
1182 return ((((function(){
1185 if (typeof x != 'number')
1186 throw 'The value ' + x + ' is not a type number.';
1187 if (typeof y != 'number')
1188 throw 'The value ' + y + ' is not a type number.';
1190 })()?v3: v2) !== v2 ? ((function(){
1193 if (typeof x != 'number')
1194 throw 'The value ' + x + ' is not a type number.';
1195 if (typeof y != 'number')
1196 throw 'The value ' + y + ' is not a type number.';
1198 })()?v3: v2) : v2) !== v2 ? (function(){
1201 if (typeof x != 'number')
1202 throw 'The value ' + x + ' is not a type number.';
1203 if (typeof y != 'number')
1204 throw 'The value ' + y + ' is not a type number.';
1213 return f62 = (function(v147){
1214 ((v147)["fname"] = "SUBSEQ");
1216 })((function (v148,v149,v150){
1217 if (arguments.length < 2) throw 'too few arguments';
1218 if (arguments.length > 3) throw 'too many arguments';
1219 switch(arguments.length){
1224 return (((typeof(v148) == "string")?v3: v2) !== v2 ? (function(){
1225 return (v150 !== v2 ? (function(){
1230 return str.slice(a,b);
1235 return str.slice(a,b);
1238 return (function (){ throw "Unsupported argument."; })();
1246 return f63 = (function(v151){
1247 ((v151)["fname"] = "PARSE-INTEGER");
1249 })((function (v152){
1250 if (arguments.length < 1) throw 'too few arguments';
1251 if (arguments.length > 1) throw 'too many arguments';
1252 return (function(v153,v154,v155){
1257 if (typeof x != 'number')
1258 throw 'The value ' + x + ' is not a type number.';
1259 if (typeof y != 'number')
1260 throw 'The value ' + y + ' is not a type number.';
1262 })()?v3: v2) !== v2){
1264 var x = (function(){
1267 if (typeof x != 'number')
1268 throw 'The value ' + x + ' is not a type number.';
1269 if (typeof y != 'number')
1270 throw 'The value ' + y + ' is not a type number.';
1273 var y = f61((function(){
1276 if (typeof string != 'string')
1277 throw 'The value ' + string + ' is not a type string.';
1278 if (typeof index != 'number')
1279 throw 'The value ' + index + ' is not a type number.';
1280 return string.charCodeAt(index);
1282 if (typeof x != 'number')
1283 throw 'The value ' + x + ' is not a type number.';
1284 if (typeof y != 'number')
1285 throw 'The value ' + y + ' is not a type number.';
1291 if (typeof x != 'number')
1292 throw 'The value ' + x + ' is not a type number.';
1293 if (typeof y != 'number')
1294 throw 'The value ' + y + ' is not a type number.';
1306 return f64 = (function(v156){
1307 ((v156)["fname"] = "EVERY");
1309 })((function (v157,v158){
1310 if (arguments.length < 2) throw 'too few arguments';
1311 if (arguments.length > 2) throw 'too many arguments';
1312 return (function(v159,v160,v161){
1314 while((v159 !== v2 ? ((function(){
1317 if (typeof x != 'number')
1318 throw 'The value ' + x + ' is not a type number.';
1319 if (typeof y != 'number')
1320 throw 'The value ' + y + ' is not a type number.';
1322 })()?v3: v2) : v2) !== v2){
1323 ((v157)((function(){
1326 if (typeof string != 'string')
1327 throw 'The value ' + string + ' is not a type string.';
1328 if (typeof index != 'number')
1329 throw 'The value ' + index + ' is not a type number.';
1330 return string.charCodeAt(index);
1331 })()) !== v2 ? v2 : (function(){
1337 if (typeof x != 'number')
1338 throw 'The value ' + x + ' is not a type number.';
1339 if (typeof y != 'number')
1340 throw 'The value ' + y + ' is not a type number.';
1352 return f65 = (function(v162){
1353 ((v162)["fname"] = "ASSOC");
1355 })((function (v163,v164){
1356 if (arguments.length < 2) throw 'too few arguments';
1357 if (arguments.length > 2) throw 'too many arguments';
1358 return (function(v165){
1360 while((v164 !== v2 ? f17(v165) : v2) !== v2){
1361 (f16(v163, f22(v164)) !== v2 ? v165 = v3 : v164 = (function(){
1363 return tmp === v2? v2: tmp.cdr;
1368 return tmp === v2? v2: tmp.car;
1377 return f66 = (function(v166){
1378 ((v166)["fname"] = "STRING=");
1380 })((function (v167,v168){
1381 if (arguments.length < 2) throw 'too few arguments';
1382 if (arguments.length > 2) throw 'too many arguments';
1383 return ((v167 == v168)?v3: v2);
1389 var l34 = f3("*NEWLINE*");
1393 return v169 = (function(){
1395 if (typeof x != 'number')
1396 throw 'The value ' + x + ' is not a type number.';
1397 return String.fromCharCode(x);
1402 var l35 = f3("CONCAT");
1406 return f67 = (function(v170){
1407 ((v170)["fname"] = "CONCAT");
1411 for (var i = arguments.length-1; i>=0; i--)
1412 v171 = {car: arguments[i], cdr: v171};
1413 return f37(f44, v171, "");
1418 var l36 = f3("JOIN");
1422 return f68 = (function(v172){
1423 ((v172)["fname"] = "JOIN");
1425 })((function (v173,v174){
1426 if (arguments.length < 1) throw 'too few arguments';
1427 if (arguments.length > 2) throw 'too many arguments';
1428 switch(arguments.length){
1433 return (f1(v173) !== v2 ? (function(){
1435 })() : (f1((function(){
1437 return tmp === v2? v2: tmp.cdr;
1438 })()) !== v2 ? (function(){
1441 return tmp === v2? v2: tmp.car;
1444 return f67((function(){
1446 return tmp === v2? v2: tmp.car;
1447 })(), v174, f68((function(){
1449 return tmp === v2? v2: tmp.cdr;
1456 var l37 = f3("JOIN-TRAILING");
1460 return f69 = (function(v175){
1461 ((v175)["fname"] = "JOIN-TRAILING");
1463 })((function (v176,v177){
1464 if (arguments.length < 1) throw 'too few arguments';
1465 if (arguments.length > 2) throw 'too many arguments';
1466 switch(arguments.length){
1471 return (f1(v176) !== v2 ? "" : f67((function(){
1473 return tmp === v2? v2: tmp.car;
1474 })(), v177, f69((function(){
1476 return tmp === v2? v2: tmp.cdr;
1482 var l38 = f3("INDENT");
1486 return f70 = (function(v178){
1487 ((v178)["fname"] = "INDENT");
1491 for (var i = arguments.length-1; i>=0; i--)
1492 v179 = {car: arguments[i], cdr: v179};
1493 return (function(v180){
1494 return (function(v181,v182,v183){
1495 (f52(v183) !== v2 ? (function(){
1502 if (typeof x != 'number')
1503 throw 'The value ' + x + ' is not a type number.';
1504 if (typeof y != 'number')
1505 throw 'The value ' + y + ' is not a type number.';
1507 })()?v3: v2) !== v2){
1508 v181 = f67(v181, ((f50((function(){
1511 if (typeof string != 'string')
1512 throw 'The value ' + string + ' is not a type string.';
1513 if (typeof index != 'number')
1514 throw 'The value ' + index + ' is not a type number.';
1515 return string.charCodeAt(index);
1516 })(), 10) !== v2 ? (((function(){
1519 if (typeof x != 'number')
1520 throw 'The value ' + x + ' is not a type number.';
1521 if (typeof y != 'number')
1522 throw 'The value ' + y + ' is not a type number.';
1524 })()?v3: v2) !== v2 ? f17(f50((function(){
1526 var index = f12(v182);
1527 if (typeof string != 'string')
1528 throw 'The value ' + string + ' is not a type string.';
1529 if (typeof index != 'number')
1530 throw 'The value ' + index + ' is not a type number.';
1531 return string.charCodeAt(index);
1532 })(), 10)) : v2) : v2) !== v2 ? f67((function(){
1534 if (typeof x != 'number')
1535 throw 'The value ' + x + ' is not a type number.';
1536 return String.fromCharCode(x);
1537 })(), " ") : f62(v180, v182, f12(v182))));
1541 if (typeof x != 'number')
1542 throw 'The value ' + x + ' is not a type number.';
1543 if (typeof y != 'number')
1544 throw 'The value ' + y + ' is not a type number.';
1555 var l39 = f3("INTEGER-TO-STRING");
1559 return f6 = (function(v184){
1560 ((v184)["fname"] = "INTEGER-TO-STRING");
1562 })((function (v185){
1563 if (arguments.length < 1) throw 'too few arguments';
1564 if (arguments.length > 1) throw 'too many arguments';
1565 return (f14(v185) !== v2 ? (function(){
1567 })() : (f53(v185) !== v2 ? (function(){
1568 return f67("-", f6((function(){
1571 if (typeof x != 'number')
1572 throw 'The value ' + x + ' is not a type number.';
1573 if (typeof y != 'number')
1574 throw 'The value ' + y + ' is not a type number.';
1578 return (function(v186){
1580 while(f17(f14(v185)) !== v2){
1581 v186 = ({car: (function(){
1584 if (typeof x != 'number')
1585 throw 'The value ' + x + ' is not a type number.';
1586 if (typeof y != 'number')
1587 throw 'The value ' + y + ' is not a type number.';
1590 v185 = f15(v185, 10);
1592 return f68(f45((function (v187){
1593 if (arguments.length < 1) throw 'too few arguments';
1594 if (arguments.length > 1) throw 'too many arguments';
1596 var x = (function(){
1597 var string = "0123456789";
1599 if (typeof string != 'string')
1600 throw 'The value ' + string + ' is not a type string.';
1601 if (typeof index != 'number')
1602 throw 'The value ' + index + ' is not a type number.';
1603 return string.charCodeAt(index);
1605 if (typeof x != 'number')
1606 throw 'The value ' + x + ' is not a type number.';
1607 return String.fromCharCode(x);
1616 var l42 = f3("PRINT");
1618 var l41 = f3("WRITE-LINE");
1620 var l40 = f3("PRINT-TO-STRING");
1625 return f71 = (function(v188){
1626 ((v188)["fname"] = "PRINT-TO-STRING");
1628 })((function (v189){
1629 if (arguments.length < 1) throw 'too few arguments';
1630 if (arguments.length > 1) throw 'too many arguments';
1631 return (((function(){
1633 return (typeof tmp == 'object' && 'name' in tmp);
1634 })()?v3: v2) !== v2 ? (function(){
1636 })() : (f51(v189) !== v2 ? (function(){
1638 })() : (((typeof(v189) == "string")?v3: v2) !== v2 ? (function(){
1639 return f67("\"", f72(v189), "\"");
1640 })() : (((typeof v189 == 'function')?v3: v2) !== v2 ? (function(){
1641 return (function(v190){
1642 return (v190 !== v2 ? f67("#<FUNCTION ", v190, ">") : f67("#<FUNCTION>"));
1644 var tmp = (v189)["fname"];
1645 return tmp == undefined? v2: tmp ;
1647 })() : (f36(v189) !== v2 ? (function(){
1648 return f67("(", f69(f45(f71, f56(v189)), " "), (function(v191){
1649 return (f1((function(){
1651 return tmp === v2? v2: tmp.cdr;
1652 })()) !== v2 ? f71((function(){
1654 return tmp === v2? v2: tmp.car;
1655 })()) : f67(f71((function(){
1657 return tmp === v2? v2: tmp.car;
1658 })()), " . ", f71((function(){
1660 return tmp === v2? v2: tmp.cdr;
1662 })(f55(v189)), ")");
1670 return f73 = (function(v192){
1671 ((v192)["fname"] = "WRITE-LINE");
1673 })((function (v193){
1674 if (arguments.length < 1) throw 'too few arguments';
1675 if (arguments.length > 1) throw 'too many arguments';
1678 if (typeof x != 'string')
1679 throw 'The value ' + x + ' is not a type string.';
1680 return lisp.write(x);
1684 if (typeof x != 'string')
1685 throw 'The value ' + x + ' is not a type string.';
1686 return lisp.write(x);
1695 return f74 = (function(v194){
1696 ((v194)["fname"] = "PRINT");
1698 })((function (v195){
1699 if (arguments.length < 1) throw 'too few arguments';
1700 if (arguments.length > 1) throw 'too many arguments';
1701 return f73(f71(v195));
1707 var l43 = f3("MAKE-STRING-STREAM");
1711 return f75 = (function(v196){
1712 ((v196)["fname"] = "MAKE-STRING-STREAM");
1714 })((function (v197){
1715 if (arguments.length < 1) throw 'too few arguments';
1716 if (arguments.length > 1) throw 'too many arguments';
1717 return ({car: v197, cdr: 0});
1722 var l44 = f3("%PEEK-CHAR");
1726 return f76 = (function(v198){
1727 ((v198)["fname"] = "%PEEK-CHAR");
1729 })((function (v199){
1730 if (arguments.length < 1) throw 'too few arguments';
1731 if (arguments.length > 1) throw 'too many arguments';
1732 return (((function(){
1733 var x = (function(){
1735 return tmp === v2? v2: tmp.cdr;
1737 var y = f43((function(){
1739 return tmp === v2? v2: tmp.car;
1741 if (typeof x != 'number')
1742 throw 'The value ' + x + ' is not a type number.';
1743 if (typeof y != 'number')
1744 throw 'The value ' + y + ' is not a type number.';
1746 })()?v3: v2) !== v2 ? (function(){
1747 var string = (function(){
1749 return tmp === v2? v2: tmp.car;
1751 var index = (function(){
1753 return tmp === v2? v2: tmp.cdr;
1755 if (typeof string != 'string')
1756 throw 'The value ' + string + ' is not a type string.';
1757 if (typeof index != 'number')
1758 throw 'The value ' + index + ' is not a type number.';
1759 return string.charCodeAt(index);
1765 var l45 = f3("%READ-CHAR");
1769 return f77 = (function(v200){
1770 ((v200)["fname"] = "%READ-CHAR");
1772 })((function (v201){
1773 if (arguments.length < 1) throw 'too few arguments';
1774 if (arguments.length > 1) throw 'too many arguments';
1775 return (((function(){
1776 var x = (function(){
1778 return tmp === v2? v2: tmp.cdr;
1780 var y = f43((function(){
1782 return tmp === v2? v2: tmp.car;
1784 if (typeof x != 'number')
1785 throw 'The value ' + x + ' is not a type number.';
1786 if (typeof y != 'number')
1787 throw 'The value ' + y + ' is not a type number.';
1789 })()?v3: v2) !== v2 ? (function(v202){
1792 if (typeof x != 'object')
1793 throw 'The value ' + x + ' is not a type object.';
1794 return (x.cdr = f12((function(){
1796 return tmp === v2? v2: tmp.cdr;
1801 var string = (function(){
1803 return tmp === v2? v2: tmp.car;
1805 var index = (function(){
1807 return tmp === v2? v2: tmp.cdr;
1809 if (typeof string != 'string')
1810 throw 'The value ' + string + ' is not a type string.';
1811 if (typeof index != 'number')
1812 throw 'The value ' + index + ' is not a type number.';
1813 return string.charCodeAt(index);
1819 var l46 = f3("WHITESPACEP");
1823 return f78 = (function(v203){
1824 ((v203)["fname"] = "WHITESPACEP");
1826 })((function (v204){
1827 if (arguments.length < 1) throw 'too few arguments';
1828 if (arguments.length > 1) throw 'too many arguments';
1829 return (function(v205){
1830 return (v205 !== v2 ? v205 : (function(v206){
1831 return (v206 !== v2 ? v206 : f50(v204, 9));
1838 var l47 = f3("SKIP-WHITESPACES");
1842 return f79 = (function(v207){
1843 ((v207)["fname"] = "SKIP-WHITESPACES");
1845 })((function (v208){
1846 if (arguments.length < 1) throw 'too few arguments';
1847 if (arguments.length > 1) throw 'too many arguments';
1848 return (function(v209){
1851 while((v209 !== v2 ? f78(v209) : v2) !== v2){
1860 var l48 = f3("TERMINALP");
1864 return f80 = (function(v210){
1865 ((v210)["fname"] = "TERMINALP");
1867 })((function (v211){
1868 if (arguments.length < 1) throw 'too few arguments';
1869 if (arguments.length > 1) throw 'too many arguments';
1870 return (function(v212){
1871 return (v212 !== v2 ? v212 : (function(v213){
1872 return (v213 !== v2 ? v213 : (function(v214){
1873 return (v214 !== v2 ? v214 : f50(40, v211));
1881 var l49 = f3("READ-UNTIL");
1885 return f81 = (function(v215){
1886 ((v215)["fname"] = "READ-UNTIL");
1888 })((function (v216,v217){
1889 if (arguments.length < 2) throw 'too few arguments';
1890 if (arguments.length > 2) throw 'too many arguments';
1891 return (function(v218,v219){
1894 while((v219 !== v2 ? f17((v217)(v219)) : v2) !== v2){
1895 v218 = f67(v218, (function(){
1897 if (typeof x != 'number')
1898 throw 'The value ' + x + ' is not a type number.';
1899 return String.fromCharCode(x);
1910 var l50 = f3("SKIP-WHITESPACES-AND-COMMENTS");
1914 return f82 = (function(v220){
1915 ((v220)["fname"] = "SKIP-WHITESPACES-AND-COMMENTS");
1917 })((function (v221){
1918 if (arguments.length < 1) throw 'too few arguments';
1919 if (arguments.length > 1) throw 'too many arguments';
1920 return (function(v222){
1924 while((v222 !== v2 ? f50(v222, 59) : v2) !== v2){
1925 f81(v221, (function (v223){
1926 if (arguments.length < 1) throw 'too few arguments';
1927 if (arguments.length > 1) throw 'too many arguments';
1928 return f50(v223, 10);
1938 var l51 = f3("%READ-LIST");
1942 return f83 = (function(v224){
1943 ((v224)["fname"] = "%READ-LIST");
1945 })((function (v225){
1946 if (arguments.length < 1) throw 'too few arguments';
1947 if (arguments.length > 1) throw 'too many arguments';
1949 return (function(v226){
1950 return (f1(v226) !== v2 ? (function(){
1951 return (function (){ throw "Unspected EOF"; })();
1952 })() : (f50(v226, 41) !== v2 ? (function(){
1955 })() : (f50(v226, 46) !== v2 ? (function(){
1957 return (function(v227){
1959 (f50(f77(v225), 41) !== v2 ? v2 : (function(){
1960 return (function (){ throw "')' was expected."; })();
1965 return ({car: f84(v225), cdr: f83(v225)});
1972 var l52 = f3("READ-STRING");
1976 return f85 = (function(v228){
1977 ((v228)["fname"] = "READ-STRING");
1979 })((function (v229){
1980 if (arguments.length < 1) throw 'too few arguments';
1981 if (arguments.length > 1) throw 'too many arguments';
1982 return (function(v230,v231){
1985 while(f17(f16(v231, 34)) !== v2){
1986 (f1(v231) !== v2 ? (function(){
1987 return (function (){ throw "Unexpected EOF"; })();
1989 (f16(v231, 92) !== v2 ? (function(){
1990 return v231 = f77(v229);
1992 v230 = f67(v230, (function(){
1994 if (typeof x != 'number')
1995 throw 'The value ' + x + ' is not a type number.';
1996 return String.fromCharCode(x);
2006 var l57 = f3("READ-SHARP");
2009 var l54 = f3("FUNCTION");
2014 return f86 = (function(v232){
2015 ((v232)["fname"] = "READ-SHARP");
2017 })((function (v233){
2018 if (arguments.length < 1) throw 'too few arguments';
2019 if (arguments.length > 1) throw 'too many arguments';
2021 return (function(v234){
2022 return (f16(v234, l53) !== v2 ? (function(){
2023 return f33(l54, f84(v233));
2024 })() : (f16(v234, l55) !== v2 ? (function(){
2025 return (function(v235){
2026 return (f66(v235, "space") !== v2 ? (function(){
2028 })() : (f66(v235, "tab") !== v2 ? (function(){
2030 })() : (f66(v235, "newline") !== v2 ? (function(){
2033 return f49((function(){
2036 if (typeof string != 'string')
2037 throw 'The value ' + string + ' is not a type string.';
2038 if (typeof index != 'number')
2039 throw 'The value ' + index + ' is not a type number.';
2040 return string.charCodeAt(index);
2045 if (typeof x != 'number')
2046 throw 'The value ' + x + ' is not a type number.';
2047 return String.fromCharCode(x);
2048 })(), f81(v233, f80)));
2049 })() : (f16(v234, l56) !== v2 ? (function(){
2050 return (function(v236){
2051 return (f66(v236, "common-lisp") !== v2 ? (function(){
2054 })() : (f66(v236, "ecmalisp") !== v2 ? (function(){
2057 return (function (){ throw "Unknown reader form."; })();
2061 return (function (){ throw "ECASE expression failed."; })();
2068 var l58 = f3("*EOF*");
2072 return v237 = (function(){
2074 if (typeof name != 'string')
2075 throw 'The value ' + name + ' is not a type string.';
2076 return ({name: name});
2081 var l63 = f3("LS-READ");
2082 var l62 = f3("UNQUOTE");
2083 var l61 = f3("UNQUOTE-SPLICING");
2084 var l60 = f3("BACKQUOTE");
2085 var l59 = f3("QUOTE");
2089 return f84 = (function(v238){
2090 ((v238)["fname"] = "LS-READ");
2092 })((function (v239){
2093 if (arguments.length < 1) throw 'too few arguments';
2094 if (arguments.length > 1) throw 'too many arguments';
2096 return (function(v240){
2097 return (f1(v240) !== v2 ? (function(){
2099 })() : (f50(v240, 40) !== v2 ? (function(){
2102 })() : (f50(v240, 39) !== v2 ? (function(){
2104 return f33(l59, f84(v239));
2105 })() : (f50(v240, 96) !== v2 ? (function(){
2107 return f33(l60, f84(v239));
2108 })() : (f50(v240, 34) !== v2 ? (function(){
2111 })() : (f50(v240, 44) !== v2 ? (function(){
2113 return (f16(f76(v239), 64) !== v2 ? (function(){
2115 return f33(l61, f84(v239));
2116 })() : f33(l62, f84(v239)));
2117 })() : (f50(v240, 35) !== v2 ? (function(){
2120 return (function(v241){
2121 return (f64(f61, v241) !== v2 ? f63(v241) : f3((function(){
2123 if (typeof x != 'string')
2124 throw 'The value ' + x + ' is not a type string.';
2125 return x.toUpperCase();
2134 var l64 = f3("LS-READ-FROM-STRING");
2138 return f87 = (function(v242){
2139 ((v242)["fname"] = "LS-READ-FROM-STRING");
2141 })((function (v243){
2142 if (arguments.length < 1) throw 'too few arguments';
2143 if (arguments.length > 1) throw 'too many arguments';
2144 return f84(f75(v243));
2149 var l66 = f3("*COMPILATION-UNIT-CHECKS*");
2150 var l65 = f3("NIL");
2158 var l67 = f3("MAKE-BINDING");
2162 return f88 = (function(v245){
2163 ((v245)["fname"] = "MAKE-BINDING");
2165 })((function (v246,v247,v248,v249){
2166 if (arguments.length < 4) throw 'too few arguments';
2167 if (arguments.length > 4) throw 'too many arguments';
2168 return f33(v246, v247, v248, v249);
2173 var l68 = f3("BINDING-NAME");
2177 return f89 = (function(v250){
2178 ((v250)["fname"] = "BINDING-NAME");
2180 })((function (v251){
2181 if (arguments.length < 1) throw 'too few arguments';
2182 if (arguments.length > 1) throw 'too many arguments';
2188 var l69 = f3("BINDING-TYPE");
2192 return f90 = (function(v252){
2193 ((v252)["fname"] = "BINDING-TYPE");
2195 })((function (v253){
2196 if (arguments.length < 1) throw 'too few arguments';
2197 if (arguments.length > 1) throw 'too many arguments';
2203 var l70 = f3("BINDING-TRANSLATION");
2207 return f91 = (function(v254){
2208 ((v254)["fname"] = "BINDING-TRANSLATION");
2210 })((function (v255){
2211 if (arguments.length < 1) throw 'too few arguments';
2212 if (arguments.length > 1) throw 'too many arguments';
2218 var l71 = f3("BINDING-DECLARED");
2222 return f92 = (function(v256){
2223 ((v256)["fname"] = "BINDING-DECLARED");
2225 })((function (v257){
2226 if (arguments.length < 1) throw 'too few arguments';
2227 if (arguments.length > 1) throw 'too many arguments';
2228 return (v257 !== v2 ? f32(v257) : v2);
2233 var l72 = f3("MARK-BINDING-AS-DECLARED");
2237 return f93 = (function(v258){
2238 ((v258)["fname"] = "MARK-BINDING-AS-DECLARED");
2240 })((function (v259){
2241 if (arguments.length < 1) throw 'too few arguments';
2242 if (arguments.length > 1) throw 'too many arguments';
2245 if (typeof x != 'object')
2246 throw 'The value ' + x + ' is not a type object.';
2247 return (x.car = v3);
2253 var l73 = f3("MAKE-LEXENV");
2257 return f94 = (function(v260){
2258 ((v260)["fname"] = "MAKE-LEXENV");
2261 if (arguments.length > 0) throw 'too many arguments';
2267 var l74 = f3("COPY-LEXENV");
2271 return f95 = (function(v261){
2272 ((v261)["fname"] = "COPY-LEXENV");
2274 })((function (v262){
2275 if (arguments.length < 1) throw 'too few arguments';
2276 if (arguments.length > 1) throw 'too many arguments';
2282 var l77 = f3("PUSH-TO-LEXENV");
2283 var l76 = f3("FUNCTION");
2284 var l75 = f3("VARIABLE");
2288 return f96 = (function(v263){
2289 ((v263)["fname"] = "PUSH-TO-LEXENV");
2291 })((function (v264,v265,v266){
2292 if (arguments.length < 3) throw 'too few arguments';
2293 if (arguments.length > 3) throw 'too many arguments';
2294 return (function(v267){
2295 return (f16(v267, l75) !== v2 ? (function(){
2298 if (typeof x != 'object')
2299 throw 'The value ' + x + ' is not a type object.';
2300 return (x.car = ({car: v264, cdr: (function(){
2302 return tmp === v2? v2: tmp.car;
2305 })() : (f16(v267, l76) !== v2 ? (function(){
2307 var x = (function(){
2309 return tmp === v2? v2: tmp.cdr;
2311 if (typeof x != 'object')
2312 throw 'The value ' + x + ' is not a type object.';
2313 return (x.car = ({car: v264, cdr: f23(v265)}));
2316 return (function (){ throw "ECASE expression failed."; })();
2323 var l78 = f3("EXTEND-LEXENV");
2327 return f97 = (function(v268){
2328 ((v268)["fname"] = "EXTEND-LEXENV");
2330 })((function (v269,v270,v271){
2331 if (arguments.length < 3) throw 'too few arguments';
2332 if (arguments.length > 3) throw 'too many arguments';
2333 return (function(v272){
2334 f96(v269, v272, v271);
2341 var l81 = f3("LOOKUP-IN-LEXENV");
2342 var l80 = f3("FUNCTION");
2343 var l79 = f3("VARIABLE");
2347 return f98 = (function(v273){
2348 ((v273)["fname"] = "LOOKUP-IN-LEXENV");
2350 })((function (v274,v275,v276){
2351 if (arguments.length < 3) throw 'too few arguments';
2352 if (arguments.length > 3) throw 'too many arguments';
2353 return f65(v274, (function(v277){
2354 return (f16(v277, l79) !== v2 ? (function(){
2357 return tmp === v2? v2: tmp.car;
2359 })() : (f16(v277, l80) !== v2 ? (function(){
2362 return (function (){ throw "ECASE expression failed."; })();
2369 var l82 = f3("*ENVIRONMENT*");
2373 return v278 = f94();
2377 var l83 = f3("CLEAR-UNDECLARED-GLOBAL-BINDINGS");
2381 return f99 = (function(v279){
2382 ((v279)["fname"] = "CLEAR-UNDECLARED-GLOBAL-BINDINGS");
2385 if (arguments.length > 0) throw 'too many arguments';
2386 return (function(v280,v281){
2387 return f33(v280, v281);
2388 })(f29(v278),f30(v278));
2393 var l84 = f3("*VARIABLE-COUNTER*");
2401 var l85 = f3("GVARNAME");
2405 return f100 = (function(v283){
2406 ((v283)["fname"] = "GVARNAME");
2408 })((function (v284){
2409 if (arguments.length < 1) throw 'too few arguments';
2410 if (arguments.length > 1) throw 'too many arguments';
2411 return f67("v", f6(v282 = (function(){
2414 if (typeof x != 'number')
2415 throw 'The value ' + x + ' is not a type number.';
2416 if (typeof y != 'number')
2417 throw 'The value ' + y + ' is not a type number.';
2424 var l91 = f3("LOOKUP-VARIABLE");
2425 var l90 = f3("VARIABLE");
2426 var l89 = f3("VARIABLE");
2427 var l88 = f3("VARIABLE");
2428 var l87 = f3("VARIABLE");
2429 var l86 = f3("VARIABLE");
2433 return f101 = (function(v285){
2434 ((v285)["fname"] = "LOOKUP-VARIABLE");
2436 })((function (v286,v287){
2437 if (arguments.length < 2) throw 'too few arguments';
2438 if (arguments.length > 2) throw 'too many arguments';
2439 return (function(v288){
2440 return (v288 !== v2 ? v288 : (function(v289){
2441 return (v289 !== v2 ? v289 : (function(v290,v291){
2442 f96(v291, v278, l86);
2443 v244 = ({car: (function (){
2444 if (arguments.length > 0) throw 'too many arguments';
2445 return (f98(v286, v278, l87) !== v2 ? v2 : (function(){
2446 return (function (){ throw f67("Undefined variable `", v290, "'"); })();
2450 })((v286).name,f88(v286, l88, f100(v286), v2)));
2451 })(f98(v286, v278, l89)));
2452 })(f98(v286, v287, l90));
2457 var l92 = f3("LOOKUP-VARIABLE-TRANSLATION");
2461 return f102 = (function(v292){
2462 ((v292)["fname"] = "LOOKUP-VARIABLE-TRANSLATION");
2464 })((function (v293,v294){
2465 if (arguments.length < 2) throw 'too few arguments';
2466 if (arguments.length > 2) throw 'too many arguments';
2467 return f91(f101(v293, v294));
2472 var l95 = f3("EXTEND-LOCAL-ENV");
2473 var l94 = f3("VARIABLE");
2474 var l93 = f3("VARIABLE");
2478 return f103 = (function(v295){
2479 ((v295)["fname"] = "EXTEND-LOCAL-ENV");
2481 })((function (v296,v297){
2482 if (arguments.length < 2) throw 'too few arguments';
2483 if (arguments.length > 2) throw 'too many arguments';
2484 return (function(v298){
2485 return (function(v299,v300){
2490 return tmp === v2? v2: tmp.car;
2493 return f96(v301, v298, l93);
2494 })(f88(v300, l94, f100(v300), v3));
2497 return tmp === v2? v2: tmp.cdr;
2507 var l96 = f3("*FUNCTION-COUNTER*");
2515 var l102 = f3("LOOKUP-FUNCTION");
2516 var l101 = f3("FUNCTION");
2517 var l100 = f3("FUNCTION");
2518 var l99 = f3("FUNCTION");
2519 var l98 = f3("FUNCTION");
2520 var l97 = f3("FUNCTION");
2524 return f104 = (function(v303){
2525 ((v303)["fname"] = "LOOKUP-FUNCTION");
2527 })((function (v304,v305){
2528 if (arguments.length < 2) throw 'too few arguments';
2529 if (arguments.length > 2) throw 'too many arguments';
2530 return (function(v306){
2531 return (v306 !== v2 ? v306 : (function(v307){
2532 return (v307 !== v2 ? v307 : (function(v308,v309){
2533 f96(v309, v278, l97);
2534 v244 = ({car: (function (){
2535 if (arguments.length > 0) throw 'too many arguments';
2536 return (f92(f98(v304, v278, l98)) !== v2 ? v2 : (function(){
2537 return (function (){ throw f67("Undefined function `", v308, "'"); })();
2541 })((v304).name,f88(v304, l99, f67("f", f6(v302 = (function(){
2544 if (typeof x != 'number')
2545 throw 'The value ' + x + ' is not a type number.';
2546 if (typeof y != 'number')
2547 throw 'The value ' + y + ' is not a type number.';
2550 })(f98(v304, v278, l100)));
2551 })(f98(v304, v305, l101));
2556 var l103 = f3("LOOKUP-FUNCTION-TRANSLATION");
2560 return f105 = (function(v310){
2561 ((v310)["fname"] = "LOOKUP-FUNCTION-TRANSLATION");
2563 })((function (v311,v312){
2564 if (arguments.length < 2) throw 'too few arguments';
2565 if (arguments.length > 2) throw 'too many arguments';
2566 return f91(f104(v311, v312));
2571 var l104 = f3("*TOPLEVEL-COMPILATIONS*");
2579 var l105 = f3("%COMPILE-DEFVAR");
2583 return f106 = (function(v314){
2584 ((v314)["fname"] = "%COMPILE-DEFVAR");
2586 })((function (v315){
2587 if (arguments.length < 1) throw 'too few arguments';
2588 if (arguments.length > 1) throw 'too many arguments';
2589 return (function(v316){
2591 return v313 = ({car: f67("var ", f91(v316)), cdr: v313});
2592 })(f101(v315, v278));
2597 var l106 = f3("%COMPILE-DEFUN");
2601 return f107 = (function(v317){
2602 ((v317)["fname"] = "%COMPILE-DEFUN");
2604 })((function (v318){
2605 if (arguments.length < 1) throw 'too few arguments';
2606 if (arguments.length > 1) throw 'too many arguments';
2607 return (function(v319){
2609 return v313 = ({car: f67("var ", f91(v319)), cdr: v313});
2610 })(f104(v318, v278));
2615 var l109 = f3("%COMPILE-DEFMACRO");
2616 var l108 = f3("FUNCTION");
2617 var l107 = f3("MACRO");
2621 return f108 = (function(v320){
2622 ((v320)["fname"] = "%COMPILE-DEFMACRO");
2624 })((function (v321,v322){
2625 if (arguments.length < 2) throw 'too few arguments';
2626 if (arguments.length > 2) throw 'too many arguments';
2627 return f96(f88(v321, l107, v322, v3), v278, l108);
2632 var l110 = f3("*COMPILATIONS*");
2640 var l111 = f3("LS-COMPILE-BLOCK");
2644 return f109 = (function(v324){
2645 ((v324)["fname"] = "LS-COMPILE-BLOCK");
2647 })((function (v325,v326){
2648 if (arguments.length < 2) throw 'too few arguments';
2649 if (arguments.length > 2) throw 'too many arguments';
2650 return f69(f59((function (v327){
2651 if (arguments.length < 1) throw 'too few arguments';
2652 if (arguments.length > 1) throw 'too many arguments';
2653 return (function(v328){
2654 return (v328 !== v2 ? v328 : (((typeof(v327) == "string")?v3: v2) !== v2 ? f14(f43(v327)) : v2));
2656 }), f45((function (v329){
2657 if (arguments.length < 1) throw 'too few arguments';
2658 if (arguments.length > 1) throw 'too many arguments';
2659 return f110(v329, v326);
2660 }), v325)), f67(";", v169));
2665 var l112 = f3("IF");
2666 v323 = ({car: f33(l112, (function (v330,v331,v332,v333){
2667 if (arguments.length < 4) throw 'too few arguments';
2668 if (arguments.length > 4) throw 'too many arguments';
2669 return f67("(", f110(v331, v330), " !== ", f110(v2), " ? ", f110(v332, v330), " : ", f110(v333, v330), ")");
2671 var l114 = f3("*LAMBDA-LIST-KEYWORDS*");
2672 var l113 = {car: f3("&OPTIONAL"), cdr: {car: f3("&REST"), cdr: f3("NIL")}};
2680 var l115 = f3("LIST-UNTIL-KEYWORD");
2684 return f111 = (function(v335){
2685 ((v335)["fname"] = "LIST-UNTIL-KEYWORD");
2687 })((function (v336){
2688 if (arguments.length < 1) throw 'too few arguments';
2689 if (arguments.length > 1) throw 'too many arguments';
2690 return ((function(v337){
2691 return (v337 !== v2 ? v337 : f57((function(){
2693 return tmp === v2? v2: tmp.car;
2695 })(f1(v336)) !== v2 ? v2 : ({car: (function(){
2697 return tmp === v2? v2: tmp.car;
2698 })(), cdr: f111((function(){
2700 return tmp === v2? v2: tmp.cdr;
2706 var l116 = f3("LAMBDA-LIST-REQUIRED-ARGUMENTS");
2710 return f112 = (function(v338){
2711 ((v338)["fname"] = "LAMBDA-LIST-REQUIRED-ARGUMENTS");
2713 })((function (v339){
2714 if (arguments.length < 1) throw 'too few arguments';
2715 if (arguments.length > 1) throw 'too many arguments';
2721 var l118 = f3("LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT");
2722 var l117 = f3("&OPTIONAL");
2726 return f113 = (function(v340){
2727 ((v340)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT");
2729 })((function (v341){
2730 if (arguments.length < 1) throw 'too few arguments';
2731 if (arguments.length > 1) throw 'too many arguments';
2732 return f45(f35, f111((function(){
2733 var tmp = f57(l117, v341);
2734 return tmp === v2? v2: tmp.cdr;
2740 var l119 = f3("LAMBDA-LIST-OPTIONAL-ARGUMENTS");
2744 return f114 = (function(v342){
2745 ((v342)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS");
2747 })((function (v343){
2748 if (arguments.length < 1) throw 'too few arguments';
2749 if (arguments.length > 1) throw 'too many arguments';
2750 return f45(f20, f113(v343));
2755 var l121 = f3("LAMBDA-LIST-REST-ARGUMENT");
2756 var l120 = f3("&REST");
2760 return f115 = (function(v344){
2761 ((v344)["fname"] = "LAMBDA-LIST-REST-ARGUMENT");
2763 })((function (v345){
2764 if (arguments.length < 1) throw 'too few arguments';
2765 if (arguments.length > 1) throw 'too many arguments';
2766 return (function(v346){
2769 return tmp === v2? v2: tmp.cdr;
2770 })() !== v2 ? (function(){
2771 return (function (){ throw "Bad lambda-list"; })();
2775 return tmp === v2? v2: tmp.car;
2777 })(f111((function(){
2778 var tmp = f57(l120, v345);
2779 return tmp === v2? v2: tmp.cdr;
2785 var l122 = f3("LAMBDA");
2786 v323 = ({car: f33(l122, (function (v348,v349){
2787 if (arguments.length < 2) throw 'too few arguments';
2789 for (var i = arguments.length-1; i>=2; i--)
2790 v347 = {car: arguments[i], cdr: v347};
2791 return (function(v350,v351,v352){
2792 return (function(v353,v354,v355){
2793 return f67("(function (", f68(f45((function (v356){
2794 if (arguments.length < 1) throw 'too few arguments';
2795 if (arguments.length > 1) throw 'too many arguments';
2796 return f102(v356, v355);
2797 }), f39(v350, v351)), ","), "){", v169, f70((v350 !== v2 ? f67("if (arguments.length < ", f6(v353), ") throw 'too few arguments';", v169) : ""), (f17(v352) !== v2 ? f67("if (arguments.length > ", f6((function(){
2800 if (typeof x != 'number')
2801 throw 'The value ' + x + ' is not a type number.';
2802 if (typeof y != 'number')
2803 throw 'The value ' + y + ' is not a type number.';
2805 })()), ") throw 'too many arguments';", v169) : ""), (v351 !== v2 ? f67("switch(arguments.length){", v169, (function(v357,v358,v359){
2811 if (typeof x != 'number')
2812 throw 'The value ' + x + ' is not a type number.';
2813 if (typeof y != 'number')
2814 throw 'The value ' + y + ' is not a type number.';
2816 })()?v3: v2) !== v2){
2818 v358 = ({car: f67("case ", f6((function(){
2821 if (typeof x != 'number')
2822 throw 'The value ' + x + ' is not a type number.';
2823 if (typeof y != 'number')
2824 throw 'The value ' + y + ' is not a type number.';
2826 })()), ":", v169, f102((function(){
2828 return tmp === v2? v2: tmp.car;
2829 })(), v355), "=", f110(f23(v360), v355), ";", v169), cdr: v358});
2830 return v359 = (function(){
2833 if (typeof x != 'number')
2834 throw 'The value ' + x + ' is not a type number.';
2835 if (typeof y != 'number')
2836 throw 'The value ' + y + ' is not a type number.';
2839 })(f54(v359, v357));
2841 v358 = ({car: f67("default: break;", v169), cdr: v358});
2842 return f68(f41(v358));
2844 })(f113(v349),v2,0), "}", v169) : ""), (v352 !== v2 ? (function(v361){
2845 return f67("var ", v361, "= ", f110(v2), ";", v169, "for (var i = arguments.length-1; i>=", f6((function(){
2848 if (typeof x != 'number')
2849 throw 'The value ' + x + ' is not a type number.';
2850 if (typeof y != 'number')
2851 throw 'The value ' + y + ' is not a type number.';
2853 })()), "; i--)", v169, f70(v361, " = ", "{car: arguments[i], cdr: "), v361, "};", v169);
2854 })(f102(v352, v355)) : ""), f67(f109(f56(v347), v355), "return ", f110((function(){
2855 var tmp = f55(v347);
2856 return tmp === v2? v2: tmp.car;
2857 })(), v355), ";")), v169, "})");
2858 })(f43(v350),f43(v351),f103(f39(f35(v352), v350, v351), v348));
2859 })(f112(v349),f114(v349),f115(v349));
2861 var l123 = f3("FSETQ");
2862 v323 = ({car: f33(l123, (function (v362,v363,v364){
2863 if (arguments.length < 3) throw 'too few arguments';
2864 if (arguments.length > 3) throw 'too many arguments';
2865 return f67(f105(v363, v362), " = ", f110(v364, v362));
2867 var l124 = f3("SETQ");
2868 v323 = ({car: f33(l124, (function (v365,v366,v367){
2869 if (arguments.length < 3) throw 'too few arguments';
2870 if (arguments.length > 3) throw 'too many arguments';
2871 return f67(f102(v366, v365), " = ", f110(v367, v365));
2873 var l125 = f3("ESCAPE-STRING");
2877 return f72 = (function(v368){
2878 ((v368)["fname"] = "ESCAPE-STRING");
2880 })((function (v369){
2881 if (arguments.length < 1) throw 'too few arguments';
2882 if (arguments.length > 1) throw 'too many arguments';
2883 return (function(v370,v371,v372){
2888 if (typeof x != 'number')
2889 throw 'The value ' + x + ' is not a type number.';
2890 if (typeof y != 'number')
2891 throw 'The value ' + y + ' is not a type number.';
2893 })()?v3: v2) !== v2){
2896 return (v374 !== v2 ? v374 : f50(v373, 92));
2897 })(f50(v373, 34)) !== v2 ? (function(){
2898 return v370 = f67(v370, "\\");
2900 (f50(v373, 10) !== v2 ? (function(){
2901 v370 = f67(v370, "\\");
2904 return v370 = f67(v370, (function(){
2906 if (typeof x != 'number')
2907 throw 'The value ' + x + ' is not a type number.';
2908 return String.fromCharCode(x);
2913 if (typeof string != 'string')
2914 throw 'The value ' + string + ' is not a type string.';
2915 if (typeof index != 'number')
2916 throw 'The value ' + index + ' is not a type number.';
2917 return string.charCodeAt(index);
2922 if (typeof x != 'number')
2923 throw 'The value ' + x + ' is not a type number.';
2924 if (typeof y != 'number')
2925 throw 'The value ' + y + ' is not a type number.';
2935 var l127 = f3("LITERAL->JS");
2936 var l126 = f3("INTERN");
2940 return f116 = (function(v375){
2941 ((v375)["fname"] = "LITERAL->JS");
2943 })((function (v376){
2944 if (arguments.length < 1) throw 'too few arguments';
2945 if (arguments.length > 1) throw 'too many arguments';
2946 return (f51(v376) !== v2 ? (function(){
2948 })() : (((typeof(v376) == "string")?v3: v2) !== v2 ? (function(){
2949 return f67("\"", f72(v376), "\"");
2950 })() : (((function(){
2952 return (typeof tmp == 'object' && 'name' in tmp);
2953 })()?v3: v2) !== v2 ? (function(){
2954 return f110(f39(f33(l126), f33(f72((v376).name))), v278);
2955 })() : (((function(){
2957 return (typeof tmp == 'object' && 'car' in tmp);
2958 })()?v3: v2) !== v2 ? (function(){
2959 return f67("{car: ", f116((function(){
2961 return tmp === v2? v2: tmp.car;
2962 })()), ", cdr: ", f116((function(){
2964 return tmp === v2? v2: tmp.cdr;
2971 var l128 = f3("*LITERAL-COUNTER*");
2979 var l129 = f3("LITERAL");
2983 return f117 = (function(v378){
2984 ((v378)["fname"] = "LITERAL");
2986 })((function (v379){
2987 if (arguments.length < 1) throw 'too few arguments';
2988 if (arguments.length > 1) throw 'too many arguments';
2989 return (function(v380){
2990 v313 = ({car: f67("var ", v380, " = ", f116(v379)), cdr: v313});
2992 })(f67("l", f6(v377 = (function(){
2995 if (typeof x != 'number')
2996 throw 'The value ' + x + ' is not a type number.';
2997 if (typeof y != 'number')
2998 throw 'The value ' + y + ' is not a type number.';
3005 var l130 = f3("QUOTE");
3006 v323 = ({car: f33(l130, (function (v381,v382){
3007 if (arguments.length < 2) throw 'too few arguments';
3008 if (arguments.length > 2) throw 'too many arguments';
3011 var l131 = f3("WHILE");
3012 v323 = ({car: f33(l131, (function (v384,v385){
3013 if (arguments.length < 2) throw 'too few arguments';
3015 for (var i = arguments.length-1; i>=2; i--)
3016 v383 = {car: arguments[i], cdr: v383};
3017 return f67("(function(){", v169, f70("while(", f110(v385, v384), " !== ", f110(v2), "){", v169, f70(f109(v383, v384))), "}})()");
3019 var l133 = f3("LAMBDA");
3020 var l132 = f3("FUNCTION");
3021 v323 = ({car: f33(l132, (function (v386,v387){
3022 if (arguments.length < 2) throw 'too few arguments';
3023 if (arguments.length > 2) throw 'too many arguments';
3024 return ((f36(v387) !== v2 ? (((function(){
3026 return tmp === v2? v2: tmp.car;
3027 })() === l133)?v3: v2) : v2) !== v2 ? (function(){
3028 return f110(v387, v386);
3029 })() : (((function(){
3031 return (typeof tmp == 'object' && 'name' in tmp);
3032 })()?v3: v2) !== v2 ? (function(){
3033 return f105(v387, v386);
3036 var l135 = f3("PROGN");
3037 var l134 = f3("EVAL-WHEN-COMPILE");
3038 v323 = ({car: f33(l134, (function (v389){
3039 if (arguments.length < 1) throw 'too few arguments';
3041 for (var i = arguments.length-1; i>=1; i--)
3042 v388 = {car: arguments[i], cdr: v388};
3043 f118(({car: l135, cdr: v388}));
3046 var l136 = f3("PROGN");
3047 v323 = ({car: f33(l136, (function (v391){
3048 if (arguments.length < 1) throw 'too few arguments';
3050 for (var i = arguments.length-1; i>=1; i--)
3051 v390 = {car: arguments[i], cdr: v390};
3052 return f67("(function(){", v169, f70(f109(f56(v390), v391), "return ", f110((function(){
3053 var tmp = f55(v390);
3054 return tmp === v2? v2: tmp.car;
3055 })(), v391), ";", v169), "})()");
3057 var l137 = f3("LET");
3058 v323 = ({car: f33(l137, (function (v393,v394){
3059 if (arguments.length < 2) throw 'too few arguments';
3061 for (var i = arguments.length-1; i>=2; i--)
3062 v392 = {car: arguments[i], cdr: v392};
3063 return (function(v395){
3064 return (function(v396,v397){
3065 return (function(v398){
3066 return f67("(function(", f68(f45((function (v399){
3067 if (arguments.length < 1) throw 'too few arguments';
3068 if (arguments.length > 1) throw 'too many arguments';
3069 return f102(v399, v398);
3070 }), v396), ","), "){", v169, f70(f109(f56(v392), v398), "return ", f110((function(){
3071 var tmp = f55(v392);
3072 return tmp === v2? v2: tmp.car;
3073 })(), v398), ";", v169), "})(", f68(f45((function (v400){
3074 if (arguments.length < 1) throw 'too few arguments';
3075 if (arguments.length > 1) throw 'too many arguments';
3076 return f110(v400, v393);
3077 }), v397), ","), ")");
3078 })(f103(v396, v393));
3079 })(f45(f29, v395),f45(f30, v395));
3082 var l146 = f3("BACKQUOTE-EXPAND-1");
3083 var l145 = f3("LIST");
3084 var l144 = f3("UNQUOTE-SPLICING");
3085 var l143 = f3("LIST");
3086 var l142 = f3("UNQUOTE");
3087 var l141 = f3("APPEND");
3088 var l140 = f3("BACKQUOTE");
3089 var l139 = f3("UNQUOTE");
3090 var l138 = f3("QUOTE");
3094 return f119 = (function(v401){
3095 ((v401)["fname"] = "BACKQUOTE-EXPAND-1");
3097 })((function (v402){
3098 if (arguments.length < 1) throw 'too few arguments';
3099 if (arguments.length > 1) throw 'too many arguments';
3100 return (((function(){
3102 return (typeof tmp == 'object' && 'name' in tmp);
3103 })()?v3: v2) !== v2 ? (function(){
3104 return f33(l138, v402);
3105 })() : (f34(v402) !== v2 ? (function(){
3107 })() : ((((function(){
3109 return tmp === v2? v2: tmp.car;
3110 })() === l139)?v3: v2) !== v2 ? (function(){
3113 return tmp === v2? v2: tmp.car;
3115 })() : ((((function(){
3117 return tmp === v2? v2: tmp.car;
3118 })() === l140)?v3: v2) !== v2 ? (function(){
3119 return f119(f119(f23(v402)));
3121 return ({car: l141, cdr: f45((function (v403){
3122 if (arguments.length < 1) throw 'too few arguments';
3123 if (arguments.length > 1) throw 'too many arguments';
3124 return ((f36(v403) !== v2 ? (((function(){
3126 return tmp === v2? v2: tmp.car;
3127 })() === l142)?v3: v2) : v2) !== v2 ? (function(){
3128 return f33(l143, f23(v403));
3129 })() : ((f36(v403) !== v2 ? (((function(){
3131 return tmp === v2? v2: tmp.car;
3132 })() === l144)?v3: v2) : v2) !== v2 ? (function(){
3135 return f33(l145, f119(v403));
3143 var l148 = f3("BACKQUOTE-EXPAND");
3144 var l147 = f3("BACKQUOTE");
3148 return f120 = (function(v404){
3149 ((v404)["fname"] = "BACKQUOTE-EXPAND");
3151 })((function (v405){
3152 if (arguments.length < 1) throw 'too few arguments';
3153 if (arguments.length > 1) throw 'too many arguments';
3154 return ((f36(v405) !== v2 ? (((function(){
3156 return tmp === v2? v2: tmp.car;
3157 })() === l147)?v3: v2) : v2) !== v2 ? f119(f23(v405)) : v405);
3162 var l149 = f3("BACKQUOTE");
3163 v323 = ({car: f33(l149, (function (v406,v407){
3164 if (arguments.length < 2) throw 'too few arguments';
3165 if (arguments.length > 2) throw 'too many arguments';
3166 return f110(f119(v407), v406);
3168 var l150 = f3("COMPILE-BOOL");
3172 return f121 = (function(v408){
3173 ((v408)["fname"] = "COMPILE-BOOL");
3175 })((function (v409){
3176 if (arguments.length < 1) throw 'too few arguments';
3177 if (arguments.length > 1) throw 'too many arguments';
3178 return f67("(", v409, "?", f110(v3), ": ", f110(v2), ")");
3183 var l151 = f3("NUM-OP-NUM");
3187 return f122 = (function(v410){
3188 ((v410)["fname"] = "NUM-OP-NUM");
3190 })((function (v411,v412,v413){
3191 if (arguments.length < 3) throw 'too few arguments';
3192 if (arguments.length > 3) throw 'too many arguments';
3193 return f67("(function(){", v169, f70(f67("var ", "x", " = ", v411, ";", v169), f67("var ", "y", " = ", v413, ";", v169), f67("if (typeof ", "x", " != '", "number", "')", v169, f70("throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", v169)), f67("if (typeof ", "y", " != '", "number", "')", v169, f70("throw 'The value ' + ", "y", " + ' is not a type ", "number", ".';", v169)), f67("return ", (function(){
3194 return f67("x", v412, "y");
3195 })(), ";", v169)), "})()");
3201 v323 = ({car: f33(l152, (function (v414,v415,v416){
3202 if (arguments.length < 3) throw 'too few arguments';
3203 if (arguments.length > 3) throw 'too many arguments';
3204 return (function(v417,v418){
3205 return f122(v417, "+", v418);
3206 })(f110(v415, v414),f110(v416, v414));
3209 v323 = ({car: f33(l153, (function (v419,v420,v421){
3210 if (arguments.length < 3) throw 'too few arguments';
3211 if (arguments.length > 3) throw 'too many arguments';
3212 return (function(v422,v423){
3213 return f122(v422, "-", v423);
3214 })(f110(v420, v419),f110(v421, v419));
3217 v323 = ({car: f33(l154, (function (v424,v425,v426){
3218 if (arguments.length < 3) throw 'too few arguments';
3219 if (arguments.length > 3) throw 'too many arguments';
3220 return (function(v427,v428){
3221 return f122(v427, "*", v428);
3222 })(f110(v425, v424),f110(v426, v424));
3225 v323 = ({car: f33(l155, (function (v429,v430,v431){
3226 if (arguments.length < 3) throw 'too few arguments';
3227 if (arguments.length > 3) throw 'too many arguments';
3228 return (function(v432,v433){
3229 return f122(v432, "/", v433);
3230 })(f110(v430, v429),f110(v431, v429));
3232 var l156 = f3("MOD");
3233 v323 = ({car: f33(l156, (function (v434,v435,v436){
3234 if (arguments.length < 3) throw 'too few arguments';
3235 if (arguments.length > 3) throw 'too many arguments';
3236 return (function(v437,v438){
3237 return f122(v437, "%", v438);
3238 })(f110(v435, v434),f110(v436, v434));
3241 v323 = ({car: f33(l157, (function (v439,v440,v441){
3242 if (arguments.length < 3) throw 'too few arguments';
3243 if (arguments.length > 3) throw 'too many arguments';
3244 return (function(v442,v443){
3245 return f121(f122(v442, "<", v443));
3246 })(f110(v440, v439),f110(v441, v439));
3249 v323 = ({car: f33(l158, (function (v444,v445,v446){
3250 if (arguments.length < 3) throw 'too few arguments';
3251 if (arguments.length > 3) throw 'too many arguments';
3252 return (function(v447,v448){
3253 return f121(f122(v447, ">", v448));
3254 })(f110(v445, v444),f110(v446, v444));
3257 v323 = ({car: f33(l159, (function (v449,v450,v451){
3258 if (arguments.length < 3) throw 'too few arguments';
3259 if (arguments.length > 3) throw 'too many arguments';
3260 return (function(v452,v453){
3261 return f121(f122(v452, "==", v453));
3262 })(f110(v450, v449),f110(v451, v449));
3264 var l160 = f3("<=");
3265 v323 = ({car: f33(l160, (function (v454,v455,v456){
3266 if (arguments.length < 3) throw 'too few arguments';
3267 if (arguments.length > 3) throw 'too many arguments';
3268 return (function(v457,v458){
3269 return f121(f122(v457, "<=", v458));
3270 })(f110(v455, v454),f110(v456, v454));
3272 var l161 = f3(">=");
3273 v323 = ({car: f33(l161, (function (v459,v460,v461){
3274 if (arguments.length < 3) throw 'too few arguments';
3275 if (arguments.length > 3) throw 'too many arguments';
3276 return (function(v462,v463){
3277 return f121(f122(v462, ">=", v463));
3278 })(f110(v460, v459),f110(v461, v459));
3280 var l162 = f3("NUMBERP");
3281 v323 = ({car: f33(l162, (function (v464,v465){
3282 if (arguments.length < 2) throw 'too few arguments';
3283 if (arguments.length > 2) throw 'too many arguments';
3284 return (function(v466){
3285 return f121(f67("(typeof (", v466, ") == \"number\")"));
3286 })(f110(v465, v464));
3288 var l163 = f3("FLOOR");
3289 v323 = ({car: f33(l163, (function (v467,v468){
3290 if (arguments.length < 2) throw 'too few arguments';
3291 if (arguments.length > 2) throw 'too many arguments';
3292 return (function(v469){
3293 return f67("(function(){", v169, f70(f67("var ", "x", " = ", v469, ";", v169), f67("if (typeof ", "x", " != '", "number", "')", v169, f70("throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", v169)), f67("return ", (function(){
3294 return "Math.floor(x)";
3295 })(), ";", v169)), "})()");
3296 })(f110(v468, v467));
3298 var l164 = f3("CONS");
3299 v323 = ({car: f33(l164, (function (v470,v471,v472){
3300 if (arguments.length < 3) throw 'too few arguments';
3301 if (arguments.length > 3) throw 'too many arguments';
3302 return (function(v473,v474){
3303 return f67("({car: ", v473, ", cdr: ", v474, "})");
3304 })(f110(v471, v470),f110(v472, v470));
3306 var l165 = f3("CONSP");
3307 v323 = ({car: f33(l165, (function (v475,v476){
3308 if (arguments.length < 2) throw 'too few arguments';
3309 if (arguments.length > 2) throw 'too many arguments';
3310 return (function(v477){
3311 return f121(f67("(function(){", v169, f70("var tmp = ", v477, ";", v169, "return (typeof tmp == 'object' && 'car' in tmp);", v169), "})()"));
3312 })(f110(v476, v475));
3314 var l166 = f3("CAR");
3315 v323 = ({car: f33(l166, (function (v478,v479){
3316 if (arguments.length < 2) throw 'too few arguments';
3317 if (arguments.length > 2) throw 'too many arguments';
3318 return (function(v480){
3319 return f67("(function(){", v169, f70("var tmp = ", v480, ";", v169, "return tmp === ", f110(v2), "? ", f110(v2), ": tmp.car;", v169), "})()");
3320 })(f110(v479, v478));
3322 var l167 = f3("CDR");
3323 v323 = ({car: f33(l167, (function (v481,v482){
3324 if (arguments.length < 2) throw 'too few arguments';
3325 if (arguments.length > 2) throw 'too many arguments';
3326 return (function(v483){
3327 return f67("(function(){", v169, f70("var tmp = ", v483, ";", v169, "return tmp === ", f110(v2), "? ", f110(v2), ": tmp.cdr;", v169), "})()");
3328 })(f110(v482, v481));
3330 var l168 = f3("SETCAR");
3331 v323 = ({car: f33(l168, (function (v484,v485,v486){
3332 if (arguments.length < 3) throw 'too few arguments';
3333 if (arguments.length > 3) throw 'too many arguments';
3334 return (function(v487,v488){
3335 return f67("(function(){", v169, f70(f67("var ", "x", " = ", v487, ";", v169), f67("if (typeof ", "x", " != '", "object", "')", v169, f70("throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", v169)), f67("return ", (function(){
3336 return f67("(x.car = ", v488, ")");
3337 })(), ";", v169)), "})()");
3338 })(f110(v485, v484),f110(v486, v484));
3340 var l169 = f3("SETCDR");
3341 v323 = ({car: f33(l169, (function (v489,v490,v491){
3342 if (arguments.length < 3) throw 'too few arguments';
3343 if (arguments.length > 3) throw 'too many arguments';
3344 return (function(v492,v493){
3345 return f67("(function(){", v169, f70(f67("var ", "x", " = ", v492, ";", v169), f67("if (typeof ", "x", " != '", "object", "')", v169, f70("throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", v169)), f67("return ", (function(){
3346 return f67("(x.cdr = ", v493, ")");
3347 })(), ";", v169)), "})()");
3348 })(f110(v490, v489),f110(v491, v489));
3350 var l170 = f3("SYMBOLP");
3351 v323 = ({car: f33(l170, (function (v494,v495){
3352 if (arguments.length < 2) throw 'too few arguments';
3353 if (arguments.length > 2) throw 'too many arguments';
3354 return (function(v496){
3355 return f121(f67("(function(){", v169, f70("var tmp = ", v496, ";", v169, "return (typeof tmp == 'object' && 'name' in tmp);", v169), "})()"));
3356 })(f110(v495, v494));
3358 var l171 = f3("MAKE-SYMBOL");
3359 v323 = ({car: f33(l171, (function (v497,v498){
3360 if (arguments.length < 2) throw 'too few arguments';
3361 if (arguments.length > 2) throw 'too many arguments';
3362 return (function(v499){
3363 return f67("(function(){", v169, f70(f67("var ", "name", " = ", v499, ";", v169), f67("if (typeof ", "name", " != '", "string", "')", v169, f70("throw 'The value ' + ", "name", " + ' is not a type ", "string", ".';", v169)), f67("return ", (function(){
3364 return "({name: name})";
3365 })(), ";", v169)), "})()");
3366 })(f110(v498, v497));
3368 var l172 = f3("SYMBOL-NAME");
3369 v323 = ({car: f33(l172, (function (v500,v501){
3370 if (arguments.length < 2) throw 'too few arguments';
3371 if (arguments.length > 2) throw 'too many arguments';
3372 return (function(v502){
3373 return f67("(", v502, ").name");
3374 })(f110(v501, v500));
3376 var l173 = f3("EQ");
3377 v323 = ({car: f33(l173, (function (v503,v504,v505){
3378 if (arguments.length < 3) throw 'too few arguments';
3379 if (arguments.length > 3) throw 'too many arguments';
3380 return (function(v506,v507){
3381 return f121(f67("(", v506, " === ", v507, ")"));
3382 })(f110(v504, v503),f110(v505, v503));
3384 var l174 = f3("EQUAL");
3385 v323 = ({car: f33(l174, (function (v508,v509,v510){
3386 if (arguments.length < 3) throw 'too few arguments';
3387 if (arguments.length > 3) throw 'too many arguments';
3388 return (function(v511,v512){
3389 return f121(f67("(", v511, " == ", v512, ")"));
3390 })(f110(v509, v508),f110(v510, v508));
3392 var l175 = f3("STRING");
3393 v323 = ({car: f33(l175, (function (v513,v514){
3394 if (arguments.length < 2) throw 'too few arguments';
3395 if (arguments.length > 2) throw 'too many arguments';
3396 return (function(v515){
3397 return f67("(function(){", v169, f70(f67("var ", "x", " = ", v515, ";", v169), f67("if (typeof ", "x", " != '", "number", "')", v169, f70("throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", v169)), f67("return ", (function(){
3398 return "String.fromCharCode(x)";
3399 })(), ";", v169)), "})()");
3400 })(f110(v514, v513));
3402 var l176 = f3("STRINGP");
3403 v323 = ({car: f33(l176, (function (v516,v517){
3404 if (arguments.length < 2) throw 'too few arguments';
3405 if (arguments.length > 2) throw 'too many arguments';
3406 return (function(v518){
3407 return f121(f67("(typeof(", v518, ") == \"string\")"));
3408 })(f110(v517, v516));
3410 var l177 = f3("STRING-UPCASE");
3411 v323 = ({car: f33(l177, (function (v519,v520){
3412 if (arguments.length < 2) throw 'too few arguments';
3413 if (arguments.length > 2) throw 'too many arguments';
3414 return (function(v521){
3415 return f67("(function(){", v169, f70(f67("var ", "x", " = ", v521, ";", v169), f67("if (typeof ", "x", " != '", "string", "')", v169, f70("throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", v169)), f67("return ", (function(){
3416 return "x.toUpperCase()";
3417 })(), ";", v169)), "})()");
3418 })(f110(v520, v519));
3420 var l178 = f3("STRING-LENGTH");
3421 v323 = ({car: f33(l178, (function (v522,v523){
3422 if (arguments.length < 2) throw 'too few arguments';
3423 if (arguments.length > 2) throw 'too many arguments';
3424 return (function(v524){
3425 return f67("(function(){", v169, f70(f67("var ", "x", " = ", v524, ";", v169), f67("if (typeof ", "x", " != '", "string", "')", v169, f70("throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", v169)), f67("return ", (function(){
3427 })(), ";", v169)), "})()");
3428 })(f110(v523, v522));
3430 var l179 = f3("SLICE");
3431 v323 = ({car: f33(l179, (function (v525,v526,v527,v528){
3432 if (arguments.length < 3) throw 'too few arguments';
3433 if (arguments.length > 4) throw 'too many arguments';
3434 switch(arguments.length){
3439 return f67("(function(){", v169, f70("var str = ", f110(v526, v525), ";", v169, "var a = ", f110(v527, v525), ";", v169, "var b;", v169, (v528 !== v2 ? f67("b = ", f110(v528, v525), ";", v169) : ""), "return str.slice(a,b);", v169), "})()");
3441 var l180 = f3("CHAR");
3442 v323 = ({car: f33(l180, (function (v529,v530,v531){
3443 if (arguments.length < 3) throw 'too few arguments';
3444 if (arguments.length > 3) throw 'too many arguments';
3445 return (function(v532,v533){
3446 return f67("(function(){", v169, f70(f67("var ", "string", " = ", v532, ";", v169), f67("var ", "index", " = ", v533, ";", v169), f67("if (typeof ", "string", " != '", "string", "')", v169, f70("throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", v169)), f67("if (typeof ", "index", " != '", "number", "')", v169, f70("throw 'The value ' + ", "index", " + ' is not a type ", "number", ".';", v169)), f67("return ", (function(){
3447 return "string.charCodeAt(index)";
3448 })(), ";", v169)), "})()");
3449 })(f110(v530, v529),f110(v531, v529));
3451 var l181 = f3("CONCAT-TWO");
3452 v323 = ({car: f33(l181, (function (v534,v535,v536){
3453 if (arguments.length < 3) throw 'too few arguments';
3454 if (arguments.length > 3) throw 'too many arguments';
3455 return (function(v537,v538){
3456 return f67("(function(){", v169, f70(f67("var ", "string1", " = ", v537, ";", v169), f67("var ", "string2", " = ", v538, ";", v169), f67("if (typeof ", "string1", " != '", "string", "')", v169, f70("throw 'The value ' + ", "string1", " + ' is not a type ", "string", ".';", v169)), f67("if (typeof ", "string2", " != '", "string", "')", v169, f70("throw 'The value ' + ", "string2", " + ' is not a type ", "string", ".';", v169)), f67("return ", (function(){
3457 return "string1.concat(string2)";
3458 })(), ";", v169)), "})()");
3459 })(f110(v535, v534),f110(v536, v534));
3461 var l182 = f3("FUNCALL");
3462 v323 = ({car: f33(l182, (function (v540,v541){
3463 if (arguments.length < 2) throw 'too few arguments';
3465 for (var i = arguments.length-1; i>=2; i--)
3466 v539 = {car: arguments[i], cdr: v539};
3467 return f67("(", f110(v541, v540), ")(", f68(f45((function (v542){
3468 if (arguments.length < 1) throw 'too few arguments';
3469 if (arguments.length > 1) throw 'too many arguments';
3470 return f110(v542, v540);
3471 }), v539), ", "), ")");
3473 var l183 = f3("APPLY");
3474 v323 = ({car: f33(l183, (function (v544,v545){
3475 if (arguments.length < 2) throw 'too few arguments';
3477 for (var i = arguments.length-1; i>=2; i--)
3478 v543 = {car: arguments[i], cdr: v543};
3479 return (f1(v543) !== v2 ? f67("(", f110(v545, v544), ")()") : (function(v546,v547){
3480 return f67("(function(){", v169, f70("var f = ", f110(v545, v544), ";", v169, "var args = [", f68(f45((function (v548){
3481 if (arguments.length < 1) throw 'too few arguments';
3482 if (arguments.length > 1) throw 'too many arguments';
3483 return f110(v548, v544);
3484 }), v546), ", "), "];", v169, "var tail = (", f110(v547, v544), ");", v169, f70("while (tail != ", f110(v2), "){", v169, " args.push(tail.car);", v169, " tail = tail.cdr;", v169, "}", v169, "return f.apply(this, args);", v169), "})()"));
3485 })(f56(v543),(function(){
3486 var tmp = f55(v543);
3487 return tmp === v2? v2: tmp.car;
3490 var l184 = f3("JS-EVAL");
3491 v323 = ({car: f33(l184, (function (v549,v550){
3492 if (arguments.length < 2) throw 'too few arguments';
3493 if (arguments.length > 2) throw 'too many arguments';
3494 return (function(v551){
3495 return f67("(function(){", v169, f70(f67("var ", "string", " = ", v551, ";", v169), f67("if (typeof ", "string", " != '", "string", "')", v169, f70("throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", v169)), f67("return ", (function(){
3496 return "eval.apply(window, [string])";
3497 })(), ";", v169)), "})()");
3498 })(f110(v550, v549));
3500 var l185 = f3("ERROR");
3501 v323 = ({car: f33(l185, (function (v552,v553){
3502 if (arguments.length < 2) throw 'too few arguments';
3503 if (arguments.length > 2) throw 'too many arguments';
3504 return (function(v554){
3505 return f67("(function (){ throw ", v554, "; })()");
3506 })(f110(v553, v552));
3508 var l186 = f3("NEW");
3509 v323 = ({car: f33(l186, (function (v555){
3510 if (arguments.length < 1) throw 'too few arguments';
3511 if (arguments.length > 1) throw 'too many arguments';
3516 var l187 = f3("GET");
3517 v323 = ({car: f33(l187, (function (v556,v557,v558){
3518 if (arguments.length < 3) throw 'too few arguments';
3519 if (arguments.length > 3) throw 'too many arguments';
3520 return (function(v559,v560){
3521 return f67("(function(){", v169, f70("var tmp = ", "(", v559, ")[", v560, "];", v169, "return tmp == undefined? ", f110(v2), ": tmp ;", v169), "})()");
3522 })(f110(v557, v556),f110(v558, v556));
3524 var l188 = f3("SET");
3525 v323 = ({car: f33(l188, (function (v561,v562,v563,v564){
3526 if (arguments.length < 4) throw 'too few arguments';
3527 if (arguments.length > 4) throw 'too many arguments';
3528 return (function(v565,v566,v567){
3529 return f67("((", v565, ")[", v566, "] = ", v567, ")");
3530 })(f110(v562, v561),f110(v563, v561),f110(v564, v561));
3532 var l189 = f3("IN");
3533 v323 = ({car: f33(l189, (function (v568,v569,v570){
3534 if (arguments.length < 3) throw 'too few arguments';
3535 if (arguments.length > 3) throw 'too many arguments';
3536 return (function(v571,v572){
3537 return f121(f67("((", v571, ") in (", v572, "))"));
3538 })(f110(v569, v568),f110(v570, v568));
3540 var l190 = f3("FUNCTIONP");
3541 v323 = ({car: f33(l190, (function (v573,v574){
3542 if (arguments.length < 2) throw 'too few arguments';
3543 if (arguments.length > 2) throw 'too many arguments';
3544 return (function(v575){
3545 return f121(f67("(typeof ", v575, " == 'function')"));
3546 })(f110(v574, v573));
3548 var l191 = f3("WRITE-STRING");
3549 v323 = ({car: f33(l191, (function (v576,v577){
3550 if (arguments.length < 2) throw 'too few arguments';
3551 if (arguments.length > 2) throw 'too many arguments';
3552 return (function(v578){
3553 return f67("(function(){", v169, f70(f67("var ", "x", " = ", v578, ";", v169), f67("if (typeof ", "x", " != '", "string", "')", v169, f70("throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", v169)), f67("return ", (function(){
3554 return "lisp.write(x)";
3555 })(), ";", v169)), "})()");
3556 })(f110(v577, v576));
3558 var l193 = f3("MACROP");
3559 var l192 = f3("MACRO");
3563 return f123 = (function(v579){
3564 ((v579)["fname"] = "MACROP");
3566 })((function (v580){
3567 if (arguments.length < 1) throw 'too few arguments';
3568 if (arguments.length > 1) throw 'too many arguments';
3569 return (((function(){
3571 return (typeof tmp == 'object' && 'name' in tmp);
3572 })()?v3: v2) !== v2 ? ((f90(f104(v580, v278)) === l192)?v3: v2) : v2);
3577 var l195 = f3("LS-MACROEXPAND-1");
3578 var l194 = f3("MACRO");
3582 return f124 = (function(v581){
3583 ((v581)["fname"] = "LS-MACROEXPAND-1");
3585 })((function (v582,v583){
3586 if (arguments.length < 2) throw 'too few arguments';
3587 if (arguments.length > 2) throw 'too many arguments';
3588 return (f123((function(){
3590 return tmp === v2? v2: tmp.car;
3591 })()) !== v2 ? (function(v584){
3592 return (((f90(v584) === l194)?v3: v2) !== v2 ? (function(){
3593 var f = f118(f91(v584));
3595 var tail = ((function(){
3597 return tmp === v2? v2: tmp.cdr;
3600 args.push(tail.car);
3603 return f.apply(this, args);
3605 })(f104((function(){
3607 return tmp === v2? v2: tmp.car;
3608 })(), v278)) : v582);
3613 var l197 = f3("COMPILE-FUNCALL");
3614 var l196 = f3("LAMBDA");
3618 return f125 = (function(v585){
3619 ((v585)["fname"] = "COMPILE-FUNCALL");
3621 })((function (v586,v587,v588){
3622 if (arguments.length < 3) throw 'too few arguments';
3623 if (arguments.length > 3) throw 'too many arguments';
3624 return (((function(){
3626 return (typeof tmp == 'object' && 'name' in tmp);
3627 })()?v3: v2) !== v2 ? (function(){
3628 return f67(f105(v586, v588), "(", f68(f45((function (v589){
3629 if (arguments.length < 1) throw 'too few arguments';
3630 if (arguments.length > 1) throw 'too many arguments';
3631 return f110(v589, v588);
3632 }), v587), ", "), ")");
3633 })() : ((f36(v586) !== v2 ? (((function(){
3635 return tmp === v2? v2: tmp.car;
3636 })() === l196)?v3: v2) : v2) !== v2 ? (function(){
3637 return f67("(", f110(v586, v588), ")(", f68(f45((function (v590){
3638 if (arguments.length < 1) throw 'too few arguments';
3639 if (arguments.length > 1) throw 'too many arguments';
3640 return f110(v590, v588);
3641 }), v587), ", "), ")");
3643 return (function (){ throw f67("Invalid function designator ", (v586).name); })();
3649 var l198 = f3("LS-COMPILE");
3653 return f110 = (function(v591){
3654 ((v591)["fname"] = "LS-COMPILE");
3656 })((function (v592,v593){
3657 if (arguments.length < 1) throw 'too few arguments';
3658 if (arguments.length > 2) throw 'too many arguments';
3659 switch(arguments.length){
3664 return (((function(){
3666 return (typeof tmp == 'object' && 'name' in tmp);
3667 })()?v3: v2) !== v2 ? (function(){
3668 return f102(v592, v593);
3669 })() : (f51(v592) !== v2 ? (function(){
3671 })() : (((typeof(v592) == "string")?v3: v2) !== v2 ? (function(){
3672 return f67("\"", f72(v592), "\"");
3673 })() : (f36(v592) !== v2 ? (function(){
3674 return (f65((function(){
3676 return tmp === v2? v2: tmp.car;
3677 })(), v323) !== v2 ? (function(v594){
3681 var tail = ((function(){
3683 return tmp === v2? v2: tmp.cdr;
3686 args.push(tail.car);
3689 return f.apply(this, args);
3691 })(f30(f65((function(){
3693 return tmp === v2? v2: tmp.car;
3694 })(), v323))) : (f123((function(){
3696 return tmp === v2? v2: tmp.car;
3697 })()) !== v2 ? f110(f124(v592, v593), v593) : f125((function(){
3699 return tmp === v2? v2: tmp.car;
3702 return tmp === v2? v2: tmp.cdr;
3709 var l199 = f3("LS-COMPILE-TOPLEVEL");
3713 return f126 = (function(v595){
3714 ((v595)["fname"] = "LS-COMPILE-TOPLEVEL");
3716 })((function (v596){
3717 if (arguments.length < 1) throw 'too few arguments';
3718 if (arguments.length > 1) throw 'too many arguments';
3720 return (function(v597){
3721 return (function(v598){
3724 })(f67(f68(f45((function (v599){
3725 if (arguments.length < 1) throw 'too few arguments';
3726 if (arguments.length > 1) throw 'too many arguments';
3727 return f67(v599, ";", v169);
3734 var l209 = f3("LS-COMPILE-TOPLEVEL");
3735 var l208 = f3("EVAL");
3736 var l207 = f3("PRINT-TO-STRING");
3737 var l206 = f3("LS-READ-FROM-STRING");
3742 var l201 = {car: {car: {car: f3("*LITERAL-COUNTER*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v377", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*LAMBDA-LIST-KEYWORDS*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v334", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*COMPILATIONS*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v323", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*TOPLEVEL-COMPILATIONS*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v313", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*FUNCTION-COUNTER*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v302", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*VARIABLE-COUNTER*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v282", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*ENVIRONMENT*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v278", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*COMPILATION-UNIT-CHECKS*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v244", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*EOF*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v237", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*NEWLINE*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v169", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*GENSYM-COUNTER*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v12", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("T"), cdr: {car: f3("VARIABLE"), cdr: {car: "v3", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("NIL"), cdr: {car: f3("VARIABLE"), cdr: {car: "v2", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*PACKAGE*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v1", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: f3("NIL")}}}}}}}}}}}}}}, cdr: {car: {car: {car: f3("WITH-COMPILATION-UNIT"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("&REST"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("PROG1"), cdr: {car: {car: f3("PROGN"), cdr: {car: {car: f3("SETQ"), cdr: {car: f3("*COMPILATION-UNIT-CHECKS*"), cdr: {car: f3("NIL"), cdr: f3("NIL")}}}, cdr: {car: {car: f3("CLEAR-UNDECLARED-GLOBAL-BINDINGS"), cdr: f3("NIL")}, cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}}, cdr: {car: {car: f3("DOLIST"), cdr: {car: {car: f3("CHECK"), cdr: {car: f3("*COMPILATION-UNIT-CHECKS*"), cdr: f3("NIL")}}, cdr: {car: {car: f3("FUNCALL"), cdr: {car: f3("CHECK"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LS-COMPILE-TOPLEVEL"), cdr: {car: f3("FUNCTION"), cdr: {car: "f126", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("COMPILE-FUNCALL"), cdr: {car: f3("FUNCTION"), cdr: {car: "f125", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LS-MACROEXPAND-1"), cdr: {car: f3("FUNCTION"), cdr: {car: "f124", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("MACROP"), cdr: {car: f3("FUNCTION"), cdr: {car: "f123", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("NUM-OP-NUM"), cdr: {car: f3("FUNCTION"), cdr: {car: "f122", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("TYPE-CHECK"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("DECLS"), cdr: {car: f3("&REST"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("CONCAT"), cdr: {car: "(function(){", cdr: {car: f3("*NEWLINE*"), cdr: {car: {car: f3("INDENT"), cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: {car: f3("MAPCAR"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("DECL"), cdr: f3("NIL")}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("CONCAT"), cdr: {car: "var ", cdr: {car: {car: f3("UNQUOTE"), cdr: {car: {car: f3("FIRST"), cdr: {car: f3("DECL"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: " = ", cdr: {car: {car: f3("UNQUOTE"), cdr: {car: {car: f3("THIRD"), cdr: {car: f3("DECL"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: ";", cdr: {car: f3("*NEWLINE*"), cdr: f3("NIL")}}}}}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("DECLS"), cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: {car: f3("MAPCAR"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("DECL"), cdr: f3("NIL")}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("CONCAT"), cdr: {car: "if (typeof ", cdr: {car: {car: f3("UNQUOTE"), cdr: {car: {car: f3("FIRST"), cdr: {car: f3("DECL"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: " != '", cdr: {car: {car: f3("UNQUOTE"), cdr: {car: {car: f3("SECOND"), cdr: {car: f3("DECL"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: "')", cdr: {car: f3("*NEWLINE*"), cdr: {car: {car: f3("INDENT"), cdr: {car: "throw 'The value ' + ", cdr: {car: {car: f3("UNQUOTE"), cdr: {car: {car: f3("FIRST"), cdr: {car: f3("DECL"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: " + ' is not a type ", cdr: {car: {car: f3("UNQUOTE"), cdr: {car: {car: f3("SECOND"), cdr: {car: f3("DECL"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: ".';", cdr: {car: f3("*NEWLINE*"), cdr: f3("NIL")}}}}}}}, cdr: f3("NIL")}}}}}}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("DECLS"), cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("CONCAT"), cdr: {car: "return ", cdr: {car: {car: f3("PROGN"), cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: ";", cdr: {car: f3("*NEWLINE*"), cdr: f3("NIL")}}}}}, cdr: f3("NIL")}}}}, cdr: {car: "})()", cdr: f3("NIL")}}}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("COMPILE-BOOL"), cdr: {car: f3("FUNCTION"), cdr: {car: "f121", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("DEFINE-BUILTIN"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("NAME"), cdr: {car: f3("ARGS"), cdr: {car: f3("&REST"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("DEFINE-COMPILATION"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("NAME"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("ARGS"), cdr: f3("NIL")}}, cdr: {car: {car: f3("LET"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: {car: f3("MAPCAR"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("ARG"), cdr: f3("NIL")}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: {car: f3("UNQUOTE"), cdr: {car: f3("ARG"), cdr: f3("NIL")}}, cdr: {car: {car: f3("LS-COMPILE"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("ARG"), cdr: f3("NIL")}}, cdr: {car: f3("ENV"), cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("ARGS"), cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("FORM"), cdr: f3("NIL")}, cdr: {car: {car: f3("BACKQUOTE-EXPAND-1"), cdr: {car: f3("FORM"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("BACKQUOTE-EXPAND"), cdr: {car: f3("FUNCTION"), cdr: {car: "f120", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("BACKQUOTE-EXPAND-1"), cdr: {car: f3("FUNCTION"), cdr: {car: "f119", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("DEFINE-TRANSFORMATION"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("NAME"), cdr: {car: f3("ARGS"), cdr: {car: f3("FORM"), cdr: f3("NIL")}}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("DEFINE-COMPILATION"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("NAME"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("ARGS"), cdr: f3("NIL")}}, cdr: {car: {car: f3("LS-COMPILE"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("FORM"), cdr: f3("NIL")}}, cdr: {car: f3("ENV"), cdr: f3("NIL")}}}, cdr: f3("NIL")}}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("EVAL"), cdr: {car: f3("FUNCTION"), cdr: {car: "f118", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LITERAL"), cdr: {car: f3("FUNCTION"), cdr: {car: "f117", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LITERAL->JS"), cdr: {car: f3("FUNCTION"), cdr: {car: "f116", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LAMBDA-LIST-REST-ARGUMENT"), cdr: {car: f3("FUNCTION"), cdr: {car: "f115", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LAMBDA-LIST-OPTIONAL-ARGUMENTS"), cdr: {car: f3("FUNCTION"), cdr: {car: "f114", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT"), cdr: {car: f3("FUNCTION"), cdr: {car: "f113", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LAMBDA-LIST-REQUIRED-ARGUMENTS"), cdr: {car: f3("FUNCTION"), cdr: {car: "f112", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LIST-UNTIL-KEYWORD"), cdr: {car: f3("FUNCTION"), cdr: {car: "f111", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("DEFINE-COMPILATION"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("NAME"), cdr: {car: f3("ARGS"), cdr: {car: f3("&REST"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("PUSH"), cdr: {car: {car: f3("LIST"), cdr: {car: {car: f3("QUOTE"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("NAME"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("ENV"), cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: f3("ARGS"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}}, cdr: {car: f3("*COMPILATIONS*"), cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LS-COMPILE"), cdr: {car: f3("FUNCTION"), cdr: {car: "f110", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LS-COMPILE-BLOCK"), cdr: {car: f3("FUNCTION"), cdr: {car: "f109", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("%COMPILE-DEFMACRO"), cdr: {car: f3("FUNCTION"), cdr: {car: "f108", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("%COMPILE-DEFUN"), cdr: {car: f3("FUNCTION"), cdr: {car: "f107", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("%COMPILE-DEFVAR"), cdr: {car: f3("FUNCTION"), cdr: {car: "f106", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LOOKUP-FUNCTION-TRANSLATION"), cdr: {car: f3("FUNCTION"), cdr: {car: "f105", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LOOKUP-FUNCTION"), cdr: {car: f3("FUNCTION"), cdr: {car: "f104", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("EXTEND-LOCAL-ENV"), cdr: {car: f3("FUNCTION"), cdr: {car: "f103", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LOOKUP-VARIABLE-TRANSLATION"), cdr: {car: f3("FUNCTION"), cdr: {car: "f102", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LOOKUP-VARIABLE"), cdr: {car: f3("FUNCTION"), cdr: {car: "f101", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("GVARNAME"), cdr: {car: f3("FUNCTION"), cdr: {car: "f100", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("CLEAR-UNDECLARED-GLOBAL-BINDINGS"), cdr: {car: f3("FUNCTION"), cdr: {car: "f99", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LOOKUP-IN-LEXENV"), cdr: {car: f3("FUNCTION"), cdr: {car: "f98", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("EXTEND-LEXENV"), cdr: {car: f3("FUNCTION"), cdr: {car: "f97", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("PUSH-TO-LEXENV"), cdr: {car: f3("FUNCTION"), cdr: {car: "f96", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("COPY-LEXENV"), cdr: {car: f3("FUNCTION"), cdr: {car: "f95", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("MAKE-LEXENV"), cdr: {car: f3("FUNCTION"), cdr: {car: "f94", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("MARK-BINDING-AS-DECLARED"), cdr: {car: f3("FUNCTION"), cdr: {car: "f93", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("BINDING-DECLARED"), cdr: {car: f3("FUNCTION"), cdr: {car: "f92", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("BINDING-TRANSLATION"), cdr: {car: f3("FUNCTION"), cdr: {car: "f91", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("BINDING-TYPE"), cdr: {car: f3("FUNCTION"), cdr: {car: "f90", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("BINDING-NAME"), cdr: {car: f3("FUNCTION"), cdr: {car: "f89", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("MAKE-BINDING"), cdr: {car: f3("FUNCTION"), cdr: {car: "f88", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LS-READ-FROM-STRING"), cdr: {car: f3("FUNCTION"), cdr: {car: "f87", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("READ-SHARP"), cdr: {car: f3("FUNCTION"), cdr: {car: "f86", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("READ-STRING"), cdr: {car: f3("FUNCTION"), cdr: {car: "f85", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LS-READ"), cdr: {car: f3("FUNCTION"), cdr: {car: "f84", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("%READ-LIST"), cdr: {car: f3("FUNCTION"), cdr: {car: "f83", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("SKIP-WHITESPACES-AND-COMMENTS"), cdr: {car: f3("FUNCTION"), cdr: {car: "f82", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("READ-UNTIL"), cdr: {car: f3("FUNCTION"), cdr: {car: "f81", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("TERMINALP"), cdr: {car: f3("FUNCTION"), cdr: {car: "f80", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("SKIP-WHITESPACES"), cdr: {car: f3("FUNCTION"), cdr: {car: "f79", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("WHITESPACEP"), cdr: {car: f3("FUNCTION"), cdr: {car: "f78", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("%READ-CHAR"), cdr: {car: f3("FUNCTION"), cdr: {car: "f77", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("%PEEK-CHAR"), cdr: {car: f3("FUNCTION"), cdr: {car: "f76", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("MAKE-STRING-STREAM"), cdr: {car: f3("FUNCTION"), cdr: {car: "f75", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("PRINT"), cdr: {car: f3("FUNCTION"), cdr: {car: "f74", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("WRITE-LINE"), cdr: {car: f3("FUNCTION"), cdr: {car: "f73", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("ESCAPE-STRING"), cdr: {car: f3("FUNCTION"), cdr: {car: "f72", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("PRINT-TO-STRING"), cdr: {car: f3("FUNCTION"), cdr: {car: "f71", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("INDENT"), cdr: {car: f3("FUNCTION"), cdr: {car: "f70", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("JOIN-TRAILING"), cdr: {car: f3("FUNCTION"), cdr: {car: "f69", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("JOIN"), cdr: {car: f3("FUNCTION"), cdr: {car: "f68", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("CONCAT"), cdr: {car: f3("FUNCTION"), cdr: {car: "f67", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("STRING="), cdr: {car: f3("FUNCTION"), cdr: {car: "f66", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("ASSOC"), cdr: {car: f3("FUNCTION"), cdr: {car: "f65", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("EVERY"), cdr: {car: f3("FUNCTION"), cdr: {car: "f64", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("PARSE-INTEGER"), cdr: {car: f3("FUNCTION"), cdr: {car: "f63", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("SUBSEQ"), cdr: {car: f3("FUNCTION"), cdr: {car: "f62", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("DIGIT-CHAR-P"), cdr: {car: f3("FUNCTION"), cdr: {car: "f61", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("REMOVE-IF-NOT"), cdr: {car: f3("FUNCTION"), cdr: {car: "f60", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("REMOVE-IF"), cdr: {car: f3("FUNCTION"), cdr: {car: "f59", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("REMOVE"), cdr: {car: f3("FUNCTION"), cdr: {car: "f58", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("MEMBER"), cdr: {car: f3("FUNCTION"), cdr: {car: "f57", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("BUTLAST"), cdr: {car: f3("FUNCTION"), cdr: {car: "f56", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LAST"), cdr: {car: f3("FUNCTION"), cdr: {car: "f55", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("NTH"), cdr: {car: f3("FUNCTION"), cdr: {car: "f54", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("MINUSP"), cdr: {car: f3("FUNCTION"), cdr: {car: "f53", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("PLUSP"), cdr: {car: f3("FUNCTION"), cdr: {car: "f52", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("INTEGERP"), cdr: {car: f3("FUNCTION"), cdr: {car: "f51", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("CHAR="), cdr: {car: f3("FUNCTION"), cdr: {car: "f50", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("CHAR-CODE"), cdr: {car: f3("FUNCTION"), cdr: {car: "f49", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("CODE-CHAR"), cdr: {car: f3("FUNCTION"), cdr: {car: "f48", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("COPY-LIST"), cdr: {car: f3("FUNCTION"), cdr: {car: "f47", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("IDENTITY"), cdr: {car: f3("FUNCTION"), cdr: {car: "f46", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("MAPCAR"), cdr: {car: f3("FUNCTION"), cdr: {car: "f45", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("CONCAT-TWO"), cdr: {car: f3("FUNCTION"), cdr: {car: "f44", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LENGTH"), cdr: {car: f3("FUNCTION"), cdr: {car: "f43", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LIST-LENGTH"), cdr: {car: f3("FUNCTION"), cdr: {car: "f42", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("REVERSE"), cdr: {car: f3("FUNCTION"), cdr: {car: "f41", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("REVERSE-AUX"), cdr: {car: f3("FUNCTION"), cdr: {car: "f40", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("APPEND"), cdr: {car: f3("FUNCTION"), cdr: {car: "f39", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("APPEND-TWO"), cdr: {car: f3("FUNCTION"), cdr: {car: "f38", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("DEFVAR"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("NAME"), cdr: {car: f3("&OPTIONAL"), cdr: {car: f3("VALUE"), cdr: f3("NIL")}}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("PROGN"), cdr: {car: {car: f3("%DEFVAR"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("NAME"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("VALUE"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: {car: f3("QUOTE"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("NAME"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("DEFUN"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("NAME"), cdr: {car: f3("ARGS"), cdr: {car: f3("&REST"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("PROGN"), cdr: {car: {car: f3("%DEFUN"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("NAME"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("ARGS"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}}, cdr: {car: {car: f3("QUOTE"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("NAME"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("!REDUCE"), cdr: {car: f3("FUNCTION"), cdr: {car: "f37", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LISTP"), cdr: {car: f3("FUNCTION"), cdr: {car: "f36", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("ENSURE-LIST"), cdr: {car: f3("FUNCTION"), cdr: {car: "f35", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("PROG1"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("FORM"), cdr: {car: f3("&REST"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}}, cdr: {car: {car: f3("LET"), cdr: {car: {car: {car: f3("VALUE"), cdr: {car: {car: f3("GENSYM"), cdr: f3("NIL")}, cdr: f3("NIL")}}, cdr: f3("NIL")}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("LET"), cdr: {car: {car: {car: {car: f3("UNQUOTE"), cdr: {car: f3("VALUE"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("FORM"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}, cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("VALUE"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("OR"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("&REST"), cdr: {car: f3("FORMS"), cdr: f3("NIL")}}, cdr: {car: {car: f3("COND"), cdr: {car: {car: {car: f3("NULL"), cdr: {car: f3("FORMS"), cdr: f3("NIL")}}, cdr: {car: f3("NIL"), cdr: f3("NIL")}}, cdr: {car: {car: {car: f3("NULL"), cdr: {car: {car: f3("CDR"), cdr: {car: f3("FORMS"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("CAR"), cdr: {car: f3("FORMS"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("T"), cdr: {car: {car: f3("LET"), cdr: {car: {car: {car: f3("G"), cdr: {car: {car: f3("GENSYM"), cdr: f3("NIL")}, cdr: f3("NIL")}}, cdr: f3("NIL")}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("LET"), cdr: {car: {car: {car: {car: f3("UNQUOTE"), cdr: {car: f3("G"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: {car: f3("CAR"), cdr: {car: f3("FORMS"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}, cdr: {car: {car: f3("IF"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("G"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("G"), cdr: f3("NIL")}}, cdr: {car: {car: f3("OR"), cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: {car: f3("CDR"), cdr: {car: f3("FORMS"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("AND"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("&REST"), cdr: {car: f3("FORMS"), cdr: f3("NIL")}}, cdr: {car: {car: f3("COND"), cdr: {car: {car: {car: f3("NULL"), cdr: {car: f3("FORMS"), cdr: f3("NIL")}}, cdr: {car: f3("T"), cdr: f3("NIL")}}, cdr: {car: {car: {car: f3("NULL"), cdr: {car: {car: f3("CDR"), cdr: {car: f3("FORMS"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("CAR"), cdr: {car: f3("FORMS"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("T"), cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("IF"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: {car: f3("CAR"), cdr: {car: f3("FORMS"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("AND"), cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: {car: f3("CDR"), cdr: {car: f3("FORMS"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: f3("NIL"), cdr: f3("NIL")}}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("ECASE"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("FORM"), cdr: {car: f3("&REST"), cdr: {car: f3("CLAUSULES"), cdr: f3("NIL")}}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("CASE"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("FORM"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: {car: f3("APPEND"), cdr: {car: f3("CLAUSULES"), cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: {car: f3("T"), cdr: {car: {car: f3("ERROR"), cdr: {car: "ECASE expression failed.", cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("CASE"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("FORM"), cdr: {car: f3("&REST"), cdr: {car: f3("CLAUSULES"), cdr: f3("NIL")}}}, cdr: {car: {car: f3("LET"), cdr: {car: {car: {car: f3("!FORM"), cdr: {car: {car: f3("GENSYM"), cdr: f3("NIL")}, cdr: f3("NIL")}}, cdr: f3("NIL")}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("LET"), cdr: {car: {car: {car: {car: f3("UNQUOTE"), cdr: {car: f3("!FORM"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("FORM"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}, cdr: {car: {car: f3("COND"), cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: {car: f3("MAPCAR"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("CLAUSULE"), cdr: f3("NIL")}, cdr: {car: {car: f3("IF"), cdr: {car: {car: f3("EQ"), cdr: {car: {car: f3("CAR"), cdr: {car: f3("CLAUSULE"), cdr: f3("NIL")}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}, cdr: {car: f3("CLAUSULE"), cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: {car: f3("EQL"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("!FORM"), cdr: f3("NIL")}}, cdr: {car: {car: f3("QUOTE"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: {car: f3("CAR"), cdr: {car: f3("CLAUSULE"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: {car: f3("CDR"), cdr: {car: f3("CLAUSULE"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}}, cdr: f3("NIL")}}}, cdr: {car: f3("CLAUSULES"), cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("COND"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("&REST"), cdr: {car: f3("CLAUSULES"), cdr: f3("NIL")}}, cdr: {car: {car: f3("IF"), cdr: {car: {car: f3("NULL"), cdr: {car: f3("CLAUSULES"), cdr: f3("NIL")}}, cdr: {car: f3("NIL"), cdr: {car: {car: f3("IF"), cdr: {car: {car: f3("EQ"), cdr: {car: {car: f3("CAAR"), cdr: {car: f3("CLAUSULES"), cdr: f3("NIL")}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("PROGN"), cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: {car: f3("CDAR"), cdr: {car: f3("CLAUSULES"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("IF"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: {car: f3("CAAR"), cdr: {car: f3("CLAUSULES"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("PROGN"), cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: {car: f3("CDAR"), cdr: {car: f3("CLAUSULES"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("COND"), cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: {car: f3("CDR"), cdr: {car: f3("CLAUSULES"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}}, cdr: f3("NIL")}}}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("DOTIMES"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("ITER"), cdr: {car: f3("&REST"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}}, cdr: {car: {car: f3("LET"), cdr: {car: {car: {car: f3("G!TO"), cdr: {car: {car: f3("GENSYM"), cdr: f3("NIL")}, cdr: f3("NIL")}}, cdr: {car: {car: f3("VAR"), cdr: {car: {car: f3("FIRST"), cdr: {car: f3("ITER"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("TO"), cdr: {car: {car: f3("SECOND"), cdr: {car: f3("ITER"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("RESULT"), cdr: {car: {car: f3("THIRD"), cdr: {car: f3("ITER"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("LET"), cdr: {car: {car: {car: {car: f3("UNQUOTE"), cdr: {car: f3("VAR"), cdr: f3("NIL")}}, cdr: {car: 0, cdr: f3("NIL")}}, cdr: {car: {car: {car: f3("UNQUOTE"), cdr: {car: f3("G!TO"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("TO"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("WHILE"), cdr: {car: {car: f3("<"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("VAR"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("G!TO"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}, cdr: {car: {car: f3("INCF"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("VAR"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("RESULT"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("DOLIST"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("ITER"), cdr: {car: f3("&REST"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}}, cdr: {car: {car: f3("LET"), cdr: {car: {car: {car: f3("VAR"), cdr: {car: {car: f3("FIRST"), cdr: {car: f3("ITER"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("G!LIST"), cdr: {car: {car: f3("GENSYM"), cdr: f3("NIL")}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("LET"), cdr: {car: {car: {car: {car: f3("UNQUOTE"), cdr: {car: f3("G!LIST"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: {car: f3("SECOND"), cdr: {car: f3("ITER"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: {car: f3("UNQUOTE"), cdr: {car: f3("VAR"), cdr: f3("NIL")}}, cdr: {car: f3("NIL"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("WHILE"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("G!LIST"), cdr: f3("NIL")}}, cdr: {car: {car: f3("SETQ"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("VAR"), cdr: f3("NIL")}}, cdr: {car: {car: f3("CAR"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("G!LIST"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}, cdr: {car: {car: f3("SETQ"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("G!LIST"), cdr: f3("NIL")}}, cdr: {car: {car: f3("CDR"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("G!LIST"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}}}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: {car: f3("THIRD"), cdr: {car: f3("ITER"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("UNLESS"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("CONDITION"), cdr: {car: f3("&REST"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("IF"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("CONDITION"), cdr: f3("NIL")}}, cdr: {car: f3("NIL"), cdr: {car: {car: f3("PROGN"), cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("WHEN"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("CONDITION"), cdr: {car: f3("&REST"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("IF"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("CONDITION"), cdr: f3("NIL")}}, cdr: {car: {car: f3("PROGN"), cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: f3("NIL"), cdr: f3("NIL")}}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("PUSH"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("X"), cdr: {car: f3("PLACE"), cdr: f3("NIL")}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("SETQ"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("PLACE"), cdr: f3("NIL")}}, cdr: {car: {car: f3("CONS"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("X"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("PLACE"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("DECF"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("X"), cdr: {car: f3("&OPTIONAL"), cdr: {car: {car: f3("DELTA"), cdr: {car: 1, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("SETQ"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("X"), cdr: f3("NIL")}}, cdr: {car: {car: f3("-"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("X"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("DELTA"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("INCF"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("X"), cdr: {car: f3("&OPTIONAL"), cdr: {car: {car: f3("DELTA"), cdr: {car: 1, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("SETQ"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("X"), cdr: f3("NIL")}}, cdr: {car: {car: f3("+"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("X"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("DELTA"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("ATOM"), cdr: {car: f3("FUNCTION"), cdr: {car: "f34", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LIST"), cdr: {car: f3("FUNCTION"), cdr: {car: "f33", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("FOURTH"), cdr: {car: f3("FUNCTION"), cdr: {car: "f32", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("THIRD"), cdr: {car: f3("FUNCTION"), cdr: {car: "f31", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("SECOND"), cdr: {car: f3("FUNCTION"), cdr: {car: "f30", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("FIRST"), cdr: {car: f3("FUNCTION"), cdr: {car: "f29", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("CADDDR"), cdr: {car: f3("FUNCTION"), cdr: {car: "f28", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("CDDDR"), cdr: {car: f3("FUNCTION"), cdr: {car: "f27", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("CADDR"), cdr: {car: f3("FUNCTION"), cdr: {car: "f26", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("CDDR"), cdr: {car: f3("FUNCTION"), cdr: {car: "f25", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("CDAR"), cdr: {car: f3("FUNCTION"), cdr: {car: "f24", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("CADR"), cdr: {car: f3("FUNCTION"), cdr: {car: "f23", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("CAAR"), cdr: {car: f3("FUNCTION"), cdr: {car: "f22", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("CDR"), cdr: {car: f3("FUNCTION"), cdr: {car: "f21", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("CAR"), cdr: {car: f3("FUNCTION"), cdr: {car: "f20", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("CONSP"), cdr: {car: f3("FUNCTION"), cdr: {car: "f19", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("CONS"), cdr: {car: f3("FUNCTION"), cdr: {car: "f18", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("NOT"), cdr: {car: f3("FUNCTION"), cdr: {car: "f17", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("EQL"), cdr: {car: f3("FUNCTION"), cdr: {car: "f16", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("TRUNCATE"), cdr: {car: f3("FUNCTION"), cdr: {car: "f15", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("ZEROP"), cdr: {car: f3("FUNCTION"), cdr: {car: "f14", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("1-"), cdr: {car: f3("FUNCTION"), cdr: {car: "f13", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("1+"), cdr: {car: f3("FUNCTION"), cdr: {car: "f12", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("/"), cdr: {car: f3("FUNCTION"), cdr: {car: "f11", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*"), cdr: {car: f3("FUNCTION"), cdr: {car: "f10", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("-"), cdr: {car: f3("FUNCTION"), cdr: {car: "f9", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("+"), cdr: {car: f3("FUNCTION"), cdr: {car: "f8", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("="), cdr: {car: f3("FUNCTION"), cdr: {car: "f7", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("INTEGER-TO-STRING"), cdr: {car: f3("FUNCTION"), cdr: {car: "f6", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("GENSYM"), cdr: {car: f3("FUNCTION"), cdr: {car: "f5", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("FIND-SYMBOL"), cdr: {car: f3("FUNCTION"), cdr: {car: "f4", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("INTERN"), cdr: {car: f3("FUNCTION"), cdr: {car: "f3", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("INTERNP"), cdr: {car: f3("FUNCTION"), cdr: {car: "f2", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("NULL"), cdr: {car: f3("FUNCTION"), cdr: {car: "f1", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("DEFUN"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("NAME"), cdr: {car: f3("ARGS"), cdr: {car: f3("&REST"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("%DEFUN"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("NAME"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("ARGS"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("%DEFUN"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("NAME"), cdr: {car: f3("ARGS"), cdr: {car: f3("&REST"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("PROGN"), cdr: {car: {car: f3("EVAL-WHEN-COMPILE"), cdr: {car: {car: f3("%COMPILE-DEFUN"), cdr: {car: {car: f3("QUOTE"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("NAME"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("FSETQ"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("NAME"), cdr: f3("NIL")}}, cdr: {car: {car: f3("NAMED-LAMBDA"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: {car: f3("SYMBOL-NAME"), cdr: {car: f3("NAME"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("ARGS"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("NAMED-LAMBDA"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("NAME"), cdr: {car: f3("ARGS"), cdr: {car: f3("&REST"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LET"), cdr: {car: {car: {car: f3("X"), cdr: {car: {car: f3("GENSYM"), cdr: {car: "FN", cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("LET"), cdr: {car: {car: {car: {car: f3("UNQUOTE"), cdr: {car: f3("X"), cdr: f3("NIL")}}, cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("ARGS"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}, cdr: {car: {car: f3("SET"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("X"), cdr: f3("NIL")}}, cdr: {car: "fname", cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("NAME"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("X"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("DEFVAR"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("NAME"), cdr: {car: f3("&OPTIONAL"), cdr: {car: f3("VALUE"), cdr: f3("NIL")}}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("%DEFVAR"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("NAME"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("VALUE"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("%DEFVAR"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("NAME"), cdr: {car: f3("VALUE"), cdr: f3("NIL")}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("PROGN"), cdr: {car: {car: f3("EVAL-WHEN-COMPILE"), cdr: {car: {car: f3("%COMPILE-DEFVAR"), cdr: {car: {car: f3("QUOTE"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("NAME"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("SETQ"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("NAME"), cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("VALUE"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("DEFMACRO"), cdr: {car: f3("MACRO"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("NAME"), cdr: {car: f3("ARGS"), cdr: {car: f3("&REST"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("BACKQUOTE"), cdr: {car: {car: f3("EVAL-WHEN-COMPILE"), cdr: {car: {car: f3("%COMPILE-DEFMACRO"), cdr: {car: {car: f3("QUOTE"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: f3("NAME"), cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("QUOTE"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("UNQUOTE"), cdr: {car: {car: f3("MAPCAR"), cdr: {car: {car: f3("LAMBDA"), cdr: {car: {car: f3("X"), cdr: f3("NIL")}, cdr: {car: {car: f3("IF"), cdr: {car: {car: f3("EQ"), cdr: {car: f3("X"), cdr: {car: {car: f3("QUOTE"), cdr: {car: f3("&BODY"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: {car: f3("QUOTE"), cdr: {car: f3("&REST"), cdr: f3("NIL")}}, cdr: {car: f3("X"), cdr: f3("NIL")}}}}, cdr: f3("NIL")}}}, cdr: {car: f3("ARGS"), cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: {car: {car: f3("UNQUOTE-SPLICING"), cdr: {car: f3("BODY"), cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}, cdr: f3("NIL")}}}, cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: f3("NIL")}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}, cdr: f3("NIL")}};
3743 var l200 = f3("EVAL");
3755 return f118 = (function(v600){
3756 ((v600)["fname"] = "EVAL");
3758 })((function (v601){
3759 if (arguments.length < 1) throw 'too few arguments';
3760 if (arguments.length > 1) throw 'too many arguments';
3761 return (function(v602){
3764 if (typeof string != 'string')
3765 throw 'The value ' + string + ' is not a type string.';
3766 return eval.apply(window, [string]);
3769 (function(v604,v605){
3774 return tmp === v2? v2: tmp.car;
3779 return tmp === v2? v2: tmp.cdr;
3795 var string = f67("var lisp = {};", "lisp.read = ", f105(l206, v2), ";", v169, "lisp.print = ", f105(l207, v2), ";", v169, "lisp.eval = ", f105(l208, v2), ";", v169, "lisp.compile = ", f105(l209, v2), ";", v169, "lisp.evalString = function(str){", v169, " return lisp.eval(lisp.read(str));", v169, "}", v169, "lisp.compileString = function(str){", v169, " return lisp.compile(lisp.read(str));", v169, "}", v169);
3796 if (typeof string != 'string')
3797 throw 'The value ' + string + ' is not a type string.';
3798 return eval.apply(window, [string]);