3 function pv (x) { return x==undefined? nil: x; }
7 r['multiple-value'] = true;
8 for (var i=0; i<arguments.length; i++)
13 function forcemv (x) {
14 return typeof x == 'object' && 'multiple-value' in x? x: mv(x);
17 // NOTE: Define VALUES to be MV for toplevel forms. It is because
18 // `eval' compiles the forms and execute the Javascript code at
19 // toplevel with `js-eval', so it is necessary to return multiple
20 // values from the eval function.
23 function checkArgsAtLeast(args, n){
24 if (args.length < n) throw 'too few arguments';
27 function checkArgsAtMost(args, n){
28 if (args.length > n) throw 'too many arguments';
31 function checkArgs(args, n){
32 checkArgsAtLeast(args, n);
33 checkArgsAtMost(args, n);
36 // Improper list constructor (like LIST*)
38 if (arguments.length == 1)
41 var i = arguments.length-1;
42 var r = arguments[i--];
44 r = {car: arguments[i], cdr: r};
49 var l1 = {name: "DEFMACRO"};
51 var l2 = {name: "DECLAIM"};
53 var l3 = {name: "NIL"};
58 var l5 = {name: "LAMBDA"};
60 var l6 = {name: "WHEN"};
62 var l7 = {name: "UNLESS"};
64 var l8 = {name: "DEFVAR"};
66 var l9 = {name: "DEFPARAMETER"};
68 var l10 = {name: "NAMED-LAMBDA"};
70 var l11 = {name: "DEFUN"};
72 var l12 = {name: "NULL"};
74 (l12).fvalue = (function(v2){
75 ((v2)["fname"] = "NULL");
77 })((function (values,v1){
78 checkArgs(arguments, 2);
80 return ((v1 === l3.value)?l4.value: l3.value);
85 var l13 = {name: "RETURN"};
87 var l14 = {name: "WHILE"};
89 var l15 = {name: "*GENSYM-COUNTER*"};
91 (((l15.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l15).value = 0));
94 var l16 = {name: "GENSYM"};
95 var l17 = {name: "INTEGER-TO-STRING"};
97 (l16).fvalue = (function(v4){
98 ((v4)["fname"] = "GENSYM");
100 })((function (values,v3){
101 checkArgsAtMost(arguments, 2);
102 switch(arguments.length-1){
108 ((l15).value = (function(){
109 var x1 = (function(){
111 var value = symbol.value;
112 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
115 if (typeof x1 !== 'number') throw 'Not a number!';
117 if (typeof x2 !== 'number') throw 'Not a number!';
121 var name = (function(){
123 var string2 = l17.fvalue(pv, (function(){
125 var value = symbol.value;
126 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
129 if (typeof string1 != 'string')
130 throw 'The value ' + string1 + ' is not a type string.';
131 if (typeof string2 != 'string')
132 throw 'The value ' + string2 + ' is not a type string.';
133 return string1.concat(string2);
135 if (typeof name != 'string')
136 throw 'The value ' + name + ' is not a type string.';
137 return ({name: name});
143 var l18 = {name: "BOUNDP"};
145 (l18).fvalue = (function(v6){
146 ((v6)["fname"] = "BOUNDP");
148 })((function (values,v5){
149 checkArgs(arguments, 2);
151 return ((v5.value !== undefined)?l4.value: l3.value);
156 var l19 = {name: "="};
158 (l19).fvalue = (function(v9){
159 ((v9)["fname"] = "=");
161 })((function (values,v7,v8){
162 checkArgs(arguments, 3);
166 if (typeof x1 !== 'number') throw 'Not a number!';
168 if (typeof x2 !== 'number') throw 'Not a number!';
169 return (x1==x2?l4.value: l3.value);
175 var l20 = {name: "*"};
177 (l20).fvalue = (function(v12){
178 ((v12)["fname"] = "*");
180 })((function (values,v10,v11){
181 checkArgs(arguments, 3);
185 if (typeof x1 !== 'number') throw 'Not a number!';
187 if (typeof x2 !== 'number') throw 'Not a number!';
194 var l21 = {name: "/"};
196 (l21).fvalue = (function(v15){
197 ((v15)["fname"] = "/");
199 })((function (values,v13,v14){
200 checkArgs(arguments, 3);
204 if (typeof x1 !== 'number') throw 'Not a number!';
206 if (typeof x2 !== 'number') throw 'Not a number!';
213 var l22 = {name: "1+"};
215 (l22).fvalue = (function(v17){
216 ((v17)["fname"] = "1+");
218 })((function (values,v16){
219 checkArgs(arguments, 2);
223 if (typeof x1 !== 'number') throw 'Not a number!';
225 if (typeof x2 !== 'number') throw 'Not a number!';
232 var l23 = {name: "1-"};
234 (l23).fvalue = (function(v19){
235 ((v19)["fname"] = "1-");
237 })((function (values,v18){
238 checkArgs(arguments, 2);
242 if (typeof x1 !== 'number') throw 'Not a number!';
244 if (typeof x2 !== 'number') throw 'Not a number!';
251 var l24 = {name: "ZEROP"};
253 (l24).fvalue = (function(v21){
254 ((v21)["fname"] = "ZEROP");
256 })((function (values,v20){
257 checkArgs(arguments, 2);
261 if (typeof x1 !== 'number') throw 'Not a number!';
263 if (typeof x2 !== 'number') throw 'Not a number!';
264 return (x1==x2?l4.value: l3.value);
270 var l25 = {name: "TRUNCATE"};
272 (l25).fvalue = (function(v24){
273 ((v24)["fname"] = "TRUNCATE");
275 })((function (values,v22,v23){
276 checkArgs(arguments, 3);
281 if (typeof x1 !== 'number') throw 'Not a number!';
283 if (typeof x2 !== 'number') throw 'Not a number!';
286 if (typeof x != 'number')
287 throw 'The value ' + x + ' is not a type number.';
288 return Math.floor(x);
294 var l26 = {name: "EQL"};
296 (l26).fvalue = (function(v27){
297 ((v27)["fname"] = "EQL");
299 })((function (values,v25,v26){
300 checkArgs(arguments, 3);
302 return ((v25 === v26)?l4.value: l3.value);
307 var l27 = {name: "NOT"};
309 (l27).fvalue = (function(v29){
310 ((v29)["fname"] = "NOT");
312 })((function (values,v28){
313 checkArgs(arguments, 2);
315 return (v28 !== l3.value ? l3.value : l4.value);
320 var l28 = {name: "CONS"};
322 (l28).fvalue = (function(v32){
323 ((v32)["fname"] = "CONS");
325 })((function (values,v30,v31){
326 checkArgs(arguments, 3);
328 return ({car: v30, cdr: v31});
333 var l29 = {name: "CONSP"};
335 (l29).fvalue = (function(v34){
336 ((v34)["fname"] = "CONSP");
338 })((function (values,v33){
339 checkArgs(arguments, 2);
343 return (typeof tmp == 'object' && 'car' in tmp);
344 })()?l4.value: l3.value);
349 var l30 = {name: "CAR"};
351 (l30).fvalue = (function(v36){
352 ((v36)["fname"] = "CAR");
355 var func = (function (values,v35){
356 checkArgs(arguments, 2);
360 return tmp === l3.value? l3.value: tmp.car;
364 func.docstring = 'Return the CAR part of a cons, or NIL if X is null.';
369 var l31 = {name: "CDR"};
371 (l31).fvalue = (function(v38){
372 ((v38)["fname"] = "CDR");
374 })((function (values,v37){
375 checkArgs(arguments, 2);
379 return tmp === l3.value? l3.value: tmp.cdr;
385 var l32 = {name: "CAAR"};
387 (l32).fvalue = (function(v40){
388 ((v40)["fname"] = "CAAR");
390 })((function (values,v39){
391 checkArgs(arguments, 2);
394 var tmp = (function(){
396 return tmp === l3.value? l3.value: tmp.car;
398 return tmp === l3.value? l3.value: tmp.car;
404 var l33 = {name: "CADR"};
406 (l33).fvalue = (function(v42){
407 ((v42)["fname"] = "CADR");
409 })((function (values,v41){
410 checkArgs(arguments, 2);
413 var tmp = (function(){
415 return tmp === l3.value? l3.value: tmp.cdr;
417 return tmp === l3.value? l3.value: tmp.car;
423 var l34 = {name: "CDAR"};
425 (l34).fvalue = (function(v44){
426 ((v44)["fname"] = "CDAR");
428 })((function (values,v43){
429 checkArgs(arguments, 2);
432 var tmp = (function(){
434 return tmp === l3.value? l3.value: tmp.car;
436 return tmp === l3.value? l3.value: tmp.cdr;
442 var l35 = {name: "CDDR"};
444 (l35).fvalue = (function(v46){
445 ((v46)["fname"] = "CDDR");
447 })((function (values,v45){
448 checkArgs(arguments, 2);
451 var tmp = (function(){
453 return tmp === l3.value? l3.value: tmp.cdr;
455 return tmp === l3.value? l3.value: tmp.cdr;
461 var l36 = {name: "CADDR"};
463 (l36).fvalue = (function(v48){
464 ((v48)["fname"] = "CADDR");
466 })((function (values,v47){
467 checkArgs(arguments, 2);
470 var tmp = (function(){
471 var tmp = (function(){
473 return tmp === l3.value? l3.value: tmp.cdr;
475 return tmp === l3.value? l3.value: tmp.cdr;
477 return tmp === l3.value? l3.value: tmp.car;
483 var l37 = {name: "CDDDR"};
485 (l37).fvalue = (function(v50){
486 ((v50)["fname"] = "CDDDR");
488 })((function (values,v49){
489 checkArgs(arguments, 2);
492 var tmp = (function(){
493 var tmp = (function(){
495 return tmp === l3.value? l3.value: tmp.cdr;
497 return tmp === l3.value? l3.value: tmp.cdr;
499 return tmp === l3.value? l3.value: tmp.cdr;
505 var l38 = {name: "CADDDR"};
507 (l38).fvalue = (function(v52){
508 ((v52)["fname"] = "CADDDR");
510 })((function (values,v51){
511 checkArgs(arguments, 2);
514 var tmp = (function(){
515 var tmp = (function(){
516 var tmp = (function(){
518 return tmp === l3.value? l3.value: tmp.cdr;
520 return tmp === l3.value? l3.value: tmp.cdr;
522 return tmp === l3.value? l3.value: tmp.cdr;
524 return tmp === l3.value? l3.value: tmp.car;
530 var l39 = {name: "FIRST"};
532 (l39).fvalue = (function(v54){
533 ((v54)["fname"] = "FIRST");
535 })((function (values,v53){
536 checkArgs(arguments, 2);
540 return tmp === l3.value? l3.value: tmp.car;
546 var l40 = {name: "SECOND"};
548 (l40).fvalue = (function(v56){
549 ((v56)["fname"] = "SECOND");
551 })((function (values,v55){
552 checkArgs(arguments, 2);
554 return l33.fvalue(values, v55);
559 var l41 = {name: "THIRD"};
561 (l41).fvalue = (function(v58){
562 ((v58)["fname"] = "THIRD");
564 })((function (values,v57){
565 checkArgs(arguments, 2);
567 return l36.fvalue(values, v57);
572 var l42 = {name: "FOURTH"};
574 (l42).fvalue = (function(v60){
575 ((v60)["fname"] = "FOURTH");
577 })((function (values,v59){
578 checkArgs(arguments, 2);
580 return l38.fvalue(values, v59);
585 var l43 = {name: "REST"};
587 (l43).fvalue = (function(v62){
588 ((v62)["fname"] = "REST");
590 })((function (values,v61){
591 checkArgs(arguments, 2);
595 return tmp === l3.value? l3.value: tmp.cdr;
601 var l44 = {name: "LIST"};
603 (l44).fvalue = (function(v64){
604 ((v64)["fname"] = "LIST");
606 })((function (values){
608 for (var i = arguments.length-1; i>=1; i--)
609 v63 = {car: arguments[i], cdr:
617 var l45 = {name: "ATOM"};
619 (l45).fvalue = (function(v66){
620 ((v66)["fname"] = "ATOM");
622 })((function (values,v65){
623 checkArgs(arguments, 2);
625 return l27.fvalue(values, ((function(){
627 return (typeof tmp == 'object' && 'car' in tmp);
628 })()?l4.value: l3.value));
633 var l46 = {name: "INCF"};
635 var l47 = {name: "DECF"};
637 var l48 = {name: "PUSH"};
639 var l49 = {name: "DOLIST"};
641 var l50 = {name: "DOTIMES"};
643 var l51 = {name: "COND"};
645 var l52 = {name: "CASE"};
647 var l53 = {name: "ECASE"};
649 var l54 = {name: "AND"};
651 var l55 = {name: "OR"};
653 var l56 = {name: "PROG1"};
655 var l57 = {name: "PROG2"};
657 var l58 = {name: "ENSURE-LIST"};
658 var l59 = {name: "LISTP"};
660 (l58).fvalue = (function(v68){
661 ((v68)["fname"] = "ENSURE-LIST");
663 })((function (values,v67){
664 checkArgs(arguments, 2);
666 return (l59.fvalue(pv, v67) !== l3.value ? v67 : l44.fvalue(values, v67));
671 var l60 = {name: "!REDUCE"};
673 (l60).fvalue = (function(v72){
674 ((v72)["fname"] = "!REDUCE");
676 })((function (values,v69,v70,v71){
677 checkArgs(arguments, 4);
679 return (l12.fvalue(pv, v70) !== l3.value ? v71 : l60.fvalue(values, v69, (function(){
681 return tmp === l3.value? l3.value: tmp.cdr;
682 })(), (v69)(pv, v71, (function(){
684 return tmp === l3.value? l3.value: tmp.car;
690 var l61 = {name: "+"};
692 (l61).fvalue = (function(v77){
693 ((v77)["fname"] = "+");
695 })((function (values){
697 for (var i = arguments.length-1; i>=1; i--)
698 v73 = {car: arguments[i], cdr:
701 return (function(v74){
703 return (function(v75,v76){
705 while(v75 !== l3.value){
708 return tmp === l3.value? l3.value: tmp.car;
713 if (typeof x1 !== 'number') throw 'Not a number!';
715 if (typeof x2 !== 'number') throw 'Not a number!';
722 return tmp === l3.value? l3.value: tmp.cdr;
734 var l62 = {name: "-"};
736 (l62).fvalue = (function(v83){
737 ((v83)["fname"] = "-");
739 })((function (values,v79){
740 checkArgsAtLeast(arguments, 2);
742 for (var i = arguments.length-1; i>=2; i--)
743 v78 = {car: arguments[i], cdr:
746 return (l12.fvalue(pv, v78) !== l3.value ? (function(){
748 if (typeof x1 !== 'number') throw 'Not a number!';
750 })() : (function(v80){
752 return (function(v81,v82){
754 while(v81 !== l3.value){
757 return tmp === l3.value? l3.value: tmp.car;
762 if (typeof x1 !== 'number') throw 'Not a number!';
764 if (typeof x2 !== 'number') throw 'Not a number!';
771 return tmp === l3.value? l3.value: tmp.cdr;
783 var l63 = {name: "APPEND-TWO"};
784 var l64 = {name: "APPEND"};
786 (l63).fvalue = (function(v86){
787 ((v86)["fname"] = "APPEND-TWO");
789 })((function (values,v84,v85){
790 checkArgs(arguments, 3);
792 return (l12.fvalue(pv, v84) !== l3.value ? v85 : ({car: (function(){
794 return tmp === l3.value? l3.value: tmp.car;
795 })(), cdr: l64.fvalue(pv, (function(){
797 return tmp === l3.value? l3.value: tmp.cdr;
804 (l64).fvalue = (function(v88){
805 ((v88)["fname"] = "APPEND");
807 })((function (values){
809 for (var i = arguments.length-1; i>=1; i--)
810 v87 = {car: arguments[i], cdr:
813 return l60.fvalue(values, (function(){
815 var func = symbol.fvalue;
816 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
823 var l65 = {name: "REVAPPEND"};
825 (l65).fvalue = (function(v91){
826 ((v91)["fname"] = "REVAPPEND");
828 })((function (values,v89,v90){
829 checkArgs(arguments, 3);
833 while(v89 !== l3.value){
834 (v90 = ({car: (function(){
836 return tmp === l3.value? l3.value: tmp.car;
840 return tmp === l3.value? l3.value: tmp.cdr;
850 var l66 = {name: "REVERSE"};
852 (l66).fvalue = (function(v93){
853 ((v93)["fname"] = "REVERSE");
855 })((function (values,v92){
856 checkArgs(arguments, 2);
858 return l65.fvalue(values, v92, l3);
863 var l67 = {name: "PSETQ"};
865 var l68 = {name: "DO"};
867 var l69 = {name: "DO*"};
869 var l70 = {name: "LIST-LENGTH"};
871 (l70).fvalue = (function(v96){
872 ((v96)["fname"] = "LIST-LENGTH");
874 })((function (values,v94){
875 checkArgs(arguments, 2);
877 return (function(v95){
880 while(l27.fvalue(pv, l12.fvalue(pv, v94)) !== l3.value){
883 if (typeof x1 !== 'number') throw 'Not a number!';
885 if (typeof x2 !== 'number') throw 'Not a number!';
890 return tmp === l3.value? l3.value: tmp.cdr;
901 var l71 = {name: "LENGTH"};
903 (l71).fvalue = (function(v98){
904 ((v98)["fname"] = "LENGTH");
906 })((function (values,v97){
907 checkArgs(arguments, 2);
909 return (((typeof(v97) == "string")?l4.value: l3.value) !== l3.value ? (function(){
911 if (typeof x != 'string')
912 throw 'The value ' + x + ' is not a type string.';
914 })() : (((function(){
916 return typeof x === 'object' && 'length' in x;
917 })()?l4.value: l3.value) !== l3.value ? (function(){
918 var tmp = (v97)["length"];
919 return tmp == undefined? l3.value: tmp ;
920 })() : (l59.fvalue(pv, v97) !== l3.value ? l70.fvalue(values, v97) : l3.value)));
925 var l72 = {name: "CONCAT-TWO"};
927 (l72).fvalue = (function(v101){
928 ((v101)["fname"] = "CONCAT-TWO");
930 })((function (values,v99,v100){
931 checkArgs(arguments, 3);
936 if (typeof string1 != 'string')
937 throw 'The value ' + string1 + ' is not a type string.';
938 if (typeof string2 != 'string')
939 throw 'The value ' + string2 + ' is not a type string.';
940 return string1.concat(string2);
946 var l73 = {name: "MAPCAR"};
947 var l74 = {name: "SENTINEL"};
949 (l73).fvalue = (function(v107){
950 ((v107)["fname"] = "MAPCAR");
952 })((function (values,v102,v103){
953 checkArgs(arguments, 3);
956 var v104 = ({car: l74, cdr: l3.value});
960 while(l27.fvalue(pv, l12.fvalue(pv, v103)) !== l3.value){
964 if (typeof x != 'object')
965 throw 'The value ' + x + ' is not a type object.';
966 return (x.cdr = v106, x);
968 return (v105 = v106, v103 = (function(){
970 return tmp === l3.value? l3.value: tmp.cdr;
972 })(({car: (v102)(pv, (function(){
974 return tmp === l3.value? l3.value: tmp.car;
975 })()), cdr: l3.value}));
981 return tmp === l3.value? l3.value: tmp.cdr;
988 var l75 = {name: "IDENTITY"};
990 (l75).fvalue = (function(v109){
991 ((v109)["fname"] = "IDENTITY");
993 })((function (values,v108){
994 checkArgs(arguments, 2);
1001 var l76 = {name: "CONSTANTLY"};
1003 (l76).fvalue = (function(v112){
1004 ((v112)["fname"] = "CONSTANTLY");
1006 })((function (values,v110){
1007 checkArgs(arguments, 2);
1009 return (function (values){
1011 for (var i = arguments.length-1; i>=1; i--)
1012 v111 = {car: arguments[i], cdr:
1020 var l77 = {name: "COPY-LIST"};
1022 (l77).fvalue = (function(v114){
1023 ((v114)["fname"] = "COPY-LIST");
1025 })((function (values,v113){
1026 checkArgs(arguments, 2);
1028 return l73.fvalue(values, (function(){
1030 var func = symbol.fvalue;
1031 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1038 var l78 = {name: "CODE-CHAR"};
1040 (l78).fvalue = (function(v116){
1041 ((v116)["fname"] = "CODE-CHAR");
1043 })((function (values,v115){
1044 checkArgs(arguments, 2);
1051 var l79 = {name: "CHAR-CODE"};
1053 (l79).fvalue = (function(v118){
1054 ((v118)["fname"] = "CHAR-CODE");
1056 })((function (values,v117){
1057 checkArgs(arguments, 2);
1064 var l80 = {name: "CHAR="};
1066 (l80).fvalue = (function(v121){
1067 ((v121)["fname"] = "CHAR=");
1069 })((function (values,v119,v120){
1070 checkArgs(arguments, 3);
1074 if (typeof x1 !== 'number') throw 'Not a number!';
1076 if (typeof x2 !== 'number') throw 'Not a number!';
1077 return (x1==x2?l4.value: l3.value);
1083 var l81 = {name: "INTEGERP"};
1085 (l81).fvalue = (function(v123){
1086 ((v123)["fname"] = "INTEGERP");
1088 })((function (values,v122){
1089 checkArgs(arguments, 2);
1091 return (((typeof (v122) == "number")?l4.value: l3.value) !== l3.value ? (function(){
1092 var x1 = (function(){
1094 if (typeof x != 'number')
1095 throw 'The value ' + x + ' is not a type number.';
1096 return Math.floor(x);
1098 if (typeof x1 !== 'number') throw 'Not a number!';
1100 if (typeof x2 !== 'number') throw 'Not a number!';
1101 return (x1==x2?l4.value: l3.value);
1107 var l82 = {name: "PLUSP"};
1109 (l82).fvalue = (function(v125){
1110 ((v125)["fname"] = "PLUSP");
1112 })((function (values,v124){
1113 checkArgs(arguments, 2);
1117 if (typeof x1 !== 'number') throw 'Not a number!';
1119 if (typeof x2 !== 'number') throw 'Not a number!';
1120 return (x1<x2?l4.value: l3.value);
1126 var l83 = {name: "MINUSP"};
1128 (l83).fvalue = (function(v127){
1129 ((v127)["fname"] = "MINUSP");
1131 })((function (values,v126){
1132 checkArgs(arguments, 2);
1136 if (typeof x1 !== 'number') throw 'Not a number!';
1138 if (typeof x2 !== 'number') throw 'Not a number!';
1139 return (x1<x2?l4.value: l3.value);
1146 (l59).fvalue = (function(v130){
1147 ((v130)["fname"] = "LISTP");
1149 })((function (values,v128){
1150 checkArgs(arguments, 2);
1152 return (function(v129){
1153 return (v129 !== l3.value ? v129 : l12.fvalue(values, v128));
1156 return (typeof tmp == 'object' && 'car' in tmp);
1157 })()?l4.value: l3.value));
1162 var l84 = {name: "NTHCDR"};
1164 (l84).fvalue = (function(v133){
1165 ((v133)["fname"] = "NTHCDR");
1167 })((function (values,v131,v132){
1168 checkArgs(arguments, 3);
1172 while((l82.fvalue(pv, v131) !== l3.value ? v132 : l3.value) !== l3.value){
1173 (v131 = l23.fvalue(pv, v131));
1174 (v132 = (function(){
1176 return tmp === l3.value? l3.value: tmp.cdr;
1186 var l85 = {name: "NTH"};
1188 (l85).fvalue = (function(v136){
1189 ((v136)["fname"] = "NTH");
1191 })((function (values,v134,v135){
1192 checkArgs(arguments, 3);
1195 var tmp = l84.fvalue(pv, v134, v135);
1196 return tmp === l3.value? l3.value: tmp.car;
1202 var l86 = {name: "LAST"};
1204 (l86).fvalue = (function(v138){
1205 ((v138)["fname"] = "LAST");
1207 })((function (values,v137){
1208 checkArgs(arguments, 2);
1213 var tmp = (function(){
1215 return tmp === l3.value? l3.value: tmp.cdr;
1217 return (typeof tmp == 'object' && 'car' in tmp);
1218 })()?l4.value: l3.value) !== l3.value){
1219 (v137 = (function(){
1221 return tmp === l3.value? l3.value: tmp.cdr;
1231 var l87 = {name: "BUTLAST"};
1233 (l87).fvalue = (function(v140){
1234 ((v140)["fname"] = "BUTLAST");
1236 })((function (values,v139){
1237 checkArgs(arguments, 2);
1239 return (((function(){
1240 var tmp = (function(){
1242 return tmp === l3.value? l3.value: tmp.cdr;
1244 return (typeof tmp == 'object' && 'car' in tmp);
1245 })()?l4.value: l3.value) !== l3.value ? ({car: (function(){
1247 return tmp === l3.value? l3.value: tmp.car;
1248 })(), cdr: l87.fvalue(pv, (function(){
1250 return tmp === l3.value? l3.value: tmp.cdr;
1251 })())}) : l3.value);
1256 var l88 = {name: "MEMBER"};
1258 (l88).fvalue = (function(v143){
1259 ((v143)["fname"] = "MEMBER");
1261 })((function (values,v141,v142){
1262 checkArgs(arguments, 3);
1267 while(v142 !== l3.value){
1268 (l26.fvalue(pv, v141, (function(){
1270 return tmp === l3.value? l3.value: tmp.car;
1271 })()) !== l3.value ? (function(){
1273 throw ({type: 'block', id: 65, values: v142, message: 'Return from unknown block NIL.'})
1275 (v142 = (function(){
1277 return tmp === l3.value? l3.value: tmp.cdr;
1283 if (cf.type == 'block' && cf.id == 65)
1284 return values.apply(this, forcemv(cf.values));
1293 var l89 = {name: "REMOVE"};
1295 (l89).fvalue = (function(v146){
1296 ((v146)["fname"] = "REMOVE");
1298 })((function (values,v144,v145){
1299 checkArgs(arguments, 3);
1301 return (l12.fvalue(pv, v145) !== l3.value ? l3.value : (l26.fvalue(pv, v144, (function(){
1303 return tmp === l3.value? l3.value: tmp.car;
1304 })()) !== l3.value ? l89.fvalue(values, v144, (function(){
1306 return tmp === l3.value? l3.value: tmp.cdr;
1307 })()) : ({car: (function(){
1309 return tmp === l3.value? l3.value: tmp.car;
1310 })(), cdr: l89.fvalue(pv, v144, (function(){
1312 return tmp === l3.value? l3.value: tmp.cdr;
1318 var l90 = {name: "REMOVE-IF"};
1320 (l90).fvalue = (function(v149){
1321 ((v149)["fname"] = "REMOVE-IF");
1323 })((function (values,v147,v148){
1324 checkArgs(arguments, 3);
1326 return (l12.fvalue(pv, v148) !== l3.value ? l3.value : ((v147)(pv, (function(){
1328 return tmp === l3.value? l3.value: tmp.car;
1329 })()) !== l3.value ? l90.fvalue(values, v147, (function(){
1331 return tmp === l3.value? l3.value: tmp.cdr;
1332 })()) : ({car: (function(){
1334 return tmp === l3.value? l3.value: tmp.car;
1335 })(), cdr: l90.fvalue(pv, v147, (function(){
1337 return tmp === l3.value? l3.value: tmp.cdr;
1343 var l91 = {name: "REMOVE-IF-NOT"};
1345 (l91).fvalue = (function(v152){
1346 ((v152)["fname"] = "REMOVE-IF-NOT");
1348 })((function (values,v150,v151){
1349 checkArgs(arguments, 3);
1351 return (l12.fvalue(pv, v151) !== l3.value ? l3.value : ((v150)(pv, (function(){
1353 return tmp === l3.value? l3.value: tmp.car;
1354 })()) !== l3.value ? ({car: (function(){
1356 return tmp === l3.value? l3.value: tmp.car;
1357 })(), cdr: l91.fvalue(pv, v150, (function(){
1359 return tmp === l3.value? l3.value: tmp.cdr;
1360 })())}) : l91.fvalue(values, v150, (function(){
1362 return tmp === l3.value? l3.value: tmp.cdr;
1368 var l92 = {name: "DIGIT-CHAR-P"};
1370 (l92).fvalue = (function(v154){
1371 ((v154)["fname"] = "DIGIT-CHAR-P");
1373 })((function (values,v153){
1374 checkArgs(arguments, 2);
1376 return (((function(){
1378 if (typeof x1 !== 'number') throw 'Not a number!';
1380 if (typeof x2 !== 'number') throw 'Not a number!';
1381 return (x1<=x2?l4.value: l3.value);
1382 })() !== l3.value ? (function(){
1384 if (typeof x1 !== 'number') throw 'Not a number!';
1386 if (typeof x2 !== 'number') throw 'Not a number!';
1387 return (x1<=x2?l4.value: l3.value);
1388 })() : l3.value) !== l3.value ? (function(){
1390 if (typeof x1 !== 'number') throw 'Not a number!';
1392 if (typeof x2 !== 'number') throw 'Not a number!';
1399 var l93 = {name: "DIGIT-CHAR"};
1401 (l93).fvalue = (function(v156){
1402 ((v156)["fname"] = "DIGIT-CHAR");
1404 })((function (values,v155){
1405 checkArgs(arguments, 2);
1407 return ((function(){
1409 if (typeof x1 !== 'number') throw 'Not a number!';
1411 if (typeof x2 !== 'number') throw 'Not a number!';
1413 if (typeof x3 !== 'number') throw 'Not a number!';
1414 return (x1<=x2 && x2<=x3?l4.value: l3.value);
1415 })() !== l3.value ? (function(){
1416 var string = "0123456789";
1418 if (typeof string != 'string')
1419 throw 'The value ' + string + ' is not a type string.';
1420 if (typeof index != 'number')
1421 throw 'The value ' + index + ' is not a type number.';
1422 return string.charCodeAt(index);
1428 var l94 = {name: "SUBSEQ"};
1430 (l94).fvalue = (function(v160){
1431 ((v160)["fname"] = "SUBSEQ");
1433 })((function (values,v157,v158,v159){
1434 checkArgsAtLeast(arguments, 3);
1435 checkArgsAtMost(arguments, 4);
1436 switch(arguments.length-1){
1442 return (((typeof(v157) == "string")?l4.value: l3.value) !== l3.value ? (v159 !== l3.value ? (function(){
1447 return str.slice(a,b);
1452 return str.slice(a,b);
1453 })()) : (function(){
1454 throw "Unsupported argument.";
1460 var l95 = {name: "SOME"};
1462 (l95).fvalue = (function(v167){
1463 ((v167)["fname"] = "SOME");
1465 })((function (values,v161,v162){
1466 checkArgs(arguments, 3);
1469 return (((typeof(v162) == "string")?l4.value: l3.value) !== l3.value ? (function(v163,v164){
1474 if (typeof x1 !== 'number') throw 'Not a number!';
1476 if (typeof x2 !== 'number') throw 'Not a number!';
1477 return (x1<x2?l4.value: l3.value);
1479 ((v161)(pv, (function(){
1482 if (typeof string != 'string')
1483 throw 'The value ' + string + ' is not a type string.';
1484 if (typeof index != 'number')
1485 throw 'The value ' + index + ' is not a type number.';
1486 return string.charCodeAt(index);
1487 })()) !== l3.value ? (function(){
1489 throw ({type: 'block', id: 72, values: l4.value, message: 'Return from unknown block SOME.'})
1491 (v163 = (function(){
1493 if (typeof x1 !== 'number') throw 'Not a number!';
1495 if (typeof x2 !== 'number') throw 'Not a number!';
1502 })(0,l71.fvalue(pv, v162)) : (l59.fvalue(pv, v162) !== l3.value ? (function(){
1504 return (function(v165,v166){
1506 while(v165 !== l3.value){
1507 (v166 = (function(){
1509 return tmp === l3.value? l3.value: tmp.car;
1512 ((v161)(pv, v166) !== l3.value ? (function(){
1514 throw ({type: 'block', id: 74, values: l4.value, message: 'Return from unknown block NIL.'})
1518 (v165 = (function(){
1520 return tmp === l3.value? l3.value: tmp.cdr;
1528 if (cf.type == 'block' && cf.id == 74)
1529 return values.apply(this, forcemv(cf.values));
1534 throw "Unknown sequence.";
1538 if (cf.type == 'block' && cf.id == 72)
1539 return values.apply(this, forcemv(cf.values));
1547 var l96 = {name: "EVERY"};
1549 (l96).fvalue = (function(v174){
1550 ((v174)["fname"] = "EVERY");
1552 })((function (values,v168,v169){
1553 checkArgs(arguments, 3);
1556 return (((typeof(v169) == "string")?l4.value: l3.value) !== l3.value ? (function(v170,v171){
1561 if (typeof x1 !== 'number') throw 'Not a number!';
1563 if (typeof x2 !== 'number') throw 'Not a number!';
1564 return (x1<x2?l4.value: l3.value);
1566 ((v168)(pv, (function(){
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);
1574 })()) !== l3.value ? l3.value : (function(){
1576 throw ({type: 'block', id: 75, values: l3.value, message: 'Return from unknown block EVERY.'})
1578 (v170 = (function(){
1580 if (typeof x1 !== 'number') throw 'Not a number!';
1582 if (typeof x2 !== 'number') throw 'Not a number!';
1589 })(0,l71.fvalue(pv, v169)) : (l59.fvalue(pv, v169) !== l3.value ? (function(){
1591 return (function(v172,v173){
1593 while(v172 !== l3.value){
1594 (v173 = (function(){
1596 return tmp === l3.value? l3.value: tmp.car;
1599 ((v168)(pv, v173) !== l3.value ? l3.value : (function(){
1601 throw ({type: 'block', id: 77, values: l3.value, message: 'Return from unknown block NIL.'})
1605 (v172 = (function(){
1607 return tmp === l3.value? l3.value: tmp.cdr;
1615 if (cf.type == 'block' && cf.id == 77)
1616 return values.apply(this, forcemv(cf.values));
1621 throw "Unknown sequence.";
1625 if (cf.type == 'block' && cf.id == 75)
1626 return values.apply(this, forcemv(cf.values));
1634 var l97 = {name: "ASSOC"};
1636 (l97).fvalue = (function(v177){
1637 ((v177)["fname"] = "ASSOC");
1639 })((function (values,v175,v176){
1640 checkArgs(arguments, 3);
1645 while(v176 !== l3.value){
1646 (l26.fvalue(pv, v175, l32.fvalue(pv, v176)) !== l3.value ? (function(){
1647 throw ({type: 'block', id: 79, values: l3.value, message: 'Return from unknown block NIL.'})
1648 })() : (v176 = (function(){
1650 return tmp === l3.value? l3.value: tmp.cdr;
1656 if (cf.type == 'block' && cf.id == 79)
1664 return tmp === l3.value? l3.value: tmp.car;
1670 var l98 = {name: "STRING"};
1672 (l98).fvalue = (function(v179){
1673 ((v179)["fname"] = "STRING");
1675 })((function (values,v178){
1676 checkArgs(arguments, 2);
1678 return (((typeof(v178) == "string")?l4.value: l3.value) !== l3.value ? v178 : (((function(){
1680 return (typeof tmp == 'object' && 'name' in tmp);
1681 })()?l4.value: l3.value) !== l3.value ? (v178).name : (function(){
1683 if (typeof x != 'number')
1684 throw 'The value ' + x + ' is not a type number.';
1685 return String.fromCharCode(x);
1691 var l99 = {name: "STRING="};
1693 (l99).fvalue = (function(v182){
1694 ((v182)["fname"] = "STRING=");
1696 })((function (values,v180,v181){
1697 checkArgs(arguments, 3);
1699 return ((v180 == v181)?l4.value: l3.value);
1704 var l100 = {name: "FDEFINITION"};
1706 (l100).fvalue = (function(v184){
1707 ((v184)["fname"] = "FDEFINITION");
1709 })((function (values,v183){
1710 checkArgs(arguments, 2);
1712 return (((typeof v183 == 'function')?l4.value: l3.value) !== l3.value ? v183 : (((function(){
1714 return (typeof tmp == 'object' && 'name' in tmp);
1715 })()?l4.value: l3.value) !== l3.value ? (function(){
1717 var func = symbol.fvalue;
1718 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1721 throw "Invalid function";
1727 var l101 = {name: "DISASSEMBLE"};
1728 var l102 = {name: "WRITE-LINE"};
1730 (l101).fvalue = (function(v186){
1731 ((v186)["fname"] = "DISASSEMBLE");
1733 })((function (values,v185){
1734 checkArgs(arguments, 2);
1736 l102.fvalue(pv, (l100.fvalue(pv, v185)).toString());
1742 var l103 = {name: "DOCUMENTATION"};
1743 var l104 = {name: "FUNCTION"};
1744 var l105 = {name: "VARIABLE"};
1746 (l103).fvalue = (function(v191){
1747 ((v191)["fname"] = "DOCUMENTATION");
1750 var func = (function (values,v187,v188){
1751 checkArgs(arguments, 3);
1753 return (function(v189){
1754 return (l26.fvalue(pv, v189, l104) !== l3.value ? (function(v190){
1756 var tmp = (v190)["docstring"];
1757 return tmp == undefined? l3.value: tmp ;
1759 })(l100.fvalue(pv, v187)) : (l26.fvalue(pv, v189, l105) !== l3.value ? (function(){
1762 return (typeof tmp == 'object' && 'name' in tmp);
1763 })()?l4.value: l3.value) !== l3.value ? l3.value : (function(){
1764 throw "Wrong argument type! it should be a symbol";
1767 var tmp = (v187)["vardoc"];
1768 return tmp == undefined? l3.value: tmp ;
1771 throw "ECASE expression failed.";
1776 func.docstring = 'Return the documentation of X. TYPE must be the symbol VARIABLE or FUNCTION.';
1781 var l106 = {name: "MULTIPLE-VALUE-BIND"};
1783 var l107 = {name: "MULTIPLE-VALUE-LIST"};
1785 var l108 = {name: "*PACKAGE-LIST*"};
1787 (((l108.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l108).value = l3.value));
1790 var l109 = {name: "LIST-ALL-PACKAGES"};
1792 (l109).fvalue = (function(v192){
1793 ((v192)["fname"] = "LIST-ALL-PACKAGES");
1795 })((function (values){
1796 checkArgsAtMost(arguments, 1);
1800 var value = symbol.value;
1801 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
1808 var l110 = {name: "MAKE-PACKAGE"};
1809 var l111 = {name: "FIND-PACKAGE-OR-FAIL"};
1811 (l110).fvalue = (function(v197){
1812 ((v197)["fname"] = "MAKE-PACKAGE");
1814 })((function (values,v193,v194){
1815 checkArgsAtLeast(arguments, 2);
1816 checkArgsAtMost(arguments, 3);
1817 switch(arguments.length-1){
1823 return (function(v195,v196){
1824 ((v195)["packageName"] = v193);
1825 ((v195)["symbols"] = {});
1826 ((v195)["exports"] = {});
1827 ((v195)["use"] = v196);
1828 ((l108).value = ({car: v195, cdr: (function(){
1830 var value = symbol.value;
1831 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
1835 })({},l73.fvalue(pv, (function(){
1837 var func = symbol.fvalue;
1838 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1845 var l112 = {name: "PACKAGEP"};
1847 (l112).fvalue = (function(v199){
1848 ((v199)["fname"] = "PACKAGEP");
1850 })((function (values,v198){
1851 checkArgs(arguments, 2);
1853 return (((typeof (v198) === 'object')?l4.value: l3.value) !== l3.value ? ((("symbols") in (v198))?l4.value: l3.value) : l3.value);
1858 var l113 = {name: "FIND-PACKAGE"};
1859 var l114 = {name: "PACKAGE-NAME"};
1861 (l113).fvalue = (function(v204){
1862 ((v204)["fname"] = "FIND-PACKAGE");
1864 })((function (values,v200){
1865 checkArgs(arguments, 2);
1868 (l112.fvalue(pv, v200) !== l3.value ? (function(){
1870 throw ({type: 'block', id: 88, values: v200, message: 'Return from unknown block FIND-PACKAGE.'})
1872 return (function(v201){
1875 return (function(v202,v203){
1877 while(v202 !== l3.value){
1878 (v203 = (function(){
1880 return tmp === l3.value? l3.value: tmp.car;
1883 (l99.fvalue(pv, l114.fvalue(pv, v203), v201) !== l3.value ? (function(){
1885 throw ({type: 'block', id: 89, values: v203, message: 'Return from unknown block NIL.'})
1889 (v202 = (function(){
1891 return tmp === l3.value? l3.value: tmp.cdr;
1898 var value = symbol.value;
1899 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
1904 if (cf.type == 'block' && cf.id == 89)
1905 return values.apply(this, forcemv(cf.values));
1910 })(l98.fvalue(pv, v200));
1913 if (cf.type == 'block' && cf.id == 88)
1914 return values.apply(this, forcemv(cf.values));
1923 (l111).fvalue = (function(v207){
1924 ((v207)["fname"] = "FIND-PACKAGE-OR-FAIL");
1926 })((function (values,v205){
1927 checkArgs(arguments, 2);
1929 return (function(v206){
1930 return (v206 !== l3.value ? v206 : (function(){
1931 throw "Package unknown.";
1933 })(l113.fvalue(pv, v205));
1939 (l114).fvalue = (function(v210){
1940 ((v210)["fname"] = "PACKAGE-NAME");
1942 })((function (values,v208){
1943 checkArgs(arguments, 2);
1945 return (function(v209){
1947 var tmp = (v209)["packageName"];
1948 return tmp == undefined? l3.value: tmp ;
1950 })(l111.fvalue(pv, v208));
1955 var l115 = {name: "%PACKAGE-SYMBOLS"};
1957 (l115).fvalue = (function(v213){
1958 ((v213)["fname"] = "%PACKAGE-SYMBOLS");
1960 })((function (values,v211){
1961 checkArgs(arguments, 2);
1963 return (function(v212){
1965 var tmp = (v212)["symbols"];
1966 return tmp == undefined? l3.value: tmp ;
1968 })(l111.fvalue(pv, v211));
1973 var l116 = {name: "PACKAGE-USE-LIST"};
1975 (l116).fvalue = (function(v216){
1976 ((v216)["fname"] = "PACKAGE-USE-LIST");
1978 })((function (values,v214){
1979 checkArgs(arguments, 2);
1981 return (function(v215){
1983 var tmp = (v215)["use"];
1984 return tmp == undefined? l3.value: tmp ;
1986 })(l111.fvalue(pv, v214));
1991 var l117 = {name: "%PACKAGE-EXTERNAL-SYMBOLS"};
1993 (l117).fvalue = (function(v219){
1994 ((v219)["fname"] = "%PACKAGE-EXTERNAL-SYMBOLS");
1996 })((function (values,v217){
1997 checkArgs(arguments, 2);
1999 return (function(v218){
2001 var tmp = (v218)["exports"];
2002 return tmp == undefined? l3.value: tmp ;
2004 })(l111.fvalue(pv, v217));
2009 var l118 = {name: "*COMMON-LISP-PACKAGE*"};
2011 (((l118.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l118).value = l110.fvalue(pv, "CL")));
2014 var l119 = {name: "*USER-PACKAGE*"};
2016 (((l119.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l119).value = l110.fvalue(pv, "CL-USER", l44.fvalue(pv, (function(){
2018 var value = symbol.value;
2019 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2024 var l120 = {name: "*KEYWORD-PACKAGE*"};
2026 (((l120.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l120).value = l110.fvalue(pv, "KEYWORD")));
2029 var l121 = {name: "KEYWORDP"};
2030 var l122 = {name: "SYMBOL-PACKAGE"};
2032 (l121).fvalue = (function(v221){
2033 ((v221)["fname"] = "KEYWORDP");
2035 })((function (values,v220){
2036 checkArgs(arguments, 2);
2038 return (((function(){
2040 return (typeof tmp == 'object' && 'name' in tmp);
2041 })()?l4.value: l3.value) !== l3.value ? ((l122.fvalue(pv, v220) === (function(){
2043 var value = symbol.value;
2044 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2046 })())?l4.value: l3.value) : l3.value);
2051 var l123 = {name: "*PACKAGE*"};
2053 (((l123.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l123).value = (function(){
2055 var value = symbol.value;
2056 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2061 var l124 = {name: "IN-PACKAGE"};
2063 var l125 = {name: "%INTERN-SYMBOL"};
2065 (l125).fvalue = (function(v225){
2066 ((v225)["fname"] = "%INTERN-SYMBOL");
2068 })((function (values,v222){
2069 checkArgs(arguments, 2);
2072 var v223 = (((("package") in (v222))?l4.value: l3.value) !== l3.value ? l111.fvalue(pv, (function(){
2073 var tmp = (v222)["package"];
2074 return tmp == undefined? l3.value: tmp ;
2075 })()) : (function(){
2077 var value = symbol.value;
2078 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2081 var v224 = l115.fvalue(pv, v223);
2082 ((v222)["package"] = v223);
2083 (((v223 === (function(){
2085 var value = symbol.value;
2086 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2088 })())?l4.value: l3.value) !== l3.value ? ((v222)["value"] = v222) : l3.value);
2089 return ((v224)[(v222).name] = v222);
2095 var l126 = {name: "FIND-SYMBOL"};
2096 var l127 = {name: "EXTERNAL", 'package': 'KEYWORD'};
2097 var l128 = {name: "INTERNAL", 'package': 'KEYWORD'};
2098 var l129 = {name: "INHERIT", 'package': 'KEYWORD'};
2100 (l126).fvalue = (function(v234){
2101 ((v234)["fname"] = "FIND-SYMBOL");
2103 })((function (values,v226,v227){
2104 checkArgsAtLeast(arguments, 2);
2105 checkArgsAtMost(arguments, 3);
2106 switch(arguments.length-1){
2110 var value = symbol.value;
2111 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2118 var v228 = l111.fvalue(pv, v227);
2119 var v229 = l117.fvalue(pv, v228);
2120 var v230 = l115.fvalue(pv, v228);
2121 return ((((v226) in (v229))?l4.value: l3.value) !== l3.value ? values((function(){
2122 var tmp = (v229)[v226];
2123 return tmp == undefined? l3.value: tmp ;
2124 })(), l127.value) : ((((v226) in (v230))?l4.value: l3.value) !== l3.value ? values((function(){
2125 var tmp = (v230)[v226];
2126 return tmp == undefined? l3.value: tmp ;
2127 })(), l128.value) : (function(){
2129 return (function(v231,v232){
2131 while(v231 !== l3.value){
2132 (v232 = (function(){
2134 return tmp === l3.value? l3.value: tmp.car;
2138 return ((((v226) in (v233))?l4.value: l3.value) !== l3.value ? (function(){
2140 throw ({type: 'block', id: 98, values: values((function(){
2141 var tmp = (v233)[v226];
2142 return tmp == undefined? l3.value: tmp ;
2143 })(), l129.value), message: 'Return from unknown block NIL.'})
2145 })(l117.fvalue(pv, v232));
2148 (v231 = (function(){
2150 return tmp === l3.value? l3.value: tmp.cdr;
2154 return values(l3.value, l3.value);
2155 })(l116.fvalue(pv, v228),l3.value);
2158 if (cf.type == 'block' && cf.id == 98)
2159 return values.apply(this, forcemv(cf.values));
2169 var l130 = {name: "INTERN"};
2170 var l131 = {name: "EXPORT"};
2172 (l130).fvalue = (function(v243){
2173 ((v243)["fname"] = "INTERN");
2175 })((function (values,v235,v236){
2176 checkArgsAtLeast(arguments, 2);
2177 checkArgsAtMost(arguments, 3);
2178 switch(arguments.length-1){
2182 var value = symbol.value;
2183 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2189 return (function(v237){
2191 var func = (function (values,v239,v240){
2192 switch(arguments.length-1){
2200 for (var i = arguments.length-1; i>=3; i--)
2201 v238 = {car: arguments[i], cdr:
2203 return (v240 !== l3.value ? values(v239, v240) : (function(v241){
2205 var tmp = (v241)[v235];
2206 return tmp == undefined? l3.value: tmp ;
2208 return (function(v242){
2209 ((v242)["package"] = v237);
2210 (((v237 === (function(){
2212 var value = symbol.value;
2213 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2215 })())?l4.value: l3.value) !== l3.value ? (function(){
2216 ((v242)["value"] = v242);
2217 return l131.fvalue(pv, l44.fvalue(pv, v242), v237);
2219 ((v241)[v235] = v242);
2220 return values(v242, l3.value);
2223 if (typeof name != 'string')
2224 throw 'The value ' + name + ' is not a type string.';
2225 return ({name: name});
2227 })(l115.fvalue(pv, v237)));
2229 var args = [values];
2233 vs = l126.fvalue(values, v235, v237);
2234 if (typeof vs === 'object' && 'multiple-value' in vs)
2235 args = args.concat(vs);
2238 return func.apply(window, args);
2241 })(l111.fvalue(pv, v236));
2247 (l122).fvalue = (function(v245){
2248 ((v245)["fname"] = "SYMBOL-PACKAGE");
2250 })((function (values,v244){
2251 checkArgs(arguments, 2);
2255 return (typeof tmp == 'object' && 'name' in tmp);
2256 })()?l4.value: l3.value) !== l3.value ? l3.value : (function(){
2257 throw "it is not a symbol";
2260 var tmp = (v244)["package"];
2261 return tmp == undefined? l3.value: tmp ;
2268 (l131).fvalue = (function(v251){
2269 ((v251)["fname"] = "EXPORT");
2271 })((function (values,v246,v247){
2272 checkArgsAtLeast(arguments, 2);
2273 checkArgsAtMost(arguments, 3);
2274 switch(arguments.length-1){
2278 var value = symbol.value;
2279 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2285 return (function(v248){
2287 return (function(v249,v250){
2289 while(v249 !== l3.value){
2290 (v250 = (function(){
2292 return tmp === l3.value? l3.value: tmp.car;
2295 ((v248)[(v250).name] = v250);
2298 (v249 = (function(){
2300 return tmp === l3.value? l3.value: tmp.cdr;
2307 })(l117.fvalue(pv, v247));
2312 var l132 = {name: "GET-UNIVERSAL-TIME"};
2314 (l132).fvalue = (function(v252){
2315 ((v252)["fname"] = "GET-UNIVERSAL-TIME");
2317 })((function (values){
2318 checkArgsAtMost(arguments, 1);
2321 var x1 = (Math.round(new Date() / 1000));
2322 if (typeof x1 !== 'number') throw 'Not a number!';
2323 var x2 = 2208988800;
2324 if (typeof x2 !== 'number') throw 'Not a number!';
2331 var l133 = {name: "*NEWLINE*"};
2333 (((l133.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l133).value = l98.fvalue(pv, l78.fvalue(pv, 10))));
2336 var l134 = {name: "CONCAT"};
2338 (l134).fvalue = (function(v254){
2339 ((v254)["fname"] = "CONCAT");
2341 })((function (values){
2343 for (var i = arguments.length-1; i>=1; i--)
2344 v253 = {car: arguments[i], cdr:
2347 return l60.fvalue(values, (function(){
2349 var func = symbol.fvalue;
2350 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2357 var l135 = {name: "CONCATF"};
2359 var l136 = {name: "JOIN"};
2361 (l136).fvalue = (function(v257){
2362 ((v257)["fname"] = "JOIN");
2364 })((function (values,v255,v256){
2365 checkArgsAtLeast(arguments, 2);
2366 checkArgsAtMost(arguments, 3);
2367 switch(arguments.length-1){
2373 return (l12.fvalue(pv, v255) !== l3.value ? "" : (l12.fvalue(pv, (function(){
2375 return tmp === l3.value? l3.value: tmp.cdr;
2376 })()) !== l3.value ? (function(){
2378 return tmp === l3.value? l3.value: tmp.car;
2379 })() : l134.fvalue(values, (function(){
2381 return tmp === l3.value? l3.value: tmp.car;
2382 })(), v256, l136.fvalue(pv, (function(){
2384 return tmp === l3.value? l3.value: tmp.cdr;
2390 var l137 = {name: "JOIN-TRAILING"};
2392 (l137).fvalue = (function(v260){
2393 ((v260)["fname"] = "JOIN-TRAILING");
2395 })((function (values,v258,v259){
2396 checkArgsAtLeast(arguments, 2);
2397 checkArgsAtMost(arguments, 3);
2398 switch(arguments.length-1){
2404 return (l12.fvalue(pv, v258) !== l3.value ? "" : l134.fvalue(values, (function(){
2406 return tmp === l3.value? l3.value: tmp.car;
2407 })(), v259, l137.fvalue(pv, (function(){
2409 return tmp === l3.value? l3.value: tmp.cdr;
2415 var l138 = {name: "MAPCONCAT"};
2417 (l138).fvalue = (function(v263){
2418 ((v263)["fname"] = "MAPCONCAT");
2420 })((function (values,v261,v262){
2421 checkArgs(arguments, 3);
2423 return l136.fvalue(values, l73.fvalue(pv, v261, v262));
2428 var l139 = {name: "VECTOR-TO-LIST"};
2430 (l139).fvalue = (function(v269){
2431 ((v269)["fname"] = "VECTOR-TO-LIST");
2433 })((function (values,v264){
2434 checkArgs(arguments, 2);
2436 return (function(v265,v266){
2438 return (function(v267,v268){
2442 if (typeof x1 !== 'number') throw 'Not a number!';
2444 if (typeof x2 !== 'number') throw 'Not a number!';
2445 return (x1<x2?l4.value: l3.value);
2448 (v265 = ({car: (function(){
2449 var x = (v264)[v267];
2450 if (x === undefined) throw 'Out of range';
2455 (v267 = (function(){
2457 if (typeof x1 !== 'number') throw 'Not a number!';
2459 if (typeof x2 !== 'number') throw 'Not a number!';
2464 return l66.fvalue(values, v265);
2467 })(l3.value,l71.fvalue(pv, v264));
2472 var l140 = {name: "LIST-TO-VECTOR"};
2474 (l140).fvalue = (function(v275){
2475 ((v275)["fname"] = "LIST-TO-VECTOR");
2477 })((function (values,v270){
2478 checkArgs(arguments, 2);
2480 return (function(v271,v272){
2482 return (function(v273,v274){
2484 while(v273 !== l3.value){
2485 (v274 = (function(){
2487 return tmp === l3.value? l3.value: tmp.car;
2493 if (i < 0 || i >= x.length) throw 'Out of range';
2496 (v272 = (function(){
2498 if (typeof x1 !== 'number') throw 'Not a number!';
2500 if (typeof x2 !== 'number') throw 'Not a number!';
2505 (v273 = (function(){
2507 return tmp === l3.value? l3.value: tmp.cdr;
2516 for (var i = 0; i < l71.fvalue(pv, v270); i++)
2524 var l141 = {name: "VALUES-LIST"};
2526 (l141).fvalue = (function(v277){
2527 ((v277)["fname"] = "VALUES-LIST");
2529 })((function (values,v276){
2530 checkArgs(arguments, 2);
2532 return values.apply(this, l140.fvalue(pv, v276));
2537 var l142 = {name: "VALUES"};
2539 (l142).fvalue = (function(v279){
2540 ((v279)["fname"] = "VALUES");
2542 })((function (values){
2544 for (var i = arguments.length-1; i>=1; i--)
2545 v278 = {car: arguments[i], cdr:
2548 return l141.fvalue(values, v278);
2553 var l143 = {name: "INDENT"};
2555 (l143).fvalue = (function(v286){
2556 ((v286)["fname"] = "INDENT");
2558 })((function (values){
2560 for (var i = arguments.length-1; i>=1; i--)
2561 v280 = {car: arguments[i], cdr:
2564 return (function(v281){
2565 return (function(v282,v283,v284){
2566 (l82.fvalue(pv, l71.fvalue(pv, v281)) !== l3.value ? (v282 = l134.fvalue(pv, v282, " ")) : l3.value);
2571 if (typeof x1 !== 'number') throw 'Not a number!';
2573 if (typeof x2 !== 'number') throw 'Not a number!';
2574 return (x1<x2?l4.value: l3.value);
2577 return (v282 = l134.fvalue(pv, v282, v285));
2578 })(((l80.fvalue(pv, (function(){
2581 if (typeof string != 'string')
2582 throw 'The value ' + string + ' is not a type string.';
2583 if (typeof index != 'number')
2584 throw 'The value ' + index + ' is not a type number.';
2585 return string.charCodeAt(index);
2586 })(), 10) !== l3.value ? ((function(){
2588 if (typeof x1 !== 'number') throw 'Not a number!';
2589 var x2 = l23.fvalue(pv, v284);
2590 if (typeof x2 !== 'number') throw 'Not a number!';
2591 return (x1<x2?l4.value: l3.value);
2592 })() !== l3.value ? l27.fvalue(pv, l80.fvalue(pv, (function(){
2594 var index = l22.fvalue(pv, v283);
2595 if (typeof string != 'string')
2596 throw 'The value ' + string + ' is not a type string.';
2597 if (typeof index != 'number')
2598 throw 'The value ' + index + ' is not a type number.';
2599 return string.charCodeAt(index);
2600 })(), 10)) : l3.value) : l3.value) !== l3.value ? l134.fvalue(pv, l98.fvalue(pv, 10), " ") : l98.fvalue(pv, (function(){
2603 if (typeof string != 'string')
2604 throw 'The value ' + string + ' is not a type string.';
2605 if (typeof index != 'number')
2606 throw 'The value ' + index + ' is not a type number.';
2607 return string.charCodeAt(index);
2609 (v283 = (function(){
2611 if (typeof x1 !== 'number') throw 'Not a number!';
2613 if (typeof x2 !== 'number') throw 'Not a number!';
2620 })("",0,l71.fvalue(pv, v281));
2621 })(l136.fvalue(pv, v280));
2627 (l17).fvalue = (function(v290){
2628 ((v290)["fname"] = "INTEGER-TO-STRING");
2630 })((function (values,v287){
2631 checkArgs(arguments, 2);
2633 return (l24.fvalue(pv, v287) !== l3.value ? "0" : (l83.fvalue(pv, v287) !== l3.value ? l134.fvalue(values, "-", l17.fvalue(pv, (function(){
2635 if (typeof x1 !== 'number') throw 'Not a number!';
2637 if (typeof x2 !== 'number') throw 'Not a number!';
2639 })())) : (function(v288){
2642 while(l27.fvalue(pv, l24.fvalue(pv, v287)) !== l3.value){
2643 (v288 = ({car: (function(){
2646 if (typeof x != 'number')
2647 throw 'The value ' + x + ' is not a type number.';
2648 if (typeof y != 'number')
2649 throw 'The value ' + y + ' is not a type number.';
2652 (v287 = l25.fvalue(pv, v287, 10));
2656 return l138.fvalue(values, (function (values,v289){
2657 checkArgs(arguments, 2);
2658 return l98.fvalue(values, l93.fvalue(pv, v289));
2665 var l144 = {name: "JS!BOOL"};
2666 var l145 = {name: "LS-COMPILE"};
2668 (l144).fvalue = (function(v292){
2669 ((v292)["fname"] = "JS!BOOL");
2671 })((function (values,v291){
2672 checkArgs(arguments, 2);
2674 return l134.fvalue(values, "(", v291, "?", l145.fvalue(pv, l4.value), ": ", l145.fvalue(pv, l3.value), ")");
2679 var l146 = {name: "JS!SELFCALL"};
2681 var l147 = {name: "PRIN1-TO-STRING"};
2682 var l148 = {name: "ESCAPE-STRING"};
2684 (l147).fvalue = (function(v301){
2685 ((v301)["fname"] = "PRIN1-TO-STRING");
2687 })((function (values,v293){
2688 checkArgs(arguments, 2);
2690 return (((function(){
2692 return (typeof tmp == 'object' && 'name' in tmp);
2693 })()?l4.value: l3.value) !== l3.value ? (function(){
2694 var func = (function (values,v295,v296){
2695 switch(arguments.length-1){
2703 for (var i = arguments.length-1; i>=3; i--)
2704 v294 = {car: arguments[i], cdr:
2706 return ((v296 !== l3.value ? ((v295 === v293)?l4.value: l3.value) : l3.value) !== l3.value ? (v293).name : (function(v297,v298){
2707 return l134.fvalue(values, (l12.fvalue(pv, v297) !== l3.value ? "#" : (((v297 === l113.fvalue(pv, "KEYWORD"))?l4.value: l3.value) !== l3.value ? "" : l114.fvalue(pv, v297))), ":", v298);
2708 })(l122.fvalue(pv, v293),(v293).name));
2710 var args = [values];
2714 vs = l126.fvalue(values, (v293).name, (function(){
2716 var value = symbol.value;
2717 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2720 if (typeof vs === 'object' && 'multiple-value' in vs)
2721 args = args.concat(vs);
2724 return func.apply(window, args);
2726 })() : (l81.fvalue(pv, v293) !== l3.value ? l17.fvalue(values, v293) : (((typeof(v293) == "string")?l4.value: l3.value) !== l3.value ? l134.fvalue(values, "\"", l148.fvalue(pv, v293), "\"") : (((typeof v293 == 'function')?l4.value: l3.value) !== l3.value ? (function(v299){
2727 return (v299 !== l3.value ? l134.fvalue(values, "#<FUNCTION ", v299, ">") : l134.fvalue(values, "#<FUNCTION>"));
2729 var tmp = (v293)["fname"];
2730 return tmp == undefined? l3.value: tmp ;
2731 })()) : (l59.fvalue(pv, v293) !== l3.value ? l134.fvalue(values, "(", l137.fvalue(pv, l73.fvalue(pv, (function(){
2733 var func = symbol.fvalue;
2734 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2736 })(), l87.fvalue(pv, v293)), " "), (function(v300){
2737 return (l12.fvalue(pv, (function(){
2739 return tmp === l3.value? l3.value: tmp.cdr;
2740 })()) !== l3.value ? l147.fvalue(pv, (function(){
2742 return tmp === l3.value? l3.value: tmp.car;
2743 })()) : l134.fvalue(pv, l147.fvalue(pv, (function(){
2745 return tmp === l3.value? l3.value: tmp.car;
2746 })()), " . ", l147.fvalue(pv, (function(){
2748 return tmp === l3.value? l3.value: tmp.cdr;
2750 })(l86.fvalue(pv, v293)), ")") : (((function(){
2752 return typeof x === 'object' && 'length' in x;
2753 })()?l4.value: l3.value) !== l3.value ? l134.fvalue(values, "#", l147.fvalue(pv, l139.fvalue(pv, v293))) : (l112.fvalue(pv, v293) !== l3.value ? l134.fvalue(values, "#<PACKAGE ", l114.fvalue(pv, v293), ">") : l3.value)))))));
2759 (l102).fvalue = (function(v303){
2760 ((v303)["fname"] = "WRITE-LINE");
2762 })((function (values,v302){
2763 checkArgs(arguments, 2);
2767 if (typeof x != 'string')
2768 throw 'The value ' + x + ' is not a type string.';
2769 return lisp.write(x);
2772 var x = (function(){
2774 var value = symbol.value;
2775 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2778 if (typeof x != 'string')
2779 throw 'The value ' + x + ' is not a type string.';
2780 return lisp.write(x);
2787 var l149 = {name: "WARN"};
2789 (l149).fvalue = (function(v305){
2790 ((v305)["fname"] = "WARN");
2792 })((function (values,v304){
2793 checkArgs(arguments, 2);
2796 var x = "WARNING: ";
2797 if (typeof x != 'string')
2798 throw 'The value ' + x + ' is not a type string.';
2799 return lisp.write(x);
2801 return l102.fvalue(values, v304);
2806 var l150 = {name: "PRINT"};
2808 (l150).fvalue = (function(v307){
2809 ((v307)["fname"] = "PRINT");
2811 })((function (values,v306){
2812 checkArgs(arguments, 2);
2814 l102.fvalue(pv, l147.fvalue(pv, v306));
2820 var l151 = {name: "MAKE-STRING-STREAM"};
2822 (l151).fvalue = (function(v309){
2823 ((v309)["fname"] = "MAKE-STRING-STREAM");
2825 })((function (values,v308){
2826 checkArgs(arguments, 2);
2828 return ({car: v308, cdr: 0});
2833 var l152 = {name: "%PEEK-CHAR"};
2835 (l152).fvalue = (function(v311){
2836 ((v311)["fname"] = "%PEEK-CHAR");
2838 })((function (values,v310){
2839 checkArgs(arguments, 2);
2841 return ((function(){
2842 var x1 = (function(){
2844 return tmp === l3.value? l3.value: tmp.cdr;
2846 if (typeof x1 !== 'number') throw 'Not a number!';
2847 var x2 = l71.fvalue(pv, (function(){
2849 return tmp === l3.value? l3.value: tmp.car;
2851 if (typeof x2 !== 'number') throw 'Not a number!';
2852 return (x1<x2?l4.value: l3.value);
2853 })() !== l3.value ? (function(){
2854 var string = (function(){
2856 return tmp === l3.value? l3.value: tmp.car;
2858 var index = (function(){
2860 return tmp === l3.value? l3.value: tmp.cdr;
2862 if (typeof string != 'string')
2863 throw 'The value ' + string + ' is not a type string.';
2864 if (typeof index != 'number')
2865 throw 'The value ' + index + ' is not a type number.';
2866 return string.charCodeAt(index);
2872 var l153 = {name: "%READ-CHAR"};
2874 (l153).fvalue = (function(v314){
2875 ((v314)["fname"] = "%READ-CHAR");
2877 })((function (values,v312){
2878 checkArgs(arguments, 2);
2880 return ((function(){
2881 var x1 = (function(){
2883 return tmp === l3.value? l3.value: tmp.cdr;
2885 if (typeof x1 !== 'number') throw 'Not a number!';
2886 var x2 = l71.fvalue(pv, (function(){
2888 return tmp === l3.value? l3.value: tmp.car;
2890 if (typeof x2 !== 'number') throw 'Not a number!';
2891 return (x1<x2?l4.value: l3.value);
2892 })() !== l3.value ? (function(v313){
2895 if (typeof x != 'object')
2896 throw 'The value ' + x + ' is not a type object.';
2897 return (x.cdr = l22.fvalue(pv, (function(){
2899 return tmp === l3.value? l3.value: tmp.cdr;
2904 var string = (function(){
2906 return tmp === l3.value? l3.value: tmp.car;
2908 var index = (function(){
2910 return tmp === l3.value? l3.value: tmp.cdr;
2912 if (typeof string != 'string')
2913 throw 'The value ' + string + ' is not a type string.';
2914 if (typeof index != 'number')
2915 throw 'The value ' + index + ' is not a type number.';
2916 return string.charCodeAt(index);
2922 var l154 = {name: "WHITESPACEP"};
2924 (l154).fvalue = (function(v318){
2925 ((v318)["fname"] = "WHITESPACEP");
2927 })((function (values,v315){
2928 checkArgs(arguments, 2);
2930 return (function(v316){
2931 return (v316 !== l3.value ? v316 : (function(v317){
2932 return (v317 !== l3.value ? v317 : l80.fvalue(values, v315, 9));
2933 })(l80.fvalue(pv, v315, 10)));
2934 })(l80.fvalue(pv, v315, 32));
2939 var l155 = {name: "SKIP-WHITESPACES"};
2941 (l155).fvalue = (function(v321){
2942 ((v321)["fname"] = "SKIP-WHITESPACES");
2944 })((function (values,v319){
2945 checkArgs(arguments, 2);
2947 return (function(v320){
2948 (v320 = l152.fvalue(pv, v319));
2951 while((v320 !== l3.value ? l154.fvalue(pv, v320) : l3.value) !== l3.value){
2952 l153.fvalue(pv, v319);
2953 (v320 = l152.fvalue(pv, v319));
2962 var l156 = {name: "TERMINALP"};
2964 (l156).fvalue = (function(v326){
2965 ((v326)["fname"] = "TERMINALP");
2967 })((function (values,v322){
2968 checkArgs(arguments, 2);
2970 return (function(v323){
2971 return (v323 !== l3.value ? v323 : (function(v324){
2972 return (v324 !== l3.value ? v324 : (function(v325){
2973 return (v325 !== l3.value ? v325 : l80.fvalue(values, 40, v322));
2974 })(l80.fvalue(pv, 41, v322)));
2975 })(l154.fvalue(pv, v322)));
2976 })(l12.fvalue(pv, v322));
2981 var l157 = {name: "READ-UNTIL"};
2983 (l157).fvalue = (function(v331){
2984 ((v331)["fname"] = "READ-UNTIL");
2986 })((function (values,v327,v328){
2987 checkArgs(arguments, 3);
2989 return (function(v329,v330){
2990 (v330 = l152.fvalue(pv, v327));
2993 while((v330 !== l3.value ? l27.fvalue(pv, (v328)(pv, v330)) : l3.value) !== l3.value){
2994 (v329 = l134.fvalue(pv, v329, l98.fvalue(pv, v330)));
2995 l153.fvalue(pv, v327);
2996 (v330 = l152.fvalue(pv, v327));
3006 var l158 = {name: "SKIP-WHITESPACES-AND-COMMENTS"};
3008 (l158).fvalue = (function(v335){
3009 ((v335)["fname"] = "SKIP-WHITESPACES-AND-COMMENTS");
3011 })((function (values,v332){
3012 checkArgs(arguments, 2);
3014 return (function(v333){
3015 l155.fvalue(pv, v332);
3016 (v333 = l152.fvalue(pv, v332));
3019 while((v333 !== l3.value ? l80.fvalue(pv, v333, 59) : l3.value) !== l3.value){
3020 l157.fvalue(pv, v332, (function (values,v334){
3021 checkArgs(arguments, 2);
3022 return l80.fvalue(values, v334, 10);
3024 l155.fvalue(pv, v332);
3025 (v333 = l152.fvalue(pv, v332));
3034 var l159 = {name: "%READ-LIST"};
3035 var l160 = {name: "LS-READ"};
3037 (l159).fvalue = (function(v339){
3038 ((v339)["fname"] = "%READ-LIST");
3040 })((function (values,v336){
3041 checkArgs(arguments, 2);
3043 l158.fvalue(pv, v336);
3044 return (function(v337){
3045 return (l12.fvalue(pv, v337) !== l3.value ? (function(){
3046 throw "Unspected EOF";
3047 })() : (l80.fvalue(pv, v337, 41) !== l3.value ? (function(){
3048 l153.fvalue(pv, v336);
3050 })() : (l80.fvalue(pv, v337, 46) !== l3.value ? (function(){
3051 l153.fvalue(pv, v336);
3052 return (function(v338){
3053 l158.fvalue(pv, v336);
3054 (l80.fvalue(pv, l153.fvalue(pv, v336), 41) !== l3.value ? l3.value : (function(){
3055 throw "')' was expected.";
3058 })(l160.fvalue(pv, v336));
3059 })() : ({car: l160.fvalue(pv, v336), cdr: l159.fvalue(pv, v336)}))));
3060 })(l152.fvalue(pv, v336));
3065 var l161 = {name: "READ-STRING"};
3067 (l161).fvalue = (function(v343){
3068 ((v343)["fname"] = "READ-STRING");
3070 })((function (values,v340){
3071 checkArgs(arguments, 2);
3073 return (function(v341,v342){
3074 (v342 = l153.fvalue(pv, v340));
3077 while(l27.fvalue(pv, l26.fvalue(pv, v342, 34)) !== l3.value){
3078 (l12.fvalue(pv, v342) !== l3.value ? (function(){
3079 throw "Unexpected EOF";
3081 (l26.fvalue(pv, v342, 92) !== l3.value ? (v342 = l153.fvalue(pv, v340)) : l3.value);
3082 (v341 = l134.fvalue(pv, v341, l98.fvalue(pv, v342)));
3083 (v342 = l153.fvalue(pv, v340));
3093 var l162 = {name: "READ-SHARP"};
3095 (l162).fvalue = (function(v348){
3096 ((v348)["fname"] = "READ-SHARP");
3098 })((function (values,v344){
3099 checkArgs(arguments, 2);
3101 l153.fvalue(pv, v344);
3102 return (function(v345){
3103 return (l26.fvalue(pv, v345, 39) !== l3.value ? l44.fvalue(values, l104, l160.fvalue(pv, v344)) : (l26.fvalue(pv, v345, 40) !== l3.value ? l140.fvalue(values, l159.fvalue(pv, v344)) : (l26.fvalue(pv, v345, 58) !== l3.value ? (function(){
3104 var name = (function(){
3105 var x = l157.fvalue(pv, v344, (function(){
3107 var func = symbol.fvalue;
3108 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3111 if (typeof x != 'string')
3112 throw 'The value ' + x + ' is not a type string.';
3113 return x.toUpperCase();
3115 if (typeof name != 'string')
3116 throw 'The value ' + name + ' is not a type string.';
3117 return ({name: name});
3118 })() : (l26.fvalue(pv, v345, 92) !== l3.value ? (function(v346){
3119 return (l99.fvalue(pv, v346, "space") !== l3.value ? l79.fvalue(values, 32) : (l99.fvalue(pv, v346, "tab") !== l3.value ? l79.fvalue(values, 9) : (l99.fvalue(pv, v346, "newline") !== l3.value ? l79.fvalue(values, 10) : l79.fvalue(values, (function(){
3122 if (typeof string != 'string')
3123 throw 'The value ' + string + ' is not a type string.';
3124 if (typeof index != 'number')
3125 throw 'The value ' + index + ' is not a type number.';
3126 return string.charCodeAt(index);
3128 })(l134.fvalue(pv, l98.fvalue(pv, l153.fvalue(pv, v344)), l157.fvalue(pv, v344, (function(){
3130 var func = symbol.fvalue;
3131 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3133 })()))) : (l26.fvalue(pv, v345, 43) !== l3.value ? (function(v347){
3134 return (l99.fvalue(pv, v347, "common-lisp") !== l3.value ? (function(){
3135 l160.fvalue(pv, v344);
3136 return l160.fvalue(values, v344);
3137 })() : (l99.fvalue(pv, v347, "ecmalisp") !== l3.value ? l160.fvalue(values, v344) : (function(){
3138 throw "Unknown reader form.";
3140 })(l157.fvalue(pv, v344, (function(){
3142 var func = symbol.fvalue;
3143 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3145 })())) : (function(){
3146 throw "ECASE expression failed.";
3148 })(l153.fvalue(pv, v344));
3153 var l163 = {name: "READ-SYMBOL"};
3155 (l163).fvalue = (function(v356){
3156 ((v356)["fname"] = "READ-SYMBOL");
3158 })((function (values,v349){
3159 checkArgs(arguments, 2);
3161 return (function(v350,v351,v352,v353,v354){
3167 if (typeof x1 !== 'number') throw 'Not a number!';
3169 if (typeof x2 !== 'number') throw 'Not a number!';
3170 return (x1<x2?l4.value: l3.value);
3171 })() !== l3.value ? l27.fvalue(pv, l80.fvalue(pv, (function(){
3174 if (typeof string != 'string')
3175 throw 'The value ' + string + ' is not a type string.';
3176 if (typeof index != 'number')
3177 throw 'The value ' + index + ' is not a type number.';
3178 return string.charCodeAt(index);
3179 })(), 58)) : l3.value) !== l3.value){
3180 (v354 = (function(){
3182 if (typeof x1 !== 'number') throw 'Not a number!';
3184 if (typeof x2 !== 'number') throw 'Not a number!';
3192 if (typeof x1 !== 'number') throw 'Not a number!';
3194 if (typeof x2 !== 'number') throw 'Not a number!';
3195 return (x1==x2?l4.value: l3.value);
3196 })() !== l3.value ? (function(){
3198 (v351 = (function(){
3200 var value = symbol.value;
3201 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3204 return (v353 = l4.value);
3206 (l24.fvalue(pv, v354) !== l3.value ? (v351 = "KEYWORD") : (v351 = (function(){
3207 var x = l94.fvalue(pv, v349, 0, v354);
3208 if (typeof x != 'string')
3209 throw 'The value ' + x + ' is not a type string.';
3210 return x.toUpperCase();
3212 (v354 = (function(){
3214 if (typeof x1 !== 'number') throw 'Not a number!';
3216 if (typeof x2 !== 'number') throw 'Not a number!';
3219 (l80.fvalue(pv, (function(){
3222 if (typeof string != 'string')
3223 throw 'The value ' + string + ' is not a type string.';
3224 if (typeof index != 'number')
3225 throw 'The value ' + index + ' is not a type number.';
3226 return string.charCodeAt(index);
3227 })(), 58) !== l3.value ? (function(){
3229 return (v354 = (function(){
3231 if (typeof x1 !== 'number') throw 'Not a number!';
3233 if (typeof x2 !== 'number') throw 'Not a number!';
3237 return (v352 = l94.fvalue(pv, v349, v354));
3239 (v352 = (function(){
3241 if (typeof x != 'string')
3242 throw 'The value ' + x + ' is not a type string.';
3243 return x.toUpperCase();
3245 (v351 = l113.fvalue(pv, v351));
3246 return ((function(v355){
3247 return (v355 !== l3.value ? v355 : ((v351 === l113.fvalue(pv, "KEYWORD"))?l4.value: l3.value));
3248 })(v353) !== l3.value ? l130.fvalue(values, v352, v351) : l126.fvalue(values, v352, v351));
3249 })(l71.fvalue(pv, v349),l3.value,l3.value,l3.value,l3.value);
3254 var l164 = {name: "!PARSE-INTEGER"};
3256 (l164).fvalue = (function(v367){
3257 ((v367)["fname"] = "!PARSE-INTEGER");
3259 })((function (values,v357,v358){
3260 checkArgs(arguments, 3);
3264 return (function(v359,v360,v361,v362){
3265 (l24.fvalue(pv, v361) !== l3.value ? (function(){
3267 throw ({type: 'block', id: 141, values: values(l3.value, 0), message: 'Return from unknown block NIL.'})
3270 return (l26.fvalue(pv, v363, 43) !== l3.value ? (v360 = (function(){
3272 if (typeof x1 !== 'number') throw 'Not a number!';
3274 if (typeof x2 !== 'number') throw 'Not a number!';
3276 })()) : (l26.fvalue(pv, v363, 45) !== l3.value ? (function(){
3278 return (v360 = (function(){
3280 if (typeof x1 !== 'number') throw 'Not a number!';
3282 if (typeof x2 !== 'number') throw 'Not a number!';
3289 if (typeof string != 'string')
3290 throw 'The value ' + string + ' is not a type string.';
3291 if (typeof index != 'number')
3292 throw 'The value ' + index + ' is not a type number.';
3293 return string.charCodeAt(index);
3297 if (typeof x1 !== 'number') throw 'Not a number!';
3299 if (typeof x2 !== 'number') throw 'Not a number!';
3300 return (x1<x2?l4.value: l3.value);
3301 })() !== l3.value ? (v359 = l92.fvalue(pv, (function(){
3304 if (typeof string != 'string')
3305 throw 'The value ' + string + ' is not a type string.';
3306 if (typeof index != 'number')
3307 throw 'The value ' + index + ' is not a type number.';
3308 return string.charCodeAt(index);
3309 })())) : l3.value) !== l3.value ? l3.value : (function(){
3311 throw ({type: 'block', id: 141, values: values(l3.value, v360), message: 'Return from unknown block NIL.'})
3313 (v360 = (function(){
3315 if (typeof x1 !== 'number') throw 'Not a number!';
3317 if (typeof x2 !== 'number') throw 'Not a number!';
3325 if (typeof x1 !== 'number') throw 'Not a number!';
3327 if (typeof x2 !== 'number') throw 'Not a number!';
3328 return (x1<x2?l4.value: l3.value);
3331 (v364 !== l3.value ? l3.value : (function(){
3332 throw ({type: 'block', id: 142, values: l3.value, message: 'Return from unknown block NIL.'})
3334 (v359 = (function(){
3335 var x1 = (function(){
3337 if (typeof x1 !== 'number') throw 'Not a number!';
3339 if (typeof x2 !== 'number') throw 'Not a number!';
3342 if (typeof x1 !== 'number') throw 'Not a number!';
3344 if (typeof x2 !== 'number') throw 'Not a number!';
3347 return (v360 = (function(){
3349 if (typeof x1 !== 'number') throw 'Not a number!';
3351 if (typeof x2 !== 'number') throw 'Not a number!';
3354 })(l92.fvalue(pv, (function(){
3357 if (typeof string != 'string')
3358 throw 'The value ' + string + ' is not a type string.';
3359 if (typeof index != 'number')
3360 throw 'The value ' + index + ' is not a type number.';
3361 return string.charCodeAt(index);
3367 if (cf.type == 'block' && cf.id == 142)
3373 return ((function(v365){
3374 return (v365 !== l3.value ? v365 : (function(v366){
3375 return (v366 !== l3.value ? v366 : l80.fvalue(pv, (function(){
3378 if (typeof string != 'string')
3379 throw 'The value ' + string + ' is not a type string.';
3380 if (typeof index != 'number')
3381 throw 'The value ' + index + ' is not a type number.';
3382 return string.charCodeAt(index);
3386 if (typeof x1 !== 'number') throw 'Not a number!';
3388 if (typeof x2 !== 'number') throw 'Not a number!';
3389 return (x1==x2?l4.value: l3.value);
3391 })(v358) !== l3.value ? values((function(){
3393 if (typeof x1 !== 'number') throw 'Not a number!';
3395 if (typeof x2 !== 'number') throw 'Not a number!';
3397 })(), v360) : values(l3.value, v360));
3398 })(0,0,l71.fvalue(pv, v357),1);
3401 if (cf.type == 'block' && cf.id == 141)
3402 return values.apply(this, forcemv(cf.values));
3411 var l165 = {name: "PARSE-INTEGER"};
3413 (l165).fvalue = (function(v369){
3414 ((v369)["fname"] = "PARSE-INTEGER");
3416 })((function (values,v368){
3417 checkArgs(arguments, 2);
3419 return l164.fvalue(values, v368, l3.value);
3424 var l166 = {name: "*EOF*"};
3426 (((l166.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l166).value = l16.fvalue(pv)));
3429 var l167 = {name: "QUOTE"};
3430 var l168 = {name: "BACKQUOTE"};
3431 var l169 = {name: "UNQUOTE-SPLICING"};
3432 var l170 = {name: "UNQUOTE"};
3434 (l160).fvalue = (function(v375){
3435 ((v375)["fname"] = "LS-READ");
3437 })((function (values,v370){
3438 checkArgs(arguments, 2);
3440 l158.fvalue(pv, v370);
3441 return (function(v371){
3442 return ((function(v372){
3443 return (v372 !== l3.value ? v372 : l80.fvalue(pv, v371, 41));
3444 })(l12.fvalue(pv, v371)) !== l3.value ? (function(){
3446 var value = symbol.value;
3447 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3449 })() : (l80.fvalue(pv, v371, 40) !== l3.value ? (function(){
3450 l153.fvalue(pv, v370);
3451 return l159.fvalue(values, v370);
3452 })() : (l80.fvalue(pv, v371, 39) !== l3.value ? (function(){
3453 l153.fvalue(pv, v370);
3454 return l44.fvalue(values, l167, l160.fvalue(pv, v370));
3455 })() : (l80.fvalue(pv, v371, 96) !== l3.value ? (function(){
3456 l153.fvalue(pv, v370);
3457 return l44.fvalue(values, l168, l160.fvalue(pv, v370));
3458 })() : (l80.fvalue(pv, v371, 34) !== l3.value ? (function(){
3459 l153.fvalue(pv, v370);
3460 return l161.fvalue(values, v370);
3461 })() : (l80.fvalue(pv, v371, 44) !== l3.value ? (function(){
3462 l153.fvalue(pv, v370);
3463 return (l26.fvalue(pv, l152.fvalue(pv, v370), 64) !== l3.value ? (function(){
3464 l153.fvalue(pv, v370);
3465 return l44.fvalue(values, l169, l160.fvalue(pv, v370));
3466 })() : l44.fvalue(values, l170, l160.fvalue(pv, v370)));
3467 })() : (l80.fvalue(pv, v371, 35) !== l3.value ? l162.fvalue(values, v370) : (function(v373){
3468 return (function(v374){
3469 return (v374 !== l3.value ? v374 : l163.fvalue(values, v373));
3470 })(pv(l164.fvalue(pv, v373, l3.value)));
3471 })(l157.fvalue(pv, v370, (function(){
3473 var func = symbol.fvalue;
3474 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3477 })(l152.fvalue(pv, v370));
3482 var l171 = {name: "LS-READ-FROM-STRING"};
3484 (l171).fvalue = (function(v377){
3485 ((v377)["fname"] = "LS-READ-FROM-STRING");
3487 })((function (values,v376){
3488 checkArgs(arguments, 2);
3490 return l160.fvalue(values, l151.fvalue(pv, v376));
3495 var l172 = {name: "*MULTIPLE-VALUE-P*"};
3497 (((l172.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l172).value = l3.value));
3500 var l173 = {name: "MAKE-BINDING"};
3502 (l173).fvalue = (function(v382){
3503 ((v382)["fname"] = "MAKE-BINDING");
3505 })((function (values,v378,v379,v380,v381){
3506 checkArgsAtLeast(arguments, 4);
3507 checkArgsAtMost(arguments, 5);
3508 switch(arguments.length-1){
3514 return l44.fvalue(values, v378, v379, v380, v381);
3519 var l174 = {name: "BINDING-NAME"};
3521 (l174).fvalue = (function(v384){
3522 ((v384)["fname"] = "BINDING-NAME");
3524 })((function (values,v383){
3525 checkArgs(arguments, 2);
3527 return l39.fvalue(values, v383);
3532 var l175 = {name: "BINDING-TYPE"};
3534 (l175).fvalue = (function(v386){
3535 ((v386)["fname"] = "BINDING-TYPE");
3537 })((function (values,v385){
3538 checkArgs(arguments, 2);
3540 return l40.fvalue(values, v385);
3545 var l176 = {name: "BINDING-VALUE"};
3547 (l176).fvalue = (function(v388){
3548 ((v388)["fname"] = "BINDING-VALUE");
3550 })((function (values,v387){
3551 checkArgs(arguments, 2);
3553 return l41.fvalue(values, v387);
3558 var l177 = {name: "BINDING-DECLARATIONS"};
3560 (l177).fvalue = (function(v390){
3561 ((v390)["fname"] = "BINDING-DECLARATIONS");
3563 })((function (values,v389){
3564 checkArgs(arguments, 2);
3566 return l42.fvalue(values, v389);
3571 var l178 = {name: "SET-BINDING-VALUE"};
3573 (l178).fvalue = (function(v393){
3574 ((v393)["fname"] = "SET-BINDING-VALUE");
3576 })((function (values,v391,v392){
3577 checkArgs(arguments, 3);
3580 var x = l35.fvalue(pv, v391);
3581 if (typeof x != 'object')
3582 throw 'The value ' + x + ' is not a type object.';
3583 return (x.car = v392, x);
3589 var l179 = {name: "SET-BINDING-DECLARATIONS"};
3591 (l179).fvalue = (function(v396){
3592 ((v396)["fname"] = "SET-BINDING-DECLARATIONS");
3594 })((function (values,v394,v395){
3595 checkArgs(arguments, 3);
3598 var x = l37.fvalue(pv, v394);
3599 if (typeof x != 'object')
3600 throw 'The value ' + x + ' is not a type object.';
3601 return (x.car = v395, x);
3607 var l180 = {name: "PUSH-BINDING-DECLARATION"};
3609 (l180).fvalue = (function(v399){
3610 ((v399)["fname"] = "PUSH-BINDING-DECLARATION");
3612 })((function (values,v397,v398){
3613 checkArgs(arguments, 3);
3615 return l179.fvalue(values, v398, ({car: v397, cdr: l177.fvalue(pv, v398)}));
3620 var l181 = {name: "MAKE-LEXENV"};
3622 (l181).fvalue = (function(v400){
3623 ((v400)["fname"] = "MAKE-LEXENV");
3625 })((function (values){
3626 checkArgsAtMost(arguments, 1);
3628 return l44.fvalue(values, l3.value, l3.value, l3.value, l3.value);
3633 var l182 = {name: "COPY-LEXENV"};
3635 (l182).fvalue = (function(v402){
3636 ((v402)["fname"] = "COPY-LEXENV");
3638 })((function (values,v401){
3639 checkArgs(arguments, 2);
3641 return l77.fvalue(values, v401);
3646 var l183 = {name: "PUSH-TO-LEXENV"};
3647 var l184 = {name: "BLOCK"};
3648 var l185 = {name: "GOTAG"};
3650 (l183).fvalue = (function(v407){
3651 ((v407)["fname"] = "PUSH-TO-LEXENV");
3653 })((function (values,v403,v404,v405){
3654 checkArgs(arguments, 4);
3656 return (function(v406){
3657 return (l26.fvalue(pv, v406, l105) !== l3.value ? (function(){
3659 if (typeof x != 'object')
3660 throw 'The value ' + x + ' is not a type object.';
3661 return (x.car = ({car: v403, cdr: (function(){
3663 return tmp === l3.value? l3.value: tmp.car;
3665 })() : (l26.fvalue(pv, v406, l104) !== l3.value ? (function(){
3666 var x = (function(){
3668 return tmp === l3.value? l3.value: tmp.cdr;
3670 if (typeof x != 'object')
3671 throw 'The value ' + x + ' is not a type object.';
3672 return (x.car = ({car: v403, cdr: l33.fvalue(pv, v404)}), x);
3673 })() : (l26.fvalue(pv, v406, l184) !== l3.value ? (function(){
3674 var x = l35.fvalue(pv, v404);
3675 if (typeof x != 'object')
3676 throw 'The value ' + x + ' is not a type object.';
3677 return (x.car = ({car: v403, cdr: l36.fvalue(pv, v404)}), x);
3678 })() : (l26.fvalue(pv, v406, l185) !== l3.value ? (function(){
3679 var x = l37.fvalue(pv, v404);
3680 if (typeof x != 'object')
3681 throw 'The value ' + x + ' is not a type object.';
3682 return (x.car = ({car: v403, cdr: l38.fvalue(pv, v404)}), x);
3684 throw "ECASE expression failed.";
3691 var l186 = {name: "EXTEND-LEXENV"};
3693 (l186).fvalue = (function(v414){
3694 ((v414)["fname"] = "EXTEND-LEXENV");
3696 })((function (values,v408,v409,v410){
3697 checkArgs(arguments, 4);
3699 return (function(v411){
3701 return (function(v412,v413){
3703 while(v412 !== l3.value){
3704 (v413 = (function(){
3706 return tmp === l3.value? l3.value: tmp.car;
3709 l183.fvalue(pv, v413, v411, v410);
3712 (v412 = (function(){
3714 return tmp === l3.value? l3.value: tmp.cdr;
3719 })(l66.fvalue(pv, v408),l3.value);
3721 })(l182.fvalue(pv, v409));
3726 var l187 = {name: "LOOKUP-IN-LEXENV"};
3728 (l187).fvalue = (function(v419){
3729 ((v419)["fname"] = "LOOKUP-IN-LEXENV");
3731 })((function (values,v415,v416,v417){
3732 checkArgs(arguments, 4);
3734 return l97.fvalue(values, v415, (function(v418){
3735 return (l26.fvalue(pv, v418, l105) !== l3.value ? l39.fvalue(pv, v416) : (l26.fvalue(pv, v418, l104) !== l3.value ? l40.fvalue(pv, v416) : (l26.fvalue(pv, v418, l184) !== l3.value ? l41.fvalue(pv, v416) : (l26.fvalue(pv, v418, l185) !== l3.value ? l42.fvalue(pv, v416) : (function(){
3736 throw "ECASE expression failed.";
3743 var l188 = {name: "*ENVIRONMENT*"};
3745 (((l188.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l188).value = l181.fvalue(pv)));
3748 var l189 = {name: "*VARIABLE-COUNTER*"};
3750 (((l189.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l189).value = 0));
3753 var l190 = {name: "GVARNAME"};
3755 (l190).fvalue = (function(v421){
3756 ((v421)["fname"] = "GVARNAME");
3758 })((function (values,v420){
3759 checkArgs(arguments, 2);
3761 return l134.fvalue(values, "v", l17.fvalue(pv, ((l189).value = (function(){
3762 var x1 = (function(){
3764 var value = symbol.value;
3765 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3768 if (typeof x1 !== 'number') throw 'Not a number!';
3770 if (typeof x2 !== 'number') throw 'Not a number!';
3777 var l191 = {name: "TRANSLATE-VARIABLE"};
3779 (l191).fvalue = (function(v423){
3780 ((v423)["fname"] = "TRANSLATE-VARIABLE");
3782 })((function (values,v422){
3783 checkArgs(arguments, 2);
3785 return l176.fvalue(values, l187.fvalue(pv, v422, (function(){
3787 var value = symbol.value;
3788 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3795 var l192 = {name: "EXTEND-LOCAL-ENV"};
3797 (l192).fvalue = (function(v429){
3798 ((v429)["fname"] = "EXTEND-LOCAL-ENV");
3800 })((function (values,v424){
3801 checkArgs(arguments, 2);
3803 return (function(v425){
3805 return (function(v426,v427){
3807 while(v426 !== l3.value){
3808 (v427 = (function(){
3810 return tmp === l3.value? l3.value: tmp.car;
3814 return l183.fvalue(pv, v428, v425, l105);
3815 })(l173.fvalue(pv, v427, l105, l190.fvalue(pv, v427)));
3818 (v426 = (function(){
3820 return tmp === l3.value? l3.value: tmp.cdr;
3827 })(l182.fvalue(pv, (function(){
3829 var value = symbol.value;
3830 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3837 var l193 = {name: "*TOPLEVEL-COMPILATIONS*"};
3839 (((l193.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l193).value = l3.value));
3842 var l194 = {name: "TOPLEVEL-COMPILATION"};
3844 (l194).fvalue = (function(v431){
3845 ((v431)["fname"] = "TOPLEVEL-COMPILATION");
3847 })((function (values,v430){
3848 checkArgs(arguments, 2);
3850 return ((l193).value = ({car: v430, cdr: (function(){
3852 var value = symbol.value;
3853 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3860 var l195 = {name: "NULL-OR-EMPTY-P"};
3862 (l195).fvalue = (function(v433){
3863 ((v433)["fname"] = "NULL-OR-EMPTY-P");
3865 })((function (values,v432){
3866 checkArgs(arguments, 2);
3868 return l24.fvalue(values, l71.fvalue(pv, v432));
3873 var l196 = {name: "GET-TOPLEVEL-COMPILATIONS"};
3875 (l196).fvalue = (function(v434){
3876 ((v434)["fname"] = "GET-TOPLEVEL-COMPILATIONS");
3878 })((function (values){
3879 checkArgsAtMost(arguments, 1);
3881 return l66.fvalue(values, l90.fvalue(pv, (function(){
3883 var func = symbol.fvalue;
3884 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3888 var value = symbol.value;
3889 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3896 var l197 = {name: "%COMPILE-DEFMACRO"};
3897 var l198 = {name: "MACRO"};
3899 (l197).fvalue = (function(v437){
3900 ((v437)["fname"] = "%COMPILE-DEFMACRO");
3902 })((function (values,v435,v436){
3903 checkArgs(arguments, 3);
3905 l194.fvalue(pv, l145.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l167), l44.fvalue(pv, v435))));
3906 l183.fvalue(pv, l173.fvalue(pv, v435, l198, v436), (function(){
3908 var value = symbol.value;
3909 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3917 var l199 = {name: "GLOBAL-BINDING"};
3919 (l199).fvalue = (function(v443){
3920 ((v443)["fname"] = "GLOBAL-BINDING");
3922 })((function (values,v438,v439,v440){
3923 checkArgs(arguments, 4);
3925 return (function(v441){
3926 return (v441 !== l3.value ? v441 : (function(v442){
3927 l183.fvalue(pv, v442, (function(){
3929 var value = symbol.value;
3930 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3934 })(l173.fvalue(pv, v438, v439, l3.value)));
3935 })(l187.fvalue(pv, v438, (function(){
3937 var value = symbol.value;
3938 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3945 var l200 = {name: "CLAIMP"};
3947 (l200).fvalue = (function(v448){
3948 ((v448)["fname"] = "CLAIMP");
3950 })((function (values,v444,v445,v446){
3951 checkArgs(arguments, 4);
3953 return (function(v447){
3954 return (v447 !== l3.value ? l88.fvalue(values, v446, l177.fvalue(pv, v447)) : l3.value);
3955 })(l187.fvalue(pv, v444, (function(){
3957 var value = symbol.value;
3958 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3965 var l201 = {name: "!PROCLAIM"};
3966 var l202 = {name: "SPECIAL"};
3967 var l203 = {name: "NOTINLINE"};
3968 var l204 = {name: "CONSTANT"};
3970 (l201).fvalue = (function(v460){
3971 ((v460)["fname"] = "!PROCLAIM");
3973 })((function (values,v449){
3974 checkArgs(arguments, 2);
3976 return (function(v450){
3977 return (l26.fvalue(pv, v450, l202) !== l3.value ? (function(){
3978 return (function(v451,v452){
3980 while(v451 !== l3.value){
3981 (v452 = (function(){
3983 return tmp === l3.value? l3.value: tmp.car;
3987 return l180.fvalue(pv, l202, v453);
3988 })(l199.fvalue(pv, v452, l105, l105));
3991 (v451 = (function(){
3993 return tmp === l3.value? l3.value: tmp.cdr;
4000 return tmp === l3.value? l3.value: tmp.cdr;
4002 })() : (l26.fvalue(pv, v450, l203) !== l3.value ? (function(){
4003 return (function(v454,v455){
4005 while(v454 !== l3.value){
4006 (v455 = (function(){
4008 return tmp === l3.value? l3.value: tmp.car;
4012 return l180.fvalue(pv, l203, v456);
4013 })(l199.fvalue(pv, v455, l104, l104));
4016 (v454 = (function(){
4018 return tmp === l3.value? l3.value: tmp.cdr;
4025 return tmp === l3.value? l3.value: tmp.cdr;
4027 })() : (l26.fvalue(pv, v450, l204) !== l3.value ? (function(){
4028 return (function(v457,v458){
4030 while(v457 !== l3.value){
4031 (v458 = (function(){
4033 return tmp === l3.value? l3.value: tmp.car;
4037 return l180.fvalue(pv, l204, v459);
4038 })(l199.fvalue(pv, v458, l105, l105));
4041 (v457 = (function(){
4043 return tmp === l3.value? l3.value: tmp.cdr;
4050 return tmp === l3.value? l3.value: tmp.cdr;
4055 return tmp === l3.value? l3.value: tmp.car;
4061 var l205 = {name: "PROCLAIM"};
4062 (l205).fvalue = (function(){
4064 var func = symbol.fvalue;
4065 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4068 var l206 = {name: "*COMPILATIONS*"};
4070 (((l206.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l206).value = l3.value));
4073 var l207 = {name: "DEFINE-COMPILATION"};
4075 var l208 = {name: "IF"};
4076 ((l206).value = ({car: l44.fvalue(pv, l208, (function (values,v461,v462,v463){
4077 checkArgs(arguments, 4);
4079 return l134.fvalue(values, "(", l145.fvalue(pv, v461), " !== ", l145.fvalue(pv, l3.value), " ? ", l145.fvalue(pv, v462, (function(){
4081 var value = symbol.value;
4082 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4084 })()), " : ", l145.fvalue(pv, v463, (function(){
4086 var value = symbol.value;
4087 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4091 })), cdr: (function(){
4093 var value = symbol.value;
4094 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4097 var l209 = {name: "*LAMBDA-LIST-KEYWORDS*"};
4098 var l210 = {name: "&OPTIONAL"};
4099 var l211 = {name: "&REST"};
4100 var l212 = QIList(l210,l211,l3);
4102 (((l209.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l209).value = l212));
4105 var l213 = {name: "LIST-UNTIL-KEYWORD"};
4107 (l213).fvalue = (function(v466){
4108 ((v466)["fname"] = "LIST-UNTIL-KEYWORD");
4110 })((function (values,v464){
4111 checkArgs(arguments, 2);
4113 return ((function(v465){
4114 return (v465 !== l3.value ? v465 : l88.fvalue(pv, (function(){
4116 return tmp === l3.value? l3.value: tmp.car;
4119 var value = symbol.value;
4120 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4123 })(l12.fvalue(pv, v464)) !== l3.value ? l3.value : ({car: (function(){
4125 return tmp === l3.value? l3.value: tmp.car;
4126 })(), cdr: l213.fvalue(pv, (function(){
4128 return tmp === l3.value? l3.value: tmp.cdr;
4134 var l214 = {name: "LAMBDA-LIST-REQUIRED-ARGUMENTS"};
4136 (l214).fvalue = (function(v468){
4137 ((v468)["fname"] = "LAMBDA-LIST-REQUIRED-ARGUMENTS");
4139 })((function (values,v467){
4140 checkArgs(arguments, 2);
4142 return l213.fvalue(values, v467);
4147 var l215 = {name: "LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT"};
4149 (l215).fvalue = (function(v470){
4150 ((v470)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT");
4152 })((function (values,v469){
4153 checkArgs(arguments, 2);
4155 return l73.fvalue(values, (function(){
4157 var func = symbol.fvalue;
4158 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4160 })(), l213.fvalue(pv, (function(){
4161 var tmp = l88.fvalue(pv, l210, v469);
4162 return tmp === l3.value? l3.value: tmp.cdr;
4168 var l216 = {name: "LAMBDA-LIST-OPTIONAL-ARGUMENTS"};
4170 (l216).fvalue = (function(v472){
4171 ((v472)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS");
4173 })((function (values,v471){
4174 checkArgs(arguments, 2);
4176 return l73.fvalue(values, (function(){
4178 var func = symbol.fvalue;
4179 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4181 })(), l215.fvalue(pv, v471));
4186 var l217 = {name: "LAMBDA-LIST-REST-ARGUMENT"};
4188 (l217).fvalue = (function(v475){
4189 ((v475)["fname"] = "LAMBDA-LIST-REST-ARGUMENT");
4191 })((function (values,v473){
4192 checkArgs(arguments, 2);
4194 return (function(v474){
4197 return tmp === l3.value? l3.value: tmp.cdr;
4198 })() !== l3.value ? (function(){
4199 throw "Bad lambda-list";
4203 return tmp === l3.value? l3.value: tmp.car;
4205 })(l213.fvalue(pv, (function(){
4206 var tmp = l88.fvalue(pv, l211, v473);
4207 return tmp === l3.value? l3.value: tmp.cdr;
4213 var l218 = {name: "LAMBDA-DOCSTRING-WRAPPER"};
4215 (l218).fvalue = (function(v478){
4216 ((v478)["fname"] = "LAMBDA-DOCSTRING-WRAPPER");
4218 })((function (values,v477){
4219 checkArgsAtLeast(arguments, 2);
4221 for (var i = arguments.length-1; i>=2; i--)
4222 v476 = {car: arguments[i], cdr:
4225 return (v477 !== l3.value ? l134.fvalue(values, "(function(){", (function(){
4227 var value = symbol.value;
4228 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4230 })(), l143.fvalue(pv, "var func = ", l136.fvalue(pv, v476), ";", (function(){
4232 var value = symbol.value;
4233 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4235 })(), "func.docstring = '", v477, "';", (function(){
4237 var value = symbol.value;
4238 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4240 })(), "return func;", (function(){
4242 var value = symbol.value;
4243 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4245 })()), "})()") : l136.fvalue(values, v476));
4250 var l219 = {name: "LAMBDA-CHECK-ARGUMENT-COUNT"};
4251 var l220 = {name: "N/A"};
4253 (l219).fvalue = (function(v484){
4254 ((v484)["fname"] = "LAMBDA-CHECK-ARGUMENT-COUNT");
4256 })((function (values,v479,v480,v481){
4257 checkArgs(arguments, 4);
4259 return (function(v482,v483){
4264 if (typeof x1 !== 'number') throw 'Not a number!';
4266 if (typeof x2 !== 'number') throw 'Not a number!';
4267 return (x1<x2?l4.value: l3.value);
4268 })() !== l3.value ? l26.fvalue(pv, v482, v483) : l3.value) !== l3.value ? (function(){
4270 throw ({type: 'block', id: 182, values: l134.fvalue(values, "checkArgs(arguments, ", l17.fvalue(pv, v482), ");", (function(){
4272 var value = symbol.value;
4273 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4275 })()), message: 'Return from unknown block NIL.'})
4277 return l134.fvalue(values, ((function(){
4279 if (typeof x1 !== 'number') throw 'Not a number!';
4281 if (typeof x2 !== 'number') throw 'Not a number!';
4282 return (x1<x2?l4.value: l3.value);
4283 })() !== l3.value ? l134.fvalue(pv, "checkArgsAtLeast(arguments, ", l17.fvalue(pv, v482), ");", (function(){
4285 var value = symbol.value;
4286 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4288 })()) : ""), (((typeof (v483) == "number")?l4.value: l3.value) !== l3.value ? l134.fvalue(pv, "checkArgsAtMost(arguments, ", l17.fvalue(pv, v483), ");", (function(){
4290 var value = symbol.value;
4291 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4296 if (cf.type == 'block' && cf.id == 182)
4297 return values.apply(this, forcemv(cf.values));
4302 })(l22.fvalue(pv, v479),(v481 !== l3.value ? l220 : (function(){
4304 if (typeof x1 !== 'number') throw 'Not a number!';
4306 if (typeof x2 !== 'number') throw 'Not a number!';
4308 if (typeof x3 !== 'number') throw 'Not a number!';
4315 var l221 = {name: "COMPILE-LAMBDA"};
4316 var l222 = {name: "LS-COMPILE-BLOCK"};
4318 (l221).fvalue = (function(v500){
4319 ((v500)["fname"] = "COMPILE-LAMBDA");
4321 })((function (values,v485,v486){
4322 checkArgs(arguments, 3);
4324 return (function(v487,v488,v489,v490){
4325 ((((typeof((function(){
4327 return tmp === l3.value? l3.value: tmp.car;
4328 })()) == "string")?l4.value: l3.value) !== l3.value ? l27.fvalue(pv, l12.fvalue(pv, (function(){
4330 return tmp === l3.value? l3.value: tmp.cdr;
4331 })())) : l3.value) !== l3.value ? (function(){
4332 (v490 = (function(){
4334 return tmp === l3.value? l3.value: tmp.car;
4336 return (v486 = (function(){
4338 return tmp === l3.value? l3.value: tmp.cdr;
4341 return (function(v491,v492,v493){
4347 return l218.fvalue(values, v490, "(function (", l136.fvalue(pv, ({car: "values", cdr: l73.fvalue(pv, (function(){
4349 var func = symbol.fvalue;
4350 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4352 })(), l64.fvalue(pv, v487, v488))}), ","), "){", (function(){
4354 var value = symbol.value;
4355 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4357 })(), l143.fvalue(pv, l219.fvalue(pv, v491, v492, v489), (v488 !== l3.value ? l134.fvalue(pv, "switch(arguments.length-1){", (function(){
4359 var value = symbol.value;
4360 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4362 })(), (function(v494,v495,v496){
4368 if (typeof x1 !== 'number') throw 'Not a number!';
4370 if (typeof x2 !== 'number') throw 'Not a number!';
4371 return (x1<x2?l4.value: l3.value);
4374 (v495 = ({car: l134.fvalue(pv, "case ", l17.fvalue(pv, (function(){
4376 if (typeof x1 !== 'number') throw 'Not a number!';
4378 if (typeof x2 !== 'number') throw 'Not a number!';
4380 })()), ":", (function(){
4382 var value = symbol.value;
4383 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4385 })(), l191.fvalue(pv, (function(){
4387 return tmp === l3.value? l3.value: tmp.car;
4388 })()), "=", l145.fvalue(pv, l33.fvalue(pv, v497)), ";", (function(){
4390 var value = symbol.value;
4391 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4393 })()), cdr: v495}));
4394 return (v496 = (function(){
4396 if (typeof x1 !== 'number') throw 'Not a number!';
4398 if (typeof x2 !== 'number') throw 'Not a number!';
4401 })(l85.fvalue(pv, v496, v494));
4405 (v495 = ({car: l134.fvalue(pv, "default: break;", (function(){
4407 var value = symbol.value;
4408 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4410 })()), cdr: v495}));
4411 return l136.fvalue(pv, l66.fvalue(pv, v495));
4413 })(l215.fvalue(pv, v485),l3.value,0), "}", (function(){
4415 var value = symbol.value;
4416 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4418 })()) : ""), (v489 !== l3.value ? (function(v498){
4419 return l134.fvalue(pv, "var ", v498, "= ", l145.fvalue(pv, l3.value), ";", (function(){
4421 var value = symbol.value;
4422 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4424 })(), "for (var i = arguments.length-1; i>=", l17.fvalue(pv, (function(){
4426 if (typeof x1 !== 'number') throw 'Not a number!';
4428 if (typeof x2 !== 'number') throw 'Not a number!';
4430 if (typeof x3 !== 'number') throw 'Not a number!';
4432 })()), "; i--)", (function(){
4434 var value = symbol.value;
4435 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4437 })(), l143.fvalue(pv, v498, " = ", "{car: arguments[i], cdr: "), v498, "};", (function(){
4439 var value = symbol.value;
4440 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4443 })(l191.fvalue(pv, v489)) : ""), (function(v499){
4449 return l222.fvalue(pv, v486, l4.value);
4454 })(l4.value)), "})");
4459 })(l71.fvalue(pv, v487),l71.fvalue(pv, v488),l192.fvalue(pv, l64.fvalue(pv, l58.fvalue(pv, v489), v487, v488)));
4460 })(l214.fvalue(pv, v485),l216.fvalue(pv, v485),l217.fvalue(pv, v485),l3.value);
4465 var l223 = {name: "SETQ-PAIR"};
4466 var l224 = {name: "SET"};
4468 (l223).fvalue = (function(v504){
4469 ((v504)["fname"] = "SETQ-PAIR");
4471 })((function (values,v501,v502){
4472 checkArgs(arguments, 3);
4474 return (function(v503){
4475 return ((((l175.fvalue(pv, v503) === l105)?l4.value: l3.value) !== l3.value ? (l27.fvalue(pv, l88.fvalue(pv, l202, l177.fvalue(pv, v503))) !== l3.value ? l27.fvalue(pv, l88.fvalue(pv, l204, l177.fvalue(pv, v503))) : l3.value) : l3.value) !== l3.value ? l134.fvalue(values, l176.fvalue(pv, v503), " = ", l145.fvalue(pv, v502)) : l145.fvalue(values, l64.fvalue(pv, l44.fvalue(pv, l224), l44.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l167), l44.fvalue(pv, v501))), l44.fvalue(pv, v502))));
4476 })(l187.fvalue(pv, v501, (function(){
4478 var value = symbol.value;
4479 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4486 var l225 = {name: "SETQ"};
4487 ((l206).value = ({car: l44.fvalue(pv, l225, (function (values){
4489 for (var i = arguments.length-1; i>=1; i--)
4490 v505 = {car: arguments[i], cdr:
4493 return (function(v506){
4497 while(l4.value !== l3.value){
4498 (l12.fvalue(pv, v505) !== l3.value ? (function(){
4499 throw ({type: 'block', id: 187, values: l3.value, message: 'Return from unknown block NIL.'})
4500 })() : (l12.fvalue(pv, (function(){
4502 return tmp === l3.value? l3.value: tmp.cdr;
4503 })()) !== l3.value ? (function(){
4504 throw "Odd paris in SETQ";
4506 (v506 = l134.fvalue(pv, v506, l134.fvalue(pv, l223.fvalue(pv, (function(){
4508 return tmp === l3.value? l3.value: tmp.car;
4509 })(), l33.fvalue(pv, v505)), (l12.fvalue(pv, l35.fvalue(pv, v505)) !== l3.value ? "" : ", "))));
4510 return (v505 = l35.fvalue(pv, v505));
4516 if (cf.type == 'block' && cf.id == 187)
4522 return l134.fvalue(values, "(", v506, ")");
4525 })), cdr: (function(){
4527 var value = symbol.value;
4528 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4531 var l226 = {name: "JS-VREF"};
4532 ((l206).value = ({car: l44.fvalue(pv, l226, (function (values,v507){
4533 checkArgs(arguments, 2);
4537 })), cdr: (function(){
4539 var value = symbol.value;
4540 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4543 var l227 = {name: "JS-VSET"};
4544 ((l206).value = ({car: l44.fvalue(pv, l227, (function (values,v508,v509){
4545 checkArgs(arguments, 3);
4547 return l134.fvalue(values, "(", v508, " = ", l145.fvalue(pv, v509), ")");
4549 })), cdr: (function(){
4551 var value = symbol.value;
4552 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4556 (l148).fvalue = (function(v516){
4557 ((v516)["fname"] = "ESCAPE-STRING");
4559 })((function (values,v510){
4560 checkArgs(arguments, 2);
4562 return (function(v511,v512,v513){
4567 if (typeof x1 !== 'number') throw 'Not a number!';
4569 if (typeof x2 !== 'number') throw 'Not a number!';
4570 return (x1<x2?l4.value: l3.value);
4574 return (v515 !== l3.value ? v515 : l80.fvalue(pv, v514, 92));
4575 })(l80.fvalue(pv, v514, 34)) !== l3.value ? (v511 = l134.fvalue(pv, v511, "\\")) : l3.value);
4576 (l80.fvalue(pv, v514, 10) !== l3.value ? (function(){
4577 (v511 = l134.fvalue(pv, v511, "\\"));
4578 return (v514 = 110);
4580 return (v511 = l134.fvalue(pv, v511, l98.fvalue(pv, v514)));
4584 if (typeof string != 'string')
4585 throw 'The value ' + string + ' is not a type string.';
4586 if (typeof index != 'number')
4587 throw 'The value ' + index + ' is not a type number.';
4588 return string.charCodeAt(index);
4590 (v512 = (function(){
4592 if (typeof x1 !== 'number') throw 'Not a number!';
4594 if (typeof x2 !== 'number') throw 'Not a number!';
4601 })("",0,l71.fvalue(pv, v510));
4606 var l228 = {name: "*LITERAL-SYMBOLS*"};
4608 (((l228.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l228).value = l3.value));
4611 var l229 = {name: "*LITERAL-COUNTER*"};
4613 (((l229.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l229).value = 0));
4616 var l230 = {name: "GENLIT"};
4618 (l230).fvalue = (function(v517){
4619 ((v517)["fname"] = "GENLIT");
4621 })((function (values){
4622 checkArgsAtMost(arguments, 1);
4624 return l134.fvalue(values, "l", l17.fvalue(pv, ((l229).value = (function(){
4625 var x1 = (function(){
4627 var value = symbol.value;
4628 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4631 if (typeof x1 !== 'number') throw 'Not a number!';
4633 if (typeof x2 !== 'number') throw 'Not a number!';
4640 var l231 = {name: "LITERAL"};
4642 (l231).fvalue = (function(v532){
4643 ((v532)["fname"] = "LITERAL");
4645 })((function (values,v518,v519){
4646 checkArgsAtLeast(arguments, 2);
4647 checkArgsAtMost(arguments, 3);
4648 switch(arguments.length-1){
4654 return (l81.fvalue(pv, v518) !== l3.value ? l17.fvalue(values, v518) : (((typeof(v518) == "string")?l4.value: l3.value) !== l3.value ? l134.fvalue(values, "\"", l148.fvalue(pv, v518), "\"") : (((function(){
4656 return (typeof tmp == 'object' && 'name' in tmp);
4657 })()?l4.value: l3.value) !== l3.value ? (function(v520){
4658 return (v520 !== l3.value ? v520 : (function(v522,v523){
4659 ((l228).value = ({car: ({car: v518, cdr: v522}), cdr: (function(){
4661 var value = symbol.value;
4662 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4665 l194.fvalue(pv, l134.fvalue(pv, "var ", v522, " = ", v523));
4667 })(l230.fvalue(pv),(function(v521){
4668 return (l12.fvalue(pv, v521) !== l3.value ? l134.fvalue(pv, "{name: \"", l148.fvalue(pv, (v518).name), "\"}") : l145.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l130), l44.fvalue(pv, (v518).name), l44.fvalue(pv, l114.fvalue(pv, v521)))));
4669 })(l122.fvalue(pv, v518))));
4671 var tmp = l97.fvalue(pv, v518, (function(){
4673 var value = symbol.value;
4674 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4677 return tmp === l3.value? l3.value: tmp.cdr;
4678 })()) : (((function(){
4680 return (typeof tmp == 'object' && 'car' in tmp);
4681 })()?l4.value: l3.value) !== l3.value ? (function(){
4682 var v524 = l87.fvalue(pv, v518);
4683 var v525 = l86.fvalue(pv, v518);
4684 var v526 = l134.fvalue(pv, "QIList(", l137.fvalue(pv, l73.fvalue(pv, (function (values,v527){
4685 checkArgs(arguments, 2);
4686 return l231.fvalue(values, v527, l4.value);
4687 }), v524), ","), l231.fvalue(pv, (function(){
4689 return tmp === l3.value? l3.value: tmp.car;
4690 })(), l4.value), ",", l231.fvalue(pv, (function(){
4692 return tmp === l3.value? l3.value: tmp.cdr;
4693 })(), l4.value), ")");
4694 return (v519 !== l3.value ? v526 : (function(v528){
4695 l194.fvalue(pv, l134.fvalue(pv, "var ", v528, " = ", v526));
4697 })(l230.fvalue(pv)));
4698 })() : (((function(){
4700 return typeof x === 'object' && 'length' in x;
4701 })()?l4.value: l3.value) !== l3.value ? (function(v529){
4702 return (function(v530){
4703 return (v519 !== l3.value ? v530 : (function(v531){
4704 l194.fvalue(pv, l134.fvalue(pv, "var ", v531, " = ", v530));
4706 })(l230.fvalue(pv)));
4707 })(l134.fvalue(pv, "[", l136.fvalue(pv, l73.fvalue(pv, (function(){
4709 var func = symbol.fvalue;
4710 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4712 })(), v529), ", "), "]"));
4713 })(l139.fvalue(pv, v518)) : l3.value)))));
4718 ((l206).value = ({car: l44.fvalue(pv, l167, (function (values,v533){
4719 checkArgs(arguments, 2);
4721 return l231.fvalue(values, v533);
4723 })), cdr: (function(){
4725 var value = symbol.value;
4726 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4729 var l232 = {name: "%WHILE"};
4730 ((l206).value = ({car: l44.fvalue(pv, l232, (function (values,v535){
4731 checkArgsAtLeast(arguments, 2);
4733 for (var i = arguments.length-1; i>=2; i--)
4734 v534 = {car: arguments[i], cdr:
4737 return l134.fvalue(values, "(function(){", (function(){
4739 var value = symbol.value;
4740 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4742 })(), l143.fvalue(pv, "while(", l145.fvalue(pv, v535), " !== ", l145.fvalue(pv, l3.value), "){", (function(){
4744 var value = symbol.value;
4745 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4747 })(), l143.fvalue(pv, l222.fvalue(pv, v534)), "}", "return ", l145.fvalue(pv, l3.value), ";", (function(){
4749 var value = symbol.value;
4750 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4754 })), cdr: (function(){
4756 var value = symbol.value;
4757 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4760 var l233 = {name: "SYMBOL-FUNCTION"};
4761 ((l206).value = ({car: l44.fvalue(pv, l104, (function (values,v536){
4762 checkArgs(arguments, 2);
4764 return ((l59.fvalue(pv, v536) !== l3.value ? (((function(){
4766 return tmp === l3.value? l3.value: tmp.car;
4767 })() === l5)?l4.value: l3.value) : l3.value) !== l3.value ? l221.fvalue(values, l33.fvalue(pv, v536), l35.fvalue(pv, v536)) : (((function(){
4769 return (typeof tmp == 'object' && 'name' in tmp);
4770 })()?l4.value: l3.value) !== l3.value ? (function(v537){
4771 return (v537 !== l3.value ? l176.fvalue(values, v537) : l145.fvalue(values, l64.fvalue(pv, l44.fvalue(pv, l233), l44.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l167), l44.fvalue(pv, v536))))));
4772 })(l187.fvalue(pv, v536, (function(){
4774 var value = symbol.value;
4775 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4777 })(), l104)) : l3.value));
4779 })), cdr: (function(){
4781 var value = symbol.value;
4782 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4785 var l234 = {name: "MAKE-FUNCTION-BINDING"};
4787 (l234).fvalue = (function(v539){
4788 ((v539)["fname"] = "MAKE-FUNCTION-BINDING");
4790 })((function (values,v538){
4791 checkArgs(arguments, 2);
4793 return l173.fvalue(values, v538, l104, l190.fvalue(pv, v538));
4798 var l235 = {name: "COMPILE-FUNCTION-DEFINITION"};
4800 (l235).fvalue = (function(v541){
4801 ((v541)["fname"] = "COMPILE-FUNCTION-DEFINITION");
4803 })((function (values,v540){
4804 checkArgs(arguments, 2);
4806 return l221.fvalue(values, (function(){
4808 return tmp === l3.value? l3.value: tmp.car;
4811 return tmp === l3.value? l3.value: tmp.cdr;
4817 var l236 = {name: "TRANSLATE-FUNCTION"};
4819 (l236).fvalue = (function(v544){
4820 ((v544)["fname"] = "TRANSLATE-FUNCTION");
4822 })((function (values,v542){
4823 checkArgs(arguments, 2);
4825 return (function(v543){
4826 return l176.fvalue(values, v543);
4827 })(l187.fvalue(pv, v542, (function(){
4829 var value = symbol.value;
4830 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4837 var l237 = {name: "FLET"};
4838 ((l206).value = ({car: l44.fvalue(pv, l237, (function (values,v546){
4839 checkArgsAtLeast(arguments, 2);
4841 for (var i = arguments.length-1; i>=2; i--)
4842 v545 = {car: arguments[i], cdr:
4847 var v551 = l188.value;
4848 var v547 = l73.fvalue(pv, (function(){
4850 var func = symbol.fvalue;
4851 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4854 var v548 = l73.fvalue(pv, (function(){
4856 var func = symbol.fvalue;
4857 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4860 var v549 = l73.fvalue(pv, (function(){
4862 var func = symbol.fvalue;
4863 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4866 ((l188).value = l186.fvalue(pv, l73.fvalue(pv, (function(){
4868 var func = symbol.fvalue;
4869 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4871 })(), v547), (function(){
4873 var value = symbol.value;
4874 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4877 return l134.fvalue(values, "(function(", l136.fvalue(pv, l73.fvalue(pv, (function(){
4879 var func = symbol.fvalue;
4880 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4882 })(), v547), ","), "){", (function(){
4884 var value = symbol.value;
4885 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4887 })(), (function(v550){
4888 return l143.fvalue(pv, v550);
4889 })(l222.fvalue(pv, v545, l4.value)), "})(", l136.fvalue(pv, v549, ","), ")");
4896 })), cdr: (function(){
4898 var value = symbol.value;
4899 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4902 var l238 = {name: "LABELS"};
4903 ((l206).value = ({car: l44.fvalue(pv, l238, (function (values,v553){
4904 checkArgsAtLeast(arguments, 2);
4906 for (var i = arguments.length-1; i>=2; i--)
4907 v552 = {car: arguments[i], cdr:
4912 var v556 = l188.value;
4913 var v554 = l73.fvalue(pv, (function(){
4915 var func = symbol.fvalue;
4916 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4919 ((l188).value = l186.fvalue(pv, l73.fvalue(pv, (function(){
4921 var func = symbol.fvalue;
4922 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4924 })(), v554), (function(){
4926 var value = symbol.value;
4927 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4930 return l134.fvalue(values, "(function(){", (function(){
4932 var value = symbol.value;
4933 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4935 })(), l143.fvalue(pv, l138.fvalue(pv, (function (values,v555){
4936 checkArgs(arguments, 2);
4937 return l134.fvalue(values, "var ", l236.fvalue(pv, (function(){
4939 return tmp === l3.value? l3.value: tmp.car;
4940 })()), " = ", l221.fvalue(pv, l33.fvalue(pv, v555), l35.fvalue(pv, v555)), ";", (function(){
4942 var value = symbol.value;
4943 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4946 }), v553), l222.fvalue(pv, v552, l4.value)), "})()");
4953 })), cdr: (function(){
4955 var value = symbol.value;
4956 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4959 var l239 = {name: "*COMPILING-FILE*"};
4961 (((l239.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l239).value = l3.value));
4964 var l240 = {name: "EVAL-WHEN-COMPILE"};
4965 var l241 = {name: "PROGN"};
4966 var l242 = {name: "EVAL"};
4967 ((l206).value = ({car: l44.fvalue(pv, l240, (function (values){
4969 for (var i = arguments.length-1; i>=1; i--)
4970 v557 = {car: arguments[i], cdr:
4973 return ((function(){
4975 var value = symbol.value;
4976 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4978 })() !== l3.value ? (function(){
4979 l242.fvalue(pv, ({car: l241, cdr: v557}));
4981 })() : l145.fvalue(values, l64.fvalue(pv, l44.fvalue(pv, l241), v557)));
4983 })), cdr: (function(){
4985 var value = symbol.value;
4986 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4989 var l243 = {name: "DEFINE-TRANSFORMATION"};
4991 ((l206).value = ({car: l44.fvalue(pv, l241, (function (values){
4993 for (var i = arguments.length-1; i>=1; i--)
4994 v558 = {car: arguments[i], cdr:
4997 return (l12.fvalue(pv, (function(){
4999 return tmp === l3.value? l3.value: tmp.cdr;
5000 })()) !== l3.value ? l145.fvalue(values, (function(){
5002 return tmp === l3.value? l3.value: tmp.car;
5005 var value = symbol.value;
5006 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5008 })()) : l134.fvalue(values, "(function(){", (function(){
5010 var value = symbol.value;
5011 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5013 })(), l143.fvalue(pv, l222.fvalue(pv, v558, l4.value)), "})()"));
5015 })), cdr: (function(){
5017 var value = symbol.value;
5018 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5021 var l244 = {name: "SPECIAL-VARIABLE-P"};
5023 (l244).fvalue = (function(v560){
5024 ((v560)["fname"] = "SPECIAL-VARIABLE-P");
5026 })((function (values,v559){
5027 checkArgs(arguments, 2);
5029 return (l200.fvalue(pv, v559, l105, l202) !== l3.value ? l4.value : l3.value);
5034 var l245 = {name: "LET-BINDING-WRAPPER"};
5036 (l245).fvalue = (function(v567){
5037 ((v567)["fname"] = "LET-BINDING-WRAPPER");
5039 })((function (values,v561,v562){
5040 checkArgs(arguments, 3);
5043 (l12.fvalue(pv, v561) !== l3.value ? (function(){
5045 throw ({type: 'block', id: 205, values: v562, message: 'Return from unknown block LET-BINDING-WRAPPER.'})
5047 return l134.fvalue(values, "try {", (function(){
5049 var value = symbol.value;
5050 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5052 })(), l143.fvalue(pv, "var tmp;", (function(){
5054 var value = symbol.value;
5055 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5057 })(), l138.fvalue(pv, (function (values,v563){
5058 checkArgs(arguments, 2);
5059 return (function(v564){
5060 return l134.fvalue(values, "tmp = ", v564, ".value;", (function(){
5062 var value = symbol.value;
5063 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5065 })(), v564, ".value = ", (function(){
5067 return tmp === l3.value? l3.value: tmp.cdr;
5068 })(), ";", (function(){
5070 var value = symbol.value;
5071 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5075 return tmp === l3.value? l3.value: tmp.cdr;
5076 })(), " = tmp;", (function(){
5078 var value = symbol.value;
5079 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5082 })(l145.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l167), l44.fvalue(pv, (function(){
5084 return tmp === l3.value? l3.value: tmp.car;
5086 }), v561), v562, (function(){
5088 var value = symbol.value;
5089 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5091 })()), "}", (function(){
5093 var value = symbol.value;
5094 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5096 })(), "finally {", (function(){
5098 var value = symbol.value;
5099 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5101 })(), l143.fvalue(pv, l138.fvalue(pv, (function (values,v565){
5102 checkArgs(arguments, 2);
5103 return (function(v566){
5104 return l134.fvalue(values, v566, ".value", " = ", (function(){
5106 return tmp === l3.value? l3.value: tmp.cdr;
5107 })(), ";", (function(){
5109 var value = symbol.value;
5110 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5113 })(l145.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l167), l44.fvalue(pv, (function(){
5115 return tmp === l3.value? l3.value: tmp.car;
5117 }), v561)), "}", (function(){
5119 var value = symbol.value;
5120 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5125 if (cf.type == 'block' && cf.id == 205)
5126 return values.apply(this, forcemv(cf.values));
5134 var l246 = {name: "LET"};
5135 ((l206).value = ({car: l44.fvalue(pv, l246, (function (values,v569){
5136 checkArgsAtLeast(arguments, 2);
5138 for (var i = arguments.length-1; i>=2; i--)
5139 v568 = {car: arguments[i], cdr:
5144 var v577 = l188.value;
5145 var v570 = l73.fvalue(pv, (function(){
5147 var func = symbol.fvalue;
5148 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5151 var v571 = l73.fvalue(pv, (function(){
5153 var func = symbol.fvalue;
5154 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5157 var v572 = l73.fvalue(pv, (function(){
5159 var func = symbol.fvalue;
5160 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5162 })(), l73.fvalue(pv, (function(){
5164 var func = symbol.fvalue;
5165 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5168 ((l188).value = l192.fvalue(pv, l90.fvalue(pv, (function(){
5170 var func = symbol.fvalue;
5171 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5174 var v573 = l3.value;
5175 return l134.fvalue(values, "(function(", l136.fvalue(pv, l73.fvalue(pv, (function (values,v574){
5176 checkArgs(arguments, 2);
5177 return (l244.fvalue(pv, v574) !== l3.value ? (function(v575){
5178 (v573 = ({car: ({car: v574, cdr: v575}), cdr: v573}));
5180 })(l190.fvalue(pv, v574)) : l191.fvalue(values, v574));
5181 }), v571), ","), "){", (function(){
5183 var value = symbol.value;
5184 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5186 })(), (function(v576){
5187 return l143.fvalue(pv, l245.fvalue(pv, v573, v576));
5188 })(l222.fvalue(pv, v568, l4.value)), "})(", l136.fvalue(pv, v572, ","), ")");
5195 })), cdr: (function(){
5197 var value = symbol.value;
5198 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5201 var l247 = {name: "LET*-INITIALIZE-VALUE"};
5203 (l247).fvalue = (function(v584){
5204 ((v584)["fname"] = "LET*-INITIALIZE-VALUE");
5206 })((function (values,v578){
5207 checkArgs(arguments, 2);
5209 return (function(v579,v580){
5210 return (l244.fvalue(pv, v579) !== l3.value ? l134.fvalue(values, l145.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l225), l44.fvalue(pv, v579), l44.fvalue(pv, v580))), ";", (function(){
5212 var value = symbol.value;
5213 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5215 })()) : (function(){
5216 var v581 = l190.fvalue(pv, v579);
5217 var v582 = l173.fvalue(pv, v579, l105, v581);
5218 return (function(v583){
5219 l183.fvalue(pv, v582, (function(){
5221 var value = symbol.value;
5222 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5226 })(l134.fvalue(pv, "var ", v581, " = ", l145.fvalue(pv, v580), ";", (function(){
5228 var value = symbol.value;
5229 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5233 })(l39.fvalue(pv, v578),l40.fvalue(pv, v578));
5238 var l248 = {name: "LET*-BINDING-WRAPPER"};
5240 (l248).fvalue = (function(v593){
5241 ((v593)["fname"] = "LET*-BINDING-WRAPPER");
5243 })((function (values,v585,v586){
5244 checkArgs(arguments, 3);
5247 (l12.fvalue(pv, v585) !== l3.value ? (function(){
5249 throw ({type: 'block', id: 208, values: v586, message: 'Return from unknown block LET*-BINDING-WRAPPER.'})
5251 return (function(v588){
5252 return l134.fvalue(values, "try {", (function(){
5254 var value = symbol.value;
5255 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5257 })(), l143.fvalue(pv, l138.fvalue(pv, (function (values,v589){
5258 checkArgs(arguments, 2);
5259 return (function(v590){
5260 return l134.fvalue(values, "var ", (function(){
5262 return tmp === l3.value? l3.value: tmp.cdr;
5263 })(), " = ", v590, ".value;", (function(){
5265 var value = symbol.value;
5266 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5269 })(l145.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l167), l44.fvalue(pv, (function(){
5271 return tmp === l3.value? l3.value: tmp.car;
5273 }), v588), v586), "}", (function(){
5275 var value = symbol.value;
5276 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5278 })(), "finally {", (function(){
5280 var value = symbol.value;
5281 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5283 })(), l143.fvalue(pv, l138.fvalue(pv, (function (values,v591){
5284 checkArgs(arguments, 2);
5285 return (function(v592){
5286 return l134.fvalue(values, v592, ".value", " = ", (function(){
5288 return tmp === l3.value? l3.value: tmp.cdr;
5289 })(), ";", (function(){
5291 var value = symbol.value;
5292 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5295 })(l145.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l167), l44.fvalue(pv, (function(){
5297 return tmp === l3.value? l3.value: tmp.car;
5299 }), v588)), "}", (function(){
5301 var value = symbol.value;
5302 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5305 })(l73.fvalue(pv, (function (values,v587){
5306 checkArgs(arguments, 2);
5307 return ({car: v587, cdr: l190.fvalue(pv, v587)});
5308 }), l91.fvalue(pv, (function(){
5310 var func = symbol.fvalue;
5311 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5316 if (cf.type == 'block' && cf.id == 208)
5317 return values.apply(this, forcemv(cf.values));
5325 var l249 = {name: "LET*"};
5326 ((l206).value = ({car: l44.fvalue(pv, l249, (function (values,v595){
5327 checkArgsAtLeast(arguments, 2);
5329 for (var i = arguments.length-1; i>=2; i--)
5330 v594 = {car: arguments[i], cdr:
5333 return (function(v596,v597){
5339 return l134.fvalue(values, "(function(){", (function(){
5341 var value = symbol.value;
5342 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5344 })(), l143.fvalue(pv, (function(v598,v599){
5345 return l248.fvalue(pv, v598, v599);
5346 })(l91.fvalue(pv, (function(){
5348 var func = symbol.fvalue;
5349 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5351 })(), l73.fvalue(pv, (function(){
5353 var func = symbol.fvalue;
5354 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5356 })(), v596)),l134.fvalue(pv, l138.fvalue(pv, (function(){
5358 var func = symbol.fvalue;
5359 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5361 })(), v596), l222.fvalue(pv, v594, l4.value)))), "})()");
5366 })(l73.fvalue(pv, (function(){
5368 var func = symbol.fvalue;
5369 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5371 })(), v595),l182.fvalue(pv, (function(){
5373 var value = symbol.value;
5374 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5378 })), cdr: (function(){
5380 var value = symbol.value;
5381 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5384 var l250 = {name: "*BLOCK-COUNTER*"};
5386 (((l250.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l250).value = 0));
5389 var l251 = {name: "MULTIPLE-VALUE"};
5390 var l252 = {name: "USED"};
5391 ((l206).value = ({car: l44.fvalue(pv, l184, (function (values,v601){
5392 checkArgsAtLeast(arguments, 2);
5394 for (var i = arguments.length-1; i>=2; i--)
5395 v600 = {car: arguments[i], cdr:
5399 var v602 = l17.fvalue(pv, ((l250).value = (function(){
5400 var x1 = (function(){
5402 var value = symbol.value;
5403 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5406 if (typeof x1 !== 'number') throw 'Not a number!';
5408 if (typeof x2 !== 'number') throw 'Not a number!';
5411 var v603 = l173.fvalue(pv, v601, l184, v602);
5414 var value = symbol.value;
5415 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5417 })() !== l3.value ? l180.fvalue(pv, l251, v603) : l3.value);
5420 var v605 = l188.value;
5421 ((l188).value = l186.fvalue(pv, l44.fvalue(pv, v603), (function(){
5423 var value = symbol.value;
5424 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5427 var v604 = l222.fvalue(pv, v600, l4.value);
5428 return (l88.fvalue(pv, l252, l177.fvalue(pv, v603)) !== l3.value ? l134.fvalue(values, "(function(){", (function(){
5430 var value = symbol.value;
5431 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5433 })(), l143.fvalue(pv, "try {", (function(){
5435 var value = symbol.value;
5436 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5438 })(), l143.fvalue(pv, v604), "}", (function(){
5440 var value = symbol.value;
5441 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5443 })(), "catch (cf){", (function(){
5445 var value = symbol.value;
5446 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5448 })(), " if (cf.type == 'block' && cf.id == ", v602, ")", (function(){
5450 var value = symbol.value;
5451 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5455 var value = symbol.value;
5456 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5458 })() !== l3.value ? " return values.apply(this, forcemv(cf.values));" : " return cf.values;"), (function(){
5460 var value = symbol.value;
5461 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5463 })(), " else", (function(){
5465 var value = symbol.value;
5466 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5468 })(), " throw cf;", (function(){
5470 var value = symbol.value;
5471 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5473 })(), "}", (function(){
5475 var value = symbol.value;
5476 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5478 })()), "})()") : l134.fvalue(values, "(function(){", (function(){
5480 var value = symbol.value;
5481 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5483 })(), l143.fvalue(pv, v604), "})()"));
5491 })), cdr: (function(){
5493 var value = symbol.value;
5494 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5497 var l253 = {name: "RETURN-FROM"};
5498 ((l206).value = ({car: l44.fvalue(pv, l253, (function (values,v606,v607){
5499 checkArgsAtLeast(arguments, 2);
5500 checkArgsAtMost(arguments, 3);
5501 switch(arguments.length-1){
5508 var v608 = l187.fvalue(pv, v606, (function(){
5510 var value = symbol.value;
5511 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5514 var v609 = l88.fvalue(pv, l251, l177.fvalue(pv, v608));
5515 (l12.fvalue(pv, v608) !== l3.value ? (function(){
5516 throw l134.fvalue(pv, "Unknown block `", (v606).name, "'.");
5518 l180.fvalue(pv, l252, v608);
5519 return l134.fvalue(values, "(function(){", (function(){
5521 var value = symbol.value;
5522 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5524 })(), l143.fvalue(pv, (v609 !== l3.value ? l134.fvalue(pv, "var values = mv;", (function(){
5526 var value = symbol.value;
5527 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5529 })()) : ""), "throw ({", "type: 'block', ", "id: ", l176.fvalue(pv, v608), ", ", "values: ", l145.fvalue(pv, v607, v609), ", ", "message: 'Return from unknown block ", (v606).name, ".'", "})"), "})()");
5532 })), cdr: (function(){
5534 var value = symbol.value;
5535 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5538 var l254 = {name: "CATCH"};
5539 ((l206).value = ({car: l44.fvalue(pv, l254, (function (values,v611){
5540 checkArgsAtLeast(arguments, 2);
5542 for (var i = arguments.length-1; i>=2; i--)
5543 v610 = {car: arguments[i], cdr:
5546 return l134.fvalue(values, "(function(){", (function(){
5548 var value = symbol.value;
5549 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5551 })(), l143.fvalue(pv, "var id = ", l145.fvalue(pv, v611), ";", (function(){
5553 var value = symbol.value;
5554 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5556 })(), "try {", (function(){
5558 var value = symbol.value;
5559 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5561 })(), l143.fvalue(pv, l222.fvalue(pv, v610, l4.value)), (function(){
5563 var value = symbol.value;
5564 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5566 })(), "}", (function(){
5568 var value = symbol.value;
5569 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5571 })(), "catch (cf){", (function(){
5573 var value = symbol.value;
5574 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5576 })(), " if (cf.type == 'catch' && cf.id == id)", (function(){
5578 var value = symbol.value;
5579 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5583 var value = symbol.value;
5584 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5586 })() !== l3.value ? " return values.apply(this, forcemv(cf.values));" : " return pv.apply(this, forcemv(cf.values));"), (function(){
5588 var value = symbol.value;
5589 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5591 })(), " else", (function(){
5593 var value = symbol.value;
5594 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5596 })(), " throw cf;", (function(){
5598 var value = symbol.value;
5599 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5601 })(), "}", (function(){
5603 var value = symbol.value;
5604 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5608 })), cdr: (function(){
5610 var value = symbol.value;
5611 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5614 var l255 = {name: "THROW"};
5615 ((l206).value = ({car: l44.fvalue(pv, l255, (function (values,v612,v613){
5616 checkArgs(arguments, 3);
5618 return l134.fvalue(values, "(function(){", (function(){
5620 var value = symbol.value;
5621 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5623 })(), l143.fvalue(pv, "var values = mv;", (function(){
5625 var value = symbol.value;
5626 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5628 })(), "throw ({", "type: 'catch', ", "id: ", l145.fvalue(pv, v612), ", ", "values: ", l145.fvalue(pv, v613, l4.value), ", ", "message: 'Throw uncatched.'", "})"), "})()");
5630 })), cdr: (function(){
5632 var value = symbol.value;
5633 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5636 var l256 = {name: "*TAGBODY-COUNTER*"};
5638 (((l256.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l256).value = 0));
5641 var l257 = {name: "*GO-TAG-COUNTER*"};
5643 (((l257.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l257).value = 0));
5646 var l258 = {name: "GO-TAG-P"};
5648 (l258).fvalue = (function(v616){
5649 ((v616)["fname"] = "GO-TAG-P");
5651 })((function (values,v614){
5652 checkArgs(arguments, 2);
5654 return (function(v615){
5655 return (v615 !== l3.value ? v615 : ((function(){
5657 return (typeof tmp == 'object' && 'name' in tmp);
5658 })()?l4.value: l3.value));
5659 })(l81.fvalue(pv, v614));
5664 var l259 = {name: "DECLARE-TAGBODY-TAGS"};
5666 (l259).fvalue = (function(v622){
5667 ((v622)["fname"] = "DECLARE-TAGBODY-TAGS");
5669 })((function (values,v617,v618){
5670 checkArgs(arguments, 3);
5672 return (function(v621){
5673 return l186.fvalue(values, v621, (function(){
5675 var value = symbol.value;
5676 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5679 })(l73.fvalue(pv, (function (values,v619){
5680 checkArgs(arguments, 2);
5681 return (function(v620){
5682 return l173.fvalue(values, v619, l185, l44.fvalue(pv, v617, v620));
5683 })(l17.fvalue(pv, ((l257).value = (function(){
5684 var x1 = (function(){
5686 var value = symbol.value;
5687 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5690 if (typeof x1 !== 'number') throw 'Not a number!';
5692 if (typeof x2 !== 'number') throw 'Not a number!';
5695 }), l91.fvalue(pv, (function(){
5697 var func = symbol.fvalue;
5698 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5705 var l260 = {name: "TAGBODY"};
5706 ((l206).value = ({car: l44.fvalue(pv, l260, (function (values){
5708 for (var i = arguments.length-1; i>=1; i--)
5709 v623 = {car: arguments[i], cdr:
5713 (l95.fvalue(pv, (function(){
5715 var func = symbol.fvalue;
5716 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5718 })(), v623) !== l3.value ? l3.value : (function(){
5720 throw ({type: 'block', id: 216, values: l145.fvalue(values, l64.fvalue(pv, l44.fvalue(pv, l241), v623, l44.fvalue(pv, l3))), message: 'Return from unknown block TAGBODY.'})
5722 (l258.fvalue(pv, (function(){
5724 return tmp === l3.value? l3.value: tmp.car;
5725 })()) !== l3.value ? l3.value : (v623 = ({car: l16.fvalue(pv, "START"), cdr: v623})));
5726 return (function(v624){
5727 return (function(v626,v625){
5734 return (v625 = l40.fvalue(pv, l176.fvalue(pv, v627)));
5735 })(l187.fvalue(pv, l39.fvalue(pv, v623), (function(){
5737 var value = symbol.value;
5738 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5741 return l134.fvalue(values, "(function(){", (function(){
5743 var value = symbol.value;
5744 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5746 })(), l143.fvalue(pv, "var tagbody_", v624, " = ", v625, ";", (function(){
5748 var value = symbol.value;
5749 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5751 })(), "tbloop:", (function(){
5753 var value = symbol.value;
5754 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5756 })(), "while (true) {", (function(){
5758 var value = symbol.value;
5759 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5761 })(), l143.fvalue(pv, "try {", (function(){
5763 var value = symbol.value;
5764 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5766 })(), l143.fvalue(pv, (function(v628){
5767 return l134.fvalue(pv, "switch(tagbody_", v624, "){", (function(){
5769 var value = symbol.value;
5770 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5772 })(), "case ", v625, ":", (function(){
5774 var value = symbol.value;
5775 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5778 return (function(v629,v630){
5780 while(v629 !== l3.value){
5781 (v630 = (function(){
5783 return tmp === l3.value? l3.value: tmp.car;
5786 (v628 = l134.fvalue(pv, v628, (l27.fvalue(pv, l258.fvalue(pv, v630)) !== l3.value ? l143.fvalue(pv, l145.fvalue(pv, v630), ";", (function(){
5788 var value = symbol.value;
5789 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5791 })()) : (function(v631){
5792 return l134.fvalue(pv, "case ", l40.fvalue(pv, l176.fvalue(pv, v631)), ":", (function(){
5794 var value = symbol.value;
5795 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5798 })(l187.fvalue(pv, v630, (function(){
5800 var value = symbol.value;
5801 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5806 (v629 = (function(){
5808 return tmp === l3.value? l3.value: tmp.cdr;
5815 return tmp === l3.value? l3.value: tmp.cdr;
5817 })(), "default:", (function(){
5819 var value = symbol.value;
5820 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5822 })(), " break tbloop;", (function(){
5824 var value = symbol.value;
5825 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5827 })(), "}", (function(){
5829 var value = symbol.value;
5830 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5833 })("")), "}", (function(){
5835 var value = symbol.value;
5836 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5838 })(), "catch (jump) {", (function(){
5840 var value = symbol.value;
5841 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5843 })(), " if (jump.type == 'tagbody' && jump.id == ", v624, ")", (function(){
5845 var value = symbol.value;
5846 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5848 })(), " tagbody_", v624, " = jump.label;", (function(){
5850 var value = symbol.value;
5851 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5853 })(), " else", (function(){
5855 var value = symbol.value;
5856 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5858 })(), " throw(jump);", (function(){
5860 var value = symbol.value;
5861 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5863 })(), "}", (function(){
5865 var value = symbol.value;
5866 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5868 })()), "}", (function(){
5870 var value = symbol.value;
5871 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5873 })(), "return ", l145.fvalue(pv, l3.value), ";", (function(){
5875 var value = symbol.value;
5876 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5883 })(l259.fvalue(pv, v624, v623),l3.value);
5884 })(l17.fvalue(pv, (function(){
5886 var value = symbol.value;
5887 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5892 if (cf.type == 'block' && cf.id == 216)
5893 return values.apply(this, forcemv(cf.values));
5898 })), cdr: (function(){
5900 var value = symbol.value;
5901 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5904 var l261 = {name: "GO"};
5905 ((l206).value = ({car: l44.fvalue(pv, l261, (function (values,v632){
5906 checkArgs(arguments, 2);
5908 return (function(v633,v634){
5909 return (v633 !== l3.value ? l134.fvalue(values, "(function(){", (function(){
5911 var value = symbol.value;
5912 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5914 })(), l143.fvalue(pv, "throw ({", "type: 'tagbody', ", "id: ", l39.fvalue(pv, l176.fvalue(pv, v633)), ", ", "label: ", l40.fvalue(pv, l176.fvalue(pv, v633)), ", ", "message: 'Attempt to GO to non-existing tag ", v634, "'", "})", (function(){
5916 var value = symbol.value;
5917 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5919 })()), "})()") : (function(){
5920 throw l134.fvalue(pv, "Unknown tag `", v634, "'.");
5922 })(l187.fvalue(pv, v632, (function(){
5924 var value = symbol.value;
5925 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5927 })(), l185),(((function(){
5929 return (typeof tmp == 'object' && 'name' in tmp);
5930 })()?l4.value: l3.value) !== l3.value ? (v632).name : (l81.fvalue(pv, v632) !== l3.value ? l17.fvalue(pv, v632) : l3.value)));
5932 })), cdr: (function(){
5934 var value = symbol.value;
5935 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5938 var l262 = {name: "UNWIND-PROTECT"};
5939 ((l206).value = ({car: l44.fvalue(pv, l262, (function (values,v636){
5940 checkArgsAtLeast(arguments, 2);
5942 for (var i = arguments.length-1; i>=2; i--)
5943 v635 = {car: arguments[i], cdr:
5946 return l134.fvalue(values, "(function(){", (function(){
5948 var value = symbol.value;
5949 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5951 })(), l143.fvalue(pv, "var ret = ", l145.fvalue(pv, l3.value), ";", (function(){
5953 var value = symbol.value;
5954 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5956 })(), "try {", (function(){
5958 var value = symbol.value;
5959 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5961 })(), l143.fvalue(pv, "ret = ", l145.fvalue(pv, v636), ";", (function(){
5963 var value = symbol.value;
5964 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5966 })()), "} finally {", (function(){
5968 var value = symbol.value;
5969 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5971 })(), l143.fvalue(pv, l222.fvalue(pv, v635)), "}", (function(){
5973 var value = symbol.value;
5974 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5976 })(), "return ret;", (function(){
5978 var value = symbol.value;
5979 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5983 })), cdr: (function(){
5985 var value = symbol.value;
5986 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5989 var l263 = {name: "MULTIPLE-VALUE-CALL"};
5990 ((l206).value = ({car: l44.fvalue(pv, l263, (function (values,v638){
5991 checkArgsAtLeast(arguments, 2);
5993 for (var i = arguments.length-1; i>=2; i--)
5994 v637 = {car: arguments[i], cdr:
5997 return l134.fvalue(values, "(function(){", (function(){
5999 var value = symbol.value;
6000 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6002 })(), l143.fvalue(pv, "var func = ", l145.fvalue(pv, v638), ";", (function(){
6004 var value = symbol.value;
6005 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6007 })(), "var args = [", ((function(){
6009 var value = symbol.value;
6010 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6012 })() !== l3.value ? "values" : "pv"), "];", (function(){
6014 var value = symbol.value;
6015 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6017 })(), "return ", l134.fvalue(pv, "(function(){", (function(){
6019 var value = symbol.value;
6020 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6022 })(), l143.fvalue(pv, "var values = mv;", (function(){
6024 var value = symbol.value;
6025 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6027 })(), "var vs;", (function(){
6029 var value = symbol.value;
6030 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6032 })(), l138.fvalue(pv, (function (values,v639){
6033 checkArgs(arguments, 2);
6034 return l134.fvalue(values, "vs = ", l145.fvalue(pv, v639, l4.value), ";", (function(){
6036 var value = symbol.value;
6037 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6039 })(), "if (typeof vs === 'object' && 'multiple-value' in vs)", (function(){
6041 var value = symbol.value;
6042 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6044 })(), l143.fvalue(pv, "args = args.concat(vs);", (function(){
6046 var value = symbol.value;
6047 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6049 })()), "else", (function(){
6051 var value = symbol.value;
6052 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6054 })(), l143.fvalue(pv, "args.push(vs);", (function(){
6056 var value = symbol.value;
6057 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6060 }), v637), "return func.apply(window, args);", (function(){
6062 var value = symbol.value;
6063 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6065 })()), "})()"), ";", (function(){
6067 var value = symbol.value;
6068 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6072 })), cdr: (function(){
6074 var value = symbol.value;
6075 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6078 var l264 = {name: "MULTIPLE-VALUE-PROG1"};
6079 ((l206).value = ({car: l44.fvalue(pv, l264, (function (values,v641){
6080 checkArgsAtLeast(arguments, 2);
6082 for (var i = arguments.length-1; i>=2; i--)
6083 v640 = {car: arguments[i], cdr:
6086 return l134.fvalue(values, "(function(){", (function(){
6088 var value = symbol.value;
6089 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6091 })(), l143.fvalue(pv, "var args = ", l145.fvalue(pv, v641, (function(){
6093 var value = symbol.value;
6094 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6096 })()), ";", (function(){
6098 var value = symbol.value;
6099 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6101 })(), l222.fvalue(pv, v640), "return args;", (function(){
6103 var value = symbol.value;
6104 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6108 })), cdr: (function(){
6110 var value = symbol.value;
6111 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6114 var l265 = {name: "BACKQUOTE-EXPAND-1"};
6116 (l265).fvalue = (function(v644){
6117 ((v644)["fname"] = "BACKQUOTE-EXPAND-1");
6119 })((function (values,v642){
6120 checkArgs(arguments, 2);
6122 return (((function(){
6124 return (typeof tmp == 'object' && 'name' in tmp);
6125 })()?l4.value: l3.value) !== l3.value ? l44.fvalue(values, l167, v642) : (l45.fvalue(pv, v642) !== l3.value ? v642 : ((((function(){
6127 return tmp === l3.value? l3.value: tmp.car;
6128 })() === l170)?l4.value: l3.value) !== l3.value ? (function(){
6130 return tmp === l3.value? l3.value: tmp.car;
6131 })() : ((((function(){
6133 return tmp === l3.value? l3.value: tmp.car;
6134 })() === l168)?l4.value: l3.value) !== l3.value ? l265.fvalue(values, l265.fvalue(pv, l33.fvalue(pv, v642))) : ({car: l64, cdr: l73.fvalue(pv, (function (values,v643){
6135 checkArgs(arguments, 2);
6136 return ((l59.fvalue(pv, v643) !== l3.value ? (((function(){
6138 return tmp === l3.value? l3.value: tmp.car;
6139 })() === l170)?l4.value: l3.value) : l3.value) !== l3.value ? l44.fvalue(values, l44, l33.fvalue(pv, v643)) : ((l59.fvalue(pv, v643) !== l3.value ? (((function(){
6141 return tmp === l3.value? l3.value: tmp.car;
6142 })() === l169)?l4.value: l3.value) : l3.value) !== l3.value ? l33.fvalue(values, v643) : l44.fvalue(values, l44, l265.fvalue(pv, v643))));
6148 var l266 = {name: "BACKQUOTE-EXPAND"};
6150 (l266).fvalue = (function(v646){
6151 ((v646)["fname"] = "BACKQUOTE-EXPAND");
6153 })((function (values,v645){
6154 checkArgs(arguments, 2);
6156 return ((l59.fvalue(pv, v645) !== l3.value ? (((function(){
6158 return tmp === l3.value? l3.value: tmp.car;
6159 })() === l168)?l4.value: l3.value) : l3.value) !== l3.value ? l265.fvalue(values, l33.fvalue(pv, v645)) : v645);
6165 ((l206).value = ({car: l44.fvalue(pv, l168, (function (values,v647){
6166 checkArgs(arguments, 2);
6168 return l145.fvalue(values, l265.fvalue(pv, v647));
6170 })), cdr: (function(){
6172 var value = symbol.value;
6173 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6176 var l267 = {name: "*BUILTINS*"};
6178 (((l267.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l267).value = l3.value));
6181 var l268 = {name: "DEFINE-RAW-BUILTIN"};
6183 var l269 = {name: "DEFINE-BUILTIN"};
6185 var l270 = {name: "TYPE-CHECK"};
6187 var l271 = {name: "VARIABLE-ARITY-CALL"};
6189 (l271).fvalue = (function(v656){
6190 ((v656)["fname"] = "VARIABLE-ARITY-CALL");
6192 })((function (values,v648,v649){
6193 checkArgs(arguments, 3);
6197 return (typeof tmp == 'object' && 'car' in tmp);
6198 })()?l4.value: l3.value) !== l3.value ? l3.value : (function(){
6199 throw "ARGS must be a non-empty list";
6201 return (function(v650,v651,v652){
6203 return (function(v653,v654){
6205 while(v653 !== l3.value){
6206 (v654 = (function(){
6208 return tmp === l3.value? l3.value: tmp.car;
6212 (v651 = ({car: v655, cdr: v651}));
6213 return (v652 = l134.fvalue(pv, v652, l134.fvalue(pv, "var ", v655, " = ", l145.fvalue(pv, v654), ";", (function(){
6215 var value = symbol.value;
6216 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6218 })(), "if (typeof ", v655, " !== 'number') throw 'Not a number!';", (function(){
6220 var value = symbol.value;
6221 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6224 })(l134.fvalue(pv, "x", l17.fvalue(pv, (v650 = (function(){
6226 if (typeof x1 !== 'number') throw 'Not a number!';
6228 if (typeof x2 !== 'number') throw 'Not a number!';
6233 (v653 = (function(){
6235 return tmp === l3.value? l3.value: tmp.cdr;
6242 return l134.fvalue(values, "(function(){", (function(){
6244 var value = symbol.value;
6245 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6247 })(), l143.fvalue(pv, v652, (v649)(pv, l66.fvalue(pv, v651))), "})()");
6253 var l272 = {name: "VARIABLE-ARITY"};
6255 var l273 = {name: "NUM-OP-NUM"};
6257 (l273).fvalue = (function(v660){
6258 ((v660)["fname"] = "NUM-OP-NUM");
6260 })((function (values,v657,v658,v659){
6261 checkArgs(arguments, 4);
6263 return l134.fvalue(values, "(function(){", (function(){
6265 var value = symbol.value;
6266 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6268 })(), l143.fvalue(pv, l134.fvalue(pv, "var ", "x", " = ", v657, ";", (function(){
6270 var value = symbol.value;
6271 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6273 })()), l134.fvalue(pv, "var ", "y", " = ", v659, ";", (function(){
6275 var value = symbol.value;
6276 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6278 })()), l134.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
6280 var value = symbol.value;
6281 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6283 })(), l143.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
6285 var value = symbol.value;
6286 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6288 })())), l134.fvalue(pv, "if (typeof ", "y", " != '", "number", "')", (function(){
6290 var value = symbol.value;
6291 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6293 })(), l143.fvalue(pv, "throw 'The value ' + ", "y", " + ' is not a type ", "number", ".';", (function(){
6295 var value = symbol.value;
6296 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6298 })())), l134.fvalue(pv, "return ", l134.fvalue(pv, "x", v658, "y"), ";", (function(){
6300 var value = symbol.value;
6301 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6308 ((l267).value = ({car: l44.fvalue(pv, l61, (function (values){
6310 for (var i = arguments.length-1; i>=1; i--)
6311 v661 = {car: arguments[i], cdr:
6314 return (l12.fvalue(pv, v661) !== l3.value ? "0" : l271.fvalue(values, v661, (function (values,v662){
6315 checkArgs(arguments, 2);
6316 return l134.fvalue(values, "return ", l136.fvalue(pv, v662, "+"), ";", (function(){
6318 var value = symbol.value;
6319 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6324 })), cdr: (function(){
6326 var value = symbol.value;
6327 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6330 ((l267).value = ({car: l44.fvalue(pv, l62, (function (values,v664){
6331 checkArgsAtLeast(arguments, 2);
6333 for (var i = arguments.length-1; i>=2; i--)
6334 v663 = {car: arguments[i], cdr:
6337 return (function(v665){
6338 return l271.fvalue(values, v665, (function (values,v666){
6339 checkArgs(arguments, 2);
6340 return l134.fvalue(values, "return ", (l12.fvalue(pv, v663) !== l3.value ? l134.fvalue(pv, "-", (function(){
6342 return tmp === l3.value? l3.value: tmp.car;
6343 })()) : l136.fvalue(pv, v666, "-")), ";", (function(){
6345 var value = symbol.value;
6346 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6350 })(({car: v664, cdr: v663}));
6352 })), cdr: (function(){
6354 var value = symbol.value;
6355 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6358 ((l267).value = ({car: l44.fvalue(pv, l20, (function (values){
6360 for (var i = arguments.length-1; i>=1; i--)
6361 v667 = {car: arguments[i], cdr:
6364 return (l12.fvalue(pv, v667) !== l3.value ? "1" : l271.fvalue(values, v667, (function (values,v668){
6365 checkArgs(arguments, 2);
6366 return l134.fvalue(values, "return ", l136.fvalue(pv, v668, "*"), ";", (function(){
6368 var value = symbol.value;
6369 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6374 })), cdr: (function(){
6376 var value = symbol.value;
6377 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6380 ((l267).value = ({car: l44.fvalue(pv, l21, (function (values,v670){
6381 checkArgsAtLeast(arguments, 2);
6383 for (var i = arguments.length-1; i>=2; i--)
6384 v669 = {car: arguments[i], cdr:
6387 return (function(v671){
6388 return l271.fvalue(values, v671, (function (values,v672){
6389 checkArgs(arguments, 2);
6390 return l134.fvalue(values, "return ", (l12.fvalue(pv, v669) !== l3.value ? l134.fvalue(pv, "1 /", (function(){
6392 return tmp === l3.value? l3.value: tmp.car;
6393 })()) : l136.fvalue(pv, v672, "/")), ";", (function(){
6395 var value = symbol.value;
6396 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6400 })(({car: v670, cdr: v669}));
6402 })), cdr: (function(){
6404 var value = symbol.value;
6405 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6408 var l274 = {name: "MOD"};
6409 ((l267).value = ({car: l44.fvalue(pv, l274, (function (values,v673,v674){
6410 checkArgs(arguments, 3);
6412 return (function(v675,v676){
6413 return l273.fvalue(values, v675, "%", v676);
6414 })(l145.fvalue(pv, v673),l145.fvalue(pv, v674));
6416 })), cdr: (function(){
6418 var value = symbol.value;
6419 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6422 var l275 = {name: "COMPARISON-CONJUNTION"};
6424 (l275).fvalue = (function(v679){
6425 ((v679)["fname"] = "COMPARISON-CONJUNTION");
6427 })((function (values,v677,v678){
6428 checkArgs(arguments, 3);
6430 return (l12.fvalue(pv, (function(){
6432 return tmp === l3.value? l3.value: tmp.cdr;
6433 })()) !== l3.value ? "true" : (l12.fvalue(pv, l35.fvalue(pv, v677)) !== l3.value ? l134.fvalue(values, (function(){
6435 return tmp === l3.value? l3.value: tmp.car;
6436 })(), v678, l33.fvalue(pv, v677)) : l134.fvalue(values, (function(){
6438 return tmp === l3.value? l3.value: tmp.car;
6439 })(), v678, l33.fvalue(pv, v677), " && ", l275.fvalue(pv, (function(){
6441 return tmp === l3.value? l3.value: tmp.cdr;
6447 var l276 = {name: "DEFINE-BUILTIN-COMPARISON"};
6449 var l277 = {name: ">"};
6450 ((l267).value = ({car: l44.fvalue(pv, l277, (function (values,v681){
6451 checkArgsAtLeast(arguments, 2);
6453 for (var i = arguments.length-1; i>=2; i--)
6454 v680 = {car: arguments[i], cdr:
6457 return (function(v682){
6458 return l271.fvalue(values, v682, (function (values,v683){
6459 checkArgs(arguments, 2);
6460 return l134.fvalue(values, "return ", l144.fvalue(pv, l275.fvalue(pv, v683, ">")), ";", (function(){
6462 var value = symbol.value;
6463 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6467 })(({car: v681, cdr: v680}));
6469 })), cdr: (function(){
6471 var value = symbol.value;
6472 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6475 var l278 = {name: "<"};
6476 ((l267).value = ({car: l44.fvalue(pv, l278, (function (values,v685){
6477 checkArgsAtLeast(arguments, 2);
6479 for (var i = arguments.length-1; i>=2; i--)
6480 v684 = {car: arguments[i], cdr:
6483 return (function(v686){
6484 return l271.fvalue(values, v686, (function (values,v687){
6485 checkArgs(arguments, 2);
6486 return l134.fvalue(values, "return ", l144.fvalue(pv, l275.fvalue(pv, v687, "<")), ";", (function(){
6488 var value = symbol.value;
6489 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6493 })(({car: v685, cdr: v684}));
6495 })), cdr: (function(){
6497 var value = symbol.value;
6498 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6501 var l279 = {name: ">="};
6502 ((l267).value = ({car: l44.fvalue(pv, l279, (function (values,v689){
6503 checkArgsAtLeast(arguments, 2);
6505 for (var i = arguments.length-1; i>=2; i--)
6506 v688 = {car: arguments[i], cdr:
6509 return (function(v690){
6510 return l271.fvalue(values, v690, (function (values,v691){
6511 checkArgs(arguments, 2);
6512 return l134.fvalue(values, "return ", l144.fvalue(pv, l275.fvalue(pv, v691, ">=")), ";", (function(){
6514 var value = symbol.value;
6515 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6519 })(({car: v689, cdr: v688}));
6521 })), cdr: (function(){
6523 var value = symbol.value;
6524 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6527 var l280 = {name: "<="};
6528 ((l267).value = ({car: l44.fvalue(pv, l280, (function (values,v693){
6529 checkArgsAtLeast(arguments, 2);
6531 for (var i = arguments.length-1; i>=2; i--)
6532 v692 = {car: arguments[i], cdr:
6535 return (function(v694){
6536 return l271.fvalue(values, v694, (function (values,v695){
6537 checkArgs(arguments, 2);
6538 return l134.fvalue(values, "return ", l144.fvalue(pv, l275.fvalue(pv, v695, "<=")), ";", (function(){
6540 var value = symbol.value;
6541 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6545 })(({car: v693, cdr: v692}));
6547 })), cdr: (function(){
6549 var value = symbol.value;
6550 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6553 ((l267).value = ({car: l44.fvalue(pv, l19, (function (values,v697){
6554 checkArgsAtLeast(arguments, 2);
6556 for (var i = arguments.length-1; i>=2; i--)
6557 v696 = {car: arguments[i], cdr:
6560 return (function(v698){
6561 return l271.fvalue(values, v698, (function (values,v699){
6562 checkArgs(arguments, 2);
6563 return l134.fvalue(values, "return ", l144.fvalue(pv, l275.fvalue(pv, v699, "==")), ";", (function(){
6565 var value = symbol.value;
6566 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6570 })(({car: v697, cdr: v696}));
6572 })), cdr: (function(){
6574 var value = symbol.value;
6575 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6578 var l281 = {name: "NUMBERP"};
6579 ((l267).value = ({car: l44.fvalue(pv, l281, (function (values,v700){
6580 checkArgs(arguments, 2);
6582 return (function(v701){
6583 return l144.fvalue(values, l134.fvalue(pv, "(typeof (", v701, ") == \"number\")"));
6584 })(l145.fvalue(pv, v700));
6586 })), cdr: (function(){
6588 var value = symbol.value;
6589 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6592 var l282 = {name: "FLOOR"};
6593 ((l267).value = ({car: l44.fvalue(pv, l282, (function (values,v702){
6594 checkArgs(arguments, 2);
6596 return (function(v703){
6597 return l134.fvalue(values, "(function(){", (function(){
6599 var value = symbol.value;
6600 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6602 })(), l143.fvalue(pv, l134.fvalue(pv, "var ", "x", " = ", v703, ";", (function(){
6604 var value = symbol.value;
6605 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6607 })()), l134.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
6609 var value = symbol.value;
6610 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6612 })(), l143.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
6614 var value = symbol.value;
6615 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6617 })())), l134.fvalue(pv, "return ", "Math.floor(x)", ";", (function(){
6619 var value = symbol.value;
6620 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6623 })(l145.fvalue(pv, v702));
6625 })), cdr: (function(){
6627 var value = symbol.value;
6628 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6631 ((l267).value = ({car: l44.fvalue(pv, l28, (function (values,v704,v705){
6632 checkArgs(arguments, 3);
6634 return (function(v706,v707){
6635 return l134.fvalue(values, "({car: ", v706, ", cdr: ", v707, "})");
6636 })(l145.fvalue(pv, v704),l145.fvalue(pv, v705));
6638 })), cdr: (function(){
6640 var value = symbol.value;
6641 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6644 ((l267).value = ({car: l44.fvalue(pv, l29, (function (values,v708){
6645 checkArgs(arguments, 2);
6647 return (function(v709){
6648 return l144.fvalue(values, l134.fvalue(pv, "(function(){", (function(){
6650 var value = symbol.value;
6651 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6653 })(), l143.fvalue(pv, "var tmp = ", v709, ";", (function(){
6655 var value = symbol.value;
6656 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6658 })(), "return (typeof tmp == 'object' && 'car' in tmp);", (function(){
6660 var value = symbol.value;
6661 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6664 })(l145.fvalue(pv, v708));
6666 })), cdr: (function(){
6668 var value = symbol.value;
6669 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6672 ((l267).value = ({car: l44.fvalue(pv, l30, (function (values,v710){
6673 checkArgs(arguments, 2);
6675 return (function(v711){
6676 return l134.fvalue(values, "(function(){", (function(){
6678 var value = symbol.value;
6679 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6681 })(), l143.fvalue(pv, "var tmp = ", v711, ";", (function(){
6683 var value = symbol.value;
6684 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6686 })(), "return tmp === ", l145.fvalue(pv, l3.value), "? ", l145.fvalue(pv, l3.value), ": tmp.car;", (function(){
6688 var value = symbol.value;
6689 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6692 })(l145.fvalue(pv, v710));
6694 })), cdr: (function(){
6696 var value = symbol.value;
6697 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6700 ((l267).value = ({car: l44.fvalue(pv, l31, (function (values,v712){
6701 checkArgs(arguments, 2);
6703 return (function(v713){
6704 return l134.fvalue(values, "(function(){", (function(){
6706 var value = symbol.value;
6707 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6709 })(), l143.fvalue(pv, "var tmp = ", v713, ";", (function(){
6711 var value = symbol.value;
6712 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6714 })(), "return tmp === ", l145.fvalue(pv, l3.value), "? ", l145.fvalue(pv, l3.value), ": tmp.cdr;", (function(){
6716 var value = symbol.value;
6717 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6720 })(l145.fvalue(pv, v712));
6722 })), cdr: (function(){
6724 var value = symbol.value;
6725 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6728 var l283 = {name: "RPLACA"};
6729 ((l267).value = ({car: l44.fvalue(pv, l283, (function (values,v714,v715){
6730 checkArgs(arguments, 3);
6732 return (function(v716,v717){
6733 return l134.fvalue(values, "(function(){", (function(){
6735 var value = symbol.value;
6736 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6738 })(), l143.fvalue(pv, l134.fvalue(pv, "var ", "x", " = ", v716, ";", (function(){
6740 var value = symbol.value;
6741 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6743 })()), l134.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){
6745 var value = symbol.value;
6746 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6748 })(), l143.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
6750 var value = symbol.value;
6751 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6753 })())), l134.fvalue(pv, "return ", l134.fvalue(pv, "(x.car = ", v717, ", x)"), ";", (function(){
6755 var value = symbol.value;
6756 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6759 })(l145.fvalue(pv, v714),l145.fvalue(pv, v715));
6761 })), cdr: (function(){
6763 var value = symbol.value;
6764 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6767 var l284 = {name: "RPLACD"};
6768 ((l267).value = ({car: l44.fvalue(pv, l284, (function (values,v718,v719){
6769 checkArgs(arguments, 3);
6771 return (function(v720,v721){
6772 return l134.fvalue(values, "(function(){", (function(){
6774 var value = symbol.value;
6775 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6777 })(), l143.fvalue(pv, l134.fvalue(pv, "var ", "x", " = ", v720, ";", (function(){
6779 var value = symbol.value;
6780 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6782 })()), l134.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){
6784 var value = symbol.value;
6785 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6787 })(), l143.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
6789 var value = symbol.value;
6790 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6792 })())), l134.fvalue(pv, "return ", l134.fvalue(pv, "(x.cdr = ", v721, ", x)"), ";", (function(){
6794 var value = symbol.value;
6795 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6798 })(l145.fvalue(pv, v718),l145.fvalue(pv, v719));
6800 })), cdr: (function(){
6802 var value = symbol.value;
6803 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6806 var l285 = {name: "SYMBOLP"};
6807 ((l267).value = ({car: l44.fvalue(pv, l285, (function (values,v722){
6808 checkArgs(arguments, 2);
6810 return (function(v723){
6811 return l144.fvalue(values, l134.fvalue(pv, "(function(){", (function(){
6813 var value = symbol.value;
6814 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6816 })(), l143.fvalue(pv, "var tmp = ", v723, ";", (function(){
6818 var value = symbol.value;
6819 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6821 })(), "return (typeof tmp == 'object' && 'name' in tmp);", (function(){
6823 var value = symbol.value;
6824 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6827 })(l145.fvalue(pv, v722));
6829 })), cdr: (function(){
6831 var value = symbol.value;
6832 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6835 var l286 = {name: "MAKE-SYMBOL"};
6836 ((l267).value = ({car: l44.fvalue(pv, l286, (function (values,v724){
6837 checkArgs(arguments, 2);
6839 return (function(v725){
6840 return l134.fvalue(values, "(function(){", (function(){
6842 var value = symbol.value;
6843 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6845 })(), l143.fvalue(pv, l134.fvalue(pv, "var ", "name", " = ", v725, ";", (function(){
6847 var value = symbol.value;
6848 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6850 })()), l134.fvalue(pv, "if (typeof ", "name", " != '", "string", "')", (function(){
6852 var value = symbol.value;
6853 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6855 })(), l143.fvalue(pv, "throw 'The value ' + ", "name", " + ' is not a type ", "string", ".';", (function(){
6857 var value = symbol.value;
6858 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6860 })())), l134.fvalue(pv, "return ", "({name: name})", ";", (function(){
6862 var value = symbol.value;
6863 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6866 })(l145.fvalue(pv, v724));
6868 })), cdr: (function(){
6870 var value = symbol.value;
6871 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6874 var l287 = {name: "SYMBOL-NAME"};
6875 ((l267).value = ({car: l44.fvalue(pv, l287, (function (values,v726){
6876 checkArgs(arguments, 2);
6878 return (function(v727){
6879 return l134.fvalue(values, "(", v727, ").name");
6880 })(l145.fvalue(pv, v726));
6882 })), cdr: (function(){
6884 var value = symbol.value;
6885 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6888 ((l267).value = ({car: l44.fvalue(pv, l224, (function (values,v728,v729){
6889 checkArgs(arguments, 3);
6891 return (function(v730,v731){
6892 return l134.fvalue(values, "(", v730, ").value = ", v731);
6893 })(l145.fvalue(pv, v728),l145.fvalue(pv, v729));
6895 })), cdr: (function(){
6897 var value = symbol.value;
6898 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6901 var l288 = {name: "FSET"};
6902 ((l267).value = ({car: l44.fvalue(pv, l288, (function (values,v732,v733){
6903 checkArgs(arguments, 3);
6905 return (function(v734,v735){
6906 return l134.fvalue(values, "(", v734, ").fvalue = ", v735);
6907 })(l145.fvalue(pv, v732),l145.fvalue(pv, v733));
6909 })), cdr: (function(){
6911 var value = symbol.value;
6912 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6915 ((l267).value = ({car: l44.fvalue(pv, l18, (function (values,v736){
6916 checkArgs(arguments, 2);
6918 return (function(v737){
6919 return l144.fvalue(values, l134.fvalue(pv, "(", v737, ".value !== undefined)"));
6920 })(l145.fvalue(pv, v736));
6922 })), cdr: (function(){
6924 var value = symbol.value;
6925 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6928 var l289 = {name: "SYMBOL-VALUE"};
6929 ((l267).value = ({car: l44.fvalue(pv, l289, (function (values,v738){
6930 checkArgs(arguments, 2);
6932 return (function(v739){
6933 return l134.fvalue(values, "(function(){", (function(){
6935 var value = symbol.value;
6936 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6938 })(), l143.fvalue(pv, "var symbol = ", v739, ";", (function(){
6940 var value = symbol.value;
6941 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6943 })(), "var value = symbol.value;", (function(){
6945 var value = symbol.value;
6946 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6948 })(), "if (value === undefined) throw \"Variable `\" + symbol.name + \"' is unbound.\";", (function(){
6950 var value = symbol.value;
6951 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6953 })(), "return value;", (function(){
6955 var value = symbol.value;
6956 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6959 })(l145.fvalue(pv, v738));
6961 })), cdr: (function(){
6963 var value = symbol.value;
6964 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6967 ((l267).value = ({car: l44.fvalue(pv, l233, (function (values,v740){
6968 checkArgs(arguments, 2);
6970 return (function(v741){
6971 return l134.fvalue(values, "(function(){", (function(){
6973 var value = symbol.value;
6974 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6976 })(), l143.fvalue(pv, "var symbol = ", v741, ";", (function(){
6978 var value = symbol.value;
6979 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6981 })(), "var func = symbol.fvalue;", (function(){
6983 var value = symbol.value;
6984 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6986 })(), "if (func === undefined) throw \"Function `\" + symbol.name + \"' is undefined.\";", (function(){
6988 var value = symbol.value;
6989 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6991 })(), "return func;", (function(){
6993 var value = symbol.value;
6994 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6997 })(l145.fvalue(pv, v740));
6999 })), cdr: (function(){
7001 var value = symbol.value;
7002 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7005 var l290 = {name: "SYMBOL-PLIST"};
7006 ((l267).value = ({car: l44.fvalue(pv, l290, (function (values,v742){
7007 checkArgs(arguments, 2);
7009 return (function(v743){
7010 return l134.fvalue(values, "((", v743, ").plist || ", l145.fvalue(pv, l3.value), ")");
7011 })(l145.fvalue(pv, v742));
7013 })), cdr: (function(){
7015 var value = symbol.value;
7016 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7019 var l291 = {name: "LAMBDA-CODE"};
7020 ((l267).value = ({car: l44.fvalue(pv, l291, (function (values,v744){
7021 checkArgs(arguments, 2);
7023 return (function(v745){
7024 return l134.fvalue(values, "(", v745, ").toString()");
7025 })(l145.fvalue(pv, v744));
7027 })), cdr: (function(){
7029 var value = symbol.value;
7030 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7033 var l292 = {name: "EQ"};
7034 ((l267).value = ({car: l44.fvalue(pv, l292, (function (values,v746,v747){
7035 checkArgs(arguments, 3);
7037 return (function(v748,v749){
7038 return l144.fvalue(values, l134.fvalue(pv, "(", v748, " === ", v749, ")"));
7039 })(l145.fvalue(pv, v746),l145.fvalue(pv, v747));
7041 })), cdr: (function(){
7043 var value = symbol.value;
7044 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7047 var l293 = {name: "EQUAL"};
7048 ((l267).value = ({car: l44.fvalue(pv, l293, (function (values,v750,v751){
7049 checkArgs(arguments, 3);
7051 return (function(v752,v753){
7052 return l144.fvalue(values, l134.fvalue(pv, "(", v752, " == ", v753, ")"));
7053 })(l145.fvalue(pv, v750),l145.fvalue(pv, v751));
7055 })), cdr: (function(){
7057 var value = symbol.value;
7058 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7061 var l294 = {name: "CHAR-TO-STRING"};
7062 ((l267).value = ({car: l44.fvalue(pv, l294, (function (values,v754){
7063 checkArgs(arguments, 2);
7065 return (function(v755){
7066 return l134.fvalue(values, "(function(){", (function(){
7068 var value = symbol.value;
7069 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7071 })(), l143.fvalue(pv, l134.fvalue(pv, "var ", "x", " = ", v755, ";", (function(){
7073 var value = symbol.value;
7074 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7076 })()), l134.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
7078 var value = symbol.value;
7079 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7081 })(), l143.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
7083 var value = symbol.value;
7084 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7086 })())), l134.fvalue(pv, "return ", "String.fromCharCode(x)", ";", (function(){
7088 var value = symbol.value;
7089 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7092 })(l145.fvalue(pv, v754));
7094 })), cdr: (function(){
7096 var value = symbol.value;
7097 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7100 var l295 = {name: "STRINGP"};
7101 ((l267).value = ({car: l44.fvalue(pv, l295, (function (values,v756){
7102 checkArgs(arguments, 2);
7104 return (function(v757){
7105 return l144.fvalue(values, l134.fvalue(pv, "(typeof(", v757, ") == \"string\")"));
7106 })(l145.fvalue(pv, v756));
7108 })), cdr: (function(){
7110 var value = symbol.value;
7111 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7114 var l296 = {name: "STRING-UPCASE"};
7115 ((l267).value = ({car: l44.fvalue(pv, l296, (function (values,v758){
7116 checkArgs(arguments, 2);
7118 return (function(v759){
7119 return l134.fvalue(values, "(function(){", (function(){
7121 var value = symbol.value;
7122 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7124 })(), l143.fvalue(pv, l134.fvalue(pv, "var ", "x", " = ", v759, ";", (function(){
7126 var value = symbol.value;
7127 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7129 })()), l134.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
7131 var value = symbol.value;
7132 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7134 })(), l143.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
7136 var value = symbol.value;
7137 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7139 })())), l134.fvalue(pv, "return ", "x.toUpperCase()", ";", (function(){
7141 var value = symbol.value;
7142 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7145 })(l145.fvalue(pv, v758));
7147 })), cdr: (function(){
7149 var value = symbol.value;
7150 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7153 var l297 = {name: "STRING-LENGTH"};
7154 ((l267).value = ({car: l44.fvalue(pv, l297, (function (values,v760){
7155 checkArgs(arguments, 2);
7157 return (function(v761){
7158 return l134.fvalue(values, "(function(){", (function(){
7160 var value = symbol.value;
7161 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7163 })(), l143.fvalue(pv, l134.fvalue(pv, "var ", "x", " = ", v761, ";", (function(){
7165 var value = symbol.value;
7166 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7168 })()), l134.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
7170 var value = symbol.value;
7171 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7173 })(), l143.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
7175 var value = symbol.value;
7176 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7178 })())), l134.fvalue(pv, "return ", "x.length", ";", (function(){
7180 var value = symbol.value;
7181 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7184 })(l145.fvalue(pv, v760));
7186 })), cdr: (function(){
7188 var value = symbol.value;
7189 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7192 var l298 = {name: "SLICE"};
7193 ((l267).value = ({car: l44.fvalue(pv, l298, (function (values,v762,v763,v764){
7194 checkArgsAtLeast(arguments, 3);
7195 checkArgsAtMost(arguments, 4);
7196 switch(arguments.length-1){
7202 return l134.fvalue(values, "(function(){", (function(){
7204 var value = symbol.value;
7205 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7207 })(), l143.fvalue(pv, "var str = ", l145.fvalue(pv, v762), ";", (function(){
7209 var value = symbol.value;
7210 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7212 })(), "var a = ", l145.fvalue(pv, v763), ";", (function(){
7214 var value = symbol.value;
7215 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7217 })(), "var b;", (function(){
7219 var value = symbol.value;
7220 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7222 })(), (v764 !== l3.value ? l134.fvalue(pv, "b = ", l145.fvalue(pv, v764), ";", (function(){
7224 var value = symbol.value;
7225 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7227 })()) : ""), "return str.slice(a,b);", (function(){
7229 var value = symbol.value;
7230 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7234 })), cdr: (function(){
7236 var value = symbol.value;
7237 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7240 var l299 = {name: "CHAR"};
7241 ((l267).value = ({car: l44.fvalue(pv, l299, (function (values,v765,v766){
7242 checkArgs(arguments, 3);
7244 return (function(v767,v768){
7245 return l134.fvalue(values, "(function(){", (function(){
7247 var value = symbol.value;
7248 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7250 })(), l143.fvalue(pv, l134.fvalue(pv, "var ", "string", " = ", v767, ";", (function(){
7252 var value = symbol.value;
7253 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7255 })()), l134.fvalue(pv, "var ", "index", " = ", v768, ";", (function(){
7257 var value = symbol.value;
7258 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7260 })()), l134.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){
7262 var value = symbol.value;
7263 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7265 })(), l143.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
7267 var value = symbol.value;
7268 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7270 })())), l134.fvalue(pv, "if (typeof ", "index", " != '", "number", "')", (function(){
7272 var value = symbol.value;
7273 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7275 })(), l143.fvalue(pv, "throw 'The value ' + ", "index", " + ' is not a type ", "number", ".';", (function(){
7277 var value = symbol.value;
7278 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7280 })())), l134.fvalue(pv, "return ", "string.charCodeAt(index)", ";", (function(){
7282 var value = symbol.value;
7283 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7286 })(l145.fvalue(pv, v765),l145.fvalue(pv, v766));
7288 })), cdr: (function(){
7290 var value = symbol.value;
7291 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7294 ((l267).value = ({car: l44.fvalue(pv, l72, (function (values,v769,v770){
7295 checkArgs(arguments, 3);
7297 return (function(v771,v772){
7298 return l134.fvalue(values, "(function(){", (function(){
7300 var value = symbol.value;
7301 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7303 })(), l143.fvalue(pv, l134.fvalue(pv, "var ", "string1", " = ", v771, ";", (function(){
7305 var value = symbol.value;
7306 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7308 })()), l134.fvalue(pv, "var ", "string2", " = ", v772, ";", (function(){
7310 var value = symbol.value;
7311 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7313 })()), l134.fvalue(pv, "if (typeof ", "string1", " != '", "string", "')", (function(){
7315 var value = symbol.value;
7316 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7318 })(), l143.fvalue(pv, "throw 'The value ' + ", "string1", " + ' is not a type ", "string", ".';", (function(){
7320 var value = symbol.value;
7321 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7323 })())), l134.fvalue(pv, "if (typeof ", "string2", " != '", "string", "')", (function(){
7325 var value = symbol.value;
7326 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7328 })(), l143.fvalue(pv, "throw 'The value ' + ", "string2", " + ' is not a type ", "string", ".';", (function(){
7330 var value = symbol.value;
7331 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7333 })())), l134.fvalue(pv, "return ", "string1.concat(string2)", ";", (function(){
7335 var value = symbol.value;
7336 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7339 })(l145.fvalue(pv, v769),l145.fvalue(pv, v770));
7341 })), cdr: (function(){
7343 var value = symbol.value;
7344 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7347 var l300 = {name: "FUNCALL"};
7348 ((l267).value = ({car: l44.fvalue(pv, l300, (function (values,v774){
7349 checkArgsAtLeast(arguments, 2);
7351 for (var i = arguments.length-1; i>=2; i--)
7352 v773 = {car: arguments[i], cdr:
7355 return l134.fvalue(values, "(", l145.fvalue(pv, v774), ")(", l136.fvalue(pv, ({car: ((function(){
7357 var value = symbol.value;
7358 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7360 })() !== l3.value ? "values" : "pv"), cdr: l73.fvalue(pv, (function(){
7362 var func = symbol.fvalue;
7363 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7365 })(), v773)}), ", "), ")");
7367 })), cdr: (function(){
7369 var value = symbol.value;
7370 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7373 var l301 = {name: "APPLY"};
7374 ((l267).value = ({car: l44.fvalue(pv, l301, (function (values,v776){
7375 checkArgsAtLeast(arguments, 2);
7377 for (var i = arguments.length-1; i>=2; i--)
7378 v775 = {car: arguments[i], cdr:
7381 return (l12.fvalue(pv, v775) !== l3.value ? l134.fvalue(values, "(", l145.fvalue(pv, v776), ")()") : (function(v777,v778){
7382 return l134.fvalue(values, "(function(){", (function(){
7384 var value = symbol.value;
7385 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7387 })(), l143.fvalue(pv, "var f = ", l145.fvalue(pv, v776), ";", (function(){
7389 var value = symbol.value;
7390 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7392 })(), "var args = [", l136.fvalue(pv, ({car: ((function(){
7394 var value = symbol.value;
7395 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7397 })() !== l3.value ? "values" : "pv"), cdr: l73.fvalue(pv, (function(){
7399 var func = symbol.fvalue;
7400 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7402 })(), v777)}), ", "), "];", (function(){
7404 var value = symbol.value;
7405 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7407 })(), "var tail = (", l145.fvalue(pv, v778), ");", (function(){
7409 var value = symbol.value;
7410 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7412 })(), "while (tail != ", l145.fvalue(pv, l3.value), "){", (function(){
7414 var value = symbol.value;
7415 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7417 })(), " args.push(tail.car);", (function(){
7419 var value = symbol.value;
7420 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7422 })(), " tail = tail.cdr;", (function(){
7424 var value = symbol.value;
7425 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7427 })(), "}", (function(){
7429 var value = symbol.value;
7430 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7432 })(), "return f.apply(this, args);", (function(){
7434 var value = symbol.value;
7435 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7438 })(l87.fvalue(pv, v775),(function(){
7439 var tmp = l86.fvalue(pv, v775);
7440 return tmp === l3.value? l3.value: tmp.car;
7443 })), cdr: (function(){
7445 var value = symbol.value;
7446 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7449 var l302 = {name: "JS-EVAL"};
7450 ((l267).value = ({car: l44.fvalue(pv, l302, (function (values,v779){
7451 checkArgs(arguments, 2);
7453 return (function(v780){
7454 return l134.fvalue(values, "(function(){", (function(){
7456 var value = symbol.value;
7457 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7459 })(), l143.fvalue(pv, l134.fvalue(pv, "var ", "string", " = ", v780, ";", (function(){
7461 var value = symbol.value;
7462 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7464 })()), l134.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){
7466 var value = symbol.value;
7467 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7469 })(), l143.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
7471 var value = symbol.value;
7472 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7474 })())), l134.fvalue(pv, "return ", ((function(){
7476 var value = symbol.value;
7477 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7479 })() !== l3.value ? l134.fvalue(pv, "(function(){", (function(){
7481 var value = symbol.value;
7482 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7484 })(), l143.fvalue(pv, "var v = eval.apply(window, [string]);", (function(){
7486 var value = symbol.value;
7487 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7489 })(), "if (typeof v !== 'object' || !('multiple-value' in v)){", (function(){
7491 var value = symbol.value;
7492 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7494 })(), l143.fvalue(pv, "v = [v];", (function(){
7496 var value = symbol.value;
7497 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7499 })(), "v['multiple-value'] = true;", (function(){
7501 var value = symbol.value;
7502 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7504 })()), "}", (function(){
7506 var value = symbol.value;
7507 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7509 })(), "return values.apply(this, v);", (function(){
7511 var value = symbol.value;
7512 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7514 })()), "})()") : "eval.apply(window, [string])"), ";", (function(){
7516 var value = symbol.value;
7517 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7520 })(l145.fvalue(pv, v779));
7522 })), cdr: (function(){
7524 var value = symbol.value;
7525 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7528 var l303 = {name: "ERROR"};
7529 ((l267).value = ({car: l44.fvalue(pv, l303, (function (values,v781){
7530 checkArgs(arguments, 2);
7532 return (function(v782){
7533 return l134.fvalue(values, "(function(){", (function(){
7535 var value = symbol.value;
7536 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7538 })(), l143.fvalue(pv, "throw ", v782, ";", (function(){
7540 var value = symbol.value;
7541 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7544 })(l145.fvalue(pv, v781));
7546 })), cdr: (function(){
7548 var value = symbol.value;
7549 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7552 var l304 = {name: "NEW"};
7553 ((l267).value = ({car: l44.fvalue(pv, l304, (function (values){
7554 checkArgsAtMost(arguments, 1);
7560 })), cdr: (function(){
7562 var value = symbol.value;
7563 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7566 var l305 = {name: "OBJECTP"};
7567 ((l267).value = ({car: l44.fvalue(pv, l305, (function (values,v783){
7568 checkArgs(arguments, 2);
7570 return (function(v784){
7571 return l144.fvalue(values, l134.fvalue(pv, "(typeof (", v784, ") === 'object')"));
7572 })(l145.fvalue(pv, v783));
7574 })), cdr: (function(){
7576 var value = symbol.value;
7577 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7580 var l306 = {name: "OGET"};
7581 ((l267).value = ({car: l44.fvalue(pv, l306, (function (values,v785,v786){
7582 checkArgs(arguments, 3);
7584 return (function(v787,v788){
7585 return l134.fvalue(values, "(function(){", (function(){
7587 var value = symbol.value;
7588 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7590 })(), l143.fvalue(pv, "var tmp = ", "(", v787, ")[", v788, "];", (function(){
7592 var value = symbol.value;
7593 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7595 })(), "return tmp == undefined? ", l145.fvalue(pv, l3.value), ": tmp ;", (function(){
7597 var value = symbol.value;
7598 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7601 })(l145.fvalue(pv, v785),l145.fvalue(pv, v786));
7603 })), cdr: (function(){
7605 var value = symbol.value;
7606 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7609 var l307 = {name: "OSET"};
7610 ((l267).value = ({car: l44.fvalue(pv, l307, (function (values,v789,v790,v791){
7611 checkArgs(arguments, 4);
7613 return (function(v792,v793,v794){
7614 return l134.fvalue(values, "((", v792, ")[", v793, "] = ", v794, ")");
7615 })(l145.fvalue(pv, v789),l145.fvalue(pv, v790),l145.fvalue(pv, v791));
7617 })), cdr: (function(){
7619 var value = symbol.value;
7620 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7623 var l308 = {name: "IN"};
7624 ((l267).value = ({car: l44.fvalue(pv, l308, (function (values,v795,v796){
7625 checkArgs(arguments, 3);
7627 return (function(v797,v798){
7628 return l144.fvalue(values, l134.fvalue(pv, "((", v797, ") in (", v798, "))"));
7629 })(l145.fvalue(pv, v795),l145.fvalue(pv, v796));
7631 })), cdr: (function(){
7633 var value = symbol.value;
7634 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7637 var l309 = {name: "FUNCTIONP"};
7638 ((l267).value = ({car: l44.fvalue(pv, l309, (function (values,v799){
7639 checkArgs(arguments, 2);
7641 return (function(v800){
7642 return l144.fvalue(values, l134.fvalue(pv, "(typeof ", v800, " == 'function')"));
7643 })(l145.fvalue(pv, v799));
7645 })), cdr: (function(){
7647 var value = symbol.value;
7648 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7651 var l310 = {name: "WRITE-STRING"};
7652 ((l267).value = ({car: l44.fvalue(pv, l310, (function (values,v801){
7653 checkArgs(arguments, 2);
7655 return (function(v802){
7656 return l134.fvalue(values, "(function(){", (function(){
7658 var value = symbol.value;
7659 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7661 })(), l143.fvalue(pv, l134.fvalue(pv, "var ", "x", " = ", v802, ";", (function(){
7663 var value = symbol.value;
7664 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7666 })()), l134.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
7668 var value = symbol.value;
7669 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7671 })(), l143.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
7673 var value = symbol.value;
7674 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7676 })())), l134.fvalue(pv, "return ", "lisp.write(x)", ";", (function(){
7678 var value = symbol.value;
7679 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7682 })(l145.fvalue(pv, v801));
7684 })), cdr: (function(){
7686 var value = symbol.value;
7687 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7690 var l311 = {name: "MAKE-ARRAY"};
7691 ((l267).value = ({car: l44.fvalue(pv, l311, (function (values,v803){
7692 checkArgs(arguments, 2);
7694 return (function(v804){
7695 return l134.fvalue(values, "(function(){", (function(){
7697 var value = symbol.value;
7698 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7700 })(), l143.fvalue(pv, "var r = [];", (function(){
7702 var value = symbol.value;
7703 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7705 })(), "for (var i = 0; i < ", v804, "; i++)", (function(){
7707 var value = symbol.value;
7708 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7710 })(), l143.fvalue(pv, "r.push(", l145.fvalue(pv, l3.value), ");", (function(){
7712 var value = symbol.value;
7713 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7715 })()), "return r;", (function(){
7717 var value = symbol.value;
7718 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7721 })(l145.fvalue(pv, v803));
7723 })), cdr: (function(){
7725 var value = symbol.value;
7726 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7729 var l312 = {name: "ARRAYP"};
7730 ((l267).value = ({car: l44.fvalue(pv, l312, (function (values,v805){
7731 checkArgs(arguments, 2);
7733 return (function(v806){
7734 return l144.fvalue(values, l134.fvalue(pv, "(function(){", (function(){
7736 var value = symbol.value;
7737 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7739 })(), l143.fvalue(pv, "var x = ", v806, ";", (function(){
7741 var value = symbol.value;
7742 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7744 })(), "return typeof x === 'object' && 'length' in x;"), "})()"));
7745 })(l145.fvalue(pv, v805));
7747 })), cdr: (function(){
7749 var value = symbol.value;
7750 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7753 var l313 = {name: "AREF"};
7754 ((l267).value = ({car: l44.fvalue(pv, l313, (function (values,v807,v808){
7755 checkArgs(arguments, 3);
7757 return (function(v809,v810){
7758 return l134.fvalue(values, "(function(){", (function(){
7760 var value = symbol.value;
7761 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7763 })(), l143.fvalue(pv, "var x = ", "(", v809, ")[", v810, "];", (function(){
7765 var value = symbol.value;
7766 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7768 })(), "if (x === undefined) throw 'Out of range';", (function(){
7770 var value = symbol.value;
7771 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7773 })(), "return x;", (function(){
7775 var value = symbol.value;
7776 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7779 })(l145.fvalue(pv, v807),l145.fvalue(pv, v808));
7781 })), cdr: (function(){
7783 var value = symbol.value;
7784 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7787 var l314 = {name: "ASET"};
7788 ((l267).value = ({car: l44.fvalue(pv, l314, (function (values,v811,v812,v813){
7789 checkArgs(arguments, 4);
7791 return (function(v814,v815,v816){
7792 return l134.fvalue(values, "(function(){", (function(){
7794 var value = symbol.value;
7795 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7797 })(), l143.fvalue(pv, "var x = ", v814, ";", (function(){
7799 var value = symbol.value;
7800 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7802 })(), "var i = ", v815, ";", (function(){
7804 var value = symbol.value;
7805 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7807 })(), "if (i < 0 || i >= x.length) throw 'Out of range';", (function(){
7809 var value = symbol.value;
7810 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7812 })(), "return x[i] = ", v816, ";", (function(){
7814 var value = symbol.value;
7815 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7818 })(l145.fvalue(pv, v811),l145.fvalue(pv, v812),l145.fvalue(pv, v813));
7820 })), cdr: (function(){
7822 var value = symbol.value;
7823 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7826 var l315 = {name: "GET-UNIX-TIME"};
7827 ((l267).value = ({car: l44.fvalue(pv, l315, (function (values){
7828 checkArgsAtMost(arguments, 1);
7831 return l134.fvalue(values, "(Math.round(new Date() / 1000))");
7834 })), cdr: (function(){
7836 var value = symbol.value;
7837 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7840 var l316 = {name: "VALUES-ARRAY"};
7841 ((l267).value = ({car: l44.fvalue(pv, l316, (function (values,v817){
7842 checkArgs(arguments, 2);
7844 return (function(v818){
7845 return ((function(){
7847 var value = symbol.value;
7848 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7850 })() !== l3.value ? l134.fvalue(values, "values.apply(this, ", v818, ")") : l134.fvalue(values, "pv.apply(this, ", v818, ")"));
7851 })(l145.fvalue(pv, v817));
7853 })), cdr: (function(){
7855 var value = symbol.value;
7856 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7859 ((l267).value = ({car: l44.fvalue(pv, l142, (function (values){
7861 for (var i = arguments.length-1; i>=1; i--)
7862 v819 = {car: arguments[i], cdr:
7865 return ((function(){
7867 var value = symbol.value;
7868 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7870 })() !== l3.value ? l134.fvalue(values, "values(", l136.fvalue(pv, l73.fvalue(pv, (function(){
7872 var func = symbol.fvalue;
7873 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7875 })(), v819), ", "), ")") : l134.fvalue(values, "pv(", l136.fvalue(pv, l73.fvalue(pv, (function(){
7877 var func = symbol.fvalue;
7878 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7880 })(), v819), ", "), ")"));
7882 })), cdr: (function(){
7884 var value = symbol.value;
7885 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7889 (l198).fvalue = (function(v822){
7890 ((v822)["fname"] = "MACRO");
7892 })((function (values,v820){
7893 checkArgs(arguments, 2);
7895 return (((function(){
7897 return (typeof tmp == 'object' && 'name' in tmp);
7898 })()?l4.value: l3.value) !== l3.value ? (function(v821){
7899 return (((l175.fvalue(pv, v821) === l198)?l4.value: l3.value) !== l3.value ? v821 : l3.value);
7900 })(l187.fvalue(pv, v820, (function(){
7902 var value = symbol.value;
7903 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7905 })(), l104)) : l3.value);
7910 var l317 = {name: "LS-MACROEXPAND-1"};
7912 (l317).fvalue = (function(v827){
7913 ((v827)["fname"] = "LS-MACROEXPAND-1");
7915 })((function (values,v823){
7916 checkArgs(arguments, 2);
7918 return (function(v824){
7919 return (v824 !== l3.value ? (function(v825){
7920 (l59.fvalue(pv, v825) !== l3.value ? (function(v826){
7921 l178.fvalue(pv, v824, v826);
7922 return (v825 = v826);
7923 })(l242.fvalue(pv, v825)) : l3.value);
7926 var args = [values];
7927 var tail = ((function(){
7929 return tmp === l3.value? l3.value: tmp.cdr;
7931 while (tail != l3.value){
7932 args.push(tail.car);
7935 return f.apply(this, args);
7937 })(l176.fvalue(pv, v824)) : v823);
7938 })(l198.fvalue(pv, (function(){
7940 return tmp === l3.value? l3.value: tmp.car;
7946 var l318 = {name: "COMPILE-FUNCALL"};
7947 var l319 = {name: "G902"};
7949 (l318).fvalue = (function(v832){
7950 ((v832)["fname"] = "COMPILE-FUNCALL");
7952 })((function (values,v828,v829){
7953 checkArgs(arguments, 3);
7956 var v830 = ((function(){
7958 var value = symbol.value;
7959 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7961 })() !== l3.value ? "values" : "pv");
7962 var v831 = l134.fvalue(pv, "(", l136.fvalue(pv, ({car: v830, cdr: l73.fvalue(pv, (function(){
7964 var func = symbol.fvalue;
7965 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7967 })(), v829)}), ", "), ")");
7968 return (l236.fvalue(pv, v828) !== l3.value ? l134.fvalue(values, l236.fvalue(pv, v828), v831) : ((((function(){
7970 return (typeof tmp == 'object' && 'name' in tmp);
7971 })()?l4.value: l3.value) !== l3.value ? (((l122.fvalue(pv, v828) === l113.fvalue(pv, "COMMON-LISP"))?l4.value: l3.value) !== l3.value ? (function(){
7973 var value = symbol.value;
7974 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7976 })() : l3.value) : l3.value) !== l3.value ? l134.fvalue(values, l145.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l167), l44.fvalue(pv, v828))), ".fvalue", v831) : l134.fvalue(values, l145.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l104), l44.fvalue(pv, v828))), v831)));
7983 (l222).fvalue = (function(v835){
7984 ((v835)["fname"] = "LS-COMPILE-BLOCK");
7986 })((function (values,v833,v834){
7987 checkArgsAtLeast(arguments, 2);
7988 checkArgsAtMost(arguments, 3);
7989 switch(arguments.length-1){
7995 return (v834 !== l3.value ? l134.fvalue(values, l222.fvalue(pv, l87.fvalue(pv, v833)), "return ", l145.fvalue(pv, (function(){
7996 var tmp = l86.fvalue(pv, v833);
7997 return tmp === l3.value? l3.value: tmp.car;
8000 var value = symbol.value;
8001 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8003 })()), ";") : l137.fvalue(values, l90.fvalue(pv, (function(){
8005 var func = symbol.fvalue;
8006 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8008 })(), l73.fvalue(pv, (function(){
8010 var func = symbol.fvalue;
8011 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8013 })(), v833)), l134.fvalue(pv, ";", (function(){
8015 var value = symbol.value;
8016 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8024 (l145).fvalue = (function(v845){
8025 ((v845)["fname"] = "LS-COMPILE");
8027 })((function (values,v836,v837){
8028 checkArgsAtLeast(arguments, 2);
8029 checkArgsAtMost(arguments, 3);
8030 switch(arguments.length-1){
8036 return (function(v838){
8042 return (((function(){
8044 return (typeof tmp == 'object' && 'name' in tmp);
8045 })()?l4.value: l3.value) !== l3.value ? (function(v839){
8046 return ((v839 !== l3.value ? l27.fvalue(pv, l88.fvalue(pv, l202, l177.fvalue(pv, v839))) : l3.value) !== l3.value ? l176.fvalue(values, v839) : ((function(v840){
8047 return (v840 !== l3.value ? v840 : l88.fvalue(pv, l204, l177.fvalue(pv, v839)));
8048 })(l121.fvalue(pv, v836)) !== l3.value ? l134.fvalue(values, l145.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l167), l44.fvalue(pv, v836))), ".value") : l145.fvalue(values, l64.fvalue(pv, l44.fvalue(pv, l289), l44.fvalue(pv, l64.fvalue(pv, l44.fvalue(pv, l167), l44.fvalue(pv, v836)))))));
8049 })(l187.fvalue(pv, v836, (function(){
8051 var value = symbol.value;
8052 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8054 })(), l105)) : (l81.fvalue(pv, v836) !== l3.value ? l17.fvalue(values, v836) : (((typeof(v836) == "string")?l4.value: l3.value) !== l3.value ? l134.fvalue(values, "\"", l148.fvalue(pv, v836), "\"") : (((function(){
8056 return typeof x === 'object' && 'length' in x;
8057 })()?l4.value: l3.value) !== l3.value ? l231.fvalue(values, v836) : (l59.fvalue(pv, v836) !== l3.value ? (function(v841,v842){
8058 return (l97.fvalue(pv, v841, (function(){
8060 var value = symbol.value;
8061 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8063 })()) !== l3.value ? (function(v843){
8066 var args = [values];
8068 while (tail != l3.value){
8069 args.push(tail.car);
8072 return f.apply(this, args);
8074 })(l40.fvalue(pv, l97.fvalue(pv, v841, (function(){
8076 var value = symbol.value;
8077 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8079 })()))) : ((l97.fvalue(pv, v841, (function(){
8081 var value = symbol.value;
8082 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8084 })()) !== l3.value ? l27.fvalue(pv, l200.fvalue(pv, v841, l104, l203)) : l3.value) !== l3.value ? (function(v844){
8087 var args = [values];
8089 while (tail != l3.value){
8090 args.push(tail.car);
8093 return f.apply(this, args);
8095 })(l40.fvalue(pv, l97.fvalue(pv, v841, (function(){
8097 var value = symbol.value;
8098 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8100 })()))) : (l198.fvalue(pv, v841) !== l3.value ? l145.fvalue(values, l317.fvalue(pv, v836), v837) : l318.fvalue(values, v841, v842))));
8103 return tmp === l3.value? l3.value: tmp.car;
8106 return tmp === l3.value? l3.value: tmp.cdr;
8107 })()) : (function(){
8108 throw "How should I compile this?";
8119 var l320 = {name: "LS-COMPILE-TOPLEVEL"};
8121 (l320).fvalue = (function(v852){
8122 ((v852)["fname"] = "LS-COMPILE-TOPLEVEL");
8124 })((function (values,v846,v847){
8125 checkArgsAtLeast(arguments, 2);
8126 checkArgsAtMost(arguments, 3);
8127 switch(arguments.length-1){
8133 return (function(v848){
8139 return ((((function(){
8141 return (typeof tmp == 'object' && 'car' in tmp);
8142 })()?l4.value: l3.value) !== l3.value ? (((function(){
8144 return tmp === l3.value? l3.value: tmp.car;
8145 })() === l241)?l4.value: l3.value) : l3.value) !== l3.value ? (function(v850){
8146 return l136.fvalue(values, l90.fvalue(pv, (function(){
8148 var func = symbol.fvalue;
8149 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8152 })(l73.fvalue(pv, (function (values,v849){
8153 checkArgs(arguments, 2);
8154 return l320.fvalue(values, v849, l4.value);
8157 return tmp === l3.value? l3.value: tmp.cdr;
8158 })())) : (function(v851){
8159 return l134.fvalue(values, l137.fvalue(pv, l196.fvalue(pv), l134.fvalue(pv, ";", (function(){
8161 var value = symbol.value;
8162 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8164 })())), (v851 !== l3.value ? l134.fvalue(pv, v851, ";", (function(){
8166 var value = symbol.value;
8167 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8170 })(l145.fvalue(pv, v846, v847)));
8181 (l242).fvalue = (function(v854){
8182 ((v854)["fname"] = "EVAL");
8184 })((function (values,v853){
8185 checkArgs(arguments, 2);
8188 var string = l320.fvalue(pv, v853, l4.value);
8189 if (typeof string != 'string')
8190 throw 'The value ' + string + ' is not a type string.';
8192 var v = eval.apply(window, [string]);
8193 if (typeof v !== 'object' || !('multiple-value' in v)){
8195 v['multiple-value'] = true;
8197 return values.apply(this, v);
8204 var l321 = {name: "&BODY"};
8205 var l322 = QIList(l211,l210,l321,l20,l15,l123,l61,l62,l21,l22,l23,l278,l280,l19,l19,l277,l279,l54,l64,l301,l313,l312,l314,l97,l45,l184,l18,l18,l87,l32,l38,l36,l33,l30,l30,l52,l254,l34,l37,l35,l31,l31,l299,l79,l80,l78,l51,l28,l29,l76,l77,l47,l2,l9,l11,l1,l8,l93,l92,l101,l68,l69,l103,l49,l50,l53,l292,l26,l293,l303,l242,l96,l131,l100,l113,l126,l39,l237,l42,l288,l300,l104,l309,l16,l132,l261,l75,l208,l124,l46,l81,l81,l130,l121,l238,l5,l86,l71,l246,l249,l109,l44,l59,l311,l110,l286,l73,l88,l83,l274,l106,l263,l107,l264,l3,l27,l85,l84,l12,l281,l55,l114,l116,l112,l165,l82,l147,l150,l205,l56,l57,l241,l67,l48,l167,l89,l90,l91,l13,l253,l65,l66,l283,l284,l40,l224,l225,l95,l296,l98,l99,l295,l94,l233,l287,l122,l290,l289,l285,l4,l260,l41,l255,l25,l7,l262,l142,l141,l105,l149,l6,l102,l310,l24,l3);
8206 l131.fvalue(values, l322);
8207 ((l123).value = (function(){
8209 var value = symbol.value;
8210 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8214 var string = "var lisp";
8215 if (typeof string != 'string')
8216 throw 'The value ' + string + ' is not a type string.';
8218 var v = eval.apply(window, [string]);
8219 if (typeof v !== 'object' || !('multiple-value' in v)){
8221 v['multiple-value'] = true;
8223 return values.apply(this, v);
8227 (lisp.read = (function(){
8229 var func = symbol.fvalue;
8230 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8233 (lisp.print = (function(){
8235 var func = symbol.fvalue;
8236 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8239 (lisp.eval = (function(){
8241 var func = symbol.fvalue;
8242 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8245 (lisp.compile = (function (values,v855){
8246 checkArgs(arguments, 2);
8247 return l320.fvalue(values, v855, l4.value);
8249 (lisp.evalString = (function (values,v856){
8250 checkArgs(arguments, 2);
8251 return l242.fvalue(values, l171.fvalue(pv, v856));
8253 (lisp.compileString = (function (values,v857){
8254 checkArgs(arguments, 2);
8255 return l320.fvalue(values, l171.fvalue(pv, v857), l4.value);
8257 var l323 = QIList(QIList(l321,"l321"),QIList(l320,"l320"),QIList(l319,"l319"),QIList(l318,"l318"),QIList(l317,"l317"),QIList(l316,"l316"),QIList(l315,"l315"),QIList(l314,"l314"),QIList(l313,"l313"),QIList(l312,"l312"),QIList(l311,"l311"),QIList(l310,"l310"),QIList(l309,"l309"),QIList(l308,"l308"),QIList(l307,"l307"),QIList(l306,"l306"),QIList(l305,"l305"),QIList(l304,"l304"),QIList(l303,"l303"),QIList(l302,"l302"),QIList(l301,"l301"),QIList(l300,"l300"),QIList(l299,"l299"),QIList(l298,"l298"),QIList(l297,"l297"),QIList(l296,"l296"),QIList(l295,"l295"),QIList(l294,"l294"),QIList(l293,"l293"),QIList(l292,"l292"),QIList(l291,"l291"),QIList(l290,"l290"),QIList(l289,"l289"),QIList(l288,"l288"),QIList(l287,"l287"),QIList(l286,"l286"),QIList(l285,"l285"),QIList(l284,"l284"),QIList(l283,"l283"),QIList(l282,"l282"),QIList(l281,"l281"),QIList(l280,"l280"),QIList(l279,"l279"),QIList(l278,"l278"),QIList(l277,"l277"),QIList(l276,"l276"),QIList(l275,"l275"),QIList(l274,"l274"),QIList(l273,"l273"),QIList(l272,"l272"),QIList(l271,"l271"),QIList(l270,"l270"),QIList(l269,"l269"),QIList(l268,"l268"),QIList(l267,"l267"),QIList(l266,"l266"),QIList(l265,"l265"),QIList(l264,"l264"),QIList(l263,"l263"),QIList(l262,"l262"),QIList(l261,"l261"),QIList(l260,"l260"),QIList(l259,"l259"),QIList(l258,"l258"),QIList(l257,"l257"),QIList(l256,"l256"),QIList(l255,"l255"),QIList(l254,"l254"),QIList(l253,"l253"),QIList(l252,"l252"),QIList(l251,"l251"),QIList(l250,"l250"),QIList(l249,"l249"),QIList(l248,"l248"),QIList(l247,"l247"),QIList(l246,"l246"),QIList(l245,"l245"),QIList(l244,"l244"),QIList(l243,"l243"),QIList(l242,"l242"),QIList(l241,"l241"),QIList(l240,"l240"),QIList(l239,"l239"),QIList(l238,"l238"),QIList(l237,"l237"),QIList(l236,"l236"),QIList(l235,"l235"),QIList(l234,"l234"),QIList(l233,"l233"),QIList(l232,"l232"),QIList(l231,"l231"),QIList(l230,"l230"),QIList(l229,"l229"),QIList(l228,"l228"),QIList(l227,"l227"),QIList(l226,"l226"),QIList(l225,"l225"),QIList(l224,"l224"),QIList(l223,"l223"),QIList(l222,"l222"),QIList(l221,"l221"),QIList(l220,"l220"),QIList(l219,"l219"),QIList(l218,"l218"),QIList(l217,"l217"),QIList(l216,"l216"),QIList(l215,"l215"),QIList(l214,"l214"),QIList(l213,"l213"),QIList(l211,"l211"),QIList(l210,"l210"),QIList(l209,"l209"),QIList(l208,"l208"),QIList(l207,"l207"),QIList(l206,"l206"),QIList(l205,"l205"),QIList(l204,"l204"),QIList(l203,"l203"),QIList(l202,"l202"),QIList(l201,"l201"),QIList(l200,"l200"),QIList(l199,"l199"),QIList(l198,"l198"),QIList(l197,"l197"),QIList(l196,"l196"),QIList(l195,"l195"),QIList(l194,"l194"),QIList(l193,"l193"),QIList(l192,"l192"),QIList(l191,"l191"),QIList(l190,"l190"),QIList(l189,"l189"),QIList(l188,"l188"),QIList(l187,"l187"),QIList(l186,"l186"),QIList(l185,"l185"),QIList(l184,"l184"),QIList(l183,"l183"),QIList(l182,"l182"),QIList(l181,"l181"),QIList(l180,"l180"),QIList(l179,"l179"),QIList(l178,"l178"),QIList(l177,"l177"),QIList(l176,"l176"),QIList(l175,"l175"),QIList(l174,"l174"),QIList(l173,"l173"),QIList(l172,"l172"),QIList(l171,"l171"),QIList(l170,"l170"),QIList(l169,"l169"),QIList(l168,"l168"),QIList(l167,"l167"),QIList(l166,"l166"),QIList(l165,"l165"),QIList(l164,"l164"),QIList(l163,"l163"),QIList(l162,"l162"),QIList(l161,"l161"),QIList(l160,"l160"),QIList(l159,"l159"),QIList(l158,"l158"),QIList(l157,"l157"),QIList(l156,"l156"),QIList(l155,"l155"),QIList(l154,"l154"),QIList(l153,"l153"),QIList(l152,"l152"),QIList(l151,"l151"),QIList(l150,"l150"),QIList(l149,"l149"),QIList(l148,"l148"),QIList(l147,"l147"),QIList(l146,"l146"),QIList(l145,"l145"),QIList(l144,"l144"),QIList(l143,"l143"),QIList(l142,"l142"),QIList(l141,"l141"),QIList(l140,"l140"),QIList(l139,"l139"),QIList(l138,"l138"),QIList(l137,"l137"),QIList(l136,"l136"),QIList(l135,"l135"),QIList(l134,"l134"),QIList(l133,"l133"),QIList(l132,"l132"),QIList(l131,"l131"),QIList(l130,"l130"),QIList(l129,"l129"),QIList(l128,"l128"),QIList(l127,"l127"),QIList(l126,"l126"),QIList(l125,"l125"),QIList(l124,"l124"),QIList(l123,"l123"),QIList(l122,"l122"),QIList(l121,"l121"),QIList(l120,"l120"),QIList(l119,"l119"),QIList(l118,"l118"),QIList(l117,"l117"),QIList(l116,"l116"),QIList(l115,"l115"),QIList(l114,"l114"),QIList(l113,"l113"),QIList(l112,"l112"),QIList(l111,"l111"),QIList(l110,"l110"),QIList(l109,"l109"),QIList(l108,"l108"),QIList(l107,"l107"),QIList(l106,"l106"),QIList(l105,"l105"),QIList(l104,"l104"),QIList(l103,"l103"),QIList(l102,"l102"),QIList(l101,"l101"),QIList(l100,"l100"),QIList(l99,"l99"),QIList(l98,"l98"),QIList(l97,"l97"),QIList(l96,"l96"),QIList(l95,"l95"),QIList(l94,"l94"),QIList(l93,"l93"),QIList(l92,"l92"),QIList(l91,"l91"),QIList(l90,"l90"),QIList(l89,"l89"),QIList(l88,"l88"),QIList(l87,"l87"),QIList(l86,"l86"),QIList(l85,"l85"),QIList(l84,"l84"),QIList(l83,"l83"),QIList(l82,"l82"),QIList(l81,"l81"),QIList(l80,"l80"),QIList(l79,"l79"),QIList(l78,"l78"),QIList(l77,"l77"),QIList(l76,"l76"),QIList(l75,"l75"),QIList(l74,"l74"),QIList(l73,"l73"),QIList(l72,"l72"),QIList(l71,"l71"),QIList(l70,"l70"),QIList(l69,"l69"),QIList(l68,"l68"),QIList(l67,"l67"),QIList(l66,"l66"),QIList(l65,"l65"),QIList(l64,"l64"),QIList(l63,"l63"),QIList(l62,"l62"),QIList(l61,"l61"),QIList(l60,"l60"),QIList(l59,"l59"),QIList(l58,"l58"),QIList(l57,"l57"),QIList(l56,"l56"),QIList(l55,"l55"),QIList(l54,"l54"),QIList(l53,"l53"),QIList(l52,"l52"),QIList(l51,"l51"),QIList(l50,"l50"),QIList(l49,"l49"),QIList(l48,"l48"),QIList(l47,"l47"),QIList(l46,"l46"),QIList(l45,"l45"),QIList(l44,"l44"),QIList(l43,"l43"),QIList(l42,"l42"),QIList(l41,"l41"),QIList(l40,"l40"),QIList(l39,"l39"),QIList(l38,"l38"),QIList(l37,"l37"),QIList(l36,"l36"),QIList(l35,"l35"),QIList(l34,"l34"),QIList(l33,"l33"),QIList(l32,"l32"),QIList(l31,"l31"),QIList(l30,"l30"),QIList(l29,"l29"),QIList(l28,"l28"),QIList(l27,"l27"),QIList(l26,"l26"),QIList(l25,"l25"),QIList(l24,"l24"),QIList(l23,"l23"),QIList(l22,"l22"),QIList(l21,"l21"),QIList(l20,"l20"),QIList(l19,"l19"),QIList(l18,"l18"),QIList(l17,"l17"),QIList(l16,"l16"),QIList(l15,"l15"),QIList(l14,"l14"),QIList(l13,"l13"),QIList(l12,"l12"),QIList(l11,"l11"),QIList(l10,"l10"),QIList(l9,"l9"),QIList(l8,"l8"),QIList(l7,"l7"),QIList(l6,"l6"),QIList(l5,"l5"),QIList(l4,"l4"),QIList(l3,"l3"),QIList(l2,"l2"),QIList(l1,"l1"),l3);
8258 var l324 = {name: "OP"};
8259 var l325 = {name: "SYM"};
8260 var l326 = {name: "X"};
8261 var l327 = {name: "ARGS"};
8262 var l328 = {name: "BODY"};
8263 var l329 = {name: "DECLS"};
8264 var l330 = {name: "DECL"};
8265 var l331 = {name: "NAME"};
8266 var l332 = {name: "ARG"};
8267 var l333 = {name: "FORM"};
8268 var l334 = {name: "PACKAGE-DESIGNATOR"};
8269 var l335 = {name: "VALUE-FROM"};
8270 var l336 = {name: "VARIABLES"};
8271 var l337 = {name: "VARLIST"};
8272 var l338 = {name: "ENDLIST"};
8273 var l339 = {name: "V"};
8274 var l340 = {name: "PAIRS"};
8275 var l341 = {name: "ASSIGNMENTS"};
8276 var l342 = {name: "VALUE"};
8277 var l343 = {name: "FORM1"};
8278 var l344 = {name: "RESULT"};
8279 var l345 = {name: "FORMS"};
8280 var l346 = {name: "G"};
8281 var l347 = {name: "CLAUSULES"};
8282 var l348 = {name: "!FORM"};
8283 var l349 = {name: "CLAUSULE"};
8284 var l350 = {name: "ITER"};
8285 var l351 = {name: "G!TO"};
8286 var l352 = {name: "VAR"};
8287 var l353 = {name: "TO"};
8288 var l354 = {name: "G!LIST"};
8289 var l355 = {name: "PLACE"};
8290 var l356 = {name: "DELTA"};
8291 var l357 = {name: "CONDITION"};
8292 var l358 = {name: "DOCSTRING"};
8293 var l359 = QIList(QIList(QIList(l267,l105,l3,QIList(l202,l3),l3),QIList(l257,l105,l3,QIList(l202,l3),l3),QIList(l256,l105,l3,QIList(l202,l3),l3),QIList(l250,l105,l3,QIList(l202,l3),l3),QIList(l239,l105,l3,QIList(l202,l3),l3),QIList(l229,l105,l3,QIList(l202,l3),l3),QIList(l228,l105,l3,QIList(l202,l3),l3),QIList(l209,l105,l3,QIList(l202,l3),l3),QIList(l206,l105,l3,QIList(l202,l3),l3),QIList(l193,l105,l3,QIList(l202,l3),l3),QIList(l189,l105,l3,QIList(l202,l3),l3),QIList(l188,l105,l3,QIList(l202,l3),l3),QIList(l172,l105,l3,QIList(l202,l3),l3),QIList(l166,l105,l3,QIList(l202,l3),l3),QIList(l133,l105,l3,QIList(l202,l3),l3),QIList(l123,l105,l3,QIList(l202,l3),l3),QIList(l120,l105,l3,QIList(l202,l3),l3),QIList(l119,l105,l3,QIList(l202,l3),l3),QIList(l118,l105,l3,QIList(l202,l3),l3),QIList(l108,l105,l3,QIList(l202,l3),l3),QIList(l15,l105,l3,QIList(l202,l3),l3),QIList(l4,l105,l3,QIList(l202,l204,l3),l3),QIList(l3,l105,l3,QIList(l202,l204,l3),l3),l3),QIList(QIList(l276,l198,QIList(l104,QIList(l5,QIList(l324,l325,l3),QIList(l168,QIList(l268,QIList(l170,l324,l3),QIList(l326,l211,l327,l3),QIList(l246,QIList(QIList(l327,QIList(l28,l326,l327,l3),l3),l3),QIList(l272,l327,QIList(l144,QIList(l275,l327,QIList(l170,l325,l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l272,l198,QIList(l104,QIList(l5,QIList(l327,l211,l328,l3),QIList(l7,QIList(l285,l327,l3),QIList(l303,"Bad usage of VARIABLE-ARITY, you must pass a symbol",l3),l3),QIList(l168,QIList(l271,QIList(l170,l327,l3),QIList(l5,QIList(QIList(l170,l327,l3),l3),QIList(l134,"return ",QIList(l169,l328,l3),";",l133,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l270,l198,QIList(l104,QIList(l5,QIList(l329,l211,l328,l3),QIList(l168,QIList(l146,QIList(l169,QIList(l73,QIList(l5,QIList(l330,l3),QIList(l168,QIList(l134,"var ",QIList(l170,QIList(l39,l330,l3),l3)," = ",QIList(l170,QIList(l41,l330,l3),l3),";",l133,l3),l3),l3),l329,l3),l3),QIList(l169,QIList(l73,QIList(l5,QIList(l330,l3),QIList(l168,QIList(l134,"if (typeof ",QIList(l170,QIList(l39,l330,l3),l3)," != '",QIList(l170,QIList(l40,l330,l3),l3),"')",l133,QIList(l143,"throw 'The value ' + ",QIList(l170,QIList(l39,l330,l3),l3)," + ' is not a type ",QIList(l170,QIList(l40,l330,l3),l3),".';",l133,l3),l3),l3),l3),l329,l3),l3),QIList(l134,"return ",QIList(l241,QIList(l169,l328,l3),l3),";",l133,l3),l3),l3),l3),l3),l3,l3),QIList(l269,l198,QIList(l104,QIList(l5,QIList(l331,l327,l211,l328,l3),QIList(l168,QIList(l241,QIList(l268,QIList(l170,l331,l3),QIList(l170,l327,l3),QIList(l246,QIList(l170,QIList(l73,QIList(l5,QIList(l332,l3),QIList(l168,QIList(QIList(l170,l332,l3),QIList(l145,QIList(l170,l332,l3),l3),l3),l3),l3),l327,l3),l3),QIList(l169,l328,l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l268,l198,QIList(l104,QIList(l5,QIList(l331,l327,l211,l328,l3),QIList(l168,QIList(l48,QIList(l44,QIList(l167,QIList(l170,l331,l3),l3),QIList(l5,QIList(l170,l327,l3),QIList(l184,QIList(l170,l331,l3),QIList(l169,l328,l3),l3),l3),l3),l267,l3),l3),l3),l3),l3,l3),QIList(l168,l198,QIList(l104,QIList(l5,QIList(l333,l3),QIList(l265,l333,l3),l3),l3),l3,l3),QIList(l243,l198,QIList(l104,QIList(l5,QIList(l331,l327,l333,l3),QIList(l168,QIList(l207,QIList(l170,l331,l3),QIList(l170,l327,l3),QIList(l145,QIList(l170,l333,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l207,l198,QIList(l104,QIList(l5,QIList(l331,l327,l211,l328,l3),QIList(l168,QIList(l48,QIList(l44,QIList(l167,QIList(l170,l331,l3),l3),QIList(l5,QIList(l170,l327,l3),QIList(l184,QIList(l170,l331,l3),QIList(l169,l328,l3),l3),l3),l3),l206,l3),l3),l3),l3),l3,l3),QIList(l146,l198,QIList(l104,QIList(l5,QIList(l211,l328,l3),QIList(l168,QIList(l134,"(function(){",l133,QIList(l143,QIList(l169,l328,l3),l3),"})()",l3),l3),l3),l3),l3,l3),QIList(l135,l198,QIList(l104,QIList(l5,QIList(l105,l211,l333,l3),QIList(l168,QIList(l225,QIList(l170,l105,l3),QIList(l134,QIList(l170,l105,l3),QIList(l241,QIList(l169,l333,l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l124,l198,QIList(l104,QIList(l5,QIList(l334,l3),QIList(l168,QIList(l240,QIList(l225,l123,QIList(l111,QIList(l170,l334,l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l107,l198,QIList(l104,QIList(l5,QIList(l335,l3),QIList(l168,QIList(l263,QIList(l104,l44,l3),QIList(l170,l335,l3),l3),l3),l3),l3),l3,l3),QIList(l106,l198,QIList(l104,QIList(l5,QIList(l336,l335,l211,l328,l3),QIList(l168,QIList(l263,QIList(l5,QIList(l210,QIList(l169,l336,l3),l211,QIList(l170,QIList(l16,l3),l3),l3),QIList(l169,l328,l3),l3),QIList(l170,l335,l3),l3),l3),l3),l3),l3,l3),QIList(l69,l198,QIList(l104,QIList(l5,QIList(l337,l338,l211,l328,l3),QIList(l168,QIList(l184,l3,QIList(l249,QIList(l170,QIList(l73,QIList(l5,QIList(l326,l3),QIList(l44,QIList(l39,l326,l3),QIList(l40,l326,l3),l3),l3),l337,l3),l3),QIList(l14,l4,QIList(l6,QIList(l170,QIList(l30,l338,l3),l3),QIList(l13,QIList(l241,QIList(l170,QIList(l31,l338,l3),l3),l3),l3),l3),QIList(l260,QIList(l169,l328,l3),l3),QIList(l225,QIList(l169,QIList(l301,QIList(l104,l64,l3),QIList(l73,QIList(l5,QIList(l339,l3),QIList(l54,QIList(l29,QIList(l35,l339,l3),l3),QIList(l44,QIList(l39,l339,l3),QIList(l41,l339,l3),l3),l3),l3),l337,l3),l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l68,l198,QIList(l104,QIList(l5,QIList(l337,l338,l211,l328,l3),QIList(l168,QIList(l184,l3,QIList(l246,QIList(l170,QIList(l73,QIList(l5,QIList(l326,l3),QIList(l44,QIList(l39,l326,l3),QIList(l40,l326,l3),l3),l3),l337,l3),l3),QIList(l14,l4,QIList(l6,QIList(l170,QIList(l30,l338,l3),l3),QIList(l13,QIList(l241,QIList(l170,QIList(l31,l338,l3),l3),l3),l3),l3),QIList(l260,QIList(l169,l328,l3),l3),QIList(l67,QIList(l169,QIList(l301,QIList(l104,l64,l3),QIList(l73,QIList(l5,QIList(l339,l3),QIList(l54,QIList(l29,QIList(l35,l339,l3),l3),QIList(l44,QIList(l39,l339,l3),QIList(l41,l339,l3),l3),l3),l3),l337,l3),l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l67,l198,QIList(l104,QIList(l5,QIList(l211,l340,l3),QIList(l246,QIList(QIList(l341,QIList(l167,l3,l3),l3),l3),QIList(l14,l4,QIList(l51,QIList(QIList(l12,l340,l3),QIList(l13,l3),l3),QIList(QIList(l12,QIList(l31,l340,l3),l3),QIList(l303,"Odd paris in PSETQ",l3),l3),QIList(l4,QIList(l246,QIList(QIList(l105,QIList(l30,l340,l3),l3),QIList(l342,QIList(l33,l340,l3),l3),l3),QIList(l48,QIList(l168,QIList(QIList(l170,l105,l3),QIList(l170,QIList(l16,l3),l3),QIList(l170,l342,l3),l3),l3),l341,l3),QIList(l225,l340,QIList(l35,l340,l3),l3),l3),l3),l3),l3),QIList(l225,l341,QIList(l66,l341,l3),l3),QIList(l168,QIList(l246,QIList(l170,QIList(l73,QIList(l104,l31,l3),l341,l3),l3),QIList(l225,QIList(l169,QIList(l60,QIList(l104,l64,l3),QIList(l73,QIList(l104,l87,l3),l341,l3),QIList(l167,l3,l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l57,l198,QIList(l104,QIList(l5,QIList(l343,l344,l211,l328,l3),QIList(l168,QIList(l56,QIList(l241,QIList(l170,l343,l3),QIList(l170,l344,l3),l3),QIList(l169,l328,l3),l3),l3),l3),l3),l3,l3),QIList(l56,l198,QIList(l104,QIList(l5,QIList(l333,l211,l328,l3),QIList(l246,QIList(QIList(l342,QIList(l16,l3),l3),l3),QIList(l168,QIList(l246,QIList(QIList(QIList(l170,l342,l3),QIList(l170,l333,l3),l3),l3),QIList(l169,l328,l3),QIList(l170,l342,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l55,l198,QIList(l104,QIList(l5,QIList(l211,l345,l3),QIList(l51,QIList(QIList(l12,l345,l3),l3,l3),QIList(QIList(l12,QIList(l31,l345,l3),l3),QIList(l30,l345,l3),l3),QIList(l4,QIList(l246,QIList(QIList(l346,QIList(l16,l3),l3),l3),QIList(l168,QIList(l246,QIList(QIList(QIList(l170,l346,l3),QIList(l170,QIList(l30,l345,l3),l3),l3),l3),QIList(l208,QIList(l170,l346,l3),QIList(l170,l346,l3),QIList(l55,QIList(l169,QIList(l31,l345,l3),l3),l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l54,l198,QIList(l104,QIList(l5,QIList(l211,l345,l3),QIList(l51,QIList(QIList(l12,l345,l3),l4,l3),QIList(QIList(l12,QIList(l31,l345,l3),l3),QIList(l30,l345,l3),l3),QIList(l4,QIList(l168,QIList(l208,QIList(l170,QIList(l30,l345,l3),l3),QIList(l54,QIList(l169,QIList(l31,l345,l3),l3),l3),l3,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l53,l198,QIList(l104,QIList(l5,QIList(l333,l211,l347,l3),QIList(l168,QIList(l52,QIList(l170,l333,l3),QIList(l169,QIList(l64,l347,QIList(l168,QIList(QIList(l4,QIList(l303,"ECASE expression failed.",l3),l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l52,l198,QIList(l104,QIList(l5,QIList(l333,l211,l347,l3),QIList(l246,QIList(QIList(l348,QIList(l16,l3),l3),l3),QIList(l168,QIList(l246,QIList(QIList(QIList(l170,l348,l3),QIList(l170,l333,l3),l3),l3),QIList(l51,QIList(l169,QIList(l73,QIList(l5,QIList(l349,l3),QIList(l208,QIList(l292,QIList(l30,l349,l3),l4,l3),l349,QIList(l168,QIList(QIList(l26,QIList(l170,l348,l3),QIList(l167,QIList(l170,QIList(l30,l349,l3),l3),l3),l3),QIList(l169,QIList(l31,l349,l3),l3),l3),l3),l3),l3),l347,l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l51,l198,QIList(l104,QIList(l5,QIList(l211,l347,l3),QIList(l208,QIList(l12,l347,l3),l3,QIList(l208,QIList(l292,QIList(l32,l347,l3),l4,l3),QIList(l168,QIList(l241,QIList(l169,QIList(l34,l347,l3),l3),l3),l3),QIList(l168,QIList(l208,QIList(l170,QIList(l32,l347,l3),l3),QIList(l241,QIList(l169,QIList(l34,l347,l3),l3),l3),QIList(l51,QIList(l169,QIList(l31,l347,l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l50,l198,QIList(l104,QIList(l5,QIList(l350,l211,l328,l3),QIList(l246,QIList(QIList(l351,QIList(l16,l3),l3),QIList(l352,QIList(l39,l350,l3),l3),QIList(l353,QIList(l40,l350,l3),l3),QIList(l344,QIList(l41,l350,l3),l3),l3),QIList(l168,QIList(l184,l3,QIList(l246,QIList(QIList(QIList(l170,l352,l3),0,l3),QIList(QIList(l170,l351,l3),QIList(l170,l353,l3),l3),l3),QIList(l232,QIList(l278,QIList(l170,l352,l3),QIList(l170,l351,l3),l3),QIList(l260,QIList(l169,l328,l3),l3),QIList(l46,QIList(l170,l352,l3),l3),l3),QIList(l170,l344,l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l49,l198,QIList(l104,QIList(l5,QIList(l350,l211,l328,l3),QIList(l246,QIList(QIList(l352,QIList(l39,l350,l3),l3),QIList(l354,QIList(l16,l3),l3),l3),QIList(l168,QIList(l184,l3,QIList(l246,QIList(QIList(QIList(l170,l354,l3),QIList(l170,QIList(l40,l350,l3),l3),l3),QIList(QIList(l170,l352,l3),l3,l3),l3),QIList(l232,QIList(l170,l354,l3),QIList(l225,QIList(l170,l352,l3),QIList(l30,QIList(l170,l354,l3),l3),l3),QIList(l260,QIList(l169,l328,l3),l3),QIList(l225,QIList(l170,l354,l3),QIList(l31,QIList(l170,l354,l3),l3),l3),l3),QIList(l170,QIList(l41,l350,l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),QIList(l48,l198,QIList(l104,QIList(l5,QIList(l326,l355,l3),QIList(l168,QIList(l225,QIList(l170,l355,l3),QIList(l28,QIList(l170,l326,l3),QIList(l170,l355,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l47,l198,QIList(l104,QIList(l5,QIList(l326,l210,QIList(l356,1,l3),l3),QIList(l168,QIList(l225,QIList(l170,l326,l3),QIList(l62,QIList(l170,l326,l3),QIList(l170,l356,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l46,l198,QIList(l104,QIList(l5,QIList(l326,l210,QIList(l356,1,l3),l3),QIList(l168,QIList(l225,QIList(l170,l326,l3),QIList(l61,QIList(l170,l326,l3),QIList(l170,l356,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l14,l198,QIList(l104,QIList(l5,QIList(l357,l211,l328,l3),QIList(l168,QIList(l184,l3,QIList(l232,QIList(l170,l357,l3),QIList(l169,l328,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l13,l198,QIList(l104,QIList(l5,QIList(l210,l342,l3),QIList(l168,QIList(l253,l3,QIList(l170,l342,l3),l3),l3),l3),l3),l3,l3),QIList(l11,l198,QIList(l104,QIList(l5,QIList(l331,l327,l211,l328,l3),QIList(l168,QIList(l241,QIList(l288,QIList(l167,QIList(l170,l331,l3),l3),QIList(l10,QIList(l170,QIList(l287,l331,l3),l3),QIList(l170,l327,l3),QIList(l169,QIList(l208,QIList(l54,QIList(l295,QIList(l30,l328,l3),l3),QIList(l27,QIList(l12,QIList(l31,l328,l3),l3),l3),l3),QIList(l168,QIList(QIList(l170,QIList(l30,l328,l3),l3),QIList(l184,QIList(l170,l331,l3),QIList(l169,QIList(l31,l328,l3),l3),l3),l3),l3),QIList(l168,QIList(QIList(l184,QIList(l170,l331,l3),QIList(l169,l328,l3),l3),l3),l3),l3),l3),l3),l3),QIList(l167,QIList(l170,l331,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l10,l198,QIList(l104,QIList(l5,QIList(l331,l327,l211,l328,l3),QIList(l246,QIList(QIList(l326,QIList(l16,"FN",l3),l3),l3),QIList(l168,QIList(l246,QIList(QIList(QIList(l170,l326,l3),QIList(l5,QIList(l170,l327,l3),QIList(l169,l328,l3),l3),l3),l3),QIList(l307,QIList(l170,l326,l3),"fname",QIList(l170,l331,l3),l3),QIList(l170,l326,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l9,l198,QIList(l104,QIList(l5,QIList(l331,l342,l210,l358,l3),QIList(l168,QIList(l241,QIList(l225,QIList(l170,l331,l3),QIList(l170,l342,l3),l3),QIList(l169,QIList(l6,QIList(l295,l358,l3),QIList(l168,QIList(QIList(l307,QIList(l167,QIList(l170,l331,l3),l3),"vardoc",QIList(l170,l358,l3),l3),l3),l3),l3),l3),QIList(l167,QIList(l170,l331,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l8,l198,QIList(l104,QIList(l5,QIList(l331,l342,l210,l358,l3),QIList(l168,QIList(l241,QIList(l2,QIList(l202,QIList(l170,l331,l3),l3),l3),QIList(l7,QIList(l18,QIList(l167,QIList(l170,l331,l3),l3),l3),QIList(l225,QIList(l170,l331,l3),QIList(l170,l342,l3),l3),l3),QIList(l169,QIList(l6,QIList(l295,l358,l3),QIList(l168,QIList(QIList(l307,QIList(l167,QIList(l170,l331,l3),l3),"vardoc",QIList(l170,l358,l3),l3),l3),l3),l3),l3),QIList(l167,QIList(l170,l331,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l7,l198,QIList(l104,QIList(l5,QIList(l357,l211,l328,l3),QIList(l168,QIList(l208,QIList(l170,l357,l3),l3,QIList(l241,QIList(l169,l328,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l6,l198,QIList(l104,QIList(l5,QIList(l357,l211,l328,l3),QIList(l168,QIList(l208,QIList(l170,l357,l3),QIList(l241,QIList(l169,l328,l3),l3),l3,l3),l3),l3),l3),l3,l3),QIList(l5,l198,QIList(l104,QIList(l5,QIList(l327,l211,l328,l3),QIList(l168,QIList(l104,QIList(l5,QIList(l170,l327,l3),QIList(l169,l328,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l2,l198,QIList(l104,QIList(l5,QIList(l211,l329,l3),QIList(l168,QIList(l240,QIList(l169,QIList(l73,QIList(l5,QIList(l330,l3),QIList(l168,QIList(l201,QIList(l167,QIList(l170,l330,l3),l3),l3),l3),l3),l329,l3),l3),l3),l3),l3),l3),l3,l3),QIList(l1,l198,QIList(l104,QIList(l5,QIList(l331,l327,l211,l328,l3),QIList(l168,QIList(l240,QIList(l197,QIList(l167,QIList(l170,l331,l3),l3),QIList(l167,QIList(l104,QIList(l5,QIList(l170,QIList(l73,QIList(l104,QIList(l5,QIList(l326,l3),QIList(l208,QIList(l292,l326,QIList(l167,l321,l3),l3),QIList(l167,l211,l3),l326,l3),l3),l3),l327,l3),l3),QIList(l169,l328,l3),l3),l3),l3),l3),l3),l3),l3),l3),l3,l3),l3),l3,l3,l3);
8295 l125.fvalue(pv, l321);
8296 l125.fvalue(pv, l320);
8297 l125.fvalue(pv, l319);
8298 l125.fvalue(pv, l318);
8299 l125.fvalue(pv, l317);
8300 l125.fvalue(pv, l316);
8301 l125.fvalue(pv, l315);
8302 l125.fvalue(pv, l314);
8303 l125.fvalue(pv, l313);
8304 l125.fvalue(pv, l312);
8305 l125.fvalue(pv, l311);
8306 l125.fvalue(pv, l310);
8307 l125.fvalue(pv, l309);
8308 l125.fvalue(pv, l308);
8309 l125.fvalue(pv, l307);
8310 l125.fvalue(pv, l306);
8311 l125.fvalue(pv, l305);
8312 l125.fvalue(pv, l304);
8313 l125.fvalue(pv, l303);
8314 l125.fvalue(pv, l302);
8315 l125.fvalue(pv, l301);
8316 l125.fvalue(pv, l300);
8317 l125.fvalue(pv, l299);
8318 l125.fvalue(pv, l298);
8319 l125.fvalue(pv, l297);
8320 l125.fvalue(pv, l296);
8321 l125.fvalue(pv, l295);
8322 l125.fvalue(pv, l294);
8323 l125.fvalue(pv, l293);
8324 l125.fvalue(pv, l292);
8325 l125.fvalue(pv, l291);
8326 l125.fvalue(pv, l290);
8327 l125.fvalue(pv, l289);
8328 l125.fvalue(pv, l288);
8329 l125.fvalue(pv, l287);
8330 l125.fvalue(pv, l286);
8331 l125.fvalue(pv, l285);
8332 l125.fvalue(pv, l284);
8333 l125.fvalue(pv, l283);
8334 l125.fvalue(pv, l282);
8335 l125.fvalue(pv, l281);
8336 l125.fvalue(pv, l280);
8337 l125.fvalue(pv, l279);
8338 l125.fvalue(pv, l278);
8339 l125.fvalue(pv, l277);
8340 l125.fvalue(pv, l276);
8341 l125.fvalue(pv, l275);
8342 l125.fvalue(pv, l274);
8343 l125.fvalue(pv, l273);
8344 l125.fvalue(pv, l272);
8345 l125.fvalue(pv, l271);
8346 l125.fvalue(pv, l270);
8347 l125.fvalue(pv, l269);
8348 l125.fvalue(pv, l268);
8349 l125.fvalue(pv, l267);
8350 l125.fvalue(pv, l266);
8351 l125.fvalue(pv, l265);
8352 l125.fvalue(pv, l264);
8353 l125.fvalue(pv, l263);
8354 l125.fvalue(pv, l262);
8355 l125.fvalue(pv, l261);
8356 l125.fvalue(pv, l260);
8357 l125.fvalue(pv, l259);
8358 l125.fvalue(pv, l258);
8359 l125.fvalue(pv, l257);
8360 l125.fvalue(pv, l256);
8361 l125.fvalue(pv, l255);
8362 l125.fvalue(pv, l254);
8363 l125.fvalue(pv, l253);
8364 l125.fvalue(pv, l252);
8365 l125.fvalue(pv, l251);
8366 l125.fvalue(pv, l250);
8367 l125.fvalue(pv, l249);
8368 l125.fvalue(pv, l248);
8369 l125.fvalue(pv, l247);
8370 l125.fvalue(pv, l246);
8371 l125.fvalue(pv, l245);
8372 l125.fvalue(pv, l244);
8373 l125.fvalue(pv, l243);
8374 l125.fvalue(pv, l242);
8375 l125.fvalue(pv, l241);
8376 l125.fvalue(pv, l240);
8377 l125.fvalue(pv, l239);
8378 l125.fvalue(pv, l238);
8379 l125.fvalue(pv, l237);
8380 l125.fvalue(pv, l236);
8381 l125.fvalue(pv, l235);
8382 l125.fvalue(pv, l234);
8383 l125.fvalue(pv, l233);
8384 l125.fvalue(pv, l232);
8385 l125.fvalue(pv, l231);
8386 l125.fvalue(pv, l230);
8387 l125.fvalue(pv, l229);
8388 l125.fvalue(pv, l228);
8389 l125.fvalue(pv, l227);
8390 l125.fvalue(pv, l226);
8391 l125.fvalue(pv, l225);
8392 l125.fvalue(pv, l224);
8393 l125.fvalue(pv, l223);
8394 l125.fvalue(pv, l222);
8395 l125.fvalue(pv, l221);
8396 l125.fvalue(pv, l220);
8397 l125.fvalue(pv, l219);
8398 l125.fvalue(pv, l218);
8399 l125.fvalue(pv, l217);
8400 l125.fvalue(pv, l216);
8401 l125.fvalue(pv, l215);
8402 l125.fvalue(pv, l214);
8403 l125.fvalue(pv, l213);
8404 l125.fvalue(pv, l211);
8405 l125.fvalue(pv, l210);
8406 l125.fvalue(pv, l209);
8407 l125.fvalue(pv, l208);
8408 l125.fvalue(pv, l207);
8409 l125.fvalue(pv, l206);
8410 l125.fvalue(pv, l205);
8411 l125.fvalue(pv, l204);
8412 l125.fvalue(pv, l203);
8413 l125.fvalue(pv, l202);
8414 l125.fvalue(pv, l201);
8415 l125.fvalue(pv, l200);
8416 l125.fvalue(pv, l199);
8417 l125.fvalue(pv, l198);
8418 l125.fvalue(pv, l197);
8419 l125.fvalue(pv, l196);
8420 l125.fvalue(pv, l195);
8421 l125.fvalue(pv, l194);
8422 l125.fvalue(pv, l193);
8423 l125.fvalue(pv, l192);
8424 l125.fvalue(pv, l191);
8425 l125.fvalue(pv, l190);
8426 l125.fvalue(pv, l189);
8427 l125.fvalue(pv, l188);
8428 l125.fvalue(pv, l187);
8429 l125.fvalue(pv, l186);
8430 l125.fvalue(pv, l185);
8431 l125.fvalue(pv, l184);
8432 l125.fvalue(pv, l183);
8433 l125.fvalue(pv, l182);
8434 l125.fvalue(pv, l181);
8435 l125.fvalue(pv, l180);
8436 l125.fvalue(pv, l179);
8437 l125.fvalue(pv, l178);
8438 l125.fvalue(pv, l177);
8439 l125.fvalue(pv, l176);
8440 l125.fvalue(pv, l175);
8441 l125.fvalue(pv, l174);
8442 l125.fvalue(pv, l173);
8443 l125.fvalue(pv, l172);
8444 l125.fvalue(pv, l171);
8445 l125.fvalue(pv, l170);
8446 l125.fvalue(pv, l169);
8447 l125.fvalue(pv, l168);
8448 l125.fvalue(pv, l167);
8449 l125.fvalue(pv, l166);
8450 l125.fvalue(pv, l165);
8451 l125.fvalue(pv, l164);
8452 l125.fvalue(pv, l163);
8453 l125.fvalue(pv, l162);
8454 l125.fvalue(pv, l161);
8455 l125.fvalue(pv, l160);
8456 l125.fvalue(pv, l159);
8457 l125.fvalue(pv, l158);
8458 l125.fvalue(pv, l157);
8459 l125.fvalue(pv, l156);
8460 l125.fvalue(pv, l155);
8461 l125.fvalue(pv, l154);
8462 l125.fvalue(pv, l153);
8463 l125.fvalue(pv, l152);
8464 l125.fvalue(pv, l151);
8465 l125.fvalue(pv, l150);
8466 l125.fvalue(pv, l149);
8467 l125.fvalue(pv, l148);
8468 l125.fvalue(pv, l147);
8469 l125.fvalue(pv, l146);
8470 l125.fvalue(pv, l145);
8471 l125.fvalue(pv, l144);
8472 l125.fvalue(pv, l143);
8473 l125.fvalue(pv, l142);
8474 l125.fvalue(pv, l141);
8475 l125.fvalue(pv, l140);
8476 l125.fvalue(pv, l139);
8477 l125.fvalue(pv, l138);
8478 l125.fvalue(pv, l137);
8479 l125.fvalue(pv, l136);
8480 l125.fvalue(pv, l135);
8481 l125.fvalue(pv, l134);
8482 l125.fvalue(pv, l133);
8483 l125.fvalue(pv, l132);
8484 l125.fvalue(pv, l131);
8485 l125.fvalue(pv, l130);
8486 l125.fvalue(pv, l129);
8487 l125.fvalue(pv, l128);
8488 l125.fvalue(pv, l127);
8489 l125.fvalue(pv, l126);
8490 l125.fvalue(pv, l125);
8491 l125.fvalue(pv, l124);
8492 l125.fvalue(pv, l123);
8493 l125.fvalue(pv, l122);
8494 l125.fvalue(pv, l121);
8495 l125.fvalue(pv, l120);
8496 l125.fvalue(pv, l119);
8497 l125.fvalue(pv, l118);
8498 l125.fvalue(pv, l117);
8499 l125.fvalue(pv, l116);
8500 l125.fvalue(pv, l115);
8501 l125.fvalue(pv, l114);
8502 l125.fvalue(pv, l113);
8503 l125.fvalue(pv, l112);
8504 l125.fvalue(pv, l111);
8505 l125.fvalue(pv, l110);
8506 l125.fvalue(pv, l109);
8507 l125.fvalue(pv, l108);
8508 l125.fvalue(pv, l107);
8509 l125.fvalue(pv, l106);
8510 l125.fvalue(pv, l105);
8511 l125.fvalue(pv, l104);
8512 l125.fvalue(pv, l103);
8513 l125.fvalue(pv, l102);
8514 l125.fvalue(pv, l101);
8515 l125.fvalue(pv, l100);
8516 l125.fvalue(pv, l99);
8517 l125.fvalue(pv, l98);
8518 l125.fvalue(pv, l97);
8519 l125.fvalue(pv, l96);
8520 l125.fvalue(pv, l95);
8521 l125.fvalue(pv, l94);
8522 l125.fvalue(pv, l93);
8523 l125.fvalue(pv, l92);
8524 l125.fvalue(pv, l91);
8525 l125.fvalue(pv, l90);
8526 l125.fvalue(pv, l89);
8527 l125.fvalue(pv, l88);
8528 l125.fvalue(pv, l87);
8529 l125.fvalue(pv, l86);
8530 l125.fvalue(pv, l85);
8531 l125.fvalue(pv, l84);
8532 l125.fvalue(pv, l83);
8533 l125.fvalue(pv, l82);
8534 l125.fvalue(pv, l81);
8535 l125.fvalue(pv, l80);
8536 l125.fvalue(pv, l79);
8537 l125.fvalue(pv, l78);
8538 l125.fvalue(pv, l77);
8539 l125.fvalue(pv, l76);
8540 l125.fvalue(pv, l75);
8541 l125.fvalue(pv, l74);
8542 l125.fvalue(pv, l73);
8543 l125.fvalue(pv, l72);
8544 l125.fvalue(pv, l71);
8545 l125.fvalue(pv, l70);
8546 l125.fvalue(pv, l69);
8547 l125.fvalue(pv, l68);
8548 l125.fvalue(pv, l67);
8549 l125.fvalue(pv, l66);
8550 l125.fvalue(pv, l65);
8551 l125.fvalue(pv, l64);
8552 l125.fvalue(pv, l63);
8553 l125.fvalue(pv, l62);
8554 l125.fvalue(pv, l61);
8555 l125.fvalue(pv, l60);
8556 l125.fvalue(pv, l59);
8557 l125.fvalue(pv, l58);
8558 l125.fvalue(pv, l57);
8559 l125.fvalue(pv, l56);
8560 l125.fvalue(pv, l55);
8561 l125.fvalue(pv, l54);
8562 l125.fvalue(pv, l53);
8563 l125.fvalue(pv, l52);
8564 l125.fvalue(pv, l51);
8565 l125.fvalue(pv, l50);
8566 l125.fvalue(pv, l49);
8567 l125.fvalue(pv, l48);
8568 l125.fvalue(pv, l47);
8569 l125.fvalue(pv, l46);
8570 l125.fvalue(pv, l45);
8571 l125.fvalue(pv, l44);
8572 l125.fvalue(pv, l43);
8573 l125.fvalue(pv, l42);
8574 l125.fvalue(pv, l41);
8575 l125.fvalue(pv, l40);
8576 l125.fvalue(pv, l39);
8577 l125.fvalue(pv, l38);
8578 l125.fvalue(pv, l37);
8579 l125.fvalue(pv, l36);
8580 l125.fvalue(pv, l35);
8581 l125.fvalue(pv, l34);
8582 l125.fvalue(pv, l33);
8583 l125.fvalue(pv, l32);
8584 l125.fvalue(pv, l31);
8585 l125.fvalue(pv, l30);
8586 l125.fvalue(pv, l29);
8587 l125.fvalue(pv, l28);
8588 l125.fvalue(pv, l27);
8589 l125.fvalue(pv, l26);
8590 l125.fvalue(pv, l25);
8591 l125.fvalue(pv, l24);
8592 l125.fvalue(pv, l23);
8593 l125.fvalue(pv, l22);
8594 l125.fvalue(pv, l21);
8595 l125.fvalue(pv, l20);
8596 l125.fvalue(pv, l19);
8597 l125.fvalue(pv, l18);
8598 l125.fvalue(pv, l17);
8599 l125.fvalue(pv, l16);
8600 l125.fvalue(pv, l15);
8601 l125.fvalue(pv, l14);
8602 l125.fvalue(pv, l13);
8603 l125.fvalue(pv, l12);
8604 l125.fvalue(pv, l11);
8605 l125.fvalue(pv, l10);
8606 l125.fvalue(pv, l9);
8607 l125.fvalue(pv, l8);
8608 l125.fvalue(pv, l7);
8609 l125.fvalue(pv, l6);
8610 l125.fvalue(pv, l5);
8611 l125.fvalue(pv, l4);
8612 l125.fvalue(pv, l3);
8613 l125.fvalue(pv, l2);
8614 l125.fvalue(pv, l1);
8615 ((l228).value = l323);
8616 ((l188).value = l359);
8617 ((l189).value = 857);
8618 ((l15).value = 219);
8619 return ((l250).value = 290);
8621 ((l229).value = 359);