43 return v634 = (function(){
45 if (typeof name != 'string')
46 throw 'The value ' + name + ' is not a type string.';
47 return ({name: name});
50 ((v633)["NIL"] = v634);
52 return v635 = (function(){
54 if (typeof name != 'string')
55 throw 'The value ' + name + ' is not a type string.';
56 return ({name: name});
61 return f120 = (function(v636){
62 ((v636)["fname"] = "NULL");
65 if (arguments.length < 1) throw 'too few arguments';
66 if (arguments.length > 1) throw 'too many arguments';
67 return ((v637 === v634)?v635: v634);
71 return f121 = (function(v638){
72 ((v638)["fname"] = "INTERNP");
75 if (arguments.length < 1) throw 'too few arguments';
76 if (arguments.length > 1) throw 'too many arguments';
77 return (((v639) in (v633))?v635: v634);
81 return f122 = (function(v640){
82 ((v640)["fname"] = "INTERN");
85 if (arguments.length < 1) throw 'too few arguments';
86 if (arguments.length > 1) throw 'too many arguments';
87 return (f121(v641) !== v634 ? (function(){
88 var tmp = (v633)[v641];
89 return tmp == undefined? v634: tmp ;
90 })() : ((v633)[v641] = (function(){
92 if (typeof name != 'string')
93 throw 'The value ' + name + ' is not a type string.';
94 return ({name: name});
99 return f123 = (function(v642){
100 ((v642)["fname"] = "FIND-SYMBOL");
103 if (arguments.length < 1) throw 'too few arguments';
104 if (arguments.length > 1) throw 'too many arguments';
106 var tmp = (v633)[v643];
107 return tmp == undefined? v634: tmp ;
115 return f124 = (function(v645){
116 ((v645)["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 = f125(v644);
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 f126 = (function(v647){
152 ((v647)["fname"] = "=");
154 })((function (v648,v649){
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 f127 = (function(v650){
170 ((v650)["fname"] = "+");
172 })((function (v651,v652){
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 f128 = (function(v653){
188 ((v653)["fname"] = "-");
190 })((function (v654,v655){
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 f129 = (function(v656){
206 ((v656)["fname"] = "*");
208 })((function (v657,v658){
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 f130 = (function(v659){
224 ((v659)["fname"] = "/");
226 })((function (v660,v661){
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 f131 = (function(v662){
242 ((v662)["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 f132 = (function(v664){
260 ((v664)["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 f133 = (function(v666){
278 ((v666)["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 f134 = (function(v668){
296 ((v668)["fname"] = "TRUNCATE");
298 })((function (v669,v670){
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 f135 = (function(v671){
319 ((v671)["fname"] = "EQL");
321 })((function (v672,v673){
322 if (arguments.length < 2) throw 'too few arguments';
323 if (arguments.length > 2) throw 'too many arguments';
324 return ((v672 === v673)?v635: v634);
328 return f136 = (function(v674){
329 ((v674)["fname"] = "NOT");
332 if (arguments.length < 1) throw 'too few arguments';
333 if (arguments.length > 1) throw 'too many arguments';
334 return (v675 !== v634 ? v634 : v635);
338 return f137 = (function(v676){
339 ((v676)["fname"] = "CONS");
341 })((function (v677,v678){
342 if (arguments.length < 2) throw 'too few arguments';
343 if (arguments.length > 2) throw 'too many arguments';
344 return ({car: v677, cdr: v678});
348 return f138 = (function(v679){
349 ((v679)["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 f139 = (function(v681){
362 ((v681)["fname"] = "CAR");
365 if (arguments.length < 1) throw 'too few arguments';
366 if (arguments.length > 1) throw 'too many arguments';
369 return tmp === v634? v634: tmp.car;
374 return f140 = (function(v683){
375 ((v683)["fname"] = "CDR");
378 if (arguments.length < 1) throw 'too few arguments';
379 if (arguments.length > 1) throw 'too many arguments';
382 return tmp === v634? v634: tmp.cdr;
387 return f141 = (function(v685){
388 ((v685)["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 === v634? v634: tmp.car;
398 return tmp === v634? v634: tmp.car;
403 return f142 = (function(v687){
404 ((v687)["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 === v634? v634: tmp.cdr;
414 return tmp === v634? v634: tmp.car;
419 return f143 = (function(v689){
420 ((v689)["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 === v634? v634: tmp.car;
430 return tmp === v634? v634: tmp.cdr;
435 return f144 = (function(v691){
436 ((v691)["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 === v634? v634: tmp.cdr;
446 return tmp === v634? v634: tmp.cdr;
451 return f145 = (function(v693){
452 ((v693)["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 === v634? v634: tmp.cdr;
463 return tmp === v634? v634: tmp.cdr;
465 return tmp === v634? v634: tmp.car;
470 return f146 = (function(v695){
471 ((v695)["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 === v634? v634: tmp.cdr;
482 return tmp === v634? v634: tmp.cdr;
484 return tmp === v634? v634: tmp.cdr;
489 return f147 = (function(v697){
490 ((v697)["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 === v634? v634: tmp.cdr;
502 return tmp === v634? v634: tmp.cdr;
504 return tmp === v634? v634: tmp.cdr;
506 return tmp === v634? v634: tmp.car;
511 return f148 = (function(v699){
512 ((v699)["fname"] = "FIRST");
515 if (arguments.length < 1) throw 'too few arguments';
516 if (arguments.length > 1) throw 'too many arguments';
519 return tmp === v634? v634: tmp.car;
524 return f149 = (function(v701){
525 ((v701)["fname"] = "SECOND");
528 if (arguments.length < 1) throw 'too few arguments';
529 if (arguments.length > 1) throw 'too many arguments';
534 return f150 = (function(v703){
535 ((v703)["fname"] = "THIRD");
538 if (arguments.length < 1) throw 'too few arguments';
539 if (arguments.length > 1) throw 'too many arguments';
544 return f151 = (function(v705){
545 ((v705)["fname"] = "FOURTH");
548 if (arguments.length < 1) throw 'too few arguments';
549 if (arguments.length > 1) throw 'too many arguments';
554 return f152 = (function(v707){
555 ((v707)["fname"] = "LIST");
559 for (var i = arguments.length-1; i>=0; i--)
560 v708 = {car: arguments[i], cdr: v708};
565 return f153 = (function(v709){
566 ((v709)["fname"] = "ATOM");
569 if (arguments.length < 1) throw 'too few arguments';
570 if (arguments.length > 1) throw 'too many arguments';
571 return f136(((function(){
573 return (typeof tmp == 'object' && 'car' in tmp);
581 return f154 = (function(v711){
582 ((v711)["fname"] = "ENSURE-LIST");
585 if (arguments.length < 1) throw 'too few arguments';
586 if (arguments.length > 1) throw 'too many arguments';
587 return (f155(v712) !== v634 ? v712 : f152(v712));
592 return f156 = (function(v713){
593 ((v713)["fname"] = "!REDUCE");
595 })((function (v714,v715,v716){
596 if (arguments.length < 3) throw 'too few arguments';
597 if (arguments.length > 3) throw 'too many arguments';
598 return (f120(v715) !== v634 ? v716 : f156(v714, (function(){
600 return tmp === v634? v634: tmp.cdr;
601 })(), (v714)(v716, (function(){
603 return tmp === v634? v634: tmp.car;
607 var l219 = f122("STRING=");
609 var l218 = f122("ASSOC");
611 var l217 = f122("EVERY");
613 var l216 = f122("PARSE-INTEGER");
615 var l215 = f122("SUBSEQ");
617 var l214 = f122("DIGIT-CHAR-P");
619 var l213 = f122("REMOVE-IF-NOT");
621 var l212 = f122("REMOVE-IF");
623 var l211 = f122("REMOVE");
625 var l210 = f122("MEMBER");
627 var l209 = f122("BUTLAST");
629 var l208 = f122("LAST");
631 var l207 = f122("NTH");
633 var l206 = f122("LISTP");
635 var l205 = f122("MINUSP");
637 var l204 = f122("PLUSP");
639 var l203 = f122("INTEGERP");
641 var l202 = f122("CHAR=");
643 var l201 = f122("CHAR-CODE");
645 var l200 = f122("CODE-CHAR");
647 var l199 = f122("MAPCAR");
648 var l198 = f122("NIL");
650 var l197 = f122("CONCAT-TWO");
652 var l196 = f122("LENGTH");
654 var l195 = f122("LIST-LENGTH");
656 var l194 = f122("REVERSE");
657 var l193 = f122("NIL");
659 var l192 = f122("REVERSE-AUX");
661 var l191 = f122("APPEND");
662 var l190 = f122("NIL");
664 var l189 = f122("APPEND-TWO");
669 return f157 = (function(v717){
670 ((v717)["fname"] = "APPEND-TWO");
672 })((function (v718,v719){
673 if (arguments.length < 2) throw 'too few arguments';
674 if (arguments.length > 2) throw 'too many arguments';
675 return (f120(v718) !== v634 ? v719 : ({car: (function(){
677 return tmp === v634? v634: tmp.car;
678 })(), cdr: f158((function(){
680 return tmp === v634? v634: tmp.cdr;
688 return f158 = (function(v720){
689 ((v720)["fname"] = "APPEND");
693 for (var i = arguments.length-1; i>=0; i--)
694 v721 = {car: arguments[i], cdr: v721};
695 return f156(f157, v721, l190);
702 return f159 = (function(v722){
703 ((v722)["fname"] = "REVERSE-AUX");
705 })((function (v723,v724){
706 if (arguments.length < 2) throw 'too few arguments';
707 if (arguments.length > 2) throw 'too many arguments';
708 return (f120(v723) !== v634 ? v724 : f159((function(){
710 return tmp === v634? v634: tmp.cdr;
711 })(), ({car: (function(){
713 return tmp === v634? v634: tmp.car;
721 return f160 = (function(v725){
722 ((v725)["fname"] = "REVERSE");
725 if (arguments.length < 1) throw 'too few arguments';
726 if (arguments.length > 1) throw 'too many arguments';
727 return f159(v726, l193);
734 return f161 = (function(v727){
735 ((v727)["fname"] = "LIST-LENGTH");
738 if (arguments.length < 1) throw 'too few arguments';
739 if (arguments.length > 1) throw 'too many arguments';
740 return (function(v729){
742 while(f136(f120(v728)) !== v634){
746 if (typeof x != 'number')
747 throw 'The value ' + x + ' is not a type number.';
748 if (typeof y != 'number')
749 throw 'The value ' + y + ' is not a type number.';
754 return tmp === v634? v634: tmp.cdr;
765 return f162 = (function(v730){
766 ((v730)["fname"] = "LENGTH");
769 if (arguments.length < 1) throw 'too few arguments';
770 if (arguments.length > 1) throw 'too many arguments';
771 return (((typeof(v731) == "string")?v635: v634) !== v634 ? (function(){
773 if (typeof x != 'string')
774 throw 'The value ' + x + ' is not a type string.';
783 return f163 = (function(v732){
784 ((v732)["fname"] = "CONCAT-TWO");
786 })((function (v733,v734){
787 if (arguments.length < 2) throw 'too few arguments';
788 if (arguments.length > 2) throw 'too many arguments';
792 if (typeof string1 != 'string')
793 throw 'The value ' + string1 + ' is not a type string.';
794 if (typeof string2 != 'string')
795 throw 'The value ' + string2 + ' is not a type string.';
796 return string1.concat(string2);
804 return f164 = (function(v735){
805 ((v735)["fname"] = "MAPCAR");
807 })((function (v736,v737){
808 if (arguments.length < 2) throw 'too few arguments';
809 if (arguments.length > 2) throw 'too many arguments';
810 return (f120(v737) !== v634 ? l198 : ({car: (v736)((function(){
812 return tmp === v634? v634: tmp.car;
813 })()), cdr: f164(v736, (function(){
815 return tmp === v634? v634: tmp.cdr;
823 return f165 = (function(v738){
824 ((v738)["fname"] = "CODE-CHAR");
827 if (arguments.length < 1) throw 'too few arguments';
828 if (arguments.length > 1) throw 'too many arguments';
836 return f166 = (function(v740){
837 ((v740)["fname"] = "CHAR-CODE");
840 if (arguments.length < 1) throw 'too few arguments';
841 if (arguments.length > 1) throw 'too many arguments';
849 return f167 = (function(v742){
850 ((v742)["fname"] = "CHAR=");
852 })((function (v743,v744){
853 if (arguments.length < 2) throw 'too few arguments';
854 if (arguments.length > 2) throw 'too many arguments';
858 if (typeof x != 'number')
859 throw 'The value ' + x + ' is not a type number.';
860 if (typeof y != 'number')
861 throw 'The value ' + y + ' is not a type number.';
870 return f168 = (function(v745){
871 ((v745)["fname"] = "INTEGERP");
874 if (arguments.length < 1) throw 'too few arguments';
875 if (arguments.length > 1) throw 'too many arguments';
876 return (((typeof (v746) == "number")?v635: v634) !== v634 ? ((function(){
879 if (typeof x != 'number')
880 throw 'The value ' + x + ' is not a type number.';
881 return Math.floor(x);
884 if (typeof x != 'number')
885 throw 'The value ' + x + ' is not a type number.';
886 if (typeof y != 'number')
887 throw 'The value ' + y + ' is not a type number.';
889 })()?v635: v634) : v634);
896 return f169 = (function(v747){
897 ((v747)["fname"] = "PLUSP");
900 if (arguments.length < 1) throw 'too few arguments';
901 if (arguments.length > 1) throw 'too many arguments';
905 if (typeof x != 'number')
906 throw 'The value ' + x + ' is not a type number.';
907 if (typeof y != 'number')
908 throw 'The value ' + y + ' is not a type number.';
917 return f170 = (function(v749){
918 ((v749)["fname"] = "MINUSP");
921 if (arguments.length < 1) throw 'too few arguments';
922 if (arguments.length > 1) throw 'too many arguments';
926 if (typeof x != 'number')
927 throw 'The value ' + x + ' is not a type number.';
928 if (typeof y != 'number')
929 throw 'The value ' + y + ' is not a type number.';
938 return f155 = (function(v751){
939 ((v751)["fname"] = "LISTP");
942 if (arguments.length < 1) throw 'too few arguments';
943 if (arguments.length > 1) throw 'too many arguments';
944 return (function(v753){
945 return (v753 !== v634 ? v753 : f120(v752));
948 return (typeof tmp == 'object' && 'car' in tmp);
956 return f171 = (function(v754){
957 ((v754)["fname"] = "NTH");
959 })((function (v755,v756){
960 if (arguments.length < 2) throw 'too few arguments';
961 if (arguments.length > 2) throw 'too many arguments';
962 return (f120(v756) !== v634 ? (function(){
964 })() : (f133(v755) !== v634 ? (function(){
967 return tmp === v634? v634: tmp.car;
970 return f171(f132(v755), (function(){
972 return tmp === v634? v634: tmp.cdr;
981 return f172 = (function(v757){
982 ((v757)["fname"] = "LAST");
985 if (arguments.length < 1) throw 'too few arguments';
986 if (arguments.length > 1) throw 'too many arguments';
987 return (((function(){
988 var tmp = (function(){
990 return tmp === v634? v634: tmp.cdr;
992 return (typeof tmp == 'object' && 'car' in tmp);
993 })()?v635: v634) !== v634 ? f172((function(){
995 return tmp === v634? v634: tmp.cdr;
1003 return f173 = (function(v759){
1004 ((v759)["fname"] = "BUTLAST");
1006 })((function (v760){
1007 if (arguments.length < 1) throw 'too few arguments';
1008 if (arguments.length > 1) throw 'too many arguments';
1009 return (((function(){
1010 var tmp = (function(){
1012 return tmp === v634? v634: tmp.cdr;
1014 return (typeof tmp == 'object' && 'car' in tmp);
1015 })()?v635: v634) !== v634 ? ({car: (function(){
1017 return tmp === v634? v634: tmp.car;
1018 })(), cdr: f173((function(){
1020 return tmp === v634? v634: tmp.cdr;
1028 return f174 = (function(v761){
1029 ((v761)["fname"] = "MEMBER");
1031 })((function (v762,v763){
1032 if (arguments.length < 2) throw 'too few arguments';
1033 if (arguments.length > 2) throw 'too many arguments';
1034 return (f120(v763) !== v634 ? (function(){
1036 })() : (f135(v762, (function(){
1038 return tmp === v634? v634: tmp.car;
1039 })()) !== v634 ? (function(){
1042 return f174(v762, (function(){
1044 return tmp === v634? v634: tmp.cdr;
1053 return f175 = (function(v764){
1054 ((v764)["fname"] = "REMOVE");
1056 })((function (v765,v766){
1057 if (arguments.length < 2) throw 'too few arguments';
1058 if (arguments.length > 2) throw 'too many arguments';
1059 return (f120(v766) !== v634 ? (function(){
1061 })() : (f135(v765, (function(){
1063 return tmp === v634? v634: tmp.car;
1064 })()) !== v634 ? (function(){
1065 return f175(v765, (function(){
1067 return tmp === v634? v634: tmp.cdr;
1070 return ({car: (function(){
1072 return tmp === v634? v634: tmp.car;
1073 })(), cdr: f175(v765, (function(){
1075 return tmp === v634? v634: tmp.cdr;
1084 return f176 = (function(v767){
1085 ((v767)["fname"] = "REMOVE-IF");
1087 })((function (v768,v769){
1088 if (arguments.length < 2) throw 'too few arguments';
1089 if (arguments.length > 2) throw 'too many arguments';
1090 return (f120(v769) !== v634 ? (function(){
1092 })() : ((v768)((function(){
1094 return tmp === v634? v634: tmp.car;
1095 })()) !== v634 ? (function(){
1096 return f176(v768, (function(){
1098 return tmp === v634? v634: tmp.cdr;
1101 return ({car: (function(){
1103 return tmp === v634? v634: tmp.car;
1104 })(), cdr: f176(v768, (function(){
1106 return tmp === v634? v634: tmp.cdr;
1115 return f177 = (function(v770){
1116 ((v770)["fname"] = "REMOVE-IF-NOT");
1118 })((function (v771,v772){
1119 if (arguments.length < 2) throw 'too few arguments';
1120 if (arguments.length > 2) throw 'too many arguments';
1121 return (f120(v772) !== v634 ? (function(){
1123 })() : ((v771)((function(){
1125 return tmp === v634? v634: tmp.car;
1126 })()) !== v634 ? (function(){
1127 return ({car: (function(){
1129 return tmp === v634? v634: tmp.car;
1130 })(), cdr: f177(v771, (function(){
1132 return tmp === v634? v634: tmp.cdr;
1135 return f177(v771, (function(){
1137 return tmp === v634? v634: tmp.cdr;
1146 return f178 = (function(v773){
1147 ((v773)["fname"] = "DIGIT-CHAR-P");
1149 })((function (v774){
1150 if (arguments.length < 1) throw 'too few arguments';
1151 if (arguments.length > 1) throw 'too many arguments';
1152 return ((((function(){
1155 if (typeof x != 'number')
1156 throw 'The value ' + x + ' is not a type number.';
1157 if (typeof y != 'number')
1158 throw 'The value ' + y + ' is not a type number.';
1160 })()?v635: v634) !== v634 ? ((function(){
1163 if (typeof x != 'number')
1164 throw 'The value ' + x + ' is not a type number.';
1165 if (typeof y != 'number')
1166 throw 'The value ' + y + ' is not a type number.';
1168 })()?v635: v634) : v634) !== v634 ? (function(){
1171 if (typeof x != 'number')
1172 throw 'The value ' + x + ' is not a type number.';
1173 if (typeof y != 'number')
1174 throw 'The value ' + y + ' is not a type number.';
1183 return f179 = (function(v775){
1184 ((v775)["fname"] = "SUBSEQ");
1186 })((function (v776,v777,v778){
1187 if (arguments.length < 2) throw 'too few arguments';
1188 if (arguments.length > 3) throw 'too many arguments';
1189 switch(arguments.length){
1194 return (((typeof(v776) == "string")?v635: v634) !== v634 ? (function(){
1195 return (v778 !== v634 ? (function(){
1200 return str.slice(a,b);
1205 return str.slice(a,b);
1208 return (function (){ throw "Unsupported argument.";return 0;})();
1216 return f180 = (function(v779){
1217 ((v779)["fname"] = "PARSE-INTEGER");
1219 })((function (v780){
1220 if (arguments.length < 1) throw 'too few arguments';
1221 if (arguments.length > 1) throw 'too many arguments';
1222 return (function(v781,v782,v783){
1227 if (typeof x != 'number')
1228 throw 'The value ' + x + ' is not a type number.';
1229 if (typeof y != 'number')
1230 throw 'The value ' + y + ' is not a type number.';
1232 })()?v635: v634) !== v634){
1234 var x = (function(){
1237 if (typeof x != 'number')
1238 throw 'The value ' + x + ' is not a type number.';
1239 if (typeof y != 'number')
1240 throw 'The value ' + y + ' is not a type number.';
1243 var y = f178((function(){
1246 if (typeof string != 'string')
1247 throw 'The value ' + string + ' is not a type string.';
1248 if (typeof index != 'number')
1249 throw 'The value ' + index + ' is not a type number.';
1250 return string.charCodeAt(index);
1252 if (typeof x != 'number')
1253 throw 'The value ' + x + ' is not a type number.';
1254 if (typeof y != 'number')
1255 throw 'The value ' + y + ' is not a type number.';
1261 if (typeof x != 'number')
1262 throw 'The value ' + x + ' is not a type number.';
1263 if (typeof y != 'number')
1264 throw 'The value ' + y + ' is not a type number.';
1276 return f181 = (function(v784){
1277 ((v784)["fname"] = "EVERY");
1279 })((function (v785,v786){
1280 if (arguments.length < 2) throw 'too few arguments';
1281 if (arguments.length > 2) throw 'too many arguments';
1282 return (function(v787,v788,v789){
1284 while((v787 !== v634 ? ((function(){
1287 if (typeof x != 'number')
1288 throw 'The value ' + x + ' is not a type number.';
1289 if (typeof y != 'number')
1290 throw 'The value ' + y + ' is not a type number.';
1292 })()?v635: v634) : v634) !== v634){
1293 ((v785)((function(){
1296 if (typeof string != 'string')
1297 throw 'The value ' + string + ' is not a type string.';
1298 if (typeof index != 'number')
1299 throw 'The value ' + index + ' is not a type number.';
1300 return string.charCodeAt(index);
1301 })()) !== v634 ? v634 : (function(){
1307 if (typeof x != 'number')
1308 throw 'The value ' + x + ' is not a type number.';
1309 if (typeof y != 'number')
1310 throw 'The value ' + y + ' is not a type number.';
1315 })(v635,0,f162(v786));
1322 return f182 = (function(v790){
1323 ((v790)["fname"] = "ASSOC");
1325 })((function (v791,v792){
1326 if (arguments.length < 2) throw 'too few arguments';
1327 if (arguments.length > 2) throw 'too many arguments';
1328 return (f120(v792) !== v634 ? (function(){
1330 })() : (f135(v791, f141(v792)) !== v634 ? (function(){
1333 return tmp === v634? v634: tmp.car;
1336 return f182(v791, (function(){
1338 return tmp === v634? v634: tmp.cdr;
1347 return f183 = (function(v793){
1348 ((v793)["fname"] = "STRING=");
1350 })((function (v794,v795){
1351 if (arguments.length < 2) throw 'too few arguments';
1352 if (arguments.length > 2) throw 'too many arguments';
1353 return ((v794 == v795)?v635: v634);
1359 var l220 = f122("*NEWLINE*");
1363 return v796 = (function(){
1365 if (typeof x != 'number')
1366 throw 'The value ' + x + ' is not a type number.';
1367 return String.fromCharCode(x);
1372 var l221 = f122("CONCAT");
1376 return f184 = (function(v797){
1377 ((v797)["fname"] = "CONCAT");
1381 for (var i = arguments.length-1; i>=0; i--)
1382 v798 = {car: arguments[i], cdr: v798};
1383 return f156(f163, v798, "");
1388 var l222 = f122("JOIN");
1392 return f185 = (function(v799){
1393 ((v799)["fname"] = "JOIN");
1395 })((function (v800,v801){
1396 if (arguments.length < 1) throw 'too few arguments';
1397 if (arguments.length > 2) throw 'too many arguments';
1398 switch(arguments.length){
1403 return (f120(v800) !== v634 ? (function(){
1405 })() : (f120((function(){
1407 return tmp === v634? v634: tmp.cdr;
1408 })()) !== v634 ? (function(){
1411 return tmp === v634? v634: tmp.car;
1414 return f184((function(){
1416 return tmp === v634? v634: tmp.car;
1417 })(), v801, f185((function(){
1419 return tmp === v634? v634: tmp.cdr;
1426 var l223 = f122("JOIN-TRAILING");
1430 return f186 = (function(v802){
1431 ((v802)["fname"] = "JOIN-TRAILING");
1433 })((function (v803,v804){
1434 if (arguments.length < 1) throw 'too few arguments';
1435 if (arguments.length > 2) throw 'too many arguments';
1436 switch(arguments.length){
1441 return (f120(v803) !== v634 ? "" : f184((function(){
1443 return tmp === v634? v634: tmp.car;
1444 })(), v804, f186((function(){
1446 return tmp === v634? v634: tmp.cdr;
1452 var l224 = f122("INDENT");
1456 return f187 = (function(v805){
1457 ((v805)["fname"] = "INDENT");
1461 for (var i = arguments.length-1; i>=0; i--)
1462 v806 = {car: arguments[i], cdr: v806};
1463 return (function(v807){
1464 return (function(v808,v809,v810){
1465 (f169(v810) !== v634 ? (function(){
1472 if (typeof x != 'number')
1473 throw 'The value ' + x + ' is not a type number.';
1474 if (typeof y != 'number')
1475 throw 'The value ' + y + ' is not a type number.';
1477 })()?v635: v634) !== v634){
1478 v808 = f184(v808, ((f167((function(){
1481 if (typeof string != 'string')
1482 throw 'The value ' + string + ' is not a type string.';
1483 if (typeof index != 'number')
1484 throw 'The value ' + index + ' is not a type number.';
1485 return string.charCodeAt(index);
1486 })(), 10) !== v634 ? (((function(){
1489 if (typeof x != 'number')
1490 throw 'The value ' + x + ' is not a type number.';
1491 if (typeof y != 'number')
1492 throw 'The value ' + y + ' is not a type number.';
1494 })()?v635: v634) !== v634 ? f136(f167((function(){
1496 var index = f131(v809);
1497 if (typeof string != 'string')
1498 throw 'The value ' + string + ' is not a type string.';
1499 if (typeof index != 'number')
1500 throw 'The value ' + index + ' is not a type number.';
1501 return string.charCodeAt(index);
1502 })(), 10)) : v634) : v634) !== v634 ? f184((function(){
1504 if (typeof x != 'number')
1505 throw 'The value ' + x + ' is not a type number.';
1506 return String.fromCharCode(x);
1507 })(), " ") : f179(v807, v809, f131(v809))));
1511 if (typeof x != 'number')
1512 throw 'The value ' + x + ' is not a type number.';
1513 if (typeof y != 'number')
1514 throw 'The value ' + y + ' is not a type number.';
1519 })("",0,f162(v807));
1520 })(f156(f184, v806, ""));
1525 var l225 = f122("INTEGER-TO-STRING");
1529 return f125 = (function(v811){
1530 ((v811)["fname"] = "INTEGER-TO-STRING");
1532 })((function (v812){
1533 if (arguments.length < 1) throw 'too few arguments';
1534 if (arguments.length > 1) throw 'too many arguments';
1535 return (f133(v812) !== v634 ? (function(){
1537 })() : (f170(v812) !== v634 ? (function(){
1538 return f184("-", f125((function(){
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.';
1548 return (function(v813){
1550 while(f136(f133(v812)) !== v634){
1551 v813 = ({car: (function(){
1554 if (typeof x != 'number')
1555 throw 'The value ' + x + ' is not a type number.';
1556 if (typeof y != 'number')
1557 throw 'The value ' + y + ' is not a type number.';
1560 v812 = f134(v812, 10);
1562 return f185(f164((function (v814){
1563 if (arguments.length < 1) throw 'too few arguments';
1564 if (arguments.length > 1) throw 'too many arguments';
1566 var x = (function(){
1567 var string = "0123456789";
1569 if (typeof string != 'string')
1570 throw 'The value ' + string + ' is not a type string.';
1571 if (typeof index != 'number')
1572 throw 'The value ' + index + ' is not a type number.';
1573 return string.charCodeAt(index);
1575 if (typeof x != 'number')
1576 throw 'The value ' + x + ' is not a type number.';
1577 return String.fromCharCode(x);
1586 var l228 = f122("PRINT");
1588 var l227 = f122("WRITE-LINE");
1590 var l226 = f122("PRINT-TO-STRING");
1595 return f188 = (function(v815){
1596 ((v815)["fname"] = "PRINT-TO-STRING");
1598 })((function (v816){
1599 if (arguments.length < 1) throw 'too few arguments';
1600 if (arguments.length > 1) throw 'too many arguments';
1601 return (((function(){
1603 return (typeof tmp == 'object' && 'name' in tmp);
1604 })()?v635: v634) !== v634 ? (function(){
1606 })() : (f168(v816) !== v634 ? (function(){
1608 })() : (((typeof(v816) == "string")?v635: v634) !== v634 ? (function(){
1609 return f184("\"", f189(v816), "\"");
1610 })() : (((typeof v816 == 'function')?v635: v634) !== v634 ? (function(){
1611 return (function(v817){
1612 return (v817 !== v634 ? f184("#<FUNCTION ", v817, ">") : f184("#<FUNCTION>"));
1614 var tmp = (v816)["fname"];
1615 return tmp == undefined? v634: tmp ;
1617 })() : (f155(v816) !== v634 ? (function(){
1618 return f184("(", f186(f164(f188, f173(v816)), " "), (function(v818){
1619 return (f120((function(){
1621 return tmp === v634? v634: tmp.cdr;
1622 })()) !== v634 ? f188((function(){
1624 return tmp === v634? v634: tmp.car;
1625 })()) : f184(f188((function(){
1627 return tmp === v634? v634: tmp.car;
1628 })()), " . ", f188((function(){
1630 return tmp === v634? v634: tmp.cdr;
1632 })(f172(v816)), ")");
1640 return f190 = (function(v819){
1641 ((v819)["fname"] = "WRITE-LINE");
1643 })((function (v820){
1644 if (arguments.length < 1) throw 'too few arguments';
1645 if (arguments.length > 1) throw 'too many arguments';
1648 if (typeof x != 'string')
1649 throw 'The value ' + x + ' is not a type string.';
1650 return lisp.write(x);
1654 if (typeof x != 'string')
1655 throw 'The value ' + x + ' is not a type string.';
1656 return lisp.write(x);
1665 return f191 = (function(v821){
1666 ((v821)["fname"] = "PRINT");
1668 })((function (v822){
1669 if (arguments.length < 1) throw 'too few arguments';
1670 if (arguments.length > 1) throw 'too many arguments';
1671 return f190(f188(v822));
1677 var l229 = f122("MAKE-STRING-STREAM");
1681 return f192 = (function(v823){
1682 ((v823)["fname"] = "MAKE-STRING-STREAM");
1684 })((function (v824){
1685 if (arguments.length < 1) throw 'too few arguments';
1686 if (arguments.length > 1) throw 'too many arguments';
1687 return ({car: v824, cdr: 0});
1692 var l230 = f122("%PEEK-CHAR");
1696 return f193 = (function(v825){
1697 ((v825)["fname"] = "%PEEK-CHAR");
1699 })((function (v826){
1700 if (arguments.length < 1) throw 'too few arguments';
1701 if (arguments.length > 1) throw 'too many arguments';
1702 return (((function(){
1703 var x = (function(){
1705 return tmp === v634? v634: tmp.cdr;
1707 var y = f162((function(){
1709 return tmp === v634? v634: tmp.car;
1711 if (typeof x != 'number')
1712 throw 'The value ' + x + ' is not a type number.';
1713 if (typeof y != 'number')
1714 throw 'The value ' + y + ' is not a type number.';
1716 })()?v635: v634) !== v634 ? (function(){
1717 var string = (function(){
1719 return tmp === v634? v634: tmp.car;
1721 var index = (function(){
1723 return tmp === v634? v634: tmp.cdr;
1725 if (typeof string != 'string')
1726 throw 'The value ' + string + ' is not a type string.';
1727 if (typeof index != 'number')
1728 throw 'The value ' + index + ' is not a type number.';
1729 return string.charCodeAt(index);
1735 var l231 = f122("%READ-CHAR");
1739 return f194 = (function(v827){
1740 ((v827)["fname"] = "%READ-CHAR");
1742 })((function (v828){
1743 if (arguments.length < 1) throw 'too few arguments';
1744 if (arguments.length > 1) throw 'too many arguments';
1745 return (((function(){
1746 var x = (function(){
1748 return tmp === v634? v634: tmp.cdr;
1750 var y = f162((function(){
1752 return tmp === v634? v634: tmp.car;
1754 if (typeof x != 'number')
1755 throw 'The value ' + x + ' is not a type number.';
1756 if (typeof y != 'number')
1757 throw 'The value ' + y + ' is not a type number.';
1759 })()?v635: v634) !== v634 ? (function(v829){
1762 if (typeof x != 'object')
1763 throw 'The value ' + x + ' is not a type object.';
1764 return (x.cdr = f131((function(){
1766 return tmp === v634? v634: tmp.cdr;
1771 var string = (function(){
1773 return tmp === v634? v634: tmp.car;
1775 var index = (function(){
1777 return tmp === v634? v634: tmp.cdr;
1779 if (typeof string != 'string')
1780 throw 'The value ' + string + ' is not a type string.';
1781 if (typeof index != 'number')
1782 throw 'The value ' + index + ' is not a type number.';
1783 return string.charCodeAt(index);
1789 var l232 = f122("WHITESPACEP");
1793 return f195 = (function(v830){
1794 ((v830)["fname"] = "WHITESPACEP");
1796 })((function (v831){
1797 if (arguments.length < 1) throw 'too few arguments';
1798 if (arguments.length > 1) throw 'too many arguments';
1799 return (function(v832){
1800 return (v832 !== v634 ? v832 : (function(v833){
1801 return (v833 !== v634 ? v833 : f167(v831, 9));
1802 })(f167(v831, 10)));
1808 var l233 = f122("SKIP-WHITESPACES");
1812 return f196 = (function(v834){
1813 ((v834)["fname"] = "SKIP-WHITESPACES");
1815 })((function (v835){
1816 if (arguments.length < 1) throw 'too few arguments';
1817 if (arguments.length > 1) throw 'too many arguments';
1818 return (function(v836){
1821 while((v836 !== v634 ? f195(v836) : v634) !== v634){
1830 var l234 = f122("TERMINALP");
1834 return f197 = (function(v837){
1835 ((v837)["fname"] = "TERMINALP");
1837 })((function (v838){
1838 if (arguments.length < 1) throw 'too few arguments';
1839 if (arguments.length > 1) throw 'too many arguments';
1840 return (function(v839){
1841 return (v839 !== v634 ? v839 : (function(v840){
1842 return (v840 !== v634 ? v840 : (function(v841){
1843 return (v841 !== v634 ? v841 : f167(40, v838));
1844 })(f167(41, v838)));
1851 var l235 = f122("READ-UNTIL");
1855 return f198 = (function(v842){
1856 ((v842)["fname"] = "READ-UNTIL");
1858 })((function (v843,v844){
1859 if (arguments.length < 2) throw 'too few arguments';
1860 if (arguments.length > 2) throw 'too many arguments';
1861 return (function(v845,v846){
1864 while((v846 !== v634 ? f136((v844)(v846)) : v634) !== v634){
1865 v845 = f184(v845, (function(){
1867 if (typeof x != 'number')
1868 throw 'The value ' + x + ' is not a type number.';
1869 return String.fromCharCode(x);
1880 var l236 = f122("SKIP-WHITESPACES-AND-COMMENTS");
1884 return f199 = (function(v847){
1885 ((v847)["fname"] = "SKIP-WHITESPACES-AND-COMMENTS");
1887 })((function (v848){
1888 if (arguments.length < 1) throw 'too few arguments';
1889 if (arguments.length > 1) throw 'too many arguments';
1890 return (function(v849){
1894 while((v849 !== v634 ? f167(v849, 59) : v634) !== v634){
1895 f198(v848, (function (v850){
1896 if (arguments.length < 1) throw 'too few arguments';
1897 if (arguments.length > 1) throw 'too many arguments';
1898 return f167(v850, 10);
1908 var l237 = f122("%READ-LIST");
1912 return f200 = (function(v851){
1913 ((v851)["fname"] = "%READ-LIST");
1915 })((function (v852){
1916 if (arguments.length < 1) throw 'too few arguments';
1917 if (arguments.length > 1) throw 'too many arguments';
1919 return (function(v853){
1920 return (f120(v853) !== v634 ? (function(){
1921 return (function (){ throw "Unspected EOF";return 0;})();
1922 })() : (f167(v853, 41) !== v634 ? (function(){
1925 })() : (f167(v853, 46) !== v634 ? (function(){
1927 return (function(v854){
1929 (f167(f194(v852), 41) !== v634 ? v634 : (function(){
1930 return (function (){ throw "')' was expected.";return 0;})();
1935 return ({car: f201(v852), cdr: f200(v852)});
1942 var l238 = f122("READ-STRING");
1946 return f202 = (function(v855){
1947 ((v855)["fname"] = "READ-STRING");
1949 })((function (v856){
1950 if (arguments.length < 1) throw 'too few arguments';
1951 if (arguments.length > 1) throw 'too many arguments';
1952 return (function(v857,v858){
1955 while(f136(f135(v858, 34)) !== v634){
1956 (f120(v858) !== v634 ? (function(){
1957 return (function (){ throw "Unexpected EOF";return 0;})();
1959 (f135(v858, 92) !== v634 ? (function(){
1960 return v858 = f194(v856);
1962 v857 = f184(v857, (function(){
1964 if (typeof x != 'number')
1965 throw 'The value ' + x + ' is not a type number.';
1966 return String.fromCharCode(x);
1976 var l240 = f122("READ-SHARP");
1977 var l239 = f122("FUNCTION");
1981 return f203 = (function(v859){
1982 ((v859)["fname"] = "READ-SHARP");
1984 })((function (v860){
1985 if (arguments.length < 1) throw 'too few arguments';
1986 if (arguments.length > 1) throw 'too many arguments';
1988 return (function(v861){
1989 return (f135(v861, 39) !== v634 ? (function(){
1990 return f152(l239, f201(v860));
1991 })() : (f135(v861, 92) !== v634 ? (function(){
1992 return (function(v862){
1993 return (f183(v862, "space") !== v634 ? (function(){
1995 })() : (f183(v862, "tab") !== v634 ? (function(){
1997 })() : (f183(v862, "newline") !== v634 ? (function(){
2000 return f166((function(){
2003 if (typeof string != 'string')
2004 throw 'The value ' + string + ' is not a type string.';
2005 if (typeof index != 'number')
2006 throw 'The value ' + index + ' is not a type number.';
2007 return string.charCodeAt(index);
2010 })(f184((function(){
2012 if (typeof x != 'number')
2013 throw 'The value ' + x + ' is not a type number.';
2014 return String.fromCharCode(x);
2015 })(), f198(v860, f197)));
2016 })() : (f135(v861, 43) !== v634 ? (function(){
2017 return (function(v863){
2018 return (f183(v863, "common-lisp") !== v634 ? (function(){
2021 })() : (f183(v863, "ecmalisp") !== v634 ? (function(){
2024 return (function (){ throw "Unknown reader form.";return 0;})();
2026 })(f198(v860, f197));
2028 return (function (){ throw "ECASE expression failed.";return 0;})();
2035 var l241 = f122("*EOF*");
2039 return v864 = (function(){
2041 if (typeof name != 'string')
2042 throw 'The value ' + name + ' is not a type string.';
2043 return ({name: name});
2048 var l246 = f122("LS-READ");
2049 var l245 = f122("UNQUOTE");
2050 var l244 = f122("UNQUOTE-SPLICING");
2051 var l243 = f122("BACKQUOTE");
2052 var l242 = f122("QUOTE");
2056 return f201 = (function(v865){
2057 ((v865)["fname"] = "LS-READ");
2059 })((function (v866){
2060 if (arguments.length < 1) throw 'too few arguments';
2061 if (arguments.length > 1) throw 'too many arguments';
2063 return (function(v867){
2064 return (f120(v867) !== v634 ? (function(){
2066 })() : (f167(v867, 40) !== v634 ? (function(){
2069 })() : (f167(v867, 39) !== v634 ? (function(){
2071 return f152(l242, f201(v866));
2072 })() : (f167(v867, 96) !== v634 ? (function(){
2074 return f152(l243, f201(v866));
2075 })() : (f167(v867, 34) !== v634 ? (function(){
2078 })() : (f167(v867, 44) !== v634 ? (function(){
2080 return (f135(f193(v866), 64) !== v634 ? (function(){
2082 return f152(l244, f201(v866));
2083 })() : f152(l245, f201(v866)));
2084 })() : (f167(v867, 35) !== v634 ? (function(){
2087 return (function(v868){
2088 return (f181(f178, v868) !== v634 ? f180(v868) : f122((function(){
2090 if (typeof x != 'string')
2091 throw 'The value ' + x + ' is not a type string.';
2092 return x.toUpperCase();
2094 })(f198(v866, f197));
2101 var l247 = f122("LS-READ-FROM-STRING");
2105 return f204 = (function(v869){
2106 ((v869)["fname"] = "LS-READ-FROM-STRING");
2108 })((function (v870){
2109 if (arguments.length < 1) throw 'too few arguments';
2110 if (arguments.length > 1) throw 'too many arguments';
2111 return f201(f192(v870));
2116 var l249 = f122("*COMPILATION-UNIT-CHECKS*");
2117 var l248 = f122("NIL");
2125 var l251 = f122("*ENV*");
2126 var l250 = f122("NIL");
2134 var l253 = f122("*FENV*");
2135 var l252 = f122("NIL");
2143 var l254 = f122("MAKE-BINDING");
2147 return f205 = (function(v874){
2148 ((v874)["fname"] = "MAKE-BINDING");
2150 })((function (v875,v876,v877,v878){
2151 if (arguments.length < 4) throw 'too few arguments';
2152 if (arguments.length > 4) throw 'too many arguments';
2153 return f152(v875, v876, v877, v878);
2158 var l255 = f122("BINDING-NAME");
2162 return f206 = (function(v879){
2163 ((v879)["fname"] = "BINDING-NAME");
2165 })((function (v880){
2166 if (arguments.length < 1) throw 'too few arguments';
2167 if (arguments.length > 1) throw 'too many arguments';
2173 var l256 = f122("BINDING-TYPE");
2177 return f207 = (function(v881){
2178 ((v881)["fname"] = "BINDING-TYPE");
2180 })((function (v882){
2181 if (arguments.length < 1) throw 'too few arguments';
2182 if (arguments.length > 1) throw 'too many arguments';
2188 var l257 = f122("BINDING-TRANSLATION");
2192 return f208 = (function(v883){
2193 ((v883)["fname"] = "BINDING-TRANSLATION");
2195 })((function (v884){
2196 if (arguments.length < 1) throw 'too few arguments';
2197 if (arguments.length > 1) throw 'too many arguments';
2203 var l258 = f122("BINDING-DECLARED");
2207 return f209 = (function(v885){
2208 ((v885)["fname"] = "BINDING-DECLARED");
2210 })((function (v886){
2211 if (arguments.length < 1) throw 'too few arguments';
2212 if (arguments.length > 1) throw 'too many arguments';
2213 return (v886 !== v634 ? f151(v886) : v634);
2218 var l259 = f122("MARK-BINDING-AS-DECLARED");
2222 return f210 = (function(v887){
2223 ((v887)["fname"] = "MARK-BINDING-AS-DECLARED");
2225 })((function (v888){
2226 if (arguments.length < 1) throw 'too few arguments';
2227 if (arguments.length > 1) throw 'too many arguments';
2230 if (typeof x != 'object')
2231 throw 'The value ' + x + ' is not a type object.';
2232 return (x.car = v635);
2238 var l260 = f122("*VARIABLE-COUNTER*");
2246 var l261 = f122("GVARNAME");
2250 return f211 = (function(v890){
2251 ((v890)["fname"] = "GVARNAME");
2253 })((function (v891){
2254 if (arguments.length < 1) throw 'too few arguments';
2255 if (arguments.length > 1) throw 'too many arguments';
2256 return f184("v", f125(v889 = (function(){
2259 if (typeof x != 'number')
2260 throw 'The value ' + x + ' is not a type number.';
2261 if (typeof y != 'number')
2262 throw 'The value ' + y + ' is not a type number.';
2269 var l263 = f122("LOOKUP-VARIABLE");
2270 var l262 = f122("VARIABLE");
2274 return f212 = (function(v892){
2275 ((v892)["fname"] = "LOOKUP-VARIABLE");
2277 })((function (v893,v894){
2278 if (arguments.length < 2) throw 'too few arguments';
2279 if (arguments.length > 2) throw 'too many arguments';
2280 return (function(v895){
2281 return (v895 !== v634 ? v895 : (function(v896){
2282 return (v896 !== v634 ? v896 : (function(v897,v898){
2283 v872 = ({car: v898, cdr: v872});
2284 v871 = ({car: (function (){
2285 if (arguments.length > 0) throw 'too many arguments';
2286 return (f209(f182(v893, v872)) !== v634 ? v634 : (function(){
2287 return (function (){ throw f184("Undefined variable `", v897, "'");return 0;})();
2291 })((v893).name,f205(v893, l262, f211(v893), v634)));
2292 })(f182(v893, v872)));
2293 })(f182(v893, v894));
2298 var l264 = f122("LOOKUP-VARIABLE-TRANSLATION");
2302 return f213 = (function(v899){
2303 ((v899)["fname"] = "LOOKUP-VARIABLE-TRANSLATION");
2305 })((function (v900,v901){
2306 if (arguments.length < 2) throw 'too few arguments';
2307 if (arguments.length > 2) throw 'too many arguments';
2308 return f208(f212(v900, v901));
2313 var l266 = f122("EXTEND-LOCAL-ENV");
2314 var l265 = f122("VARIABLE");
2318 return f214 = (function(v902){
2319 ((v902)["fname"] = "EXTEND-LOCAL-ENV");
2321 })((function (v903,v904){
2322 if (arguments.length < 2) throw 'too few arguments';
2323 if (arguments.length > 2) throw 'too many arguments';
2324 return f158(f164((function (v905){
2325 if (arguments.length < 1) throw 'too few arguments';
2326 if (arguments.length > 1) throw 'too many arguments';
2327 return f205(v905, l265, f211(v905), v635);
2333 var l267 = f122("*FUNCTION-COUNTER*");
2341 var l269 = f122("LOOKUP-FUNCTION");
2342 var l268 = f122("FUNCTION");
2346 return f215 = (function(v907){
2347 ((v907)["fname"] = "LOOKUP-FUNCTION");
2349 })((function (v908,v909){
2350 if (arguments.length < 2) throw 'too few arguments';
2351 if (arguments.length > 2) throw 'too many arguments';
2352 return (function(v910){
2353 return (v910 !== v634 ? v910 : (function(v911){
2354 return (v911 !== v634 ? v911 : (function(v912,v913){
2355 v873 = ({car: v913, cdr: v873});
2356 v871 = ({car: (function (){
2357 if (arguments.length > 0) throw 'too many arguments';
2358 return (f209(f182(v908, v873)) !== v634 ? v634 : (function(){
2359 return (function (){ throw f184("Undefined function `", v912, "'");return 0;})();
2363 })((v908).name,f205(v908, l268, f184("f", f125(v906 = (function(){
2366 if (typeof x != 'number')
2367 throw 'The value ' + x + ' is not a type number.';
2368 if (typeof y != 'number')
2369 throw 'The value ' + y + ' is not a type number.';
2372 })(f182(v908, v873)));
2373 })(f182(v908, v909));
2378 var l270 = f122("LOOKUP-FUNCTION-TRANSLATION");
2382 return f216 = (function(v914){
2383 ((v914)["fname"] = "LOOKUP-FUNCTION-TRANSLATION");
2385 })((function (v915,v916){
2386 if (arguments.length < 2) throw 'too few arguments';
2387 if (arguments.length > 2) throw 'too many arguments';
2388 return f208(f215(v915, v916));
2393 var l271 = f122("*TOPLEVEL-COMPILATIONS*");
2401 var l272 = f122("%COMPILE-DEFVAR");
2405 return f217 = (function(v918){
2406 ((v918)["fname"] = "%COMPILE-DEFVAR");
2408 })((function (v919){
2409 if (arguments.length < 1) throw 'too few arguments';
2410 if (arguments.length > 1) throw 'too many arguments';
2411 return (function(v920){
2413 return v917 = ({car: f184("var ", f208(v920)), cdr: v917});
2414 })(f212(v919, v872));
2419 var l273 = f122("%COMPILE-DEFUN");
2423 return f218 = (function(v921){
2424 ((v921)["fname"] = "%COMPILE-DEFUN");
2426 })((function (v922){
2427 if (arguments.length < 1) throw 'too few arguments';
2428 if (arguments.length > 1) throw 'too many arguments';
2429 return (function(v923){
2431 return v917 = ({car: f184("var ", f208(v923)), cdr: v917});
2432 })(f215(v922, v873));
2437 var l275 = f122("%COMPILE-DEFMACRO");
2438 var l274 = f122("MACRO");
2442 return f219 = (function(v924){
2443 ((v924)["fname"] = "%COMPILE-DEFMACRO");
2445 })((function (v925,v926){
2446 if (arguments.length < 2) throw 'too few arguments';
2447 if (arguments.length > 2) throw 'too many arguments';
2448 return v873 = ({car: f205(v925, l274, v926, v635), cdr: v873});
2453 var l276 = f122("*COMPILATIONS*");
2461 var l277 = f122("LS-COMPILE-BLOCK");
2465 return f220 = (function(v928){
2466 ((v928)["fname"] = "LS-COMPILE-BLOCK");
2468 })((function (v929,v930,v931){
2469 if (arguments.length < 3) throw 'too few arguments';
2470 if (arguments.length > 3) throw 'too many arguments';
2471 return f186(f176((function (v932){
2472 if (arguments.length < 1) throw 'too few arguments';
2473 if (arguments.length > 1) throw 'too many arguments';
2474 return (function(v933){
2475 return (v933 !== v634 ? v933 : (((typeof(v932) == "string")?v635: v634) !== v634 ? f133(f162(v932)) : v634));
2477 }), f164((function (v934){
2478 if (arguments.length < 1) throw 'too few arguments';
2479 if (arguments.length > 1) throw 'too many arguments';
2480 return f221(v934, v930, v931);
2481 }), v929)), f184(";", v796));
2486 var l278 = f122("IF");
2487 v927 = ({car: f152(l278, (function (v935,v936,v937,v938,v939){
2488 if (arguments.length < 5) throw 'too few arguments';
2489 if (arguments.length > 5) throw 'too many arguments';
2490 return f184("(", f221(v937, v935, v936), " !== ", f221(v634, v634, v634), " ? ", f221(v938, v935, v936), " : ", f221(v939, v935, v936), ")");
2492 var l280 = f122("*LAMBDA-LIST-KEYWORDS*");
2493 var l279 = {car: f122("&OPTIONAL"), cdr: {car: f122("&REST"), cdr: f122("NIL")}};
2501 var l281 = f122("LIST-UNTIL-KEYWORD");
2505 return f222 = (function(v941){
2506 ((v941)["fname"] = "LIST-UNTIL-KEYWORD");
2508 })((function (v942){
2509 if (arguments.length < 1) throw 'too few arguments';
2510 if (arguments.length > 1) throw 'too many arguments';
2511 return ((function(v943){
2512 return (v943 !== v634 ? v943 : f174((function(){
2514 return tmp === v634? v634: tmp.car;
2516 })(f120(v942)) !== v634 ? v634 : ({car: (function(){
2518 return tmp === v634? v634: tmp.car;
2519 })(), cdr: f222((function(){
2521 return tmp === v634? v634: tmp.cdr;
2527 var l282 = f122("LAMBDA-LIST-REQUIRED-ARGUMENTS");
2531 return f223 = (function(v944){
2532 ((v944)["fname"] = "LAMBDA-LIST-REQUIRED-ARGUMENTS");
2534 })((function (v945){
2535 if (arguments.length < 1) throw 'too few arguments';
2536 if (arguments.length > 1) throw 'too many arguments';
2542 var l284 = f122("LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT");
2543 var l283 = f122("&OPTIONAL");
2547 return f224 = (function(v946){
2548 ((v946)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT");
2550 })((function (v947){
2551 if (arguments.length < 1) throw 'too few arguments';
2552 if (arguments.length > 1) throw 'too many arguments';
2553 return f164(f154, f222((function(){
2554 var tmp = f174(l283, v947);
2555 return tmp === v634? v634: tmp.cdr;
2561 var l285 = f122("LAMBDA-LIST-OPTIONAL-ARGUMENTS");
2565 return f225 = (function(v948){
2566 ((v948)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS");
2568 })((function (v949){
2569 if (arguments.length < 1) throw 'too few arguments';
2570 if (arguments.length > 1) throw 'too many arguments';
2571 return f164(f139, f224(v949));
2576 var l287 = f122("LAMBDA-LIST-REST-ARGUMENT");
2577 var l286 = f122("&REST");
2581 return f226 = (function(v950){
2582 ((v950)["fname"] = "LAMBDA-LIST-REST-ARGUMENT");
2584 })((function (v951){
2585 if (arguments.length < 1) throw 'too few arguments';
2586 if (arguments.length > 1) throw 'too many arguments';
2587 return (function(v952){
2590 return tmp === v634? v634: tmp.cdr;
2591 })() !== v634 ? (function(){
2592 return (function (){ throw "Bad lambda-list";return 0;})();
2596 return tmp === v634? v634: tmp.car;
2598 })(f222((function(){
2599 var tmp = f174(l286, v951);
2600 return tmp === v634? v634: tmp.cdr;
2606 var l288 = f122("LAMBDA");
2607 v927 = ({car: f152(l288, (function (v954,v955,v956){
2608 if (arguments.length < 3) throw 'too few arguments';
2610 for (var i = arguments.length-1; i>=3; i--)
2611 v953 = {car: arguments[i], cdr: v953};
2612 return (function(v957,v958,v959){
2613 return (function(v960,v961,v962){
2614 return f184("(function (", f185(f164((function (v963){
2615 if (arguments.length < 1) throw 'too few arguments';
2616 if (arguments.length > 1) throw 'too many arguments';
2617 return f213(v963, v962);
2618 }), f158(v957, v958)), ","), "){", v796, f187((v957 !== v634 ? f184("if (arguments.length < ", f125(v960), ") throw 'too few arguments';", v796) : ""), (f136(v959) !== v634 ? f184("if (arguments.length > ", f125((function(){
2621 if (typeof x != 'number')
2622 throw 'The value ' + x + ' is not a type number.';
2623 if (typeof y != 'number')
2624 throw 'The value ' + y + ' is not a type number.';
2626 })()), ") throw 'too many arguments';", v796) : ""), (v958 !== v634 ? f184("switch(arguments.length){", v796, (function(v964,v965,v966){
2632 if (typeof x != 'number')
2633 throw 'The value ' + x + ' is not a type number.';
2634 if (typeof y != 'number')
2635 throw 'The value ' + y + ' is not a type number.';
2637 })()?v635: v634) !== v634){
2639 v965 = ({car: f184("case ", f125((function(){
2642 if (typeof x != 'number')
2643 throw 'The value ' + x + ' is not a type number.';
2644 if (typeof y != 'number')
2645 throw 'The value ' + y + ' is not a type number.';
2647 })()), ":", v796, f213((function(){
2649 return tmp === v634? v634: tmp.car;
2650 })(), v962), "=", f221(f142(v967), v962, v955), ";", v796), cdr: v965});
2651 return v966 = (function(){
2654 if (typeof x != 'number')
2655 throw 'The value ' + x + ' is not a type number.';
2656 if (typeof y != 'number')
2657 throw 'The value ' + y + ' is not a type number.';
2660 })(f171(v966, v964));
2662 v965 = ({car: f184("default: break;", v796), cdr: v965});
2663 return f185(f160(v965));
2665 })(f224(v956),v634,0), "}", v796) : ""), (v959 !== v634 ? (function(v968){
2666 return f184("var ", v968, "= ", f221(v634, v954, v955), ";", v796, "for (var i = arguments.length-1; i>=", f125((function(){
2669 if (typeof x != 'number')
2670 throw 'The value ' + x + ' is not a type number.';
2671 if (typeof y != 'number')
2672 throw 'The value ' + y + ' is not a type number.';
2674 })()), "; i--)", v796, f187(v968, " = ", "{car: arguments[i], cdr: "), v968, "};", v796);
2675 })(f213(v959, v962)) : ""), f184(f220(f173(v953), v962, v955), "return ", f221((function(){
2676 var tmp = f172(v953);
2677 return tmp === v634? v634: tmp.car;
2678 })(), v962, v955), ";")), v796, "})");
2679 })(f162(v957),f162(v958),f214(f158(f154(v959), v957, v958), v954));
2680 })(f223(v956),f225(v956),f226(v956));
2682 var l289 = f122("FSETQ");
2683 v927 = ({car: f152(l289, (function (v969,v970,v971,v972){
2684 if (arguments.length < 4) throw 'too few arguments';
2685 if (arguments.length > 4) throw 'too many arguments';
2686 return f184(f216(v971, v970), " = ", f221(v972, v969, v970));
2688 var l290 = f122("SETQ");
2689 v927 = ({car: f152(l290, (function (v973,v974,v975,v976){
2690 if (arguments.length < 4) throw 'too few arguments';
2691 if (arguments.length > 4) throw 'too many arguments';
2692 return f184(f213(v975, v973), " = ", f221(v976, v973, v974));
2694 var l291 = f122("ESCAPE-STRING");
2698 return f189 = (function(v977){
2699 ((v977)["fname"] = "ESCAPE-STRING");
2701 })((function (v978){
2702 if (arguments.length < 1) throw 'too few arguments';
2703 if (arguments.length > 1) throw 'too many arguments';
2704 return (function(v979,v980,v981){
2709 if (typeof x != 'number')
2710 throw 'The value ' + x + ' is not a type number.';
2711 if (typeof y != 'number')
2712 throw 'The value ' + y + ' is not a type number.';
2714 })()?v635: v634) !== v634){
2717 return (v983 !== v634 ? v983 : f167(v982, 92));
2718 })(f167(v982, 34)) !== v634 ? (function(){
2719 return v979 = f184(v979, "\\");
2721 (f167(v982, 10) !== v634 ? (function(){
2722 v979 = f184(v979, "\\");
2725 return v979 = f184(v979, (function(){
2727 if (typeof x != 'number')
2728 throw 'The value ' + x + ' is not a type number.';
2729 return String.fromCharCode(x);
2734 if (typeof string != 'string')
2735 throw 'The value ' + string + ' is not a type string.';
2736 if (typeof index != 'number')
2737 throw 'The value ' + index + ' is not a type number.';
2738 return string.charCodeAt(index);
2743 if (typeof x != 'number')
2744 throw 'The value ' + x + ' is not a type number.';
2745 if (typeof y != 'number')
2746 throw 'The value ' + y + ' is not a type number.';
2751 })("",0,f162(v978));
2756 var l293 = f122("LITERAL->JS");
2757 var l292 = f122("INTERN");
2761 return f227 = (function(v984){
2762 ((v984)["fname"] = "LITERAL->JS");
2764 })((function (v985){
2765 if (arguments.length < 1) throw 'too few arguments';
2766 if (arguments.length > 1) throw 'too many arguments';
2767 return (f168(v985) !== v634 ? (function(){
2769 })() : (((typeof(v985) == "string")?v635: v634) !== v634 ? (function(){
2770 return f184("\"", f189(v985), "\"");
2771 })() : (((function(){
2773 return (typeof tmp == 'object' && 'name' in tmp);
2774 })()?v635: v634) !== v634 ? (function(){
2775 return f221(f158(f152(l292), f152(f189((v985).name))), v872, v873);
2776 })() : (((function(){
2778 return (typeof tmp == 'object' && 'car' in tmp);
2779 })()?v635: v634) !== v634 ? (function(){
2780 return f184("{car: ", f227((function(){
2782 return tmp === v634? v634: tmp.car;
2783 })()), ", cdr: ", f227((function(){
2785 return tmp === v634? v634: tmp.cdr;
2792 var l294 = f122("*LITERAL-COUNTER*");
2800 var l295 = f122("LITERAL");
2804 return f228 = (function(v987){
2805 ((v987)["fname"] = "LITERAL");
2807 })((function (v988){
2808 if (arguments.length < 1) throw 'too few arguments';
2809 if (arguments.length > 1) throw 'too many arguments';
2810 return (function(v989){
2811 v917 = ({car: f184("var ", v989, " = ", f227(v988)), cdr: v917});
2813 })(f184("l", f125(v986 = (function(){
2816 if (typeof x != 'number')
2817 throw 'The value ' + x + ' is not a type number.';
2818 if (typeof y != 'number')
2819 throw 'The value ' + y + ' is not a type number.';
2826 var l296 = f122("QUOTE");
2827 v927 = ({car: f152(l296, (function (v990,v991,v992){
2828 if (arguments.length < 3) throw 'too few arguments';
2829 if (arguments.length > 3) throw 'too many arguments';
2832 var l297 = f122("WHILE");
2833 v927 = ({car: f152(l297, (function (v994,v995,v996){
2834 if (arguments.length < 3) throw 'too few arguments';
2836 for (var i = arguments.length-1; i>=3; i--)
2837 v993 = {car: arguments[i], cdr: v993};
2838 return f184("(function(){", v796, f187("while(", f221(v996, v994, v995), " !== ", f221(v634, v634, v634), "){", v796, f187(f220(v993, v994, v995))), "}})()");
2840 var l299 = f122("LAMBDA");
2841 var l298 = f122("FUNCTION");
2842 v927 = ({car: f152(l298, (function (v997,v998,v999){
2843 if (arguments.length < 3) throw 'too few arguments';
2844 if (arguments.length > 3) throw 'too many arguments';
2845 return ((f155(v999) !== v634 ? (((function(){
2847 return tmp === v634? v634: tmp.car;
2848 })() === l299)?v635: v634) : v634) !== v634 ? (function(){
2849 return f221(v999, v997, v998);
2850 })() : (((function(){
2852 return (typeof tmp == 'object' && 'name' in tmp);
2853 })()?v635: v634) !== v634 ? (function(){
2854 return f216(v999, v998);
2857 var l301 = f122("PROGN");
2858 var l300 = f122("EVAL-WHEN-COMPILE");
2859 v927 = ({car: f152(l300, (function (v1001,v1002){
2860 if (arguments.length < 2) throw 'too few arguments';
2862 for (var i = arguments.length-1; i>=2; i--)
2863 v1000 = {car: arguments[i], cdr: v1000};
2864 f229(({car: l301, cdr: v1000}));
2867 var l302 = f122("PROGN");
2868 v927 = ({car: f152(l302, (function (v1004,v1005){
2869 if (arguments.length < 2) throw 'too few arguments';
2871 for (var i = arguments.length-1; i>=2; i--)
2872 v1003 = {car: arguments[i], cdr: v1003};
2873 return f184("(function(){", v796, f187(f220(f173(v1003), v1004, v1005), "return ", f221((function(){
2874 var tmp = f172(v1003);
2875 return tmp === v634? v634: tmp.car;
2876 })(), v1004, v1005), ";", v796), "})()");
2878 var l303 = f122("LET");
2879 v927 = ({car: f152(l303, (function (v1007,v1008,v1009){
2880 if (arguments.length < 3) throw 'too few arguments';
2882 for (var i = arguments.length-1; i>=3; i--)
2883 v1006 = {car: arguments[i], cdr: v1006};
2884 return (function(v1010){
2885 return (function(v1011,v1012){
2886 return (function(v1013){
2887 return f184("(function(", f185(f164((function (v1014){
2888 if (arguments.length < 1) throw 'too few arguments';
2889 if (arguments.length > 1) throw 'too many arguments';
2890 return f213(v1014, v1013);
2891 }), v1011), ","), "){", v796, f187(f220(f173(v1006), v1013, v1008), "return ", f221((function(){
2892 var tmp = f172(v1006);
2893 return tmp === v634? v634: tmp.car;
2894 })(), v1013, v1008), ";", v796), "})(", f185(f164((function (v1015){
2895 if (arguments.length < 1) throw 'too few arguments';
2896 if (arguments.length > 1) throw 'too many arguments';
2897 return f221(v1015, v1007, v1008);
2898 }), v1012), ","), ")");
2899 })(f214(v1011, v1007));
2900 })(f164(f148, v1010),f164(f149, v1010));
2901 })(f164(f154, v1009));
2903 var l312 = f122("BACKQUOTE-EXPAND-1");
2904 var l311 = f122("LIST");
2905 var l310 = f122("UNQUOTE-SPLICING");
2906 var l309 = f122("LIST");
2907 var l308 = f122("UNQUOTE");
2908 var l307 = f122("APPEND");
2909 var l306 = f122("BACKQUOTE");
2910 var l305 = f122("UNQUOTE");
2911 var l304 = f122("QUOTE");
2915 return f230 = (function(v1016){
2916 ((v1016)["fname"] = "BACKQUOTE-EXPAND-1");
2918 })((function (v1017){
2919 if (arguments.length < 1) throw 'too few arguments';
2920 if (arguments.length > 1) throw 'too many arguments';
2921 return (((function(){
2923 return (typeof tmp == 'object' && 'name' in tmp);
2924 })()?v635: v634) !== v634 ? (function(){
2925 return f152(l304, v1017);
2926 })() : (f153(v1017) !== v634 ? (function(){
2928 })() : ((((function(){
2930 return tmp === v634? v634: tmp.car;
2931 })() === l305)?v635: v634) !== v634 ? (function(){
2934 return tmp === v634? v634: tmp.car;
2936 })() : ((((function(){
2938 return tmp === v634? v634: tmp.car;
2939 })() === l306)?v635: v634) !== v634 ? (function(){
2940 return f230(f230(f142(v1017)));
2942 return ({car: l307, cdr: f164((function (v1018){
2943 if (arguments.length < 1) throw 'too few arguments';
2944 if (arguments.length > 1) throw 'too many arguments';
2945 return ((f155(v1018) !== v634 ? (((function(){
2947 return tmp === v634? v634: tmp.car;
2948 })() === l308)?v635: v634) : v634) !== v634 ? (function(){
2949 return f152(l309, f142(v1018));
2950 })() : ((f155(v1018) !== v634 ? (((function(){
2952 return tmp === v634? v634: tmp.car;
2953 })() === l310)?v635: v634) : v634) !== v634 ? (function(){
2956 return f152(l311, f230(v1018));
2964 var l314 = f122("BACKQUOTE-EXPAND");
2965 var l313 = f122("BACKQUOTE");
2969 return f231 = (function(v1019){
2970 ((v1019)["fname"] = "BACKQUOTE-EXPAND");
2972 })((function (v1020){
2973 if (arguments.length < 1) throw 'too few arguments';
2974 if (arguments.length > 1) throw 'too many arguments';
2975 return ((f155(v1020) !== v634 ? (((function(){
2977 return tmp === v634? v634: tmp.car;
2978 })() === l313)?v635: v634) : v634) !== v634 ? f230(f142(v1020)) : v1020);
2983 var l315 = f122("BACKQUOTE");
2984 v927 = ({car: f152(l315, (function (v1021,v1022,v1023){
2985 if (arguments.length < 3) throw 'too few arguments';
2986 if (arguments.length > 3) throw 'too many arguments';
2987 return f221(f230(v1023), v1021, v1022);
2989 var l316 = f122("COMPILE-BOOL");
2993 return f232 = (function(v1024){
2994 ((v1024)["fname"] = "COMPILE-BOOL");
2996 })((function (v1025){
2997 if (arguments.length < 1) throw 'too few arguments';
2998 if (arguments.length > 1) throw 'too many arguments';
2999 return f184("(", v1025, "?", f221(v635, v634, v634), ": ", f221(v634, v634, v634), ")");
3004 var l317 = f122("NUM-OP-NUM");
3008 return f233 = (function(v1026){
3009 ((v1026)["fname"] = "NUM-OP-NUM");
3011 })((function (v1027,v1028,v1029){
3012 if (arguments.length < 3) throw 'too few arguments';
3013 if (arguments.length > 3) throw 'too many arguments';
3014 return f184("(function(){", v796, f187(f184("var ", "x", " = ", v1027, ";", v796), f184("var ", "y", " = ", v1029, ";", v796), f184("if (typeof ", "x", " != '", "number", "')", v796, f187("throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", v796)), f184("if (typeof ", "y", " != '", "number", "')", v796, f187("throw 'The value ' + ", "y", " + ' is not a type ", "number", ".';", v796)), f184("return ", (function(){
3015 return f184("x", v1028, "y");
3016 })(), ";", v796)), "})()");
3021 var l318 = f122("+");
3022 v927 = ({car: f152(l318, (function (v1030,v1031,v1032,v1033){
3023 if (arguments.length < 4) throw 'too few arguments';
3024 if (arguments.length > 4) throw 'too many arguments';
3025 return (function(v1034,v1035){
3026 return f233(v1034, "+", v1035);
3027 })(f221(v1032, v1030, v1031),f221(v1033, v1030, v1031));
3029 var l319 = f122("-");
3030 v927 = ({car: f152(l319, (function (v1036,v1037,v1038,v1039){
3031 if (arguments.length < 4) throw 'too few arguments';
3032 if (arguments.length > 4) throw 'too many arguments';
3033 return (function(v1040,v1041){
3034 return f233(v1040, "-", v1041);
3035 })(f221(v1038, v1036, v1037),f221(v1039, v1036, v1037));
3037 var l320 = f122("*");
3038 v927 = ({car: f152(l320, (function (v1042,v1043,v1044,v1045){
3039 if (arguments.length < 4) throw 'too few arguments';
3040 if (arguments.length > 4) throw 'too many arguments';
3041 return (function(v1046,v1047){
3042 return f233(v1046, "*", v1047);
3043 })(f221(v1044, v1042, v1043),f221(v1045, v1042, v1043));
3045 var l321 = f122("/");
3046 v927 = ({car: f152(l321, (function (v1048,v1049,v1050,v1051){
3047 if (arguments.length < 4) throw 'too few arguments';
3048 if (arguments.length > 4) throw 'too many arguments';
3049 return (function(v1052,v1053){
3050 return f233(v1052, "/", v1053);
3051 })(f221(v1050, v1048, v1049),f221(v1051, v1048, v1049));
3053 var l322 = f122("MOD");
3054 v927 = ({car: f152(l322, (function (v1054,v1055,v1056,v1057){
3055 if (arguments.length < 4) throw 'too few arguments';
3056 if (arguments.length > 4) throw 'too many arguments';
3057 return (function(v1058,v1059){
3058 return f233(v1058, "%", v1059);
3059 })(f221(v1056, v1054, v1055),f221(v1057, v1054, v1055));
3061 var l323 = f122("<");
3062 v927 = ({car: f152(l323, (function (v1060,v1061,v1062,v1063){
3063 if (arguments.length < 4) throw 'too few arguments';
3064 if (arguments.length > 4) throw 'too many arguments';
3065 return (function(v1064,v1065){
3066 return f232(f233(v1064, "<", v1065));
3067 })(f221(v1062, v1060, v1061),f221(v1063, v1060, v1061));
3069 var l324 = f122(">");
3070 v927 = ({car: f152(l324, (function (v1066,v1067,v1068,v1069){
3071 if (arguments.length < 4) throw 'too few arguments';
3072 if (arguments.length > 4) throw 'too many arguments';
3073 return (function(v1070,v1071){
3074 return f232(f233(v1070, ">", v1071));
3075 })(f221(v1068, v1066, v1067),f221(v1069, v1066, v1067));
3077 var l325 = f122("=");
3078 v927 = ({car: f152(l325, (function (v1072,v1073,v1074,v1075){
3079 if (arguments.length < 4) throw 'too few arguments';
3080 if (arguments.length > 4) throw 'too many arguments';
3081 return (function(v1076,v1077){
3082 return f232(f233(v1076, "==", v1077));
3083 })(f221(v1074, v1072, v1073),f221(v1075, v1072, v1073));
3085 var l326 = f122("<=");
3086 v927 = ({car: f152(l326, (function (v1078,v1079,v1080,v1081){
3087 if (arguments.length < 4) throw 'too few arguments';
3088 if (arguments.length > 4) throw 'too many arguments';
3089 return (function(v1082,v1083){
3090 return f232(f233(v1082, "<=", v1083));
3091 })(f221(v1080, v1078, v1079),f221(v1081, v1078, v1079));
3093 var l327 = f122(">=");
3094 v927 = ({car: f152(l327, (function (v1084,v1085,v1086,v1087){
3095 if (arguments.length < 4) throw 'too few arguments';
3096 if (arguments.length > 4) throw 'too many arguments';
3097 return (function(v1088,v1089){
3098 return f232(f233(v1088, ">=", v1089));
3099 })(f221(v1086, v1084, v1085),f221(v1087, v1084, v1085));
3101 var l328 = f122("NUMBERP");
3102 v927 = ({car: f152(l328, (function (v1090,v1091,v1092){
3103 if (arguments.length < 3) throw 'too few arguments';
3104 if (arguments.length > 3) throw 'too many arguments';
3105 return (function(v1093){
3106 return f232(f184("(typeof (", v1093, ") == \"number\")"));
3107 })(f221(v1092, v1090, v1091));
3109 var l329 = f122("FLOOR");
3110 v927 = ({car: f152(l329, (function (v1094,v1095,v1096){
3111 if (arguments.length < 3) throw 'too few arguments';
3112 if (arguments.length > 3) throw 'too many arguments';
3113 return (function(v1097){
3114 return f184("(function(){", v796, f187(f184("var ", "x", " = ", v1097, ";", v796), f184("if (typeof ", "x", " != '", "number", "')", v796, f187("throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", v796)), f184("return ", (function(){
3115 return "Math.floor(x)";
3116 })(), ";", v796)), "})()");
3117 })(f221(v1096, v1094, v1095));
3119 var l330 = f122("CONS");
3120 v927 = ({car: f152(l330, (function (v1098,v1099,v1100,v1101){
3121 if (arguments.length < 4) throw 'too few arguments';
3122 if (arguments.length > 4) throw 'too many arguments';
3123 return (function(v1102,v1103){
3124 return f184("({car: ", v1102, ", cdr: ", v1103, "})");
3125 })(f221(v1100, v1098, v1099),f221(v1101, v1098, v1099));
3127 var l331 = f122("CONSP");
3128 v927 = ({car: f152(l331, (function (v1104,v1105,v1106){
3129 if (arguments.length < 3) throw 'too few arguments';
3130 if (arguments.length > 3) throw 'too many arguments';
3131 return (function(v1107){
3132 return f232(f184("(function(){", v796, f187("var tmp = ", v1107, ";", v796, "return (typeof tmp == 'object' && 'car' in tmp);", v796), "})()"));
3133 })(f221(v1106, v1104, v1105));
3135 var l332 = f122("CAR");
3136 v927 = ({car: f152(l332, (function (v1108,v1109,v1110){
3137 if (arguments.length < 3) throw 'too few arguments';
3138 if (arguments.length > 3) throw 'too many arguments';
3139 return (function(v1111){
3140 return f184("(function(){", v796, f187("var tmp = ", v1111, ";", v796, "return tmp === ", f221(v634, v634, v634), "? ", f221(v634, v634, v634), ": tmp.car;", v796), "})()");
3141 })(f221(v1110, v1108, v1109));
3143 var l333 = f122("CDR");
3144 v927 = ({car: f152(l333, (function (v1112,v1113,v1114){
3145 if (arguments.length < 3) throw 'too few arguments';
3146 if (arguments.length > 3) throw 'too many arguments';
3147 return (function(v1115){
3148 return f184("(function(){", v796, f187("var tmp = ", v1115, ";", v796, "return tmp === ", f221(v634, v634, v634), "? ", f221(v634, v634, v634), ": tmp.cdr;", v796), "})()");
3149 })(f221(v1114, v1112, v1113));
3151 var l334 = f122("SETCAR");
3152 v927 = ({car: f152(l334, (function (v1116,v1117,v1118,v1119){
3153 if (arguments.length < 4) throw 'too few arguments';
3154 if (arguments.length > 4) throw 'too many arguments';
3155 return (function(v1120,v1121){
3156 return f184("(function(){", v796, f187(f184("var ", "x", " = ", v1120, ";", v796), f184("if (typeof ", "x", " != '", "object", "')", v796, f187("throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", v796)), f184("return ", (function(){
3157 return f184("(x.car = ", v1121, ")");
3158 })(), ";", v796)), "})()");
3159 })(f221(v1118, v1116, v1117),f221(v1119, v1116, v1117));
3161 var l335 = f122("SETCDR");
3162 v927 = ({car: f152(l335, (function (v1122,v1123,v1124,v1125){
3163 if (arguments.length < 4) throw 'too few arguments';
3164 if (arguments.length > 4) throw 'too many arguments';
3165 return (function(v1126,v1127){
3166 return f184("(function(){", v796, f187(f184("var ", "x", " = ", v1126, ";", v796), f184("if (typeof ", "x", " != '", "object", "')", v796, f187("throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", v796)), f184("return ", (function(){
3167 return f184("(x.cdr = ", v1127, ")");
3168 })(), ";", v796)), "})()");
3169 })(f221(v1124, v1122, v1123),f221(v1125, v1122, v1123));
3171 var l336 = f122("SYMBOLP");
3172 v927 = ({car: f152(l336, (function (v1128,v1129,v1130){
3173 if (arguments.length < 3) throw 'too few arguments';
3174 if (arguments.length > 3) throw 'too many arguments';
3175 return (function(v1131){
3176 return f232(f184("(function(){", v796, f187("var tmp = ", v1131, ";", v796, "return (typeof tmp == 'object' && 'name' in tmp);", v796), "})()"));
3177 })(f221(v1130, v1128, v1129));
3179 var l337 = f122("MAKE-SYMBOL");
3180 v927 = ({car: f152(l337, (function (v1132,v1133,v1134){
3181 if (arguments.length < 3) throw 'too few arguments';
3182 if (arguments.length > 3) throw 'too many arguments';
3183 return (function(v1135){
3184 return f184("(function(){", v796, f187(f184("var ", "name", " = ", v1135, ";", v796), f184("if (typeof ", "name", " != '", "string", "')", v796, f187("throw 'The value ' + ", "name", " + ' is not a type ", "string", ".';", v796)), f184("return ", (function(){
3185 return "({name: name})";
3186 })(), ";", v796)), "})()");
3187 })(f221(v1134, v1132, v1133));
3189 var l338 = f122("SYMBOL-NAME");
3190 v927 = ({car: f152(l338, (function (v1136,v1137,v1138){
3191 if (arguments.length < 3) throw 'too few arguments';
3192 if (arguments.length > 3) throw 'too many arguments';
3193 return (function(v1139){
3194 return f184("(", v1139, ").name");
3195 })(f221(v1138, v1136, v1137));
3197 var l339 = f122("EQ");
3198 v927 = ({car: f152(l339, (function (v1140,v1141,v1142,v1143){
3199 if (arguments.length < 4) throw 'too few arguments';
3200 if (arguments.length > 4) throw 'too many arguments';
3201 return (function(v1144,v1145){
3202 return f232(f184("(", v1144, " === ", v1145, ")"));
3203 })(f221(v1142, v1140, v1141),f221(v1143, v1140, v1141));
3205 var l340 = f122("EQUAL");
3206 v927 = ({car: f152(l340, (function (v1146,v1147,v1148,v1149){
3207 if (arguments.length < 4) throw 'too few arguments';
3208 if (arguments.length > 4) throw 'too many arguments';
3209 return (function(v1150,v1151){
3210 return f232(f184("(", v1150, " == ", v1151, ")"));
3211 })(f221(v1148, v1146, v1147),f221(v1149, v1146, v1147));
3213 var l341 = f122("STRING");
3214 v927 = ({car: f152(l341, (function (v1152,v1153,v1154){
3215 if (arguments.length < 3) throw 'too few arguments';
3216 if (arguments.length > 3) throw 'too many arguments';
3217 return (function(v1155){
3218 return f184("(function(){", v796, f187(f184("var ", "x", " = ", v1155, ";", v796), f184("if (typeof ", "x", " != '", "number", "')", v796, f187("throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", v796)), f184("return ", (function(){
3219 return "String.fromCharCode(x)";
3220 })(), ";", v796)), "})()");
3221 })(f221(v1154, v1152, v1153));
3223 var l342 = f122("STRINGP");
3224 v927 = ({car: f152(l342, (function (v1156,v1157,v1158){
3225 if (arguments.length < 3) throw 'too few arguments';
3226 if (arguments.length > 3) throw 'too many arguments';
3227 return (function(v1159){
3228 return f232(f184("(typeof(", v1159, ") == \"string\")"));
3229 })(f221(v1158, v1156, v1157));
3231 var l343 = f122("STRING-UPCASE");
3232 v927 = ({car: f152(l343, (function (v1160,v1161,v1162){
3233 if (arguments.length < 3) throw 'too few arguments';
3234 if (arguments.length > 3) throw 'too many arguments';
3235 return (function(v1163){
3236 return f184("(function(){", v796, f187(f184("var ", "x", " = ", v1163, ";", v796), f184("if (typeof ", "x", " != '", "string", "')", v796, f187("throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", v796)), f184("return ", (function(){
3237 return "x.toUpperCase()";
3238 })(), ";", v796)), "})()");
3239 })(f221(v1162, v1160, v1161));
3241 var l344 = f122("STRING-LENGTH");
3242 v927 = ({car: f152(l344, (function (v1164,v1165,v1166){
3243 if (arguments.length < 3) throw 'too few arguments';
3244 if (arguments.length > 3) throw 'too many arguments';
3245 return (function(v1167){
3246 return f184("(function(){", v796, f187(f184("var ", "x", " = ", v1167, ";", v796), f184("if (typeof ", "x", " != '", "string", "')", v796, f187("throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", v796)), f184("return ", (function(){
3248 })(), ";", v796)), "})()");
3249 })(f221(v1166, v1164, v1165));
3251 var l345 = f122("SLICE");
3252 v927 = ({car: f152(l345, (function (v1168,v1169,v1170,v1171,v1172){
3253 if (arguments.length < 4) throw 'too few arguments';
3254 if (arguments.length > 5) throw 'too many arguments';
3255 switch(arguments.length){
3260 return f184("(function(){", v796, f187("var str = ", f221(v1170, v1168, v1169), ";", v796, "var a = ", f221(v1171, v1168, v1169), ";", v796, "var b;", v796, (v1172 !== v634 ? f184("b = ", f221(v1172, v1168, v1169), ";", v796) : ""), "return str.slice(a,b);", v796), "})()");
3262 var l346 = f122("CHAR");
3263 v927 = ({car: f152(l346, (function (v1173,v1174,v1175,v1176){
3264 if (arguments.length < 4) throw 'too few arguments';
3265 if (arguments.length > 4) throw 'too many arguments';
3266 return (function(v1177,v1178){
3267 return f184("(function(){", v796, f187(f184("var ", "string", " = ", v1177, ";", v796), f184("var ", "index", " = ", v1178, ";", v796), f184("if (typeof ", "string", " != '", "string", "')", v796, f187("throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", v796)), f184("if (typeof ", "index", " != '", "number", "')", v796, f187("throw 'The value ' + ", "index", " + ' is not a type ", "number", ".';", v796)), f184("return ", (function(){
3268 return "string.charCodeAt(index)";
3269 })(), ";", v796)), "})()");
3270 })(f221(v1175, v1173, v1174),f221(v1176, v1173, v1174));
3272 var l347 = f122("CONCAT-TWO");
3273 v927 = ({car: f152(l347, (function (v1179,v1180,v1181,v1182){
3274 if (arguments.length < 4) throw 'too few arguments';
3275 if (arguments.length > 4) throw 'too many arguments';
3276 return (function(v1183,v1184){
3277 return f184("(function(){", v796, f187(f184("var ", "string1", " = ", v1183, ";", v796), f184("var ", "string2", " = ", v1184, ";", v796), f184("if (typeof ", "string1", " != '", "string", "')", v796, f187("throw 'The value ' + ", "string1", " + ' is not a type ", "string", ".';", v796)), f184("if (typeof ", "string2", " != '", "string", "')", v796, f187("throw 'The value ' + ", "string2", " + ' is not a type ", "string", ".';", v796)), f184("return ", (function(){
3278 return "string1.concat(string2)";
3279 })(), ";", v796)), "})()");
3280 })(f221(v1181, v1179, v1180),f221(v1182, v1179, v1180));
3282 var l348 = f122("FUNCALL");
3283 v927 = ({car: f152(l348, (function (v1186,v1187,v1188){
3284 if (arguments.length < 3) throw 'too few arguments';
3286 for (var i = arguments.length-1; i>=3; i--)
3287 v1185 = {car: arguments[i], cdr: v1185};
3288 return f184("(", f221(v1188, v1186, v1187), ")(", f185(f164((function (v1189){
3289 if (arguments.length < 1) throw 'too few arguments';
3290 if (arguments.length > 1) throw 'too many arguments';
3291 return f221(v1189, v1186, v1187);
3292 }), v1185), ", "), ")");
3294 var l349 = f122("APPLY");
3295 v927 = ({car: f152(l349, (function (v1191,v1192,v1193){
3296 if (arguments.length < 3) throw 'too few arguments';
3298 for (var i = arguments.length-1; i>=3; i--)
3299 v1190 = {car: arguments[i], cdr: v1190};
3300 return (f120(v1190) !== v634 ? f184("(", f221(v1193, v1191, v1192), ")()") : (function(v1194,v1195){
3301 return f184("(function(){", v796, f187("var f = ", f221(v1193, v1191, v1192), ";", v796, "var args = [", f185(f164((function (v1196){
3302 if (arguments.length < 1) throw 'too few arguments';
3303 if (arguments.length > 1) throw 'too many arguments';
3304 return f221(v1196, v1191, v1192);
3305 }), v1194), ", "), "];", v796, "var tail = (", f221(v1195, v1191, v1192), ");", v796, f187("while (tail != ", f221(v634, v1191, v1192), "){", v796, " args.push(tail.car);", v796, " tail = tail.cdr;", v796, "}", v796, "return f.apply(this, args);", v796), "})()"));
3306 })(f173(v1190),(function(){
3307 var tmp = f172(v1190);
3308 return tmp === v634? v634: tmp.car;
3311 var l350 = f122("JS-EVAL");
3312 v927 = ({car: f152(l350, (function (v1197,v1198,v1199){
3313 if (arguments.length < 3) throw 'too few arguments';
3314 if (arguments.length > 3) throw 'too many arguments';
3315 return (function(v1200){
3316 return f184("(function(){", v796, f187(f184("var ", "string", " = ", v1200, ";", v796), f184("if (typeof ", "string", " != '", "string", "')", v796, f187("throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", v796)), f184("return ", (function(){
3317 return "eval.apply(window, [string])";
3318 })(), ";", v796)), "})()");
3319 })(f221(v1199, v1197, v1198));
3321 var l351 = f122("ERROR");
3322 v927 = ({car: f152(l351, (function (v1201,v1202,v1203){
3323 if (arguments.length < 3) throw 'too few arguments';
3324 if (arguments.length > 3) throw 'too many arguments';
3325 return (function(v1204){
3326 return f184("(function (){ throw ", v1204, ";", "return 0;})()");
3327 })(f221(v1203, v1201, v1202));
3329 var l352 = f122("NEW");
3330 v927 = ({car: f152(l352, (function (v1205,v1206){
3331 if (arguments.length < 2) throw 'too few arguments';
3332 if (arguments.length > 2) throw 'too many arguments';
3337 var l353 = f122("GET");
3338 v927 = ({car: f152(l353, (function (v1207,v1208,v1209,v1210){
3339 if (arguments.length < 4) throw 'too few arguments';
3340 if (arguments.length > 4) throw 'too many arguments';
3341 return (function(v1211,v1212){
3342 return f184("(function(){", v796, f187("var tmp = ", "(", v1211, ")[", v1212, "];", v796, "return tmp == undefined? ", f221(v634, v634, v634), ": tmp ;", v796), "})()");
3343 })(f221(v1209, v1207, v1208),f221(v1210, v1207, v1208));
3345 var l354 = f122("SET");
3346 v927 = ({car: f152(l354, (function (v1213,v1214,v1215,v1216,v1217){
3347 if (arguments.length < 5) throw 'too few arguments';
3348 if (arguments.length > 5) throw 'too many arguments';
3349 return (function(v1218,v1219,v1220){
3350 return f184("((", v1218, ")[", v1219, "] = ", v1220, ")");
3351 })(f221(v1215, v1213, v1214),f221(v1216, v1213, v1214),f221(v1217, v1213, v1214));
3353 var l355 = f122("IN");
3354 v927 = ({car: f152(l355, (function (v1221,v1222,v1223,v1224){
3355 if (arguments.length < 4) throw 'too few arguments';
3356 if (arguments.length > 4) throw 'too many arguments';
3357 return (function(v1225,v1226){
3358 return f232(f184("((", v1225, ") in (", v1226, "))"));
3359 })(f221(v1223, v1221, v1222),f221(v1224, v1221, v1222));
3361 var l356 = f122("FUNCTIONP");
3362 v927 = ({car: f152(l356, (function (v1227,v1228,v1229){
3363 if (arguments.length < 3) throw 'too few arguments';
3364 if (arguments.length > 3) throw 'too many arguments';
3365 return (function(v1230){
3366 return f232(f184("(typeof ", v1230, " == 'function')"));
3367 })(f221(v1229, v1227, v1228));
3369 var l357 = f122("WRITE-STRING");
3370 v927 = ({car: f152(l357, (function (v1231,v1232,v1233){
3371 if (arguments.length < 3) throw 'too few arguments';
3372 if (arguments.length > 3) throw 'too many arguments';
3373 return (function(v1234){
3374 return f184("(function(){", v796, f187(f184("var ", "x", " = ", v1234, ";", v796), f184("if (typeof ", "x", " != '", "string", "')", v796, f187("throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", v796)), f184("return ", (function(){
3375 return "lisp.write(x)";
3376 })(), ";", v796)), "})()");
3377 })(f221(v1233, v1231, v1232));
3379 var l359 = f122("MACROP");
3380 var l358 = f122("MACRO");
3384 return f234 = (function(v1235){
3385 ((v1235)["fname"] = "MACROP");
3387 })((function (v1236){
3388 if (arguments.length < 1) throw 'too few arguments';
3389 if (arguments.length > 1) throw 'too many arguments';
3390 return (((function(){
3392 return (typeof tmp == 'object' && 'name' in tmp);
3393 })()?v635: v634) !== v634 ? ((f207(f215(v1236, v873)) === l358)?v635: v634) : v634);
3398 var l361 = f122("LS-MACROEXPAND-1");
3399 var l360 = f122("MACRO");
3403 return f235 = (function(v1237){
3404 ((v1237)["fname"] = "LS-MACROEXPAND-1");
3406 })((function (v1238,v1239,v1240){
3407 if (arguments.length < 3) throw 'too few arguments';
3408 if (arguments.length > 3) throw 'too many arguments';
3409 return (f234((function(){
3411 return tmp === v634? v634: tmp.car;
3412 })()) !== v634 ? (function(v1241){
3413 return (((f207(v1241) === l360)?v635: v634) !== v634 ? (function(){
3414 var f = f229(f208(v1241));
3416 var tail = ((function(){
3418 return tmp === v634? v634: tmp.cdr;
3420 while (tail != v634){
3421 args.push(tail.car);
3424 return f.apply(this, args);
3426 })(f215((function(){
3428 return tmp === v634? v634: tmp.car;
3429 })(), v872)) : v1238);
3434 var l363 = f122("COMPILE-FUNCALL");
3435 var l362 = f122("LAMBDA");
3439 return f236 = (function(v1242){
3440 ((v1242)["fname"] = "COMPILE-FUNCALL");
3442 })((function (v1243,v1244,v1245,v1246){
3443 if (arguments.length < 4) throw 'too few arguments';
3444 if (arguments.length > 4) throw 'too many arguments';
3445 return (((function(){
3447 return (typeof tmp == 'object' && 'name' in tmp);
3448 })()?v635: v634) !== v634 ? (function(){
3449 return f184(f216(v1243, v1246), "(", f185(f164((function (v1247){
3450 if (arguments.length < 1) throw 'too few arguments';
3451 if (arguments.length > 1) throw 'too many arguments';
3452 return f221(v1247, v1245, v1246);
3453 }), v1244), ", "), ")");
3454 })() : ((f155(v1243) !== v634 ? (((function(){
3456 return tmp === v634? v634: tmp.car;
3457 })() === l362)?v635: v634) : v634) !== v634 ? (function(){
3458 return f184("(", f221(v1243, v1245, v1246), ")(", f185(f164((function (v1248){
3459 if (arguments.length < 1) throw 'too few arguments';
3460 if (arguments.length > 1) throw 'too many arguments';
3461 return f221(v1248, v1245, v1246);
3462 }), v1244), ", "), ")");
3464 return (function (){ throw f184("Invalid function designator ", (v1243).name);return 0;})();
3470 var l364 = f122("LS-COMPILE");
3474 return f221 = (function(v1249){
3475 ((v1249)["fname"] = "LS-COMPILE");
3477 })((function (v1250,v1251,v1252){
3478 if (arguments.length < 3) throw 'too few arguments';
3479 if (arguments.length > 3) throw 'too many arguments';
3480 return (((function(){
3482 return (typeof tmp == 'object' && 'name' in tmp);
3483 })()?v635: v634) !== v634 ? (function(){
3484 return f213(v1250, v1251);
3485 })() : (f168(v1250) !== v634 ? (function(){
3487 })() : (((typeof(v1250) == "string")?v635: v634) !== v634 ? (function(){
3488 return f184("\"", f189(v1250), "\"");
3489 })() : (f155(v1250) !== v634 ? (function(){
3490 return (f182((function(){
3492 return tmp === v634? v634: tmp.car;
3493 })(), v927) !== v634 ? (function(v1253){
3496 var args = [v1251, v1252];
3497 var tail = ((function(){
3499 return tmp === v634? v634: tmp.cdr;
3501 while (tail != v634){
3502 args.push(tail.car);
3505 return f.apply(this, args);
3507 })(f149(f182((function(){
3509 return tmp === v634? v634: tmp.car;
3510 })(), v927))) : (f234((function(){
3512 return tmp === v634? v634: tmp.car;
3513 })()) !== v634 ? f221(f235(v1250, v1251, v1252), v1251, v1252) : f236((function(){
3515 return tmp === v634? v634: tmp.car;
3518 return tmp === v634? v634: tmp.cdr;
3519 })(), v1251, v1252)));
3525 var l365 = f122("LS-COMPILE-TOPLEVEL");
3529 return f237 = (function(v1254){
3530 ((v1254)["fname"] = "LS-COMPILE-TOPLEVEL");
3532 })((function (v1255){
3533 if (arguments.length < 1) throw 'too few arguments';
3534 if (arguments.length > 1) throw 'too many arguments';
3536 return (function(v1256){
3537 return (function(v1257){
3540 })(f184(f185(f164((function (v1258){
3541 if (arguments.length < 1) throw 'too few arguments';
3542 if (arguments.length > 1) throw 'too many arguments';
3543 return f184(v1258, ";", v796);
3544 }), v917)), v1256));
3545 })(f221(v1255, v634, v634));
3550 var l376 = f122("LS-COMPILE-TOPLEVEL");
3551 var l375 = f122("EVAL");
3552 var l374 = f122("PRINT-TO-STRING");
3553 var l373 = f122("LS-READ-FROM-STRING");
3558 var l368 = {car: {car: f122("*LITERAL-COUNTER*"), cdr: {car: f122("VARIABLE"), cdr: {car: "v986", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("*LAMBDA-LIST-KEYWORDS*"), cdr: {car: f122("VARIABLE"), cdr: {car: "v940", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("*COMPILATIONS*"), cdr: {car: f122("VARIABLE"), cdr: {car: "v927", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("*TOPLEVEL-COMPILATIONS*"), cdr: {car: f122("VARIABLE"), cdr: {car: "v917", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("*FUNCTION-COUNTER*"), cdr: {car: f122("VARIABLE"), cdr: {car: "v906", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("*VARIABLE-COUNTER*"), cdr: {car: f122("VARIABLE"), cdr: {car: "v889", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("*FENV*"), cdr: {car: f122("VARIABLE"), cdr: {car: "v873", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("*ENV*"), cdr: {car: f122("VARIABLE"), cdr: {car: "v872", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("*COMPILATION-UNIT-CHECKS*"), cdr: {car: f122("VARIABLE"), cdr: {car: "v871", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("*EOF*"), cdr: {car: f122("VARIABLE"), cdr: {car: "v864", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("*NEWLINE*"), cdr: {car: f122("VARIABLE"), cdr: {car: "v796", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("*GENSYM-COUNTER*"), cdr: {car: f122("VARIABLE"), cdr: {car: "v644", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("T"), cdr: {car: f122("VARIABLE"), cdr: {car: "v635", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("NIL"), cdr: {car: f122("VARIABLE"), cdr: {car: "v634", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("*PACKAGE*"), cdr: {car: f122("VARIABLE"), cdr: {car: "v633", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: f122("NIL")}}}}}}}}}}}}}}};
3559 var l367 = {car: {car: f122("WITH-COMPILATION-UNIT"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("&REST"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("PROG1"), cdr: {car: {car: f122("PROGN"), cdr: {car: {car: f122("SETQ"), cdr: {car: f122("*COMPILATION-UNIT-CHECKS*"), cdr: {car: f122("NIL"), cdr: f122("NIL")}}}, cdr: {car: {car: f122("SETQ"), cdr: {car: f122("*ENV*"), cdr: {car: {car: f122("REMOVE-IF-NOT"), cdr: {car: {car: f122("FUNCTION"), cdr: {car: f122("BINDING-DECLARED"), cdr: f122("NIL")}}, cdr: {car: f122("*ENV*"), cdr: f122("NIL")}}}, cdr: f122("NIL")}}}, cdr: {car: {car: f122("SETQ"), cdr: {car: f122("*FENV*"), cdr: {car: {car: f122("REMOVE-IF-NOT"), cdr: {car: {car: f122("FUNCTION"), cdr: {car: f122("BINDING-DECLARED"), cdr: f122("NIL")}}, cdr: {car: f122("*FENV*"), cdr: f122("NIL")}}}, cdr: f122("NIL")}}}, cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}}}, cdr: {car: {car: f122("DOLIST"), cdr: {car: {car: f122("CHECK"), cdr: {car: f122("*COMPILATION-UNIT-CHECKS*"), cdr: f122("NIL")}}, cdr: {car: {car: f122("FUNCALL"), cdr: {car: f122("CHECK"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LS-COMPILE-TOPLEVEL"), cdr: {car: f122("FUNCTION"), cdr: {car: "f237", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("COMPILE-FUNCALL"), cdr: {car: f122("FUNCTION"), cdr: {car: "f236", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LS-MACROEXPAND-1"), cdr: {car: f122("FUNCTION"), cdr: {car: "f235", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("MACROP"), cdr: {car: f122("FUNCTION"), cdr: {car: "f234", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("NUM-OP-NUM"), cdr: {car: f122("FUNCTION"), cdr: {car: "f233", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("TYPE-CHECK"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("DECLS"), cdr: {car: f122("&REST"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("CONCAT"), cdr: {car: "(function(){", cdr: {car: f122("*NEWLINE*"), cdr: {car: {car: f122("INDENT"), cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: {car: f122("MAPCAR"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("DECL"), cdr: f122("NIL")}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("CONCAT"), cdr: {car: "var ", cdr: {car: {car: f122("UNQUOTE"), cdr: {car: {car: f122("FIRST"), cdr: {car: f122("DECL"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: " = ", cdr: {car: {car: f122("UNQUOTE"), cdr: {car: {car: f122("THIRD"), cdr: {car: f122("DECL"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: ";", cdr: {car: f122("*NEWLINE*"), cdr: f122("NIL")}}}}}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("DECLS"), cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: {car: f122("MAPCAR"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("DECL"), cdr: f122("NIL")}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("CONCAT"), cdr: {car: "if (typeof ", cdr: {car: {car: f122("UNQUOTE"), cdr: {car: {car: f122("FIRST"), cdr: {car: f122("DECL"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: " != '", cdr: {car: {car: f122("UNQUOTE"), cdr: {car: {car: f122("SECOND"), cdr: {car: f122("DECL"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: "')", cdr: {car: f122("*NEWLINE*"), cdr: {car: {car: f122("INDENT"), cdr: {car: "throw 'The value ' + ", cdr: {car: {car: f122("UNQUOTE"), cdr: {car: {car: f122("FIRST"), cdr: {car: f122("DECL"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: " + ' is not a type ", cdr: {car: {car: f122("UNQUOTE"), cdr: {car: {car: f122("SECOND"), cdr: {car: f122("DECL"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: ".';", cdr: {car: f122("*NEWLINE*"), cdr: f122("NIL")}}}}}}}, cdr: f122("NIL")}}}}}}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("DECLS"), cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("CONCAT"), cdr: {car: "return ", cdr: {car: {car: f122("PROGN"), cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: ";", cdr: {car: f122("*NEWLINE*"), cdr: f122("NIL")}}}}}, cdr: f122("NIL")}}}}, cdr: {car: "})()", cdr: f122("NIL")}}}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("COMPILE-BOOL"), cdr: {car: f122("FUNCTION"), cdr: {car: "f232", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("DEFINE-BUILTIN"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("NAME"), cdr: {car: f122("ARGS"), cdr: {car: f122("&REST"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("DEFINE-COMPILATION"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("NAME"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("ARGS"), cdr: f122("NIL")}}, cdr: {car: {car: f122("LET"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: {car: f122("MAPCAR"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("ARG"), cdr: f122("NIL")}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: {car: f122("UNQUOTE"), cdr: {car: f122("ARG"), cdr: f122("NIL")}}, cdr: {car: {car: f122("LS-COMPILE"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("ARG"), cdr: f122("NIL")}}, cdr: {car: f122("ENV"), cdr: {car: f122("FENV"), cdr: f122("NIL")}}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("ARGS"), cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("FORM"), cdr: f122("NIL")}, cdr: {car: {car: f122("BACKQUOTE-EXPAND-1"), cdr: {car: f122("FORM"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("BACKQUOTE-EXPAND"), cdr: {car: f122("FUNCTION"), cdr: {car: "f231", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("BACKQUOTE-EXPAND-1"), cdr: {car: f122("FUNCTION"), cdr: {car: "f230", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("DEFINE-TRANSFORMATION"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("NAME"), cdr: {car: f122("ARGS"), cdr: {car: f122("FORM"), cdr: f122("NIL")}}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("DEFINE-COMPILATION"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("NAME"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("ARGS"), cdr: f122("NIL")}}, cdr: {car: {car: f122("LS-COMPILE"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("FORM"), cdr: f122("NIL")}}, cdr: {car: f122("ENV"), cdr: {car: f122("FENV"), cdr: f122("NIL")}}}}, cdr: f122("NIL")}}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("EVAL"), cdr: {car: f122("FUNCTION"), cdr: {car: "f229", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LITERAL"), cdr: {car: f122("FUNCTION"), cdr: {car: "f228", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LITERAL->JS"), cdr: {car: f122("FUNCTION"), cdr: {car: "f227", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LAMBDA-LIST-REST-ARGUMENT"), cdr: {car: f122("FUNCTION"), cdr: {car: "f226", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LAMBDA-LIST-OPTIONAL-ARGUMENTS"), cdr: {car: f122("FUNCTION"), cdr: {car: "f225", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT"), cdr: {car: f122("FUNCTION"), cdr: {car: "f224", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LAMBDA-LIST-REQUIRED-ARGUMENTS"), cdr: {car: f122("FUNCTION"), cdr: {car: "f223", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LIST-UNTIL-KEYWORD"), cdr: {car: f122("FUNCTION"), cdr: {car: "f222", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("DEFINE-COMPILATION"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("NAME"), cdr: {car: f122("ARGS"), cdr: {car: f122("&REST"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("PUSH"), cdr: {car: {car: f122("LIST"), cdr: {car: {car: f122("QUOTE"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("NAME"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("ENV"), cdr: {car: f122("FENV"), cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: f122("ARGS"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}}, cdr: {car: f122("*COMPILATIONS*"), cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LS-COMPILE"), cdr: {car: f122("FUNCTION"), cdr: {car: "f221", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LS-COMPILE-BLOCK"), cdr: {car: f122("FUNCTION"), cdr: {car: "f220", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("%COMPILE-DEFMACRO"), cdr: {car: f122("FUNCTION"), cdr: {car: "f219", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("%COMPILE-DEFUN"), cdr: {car: f122("FUNCTION"), cdr: {car: "f218", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("%COMPILE-DEFVAR"), cdr: {car: f122("FUNCTION"), cdr: {car: "f217", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LOOKUP-FUNCTION-TRANSLATION"), cdr: {car: f122("FUNCTION"), cdr: {car: "f216", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LOOKUP-FUNCTION"), cdr: {car: f122("FUNCTION"), cdr: {car: "f215", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("EXTEND-LOCAL-ENV"), cdr: {car: f122("FUNCTION"), cdr: {car: "f214", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LOOKUP-VARIABLE-TRANSLATION"), cdr: {car: f122("FUNCTION"), cdr: {car: "f213", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LOOKUP-VARIABLE"), cdr: {car: f122("FUNCTION"), cdr: {car: "f212", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("GVARNAME"), cdr: {car: f122("FUNCTION"), cdr: {car: "f211", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("MARK-BINDING-AS-DECLARED"), cdr: {car: f122("FUNCTION"), cdr: {car: "f210", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("BINDING-DECLARED"), cdr: {car: f122("FUNCTION"), cdr: {car: "f209", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("BINDING-TRANSLATION"), cdr: {car: f122("FUNCTION"), cdr: {car: "f208", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("BINDING-TYPE"), cdr: {car: f122("FUNCTION"), cdr: {car: "f207", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("BINDING-NAME"), cdr: {car: f122("FUNCTION"), cdr: {car: "f206", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("MAKE-BINDING"), cdr: {car: f122("FUNCTION"), cdr: {car: "f205", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LS-READ-FROM-STRING"), cdr: {car: f122("FUNCTION"), cdr: {car: "f204", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("READ-SHARP"), cdr: {car: f122("FUNCTION"), cdr: {car: "f203", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("READ-STRING"), cdr: {car: f122("FUNCTION"), cdr: {car: "f202", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LS-READ"), cdr: {car: f122("FUNCTION"), cdr: {car: "f201", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("%READ-LIST"), cdr: {car: f122("FUNCTION"), cdr: {car: "f200", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("SKIP-WHITESPACES-AND-COMMENTS"), cdr: {car: f122("FUNCTION"), cdr: {car: "f199", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("READ-UNTIL"), cdr: {car: f122("FUNCTION"), cdr: {car: "f198", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("TERMINALP"), cdr: {car: f122("FUNCTION"), cdr: {car: "f197", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("SKIP-WHITESPACES"), cdr: {car: f122("FUNCTION"), cdr: {car: "f196", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("WHITESPACEP"), cdr: {car: f122("FUNCTION"), cdr: {car: "f195", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("%READ-CHAR"), cdr: {car: f122("FUNCTION"), cdr: {car: "f194", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("%PEEK-CHAR"), cdr: {car: f122("FUNCTION"), cdr: {car: "f193", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("MAKE-STRING-STREAM"), cdr: {car: f122("FUNCTION"), cdr: {car: "f192", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("PRINT"), cdr: {car: f122("FUNCTION"), cdr: {car: "f191", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("WRITE-LINE"), cdr: {car: f122("FUNCTION"), cdr: {car: "f190", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("ESCAPE-STRING"), cdr: {car: f122("FUNCTION"), cdr: {car: "f189", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("PRINT-TO-STRING"), cdr: {car: f122("FUNCTION"), cdr: {car: "f188", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("INDENT"), cdr: {car: f122("FUNCTION"), cdr: {car: "f187", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("JOIN-TRAILING"), cdr: {car: f122("FUNCTION"), cdr: {car: "f186", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("JOIN"), cdr: {car: f122("FUNCTION"), cdr: {car: "f185", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("CONCAT"), cdr: {car: f122("FUNCTION"), cdr: {car: "f184", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("STRING="), cdr: {car: f122("FUNCTION"), cdr: {car: "f183", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("ASSOC"), cdr: {car: f122("FUNCTION"), cdr: {car: "f182", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("EVERY"), cdr: {car: f122("FUNCTION"), cdr: {car: "f181", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("PARSE-INTEGER"), cdr: {car: f122("FUNCTION"), cdr: {car: "f180", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("SUBSEQ"), cdr: {car: f122("FUNCTION"), cdr: {car: "f179", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("DIGIT-CHAR-P"), cdr: {car: f122("FUNCTION"), cdr: {car: "f178", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("REMOVE-IF-NOT"), cdr: {car: f122("FUNCTION"), cdr: {car: "f177", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("REMOVE-IF"), cdr: {car: f122("FUNCTION"), cdr: {car: "f176", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("REMOVE"), cdr: {car: f122("FUNCTION"), cdr: {car: "f175", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("MEMBER"), cdr: {car: f122("FUNCTION"), cdr: {car: "f174", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("BUTLAST"), cdr: {car: f122("FUNCTION"), cdr: {car: "f173", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LAST"), cdr: {car: f122("FUNCTION"), cdr: {car: "f172", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("NTH"), cdr: {car: f122("FUNCTION"), cdr: {car: "f171", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("MINUSP"), cdr: {car: f122("FUNCTION"), cdr: {car: "f170", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("PLUSP"), cdr: {car: f122("FUNCTION"), cdr: {car: "f169", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("INTEGERP"), cdr: {car: f122("FUNCTION"), cdr: {car: "f168", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("CHAR="), cdr: {car: f122("FUNCTION"), cdr: {car: "f167", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("CHAR-CODE"), cdr: {car: f122("FUNCTION"), cdr: {car: "f166", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("CODE-CHAR"), cdr: {car: f122("FUNCTION"), cdr: {car: "f165", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("MAPCAR"), cdr: {car: f122("FUNCTION"), cdr: {car: "f164", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("CONCAT-TWO"), cdr: {car: f122("FUNCTION"), cdr: {car: "f163", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LENGTH"), cdr: {car: f122("FUNCTION"), cdr: {car: "f162", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LIST-LENGTH"), cdr: {car: f122("FUNCTION"), cdr: {car: "f161", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("REVERSE"), cdr: {car: f122("FUNCTION"), cdr: {car: "f160", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("REVERSE-AUX"), cdr: {car: f122("FUNCTION"), cdr: {car: "f159", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("APPEND"), cdr: {car: f122("FUNCTION"), cdr: {car: "f158", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("APPEND-TWO"), cdr: {car: f122("FUNCTION"), cdr: {car: "f157", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("DEFVAR"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("NAME"), cdr: {car: f122("&OPTIONAL"), cdr: {car: f122("VALUE"), cdr: f122("NIL")}}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("PROGN"), cdr: {car: {car: f122("%DEFVAR"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("NAME"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("VALUE"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: {car: f122("QUOTE"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("NAME"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("DEFUN"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("NAME"), cdr: {car: f122("ARGS"), cdr: {car: f122("&REST"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("PROGN"), cdr: {car: {car: f122("%DEFUN"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("NAME"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("ARGS"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}}, cdr: {car: {car: f122("QUOTE"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("NAME"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("!REDUCE"), cdr: {car: f122("FUNCTION"), cdr: {car: "f156", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LISTP"), cdr: {car: f122("FUNCTION"), cdr: {car: "f155", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("ENSURE-LIST"), cdr: {car: f122("FUNCTION"), cdr: {car: "f154", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("PROG1"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("FORM"), cdr: {car: f122("&REST"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}}, cdr: {car: {car: f122("LET"), cdr: {car: {car: {car: f122("VALUE"), cdr: {car: {car: f122("GENSYM"), cdr: f122("NIL")}, cdr: f122("NIL")}}, cdr: f122("NIL")}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("LET"), cdr: {car: {car: {car: {car: f122("UNQUOTE"), cdr: {car: f122("VALUE"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("FORM"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}, cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("VALUE"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("OR"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("&REST"), cdr: {car: f122("FORMS"), cdr: f122("NIL")}}, cdr: {car: {car: f122("COND"), cdr: {car: {car: {car: f122("NULL"), cdr: {car: f122("FORMS"), cdr: f122("NIL")}}, cdr: {car: f122("NIL"), cdr: f122("NIL")}}, cdr: {car: {car: {car: f122("NULL"), cdr: {car: {car: f122("CDR"), cdr: {car: f122("FORMS"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("CAR"), cdr: {car: f122("FORMS"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("T"), cdr: {car: {car: f122("LET"), cdr: {car: {car: {car: f122("G"), cdr: {car: {car: f122("GENSYM"), cdr: f122("NIL")}, cdr: f122("NIL")}}, cdr: f122("NIL")}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("LET"), cdr: {car: {car: {car: {car: f122("UNQUOTE"), cdr: {car: f122("G"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: {car: f122("CAR"), cdr: {car: f122("FORMS"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}, cdr: {car: {car: f122("IF"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("G"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("G"), cdr: f122("NIL")}}, cdr: {car: {car: f122("OR"), cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: {car: f122("CDR"), cdr: {car: f122("FORMS"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("AND"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("&REST"), cdr: {car: f122("FORMS"), cdr: f122("NIL")}}, cdr: {car: {car: f122("COND"), cdr: {car: {car: {car: f122("NULL"), cdr: {car: f122("FORMS"), cdr: f122("NIL")}}, cdr: {car: f122("T"), cdr: f122("NIL")}}, cdr: {car: {car: {car: f122("NULL"), cdr: {car: {car: f122("CDR"), cdr: {car: f122("FORMS"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("CAR"), cdr: {car: f122("FORMS"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("T"), cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("IF"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: {car: f122("CAR"), cdr: {car: f122("FORMS"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("AND"), cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: {car: f122("CDR"), cdr: {car: f122("FORMS"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: f122("NIL"), cdr: f122("NIL")}}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("ECASE"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("FORM"), cdr: {car: f122("&REST"), cdr: {car: f122("CLAUSULES"), cdr: f122("NIL")}}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("CASE"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("FORM"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: {car: f122("APPEND"), cdr: {car: f122("CLAUSULES"), cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: {car: f122("T"), cdr: {car: {car: f122("ERROR"), cdr: {car: "ECASE expression failed.", cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("CASE"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("FORM"), cdr: {car: f122("&REST"), cdr: {car: f122("CLAUSULES"), cdr: f122("NIL")}}}, cdr: {car: {car: f122("LET"), cdr: {car: {car: {car: f122("!FORM"), cdr: {car: {car: f122("GENSYM"), cdr: f122("NIL")}, cdr: f122("NIL")}}, cdr: f122("NIL")}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("LET"), cdr: {car: {car: {car: {car: f122("UNQUOTE"), cdr: {car: f122("!FORM"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("FORM"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}, cdr: {car: {car: f122("COND"), cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: {car: f122("MAPCAR"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("CLAUSULE"), cdr: f122("NIL")}, cdr: {car: {car: f122("IF"), cdr: {car: {car: f122("EQ"), cdr: {car: {car: f122("CAR"), cdr: {car: f122("CLAUSULE"), cdr: f122("NIL")}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}, cdr: {car: f122("CLAUSULE"), cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: {car: f122("EQL"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("!FORM"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: {car: f122("CAR"), cdr: {car: f122("CLAUSULE"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: {car: f122("CDR"), cdr: {car: f122("CLAUSULE"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}}, cdr: f122("NIL")}}}, cdr: {car: f122("CLAUSULES"), cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("COND"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("&REST"), cdr: {car: f122("CLAUSULES"), cdr: f122("NIL")}}, cdr: {car: {car: f122("IF"), cdr: {car: {car: f122("NULL"), cdr: {car: f122("CLAUSULES"), cdr: f122("NIL")}}, cdr: {car: f122("NIL"), cdr: {car: {car: f122("IF"), cdr: {car: {car: f122("EQ"), cdr: {car: {car: f122("CAAR"), cdr: {car: f122("CLAUSULES"), cdr: f122("NIL")}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("PROGN"), cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: {car: f122("CDAR"), cdr: {car: f122("CLAUSULES"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("IF"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: {car: f122("CAAR"), cdr: {car: f122("CLAUSULES"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("PROGN"), cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: {car: f122("CDAR"), cdr: {car: f122("CLAUSULES"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("COND"), cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: {car: f122("CDR"), cdr: {car: f122("CLAUSULES"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}}, cdr: f122("NIL")}}}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("DOTIMES"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("ITER"), cdr: {car: f122("&REST"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}}, cdr: {car: {car: f122("LET"), cdr: {car: {car: {car: f122("G!TO"), cdr: {car: {car: f122("GENSYM"), cdr: f122("NIL")}, cdr: f122("NIL")}}, cdr: {car: {car: f122("VAR"), cdr: {car: {car: f122("FIRST"), cdr: {car: f122("ITER"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("TO"), cdr: {car: {car: f122("SECOND"), cdr: {car: f122("ITER"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("RESULT"), cdr: {car: {car: f122("THIRD"), cdr: {car: f122("ITER"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("LET"), cdr: {car: {car: {car: {car: f122("UNQUOTE"), cdr: {car: f122("VAR"), cdr: f122("NIL")}}, cdr: {car: 0, cdr: f122("NIL")}}, cdr: {car: {car: {car: f122("UNQUOTE"), cdr: {car: f122("G!TO"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("TO"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("WHILE"), cdr: {car: {car: f122("<"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("VAR"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("G!TO"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}, cdr: {car: {car: f122("INCF"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("VAR"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("RESULT"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("DOLIST"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("ITER"), cdr: {car: f122("&REST"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}}, cdr: {car: {car: f122("LET"), cdr: {car: {car: {car: f122("VAR"), cdr: {car: {car: f122("FIRST"), cdr: {car: f122("ITER"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("G!LIST"), cdr: {car: {car: f122("GENSYM"), cdr: f122("NIL")}, cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("LET"), cdr: {car: {car: {car: {car: f122("UNQUOTE"), cdr: {car: f122("G!LIST"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: {car: f122("SECOND"), cdr: {car: f122("ITER"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: {car: {car: f122("UNQUOTE"), cdr: {car: f122("VAR"), cdr: f122("NIL")}}, cdr: {car: f122("NIL"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("WHILE"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("G!LIST"), cdr: f122("NIL")}}, cdr: {car: {car: f122("SETQ"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("VAR"), cdr: f122("NIL")}}, cdr: {car: {car: f122("CAR"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("G!LIST"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}, cdr: {car: {car: f122("SETQ"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("G!LIST"), cdr: f122("NIL")}}, cdr: {car: {car: f122("CDR"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("G!LIST"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}}}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("UNLESS"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("CONDITION"), cdr: {car: f122("&REST"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("IF"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("CONDITION"), cdr: f122("NIL")}}, cdr: {car: f122("NIL"), cdr: {car: {car: f122("PROGN"), cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("WHEN"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("CONDITION"), cdr: {car: f122("&REST"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("IF"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("CONDITION"), cdr: f122("NIL")}}, cdr: {car: {car: f122("PROGN"), cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: f122("NIL"), cdr: f122("NIL")}}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("PUSH"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("X"), cdr: {car: f122("PLACE"), cdr: f122("NIL")}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("SETQ"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("PLACE"), cdr: f122("NIL")}}, cdr: {car: {car: f122("CONS"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("X"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("PLACE"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("DECF"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("X"), cdr: {car: f122("&OPTIONAL"), cdr: {car: {car: f122("DELTA"), cdr: {car: 1, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("SETQ"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("X"), cdr: f122("NIL")}}, cdr: {car: {car: f122("-"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("X"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("DELTA"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("INCF"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("X"), cdr: {car: f122("&OPTIONAL"), cdr: {car: {car: f122("DELTA"), cdr: {car: 1, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("SETQ"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("X"), cdr: f122("NIL")}}, cdr: {car: {car: f122("+"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("X"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("DELTA"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("ATOM"), cdr: {car: f122("FUNCTION"), cdr: {car: "f153", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LIST"), cdr: {car: f122("FUNCTION"), cdr: {car: "f152", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("FOURTH"), cdr: {car: f122("FUNCTION"), cdr: {car: "f151", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("THIRD"), cdr: {car: f122("FUNCTION"), cdr: {car: "f150", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("SECOND"), cdr: {car: f122("FUNCTION"), cdr: {car: "f149", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("FIRST"), cdr: {car: f122("FUNCTION"), cdr: {car: "f148", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("CADDDR"), cdr: {car: f122("FUNCTION"), cdr: {car: "f147", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("CDDDR"), cdr: {car: f122("FUNCTION"), cdr: {car: "f146", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("CADDR"), cdr: {car: f122("FUNCTION"), cdr: {car: "f145", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("CDDR"), cdr: {car: f122("FUNCTION"), cdr: {car: "f144", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("CDAR"), cdr: {car: f122("FUNCTION"), cdr: {car: "f143", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("CADR"), cdr: {car: f122("FUNCTION"), cdr: {car: "f142", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("CAAR"), cdr: {car: f122("FUNCTION"), cdr: {car: "f141", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("CDR"), cdr: {car: f122("FUNCTION"), cdr: {car: "f140", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("CAR"), cdr: {car: f122("FUNCTION"), cdr: {car: "f139", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("CONSP"), cdr: {car: f122("FUNCTION"), cdr: {car: "f138", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("CONS"), cdr: {car: f122("FUNCTION"), cdr: {car: "f137", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("NOT"), cdr: {car: f122("FUNCTION"), cdr: {car: "f136", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("EQL"), cdr: {car: f122("FUNCTION"), cdr: {car: "f135", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("TRUNCATE"), cdr: {car: f122("FUNCTION"), cdr: {car: "f134", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("ZEROP"), cdr: {car: f122("FUNCTION"), cdr: {car: "f133", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("1-"), cdr: {car: f122("FUNCTION"), cdr: {car: "f132", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("1+"), cdr: {car: f122("FUNCTION"), cdr: {car: "f131", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("/"), cdr: {car: f122("FUNCTION"), cdr: {car: "f130", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("*"), cdr: {car: f122("FUNCTION"), cdr: {car: "f129", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("-"), cdr: {car: f122("FUNCTION"), cdr: {car: "f128", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("+"), cdr: {car: f122("FUNCTION"), cdr: {car: "f127", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("="), cdr: {car: f122("FUNCTION"), cdr: {car: "f126", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("INTEGER-TO-STRING"), cdr: {car: f122("FUNCTION"), cdr: {car: "f125", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("GENSYM"), cdr: {car: f122("FUNCTION"), cdr: {car: "f124", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("FIND-SYMBOL"), cdr: {car: f122("FUNCTION"), cdr: {car: "f123", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("INTERN"), cdr: {car: f122("FUNCTION"), cdr: {car: "f122", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("INTERNP"), cdr: {car: f122("FUNCTION"), cdr: {car: "f121", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("NULL"), cdr: {car: f122("FUNCTION"), cdr: {car: "f120", cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("DEFUN"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("NAME"), cdr: {car: f122("ARGS"), cdr: {car: f122("&REST"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("%DEFUN"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("NAME"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("ARGS"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("%DEFUN"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("NAME"), cdr: {car: f122("ARGS"), cdr: {car: f122("&REST"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("PROGN"), cdr: {car: {car: f122("EVAL-WHEN-COMPILE"), cdr: {car: {car: f122("%COMPILE-DEFUN"), cdr: {car: {car: f122("QUOTE"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("NAME"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("FSETQ"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("NAME"), cdr: f122("NIL")}}, cdr: {car: {car: f122("NAMED-LAMBDA"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: {car: f122("SYMBOL-NAME"), cdr: {car: f122("NAME"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("ARGS"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("NAMED-LAMBDA"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("NAME"), cdr: {car: f122("ARGS"), cdr: {car: f122("&REST"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("LET"), cdr: {car: {car: {car: f122("X"), cdr: {car: {car: f122("GENSYM"), cdr: {car: "FN", cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("LET"), cdr: {car: {car: {car: {car: f122("UNQUOTE"), cdr: {car: f122("X"), cdr: f122("NIL")}}, cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("ARGS"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}, cdr: {car: {car: f122("SET"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("X"), cdr: f122("NIL")}}, cdr: {car: "fname", cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("NAME"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("X"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("DEFVAR"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("NAME"), cdr: {car: f122("&OPTIONAL"), cdr: {car: f122("VALUE"), cdr: f122("NIL")}}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("%DEFVAR"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("NAME"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("VALUE"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("%DEFVAR"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("NAME"), cdr: {car: f122("VALUE"), cdr: f122("NIL")}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("PROGN"), cdr: {car: {car: f122("EVAL-WHEN-COMPILE"), cdr: {car: {car: f122("%COMPILE-DEFVAR"), cdr: {car: {car: f122("QUOTE"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("NAME"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("SETQ"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("NAME"), cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("VALUE"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("DEFMACRO"), cdr: {car: f122("MACRO"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("NAME"), cdr: {car: f122("ARGS"), cdr: {car: f122("&REST"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}}}, cdr: {car: {car: f122("BACKQUOTE"), cdr: {car: {car: f122("EVAL-WHEN-COMPILE"), cdr: {car: {car: f122("%COMPILE-DEFMACRO"), cdr: {car: {car: f122("QUOTE"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: f122("NAME"), cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("QUOTE"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("UNQUOTE"), cdr: {car: {car: f122("MAPCAR"), cdr: {car: {car: f122("LAMBDA"), cdr: {car: {car: f122("X"), cdr: f122("NIL")}, cdr: {car: {car: f122("IF"), cdr: {car: {car: f122("EQ"), cdr: {car: f122("X"), cdr: {car: {car: f122("QUOTE"), cdr: {car: f122("&BODY"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: {car: f122("QUOTE"), cdr: {car: f122("&REST"), cdr: f122("NIL")}}, cdr: {car: f122("X"), cdr: f122("NIL")}}}}, cdr: f122("NIL")}}}, cdr: {car: f122("ARGS"), cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: {car: {car: f122("UNQUOTE-SPLICING"), cdr: {car: f122("BODY"), cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}, cdr: f122("NIL")}}}, cdr: {car: f122("T"), cdr: f122("NIL")}}}}, cdr: f122("NIL")}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}};
3560 var l366 = f122("EVAL");
3571 return f229 = (function(v1259){
3572 ((v1259)["fname"] = "EVAL");
3574 })((function (v1260){
3575 if (arguments.length < 1) throw 'too few arguments';
3576 if (arguments.length > 1) throw 'too many arguments';
3577 return (function(v1261){
3580 if (typeof string != 'string')
3581 throw 'The value ' + string + ' is not a type string.';
3582 return eval.apply(window, [string]);
3584 })((function(v1262){
3585 (function(v1263,v1264){
3587 while(v1263 !== v634){
3588 v1264 = (function(){
3590 return tmp === v634? v634: tmp.car;
3593 v1263 = (function(){
3595 return tmp === v634? v634: tmp.cdr;
3602 v872 = f177(f209, v872);
3603 v873 = f177(f209, v873);
3611 var string = f184("var lisp = {};", "lisp.read = ", f216(l373, v634), ";", v796, "lisp.print = ", f216(l374, v634), ";", v796, "lisp.eval = ", f216(l375, v634), ";", v796, "lisp.compile = ", f216(l376, v634), ";", v796, "lisp.evalString = function(str){", v796, " return lisp.eval(lisp.read(str));", v796, "}", v796, "lisp.compileString = function(str){", v796, " return lisp.compile(lisp.read(str));", v796, "}", v796);
3612 if (typeof string != 'string')
3613 throw 'The value ' + string + ' is not a type string.';
3614 return eval.apply(window, [string]);