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: "DEFCONSTANT"};
60 var l5 = {name: "NIL"};
66 var l6 = {name: "LAMBDA"};
68 var l7 = {name: "WHEN"};
70 var l8 = {name: "UNLESS"};
72 var l9 = {name: "DEFVAR"};
74 var l10 = {name: "DEFPARAMETER"};
76 var l11 = {name: "NAMED-LAMBDA"};
78 var l12 = {name: "DEFUN"};
80 var l13 = {name: "NULL"};
82 (l13).fvalue = (function(v2){
83 ((v2)["fname"] = "NULL");
85 })((function (values,v1){
86 checkArgs(arguments, 2);
88 return ((v1 === l5.value)?l4.value: l5.value);
93 var l14 = {name: "ENDP"};
95 (l14).fvalue = (function(v4){
96 ((v4)["fname"] = "ENDP");
98 })((function (values,v3){
99 checkArgs(arguments, 2);
101 return (l13.fvalue(pv, v3) !== l5.value ? l4.value : (((function(){
103 return (typeof tmp == 'object' && 'car' in tmp);
104 })()?l4.value: l5.value) !== l5.value ? l5.value : (function(){
111 var l15 = {name: "RETURN"};
113 var l16 = {name: "WHILE"};
115 var l17 = {name: "*GENSYM-COUNTER*"};
117 (((l17.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l17).value = 0));
120 var l18 = {name: "GENSYM"};
121 var l19 = {name: "INTEGER-TO-STRING"};
123 (l18).fvalue = (function(v6){
124 ((v6)["fname"] = "GENSYM");
126 })((function (values,v5){
127 checkArgsAtMost(arguments, 2);
129 switch(arguments.length-1){
135 ((l17).value = (function(){
136 var x1 = (function(){
138 var value = symbol.value;
139 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
142 if (typeof x1 !== 'number') throw 'Not a number!';
146 var name = (function(){
148 var string2 = l19.fvalue(pv, (function(){
150 var value = symbol.value;
151 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
154 if (typeof string1 != 'string')
155 throw 'The value ' + string1 + ' is not a type string.';
156 if (typeof string2 != 'string')
157 throw 'The value ' + string2 + ' is not a type string.';
158 return string1.concat(string2);
160 if (typeof name != 'string')
161 throw 'The value ' + name + ' is not a type string.';
162 return ({name: name});
168 var l20 = {name: "BOUNDP"};
170 (l20).fvalue = (function(v8){
171 ((v8)["fname"] = "BOUNDP");
173 })((function (values,v7){
174 checkArgs(arguments, 2);
176 return ((v7.value !== undefined)?l4.value: l5.value);
181 var l21 = {name: "="};
183 (l21).fvalue = (function(v11){
184 ((v11)["fname"] = "=");
186 })((function (values,v9,v10){
187 checkArgs(arguments, 3);
191 if (typeof x1 !== 'number') throw 'Not a number!';
193 if (typeof x2 !== 'number') throw 'Not a number!';
194 return (x1==x2?l4.value: l5.value);
200 var l22 = {name: "*"};
202 (l22).fvalue = (function(v14){
203 ((v14)["fname"] = "*");
205 })((function (values,v12,v13){
206 checkArgs(arguments, 3);
210 if (typeof x1 !== 'number') throw 'Not a number!';
212 if (typeof x2 !== 'number') throw 'Not a number!';
219 var l23 = {name: "/"};
221 (l23).fvalue = (function(v17){
222 ((v17)["fname"] = "/");
224 })((function (values,v15,v16){
225 checkArgs(arguments, 3);
229 if (typeof x1 !== 'number') throw 'Not a number!';
231 if (typeof x2 !== 'number') throw 'Not a number!';
238 var l24 = {name: "1+"};
240 (l24).fvalue = (function(v19){
241 ((v19)["fname"] = "1+");
243 })((function (values,v18){
244 checkArgs(arguments, 2);
248 if (typeof x1 !== 'number') throw 'Not a number!';
255 var l25 = {name: "1-"};
257 (l25).fvalue = (function(v21){
258 ((v21)["fname"] = "1-");
260 })((function (values,v20){
261 checkArgs(arguments, 2);
265 if (typeof x1 !== 'number') throw 'Not a number!';
272 var l26 = {name: "ZEROP"};
274 (l26).fvalue = (function(v23){
275 ((v23)["fname"] = "ZEROP");
277 })((function (values,v22){
278 checkArgs(arguments, 2);
282 if (typeof x1 !== 'number') throw 'Not a number!';
283 return (x1==0?l4.value: l5.value);
289 var l27 = {name: "TRUNCATE"};
291 (l27).fvalue = (function(v26){
292 ((v26)["fname"] = "TRUNCATE");
294 })((function (values,v24,v25){
295 checkArgs(arguments, 3);
300 if (typeof x1 !== 'number') throw 'Not a number!';
302 if (typeof x2 !== 'number') throw 'Not a number!';
305 if (typeof x != 'number')
306 throw 'The value ' + x + ' is not a type number.';
307 return Math.floor(x);
313 var l28 = {name: "EQL"};
315 (l28).fvalue = (function(v29){
316 ((v29)["fname"] = "EQL");
318 })((function (values,v27,v28){
319 checkArgs(arguments, 3);
321 return ((v27 === v28)?l4.value: l5.value);
326 var l29 = {name: "NOT"};
328 (l29).fvalue = (function(v31){
329 ((v31)["fname"] = "NOT");
331 })((function (values,v30){
332 checkArgs(arguments, 2);
334 return (v30 !== l5.value ? l5.value : l4.value);
339 var l30 = {name: "CONS"};
341 (l30).fvalue = (function(v34){
342 ((v34)["fname"] = "CONS");
344 })((function (values,v32,v33){
345 checkArgs(arguments, 3);
347 return ({car: v32, cdr: v33});
352 var l31 = {name: "CONSP"};
354 (l31).fvalue = (function(v36){
355 ((v36)["fname"] = "CONSP");
357 })((function (values,v35){
358 checkArgs(arguments, 2);
362 return (typeof tmp == 'object' && 'car' in tmp);
363 })()?l4.value: l5.value);
368 var l32 = {name: "CAR"};
370 (l32).fvalue = (function(v38){
371 ((v38)["fname"] = "CAR");
374 var func = (function (values,v37){
375 checkArgs(arguments, 2);
379 return tmp === l5.value? l5.value: tmp.car;
383 func.docstring = 'Return the CAR part of a cons, or NIL if X is null.';
388 var l33 = {name: "CDR"};
390 (l33).fvalue = (function(v40){
391 ((v40)["fname"] = "CDR");
393 })((function (values,v39){
394 checkArgs(arguments, 2);
398 return tmp === l5.value? l5.value: tmp.cdr;
404 var l34 = {name: "CAAR"};
406 (l34).fvalue = (function(v42){
407 ((v42)["fname"] = "CAAR");
409 })((function (values,v41){
410 checkArgs(arguments, 2);
413 var tmp = (function(){
415 return tmp === l5.value? l5.value: tmp.car;
417 return tmp === l5.value? l5.value: tmp.car;
423 var l35 = {name: "CADR"};
425 (l35).fvalue = (function(v44){
426 ((v44)["fname"] = "CADR");
428 })((function (values,v43){
429 checkArgs(arguments, 2);
432 var tmp = (function(){
434 return tmp === l5.value? l5.value: tmp.cdr;
436 return tmp === l5.value? l5.value: tmp.car;
442 var l36 = {name: "CDAR"};
444 (l36).fvalue = (function(v46){
445 ((v46)["fname"] = "CDAR");
447 })((function (values,v45){
448 checkArgs(arguments, 2);
451 var tmp = (function(){
453 return tmp === l5.value? l5.value: tmp.car;
455 return tmp === l5.value? l5.value: tmp.cdr;
461 var l37 = {name: "CDDR"};
463 (l37).fvalue = (function(v48){
464 ((v48)["fname"] = "CDDR");
466 })((function (values,v47){
467 checkArgs(arguments, 2);
470 var tmp = (function(){
472 return tmp === l5.value? l5.value: tmp.cdr;
474 return tmp === l5.value? l5.value: tmp.cdr;
480 var l38 = {name: "CADAR"};
482 (l38).fvalue = (function(v50){
483 ((v50)["fname"] = "CADAR");
485 })((function (values,v49){
486 checkArgs(arguments, 2);
489 var tmp = (function(){
490 var tmp = (function(){
492 return tmp === l5.value? l5.value: tmp.car;
494 return tmp === l5.value? l5.value: tmp.cdr;
496 return tmp === l5.value? l5.value: tmp.car;
502 var l39 = {name: "CADDR"};
504 (l39).fvalue = (function(v52){
505 ((v52)["fname"] = "CADDR");
507 })((function (values,v51){
508 checkArgs(arguments, 2);
511 var tmp = (function(){
512 var tmp = (function(){
514 return tmp === l5.value? l5.value: tmp.cdr;
516 return tmp === l5.value? l5.value: tmp.cdr;
518 return tmp === l5.value? l5.value: tmp.car;
524 var l40 = {name: "CDDDR"};
526 (l40).fvalue = (function(v54){
527 ((v54)["fname"] = "CDDDR");
529 })((function (values,v53){
530 checkArgs(arguments, 2);
533 var tmp = (function(){
534 var tmp = (function(){
536 return tmp === l5.value? l5.value: tmp.cdr;
538 return tmp === l5.value? l5.value: tmp.cdr;
540 return tmp === l5.value? l5.value: tmp.cdr;
546 var l41 = {name: "CADDDR"};
548 (l41).fvalue = (function(v56){
549 ((v56)["fname"] = "CADDDR");
551 })((function (values,v55){
552 checkArgs(arguments, 2);
555 var tmp = (function(){
556 var tmp = (function(){
557 var tmp = (function(){
559 return tmp === l5.value? l5.value: tmp.cdr;
561 return tmp === l5.value? l5.value: tmp.cdr;
563 return tmp === l5.value? l5.value: tmp.cdr;
565 return tmp === l5.value? l5.value: tmp.car;
571 var l42 = {name: "FIRST"};
573 (l42).fvalue = (function(v58){
574 ((v58)["fname"] = "FIRST");
576 })((function (values,v57){
577 checkArgs(arguments, 2);
581 return tmp === l5.value? l5.value: tmp.car;
587 var l43 = {name: "SECOND"};
589 (l43).fvalue = (function(v60){
590 ((v60)["fname"] = "SECOND");
592 })((function (values,v59){
593 checkArgs(arguments, 2);
595 return l35.fvalue(values, v59);
600 var l44 = {name: "THIRD"};
602 (l44).fvalue = (function(v62){
603 ((v62)["fname"] = "THIRD");
605 })((function (values,v61){
606 checkArgs(arguments, 2);
608 return l39.fvalue(values, v61);
613 var l45 = {name: "FOURTH"};
615 (l45).fvalue = (function(v64){
616 ((v64)["fname"] = "FOURTH");
618 })((function (values,v63){
619 checkArgs(arguments, 2);
621 return l41.fvalue(values, v63);
626 var l46 = {name: "REST"};
628 (l46).fvalue = (function(v66){
629 ((v66)["fname"] = "REST");
631 })((function (values,v65){
632 checkArgs(arguments, 2);
636 return tmp === l5.value? l5.value: tmp.cdr;
642 var l47 = {name: "LIST"};
644 (l47).fvalue = (function(v68){
645 ((v68)["fname"] = "LIST");
647 })((function (values){
649 for (var i = arguments.length-1; i>=1; i--)
650 v67 = {car: arguments[i], cdr:
658 var l48 = {name: "ATOM"};
660 (l48).fvalue = (function(v70){
661 ((v70)["fname"] = "ATOM");
663 })((function (values,v69){
664 checkArgs(arguments, 2);
666 return l29.fvalue(values, ((function(){
668 return (typeof tmp == 'object' && 'car' in tmp);
669 })()?l4.value: l5.value));
674 var l49 = {name: "INCF"};
676 var l50 = {name: "DECF"};
678 var l51 = {name: "PUSH"};
680 var l52 = {name: "DOLIST"};
682 var l53 = {name: "DOTIMES"};
684 var l54 = {name: "COND"};
686 var l55 = {name: "CASE"};
688 var l56 = {name: "ECASE"};
690 var l57 = {name: "AND"};
692 var l58 = {name: "OR"};
694 var l59 = {name: "PROG1"};
696 var l60 = {name: "PROG2"};
698 var l61 = {name: "ENSURE-LIST"};
699 var l62 = {name: "LISTP"};
701 (l61).fvalue = (function(v72){
702 ((v72)["fname"] = "ENSURE-LIST");
704 })((function (values,v71){
705 checkArgs(arguments, 2);
707 return (l62.fvalue(pv, v71) !== l5.value ? v71 : l47.fvalue(values, v71));
712 var l63 = {name: "!REDUCE"};
713 var l64 = {name: "INITIAL-VALUE", 'package': 'KEYWORD'};
715 (l63).fvalue = (function(v76){
716 ((v76)["fname"] = "!REDUCE");
718 })((function (values,v73,v74){
719 checkArgsAtLeast(arguments, 3);
722 for (i=3; i<arguments.length; i+=2){
723 if (arguments[i] === l64.value){
724 v75 = arguments[i+1];
728 if (i == arguments.length){
731 for (i=3; i<arguments.length; i+=2){
732 if (arguments[i] !== l64.value)
733 throw 'Unknown keyword argument ' + arguments[i].name;
736 return (l13.fvalue(pv, v74) !== l5.value ? v75 : l63.fvalue(values, v73, (function(){
738 return tmp === l5.value? l5.value: tmp.cdr;
739 })(), l64.value, (function(){
741 return (typeof f === 'function'? f: f.fvalue)(pv, v75, (function(){
743 return tmp === l5.value? l5.value: tmp.car;
750 var l65 = {name: "+"};
752 (l65).fvalue = (function(v81){
753 ((v81)["fname"] = "+");
755 })((function (values){
757 for (var i = arguments.length-1; i>=1; i--)
758 v77 = {car: arguments[i], cdr:
761 return (function(v78){
763 return (function(v79,v80){
765 while(v79 !== l5.value){
768 return tmp === l5.value? l5.value: tmp.car;
773 if (typeof x1 !== 'number') throw 'Not a number!';
775 if (typeof x2 !== 'number') throw 'Not a number!';
782 return tmp === l5.value? l5.value: tmp.cdr;
794 var l66 = {name: "-"};
796 (l66).fvalue = (function(v87){
797 ((v87)["fname"] = "-");
799 })((function (values,v83){
800 checkArgsAtLeast(arguments, 2);
802 for (var i = arguments.length-1; i>=2; i--)
803 v82 = {car: arguments[i], cdr:
806 return (l13.fvalue(pv, v82) !== l5.value ? (function(){
808 if (typeof x1 !== 'number') throw 'Not a number!';
810 })() : (function(v84){
812 return (function(v85,v86){
814 while(v85 !== l5.value){
817 return tmp === l5.value? l5.value: tmp.car;
822 if (typeof x1 !== 'number') throw 'Not a number!';
824 if (typeof x2 !== 'number') throw 'Not a number!';
831 return tmp === l5.value? l5.value: tmp.cdr;
843 var l67 = {name: "APPEND-TWO"};
844 var l68 = {name: "APPEND"};
846 (l67).fvalue = (function(v90){
847 ((v90)["fname"] = "APPEND-TWO");
849 })((function (values,v88,v89){
850 checkArgs(arguments, 3);
852 return (l13.fvalue(pv, v88) !== l5.value ? v89 : ({car: (function(){
854 return tmp === l5.value? l5.value: tmp.car;
855 })(), cdr: l68.fvalue(pv, (function(){
857 return tmp === l5.value? l5.value: tmp.cdr;
864 (l68).fvalue = (function(v92){
865 ((v92)["fname"] = "APPEND");
867 })((function (values){
869 for (var i = arguments.length-1; i>=1; i--)
870 v91 = {car: arguments[i], cdr:
873 return l63.fvalue(values, (function(){
875 var func = symbol.fvalue;
876 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
883 var l69 = {name: "REVAPPEND"};
885 (l69).fvalue = (function(v95){
886 ((v95)["fname"] = "REVAPPEND");
888 })((function (values,v93,v94){
889 checkArgs(arguments, 3);
893 while(v93 !== l5.value){
894 (v94 = ({car: (function(){
896 return tmp === l5.value? l5.value: tmp.car;
900 return tmp === l5.value? l5.value: tmp.cdr;
910 var l70 = {name: "REVERSE"};
912 (l70).fvalue = (function(v97){
913 ((v97)["fname"] = "REVERSE");
915 })((function (values,v96){
916 checkArgs(arguments, 2);
918 return l69.fvalue(values, v96, l5);
923 var l71 = {name: "PSETQ"};
925 var l72 = {name: "DO"};
927 var l73 = {name: "DO*"};
929 var l74 = {name: "LIST-LENGTH"};
931 (l74).fvalue = (function(v100){
932 ((v100)["fname"] = "LIST-LENGTH");
934 })((function (values,v98){
935 checkArgs(arguments, 2);
937 return (function(v99){
940 while(l29.fvalue(pv, l13.fvalue(pv, v98)) !== l5.value){
943 if (typeof x1 !== 'number') throw 'Not a number!';
948 return tmp === l5.value? l5.value: tmp.cdr;
959 var l75 = {name: "LENGTH"};
961 (l75).fvalue = (function(v102){
962 ((v102)["fname"] = "LENGTH");
964 })((function (values,v101){
965 checkArgs(arguments, 2);
967 return (((typeof(v101) == "string")?l4.value: l5.value) !== l5.value ? (function(){
969 if (typeof x != 'string')
970 throw 'The value ' + x + ' is not a type string.';
972 })() : (((function(){
974 return typeof x === 'object' && 'length' in x;
975 })()?l4.value: l5.value) !== l5.value ? (function(){
976 var tmp = (v101)["length"];
977 return tmp == undefined? l5.value: tmp ;
978 })() : (l62.fvalue(pv, v101) !== l5.value ? l74.fvalue(values, v101) : l5.value)));
983 var l76 = {name: "CONCAT-TWO"};
985 (l76).fvalue = (function(v105){
986 ((v105)["fname"] = "CONCAT-TWO");
988 })((function (values,v103,v104){
989 checkArgs(arguments, 3);
994 if (typeof string1 != 'string')
995 throw 'The value ' + string1 + ' is not a type string.';
996 if (typeof string2 != 'string')
997 throw 'The value ' + string2 + ' is not a type string.';
998 return string1.concat(string2);
1004 var l77 = {name: "WITH-COLLECT"};
1006 var l78 = {name: "MAP1"};
1007 var l79 = {name: "SENTINEL"};
1009 (l78).fvalue = (function(v112){
1010 ((v112)["fname"] = "MAP1");
1012 })((function (values,v106,v107){
1013 checkArgs(arguments, 3);
1016 var v108 = ({car: l79, cdr: l5.value});
1021 while(v107 !== l5.value){
1022 v111(pv, (function(){
1024 return (typeof f === 'function'? f: f.fvalue)(pv, (function(){
1026 return tmp === l5.value? l5.value: tmp.car;
1029 (v107 = (function(){
1031 return tmp === l5.value? l5.value: tmp.cdr;
1036 })((function (values,v110){
1037 checkArgs(arguments, 2);
1040 if (typeof x != 'object')
1041 throw 'The value ' + x + ' is not a type object.';
1042 return (x.cdr = ({car: v110, cdr: l5.value}), x);
1044 (v109 = (function(){
1046 return tmp === l5.value? l5.value: tmp.cdr;
1052 return tmp === l5.value? l5.value: tmp.cdr;
1059 var l80 = {name: "LOOP"};
1061 var l81 = {name: "MAPCAR"};
1063 (l81).fvalue = (function(v124){
1064 ((v124)["fname"] = "MAPCAR");
1066 })((function (values,v114,v115){
1067 checkArgsAtLeast(arguments, 3);
1069 for (var i = arguments.length-1; i>=3; i--)
1070 v113 = {car: arguments[i], cdr:
1073 return (function(v116){
1075 var v117 = ({car: l79, cdr: l5.value});
1082 while(l4.value !== l5.value){
1085 return (function(v122){
1089 while(l4.value !== l5.value){
1090 (l13.fvalue(pv, v122) !== l5.value ? (function(){
1091 throw ({type: 'block', id: 54, values: l5.value, message: 'Return from unknown block NIL.'})
1094 (l13.fvalue(pv, (function(){
1096 return tmp === l5.value? l5.value: tmp.car;
1097 })()) !== l5.value ? (function(){
1098 throw ({type: 'block', id: 51, values: l5.value, message: 'Return from unknown block LOOP.'})
1102 if (typeof x != 'object')
1103 throw 'The value ' + x + ' is not a type object.';
1104 return (x.car = l36.fvalue(pv, v122), x);
1109 return (v122 = v123);
1112 return tmp === l5.value? l5.value: tmp.cdr;
1118 if (cf.type == 'block' && cf.id == 54)
1126 return v120(pv, (function(){
1130 while (tail != l5.value){
1131 args.push(tail.car);
1134 return (typeof f === 'function'? f : f.fvalue).apply(this, args);
1136 })(l78.fvalue(pv, (function(){
1138 var func = symbol.fvalue;
1139 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1147 if (cf.type == 'block' && cf.id == 51)
1153 })((function (values,v119){
1154 checkArgs(arguments, 2);
1157 if (typeof x != 'object')
1158 throw 'The value ' + x + ' is not a type object.';
1159 return (x.cdr = ({car: v119, cdr: l5.value}), x);
1161 (v118 = (function(){
1163 return tmp === l5.value? l5.value: tmp.cdr;
1169 return tmp === l5.value? l5.value: tmp.cdr;
1172 })(({car: v115, cdr: v113}));
1177 var l82 = {name: "IDENTITY"};
1179 (l82).fvalue = (function(v126){
1180 ((v126)["fname"] = "IDENTITY");
1182 })((function (values,v125){
1183 checkArgs(arguments, 2);
1190 var l83 = {name: "CONSTANTLY"};
1192 (l83).fvalue = (function(v129){
1193 ((v129)["fname"] = "CONSTANTLY");
1195 })((function (values,v127){
1196 checkArgs(arguments, 2);
1198 return (function (values){
1200 for (var i = arguments.length-1; i>=1; i--)
1201 v128 = {car: arguments[i], cdr:
1209 var l84 = {name: "COPY-LIST"};
1211 (l84).fvalue = (function(v131){
1212 ((v131)["fname"] = "COPY-LIST");
1214 })((function (values,v130){
1215 checkArgs(arguments, 2);
1217 return l81.fvalue(values, (function(){
1219 var func = symbol.fvalue;
1220 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1227 var l85 = {name: "LIST*"};
1229 (l85).fvalue = (function(v136){
1230 ((v136)["fname"] = "LIST*");
1232 })((function (values,v133){
1233 checkArgsAtLeast(arguments, 2);
1235 for (var i = arguments.length-1; i>=2; i--)
1236 v132 = {car: arguments[i], cdr:
1239 return (l13.fvalue(pv, v132) !== l5.value ? v133 : (l13.fvalue(pv, (function(){
1241 return tmp === l5.value? l5.value: tmp.cdr;
1242 })()) !== l5.value ? ({car: v133, cdr: (function(){
1244 return tmp === l5.value? l5.value: tmp.car;
1245 })()}) : (function(){
1247 return (function(v134){
1251 while(l4.value !== l5.value){
1252 (l13.fvalue(pv, l37.fvalue(pv, v134)) !== l5.value ? (function(){
1253 throw ({type: 'block', id: 60, values: (function(){
1255 if (typeof x != 'object')
1256 throw 'The value ' + x + ' is not a type object.';
1257 return (x.cdr = l35.fvalue(pv, v134), x);
1258 })(), message: 'Return from unknown block NIL.'})
1262 return (v134 = v135);
1265 return tmp === l5.value? l5.value: tmp.cdr;
1271 if (cf.type == 'block' && cf.id == 60)
1279 return ({car: v133, cdr: v132});
1285 var l86 = {name: "CODE-CHAR"};
1287 (l86).fvalue = (function(v138){
1288 ((v138)["fname"] = "CODE-CHAR");
1290 })((function (values,v137){
1291 checkArgs(arguments, 2);
1298 var l87 = {name: "CHAR-CODE"};
1300 (l87).fvalue = (function(v140){
1301 ((v140)["fname"] = "CHAR-CODE");
1303 })((function (values,v139){
1304 checkArgs(arguments, 2);
1311 var l88 = {name: "CHAR="};
1313 (l88).fvalue = (function(v143){
1314 ((v143)["fname"] = "CHAR=");
1316 })((function (values,v141,v142){
1317 checkArgs(arguments, 3);
1321 if (typeof x1 !== 'number') throw 'Not a number!';
1323 if (typeof x2 !== 'number') throw 'Not a number!';
1324 return (x1==x2?l4.value: l5.value);
1330 var l89 = {name: "INTEGERP"};
1332 (l89).fvalue = (function(v145){
1333 ((v145)["fname"] = "INTEGERP");
1335 })((function (values,v144){
1336 checkArgs(arguments, 2);
1338 return (((typeof (v144) == "number")?l4.value: l5.value) !== l5.value ? (function(){
1339 var x1 = (function(){
1341 if (typeof x != 'number')
1342 throw 'The value ' + x + ' is not a type number.';
1343 return Math.floor(x);
1345 if (typeof x1 !== 'number') throw 'Not a number!';
1347 if (typeof x2 !== 'number') throw 'Not a number!';
1348 return (x1==x2?l4.value: l5.value);
1354 var l90 = {name: "PLUSP"};
1356 (l90).fvalue = (function(v147){
1357 ((v147)["fname"] = "PLUSP");
1359 })((function (values,v146){
1360 checkArgs(arguments, 2);
1364 if (typeof x1 !== 'number') throw 'Not a number!';
1365 return (0<x1?l4.value: l5.value);
1371 var l91 = {name: "MINUSP"};
1373 (l91).fvalue = (function(v149){
1374 ((v149)["fname"] = "MINUSP");
1376 })((function (values,v148){
1377 checkArgs(arguments, 2);
1381 if (typeof x1 !== 'number') throw 'Not a number!';
1382 return (x1<0?l4.value: l5.value);
1389 (l62).fvalue = (function(v152){
1390 ((v152)["fname"] = "LISTP");
1392 })((function (values,v150){
1393 checkArgs(arguments, 2);
1395 return (function(v151){
1396 return (v151 !== l5.value ? v151 : l13.fvalue(values, v150));
1399 return (typeof tmp == 'object' && 'car' in tmp);
1400 })()?l4.value: l5.value));
1405 var l92 = {name: "NTHCDR"};
1407 (l92).fvalue = (function(v155){
1408 ((v155)["fname"] = "NTHCDR");
1410 })((function (values,v153,v154){
1411 checkArgs(arguments, 3);
1415 while((l90.fvalue(pv, v153) !== l5.value ? v154 : l5.value) !== l5.value){
1416 (v153 = l25.fvalue(pv, v153));
1417 (v154 = (function(){
1419 return tmp === l5.value? l5.value: tmp.cdr;
1429 var l93 = {name: "NTH"};
1431 (l93).fvalue = (function(v158){
1432 ((v158)["fname"] = "NTH");
1434 })((function (values,v156,v157){
1435 checkArgs(arguments, 3);
1438 var tmp = l92.fvalue(pv, v156, v157);
1439 return tmp === l5.value? l5.value: tmp.car;
1445 var l94 = {name: "LAST"};
1447 (l94).fvalue = (function(v160){
1448 ((v160)["fname"] = "LAST");
1450 })((function (values,v159){
1451 checkArgs(arguments, 2);
1456 var tmp = (function(){
1458 return tmp === l5.value? l5.value: tmp.cdr;
1460 return (typeof tmp == 'object' && 'car' in tmp);
1461 })()?l4.value: l5.value) !== l5.value){
1462 (v159 = (function(){
1464 return tmp === l5.value? l5.value: tmp.cdr;
1474 var l95 = {name: "BUTLAST"};
1476 (l95).fvalue = (function(v162){
1477 ((v162)["fname"] = "BUTLAST");
1479 })((function (values,v161){
1480 checkArgs(arguments, 2);
1482 return (((function(){
1483 var tmp = (function(){
1485 return tmp === l5.value? l5.value: tmp.cdr;
1487 return (typeof tmp == 'object' && 'car' in tmp);
1488 })()?l4.value: l5.value) !== l5.value ? ({car: (function(){
1490 return tmp === l5.value? l5.value: tmp.car;
1491 })(), cdr: l95.fvalue(pv, (function(){
1493 return tmp === l5.value? l5.value: tmp.cdr;
1494 })())}) : l5.value);
1499 var l96 = {name: "MEMBER"};
1501 (l96).fvalue = (function(v165){
1502 ((v165)["fname"] = "MEMBER");
1504 })((function (values,v163,v164){
1505 checkArgs(arguments, 3);
1510 while(v164 !== l5.value){
1511 (l28.fvalue(pv, v163, (function(){
1513 return tmp === l5.value? l5.value: tmp.car;
1514 })()) !== l5.value ? (function(){
1516 throw ({type: 'block', id: 75, values: v164, message: 'Return from unknown block NIL.'})
1518 (v164 = (function(){
1520 return tmp === l5.value? l5.value: tmp.cdr;
1526 if (cf.type == 'block' && cf.id == 75)
1527 return values.apply(this, forcemv(cf.values));
1536 var l97 = {name: "REMOVE"};
1538 (l97).fvalue = (function(v168){
1539 ((v168)["fname"] = "REMOVE");
1541 })((function (values,v166,v167){
1542 checkArgs(arguments, 3);
1544 return (l13.fvalue(pv, v167) !== l5.value ? l5.value : (l28.fvalue(pv, v166, (function(){
1546 return tmp === l5.value? l5.value: tmp.car;
1547 })()) !== l5.value ? l97.fvalue(values, v166, (function(){
1549 return tmp === l5.value? l5.value: tmp.cdr;
1550 })()) : ({car: (function(){
1552 return tmp === l5.value? l5.value: tmp.car;
1553 })(), cdr: l97.fvalue(pv, v166, (function(){
1555 return tmp === l5.value? l5.value: tmp.cdr;
1561 var l98 = {name: "REMOVE-IF"};
1563 (l98).fvalue = (function(v171){
1564 ((v171)["fname"] = "REMOVE-IF");
1566 })((function (values,v169,v170){
1567 checkArgs(arguments, 3);
1569 return (l13.fvalue(pv, v170) !== l5.value ? l5.value : ((function(){
1571 return (typeof f === 'function'? f: f.fvalue)(pv, (function(){
1573 return tmp === l5.value? l5.value: tmp.car;
1575 })() !== l5.value ? l98.fvalue(values, v169, (function(){
1577 return tmp === l5.value? l5.value: tmp.cdr;
1578 })()) : ({car: (function(){
1580 return tmp === l5.value? l5.value: tmp.car;
1581 })(), cdr: l98.fvalue(pv, v169, (function(){
1583 return tmp === l5.value? l5.value: tmp.cdr;
1589 var l99 = {name: "REMOVE-IF-NOT"};
1591 (l99).fvalue = (function(v174){
1592 ((v174)["fname"] = "REMOVE-IF-NOT");
1594 })((function (values,v172,v173){
1595 checkArgs(arguments, 3);
1597 return (l13.fvalue(pv, v173) !== l5.value ? l5.value : ((function(){
1599 return (typeof f === 'function'? f: f.fvalue)(pv, (function(){
1601 return tmp === l5.value? l5.value: tmp.car;
1603 })() !== l5.value ? ({car: (function(){
1605 return tmp === l5.value? l5.value: tmp.car;
1606 })(), cdr: l99.fvalue(pv, v172, (function(){
1608 return tmp === l5.value? l5.value: tmp.cdr;
1609 })())}) : l99.fvalue(values, v172, (function(){
1611 return tmp === l5.value? l5.value: tmp.cdr;
1617 var l100 = {name: "DIGIT-CHAR-P"};
1619 (l100).fvalue = (function(v176){
1620 ((v176)["fname"] = "DIGIT-CHAR-P");
1622 })((function (values,v175){
1623 checkArgs(arguments, 2);
1625 return (((function(){
1627 if (typeof x1 !== 'number') throw 'Not a number!';
1628 return (48<=x1?l4.value: l5.value);
1629 })() !== l5.value ? (function(){
1631 if (typeof x1 !== 'number') throw 'Not a number!';
1632 return (x1<=57?l4.value: l5.value);
1633 })() : l5.value) !== l5.value ? (function(){
1635 if (typeof x1 !== 'number') throw 'Not a number!';
1642 var l101 = {name: "DIGIT-CHAR"};
1644 (l101).fvalue = (function(v178){
1645 ((v178)["fname"] = "DIGIT-CHAR");
1647 })((function (values,v177){
1648 checkArgs(arguments, 2);
1650 return ((function(){
1652 if (typeof x1 !== 'number') throw 'Not a number!';
1653 return (0<=x1 && x1<=9?l4.value: l5.value);
1654 })() !== l5.value ? (function(){
1655 var string = "0123456789";
1657 if (typeof string != 'string')
1658 throw 'The value ' + string + ' is not a type string.';
1659 if (typeof index != 'number')
1660 throw 'The value ' + index + ' is not a type number.';
1661 return string.charCodeAt(index);
1667 var l102 = {name: "SUBSEQ"};
1669 (l102).fvalue = (function(v182){
1670 ((v182)["fname"] = "SUBSEQ");
1672 })((function (values,v179,v180,v181){
1673 checkArgsAtLeast(arguments, 3);
1674 checkArgsAtMost(arguments, 4);
1676 switch(arguments.length-1){
1682 return (((typeof(v179) == "string")?l4.value: l5.value) !== l5.value ? (v181 !== l5.value ? (function(){
1687 return str.slice(a,b);
1692 return str.slice(a,b);
1693 })()) : (function(){
1694 throw "Unsupported argument.";
1700 var l103 = {name: "DO-SEQUENCE"};
1702 var l104 = {name: "SOME"};
1704 (l104).fvalue = (function(v192){
1705 ((v192)["fname"] = "SOME");
1707 })((function (values,v183,v184){
1708 checkArgs(arguments, 3);
1711 return (function(v185){
1712 return (((typeof(v185) == "string")?l4.value: l5.value) !== l5.value ? (function(v186){
1714 return (function(v187,v188){
1718 if (typeof x1 !== 'number') throw 'Not a number!';
1720 if (typeof x2 !== 'number') throw 'Not a number!';
1721 return (x1<x2?l4.value: l5.value);
1725 return ((function(){
1727 return (typeof f === 'function'? f: f.fvalue)(pv, v189)
1728 })() !== l5.value ? (function(){
1730 throw ({type: 'block', id: 82, values: l4.value, message: 'Return from unknown block SOME.'})
1735 if (typeof string != 'string')
1736 throw 'The value ' + string + ' is not a type string.';
1737 if (typeof index != 'number')
1738 throw 'The value ' + index + ' is not a type number.';
1739 return string.charCodeAt(index);
1743 (v187 = (function(){
1745 if (typeof x1 !== 'number') throw 'Not a number!';
1751 })(0,l75.fvalue(pv, v185));
1753 })(0) : (l62.fvalue(pv, v185) !== l5.value ? (function(){
1754 return (function(v190,v191){
1756 while(v190 !== l5.value){
1757 (v191 = (function(){
1759 return tmp === l5.value? l5.value: tmp.car;
1764 return (typeof f === 'function'? f: f.fvalue)(pv, v191)
1765 })() !== l5.value ? (function(){
1767 throw ({type: 'block', id: 82, values: l4.value, message: 'Return from unknown block SOME.'})
1771 (v190 = (function(){
1773 return tmp === l5.value? l5.value: tmp.cdr;
1780 throw "type-error!";
1785 if (cf.type == 'block' && cf.id == 82)
1786 return values.apply(this, forcemv(cf.values));
1794 var l105 = {name: "EVERY"};
1796 (l105).fvalue = (function(v202){
1797 ((v202)["fname"] = "EVERY");
1799 })((function (values,v193,v194){
1800 checkArgs(arguments, 3);
1804 return (((typeof(v195) == "string")?l4.value: l5.value) !== l5.value ? (function(v196){
1806 return (function(v197,v198){
1810 if (typeof x1 !== 'number') throw 'Not a number!';
1812 if (typeof x2 !== 'number') throw 'Not a number!';
1813 return (x1<x2?l4.value: l5.value);
1817 return ((function(){
1819 return (typeof f === 'function'? f: f.fvalue)(pv, v199)
1820 })() !== l5.value ? l5.value : (function(){
1822 throw ({type: 'block', id: 85, values: l5.value, message: 'Return from unknown block EVERY.'})
1827 if (typeof string != 'string')
1828 throw 'The value ' + string + ' is not a type string.';
1829 if (typeof index != 'number')
1830 throw 'The value ' + index + ' is not a type number.';
1831 return string.charCodeAt(index);
1835 (v197 = (function(){
1837 if (typeof x1 !== 'number') throw 'Not a number!';
1843 })(0,l75.fvalue(pv, v195));
1845 })(0) : (l62.fvalue(pv, v195) !== l5.value ? (function(){
1846 return (function(v200,v201){
1848 while(v200 !== l5.value){
1849 (v201 = (function(){
1851 return tmp === l5.value? l5.value: tmp.car;
1856 return (typeof f === 'function'? f: f.fvalue)(pv, v201)
1857 })() !== l5.value ? l5.value : (function(){
1859 throw ({type: 'block', id: 85, values: l5.value, message: 'Return from unknown block EVERY.'})
1863 (v200 = (function(){
1865 return tmp === l5.value? l5.value: tmp.cdr;
1872 throw "type-error!";
1878 if (cf.type == 'block' && cf.id == 85)
1879 return values.apply(this, forcemv(cf.values));
1887 var l106 = {name: "ASSOC"};
1889 (l106).fvalue = (function(v205){
1890 ((v205)["fname"] = "ASSOC");
1892 })((function (values,v203,v204){
1893 checkArgs(arguments, 3);
1898 while(v204 !== l5.value){
1899 (l28.fvalue(pv, v203, l34.fvalue(pv, v204)) !== l5.value ? (function(){
1900 throw ({type: 'block', id: 89, values: l5.value, message: 'Return from unknown block NIL.'})
1901 })() : (v204 = (function(){
1903 return tmp === l5.value? l5.value: tmp.cdr;
1909 if (cf.type == 'block' && cf.id == 89)
1917 return tmp === l5.value? l5.value: tmp.car;
1923 var l107 = {name: "STRING"};
1925 (l107).fvalue = (function(v207){
1926 ((v207)["fname"] = "STRING");
1928 })((function (values,v206){
1929 checkArgs(arguments, 2);
1931 return (((typeof(v206) == "string")?l4.value: l5.value) !== l5.value ? v206 : (((function(){
1933 return (typeof tmp == 'object' && 'name' in tmp);
1934 })()?l4.value: l5.value) !== l5.value ? (v206).name : (function(){
1936 if (typeof x != 'number')
1937 throw 'The value ' + x + ' is not a type number.';
1938 return String.fromCharCode(x);
1944 var l108 = {name: "STRING="};
1946 (l108).fvalue = (function(v210){
1947 ((v210)["fname"] = "STRING=");
1949 })((function (values,v208,v209){
1950 checkArgs(arguments, 3);
1952 return ((v208 == v209)?l4.value: l5.value);
1957 var l109 = {name: "FDEFINITION"};
1959 (l109).fvalue = (function(v212){
1960 ((v212)["fname"] = "FDEFINITION");
1962 })((function (values,v211){
1963 checkArgs(arguments, 2);
1965 return (((typeof v211 == 'function')?l4.value: l5.value) !== l5.value ? v211 : (((function(){
1967 return (typeof tmp == 'object' && 'name' in tmp);
1968 })()?l4.value: l5.value) !== l5.value ? (function(){
1970 var func = symbol.fvalue;
1971 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1974 throw "Invalid function";
1980 var l110 = {name: "DISASSEMBLE"};
1981 var l111 = {name: "WRITE-LINE"};
1983 (l110).fvalue = (function(v214){
1984 ((v214)["fname"] = "DISASSEMBLE");
1986 })((function (values,v213){
1987 checkArgs(arguments, 2);
1989 l111.fvalue(pv, (l109.fvalue(pv, v213)).toString());
1995 var l112 = {name: "DOCUMENTATION"};
1996 var l113 = {name: "FUNCTION"};
1997 var l114 = {name: "VARIABLE"};
1999 (l112).fvalue = (function(v219){
2000 ((v219)["fname"] = "DOCUMENTATION");
2003 var func = (function (values,v215,v216){
2004 checkArgs(arguments, 3);
2006 return (function(v217){
2007 return (l28.fvalue(pv, v217, l113) !== l5.value ? (function(v218){
2009 var tmp = (v218)["docstring"];
2010 return tmp == undefined? l5.value: tmp ;
2012 })(l109.fvalue(pv, v215)) : (l28.fvalue(pv, v217, l114) !== l5.value ? (function(){
2015 return (typeof tmp == 'object' && 'name' in tmp);
2016 })()?l4.value: l5.value) !== l5.value ? l5.value : (function(){
2017 throw "Wrong argument type! it should be a symbol";
2020 var tmp = (v215)["vardoc"];
2021 return tmp == undefined? l5.value: tmp ;
2024 throw "ECASE expression failed.";
2029 func.docstring = 'Return the documentation of X. TYPE must be the symbol VARIABLE or FUNCTION.';
2034 var l115 = {name: "MULTIPLE-VALUE-BIND"};
2036 var l116 = {name: "MULTIPLE-VALUE-LIST"};
2038 var l117 = {name: "*SETF-EXPANDERS*"};
2040 (((l117.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l117).value = l5.value));
2043 var l118 = {name: "GET-SETF-EXPANSION"};
2044 var l119 = {name: "SETQ"};
2045 var l120 = {name: "LS-MACROEXPAND-1"};
2047 (l118).fvalue = (function(v225){
2048 ((v225)["fname"] = "GET-SETF-EXPANSION");
2050 })((function (values,v220){
2051 checkArgs(arguments, 2);
2053 return (((function(){
2055 return (typeof tmp == 'object' && 'name' in tmp);
2056 })()?l4.value: l5.value) !== l5.value ? (function(v221){
2057 return values(l5.value, l5.value, l47.fvalue(pv, v221), l47.fvalue(pv, l119, v220, v221), v220);
2058 })(l18.fvalue(pv)) : (function(v222){
2060 var v223 = (function(){
2062 return tmp === l5.value? l5.value: tmp.car;
2064 var v224 = (function(){
2065 var tmp = l106.fvalue(pv, v223, (function(){
2067 var value = symbol.value;
2068 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2071 return tmp === l5.value? l5.value: tmp.cdr;
2073 (l13.fvalue(pv, v224) !== l5.value ? (function(){
2074 throw "Unknown generalized reference.";
2078 var args = [values];
2079 var tail = ((function(){
2081 return tmp === l5.value? l5.value: tmp.cdr;
2083 while (tail != l5.value){
2084 args.push(tail.car);
2087 return (typeof f === 'function'? f : f.fvalue).apply(this, args);
2090 })(l120.fvalue(pv, v220)));
2095 var l121 = {name: "DEFINE-SETF-EXPANDER"};
2097 var l122 = {name: "SETF"};
2099 var l123 = {name: "PROGN"};
2100 var l124 = {name: "RPLACA"};
2102 ((l117).value = ({car: ({car: l32, cdr: (function (values,v226){
2103 checkArgs(arguments, 2);
2104 return (function(v227,v228){
2105 return values(l47.fvalue(pv, v227), l47.fvalue(pv, v226), l47.fvalue(pv, v228), l47.fvalue(pv, l123, l47.fvalue(pv, l124, v227, v228), v228), l47.fvalue(pv, l32, v227));
2106 })(l18.fvalue(pv),l18.fvalue(pv));
2107 })}), cdr: (function(){
2109 var value = symbol.value;
2110 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2115 var l125 = {name: "RPLACD"};
2117 ((l117).value = ({car: ({car: l33, cdr: (function (values,v229){
2118 checkArgs(arguments, 2);
2119 return (function(v230,v231){
2120 return values(l47.fvalue(pv, v230), l47.fvalue(pv, v229), l47.fvalue(pv, v231), l47.fvalue(pv, l123, l47.fvalue(pv, l125, v230, v231), v231), l47.fvalue(pv, l32, v230));
2121 })(l18.fvalue(pv),l18.fvalue(pv));
2122 })}), cdr: (function(){
2124 var value = symbol.value;
2125 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2131 var l126 = {name: "TYPECASE"};
2133 var l127 = {name: "NCONC"};
2135 (l127).fvalue = (function(v247){
2136 ((v247)["fname"] = "NCONC");
2138 })((function (values){
2140 for (var i = arguments.length-1; i>=1; i--)
2141 v232 = {car: arguments[i], cdr:
2144 return (function(v234){
2146 return (function(v235){
2150 while(l4.value !== l5.value){
2151 (l13.fvalue(pv, v235) !== l5.value ? (function(){
2153 throw ({type: 'block', id: 98, values: l5.value, message: 'Return from unknown block NIL.'})
2157 return (function(v237){
2158 return (((function(){
2160 return (typeof tmp == 'object' && 'car' in tmp);
2161 })()?l4.value: l5.value) !== l5.value ? (function(){
2165 return (function(v240){
2169 while(l4.value !== l5.value){
2170 (l14.fvalue(pv, v240) !== l5.value ? (function(){
2171 throw ({type: 'block', id: 100, values: l5.value, message: 'Return from unknown block NIL.'})
2175 return (function(v242){
2176 return (((function(){
2178 return (typeof tmp == 'object' && 'car' in tmp);
2179 })()?l4.value: l5.value) !== l5.value ? (function(){
2181 var x = l94.fvalue(pv, v239);
2182 if (typeof x != 'object')
2183 throw 'The value ' + x + ' is not a type object.';
2184 return (x.cdr = v241, x);
2188 var func = (function (values,v244){
2190 switch(arguments.length-1){
2196 for (var i = arguments.length-1; i>=2; i--)
2197 v243 = {car: arguments[i], cdr:
2199 return (v239 = v244);
2206 if (typeof vs === 'object' && 'multiple-value' in vs)
2207 args = args.concat(vs);
2210 return func.apply(window, args);
2214 })() : (l13.fvalue(pv, v242) !== l5.value ? (function(){
2215 var x = l94.fvalue(pv, v239);
2216 if (typeof x != 'object')
2217 throw 'The value ' + x + ' is not a type object.';
2218 return (x.cdr = l5.value, x);
2219 })() : (l48.fvalue(pv, v242) !== l5.value ? ((function(){
2221 return tmp === l5.value? l5.value: tmp.cdr;
2222 })() !== l5.value ? v234(pv, v241) : (function(){
2223 var x = l94.fvalue(pv, v239);
2224 if (typeof x != 'object')
2225 throw 'The value ' + x + ' is not a type object.';
2226 return (x.cdr = v241, x);
2227 })()) : l5.value)));
2231 return tmp === l5.value? l5.value: tmp.car;
2236 return (v240 = v245);
2239 return tmp === l5.value? l5.value: tmp.cdr;
2245 if (cf.type == 'block' && cf.id == 100)
2253 return tmp === l5.value? l5.value: tmp.cdr;
2258 throw ({type: 'block', id: 98, values: v238, message: 'Return from unknown block NIL.'})
2260 })() : (l13.fvalue(pv, v237) !== l5.value ? l5.value : (l48.fvalue(pv, v237) !== l5.value ? ((function(){
2262 return tmp === l5.value? l5.value: tmp.cdr;
2263 })() !== l5.value ? v234(pv, v236) : (function(){
2265 throw ({type: 'block', id: 98, values: v236, message: 'Return from unknown block NIL.'})
2266 })()) : l5.value)));
2270 return tmp === l5.value? l5.value: tmp.car;
2275 return (v235 = v246);
2278 return tmp === l5.value? l5.value: tmp.cdr;
2284 if (cf.type == 'block' && cf.id == 98)
2285 return values.apply(this, forcemv(cf.values));
2292 })((function (values,v233){
2293 checkArgs(arguments, 2);
2295 throw "type-error in nconc";
2302 var l128 = {name: "NRECONC"};
2304 (l128).fvalue = (function(v256){
2305 ((v256)["fname"] = "NRECONC");
2307 })((function (values,v248,v249){
2308 checkArgs(arguments, 3);
2311 return (function(v250,v251,v252){
2315 while(l4.value !== l5.value){
2316 (l48.fvalue(pv, v251) !== l5.value ? (function(){
2318 throw ({type: 'block', id: 103, values: v252, message: 'Return from unknown block NIL.'})
2323 if (typeof x != 'object')
2324 throw 'The value ' + x + ' is not a type object.';
2325 return (x.cdr = v252, x);
2329 (function(v253,v254,v255){
2330 return (v250 = v253, v251 = v254, v252 = v255);
2331 })((l14.fvalue(pv, v250) !== l5.value ? v250 : (function(){
2333 return tmp === l5.value? l5.value: tmp.cdr;
2339 if (cf.type == 'block' && cf.id == 103)
2340 return values.apply(this, forcemv(cf.values));
2347 return tmp === l5.value? l5.value: tmp.cdr;
2354 var l129 = {name: "NOTANY"};
2356 (l129).fvalue = (function(v259){
2357 ((v259)["fname"] = "NOTANY");
2359 })((function (values,v257,v258){
2360 checkArgs(arguments, 3);
2362 return l29.fvalue(values, l104.fvalue(pv, v257, v258));
2367 var l130 = {name: "*PACKAGE-LIST*"};
2369 (((l130.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l130).value = l5.value));
2372 var l131 = {name: "LIST-ALL-PACKAGES"};
2374 (l131).fvalue = (function(v260){
2375 ((v260)["fname"] = "LIST-ALL-PACKAGES");
2377 })((function (values){
2378 checkArgsAtMost(arguments, 1);
2382 var value = symbol.value;
2383 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2390 var l132 = {name: "MAKE-PACKAGE"};
2391 var l133 = {name: "USE", 'package': 'KEYWORD'};
2392 var l134 = {name: "FIND-PACKAGE-OR-FAIL"};
2394 (l132).fvalue = (function(v267){
2395 ((v267)["fname"] = "MAKE-PACKAGE");
2397 })((function (values,v261){
2398 checkArgsAtLeast(arguments, 2);
2401 for (i=2; i<arguments.length; i+=2){
2402 if (arguments[i] === l133.value){
2403 v262 = arguments[i+1];
2407 if (i == arguments.length){
2410 for (i=2; i<arguments.length; i+=2){
2411 if (arguments[i] !== l133.value)
2412 throw 'Unknown keyword argument ' + arguments[i].name;
2415 return (function(v263,v264){
2416 ((v263)["packageName"] = v261);
2417 ((v263)["symbols"] = {});
2418 ((v263)["exports"] = {});
2419 ((v263)["use"] = v264);
2422 var v266 = ({car: v265, cdr: (function(){
2424 var value = symbol.value;
2425 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2428 return ((l130).value = v266);
2431 })({},l81.fvalue(pv, (function(){
2433 var func = symbol.fvalue;
2434 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2441 var l135 = {name: "PACKAGEP"};
2443 (l135).fvalue = (function(v269){
2444 ((v269)["fname"] = "PACKAGEP");
2446 })((function (values,v268){
2447 checkArgs(arguments, 2);
2449 return (((typeof (v268) === 'object')?l4.value: l5.value) !== l5.value ? ((("symbols") in (v268))?l4.value: l5.value) : l5.value);
2454 var l136 = {name: "FIND-PACKAGE"};
2455 var l137 = {name: "PACKAGE-NAME"};
2457 (l136).fvalue = (function(v274){
2458 ((v274)["fname"] = "FIND-PACKAGE");
2460 })((function (values,v270){
2461 checkArgs(arguments, 2);
2464 (l135.fvalue(pv, v270) !== l5.value ? (function(){
2466 throw ({type: 'block', id: 108, values: v270, message: 'Return from unknown block FIND-PACKAGE.'})
2468 return (function(v271){
2471 return (function(v272,v273){
2473 while(v272 !== l5.value){
2474 (v273 = (function(){
2476 return tmp === l5.value? l5.value: tmp.car;
2479 (l108.fvalue(pv, l137.fvalue(pv, v273), v271) !== l5.value ? (function(){
2481 throw ({type: 'block', id: 109, values: v273, message: 'Return from unknown block NIL.'})
2485 (v272 = (function(){
2487 return tmp === l5.value? l5.value: tmp.cdr;
2494 var value = symbol.value;
2495 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2500 if (cf.type == 'block' && cf.id == 109)
2501 return values.apply(this, forcemv(cf.values));
2506 })(l107.fvalue(pv, v270));
2509 if (cf.type == 'block' && cf.id == 108)
2510 return values.apply(this, forcemv(cf.values));
2519 (l134).fvalue = (function(v277){
2520 ((v277)["fname"] = "FIND-PACKAGE-OR-FAIL");
2522 })((function (values,v275){
2523 checkArgs(arguments, 2);
2525 return (function(v276){
2526 return (v276 !== l5.value ? v276 : (function(){
2527 throw "Package unknown.";
2529 })(l136.fvalue(pv, v275));
2535 (l137).fvalue = (function(v280){
2536 ((v280)["fname"] = "PACKAGE-NAME");
2538 })((function (values,v278){
2539 checkArgs(arguments, 2);
2541 return (function(v279){
2543 var tmp = (v279)["packageName"];
2544 return tmp == undefined? l5.value: tmp ;
2546 })(l134.fvalue(pv, v278));
2551 var l138 = {name: "%PACKAGE-SYMBOLS"};
2553 (l138).fvalue = (function(v283){
2554 ((v283)["fname"] = "%PACKAGE-SYMBOLS");
2556 })((function (values,v281){
2557 checkArgs(arguments, 2);
2559 return (function(v282){
2561 var tmp = (v282)["symbols"];
2562 return tmp == undefined? l5.value: tmp ;
2564 })(l134.fvalue(pv, v281));
2569 var l139 = {name: "PACKAGE-USE-LIST"};
2571 (l139).fvalue = (function(v286){
2572 ((v286)["fname"] = "PACKAGE-USE-LIST");
2574 })((function (values,v284){
2575 checkArgs(arguments, 2);
2577 return (function(v285){
2579 var tmp = (v285)["use"];
2580 return tmp == undefined? l5.value: tmp ;
2582 })(l134.fvalue(pv, v284));
2587 var l140 = {name: "%PACKAGE-EXTERNAL-SYMBOLS"};
2589 (l140).fvalue = (function(v289){
2590 ((v289)["fname"] = "%PACKAGE-EXTERNAL-SYMBOLS");
2592 })((function (values,v287){
2593 checkArgs(arguments, 2);
2595 return (function(v288){
2597 var tmp = (v288)["exports"];
2598 return tmp == undefined? l5.value: tmp ;
2600 })(l134.fvalue(pv, v287));
2605 var l141 = {name: "*COMMON-LISP-PACKAGE*"};
2607 (((l141.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l141).value = l132.fvalue(pv, "CL")));
2610 var l142 = {name: "*USER-PACKAGE*"};
2612 (((l142.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l142).value = l132.fvalue(pv, "CL-USER", l133.value, l47.fvalue(pv, (function(){
2614 var value = symbol.value;
2615 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2620 var l143 = {name: "*KEYWORD-PACKAGE*"};
2622 (((l143.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l143).value = l132.fvalue(pv, "KEYWORD")));
2625 var l144 = {name: "KEYWORDP"};
2626 var l145 = {name: "SYMBOL-PACKAGE"};
2628 (l144).fvalue = (function(v291){
2629 ((v291)["fname"] = "KEYWORDP");
2631 })((function (values,v290){
2632 checkArgs(arguments, 2);
2634 return (((function(){
2636 return (typeof tmp == 'object' && 'name' in tmp);
2637 })()?l4.value: l5.value) !== l5.value ? ((l145.fvalue(pv, v290) === (function(){
2639 var value = symbol.value;
2640 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2642 })())?l4.value: l5.value) : l5.value);
2647 var l146 = {name: "*PACKAGE*"};
2649 (((l146.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l146).value = (function(){
2651 var value = symbol.value;
2652 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2657 var l147 = {name: "IN-PACKAGE"};
2659 var l148 = {name: "%INTERN-SYMBOL"};
2661 (l148).fvalue = (function(v295){
2662 ((v295)["fname"] = "%INTERN-SYMBOL");
2664 })((function (values,v292){
2665 checkArgs(arguments, 2);
2668 var v293 = (((("package") in (v292))?l4.value: l5.value) !== l5.value ? l134.fvalue(pv, (function(){
2669 var tmp = (v292)["package"];
2670 return tmp == undefined? l5.value: tmp ;
2671 })()) : (function(){
2673 var value = symbol.value;
2674 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2677 var v294 = l138.fvalue(pv, v293);
2678 ((v292)["package"] = v293);
2679 (((v293 === (function(){
2681 var value = symbol.value;
2682 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2684 })())?l4.value: l5.value) !== l5.value ? ((v292)["value"] = v292) : l5.value);
2685 return ((v294)[(v292).name] = v292);
2691 var l149 = {name: "FIND-SYMBOL"};
2692 var l150 = {name: "EXTERNAL", 'package': 'KEYWORD'};
2693 var l151 = {name: "INTERNAL", 'package': 'KEYWORD'};
2694 var l152 = {name: "INHERIT", 'package': 'KEYWORD'};
2696 (l149).fvalue = (function(v304){
2697 ((v304)["fname"] = "FIND-SYMBOL");
2699 })((function (values,v296,v297){
2700 checkArgsAtLeast(arguments, 2);
2701 checkArgsAtMost(arguments, 3);
2703 switch(arguments.length-1){
2707 var value = symbol.value;
2708 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2715 var v298 = l134.fvalue(pv, v297);
2716 var v299 = l140.fvalue(pv, v298);
2717 var v300 = l138.fvalue(pv, v298);
2718 return ((((v296) in (v299))?l4.value: l5.value) !== l5.value ? values((function(){
2719 var tmp = (v299)[v296];
2720 return tmp == undefined? l5.value: tmp ;
2721 })(), l150.value) : ((((v296) in (v300))?l4.value: l5.value) !== l5.value ? values((function(){
2722 var tmp = (v300)[v296];
2723 return tmp == undefined? l5.value: tmp ;
2724 })(), l151.value) : (function(){
2726 return (function(v301,v302){
2728 while(v301 !== l5.value){
2729 (v302 = (function(){
2731 return tmp === l5.value? l5.value: tmp.car;
2735 return ((((v296) in (v303))?l4.value: l5.value) !== l5.value ? (function(){
2737 throw ({type: 'block', id: 118, values: values((function(){
2738 var tmp = (v303)[v296];
2739 return tmp == undefined? l5.value: tmp ;
2740 })(), l152.value), message: 'Return from unknown block NIL.'})
2742 })(l140.fvalue(pv, v302));
2745 (v301 = (function(){
2747 return tmp === l5.value? l5.value: tmp.cdr;
2751 return values(l5.value, l5.value);
2752 })(l139.fvalue(pv, v298),l5.value);
2755 if (cf.type == 'block' && cf.id == 118)
2756 return values.apply(this, forcemv(cf.values));
2766 var l153 = {name: "INTERN"};
2767 var l154 = {name: "EXPORT"};
2769 (l153).fvalue = (function(v313){
2770 ((v313)["fname"] = "INTERN");
2772 })((function (values,v305,v306){
2773 checkArgsAtLeast(arguments, 2);
2774 checkArgsAtMost(arguments, 3);
2776 switch(arguments.length-1){
2780 var value = symbol.value;
2781 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2787 return (function(v307){
2789 var func = (function (values,v309,v310){
2792 switch(arguments.length-1){
2800 for (var i = arguments.length-1; i>=3; i--)
2801 v308 = {car: arguments[i], cdr:
2803 return (v310 !== l5.value ? values(v309, v310) : (function(v311){
2805 var tmp = (v311)[v305];
2806 return tmp == undefined? l5.value: tmp ;
2808 return (function(v312){
2809 ((v312)["package"] = v307);
2810 (((v307 === (function(){
2812 var value = symbol.value;
2813 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2815 })())?l4.value: l5.value) !== l5.value ? (function(){
2816 ((v312)["value"] = v312);
2817 return l154.fvalue(pv, l47.fvalue(pv, v312), v307);
2819 ((v311)[v305] = v312);
2820 return values(v312, l5.value);
2823 if (typeof name != 'string')
2824 throw 'The value ' + name + ' is not a type string.';
2825 return ({name: name});
2827 })(l138.fvalue(pv, v307)));
2829 var args = [values];
2833 vs = l149.fvalue(values, v305, v307);
2834 if (typeof vs === 'object' && 'multiple-value' in vs)
2835 args = args.concat(vs);
2838 return func.apply(window, args);
2841 })(l134.fvalue(pv, v306));
2847 (l145).fvalue = (function(v315){
2848 ((v315)["fname"] = "SYMBOL-PACKAGE");
2850 })((function (values,v314){
2851 checkArgs(arguments, 2);
2855 return (typeof tmp == 'object' && 'name' in tmp);
2856 })()?l4.value: l5.value) !== l5.value ? l5.value : (function(){
2857 throw "it is not a symbol";
2860 var tmp = (v314)["package"];
2861 return tmp == undefined? l5.value: tmp ;
2868 (l154).fvalue = (function(v321){
2869 ((v321)["fname"] = "EXPORT");
2871 })((function (values,v316,v317){
2872 checkArgsAtLeast(arguments, 2);
2873 checkArgsAtMost(arguments, 3);
2875 switch(arguments.length-1){
2879 var value = symbol.value;
2880 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2886 return (function(v318){
2888 return (function(v319,v320){
2890 while(v319 !== l5.value){
2891 (v320 = (function(){
2893 return tmp === l5.value? l5.value: tmp.car;
2896 ((v318)[(v320).name] = v320);
2899 (v319 = (function(){
2901 return tmp === l5.value? l5.value: tmp.cdr;
2908 })(l140.fvalue(pv, v317));
2913 var l155 = {name: "GET-UNIVERSAL-TIME"};
2915 (l155).fvalue = (function(v322){
2916 ((v322)["fname"] = "GET-UNIVERSAL-TIME");
2918 })((function (values){
2919 checkArgsAtMost(arguments, 1);
2922 var x1 = (Math.round(new Date() / 1000));
2923 if (typeof x1 !== 'number') throw 'Not a number!';
2924 return x1+2208988800;
2930 var l156 = {name: "*NEWLINE*"};
2932 (((l156.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l156).value = l107.fvalue(pv, l86.fvalue(pv, 10))));
2935 var l157 = {name: "CONCAT"};
2937 (l157).fvalue = (function(v324){
2938 ((v324)["fname"] = "CONCAT");
2940 })((function (values){
2942 for (var i = arguments.length-1; i>=1; i--)
2943 v323 = {car: arguments[i], cdr:
2946 return l63.fvalue(values, (function(){
2948 var func = symbol.fvalue;
2949 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2951 })(), v323, l64.value, "");
2956 var l158 = {name: "CONCATF"};
2958 var l159 = {name: "JOIN"};
2960 (l159).fvalue = (function(v327){
2961 ((v327)["fname"] = "JOIN");
2963 })((function (values,v325,v326){
2964 checkArgsAtLeast(arguments, 2);
2965 checkArgsAtMost(arguments, 3);
2967 switch(arguments.length-1){
2973 return (l13.fvalue(pv, v325) !== l5.value ? "" : (l13.fvalue(pv, (function(){
2975 return tmp === l5.value? l5.value: tmp.cdr;
2976 })()) !== l5.value ? (function(){
2978 return tmp === l5.value? l5.value: tmp.car;
2979 })() : l157.fvalue(values, (function(){
2981 return tmp === l5.value? l5.value: tmp.car;
2982 })(), v326, l159.fvalue(pv, (function(){
2984 return tmp === l5.value? l5.value: tmp.cdr;
2990 var l160 = {name: "JOIN-TRAILING"};
2992 (l160).fvalue = (function(v330){
2993 ((v330)["fname"] = "JOIN-TRAILING");
2995 })((function (values,v328,v329){
2996 checkArgsAtLeast(arguments, 2);
2997 checkArgsAtMost(arguments, 3);
2999 switch(arguments.length-1){
3005 return (l13.fvalue(pv, v328) !== l5.value ? "" : l157.fvalue(values, (function(){
3007 return tmp === l5.value? l5.value: tmp.car;
3008 })(), v329, l160.fvalue(pv, (function(){
3010 return tmp === l5.value? l5.value: tmp.cdr;
3016 var l161 = {name: "MAPCONCAT"};
3018 (l161).fvalue = (function(v333){
3019 ((v333)["fname"] = "MAPCONCAT");
3021 })((function (values,v331,v332){
3022 checkArgs(arguments, 3);
3024 return l159.fvalue(values, l81.fvalue(pv, v331, v332));
3029 var l162 = {name: "VECTOR-TO-LIST"};
3031 (l162).fvalue = (function(v341){
3032 ((v341)["fname"] = "VECTOR-TO-LIST");
3034 })((function (values,v334){
3035 checkArgs(arguments, 2);
3037 return (function(v335,v336){
3039 return (function(v337,v338){
3043 if (typeof x1 !== 'number') throw 'Not a number!';
3045 if (typeof x2 !== 'number') throw 'Not a number!';
3046 return (x1<x2?l4.value: l5.value);
3050 var v339 = (function(){
3051 var x = (v334)[v337];
3052 if (x === undefined) throw 'Out of range';
3055 var v340 = ({car: v339, cdr: v335});
3056 return (v335 = v340);
3060 (v337 = (function(){
3062 if (typeof x1 !== 'number') throw 'Not a number!';
3067 return l70.fvalue(values, v335);
3070 })(l5.value,l75.fvalue(pv, v334));
3075 var l163 = {name: "LIST-TO-VECTOR"};
3077 (l163).fvalue = (function(v347){
3078 ((v347)["fname"] = "LIST-TO-VECTOR");
3080 })((function (values,v342){
3081 checkArgs(arguments, 2);
3083 return (function(v343,v344){
3085 return (function(v345,v346){
3087 while(v345 !== l5.value){
3088 (v346 = (function(){
3090 return tmp === l5.value? l5.value: tmp.car;
3096 if (i < 0 || i >= x.length) throw 'Out of range';
3099 (v344 = (function(){
3101 if (typeof x1 !== 'number') throw 'Not a number!';
3106 (v345 = (function(){
3108 return tmp === l5.value? l5.value: tmp.cdr;
3117 for (var i = 0; i < l75.fvalue(pv, v342); i++)
3125 var l164 = {name: "VALUES-LIST"};
3127 (l164).fvalue = (function(v349){
3128 ((v349)["fname"] = "VALUES-LIST");
3130 })((function (values,v348){
3131 checkArgs(arguments, 2);
3133 return values.apply(this, l163.fvalue(pv, v348));
3138 var l165 = {name: "VALUES"};
3140 (l165).fvalue = (function(v351){
3141 ((v351)["fname"] = "VALUES");
3143 })((function (values){
3145 for (var i = arguments.length-1; i>=1; i--)
3146 v350 = {car: arguments[i], cdr:
3149 return l164.fvalue(values, v350);
3155 (l19).fvalue = (function(v357){
3156 ((v357)["fname"] = "INTEGER-TO-STRING");
3158 })((function (values,v352){
3159 checkArgs(arguments, 2);
3161 return (l26.fvalue(pv, v352) !== l5.value ? "0" : (l91.fvalue(pv, v352) !== l5.value ? l157.fvalue(values, "-", l19.fvalue(pv, (function(){
3163 if (typeof x1 !== 'number') throw 'Not a number!';
3165 })())) : (function(v353){
3168 while(l29.fvalue(pv, l26.fvalue(pv, v352)) !== l5.value){
3170 var v354 = (function(){
3173 if (typeof x != 'number')
3174 throw 'The value ' + x + ' is not a type number.';
3175 if (typeof y != 'number')
3176 throw 'The value ' + y + ' is not a type number.';
3179 var v355 = ({car: v354, cdr: v353});
3180 return (v353 = v355);
3182 (v352 = l27.fvalue(pv, v352, 10));
3186 return l161.fvalue(values, (function (values,v356){
3187 checkArgs(arguments, 2);
3188 return l107.fvalue(values, l101.fvalue(pv, v356));
3195 var l166 = {name: "PRIN1-TO-STRING"};
3196 var l167 = {name: "ESCAPE-STRING"};
3198 (l166).fvalue = (function(v366){
3199 ((v366)["fname"] = "PRIN1-TO-STRING");
3201 })((function (values,v358){
3202 checkArgs(arguments, 2);
3204 return (((function(){
3206 return (typeof tmp == 'object' && 'name' in tmp);
3207 })()?l4.value: l5.value) !== l5.value ? (function(){
3208 var func = (function (values,v360,v361){
3211 switch(arguments.length-1){
3219 for (var i = arguments.length-1; i>=3; i--)
3220 v359 = {car: arguments[i], cdr:
3222 return ((v361 !== l5.value ? ((v360 === v358)?l4.value: l5.value) : l5.value) !== l5.value ? (v358).name : (function(v362,v363){
3223 return l157.fvalue(values, (l13.fvalue(pv, v362) !== l5.value ? "#" : (((v362 === l136.fvalue(pv, "KEYWORD"))?l4.value: l5.value) !== l5.value ? "" : l137.fvalue(pv, v362))), ":", v363);
3224 })(l145.fvalue(pv, v358),(v358).name));
3226 var args = [values];
3230 vs = l149.fvalue(values, (v358).name, (function(){
3232 var value = symbol.value;
3233 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3236 if (typeof vs === 'object' && 'multiple-value' in vs)
3237 args = args.concat(vs);
3240 return func.apply(window, args);
3242 })() : (l89.fvalue(pv, v358) !== l5.value ? l19.fvalue(values, v358) : (((typeof(v358) == "string")?l4.value: l5.value) !== l5.value ? l157.fvalue(values, "\"", l167.fvalue(pv, v358), "\"") : (((typeof v358 == 'function')?l4.value: l5.value) !== l5.value ? (function(v364){
3243 return (v364 !== l5.value ? l157.fvalue(values, "#<FUNCTION ", v364, ">") : l157.fvalue(values, "#<FUNCTION>"));
3245 var tmp = (v358)["fname"];
3246 return tmp == undefined? l5.value: tmp ;
3247 })()) : (l62.fvalue(pv, v358) !== l5.value ? l157.fvalue(values, "(", l160.fvalue(pv, l81.fvalue(pv, (function(){
3249 var func = symbol.fvalue;
3250 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3252 })(), l95.fvalue(pv, v358)), " "), (function(v365){
3253 return (l13.fvalue(pv, (function(){
3255 return tmp === l5.value? l5.value: tmp.cdr;
3256 })()) !== l5.value ? l166.fvalue(pv, (function(){
3258 return tmp === l5.value? l5.value: tmp.car;
3259 })()) : l157.fvalue(pv, l166.fvalue(pv, (function(){
3261 return tmp === l5.value? l5.value: tmp.car;
3262 })()), " . ", l166.fvalue(pv, (function(){
3264 return tmp === l5.value? l5.value: tmp.cdr;
3266 })(l94.fvalue(pv, v358)), ")") : (((function(){
3268 return typeof x === 'object' && 'length' in x;
3269 })()?l4.value: l5.value) !== l5.value ? l157.fvalue(values, "#", l166.fvalue(pv, l162.fvalue(pv, v358))) : (l135.fvalue(pv, v358) !== l5.value ? l157.fvalue(values, "#<PACKAGE ", l137.fvalue(pv, v358), ">") : l5.value)))))));
3275 (l111).fvalue = (function(v368){
3276 ((v368)["fname"] = "WRITE-LINE");
3278 })((function (values,v367){
3279 checkArgs(arguments, 2);
3283 if (typeof x != 'string')
3284 throw 'The value ' + x + ' is not a type string.';
3285 return lisp.write(x);
3288 var x = (function(){
3290 var value = symbol.value;
3291 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3294 if (typeof x != 'string')
3295 throw 'The value ' + x + ' is not a type string.';
3296 return lisp.write(x);
3303 var l168 = {name: "WARN"};
3305 (l168).fvalue = (function(v370){
3306 ((v370)["fname"] = "WARN");
3308 })((function (values,v369){
3309 checkArgs(arguments, 2);
3312 var x = "WARNING: ";
3313 if (typeof x != 'string')
3314 throw 'The value ' + x + ' is not a type string.';
3315 return lisp.write(x);
3317 return l111.fvalue(values, v369);
3322 var l169 = {name: "PRINT"};
3324 (l169).fvalue = (function(v372){
3325 ((v372)["fname"] = "PRINT");
3327 })((function (values,v371){
3328 checkArgs(arguments, 2);
3330 l111.fvalue(pv, l166.fvalue(pv, v371));
3336 var l170 = {name: "MAKE-STRING-STREAM"};
3338 (l170).fvalue = (function(v374){
3339 ((v374)["fname"] = "MAKE-STRING-STREAM");
3341 })((function (values,v373){
3342 checkArgs(arguments, 2);
3344 return ({car: v373, cdr: 0});
3349 var l171 = {name: "%PEEK-CHAR"};
3351 (l171).fvalue = (function(v376){
3352 ((v376)["fname"] = "%PEEK-CHAR");
3354 })((function (values,v375){
3355 checkArgs(arguments, 2);
3357 return ((function(){
3358 var x1 = (function(){
3360 return tmp === l5.value? l5.value: tmp.cdr;
3362 if (typeof x1 !== 'number') throw 'Not a number!';
3363 var x2 = l75.fvalue(pv, (function(){
3365 return tmp === l5.value? l5.value: tmp.car;
3367 if (typeof x2 !== 'number') throw 'Not a number!';
3368 return (x1<x2?l4.value: l5.value);
3369 })() !== l5.value ? (function(){
3370 var string = (function(){
3372 return tmp === l5.value? l5.value: tmp.car;
3374 var index = (function(){
3376 return tmp === l5.value? l5.value: tmp.cdr;
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);
3388 var l172 = {name: "%READ-CHAR"};
3390 (l172).fvalue = (function(v379){
3391 ((v379)["fname"] = "%READ-CHAR");
3393 })((function (values,v377){
3394 checkArgs(arguments, 2);
3396 return ((function(){
3397 var x1 = (function(){
3399 return tmp === l5.value? l5.value: tmp.cdr;
3401 if (typeof x1 !== 'number') throw 'Not a number!';
3402 var x2 = l75.fvalue(pv, (function(){
3404 return tmp === l5.value? l5.value: tmp.car;
3406 if (typeof x2 !== 'number') throw 'Not a number!';
3407 return (x1<x2?l4.value: l5.value);
3408 })() !== l5.value ? (function(v378){
3411 if (typeof x != 'object')
3412 throw 'The value ' + x + ' is not a type object.';
3413 return (x.cdr = l24.fvalue(pv, (function(){
3415 return tmp === l5.value? l5.value: tmp.cdr;
3420 var string = (function(){
3422 return tmp === l5.value? l5.value: tmp.car;
3424 var index = (function(){
3426 return tmp === l5.value? l5.value: tmp.cdr;
3428 if (typeof string != 'string')
3429 throw 'The value ' + string + ' is not a type string.';
3430 if (typeof index != 'number')
3431 throw 'The value ' + index + ' is not a type number.';
3432 return string.charCodeAt(index);
3438 var l173 = {name: "WHITESPACEP"};
3440 (l173).fvalue = (function(v383){
3441 ((v383)["fname"] = "WHITESPACEP");
3443 })((function (values,v380){
3444 checkArgs(arguments, 2);
3446 return (function(v381){
3447 return (v381 !== l5.value ? v381 : (function(v382){
3448 return (v382 !== l5.value ? v382 : l88.fvalue(values, v380, 9));
3449 })(l88.fvalue(pv, v380, 10)));
3450 })(l88.fvalue(pv, v380, 32));
3455 var l174 = {name: "SKIP-WHITESPACES"};
3457 (l174).fvalue = (function(v386){
3458 ((v386)["fname"] = "SKIP-WHITESPACES");
3460 })((function (values,v384){
3461 checkArgs(arguments, 2);
3463 return (function(v385){
3464 (v385 = l171.fvalue(pv, v384));
3467 while((v385 !== l5.value ? l173.fvalue(pv, v385) : l5.value) !== l5.value){
3468 l172.fvalue(pv, v384);
3469 (v385 = l171.fvalue(pv, v384));
3478 var l175 = {name: "TERMINALP"};
3480 (l175).fvalue = (function(v391){
3481 ((v391)["fname"] = "TERMINALP");
3483 })((function (values,v387){
3484 checkArgs(arguments, 2);
3486 return (function(v388){
3487 return (v388 !== l5.value ? v388 : (function(v389){
3488 return (v389 !== l5.value ? v389 : (function(v390){
3489 return (v390 !== l5.value ? v390 : l88.fvalue(values, 40, v387));
3490 })(l88.fvalue(pv, 41, v387)));
3491 })(l173.fvalue(pv, v387)));
3492 })(l13.fvalue(pv, v387));
3497 var l176 = {name: "READ-UNTIL"};
3499 (l176).fvalue = (function(v396){
3500 ((v396)["fname"] = "READ-UNTIL");
3502 })((function (values,v392,v393){
3503 checkArgs(arguments, 3);
3505 return (function(v394,v395){
3506 (v395 = l171.fvalue(pv, v392));
3509 while((v395 !== l5.value ? l29.fvalue(pv, (function(){
3511 return (typeof f === 'function'? f: f.fvalue)(pv, v395)
3512 })()) : l5.value) !== l5.value){
3513 (v394 = l157.fvalue(pv, v394, l107.fvalue(pv, v395)));
3514 l172.fvalue(pv, v392);
3515 (v395 = l171.fvalue(pv, v392));
3525 var l177 = {name: "SKIP-WHITESPACES-AND-COMMENTS"};
3527 (l177).fvalue = (function(v400){
3528 ((v400)["fname"] = "SKIP-WHITESPACES-AND-COMMENTS");
3530 })((function (values,v397){
3531 checkArgs(arguments, 2);
3533 return (function(v398){
3534 l174.fvalue(pv, v397);
3535 (v398 = l171.fvalue(pv, v397));
3538 while((v398 !== l5.value ? l88.fvalue(pv, v398, 59) : l5.value) !== l5.value){
3539 l176.fvalue(pv, v397, (function (values,v399){
3540 checkArgs(arguments, 2);
3541 return l88.fvalue(values, v399, 10);
3543 l174.fvalue(pv, v397);
3544 (v398 = l171.fvalue(pv, v397));
3553 var l178 = {name: "%READ-LIST"};
3554 var l179 = {name: "LS-READ"};
3556 (l178).fvalue = (function(v404){
3557 ((v404)["fname"] = "%READ-LIST");
3559 })((function (values,v401){
3560 checkArgs(arguments, 2);
3562 l177.fvalue(pv, v401);
3563 return (function(v402){
3564 return (l13.fvalue(pv, v402) !== l5.value ? (function(){
3565 throw "Unspected EOF";
3566 })() : (l88.fvalue(pv, v402, 41) !== l5.value ? (function(){
3567 l172.fvalue(pv, v401);
3569 })() : (l88.fvalue(pv, v402, 46) !== l5.value ? (function(){
3570 l172.fvalue(pv, v401);
3571 return (function(v403){
3572 l177.fvalue(pv, v401);
3573 (l88.fvalue(pv, l172.fvalue(pv, v401), 41) !== l5.value ? l5.value : (function(){
3574 throw "')' was expected.";
3577 })(l179.fvalue(pv, v401));
3578 })() : ({car: l179.fvalue(pv, v401), cdr: l178.fvalue(pv, v401)}))));
3579 })(l171.fvalue(pv, v401));
3584 var l180 = {name: "READ-STRING"};
3586 (l180).fvalue = (function(v408){
3587 ((v408)["fname"] = "READ-STRING");
3589 })((function (values,v405){
3590 checkArgs(arguments, 2);
3592 return (function(v406,v407){
3593 (v407 = l172.fvalue(pv, v405));
3596 while(l29.fvalue(pv, l28.fvalue(pv, v407, 34)) !== l5.value){
3597 (l13.fvalue(pv, v407) !== l5.value ? (function(){
3598 throw "Unexpected EOF";
3600 (l28.fvalue(pv, v407, 92) !== l5.value ? (v407 = l172.fvalue(pv, v405)) : l5.value);
3601 (v406 = l157.fvalue(pv, v406, l107.fvalue(pv, v407)));
3602 (v407 = l172.fvalue(pv, v405));
3612 var l181 = {name: "READ-SHARP"};
3614 (l181).fvalue = (function(v413){
3615 ((v413)["fname"] = "READ-SHARP");
3617 })((function (values,v409){
3618 checkArgs(arguments, 2);
3620 l172.fvalue(pv, v409);
3621 return (function(v410){
3622 return (l28.fvalue(pv, v410, 39) !== l5.value ? l47.fvalue(values, l113, l179.fvalue(pv, v409)) : (l28.fvalue(pv, v410, 40) !== l5.value ? l163.fvalue(values, l178.fvalue(pv, v409)) : (l28.fvalue(pv, v410, 58) !== l5.value ? (function(){
3623 var name = (function(){
3624 var x = l176.fvalue(pv, v409, (function(){
3626 var func = symbol.fvalue;
3627 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3630 if (typeof x != 'string')
3631 throw 'The value ' + x + ' is not a type string.';
3632 return x.toUpperCase();
3634 if (typeof name != 'string')
3635 throw 'The value ' + name + ' is not a type string.';
3636 return ({name: name});
3637 })() : (l28.fvalue(pv, v410, 92) !== l5.value ? (function(v411){
3638 return (l108.fvalue(pv, v411, "space") !== l5.value ? l87.fvalue(values, 32) : (l108.fvalue(pv, v411, "tab") !== l5.value ? l87.fvalue(values, 9) : (l108.fvalue(pv, v411, "newline") !== l5.value ? l87.fvalue(values, 10) : l87.fvalue(values, (function(){
3641 if (typeof string != 'string')
3642 throw 'The value ' + string + ' is not a type string.';
3643 if (typeof index != 'number')
3644 throw 'The value ' + index + ' is not a type number.';
3645 return string.charCodeAt(index);
3647 })(l157.fvalue(pv, l107.fvalue(pv, l172.fvalue(pv, v409)), l176.fvalue(pv, v409, (function(){
3649 var func = symbol.fvalue;
3650 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3652 })()))) : (l28.fvalue(pv, v410, 43) !== l5.value ? (function(v412){
3653 return (l108.fvalue(pv, v412, "common-lisp") !== l5.value ? (function(){
3654 l179.fvalue(pv, v409);
3655 return l179.fvalue(values, v409);
3656 })() : (l108.fvalue(pv, v412, "ecmalisp") !== l5.value ? l179.fvalue(values, v409) : (function(){
3657 throw "Unknown reader form.";
3659 })(l176.fvalue(pv, v409, (function(){
3661 var func = symbol.fvalue;
3662 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3664 })())) : (function(){
3665 throw "ECASE expression failed.";
3667 })(l172.fvalue(pv, v409));
3672 var l182 = {name: "READ-SYMBOL"};
3674 (l182).fvalue = (function(v421){
3675 ((v421)["fname"] = "READ-SYMBOL");
3677 })((function (values,v414){
3678 checkArgs(arguments, 2);
3680 return (function(v415,v416,v417,v418,v419){
3686 if (typeof x1 !== 'number') throw 'Not a number!';
3688 if (typeof x2 !== 'number') throw 'Not a number!';
3689 return (x1<x2?l4.value: l5.value);
3690 })() !== l5.value ? l29.fvalue(pv, l88.fvalue(pv, (function(){
3693 if (typeof string != 'string')
3694 throw 'The value ' + string + ' is not a type string.';
3695 if (typeof index != 'number')
3696 throw 'The value ' + index + ' is not a type number.';
3697 return string.charCodeAt(index);
3698 })(), 58)) : l5.value) !== l5.value){
3699 (v419 = (function(){
3701 if (typeof x1 !== 'number') throw 'Not a number!';
3709 if (typeof x1 !== 'number') throw 'Not a number!';
3711 if (typeof x2 !== 'number') throw 'Not a number!';
3712 return (x1==x2?l4.value: l5.value);
3713 })() !== l5.value ? (function(){
3715 (v416 = (function(){
3717 var value = symbol.value;
3718 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3721 return (v418 = l4.value);
3723 (l26.fvalue(pv, v419) !== l5.value ? (v416 = "KEYWORD") : (v416 = (function(){
3724 var x = l102.fvalue(pv, v414, 0, v419);
3725 if (typeof x != 'string')
3726 throw 'The value ' + x + ' is not a type string.';
3727 return x.toUpperCase();
3729 (v419 = (function(){
3731 if (typeof x1 !== 'number') throw 'Not a number!';
3734 (l88.fvalue(pv, (function(){
3737 if (typeof string != 'string')
3738 throw 'The value ' + string + ' is not a type string.';
3739 if (typeof index != 'number')
3740 throw 'The value ' + index + ' is not a type number.';
3741 return string.charCodeAt(index);
3742 })(), 58) !== l5.value ? (function(){
3744 return (v419 = (function(){
3746 if (typeof x1 !== 'number') throw 'Not a number!';
3750 return (v417 = l102.fvalue(pv, v414, v419));
3752 (v417 = (function(){
3754 if (typeof x != 'string')
3755 throw 'The value ' + x + ' is not a type string.';
3756 return x.toUpperCase();
3758 (v416 = l136.fvalue(pv, v416));
3759 return ((function(v420){
3760 return (v420 !== l5.value ? v420 : ((v416 === l136.fvalue(pv, "KEYWORD"))?l4.value: l5.value));
3761 })(v418) !== l5.value ? l153.fvalue(values, v417, v416) : l149.fvalue(values, v417, v416));
3762 })(l75.fvalue(pv, v414),l5.value,l5.value,l5.value,l5.value);
3767 var l183 = {name: "!PARSE-INTEGER"};
3769 (l183).fvalue = (function(v432){
3770 ((v432)["fname"] = "!PARSE-INTEGER");
3772 })((function (values,v422,v423){
3773 checkArgs(arguments, 3);
3777 return (function(v424,v425,v426,v427){
3778 (l26.fvalue(pv, v426) !== l5.value ? (function(){
3780 throw ({type: 'block', id: 158, values: values(l5.value, 0), message: 'Return from unknown block NIL.'})
3783 return (l28.fvalue(pv, v428, 43) !== l5.value ? (v425 = (function(){
3785 if (typeof x1 !== 'number') throw 'Not a number!';
3787 })()) : (l28.fvalue(pv, v428, 45) !== l5.value ? (function(){
3789 return (v425 = (function(){
3791 if (typeof x1 !== 'number') throw 'Not a number!';
3798 if (typeof string != 'string')
3799 throw 'The value ' + string + ' is not a type string.';
3800 if (typeof index != 'number')
3801 throw 'The value ' + index + ' is not a type number.';
3802 return string.charCodeAt(index);
3806 if (typeof x1 !== 'number') throw 'Not a number!';
3808 if (typeof x2 !== 'number') throw 'Not a number!';
3809 return (x1<x2?l4.value: l5.value);
3810 })() !== l5.value ? (v424 = l100.fvalue(pv, (function(){
3813 if (typeof string != 'string')
3814 throw 'The value ' + string + ' is not a type string.';
3815 if (typeof index != 'number')
3816 throw 'The value ' + index + ' is not a type number.';
3817 return string.charCodeAt(index);
3818 })())) : l5.value) !== l5.value ? l5.value : (function(){
3820 throw ({type: 'block', id: 158, values: values(l5.value, v425), message: 'Return from unknown block NIL.'})
3822 (v425 = (function(){
3824 if (typeof x1 !== 'number') throw 'Not a number!';
3832 if (typeof x1 !== 'number') throw 'Not a number!';
3834 if (typeof x2 !== 'number') throw 'Not a number!';
3835 return (x1<x2?l4.value: l5.value);
3838 (v429 !== l5.value ? l5.value : (function(){
3839 throw ({type: 'block', id: 159, values: l5.value, message: 'Return from unknown block NIL.'})
3841 (v424 = (function(){
3842 var x1 = (function(){
3844 if (typeof x1 !== 'number') throw 'Not a number!';
3847 if (typeof x1 !== 'number') throw 'Not a number!';
3849 if (typeof x2 !== 'number') throw 'Not a number!';
3852 return (v425 = (function(){
3854 if (typeof x1 !== 'number') throw 'Not a number!';
3857 })(l100.fvalue(pv, (function(){
3860 if (typeof string != 'string')
3861 throw 'The value ' + string + ' is not a type string.';
3862 if (typeof index != 'number')
3863 throw 'The value ' + index + ' is not a type number.';
3864 return string.charCodeAt(index);
3870 if (cf.type == 'block' && cf.id == 159)
3876 return ((function(v430){
3877 return (v430 !== l5.value ? v430 : (function(v431){
3878 return (v431 !== l5.value ? v431 : l88.fvalue(pv, (function(){
3881 if (typeof string != 'string')
3882 throw 'The value ' + string + ' is not a type string.';
3883 if (typeof index != 'number')
3884 throw 'The value ' + index + ' is not a type number.';
3885 return string.charCodeAt(index);
3889 if (typeof x1 !== 'number') throw 'Not a number!';
3891 if (typeof x2 !== 'number') throw 'Not a number!';
3892 return (x1==x2?l4.value: l5.value);
3894 })(v423) !== l5.value ? values((function(){
3896 if (typeof x1 !== 'number') throw 'Not a number!';
3898 if (typeof x2 !== 'number') throw 'Not a number!';
3900 })(), v425) : values(l5.value, v425));
3901 })(0,0,l75.fvalue(pv, v422),1);
3904 if (cf.type == 'block' && cf.id == 158)
3905 return values.apply(this, forcemv(cf.values));
3914 var l184 = {name: "PARSE-INTEGER"};
3916 (l184).fvalue = (function(v434){
3917 ((v434)["fname"] = "PARSE-INTEGER");
3919 })((function (values,v433){
3920 checkArgs(arguments, 2);
3922 return l183.fvalue(values, v433, l5.value);
3927 var l185 = {name: "*EOF*"};
3929 (((l185.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l185).value = l18.fvalue(pv)));
3932 var l186 = {name: "QUOTE"};
3933 var l187 = {name: "BACKQUOTE"};
3934 var l188 = {name: "UNQUOTE-SPLICING"};
3935 var l189 = {name: "UNQUOTE"};
3937 (l179).fvalue = (function(v440){
3938 ((v440)["fname"] = "LS-READ");
3940 })((function (values,v435){
3941 checkArgs(arguments, 2);
3943 l177.fvalue(pv, v435);
3944 return (function(v436){
3945 return ((function(v437){
3946 return (v437 !== l5.value ? v437 : l88.fvalue(pv, v436, 41));
3947 })(l13.fvalue(pv, v436)) !== l5.value ? (function(){
3949 var value = symbol.value;
3950 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3952 })() : (l88.fvalue(pv, v436, 40) !== l5.value ? (function(){
3953 l172.fvalue(pv, v435);
3954 return l178.fvalue(values, v435);
3955 })() : (l88.fvalue(pv, v436, 39) !== l5.value ? (function(){
3956 l172.fvalue(pv, v435);
3957 return l47.fvalue(values, l186, l179.fvalue(pv, v435));
3958 })() : (l88.fvalue(pv, v436, 96) !== l5.value ? (function(){
3959 l172.fvalue(pv, v435);
3960 return l47.fvalue(values, l187, l179.fvalue(pv, v435));
3961 })() : (l88.fvalue(pv, v436, 34) !== l5.value ? (function(){
3962 l172.fvalue(pv, v435);
3963 return l180.fvalue(values, v435);
3964 })() : (l88.fvalue(pv, v436, 44) !== l5.value ? (function(){
3965 l172.fvalue(pv, v435);
3966 return (l28.fvalue(pv, l171.fvalue(pv, v435), 64) !== l5.value ? (function(){
3967 l172.fvalue(pv, v435);
3968 return l47.fvalue(values, l188, l179.fvalue(pv, v435));
3969 })() : l47.fvalue(values, l189, l179.fvalue(pv, v435)));
3970 })() : (l88.fvalue(pv, v436, 35) !== l5.value ? l181.fvalue(values, v435) : (function(v438){
3971 return (function(v439){
3972 return (v439 !== l5.value ? v439 : l182.fvalue(values, v438));
3973 })(pv(l183.fvalue(pv, v438, l5.value)));
3974 })(l176.fvalue(pv, v435, (function(){
3976 var func = symbol.fvalue;
3977 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3980 })(l171.fvalue(pv, v435));
3985 var l190 = {name: "LS-READ-FROM-STRING"};
3987 (l190).fvalue = (function(v442){
3988 ((v442)["fname"] = "LS-READ-FROM-STRING");
3990 })((function (values,v441){
3991 checkArgs(arguments, 2);
3993 return l179.fvalue(values, l170.fvalue(pv, v441));
3998 var l191 = {name: "CODE"};
4000 (l191).fvalue = (function(v445){
4001 ((v445)["fname"] = "CODE");
4003 })((function (values){
4005 for (var i = arguments.length-1; i>=1; i--)
4006 v443 = {car: arguments[i], cdr:
4009 return l161.fvalue(values, (function (values,v444){
4010 checkArgs(arguments, 2);
4011 return (l13.fvalue(pv, v444) !== l5.value ? "" : (l89.fvalue(pv, v444) !== l5.value ? l19.fvalue(values, v444) : (((typeof(v444) == "string")?l4.value: l5.value) !== l5.value ? v444 : (function(){
4012 throw "Unknown argument.";
4019 var l192 = {name: "JS!BOOL"};
4020 var l193 = {name: "LS-COMPILE"};
4022 (l192).fvalue = (function(v447){
4023 ((v447)["fname"] = "JS!BOOL");
4025 })((function (values,v446){
4026 checkArgs(arguments, 2);
4028 return l191.fvalue(values, "(", v446, "?", l193.fvalue(pv, l4.value), ": ", l193.fvalue(pv, l5.value), ")");
4033 var l194 = {name: "JS!SELFCALL"};
4035 var l195 = {name: "INDENT"};
4037 (l195).fvalue = (function(v454){
4038 ((v454)["fname"] = "INDENT");
4040 })((function (values){
4042 for (var i = arguments.length-1; i>=1; i--)
4043 v448 = {car: arguments[i], cdr:
4046 return (function(v449){
4047 return (function(v450,v451,v452){
4048 (l90.fvalue(pv, l75.fvalue(pv, v449)) !== l5.value ? (v450 = l157.fvalue(pv, v450, " ")) : l5.value);
4053 if (typeof x1 !== 'number') throw 'Not a number!';
4055 if (typeof x2 !== 'number') throw 'Not a number!';
4056 return (x1<x2?l4.value: l5.value);
4059 return (v450 = l157.fvalue(pv, v450, v453));
4060 })(((l88.fvalue(pv, (function(){
4063 if (typeof string != 'string')
4064 throw 'The value ' + string + ' is not a type string.';
4065 if (typeof index != 'number')
4066 throw 'The value ' + index + ' is not a type number.';
4067 return string.charCodeAt(index);
4068 })(), 10) !== l5.value ? ((function(){
4070 if (typeof x1 !== 'number') throw 'Not a number!';
4071 var x2 = l25.fvalue(pv, v452);
4072 if (typeof x2 !== 'number') throw 'Not a number!';
4073 return (x1<x2?l4.value: l5.value);
4074 })() !== l5.value ? l29.fvalue(pv, l88.fvalue(pv, (function(){
4076 var index = l24.fvalue(pv, v451);
4077 if (typeof string != 'string')
4078 throw 'The value ' + string + ' is not a type string.';
4079 if (typeof index != 'number')
4080 throw 'The value ' + index + ' is not a type number.';
4081 return string.charCodeAt(index);
4082 })(), 10)) : l5.value) : l5.value) !== l5.value ? l157.fvalue(pv, l107.fvalue(pv, 10), " ") : l107.fvalue(pv, (function(){
4085 if (typeof string != 'string')
4086 throw 'The value ' + string + ' is not a type string.';
4087 if (typeof index != 'number')
4088 throw 'The value ' + index + ' is not a type number.';
4089 return string.charCodeAt(index);
4091 (v451 = (function(){
4093 if (typeof x1 !== 'number') throw 'Not a number!';
4100 })("",0,l75.fvalue(pv, v449));
4102 var f = (function(){
4104 var func = symbol.fvalue;
4105 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4110 while (tail != l5.value){
4111 args.push(tail.car);
4114 return (typeof f === 'function'? f : f.fvalue).apply(this, args);
4120 var l196 = {name: "*MULTIPLE-VALUE-P*"};
4122 (((l196.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l196).value = l5.value));
4125 var l197 = {name: "MAKE-BINDING"};
4127 (l197).fvalue = (function(v459){
4128 ((v459)["fname"] = "MAKE-BINDING");
4130 })((function (values,v455,v456,v457,v458){
4131 checkArgsAtLeast(arguments, 4);
4132 checkArgsAtMost(arguments, 5);
4134 switch(arguments.length-1){
4140 return l47.fvalue(values, v455, v456, v457, v458);
4145 var l198 = {name: "BINDING-NAME"};
4147 (l198).fvalue = (function(v461){
4148 ((v461)["fname"] = "BINDING-NAME");
4150 })((function (values,v460){
4151 checkArgs(arguments, 2);
4153 return l42.fvalue(values, v460);
4158 var l199 = {name: "BINDING-TYPE"};
4160 (l199).fvalue = (function(v463){
4161 ((v463)["fname"] = "BINDING-TYPE");
4163 })((function (values,v462){
4164 checkArgs(arguments, 2);
4166 return l43.fvalue(values, v462);
4171 var l200 = {name: "BINDING-VALUE"};
4173 (l200).fvalue = (function(v465){
4174 ((v465)["fname"] = "BINDING-VALUE");
4176 })((function (values,v464){
4177 checkArgs(arguments, 2);
4179 return l44.fvalue(values, v464);
4184 var l201 = {name: "BINDING-DECLARATIONS"};
4186 (l201).fvalue = (function(v467){
4187 ((v467)["fname"] = "BINDING-DECLARATIONS");
4189 })((function (values,v466){
4190 checkArgs(arguments, 2);
4192 return l45.fvalue(values, v466);
4197 var l202 = {name: "SET-BINDING-VALUE"};
4199 (l202).fvalue = (function(v470){
4200 ((v470)["fname"] = "SET-BINDING-VALUE");
4202 })((function (values,v468,v469){
4203 checkArgs(arguments, 3);
4206 var x = l37.fvalue(pv, v468);
4207 if (typeof x != 'object')
4208 throw 'The value ' + x + ' is not a type object.';
4209 return (x.car = v469, x);
4215 var l203 = {name: "SET-BINDING-DECLARATIONS"};
4217 (l203).fvalue = (function(v473){
4218 ((v473)["fname"] = "SET-BINDING-DECLARATIONS");
4220 })((function (values,v471,v472){
4221 checkArgs(arguments, 3);
4224 var x = l40.fvalue(pv, v471);
4225 if (typeof x != 'object')
4226 throw 'The value ' + x + ' is not a type object.';
4227 return (x.car = v472, x);
4233 var l204 = {name: "PUSH-BINDING-DECLARATION"};
4235 (l204).fvalue = (function(v476){
4236 ((v476)["fname"] = "PUSH-BINDING-DECLARATION");
4238 })((function (values,v474,v475){
4239 checkArgs(arguments, 3);
4241 return l203.fvalue(values, v475, ({car: v474, cdr: l201.fvalue(pv, v475)}));
4246 var l205 = {name: "MAKE-LEXENV"};
4248 (l205).fvalue = (function(v477){
4249 ((v477)["fname"] = "MAKE-LEXENV");
4251 })((function (values){
4252 checkArgsAtMost(arguments, 1);
4254 return l47.fvalue(values, l5.value, l5.value, l5.value, l5.value);
4259 var l206 = {name: "COPY-LEXENV"};
4261 (l206).fvalue = (function(v479){
4262 ((v479)["fname"] = "COPY-LEXENV");
4264 })((function (values,v478){
4265 checkArgs(arguments, 2);
4267 return l84.fvalue(values, v478);
4272 var l207 = {name: "PUSH-TO-LEXENV"};
4273 var l208 = {name: "BLOCK"};
4274 var l209 = {name: "GOTAG"};
4276 (l207).fvalue = (function(v484){
4277 ((v484)["fname"] = "PUSH-TO-LEXENV");
4279 })((function (values,v480,v481,v482){
4280 checkArgs(arguments, 4);
4282 return (function(v483){
4283 return (l28.fvalue(pv, v483, l114) !== l5.value ? (function(){
4285 if (typeof x != 'object')
4286 throw 'The value ' + x + ' is not a type object.';
4287 return (x.car = ({car: v480, cdr: (function(){
4289 return tmp === l5.value? l5.value: tmp.car;
4291 })() : (l28.fvalue(pv, v483, l113) !== l5.value ? (function(){
4292 var x = (function(){
4294 return tmp === l5.value? l5.value: tmp.cdr;
4296 if (typeof x != 'object')
4297 throw 'The value ' + x + ' is not a type object.';
4298 return (x.car = ({car: v480, cdr: l35.fvalue(pv, v481)}), x);
4299 })() : (l28.fvalue(pv, v483, l208) !== l5.value ? (function(){
4300 var x = l37.fvalue(pv, v481);
4301 if (typeof x != 'object')
4302 throw 'The value ' + x + ' is not a type object.';
4303 return (x.car = ({car: v480, cdr: l39.fvalue(pv, v481)}), x);
4304 })() : (l28.fvalue(pv, v483, l209) !== l5.value ? (function(){
4305 var x = l40.fvalue(pv, v481);
4306 if (typeof x != 'object')
4307 throw 'The value ' + x + ' is not a type object.';
4308 return (x.car = ({car: v480, cdr: l41.fvalue(pv, v481)}), x);
4310 throw "ECASE expression failed.";
4317 var l210 = {name: "EXTEND-LEXENV"};
4319 (l210).fvalue = (function(v491){
4320 ((v491)["fname"] = "EXTEND-LEXENV");
4322 })((function (values,v485,v486,v487){
4323 checkArgs(arguments, 4);
4325 return (function(v488){
4327 return (function(v489,v490){
4329 while(v489 !== l5.value){
4330 (v490 = (function(){
4332 return tmp === l5.value? l5.value: tmp.car;
4335 l207.fvalue(pv, v490, v488, v487);
4338 (v489 = (function(){
4340 return tmp === l5.value? l5.value: tmp.cdr;
4345 })(l70.fvalue(pv, v485),l5.value);
4347 })(l206.fvalue(pv, v486));
4352 var l211 = {name: "LOOKUP-IN-LEXENV"};
4354 (l211).fvalue = (function(v496){
4355 ((v496)["fname"] = "LOOKUP-IN-LEXENV");
4357 })((function (values,v492,v493,v494){
4358 checkArgs(arguments, 4);
4360 return l106.fvalue(values, v492, (function(v495){
4361 return (l28.fvalue(pv, v495, l114) !== l5.value ? l42.fvalue(pv, v493) : (l28.fvalue(pv, v495, l113) !== l5.value ? l43.fvalue(pv, v493) : (l28.fvalue(pv, v495, l208) !== l5.value ? l44.fvalue(pv, v493) : (l28.fvalue(pv, v495, l209) !== l5.value ? l45.fvalue(pv, v493) : (function(){
4362 throw "ECASE expression failed.";
4369 var l212 = {name: "*ENVIRONMENT*"};
4371 (((l212.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l212).value = l205.fvalue(pv)));
4374 var l213 = {name: "*VARIABLE-COUNTER*"};
4376 (((l213.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l213).value = 0));
4379 var l214 = {name: "GVARNAME"};
4381 (l214).fvalue = (function(v498){
4382 ((v498)["fname"] = "GVARNAME");
4384 })((function (values,v497){
4385 checkArgs(arguments, 2);
4387 return l191.fvalue(values, "v", ((l213).value = (function(){
4388 var x1 = (function(){
4390 var value = symbol.value;
4391 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4394 if (typeof x1 !== 'number') throw 'Not a number!';
4401 var l215 = {name: "TRANSLATE-VARIABLE"};
4403 (l215).fvalue = (function(v500){
4404 ((v500)["fname"] = "TRANSLATE-VARIABLE");
4406 })((function (values,v499){
4407 checkArgs(arguments, 2);
4409 return l200.fvalue(values, l211.fvalue(pv, v499, (function(){
4411 var value = symbol.value;
4412 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4419 var l216 = {name: "EXTEND-LOCAL-ENV"};
4421 (l216).fvalue = (function(v506){
4422 ((v506)["fname"] = "EXTEND-LOCAL-ENV");
4424 })((function (values,v501){
4425 checkArgs(arguments, 2);
4427 return (function(v502){
4429 return (function(v503,v504){
4431 while(v503 !== l5.value){
4432 (v504 = (function(){
4434 return tmp === l5.value? l5.value: tmp.car;
4438 return l207.fvalue(pv, v505, v502, l114);
4439 })(l197.fvalue(pv, v504, l114, l214.fvalue(pv, v504)));
4442 (v503 = (function(){
4444 return tmp === l5.value? l5.value: tmp.cdr;
4451 })(l206.fvalue(pv, (function(){
4453 var value = symbol.value;
4454 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4461 var l217 = {name: "*TOPLEVEL-COMPILATIONS*"};
4463 (((l217.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l217).value = l5.value));
4466 var l218 = {name: "TOPLEVEL-COMPILATION"};
4468 (l218).fvalue = (function(v510){
4469 ((v510)["fname"] = "TOPLEVEL-COMPILATION");
4471 })((function (values,v507){
4472 checkArgs(arguments, 2);
4476 var v509 = ({car: v508, cdr: (function(){
4478 var value = symbol.value;
4479 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4482 return ((l217).value = v509);
4488 var l219 = {name: "NULL-OR-EMPTY-P"};
4490 (l219).fvalue = (function(v512){
4491 ((v512)["fname"] = "NULL-OR-EMPTY-P");
4493 })((function (values,v511){
4494 checkArgs(arguments, 2);
4496 return l26.fvalue(values, l75.fvalue(pv, v511));
4501 var l220 = {name: "GET-TOPLEVEL-COMPILATIONS"};
4503 (l220).fvalue = (function(v513){
4504 ((v513)["fname"] = "GET-TOPLEVEL-COMPILATIONS");
4506 })((function (values){
4507 checkArgsAtMost(arguments, 1);
4509 return l70.fvalue(values, l98.fvalue(pv, (function(){
4511 var func = symbol.fvalue;
4512 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4516 var value = symbol.value;
4517 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4524 var l221 = {name: "%COMPILE-DEFMACRO"};
4525 var l222 = {name: "MACRO"};
4527 (l221).fvalue = (function(v516){
4528 ((v516)["fname"] = "%COMPILE-DEFMACRO");
4530 })((function (values,v514,v515){
4531 checkArgs(arguments, 3);
4533 l218.fvalue(pv, l193.fvalue(pv, l47.fvalue(pv, l186, v514)));
4534 l207.fvalue(pv, l197.fvalue(pv, v514, l222, v515), (function(){
4536 var value = symbol.value;
4537 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4545 var l223 = {name: "GLOBAL-BINDING"};
4547 (l223).fvalue = (function(v522){
4548 ((v522)["fname"] = "GLOBAL-BINDING");
4550 })((function (values,v517,v518,v519){
4551 checkArgs(arguments, 4);
4553 return (function(v520){
4554 return (v520 !== l5.value ? v520 : (function(v521){
4555 l207.fvalue(pv, v521, (function(){
4557 var value = symbol.value;
4558 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4562 })(l197.fvalue(pv, v517, v518, l5.value)));
4563 })(l211.fvalue(pv, v517, (function(){
4565 var value = symbol.value;
4566 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4573 var l224 = {name: "CLAIMP"};
4575 (l224).fvalue = (function(v527){
4576 ((v527)["fname"] = "CLAIMP");
4578 })((function (values,v523,v524,v525){
4579 checkArgs(arguments, 4);
4581 return (function(v526){
4582 return (v526 !== l5.value ? l96.fvalue(values, v525, l201.fvalue(pv, v526)) : l5.value);
4583 })(l211.fvalue(pv, v523, (function(){
4585 var value = symbol.value;
4586 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4593 var l225 = {name: "!PROCLAIM"};
4594 var l226 = {name: "SPECIAL"};
4595 var l227 = {name: "NOTINLINE"};
4596 var l228 = {name: "CONSTANT"};
4598 (l225).fvalue = (function(v539){
4599 ((v539)["fname"] = "!PROCLAIM");
4601 })((function (values,v528){
4602 checkArgs(arguments, 2);
4604 return (function(v529){
4605 return (l28.fvalue(pv, v529, l226) !== l5.value ? (function(){
4606 return (function(v530,v531){
4608 while(v530 !== l5.value){
4609 (v531 = (function(){
4611 return tmp === l5.value? l5.value: tmp.car;
4615 return l204.fvalue(pv, l226, v532);
4616 })(l223.fvalue(pv, v531, l114, l114));
4619 (v530 = (function(){
4621 return tmp === l5.value? l5.value: tmp.cdr;
4628 return tmp === l5.value? l5.value: tmp.cdr;
4630 })() : (l28.fvalue(pv, v529, l227) !== l5.value ? (function(){
4631 return (function(v533,v534){
4633 while(v533 !== l5.value){
4634 (v534 = (function(){
4636 return tmp === l5.value? l5.value: tmp.car;
4640 return l204.fvalue(pv, l227, v535);
4641 })(l223.fvalue(pv, v534, l113, l113));
4644 (v533 = (function(){
4646 return tmp === l5.value? l5.value: tmp.cdr;
4653 return tmp === l5.value? l5.value: tmp.cdr;
4655 })() : (l28.fvalue(pv, v529, l228) !== l5.value ? (function(){
4656 return (function(v536,v537){
4658 while(v536 !== l5.value){
4659 (v537 = (function(){
4661 return tmp === l5.value? l5.value: tmp.car;
4665 return l204.fvalue(pv, l228, v538);
4666 })(l223.fvalue(pv, v537, l114, l114));
4669 (v536 = (function(){
4671 return tmp === l5.value? l5.value: tmp.cdr;
4678 return tmp === l5.value? l5.value: tmp.cdr;
4683 return tmp === l5.value? l5.value: tmp.car;
4689 var l229 = {name: "PROCLAIM"};
4690 (l229).fvalue = (function(){
4692 var func = symbol.fvalue;
4693 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4696 var l230 = {name: "*COMPILATIONS*"};
4698 (((l230.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l230).value = l5.value));
4701 var l231 = {name: "DEFINE-COMPILATION"};
4703 var l232 = {name: "IF"};
4705 var v540 = l47.fvalue(pv, l232, (function (values,v541,v542,v543){
4706 checkArgs(arguments, 4);
4708 return l191.fvalue(values, "(", l193.fvalue(pv, v541), " !== ", l193.fvalue(pv, l5.value), " ? ", l193.fvalue(pv, v542, (function(){
4710 var value = symbol.value;
4711 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4713 })()), " : ", l193.fvalue(pv, v543, (function(){
4715 var value = symbol.value;
4716 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4721 var v544 = ({car: v540, cdr: (function(){
4723 var value = symbol.value;
4724 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4727 return ((l230).value = v544);
4729 var l233 = {name: "*LL-KEYWORDS*"};
4730 var l234 = {name: "&OPTIONAL"};
4731 var l235 = {name: "&REST"};
4732 var l236 = {name: "&KEY"};
4733 var l237 = QIList(l234,l235,l236,l5);
4735 (((l233.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l233).value = l237));
4738 var l238 = {name: "LIST-UNTIL-KEYWORD"};
4740 (l238).fvalue = (function(v547){
4741 ((v547)["fname"] = "LIST-UNTIL-KEYWORD");
4743 })((function (values,v545){
4744 checkArgs(arguments, 2);
4746 return ((function(v546){
4747 return (v546 !== l5.value ? v546 : l96.fvalue(pv, (function(){
4749 return tmp === l5.value? l5.value: tmp.car;
4752 var value = symbol.value;
4753 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4756 })(l13.fvalue(pv, v545)) !== l5.value ? l5.value : ({car: (function(){
4758 return tmp === l5.value? l5.value: tmp.car;
4759 })(), cdr: l238.fvalue(pv, (function(){
4761 return tmp === l5.value? l5.value: tmp.cdr;
4767 var l239 = {name: "LL-SECTION"};
4769 (l239).fvalue = (function(v550){
4770 ((v550)["fname"] = "LL-SECTION");
4772 })((function (values,v548,v549){
4773 checkArgs(arguments, 3);
4775 return l238.fvalue(values, (function(){
4776 var tmp = l96.fvalue(pv, v548, v549);
4777 return tmp === l5.value? l5.value: tmp.cdr;
4783 var l240 = {name: "LL-REQUIRED-ARGUMENTS"};
4785 (l240).fvalue = (function(v552){
4786 ((v552)["fname"] = "LL-REQUIRED-ARGUMENTS");
4788 })((function (values,v551){
4789 checkArgs(arguments, 2);
4791 return l238.fvalue(values, v551);
4796 var l241 = {name: "LL-OPTIONAL-ARGUMENTS-CANONICAL"};
4798 (l241).fvalue = (function(v554){
4799 ((v554)["fname"] = "LL-OPTIONAL-ARGUMENTS-CANONICAL");
4801 })((function (values,v553){
4802 checkArgs(arguments, 2);
4804 return l81.fvalue(values, (function(){
4806 var func = symbol.fvalue;
4807 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4809 })(), l239.fvalue(pv, l234, v553));
4814 var l242 = {name: "LL-OPTIONAL-ARGUMENTS"};
4816 (l242).fvalue = (function(v556){
4817 ((v556)["fname"] = "LL-OPTIONAL-ARGUMENTS");
4819 })((function (values,v555){
4820 checkArgs(arguments, 2);
4822 return l81.fvalue(values, (function(){
4824 var func = symbol.fvalue;
4825 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4827 })(), l241.fvalue(pv, v555));
4832 var l243 = {name: "LL-REST-ARGUMENT"};
4834 (l243).fvalue = (function(v559){
4835 ((v559)["fname"] = "LL-REST-ARGUMENT");
4837 })((function (values,v557){
4838 checkArgs(arguments, 2);
4840 return (function(v558){
4843 return tmp === l5.value? l5.value: tmp.cdr;
4844 })() !== l5.value ? (function(){
4845 throw "Bad lambda-list";
4849 return tmp === l5.value? l5.value: tmp.car;
4851 })(l239.fvalue(pv, l235, v557));
4856 var l244 = {name: "LL-KEYWORD-ARGUMENTS-CANONICAL"};
4858 (l244).fvalue = (function(v564){
4859 ((v564)["fname"] = "LL-KEYWORD-ARGUMENTS-CANONICAL");
4861 })((function (values,v560){
4862 checkArgs(arguments, 2);
4864 return (function(v563){
4865 return l81.fvalue(values, v563, l239.fvalue(pv, l236, v560));
4866 })((function (values,v561){
4867 checkArgs(arguments, 2);
4868 return (function(v562){
4869 return ({car: (l62.fvalue(pv, (function(){
4871 return tmp === l5.value? l5.value: tmp.car;
4872 })()) !== l5.value ? (function(){
4874 return tmp === l5.value? l5.value: tmp.car;
4875 })() : l47.fvalue(pv, l153.fvalue(pv, ((function(){
4877 return tmp === l5.value? l5.value: tmp.car;
4878 })()).name, "KEYWORD"), (function(){
4880 return tmp === l5.value? l5.value: tmp.car;
4881 })())), cdr: (function(){
4883 return tmp === l5.value? l5.value: tmp.cdr;
4885 })(l61.fvalue(pv, v561));
4891 var l245 = {name: "LL-KEYWORD-ARGUMENTS"};
4893 (l245).fvalue = (function(v567){
4894 ((v567)["fname"] = "LL-KEYWORD-ARGUMENTS");
4896 })((function (values,v565){
4897 checkArgs(arguments, 2);
4899 return l81.fvalue(values, (function (values,v566){
4900 checkArgs(arguments, 2);
4901 return l43.fvalue(values, l42.fvalue(pv, v566));
4902 }), l244.fvalue(pv, v565));
4907 var l246 = {name: "LL-SVARS"};
4909 (l246).fvalue = (function(v570){
4910 ((v570)["fname"] = "LL-SVARS");
4912 })((function (values,v568){
4913 checkArgs(arguments, 2);
4915 return (function(v569){
4916 return l97.fvalue(values, l5.value, l81.fvalue(pv, (function(){
4918 var func = symbol.fvalue;
4919 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4922 })(l68.fvalue(pv, l244.fvalue(pv, v568), l241.fvalue(pv, v568)));
4927 var l247 = {name: "LAMBDA-DOCSTRING-WRAPPER"};
4929 (l247).fvalue = (function(v573){
4930 ((v573)["fname"] = "LAMBDA-DOCSTRING-WRAPPER");
4932 })((function (values,v572){
4933 checkArgsAtLeast(arguments, 2);
4935 for (var i = arguments.length-1; i>=2; i--)
4936 v571 = {car: arguments[i], cdr:
4939 return (v572 !== l5.value ? l191.fvalue(values, "(function(){", (function(){
4941 var value = symbol.value;
4942 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4944 })(), l195.fvalue(pv, "var func = ", l159.fvalue(pv, v571), ";", (function(){
4946 var value = symbol.value;
4947 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4949 })(), "func.docstring = '", v572, "';", (function(){
4951 var value = symbol.value;
4952 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4954 })(), "return func;", (function(){
4956 var value = symbol.value;
4957 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4959 })()), "})()") : (function(){
4960 var f = (function(){
4962 var func = symbol.fvalue;
4963 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4966 var args = [values];
4968 while (tail != l5.value){
4969 args.push(tail.car);
4972 return (typeof f === 'function'? f : f.fvalue).apply(this, args);
4978 var l248 = {name: "LAMBDA-CHECK-ARGUMENT-COUNT"};
4979 var l249 = {name: "N/A"};
4981 (l248).fvalue = (function(v579){
4982 ((v579)["fname"] = "LAMBDA-CHECK-ARGUMENT-COUNT");
4984 })((function (values,v574,v575,v576){
4985 checkArgs(arguments, 4);
4987 return (function(v577,v578){
4992 if (typeof x1 !== 'number') throw 'Not a number!';
4993 return (1<x1?l4.value: l5.value);
4994 })() !== l5.value ? l28.fvalue(pv, v577, v578) : l5.value) !== l5.value ? (function(){
4996 throw ({type: 'block', id: 207, values: l191.fvalue(values, "checkArgs(arguments, ", v577, ");", (function(){
4998 var value = symbol.value;
4999 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5001 })()), message: 'Return from unknown block NIL.'})
5003 return l191.fvalue(values, ((function(){
5005 if (typeof x1 !== 'number') throw 'Not a number!';
5006 return (1<x1?l4.value: l5.value);
5007 })() !== l5.value ? l191.fvalue(pv, "checkArgsAtLeast(arguments, ", v577, ");", (function(){
5009 var value = symbol.value;
5010 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5012 })()) : l5.value), (((typeof (v578) == "number")?l4.value: l5.value) !== l5.value ? l191.fvalue(pv, "checkArgsAtMost(arguments, ", v578, ");", (function(){
5014 var value = symbol.value;
5015 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5020 if (cf.type == 'block' && cf.id == 207)
5021 return values.apply(this, forcemv(cf.values));
5026 })(l24.fvalue(pv, v574),(v576 !== l5.value ? l249 : (function(){
5028 if (typeof x1 !== 'number') throw 'Not a number!';
5030 if (typeof x2 !== 'number') throw 'Not a number!';
5037 var l250 = {name: "COMPILE-LAMBDA-OPTIONAL"};
5039 (l250).fvalue = (function(v592){
5040 ((v592)["fname"] = "COMPILE-LAMBDA-OPTIONAL");
5042 })((function (values,v580){
5043 checkArgs(arguments, 2);
5046 var v581 = l241.fvalue(pv, v580);
5047 var v582 = l75.fvalue(pv, l240.fvalue(pv, v580));
5048 var v583 = l75.fvalue(pv, v581);
5049 return (v581 !== l5.value ? l191.fvalue(values, l161.fvalue(pv, (function (values,v584){
5050 checkArgs(arguments, 2);
5051 return l191.fvalue(values, "var ", l215.fvalue(pv, l42.fvalue(pv, v584)), "; ", (function(){
5053 var value = symbol.value;
5054 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5056 })(), (l44.fvalue(pv, v584) !== l5.value ? l191.fvalue(pv, "var ", l215.fvalue(pv, l44.fvalue(pv, v584)), " = ", l193.fvalue(pv, l4.value), "; ", (function(){
5058 var value = symbol.value;
5059 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5062 }), v581), "switch(arguments.length-1){", (function(){
5064 var value = symbol.value;
5065 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5067 })(), (function(v585,v586){
5073 if (typeof x1 !== 'number') throw 'Not a number!';
5075 if (typeof x2 !== 'number') throw 'Not a number!';
5076 return (x1<x2?l4.value: l5.value);
5080 var v588 = l191.fvalue(pv, "case ", (function(){
5082 if (typeof x1 !== 'number') throw 'Not a number!';
5084 if (typeof x2 !== 'number') throw 'Not a number!';
5086 })(), ":", (function(){
5088 var value = symbol.value;
5089 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5091 })(), l195.fvalue(pv, l215.fvalue(pv, (function(){
5093 return tmp === l5.value? l5.value: tmp.car;
5094 })()), "=", l193.fvalue(pv, l35.fvalue(pv, v587)), ";", (function(){
5096 var value = symbol.value;
5097 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5099 })()), (l44.fvalue(pv, v587) !== l5.value ? l195.fvalue(pv, l215.fvalue(pv, l44.fvalue(pv, v587)), "=", l193.fvalue(pv, l5.value), ";", (function(){
5101 var value = symbol.value;
5102 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5105 var v589 = ({car: v588, cdr: v585});
5106 return (v585 = v589);
5108 return (v586 = (function(){
5110 if (typeof x1 !== 'number') throw 'Not a number!';
5113 })(l93.fvalue(pv, v586, v581));
5118 var v590 = l191.fvalue(pv, "default: break;", (function(){
5120 var value = symbol.value;
5121 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5124 var v591 = ({car: v590, cdr: v585});
5125 return (v585 = v591);
5127 return l159.fvalue(pv, l70.fvalue(pv, v585));
5129 })(l5.value,0), "}", (function(){
5131 var value = symbol.value;
5132 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5140 var l251 = {name: "COMPILE-LAMBDA-REST"};
5142 (l251).fvalue = (function(v598){
5143 ((v598)["fname"] = "COMPILE-LAMBDA-REST");
5145 })((function (values,v593){
5146 checkArgs(arguments, 2);
5148 return (function(v594,v595,v596){
5149 return (v596 !== l5.value ? (function(v597){
5150 return l191.fvalue(values, "var ", v597, "= ", l193.fvalue(pv, l5.value), ";", (function(){
5152 var value = symbol.value;
5153 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5155 })(), "for (var i = arguments.length-1; i>=", (function(){
5157 if (typeof x1 !== 'number') throw 'Not a number!';
5159 if (typeof x2 !== 'number') throw 'Not a number!';
5161 })(), "; i--)", (function(){
5163 var value = symbol.value;
5164 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5166 })(), l195.fvalue(pv, v597, " = {car: arguments[i], cdr: "), v597, "};", (function(){
5168 var value = symbol.value;
5169 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5172 })(l215.fvalue(pv, v596)) : l5.value);
5173 })(l75.fvalue(pv, l240.fvalue(pv, v593)),l75.fvalue(pv, l242.fvalue(pv, v593)),l243.fvalue(pv, v593));
5178 var l252 = {name: "COMPILE-LAMBDA-PARSE-KEYWORDS"};
5180 (l252).fvalue = (function(v609){
5181 ((v609)["fname"] = "COMPILE-LAMBDA-PARSE-KEYWORDS");
5183 })((function (values,v599){
5184 checkArgs(arguments, 2);
5186 return (function(v600,v601,v602){
5187 return l191.fvalue(values, l161.fvalue(pv, (function (values,v603){
5188 checkArgs(arguments, 2);
5189 return (function(v604){
5190 return l191.fvalue(values, "var ", l215.fvalue(pv, v604), "; ", (function(){
5192 var value = symbol.value;
5193 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5195 })(), (l44.fvalue(pv, v603) !== l5.value ? l191.fvalue(pv, "var ", l215.fvalue(pv, l44.fvalue(pv, v603)), " = ", l193.fvalue(pv, l5.value), ";", (function(){
5197 var value = symbol.value;
5198 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5201 })(l43.fvalue(pv, (function(){
5203 return tmp === l5.value? l5.value: tmp.car;
5205 }), v602), (function(v607){
5206 return (v602 !== l5.value ? l191.fvalue(pv, "var i;", (function(){
5208 var value = symbol.value;
5209 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5211 })(), l161.fvalue(pv, v607, v602)) : l5.value);
5212 })((function (values,v605){
5213 checkArgs(arguments, 2);
5214 return l191.fvalue(values, "for (i=", (function(){
5216 if (typeof x1 !== 'number') throw 'Not a number!';
5218 if (typeof x2 !== 'number') throw 'Not a number!';
5220 })(), "; i<arguments.length; i+=2){", (function(){
5222 var value = symbol.value;
5223 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5225 })(), l195.fvalue(pv, "if (arguments[i] === ", l193.fvalue(pv, l34.fvalue(pv, v605)), "){", (function(){
5227 var value = symbol.value;
5228 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5230 })(), l195.fvalue(pv, l215.fvalue(pv, l35.fvalue(pv, (function(){
5232 return tmp === l5.value? l5.value: tmp.car;
5233 })())), " = arguments[i+1];", (function(){
5235 var value = symbol.value;
5236 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5238 })(), (function(v606){
5239 return (v606 !== l5.value ? l191.fvalue(pv, l215.fvalue(pv, v606), " = ", l193.fvalue(pv, l4.value), ";", (function(){
5241 var value = symbol.value;
5242 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5245 })(l44.fvalue(pv, v605)), "break;", (function(){
5247 var value = symbol.value;
5248 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5250 })()), "}", (function(){
5252 var value = symbol.value;
5253 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5255 })()), "}", (function(){
5257 var value = symbol.value;
5258 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5260 })(), "if (i == arguments.length){", (function(){
5262 var value = symbol.value;
5263 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5265 })(), l195.fvalue(pv, l215.fvalue(pv, l35.fvalue(pv, (function(){
5267 return tmp === l5.value? l5.value: tmp.car;
5268 })())), " = ", l193.fvalue(pv, l35.fvalue(pv, v605)), ";", (function(){
5270 var value = symbol.value;
5271 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5273 })()), "}", (function(){
5275 var value = symbol.value;
5276 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5279 })), (v602 !== l5.value ? l191.fvalue(pv, "for (i=", (function(){
5281 if (typeof x1 !== 'number') throw 'Not a number!';
5283 if (typeof x2 !== 'number') throw 'Not a number!';
5285 })(), "; i<arguments.length; i+=2){", (function(){
5287 var value = symbol.value;
5288 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5290 })(), l195.fvalue(pv, "if (", l159.fvalue(pv, l81.fvalue(pv, (function (values,v608){
5291 checkArgs(arguments, 2);
5292 return l157.fvalue(values, "arguments[i] !== ", l193.fvalue(pv, l34.fvalue(pv, v608)));
5293 }), v602), " && "), ")", (function(){
5295 var value = symbol.value;
5296 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5298 })(), l195.fvalue(pv, "throw 'Unknown keyword argument ' + arguments[i].name;", (function(){
5300 var value = symbol.value;
5301 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5303 })())), "}", (function(){
5305 var value = symbol.value;
5306 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5309 })(l75.fvalue(pv, l240.fvalue(pv, v599)),l75.fvalue(pv, l242.fvalue(pv, v599)),l244.fvalue(pv, v599));
5314 var l253 = {name: "COMPILE-LAMBDA"};
5315 var l254 = {name: "LS-COMPILE-BLOCK"};
5317 (l253).fvalue = (function(v622){
5318 ((v622)["fname"] = "COMPILE-LAMBDA");
5320 })((function (values,v610,v611){
5321 checkArgs(arguments, 3);
5323 return (function(v612,v613,v614,v615,v616){
5324 ((((typeof((function(){
5326 return tmp === l5.value? l5.value: tmp.car;
5327 })()) == "string")?l4.value: l5.value) !== l5.value ? l29.fvalue(pv, l13.fvalue(pv, (function(){
5329 return tmp === l5.value? l5.value: tmp.cdr;
5330 })())) : l5.value) !== l5.value ? (function(){
5331 (v616 = (function(){
5333 return tmp === l5.value? l5.value: tmp.car;
5335 return (v611 = (function(){
5337 return tmp === l5.value? l5.value: tmp.cdr;
5340 return (function(v617,v618,v619){
5346 return l247.fvalue(values, v616, "(function (", l159.fvalue(pv, ({car: "values", cdr: l81.fvalue(pv, (function(){
5348 var func = symbol.fvalue;
5349 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5351 })(), l68.fvalue(pv, v612, v613))}), ","), "){", (function(){
5353 var value = symbol.value;
5354 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5356 })(), l195.fvalue(pv, l248.fvalue(pv, v617, v618, (function(v620){
5357 return (v620 !== l5.value ? v620 : v614);
5358 })(v615)), l250.fvalue(pv, v610), l251.fvalue(pv, v610), l252.fvalue(pv, v610), (function(v621){
5364 return l254.fvalue(pv, v611, l4.value);
5369 })(l4.value)), "})");
5374 })(l75.fvalue(pv, v612),l75.fvalue(pv, v613),l216.fvalue(pv, l68.fvalue(pv, l61.fvalue(pv, v615), v612, v613, v614, l246.fvalue(pv, v610))));
5375 })(l240.fvalue(pv, v610),l242.fvalue(pv, v610),l245.fvalue(pv, v610),l243.fvalue(pv, v610),l5.value);
5380 var l255 = {name: "SETQ-PAIR"};
5381 var l256 = {name: "SET"};
5383 (l255).fvalue = (function(v626){
5384 ((v626)["fname"] = "SETQ-PAIR");
5386 })((function (values,v623,v624){
5387 checkArgs(arguments, 3);
5389 return (function(v625){
5390 return ((((l199.fvalue(pv, v625) === l114)?l4.value: l5.value) !== l5.value ? (l29.fvalue(pv, l96.fvalue(pv, l226, l201.fvalue(pv, v625))) !== l5.value ? l29.fvalue(pv, l96.fvalue(pv, l228, l201.fvalue(pv, v625))) : l5.value) : l5.value) !== l5.value ? l191.fvalue(values, l200.fvalue(pv, v625), " = ", l193.fvalue(pv, v624)) : l193.fvalue(values, l47.fvalue(pv, l256, l47.fvalue(pv, l186, v623), v624)));
5391 })(l211.fvalue(pv, v623, (function(){
5393 var value = symbol.value;
5394 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5402 var v627 = l47.fvalue(pv, l119, (function (values){
5404 for (var i = arguments.length-1; i>=1; i--)
5405 v628 = {car: arguments[i], cdr:
5408 return (function(v629){
5412 while(l4.value !== l5.value){
5413 (l13.fvalue(pv, v628) !== l5.value ? (function(){
5414 throw ({type: 'block', id: 215, values: l5.value, message: 'Return from unknown block NIL.'})
5415 })() : (l13.fvalue(pv, (function(){
5417 return tmp === l5.value? l5.value: tmp.cdr;
5418 })()) !== l5.value ? (function(){
5419 throw "Odd paris in SETQ";
5421 (v629 = l157.fvalue(pv, v629, l157.fvalue(pv, l255.fvalue(pv, (function(){
5423 return tmp === l5.value? l5.value: tmp.car;
5424 })(), l35.fvalue(pv, v628)), (l13.fvalue(pv, l37.fvalue(pv, v628)) !== l5.value ? "" : ", "))));
5425 return (v628 = l37.fvalue(pv, v628));
5431 if (cf.type == 'block' && cf.id == 215)
5437 return l191.fvalue(values, "(", v629, ")");
5441 var v630 = ({car: v627, cdr: (function(){
5443 var value = symbol.value;
5444 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5447 return ((l230).value = v630);
5449 var l257 = {name: "JS-VREF"};
5451 var v631 = l47.fvalue(pv, l257, (function (values,v632){
5452 checkArgs(arguments, 2);
5457 var v633 = ({car: v631, cdr: (function(){
5459 var value = symbol.value;
5460 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5463 return ((l230).value = v633);
5465 var l258 = {name: "JS-VSET"};
5467 var v634 = l47.fvalue(pv, l258, (function (values,v635,v636){
5468 checkArgs(arguments, 3);
5470 return l191.fvalue(values, "(", v635, " = ", l193.fvalue(pv, v636), ")");
5473 var v637 = ({car: v634, cdr: (function(){
5475 var value = symbol.value;
5476 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5479 return ((l230).value = v637);
5482 (l167).fvalue = (function(v644){
5483 ((v644)["fname"] = "ESCAPE-STRING");
5485 })((function (values,v638){
5486 checkArgs(arguments, 2);
5488 return (function(v639,v640,v641){
5493 if (typeof x1 !== 'number') throw 'Not a number!';
5495 if (typeof x2 !== 'number') throw 'Not a number!';
5496 return (x1<x2?l4.value: l5.value);
5500 return (v643 !== l5.value ? v643 : l88.fvalue(pv, v642, 92));
5501 })(l88.fvalue(pv, v642, 34)) !== l5.value ? (v639 = l157.fvalue(pv, v639, "\\")) : l5.value);
5502 (l88.fvalue(pv, v642, 10) !== l5.value ? (function(){
5503 (v639 = l157.fvalue(pv, v639, "\\"));
5504 return (v642 = 110);
5506 return (v639 = l157.fvalue(pv, v639, l107.fvalue(pv, v642)));
5510 if (typeof string != 'string')
5511 throw 'The value ' + string + ' is not a type string.';
5512 if (typeof index != 'number')
5513 throw 'The value ' + index + ' is not a type number.';
5514 return string.charCodeAt(index);
5516 (v640 = (function(){
5518 if (typeof x1 !== 'number') throw 'Not a number!';
5525 })("",0,l75.fvalue(pv, v638));
5530 var l259 = {name: "*LITERAL-SYMBOLS*"};
5532 (((l259.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l259).value = l5.value));
5535 var l260 = {name: "*LITERAL-COUNTER*"};
5537 (((l260.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l260).value = 0));
5540 var l261 = {name: "GENLIT"};
5542 (l261).fvalue = (function(v645){
5543 ((v645)["fname"] = "GENLIT");
5545 })((function (values){
5546 checkArgsAtMost(arguments, 1);
5548 return l191.fvalue(values, "l", ((l260).value = (function(){
5549 var x1 = (function(){
5551 var value = symbol.value;
5552 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5555 if (typeof x1 !== 'number') throw 'Not a number!';
5562 var l262 = {name: "LITERAL"};
5564 (l262).fvalue = (function(v662){
5565 ((v662)["fname"] = "LITERAL");
5567 })((function (values,v646,v647){
5568 checkArgsAtLeast(arguments, 2);
5569 checkArgsAtMost(arguments, 3);
5571 switch(arguments.length-1){
5577 return (l89.fvalue(pv, v646) !== l5.value ? l19.fvalue(values, v646) : (((typeof(v646) == "string")?l4.value: l5.value) !== l5.value ? l191.fvalue(values, "\"", l167.fvalue(pv, v646), "\"") : (((function(){
5579 return (typeof tmp == 'object' && 'name' in tmp);
5580 })()?l4.value: l5.value) !== l5.value ? (function(v648){
5581 return (v648 !== l5.value ? v648 : (function(v650,v651){
5583 var v652 = ({car: v646, cdr: v650});
5584 var v653 = ({car: v652, cdr: (function(){
5586 var value = symbol.value;
5587 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5590 return ((l259).value = v653);
5592 l218.fvalue(pv, l191.fvalue(pv, "var ", v650, " = ", v651));
5594 })(l261.fvalue(pv),(function(v649){
5595 return (l13.fvalue(pv, v649) !== l5.value ? l191.fvalue(pv, "{name: \"", l167.fvalue(pv, (v646).name), "\"}") : l193.fvalue(pv, l47.fvalue(pv, l153, (v646).name, l137.fvalue(pv, v649))));
5596 })(l145.fvalue(pv, v646))));
5598 var tmp = l106.fvalue(pv, v646, (function(){
5600 var value = symbol.value;
5601 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5604 return tmp === l5.value? l5.value: tmp.cdr;
5605 })()) : (((function(){
5607 return (typeof tmp == 'object' && 'car' in tmp);
5608 })()?l4.value: l5.value) !== l5.value ? (function(){
5609 var v654 = l95.fvalue(pv, v646);
5610 var v655 = l94.fvalue(pv, v646);
5611 var v656 = l191.fvalue(pv, "QIList(", l160.fvalue(pv, l81.fvalue(pv, (function (values,v657){
5612 checkArgs(arguments, 2);
5613 return l262.fvalue(values, v657, l4.value);
5614 }), v654), ","), l262.fvalue(pv, (function(){
5616 return tmp === l5.value? l5.value: tmp.car;
5617 })(), l4.value), ",", l262.fvalue(pv, (function(){
5619 return tmp === l5.value? l5.value: tmp.cdr;
5620 })(), l4.value), ")");
5621 return (v647 !== l5.value ? v656 : (function(v658){
5622 l218.fvalue(pv, l191.fvalue(pv, "var ", v658, " = ", v656));
5624 })(l261.fvalue(pv)));
5625 })() : (((function(){
5627 return typeof x === 'object' && 'length' in x;
5628 })()?l4.value: l5.value) !== l5.value ? (function(v659){
5629 return (function(v660){
5630 return (v647 !== l5.value ? v660 : (function(v661){
5631 l218.fvalue(pv, l191.fvalue(pv, "var ", v661, " = ", v660));
5633 })(l261.fvalue(pv)));
5634 })(l157.fvalue(pv, "[", l159.fvalue(pv, l81.fvalue(pv, (function(){
5636 var func = symbol.fvalue;
5637 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5639 })(), v659), ", "), "]"));
5640 })(l162.fvalue(pv, v646)) : l5.value)))));
5646 var v663 = l47.fvalue(pv, l186, (function (values,v664){
5647 checkArgs(arguments, 2);
5649 return l262.fvalue(values, v664);
5652 var v665 = ({car: v663, cdr: (function(){
5654 var value = symbol.value;
5655 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5658 return ((l230).value = v665);
5660 var l263 = {name: "%WHILE"};
5662 var v666 = l47.fvalue(pv, l263, (function (values,v668){
5663 checkArgsAtLeast(arguments, 2);
5665 for (var i = arguments.length-1; i>=2; i--)
5666 v667 = {car: arguments[i], cdr:
5669 return l191.fvalue(values, "(function(){", (function(){
5671 var value = symbol.value;
5672 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5674 })(), l195.fvalue(pv, "while(", l193.fvalue(pv, v668), " !== ", l193.fvalue(pv, l5.value), "){", (function(){
5676 var value = symbol.value;
5677 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5679 })(), l195.fvalue(pv, l254.fvalue(pv, v667)), "}", "return ", l193.fvalue(pv, l5.value), ";", (function(){
5681 var value = symbol.value;
5682 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5687 var v669 = ({car: v666, cdr: (function(){
5689 var value = symbol.value;
5690 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5693 return ((l230).value = v669);
5695 var l264 = {name: "SYMBOL-FUNCTION"};
5697 var v670 = l47.fvalue(pv, l113, (function (values,v671){
5698 checkArgs(arguments, 2);
5700 return ((l62.fvalue(pv, v671) !== l5.value ? (((function(){
5702 return tmp === l5.value? l5.value: tmp.car;
5703 })() === l6)?l4.value: l5.value) : l5.value) !== l5.value ? l253.fvalue(values, l35.fvalue(pv, v671), l37.fvalue(pv, v671)) : (((function(){
5705 return (typeof tmp == 'object' && 'name' in tmp);
5706 })()?l4.value: l5.value) !== l5.value ? (function(v672){
5707 return (v672 !== l5.value ? l200.fvalue(values, v672) : l193.fvalue(values, l47.fvalue(pv, l264, l47.fvalue(pv, l186, v671))));
5708 })(l211.fvalue(pv, v671, (function(){
5710 var value = symbol.value;
5711 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5713 })(), l113)) : l5.value));
5716 var v673 = ({car: v670, cdr: (function(){
5718 var value = symbol.value;
5719 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5722 return ((l230).value = v673);
5724 var l265 = {name: "MAKE-FUNCTION-BINDING"};
5726 (l265).fvalue = (function(v675){
5727 ((v675)["fname"] = "MAKE-FUNCTION-BINDING");
5729 })((function (values,v674){
5730 checkArgs(arguments, 2);
5732 return l197.fvalue(values, v674, l113, l214.fvalue(pv, v674));
5737 var l266 = {name: "COMPILE-FUNCTION-DEFINITION"};
5739 (l266).fvalue = (function(v677){
5740 ((v677)["fname"] = "COMPILE-FUNCTION-DEFINITION");
5742 })((function (values,v676){
5743 checkArgs(arguments, 2);
5745 return l253.fvalue(values, (function(){
5747 return tmp === l5.value? l5.value: tmp.car;
5750 return tmp === l5.value? l5.value: tmp.cdr;
5756 var l267 = {name: "TRANSLATE-FUNCTION"};
5758 (l267).fvalue = (function(v680){
5759 ((v680)["fname"] = "TRANSLATE-FUNCTION");
5761 })((function (values,v678){
5762 checkArgs(arguments, 2);
5764 return (function(v679){
5765 return l200.fvalue(values, v679);
5766 })(l211.fvalue(pv, v678, (function(){
5768 var value = symbol.value;
5769 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5776 var l268 = {name: "FLET"};
5778 var v681 = l47.fvalue(pv, l268, (function (values,v683){
5779 checkArgsAtLeast(arguments, 2);
5781 for (var i = arguments.length-1; i>=2; i--)
5782 v682 = {car: arguments[i], cdr:
5787 var v688 = l212.value;
5788 var v684 = l81.fvalue(pv, (function(){
5790 var func = symbol.fvalue;
5791 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5794 var v685 = l81.fvalue(pv, (function(){
5796 var func = symbol.fvalue;
5797 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5800 var v686 = l81.fvalue(pv, (function(){
5802 var func = symbol.fvalue;
5803 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5806 ((l212).value = l210.fvalue(pv, l81.fvalue(pv, (function(){
5808 var func = symbol.fvalue;
5809 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5811 })(), v684), (function(){
5813 var value = symbol.value;
5814 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5817 return l191.fvalue(values, "(function(", l159.fvalue(pv, l81.fvalue(pv, (function(){
5819 var func = symbol.fvalue;
5820 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5822 })(), v684), ","), "){", (function(){
5824 var value = symbol.value;
5825 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5827 })(), (function(v687){
5828 return l195.fvalue(pv, v687);
5829 })(l254.fvalue(pv, v682, l4.value)), "})(", l159.fvalue(pv, v686, ","), ")");
5837 var v689 = ({car: v681, cdr: (function(){
5839 var value = symbol.value;
5840 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5843 return ((l230).value = v689);
5845 var l269 = {name: "LABELS"};
5847 var v690 = l47.fvalue(pv, l269, (function (values,v692){
5848 checkArgsAtLeast(arguments, 2);
5850 for (var i = arguments.length-1; i>=2; i--)
5851 v691 = {car: arguments[i], cdr:
5856 var v695 = l212.value;
5857 var v693 = l81.fvalue(pv, (function(){
5859 var func = symbol.fvalue;
5860 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5863 ((l212).value = l210.fvalue(pv, l81.fvalue(pv, (function(){
5865 var func = symbol.fvalue;
5866 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5868 })(), v693), (function(){
5870 var value = symbol.value;
5871 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5874 return l191.fvalue(values, "(function(){", (function(){
5876 var value = symbol.value;
5877 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5879 })(), l195.fvalue(pv, l161.fvalue(pv, (function (values,v694){
5880 checkArgs(arguments, 2);
5881 return l191.fvalue(values, "var ", l267.fvalue(pv, (function(){
5883 return tmp === l5.value? l5.value: tmp.car;
5884 })()), " = ", l253.fvalue(pv, l35.fvalue(pv, v694), l37.fvalue(pv, v694)), ";", (function(){
5886 var value = symbol.value;
5887 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5890 }), v692), l254.fvalue(pv, v691, l4.value)), "})()");
5898 var v696 = ({car: v690, cdr: (function(){
5900 var value = symbol.value;
5901 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5904 return ((l230).value = v696);
5906 var l270 = {name: "*COMPILING-FILE*"};
5908 (((l270.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l270).value = l5.value));
5911 var l271 = {name: "EVAL-WHEN-COMPILE"};
5912 var l272 = {name: "EVAL"};
5914 var v697 = l47.fvalue(pv, l271, (function (values){
5916 for (var i = arguments.length-1; i>=1; i--)
5917 v698 = {car: arguments[i], cdr:
5920 return ((function(){
5922 var value = symbol.value;
5923 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5925 })() !== l5.value ? (function(){
5926 l272.fvalue(pv, ({car: l123, cdr: v698}));
5928 })() : l193.fvalue(values, ({car: l123, cdr: v698})));
5931 var v699 = ({car: v697, cdr: (function(){
5933 var value = symbol.value;
5934 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5937 return ((l230).value = v699);
5939 var l273 = {name: "DEFINE-TRANSFORMATION"};
5942 var v700 = l47.fvalue(pv, l123, (function (values){
5944 for (var i = arguments.length-1; i>=1; i--)
5945 v701 = {car: arguments[i], cdr:
5948 return (l13.fvalue(pv, (function(){
5950 return tmp === l5.value? l5.value: tmp.cdr;
5951 })()) !== l5.value ? l193.fvalue(values, (function(){
5953 return tmp === l5.value? l5.value: tmp.car;
5956 var value = symbol.value;
5957 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5959 })()) : l191.fvalue(values, "(function(){", (function(){
5961 var value = symbol.value;
5962 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5964 })(), l195.fvalue(pv, l254.fvalue(pv, v701, l4.value)), "})()"));
5967 var v702 = ({car: v700, cdr: (function(){
5969 var value = symbol.value;
5970 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5973 return ((l230).value = v702);
5975 var l274 = {name: "SPECIAL-VARIABLE-P"};
5977 (l274).fvalue = (function(v704){
5978 ((v704)["fname"] = "SPECIAL-VARIABLE-P");
5980 })((function (values,v703){
5981 checkArgs(arguments, 2);
5983 return (l224.fvalue(pv, v703, l114, l226) !== l5.value ? l4.value : l5.value);
5988 var l275 = {name: "LET-BINDING-WRAPPER"};
5990 (l275).fvalue = (function(v711){
5991 ((v711)["fname"] = "LET-BINDING-WRAPPER");
5993 })((function (values,v705,v706){
5994 checkArgs(arguments, 3);
5997 (l13.fvalue(pv, v705) !== l5.value ? (function(){
5999 throw ({type: 'block', id: 233, values: v706, message: 'Return from unknown block LET-BINDING-WRAPPER.'})
6001 return l191.fvalue(values, "try {", (function(){
6003 var value = symbol.value;
6004 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6006 })(), l195.fvalue(pv, "var tmp;", (function(){
6008 var value = symbol.value;
6009 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6011 })(), l161.fvalue(pv, (function (values,v707){
6012 checkArgs(arguments, 2);
6013 return (function(v708){
6014 return l191.fvalue(values, "tmp = ", v708, ".value;", (function(){
6016 var value = symbol.value;
6017 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6019 })(), v708, ".value = ", (function(){
6021 return tmp === l5.value? l5.value: tmp.cdr;
6022 })(), ";", (function(){
6024 var value = symbol.value;
6025 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6029 return tmp === l5.value? l5.value: tmp.cdr;
6030 })(), " = tmp;", (function(){
6032 var value = symbol.value;
6033 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6036 })(l193.fvalue(pv, l47.fvalue(pv, l186, (function(){
6038 return tmp === l5.value? l5.value: tmp.car;
6040 }), v705), v706, (function(){
6042 var value = symbol.value;
6043 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6045 })()), "}", (function(){
6047 var value = symbol.value;
6048 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6050 })(), "finally {", (function(){
6052 var value = symbol.value;
6053 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6055 })(), l195.fvalue(pv, l161.fvalue(pv, (function (values,v709){
6056 checkArgs(arguments, 2);
6057 return (function(v710){
6058 return l191.fvalue(values, v710, ".value", " = ", (function(){
6060 return tmp === l5.value? l5.value: tmp.cdr;
6061 })(), ";", (function(){
6063 var value = symbol.value;
6064 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6067 })(l193.fvalue(pv, l47.fvalue(pv, l186, (function(){
6069 return tmp === l5.value? l5.value: tmp.car;
6071 }), v705)), "}", (function(){
6073 var value = symbol.value;
6074 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6079 if (cf.type == 'block' && cf.id == 233)
6080 return values.apply(this, forcemv(cf.values));
6088 var l276 = {name: "LET"};
6090 var v712 = l47.fvalue(pv, l276, (function (values,v714){
6091 checkArgsAtLeast(arguments, 2);
6093 for (var i = arguments.length-1; i>=2; i--)
6094 v713 = {car: arguments[i], cdr:
6099 var v724 = l212.value;
6100 var v715 = l81.fvalue(pv, (function(){
6102 var func = symbol.fvalue;
6103 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6106 var v716 = l81.fvalue(pv, (function(){
6108 var func = symbol.fvalue;
6109 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6112 var v717 = l81.fvalue(pv, (function(){
6114 var func = symbol.fvalue;
6115 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6117 })(), l81.fvalue(pv, (function(){
6119 var func = symbol.fvalue;
6120 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6123 ((l212).value = l216.fvalue(pv, l98.fvalue(pv, (function(){
6125 var func = symbol.fvalue;
6126 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6129 var v718 = l5.value;
6130 return l191.fvalue(values, "(function(", l159.fvalue(pv, l81.fvalue(pv, (function (values,v719){
6131 checkArgs(arguments, 2);
6132 return (l274.fvalue(pv, v719) !== l5.value ? (function(v720){
6134 var v721 = ({car: v719, cdr: v720});
6135 var v722 = ({car: v721, cdr: v718});
6136 return (v718 = v722);
6139 })(l214.fvalue(pv, v719)) : l215.fvalue(values, v719));
6140 }), v716), ","), "){", (function(){
6142 var value = symbol.value;
6143 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6145 })(), (function(v723){
6146 return l195.fvalue(pv, l275.fvalue(pv, v718, v723));
6147 })(l254.fvalue(pv, v713, l4.value)), "})(", l159.fvalue(pv, v717, ","), ")");
6155 var v725 = ({car: v712, cdr: (function(){
6157 var value = symbol.value;
6158 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6161 return ((l230).value = v725);
6163 var l277 = {name: "LET*-INITIALIZE-VALUE"};
6165 (l277).fvalue = (function(v732){
6166 ((v732)["fname"] = "LET*-INITIALIZE-VALUE");
6168 })((function (values,v726){
6169 checkArgs(arguments, 2);
6171 return (function(v727,v728){
6172 return (l274.fvalue(pv, v727) !== l5.value ? l191.fvalue(values, l193.fvalue(pv, l47.fvalue(pv, l119, v727, v728)), ";", (function(){
6174 var value = symbol.value;
6175 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6177 })()) : (function(){
6178 var v729 = l214.fvalue(pv, v727);
6179 var v730 = l197.fvalue(pv, v727, l114, v729);
6180 return (function(v731){
6181 l207.fvalue(pv, v730, (function(){
6183 var value = symbol.value;
6184 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6188 })(l191.fvalue(pv, "var ", v729, " = ", l193.fvalue(pv, v728), ";", (function(){
6190 var value = symbol.value;
6191 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6195 })(l42.fvalue(pv, v726),l43.fvalue(pv, v726));
6200 var l278 = {name: "LET*-BINDING-WRAPPER"};
6202 (l278).fvalue = (function(v741){
6203 ((v741)["fname"] = "LET*-BINDING-WRAPPER");
6205 })((function (values,v733,v734){
6206 checkArgs(arguments, 3);
6209 (l13.fvalue(pv, v733) !== l5.value ? (function(){
6211 throw ({type: 'block', id: 236, values: v734, message: 'Return from unknown block LET*-BINDING-WRAPPER.'})
6213 return (function(v736){
6214 return l191.fvalue(values, "try {", (function(){
6216 var value = symbol.value;
6217 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6219 })(), l195.fvalue(pv, l161.fvalue(pv, (function (values,v737){
6220 checkArgs(arguments, 2);
6221 return (function(v738){
6222 return l191.fvalue(values, "var ", (function(){
6224 return tmp === l5.value? l5.value: tmp.cdr;
6225 })(), " = ", v738, ".value;", (function(){
6227 var value = symbol.value;
6228 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6231 })(l193.fvalue(pv, l47.fvalue(pv, l186, (function(){
6233 return tmp === l5.value? l5.value: tmp.car;
6235 }), v736), v734), "}", (function(){
6237 var value = symbol.value;
6238 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6240 })(), "finally {", (function(){
6242 var value = symbol.value;
6243 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6245 })(), l195.fvalue(pv, l161.fvalue(pv, (function (values,v739){
6246 checkArgs(arguments, 2);
6247 return (function(v740){
6248 return l191.fvalue(values, v740, ".value", " = ", (function(){
6250 return tmp === l5.value? l5.value: tmp.cdr;
6251 })(), ";", (function(){
6253 var value = symbol.value;
6254 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6257 })(l193.fvalue(pv, l47.fvalue(pv, l186, (function(){
6259 return tmp === l5.value? l5.value: tmp.car;
6261 }), v736)), "}", (function(){
6263 var value = symbol.value;
6264 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6267 })(l81.fvalue(pv, (function (values,v735){
6268 checkArgs(arguments, 2);
6269 return ({car: v735, cdr: l214.fvalue(pv, v735)});
6270 }), l99.fvalue(pv, (function(){
6272 var func = symbol.fvalue;
6273 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6278 if (cf.type == 'block' && cf.id == 236)
6279 return values.apply(this, forcemv(cf.values));
6287 var l279 = {name: "LET*"};
6289 var v742 = l47.fvalue(pv, l279, (function (values,v744){
6290 checkArgsAtLeast(arguments, 2);
6292 for (var i = arguments.length-1; i>=2; i--)
6293 v743 = {car: arguments[i], cdr:
6296 return (function(v745,v746){
6302 return l191.fvalue(values, "(function(){", (function(){
6304 var value = symbol.value;
6305 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6307 })(), l195.fvalue(pv, (function(v747,v748){
6308 return l278.fvalue(pv, v747, v748);
6309 })(l99.fvalue(pv, (function(){
6311 var func = symbol.fvalue;
6312 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6314 })(), l81.fvalue(pv, (function(){
6316 var func = symbol.fvalue;
6317 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6319 })(), v745)),l157.fvalue(pv, l161.fvalue(pv, (function(){
6321 var func = symbol.fvalue;
6322 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6324 })(), v745), l254.fvalue(pv, v743, l4.value)))), "})()");
6329 })(l81.fvalue(pv, (function(){
6331 var func = symbol.fvalue;
6332 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6334 })(), v744),l206.fvalue(pv, (function(){
6336 var value = symbol.value;
6337 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6342 var v749 = ({car: v742, cdr: (function(){
6344 var value = symbol.value;
6345 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6348 return ((l230).value = v749);
6350 var l280 = {name: "*BLOCK-COUNTER*"};
6352 (((l280.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l280).value = 0));
6355 var l281 = {name: "MULTIPLE-VALUE"};
6356 var l282 = {name: "USED"};
6358 var v750 = l47.fvalue(pv, l208, (function (values,v752){
6359 checkArgsAtLeast(arguments, 2);
6361 for (var i = arguments.length-1; i>=2; i--)
6362 v751 = {car: arguments[i], cdr:
6366 var v753 = ((l280).value = (function(){
6367 var x1 = (function(){
6369 var value = symbol.value;
6370 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6373 if (typeof x1 !== 'number') throw 'Not a number!';
6376 var v754 = l197.fvalue(pv, v752, l208, v753);
6379 var value = symbol.value;
6380 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6382 })() !== l5.value ? l204.fvalue(pv, l281, v754) : l5.value);
6385 var v756 = l212.value;
6386 ((l212).value = l210.fvalue(pv, l47.fvalue(pv, v754), (function(){
6388 var value = symbol.value;
6389 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6392 var v755 = l254.fvalue(pv, v751, l4.value);
6393 return (l96.fvalue(pv, l282, l201.fvalue(pv, v754)) !== l5.value ? l191.fvalue(values, "(function(){", (function(){
6395 var value = symbol.value;
6396 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6398 })(), l195.fvalue(pv, "try {", (function(){
6400 var value = symbol.value;
6401 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6403 })(), l195.fvalue(pv, v755), "}", (function(){
6405 var value = symbol.value;
6406 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6408 })(), "catch (cf){", (function(){
6410 var value = symbol.value;
6411 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6413 })(), " if (cf.type == 'block' && cf.id == ", v753, ")", (function(){
6415 var value = symbol.value;
6416 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6420 var value = symbol.value;
6421 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6423 })() !== l5.value ? " return values.apply(this, forcemv(cf.values));" : " return cf.values;"), (function(){
6425 var value = symbol.value;
6426 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6428 })(), " else", (function(){
6430 var value = symbol.value;
6431 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6433 })(), " throw cf;", (function(){
6435 var value = symbol.value;
6436 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6438 })(), "}", (function(){
6440 var value = symbol.value;
6441 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6443 })()), "})()") : l191.fvalue(values, "(function(){", (function(){
6445 var value = symbol.value;
6446 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6448 })(), l195.fvalue(pv, v755), "})()"));
6457 var v757 = ({car: v750, cdr: (function(){
6459 var value = symbol.value;
6460 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6463 return ((l230).value = v757);
6465 var l283 = {name: "RETURN-FROM"};
6467 var v758 = l47.fvalue(pv, l283, (function (values,v759,v760){
6468 checkArgsAtLeast(arguments, 2);
6469 checkArgsAtMost(arguments, 3);
6471 switch(arguments.length-1){
6478 var v761 = l211.fvalue(pv, v759, (function(){
6480 var value = symbol.value;
6481 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6484 var v762 = l96.fvalue(pv, l281, l201.fvalue(pv, v761));
6485 (l13.fvalue(pv, v761) !== l5.value ? (function(){
6486 throw l157.fvalue(pv, "Unknown block `", (v759).name, "'.");
6488 l204.fvalue(pv, l282, v761);
6489 return l191.fvalue(values, "(function(){", (function(){
6491 var value = symbol.value;
6492 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6494 })(), l195.fvalue(pv, (v762 !== l5.value ? l191.fvalue(pv, "var values = mv;", (function(){
6496 var value = symbol.value;
6497 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6499 })()) : l5.value), "throw ({", "type: 'block', ", "id: ", l200.fvalue(pv, v761), ", ", "values: ", l193.fvalue(pv, v760, v762), ", ", "message: 'Return from unknown block ", (v759).name, ".'", "})"), "})()");
6503 var v763 = ({car: v758, cdr: (function(){
6505 var value = symbol.value;
6506 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6509 return ((l230).value = v763);
6511 var l284 = {name: "CATCH"};
6513 var v764 = l47.fvalue(pv, l284, (function (values,v766){
6514 checkArgsAtLeast(arguments, 2);
6516 for (var i = arguments.length-1; i>=2; i--)
6517 v765 = {car: arguments[i], cdr:
6520 return l191.fvalue(values, "(function(){", (function(){
6522 var value = symbol.value;
6523 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6525 })(), l195.fvalue(pv, "var id = ", l193.fvalue(pv, v766), ";", (function(){
6527 var value = symbol.value;
6528 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6530 })(), "try {", (function(){
6532 var value = symbol.value;
6533 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6535 })(), l195.fvalue(pv, l254.fvalue(pv, v765, l4.value)), (function(){
6537 var value = symbol.value;
6538 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6540 })(), "}", (function(){
6542 var value = symbol.value;
6543 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6545 })(), "catch (cf){", (function(){
6547 var value = symbol.value;
6548 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6550 })(), " if (cf.type == 'catch' && cf.id == id)", (function(){
6552 var value = symbol.value;
6553 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6557 var value = symbol.value;
6558 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6560 })() !== l5.value ? " return values.apply(this, forcemv(cf.values));" : " return pv.apply(this, forcemv(cf.values));"), (function(){
6562 var value = symbol.value;
6563 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6565 })(), " else", (function(){
6567 var value = symbol.value;
6568 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6570 })(), " throw cf;", (function(){
6572 var value = symbol.value;
6573 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6575 })(), "}", (function(){
6577 var value = symbol.value;
6578 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6583 var v767 = ({car: v764, cdr: (function(){
6585 var value = symbol.value;
6586 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6589 return ((l230).value = v767);
6591 var l285 = {name: "THROW"};
6593 var v768 = l47.fvalue(pv, l285, (function (values,v769,v770){
6594 checkArgs(arguments, 3);
6596 return l191.fvalue(values, "(function(){", (function(){
6598 var value = symbol.value;
6599 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6601 })(), l195.fvalue(pv, "var values = mv;", (function(){
6603 var value = symbol.value;
6604 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6606 })(), "throw ({", "type: 'catch', ", "id: ", l193.fvalue(pv, v769), ", ", "values: ", l193.fvalue(pv, v770, l4.value), ", ", "message: 'Throw uncatched.'", "})"), "})()");
6609 var v771 = ({car: v768, cdr: (function(){
6611 var value = symbol.value;
6612 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6615 return ((l230).value = v771);
6617 var l286 = {name: "*TAGBODY-COUNTER*"};
6619 (((l286.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l286).value = 0));
6622 var l287 = {name: "*GO-TAG-COUNTER*"};
6624 (((l287.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l287).value = 0));
6627 var l288 = {name: "GO-TAG-P"};
6629 (l288).fvalue = (function(v774){
6630 ((v774)["fname"] = "GO-TAG-P");
6632 })((function (values,v772){
6633 checkArgs(arguments, 2);
6635 return (function(v773){
6636 return (v773 !== l5.value ? v773 : ((function(){
6638 return (typeof tmp == 'object' && 'name' in tmp);
6639 })()?l4.value: l5.value));
6640 })(l89.fvalue(pv, v772));
6645 var l289 = {name: "DECLARE-TAGBODY-TAGS"};
6647 (l289).fvalue = (function(v780){
6648 ((v780)["fname"] = "DECLARE-TAGBODY-TAGS");
6650 })((function (values,v775,v776){
6651 checkArgs(arguments, 3);
6653 return (function(v779){
6654 return l210.fvalue(values, v779, (function(){
6656 var value = symbol.value;
6657 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6660 })(l81.fvalue(pv, (function (values,v777){
6661 checkArgs(arguments, 2);
6662 return (function(v778){
6663 return l197.fvalue(values, v777, l209, l47.fvalue(pv, v775, v778));
6664 })(l19.fvalue(pv, ((l287).value = (function(){
6665 var x1 = (function(){
6667 var value = symbol.value;
6668 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6671 if (typeof x1 !== 'number') throw 'Not a number!';
6674 }), l99.fvalue(pv, (function(){
6676 var func = symbol.fvalue;
6677 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6684 var l290 = {name: "TAGBODY"};
6685 var l291 = QIList(l5,l5);
6687 var v781 = l47.fvalue(pv, l290, (function (values){
6689 for (var i = arguments.length-1; i>=1; i--)
6690 v782 = {car: arguments[i], cdr:
6694 (l104.fvalue(pv, (function(){
6696 var func = symbol.fvalue;
6697 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6699 })(), v782) !== l5.value ? l5.value : (function(){
6701 throw ({type: 'block', id: 244, values: l193.fvalue(values, ({car: l123, cdr: l68.fvalue(pv, v782, l291)})), message: 'Return from unknown block TAGBODY.'})
6703 (l288.fvalue(pv, (function(){
6705 return tmp === l5.value? l5.value: tmp.car;
6706 })()) !== l5.value ? l5.value : (function(){
6707 var v783 = l18.fvalue(pv, "START");
6708 var v784 = ({car: v783, cdr: v782});
6709 return (v782 = v784);
6711 return (function(v785){
6712 return (function(v787,v786){
6719 return (v786 = l43.fvalue(pv, l200.fvalue(pv, v788)));
6720 })(l211.fvalue(pv, l42.fvalue(pv, v782), (function(){
6722 var value = symbol.value;
6723 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6726 return l191.fvalue(values, "(function(){", (function(){
6728 var value = symbol.value;
6729 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6731 })(), l195.fvalue(pv, "var tagbody_", v785, " = ", v786, ";", (function(){
6733 var value = symbol.value;
6734 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6736 })(), "tbloop:", (function(){
6738 var value = symbol.value;
6739 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6741 })(), "while (true) {", (function(){
6743 var value = symbol.value;
6744 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6746 })(), l195.fvalue(pv, "try {", (function(){
6748 var value = symbol.value;
6749 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6751 })(), l195.fvalue(pv, (function(v789){
6752 return l191.fvalue(pv, "switch(tagbody_", v785, "){", (function(){
6754 var value = symbol.value;
6755 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6757 })(), "case ", v786, ":", (function(){
6759 var value = symbol.value;
6760 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6763 return (function(v790,v791){
6765 while(v790 !== l5.value){
6766 (v791 = (function(){
6768 return tmp === l5.value? l5.value: tmp.car;
6771 (v789 = l157.fvalue(pv, v789, (l29.fvalue(pv, l288.fvalue(pv, v791)) !== l5.value ? l195.fvalue(pv, l193.fvalue(pv, v791), ";", (function(){
6773 var value = symbol.value;
6774 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6776 })()) : (function(v792){
6777 return l191.fvalue(pv, "case ", l43.fvalue(pv, l200.fvalue(pv, v792)), ":", (function(){
6779 var value = symbol.value;
6780 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6783 })(l211.fvalue(pv, v791, (function(){
6785 var value = symbol.value;
6786 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6791 (v790 = (function(){
6793 return tmp === l5.value? l5.value: tmp.cdr;
6800 return tmp === l5.value? l5.value: tmp.cdr;
6802 })(), "default:", (function(){
6804 var value = symbol.value;
6805 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6807 })(), " break tbloop;", (function(){
6809 var value = symbol.value;
6810 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6812 })(), "}", (function(){
6814 var value = symbol.value;
6815 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6818 })("")), "}", (function(){
6820 var value = symbol.value;
6821 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6823 })(), "catch (jump) {", (function(){
6825 var value = symbol.value;
6826 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6828 })(), " if (jump.type == 'tagbody' && jump.id == ", v785, ")", (function(){
6830 var value = symbol.value;
6831 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6833 })(), " tagbody_", v785, " = jump.label;", (function(){
6835 var value = symbol.value;
6836 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6838 })(), " else", (function(){
6840 var value = symbol.value;
6841 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6843 })(), " throw(jump);", (function(){
6845 var value = symbol.value;
6846 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6848 })(), "}", (function(){
6850 var value = symbol.value;
6851 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6853 })()), "}", (function(){
6855 var value = symbol.value;
6856 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6858 })(), "return ", l193.fvalue(pv, l5.value), ";", (function(){
6860 var value = symbol.value;
6861 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6868 })(l289.fvalue(pv, v785, v782),l5.value);
6871 var value = symbol.value;
6872 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6877 if (cf.type == 'block' && cf.id == 244)
6878 return values.apply(this, forcemv(cf.values));
6884 var v793 = ({car: v781, cdr: (function(){
6886 var value = symbol.value;
6887 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6890 return ((l230).value = v793);
6892 var l292 = {name: "GO"};
6894 var v794 = l47.fvalue(pv, l292, (function (values,v795){
6895 checkArgs(arguments, 2);
6897 return (function(v796,v797){
6898 (l13.fvalue(pv, v796) !== l5.value ? (function(){
6899 throw l157.fvalue(pv, "Unknown tag `", v797, "'.");
6901 return l191.fvalue(values, "(function(){", (function(){
6903 var value = symbol.value;
6904 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6906 })(), l195.fvalue(pv, "throw ({", "type: 'tagbody', ", "id: ", l42.fvalue(pv, l200.fvalue(pv, v796)), ", ", "label: ", l43.fvalue(pv, l200.fvalue(pv, v796)), ", ", "message: 'Attempt to GO to non-existing tag ", v797, "'", "})", (function(){
6908 var value = symbol.value;
6909 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6912 })(l211.fvalue(pv, v795, (function(){
6914 var value = symbol.value;
6915 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6917 })(), l209),(((function(){
6919 return (typeof tmp == 'object' && 'name' in tmp);
6920 })()?l4.value: l5.value) !== l5.value ? (v795).name : (l89.fvalue(pv, v795) !== l5.value ? l19.fvalue(pv, v795) : l5.value)));
6923 var v798 = ({car: v794, cdr: (function(){
6925 var value = symbol.value;
6926 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6929 return ((l230).value = v798);
6931 var l293 = {name: "UNWIND-PROTECT"};
6933 var v799 = l47.fvalue(pv, l293, (function (values,v801){
6934 checkArgsAtLeast(arguments, 2);
6936 for (var i = arguments.length-1; i>=2; i--)
6937 v800 = {car: arguments[i], cdr:
6940 return l191.fvalue(values, "(function(){", (function(){
6942 var value = symbol.value;
6943 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6945 })(), l195.fvalue(pv, "var ret = ", l193.fvalue(pv, l5.value), ";", (function(){
6947 var value = symbol.value;
6948 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6950 })(), "try {", (function(){
6952 var value = symbol.value;
6953 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6955 })(), l195.fvalue(pv, "ret = ", l193.fvalue(pv, v801), ";", (function(){
6957 var value = symbol.value;
6958 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6960 })()), "} finally {", (function(){
6962 var value = symbol.value;
6963 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6965 })(), l195.fvalue(pv, l254.fvalue(pv, v800)), "}", (function(){
6967 var value = symbol.value;
6968 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6970 })(), "return ret;", (function(){
6972 var value = symbol.value;
6973 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6978 var v802 = ({car: v799, cdr: (function(){
6980 var value = symbol.value;
6981 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6984 return ((l230).value = v802);
6986 var l294 = {name: "MULTIPLE-VALUE-CALL"};
6988 var v803 = l47.fvalue(pv, l294, (function (values,v805){
6989 checkArgsAtLeast(arguments, 2);
6991 for (var i = arguments.length-1; i>=2; i--)
6992 v804 = {car: arguments[i], cdr:
6995 return l191.fvalue(values, "(function(){", (function(){
6997 var value = symbol.value;
6998 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7000 })(), l195.fvalue(pv, "var func = ", l193.fvalue(pv, v805), ";", (function(){
7002 var value = symbol.value;
7003 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7005 })(), "var args = [", ((function(){
7007 var value = symbol.value;
7008 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7010 })() !== l5.value ? "values" : "pv"), "];", (function(){
7012 var value = symbol.value;
7013 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7015 })(), "return ", l191.fvalue(pv, "(function(){", (function(){
7017 var value = symbol.value;
7018 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7020 })(), l195.fvalue(pv, "var values = mv;", (function(){
7022 var value = symbol.value;
7023 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7025 })(), "var vs;", (function(){
7027 var value = symbol.value;
7028 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7030 })(), l161.fvalue(pv, (function (values,v806){
7031 checkArgs(arguments, 2);
7032 return l191.fvalue(values, "vs = ", l193.fvalue(pv, v806, l4.value), ";", (function(){
7034 var value = symbol.value;
7035 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7037 })(), "if (typeof vs === 'object' && 'multiple-value' in vs)", (function(){
7039 var value = symbol.value;
7040 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7042 })(), l195.fvalue(pv, "args = args.concat(vs);", (function(){
7044 var value = symbol.value;
7045 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7047 })()), "else", (function(){
7049 var value = symbol.value;
7050 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7052 })(), l195.fvalue(pv, "args.push(vs);", (function(){
7054 var value = symbol.value;
7055 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7058 }), v804), "return func.apply(window, args);", (function(){
7060 var value = symbol.value;
7061 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7063 })()), "})()"), ";", (function(){
7065 var value = symbol.value;
7066 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7071 var v807 = ({car: v803, cdr: (function(){
7073 var value = symbol.value;
7074 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7077 return ((l230).value = v807);
7079 var l295 = {name: "MULTIPLE-VALUE-PROG1"};
7081 var v808 = l47.fvalue(pv, l295, (function (values,v810){
7082 checkArgsAtLeast(arguments, 2);
7084 for (var i = arguments.length-1; i>=2; i--)
7085 v809 = {car: arguments[i], cdr:
7088 return l191.fvalue(values, "(function(){", (function(){
7090 var value = symbol.value;
7091 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7093 })(), l195.fvalue(pv, "var args = ", l193.fvalue(pv, v810, (function(){
7095 var value = symbol.value;
7096 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7098 })()), ";", (function(){
7100 var value = symbol.value;
7101 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7103 })(), l254.fvalue(pv, v809), "return args;", (function(){
7105 var value = symbol.value;
7106 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7111 var v811 = ({car: v808, cdr: (function(){
7113 var value = symbol.value;
7114 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7117 return ((l230).value = v811);
7119 var l296 = {name: "*COMMA*"};
7121 (((l296.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l296).value = l189));
7124 var l297 = {name: "*COMMA-ATSIGN*"};
7126 (((l297.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l297).value = l188));
7129 var l298 = {name: "*BQ-LIST*"};
7131 (((l298.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l298).value = (function(){
7132 var name = "BQ-LIST";
7133 if (typeof name != 'string')
7134 throw 'The value ' + name + ' is not a type string.';
7135 return ({name: name});
7139 var l299 = {name: "*BQ-APPEND*"};
7141 (((l299.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l299).value = (function(){
7142 var name = "BQ-APPEND";
7143 if (typeof name != 'string')
7144 throw 'The value ' + name + ' is not a type string.';
7145 return ({name: name});
7149 var l300 = {name: "*BQ-LIST**"};
7151 (((l300.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l300).value = (function(){
7152 var name = "BQ-LIST*";
7153 if (typeof name != 'string')
7154 throw 'The value ' + name + ' is not a type string.';
7155 return ({name: name});
7159 var l301 = {name: "*BQ-NCONC*"};
7161 (((l301.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l301).value = (function(){
7162 var name = "BQ-NCONC";
7163 if (typeof name != 'string')
7164 throw 'The value ' + name + ' is not a type string.';
7165 return ({name: name});
7169 var l302 = {name: "*BQ-CLOBBERABLE*"};
7171 (((l302.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l302).value = (function(){
7172 var name = "BQ-CLOBBERABLE";
7173 if (typeof name != 'string')
7174 throw 'The value ' + name + ' is not a type string.';
7175 return ({name: name});
7179 var l303 = {name: "*BQ-QUOTE*"};
7181 (((l303.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l303).value = (function(){
7182 var name = "BQ-QUOTE";
7183 if (typeof name != 'string')
7184 throw 'The value ' + name + ' is not a type string.';
7185 return ({name: name});
7189 var l304 = {name: "*BQ-QUOTE-NIL*"};
7191 (((l304.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l304).value = l47.fvalue(pv, (function(){
7193 var value = symbol.value;
7194 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7199 var l305 = {name: "*BQ-SIMPLIFY*"};
7201 ((l305).value = l4.value);
7205 var l306 = {name: "BQ-COMPLETELY-PROCESS"};
7206 var l307 = {name: "BQ-PROCESS"};
7207 var l308 = {name: "BQ-SIMPLIFY"};
7208 var l309 = {name: "BQ-REMOVE-TOKENS"};
7210 (l306).fvalue = (function(v814){
7211 ((v814)["fname"] = "BQ-COMPLETELY-PROCESS");
7213 })((function (values,v812){
7214 checkArgs(arguments, 2);
7216 return (function(v813){
7217 return l309.fvalue(values, ((function(){
7219 var value = symbol.value;
7220 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7222 })() !== l5.value ? l308.fvalue(pv, v813) : v813));
7223 })(l307.fvalue(pv, v812));
7228 var l310 = {name: "BRACKET"};
7230 (l307).fvalue = (function(v820){
7231 ((v820)["fname"] = "BQ-PROCESS");
7233 })((function (values,v815){
7234 checkArgs(arguments, 2);
7236 return (l48.fvalue(pv, v815) !== l5.value ? l47.fvalue(values, (function(){
7238 var value = symbol.value;
7239 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7241 })(), v815) : ((((function(){
7243 return tmp === l5.value? l5.value: tmp.car;
7244 })() === l187)?l4.value: l5.value) !== l5.value ? l307.fvalue(values, l306.fvalue(pv, l35.fvalue(pv, v815))) : ((((function(){
7246 return tmp === l5.value? l5.value: tmp.car;
7247 })() === (function(){
7249 var value = symbol.value;
7250 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7252 })())?l4.value: l5.value) !== l5.value ? l35.fvalue(values, v815) : ((((function(){
7254 return tmp === l5.value? l5.value: tmp.car;
7255 })() === (function(){
7257 var value = symbol.value;
7258 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7260 })())?l4.value: l5.value) !== l5.value ? (function(){
7263 return (function(v816,v817){
7267 while(l4.value !== l5.value){
7268 (l48.fvalue(pv, v816) !== l5.value ? (function(){
7270 throw ({type: 'block', id: 253, values: ({car: (function(){
7272 var value = symbol.value;
7273 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7275 })(), cdr: l128.fvalue(pv, v817, l47.fvalue(pv, l47.fvalue(pv, (function(){
7277 var value = symbol.value;
7278 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7280 })(), v816)))}), message: 'Return from unknown block NIL.'})
7285 return tmp === l5.value? l5.value: tmp.car;
7286 })() === (function(){
7288 var value = symbol.value;
7289 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7291 })())?l4.value: l5.value) !== l5.value ? (function(){
7292 (l13.fvalue(pv, l37.fvalue(pv, v816)) !== l5.value ? l5.value : (function(){
7297 throw ({type: 'block', id: 253, values: ({car: (function(){
7299 var value = symbol.value;
7300 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7302 })(), cdr: l128.fvalue(pv, v817, l47.fvalue(pv, l35.fvalue(pv, v816)))}), message: 'Return from unknown block NIL.'})
7307 return tmp === l5.value? l5.value: tmp.car;
7308 })() === (function(){
7310 var value = symbol.value;
7311 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7313 })())?l4.value: l5.value) !== l5.value ? (function(){
7318 (function(v818,v819){
7319 return (v816 = v818, v817 = v819);
7322 return tmp === l5.value? l5.value: tmp.cdr;
7323 })(),({car: l310.fvalue(pv, (function(){
7325 return tmp === l5.value? l5.value: tmp.car;
7326 })()), cdr: v817}));
7331 if (cf.type == 'block' && cf.id == 253)
7332 return values.apply(this, forcemv(cf.values));
7344 (l310).fvalue = (function(v822){
7345 ((v822)["fname"] = "BRACKET");
7347 })((function (values,v821){
7348 checkArgs(arguments, 2);
7350 return (l48.fvalue(pv, v821) !== l5.value ? l47.fvalue(values, (function(){
7352 var value = symbol.value;
7353 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7355 })(), l307.fvalue(pv, v821)) : ((((function(){
7357 return tmp === l5.value? l5.value: tmp.car;
7358 })() === (function(){
7360 var value = symbol.value;
7361 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7363 })())?l4.value: l5.value) !== l5.value ? l47.fvalue(values, (function(){
7365 var value = symbol.value;
7366 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7368 })(), l35.fvalue(pv, v821)) : ((((function(){
7370 return tmp === l5.value? l5.value: tmp.car;
7371 })() === (function(){
7373 var value = symbol.value;
7374 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7376 })())?l4.value: l5.value) !== l5.value ? l35.fvalue(values, v821) : l47.fvalue(values, (function(){
7378 var value = symbol.value;
7379 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7381 })(), l307.fvalue(pv, v821)))));
7386 var l311 = {name: "MAPTREE"};
7388 (l311).fvalue = (function(v827){
7389 ((v827)["fname"] = "MAPTREE");
7391 })((function (values,v823,v824){
7392 checkArgs(arguments, 3);
7394 return (l48.fvalue(pv, v824) !== l5.value ? (function(){
7396 return (typeof f === 'function'? f: f.fvalue)(values, v824)
7397 })() : (function(v825,v826){
7398 return ((l28.fvalue(pv, v825, (function(){
7400 return tmp === l5.value? l5.value: tmp.car;
7401 })()) !== l5.value ? l28.fvalue(pv, v826, (function(){
7403 return tmp === l5.value? l5.value: tmp.cdr;
7404 })()) : l5.value) !== l5.value ? v824 : ({car: v825, cdr: v826}));
7407 return (typeof f === 'function'? f: f.fvalue)(pv, (function(){
7409 return tmp === l5.value? l5.value: tmp.car;
7411 })(),l311.fvalue(pv, v823, (function(){
7413 return tmp === l5.value? l5.value: tmp.cdr;
7419 var l312 = {name: "BQ-SPLICING-FROB"};
7421 (l312).fvalue = (function(v829){
7422 ((v829)["fname"] = "BQ-SPLICING-FROB");
7424 })((function (values,v828){
7425 checkArgs(arguments, 2);
7427 return (((function(){
7429 return (typeof tmp == 'object' && 'car' in tmp);
7430 })()?l4.value: l5.value) !== l5.value ? (((function(){
7432 return tmp === l5.value? l5.value: tmp.car;
7433 })() === (function(){
7435 var value = symbol.value;
7436 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7438 })())?l4.value: l5.value) : l5.value);
7443 var l313 = {name: "BQ-FROB"};
7445 (l313).fvalue = (function(v832){
7446 ((v832)["fname"] = "BQ-FROB");
7448 })((function (values,v830){
7449 checkArgs(arguments, 2);
7451 return (((function(){
7453 return (typeof tmp == 'object' && 'car' in tmp);
7454 })()?l4.value: l5.value) !== l5.value ? (function(v831){
7455 return (v831 !== l5.value ? v831 : (((function(){
7457 return tmp === l5.value? l5.value: tmp.car;
7458 })() === (function(){
7460 var value = symbol.value;
7461 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7463 })())?l4.value: l5.value));
7466 return tmp === l5.value? l5.value: tmp.car;
7467 })() === (function(){
7469 var value = symbol.value;
7470 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7472 })())?l4.value: l5.value)) : l5.value);
7477 var l314 = {name: "BQ-SIMPLIFY-ARGS"};
7479 (l308).fvalue = (function(v835){
7480 ((v835)["fname"] = "BQ-SIMPLIFY");
7482 })((function (values,v833){
7483 checkArgs(arguments, 2);
7485 return (l48.fvalue(pv, v833) !== l5.value ? v833 : (function(v834){
7486 return (l29.fvalue(pv, (((function(){
7488 return tmp === l5.value? l5.value: tmp.car;
7489 })() === (function(){
7491 var value = symbol.value;
7492 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7494 })())?l4.value: l5.value)) !== l5.value ? v834 : l314.fvalue(values, v834));
7497 return tmp === l5.value? l5.value: tmp.car;
7498 })() === (function(){
7500 var value = symbol.value;
7501 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7503 })())?l4.value: l5.value) !== l5.value ? v833 : l311.fvalue(pv, (function(){
7505 var func = symbol.fvalue;
7506 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7513 var l315 = {name: "BQ-ATTACH-APPEND"};
7514 var l316 = {name: "BQ-ATTACH-CONSES"};
7515 var l317 = {name: "CDDAR"};
7516 var l318 = {name: "CAADAR"};
7518 (l314).fvalue = (function(v841){
7519 ((v841)["fname"] = "BQ-SIMPLIFY-ARGS");
7521 })((function (values,v836){
7522 checkArgs(arguments, 2);
7525 return (function(v837,v838){
7529 while(l4.value !== l5.value){
7530 (l13.fvalue(pv, v837) !== l5.value ? (function(){
7532 throw ({type: 'block', id: 261, values: v838, message: 'Return from unknown block NIL.'})
7535 (function(v839,v840){
7536 return (v837 = v839, v838 = v840);
7539 return tmp === l5.value? l5.value: tmp.cdr;
7540 })(),(l48.fvalue(pv, (function(){
7542 return tmp === l5.value? l5.value: tmp.car;
7543 })()) !== l5.value ? l315.fvalue(pv, (function(){
7545 var value = symbol.value;
7546 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7550 return tmp === l5.value? l5.value: tmp.car;
7551 })(), v838) : ((((l34.fvalue(pv, v837) === (function(){
7553 var value = symbol.value;
7554 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7556 })())?l4.value: l5.value) !== l5.value ? l129.fvalue(pv, (function(){
7558 var func = symbol.fvalue;
7559 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7561 })(), l36.fvalue(pv, v837)) : l5.value) !== l5.value ? l316.fvalue(pv, l36.fvalue(pv, v837), v838) : ((((l34.fvalue(pv, v837) === (function(){
7563 var value = symbol.value;
7564 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7566 })())?l4.value: l5.value) !== l5.value ? l129.fvalue(pv, (function(){
7568 var func = symbol.fvalue;
7569 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7571 })(), l36.fvalue(pv, v837)) : l5.value) !== l5.value ? l316.fvalue(pv, l70.fvalue(pv, (function(){
7572 var tmp = l70.fvalue(pv, l36.fvalue(pv, v837));
7573 return tmp === l5.value? l5.value: tmp.cdr;
7574 })()), l315.fvalue(pv, (function(){
7576 var value = symbol.value;
7577 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7580 var tmp = l94.fvalue(pv, (function(){
7582 return tmp === l5.value? l5.value: tmp.car;
7584 return tmp === l5.value? l5.value: tmp.car;
7585 })(), v838)) : ((((l34.fvalue(pv, v837) === (function(){
7587 var value = symbol.value;
7588 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7590 })())?l4.value: l5.value) !== l5.value ? (((function(){
7591 var tmp = l38.fvalue(pv, v837);
7592 return (typeof tmp == 'object' && 'car' in tmp);
7593 })()?l4.value: l5.value) !== l5.value ? (l29.fvalue(pv, l313.fvalue(pv, l38.fvalue(pv, v837))) !== l5.value ? l13.fvalue(pv, l317.fvalue(pv, v837)) : l5.value) : l5.value) : l5.value) !== l5.value ? l316.fvalue(pv, l47.fvalue(pv, l47.fvalue(pv, (function(){
7595 var value = symbol.value;
7596 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7598 })(), l318.fvalue(pv, v837))), v838) : (((l34.fvalue(pv, v837) === (function(){
7600 var value = symbol.value;
7601 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7603 })())?l4.value: l5.value) !== l5.value ? l315.fvalue(pv, (function(){
7605 var value = symbol.value;
7606 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7608 })(), l38.fvalue(pv, v837), v838) : l315.fvalue(pv, (function(){
7610 var value = symbol.value;
7611 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7615 return tmp === l5.value? l5.value: tmp.car;
7621 if (cf.type == 'block' && cf.id == 261)
7622 return values.apply(this, forcemv(cf.values));
7627 })(l70.fvalue(pv, (function(){
7629 return tmp === l5.value? l5.value: tmp.cdr;
7636 var l319 = {name: "NULL-OR-QUOTED"};
7638 (l319).fvalue = (function(v844){
7639 ((v844)["fname"] = "NULL-OR-QUOTED");
7641 })((function (values,v842){
7642 checkArgs(arguments, 2);
7644 return (function(v843){
7645 return (v843 !== l5.value ? v843 : (((function(){
7647 return (typeof tmp == 'object' && 'car' in tmp);
7648 })()?l4.value: l5.value) !== l5.value ? (((function(){
7650 return tmp === l5.value? l5.value: tmp.car;
7651 })() === (function(){
7653 var value = symbol.value;
7654 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7656 })())?l4.value: l5.value) : l5.value));
7657 })(l13.fvalue(pv, v842));
7663 (l315).fvalue = (function(v849){
7664 ((v849)["fname"] = "BQ-ATTACH-APPEND");
7666 })((function (values,v845,v846,v847){
7667 checkArgs(arguments, 4);
7669 return ((l319.fvalue(pv, v846) !== l5.value ? l319.fvalue(pv, v847) : l5.value) !== l5.value ? l47.fvalue(values, (function(){
7671 var value = symbol.value;
7672 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7674 })(), l68.fvalue(pv, l35.fvalue(pv, v846), l35.fvalue(pv, v847))) : ((function(v848){
7675 return (v848 !== l5.value ? v848 : ((v847 == (function(){
7677 var value = symbol.value;
7678 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7680 })())?l4.value: l5.value));
7681 })(l13.fvalue(pv, v847)) !== l5.value ? (l312.fvalue(pv, v846) !== l5.value ? l47.fvalue(values, v845, v846) : v846) : ((((function(){
7683 return (typeof tmp == 'object' && 'car' in tmp);
7684 })()?l4.value: l5.value) !== l5.value ? (((function(){
7686 return tmp === l5.value? l5.value: tmp.car;
7687 })() === v845)?l4.value: l5.value) : l5.value) !== l5.value ? l85.fvalue(values, (function(){
7689 return tmp === l5.value? l5.value: tmp.car;
7690 })(), v846, (function(){
7692 return tmp === l5.value? l5.value: tmp.cdr;
7693 })()) : l47.fvalue(values, v845, v846, v847))));
7699 (l316).fvalue = (function(v854){
7700 ((v854)["fname"] = "BQ-ATTACH-CONSES");
7702 })((function (values,v850,v851){
7703 checkArgs(arguments, 3);
7705 return ((l105.fvalue(pv, (function(){
7707 var func = symbol.fvalue;
7708 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7710 })(), v850) !== l5.value ? l319.fvalue(pv, v851) : l5.value) !== l5.value ? l47.fvalue(values, (function(){
7712 var value = symbol.value;
7713 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7715 })(), l68.fvalue(pv, l81.fvalue(pv, (function(){
7717 var func = symbol.fvalue;
7718 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7720 })(), v850), l35.fvalue(pv, v851))) : ((function(v852){
7721 return (v852 !== l5.value ? v852 : ((v851 == (function(){
7723 var value = symbol.value;
7724 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7726 })())?l4.value: l5.value));
7727 })(l13.fvalue(pv, v851)) !== l5.value ? ({car: (function(){
7729 var value = symbol.value;
7730 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7732 })(), cdr: v850}) : ((((function(){
7734 return (typeof tmp == 'object' && 'car' in tmp);
7735 })()?l4.value: l5.value) !== l5.value ? (function(v853){
7736 return (v853 !== l5.value ? v853 : (((function(){
7738 return tmp === l5.value? l5.value: tmp.car;
7739 })() === (function(){
7741 var value = symbol.value;
7742 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7744 })())?l4.value: l5.value));
7747 return tmp === l5.value? l5.value: tmp.car;
7748 })() === (function(){
7750 var value = symbol.value;
7751 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7753 })())?l4.value: l5.value)) : l5.value) !== l5.value ? ({car: (function(){
7755 return tmp === l5.value? l5.value: tmp.car;
7756 })(), cdr: l68.fvalue(pv, v850, (function(){
7758 return tmp === l5.value? l5.value: tmp.cdr;
7759 })())}) : ({car: (function(){
7761 var value = symbol.value;
7762 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7764 })(), cdr: l68.fvalue(pv, v850, l47.fvalue(pv, v851))}))));
7770 (l309).fvalue = (function(v856){
7771 ((v856)["fname"] = "BQ-REMOVE-TOKENS");
7773 })((function (values,v855){
7774 checkArgs(arguments, 2);
7776 return (((v855 === (function(){
7778 var value = symbol.value;
7779 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7781 })())?l4.value: l5.value) !== l5.value ? l47 : (((v855 === (function(){
7783 var value = symbol.value;
7784 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7786 })())?l4.value: l5.value) !== l5.value ? l68 : (((v855 === (function(){
7788 var value = symbol.value;
7789 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7791 })())?l4.value: l5.value) !== l5.value ? l127 : (((v855 === (function(){
7793 var value = symbol.value;
7794 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7796 })())?l4.value: l5.value) !== l5.value ? l85 : (((v855 === (function(){
7798 var value = symbol.value;
7799 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7801 })())?l4.value: l5.value) !== l5.value ? l186 : (l48.fvalue(pv, v855) !== l5.value ? v855 : ((((function(){
7803 return tmp === l5.value? l5.value: tmp.car;
7804 })() === (function(){
7806 var value = symbol.value;
7807 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7809 })())?l4.value: l5.value) !== l5.value ? l309.fvalue(values, l35.fvalue(pv, v855)) : (((((function(){
7811 return tmp === l5.value? l5.value: tmp.car;
7812 })() === (function(){
7814 var value = symbol.value;
7815 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7817 })())?l4.value: l5.value) !== l5.value ? (((function(){
7818 var tmp = l37.fvalue(pv, v855);
7819 return (typeof tmp == 'object' && 'car' in tmp);
7820 })()?l4.value: l5.value) !== l5.value ? l13.fvalue(pv, l40.fvalue(pv, v855)) : l5.value) : l5.value) !== l5.value ? ({car: l30, cdr: l311.fvalue(pv, (function(){
7822 var func = symbol.fvalue;
7823 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7827 return tmp === l5.value? l5.value: tmp.cdr;
7828 })())}) : l311.fvalue(values, (function(){
7830 var func = symbol.fvalue;
7831 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7833 })(), v855)))))))));
7839 var v857 = l47.fvalue(pv, l187, (function (values,v858){
7840 checkArgs(arguments, 2);
7842 return l193.fvalue(values, l306.fvalue(pv, v858));
7845 var v859 = ({car: v857, cdr: (function(){
7847 var value = symbol.value;
7848 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7851 return ((l230).value = v859);
7853 var l320 = {name: "*BUILTINS*"};
7855 (((l320.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l320).value = l5.value));
7858 var l321 = {name: "DEFINE-RAW-BUILTIN"};
7860 var l322 = {name: "DEFINE-BUILTIN"};
7862 var l323 = {name: "TYPE-CHECK"};
7864 var l324 = {name: "VARIABLE-ARITY-CALL"};
7866 (l324).fvalue = (function(v872){
7867 ((v872)["fname"] = "VARIABLE-ARITY-CALL");
7869 })((function (values,v860,v861){
7870 checkArgs(arguments, 3);
7874 return (typeof tmp == 'object' && 'car' in tmp);
7875 })()?l4.value: l5.value) !== l5.value ? l5.value : (function(){
7876 throw "ARGS must be a non-empty list";
7878 return (function(v862,v863,v864){
7880 return (function(v865,v866){
7882 while(v865 !== l5.value){
7883 (v866 = (function(){
7885 return tmp === l5.value? l5.value: tmp.car;
7888 (((typeof (v866) == "number")?l4.value: l5.value) !== l5.value ? (function(){
7889 var v867 = l19.fvalue(pv, v866);
7890 var v868 = ({car: v867, cdr: v863});
7891 return (v863 = v868);
7892 })() : (function(v869){
7895 var v871 = ({car: v870, cdr: v863});
7896 return (v863 = v871);
7898 return (v864 = l157.fvalue(pv, v864, l191.fvalue(pv, "var ", v869, " = ", l193.fvalue(pv, v866), ";", (function(){
7900 var value = symbol.value;
7901 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7903 })(), "if (typeof ", v869, " !== 'number') throw 'Not a number!';", (function(){
7905 var value = symbol.value;
7906 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7909 })(l191.fvalue(pv, "x", (v862 = (function(){
7911 if (typeof x1 !== 'number') throw 'Not a number!';
7916 (v865 = (function(){
7918 return tmp === l5.value? l5.value: tmp.cdr;
7925 return l191.fvalue(values, "(function(){", (function(){
7927 var value = symbol.value;
7928 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7930 })(), l195.fvalue(pv, v864, (function(){
7932 return (typeof f === 'function'? f: f.fvalue)(pv, l70.fvalue(pv, v863))
7939 var l325 = {name: "VARIABLE-ARITY"};
7941 var l326 = {name: "NUM-OP-NUM"};
7943 (l326).fvalue = (function(v876){
7944 ((v876)["fname"] = "NUM-OP-NUM");
7946 })((function (values,v873,v874,v875){
7947 checkArgs(arguments, 4);
7949 return l191.fvalue(values, "(function(){", (function(){
7951 var value = symbol.value;
7952 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7954 })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "x", " = ", v873, ";", (function(){
7956 var value = symbol.value;
7957 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7959 })()), l191.fvalue(pv, "var ", "y", " = ", v875, ";", (function(){
7961 var value = symbol.value;
7962 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7964 })()), l191.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
7966 var value = symbol.value;
7967 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7969 })(), l195.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
7971 var value = symbol.value;
7972 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7974 })())), l191.fvalue(pv, "if (typeof ", "y", " != '", "number", "')", (function(){
7976 var value = symbol.value;
7977 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7979 })(), l195.fvalue(pv, "throw 'The value ' + ", "y", " + ' is not a type ", "number", ".';", (function(){
7981 var value = symbol.value;
7982 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7984 })())), l191.fvalue(pv, "return ", l191.fvalue(pv, "x", v874, "y"), ";", (function(){
7986 var value = symbol.value;
7987 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7995 var v877 = l47.fvalue(pv, l65, (function (values){
7997 for (var i = arguments.length-1; i>=1; i--)
7998 v878 = {car: arguments[i], cdr:
8001 return (l13.fvalue(pv, v878) !== l5.value ? "0" : l324.fvalue(values, v878, (function (values,v879){
8002 checkArgs(arguments, 2);
8003 return l191.fvalue(values, "return ", l159.fvalue(pv, v879, "+"), ";", (function(){
8005 var value = symbol.value;
8006 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8012 var v880 = ({car: v877, cdr: (function(){
8014 var value = symbol.value;
8015 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8018 return ((l320).value = v880);
8021 var v881 = l47.fvalue(pv, l66, (function (values,v883){
8022 checkArgsAtLeast(arguments, 2);
8024 for (var i = arguments.length-1; i>=2; i--)
8025 v882 = {car: arguments[i], cdr:
8028 return (function(v884){
8029 return l324.fvalue(values, v884, (function (values,v885){
8030 checkArgs(arguments, 2);
8031 return l191.fvalue(values, "return ", (l13.fvalue(pv, v882) !== l5.value ? l157.fvalue(pv, "-", (function(){
8033 return tmp === l5.value? l5.value: tmp.car;
8034 })()) : l159.fvalue(pv, v885, "-")), ";", (function(){
8036 var value = symbol.value;
8037 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8041 })(({car: v883, cdr: v882}));
8044 var v886 = ({car: v881, cdr: (function(){
8046 var value = symbol.value;
8047 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8050 return ((l320).value = v886);
8053 var v887 = l47.fvalue(pv, l22, (function (values){
8055 for (var i = arguments.length-1; i>=1; i--)
8056 v888 = {car: arguments[i], cdr:
8059 return (l13.fvalue(pv, v888) !== l5.value ? "1" : l324.fvalue(values, v888, (function (values,v889){
8060 checkArgs(arguments, 2);
8061 return l191.fvalue(values, "return ", l159.fvalue(pv, v889, "*"), ";", (function(){
8063 var value = symbol.value;
8064 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8070 var v890 = ({car: v887, cdr: (function(){
8072 var value = symbol.value;
8073 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8076 return ((l320).value = v890);
8079 var v891 = l47.fvalue(pv, l23, (function (values,v893){
8080 checkArgsAtLeast(arguments, 2);
8082 for (var i = arguments.length-1; i>=2; i--)
8083 v892 = {car: arguments[i], cdr:
8086 return (function(v894){
8087 return l324.fvalue(values, v894, (function (values,v895){
8088 checkArgs(arguments, 2);
8089 return l191.fvalue(values, "return ", (l13.fvalue(pv, v892) !== l5.value ? l157.fvalue(pv, "1 /", (function(){
8091 return tmp === l5.value? l5.value: tmp.car;
8092 })()) : l159.fvalue(pv, v895, "/")), ";", (function(){
8094 var value = symbol.value;
8095 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8099 })(({car: v893, cdr: v892}));
8102 var v896 = ({car: v891, cdr: (function(){
8104 var value = symbol.value;
8105 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8108 return ((l320).value = v896);
8110 var l327 = {name: "MOD"};
8112 var v897 = l47.fvalue(pv, l327, (function (values,v898,v899){
8113 checkArgs(arguments, 3);
8115 return (function(v900,v901){
8116 return l326.fvalue(values, v900, "%", v901);
8117 })(l193.fvalue(pv, v898),l193.fvalue(pv, v899));
8120 var v902 = ({car: v897, cdr: (function(){
8122 var value = symbol.value;
8123 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8126 return ((l320).value = v902);
8128 var l328 = {name: "COMPARISON-CONJUNTION"};
8130 (l328).fvalue = (function(v905){
8131 ((v905)["fname"] = "COMPARISON-CONJUNTION");
8133 })((function (values,v903,v904){
8134 checkArgs(arguments, 3);
8136 return (l13.fvalue(pv, (function(){
8138 return tmp === l5.value? l5.value: tmp.cdr;
8139 })()) !== l5.value ? "true" : (l13.fvalue(pv, l37.fvalue(pv, v903)) !== l5.value ? l157.fvalue(values, (function(){
8141 return tmp === l5.value? l5.value: tmp.car;
8142 })(), v904, l35.fvalue(pv, v903)) : l157.fvalue(values, (function(){
8144 return tmp === l5.value? l5.value: tmp.car;
8145 })(), v904, l35.fvalue(pv, v903), " && ", l328.fvalue(pv, (function(){
8147 return tmp === l5.value? l5.value: tmp.cdr;
8153 var l329 = {name: "DEFINE-BUILTIN-COMPARISON"};
8155 var l330 = {name: ">"};
8157 var v906 = l47.fvalue(pv, l330, (function (values,v908){
8158 checkArgsAtLeast(arguments, 2);
8160 for (var i = arguments.length-1; i>=2; i--)
8161 v907 = {car: arguments[i], cdr:
8164 return (function(v909){
8165 return l324.fvalue(values, v909, (function (values,v910){
8166 checkArgs(arguments, 2);
8167 return l191.fvalue(values, "return ", l192.fvalue(pv, l328.fvalue(pv, v910, ">")), ";", (function(){
8169 var value = symbol.value;
8170 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8174 })(({car: v908, cdr: v907}));
8177 var v911 = ({car: v906, cdr: (function(){
8179 var value = symbol.value;
8180 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8183 return ((l320).value = v911);
8185 var l331 = {name: "<"};
8187 var v912 = l47.fvalue(pv, l331, (function (values,v914){
8188 checkArgsAtLeast(arguments, 2);
8190 for (var i = arguments.length-1; i>=2; i--)
8191 v913 = {car: arguments[i], cdr:
8194 return (function(v915){
8195 return l324.fvalue(values, v915, (function (values,v916){
8196 checkArgs(arguments, 2);
8197 return l191.fvalue(values, "return ", l192.fvalue(pv, l328.fvalue(pv, v916, "<")), ";", (function(){
8199 var value = symbol.value;
8200 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8204 })(({car: v914, cdr: v913}));
8207 var v917 = ({car: v912, cdr: (function(){
8209 var value = symbol.value;
8210 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8213 return ((l320).value = v917);
8215 var l332 = {name: ">="};
8217 var v918 = l47.fvalue(pv, l332, (function (values,v920){
8218 checkArgsAtLeast(arguments, 2);
8220 for (var i = arguments.length-1; i>=2; i--)
8221 v919 = {car: arguments[i], cdr:
8224 return (function(v921){
8225 return l324.fvalue(values, v921, (function (values,v922){
8226 checkArgs(arguments, 2);
8227 return l191.fvalue(values, "return ", l192.fvalue(pv, l328.fvalue(pv, v922, ">=")), ";", (function(){
8229 var value = symbol.value;
8230 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8234 })(({car: v920, cdr: v919}));
8237 var v923 = ({car: v918, cdr: (function(){
8239 var value = symbol.value;
8240 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8243 return ((l320).value = v923);
8245 var l333 = {name: "<="};
8247 var v924 = l47.fvalue(pv, l333, (function (values,v926){
8248 checkArgsAtLeast(arguments, 2);
8250 for (var i = arguments.length-1; i>=2; i--)
8251 v925 = {car: arguments[i], cdr:
8254 return (function(v927){
8255 return l324.fvalue(values, v927, (function (values,v928){
8256 checkArgs(arguments, 2);
8257 return l191.fvalue(values, "return ", l192.fvalue(pv, l328.fvalue(pv, v928, "<=")), ";", (function(){
8259 var value = symbol.value;
8260 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8264 })(({car: v926, cdr: v925}));
8267 var v929 = ({car: v924, cdr: (function(){
8269 var value = symbol.value;
8270 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8273 return ((l320).value = v929);
8276 var v930 = l47.fvalue(pv, l21, (function (values,v932){
8277 checkArgsAtLeast(arguments, 2);
8279 for (var i = arguments.length-1; i>=2; i--)
8280 v931 = {car: arguments[i], cdr:
8283 return (function(v933){
8284 return l324.fvalue(values, v933, (function (values,v934){
8285 checkArgs(arguments, 2);
8286 return l191.fvalue(values, "return ", l192.fvalue(pv, l328.fvalue(pv, v934, "==")), ";", (function(){
8288 var value = symbol.value;
8289 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8293 })(({car: v932, cdr: v931}));
8296 var v935 = ({car: v930, cdr: (function(){
8298 var value = symbol.value;
8299 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8302 return ((l320).value = v935);
8304 var l334 = {name: "NUMBERP"};
8306 var v936 = l47.fvalue(pv, l334, (function (values,v937){
8307 checkArgs(arguments, 2);
8309 return (function(v938){
8310 return l192.fvalue(values, l191.fvalue(pv, "(typeof (", v938, ") == \"number\")"));
8311 })(l193.fvalue(pv, v937));
8314 var v939 = ({car: v936, cdr: (function(){
8316 var value = symbol.value;
8317 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8320 return ((l320).value = v939);
8322 var l335 = {name: "FLOOR"};
8324 var v940 = l47.fvalue(pv, l335, (function (values,v941){
8325 checkArgs(arguments, 2);
8327 return (function(v942){
8328 return l191.fvalue(values, "(function(){", (function(){
8330 var value = symbol.value;
8331 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8333 })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "x", " = ", v942, ";", (function(){
8335 var value = symbol.value;
8336 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8338 })()), l191.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
8340 var value = symbol.value;
8341 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8343 })(), l195.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
8345 var value = symbol.value;
8346 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8348 })())), l191.fvalue(pv, "return ", "Math.floor(x)", ";", (function(){
8350 var value = symbol.value;
8351 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8354 })(l193.fvalue(pv, v941));
8357 var v943 = ({car: v940, cdr: (function(){
8359 var value = symbol.value;
8360 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8363 return ((l320).value = v943);
8366 var v944 = l47.fvalue(pv, l30, (function (values,v945,v946){
8367 checkArgs(arguments, 3);
8369 return (function(v947,v948){
8370 return l191.fvalue(values, "({car: ", v947, ", cdr: ", v948, "})");
8371 })(l193.fvalue(pv, v945),l193.fvalue(pv, v946));
8374 var v949 = ({car: v944, cdr: (function(){
8376 var value = symbol.value;
8377 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8380 return ((l320).value = v949);
8383 var v950 = l47.fvalue(pv, l31, (function (values,v951){
8384 checkArgs(arguments, 2);
8386 return (function(v952){
8387 return l192.fvalue(values, l191.fvalue(pv, "(function(){", (function(){
8389 var value = symbol.value;
8390 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8392 })(), l195.fvalue(pv, "var tmp = ", v952, ";", (function(){
8394 var value = symbol.value;
8395 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8397 })(), "return (typeof tmp == 'object' && 'car' in tmp);", (function(){
8399 var value = symbol.value;
8400 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8403 })(l193.fvalue(pv, v951));
8406 var v953 = ({car: v950, cdr: (function(){
8408 var value = symbol.value;
8409 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8412 return ((l320).value = v953);
8415 var v954 = l47.fvalue(pv, l32, (function (values,v955){
8416 checkArgs(arguments, 2);
8418 return (function(v956){
8419 return l191.fvalue(values, "(function(){", (function(){
8421 var value = symbol.value;
8422 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8424 })(), l195.fvalue(pv, "var tmp = ", v956, ";", (function(){
8426 var value = symbol.value;
8427 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8429 })(), "return tmp === ", l193.fvalue(pv, l5.value), "? ", l193.fvalue(pv, l5.value), ": tmp.car;", (function(){
8431 var value = symbol.value;
8432 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8435 })(l193.fvalue(pv, v955));
8438 var v957 = ({car: v954, cdr: (function(){
8440 var value = symbol.value;
8441 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8444 return ((l320).value = v957);
8447 var v958 = l47.fvalue(pv, l33, (function (values,v959){
8448 checkArgs(arguments, 2);
8450 return (function(v960){
8451 return l191.fvalue(values, "(function(){", (function(){
8453 var value = symbol.value;
8454 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8456 })(), l195.fvalue(pv, "var tmp = ", v960, ";", (function(){
8458 var value = symbol.value;
8459 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8461 })(), "return tmp === ", l193.fvalue(pv, l5.value), "? ", l193.fvalue(pv, l5.value), ": tmp.cdr;", (function(){
8463 var value = symbol.value;
8464 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8467 })(l193.fvalue(pv, v959));
8470 var v961 = ({car: v958, cdr: (function(){
8472 var value = symbol.value;
8473 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8476 return ((l320).value = v961);
8479 var v962 = l47.fvalue(pv, l124, (function (values,v963,v964){
8480 checkArgs(arguments, 3);
8482 return (function(v965,v966){
8483 return l191.fvalue(values, "(function(){", (function(){
8485 var value = symbol.value;
8486 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8488 })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "x", " = ", v965, ";", (function(){
8490 var value = symbol.value;
8491 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8493 })()), l191.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){
8495 var value = symbol.value;
8496 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8498 })(), l195.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
8500 var value = symbol.value;
8501 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8503 })())), l191.fvalue(pv, "return ", l191.fvalue(pv, "(x.car = ", v966, ", x)"), ";", (function(){
8505 var value = symbol.value;
8506 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8509 })(l193.fvalue(pv, v963),l193.fvalue(pv, v964));
8512 var v967 = ({car: v962, cdr: (function(){
8514 var value = symbol.value;
8515 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8518 return ((l320).value = v967);
8521 var v968 = l47.fvalue(pv, l125, (function (values,v969,v970){
8522 checkArgs(arguments, 3);
8524 return (function(v971,v972){
8525 return l191.fvalue(values, "(function(){", (function(){
8527 var value = symbol.value;
8528 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8530 })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "x", " = ", v971, ";", (function(){
8532 var value = symbol.value;
8533 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8535 })()), l191.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){
8537 var value = symbol.value;
8538 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8540 })(), l195.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
8542 var value = symbol.value;
8543 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8545 })())), l191.fvalue(pv, "return ", l191.fvalue(pv, "(x.cdr = ", v972, ", x)"), ";", (function(){
8547 var value = symbol.value;
8548 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8551 })(l193.fvalue(pv, v969),l193.fvalue(pv, v970));
8554 var v973 = ({car: v968, cdr: (function(){
8556 var value = symbol.value;
8557 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8560 return ((l320).value = v973);
8562 var l336 = {name: "SYMBOLP"};
8564 var v974 = l47.fvalue(pv, l336, (function (values,v975){
8565 checkArgs(arguments, 2);
8567 return (function(v976){
8568 return l192.fvalue(values, l191.fvalue(pv, "(function(){", (function(){
8570 var value = symbol.value;
8571 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8573 })(), l195.fvalue(pv, "var tmp = ", v976, ";", (function(){
8575 var value = symbol.value;
8576 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8578 })(), "return (typeof tmp == 'object' && 'name' in tmp);", (function(){
8580 var value = symbol.value;
8581 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8584 })(l193.fvalue(pv, v975));
8587 var v977 = ({car: v974, cdr: (function(){
8589 var value = symbol.value;
8590 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8593 return ((l320).value = v977);
8595 var l337 = {name: "MAKE-SYMBOL"};
8597 var v978 = l47.fvalue(pv, l337, (function (values,v979){
8598 checkArgs(arguments, 2);
8600 return (function(v980){
8601 return l191.fvalue(values, "(function(){", (function(){
8603 var value = symbol.value;
8604 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8606 })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "name", " = ", v980, ";", (function(){
8608 var value = symbol.value;
8609 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8611 })()), l191.fvalue(pv, "if (typeof ", "name", " != '", "string", "')", (function(){
8613 var value = symbol.value;
8614 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8616 })(), l195.fvalue(pv, "throw 'The value ' + ", "name", " + ' is not a type ", "string", ".';", (function(){
8618 var value = symbol.value;
8619 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8621 })())), l191.fvalue(pv, "return ", "({name: name})", ";", (function(){
8623 var value = symbol.value;
8624 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8627 })(l193.fvalue(pv, v979));
8630 var v981 = ({car: v978, cdr: (function(){
8632 var value = symbol.value;
8633 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8636 return ((l320).value = v981);
8638 var l338 = {name: "SYMBOL-NAME"};
8640 var v982 = l47.fvalue(pv, l338, (function (values,v983){
8641 checkArgs(arguments, 2);
8643 return (function(v984){
8644 return l191.fvalue(values, "(", v984, ").name");
8645 })(l193.fvalue(pv, v983));
8648 var v985 = ({car: v982, cdr: (function(){
8650 var value = symbol.value;
8651 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8654 return ((l320).value = v985);
8657 var v986 = l47.fvalue(pv, l256, (function (values,v987,v988){
8658 checkArgs(arguments, 3);
8660 return (function(v989,v990){
8661 return l191.fvalue(values, "(", v989, ").value = ", v990);
8662 })(l193.fvalue(pv, v987),l193.fvalue(pv, v988));
8665 var v991 = ({car: v986, cdr: (function(){
8667 var value = symbol.value;
8668 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8671 return ((l320).value = v991);
8673 var l339 = {name: "FSET"};
8675 var v992 = l47.fvalue(pv, l339, (function (values,v993,v994){
8676 checkArgs(arguments, 3);
8678 return (function(v995,v996){
8679 return l191.fvalue(values, "(", v995, ").fvalue = ", v996);
8680 })(l193.fvalue(pv, v993),l193.fvalue(pv, v994));
8683 var v997 = ({car: v992, cdr: (function(){
8685 var value = symbol.value;
8686 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8689 return ((l320).value = v997);
8692 var v998 = l47.fvalue(pv, l20, (function (values,v999){
8693 checkArgs(arguments, 2);
8695 return (function(v1000){
8696 return l192.fvalue(values, l191.fvalue(pv, "(", v1000, ".value !== undefined)"));
8697 })(l193.fvalue(pv, v999));
8700 var v1001 = ({car: v998, cdr: (function(){
8702 var value = symbol.value;
8703 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8706 return ((l320).value = v1001);
8708 var l340 = {name: "SYMBOL-VALUE"};
8710 var v1002 = l47.fvalue(pv, l340, (function (values,v1003){
8711 checkArgs(arguments, 2);
8713 return (function(v1004){
8714 return l191.fvalue(values, "(function(){", (function(){
8716 var value = symbol.value;
8717 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8719 })(), l195.fvalue(pv, "var symbol = ", v1004, ";", (function(){
8721 var value = symbol.value;
8722 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8724 })(), "var value = symbol.value;", (function(){
8726 var value = symbol.value;
8727 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8729 })(), "if (value === undefined) throw \"Variable `\" + symbol.name + \"' is unbound.\";", (function(){
8731 var value = symbol.value;
8732 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8734 })(), "return value;", (function(){
8736 var value = symbol.value;
8737 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8740 })(l193.fvalue(pv, v1003));
8743 var v1005 = ({car: v1002, cdr: (function(){
8745 var value = symbol.value;
8746 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8749 return ((l320).value = v1005);
8752 var v1006 = l47.fvalue(pv, l264, (function (values,v1007){
8753 checkArgs(arguments, 2);
8755 return (function(v1008){
8756 return l191.fvalue(values, "(function(){", (function(){
8758 var value = symbol.value;
8759 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8761 })(), l195.fvalue(pv, "var symbol = ", v1008, ";", (function(){
8763 var value = symbol.value;
8764 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8766 })(), "var func = symbol.fvalue;", (function(){
8768 var value = symbol.value;
8769 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8771 })(), "if (func === undefined) throw \"Function `\" + symbol.name + \"' is undefined.\";", (function(){
8773 var value = symbol.value;
8774 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8776 })(), "return func;", (function(){
8778 var value = symbol.value;
8779 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8782 })(l193.fvalue(pv, v1007));
8785 var v1009 = ({car: v1006, cdr: (function(){
8787 var value = symbol.value;
8788 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8791 return ((l320).value = v1009);
8793 var l341 = {name: "SYMBOL-PLIST"};
8795 var v1010 = l47.fvalue(pv, l341, (function (values,v1011){
8796 checkArgs(arguments, 2);
8798 return (function(v1012){
8799 return l191.fvalue(values, "((", v1012, ").plist || ", l193.fvalue(pv, l5.value), ")");
8800 })(l193.fvalue(pv, v1011));
8803 var v1013 = ({car: v1010, cdr: (function(){
8805 var value = symbol.value;
8806 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8809 return ((l320).value = v1013);
8811 var l342 = {name: "LAMBDA-CODE"};
8813 var v1014 = l47.fvalue(pv, l342, (function (values,v1015){
8814 checkArgs(arguments, 2);
8816 return (function(v1016){
8817 return l191.fvalue(values, "(", v1016, ").toString()");
8818 })(l193.fvalue(pv, v1015));
8821 var v1017 = ({car: v1014, cdr: (function(){
8823 var value = symbol.value;
8824 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8827 return ((l320).value = v1017);
8829 var l343 = {name: "EQ"};
8831 var v1018 = l47.fvalue(pv, l343, (function (values,v1019,v1020){
8832 checkArgs(arguments, 3);
8834 return (function(v1021,v1022){
8835 return l192.fvalue(values, l191.fvalue(pv, "(", v1021, " === ", v1022, ")"));
8836 })(l193.fvalue(pv, v1019),l193.fvalue(pv, v1020));
8839 var v1023 = ({car: v1018, cdr: (function(){
8841 var value = symbol.value;
8842 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8845 return ((l320).value = v1023);
8847 var l344 = {name: "EQUAL"};
8849 var v1024 = l47.fvalue(pv, l344, (function (values,v1025,v1026){
8850 checkArgs(arguments, 3);
8852 return (function(v1027,v1028){
8853 return l192.fvalue(values, l191.fvalue(pv, "(", v1027, " == ", v1028, ")"));
8854 })(l193.fvalue(pv, v1025),l193.fvalue(pv, v1026));
8857 var v1029 = ({car: v1024, cdr: (function(){
8859 var value = symbol.value;
8860 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8863 return ((l320).value = v1029);
8865 var l345 = {name: "CHAR-TO-STRING"};
8867 var v1030 = l47.fvalue(pv, l345, (function (values,v1031){
8868 checkArgs(arguments, 2);
8870 return (function(v1032){
8871 return l191.fvalue(values, "(function(){", (function(){
8873 var value = symbol.value;
8874 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8876 })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "x", " = ", v1032, ";", (function(){
8878 var value = symbol.value;
8879 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8881 })()), l191.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
8883 var value = symbol.value;
8884 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8886 })(), l195.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
8888 var value = symbol.value;
8889 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8891 })())), l191.fvalue(pv, "return ", "String.fromCharCode(x)", ";", (function(){
8893 var value = symbol.value;
8894 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8897 })(l193.fvalue(pv, v1031));
8900 var v1033 = ({car: v1030, cdr: (function(){
8902 var value = symbol.value;
8903 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8906 return ((l320).value = v1033);
8908 var l346 = {name: "STRINGP"};
8910 var v1034 = l47.fvalue(pv, l346, (function (values,v1035){
8911 checkArgs(arguments, 2);
8913 return (function(v1036){
8914 return l192.fvalue(values, l191.fvalue(pv, "(typeof(", v1036, ") == \"string\")"));
8915 })(l193.fvalue(pv, v1035));
8918 var v1037 = ({car: v1034, cdr: (function(){
8920 var value = symbol.value;
8921 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8924 return ((l320).value = v1037);
8926 var l347 = {name: "STRING-UPCASE"};
8928 var v1038 = l47.fvalue(pv, l347, (function (values,v1039){
8929 checkArgs(arguments, 2);
8931 return (function(v1040){
8932 return l191.fvalue(values, "(function(){", (function(){
8934 var value = symbol.value;
8935 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8937 })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "x", " = ", v1040, ";", (function(){
8939 var value = symbol.value;
8940 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8942 })()), l191.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
8944 var value = symbol.value;
8945 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8947 })(), l195.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
8949 var value = symbol.value;
8950 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8952 })())), l191.fvalue(pv, "return ", "x.toUpperCase()", ";", (function(){
8954 var value = symbol.value;
8955 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8958 })(l193.fvalue(pv, v1039));
8961 var v1041 = ({car: v1038, cdr: (function(){
8963 var value = symbol.value;
8964 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8967 return ((l320).value = v1041);
8969 var l348 = {name: "STRING-LENGTH"};
8971 var v1042 = l47.fvalue(pv, l348, (function (values,v1043){
8972 checkArgs(arguments, 2);
8974 return (function(v1044){
8975 return l191.fvalue(values, "(function(){", (function(){
8977 var value = symbol.value;
8978 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8980 })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "x", " = ", v1044, ";", (function(){
8982 var value = symbol.value;
8983 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8985 })()), l191.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
8987 var value = symbol.value;
8988 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8990 })(), l195.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
8992 var value = symbol.value;
8993 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8995 })())), l191.fvalue(pv, "return ", "x.length", ";", (function(){
8997 var value = symbol.value;
8998 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9001 })(l193.fvalue(pv, v1043));
9004 var v1045 = ({car: v1042, cdr: (function(){
9006 var value = symbol.value;
9007 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9010 return ((l320).value = v1045);
9012 var l349 = {name: "SLICE"};
9014 var v1046 = l47.fvalue(pv, l349, (function (values,v1047,v1048,v1049){
9015 checkArgsAtLeast(arguments, 3);
9016 checkArgsAtMost(arguments, 4);
9018 switch(arguments.length-1){
9024 return l191.fvalue(values, "(function(){", (function(){
9026 var value = symbol.value;
9027 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9029 })(), l195.fvalue(pv, "var str = ", l193.fvalue(pv, v1047), ";", (function(){
9031 var value = symbol.value;
9032 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9034 })(), "var a = ", l193.fvalue(pv, v1048), ";", (function(){
9036 var value = symbol.value;
9037 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9039 })(), "var b;", (function(){
9041 var value = symbol.value;
9042 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9044 })(), (v1049 !== l5.value ? l191.fvalue(pv, "b = ", l193.fvalue(pv, v1049), ";", (function(){
9046 var value = symbol.value;
9047 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9049 })()) : l5.value), "return str.slice(a,b);", (function(){
9051 var value = symbol.value;
9052 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9057 var v1050 = ({car: v1046, cdr: (function(){
9059 var value = symbol.value;
9060 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9063 return ((l320).value = v1050);
9065 var l350 = {name: "CHAR"};
9067 var v1051 = l47.fvalue(pv, l350, (function (values,v1052,v1053){
9068 checkArgs(arguments, 3);
9070 return (function(v1054,v1055){
9071 return l191.fvalue(values, "(function(){", (function(){
9073 var value = symbol.value;
9074 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9076 })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "string", " = ", v1054, ";", (function(){
9078 var value = symbol.value;
9079 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9081 })()), l191.fvalue(pv, "var ", "index", " = ", v1055, ";", (function(){
9083 var value = symbol.value;
9084 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9086 })()), l191.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){
9088 var value = symbol.value;
9089 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9091 })(), l195.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
9093 var value = symbol.value;
9094 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9096 })())), l191.fvalue(pv, "if (typeof ", "index", " != '", "number", "')", (function(){
9098 var value = symbol.value;
9099 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9101 })(), l195.fvalue(pv, "throw 'The value ' + ", "index", " + ' is not a type ", "number", ".';", (function(){
9103 var value = symbol.value;
9104 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9106 })())), l191.fvalue(pv, "return ", "string.charCodeAt(index)", ";", (function(){
9108 var value = symbol.value;
9109 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9112 })(l193.fvalue(pv, v1052),l193.fvalue(pv, v1053));
9115 var v1056 = ({car: v1051, cdr: (function(){
9117 var value = symbol.value;
9118 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9121 return ((l320).value = v1056);
9124 var v1057 = l47.fvalue(pv, l76, (function (values,v1058,v1059){
9125 checkArgs(arguments, 3);
9127 return (function(v1060,v1061){
9128 return l191.fvalue(values, "(function(){", (function(){
9130 var value = symbol.value;
9131 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9133 })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "string1", " = ", v1060, ";", (function(){
9135 var value = symbol.value;
9136 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9138 })()), l191.fvalue(pv, "var ", "string2", " = ", v1061, ";", (function(){
9140 var value = symbol.value;
9141 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9143 })()), l191.fvalue(pv, "if (typeof ", "string1", " != '", "string", "')", (function(){
9145 var value = symbol.value;
9146 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9148 })(), l195.fvalue(pv, "throw 'The value ' + ", "string1", " + ' is not a type ", "string", ".';", (function(){
9150 var value = symbol.value;
9151 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9153 })())), l191.fvalue(pv, "if (typeof ", "string2", " != '", "string", "')", (function(){
9155 var value = symbol.value;
9156 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9158 })(), l195.fvalue(pv, "throw 'The value ' + ", "string2", " + ' is not a type ", "string", ".';", (function(){
9160 var value = symbol.value;
9161 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9163 })())), l191.fvalue(pv, "return ", "string1.concat(string2)", ";", (function(){
9165 var value = symbol.value;
9166 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9169 })(l193.fvalue(pv, v1058),l193.fvalue(pv, v1059));
9172 var v1062 = ({car: v1057, cdr: (function(){
9174 var value = symbol.value;
9175 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9178 return ((l320).value = v1062);
9180 var l351 = {name: "FUNCALL"};
9182 var v1063 = l47.fvalue(pv, l351, (function (values,v1065){
9183 checkArgsAtLeast(arguments, 2);
9184 var v1064= l5.value;
9185 for (var i = arguments.length-1; i>=2; i--)
9186 v1064 = {car: arguments[i], cdr:
9189 return l191.fvalue(values, "(function(){", (function(){
9191 var value = symbol.value;
9192 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9194 })(), l195.fvalue(pv, "var f = ", l193.fvalue(pv, v1065), ";", (function(){
9196 var value = symbol.value;
9197 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9199 })(), "return (typeof f === 'function'? f: f.fvalue)(", l159.fvalue(pv, ({car: ((function(){
9201 var value = symbol.value;
9202 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9204 })() !== l5.value ? "values" : "pv"), cdr: l81.fvalue(pv, (function(){
9206 var func = symbol.fvalue;
9207 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9209 })(), v1064)}), ", "), ")"), "})()");
9212 var v1066 = ({car: v1063, cdr: (function(){
9214 var value = symbol.value;
9215 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9218 return ((l320).value = v1066);
9220 var l352 = {name: "APPLY"};
9222 var v1067 = l47.fvalue(pv, l352, (function (values,v1069){
9223 checkArgsAtLeast(arguments, 2);
9224 var v1068= l5.value;
9225 for (var i = arguments.length-1; i>=2; i--)
9226 v1068 = {car: arguments[i], cdr:
9229 return (l13.fvalue(pv, v1068) !== l5.value ? l191.fvalue(values, "(", l193.fvalue(pv, v1069), ")()") : (function(v1070,v1071){
9230 return l191.fvalue(values, "(function(){", (function(){
9232 var value = symbol.value;
9233 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9235 })(), l195.fvalue(pv, "var f = ", l193.fvalue(pv, v1069), ";", (function(){
9237 var value = symbol.value;
9238 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9240 })(), "var args = [", l159.fvalue(pv, ({car: ((function(){
9242 var value = symbol.value;
9243 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9245 })() !== l5.value ? "values" : "pv"), cdr: l81.fvalue(pv, (function(){
9247 var func = symbol.fvalue;
9248 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9250 })(), v1070)}), ", "), "];", (function(){
9252 var value = symbol.value;
9253 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9255 })(), "var tail = (", l193.fvalue(pv, v1071), ");", (function(){
9257 var value = symbol.value;
9258 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9260 })(), "while (tail != ", l193.fvalue(pv, l5.value), "){", (function(){
9262 var value = symbol.value;
9263 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9265 })(), " args.push(tail.car);", (function(){
9267 var value = symbol.value;
9268 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9270 })(), " tail = tail.cdr;", (function(){
9272 var value = symbol.value;
9273 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9275 })(), "}", (function(){
9277 var value = symbol.value;
9278 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9280 })(), "return (typeof f === 'function'? f : f.fvalue).apply(this, args);", (function(){
9282 var value = symbol.value;
9283 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9286 })(l95.fvalue(pv, v1068),(function(){
9287 var tmp = l94.fvalue(pv, v1068);
9288 return tmp === l5.value? l5.value: tmp.car;
9292 var v1072 = ({car: v1067, cdr: (function(){
9294 var value = symbol.value;
9295 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9298 return ((l320).value = v1072);
9300 var l353 = {name: "JS-EVAL"};
9302 var v1073 = l47.fvalue(pv, l353, (function (values,v1074){
9303 checkArgs(arguments, 2);
9305 return (function(v1075){
9306 return l191.fvalue(values, "(function(){", (function(){
9308 var value = symbol.value;
9309 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9311 })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "string", " = ", v1075, ";", (function(){
9313 var value = symbol.value;
9314 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9316 })()), l191.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){
9318 var value = symbol.value;
9319 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9321 })(), l195.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
9323 var value = symbol.value;
9324 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9326 })())), l191.fvalue(pv, "return ", ((function(){
9328 var value = symbol.value;
9329 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9331 })() !== l5.value ? l191.fvalue(pv, "(function(){", (function(){
9333 var value = symbol.value;
9334 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9336 })(), l195.fvalue(pv, "var v = eval.apply(window, [string]);", (function(){
9338 var value = symbol.value;
9339 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9341 })(), "if (typeof v !== 'object' || !('multiple-value' in v)){", (function(){
9343 var value = symbol.value;
9344 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9346 })(), l195.fvalue(pv, "v = [v];", (function(){
9348 var value = symbol.value;
9349 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9351 })(), "v['multiple-value'] = true;", (function(){
9353 var value = symbol.value;
9354 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9356 })()), "}", (function(){
9358 var value = symbol.value;
9359 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9361 })(), "return values.apply(this, v);", (function(){
9363 var value = symbol.value;
9364 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9366 })()), "})()") : "eval.apply(window, [string])"), ";", (function(){
9368 var value = symbol.value;
9369 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9372 })(l193.fvalue(pv, v1074));
9375 var v1076 = ({car: v1073, cdr: (function(){
9377 var value = symbol.value;
9378 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9381 return ((l320).value = v1076);
9383 var l354 = {name: "ERROR"};
9385 var v1077 = l47.fvalue(pv, l354, (function (values,v1078){
9386 checkArgs(arguments, 2);
9388 return (function(v1079){
9389 return l191.fvalue(values, "(function(){", (function(){
9391 var value = symbol.value;
9392 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9394 })(), l195.fvalue(pv, "throw ", v1079, ";", (function(){
9396 var value = symbol.value;
9397 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9400 })(l193.fvalue(pv, v1078));
9403 var v1080 = ({car: v1077, cdr: (function(){
9405 var value = symbol.value;
9406 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9409 return ((l320).value = v1080);
9411 var l355 = {name: "NEW"};
9413 var v1081 = l47.fvalue(pv, l355, (function (values){
9414 checkArgsAtMost(arguments, 1);
9421 var v1082 = ({car: v1081, cdr: (function(){
9423 var value = symbol.value;
9424 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9427 return ((l320).value = v1082);
9429 var l356 = {name: "OBJECTP"};
9431 var v1083 = l47.fvalue(pv, l356, (function (values,v1084){
9432 checkArgs(arguments, 2);
9434 return (function(v1085){
9435 return l192.fvalue(values, l191.fvalue(pv, "(typeof (", v1085, ") === 'object')"));
9436 })(l193.fvalue(pv, v1084));
9439 var v1086 = ({car: v1083, cdr: (function(){
9441 var value = symbol.value;
9442 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9445 return ((l320).value = v1086);
9447 var l357 = {name: "OGET"};
9449 var v1087 = l47.fvalue(pv, l357, (function (values,v1088,v1089){
9450 checkArgs(arguments, 3);
9452 return (function(v1090,v1091){
9453 return l191.fvalue(values, "(function(){", (function(){
9455 var value = symbol.value;
9456 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9458 })(), l195.fvalue(pv, "var tmp = ", "(", v1090, ")[", v1091, "];", (function(){
9460 var value = symbol.value;
9461 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9463 })(), "return tmp == undefined? ", l193.fvalue(pv, l5.value), ": tmp ;", (function(){
9465 var value = symbol.value;
9466 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9469 })(l193.fvalue(pv, v1088),l193.fvalue(pv, v1089));
9472 var v1092 = ({car: v1087, cdr: (function(){
9474 var value = symbol.value;
9475 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9478 return ((l320).value = v1092);
9480 var l358 = {name: "OSET"};
9482 var v1093 = l47.fvalue(pv, l358, (function (values,v1094,v1095,v1096){
9483 checkArgs(arguments, 4);
9485 return (function(v1097,v1098,v1099){
9486 return l191.fvalue(values, "((", v1097, ")[", v1098, "] = ", v1099, ")");
9487 })(l193.fvalue(pv, v1094),l193.fvalue(pv, v1095),l193.fvalue(pv, v1096));
9490 var v1100 = ({car: v1093, cdr: (function(){
9492 var value = symbol.value;
9493 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9496 return ((l320).value = v1100);
9498 var l359 = {name: "IN"};
9500 var v1101 = l47.fvalue(pv, l359, (function (values,v1102,v1103){
9501 checkArgs(arguments, 3);
9503 return (function(v1104,v1105){
9504 return l192.fvalue(values, l191.fvalue(pv, "((", v1104, ") in (", v1105, "))"));
9505 })(l193.fvalue(pv, v1102),l193.fvalue(pv, v1103));
9508 var v1106 = ({car: v1101, cdr: (function(){
9510 var value = symbol.value;
9511 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9514 return ((l320).value = v1106);
9516 var l360 = {name: "FUNCTIONP"};
9518 var v1107 = l47.fvalue(pv, l360, (function (values,v1108){
9519 checkArgs(arguments, 2);
9521 return (function(v1109){
9522 return l192.fvalue(values, l191.fvalue(pv, "(typeof ", v1109, " == 'function')"));
9523 })(l193.fvalue(pv, v1108));
9526 var v1110 = ({car: v1107, cdr: (function(){
9528 var value = symbol.value;
9529 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9532 return ((l320).value = v1110);
9534 var l361 = {name: "WRITE-STRING"};
9536 var v1111 = l47.fvalue(pv, l361, (function (values,v1112){
9537 checkArgs(arguments, 2);
9539 return (function(v1113){
9540 return l191.fvalue(values, "(function(){", (function(){
9542 var value = symbol.value;
9543 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9545 })(), l195.fvalue(pv, l191.fvalue(pv, "var ", "x", " = ", v1113, ";", (function(){
9547 var value = symbol.value;
9548 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9550 })()), l191.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
9552 var value = symbol.value;
9553 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9555 })(), l195.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
9557 var value = symbol.value;
9558 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9560 })())), l191.fvalue(pv, "return ", "lisp.write(x)", ";", (function(){
9562 var value = symbol.value;
9563 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9566 })(l193.fvalue(pv, v1112));
9569 var v1114 = ({car: v1111, cdr: (function(){
9571 var value = symbol.value;
9572 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9575 return ((l320).value = v1114);
9577 var l362 = {name: "MAKE-ARRAY"};
9579 var v1115 = l47.fvalue(pv, l362, (function (values,v1116){
9580 checkArgs(arguments, 2);
9582 return (function(v1117){
9583 return l191.fvalue(values, "(function(){", (function(){
9585 var value = symbol.value;
9586 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9588 })(), l195.fvalue(pv, "var r = [];", (function(){
9590 var value = symbol.value;
9591 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9593 })(), "for (var i = 0; i < ", v1117, "; i++)", (function(){
9595 var value = symbol.value;
9596 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9598 })(), l195.fvalue(pv, "r.push(", l193.fvalue(pv, l5.value), ");", (function(){
9600 var value = symbol.value;
9601 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9603 })()), "return r;", (function(){
9605 var value = symbol.value;
9606 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9609 })(l193.fvalue(pv, v1116));
9612 var v1118 = ({car: v1115, cdr: (function(){
9614 var value = symbol.value;
9615 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9618 return ((l320).value = v1118);
9620 var l363 = {name: "ARRAYP"};
9622 var v1119 = l47.fvalue(pv, l363, (function (values,v1120){
9623 checkArgs(arguments, 2);
9625 return (function(v1121){
9626 return l192.fvalue(values, l191.fvalue(pv, "(function(){", (function(){
9628 var value = symbol.value;
9629 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9631 })(), l195.fvalue(pv, "var x = ", v1121, ";", (function(){
9633 var value = symbol.value;
9634 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9636 })(), "return typeof x === 'object' && 'length' in x;"), "})()"));
9637 })(l193.fvalue(pv, v1120));
9640 var v1122 = ({car: v1119, cdr: (function(){
9642 var value = symbol.value;
9643 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9646 return ((l320).value = v1122);
9648 var l364 = {name: "AREF"};
9650 var v1123 = l47.fvalue(pv, l364, (function (values,v1124,v1125){
9651 checkArgs(arguments, 3);
9653 return (function(v1126,v1127){
9654 return l191.fvalue(values, "(function(){", (function(){
9656 var value = symbol.value;
9657 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9659 })(), l195.fvalue(pv, "var x = ", "(", v1126, ")[", v1127, "];", (function(){
9661 var value = symbol.value;
9662 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9664 })(), "if (x === undefined) throw 'Out of range';", (function(){
9666 var value = symbol.value;
9667 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9669 })(), "return x;", (function(){
9671 var value = symbol.value;
9672 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9675 })(l193.fvalue(pv, v1124),l193.fvalue(pv, v1125));
9678 var v1128 = ({car: v1123, cdr: (function(){
9680 var value = symbol.value;
9681 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9684 return ((l320).value = v1128);
9686 var l365 = {name: "ASET"};
9688 var v1129 = l47.fvalue(pv, l365, (function (values,v1130,v1131,v1132){
9689 checkArgs(arguments, 4);
9691 return (function(v1133,v1134,v1135){
9692 return l191.fvalue(values, "(function(){", (function(){
9694 var value = symbol.value;
9695 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9697 })(), l195.fvalue(pv, "var x = ", v1133, ";", (function(){
9699 var value = symbol.value;
9700 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9702 })(), "var i = ", v1134, ";", (function(){
9704 var value = symbol.value;
9705 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9707 })(), "if (i < 0 || i >= x.length) throw 'Out of range';", (function(){
9709 var value = symbol.value;
9710 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9712 })(), "return x[i] = ", v1135, ";", (function(){
9714 var value = symbol.value;
9715 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9718 })(l193.fvalue(pv, v1130),l193.fvalue(pv, v1131),l193.fvalue(pv, v1132));
9721 var v1136 = ({car: v1129, cdr: (function(){
9723 var value = symbol.value;
9724 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9727 return ((l320).value = v1136);
9729 var l366 = {name: "GET-UNIX-TIME"};
9731 var v1137 = l47.fvalue(pv, l366, (function (values){
9732 checkArgsAtMost(arguments, 1);
9735 return l191.fvalue(values, "(Math.round(new Date() / 1000))");
9739 var v1138 = ({car: v1137, cdr: (function(){
9741 var value = symbol.value;
9742 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9745 return ((l320).value = v1138);
9747 var l367 = {name: "VALUES-ARRAY"};
9749 var v1139 = l47.fvalue(pv, l367, (function (values,v1140){
9750 checkArgs(arguments, 2);
9752 return (function(v1141){
9753 return ((function(){
9755 var value = symbol.value;
9756 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9758 })() !== l5.value ? l191.fvalue(values, "values.apply(this, ", v1141, ")") : l191.fvalue(values, "pv.apply(this, ", v1141, ")"));
9759 })(l193.fvalue(pv, v1140));
9762 var v1142 = ({car: v1139, cdr: (function(){
9764 var value = symbol.value;
9765 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9768 return ((l320).value = v1142);
9771 var v1143 = l47.fvalue(pv, l165, (function (values){
9772 var v1144= l5.value;
9773 for (var i = arguments.length-1; i>=1; i--)
9774 v1144 = {car: arguments[i], cdr:
9777 return ((function(){
9779 var value = symbol.value;
9780 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9782 })() !== l5.value ? l191.fvalue(values, "values(", l159.fvalue(pv, l81.fvalue(pv, (function(){
9784 var func = symbol.fvalue;
9785 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9787 })(), v1144), ", "), ")") : l191.fvalue(values, "pv(", l159.fvalue(pv, l81.fvalue(pv, (function(){
9789 var func = symbol.fvalue;
9790 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9792 })(), v1144), ", "), ")"));
9795 var v1145 = ({car: v1143, cdr: (function(){
9797 var value = symbol.value;
9798 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9801 return ((l320).value = v1145);
9804 (l222).fvalue = (function(v1148){
9805 ((v1148)["fname"] = "MACRO");
9807 })((function (values,v1146){
9808 checkArgs(arguments, 2);
9810 return (((function(){
9812 return (typeof tmp == 'object' && 'name' in tmp);
9813 })()?l4.value: l5.value) !== l5.value ? (function(v1147){
9814 return (((l199.fvalue(pv, v1147) === l222)?l4.value: l5.value) !== l5.value ? v1147 : l5.value);
9815 })(l211.fvalue(pv, v1146, (function(){
9817 var value = symbol.value;
9818 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9820 })(), l113)) : l5.value);
9826 (l120).fvalue = (function(v1153){
9827 ((v1153)["fname"] = "LS-MACROEXPAND-1");
9829 })((function (values,v1149){
9830 checkArgs(arguments, 2);
9832 return (function(v1150){
9833 return (v1150 !== l5.value ? (function(v1151){
9834 (l62.fvalue(pv, v1151) !== l5.value ? (function(v1152){
9835 l202.fvalue(pv, v1150, v1152);
9836 return (v1151 = v1152);
9837 })(l272.fvalue(pv, v1151)) : l5.value);
9840 var args = [values];
9841 var tail = ((function(){
9843 return tmp === l5.value? l5.value: tmp.cdr;
9845 while (tail != l5.value){
9846 args.push(tail.car);
9849 return (typeof f === 'function'? f : f.fvalue).apply(this, args);
9851 })(l200.fvalue(pv, v1150)) : v1149);
9852 })(l222.fvalue(pv, (function(){
9854 return tmp === l5.value? l5.value: tmp.car;
9860 var l368 = {name: "COMPILE-FUNCALL"};
9861 var l369 = {name: "G764"};
9863 (l368).fvalue = (function(v1158){
9864 ((v1158)["fname"] = "COMPILE-FUNCALL");
9866 })((function (values,v1154,v1155){
9867 checkArgs(arguments, 3);
9870 var v1156 = ((function(){
9872 var value = symbol.value;
9873 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9875 })() !== l5.value ? "values" : "pv");
9876 var v1157 = l157.fvalue(pv, "(", l159.fvalue(pv, ({car: v1156, cdr: l81.fvalue(pv, (function(){
9878 var func = symbol.fvalue;
9879 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9881 })(), v1155)}), ", "), ")");
9882 return (l267.fvalue(pv, v1154) !== l5.value ? l157.fvalue(values, l267.fvalue(pv, v1154), v1157) : ((((function(){
9884 return (typeof tmp == 'object' && 'name' in tmp);
9885 })()?l4.value: l5.value) !== l5.value ? (((l145.fvalue(pv, v1154) === l136.fvalue(pv, "COMMON-LISP"))?l4.value: l5.value) !== l5.value ? (function(){
9887 var value = symbol.value;
9888 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9890 })() : l5.value) : l5.value) !== l5.value ? l191.fvalue(values, l193.fvalue(pv, l47.fvalue(pv, l186, v1154)), ".fvalue", v1157) : l191.fvalue(values, l193.fvalue(pv, l47.fvalue(pv, l113, v1154)), v1157)));
9897 (l254).fvalue = (function(v1161){
9898 ((v1161)["fname"] = "LS-COMPILE-BLOCK");
9900 })((function (values,v1159,v1160){
9901 checkArgsAtLeast(arguments, 2);
9902 checkArgsAtMost(arguments, 3);
9904 switch(arguments.length-1){
9910 return (v1160 !== l5.value ? l191.fvalue(values, l254.fvalue(pv, l95.fvalue(pv, v1159)), "return ", l193.fvalue(pv, (function(){
9911 var tmp = l94.fvalue(pv, v1159);
9912 return tmp === l5.value? l5.value: tmp.car;
9915 var value = symbol.value;
9916 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9918 })()), ";") : l160.fvalue(values, l98.fvalue(pv, (function(){
9920 var func = symbol.fvalue;
9921 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9923 })(), l81.fvalue(pv, (function(){
9925 var func = symbol.fvalue;
9926 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
9928 })(), v1159)), l157.fvalue(pv, ";", (function(){
9930 var value = symbol.value;
9931 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9939 (l193).fvalue = (function(v1171){
9940 ((v1171)["fname"] = "LS-COMPILE");
9942 })((function (values,v1162,v1163){
9943 checkArgsAtLeast(arguments, 2);
9944 checkArgsAtMost(arguments, 3);
9946 switch(arguments.length-1){
9952 return (function(v1164){
9958 return (((function(){
9960 return (typeof tmp == 'object' && 'name' in tmp);
9961 })()?l4.value: l5.value) !== l5.value ? (function(v1165){
9962 return ((v1165 !== l5.value ? l29.fvalue(pv, l96.fvalue(pv, l226, l201.fvalue(pv, v1165))) : l5.value) !== l5.value ? l200.fvalue(values, v1165) : ((function(v1166){
9963 return (v1166 !== l5.value ? v1166 : l96.fvalue(pv, l228, l201.fvalue(pv, v1165)));
9964 })(l144.fvalue(pv, v1162)) !== l5.value ? l191.fvalue(values, l193.fvalue(pv, l47.fvalue(pv, l186, v1162)), ".value") : l193.fvalue(values, l47.fvalue(pv, l340, l47.fvalue(pv, l186, v1162)))));
9965 })(l211.fvalue(pv, v1162, (function(){
9967 var value = symbol.value;
9968 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9970 })(), l114)) : (l89.fvalue(pv, v1162) !== l5.value ? l19.fvalue(values, v1162) : (((typeof(v1162) == "string")?l4.value: l5.value) !== l5.value ? l191.fvalue(values, "\"", l167.fvalue(pv, v1162), "\"") : (((function(){
9972 return typeof x === 'object' && 'length' in x;
9973 })()?l4.value: l5.value) !== l5.value ? l262.fvalue(values, v1162) : (l62.fvalue(pv, v1162) !== l5.value ? (function(v1167,v1168){
9974 return (l106.fvalue(pv, v1167, (function(){
9976 var value = symbol.value;
9977 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9979 })()) !== l5.value ? (function(v1169){
9982 var args = [values];
9984 while (tail != l5.value){
9985 args.push(tail.car);
9988 return (typeof f === 'function'? f : f.fvalue).apply(this, args);
9990 })(l43.fvalue(pv, l106.fvalue(pv, v1167, (function(){
9992 var value = symbol.value;
9993 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
9995 })()))) : ((l106.fvalue(pv, v1167, (function(){
9997 var value = symbol.value;
9998 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10000 })()) !== l5.value ? l29.fvalue(pv, l224.fvalue(pv, v1167, l113, l227)) : l5.value) !== l5.value ? (function(v1170){
10001 return (function(){
10003 var args = [values];
10004 var tail = (v1168);
10005 while (tail != l5.value){
10006 args.push(tail.car);
10009 return (typeof f === 'function'? f : f.fvalue).apply(this, args);
10011 })(l43.fvalue(pv, l106.fvalue(pv, v1167, (function(){
10013 var value = symbol.value;
10014 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10016 })()))) : (l222.fvalue(pv, v1167) !== l5.value ? l193.fvalue(values, l120.fvalue(pv, v1162), v1163) : l368.fvalue(values, v1167, v1168))));
10019 return tmp === l5.value? l5.value: tmp.car;
10022 return tmp === l5.value? l5.value: tmp.cdr;
10023 })()) : (function(){
10024 throw l157.fvalue(pv, "How should I compile ", l166.fvalue(pv, v1162), "?");
10028 l196.value = v1164;
10035 var l370 = {name: "LS-COMPILE-TOPLEVEL"};
10037 (l370).fvalue = (function(v1178){
10038 ((v1178)["fname"] = "LS-COMPILE-TOPLEVEL");
10040 })((function (values,v1172,v1173){
10041 checkArgsAtLeast(arguments, 2);
10042 checkArgsAtMost(arguments, 3);
10044 switch(arguments.length-1){
10049 return (function(){
10050 return (function(v1174){
10054 l217.value = v1174;
10056 return ((((function(){
10058 return (typeof tmp == 'object' && 'car' in tmp);
10059 })()?l4.value: l5.value) !== l5.value ? (((function(){
10061 return tmp === l5.value? l5.value: tmp.car;
10062 })() === l123)?l4.value: l5.value) : l5.value) !== l5.value ? (function(v1176){
10063 return l159.fvalue(values, l98.fvalue(pv, (function(){
10065 var func = symbol.fvalue;
10066 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10069 })(l81.fvalue(pv, (function (values,v1175){
10070 checkArgs(arguments, 2);
10071 return l370.fvalue(values, v1175, l4.value);
10074 return tmp === l5.value? l5.value: tmp.cdr;
10075 })())) : (function(v1177){
10076 return l191.fvalue(values, l160.fvalue(pv, l220.fvalue(pv), l191.fvalue(pv, ";", (function(){
10078 var value = symbol.value;
10079 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10081 })())), (v1177 !== l5.value ? l191.fvalue(pv, v1177, ";", (function(){
10083 var value = symbol.value;
10084 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10086 })()) : l5.value));
10087 })(l193.fvalue(pv, v1172, v1173)));
10090 l217.value = v1174;
10098 (l272).fvalue = (function(v1180){
10099 ((v1180)["fname"] = "EVAL");
10101 })((function (values,v1179){
10102 checkArgs(arguments, 2);
10103 return (function(){
10104 return (function(){
10105 var string = l370.fvalue(pv, v1179, l4.value);
10106 if (typeof string != 'string')
10107 throw 'The value ' + string + ' is not a type string.';
10108 return (function(){
10109 var v = eval.apply(window, [string]);
10110 if (typeof v !== 'object' || !('multiple-value' in v)){
10112 v['multiple-value'] = true;
10114 return values.apply(this, v);
10121 var l371 = {name: "&BODY"};
10122 var l372 = QIList(l235,l236,l234,l371,l22,l17,l146,l65,l66,l23,l24,l25,l331,l333,l21,l21,l330,l332,l57,l68,l352,l364,l363,l106,l48,l208,l20,l20,l95,l34,l41,l39,l35,l32,l32,l55,l284,l36,l40,l37,l33,l33,l350,l87,l109,l136,l149,l42,l268,l45,l339,l351,l113,l360,l18,l118,l155,l292,l82,l232,l147,l49,l89,l89,l153,l144,l269,l6,l94,l75,l276,l279,l88,l86,l54,l30,l31,l83,l84,l50,l2,l121,l3,l10,l12,l1,l9,l101,l100,l110,l72,l73,l112,l52,l53,l56,l343,l28,l344,l354,l272,l105,l154,l131,l47,l85,l62,l80,l362,l132,l337,l81,l96,l91,l327,l115,l294,l116,l295,l127,l5,l29,l93,l92,l13,l334,l58,l137,l139,l135,l184,l90,l166,l169,l229,l59,l60,l123,l71,l51,l186,l128,l97,l98,l99,l15,l283,l69,l70,l124,l125,l43,l256,l122,l119,l104,l347,l107,l108,l346,l102,l264,l338,l145,l341,l340,l336,l4,l290,l44,l285,l27,l8,l293,l165,l164,l114,l168,l7,l111,l361,l26,l5);
10123 l154.fvalue(values, l372);
10124 ((l146).value = (function(){
10126 var value = symbol.value;
10127 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
10131 var string = "var lisp";
10132 if (typeof string != 'string')
10133 throw 'The value ' + string + ' is not a type string.';
10134 return (function(){
10135 var v = eval.apply(window, [string]);
10136 if (typeof v !== 'object' || !('multiple-value' in v)){
10138 v['multiple-value'] = true;
10140 return values.apply(this, v);
10144 (lisp.read = (function(){
10146 var func = symbol.fvalue;
10147 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10150 (lisp.print = (function(){
10152 var func = symbol.fvalue;
10153 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10156 (lisp.eval = (function(){
10158 var func = symbol.fvalue;
10159 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
10162 (lisp.compile = (function (values,v1181){
10163 checkArgs(arguments, 2);
10164 return l370.fvalue(values, v1181, l4.value);
10166 (lisp.evalString = (function (values,v1182){
10167 checkArgs(arguments, 2);
10168 return l272.fvalue(values, l190.fvalue(pv, v1182));
10170 (lisp.compileString = (function (values,v1183){
10171 checkArgs(arguments, 2);
10172 return l370.fvalue(values, l190.fvalue(pv, v1183), l4.value);
10174 var l373 = {name: "OP"};
10175 var l374 = {name: "SYM"};
10176 var l375 = {name: "X"};
10177 var l376 = {name: "ARGS"};
10178 var l377 = {name: "BODY"};
10179 var l378 = {name: "DECLS"};
10180 var l379 = {name: "DECL"};
10181 var l380 = {name: "NAME"};
10182 var l381 = {name: "ARG"};
10183 var l382 = {name: "FORM"};
10184 var l383 = {name: "PACKAGE-DESIGNATOR"};
10185 var l384 = {name: "CLAUSULES"};
10186 var l385 = {name: "VALUE"};
10187 var l386 = {name: "C"};
10188 var l387 = {name: "INTEGER"};
10189 var l388 = {name: "PLACE"};
10190 var l389 = {name: "DUMMIES"};
10191 var l390 = {name: "VALS"};
10192 var l391 = {name: "NEWVAL"};
10193 var l392 = {name: "SETTER"};
10194 var l393 = {name: "GETTER"};
10195 var l394 = {name: "G"};
10196 var l395 = {name: "PAIRS"};
10197 var l396 = {name: "VARS"};
10198 var l397 = {name: "STORE-VARS"};
10199 var l398 = {name: "WRITER-FORM"};
10200 var l399 = {name: "READER-FORM"};
10201 var l400 = {name: "RESULT"};
10202 var l401 = {name: "ACCESS-FN"};
10203 var l402 = {name: "LAMBDA-LIST"};
10204 var l403 = {name: "VALUE-FROM"};
10205 var l404 = {name: "VARIABLES"};
10206 var l405 = {name: "ITERATION"};
10207 var l406 = {name: "SEQ"};
10208 var l407 = {name: "INDEX"};
10209 var l408 = {name: "HEAD"};
10210 var l409 = {name: "TAIL"};
10211 var l410 = {name: "COLLECT"};
10212 var l411 = {name: "VARLIST"};
10213 var l412 = {name: "ENDLIST"};
10214 var l413 = {name: "V"};
10215 var l414 = {name: "ASSIGNMENTS"};
10216 var l415 = {name: "FORM1"};
10217 var l416 = {name: "FORMS"};
10218 var l417 = {name: "!FORM"};
10219 var l418 = {name: "CLAUSULE"};
10220 var l419 = {name: "ITER"};
10221 var l420 = {name: "G!TO"};
10222 var l421 = {name: "VAR"};
10223 var l422 = {name: "TO"};
10224 var l423 = {name: "G!LIST"};
10225 var l424 = {name: "DELTA"};
10226 var l425 = {name: "CONDITION"};
10227 var l426 = {name: "DOCSTRING"};
10228 var l427 = QIList(QIList(QIList(l320,l114,l5,QIList(l226,l5),l5),QIList(l304,l114,l5,QIList(l226,l5),l5),QIList(l303,l114,l5,QIList(l226,l5),l5),QIList(l302,l114,l5,QIList(l226,l5),l5),QIList(l301,l114,l5,QIList(l226,l5),l5),QIList(l300,l114,l5,QIList(l226,l5),l5),QIList(l299,l114,l5,QIList(l226,l5),l5),QIList(l298,l114,l5,QIList(l226,l5),l5),QIList(l297,l114,l5,QIList(l226,l5),l5),QIList(l296,l114,l5,QIList(l226,l5),l5),QIList(l287,l114,l5,QIList(l226,l5),l5),QIList(l286,l114,l5,QIList(l226,l5),l5),QIList(l280,l114,l5,QIList(l226,l5),l5),QIList(l270,l114,l5,QIList(l226,l5),l5),QIList(l260,l114,l5,QIList(l226,l5),l5),QIList(l259,l114,l5,QIList(l226,l5),l5),QIList(l233,l114,l5,QIList(l226,l5),l5),QIList(l230,l114,l5,QIList(l226,l5),l5),QIList(l217,l114,l5,QIList(l226,l5),l5),QIList(l213,l114,l5,QIList(l226,l5),l5),QIList(l212,l114,l5,QIList(l226,l5),l5),QIList(l196,l114,l5,QIList(l226,l5),l5),QIList(l185,l114,l5,QIList(l226,l5),l5),QIList(l156,l114,l5,QIList(l226,l5),l5),QIList(l146,l114,l5,QIList(l226,l5),l5),QIList(l143,l114,l5,QIList(l226,l5),l5),QIList(l142,l114,l5,QIList(l226,l5),l5),QIList(l141,l114,l5,QIList(l226,l5),l5),QIList(l130,l114,l5,QIList(l226,l5),l5),QIList(l117,l114,l5,QIList(l226,l5),l5),QIList(l17,l114,l5,QIList(l226,l5),l5),QIList(l5,l114,l5,QIList(l228,l226,l5),l5),QIList(l4,l114,l5,QIList(l228,l226,l5),l5),l5),QIList(QIList(l329,l222,QIList(l113,QIList(l6,QIList(l373,l374,l5),QIList(l187,QIList(l321,QIList(l189,l373,l5),QIList(l375,l235,l376,l5),QIList(l276,QIList(QIList(l376,QIList(l30,l375,l376,l5),l5),l5),QIList(l325,l376,QIList(l192,QIList(l328,l376,QIList(l189,l374,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l325,l222,QIList(l113,QIList(l6,QIList(l376,l235,l377,l5),QIList(l8,QIList(l336,l376,l5),QIList(l354,"Bad usage of VARIABLE-ARITY, you must pass a symbol",l5),l5),QIList(l187,QIList(l324,QIList(l189,l376,l5),QIList(l6,QIList(QIList(l189,l376,l5),l5),QIList(l191,"return ",QIList(l188,l377,l5),";",l156,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l323,l222,QIList(l113,QIList(l6,QIList(l378,l235,l377,l5),QIList(l187,QIList(l194,QIList(l188,QIList(l81,QIList(l6,QIList(l379,l5),QIList(l187,QIList(l191,"var ",QIList(l189,QIList(l42,l379,l5),l5)," = ",QIList(l189,QIList(l44,l379,l5),l5),";",l156,l5),l5),l5),l378,l5),l5),QIList(l188,QIList(l81,QIList(l6,QIList(l379,l5),QIList(l187,QIList(l191,"if (typeof ",QIList(l189,QIList(l42,l379,l5),l5)," != '",QIList(l189,QIList(l43,l379,l5),l5),"')",l156,QIList(l195,"throw 'The value ' + ",QIList(l189,QIList(l42,l379,l5),l5)," + ' is not a type ",QIList(l189,QIList(l43,l379,l5),l5),".';",l156,l5),l5),l5),l5),l378,l5),l5),QIList(l191,"return ",QIList(l123,QIList(l188,l377,l5),l5),";",l156,l5),l5),l5),l5),l5),l5,l5),QIList(l322,l222,QIList(l113,QIList(l6,QIList(l380,l376,l235,l377,l5),QIList(l187,QIList(l321,QIList(l189,l380,l5),QIList(l189,l376,l5),QIList(l276,QIList(l189,QIList(l81,QIList(l6,QIList(l381,l5),QIList(l187,QIList(QIList(l189,l381,l5),QIList(l193,QIList(l189,l381,l5),l5),l5),l5),l5),l376,l5),l5),QIList(l188,l377,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l321,l222,QIList(l113,QIList(l6,QIList(l380,l376,l235,l377,l5),QIList(l187,QIList(l51,QIList(l47,QIList(l186,QIList(l189,l380,l5),l5),QIList(l6,QIList(l189,l376,l5),QIList(l208,QIList(l189,l380,l5),QIList(l188,l377,l5),l5),l5),l5),l320,l5),l5),l5),l5),l5,l5),QIList(l187,l222,QIList(l113,QIList(l6,QIList(l375,l5),QIList(l306,l375,l5),l5),l5),l5,l5),QIList(l273,l222,QIList(l113,QIList(l6,QIList(l380,l376,l382,l5),QIList(l187,QIList(l231,QIList(l189,l380,l5),QIList(l189,l376,l5),QIList(l193,QIList(l189,l382,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l231,l222,QIList(l113,QIList(l6,QIList(l380,l376,l235,l377,l5),QIList(l187,QIList(l51,QIList(l47,QIList(l186,QIList(l189,l380,l5),l5),QIList(l6,QIList(l189,l376,l5),QIList(l208,QIList(l189,l380,l5),QIList(l188,l377,l5),l5),l5),l5),l230,l5),l5),l5),l5),l5,l5),QIList(l194,l222,QIList(l113,QIList(l6,QIList(l235,l377,l5),QIList(l187,QIList(l191,"(function(){",l156,QIList(l195,QIList(l188,l377,l5),l5),"})()",l5),l5),l5),l5),l5,l5),QIList(l158,l222,QIList(l113,QIList(l6,QIList(l114,l235,l382,l5),QIList(l187,QIList(l119,QIList(l189,l114,l5),QIList(l157,QIList(l189,l114,l5),QIList(l123,QIList(l188,l382,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l147,l222,QIList(l113,QIList(l6,QIList(l383,l5),QIList(l187,QIList(l271,QIList(l119,l146,QIList(l134,QIList(l189,l383,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l126,l222,QIList(l113,QIList(l6,QIList(l375,l235,l384,l5),QIList(l276,QIList(QIList(l385,QIList(l18,l5),l5),l5),QIList(l187,QIList(l276,QIList(QIList(QIList(l189,l385,l5),QIList(l189,l375,l5),l5),l5),QIList(l54,QIList(l188,QIList(l81,QIList(l6,QIList(l386,l5),QIList(l232,QIList(l343,QIList(l32,l386,l5),l4,l5),QIList(l187,QIList(QIList(l4,QIList(l188,QIList(l46,l386,l5),l5),l5),l5),l5),QIList(l187,QIList(QIList(QIList(l189,QIList(l56,QIList(l32,l386,l5),QIList(l387,QIList(l186,l89,l5),l5),QIList(l30,QIList(l186,l31,l5),l5),QIList(l107,QIList(l186,l346,l5),l5),QIList(l48,QIList(l186,l48,l5),l5),QIList(l13,QIList(l186,l13,l5),l5),l5),l5),QIList(l189,l385,l5),l5),QIList(l188,QIList(l58,QIList(l46,l386,l5),QIList(l47,l5,l5),l5),l5),l5),l5),l5),l5),l384,l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l51,l222,QIList(l113,QIList(l6,QIList(l375,l388,l5),QIList(l115,QIList(l389,l390,l391,l392,l393,l5),QIList(l118,l388,l5),QIList(l276,QIList(QIList(l394,QIList(l18,l5),l5),l5),QIList(l187,QIList(l279,QIList(QIList(QIList(l189,l394,l5),QIList(l189,l375,l5),l5),QIList(l188,QIList(l81,QIList(l113,l47,l5),l389,l390,l5),l5),QIList(QIList(l189,QIList(l32,l391,l5),l5),QIList(l30,QIList(l189,l394,l5),QIList(l189,l393,l5),l5),l5),QIList(l188,QIList(l33,l391,l5),l5),l5),QIList(l189,l392,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l122,l222,QIList(l113,QIList(l6,QIList(l235,l395,l5),QIList(l54,QIList(QIList(l13,l395,l5),l5,l5),QIList(QIList(l13,QIList(l33,l395,l5),l5),QIList(l354,"Odd number of arguments to setf.",l5),l5),QIList(QIList(l13,QIList(l37,l395,l5),l5),QIList(l276,QIList(QIList(l388,QIList(l42,l395,l5),l5),QIList(l385,QIList(l43,l395,l5),l5),l5),QIList(l115,QIList(l396,l390,l397,l398,l399,l5),QIList(l118,l388,l5),QIList(l187,QIList(l279,QIList(l189,QIList(l81,QIList(l113,l47,l5),l396,l390,l5),l5),QIList(l115,QIList(l189,l397,l5),QIList(l189,l385,l5),QIList(l189,l398,l5),l5),l5),l5),l5),l5),l5),QIList(l4,QIList(l187,QIList(l123,QIList(l188,QIList(l72,QIList(QIList(l395,l395,QIList(l37,l395,l5),l5),QIList(l400,QIList(l186,l5,l5),QIList(l30,QIList(l187,QIList(l122,QIList(l189,QIList(l32,l395,l5),l5),QIList(l189,QIList(l35,l395,l5),l5),l5),l5),l400,l5),l5),l5),QIList(QIList(l13,l395,l5),QIList(l70,l400,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l121,l222,QIList(l113,QIList(l6,QIList(l401,l402,l235,l377,l5),QIList(l8,QIList(l336,l401,l5),QIList(l354,"ACCESS-FN must be a symbol.",l5),l5),QIList(l187,QIList(l123,QIList(l51,QIList(l30,QIList(l186,QIList(l189,l401,l5),l5),QIList(l6,QIList(l189,l402,l5),QIList(l188,l377,l5),l5),l5),l117,l5),QIList(l186,QIList(l189,l401,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l116,l222,QIList(l113,QIList(l6,QIList(l403,l5),QIList(l187,QIList(l294,QIList(l113,l47,l5),QIList(l189,l403,l5),l5),l5),l5),l5),l5,l5),QIList(l115,l222,QIList(l113,QIList(l6,QIList(l404,l403,l235,l377,l5),QIList(l187,QIList(l294,QIList(l6,QIList(l234,QIList(l188,l404,l5),l235,QIList(l189,QIList(l18,l5),l5),l5),QIList(l188,l377,l5),l5),QIList(l189,l403,l5),l5),l5),l5),l5),l5,l5),QIList(l103,l222,QIList(l113,QIList(l6,QIList(l405,l235,l377,l5),QIList(l276,QIList(QIList(l406,QIList(l18,l5),l5),QIList(l407,QIList(l18,l5),l5),l5),QIList(l187,QIList(l276,QIList(QIList(QIList(l189,l406,l5),QIList(l189,QIList(l43,l405,l5),l5),l5),l5),QIList(l54,QIList(QIList(l346,QIList(l189,l406,l5),l5),QIList(l276,QIList(QIList(QIList(l189,l407,l5),0,l5),l5),QIList(l53,QIList(QIList(l189,l407,l5),QIList(l75,QIList(l189,l406,l5),l5),l5),QIList(l276,QIList(QIList(QIList(l189,QIList(l42,l405,l5),l5),QIList(l350,QIList(l189,l406,l5),QIList(l189,l407,l5),l5),l5),l5),QIList(l188,l377,l5),l5),l5),l5),l5),QIList(QIList(l62,QIList(l189,l406,l5),l5),QIList(l52,QIList(QIList(l189,QIList(l42,l405,l5),l5),QIList(l189,l406,l5),l5),QIList(l188,l377,l5),l5),l5),QIList(l4,QIList(l354,"type-error!",l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l80,l222,QIList(l113,QIList(l6,QIList(l235,l377,l5),QIList(l187,QIList(l16,l4,QIList(l188,l377,l5),l5),l5),l5),l5),l5,l5),QIList(l77,l222,QIList(l113,QIList(l6,QIList(l235,l377,l5),QIList(l276,QIList(QIList(l408,QIList(l18,l5),l5),QIList(l409,QIList(l18,l5),l5),l5),QIList(l187,QIList(l279,QIList(QIList(QIList(l189,l408,l5),QIList(l30,QIList(l186,l79,l5),l5,l5),l5),QIList(QIList(l189,l409,l5),QIList(l189,l408,l5),l5),l5),QIList(l268,QIList(QIList(l410,QIList(l375,l5),QIList(l125,QIList(l189,l409,l5),QIList(l30,l375,l5,l5),l5),QIList(l119,QIList(l189,l409,l5),QIList(l33,QIList(l189,l409,l5),l5),l5),l375,l5),l5),QIList(l188,l377,l5),l5),QIList(l33,QIList(l189,l408,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l73,l222,QIList(l113,QIList(l6,QIList(l411,l412,l235,l377,l5),QIList(l187,QIList(l208,l5,QIList(l279,QIList(l189,QIList(l81,QIList(l6,QIList(l375,l5),QIList(l47,QIList(l42,l375,l5),QIList(l43,l375,l5),l5),l5),l411,l5),l5),QIList(l16,l4,QIList(l7,QIList(l189,QIList(l32,l412,l5),l5),QIList(l15,QIList(l123,QIList(l188,QIList(l33,l412,l5),l5),l5),l5),l5),QIList(l290,QIList(l188,l377,l5),l5),QIList(l119,QIList(l188,QIList(l352,QIList(l113,l68,l5),QIList(l81,QIList(l6,QIList(l413,l5),QIList(l57,QIList(l31,QIList(l37,l413,l5),l5),QIList(l47,QIList(l42,l413,l5),QIList(l44,l413,l5),l5),l5),l5),l411,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l72,l222,QIList(l113,QIList(l6,QIList(l411,l412,l235,l377,l5),QIList(l187,QIList(l208,l5,QIList(l276,QIList(l189,QIList(l81,QIList(l6,QIList(l375,l5),QIList(l47,QIList(l42,l375,l5),QIList(l43,l375,l5),l5),l5),l411,l5),l5),QIList(l16,l4,QIList(l7,QIList(l189,QIList(l32,l412,l5),l5),QIList(l15,QIList(l123,QIList(l188,QIList(l33,l412,l5),l5),l5),l5),l5),QIList(l290,QIList(l188,l377,l5),l5),QIList(l71,QIList(l188,QIList(l352,QIList(l113,l68,l5),QIList(l81,QIList(l6,QIList(l413,l5),QIList(l57,QIList(l31,QIList(l37,l413,l5),l5),QIList(l47,QIList(l42,l413,l5),QIList(l44,l413,l5),l5),l5),l5),l411,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l71,l222,QIList(l113,QIList(l6,QIList(l235,l395,l5),QIList(l276,QIList(QIList(l414,QIList(l186,l5,l5),l5),l5),QIList(l16,l4,QIList(l54,QIList(QIList(l13,l395,l5),QIList(l15,l5),l5),QIList(QIList(l13,QIList(l33,l395,l5),l5),QIList(l354,"Odd paris in PSETQ",l5),l5),QIList(l4,QIList(l276,QIList(QIList(l114,QIList(l32,l395,l5),l5),QIList(l385,QIList(l35,l395,l5),l5),l5),QIList(l51,QIList(l187,QIList(QIList(l189,l114,l5),QIList(l189,QIList(l18,l5),l5),QIList(l189,l385,l5),l5),l5),l414,l5),QIList(l119,l395,QIList(l37,l395,l5),l5),l5),l5),l5),l5),QIList(l119,l414,QIList(l70,l414,l5),l5),QIList(l187,QIList(l276,QIList(l189,QIList(l81,QIList(l113,l33,l5),l414,l5),l5),QIList(l119,QIList(l188,QIList(l63,QIList(l113,l68,l5),QIList(l81,QIList(l113,l95,l5),l414,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l60,l222,QIList(l113,QIList(l6,QIList(l415,l400,l235,l377,l5),QIList(l187,QIList(l59,QIList(l123,QIList(l189,l415,l5),QIList(l189,l400,l5),l5),QIList(l188,l377,l5),l5),l5),l5),l5),l5,l5),QIList(l59,l222,QIList(l113,QIList(l6,QIList(l382,l235,l377,l5),QIList(l276,QIList(QIList(l385,QIList(l18,l5),l5),l5),QIList(l187,QIList(l276,QIList(QIList(QIList(l189,l385,l5),QIList(l189,l382,l5),l5),l5),QIList(l188,l377,l5),QIList(l189,l385,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l58,l222,QIList(l113,QIList(l6,QIList(l235,l416,l5),QIList(l54,QIList(QIList(l13,l416,l5),l5,l5),QIList(QIList(l13,QIList(l33,l416,l5),l5),QIList(l32,l416,l5),l5),QIList(l4,QIList(l276,QIList(QIList(l394,QIList(l18,l5),l5),l5),QIList(l187,QIList(l276,QIList(QIList(QIList(l189,l394,l5),QIList(l189,QIList(l32,l416,l5),l5),l5),l5),QIList(l232,QIList(l189,l394,l5),QIList(l189,l394,l5),QIList(l58,QIList(l188,QIList(l33,l416,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l57,l222,QIList(l113,QIList(l6,QIList(l235,l416,l5),QIList(l54,QIList(QIList(l13,l416,l5),l4,l5),QIList(QIList(l13,QIList(l33,l416,l5),l5),QIList(l32,l416,l5),l5),QIList(l4,QIList(l187,QIList(l232,QIList(l189,QIList(l32,l416,l5),l5),QIList(l57,QIList(l188,QIList(l33,l416,l5),l5),l5),l5,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l56,l222,QIList(l113,QIList(l6,QIList(l382,l235,l384,l5),QIList(l187,QIList(l55,QIList(l189,l382,l5),QIList(l188,QIList(l68,l384,QIList(l187,QIList(QIList(l4,QIList(l354,"ECASE expression failed.",l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l55,l222,QIList(l113,QIList(l6,QIList(l382,l235,l384,l5),QIList(l276,QIList(QIList(l417,QIList(l18,l5),l5),l5),QIList(l187,QIList(l276,QIList(QIList(QIList(l189,l417,l5),QIList(l189,l382,l5),l5),l5),QIList(l54,QIList(l188,QIList(l81,QIList(l6,QIList(l418,l5),QIList(l232,QIList(l343,QIList(l32,l418,l5),l4,l5),l418,QIList(l187,QIList(QIList(l28,QIList(l189,l417,l5),QIList(l186,QIList(l189,QIList(l32,l418,l5),l5),l5),l5),QIList(l188,QIList(l33,l418,l5),l5),l5),l5),l5),l5),l384,l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l54,l222,QIList(l113,QIList(l6,QIList(l235,l384,l5),QIList(l232,QIList(l13,l384,l5),l5,QIList(l232,QIList(l343,QIList(l34,l384,l5),l4,l5),QIList(l187,QIList(l123,QIList(l188,QIList(l36,l384,l5),l5),l5),l5),QIList(l187,QIList(l232,QIList(l189,QIList(l34,l384,l5),l5),QIList(l123,QIList(l188,QIList(l36,l384,l5),l5),l5),QIList(l54,QIList(l188,QIList(l33,l384,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l53,l222,QIList(l113,QIList(l6,QIList(l419,l235,l377,l5),QIList(l276,QIList(QIList(l420,QIList(l18,l5),l5),QIList(l421,QIList(l42,l419,l5),l5),QIList(l422,QIList(l43,l419,l5),l5),QIList(l400,QIList(l44,l419,l5),l5),l5),QIList(l187,QIList(l208,l5,QIList(l276,QIList(QIList(QIList(l189,l421,l5),0,l5),QIList(QIList(l189,l420,l5),QIList(l189,l422,l5),l5),l5),QIList(l263,QIList(l331,QIList(l189,l421,l5),QIList(l189,l420,l5),l5),QIList(l290,QIList(l188,l377,l5),l5),QIList(l49,QIList(l189,l421,l5),l5),l5),QIList(l189,l400,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l52,l222,QIList(l113,QIList(l6,QIList(l419,l235,l377,l5),QIList(l276,QIList(QIList(l421,QIList(l42,l419,l5),l5),QIList(l423,QIList(l18,l5),l5),l5),QIList(l187,QIList(l208,l5,QIList(l276,QIList(QIList(QIList(l189,l423,l5),QIList(l189,QIList(l43,l419,l5),l5),l5),QIList(QIList(l189,l421,l5),l5,l5),l5),QIList(l263,QIList(l189,l423,l5),QIList(l119,QIList(l189,l421,l5),QIList(l32,QIList(l189,l423,l5),l5),l5),QIList(l290,QIList(l188,l377,l5),l5),QIList(l119,QIList(l189,l423,l5),QIList(l33,QIList(l189,l423,l5),l5),l5),l5),QIList(l189,QIList(l44,l419,l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l51,l222,QIList(l113,QIList(l6,QIList(l375,l388,l5),QIList(l187,QIList(l119,QIList(l189,l388,l5),QIList(l30,QIList(l189,l375,l5),QIList(l189,l388,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l50,l222,QIList(l113,QIList(l6,QIList(l375,l234,QIList(l424,1,l5),l5),QIList(l187,QIList(l119,QIList(l189,l375,l5),QIList(l66,QIList(l189,l375,l5),QIList(l189,l424,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l49,l222,QIList(l113,QIList(l6,QIList(l375,l234,QIList(l424,1,l5),l5),QIList(l187,QIList(l119,QIList(l189,l375,l5),QIList(l65,QIList(l189,l375,l5),QIList(l189,l424,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l16,l222,QIList(l113,QIList(l6,QIList(l425,l235,l377,l5),QIList(l187,QIList(l208,l5,QIList(l263,QIList(l189,l425,l5),QIList(l188,l377,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l15,l222,QIList(l113,QIList(l6,QIList(l234,l385,l5),QIList(l187,QIList(l283,l5,QIList(l189,l385,l5),l5),l5),l5),l5),l5,l5),QIList(l12,l222,QIList(l113,QIList(l6,QIList(l380,l376,l235,l377,l5),QIList(l187,QIList(l123,QIList(l339,QIList(l186,QIList(l189,l380,l5),l5),QIList(l11,QIList(l189,QIList(l338,l380,l5),l5),QIList(l189,l376,l5),QIList(l188,QIList(l232,QIList(l57,QIList(l346,QIList(l32,l377,l5),l5),QIList(l29,QIList(l13,QIList(l33,l377,l5),l5),l5),l5),QIList(l187,QIList(QIList(l189,QIList(l32,l377,l5),l5),QIList(l208,QIList(l189,l380,l5),QIList(l188,QIList(l33,l377,l5),l5),l5),l5),l5),QIList(l187,QIList(QIList(l208,QIList(l189,l380,l5),QIList(l188,l377,l5),l5),l5),l5),l5),l5),l5),l5),QIList(l186,QIList(l189,l380,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l11,l222,QIList(l113,QIList(l6,QIList(l380,l376,l235,l377,l5),QIList(l276,QIList(QIList(l375,QIList(l18,"FN",l5),l5),l5),QIList(l187,QIList(l276,QIList(QIList(QIList(l189,l375,l5),QIList(l6,QIList(l189,l376,l5),QIList(l188,l377,l5),l5),l5),l5),QIList(l358,QIList(l189,l375,l5),"fname",QIList(l189,l380,l5),l5),QIList(l189,l375,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l10,l222,QIList(l113,QIList(l6,QIList(l380,l385,l234,l426,l5),QIList(l187,QIList(l123,QIList(l119,QIList(l189,l380,l5),QIList(l189,l385,l5),l5),QIList(l188,QIList(l7,QIList(l346,l426,l5),QIList(l187,QIList(QIList(l358,QIList(l186,QIList(l189,l380,l5),l5),"vardoc",QIList(l189,l426,l5),l5),l5),l5),l5),l5),QIList(l186,QIList(l189,l380,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l9,l222,QIList(l113,QIList(l6,QIList(l380,l385,l234,l426,l5),QIList(l187,QIList(l123,QIList(l2,QIList(l226,QIList(l189,l380,l5),l5),l5),QIList(l8,QIList(l20,QIList(l186,QIList(l189,l380,l5),l5),l5),QIList(l119,QIList(l189,l380,l5),QIList(l189,l385,l5),l5),l5),QIList(l188,QIList(l7,QIList(l346,l426,l5),QIList(l187,QIList(QIList(l358,QIList(l186,QIList(l189,l380,l5),l5),"vardoc",QIList(l189,l426,l5),l5),l5),l5),l5),l5),QIList(l186,QIList(l189,l380,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l8,l222,QIList(l113,QIList(l6,QIList(l425,l235,l377,l5),QIList(l187,QIList(l232,QIList(l189,l425,l5),l5,QIList(l123,QIList(l188,l377,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l7,l222,QIList(l113,QIList(l6,QIList(l425,l235,l377,l5),QIList(l187,QIList(l232,QIList(l189,l425,l5),QIList(l123,QIList(l188,l377,l5),l5),l5,l5),l5),l5),l5),l5,l5),QIList(l6,l222,QIList(l113,QIList(l6,QIList(l376,l235,l377,l5),QIList(l187,QIList(l113,QIList(l6,QIList(l189,l376,l5),QIList(l188,l377,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l3,l222,QIList(l113,QIList(l6,QIList(l380,l385,l234,l426,l5),QIList(l187,QIList(l123,QIList(l2,QIList(l226,QIList(l189,l380,l5),l5),l5),QIList(l2,QIList(l228,QIList(l189,l380,l5),l5),l5),QIList(l119,QIList(l189,l380,l5),QIList(l189,l385,l5),l5),QIList(l188,QIList(l7,QIList(l346,l426,l5),QIList(l187,QIList(QIList(l358,QIList(l186,QIList(l189,l380,l5),l5),"vardoc",QIList(l189,l426,l5),l5),l5),l5),l5),l5),QIList(l186,QIList(l189,l380,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l2,l222,QIList(l113,QIList(l6,QIList(l235,l378,l5),QIList(l187,QIList(l271,QIList(l188,QIList(l81,QIList(l6,QIList(l379,l5),QIList(l187,QIList(l225,QIList(l186,QIList(l189,l379,l5),l5),l5),l5),l5),l378,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l1,l222,QIList(l113,QIList(l6,QIList(l380,l376,l235,l377,l5),QIList(l187,QIList(l271,QIList(l221,QIList(l186,QIList(l189,l380,l5),l5),QIList(l186,QIList(l113,QIList(l6,QIList(l189,QIList(l81,QIList(l113,QIList(l6,QIList(l375,l5),QIList(l232,QIList(l343,l375,QIList(l186,l371,l5),l5),QIList(l186,l235,l5),l375,l5),l5),l5),l376,l5),l5),QIList(l188,l377,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),l5),l5,l5,l5);
10229 ((l212).value = l427);
10230 var l428 = QIList(QIList(l426,"l426"),QIList(l425,"l425"),QIList(l424,"l424"),QIList(l423,"l423"),QIList(l422,"l422"),QIList(l421,"l421"),QIList(l420,"l420"),QIList(l419,"l419"),QIList(l418,"l418"),QIList(l417,"l417"),QIList(l416,"l416"),QIList(l415,"l415"),QIList(l414,"l414"),QIList(l413,"l413"),QIList(l412,"l412"),QIList(l411,"l411"),QIList(l410,"l410"),QIList(l409,"l409"),QIList(l408,"l408"),QIList(l407,"l407"),QIList(l406,"l406"),QIList(l405,"l405"),QIList(l404,"l404"),QIList(l403,"l403"),QIList(l402,"l402"),QIList(l401,"l401"),QIList(l400,"l400"),QIList(l399,"l399"),QIList(l398,"l398"),QIList(l397,"l397"),QIList(l396,"l396"),QIList(l395,"l395"),QIList(l394,"l394"),QIList(l393,"l393"),QIList(l392,"l392"),QIList(l391,"l391"),QIList(l390,"l390"),QIList(l389,"l389"),QIList(l388,"l388"),QIList(l387,"l387"),QIList(l386,"l386"),QIList(l385,"l385"),QIList(l384,"l384"),QIList(l383,"l383"),QIList(l382,"l382"),QIList(l381,"l381"),QIList(l380,"l380"),QIList(l379,"l379"),QIList(l378,"l378"),QIList(l377,"l377"),QIList(l376,"l376"),QIList(l375,"l375"),QIList(l374,"l374"),QIList(l373,"l373"),QIList(l371,"l371"),QIList(l370,"l370"),QIList(l369,"l369"),QIList(l368,"l368"),QIList(l367,"l367"),QIList(l366,"l366"),QIList(l365,"l365"),QIList(l364,"l364"),QIList(l363,"l363"),QIList(l362,"l362"),QIList(l361,"l361"),QIList(l360,"l360"),QIList(l359,"l359"),QIList(l358,"l358"),QIList(l357,"l357"),QIList(l356,"l356"),QIList(l355,"l355"),QIList(l354,"l354"),QIList(l353,"l353"),QIList(l352,"l352"),QIList(l351,"l351"),QIList(l350,"l350"),QIList(l349,"l349"),QIList(l348,"l348"),QIList(l347,"l347"),QIList(l346,"l346"),QIList(l345,"l345"),QIList(l344,"l344"),QIList(l343,"l343"),QIList(l342,"l342"),QIList(l341,"l341"),QIList(l340,"l340"),QIList(l339,"l339"),QIList(l338,"l338"),QIList(l337,"l337"),QIList(l336,"l336"),QIList(l335,"l335"),QIList(l334,"l334"),QIList(l333,"l333"),QIList(l332,"l332"),QIList(l331,"l331"),QIList(l330,"l330"),QIList(l329,"l329"),QIList(l328,"l328"),QIList(l327,"l327"),QIList(l326,"l326"),QIList(l325,"l325"),QIList(l324,"l324"),QIList(l323,"l323"),QIList(l322,"l322"),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(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(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(l212,"l212"),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"),l5);
10232 l148.fvalue(pv, l426);
10233 l148.fvalue(pv, l425);
10234 l148.fvalue(pv, l424);
10235 l148.fvalue(pv, l423);
10236 l148.fvalue(pv, l422);
10237 l148.fvalue(pv, l421);
10238 l148.fvalue(pv, l420);
10239 l148.fvalue(pv, l419);
10240 l148.fvalue(pv, l418);
10241 l148.fvalue(pv, l417);
10242 l148.fvalue(pv, l416);
10243 l148.fvalue(pv, l415);
10244 l148.fvalue(pv, l414);
10245 l148.fvalue(pv, l413);
10246 l148.fvalue(pv, l412);
10247 l148.fvalue(pv, l411);
10248 l148.fvalue(pv, l410);
10249 l148.fvalue(pv, l409);
10250 l148.fvalue(pv, l408);
10251 l148.fvalue(pv, l407);
10252 l148.fvalue(pv, l406);
10253 l148.fvalue(pv, l405);
10254 l148.fvalue(pv, l404);
10255 l148.fvalue(pv, l403);
10256 l148.fvalue(pv, l402);
10257 l148.fvalue(pv, l401);
10258 l148.fvalue(pv, l400);
10259 l148.fvalue(pv, l399);
10260 l148.fvalue(pv, l398);
10261 l148.fvalue(pv, l397);
10262 l148.fvalue(pv, l396);
10263 l148.fvalue(pv, l395);
10264 l148.fvalue(pv, l394);
10265 l148.fvalue(pv, l393);
10266 l148.fvalue(pv, l392);
10267 l148.fvalue(pv, l391);
10268 l148.fvalue(pv, l390);
10269 l148.fvalue(pv, l389);
10270 l148.fvalue(pv, l388);
10271 l148.fvalue(pv, l387);
10272 l148.fvalue(pv, l386);
10273 l148.fvalue(pv, l385);
10274 l148.fvalue(pv, l384);
10275 l148.fvalue(pv, l383);
10276 l148.fvalue(pv, l382);
10277 l148.fvalue(pv, l381);
10278 l148.fvalue(pv, l380);
10279 l148.fvalue(pv, l379);
10280 l148.fvalue(pv, l378);
10281 l148.fvalue(pv, l377);
10282 l148.fvalue(pv, l376);
10283 l148.fvalue(pv, l375);
10284 l148.fvalue(pv, l374);
10285 l148.fvalue(pv, l373);
10286 l148.fvalue(pv, l371);
10287 l148.fvalue(pv, l370);
10288 l148.fvalue(pv, l369);
10289 l148.fvalue(pv, l368);
10290 l148.fvalue(pv, l367);
10291 l148.fvalue(pv, l366);
10292 l148.fvalue(pv, l365);
10293 l148.fvalue(pv, l364);
10294 l148.fvalue(pv, l363);
10295 l148.fvalue(pv, l362);
10296 l148.fvalue(pv, l361);
10297 l148.fvalue(pv, l360);
10298 l148.fvalue(pv, l359);
10299 l148.fvalue(pv, l358);
10300 l148.fvalue(pv, l357);
10301 l148.fvalue(pv, l356);
10302 l148.fvalue(pv, l355);
10303 l148.fvalue(pv, l354);
10304 l148.fvalue(pv, l353);
10305 l148.fvalue(pv, l352);
10306 l148.fvalue(pv, l351);
10307 l148.fvalue(pv, l350);
10308 l148.fvalue(pv, l349);
10309 l148.fvalue(pv, l348);
10310 l148.fvalue(pv, l347);
10311 l148.fvalue(pv, l346);
10312 l148.fvalue(pv, l345);
10313 l148.fvalue(pv, l344);
10314 l148.fvalue(pv, l343);
10315 l148.fvalue(pv, l342);
10316 l148.fvalue(pv, l341);
10317 l148.fvalue(pv, l340);
10318 l148.fvalue(pv, l339);
10319 l148.fvalue(pv, l338);
10320 l148.fvalue(pv, l337);
10321 l148.fvalue(pv, l336);
10322 l148.fvalue(pv, l335);
10323 l148.fvalue(pv, l334);
10324 l148.fvalue(pv, l333);
10325 l148.fvalue(pv, l332);
10326 l148.fvalue(pv, l331);
10327 l148.fvalue(pv, l330);
10328 l148.fvalue(pv, l329);
10329 l148.fvalue(pv, l328);
10330 l148.fvalue(pv, l327);
10331 l148.fvalue(pv, l326);
10332 l148.fvalue(pv, l325);
10333 l148.fvalue(pv, l324);
10334 l148.fvalue(pv, l323);
10335 l148.fvalue(pv, l322);
10336 l148.fvalue(pv, l321);
10337 l148.fvalue(pv, l320);
10338 l148.fvalue(pv, l319);
10339 l148.fvalue(pv, l318);
10340 l148.fvalue(pv, l317);
10341 l148.fvalue(pv, l316);
10342 l148.fvalue(pv, l315);
10343 l148.fvalue(pv, l314);
10344 l148.fvalue(pv, l313);
10345 l148.fvalue(pv, l312);
10346 l148.fvalue(pv, l311);
10347 l148.fvalue(pv, l310);
10348 l148.fvalue(pv, l309);
10349 l148.fvalue(pv, l308);
10350 l148.fvalue(pv, l307);
10351 l148.fvalue(pv, l306);
10352 l148.fvalue(pv, l305);
10353 l148.fvalue(pv, l304);
10354 l148.fvalue(pv, l303);
10355 l148.fvalue(pv, l302);
10356 l148.fvalue(pv, l301);
10357 l148.fvalue(pv, l300);
10358 l148.fvalue(pv, l299);
10359 l148.fvalue(pv, l298);
10360 l148.fvalue(pv, l297);
10361 l148.fvalue(pv, l296);
10362 l148.fvalue(pv, l295);
10363 l148.fvalue(pv, l294);
10364 l148.fvalue(pv, l293);
10365 l148.fvalue(pv, l292);
10366 l148.fvalue(pv, l290);
10367 l148.fvalue(pv, l289);
10368 l148.fvalue(pv, l288);
10369 l148.fvalue(pv, l287);
10370 l148.fvalue(pv, l286);
10371 l148.fvalue(pv, l285);
10372 l148.fvalue(pv, l284);
10373 l148.fvalue(pv, l283);
10374 l148.fvalue(pv, l282);
10375 l148.fvalue(pv, l281);
10376 l148.fvalue(pv, l280);
10377 l148.fvalue(pv, l279);
10378 l148.fvalue(pv, l278);
10379 l148.fvalue(pv, l277);
10380 l148.fvalue(pv, l276);
10381 l148.fvalue(pv, l275);
10382 l148.fvalue(pv, l274);
10383 l148.fvalue(pv, l273);
10384 l148.fvalue(pv, l272);
10385 l148.fvalue(pv, l271);
10386 l148.fvalue(pv, l270);
10387 l148.fvalue(pv, l269);
10388 l148.fvalue(pv, l268);
10389 l148.fvalue(pv, l267);
10390 l148.fvalue(pv, l266);
10391 l148.fvalue(pv, l265);
10392 l148.fvalue(pv, l264);
10393 l148.fvalue(pv, l263);
10394 l148.fvalue(pv, l262);
10395 l148.fvalue(pv, l261);
10396 l148.fvalue(pv, l260);
10397 l148.fvalue(pv, l259);
10398 l148.fvalue(pv, l258);
10399 l148.fvalue(pv, l257);
10400 l148.fvalue(pv, l256);
10401 l148.fvalue(pv, l255);
10402 l148.fvalue(pv, l254);
10403 l148.fvalue(pv, l253);
10404 l148.fvalue(pv, l252);
10405 l148.fvalue(pv, l251);
10406 l148.fvalue(pv, l250);
10407 l148.fvalue(pv, l249);
10408 l148.fvalue(pv, l248);
10409 l148.fvalue(pv, l247);
10410 l148.fvalue(pv, l246);
10411 l148.fvalue(pv, l245);
10412 l148.fvalue(pv, l244);
10413 l148.fvalue(pv, l243);
10414 l148.fvalue(pv, l242);
10415 l148.fvalue(pv, l241);
10416 l148.fvalue(pv, l240);
10417 l148.fvalue(pv, l239);
10418 l148.fvalue(pv, l238);
10419 l148.fvalue(pv, l236);
10420 l148.fvalue(pv, l235);
10421 l148.fvalue(pv, l234);
10422 l148.fvalue(pv, l233);
10423 l148.fvalue(pv, l232);
10424 l148.fvalue(pv, l231);
10425 l148.fvalue(pv, l230);
10426 l148.fvalue(pv, l229);
10427 l148.fvalue(pv, l228);
10428 l148.fvalue(pv, l227);
10429 l148.fvalue(pv, l226);
10430 l148.fvalue(pv, l225);
10431 l148.fvalue(pv, l224);
10432 l148.fvalue(pv, l223);
10433 l148.fvalue(pv, l222);
10434 l148.fvalue(pv, l221);
10435 l148.fvalue(pv, l220);
10436 l148.fvalue(pv, l219);
10437 l148.fvalue(pv, l218);
10438 l148.fvalue(pv, l217);
10439 l148.fvalue(pv, l216);
10440 l148.fvalue(pv, l215);
10441 l148.fvalue(pv, l214);
10442 l148.fvalue(pv, l213);
10443 l148.fvalue(pv, l212);
10444 l148.fvalue(pv, l211);
10445 l148.fvalue(pv, l210);
10446 l148.fvalue(pv, l209);
10447 l148.fvalue(pv, l208);
10448 l148.fvalue(pv, l207);
10449 l148.fvalue(pv, l206);
10450 l148.fvalue(pv, l205);
10451 l148.fvalue(pv, l204);
10452 l148.fvalue(pv, l203);
10453 l148.fvalue(pv, l202);
10454 l148.fvalue(pv, l201);
10455 l148.fvalue(pv, l200);
10456 l148.fvalue(pv, l199);
10457 l148.fvalue(pv, l198);
10458 l148.fvalue(pv, l197);
10459 l148.fvalue(pv, l196);
10460 l148.fvalue(pv, l195);
10461 l148.fvalue(pv, l194);
10462 l148.fvalue(pv, l193);
10463 l148.fvalue(pv, l192);
10464 l148.fvalue(pv, l191);
10465 l148.fvalue(pv, l190);
10466 l148.fvalue(pv, l189);
10467 l148.fvalue(pv, l188);
10468 l148.fvalue(pv, l187);
10469 l148.fvalue(pv, l186);
10470 l148.fvalue(pv, l185);
10471 l148.fvalue(pv, l184);
10472 l148.fvalue(pv, l183);
10473 l148.fvalue(pv, l182);
10474 l148.fvalue(pv, l181);
10475 l148.fvalue(pv, l180);
10476 l148.fvalue(pv, l179);
10477 l148.fvalue(pv, l178);
10478 l148.fvalue(pv, l177);
10479 l148.fvalue(pv, l176);
10480 l148.fvalue(pv, l175);
10481 l148.fvalue(pv, l174);
10482 l148.fvalue(pv, l173);
10483 l148.fvalue(pv, l172);
10484 l148.fvalue(pv, l171);
10485 l148.fvalue(pv, l170);
10486 l148.fvalue(pv, l169);
10487 l148.fvalue(pv, l168);
10488 l148.fvalue(pv, l167);
10489 l148.fvalue(pv, l166);
10490 l148.fvalue(pv, l165);
10491 l148.fvalue(pv, l164);
10492 l148.fvalue(pv, l163);
10493 l148.fvalue(pv, l162);
10494 l148.fvalue(pv, l161);
10495 l148.fvalue(pv, l160);
10496 l148.fvalue(pv, l159);
10497 l148.fvalue(pv, l158);
10498 l148.fvalue(pv, l157);
10499 l148.fvalue(pv, l156);
10500 l148.fvalue(pv, l155);
10501 l148.fvalue(pv, l154);
10502 l148.fvalue(pv, l153);
10503 l148.fvalue(pv, l152);
10504 l148.fvalue(pv, l151);
10505 l148.fvalue(pv, l150);
10506 l148.fvalue(pv, l149);
10507 l148.fvalue(pv, l148);
10508 l148.fvalue(pv, l147);
10509 l148.fvalue(pv, l146);
10510 l148.fvalue(pv, l145);
10511 l148.fvalue(pv, l144);
10512 l148.fvalue(pv, l143);
10513 l148.fvalue(pv, l142);
10514 l148.fvalue(pv, l141);
10515 l148.fvalue(pv, l140);
10516 l148.fvalue(pv, l139);
10517 l148.fvalue(pv, l138);
10518 l148.fvalue(pv, l137);
10519 l148.fvalue(pv, l136);
10520 l148.fvalue(pv, l135);
10521 l148.fvalue(pv, l134);
10522 l148.fvalue(pv, l133);
10523 l148.fvalue(pv, l132);
10524 l148.fvalue(pv, l131);
10525 l148.fvalue(pv, l130);
10526 l148.fvalue(pv, l129);
10527 l148.fvalue(pv, l128);
10528 l148.fvalue(pv, l127);
10529 l148.fvalue(pv, l126);
10530 l148.fvalue(pv, l125);
10531 l148.fvalue(pv, l124);
10532 l148.fvalue(pv, l123);
10533 l148.fvalue(pv, l122);
10534 l148.fvalue(pv, l121);
10535 l148.fvalue(pv, l120);
10536 l148.fvalue(pv, l119);
10537 l148.fvalue(pv, l118);
10538 l148.fvalue(pv, l117);
10539 l148.fvalue(pv, l116);
10540 l148.fvalue(pv, l115);
10541 l148.fvalue(pv, l114);
10542 l148.fvalue(pv, l113);
10543 l148.fvalue(pv, l112);
10544 l148.fvalue(pv, l111);
10545 l148.fvalue(pv, l110);
10546 l148.fvalue(pv, l109);
10547 l148.fvalue(pv, l108);
10548 l148.fvalue(pv, l107);
10549 l148.fvalue(pv, l106);
10550 l148.fvalue(pv, l105);
10551 l148.fvalue(pv, l104);
10552 l148.fvalue(pv, l103);
10553 l148.fvalue(pv, l102);
10554 l148.fvalue(pv, l101);
10555 l148.fvalue(pv, l100);
10556 l148.fvalue(pv, l99);
10557 l148.fvalue(pv, l98);
10558 l148.fvalue(pv, l97);
10559 l148.fvalue(pv, l96);
10560 l148.fvalue(pv, l95);
10561 l148.fvalue(pv, l94);
10562 l148.fvalue(pv, l93);
10563 l148.fvalue(pv, l92);
10564 l148.fvalue(pv, l91);
10565 l148.fvalue(pv, l90);
10566 l148.fvalue(pv, l89);
10567 l148.fvalue(pv, l88);
10568 l148.fvalue(pv, l87);
10569 l148.fvalue(pv, l86);
10570 l148.fvalue(pv, l85);
10571 l148.fvalue(pv, l84);
10572 l148.fvalue(pv, l83);
10573 l148.fvalue(pv, l82);
10574 l148.fvalue(pv, l81);
10575 l148.fvalue(pv, l80);
10576 l148.fvalue(pv, l79);
10577 l148.fvalue(pv, l78);
10578 l148.fvalue(pv, l77);
10579 l148.fvalue(pv, l76);
10580 l148.fvalue(pv, l75);
10581 l148.fvalue(pv, l74);
10582 l148.fvalue(pv, l73);
10583 l148.fvalue(pv, l72);
10584 l148.fvalue(pv, l71);
10585 l148.fvalue(pv, l70);
10586 l148.fvalue(pv, l69);
10587 l148.fvalue(pv, l68);
10588 l148.fvalue(pv, l67);
10589 l148.fvalue(pv, l66);
10590 l148.fvalue(pv, l65);
10591 l148.fvalue(pv, l64);
10592 l148.fvalue(pv, l63);
10593 l148.fvalue(pv, l62);
10594 l148.fvalue(pv, l61);
10595 l148.fvalue(pv, l60);
10596 l148.fvalue(pv, l59);
10597 l148.fvalue(pv, l58);
10598 l148.fvalue(pv, l57);
10599 l148.fvalue(pv, l56);
10600 l148.fvalue(pv, l55);
10601 l148.fvalue(pv, l54);
10602 l148.fvalue(pv, l53);
10603 l148.fvalue(pv, l52);
10604 l148.fvalue(pv, l51);
10605 l148.fvalue(pv, l50);
10606 l148.fvalue(pv, l49);
10607 l148.fvalue(pv, l48);
10608 l148.fvalue(pv, l47);
10609 l148.fvalue(pv, l46);
10610 l148.fvalue(pv, l45);
10611 l148.fvalue(pv, l44);
10612 l148.fvalue(pv, l43);
10613 l148.fvalue(pv, l42);
10614 l148.fvalue(pv, l41);
10615 l148.fvalue(pv, l40);
10616 l148.fvalue(pv, l39);
10617 l148.fvalue(pv, l38);
10618 l148.fvalue(pv, l37);
10619 l148.fvalue(pv, l36);
10620 l148.fvalue(pv, l35);
10621 l148.fvalue(pv, l34);
10622 l148.fvalue(pv, l33);
10623 l148.fvalue(pv, l32);
10624 l148.fvalue(pv, l31);
10625 l148.fvalue(pv, l30);
10626 l148.fvalue(pv, l29);
10627 l148.fvalue(pv, l28);
10628 l148.fvalue(pv, l27);
10629 l148.fvalue(pv, l26);
10630 l148.fvalue(pv, l25);
10631 l148.fvalue(pv, l24);
10632 l148.fvalue(pv, l23);
10633 l148.fvalue(pv, l22);
10634 l148.fvalue(pv, l21);
10635 l148.fvalue(pv, l20);
10636 l148.fvalue(pv, l19);
10637 l148.fvalue(pv, l18);
10638 l148.fvalue(pv, l17);
10639 l148.fvalue(pv, l16);
10640 l148.fvalue(pv, l15);
10641 l148.fvalue(pv, l14);
10642 l148.fvalue(pv, l13);
10643 l148.fvalue(pv, l12);
10644 l148.fvalue(pv, l11);
10645 l148.fvalue(pv, l10);
10646 l148.fvalue(pv, l9);
10647 l148.fvalue(pv, l8);
10648 l148.fvalue(pv, l7);
10649 l148.fvalue(pv, l6);
10650 l148.fvalue(pv, l5);
10651 l148.fvalue(pv, l4);
10652 l148.fvalue(pv, l3);
10653 l148.fvalue(pv, l2);
10654 l148.fvalue(pv, l1);
10655 ((l259).value = l428);
10656 ((l213).value = 1183);
10657 ((l17).value = 454);
10658 return ((l280).value = 332);
10660 ((l260).value = 428);