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 (f1(v164) !== v2 ? (function(){
1360 })() : (f16(v163, f22(v164)) !== v2 ? (function(){
1363 return tmp === v2? v2: tmp.car;
1366 return f65(v163, (function(){
1368 return tmp === v2? v2: tmp.cdr;
1377 return f66 = (function(v165){
1378 ((v165)["fname"] = "STRING=");
1380 })((function (v166,v167){
1381 if (arguments.length < 2) throw 'too few arguments';
1382 if (arguments.length > 2) throw 'too many arguments';
1383 return ((v166 == v167)?v3: v2);
1389 var l34 = f3("*NEWLINE*");
1393 return v168 = (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(v169){
1407 ((v169)["fname"] = "CONCAT");
1411 for (var i = arguments.length-1; i>=0; i--)
1412 v170 = {car: arguments[i], cdr: v170};
1413 return f37(f44, v170, "");
1418 var l36 = f3("JOIN");
1422 return f68 = (function(v171){
1423 ((v171)["fname"] = "JOIN");
1425 })((function (v172,v173){
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(v172) !== 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 })(), v173, f68((function(){
1449 return tmp === v2? v2: tmp.cdr;
1456 var l37 = f3("JOIN-TRAILING");
1460 return f69 = (function(v174){
1461 ((v174)["fname"] = "JOIN-TRAILING");
1463 })((function (v175,v176){
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(v175) !== v2 ? "" : f67((function(){
1473 return tmp === v2? v2: tmp.car;
1474 })(), v176, f69((function(){
1476 return tmp === v2? v2: tmp.cdr;
1482 var l38 = f3("INDENT");
1486 return f70 = (function(v177){
1487 ((v177)["fname"] = "INDENT");
1491 for (var i = arguments.length-1; i>=0; i--)
1492 v178 = {car: arguments[i], cdr: v178};
1493 return (function(v179){
1494 return (function(v180,v181,v182){
1495 (f52(v182) !== 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 v180 = f67(v180, ((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(v181);
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(v179, v181, f12(v181))));
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.';
1550 })(f37(f67, v178, ""));
1555 var l39 = f3("INTEGER-TO-STRING");
1559 return f6 = (function(v183){
1560 ((v183)["fname"] = "INTEGER-TO-STRING");
1562 })((function (v184){
1563 if (arguments.length < 1) throw 'too few arguments';
1564 if (arguments.length > 1) throw 'too many arguments';
1565 return (f14(v184) !== v2 ? (function(){
1567 })() : (f53(v184) !== 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(v185){
1580 while(f17(f14(v184)) !== v2){
1581 v185 = ({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 v184 = f15(v184, 10);
1592 return f68(f45((function (v186){
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(v187){
1626 ((v187)["fname"] = "PRINT-TO-STRING");
1628 })((function (v188){
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(v188) !== v2 ? (function(){
1638 })() : (((typeof(v188) == "string")?v3: v2) !== v2 ? (function(){
1639 return f67("\"", f72(v188), "\"");
1640 })() : (((typeof v188 == 'function')?v3: v2) !== v2 ? (function(){
1641 return (function(v189){
1642 return (v189 !== v2 ? f67("#<FUNCTION ", v189, ">") : f67("#<FUNCTION>"));
1644 var tmp = (v188)["fname"];
1645 return tmp == undefined? v2: tmp ;
1647 })() : (f36(v188) !== v2 ? (function(){
1648 return f67("(", f69(f45(f71, f56(v188)), " "), (function(v190){
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(v188)), ")");
1670 return f73 = (function(v191){
1671 ((v191)["fname"] = "WRITE-LINE");
1673 })((function (v192){
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(v193){
1696 ((v193)["fname"] = "PRINT");
1698 })((function (v194){
1699 if (arguments.length < 1) throw 'too few arguments';
1700 if (arguments.length > 1) throw 'too many arguments';
1701 return f73(f71(v194));
1707 var l43 = f3("MAKE-STRING-STREAM");
1711 return f75 = (function(v195){
1712 ((v195)["fname"] = "MAKE-STRING-STREAM");
1714 })((function (v196){
1715 if (arguments.length < 1) throw 'too few arguments';
1716 if (arguments.length > 1) throw 'too many arguments';
1717 return ({car: v196, cdr: 0});
1722 var l44 = f3("%PEEK-CHAR");
1726 return f76 = (function(v197){
1727 ((v197)["fname"] = "%PEEK-CHAR");
1729 })((function (v198){
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(v199){
1770 ((v199)["fname"] = "%READ-CHAR");
1772 })((function (v200){
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(v201){
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(v202){
1824 ((v202)["fname"] = "WHITESPACEP");
1826 })((function (v203){
1827 if (arguments.length < 1) throw 'too few arguments';
1828 if (arguments.length > 1) throw 'too many arguments';
1829 return (function(v204){
1830 return (v204 !== v2 ? v204 : (function(v205){
1831 return (v205 !== v2 ? v205 : f50(v203, 9));
1838 var l47 = f3("SKIP-WHITESPACES");
1842 return f79 = (function(v206){
1843 ((v206)["fname"] = "SKIP-WHITESPACES");
1845 })((function (v207){
1846 if (arguments.length < 1) throw 'too few arguments';
1847 if (arguments.length > 1) throw 'too many arguments';
1848 return (function(v208){
1851 while((v208 !== v2 ? f78(v208) : v2) !== v2){
1860 var l48 = f3("TERMINALP");
1864 return f80 = (function(v209){
1865 ((v209)["fname"] = "TERMINALP");
1867 })((function (v210){
1868 if (arguments.length < 1) throw 'too few arguments';
1869 if (arguments.length > 1) throw 'too many arguments';
1870 return (function(v211){
1871 return (v211 !== v2 ? v211 : (function(v212){
1872 return (v212 !== v2 ? v212 : (function(v213){
1873 return (v213 !== v2 ? v213 : f50(40, v210));
1881 var l49 = f3("READ-UNTIL");
1885 return f81 = (function(v214){
1886 ((v214)["fname"] = "READ-UNTIL");
1888 })((function (v215,v216){
1889 if (arguments.length < 2) throw 'too few arguments';
1890 if (arguments.length > 2) throw 'too many arguments';
1891 return (function(v217,v218){
1894 while((v218 !== v2 ? f17((v216)(v218)) : v2) !== v2){
1895 v217 = f67(v217, (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(v219){
1915 ((v219)["fname"] = "SKIP-WHITESPACES-AND-COMMENTS");
1917 })((function (v220){
1918 if (arguments.length < 1) throw 'too few arguments';
1919 if (arguments.length > 1) throw 'too many arguments';
1920 return (function(v221){
1924 while((v221 !== v2 ? f50(v221, 59) : v2) !== v2){
1925 f81(v220, (function (v222){
1926 if (arguments.length < 1) throw 'too few arguments';
1927 if (arguments.length > 1) throw 'too many arguments';
1928 return f50(v222, 10);
1938 var l51 = f3("%READ-LIST");
1942 return f83 = (function(v223){
1943 ((v223)["fname"] = "%READ-LIST");
1945 })((function (v224){
1946 if (arguments.length < 1) throw 'too few arguments';
1947 if (arguments.length > 1) throw 'too many arguments';
1949 return (function(v225){
1950 return (f1(v225) !== v2 ? (function(){
1951 return (function (){ throw "Unspected EOF"; })();
1952 })() : (f50(v225, 41) !== v2 ? (function(){
1955 })() : (f50(v225, 46) !== v2 ? (function(){
1957 return (function(v226){
1959 (f50(f77(v224), 41) !== v2 ? v2 : (function(){
1960 return (function (){ throw "')' was expected."; })();
1965 return ({car: f84(v224), cdr: f83(v224)});
1972 var l52 = f3("READ-STRING");
1976 return f85 = (function(v227){
1977 ((v227)["fname"] = "READ-STRING");
1979 })((function (v228){
1980 if (arguments.length < 1) throw 'too few arguments';
1981 if (arguments.length > 1) throw 'too many arguments';
1982 return (function(v229,v230){
1985 while(f17(f16(v230, 34)) !== v2){
1986 (f1(v230) !== v2 ? (function(){
1987 return (function (){ throw "Unexpected EOF"; })();
1989 (f16(v230, 92) !== v2 ? (function(){
1990 return v230 = f77(v228);
1992 v229 = f67(v229, (function(){
1994 if (typeof x != 'number')
1995 throw 'The value ' + x + ' is not a type number.';
1996 return String.fromCharCode(x);
2006 var l54 = f3("READ-SHARP");
2007 var l53 = f3("FUNCTION");
2011 return f86 = (function(v231){
2012 ((v231)["fname"] = "READ-SHARP");
2014 })((function (v232){
2015 if (arguments.length < 1) throw 'too few arguments';
2016 if (arguments.length > 1) throw 'too many arguments';
2018 return (function(v233){
2019 return (f16(v233, 39) !== v2 ? (function(){
2020 return f33(l53, f84(v232));
2021 })() : (f16(v233, 92) !== v2 ? (function(){
2022 return (function(v234){
2023 return (f66(v234, "space") !== v2 ? (function(){
2025 })() : (f66(v234, "tab") !== v2 ? (function(){
2027 })() : (f66(v234, "newline") !== v2 ? (function(){
2030 return f49((function(){
2033 if (typeof string != 'string')
2034 throw 'The value ' + string + ' is not a type string.';
2035 if (typeof index != 'number')
2036 throw 'The value ' + index + ' is not a type number.';
2037 return string.charCodeAt(index);
2042 if (typeof x != 'number')
2043 throw 'The value ' + x + ' is not a type number.';
2044 return String.fromCharCode(x);
2045 })(), f81(v232, f80)));
2046 })() : (f16(v233, 43) !== v2 ? (function(){
2047 return (function(v235){
2048 return (f66(v235, "common-lisp") !== v2 ? (function(){
2051 })() : (f66(v235, "ecmalisp") !== v2 ? (function(){
2054 return (function (){ throw "Unknown reader form."; })();
2058 return (function (){ throw "ECASE expression failed."; })();
2065 var l55 = f3("*EOF*");
2069 return v236 = (function(){
2071 if (typeof name != 'string')
2072 throw 'The value ' + name + ' is not a type string.';
2073 return ({name: name});
2078 var l60 = f3("LS-READ");
2079 var l59 = f3("UNQUOTE");
2080 var l58 = f3("UNQUOTE-SPLICING");
2081 var l57 = f3("BACKQUOTE");
2082 var l56 = f3("QUOTE");
2086 return f84 = (function(v237){
2087 ((v237)["fname"] = "LS-READ");
2089 })((function (v238){
2090 if (arguments.length < 1) throw 'too few arguments';
2091 if (arguments.length > 1) throw 'too many arguments';
2093 return (function(v239){
2094 return (f1(v239) !== v2 ? (function(){
2096 })() : (f50(v239, 40) !== v2 ? (function(){
2099 })() : (f50(v239, 39) !== v2 ? (function(){
2101 return f33(l56, f84(v238));
2102 })() : (f50(v239, 96) !== v2 ? (function(){
2104 return f33(l57, f84(v238));
2105 })() : (f50(v239, 34) !== v2 ? (function(){
2108 })() : (f50(v239, 44) !== v2 ? (function(){
2110 return (f16(f76(v238), 64) !== v2 ? (function(){
2112 return f33(l58, f84(v238));
2113 })() : f33(l59, f84(v238)));
2114 })() : (f50(v239, 35) !== v2 ? (function(){
2117 return (function(v240){
2118 return (f64(f61, v240) !== v2 ? f63(v240) : f3((function(){
2120 if (typeof x != 'string')
2121 throw 'The value ' + x + ' is not a type string.';
2122 return x.toUpperCase();
2131 var l61 = f3("LS-READ-FROM-STRING");
2135 return f87 = (function(v241){
2136 ((v241)["fname"] = "LS-READ-FROM-STRING");
2138 })((function (v242){
2139 if (arguments.length < 1) throw 'too few arguments';
2140 if (arguments.length > 1) throw 'too many arguments';
2141 return f84(f75(v242));
2146 var l63 = f3("*COMPILATION-UNIT-CHECKS*");
2147 var l62 = f3("NIL");
2155 var l65 = f3("*ENV*");
2156 var l64 = f3("NIL");
2164 var l67 = f3("*FENV*");
2165 var l66 = f3("NIL");
2173 var l68 = f3("MAKE-BINDING");
2177 return f88 = (function(v246){
2178 ((v246)["fname"] = "MAKE-BINDING");
2180 })((function (v247,v248,v249,v250){
2181 if (arguments.length < 4) throw 'too few arguments';
2182 if (arguments.length > 4) throw 'too many arguments';
2183 return f33(v247, v248, v249, v250);
2188 var l69 = f3("BINDING-NAME");
2192 return f89 = (function(v251){
2193 ((v251)["fname"] = "BINDING-NAME");
2195 })((function (v252){
2196 if (arguments.length < 1) throw 'too few arguments';
2197 if (arguments.length > 1) throw 'too many arguments';
2203 var l70 = f3("BINDING-TYPE");
2207 return f90 = (function(v253){
2208 ((v253)["fname"] = "BINDING-TYPE");
2210 })((function (v254){
2211 if (arguments.length < 1) throw 'too few arguments';
2212 if (arguments.length > 1) throw 'too many arguments';
2218 var l71 = f3("BINDING-TRANSLATION");
2222 return f91 = (function(v255){
2223 ((v255)["fname"] = "BINDING-TRANSLATION");
2225 })((function (v256){
2226 if (arguments.length < 1) throw 'too few arguments';
2227 if (arguments.length > 1) throw 'too many arguments';
2233 var l72 = f3("BINDING-DECLARED");
2237 return f92 = (function(v257){
2238 ((v257)["fname"] = "BINDING-DECLARED");
2240 })((function (v258){
2241 if (arguments.length < 1) throw 'too few arguments';
2242 if (arguments.length > 1) throw 'too many arguments';
2243 return (v258 !== v2 ? f32(v258) : v2);
2248 var l73 = f3("MARK-BINDING-AS-DECLARED");
2252 return f93 = (function(v259){
2253 ((v259)["fname"] = "MARK-BINDING-AS-DECLARED");
2255 })((function (v260){
2256 if (arguments.length < 1) throw 'too few arguments';
2257 if (arguments.length > 1) throw 'too many arguments';
2260 if (typeof x != 'object')
2261 throw 'The value ' + x + ' is not a type object.';
2262 return (x.car = v3);
2268 var l74 = f3("*VARIABLE-COUNTER*");
2276 var l75 = f3("GVARNAME");
2280 return f94 = (function(v262){
2281 ((v262)["fname"] = "GVARNAME");
2283 })((function (v263){
2284 if (arguments.length < 1) throw 'too few arguments';
2285 if (arguments.length > 1) throw 'too many arguments';
2286 return f67("v", f6(v261 = (function(){
2289 if (typeof x != 'number')
2290 throw 'The value ' + x + ' is not a type number.';
2291 if (typeof y != 'number')
2292 throw 'The value ' + y + ' is not a type number.';
2299 var l77 = f3("LOOKUP-VARIABLE");
2300 var l76 = f3("VARIABLE");
2304 return f95 = (function(v264){
2305 ((v264)["fname"] = "LOOKUP-VARIABLE");
2307 })((function (v265,v266){
2308 if (arguments.length < 2) throw 'too few arguments';
2309 if (arguments.length > 2) throw 'too many arguments';
2310 return (function(v267){
2311 return (v267 !== v2 ? v267 : (function(v268){
2312 return (v268 !== v2 ? v268 : (function(v269,v270){
2313 v244 = ({car: v270, cdr: v244});
2314 v243 = ({car: (function (){
2315 if (arguments.length > 0) throw 'too many arguments';
2316 return (f92(f65(v265, v244)) !== v2 ? v2 : (function(){
2317 return (function (){ throw f67("Undefined variable `", v269, "'"); })();
2321 })((v265).name,f88(v265, l76, f94(v265), v2)));
2322 })(f65(v265, v244)));
2323 })(f65(v265, v266));
2328 var l78 = f3("LOOKUP-VARIABLE-TRANSLATION");
2332 return f96 = (function(v271){
2333 ((v271)["fname"] = "LOOKUP-VARIABLE-TRANSLATION");
2335 })((function (v272,v273){
2336 if (arguments.length < 2) throw 'too few arguments';
2337 if (arguments.length > 2) throw 'too many arguments';
2338 return f91(f95(v272, v273));
2343 var l80 = f3("EXTEND-LOCAL-ENV");
2344 var l79 = f3("VARIABLE");
2348 return f97 = (function(v274){
2349 ((v274)["fname"] = "EXTEND-LOCAL-ENV");
2351 })((function (v275,v276){
2352 if (arguments.length < 2) throw 'too few arguments';
2353 if (arguments.length > 2) throw 'too many arguments';
2354 return f39(f45((function (v277){
2355 if (arguments.length < 1) throw 'too few arguments';
2356 if (arguments.length > 1) throw 'too many arguments';
2357 return f88(v277, l79, f94(v277), v3);
2363 var l81 = f3("*FUNCTION-COUNTER*");
2371 var l83 = f3("LOOKUP-FUNCTION");
2372 var l82 = f3("FUNCTION");
2376 return f98 = (function(v279){
2377 ((v279)["fname"] = "LOOKUP-FUNCTION");
2379 })((function (v280,v281){
2380 if (arguments.length < 2) throw 'too few arguments';
2381 if (arguments.length > 2) throw 'too many arguments';
2382 return (function(v282){
2383 return (v282 !== v2 ? v282 : (function(v283){
2384 return (v283 !== v2 ? v283 : (function(v284,v285){
2385 v245 = ({car: v285, cdr: v245});
2386 v243 = ({car: (function (){
2387 if (arguments.length > 0) throw 'too many arguments';
2388 return (f92(f65(v280, v245)) !== v2 ? v2 : (function(){
2389 return (function (){ throw f67("Undefined function `", v284, "'"); })();
2393 })((v280).name,f88(v280, l82, f67("f", f6(v278 = (function(){
2396 if (typeof x != 'number')
2397 throw 'The value ' + x + ' is not a type number.';
2398 if (typeof y != 'number')
2399 throw 'The value ' + y + ' is not a type number.';
2402 })(f65(v280, v245)));
2403 })(f65(v280, v281));
2408 var l84 = f3("LOOKUP-FUNCTION-TRANSLATION");
2412 return f99 = (function(v286){
2413 ((v286)["fname"] = "LOOKUP-FUNCTION-TRANSLATION");
2415 })((function (v287,v288){
2416 if (arguments.length < 2) throw 'too few arguments';
2417 if (arguments.length > 2) throw 'too many arguments';
2418 return f91(f98(v287, v288));
2423 var l85 = f3("*TOPLEVEL-COMPILATIONS*");
2431 var l86 = f3("%COMPILE-DEFVAR");
2435 return f100 = (function(v290){
2436 ((v290)["fname"] = "%COMPILE-DEFVAR");
2438 })((function (v291){
2439 if (arguments.length < 1) throw 'too few arguments';
2440 if (arguments.length > 1) throw 'too many arguments';
2441 return (function(v292){
2443 return v289 = ({car: f67("var ", f91(v292)), cdr: v289});
2444 })(f95(v291, v244));
2449 var l87 = f3("%COMPILE-DEFUN");
2453 return f101 = (function(v293){
2454 ((v293)["fname"] = "%COMPILE-DEFUN");
2456 })((function (v294){
2457 if (arguments.length < 1) throw 'too few arguments';
2458 if (arguments.length > 1) throw 'too many arguments';
2459 return (function(v295){
2461 return v289 = ({car: f67("var ", f91(v295)), cdr: v289});
2462 })(f98(v294, v245));
2467 var l89 = f3("%COMPILE-DEFMACRO");
2468 var l88 = f3("MACRO");
2472 return f102 = (function(v296){
2473 ((v296)["fname"] = "%COMPILE-DEFMACRO");
2475 })((function (v297,v298){
2476 if (arguments.length < 2) throw 'too few arguments';
2477 if (arguments.length > 2) throw 'too many arguments';
2478 return v245 = ({car: f88(v297, l88, v298, v3), cdr: v245});
2483 var l90 = f3("*COMPILATIONS*");
2491 var l91 = f3("LS-COMPILE-BLOCK");
2495 return f103 = (function(v300){
2496 ((v300)["fname"] = "LS-COMPILE-BLOCK");
2498 })((function (v301,v302,v303){
2499 if (arguments.length < 3) throw 'too few arguments';
2500 if (arguments.length > 3) throw 'too many arguments';
2501 return f69(f59((function (v304){
2502 if (arguments.length < 1) throw 'too few arguments';
2503 if (arguments.length > 1) throw 'too many arguments';
2504 return (function(v305){
2505 return (v305 !== v2 ? v305 : (((typeof(v304) == "string")?v3: v2) !== v2 ? f14(f43(v304)) : v2));
2507 }), f45((function (v306){
2508 if (arguments.length < 1) throw 'too few arguments';
2509 if (arguments.length > 1) throw 'too many arguments';
2510 return f104(v306, v302, v303);
2511 }), v301)), f67(";", v168));
2517 v299 = ({car: f33(l92, (function (v307,v308,v309,v310,v311){
2518 if (arguments.length < 5) throw 'too few arguments';
2519 if (arguments.length > 5) throw 'too many arguments';
2520 return f67("(", f104(v309, v307, v308), " !== ", f104(v2, v2, v2), " ? ", f104(v310, v307, v308), " : ", f104(v311, v307, v308), ")");
2522 var l94 = f3("*LAMBDA-LIST-KEYWORDS*");
2523 var l93 = {car: f3("&OPTIONAL"), cdr: {car: f3("&REST"), cdr: f3("NIL")}};
2531 var l95 = f3("LIST-UNTIL-KEYWORD");
2535 return f105 = (function(v313){
2536 ((v313)["fname"] = "LIST-UNTIL-KEYWORD");
2538 })((function (v314){
2539 if (arguments.length < 1) throw 'too few arguments';
2540 if (arguments.length > 1) throw 'too many arguments';
2541 return ((function(v315){
2542 return (v315 !== v2 ? v315 : f57((function(){
2544 return tmp === v2? v2: tmp.car;
2546 })(f1(v314)) !== v2 ? v2 : ({car: (function(){
2548 return tmp === v2? v2: tmp.car;
2549 })(), cdr: f105((function(){
2551 return tmp === v2? v2: tmp.cdr;
2557 var l96 = f3("LAMBDA-LIST-REQUIRED-ARGUMENTS");
2561 return f106 = (function(v316){
2562 ((v316)["fname"] = "LAMBDA-LIST-REQUIRED-ARGUMENTS");
2564 })((function (v317){
2565 if (arguments.length < 1) throw 'too few arguments';
2566 if (arguments.length > 1) throw 'too many arguments';
2572 var l98 = f3("LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT");
2573 var l97 = f3("&OPTIONAL");
2577 return f107 = (function(v318){
2578 ((v318)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT");
2580 })((function (v319){
2581 if (arguments.length < 1) throw 'too few arguments';
2582 if (arguments.length > 1) throw 'too many arguments';
2583 return f45(f35, f105((function(){
2584 var tmp = f57(l97, v319);
2585 return tmp === v2? v2: tmp.cdr;
2591 var l99 = f3("LAMBDA-LIST-OPTIONAL-ARGUMENTS");
2595 return f108 = (function(v320){
2596 ((v320)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS");
2598 })((function (v321){
2599 if (arguments.length < 1) throw 'too few arguments';
2600 if (arguments.length > 1) throw 'too many arguments';
2601 return f45(f20, f107(v321));
2606 var l101 = f3("LAMBDA-LIST-REST-ARGUMENT");
2607 var l100 = f3("&REST");
2611 return f109 = (function(v322){
2612 ((v322)["fname"] = "LAMBDA-LIST-REST-ARGUMENT");
2614 })((function (v323){
2615 if (arguments.length < 1) throw 'too few arguments';
2616 if (arguments.length > 1) throw 'too many arguments';
2617 return (function(v324){
2620 return tmp === v2? v2: tmp.cdr;
2621 })() !== v2 ? (function(){
2622 return (function (){ throw "Bad lambda-list"; })();
2626 return tmp === v2? v2: tmp.car;
2628 })(f105((function(){
2629 var tmp = f57(l100, v323);
2630 return tmp === v2? v2: tmp.cdr;
2636 var l102 = f3("LAMBDA");
2637 v299 = ({car: f33(l102, (function (v326,v327,v328){
2638 if (arguments.length < 3) throw 'too few arguments';
2640 for (var i = arguments.length-1; i>=3; i--)
2641 v325 = {car: arguments[i], cdr: v325};
2642 return (function(v329,v330,v331){
2643 return (function(v332,v333,v334){
2644 return f67("(function (", f68(f45((function (v335){
2645 if (arguments.length < 1) throw 'too few arguments';
2646 if (arguments.length > 1) throw 'too many arguments';
2647 return f96(v335, v334);
2648 }), f39(v329, v330)), ","), "){", v168, f70((v329 !== v2 ? f67("if (arguments.length < ", f6(v332), ") throw 'too few arguments';", v168) : ""), (f17(v331) !== v2 ? f67("if (arguments.length > ", f6((function(){
2651 if (typeof x != 'number')
2652 throw 'The value ' + x + ' is not a type number.';
2653 if (typeof y != 'number')
2654 throw 'The value ' + y + ' is not a type number.';
2656 })()), ") throw 'too many arguments';", v168) : ""), (v330 !== v2 ? f67("switch(arguments.length){", v168, (function(v336,v337,v338){
2662 if (typeof x != 'number')
2663 throw 'The value ' + x + ' is not a type number.';
2664 if (typeof y != 'number')
2665 throw 'The value ' + y + ' is not a type number.';
2667 })()?v3: v2) !== v2){
2669 v337 = ({car: f67("case ", f6((function(){
2672 if (typeof x != 'number')
2673 throw 'The value ' + x + ' is not a type number.';
2674 if (typeof y != 'number')
2675 throw 'The value ' + y + ' is not a type number.';
2677 })()), ":", v168, f96((function(){
2679 return tmp === v2? v2: tmp.car;
2680 })(), v334), "=", f104(f23(v339), v334, v327), ";", v168), cdr: v337});
2681 return v338 = (function(){
2684 if (typeof x != 'number')
2685 throw 'The value ' + x + ' is not a type number.';
2686 if (typeof y != 'number')
2687 throw 'The value ' + y + ' is not a type number.';
2690 })(f54(v338, v336));
2692 v337 = ({car: f67("default: break;", v168), cdr: v337});
2693 return f68(f41(v337));
2695 })(f107(v328),v2,0), "}", v168) : ""), (v331 !== v2 ? (function(v340){
2696 return f67("var ", v340, "= ", f104(v2, v326, v327), ";", v168, "for (var i = arguments.length-1; i>=", f6((function(){
2699 if (typeof x != 'number')
2700 throw 'The value ' + x + ' is not a type number.';
2701 if (typeof y != 'number')
2702 throw 'The value ' + y + ' is not a type number.';
2704 })()), "; i--)", v168, f70(v340, " = ", "{car: arguments[i], cdr: "), v340, "};", v168);
2705 })(f96(v331, v334)) : ""), f67(f103(f56(v325), v334, v327), "return ", f104((function(){
2706 var tmp = f55(v325);
2707 return tmp === v2? v2: tmp.car;
2708 })(), v334, v327), ";")), v168, "})");
2709 })(f43(v329),f43(v330),f97(f39(f35(v331), v329, v330), v326));
2710 })(f106(v328),f108(v328),f109(v328));
2712 var l103 = f3("FSETQ");
2713 v299 = ({car: f33(l103, (function (v341,v342,v343,v344){
2714 if (arguments.length < 4) throw 'too few arguments';
2715 if (arguments.length > 4) throw 'too many arguments';
2716 return f67(f99(v343, v342), " = ", f104(v344, v341, v342));
2718 var l104 = f3("SETQ");
2719 v299 = ({car: f33(l104, (function (v345,v346,v347,v348){
2720 if (arguments.length < 4) throw 'too few arguments';
2721 if (arguments.length > 4) throw 'too many arguments';
2722 return f67(f96(v347, v345), " = ", f104(v348, v345, v346));
2724 var l105 = f3("ESCAPE-STRING");
2728 return f72 = (function(v349){
2729 ((v349)["fname"] = "ESCAPE-STRING");
2731 })((function (v350){
2732 if (arguments.length < 1) throw 'too few arguments';
2733 if (arguments.length > 1) throw 'too many arguments';
2734 return (function(v351,v352,v353){
2739 if (typeof x != 'number')
2740 throw 'The value ' + x + ' is not a type number.';
2741 if (typeof y != 'number')
2742 throw 'The value ' + y + ' is not a type number.';
2744 })()?v3: v2) !== v2){
2747 return (v355 !== v2 ? v355 : f50(v354, 92));
2748 })(f50(v354, 34)) !== v2 ? (function(){
2749 return v351 = f67(v351, "\\");
2751 (f50(v354, 10) !== v2 ? (function(){
2752 v351 = f67(v351, "\\");
2755 return v351 = f67(v351, (function(){
2757 if (typeof x != 'number')
2758 throw 'The value ' + x + ' is not a type number.';
2759 return String.fromCharCode(x);
2764 if (typeof string != 'string')
2765 throw 'The value ' + string + ' is not a type string.';
2766 if (typeof index != 'number')
2767 throw 'The value ' + index + ' is not a type number.';
2768 return string.charCodeAt(index);
2773 if (typeof x != 'number')
2774 throw 'The value ' + x + ' is not a type number.';
2775 if (typeof y != 'number')
2776 throw 'The value ' + y + ' is not a type number.';
2786 var l107 = f3("LITERAL->JS");
2787 var l106 = f3("INTERN");
2791 return f110 = (function(v356){
2792 ((v356)["fname"] = "LITERAL->JS");
2794 })((function (v357){
2795 if (arguments.length < 1) throw 'too few arguments';
2796 if (arguments.length > 1) throw 'too many arguments';
2797 return (f51(v357) !== v2 ? (function(){
2799 })() : (((typeof(v357) == "string")?v3: v2) !== v2 ? (function(){
2800 return f67("\"", f72(v357), "\"");
2801 })() : (((function(){
2803 return (typeof tmp == 'object' && 'name' in tmp);
2804 })()?v3: v2) !== v2 ? (function(){
2805 return f104(f39(f33(l106), f33(f72((v357).name))), v244, v245);
2806 })() : (((function(){
2808 return (typeof tmp == 'object' && 'car' in tmp);
2809 })()?v3: v2) !== v2 ? (function(){
2810 return f67("{car: ", f110((function(){
2812 return tmp === v2? v2: tmp.car;
2813 })()), ", cdr: ", f110((function(){
2815 return tmp === v2? v2: tmp.cdr;
2822 var l108 = f3("*LITERAL-COUNTER*");
2830 var l109 = f3("LITERAL");
2834 return f111 = (function(v359){
2835 ((v359)["fname"] = "LITERAL");
2837 })((function (v360){
2838 if (arguments.length < 1) throw 'too few arguments';
2839 if (arguments.length > 1) throw 'too many arguments';
2840 return (function(v361){
2841 v289 = ({car: f67("var ", v361, " = ", f110(v360)), cdr: v289});
2843 })(f67("l", f6(v358 = (function(){
2846 if (typeof x != 'number')
2847 throw 'The value ' + x + ' is not a type number.';
2848 if (typeof y != 'number')
2849 throw 'The value ' + y + ' is not a type number.';
2856 var l110 = f3("QUOTE");
2857 v299 = ({car: f33(l110, (function (v362,v363,v364){
2858 if (arguments.length < 3) throw 'too few arguments';
2859 if (arguments.length > 3) throw 'too many arguments';
2862 var l111 = f3("WHILE");
2863 v299 = ({car: f33(l111, (function (v366,v367,v368){
2864 if (arguments.length < 3) throw 'too few arguments';
2866 for (var i = arguments.length-1; i>=3; i--)
2867 v365 = {car: arguments[i], cdr: v365};
2868 return f67("(function(){", v168, f70("while(", f104(v368, v366, v367), " !== ", f104(v2, v2, v2), "){", v168, f70(f103(v365, v366, v367))), "}})()");
2870 var l113 = f3("LAMBDA");
2871 var l112 = f3("FUNCTION");
2872 v299 = ({car: f33(l112, (function (v369,v370,v371){
2873 if (arguments.length < 3) throw 'too few arguments';
2874 if (arguments.length > 3) throw 'too many arguments';
2875 return ((f36(v371) !== v2 ? (((function(){
2877 return tmp === v2? v2: tmp.car;
2878 })() === l113)?v3: v2) : v2) !== v2 ? (function(){
2879 return f104(v371, v369, v370);
2880 })() : (((function(){
2882 return (typeof tmp == 'object' && 'name' in tmp);
2883 })()?v3: v2) !== v2 ? (function(){
2884 return f99(v371, v370);
2887 var l115 = f3("PROGN");
2888 var l114 = f3("EVAL-WHEN-COMPILE");
2889 v299 = ({car: f33(l114, (function (v373,v374){
2890 if (arguments.length < 2) throw 'too few arguments';
2892 for (var i = arguments.length-1; i>=2; i--)
2893 v372 = {car: arguments[i], cdr: v372};
2894 f112(({car: l115, cdr: v372}));
2897 var l116 = f3("PROGN");
2898 v299 = ({car: f33(l116, (function (v376,v377){
2899 if (arguments.length < 2) throw 'too few arguments';
2901 for (var i = arguments.length-1; i>=2; i--)
2902 v375 = {car: arguments[i], cdr: v375};
2903 return f67("(function(){", v168, f70(f103(f56(v375), v376, v377), "return ", f104((function(){
2904 var tmp = f55(v375);
2905 return tmp === v2? v2: tmp.car;
2906 })(), v376, v377), ";", v168), "})()");
2908 var l117 = f3("LET");
2909 v299 = ({car: f33(l117, (function (v379,v380,v381){
2910 if (arguments.length < 3) throw 'too few arguments';
2912 for (var i = arguments.length-1; i>=3; i--)
2913 v378 = {car: arguments[i], cdr: v378};
2914 return (function(v382){
2915 return (function(v383,v384){
2916 return (function(v385){
2917 return f67("(function(", f68(f45((function (v386){
2918 if (arguments.length < 1) throw 'too few arguments';
2919 if (arguments.length > 1) throw 'too many arguments';
2920 return f96(v386, v385);
2921 }), v383), ","), "){", v168, f70(f103(f56(v378), v385, v380), "return ", f104((function(){
2922 var tmp = f55(v378);
2923 return tmp === v2? v2: tmp.car;
2924 })(), v385, v380), ";", v168), "})(", f68(f45((function (v387){
2925 if (arguments.length < 1) throw 'too few arguments';
2926 if (arguments.length > 1) throw 'too many arguments';
2927 return f104(v387, v379, v380);
2928 }), v384), ","), ")");
2929 })(f97(v383, v379));
2930 })(f45(f29, v382),f45(f30, v382));
2933 var l126 = f3("BACKQUOTE-EXPAND-1");
2934 var l125 = f3("LIST");
2935 var l124 = f3("UNQUOTE-SPLICING");
2936 var l123 = f3("LIST");
2937 var l122 = f3("UNQUOTE");
2938 var l121 = f3("APPEND");
2939 var l120 = f3("BACKQUOTE");
2940 var l119 = f3("UNQUOTE");
2941 var l118 = f3("QUOTE");
2945 return f113 = (function(v388){
2946 ((v388)["fname"] = "BACKQUOTE-EXPAND-1");
2948 })((function (v389){
2949 if (arguments.length < 1) throw 'too few arguments';
2950 if (arguments.length > 1) throw 'too many arguments';
2951 return (((function(){
2953 return (typeof tmp == 'object' && 'name' in tmp);
2954 })()?v3: v2) !== v2 ? (function(){
2955 return f33(l118, v389);
2956 })() : (f34(v389) !== v2 ? (function(){
2958 })() : ((((function(){
2960 return tmp === v2? v2: tmp.car;
2961 })() === l119)?v3: v2) !== v2 ? (function(){
2964 return tmp === v2? v2: tmp.car;
2966 })() : ((((function(){
2968 return tmp === v2? v2: tmp.car;
2969 })() === l120)?v3: v2) !== v2 ? (function(){
2970 return f113(f113(f23(v389)));
2972 return ({car: l121, cdr: f45((function (v390){
2973 if (arguments.length < 1) throw 'too few arguments';
2974 if (arguments.length > 1) throw 'too many arguments';
2975 return ((f36(v390) !== v2 ? (((function(){
2977 return tmp === v2? v2: tmp.car;
2978 })() === l122)?v3: v2) : v2) !== v2 ? (function(){
2979 return f33(l123, f23(v390));
2980 })() : ((f36(v390) !== v2 ? (((function(){
2982 return tmp === v2? v2: tmp.car;
2983 })() === l124)?v3: v2) : v2) !== v2 ? (function(){
2986 return f33(l125, f113(v390));
2994 var l128 = f3("BACKQUOTE-EXPAND");
2995 var l127 = f3("BACKQUOTE");
2999 return f114 = (function(v391){
3000 ((v391)["fname"] = "BACKQUOTE-EXPAND");
3002 })((function (v392){
3003 if (arguments.length < 1) throw 'too few arguments';
3004 if (arguments.length > 1) throw 'too many arguments';
3005 return ((f36(v392) !== v2 ? (((function(){
3007 return tmp === v2? v2: tmp.car;
3008 })() === l127)?v3: v2) : v2) !== v2 ? f113(f23(v392)) : v392);
3013 var l129 = f3("BACKQUOTE");
3014 v299 = ({car: f33(l129, (function (v393,v394,v395){
3015 if (arguments.length < 3) throw 'too few arguments';
3016 if (arguments.length > 3) throw 'too many arguments';
3017 return f104(f113(v395), v393, v394);
3019 var l130 = f3("COMPILE-BOOL");
3023 return f115 = (function(v396){
3024 ((v396)["fname"] = "COMPILE-BOOL");
3026 })((function (v397){
3027 if (arguments.length < 1) throw 'too few arguments';
3028 if (arguments.length > 1) throw 'too many arguments';
3029 return f67("(", v397, "?", f104(v3, v2, v2), ": ", f104(v2, v2, v2), ")");
3034 var l131 = f3("NUM-OP-NUM");
3038 return f116 = (function(v398){
3039 ((v398)["fname"] = "NUM-OP-NUM");
3041 })((function (v399,v400,v401){
3042 if (arguments.length < 3) throw 'too few arguments';
3043 if (arguments.length > 3) throw 'too many arguments';
3044 return f67("(function(){", v168, f70(f67("var ", "x", " = ", v399, ";", v168), f67("var ", "y", " = ", v401, ";", v168), f67("if (typeof ", "x", " != '", "number", "')", v168, f70("throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", v168)), f67("if (typeof ", "y", " != '", "number", "')", v168, f70("throw 'The value ' + ", "y", " + ' is not a type ", "number", ".';", v168)), f67("return ", (function(){
3045 return f67("x", v400, "y");
3046 })(), ";", v168)), "})()");
3052 v299 = ({car: f33(l132, (function (v402,v403,v404,v405){
3053 if (arguments.length < 4) throw 'too few arguments';
3054 if (arguments.length > 4) throw 'too many arguments';
3055 return (function(v406,v407){
3056 return f116(v406, "+", v407);
3057 })(f104(v404, v402, v403),f104(v405, v402, v403));
3060 v299 = ({car: f33(l133, (function (v408,v409,v410,v411){
3061 if (arguments.length < 4) throw 'too few arguments';
3062 if (arguments.length > 4) throw 'too many arguments';
3063 return (function(v412,v413){
3064 return f116(v412, "-", v413);
3065 })(f104(v410, v408, v409),f104(v411, v408, v409));
3068 v299 = ({car: f33(l134, (function (v414,v415,v416,v417){
3069 if (arguments.length < 4) throw 'too few arguments';
3070 if (arguments.length > 4) throw 'too many arguments';
3071 return (function(v418,v419){
3072 return f116(v418, "*", v419);
3073 })(f104(v416, v414, v415),f104(v417, v414, v415));
3076 v299 = ({car: f33(l135, (function (v420,v421,v422,v423){
3077 if (arguments.length < 4) throw 'too few arguments';
3078 if (arguments.length > 4) throw 'too many arguments';
3079 return (function(v424,v425){
3080 return f116(v424, "/", v425);
3081 })(f104(v422, v420, v421),f104(v423, v420, v421));
3083 var l136 = f3("MOD");
3084 v299 = ({car: f33(l136, (function (v426,v427,v428,v429){
3085 if (arguments.length < 4) throw 'too few arguments';
3086 if (arguments.length > 4) throw 'too many arguments';
3087 return (function(v430,v431){
3088 return f116(v430, "%", v431);
3089 })(f104(v428, v426, v427),f104(v429, v426, v427));
3092 v299 = ({car: f33(l137, (function (v432,v433,v434,v435){
3093 if (arguments.length < 4) throw 'too few arguments';
3094 if (arguments.length > 4) throw 'too many arguments';
3095 return (function(v436,v437){
3096 return f115(f116(v436, "<", v437));
3097 })(f104(v434, v432, v433),f104(v435, v432, v433));
3100 v299 = ({car: f33(l138, (function (v438,v439,v440,v441){
3101 if (arguments.length < 4) throw 'too few arguments';
3102 if (arguments.length > 4) throw 'too many arguments';
3103 return (function(v442,v443){
3104 return f115(f116(v442, ">", v443));
3105 })(f104(v440, v438, v439),f104(v441, v438, v439));
3108 v299 = ({car: f33(l139, (function (v444,v445,v446,v447){
3109 if (arguments.length < 4) throw 'too few arguments';
3110 if (arguments.length > 4) throw 'too many arguments';
3111 return (function(v448,v449){
3112 return f115(f116(v448, "==", v449));
3113 })(f104(v446, v444, v445),f104(v447, v444, v445));
3115 var l140 = f3("<=");
3116 v299 = ({car: f33(l140, (function (v450,v451,v452,v453){
3117 if (arguments.length < 4) throw 'too few arguments';
3118 if (arguments.length > 4) throw 'too many arguments';
3119 return (function(v454,v455){
3120 return f115(f116(v454, "<=", v455));
3121 })(f104(v452, v450, v451),f104(v453, v450, v451));
3123 var l141 = f3(">=");
3124 v299 = ({car: f33(l141, (function (v456,v457,v458,v459){
3125 if (arguments.length < 4) throw 'too few arguments';
3126 if (arguments.length > 4) throw 'too many arguments';
3127 return (function(v460,v461){
3128 return f115(f116(v460, ">=", v461));
3129 })(f104(v458, v456, v457),f104(v459, v456, v457));
3131 var l142 = f3("NUMBERP");
3132 v299 = ({car: f33(l142, (function (v462,v463,v464){
3133 if (arguments.length < 3) throw 'too few arguments';
3134 if (arguments.length > 3) throw 'too many arguments';
3135 return (function(v465){
3136 return f115(f67("(typeof (", v465, ") == \"number\")"));
3137 })(f104(v464, v462, v463));
3139 var l143 = f3("FLOOR");
3140 v299 = ({car: f33(l143, (function (v466,v467,v468){
3141 if (arguments.length < 3) throw 'too few arguments';
3142 if (arguments.length > 3) throw 'too many arguments';
3143 return (function(v469){
3144 return f67("(function(){", v168, f70(f67("var ", "x", " = ", v469, ";", v168), f67("if (typeof ", "x", " != '", "number", "')", v168, f70("throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", v168)), f67("return ", (function(){
3145 return "Math.floor(x)";
3146 })(), ";", v168)), "})()");
3147 })(f104(v468, v466, v467));
3149 var l144 = f3("CONS");
3150 v299 = ({car: f33(l144, (function (v470,v471,v472,v473){
3151 if (arguments.length < 4) throw 'too few arguments';
3152 if (arguments.length > 4) throw 'too many arguments';
3153 return (function(v474,v475){
3154 return f67("({car: ", v474, ", cdr: ", v475, "})");
3155 })(f104(v472, v470, v471),f104(v473, v470, v471));
3157 var l145 = f3("CONSP");
3158 v299 = ({car: f33(l145, (function (v476,v477,v478){
3159 if (arguments.length < 3) throw 'too few arguments';
3160 if (arguments.length > 3) throw 'too many arguments';
3161 return (function(v479){
3162 return f115(f67("(function(){", v168, f70("var tmp = ", v479, ";", v168, "return (typeof tmp == 'object' && 'car' in tmp);", v168), "})()"));
3163 })(f104(v478, v476, v477));
3165 var l146 = f3("CAR");
3166 v299 = ({car: f33(l146, (function (v480,v481,v482){
3167 if (arguments.length < 3) throw 'too few arguments';
3168 if (arguments.length > 3) throw 'too many arguments';
3169 return (function(v483){
3170 return f67("(function(){", v168, f70("var tmp = ", v483, ";", v168, "return tmp === ", f104(v2, v2, v2), "? ", f104(v2, v2, v2), ": tmp.car;", v168), "})()");
3171 })(f104(v482, v480, v481));
3173 var l147 = f3("CDR");
3174 v299 = ({car: f33(l147, (function (v484,v485,v486){
3175 if (arguments.length < 3) throw 'too few arguments';
3176 if (arguments.length > 3) throw 'too many arguments';
3177 return (function(v487){
3178 return f67("(function(){", v168, f70("var tmp = ", v487, ";", v168, "return tmp === ", f104(v2, v2, v2), "? ", f104(v2, v2, v2), ": tmp.cdr;", v168), "})()");
3179 })(f104(v486, v484, v485));
3181 var l148 = f3("SETCAR");
3182 v299 = ({car: f33(l148, (function (v488,v489,v490,v491){
3183 if (arguments.length < 4) throw 'too few arguments';
3184 if (arguments.length > 4) throw 'too many arguments';
3185 return (function(v492,v493){
3186 return f67("(function(){", v168, f70(f67("var ", "x", " = ", v492, ";", v168), f67("if (typeof ", "x", " != '", "object", "')", v168, f70("throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", v168)), f67("return ", (function(){
3187 return f67("(x.car = ", v493, ")");
3188 })(), ";", v168)), "})()");
3189 })(f104(v490, v488, v489),f104(v491, v488, v489));
3191 var l149 = f3("SETCDR");
3192 v299 = ({car: f33(l149, (function (v494,v495,v496,v497){
3193 if (arguments.length < 4) throw 'too few arguments';
3194 if (arguments.length > 4) throw 'too many arguments';
3195 return (function(v498,v499){
3196 return f67("(function(){", v168, f70(f67("var ", "x", " = ", v498, ";", v168), f67("if (typeof ", "x", " != '", "object", "')", v168, f70("throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", v168)), f67("return ", (function(){
3197 return f67("(x.cdr = ", v499, ")");
3198 })(), ";", v168)), "})()");
3199 })(f104(v496, v494, v495),f104(v497, v494, v495));
3201 var l150 = f3("SYMBOLP");
3202 v299 = ({car: f33(l150, (function (v500,v501,v502){
3203 if (arguments.length < 3) throw 'too few arguments';
3204 if (arguments.length > 3) throw 'too many arguments';
3205 return (function(v503){
3206 return f115(f67("(function(){", v168, f70("var tmp = ", v503, ";", v168, "return (typeof tmp == 'object' && 'name' in tmp);", v168), "})()"));
3207 })(f104(v502, v500, v501));
3209 var l151 = f3("MAKE-SYMBOL");
3210 v299 = ({car: f33(l151, (function (v504,v505,v506){
3211 if (arguments.length < 3) throw 'too few arguments';
3212 if (arguments.length > 3) throw 'too many arguments';
3213 return (function(v507){
3214 return f67("(function(){", v168, f70(f67("var ", "name", " = ", v507, ";", v168), f67("if (typeof ", "name", " != '", "string", "')", v168, f70("throw 'The value ' + ", "name", " + ' is not a type ", "string", ".';", v168)), f67("return ", (function(){
3215 return "({name: name})";
3216 })(), ";", v168)), "})()");
3217 })(f104(v506, v504, v505));
3219 var l152 = f3("SYMBOL-NAME");
3220 v299 = ({car: f33(l152, (function (v508,v509,v510){
3221 if (arguments.length < 3) throw 'too few arguments';
3222 if (arguments.length > 3) throw 'too many arguments';
3223 return (function(v511){
3224 return f67("(", v511, ").name");
3225 })(f104(v510, v508, v509));
3227 var l153 = f3("EQ");
3228 v299 = ({car: f33(l153, (function (v512,v513,v514,v515){
3229 if (arguments.length < 4) throw 'too few arguments';
3230 if (arguments.length > 4) throw 'too many arguments';
3231 return (function(v516,v517){
3232 return f115(f67("(", v516, " === ", v517, ")"));
3233 })(f104(v514, v512, v513),f104(v515, v512, v513));
3235 var l154 = f3("EQUAL");
3236 v299 = ({car: f33(l154, (function (v518,v519,v520,v521){
3237 if (arguments.length < 4) throw 'too few arguments';
3238 if (arguments.length > 4) throw 'too many arguments';
3239 return (function(v522,v523){
3240 return f115(f67("(", v522, " == ", v523, ")"));
3241 })(f104(v520, v518, v519),f104(v521, v518, v519));
3243 var l155 = f3("STRING");
3244 v299 = ({car: f33(l155, (function (v524,v525,v526){
3245 if (arguments.length < 3) throw 'too few arguments';
3246 if (arguments.length > 3) throw 'too many arguments';
3247 return (function(v527){
3248 return f67("(function(){", v168, f70(f67("var ", "x", " = ", v527, ";", v168), f67("if (typeof ", "x", " != '", "number", "')", v168, f70("throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", v168)), f67("return ", (function(){
3249 return "String.fromCharCode(x)";
3250 })(), ";", v168)), "})()");
3251 })(f104(v526, v524, v525));
3253 var l156 = f3("STRINGP");
3254 v299 = ({car: f33(l156, (function (v528,v529,v530){
3255 if (arguments.length < 3) throw 'too few arguments';
3256 if (arguments.length > 3) throw 'too many arguments';
3257 return (function(v531){
3258 return f115(f67("(typeof(", v531, ") == \"string\")"));
3259 })(f104(v530, v528, v529));
3261 var l157 = f3("STRING-UPCASE");
3262 v299 = ({car: f33(l157, (function (v532,v533,v534){
3263 if (arguments.length < 3) throw 'too few arguments';
3264 if (arguments.length > 3) throw 'too many arguments';
3265 return (function(v535){
3266 return f67("(function(){", v168, f70(f67("var ", "x", " = ", v535, ";", v168), f67("if (typeof ", "x", " != '", "string", "')", v168, f70("throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", v168)), f67("return ", (function(){
3267 return "x.toUpperCase()";
3268 })(), ";", v168)), "})()");
3269 })(f104(v534, v532, v533));
3271 var l158 = f3("STRING-LENGTH");
3272 v299 = ({car: f33(l158, (function (v536,v537,v538){
3273 if (arguments.length < 3) throw 'too few arguments';
3274 if (arguments.length > 3) throw 'too many arguments';
3275 return (function(v539){
3276 return f67("(function(){", v168, f70(f67("var ", "x", " = ", v539, ";", v168), f67("if (typeof ", "x", " != '", "string", "')", v168, f70("throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", v168)), f67("return ", (function(){
3278 })(), ";", v168)), "})()");
3279 })(f104(v538, v536, v537));
3281 var l159 = f3("SLICE");
3282 v299 = ({car: f33(l159, (function (v540,v541,v542,v543,v544){
3283 if (arguments.length < 4) throw 'too few arguments';
3284 if (arguments.length > 5) throw 'too many arguments';
3285 switch(arguments.length){
3290 return f67("(function(){", v168, f70("var str = ", f104(v542, v540, v541), ";", v168, "var a = ", f104(v543, v540, v541), ";", v168, "var b;", v168, (v544 !== v2 ? f67("b = ", f104(v544, v540, v541), ";", v168) : ""), "return str.slice(a,b);", v168), "})()");
3292 var l160 = f3("CHAR");
3293 v299 = ({car: f33(l160, (function (v545,v546,v547,v548){
3294 if (arguments.length < 4) throw 'too few arguments';
3295 if (arguments.length > 4) throw 'too many arguments';
3296 return (function(v549,v550){
3297 return f67("(function(){", v168, f70(f67("var ", "string", " = ", v549, ";", v168), f67("var ", "index", " = ", v550, ";", v168), f67("if (typeof ", "string", " != '", "string", "')", v168, f70("throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", v168)), f67("if (typeof ", "index", " != '", "number", "')", v168, f70("throw 'The value ' + ", "index", " + ' is not a type ", "number", ".';", v168)), f67("return ", (function(){
3298 return "string.charCodeAt(index)";
3299 })(), ";", v168)), "})()");
3300 })(f104(v547, v545, v546),f104(v548, v545, v546));
3302 var l161 = f3("CONCAT-TWO");
3303 v299 = ({car: f33(l161, (function (v551,v552,v553,v554){
3304 if (arguments.length < 4) throw 'too few arguments';
3305 if (arguments.length > 4) throw 'too many arguments';
3306 return (function(v555,v556){
3307 return f67("(function(){", v168, f70(f67("var ", "string1", " = ", v555, ";", v168), f67("var ", "string2", " = ", v556, ";", v168), f67("if (typeof ", "string1", " != '", "string", "')", v168, f70("throw 'The value ' + ", "string1", " + ' is not a type ", "string", ".';", v168)), f67("if (typeof ", "string2", " != '", "string", "')", v168, f70("throw 'The value ' + ", "string2", " + ' is not a type ", "string", ".';", v168)), f67("return ", (function(){
3308 return "string1.concat(string2)";
3309 })(), ";", v168)), "})()");
3310 })(f104(v553, v551, v552),f104(v554, v551, v552));
3312 var l162 = f3("FUNCALL");
3313 v299 = ({car: f33(l162, (function (v558,v559,v560){
3314 if (arguments.length < 3) throw 'too few arguments';
3316 for (var i = arguments.length-1; i>=3; i--)
3317 v557 = {car: arguments[i], cdr: v557};
3318 return f67("(", f104(v560, v558, v559), ")(", f68(f45((function (v561){
3319 if (arguments.length < 1) throw 'too few arguments';
3320 if (arguments.length > 1) throw 'too many arguments';
3321 return f104(v561, v558, v559);
3322 }), v557), ", "), ")");
3324 var l163 = f3("APPLY");
3325 v299 = ({car: f33(l163, (function (v563,v564,v565){
3326 if (arguments.length < 3) throw 'too few arguments';
3328 for (var i = arguments.length-1; i>=3; i--)
3329 v562 = {car: arguments[i], cdr: v562};
3330 return (f1(v562) !== v2 ? f67("(", f104(v565, v563, v564), ")()") : (function(v566,v567){
3331 return f67("(function(){", v168, f70("var f = ", f104(v565, v563, v564), ";", v168, "var args = [", f68(f45((function (v568){
3332 if (arguments.length < 1) throw 'too few arguments';
3333 if (arguments.length > 1) throw 'too many arguments';
3334 return f104(v568, v563, v564);
3335 }), v566), ", "), "];", v168, "var tail = (", f104(v567, v563, v564), ");", v168, f70("while (tail != ", f104(v2, v563, v564), "){", v168, " args.push(tail.car);", v168, " tail = tail.cdr;", v168, "}", v168, "return f.apply(this, args);", v168), "})()"));
3336 })(f56(v562),(function(){
3337 var tmp = f55(v562);
3338 return tmp === v2? v2: tmp.car;
3341 var l164 = f3("JS-EVAL");
3342 v299 = ({car: f33(l164, (function (v569,v570,v571){
3343 if (arguments.length < 3) throw 'too few arguments';
3344 if (arguments.length > 3) throw 'too many arguments';
3345 return (function(v572){
3346 return f67("(function(){", v168, f70(f67("var ", "string", " = ", v572, ";", v168), f67("if (typeof ", "string", " != '", "string", "')", v168, f70("throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", v168)), f67("return ", (function(){
3347 return "eval.apply(window, [string])";
3348 })(), ";", v168)), "})()");
3349 })(f104(v571, v569, v570));
3351 var l165 = f3("ERROR");
3352 v299 = ({car: f33(l165, (function (v573,v574,v575){
3353 if (arguments.length < 3) throw 'too few arguments';
3354 if (arguments.length > 3) throw 'too many arguments';
3355 return (function(v576){
3356 return f67("(function (){ throw ", v576, "; })()");
3357 })(f104(v575, v573, v574));
3359 var l166 = f3("NEW");
3360 v299 = ({car: f33(l166, (function (v577,v578){
3361 if (arguments.length < 2) throw 'too few arguments';
3362 if (arguments.length > 2) throw 'too many arguments';
3367 var l167 = f3("GET");
3368 v299 = ({car: f33(l167, (function (v579,v580,v581,v582){
3369 if (arguments.length < 4) throw 'too few arguments';
3370 if (arguments.length > 4) throw 'too many arguments';
3371 return (function(v583,v584){
3372 return f67("(function(){", v168, f70("var tmp = ", "(", v583, ")[", v584, "];", v168, "return tmp == undefined? ", f104(v2, v2, v2), ": tmp ;", v168), "})()");
3373 })(f104(v581, v579, v580),f104(v582, v579, v580));
3375 var l168 = f3("SET");
3376 v299 = ({car: f33(l168, (function (v585,v586,v587,v588,v589){
3377 if (arguments.length < 5) throw 'too few arguments';
3378 if (arguments.length > 5) throw 'too many arguments';
3379 return (function(v590,v591,v592){
3380 return f67("((", v590, ")[", v591, "] = ", v592, ")");
3381 })(f104(v587, v585, v586),f104(v588, v585, v586),f104(v589, v585, v586));
3383 var l169 = f3("IN");
3384 v299 = ({car: f33(l169, (function (v593,v594,v595,v596){
3385 if (arguments.length < 4) throw 'too few arguments';
3386 if (arguments.length > 4) throw 'too many arguments';
3387 return (function(v597,v598){
3388 return f115(f67("((", v597, ") in (", v598, "))"));
3389 })(f104(v595, v593, v594),f104(v596, v593, v594));
3391 var l170 = f3("FUNCTIONP");
3392 v299 = ({car: f33(l170, (function (v599,v600,v601){
3393 if (arguments.length < 3) throw 'too few arguments';
3394 if (arguments.length > 3) throw 'too many arguments';
3395 return (function(v602){
3396 return f115(f67("(typeof ", v602, " == 'function')"));
3397 })(f104(v601, v599, v600));
3399 var l171 = f3("WRITE-STRING");
3400 v299 = ({car: f33(l171, (function (v603,v604,v605){
3401 if (arguments.length < 3) throw 'too few arguments';
3402 if (arguments.length > 3) throw 'too many arguments';
3403 return (function(v606){
3404 return f67("(function(){", v168, f70(f67("var ", "x", " = ", v606, ";", v168), f67("if (typeof ", "x", " != '", "string", "')", v168, f70("throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", v168)), f67("return ", (function(){
3405 return "lisp.write(x)";
3406 })(), ";", v168)), "})()");
3407 })(f104(v605, v603, v604));
3409 var l173 = f3("MACROP");
3410 var l172 = f3("MACRO");
3414 return f117 = (function(v607){
3415 ((v607)["fname"] = "MACROP");
3417 })((function (v608){
3418 if (arguments.length < 1) throw 'too few arguments';
3419 if (arguments.length > 1) throw 'too many arguments';
3420 return (((function(){
3422 return (typeof tmp == 'object' && 'name' in tmp);
3423 })()?v3: v2) !== v2 ? ((f90(f98(v608, v245)) === l172)?v3: v2) : v2);
3428 var l175 = f3("LS-MACROEXPAND-1");
3429 var l174 = f3("MACRO");
3433 return f118 = (function(v609){
3434 ((v609)["fname"] = "LS-MACROEXPAND-1");
3436 })((function (v610,v611,v612){
3437 if (arguments.length < 3) throw 'too few arguments';
3438 if (arguments.length > 3) throw 'too many arguments';
3439 return (f117((function(){
3441 return tmp === v2? v2: tmp.car;
3442 })()) !== v2 ? (function(v613){
3443 return (((f90(v613) === l174)?v3: v2) !== v2 ? (function(){
3444 var f = f112(f91(v613));
3446 var tail = ((function(){
3448 return tmp === v2? v2: tmp.cdr;
3451 args.push(tail.car);
3454 return f.apply(this, args);
3458 return tmp === v2? v2: tmp.car;
3459 })(), v244)) : v610);
3464 var l177 = f3("COMPILE-FUNCALL");
3465 var l176 = f3("LAMBDA");
3469 return f119 = (function(v614){
3470 ((v614)["fname"] = "COMPILE-FUNCALL");
3472 })((function (v615,v616,v617,v618){
3473 if (arguments.length < 4) throw 'too few arguments';
3474 if (arguments.length > 4) throw 'too many arguments';
3475 return (((function(){
3477 return (typeof tmp == 'object' && 'name' in tmp);
3478 })()?v3: v2) !== v2 ? (function(){
3479 return f67(f99(v615, v618), "(", f68(f45((function (v619){
3480 if (arguments.length < 1) throw 'too few arguments';
3481 if (arguments.length > 1) throw 'too many arguments';
3482 return f104(v619, v617, v618);
3483 }), v616), ", "), ")");
3484 })() : ((f36(v615) !== v2 ? (((function(){
3486 return tmp === v2? v2: tmp.car;
3487 })() === l176)?v3: v2) : v2) !== v2 ? (function(){
3488 return f67("(", f104(v615, v617, v618), ")(", f68(f45((function (v620){
3489 if (arguments.length < 1) throw 'too few arguments';
3490 if (arguments.length > 1) throw 'too many arguments';
3491 return f104(v620, v617, v618);
3492 }), v616), ", "), ")");
3494 return (function (){ throw f67("Invalid function designator ", (v615).name); })();
3500 var l178 = f3("LS-COMPILE");
3504 return f104 = (function(v621){
3505 ((v621)["fname"] = "LS-COMPILE");
3507 })((function (v622,v623,v624){
3508 if (arguments.length < 3) throw 'too few arguments';
3509 if (arguments.length > 3) throw 'too many arguments';
3510 return (((function(){
3512 return (typeof tmp == 'object' && 'name' in tmp);
3513 })()?v3: v2) !== v2 ? (function(){
3514 return f96(v622, v623);
3515 })() : (f51(v622) !== v2 ? (function(){
3517 })() : (((typeof(v622) == "string")?v3: v2) !== v2 ? (function(){
3518 return f67("\"", f72(v622), "\"");
3519 })() : (f36(v622) !== v2 ? (function(){
3520 return (f65((function(){
3522 return tmp === v2? v2: tmp.car;
3523 })(), v299) !== v2 ? (function(v625){
3526 var args = [v623, v624];
3527 var tail = ((function(){
3529 return tmp === v2? v2: tmp.cdr;
3532 args.push(tail.car);
3535 return f.apply(this, args);
3537 })(f30(f65((function(){
3539 return tmp === v2? v2: tmp.car;
3540 })(), v299))) : (f117((function(){
3542 return tmp === v2? v2: tmp.car;
3543 })()) !== v2 ? f104(f118(v622, v623, v624), v623, v624) : f119((function(){
3545 return tmp === v2? v2: tmp.car;
3548 return tmp === v2? v2: tmp.cdr;
3549 })(), v623, v624)));
3555 var l179 = f3("LS-COMPILE-TOPLEVEL");
3559 return f120 = (function(v626){
3560 ((v626)["fname"] = "LS-COMPILE-TOPLEVEL");
3562 })((function (v627){
3563 if (arguments.length < 1) throw 'too few arguments';
3564 if (arguments.length > 1) throw 'too many arguments';
3566 return (function(v628){
3567 return (function(v629){
3570 })(f67(f68(f45((function (v630){
3571 if (arguments.length < 1) throw 'too few arguments';
3572 if (arguments.length > 1) throw 'too many arguments';
3573 return f67(v630, ";", v168);
3575 })(f104(v627, v2, v2));
3580 var l190 = f3("LS-COMPILE-TOPLEVEL");
3581 var l189 = f3("EVAL");
3582 var l188 = f3("PRINT-TO-STRING");
3583 var l187 = f3("LS-READ-FROM-STRING");
3588 var l182 = {car: {car: f3("*LITERAL-COUNTER*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v358", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*LAMBDA-LIST-KEYWORDS*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v312", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*COMPILATIONS*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v299", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*TOPLEVEL-COMPILATIONS*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v289", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*FUNCTION-COUNTER*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v278", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*VARIABLE-COUNTER*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v261", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*FENV*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v245", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*ENV*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v244", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*COMPILATION-UNIT-CHECKS*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v243", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*EOF*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v236", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("*NEWLINE*"), cdr: {car: f3("VARIABLE"), cdr: {car: "v168", 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")}}}}}}}}}}}}}}};
3589 var l181 = {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("SETQ"), cdr: {car: f3("*ENV*"), cdr: {car: {car: f3("REMOVE-IF-NOT"), cdr: {car: {car: f3("FUNCTION"), cdr: {car: f3("BINDING-DECLARED"), cdr: f3("NIL")}}, cdr: {car: f3("*ENV*"), cdr: f3("NIL")}}}, cdr: f3("NIL")}}}, cdr: {car: {car: f3("SETQ"), cdr: {car: f3("*FENV*"), cdr: {car: {car: f3("REMOVE-IF-NOT"), cdr: {car: {car: f3("FUNCTION"), cdr: {car: f3("BINDING-DECLARED"), cdr: f3("NIL")}}, cdr: {car: f3("*FENV*"), cdr: f3("NIL")}}}, 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: "f120", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("COMPILE-FUNCALL"), cdr: {car: f3("FUNCTION"), cdr: {car: "f119", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LS-MACROEXPAND-1"), cdr: {car: f3("FUNCTION"), cdr: {car: "f118", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("MACROP"), cdr: {car: f3("FUNCTION"), cdr: {car: "f117", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("NUM-OP-NUM"), cdr: {car: f3("FUNCTION"), cdr: {car: "f116", 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: "f115", 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: {car: f3("FENV"), 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: "f114", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("BACKQUOTE-EXPAND-1"), cdr: {car: f3("FUNCTION"), cdr: {car: "f113", 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: {car: f3("FENV"), 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: "f112", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LITERAL"), cdr: {car: f3("FUNCTION"), cdr: {car: "f111", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LITERAL->JS"), cdr: {car: f3("FUNCTION"), cdr: {car: "f110", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LAMBDA-LIST-REST-ARGUMENT"), cdr: {car: f3("FUNCTION"), cdr: {car: "f109", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LAMBDA-LIST-OPTIONAL-ARGUMENTS"), cdr: {car: f3("FUNCTION"), cdr: {car: "f108", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT"), cdr: {car: f3("FUNCTION"), cdr: {car: "f107", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LAMBDA-LIST-REQUIRED-ARGUMENTS"), cdr: {car: f3("FUNCTION"), cdr: {car: "f106", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LIST-UNTIL-KEYWORD"), cdr: {car: f3("FUNCTION"), cdr: {car: "f105", 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: f3("FENV"), 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: "f104", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LS-COMPILE-BLOCK"), cdr: {car: f3("FUNCTION"), cdr: {car: "f103", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("%COMPILE-DEFMACRO"), cdr: {car: f3("FUNCTION"), cdr: {car: "f102", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("%COMPILE-DEFUN"), cdr: {car: f3("FUNCTION"), cdr: {car: "f101", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("%COMPILE-DEFVAR"), cdr: {car: f3("FUNCTION"), cdr: {car: "f100", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LOOKUP-FUNCTION-TRANSLATION"), cdr: {car: f3("FUNCTION"), cdr: {car: "f99", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LOOKUP-FUNCTION"), cdr: {car: f3("FUNCTION"), cdr: {car: "f98", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("EXTEND-LOCAL-ENV"), cdr: {car: f3("FUNCTION"), cdr: {car: "f97", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LOOKUP-VARIABLE-TRANSLATION"), cdr: {car: f3("FUNCTION"), cdr: {car: "f96", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("LOOKUP-VARIABLE"), cdr: {car: f3("FUNCTION"), cdr: {car: "f95", cdr: {car: f3("T"), cdr: f3("NIL")}}}}, cdr: {car: {car: f3("GVARNAME"), 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("UNQUOTE"), cdr: {car: {car: f3("CAR"), cdr: {car: f3("CLAUSULE"), 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: 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")}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}};
3590 var l180 = f3("EVAL");
3601 return f112 = (function(v631){
3602 ((v631)["fname"] = "EVAL");
3604 })((function (v632){
3605 if (arguments.length < 1) throw 'too few arguments';
3606 if (arguments.length > 1) throw 'too many arguments';
3607 return (function(v633){
3610 if (typeof string != 'string')
3611 throw 'The value ' + string + ' is not a type string.';
3612 return eval.apply(window, [string]);
3615 (function(v635,v636){
3620 return tmp === v2? v2: tmp.car;
3625 return tmp === v2? v2: tmp.cdr;
3632 v244 = f60(f92, v244);
3633 v245 = f60(f92, v245);
3641 var string = f67("var lisp = {};", "lisp.read = ", f99(l187, v2), ";", v168, "lisp.print = ", f99(l188, v2), ";", v168, "lisp.eval = ", f99(l189, v2), ";", v168, "lisp.compile = ", f99(l190, v2), ";", v168, "lisp.evalString = function(str){", v168, " return lisp.eval(lisp.read(str));", v168, "}", v168, "lisp.compileString = function(str){", v168, " return lisp.compile(lisp.read(str));", v168, "}", v168);
3642 if (typeof string != 'string')
3643 throw 'The value ' + string + ' is not a type string.';
3644 return eval.apply(window, [string]);