1 function pv (x) { return x ; }
5 r['multiple-value'] = true;
6 for (var i=0; i<arguments.length; i++)
11 // NOTE: Define VALUES to be MV for toplevel forms. It is because
12 // `eval' compiles the forms and execute the Javascript code at
13 // toplevel with `js-eval', so it is necessary to return multiple
14 // values from the eval function.
17 function checkArgsAtLeast(args, n){
18 if (args.length < n) throw 'too few arguments';
21 function checkArgsAtMost(args, n){
22 if (args.length > n) throw 'too many arguments';
25 function checkArgs(args, n){
26 checkArgsAtLeast(args, n);
27 checkArgsAtMost(args, n);
28 }var l1 = {name: "DEFMACRO"};
30 var l2 = {name: "DECLAIM"};
32 var l3 = {name: "NIL"};
36 var l5 = {name: "WHEN"};
38 var l6 = {name: "UNLESS"};
40 var l7 = {name: "DEFVAR"};
42 var l8 = {name: "DEFPARAMETER"};
44 var l9 = {name: "NAMED-LAMBDA"};
46 var l10 = {name: "DEFUN"};
48 var l11 = {name: "NULL"};
50 (l11).fvalue = (function(v2){
51 ((v2)["fname"] = "NULL");
53 })((function (values,v1){
54 checkArgs(arguments, 2);
56 return ((v1 === l3.value)?l4.value: l3.value);
61 var l12 = {name: "RETURN"};
63 var l13 = {name: "WHILE"};
65 var l14 = {name: "*GENSYM-COUNTER*"};
67 (((l14.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l14).value = 0));
70 var l15 = {name: "GENSYM"};
71 var l16 = {name: "INTEGER-TO-STRING"};
73 (l15).fvalue = (function(v4){
74 ((v4)["fname"] = "GENSYM");
76 })((function (values,v3){
77 checkArgsAtMost(arguments, 2);
78 switch(arguments.length-1){
84 ((l14).value = (function(){
87 var value = symbol.value;
88 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
91 if (typeof x1 !== 'number') throw 'Not a number!';
93 if (typeof x2 !== 'number') throw 'Not a number!';
97 var name = (function(){
99 var string2 = l16.fvalue(pv, (function(){
101 var value = symbol.value;
102 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
105 if (typeof string1 != 'string')
106 throw 'The value ' + string1 + ' is not a type string.';
107 if (typeof string2 != 'string')
108 throw 'The value ' + string2 + ' is not a type string.';
109 return string1.concat(string2);
111 if (typeof name != 'string')
112 throw 'The value ' + name + ' is not a type string.';
113 return ({name: name});
119 var l17 = {name: "BOUNDP"};
121 (l17).fvalue = (function(v6){
122 ((v6)["fname"] = "BOUNDP");
124 })((function (values,v5){
125 checkArgs(arguments, 2);
127 return ((v5.value !== undefined)?l4.value: l3.value);
132 var l18 = {name: "="};
134 (l18).fvalue = (function(v9){
135 ((v9)["fname"] = "=");
137 })((function (values,v7,v8){
138 checkArgs(arguments, 3);
142 if (typeof x1 !== 'number') throw 'Not a number!';
144 if (typeof x2 !== 'number') throw 'Not a number!';
145 return (x1==x2?l4.value: l3.value);
151 var l19 = {name: "*"};
153 (l19).fvalue = (function(v12){
154 ((v12)["fname"] = "*");
156 })((function (values,v10,v11){
157 checkArgs(arguments, 3);
161 if (typeof x1 !== 'number') throw 'Not a number!';
163 if (typeof x2 !== 'number') throw 'Not a number!';
170 var l20 = {name: "/"};
172 (l20).fvalue = (function(v15){
173 ((v15)["fname"] = "/");
175 })((function (values,v13,v14){
176 checkArgs(arguments, 3);
180 if (typeof x1 !== 'number') throw 'Not a number!';
182 if (typeof x2 !== 'number') throw 'Not a number!';
189 var l21 = {name: "1+"};
191 (l21).fvalue = (function(v17){
192 ((v17)["fname"] = "1+");
194 })((function (values,v16){
195 checkArgs(arguments, 2);
199 if (typeof x1 !== 'number') throw 'Not a number!';
201 if (typeof x2 !== 'number') throw 'Not a number!';
208 var l22 = {name: "1-"};
210 (l22).fvalue = (function(v19){
211 ((v19)["fname"] = "1-");
213 })((function (values,v18){
214 checkArgs(arguments, 2);
218 if (typeof x1 !== 'number') throw 'Not a number!';
220 if (typeof x2 !== 'number') throw 'Not a number!';
227 var l23 = {name: "ZEROP"};
229 (l23).fvalue = (function(v21){
230 ((v21)["fname"] = "ZEROP");
232 })((function (values,v20){
233 checkArgs(arguments, 2);
237 if (typeof x1 !== 'number') throw 'Not a number!';
239 if (typeof x2 !== 'number') throw 'Not a number!';
240 return (x1==x2?l4.value: l3.value);
246 var l24 = {name: "TRUNCATE"};
248 (l24).fvalue = (function(v24){
249 ((v24)["fname"] = "TRUNCATE");
251 })((function (values,v22,v23){
252 checkArgs(arguments, 3);
257 if (typeof x1 !== 'number') throw 'Not a number!';
259 if (typeof x2 !== 'number') throw 'Not a number!';
262 if (typeof x != 'number')
263 throw 'The value ' + x + ' is not a type number.';
264 return Math.floor(x);
270 var l25 = {name: "EQL"};
272 (l25).fvalue = (function(v27){
273 ((v27)["fname"] = "EQL");
275 })((function (values,v25,v26){
276 checkArgs(arguments, 3);
278 return ((v25 === v26)?l4.value: l3.value);
283 var l26 = {name: "NOT"};
285 (l26).fvalue = (function(v29){
286 ((v29)["fname"] = "NOT");
288 })((function (values,v28){
289 checkArgs(arguments, 2);
291 return (v28 !== l3.value ? l3.value : l4.value);
296 var l27 = {name: "CONS"};
298 (l27).fvalue = (function(v32){
299 ((v32)["fname"] = "CONS");
301 })((function (values,v30,v31){
302 checkArgs(arguments, 3);
304 return ({car: v30, cdr: v31});
309 var l28 = {name: "CONSP"};
311 (l28).fvalue = (function(v34){
312 ((v34)["fname"] = "CONSP");
314 })((function (values,v33){
315 checkArgs(arguments, 2);
319 return (typeof tmp == 'object' && 'car' in tmp);
320 })()?l4.value: l3.value);
325 var l29 = {name: "CAR"};
327 (l29).fvalue = (function(v36){
328 ((v36)["fname"] = "CAR");
331 var func = (function (values,v35){
332 checkArgs(arguments, 2);
336 return tmp === l3.value? l3.value: tmp.car;
340 func.docstring = 'Return the CAR part of a cons, or NIL if X is null.';
345 var l30 = {name: "CDR"};
347 (l30).fvalue = (function(v38){
348 ((v38)["fname"] = "CDR");
350 })((function (values,v37){
351 checkArgs(arguments, 2);
355 return tmp === l3.value? l3.value: tmp.cdr;
361 var l31 = {name: "CAAR"};
363 (l31).fvalue = (function(v40){
364 ((v40)["fname"] = "CAAR");
366 })((function (values,v39){
367 checkArgs(arguments, 2);
370 var tmp = (function(){
372 return tmp === l3.value? l3.value: tmp.car;
374 return tmp === l3.value? l3.value: tmp.car;
380 var l32 = {name: "CADR"};
382 (l32).fvalue = (function(v42){
383 ((v42)["fname"] = "CADR");
385 })((function (values,v41){
386 checkArgs(arguments, 2);
389 var tmp = (function(){
391 return tmp === l3.value? l3.value: tmp.cdr;
393 return tmp === l3.value? l3.value: tmp.car;
399 var l33 = {name: "CDAR"};
401 (l33).fvalue = (function(v44){
402 ((v44)["fname"] = "CDAR");
404 })((function (values,v43){
405 checkArgs(arguments, 2);
408 var tmp = (function(){
410 return tmp === l3.value? l3.value: tmp.car;
412 return tmp === l3.value? l3.value: tmp.cdr;
418 var l34 = {name: "CDDR"};
420 (l34).fvalue = (function(v46){
421 ((v46)["fname"] = "CDDR");
423 })((function (values,v45){
424 checkArgs(arguments, 2);
427 var tmp = (function(){
429 return tmp === l3.value? l3.value: tmp.cdr;
431 return tmp === l3.value? l3.value: tmp.cdr;
437 var l35 = {name: "CADDR"};
439 (l35).fvalue = (function(v48){
440 ((v48)["fname"] = "CADDR");
442 })((function (values,v47){
443 checkArgs(arguments, 2);
446 var tmp = (function(){
447 var tmp = (function(){
449 return tmp === l3.value? l3.value: tmp.cdr;
451 return tmp === l3.value? l3.value: tmp.cdr;
453 return tmp === l3.value? l3.value: tmp.car;
459 var l36 = {name: "CDDDR"};
461 (l36).fvalue = (function(v50){
462 ((v50)["fname"] = "CDDDR");
464 })((function (values,v49){
465 checkArgs(arguments, 2);
468 var tmp = (function(){
469 var tmp = (function(){
471 return tmp === l3.value? l3.value: tmp.cdr;
473 return tmp === l3.value? l3.value: tmp.cdr;
475 return tmp === l3.value? l3.value: tmp.cdr;
481 var l37 = {name: "CADDDR"};
483 (l37).fvalue = (function(v52){
484 ((v52)["fname"] = "CADDDR");
486 })((function (values,v51){
487 checkArgs(arguments, 2);
490 var tmp = (function(){
491 var tmp = (function(){
492 var tmp = (function(){
494 return tmp === l3.value? l3.value: tmp.cdr;
496 return tmp === l3.value? l3.value: tmp.cdr;
498 return tmp === l3.value? l3.value: tmp.cdr;
500 return tmp === l3.value? l3.value: tmp.car;
506 var l38 = {name: "FIRST"};
508 (l38).fvalue = (function(v54){
509 ((v54)["fname"] = "FIRST");
511 })((function (values,v53){
512 checkArgs(arguments, 2);
516 return tmp === l3.value? l3.value: tmp.car;
522 var l39 = {name: "SECOND"};
524 (l39).fvalue = (function(v56){
525 ((v56)["fname"] = "SECOND");
527 })((function (values,v55){
528 checkArgs(arguments, 2);
530 return l32.fvalue(values, v55);
535 var l40 = {name: "THIRD"};
537 (l40).fvalue = (function(v58){
538 ((v58)["fname"] = "THIRD");
540 })((function (values,v57){
541 checkArgs(arguments, 2);
543 return l35.fvalue(values, v57);
548 var l41 = {name: "FOURTH"};
550 (l41).fvalue = (function(v60){
551 ((v60)["fname"] = "FOURTH");
553 })((function (values,v59){
554 checkArgs(arguments, 2);
556 return l37.fvalue(values, v59);
561 var l42 = {name: "LIST"};
563 (l42).fvalue = (function(v62){
564 ((v62)["fname"] = "LIST");
566 })((function (values){
568 for (var i = arguments.length-1; i>=1; i--)
569 v61 = {car: arguments[i], cdr:
577 var l43 = {name: "ATOM"};
579 (l43).fvalue = (function(v64){
580 ((v64)["fname"] = "ATOM");
582 })((function (values,v63){
583 checkArgs(arguments, 2);
585 return l26.fvalue(values, ((function(){
587 return (typeof tmp == 'object' && 'car' in tmp);
588 })()?l4.value: l3.value));
593 var l44 = {name: "INCF"};
595 var l45 = {name: "DECF"};
597 var l46 = {name: "PUSH"};
599 var l47 = {name: "DOLIST"};
601 var l48 = {name: "DOTIMES"};
603 var l49 = {name: "COND"};
605 var l50 = {name: "CASE"};
607 var l51 = {name: "ECASE"};
609 var l52 = {name: "AND"};
611 var l53 = {name: "OR"};
613 var l54 = {name: "PROG1"};
615 var l55 = {name: "PROG2"};
617 var l56 = {name: "ENSURE-LIST"};
618 var l57 = {name: "LISTP"};
620 (l56).fvalue = (function(v66){
621 ((v66)["fname"] = "ENSURE-LIST");
623 })((function (values,v65){
624 checkArgs(arguments, 2);
626 return (l57.fvalue(pv, v65) !== l3.value ? v65 : l42.fvalue(values, v65));
631 var l58 = {name: "!REDUCE"};
633 (l58).fvalue = (function(v70){
634 ((v70)["fname"] = "!REDUCE");
636 })((function (values,v67,v68,v69){
637 checkArgs(arguments, 4);
639 return (l11.fvalue(pv, v68) !== l3.value ? v69 : l58.fvalue(values, v67, (function(){
641 return tmp === l3.value? l3.value: tmp.cdr;
642 })(), (v67)(pv, v69, (function(){
644 return tmp === l3.value? l3.value: tmp.car;
650 var l59 = {name: "+"};
652 (l59).fvalue = (function(v75){
653 ((v75)["fname"] = "+");
655 })((function (values){
657 for (var i = arguments.length-1; i>=1; i--)
658 v71 = {car: arguments[i], cdr:
661 return (function(v72){
663 return (function(v73,v74){
665 while(v73 !== l3.value){
668 return tmp === l3.value? l3.value: tmp.car;
673 if (typeof x1 !== 'number') throw 'Not a number!';
675 if (typeof x2 !== 'number') throw 'Not a number!';
682 return tmp === l3.value? l3.value: tmp.cdr;
694 var l60 = {name: "-"};
696 (l60).fvalue = (function(v81){
697 ((v81)["fname"] = "-");
699 })((function (values,v77){
700 checkArgsAtLeast(arguments, 2);
702 for (var i = arguments.length-1; i>=2; i--)
703 v76 = {car: arguments[i], cdr:
706 return (l11.fvalue(pv, v76) !== l3.value ? (function(){
708 if (typeof x1 !== 'number') throw 'Not a number!';
710 })() : (function(v78){
712 return (function(v79,v80){
714 while(v79 !== l3.value){
717 return tmp === l3.value? l3.value: tmp.car;
722 if (typeof x1 !== 'number') throw 'Not a number!';
724 if (typeof x2 !== 'number') throw 'Not a number!';
731 return tmp === l3.value? l3.value: tmp.cdr;
743 var l61 = {name: "APPEND-TWO"};
744 var l62 = {name: "APPEND"};
746 (l61).fvalue = (function(v84){
747 ((v84)["fname"] = "APPEND-TWO");
749 })((function (values,v82,v83){
750 checkArgs(arguments, 3);
752 return (l11.fvalue(pv, v82) !== l3.value ? v83 : ({car: (function(){
754 return tmp === l3.value? l3.value: tmp.car;
755 })(), cdr: l62.fvalue(pv, (function(){
757 return tmp === l3.value? l3.value: tmp.cdr;
764 (l62).fvalue = (function(v86){
765 ((v86)["fname"] = "APPEND");
767 })((function (values){
769 for (var i = arguments.length-1; i>=1; i--)
770 v85 = {car: arguments[i], cdr:
773 return l58.fvalue(values, (function(){
775 var func = symbol.fvalue;
776 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
783 var l63 = {name: "REVAPPEND"};
785 (l63).fvalue = (function(v89){
786 ((v89)["fname"] = "REVAPPEND");
788 })((function (values,v87,v88){
789 checkArgs(arguments, 3);
793 while(v87 !== l3.value){
794 (v88 = ({car: (function(){
796 return tmp === l3.value? l3.value: tmp.car;
800 return tmp === l3.value? l3.value: tmp.cdr;
810 var l64 = {name: "REVERSE"};
812 (l64).fvalue = (function(v91){
813 ((v91)["fname"] = "REVERSE");
815 })((function (values,v90){
816 checkArgs(arguments, 2);
818 return l63.fvalue(values, v90, l3);
823 var l65 = {name: "PSETQ"};
825 var l66 = {name: "LIST-LENGTH"};
827 (l66).fvalue = (function(v94){
828 ((v94)["fname"] = "LIST-LENGTH");
830 })((function (values,v92){
831 checkArgs(arguments, 2);
833 return (function(v93){
836 while(l26.fvalue(pv, l11.fvalue(pv, v92)) !== l3.value){
839 if (typeof x1 !== 'number') throw 'Not a number!';
841 if (typeof x2 !== 'number') throw 'Not a number!';
846 return tmp === l3.value? l3.value: tmp.cdr;
857 var l67 = {name: "LENGTH"};
859 (l67).fvalue = (function(v96){
860 ((v96)["fname"] = "LENGTH");
862 })((function (values,v95){
863 checkArgs(arguments, 2);
865 return (((typeof(v95) == "string")?l4.value: l3.value) !== l3.value ? (function(){
867 if (typeof x != 'string')
868 throw 'The value ' + x + ' is not a type string.';
870 })() : (((function(){
872 return typeof x === 'object' && 'length' in x;
873 })()?l4.value: l3.value) !== l3.value ? (function(){
874 var tmp = (v95)["length"];
875 return tmp == undefined? l3.value: tmp ;
876 })() : (l57.fvalue(pv, v95) !== l3.value ? l66.fvalue(values, v95) : l3.value)));
881 var l68 = {name: "CONCAT-TWO"};
883 (l68).fvalue = (function(v99){
884 ((v99)["fname"] = "CONCAT-TWO");
886 })((function (values,v97,v98){
887 checkArgs(arguments, 3);
892 if (typeof string1 != 'string')
893 throw 'The value ' + string1 + ' is not a type string.';
894 if (typeof string2 != 'string')
895 throw 'The value ' + string2 + ' is not a type string.';
896 return string1.concat(string2);
902 var l69 = {name: "MAPCAR"};
904 (l69).fvalue = (function(v102){
905 ((v102)["fname"] = "MAPCAR");
907 })((function (values,v100,v101){
908 checkArgs(arguments, 3);
910 return (l11.fvalue(pv, v101) !== l3.value ? l3 : ({car: (v100)(pv, (function(){
912 return tmp === l3.value? l3.value: tmp.car;
913 })()), cdr: l69.fvalue(pv, v100, (function(){
915 return tmp === l3.value? l3.value: tmp.cdr;
921 var l70 = {name: "IDENTITY"};
923 (l70).fvalue = (function(v104){
924 ((v104)["fname"] = "IDENTITY");
926 })((function (values,v103){
927 checkArgs(arguments, 2);
934 var l71 = {name: "COPY-LIST"};
936 (l71).fvalue = (function(v106){
937 ((v106)["fname"] = "COPY-LIST");
939 })((function (values,v105){
940 checkArgs(arguments, 2);
942 return l69.fvalue(values, (function(){
944 var func = symbol.fvalue;
945 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
952 var l72 = {name: "CODE-CHAR"};
954 (l72).fvalue = (function(v108){
955 ((v108)["fname"] = "CODE-CHAR");
957 })((function (values,v107){
958 checkArgs(arguments, 2);
965 var l73 = {name: "CHAR-CODE"};
967 (l73).fvalue = (function(v110){
968 ((v110)["fname"] = "CHAR-CODE");
970 })((function (values,v109){
971 checkArgs(arguments, 2);
978 var l74 = {name: "CHAR="};
980 (l74).fvalue = (function(v113){
981 ((v113)["fname"] = "CHAR=");
983 })((function (values,v111,v112){
984 checkArgs(arguments, 3);
988 if (typeof x1 !== 'number') throw 'Not a number!';
990 if (typeof x2 !== 'number') throw 'Not a number!';
991 return (x1==x2?l4.value: l3.value);
997 var l75 = {name: "INTEGERP"};
999 (l75).fvalue = (function(v115){
1000 ((v115)["fname"] = "INTEGERP");
1002 })((function (values,v114){
1003 checkArgs(arguments, 2);
1005 return (((typeof (v114) == "number")?l4.value: l3.value) !== l3.value ? (function(){
1006 var x1 = (function(){
1008 if (typeof x != 'number')
1009 throw 'The value ' + x + ' is not a type number.';
1010 return Math.floor(x);
1012 if (typeof x1 !== 'number') throw 'Not a number!';
1014 if (typeof x2 !== 'number') throw 'Not a number!';
1015 return (x1==x2?l4.value: l3.value);
1021 var l76 = {name: "PLUSP"};
1023 (l76).fvalue = (function(v117){
1024 ((v117)["fname"] = "PLUSP");
1026 })((function (values,v116){
1027 checkArgs(arguments, 2);
1031 if (typeof x1 !== 'number') throw 'Not a number!';
1033 if (typeof x2 !== 'number') throw 'Not a number!';
1034 return (x1<x2?l4.value: l3.value);
1040 var l77 = {name: "MINUSP"};
1042 (l77).fvalue = (function(v119){
1043 ((v119)["fname"] = "MINUSP");
1045 })((function (values,v118){
1046 checkArgs(arguments, 2);
1050 if (typeof x1 !== 'number') throw 'Not a number!';
1052 if (typeof x2 !== 'number') throw 'Not a number!';
1053 return (x1<x2?l4.value: l3.value);
1060 (l57).fvalue = (function(v122){
1061 ((v122)["fname"] = "LISTP");
1063 })((function (values,v120){
1064 checkArgs(arguments, 2);
1066 return (function(v121){
1067 return (v121 !== l3.value ? v121 : l11.fvalue(values, v120));
1070 return (typeof tmp == 'object' && 'car' in tmp);
1071 })()?l4.value: l3.value));
1076 var l78 = {name: "NTHCDR"};
1078 (l78).fvalue = (function(v125){
1079 ((v125)["fname"] = "NTHCDR");
1081 })((function (values,v123,v124){
1082 checkArgs(arguments, 3);
1086 while((l76.fvalue(pv, v123) !== l3.value ? v124 : l3.value) !== l3.value){
1087 (v123 = l22.fvalue(pv, v123));
1088 (v124 = (function(){
1090 return tmp === l3.value? l3.value: tmp.cdr;
1100 var l79 = {name: "NTH"};
1102 (l79).fvalue = (function(v128){
1103 ((v128)["fname"] = "NTH");
1105 })((function (values,v126,v127){
1106 checkArgs(arguments, 3);
1109 var tmp = l78.fvalue(pv, v126, v127);
1110 return tmp === l3.value? l3.value: tmp.car;
1116 var l80 = {name: "LAST"};
1118 (l80).fvalue = (function(v130){
1119 ((v130)["fname"] = "LAST");
1121 })((function (values,v129){
1122 checkArgs(arguments, 2);
1127 var tmp = (function(){
1129 return tmp === l3.value? l3.value: tmp.cdr;
1131 return (typeof tmp == 'object' && 'car' in tmp);
1132 })()?l4.value: l3.value) !== l3.value){
1133 (v129 = (function(){
1135 return tmp === l3.value? l3.value: tmp.cdr;
1145 var l81 = {name: "BUTLAST"};
1147 (l81).fvalue = (function(v132){
1148 ((v132)["fname"] = "BUTLAST");
1150 })((function (values,v131){
1151 checkArgs(arguments, 2);
1153 return (((function(){
1154 var tmp = (function(){
1156 return tmp === l3.value? l3.value: tmp.cdr;
1158 return (typeof tmp == 'object' && 'car' in tmp);
1159 })()?l4.value: l3.value) !== l3.value ? ({car: (function(){
1161 return tmp === l3.value? l3.value: tmp.car;
1162 })(), cdr: l81.fvalue(pv, (function(){
1164 return tmp === l3.value? l3.value: tmp.cdr;
1165 })())}) : l3.value);
1170 var l82 = {name: "MEMBER"};
1172 (l82).fvalue = (function(v135){
1173 ((v135)["fname"] = "MEMBER");
1175 })((function (values,v133,v134){
1176 checkArgs(arguments, 3);
1181 while(v134 !== l3.value){
1182 (l25.fvalue(pv, v133, (function(){
1184 return tmp === l3.value? l3.value: tmp.car;
1185 })()) !== l3.value ? (function(){
1186 throw ({type: 'block', id: 62, value: v134, message: 'Return from unknown block NIL.'})
1188 (v134 = (function(){
1190 return tmp === l3.value? l3.value: tmp.cdr;
1196 if (cf.type == 'block' && cf.id == 62)
1206 var l83 = {name: "REMOVE"};
1208 (l83).fvalue = (function(v138){
1209 ((v138)["fname"] = "REMOVE");
1211 })((function (values,v136,v137){
1212 checkArgs(arguments, 3);
1214 return (l11.fvalue(pv, v137) !== l3.value ? l3.value : (l25.fvalue(pv, v136, (function(){
1216 return tmp === l3.value? l3.value: tmp.car;
1217 })()) !== l3.value ? l83.fvalue(values, v136, (function(){
1219 return tmp === l3.value? l3.value: tmp.cdr;
1220 })()) : ({car: (function(){
1222 return tmp === l3.value? l3.value: tmp.car;
1223 })(), cdr: l83.fvalue(pv, v136, (function(){
1225 return tmp === l3.value? l3.value: tmp.cdr;
1231 var l84 = {name: "REMOVE-IF"};
1233 (l84).fvalue = (function(v141){
1234 ((v141)["fname"] = "REMOVE-IF");
1236 })((function (values,v139,v140){
1237 checkArgs(arguments, 3);
1239 return (l11.fvalue(pv, v140) !== l3.value ? l3.value : ((v139)(pv, (function(){
1241 return tmp === l3.value? l3.value: tmp.car;
1242 })()) !== l3.value ? l84.fvalue(values, v139, (function(){
1244 return tmp === l3.value? l3.value: tmp.cdr;
1245 })()) : ({car: (function(){
1247 return tmp === l3.value? l3.value: tmp.car;
1248 })(), cdr: l84.fvalue(pv, v139, (function(){
1250 return tmp === l3.value? l3.value: tmp.cdr;
1256 var l85 = {name: "REMOVE-IF-NOT"};
1258 (l85).fvalue = (function(v144){
1259 ((v144)["fname"] = "REMOVE-IF-NOT");
1261 })((function (values,v142,v143){
1262 checkArgs(arguments, 3);
1264 return (l11.fvalue(pv, v143) !== l3.value ? l3.value : ((v142)(pv, (function(){
1266 return tmp === l3.value? l3.value: tmp.car;
1267 })()) !== l3.value ? ({car: (function(){
1269 return tmp === l3.value? l3.value: tmp.car;
1270 })(), cdr: l85.fvalue(pv, v142, (function(){
1272 return tmp === l3.value? l3.value: tmp.cdr;
1273 })())}) : l85.fvalue(values, v142, (function(){
1275 return tmp === l3.value? l3.value: tmp.cdr;
1281 var l86 = {name: "DIGIT-CHAR-P"};
1283 (l86).fvalue = (function(v146){
1284 ((v146)["fname"] = "DIGIT-CHAR-P");
1286 })((function (values,v145){
1287 checkArgs(arguments, 2);
1289 return (((function(){
1291 if (typeof x1 !== 'number') throw 'Not a number!';
1293 if (typeof x2 !== 'number') throw 'Not a number!';
1294 return (x1<=x2?l4.value: l3.value);
1295 })() !== l3.value ? (function(){
1297 if (typeof x1 !== 'number') throw 'Not a number!';
1299 if (typeof x2 !== 'number') throw 'Not a number!';
1300 return (x1<=x2?l4.value: l3.value);
1301 })() : l3.value) !== l3.value ? (function(){
1303 if (typeof x1 !== 'number') throw 'Not a number!';
1305 if (typeof x2 !== 'number') throw 'Not a number!';
1312 var l87 = {name: "SUBSEQ"};
1314 (l87).fvalue = (function(v150){
1315 ((v150)["fname"] = "SUBSEQ");
1317 })((function (values,v147,v148,v149){
1318 checkArgsAtLeast(arguments, 3);
1319 checkArgsAtMost(arguments, 4);
1320 switch(arguments.length-1){
1326 return (((typeof(v147) == "string")?l4.value: l3.value) !== l3.value ? (v149 !== l3.value ? (function(){
1331 return str.slice(a,b);
1336 return str.slice(a,b);
1337 })()) : (function(){
1338 throw "Unsupported argument.";
1344 var l88 = {name: "PARSE-INTEGER"};
1346 (l88).fvalue = (function(v155){
1347 ((v155)["fname"] = "PARSE-INTEGER");
1349 })((function (values,v151){
1350 checkArgs(arguments, 2);
1352 return (function(v152,v153,v154){
1357 if (typeof x1 !== 'number') throw 'Not a number!';
1359 if (typeof x2 !== 'number') throw 'Not a number!';
1360 return (x1<x2?l4.value: l3.value);
1362 (v152 = (function(){
1363 var x1 = (function(){
1365 if (typeof x1 !== 'number') throw 'Not a number!';
1367 if (typeof x2 !== 'number') throw 'Not a number!';
1370 if (typeof x1 !== 'number') throw 'Not a number!';
1371 var x2 = l86.fvalue(pv, (function(){
1374 if (typeof string != 'string')
1375 throw 'The value ' + string + ' is not a type string.';
1376 if (typeof index != 'number')
1377 throw 'The value ' + index + ' is not a type number.';
1378 return string.charCodeAt(index);
1380 if (typeof x2 !== 'number') throw 'Not a number!';
1383 (v153 = (function(){
1385 if (typeof x1 !== 'number') throw 'Not a number!';
1387 if (typeof x2 !== 'number') throw 'Not a number!';
1394 })(0,0,l67.fvalue(pv, v151));
1399 var l89 = {name: "SOME"};
1401 (l89).fvalue = (function(v162){
1402 ((v162)["fname"] = "SOME");
1404 })((function (values,v156,v157){
1405 checkArgs(arguments, 3);
1408 return (((typeof(v157) == "string")?l4.value: l3.value) !== l3.value ? (function(v158,v159){
1413 if (typeof x1 !== 'number') throw 'Not a number!';
1415 if (typeof x2 !== 'number') throw 'Not a number!';
1416 return (x1<x2?l4.value: l3.value);
1418 ((v156)(pv, (function(){
1421 if (typeof string != 'string')
1422 throw 'The value ' + string + ' is not a type string.';
1423 if (typeof index != 'number')
1424 throw 'The value ' + index + ' is not a type number.';
1425 return string.charCodeAt(index);
1426 })()) !== l3.value ? (function(){
1427 throw ({type: 'block', id: 70, value: l4.value, message: 'Return from unknown block SOME.'})
1429 (v158 = (function(){
1431 if (typeof x1 !== 'number') throw 'Not a number!';
1433 if (typeof x2 !== 'number') throw 'Not a number!';
1440 })(0,l67.fvalue(pv, v157)) : (l57.fvalue(pv, v157) !== l3.value ? (function(){
1442 return (function(v160,v161){
1444 while(v160 !== l3.value){
1445 (v161 = (function(){
1447 return tmp === l3.value? l3.value: tmp.car;
1450 ((v156)(pv, v161) !== l3.value ? (function(){
1451 throw ({type: 'block', id: 72, value: l4.value, message: 'Return from unknown block NIL.'})
1455 (v160 = (function(){
1457 return tmp === l3.value? l3.value: tmp.cdr;
1465 if (cf.type == 'block' && cf.id == 72)
1471 throw "Unknown sequence.";
1475 if (cf.type == 'block' && cf.id == 70)
1484 var l90 = {name: "EVERY"};
1486 (l90).fvalue = (function(v169){
1487 ((v169)["fname"] = "EVERY");
1489 })((function (values,v163,v164){
1490 checkArgs(arguments, 3);
1493 return (((typeof(v164) == "string")?l4.value: l3.value) !== l3.value ? (function(v165,v166){
1498 if (typeof x1 !== 'number') throw 'Not a number!';
1500 if (typeof x2 !== 'number') throw 'Not a number!';
1501 return (x1<x2?l4.value: l3.value);
1503 ((v163)(pv, (function(){
1506 if (typeof string != 'string')
1507 throw 'The value ' + string + ' is not a type string.';
1508 if (typeof index != 'number')
1509 throw 'The value ' + index + ' is not a type number.';
1510 return string.charCodeAt(index);
1511 })()) !== l3.value ? l3.value : (function(){
1512 throw ({type: 'block', id: 73, value: l3.value, message: 'Return from unknown block EVERY.'})
1514 (v165 = (function(){
1516 if (typeof x1 !== 'number') throw 'Not a number!';
1518 if (typeof x2 !== 'number') throw 'Not a number!';
1525 })(0,l67.fvalue(pv, v164)) : (l57.fvalue(pv, v164) !== l3.value ? (function(){
1527 return (function(v167,v168){
1529 while(v167 !== l3.value){
1530 (v168 = (function(){
1532 return tmp === l3.value? l3.value: tmp.car;
1535 ((v163)(pv, v168) !== l3.value ? l3.value : (function(){
1536 throw ({type: 'block', id: 75, value: l3.value, message: 'Return from unknown block NIL.'})
1540 (v167 = (function(){
1542 return tmp === l3.value? l3.value: tmp.cdr;
1550 if (cf.type == 'block' && cf.id == 75)
1556 throw "Unknown sequence.";
1560 if (cf.type == 'block' && cf.id == 73)
1569 var l91 = {name: "ASSOC"};
1571 (l91).fvalue = (function(v172){
1572 ((v172)["fname"] = "ASSOC");
1574 })((function (values,v170,v171){
1575 checkArgs(arguments, 3);
1580 while(v171 !== l3.value){
1581 (l25.fvalue(pv, v170, l31.fvalue(pv, v171)) !== l3.value ? (function(){
1582 throw ({type: 'block', id: 77, value: l3.value, message: 'Return from unknown block NIL.'})
1583 })() : (v171 = (function(){
1585 return tmp === l3.value? l3.value: tmp.cdr;
1591 if (cf.type == 'block' && cf.id == 77)
1599 return tmp === l3.value? l3.value: tmp.car;
1605 var l92 = {name: "STRING"};
1607 (l92).fvalue = (function(v174){
1608 ((v174)["fname"] = "STRING");
1610 })((function (values,v173){
1611 checkArgs(arguments, 2);
1613 return (((typeof(v173) == "string")?l4.value: l3.value) !== l3.value ? v173 : (((function(){
1615 return (typeof tmp == 'object' && 'name' in tmp);
1616 })()?l4.value: l3.value) !== l3.value ? (v173).name : (function(){
1618 if (typeof x != 'number')
1619 throw 'The value ' + x + ' is not a type number.';
1620 return String.fromCharCode(x);
1626 var l93 = {name: "STRING="};
1628 (l93).fvalue = (function(v177){
1629 ((v177)["fname"] = "STRING=");
1631 })((function (values,v175,v176){
1632 checkArgs(arguments, 3);
1634 return ((v175 == v176)?l4.value: l3.value);
1639 var l94 = {name: "FDEFINITION"};
1641 (l94).fvalue = (function(v179){
1642 ((v179)["fname"] = "FDEFINITION");
1644 })((function (values,v178){
1645 checkArgs(arguments, 2);
1647 return (((typeof v178 == 'function')?l4.value: l3.value) !== l3.value ? v178 : (((function(){
1649 return (typeof tmp == 'object' && 'name' in tmp);
1650 })()?l4.value: l3.value) !== l3.value ? (function(){
1652 var func = symbol.fvalue;
1653 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1656 throw "Invalid function";
1662 var l95 = {name: "DISASSEMBLE"};
1663 var l96 = {name: "WRITE-LINE"};
1665 (l95).fvalue = (function(v181){
1666 ((v181)["fname"] = "DISASSEMBLE");
1668 })((function (values,v180){
1669 checkArgs(arguments, 2);
1671 l96.fvalue(pv, (l94.fvalue(pv, v180)).toString());
1677 var l97 = {name: "DOCUMENTATION"};
1678 var l98 = {name: "FUNCTION"};
1679 var l99 = {name: "VARIABLE"};
1681 (l97).fvalue = (function(v186){
1682 ((v186)["fname"] = "DOCUMENTATION");
1685 var func = (function (values,v182,v183){
1686 checkArgs(arguments, 3);
1688 return (function(v184){
1689 return (l25.fvalue(pv, v184, l98) !== l3.value ? (function(v185){
1691 var tmp = (v185)["docstring"];
1692 return tmp == undefined? l3.value: tmp ;
1694 })(l94.fvalue(pv, v182)) : (l25.fvalue(pv, v184, l99) !== l3.value ? (function(){
1697 return (typeof tmp == 'object' && 'name' in tmp);
1698 })()?l4.value: l3.value) !== l3.value ? l3.value : (function(){
1699 throw "Wrong argument type! it should be a symbol";
1702 var tmp = (v182)["vardoc"];
1703 return tmp == undefined? l3.value: tmp ;
1706 throw "ECASE expression failed.";
1711 func.docstring = 'Return the documentation of X. TYPE must be the symbol VARIABLE or FUNCTION.';
1716 var l100 = {name: "*PACKAGE-LIST*"};
1718 (((l100.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l100).value = l3.value));
1721 var l101 = {name: "LIST-ALL-PACKAGES"};
1723 (l101).fvalue = (function(v187){
1724 ((v187)["fname"] = "LIST-ALL-PACKAGES");
1726 })((function (values){
1727 checkArgsAtMost(arguments, 1);
1731 var value = symbol.value;
1732 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
1739 var l102 = {name: "MAKE-PACKAGE"};
1740 var l103 = {name: "FIND-PACKAGE-OR-FAIL"};
1742 (l102).fvalue = (function(v192){
1743 ((v192)["fname"] = "MAKE-PACKAGE");
1745 })((function (values,v188,v189){
1746 checkArgsAtLeast(arguments, 2);
1747 checkArgsAtMost(arguments, 3);
1748 switch(arguments.length-1){
1754 return (function(v190,v191){
1755 ((v190)["packageName"] = v188);
1756 ((v190)["symbols"] = {});
1757 ((v190)["exports"] = {});
1758 ((v190)["use"] = v191);
1759 ((l100).value = ({car: v190, cdr: (function(){
1761 var value = symbol.value;
1762 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
1766 })({},l69.fvalue(pv, (function(){
1768 var func = symbol.fvalue;
1769 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1776 var l104 = {name: "PACKAGEP"};
1778 (l104).fvalue = (function(v194){
1779 ((v194)["fname"] = "PACKAGEP");
1781 })((function (values,v193){
1782 checkArgs(arguments, 2);
1784 return (((typeof (v193) === 'object')?l4.value: l3.value) !== l3.value ? ((("symbols") in (v193))?l4.value: l3.value) : l3.value);
1789 var l105 = {name: "FIND-PACKAGE"};
1790 var l106 = {name: "PACKAGE-NAME"};
1792 (l105).fvalue = (function(v199){
1793 ((v199)["fname"] = "FIND-PACKAGE");
1795 })((function (values,v195){
1796 checkArgs(arguments, 2);
1799 (l104.fvalue(pv, v195) !== l3.value ? (function(){
1800 throw ({type: 'block', id: 86, value: v195, message: 'Return from unknown block FIND-PACKAGE.'})
1802 return (function(v196){
1805 return (function(v197,v198){
1807 while(v197 !== l3.value){
1808 (v198 = (function(){
1810 return tmp === l3.value? l3.value: tmp.car;
1813 (l93.fvalue(pv, l106.fvalue(pv, v198), v196) !== l3.value ? (function(){
1814 throw ({type: 'block', id: 87, value: v198, message: 'Return from unknown block NIL.'})
1818 (v197 = (function(){
1820 return tmp === l3.value? l3.value: tmp.cdr;
1827 var value = symbol.value;
1828 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
1833 if (cf.type == 'block' && cf.id == 87)
1839 })(l92.fvalue(pv, v195));
1842 if (cf.type == 'block' && cf.id == 86)
1852 (l103).fvalue = (function(v202){
1853 ((v202)["fname"] = "FIND-PACKAGE-OR-FAIL");
1855 })((function (values,v200){
1856 checkArgs(arguments, 2);
1858 return (function(v201){
1859 return (v201 !== l3.value ? v201 : (function(){
1860 throw "Package unknown.";
1862 })(l105.fvalue(pv, v200));
1868 (l106).fvalue = (function(v205){
1869 ((v205)["fname"] = "PACKAGE-NAME");
1871 })((function (values,v203){
1872 checkArgs(arguments, 2);
1874 return (function(v204){
1876 var tmp = (v204)["packageName"];
1877 return tmp == undefined? l3.value: tmp ;
1879 })(l103.fvalue(pv, v203));
1884 var l107 = {name: "%PACKAGE-SYMBOLS"};
1886 (l107).fvalue = (function(v208){
1887 ((v208)["fname"] = "%PACKAGE-SYMBOLS");
1889 })((function (values,v206){
1890 checkArgs(arguments, 2);
1892 return (function(v207){
1894 var tmp = (v207)["symbols"];
1895 return tmp == undefined? l3.value: tmp ;
1897 })(l103.fvalue(pv, v206));
1902 var l108 = {name: "PACKAGE-USE-LIST"};
1904 (l108).fvalue = (function(v211){
1905 ((v211)["fname"] = "PACKAGE-USE-LIST");
1907 })((function (values,v209){
1908 checkArgs(arguments, 2);
1910 return (function(v210){
1912 var tmp = (v210)["use"];
1913 return tmp == undefined? l3.value: tmp ;
1915 })(l103.fvalue(pv, v209));
1920 var l109 = {name: "%PACKAGE-EXTERNAL-SYMBOLS"};
1922 (l109).fvalue = (function(v214){
1923 ((v214)["fname"] = "%PACKAGE-EXTERNAL-SYMBOLS");
1925 })((function (values,v212){
1926 checkArgs(arguments, 2);
1928 return (function(v213){
1930 var tmp = (v213)["exports"];
1931 return tmp == undefined? l3.value: tmp ;
1933 })(l103.fvalue(pv, v212));
1938 var l110 = {name: "*COMMON-LISP-PACKAGE*"};
1940 (((l110.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l110).value = l102.fvalue(pv, "CL")));
1943 var l111 = {name: "*USER-PACKAGE*"};
1945 (((l111.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l111).value = l102.fvalue(pv, "CL-USER", l42.fvalue(pv, (function(){
1947 var value = symbol.value;
1948 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
1953 var l112 = {name: "*KEYWORD-PACKAGE*"};
1955 (((l112.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l112).value = l102.fvalue(pv, "KEYWORD")));
1958 var l113 = {name: "KEYWORDP"};
1959 var l114 = {name: "SYMBOL-PACKAGE"};
1961 (l113).fvalue = (function(v216){
1962 ((v216)["fname"] = "KEYWORDP");
1964 })((function (values,v215){
1965 checkArgs(arguments, 2);
1967 return (((function(){
1969 return (typeof tmp == 'object' && 'name' in tmp);
1970 })()?l4.value: l3.value) !== l3.value ? ((l114.fvalue(pv, v215) === (function(){
1972 var value = symbol.value;
1973 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
1975 })())?l4.value: l3.value) : l3.value);
1980 var l115 = {name: "*PACKAGE*"};
1982 (((l115.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l115).value = (function(){
1984 var value = symbol.value;
1985 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
1990 var l116 = {name: "IN-PACKAGE"};
1992 var l117 = {name: "%INTERN-SYMBOL"};
1994 (l117).fvalue = (function(v219){
1995 ((v219)["fname"] = "%INTERN-SYMBOL");
1997 })((function (values,v217){
1998 checkArgs(arguments, 2);
2000 return (function(v218){
2001 ((v217)["package"] = (function(){
2003 var value = symbol.value;
2004 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2007 return ((v218)[(v217).name] = v217);
2008 })(l107.fvalue(pv, (function(){
2010 var value = symbol.value;
2011 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2018 var l118 = {name: "%FIND-SYMBOL"};
2020 (l118).fvalue = (function(v227){
2021 ((v227)["fname"] = "%FIND-SYMBOL");
2023 })((function (values,v220,v221){
2024 checkArgs(arguments, 3);
2027 return (function(v222){
2028 return (function(v223){
2029 return ((((v220) in (v223))?l4.value: l3.value) !== l3.value ? ({car: (function(){
2030 var tmp = (v223)[v220];
2031 return tmp == undefined? l3.value: tmp ;
2032 })(), cdr: l4.value}) : (function(){
2033 return (function(v224,v225){
2035 while(v224 !== l3.value){
2036 (v225 = (function(){
2038 return tmp === l3.value? l3.value: tmp.car;
2042 return ((((v220) in (v226))?l4.value: l3.value) !== l3.value ? (function(){
2043 throw ({type: 'block', id: 95, value: ({car: (function(){
2044 var tmp = (v226)[v220];
2045 return tmp == undefined? l3.value: tmp ;
2046 })(), cdr: l4.value}), message: 'Return from unknown block %FIND-SYMBOL.'})
2048 })(l109.fvalue(pv, v225));
2051 (v224 = (function(){
2053 return tmp === l3.value? l3.value: tmp.cdr;
2057 return ({car: l3.value, cdr: l3.value});
2058 })(l108.fvalue(pv, v222),l3.value);
2060 })(l107.fvalue(pv, v222));
2061 })(l103.fvalue(pv, v221));
2064 if (cf.type == 'block' && cf.id == 95)
2073 var l119 = {name: "FIND-SYMBOL"};
2075 (l119).fvalue = (function(v230){
2076 ((v230)["fname"] = "FIND-SYMBOL");
2078 })((function (values,v228,v229){
2079 checkArgsAtLeast(arguments, 2);
2080 checkArgsAtMost(arguments, 3);
2081 switch(arguments.length-1){
2085 var value = symbol.value;
2086 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2093 var tmp = l118.fvalue(pv, v228, v229);
2094 return tmp === l3.value? l3.value: tmp.car;
2100 var l120 = {name: "INTERN"};
2101 var l121 = {name: "EXPORT"};
2103 (l120).fvalue = (function(v237){
2104 ((v237)["fname"] = "INTERN");
2106 })((function (values,v231,v232){
2107 checkArgsAtLeast(arguments, 2);
2108 checkArgsAtMost(arguments, 3);
2109 switch(arguments.length-1){
2113 var value = symbol.value;
2114 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2120 return (function(v233){
2121 return (function(v234){
2122 return ((function(){
2124 return tmp === l3.value? l3.value: tmp.cdr;
2125 })() !== l3.value ? (function(){
2127 return tmp === l3.value? l3.value: tmp.car;
2128 })() : (function(v235){
2130 var tmp = (v235)[v231];
2131 return tmp == undefined? l3.value: tmp ;
2133 return (function(v236){
2134 ((v236)["package"] = v233);
2135 (((v233 === (function(){
2137 var value = symbol.value;
2138 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2140 })())?l4.value: l3.value) !== l3.value ? (function(){
2141 ((v236)["value"] = v236);
2142 return l121.fvalue(pv, l42.fvalue(pv, v236), v233);
2144 return ((v235)[v231] = v236);
2147 if (typeof name != 'string')
2148 throw 'The value ' + name + ' is not a type string.';
2149 return ({name: name});
2151 })(l107.fvalue(pv, v233)));
2152 })(l118.fvalue(pv, v231, v233));
2153 })(l103.fvalue(pv, v232));
2159 (l114).fvalue = (function(v239){
2160 ((v239)["fname"] = "SYMBOL-PACKAGE");
2162 })((function (values,v238){
2163 checkArgs(arguments, 2);
2167 return (typeof tmp == 'object' && 'name' in tmp);
2168 })()?l4.value: l3.value) !== l3.value ? l3.value : (function(){
2169 throw "it is not a symbol";
2172 var tmp = (v238)["package"];
2173 return tmp == undefined? l3.value: tmp ;
2180 (l121).fvalue = (function(v245){
2181 ((v245)["fname"] = "EXPORT");
2183 })((function (values,v240,v241){
2184 checkArgsAtLeast(arguments, 2);
2185 checkArgsAtMost(arguments, 3);
2186 switch(arguments.length-1){
2190 var value = symbol.value;
2191 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2197 return (function(v242){
2199 return (function(v243,v244){
2201 while(v243 !== l3.value){
2202 (v244 = (function(){
2204 return tmp === l3.value? l3.value: tmp.car;
2207 ((v242)[(v244).name] = v244);
2210 (v243 = (function(){
2212 return tmp === l3.value? l3.value: tmp.cdr;
2219 })(l109.fvalue(pv, v241));
2224 var l122 = {name: "GET-UNIVERSAL-TIME"};
2226 (l122).fvalue = (function(v246){
2227 ((v246)["fname"] = "GET-UNIVERSAL-TIME");
2229 })((function (values){
2230 checkArgsAtMost(arguments, 1);
2233 var x1 = (Math.round(new Date() / 1000));
2234 if (typeof x1 !== 'number') throw 'Not a number!';
2235 var x2 = 2208988800;
2236 if (typeof x2 !== 'number') throw 'Not a number!';
2243 var l123 = {name: "*NEWLINE*"};
2245 (((l123.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l123).value = l92.fvalue(pv, l72.fvalue(pv, 10))));
2248 var l124 = {name: "CONCAT"};
2250 (l124).fvalue = (function(v248){
2251 ((v248)["fname"] = "CONCAT");
2253 })((function (values){
2255 for (var i = arguments.length-1; i>=1; i--)
2256 v247 = {car: arguments[i], cdr:
2259 return l58.fvalue(values, (function(){
2261 var func = symbol.fvalue;
2262 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2269 var l125 = {name: "CONCATF"};
2271 var l126 = {name: "JOIN"};
2273 (l126).fvalue = (function(v251){
2274 ((v251)["fname"] = "JOIN");
2276 })((function (values,v249,v250){
2277 checkArgsAtLeast(arguments, 2);
2278 checkArgsAtMost(arguments, 3);
2279 switch(arguments.length-1){
2285 return (l11.fvalue(pv, v249) !== l3.value ? "" : (l11.fvalue(pv, (function(){
2287 return tmp === l3.value? l3.value: tmp.cdr;
2288 })()) !== l3.value ? (function(){
2290 return tmp === l3.value? l3.value: tmp.car;
2291 })() : l124.fvalue(values, (function(){
2293 return tmp === l3.value? l3.value: tmp.car;
2294 })(), v250, l126.fvalue(pv, (function(){
2296 return tmp === l3.value? l3.value: tmp.cdr;
2302 var l127 = {name: "JOIN-TRAILING"};
2304 (l127).fvalue = (function(v254){
2305 ((v254)["fname"] = "JOIN-TRAILING");
2307 })((function (values,v252,v253){
2308 checkArgsAtLeast(arguments, 2);
2309 checkArgsAtMost(arguments, 3);
2310 switch(arguments.length-1){
2316 return (l11.fvalue(pv, v252) !== l3.value ? "" : l124.fvalue(values, (function(){
2318 return tmp === l3.value? l3.value: tmp.car;
2319 })(), v253, l127.fvalue(pv, (function(){
2321 return tmp === l3.value? l3.value: tmp.cdr;
2327 var l128 = {name: "MAPCONCAT"};
2329 (l128).fvalue = (function(v257){
2330 ((v257)["fname"] = "MAPCONCAT");
2332 })((function (values,v255,v256){
2333 checkArgs(arguments, 3);
2335 return l126.fvalue(values, l69.fvalue(pv, v255, v256));
2340 var l129 = {name: "VECTOR-TO-LIST"};
2342 (l129).fvalue = (function(v263){
2343 ((v263)["fname"] = "VECTOR-TO-LIST");
2345 })((function (values,v258){
2346 checkArgs(arguments, 2);
2348 return (function(v259,v260){
2350 return (function(v261,v262){
2354 if (typeof x1 !== 'number') throw 'Not a number!';
2356 if (typeof x2 !== 'number') throw 'Not a number!';
2357 return (x1<x2?l4.value: l3.value);
2360 (v259 = ({car: (function(){
2361 var x = (v258)[v261];
2362 if (x === undefined) throw 'Out of range';
2367 (v261 = (function(){
2369 if (typeof x1 !== 'number') throw 'Not a number!';
2371 if (typeof x2 !== 'number') throw 'Not a number!';
2376 return l64.fvalue(values, v259);
2379 })(l3.value,l67.fvalue(pv, v258));
2384 var l130 = {name: "LIST-TO-VECTOR"};
2386 (l130).fvalue = (function(v269){
2387 ((v269)["fname"] = "LIST-TO-VECTOR");
2389 })((function (values,v264){
2390 checkArgs(arguments, 2);
2392 return (function(v265,v266){
2394 return (function(v267,v268){
2396 while(v267 !== l3.value){
2397 (v268 = (function(){
2399 return tmp === l3.value? l3.value: tmp.car;
2405 if (i < 0 || i >= x.length) throw 'Out of range';
2408 (v266 = (function(){
2410 if (typeof x1 !== 'number') throw 'Not a number!';
2412 if (typeof x2 !== 'number') throw 'Not a number!';
2417 (v267 = (function(){
2419 return tmp === l3.value? l3.value: tmp.cdr;
2428 for (var i = 0; i < l67.fvalue(pv, v264); i++)
2436 var l131 = {name: "VALUES-LIST"};
2438 (l131).fvalue = (function(v271){
2439 ((v271)["fname"] = "VALUES-LIST");
2441 })((function (values,v270){
2442 checkArgs(arguments, 2);
2444 return values.apply(this, l130.fvalue(pv, v270));
2449 var l132 = {name: "VALUES"};
2451 (l132).fvalue = (function(v273){
2452 ((v273)["fname"] = "VALUES");
2454 })((function (values){
2456 for (var i = arguments.length-1; i>=1; i--)
2457 v272 = {car: arguments[i], cdr:
2460 return l131.fvalue(values, v272);
2465 var l133 = {name: "MULTIPLE-VALUE-BIND"};
2467 var l134 = {name: "MULTIPLE-VALUE-LIST"};
2469 var l135 = {name: "INDENT"};
2471 (l135).fvalue = (function(v280){
2472 ((v280)["fname"] = "INDENT");
2474 })((function (values){
2476 for (var i = arguments.length-1; i>=1; i--)
2477 v274 = {car: arguments[i], cdr:
2480 return (function(v275){
2481 return (function(v276,v277,v278){
2482 (l76.fvalue(pv, l67.fvalue(pv, v275)) !== l3.value ? (v276 = l124.fvalue(pv, v276, " ")) : l3.value);
2487 if (typeof x1 !== 'number') throw 'Not a number!';
2489 if (typeof x2 !== 'number') throw 'Not a number!';
2490 return (x1<x2?l4.value: l3.value);
2493 return (v276 = l124.fvalue(pv, v276, v279));
2494 })(((l74.fvalue(pv, (function(){
2497 if (typeof string != 'string')
2498 throw 'The value ' + string + ' is not a type string.';
2499 if (typeof index != 'number')
2500 throw 'The value ' + index + ' is not a type number.';
2501 return string.charCodeAt(index);
2502 })(), 10) !== l3.value ? ((function(){
2504 if (typeof x1 !== 'number') throw 'Not a number!';
2505 var x2 = l22.fvalue(pv, v278);
2506 if (typeof x2 !== 'number') throw 'Not a number!';
2507 return (x1<x2?l4.value: l3.value);
2508 })() !== l3.value ? l26.fvalue(pv, l74.fvalue(pv, (function(){
2510 var index = l21.fvalue(pv, v277);
2511 if (typeof string != 'string')
2512 throw 'The value ' + string + ' is not a type string.';
2513 if (typeof index != 'number')
2514 throw 'The value ' + index + ' is not a type number.';
2515 return string.charCodeAt(index);
2516 })(), 10)) : l3.value) : l3.value) !== l3.value ? l124.fvalue(pv, l92.fvalue(pv, 10), " ") : l92.fvalue(pv, (function(){
2519 if (typeof string != 'string')
2520 throw 'The value ' + string + ' is not a type string.';
2521 if (typeof index != 'number')
2522 throw 'The value ' + index + ' is not a type number.';
2523 return string.charCodeAt(index);
2525 (v277 = (function(){
2527 if (typeof x1 !== 'number') throw 'Not a number!';
2529 if (typeof x2 !== 'number') throw 'Not a number!';
2536 })("",0,l67.fvalue(pv, v275));
2537 })(l126.fvalue(pv, v274));
2543 (l16).fvalue = (function(v284){
2544 ((v284)["fname"] = "INTEGER-TO-STRING");
2546 })((function (values,v281){
2547 checkArgs(arguments, 2);
2549 return (l23.fvalue(pv, v281) !== l3.value ? "0" : (l77.fvalue(pv, v281) !== l3.value ? l124.fvalue(values, "-", l16.fvalue(pv, (function(){
2551 if (typeof x1 !== 'number') throw 'Not a number!';
2553 if (typeof x2 !== 'number') throw 'Not a number!';
2555 })())) : (function(v282){
2558 while(l26.fvalue(pv, l23.fvalue(pv, v281)) !== l3.value){
2559 (v282 = ({car: (function(){
2562 if (typeof x != 'number')
2563 throw 'The value ' + x + ' is not a type number.';
2564 if (typeof y != 'number')
2565 throw 'The value ' + y + ' is not a type number.';
2568 (v281 = l24.fvalue(pv, v281, 10));
2572 return l126.fvalue(values, l69.fvalue(pv, (function (values,v283){
2573 checkArgs(arguments, 2);
2574 return l92.fvalue(values, (function(){
2575 var string = "0123456789";
2577 if (typeof string != 'string')
2578 throw 'The value ' + string + ' is not a type string.';
2579 if (typeof index != 'number')
2580 throw 'The value ' + index + ' is not a type number.';
2581 return string.charCodeAt(index);
2589 var l136 = {name: "JS!BOOL"};
2590 var l137 = {name: "LS-COMPILE"};
2592 (l136).fvalue = (function(v286){
2593 ((v286)["fname"] = "JS!BOOL");
2595 })((function (values,v285){
2596 checkArgs(arguments, 2);
2598 return l124.fvalue(values, "(", v285, "?", l137.fvalue(pv, l4.value), ": ", l137.fvalue(pv, l3.value), ")");
2603 var l138 = {name: "JS!SELFCALL"};
2605 var l139 = {name: "PRIN1-TO-STRING"};
2606 var l140 = {name: "ESCAPE-STRING"};
2608 (l139).fvalue = (function(v292){
2609 ((v292)["fname"] = "PRIN1-TO-STRING");
2611 })((function (values,v287){
2612 checkArgs(arguments, 2);
2614 return (((function(){
2616 return (typeof tmp == 'object' && 'name' in tmp);
2617 })()?l4.value: l3.value) !== l3.value ? ((function(){
2618 var tmp = l118.fvalue(pv, (v287).name, (function(){
2620 var value = symbol.value;
2621 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2624 return tmp === l3.value? l3.value: tmp.cdr;
2625 })() !== l3.value ? (v287).name : (function(v288,v289){
2626 return l124.fvalue(values, (l11.fvalue(pv, v288) !== l3.value ? "#" : (((v288 === l105.fvalue(pv, "KEYWORD"))?l4.value: l3.value) !== l3.value ? "" : l106.fvalue(pv, v288))), ":", v289);
2627 })(l114.fvalue(pv, v287),(v287).name)) : (l75.fvalue(pv, v287) !== l3.value ? l16.fvalue(values, v287) : (((typeof(v287) == "string")?l4.value: l3.value) !== l3.value ? l124.fvalue(values, "\"", l140.fvalue(pv, v287), "\"") : (((typeof v287 == 'function')?l4.value: l3.value) !== l3.value ? (function(v290){
2628 return (v290 !== l3.value ? l124.fvalue(values, "#<FUNCTION ", v290, ">") : l124.fvalue(values, "#<FUNCTION>"));
2630 var tmp = (v287)["fname"];
2631 return tmp == undefined? l3.value: tmp ;
2632 })()) : (l57.fvalue(pv, v287) !== l3.value ? l124.fvalue(values, "(", l127.fvalue(pv, l69.fvalue(pv, (function(){
2634 var func = symbol.fvalue;
2635 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2637 })(), l81.fvalue(pv, v287)), " "), (function(v291){
2638 return (l11.fvalue(pv, (function(){
2640 return tmp === l3.value? l3.value: tmp.cdr;
2641 })()) !== l3.value ? l139.fvalue(pv, (function(){
2643 return tmp === l3.value? l3.value: tmp.car;
2644 })()) : l124.fvalue(pv, l139.fvalue(pv, (function(){
2646 return tmp === l3.value? l3.value: tmp.car;
2647 })()), " . ", l139.fvalue(pv, (function(){
2649 return tmp === l3.value? l3.value: tmp.cdr;
2651 })(l80.fvalue(pv, v287)), ")") : (((function(){
2653 return typeof x === 'object' && 'length' in x;
2654 })()?l4.value: l3.value) !== l3.value ? l124.fvalue(values, "#", l139.fvalue(pv, l129.fvalue(pv, v287))) : (l104.fvalue(pv, v287) !== l3.value ? l124.fvalue(values, "#<PACKAGE ", l106.fvalue(pv, v287), ">") : l3.value)))))));
2660 (l96).fvalue = (function(v294){
2661 ((v294)["fname"] = "WRITE-LINE");
2663 })((function (values,v293){
2664 checkArgs(arguments, 2);
2668 if (typeof x != 'string')
2669 throw 'The value ' + x + ' is not a type string.';
2670 return lisp.write(x);
2673 var x = (function(){
2675 var value = symbol.value;
2676 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2679 if (typeof x != 'string')
2680 throw 'The value ' + x + ' is not a type string.';
2681 return lisp.write(x);
2688 var l141 = {name: "WARN"};
2690 (l141).fvalue = (function(v296){
2691 ((v296)["fname"] = "WARN");
2693 })((function (values,v295){
2694 checkArgs(arguments, 2);
2697 var x = "WARNING: ";
2698 if (typeof x != 'string')
2699 throw 'The value ' + x + ' is not a type string.';
2700 return lisp.write(x);
2702 return l96.fvalue(values, v295);
2707 var l142 = {name: "PRINT"};
2709 (l142).fvalue = (function(v298){
2710 ((v298)["fname"] = "PRINT");
2712 })((function (values,v297){
2713 checkArgs(arguments, 2);
2715 l96.fvalue(pv, l139.fvalue(pv, v297));
2721 var l143 = {name: "MAKE-STRING-STREAM"};
2723 (l143).fvalue = (function(v300){
2724 ((v300)["fname"] = "MAKE-STRING-STREAM");
2726 })((function (values,v299){
2727 checkArgs(arguments, 2);
2729 return ({car: v299, cdr: 0});
2734 var l144 = {name: "%PEEK-CHAR"};
2736 (l144).fvalue = (function(v302){
2737 ((v302)["fname"] = "%PEEK-CHAR");
2739 })((function (values,v301){
2740 checkArgs(arguments, 2);
2742 return ((function(){
2743 var x1 = (function(){
2745 return tmp === l3.value? l3.value: tmp.cdr;
2747 if (typeof x1 !== 'number') throw 'Not a number!';
2748 var x2 = l67.fvalue(pv, (function(){
2750 return tmp === l3.value? l3.value: tmp.car;
2752 if (typeof x2 !== 'number') throw 'Not a number!';
2753 return (x1<x2?l4.value: l3.value);
2754 })() !== l3.value ? (function(){
2755 var string = (function(){
2757 return tmp === l3.value? l3.value: tmp.car;
2759 var index = (function(){
2761 return tmp === l3.value? l3.value: tmp.cdr;
2763 if (typeof string != 'string')
2764 throw 'The value ' + string + ' is not a type string.';
2765 if (typeof index != 'number')
2766 throw 'The value ' + index + ' is not a type number.';
2767 return string.charCodeAt(index);
2773 var l145 = {name: "%READ-CHAR"};
2775 (l145).fvalue = (function(v305){
2776 ((v305)["fname"] = "%READ-CHAR");
2778 })((function (values,v303){
2779 checkArgs(arguments, 2);
2781 return ((function(){
2782 var x1 = (function(){
2784 return tmp === l3.value? l3.value: tmp.cdr;
2786 if (typeof x1 !== 'number') throw 'Not a number!';
2787 var x2 = l67.fvalue(pv, (function(){
2789 return tmp === l3.value? l3.value: tmp.car;
2791 if (typeof x2 !== 'number') throw 'Not a number!';
2792 return (x1<x2?l4.value: l3.value);
2793 })() !== l3.value ? (function(v304){
2796 if (typeof x != 'object')
2797 throw 'The value ' + x + ' is not a type object.';
2798 return (x.cdr = l21.fvalue(pv, (function(){
2800 return tmp === l3.value? l3.value: tmp.cdr;
2805 var string = (function(){
2807 return tmp === l3.value? l3.value: tmp.car;
2809 var index = (function(){
2811 return tmp === l3.value? l3.value: tmp.cdr;
2813 if (typeof string != 'string')
2814 throw 'The value ' + string + ' is not a type string.';
2815 if (typeof index != 'number')
2816 throw 'The value ' + index + ' is not a type number.';
2817 return string.charCodeAt(index);
2823 var l146 = {name: "WHITESPACEP"};
2825 (l146).fvalue = (function(v309){
2826 ((v309)["fname"] = "WHITESPACEP");
2828 })((function (values,v306){
2829 checkArgs(arguments, 2);
2831 return (function(v307){
2832 return (v307 !== l3.value ? v307 : (function(v308){
2833 return (v308 !== l3.value ? v308 : l74.fvalue(values, v306, 9));
2834 })(l74.fvalue(pv, v306, 10)));
2835 })(l74.fvalue(pv, v306, 32));
2840 var l147 = {name: "SKIP-WHITESPACES"};
2842 (l147).fvalue = (function(v312){
2843 ((v312)["fname"] = "SKIP-WHITESPACES");
2845 })((function (values,v310){
2846 checkArgs(arguments, 2);
2848 return (function(v311){
2849 (v311 = l144.fvalue(pv, v310));
2852 while((v311 !== l3.value ? l146.fvalue(pv, v311) : l3.value) !== l3.value){
2853 l145.fvalue(pv, v310);
2854 (v311 = l144.fvalue(pv, v310));
2863 var l148 = {name: "TERMINALP"};
2865 (l148).fvalue = (function(v317){
2866 ((v317)["fname"] = "TERMINALP");
2868 })((function (values,v313){
2869 checkArgs(arguments, 2);
2871 return (function(v314){
2872 return (v314 !== l3.value ? v314 : (function(v315){
2873 return (v315 !== l3.value ? v315 : (function(v316){
2874 return (v316 !== l3.value ? v316 : l74.fvalue(values, 40, v313));
2875 })(l74.fvalue(pv, 41, v313)));
2876 })(l146.fvalue(pv, v313)));
2877 })(l11.fvalue(pv, v313));
2882 var l149 = {name: "READ-UNTIL"};
2884 (l149).fvalue = (function(v322){
2885 ((v322)["fname"] = "READ-UNTIL");
2887 })((function (values,v318,v319){
2888 checkArgs(arguments, 3);
2890 return (function(v320,v321){
2891 (v321 = l144.fvalue(pv, v318));
2894 while((v321 !== l3.value ? l26.fvalue(pv, (v319)(pv, v321)) : l3.value) !== l3.value){
2895 (v320 = l124.fvalue(pv, v320, l92.fvalue(pv, v321)));
2896 l145.fvalue(pv, v318);
2897 (v321 = l144.fvalue(pv, v318));
2907 var l150 = {name: "SKIP-WHITESPACES-AND-COMMENTS"};
2909 (l150).fvalue = (function(v326){
2910 ((v326)["fname"] = "SKIP-WHITESPACES-AND-COMMENTS");
2912 })((function (values,v323){
2913 checkArgs(arguments, 2);
2915 return (function(v324){
2916 l147.fvalue(pv, v323);
2917 (v324 = l144.fvalue(pv, v323));
2920 while((v324 !== l3.value ? l74.fvalue(pv, v324, 59) : l3.value) !== l3.value){
2921 l149.fvalue(pv, v323, (function (values,v325){
2922 checkArgs(arguments, 2);
2923 return l74.fvalue(values, v325, 10);
2925 l147.fvalue(pv, v323);
2926 (v324 = l144.fvalue(pv, v323));
2935 var l151 = {name: "%READ-LIST"};
2936 var l152 = {name: "LS-READ"};
2938 (l151).fvalue = (function(v330){
2939 ((v330)["fname"] = "%READ-LIST");
2941 })((function (values,v327){
2942 checkArgs(arguments, 2);
2944 l150.fvalue(pv, v327);
2945 return (function(v328){
2946 return (l11.fvalue(pv, v328) !== l3.value ? (function(){
2947 throw "Unspected EOF";
2948 })() : (l74.fvalue(pv, v328, 41) !== l3.value ? (function(){
2949 l145.fvalue(pv, v327);
2951 })() : (l74.fvalue(pv, v328, 46) !== l3.value ? (function(){
2952 l145.fvalue(pv, v327);
2953 return (function(v329){
2954 l150.fvalue(pv, v327);
2955 (l74.fvalue(pv, l145.fvalue(pv, v327), 41) !== l3.value ? l3.value : (function(){
2956 throw "')' was expected.";
2959 })(l152.fvalue(pv, v327));
2960 })() : ({car: l152.fvalue(pv, v327), cdr: l151.fvalue(pv, v327)}))));
2961 })(l144.fvalue(pv, v327));
2966 var l153 = {name: "READ-STRING"};
2968 (l153).fvalue = (function(v334){
2969 ((v334)["fname"] = "READ-STRING");
2971 })((function (values,v331){
2972 checkArgs(arguments, 2);
2974 return (function(v332,v333){
2975 (v333 = l145.fvalue(pv, v331));
2978 while(l26.fvalue(pv, l25.fvalue(pv, v333, 34)) !== l3.value){
2979 (l11.fvalue(pv, v333) !== l3.value ? (function(){
2980 throw "Unexpected EOF";
2982 (l25.fvalue(pv, v333, 92) !== l3.value ? (v333 = l145.fvalue(pv, v331)) : l3.value);
2983 (v332 = l124.fvalue(pv, v332, l92.fvalue(pv, v333)));
2984 (v333 = l145.fvalue(pv, v331));
2994 var l154 = {name: "READ-SHARP"};
2996 (l154).fvalue = (function(v339){
2997 ((v339)["fname"] = "READ-SHARP");
2999 })((function (values,v335){
3000 checkArgs(arguments, 2);
3002 l145.fvalue(pv, v335);
3003 return (function(v336){
3004 return (l25.fvalue(pv, v336, 39) !== l3.value ? l42.fvalue(values, l98, l152.fvalue(pv, v335)) : (l25.fvalue(pv, v336, 40) !== l3.value ? l130.fvalue(values, l151.fvalue(pv, v335)) : (l25.fvalue(pv, v336, 58) !== l3.value ? (function(){
3005 var name = (function(){
3006 var x = l149.fvalue(pv, v335, (function(){
3008 var func = symbol.fvalue;
3009 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3012 if (typeof x != 'string')
3013 throw 'The value ' + x + ' is not a type string.';
3014 return x.toUpperCase();
3016 if (typeof name != 'string')
3017 throw 'The value ' + name + ' is not a type string.';
3018 return ({name: name});
3019 })() : (l25.fvalue(pv, v336, 92) !== l3.value ? (function(v337){
3020 return (l93.fvalue(pv, v337, "space") !== l3.value ? l73.fvalue(values, 32) : (l93.fvalue(pv, v337, "tab") !== l3.value ? l73.fvalue(values, 9) : (l93.fvalue(pv, v337, "newline") !== l3.value ? l73.fvalue(values, 10) : l73.fvalue(values, (function(){
3023 if (typeof string != 'string')
3024 throw 'The value ' + string + ' is not a type string.';
3025 if (typeof index != 'number')
3026 throw 'The value ' + index + ' is not a type number.';
3027 return string.charCodeAt(index);
3029 })(l124.fvalue(pv, l92.fvalue(pv, l145.fvalue(pv, v335)), l149.fvalue(pv, v335, (function(){
3031 var func = symbol.fvalue;
3032 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3034 })()))) : (l25.fvalue(pv, v336, 43) !== l3.value ? (function(v338){
3035 return (l93.fvalue(pv, v338, "common-lisp") !== l3.value ? (function(){
3036 l152.fvalue(pv, v335);
3037 return l152.fvalue(values, v335);
3038 })() : (l93.fvalue(pv, v338, "ecmalisp") !== l3.value ? l152.fvalue(values, v335) : (function(){
3039 throw "Unknown reader form.";
3041 })(l149.fvalue(pv, v335, (function(){
3043 var func = symbol.fvalue;
3044 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3046 })())) : (function(){
3047 throw "ECASE expression failed.";
3049 })(l145.fvalue(pv, v335));
3054 var l155 = {name: "READ-SYMBOL"};
3056 (l155).fvalue = (function(v347){
3057 ((v347)["fname"] = "READ-SYMBOL");
3059 })((function (values,v340){
3060 checkArgs(arguments, 2);
3062 return (function(v341,v342,v343,v344,v345){
3068 if (typeof x1 !== 'number') throw 'Not a number!';
3070 if (typeof x2 !== 'number') throw 'Not a number!';
3071 return (x1<x2?l4.value: l3.value);
3072 })() !== l3.value ? l26.fvalue(pv, l74.fvalue(pv, (function(){
3075 if (typeof string != 'string')
3076 throw 'The value ' + string + ' is not a type string.';
3077 if (typeof index != 'number')
3078 throw 'The value ' + index + ' is not a type number.';
3079 return string.charCodeAt(index);
3080 })(), 58)) : l3.value) !== l3.value){
3081 (v345 = (function(){
3083 if (typeof x1 !== 'number') throw 'Not a number!';
3085 if (typeof x2 !== 'number') throw 'Not a number!';
3093 if (typeof x1 !== 'number') throw 'Not a number!';
3095 if (typeof x2 !== 'number') throw 'Not a number!';
3096 return (x1==x2?l4.value: l3.value);
3097 })() !== l3.value ? (function(){
3099 (v342 = (function(){
3101 var value = symbol.value;
3102 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3105 return (v344 = l4.value);
3107 (l23.fvalue(pv, v345) !== l3.value ? (v342 = "KEYWORD") : (v342 = (function(){
3108 var x = l87.fvalue(pv, v340, 0, v345);
3109 if (typeof x != 'string')
3110 throw 'The value ' + x + ' is not a type string.';
3111 return x.toUpperCase();
3113 (v345 = (function(){
3115 if (typeof x1 !== 'number') throw 'Not a number!';
3117 if (typeof x2 !== 'number') throw 'Not a number!';
3120 (l74.fvalue(pv, (function(){
3123 if (typeof string != 'string')
3124 throw 'The value ' + string + ' is not a type string.';
3125 if (typeof index != 'number')
3126 throw 'The value ' + index + ' is not a type number.';
3127 return string.charCodeAt(index);
3128 })(), 58) !== l3.value ? (function(){
3130 return (v345 = (function(){
3132 if (typeof x1 !== 'number') throw 'Not a number!';
3134 if (typeof x2 !== 'number') throw 'Not a number!';
3138 return (v343 = l87.fvalue(pv, v340, v345));
3140 (v343 = (function(){
3142 if (typeof x != 'string')
3143 throw 'The value ' + x + ' is not a type string.';
3144 return x.toUpperCase();
3146 (v342 = l105.fvalue(pv, v342));
3147 return ((function(v346){
3148 return (v346 !== l3.value ? v346 : ((v342 === l105.fvalue(pv, "KEYWORD"))?l4.value: l3.value));
3149 })(v344) !== l3.value ? l120.fvalue(values, v343, v342) : l119.fvalue(values, v343, v342));
3150 })(l67.fvalue(pv, v340),l3.value,l3.value,l3.value,l3.value);
3155 var l156 = {name: "*EOF*"};
3157 (((l156.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l156).value = l15.fvalue(pv)));
3160 var l157 = {name: "QUOTE"};
3161 var l158 = {name: "BACKQUOTE"};
3162 var l159 = {name: "UNQUOTE-SPLICING"};
3163 var l160 = {name: "UNQUOTE"};
3165 (l152).fvalue = (function(v352){
3166 ((v352)["fname"] = "LS-READ");
3168 })((function (values,v348){
3169 checkArgs(arguments, 2);
3171 l150.fvalue(pv, v348);
3172 return (function(v349){
3173 return ((function(v350){
3174 return (v350 !== l3.value ? v350 : l74.fvalue(pv, v349, 41));
3175 })(l11.fvalue(pv, v349)) !== l3.value ? (function(){
3177 var value = symbol.value;
3178 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3180 })() : (l74.fvalue(pv, v349, 40) !== l3.value ? (function(){
3181 l145.fvalue(pv, v348);
3182 return l151.fvalue(values, v348);
3183 })() : (l74.fvalue(pv, v349, 39) !== l3.value ? (function(){
3184 l145.fvalue(pv, v348);
3185 return l42.fvalue(values, l157, l152.fvalue(pv, v348));
3186 })() : (l74.fvalue(pv, v349, 96) !== l3.value ? (function(){
3187 l145.fvalue(pv, v348);
3188 return l42.fvalue(values, l158, l152.fvalue(pv, v348));
3189 })() : (l74.fvalue(pv, v349, 34) !== l3.value ? (function(){
3190 l145.fvalue(pv, v348);
3191 return l153.fvalue(values, v348);
3192 })() : (l74.fvalue(pv, v349, 44) !== l3.value ? (function(){
3193 l145.fvalue(pv, v348);
3194 return (l25.fvalue(pv, l144.fvalue(pv, v348), 64) !== l3.value ? (function(){
3195 l145.fvalue(pv, v348);
3196 return l42.fvalue(values, l159, l152.fvalue(pv, v348));
3197 })() : l42.fvalue(values, l160, l152.fvalue(pv, v348)));
3198 })() : (l74.fvalue(pv, v349, 35) !== l3.value ? l154.fvalue(values, v348) : (function(v351){
3199 return (l90.fvalue(pv, (function(){
3201 var func = symbol.fvalue;
3202 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3204 })(), v351) !== l3.value ? l88.fvalue(values, v351) : l155.fvalue(values, v351));
3205 })(l149.fvalue(pv, v348, (function(){
3207 var func = symbol.fvalue;
3208 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3211 })(l144.fvalue(pv, v348));
3216 var l161 = {name: "LS-READ-FROM-STRING"};
3218 (l161).fvalue = (function(v354){
3219 ((v354)["fname"] = "LS-READ-FROM-STRING");
3221 })((function (values,v353){
3222 checkArgs(arguments, 2);
3224 return l152.fvalue(values, l143.fvalue(pv, v353));
3229 var l162 = {name: "*MULTIPLE-VALUE-P*"};
3231 (((l162.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l162).value = l3.value));
3234 var l163 = {name: "*COMPILATION-UNIT-CHECKS*"};
3236 (((l163.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l163).value = l3));
3239 var l164 = {name: "MAKE-BINDING"};
3241 (l164).fvalue = (function(v359){
3242 ((v359)["fname"] = "MAKE-BINDING");
3244 })((function (values,v355,v356,v357,v358){
3245 checkArgsAtLeast(arguments, 4);
3246 checkArgsAtMost(arguments, 5);
3247 switch(arguments.length-1){
3253 return l42.fvalue(values, v355, v356, v357, v358);
3258 var l165 = {name: "BINDING-NAME"};
3260 (l165).fvalue = (function(v361){
3261 ((v361)["fname"] = "BINDING-NAME");
3263 })((function (values,v360){
3264 checkArgs(arguments, 2);
3266 return l38.fvalue(values, v360);
3271 var l166 = {name: "BINDING-TYPE"};
3273 (l166).fvalue = (function(v363){
3274 ((v363)["fname"] = "BINDING-TYPE");
3276 })((function (values,v362){
3277 checkArgs(arguments, 2);
3279 return l39.fvalue(values, v362);
3284 var l167 = {name: "BINDING-VALUE"};
3286 (l167).fvalue = (function(v365){
3287 ((v365)["fname"] = "BINDING-VALUE");
3289 })((function (values,v364){
3290 checkArgs(arguments, 2);
3292 return l40.fvalue(values, v364);
3297 var l168 = {name: "BINDING-DECLARATIONS"};
3299 (l168).fvalue = (function(v367){
3300 ((v367)["fname"] = "BINDING-DECLARATIONS");
3302 })((function (values,v366){
3303 checkArgs(arguments, 2);
3305 return l41.fvalue(values, v366);
3310 var l169 = {name: "SET-BINDING-VALUE"};
3312 (l169).fvalue = (function(v370){
3313 ((v370)["fname"] = "SET-BINDING-VALUE");
3315 })((function (values,v368,v369){
3316 checkArgs(arguments, 3);
3319 var x = l34.fvalue(pv, v368);
3320 if (typeof x != 'object')
3321 throw 'The value ' + x + ' is not a type object.';
3322 return (x.car = v369);
3328 var l170 = {name: "SET-BINDING-DECLARATIONS"};
3330 (l170).fvalue = (function(v373){
3331 ((v373)["fname"] = "SET-BINDING-DECLARATIONS");
3333 })((function (values,v371,v372){
3334 checkArgs(arguments, 3);
3337 var x = l36.fvalue(pv, v371);
3338 if (typeof x != 'object')
3339 throw 'The value ' + x + ' is not a type object.';
3340 return (x.car = v372);
3346 var l171 = {name: "PUSH-BINDING-DECLARATION"};
3348 (l171).fvalue = (function(v376){
3349 ((v376)["fname"] = "PUSH-BINDING-DECLARATION");
3351 })((function (values,v374,v375){
3352 checkArgs(arguments, 3);
3354 return l170.fvalue(values, v375, ({car: v374, cdr: l168.fvalue(pv, v375)}));
3359 var l172 = {name: "MAKE-LEXENV"};
3361 (l172).fvalue = (function(v377){
3362 ((v377)["fname"] = "MAKE-LEXENV");
3364 })((function (values){
3365 checkArgsAtMost(arguments, 1);
3367 return l42.fvalue(values, l3.value, l3.value, l3.value, l3.value);
3372 var l173 = {name: "COPY-LEXENV"};
3374 (l173).fvalue = (function(v379){
3375 ((v379)["fname"] = "COPY-LEXENV");
3377 })((function (values,v378){
3378 checkArgs(arguments, 2);
3380 return l71.fvalue(values, v378);
3385 var l174 = {name: "PUSH-TO-LEXENV"};
3386 var l175 = {name: "BLOCK"};
3387 var l176 = {name: "GOTAG"};
3389 (l174).fvalue = (function(v384){
3390 ((v384)["fname"] = "PUSH-TO-LEXENV");
3392 })((function (values,v380,v381,v382){
3393 checkArgs(arguments, 4);
3395 return (function(v383){
3396 return (l25.fvalue(pv, v383, l99) !== l3.value ? (function(){
3398 if (typeof x != 'object')
3399 throw 'The value ' + x + ' is not a type object.';
3400 return (x.car = ({car: v380, cdr: (function(){
3402 return tmp === l3.value? l3.value: tmp.car;
3404 })() : (l25.fvalue(pv, v383, l98) !== l3.value ? (function(){
3405 var x = (function(){
3407 return tmp === l3.value? l3.value: tmp.cdr;
3409 if (typeof x != 'object')
3410 throw 'The value ' + x + ' is not a type object.';
3411 return (x.car = ({car: v380, cdr: l32.fvalue(pv, v381)}));
3412 })() : (l25.fvalue(pv, v383, l175) !== l3.value ? (function(){
3413 var x = l34.fvalue(pv, v381);
3414 if (typeof x != 'object')
3415 throw 'The value ' + x + ' is not a type object.';
3416 return (x.car = ({car: v380, cdr: l35.fvalue(pv, v381)}));
3417 })() : (l25.fvalue(pv, v383, l176) !== l3.value ? (function(){
3418 var x = l36.fvalue(pv, v381);
3419 if (typeof x != 'object')
3420 throw 'The value ' + x + ' is not a type object.';
3421 return (x.car = ({car: v380, cdr: l37.fvalue(pv, v381)}));
3423 throw "ECASE expression failed.";
3430 var l177 = {name: "EXTEND-LEXENV"};
3432 (l177).fvalue = (function(v391){
3433 ((v391)["fname"] = "EXTEND-LEXENV");
3435 })((function (values,v385,v386,v387){
3436 checkArgs(arguments, 4);
3438 return (function(v388){
3440 return (function(v389,v390){
3442 while(v389 !== l3.value){
3443 (v390 = (function(){
3445 return tmp === l3.value? l3.value: tmp.car;
3448 l174.fvalue(pv, v390, v388, v387);
3451 (v389 = (function(){
3453 return tmp === l3.value? l3.value: tmp.cdr;
3458 })(l64.fvalue(pv, v385),l3.value);
3460 })(l173.fvalue(pv, v386));
3465 var l178 = {name: "LOOKUP-IN-LEXENV"};
3467 (l178).fvalue = (function(v396){
3468 ((v396)["fname"] = "LOOKUP-IN-LEXENV");
3470 })((function (values,v392,v393,v394){
3471 checkArgs(arguments, 4);
3473 return l91.fvalue(values, v392, (function(v395){
3474 return (l25.fvalue(pv, v395, l99) !== l3.value ? l38.fvalue(pv, v393) : (l25.fvalue(pv, v395, l98) !== l3.value ? l39.fvalue(pv, v393) : (l25.fvalue(pv, v395, l175) !== l3.value ? l40.fvalue(pv, v393) : (l25.fvalue(pv, v395, l176) !== l3.value ? l41.fvalue(pv, v393) : (function(){
3475 throw "ECASE expression failed.";
3482 var l179 = {name: "*ENVIRONMENT*"};
3484 (((l179.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l179).value = l172.fvalue(pv)));
3487 var l180 = {name: "*VARIABLE-COUNTER*"};
3489 (((l180.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l180).value = 0));
3492 var l181 = {name: "GVARNAME"};
3494 (l181).fvalue = (function(v398){
3495 ((v398)["fname"] = "GVARNAME");
3497 })((function (values,v397){
3498 checkArgs(arguments, 2);
3500 return l124.fvalue(values, "v", l16.fvalue(pv, ((l180).value = (function(){
3501 var x1 = (function(){
3503 var value = symbol.value;
3504 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3507 if (typeof x1 !== 'number') throw 'Not a number!';
3509 if (typeof x2 !== 'number') throw 'Not a number!';
3516 var l182 = {name: "TRANSLATE-VARIABLE"};
3518 (l182).fvalue = (function(v400){
3519 ((v400)["fname"] = "TRANSLATE-VARIABLE");
3521 })((function (values,v399){
3522 checkArgs(arguments, 2);
3524 return l167.fvalue(values, l178.fvalue(pv, v399, (function(){
3526 var value = symbol.value;
3527 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3534 var l183 = {name: "EXTEND-LOCAL-ENV"};
3535 var l184 = {name: "LEXICAL-VARIABLE"};
3537 (l183).fvalue = (function(v406){
3538 ((v406)["fname"] = "EXTEND-LOCAL-ENV");
3540 })((function (values,v401){
3541 checkArgs(arguments, 2);
3543 return (function(v402){
3545 return (function(v403,v404){
3547 while(v403 !== l3.value){
3548 (v404 = (function(){
3550 return tmp === l3.value? l3.value: tmp.car;
3554 return l174.fvalue(pv, v405, v402, l99);
3555 })(l164.fvalue(pv, v404, l184, l181.fvalue(pv, v404)));
3558 (v403 = (function(){
3560 return tmp === l3.value? l3.value: tmp.cdr;
3567 })(l173.fvalue(pv, (function(){
3569 var value = symbol.value;
3570 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3577 var l185 = {name: "*TOPLEVEL-COMPILATIONS*"};
3579 (((l185.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l185).value = l3.value));
3582 var l186 = {name: "TOPLEVEL-COMPILATION"};
3584 (l186).fvalue = (function(v408){
3585 ((v408)["fname"] = "TOPLEVEL-COMPILATION");
3587 })((function (values,v407){
3588 checkArgs(arguments, 2);
3590 return ((l185).value = ({car: v407, cdr: (function(){
3592 var value = symbol.value;
3593 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3600 var l187 = {name: "NULL-OR-EMPTY-P"};
3602 (l187).fvalue = (function(v410){
3603 ((v410)["fname"] = "NULL-OR-EMPTY-P");
3605 })((function (values,v409){
3606 checkArgs(arguments, 2);
3608 return l23.fvalue(values, l67.fvalue(pv, v409));
3613 var l188 = {name: "GET-TOPLEVEL-COMPILATIONS"};
3615 (l188).fvalue = (function(v411){
3616 ((v411)["fname"] = "GET-TOPLEVEL-COMPILATIONS");
3618 })((function (values){
3619 checkArgsAtMost(arguments, 1);
3621 return l64.fvalue(values, l84.fvalue(pv, (function(){
3623 var func = symbol.fvalue;
3624 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3628 var value = symbol.value;
3629 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3636 var l189 = {name: "%COMPILE-DEFMACRO"};
3637 var l190 = {name: "MACRO"};
3639 (l189).fvalue = (function(v414){
3640 ((v414)["fname"] = "%COMPILE-DEFMACRO");
3642 })((function (values,v412,v413){
3643 checkArgs(arguments, 3);
3645 l186.fvalue(pv, l137.fvalue(pv, l62.fvalue(pv, l42.fvalue(pv, l157), l42.fvalue(pv, v412))));
3646 return l174.fvalue(values, l164.fvalue(pv, v412, l190, v413), (function(){
3648 var value = symbol.value;
3649 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3656 var l191 = {name: "GLOBAL-BINDING"};
3658 (l191).fvalue = (function(v420){
3659 ((v420)["fname"] = "GLOBAL-BINDING");
3661 })((function (values,v415,v416,v417){
3662 checkArgs(arguments, 4);
3664 return (function(v418){
3665 return (v418 !== l3.value ? v418 : (function(v419){
3666 l174.fvalue(pv, v419, (function(){
3668 var value = symbol.value;
3669 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3673 })(l164.fvalue(pv, v415, v416, l3.value)));
3674 })(l178.fvalue(pv, v415, (function(){
3676 var value = symbol.value;
3677 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3684 var l192 = {name: "CLAIMP"};
3686 (l192).fvalue = (function(v425){
3687 ((v425)["fname"] = "CLAIMP");
3689 })((function (values,v421,v422,v423){
3690 checkArgs(arguments, 4);
3692 return (function(v424){
3693 return (v424 !== l3.value ? l82.fvalue(values, v423, l168.fvalue(pv, v424)) : l3.value);
3694 })(l178.fvalue(pv, v421, (function(){
3696 var value = symbol.value;
3697 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3704 var l193 = {name: "!PROCLAIM"};
3705 var l194 = {name: "SPECIAL"};
3706 var l195 = {name: "NOTINLINE"};
3707 var l196 = {name: "CONSTANT"};
3709 (l193).fvalue = (function(v437){
3710 ((v437)["fname"] = "!PROCLAIM");
3712 })((function (values,v426){
3713 checkArgs(arguments, 2);
3715 return (function(v427){
3716 return (l25.fvalue(pv, v427, l194) !== l3.value ? (function(){
3717 return (function(v428,v429){
3719 while(v428 !== l3.value){
3720 (v429 = (function(){
3722 return tmp === l3.value? l3.value: tmp.car;
3726 return l171.fvalue(pv, l194, v430);
3727 })(l191.fvalue(pv, v429, l99, l99));
3730 (v428 = (function(){
3732 return tmp === l3.value? l3.value: tmp.cdr;
3739 return tmp === l3.value? l3.value: tmp.cdr;
3741 })() : (l25.fvalue(pv, v427, l195) !== l3.value ? (function(){
3742 return (function(v431,v432){
3744 while(v431 !== l3.value){
3745 (v432 = (function(){
3747 return tmp === l3.value? l3.value: tmp.car;
3751 return l171.fvalue(pv, l195, v433);
3752 })(l191.fvalue(pv, v432, l98, l98));
3755 (v431 = (function(){
3757 return tmp === l3.value? l3.value: tmp.cdr;
3764 return tmp === l3.value? l3.value: tmp.cdr;
3766 })() : (l25.fvalue(pv, v427, l196) !== l3.value ? (function(){
3767 return (function(v434,v435){
3769 while(v434 !== l3.value){
3770 (v435 = (function(){
3772 return tmp === l3.value? l3.value: tmp.car;
3776 return l171.fvalue(pv, l196, v436);
3777 })(l191.fvalue(pv, v435, l99, l99));
3780 (v434 = (function(){
3782 return tmp === l3.value? l3.value: tmp.cdr;
3789 return tmp === l3.value? l3.value: tmp.cdr;
3794 return tmp === l3.value? l3.value: tmp.car;
3800 var l197 = {name: "PROCLAIM"};
3801 (l197).fvalue = (function(){
3803 var func = symbol.fvalue;
3804 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3807 var l198 = {name: "*COMPILATIONS*"};
3809 (((l198.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l198).value = l3.value));
3812 var l199 = {name: "DEFINE-COMPILATION"};
3814 var l200 = {name: "IF"};
3815 ((l198).value = ({car: l42.fvalue(pv, l200, (function (values,v438,v439,v440){
3816 checkArgs(arguments, 4);
3818 return l124.fvalue(values, "(", l137.fvalue(pv, v438), " !== ", l137.fvalue(pv, l3.value), " ? ", l137.fvalue(pv, v439, (function(){
3820 var value = symbol.value;
3821 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3823 })()), " : ", l137.fvalue(pv, v440, (function(){
3825 var value = symbol.value;
3826 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3830 })), cdr: (function(){
3832 var value = symbol.value;
3833 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3836 var l201 = {name: "*LAMBDA-LIST-KEYWORDS*"};
3837 var l202 = {name: "&OPTIONAL"};
3838 var l203 = {name: "&REST"};
3839 var l204 = {car: l202, cdr: {car: l203, cdr: l3}};
3841 (((l201.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l201).value = l204));
3844 var l205 = {name: "LIST-UNTIL-KEYWORD"};
3846 (l205).fvalue = (function(v443){
3847 ((v443)["fname"] = "LIST-UNTIL-KEYWORD");
3849 })((function (values,v441){
3850 checkArgs(arguments, 2);
3852 return ((function(v442){
3853 return (v442 !== l3.value ? v442 : l82.fvalue(pv, (function(){
3855 return tmp === l3.value? l3.value: tmp.car;
3858 var value = symbol.value;
3859 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3862 })(l11.fvalue(pv, v441)) !== l3.value ? l3.value : ({car: (function(){
3864 return tmp === l3.value? l3.value: tmp.car;
3865 })(), cdr: l205.fvalue(pv, (function(){
3867 return tmp === l3.value? l3.value: tmp.cdr;
3873 var l206 = {name: "LAMBDA-LIST-REQUIRED-ARGUMENTS"};
3875 (l206).fvalue = (function(v445){
3876 ((v445)["fname"] = "LAMBDA-LIST-REQUIRED-ARGUMENTS");
3878 })((function (values,v444){
3879 checkArgs(arguments, 2);
3881 return l205.fvalue(values, v444);
3886 var l207 = {name: "LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT"};
3888 (l207).fvalue = (function(v447){
3889 ((v447)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT");
3891 })((function (values,v446){
3892 checkArgs(arguments, 2);
3894 return l69.fvalue(values, (function(){
3896 var func = symbol.fvalue;
3897 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3899 })(), l205.fvalue(pv, (function(){
3900 var tmp = l82.fvalue(pv, l202, v446);
3901 return tmp === l3.value? l3.value: tmp.cdr;
3907 var l208 = {name: "LAMBDA-LIST-OPTIONAL-ARGUMENTS"};
3909 (l208).fvalue = (function(v449){
3910 ((v449)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS");
3912 })((function (values,v448){
3913 checkArgs(arguments, 2);
3915 return l69.fvalue(values, (function(){
3917 var func = symbol.fvalue;
3918 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3920 })(), l207.fvalue(pv, v448));
3925 var l209 = {name: "LAMBDA-LIST-REST-ARGUMENT"};
3927 (l209).fvalue = (function(v452){
3928 ((v452)["fname"] = "LAMBDA-LIST-REST-ARGUMENT");
3930 })((function (values,v450){
3931 checkArgs(arguments, 2);
3933 return (function(v451){
3936 return tmp === l3.value? l3.value: tmp.cdr;
3937 })() !== l3.value ? (function(){
3938 throw "Bad lambda-list";
3942 return tmp === l3.value? l3.value: tmp.car;
3944 })(l205.fvalue(pv, (function(){
3945 var tmp = l82.fvalue(pv, l203, v450);
3946 return tmp === l3.value? l3.value: tmp.cdr;
3952 var l210 = {name: "LAMBDA-DOCSTRING-WRAPPER"};
3954 (l210).fvalue = (function(v455){
3955 ((v455)["fname"] = "LAMBDA-DOCSTRING-WRAPPER");
3957 })((function (values,v454){
3958 checkArgsAtLeast(arguments, 2);
3960 for (var i = arguments.length-1; i>=2; i--)
3961 v453 = {car: arguments[i], cdr:
3964 return (v454 !== l3.value ? l124.fvalue(values, "(function(){", (function(){
3966 var value = symbol.value;
3967 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3969 })(), l135.fvalue(pv, "var func = ", l126.fvalue(pv, v453), ";", (function(){
3971 var value = symbol.value;
3972 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3974 })(), "func.docstring = '", v454, "';", (function(){
3976 var value = symbol.value;
3977 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3979 })(), "return func;", (function(){
3981 var value = symbol.value;
3982 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3984 })()), "})()") : l126.fvalue(values, v453));
3989 var l211 = {name: "LAMBDA-CHECK-ARGUMENT-COUNT"};
3990 var l212 = {name: "N/A"};
3992 (l211).fvalue = (function(v461){
3993 ((v461)["fname"] = "LAMBDA-CHECK-ARGUMENT-COUNT");
3995 })((function (values,v456,v457,v458){
3996 checkArgs(arguments, 4);
3998 return (function(v459,v460){
4003 if (typeof x1 !== 'number') throw 'Not a number!';
4005 if (typeof x2 !== 'number') throw 'Not a number!';
4006 return (x1<x2?l4.value: l3.value);
4007 })() !== l3.value ? l25.fvalue(pv, v459, v460) : l3.value) !== l3.value ? (function(){
4008 throw ({type: 'block', id: 177, value: l124.fvalue(pv, "checkArgs(arguments, ", l16.fvalue(pv, v459), ");", (function(){
4010 var value = symbol.value;
4011 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4013 })()), message: 'Return from unknown block NIL.'})
4015 return l124.fvalue(values, ((function(){
4017 if (typeof x1 !== 'number') throw 'Not a number!';
4019 if (typeof x2 !== 'number') throw 'Not a number!';
4020 return (x1<x2?l4.value: l3.value);
4021 })() !== l3.value ? l124.fvalue(pv, "checkArgsAtLeast(arguments, ", l16.fvalue(pv, v459), ");", (function(){
4023 var value = symbol.value;
4024 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4026 })()) : ""), (((typeof (v460) == "number")?l4.value: l3.value) !== l3.value ? l124.fvalue(pv, "checkArgsAtMost(arguments, ", l16.fvalue(pv, v460), ");", (function(){
4028 var value = symbol.value;
4029 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4034 if (cf.type == 'block' && cf.id == 177)
4040 })(l21.fvalue(pv, v456),(v458 !== l3.value ? l212 : (function(){
4042 if (typeof x1 !== 'number') throw 'Not a number!';
4044 if (typeof x2 !== 'number') throw 'Not a number!';
4046 if (typeof x3 !== 'number') throw 'Not a number!';
4053 var l213 = {name: "LAMBDA"};
4054 var l214 = {name: "LS-COMPILE-BLOCK"};
4055 ((l198).value = ({car: l42.fvalue(pv, l213, (function (values,v463){
4056 checkArgsAtLeast(arguments, 2);
4058 for (var i = arguments.length-1; i>=2; i--)
4059 v462 = {car: arguments[i], cdr:
4062 return (function(v464,v465,v466,v467){
4063 ((((typeof((function(){
4065 return tmp === l3.value? l3.value: tmp.car;
4066 })()) == "string")?l4.value: l3.value) !== l3.value ? l26.fvalue(pv, l11.fvalue(pv, (function(){
4068 return tmp === l3.value? l3.value: tmp.cdr;
4069 })())) : l3.value) !== l3.value ? (function(){
4070 (v467 = (function(){
4072 return tmp === l3.value? l3.value: tmp.car;
4074 return (v462 = (function(){
4076 return tmp === l3.value? l3.value: tmp.cdr;
4079 return (function(v468,v469,v470){
4085 return l210.fvalue(values, v467, "(function (", l126.fvalue(pv, ({car: "values", cdr: l69.fvalue(pv, (function(){
4087 var func = symbol.fvalue;
4088 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4090 })(), l62.fvalue(pv, v464, v465))}), ","), "){", (function(){
4092 var value = symbol.value;
4093 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4095 })(), l135.fvalue(pv, l211.fvalue(pv, v468, v469, v466), (v465 !== l3.value ? l124.fvalue(pv, "switch(arguments.length-1){", (function(){
4097 var value = symbol.value;
4098 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4100 })(), (function(v471,v472,v473){
4106 if (typeof x1 !== 'number') throw 'Not a number!';
4108 if (typeof x2 !== 'number') throw 'Not a number!';
4109 return (x1<x2?l4.value: l3.value);
4112 (v472 = ({car: l124.fvalue(pv, "case ", l16.fvalue(pv, (function(){
4114 if (typeof x1 !== 'number') throw 'Not a number!';
4116 if (typeof x2 !== 'number') throw 'Not a number!';
4118 })()), ":", (function(){
4120 var value = symbol.value;
4121 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4123 })(), l182.fvalue(pv, (function(){
4125 return tmp === l3.value? l3.value: tmp.car;
4126 })()), "=", l137.fvalue(pv, l32.fvalue(pv, v474)), ";", (function(){
4128 var value = symbol.value;
4129 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4131 })()), cdr: v472}));
4132 return (v473 = (function(){
4134 if (typeof x1 !== 'number') throw 'Not a number!';
4136 if (typeof x2 !== 'number') throw 'Not a number!';
4139 })(l79.fvalue(pv, v473, v471));
4143 (v472 = ({car: l124.fvalue(pv, "default: break;", (function(){
4145 var value = symbol.value;
4146 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4148 })()), cdr: v472}));
4149 return l126.fvalue(pv, l64.fvalue(pv, v472));
4151 })(l207.fvalue(pv, v463),l3.value,0), "}", (function(){
4153 var value = symbol.value;
4154 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4156 })()) : ""), (v466 !== l3.value ? (function(v475){
4157 return l124.fvalue(pv, "var ", v475, "= ", l137.fvalue(pv, l3.value), ";", (function(){
4159 var value = symbol.value;
4160 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4162 })(), "for (var i = arguments.length-1; i>=", l16.fvalue(pv, (function(){
4164 if (typeof x1 !== 'number') throw 'Not a number!';
4166 if (typeof x2 !== 'number') throw 'Not a number!';
4168 if (typeof x3 !== 'number') throw 'Not a number!';
4170 })()), "; i--)", (function(){
4172 var value = symbol.value;
4173 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4175 })(), l135.fvalue(pv, v475, " = ", "{car: arguments[i], cdr: "), v475, "};", (function(){
4177 var value = symbol.value;
4178 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4181 })(l182.fvalue(pv, v466)) : ""), (function(v476){
4187 return l214.fvalue(pv, v462, l4.value);
4192 })(l4.value)), "})");
4197 })(l67.fvalue(pv, v464),l67.fvalue(pv, v465),l183.fvalue(pv, l62.fvalue(pv, l56.fvalue(pv, v466), v464, v465)));
4198 })(l206.fvalue(pv, v463),l208.fvalue(pv, v463),l209.fvalue(pv, v463),l3.value);
4200 })), cdr: (function(){
4202 var value = symbol.value;
4203 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4206 var l215 = {name: "SETQ-PAIR"};
4207 var l216 = {name: "SET"};
4209 (l215).fvalue = (function(v480){
4210 ((v480)["fname"] = "SETQ-PAIR");
4212 })((function (values,v477,v478){
4213 checkArgs(arguments, 3);
4215 return (function(v479){
4216 return (((l166.fvalue(pv, v479) === l184)?l4.value: l3.value) !== l3.value ? l124.fvalue(values, l167.fvalue(pv, v479), " = ", l137.fvalue(pv, v478)) : l137.fvalue(values, l62.fvalue(pv, l42.fvalue(pv, l216), l42.fvalue(pv, l62.fvalue(pv, l42.fvalue(pv, l157), l42.fvalue(pv, v477))), l42.fvalue(pv, v478))));
4217 })(l178.fvalue(pv, v477, (function(){
4219 var value = symbol.value;
4220 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4227 var l217 = {name: "SETQ"};
4228 ((l198).value = ({car: l42.fvalue(pv, l217, (function (values){
4230 for (var i = arguments.length-1; i>=1; i--)
4231 v481 = {car: arguments[i], cdr:
4234 return (function(v482){
4238 while(l4.value !== l3.value){
4239 (l11.fvalue(pv, v481) !== l3.value ? (function(){
4240 throw ({type: 'block', id: 182, value: l3.value, message: 'Return from unknown block NIL.'})
4241 })() : (l11.fvalue(pv, (function(){
4243 return tmp === l3.value? l3.value: tmp.cdr;
4244 })()) !== l3.value ? (function(){
4245 throw "Odd paris in SETQ";
4247 (v482 = l124.fvalue(pv, v482, l124.fvalue(pv, l215.fvalue(pv, (function(){
4249 return tmp === l3.value? l3.value: tmp.car;
4250 })(), l32.fvalue(pv, v481)), (l11.fvalue(pv, l34.fvalue(pv, v481)) !== l3.value ? "" : ", "))));
4251 return (v481 = l34.fvalue(pv, v481));
4257 if (cf.type == 'block' && cf.id == 182)
4263 return l124.fvalue(values, "(", v482, ")");
4266 })), cdr: (function(){
4268 var value = symbol.value;
4269 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4272 var l218 = {name: "JS-VREF"};
4273 ((l198).value = ({car: l42.fvalue(pv, l218, (function (values,v483){
4274 checkArgs(arguments, 2);
4278 })), cdr: (function(){
4280 var value = symbol.value;
4281 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4284 var l219 = {name: "JS-VSET"};
4285 ((l198).value = ({car: l42.fvalue(pv, l219, (function (values,v484,v485){
4286 checkArgs(arguments, 3);
4288 return l124.fvalue(values, "(", v484, " = ", l137.fvalue(pv, v485), ")");
4290 })), cdr: (function(){
4292 var value = symbol.value;
4293 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4297 (l140).fvalue = (function(v492){
4298 ((v492)["fname"] = "ESCAPE-STRING");
4300 })((function (values,v486){
4301 checkArgs(arguments, 2);
4303 return (function(v487,v488,v489){
4308 if (typeof x1 !== 'number') throw 'Not a number!';
4310 if (typeof x2 !== 'number') throw 'Not a number!';
4311 return (x1<x2?l4.value: l3.value);
4315 return (v491 !== l3.value ? v491 : l74.fvalue(pv, v490, 92));
4316 })(l74.fvalue(pv, v490, 34)) !== l3.value ? (v487 = l124.fvalue(pv, v487, "\\")) : l3.value);
4317 (l74.fvalue(pv, v490, 10) !== l3.value ? (function(){
4318 (v487 = l124.fvalue(pv, v487, "\\"));
4319 return (v490 = 110);
4321 return (v487 = l124.fvalue(pv, v487, l92.fvalue(pv, v490)));
4325 if (typeof string != 'string')
4326 throw 'The value ' + string + ' is not a type string.';
4327 if (typeof index != 'number')
4328 throw 'The value ' + index + ' is not a type number.';
4329 return string.charCodeAt(index);
4331 (v488 = (function(){
4333 if (typeof x1 !== 'number') throw 'Not a number!';
4335 if (typeof x2 !== 'number') throw 'Not a number!';
4342 })("",0,l67.fvalue(pv, v486));
4347 var l220 = {name: "*LITERAL-SYMBOLS*"};
4349 (((l220.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l220).value = l3.value));
4352 var l221 = {name: "*LITERAL-COUNTER*"};
4354 (((l221.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l221).value = 0));
4357 var l222 = {name: "GENLIT"};
4359 (l222).fvalue = (function(v493){
4360 ((v493)["fname"] = "GENLIT");
4362 })((function (values){
4363 checkArgsAtMost(arguments, 1);
4365 return l124.fvalue(values, "l", l16.fvalue(pv, ((l221).value = (function(){
4366 var x1 = (function(){
4368 var value = symbol.value;
4369 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4372 if (typeof x1 !== 'number') throw 'Not a number!';
4374 if (typeof x2 !== 'number') throw 'Not a number!';
4381 var l223 = {name: "LITERAL"};
4383 (l223).fvalue = (function(v505){
4384 ((v505)["fname"] = "LITERAL");
4386 })((function (values,v494,v495){
4387 checkArgsAtLeast(arguments, 2);
4388 checkArgsAtMost(arguments, 3);
4389 switch(arguments.length-1){
4395 return (l75.fvalue(pv, v494) !== l3.value ? l16.fvalue(values, v494) : (((typeof(v494) == "string")?l4.value: l3.value) !== l3.value ? l124.fvalue(values, "\"", l140.fvalue(pv, v494), "\"") : (((function(){
4397 return (typeof tmp == 'object' && 'name' in tmp);
4398 })()?l4.value: l3.value) !== l3.value ? (function(v496){
4399 return (v496 !== l3.value ? v496 : (function(v498,v499){
4400 ((l220).value = ({car: ({car: v494, cdr: v498}), cdr: (function(){
4402 var value = symbol.value;
4403 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4406 l186.fvalue(pv, l124.fvalue(pv, "var ", v498, " = ", v499));
4408 })(l222.fvalue(pv),(function(v497){
4409 return (l11.fvalue(pv, v497) !== l3.value ? l124.fvalue(pv, "{name: \"", l140.fvalue(pv, (v494).name), "\"}") : l137.fvalue(pv, l62.fvalue(pv, l42.fvalue(pv, l120), l42.fvalue(pv, (v494).name), l42.fvalue(pv, l106.fvalue(pv, v497)))));
4410 })(l114.fvalue(pv, v494))));
4412 var tmp = l91.fvalue(pv, v494, (function(){
4414 var value = symbol.value;
4415 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4418 return tmp === l3.value? l3.value: tmp.cdr;
4419 })()) : (((function(){
4421 return (typeof tmp == 'object' && 'car' in tmp);
4422 })()?l4.value: l3.value) !== l3.value ? (function(v500){
4423 return (v495 !== l3.value ? v500 : (function(v501){
4424 l186.fvalue(pv, l124.fvalue(pv, "var ", v501, " = ", v500));
4426 })(l222.fvalue(pv)));
4427 })(l124.fvalue(pv, "{car: ", l223.fvalue(pv, (function(){
4429 return tmp === l3.value? l3.value: tmp.car;
4430 })(), l4.value), ", ", "cdr: ", l223.fvalue(pv, (function(){
4432 return tmp === l3.value? l3.value: tmp.cdr;
4433 })(), l4.value), "}")) : (((function(){
4435 return typeof x === 'object' && 'length' in x;
4436 })()?l4.value: l3.value) !== l3.value ? (function(v502){
4437 return (function(v503){
4438 return (v495 !== l3.value ? v503 : (function(v504){
4439 l186.fvalue(pv, l124.fvalue(pv, "var ", v504, " = ", v503));
4441 })(l222.fvalue(pv)));
4442 })(l124.fvalue(pv, "[", l126.fvalue(pv, l69.fvalue(pv, (function(){
4444 var func = symbol.fvalue;
4445 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4447 })(), v502), ", "), "]"));
4448 })(l129.fvalue(pv, v494)) : l3.value)))));
4453 ((l198).value = ({car: l42.fvalue(pv, l157, (function (values,v506){
4454 checkArgs(arguments, 2);
4456 return l223.fvalue(values, v506);
4458 })), cdr: (function(){
4460 var value = symbol.value;
4461 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4464 var l224 = {name: "%WHILE"};
4465 ((l198).value = ({car: l42.fvalue(pv, l224, (function (values,v508){
4466 checkArgsAtLeast(arguments, 2);
4468 for (var i = arguments.length-1; i>=2; i--)
4469 v507 = {car: arguments[i], cdr:
4472 return l124.fvalue(values, "(function(){", (function(){
4474 var value = symbol.value;
4475 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4477 })(), l135.fvalue(pv, "while(", l137.fvalue(pv, v508), " !== ", l137.fvalue(pv, l3.value), "){", (function(){
4479 var value = symbol.value;
4480 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4482 })(), l135.fvalue(pv, l214.fvalue(pv, v507)), "}", "return ", l137.fvalue(pv, l3.value), ";", (function(){
4484 var value = symbol.value;
4485 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4489 })), cdr: (function(){
4491 var value = symbol.value;
4492 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4495 var l225 = {name: "SYMBOL-FUNCTION"};
4496 ((l198).value = ({car: l42.fvalue(pv, l98, (function (values,v509){
4497 checkArgs(arguments, 2);
4499 return ((l57.fvalue(pv, v509) !== l3.value ? (((function(){
4501 return tmp === l3.value? l3.value: tmp.car;
4502 })() === l213)?l4.value: l3.value) : l3.value) !== l3.value ? l137.fvalue(values, v509) : (((function(){
4504 return (typeof tmp == 'object' && 'name' in tmp);
4505 })()?l4.value: l3.value) !== l3.value ? l137.fvalue(values, l62.fvalue(pv, l42.fvalue(pv, l225), l42.fvalue(pv, l62.fvalue(pv, l42.fvalue(pv, l157), l42.fvalue(pv, v509))))) : l3.value));
4507 })), cdr: (function(){
4509 var value = symbol.value;
4510 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4513 var l226 = {name: "EVAL-WHEN-COMPILE"};
4514 var l227 = {name: "EVAL"};
4515 var l228 = {name: "PROGN"};
4516 ((l198).value = ({car: l42.fvalue(pv, l226, (function (values){
4518 for (var i = arguments.length-1; i>=1; i--)
4519 v510 = {car: arguments[i], cdr:
4522 l227.fvalue(pv, ({car: l228, cdr: v510}));
4525 })), cdr: (function(){
4527 var value = symbol.value;
4528 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4531 var l229 = {name: "DEFINE-TRANSFORMATION"};
4533 ((l198).value = ({car: l42.fvalue(pv, l228, (function (values){
4535 for (var i = arguments.length-1; i>=1; i--)
4536 v511 = {car: arguments[i], cdr:
4539 return (l11.fvalue(pv, (function(){
4541 return tmp === l3.value? l3.value: tmp.cdr;
4542 })()) !== l3.value ? l137.fvalue(values, (function(){
4544 return tmp === l3.value? l3.value: tmp.car;
4547 var value = symbol.value;
4548 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4550 })()) : l124.fvalue(values, "(function(){", (function(){
4552 var value = symbol.value;
4553 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4555 })(), l135.fvalue(pv, l214.fvalue(pv, v511, l4.value)), "})()"));
4557 })), cdr: (function(){
4559 var value = symbol.value;
4560 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4563 var l230 = {name: "SPECIAL-VARIABLE-P"};
4565 (l230).fvalue = (function(v513){
4566 ((v513)["fname"] = "SPECIAL-VARIABLE-P");
4568 })((function (values,v512){
4569 checkArgs(arguments, 2);
4571 return (l192.fvalue(pv, v512, l99, l194) !== l3.value ? l4.value : l3.value);
4576 var l231 = {name: "LET-BINDING-WRAPPER"};
4578 (l231).fvalue = (function(v520){
4579 ((v520)["fname"] = "LET-BINDING-WRAPPER");
4581 })((function (values,v514,v515){
4582 checkArgs(arguments, 3);
4585 (l11.fvalue(pv, v514) !== l3.value ? (function(){
4586 throw ({type: 'block', id: 195, value: v515, message: 'Return from unknown block LET-BINDING-WRAPPER.'})
4588 return l124.fvalue(values, "try {", (function(){
4590 var value = symbol.value;
4591 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4593 })(), l135.fvalue(pv, "var tmp;", (function(){
4595 var value = symbol.value;
4596 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4598 })(), l128.fvalue(pv, (function (values,v516){
4599 checkArgs(arguments, 2);
4600 return (function(v517){
4601 return l124.fvalue(values, "tmp = ", v517, ".value;", (function(){
4603 var value = symbol.value;
4604 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4606 })(), v517, ".value = ", (function(){
4608 return tmp === l3.value? l3.value: tmp.cdr;
4609 })(), ";", (function(){
4611 var value = symbol.value;
4612 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4616 return tmp === l3.value? l3.value: tmp.cdr;
4617 })(), " = tmp;", (function(){
4619 var value = symbol.value;
4620 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4623 })(l137.fvalue(pv, l62.fvalue(pv, l42.fvalue(pv, l157), l42.fvalue(pv, (function(){
4625 return tmp === l3.value? l3.value: tmp.car;
4627 }), v514), v515, (function(){
4629 var value = symbol.value;
4630 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4632 })()), "}", (function(){
4634 var value = symbol.value;
4635 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4637 })(), "finally {", (function(){
4639 var value = symbol.value;
4640 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4642 })(), l135.fvalue(pv, l128.fvalue(pv, (function (values,v518){
4643 checkArgs(arguments, 2);
4644 return (function(v519){
4645 return l124.fvalue(values, v519, ".value", " = ", (function(){
4647 return tmp === l3.value? l3.value: tmp.cdr;
4648 })(), ";", (function(){
4650 var value = symbol.value;
4651 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4654 })(l137.fvalue(pv, l62.fvalue(pv, l42.fvalue(pv, l157), l42.fvalue(pv, (function(){
4656 return tmp === l3.value? l3.value: tmp.car;
4658 }), v514)), "}", (function(){
4660 var value = symbol.value;
4661 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4666 if (cf.type == 'block' && cf.id == 195)
4675 var l232 = {name: "LET"};
4676 var l233 = {name: "DYNAMIC-BINDINGS"};
4677 ((l198).value = ({car: l42.fvalue(pv, l232, (function (values,v522){
4678 checkArgsAtLeast(arguments, 2);
4680 for (var i = arguments.length-1; i>=2; i--)
4681 v521 = {car: arguments[i], cdr:
4686 var v530 = l179.value;
4687 var v523 = l69.fvalue(pv, (function(){
4689 var func = symbol.fvalue;
4690 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4693 var v524 = l69.fvalue(pv, (function(){
4695 var func = symbol.fvalue;
4696 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4699 var v525 = l69.fvalue(pv, (function(){
4701 var func = symbol.fvalue;
4702 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4704 })(), l69.fvalue(pv, (function(){
4706 var func = symbol.fvalue;
4707 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4710 ((l179).value = l183.fvalue(pv, l84.fvalue(pv, (function(){
4712 var func = symbol.fvalue;
4713 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4716 var v526 = l3.value;
4717 return l124.fvalue(values, "(function(", l126.fvalue(pv, l69.fvalue(pv, (function (values,v527){
4718 checkArgs(arguments, 2);
4719 return (l230.fvalue(pv, v527) !== l3.value ? (function(v528){
4720 ((l233).value = ({car: ({car: v527, cdr: v528}), cdr: v526}));
4722 })(l181.fvalue(pv, v527)) : l182.fvalue(values, v527));
4723 }), v524), ","), "){", (function(){
4725 var value = symbol.value;
4726 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4728 })(), (function(v529){
4729 return l135.fvalue(pv, l231.fvalue(pv, v526, v529));
4730 })(l214.fvalue(pv, v521, l4.value)), "})(", l126.fvalue(pv, v525, ","), ")");
4737 })), cdr: (function(){
4739 var value = symbol.value;
4740 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4743 var l234 = {name: "LET*-INITIALIZE-VALUE"};
4745 (l234).fvalue = (function(v537){
4746 ((v537)["fname"] = "LET*-INITIALIZE-VALUE");
4748 })((function (values,v531){
4749 checkArgs(arguments, 2);
4751 return (function(v532,v533){
4752 return (l230.fvalue(pv, v532) !== l3.value ? l124.fvalue(values, l137.fvalue(pv, l62.fvalue(pv, l42.fvalue(pv, l217), l42.fvalue(pv, v532), l42.fvalue(pv, v533))), ";", (function(){
4754 var value = symbol.value;
4755 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4757 })()) : (function(){
4758 var v534 = l181.fvalue(pv, v532);
4759 var v535 = l164.fvalue(pv, v532, l99, v534);
4760 return (function(v536){
4761 l174.fvalue(pv, v535, (function(){
4763 var value = symbol.value;
4764 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4768 })(l124.fvalue(pv, "var ", v534, " = ", l137.fvalue(pv, v533), ";", (function(){
4770 var value = symbol.value;
4771 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4775 })(l38.fvalue(pv, v531),l39.fvalue(pv, v531));
4780 var l235 = {name: "LET*-BINDING-WRAPPER"};
4782 (l235).fvalue = (function(v546){
4783 ((v546)["fname"] = "LET*-BINDING-WRAPPER");
4785 })((function (values,v538,v539){
4786 checkArgs(arguments, 3);
4789 (l11.fvalue(pv, v538) !== l3.value ? (function(){
4790 throw ({type: 'block', id: 198, value: v539, message: 'Return from unknown block LET*-BINDING-WRAPPER.'})
4792 return (function(v541){
4793 return l124.fvalue(values, "try {", (function(){
4795 var value = symbol.value;
4796 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4798 })(), l135.fvalue(pv, l128.fvalue(pv, (function (values,v542){
4799 checkArgs(arguments, 2);
4800 return (function(v543){
4801 return l124.fvalue(values, "var ", (function(){
4803 return tmp === l3.value? l3.value: tmp.cdr;
4804 })(), " = ", v543, ".value;", (function(){
4806 var value = symbol.value;
4807 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4810 })(l137.fvalue(pv, l62.fvalue(pv, l42.fvalue(pv, l157), l42.fvalue(pv, (function(){
4812 return tmp === l3.value? l3.value: tmp.car;
4814 }), v541), v539), "}", (function(){
4816 var value = symbol.value;
4817 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4819 })(), "finally {", (function(){
4821 var value = symbol.value;
4822 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4824 })(), l135.fvalue(pv, l128.fvalue(pv, (function (values,v544){
4825 checkArgs(arguments, 2);
4826 return (function(v545){
4827 return l124.fvalue(values, v545, ".value", " = ", (function(){
4829 return tmp === l3.value? l3.value: tmp.cdr;
4830 })(), ";", (function(){
4832 var value = symbol.value;
4833 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4836 })(l137.fvalue(pv, l62.fvalue(pv, l42.fvalue(pv, l157), l42.fvalue(pv, (function(){
4838 return tmp === l3.value? l3.value: tmp.car;
4840 }), v541)), "}", (function(){
4842 var value = symbol.value;
4843 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4846 })(l69.fvalue(pv, (function (values,v540){
4847 checkArgs(arguments, 2);
4848 return ({car: v540, cdr: l181.fvalue(pv, v540)});
4849 }), l85.fvalue(pv, (function(){
4851 var func = symbol.fvalue;
4852 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4857 if (cf.type == 'block' && cf.id == 198)
4866 var l236 = {name: "LET*"};
4867 ((l198).value = ({car: l42.fvalue(pv, l236, (function (values,v548){
4868 checkArgsAtLeast(arguments, 2);
4870 for (var i = arguments.length-1; i>=2; i--)
4871 v547 = {car: arguments[i], cdr:
4874 return (function(v549,v550){
4880 return l124.fvalue(values, "(function(){", (function(){
4882 var value = symbol.value;
4883 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4885 })(), l135.fvalue(pv, (function(v551,v552){
4886 return l235.fvalue(pv, v551, v552);
4887 })(l85.fvalue(pv, (function(){
4889 var func = symbol.fvalue;
4890 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4892 })(), l69.fvalue(pv, (function(){
4894 var func = symbol.fvalue;
4895 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4897 })(), v549)),l124.fvalue(pv, l128.fvalue(pv, (function(){
4899 var func = symbol.fvalue;
4900 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4902 })(), v549), l214.fvalue(pv, v547, l4.value)))), "})()");
4907 })(l69.fvalue(pv, (function(){
4909 var func = symbol.fvalue;
4910 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4912 })(), v548),l173.fvalue(pv, (function(){
4914 var value = symbol.value;
4915 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4919 })), cdr: (function(){
4921 var value = symbol.value;
4922 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4925 var l237 = {name: "*BLOCK-COUNTER*"};
4927 (((l237.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l237).value = 0));
4930 var l238 = {name: "USED"};
4931 ((l198).value = ({car: l42.fvalue(pv, l175, (function (values,v554){
4932 checkArgsAtLeast(arguments, 2);
4934 for (var i = arguments.length-1; i>=2; i--)
4935 v553 = {car: arguments[i], cdr:
4940 var v558 = l179.value;
4941 var v555 = l16.fvalue(pv, ((l237).value = (function(){
4942 var x1 = (function(){
4944 var value = symbol.value;
4945 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4948 if (typeof x1 !== 'number') throw 'Not a number!';
4950 if (typeof x2 !== 'number') throw 'Not a number!';
4953 var v556 = l164.fvalue(pv, v554, l175, v555);
4954 ((l179).value = l177.fvalue(pv, l42.fvalue(pv, v556), (function(){
4956 var value = symbol.value;
4957 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4960 var v557 = l214.fvalue(pv, v553, l4.value);
4961 return (l82.fvalue(pv, l238, l168.fvalue(pv, v556)) !== l3.value ? l124.fvalue(values, "(function(){", (function(){
4963 var value = symbol.value;
4964 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4966 })(), l135.fvalue(pv, "try {", (function(){
4968 var value = symbol.value;
4969 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4971 })(), l135.fvalue(pv, v557), "}", (function(){
4973 var value = symbol.value;
4974 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4976 })(), "catch (cf){", (function(){
4978 var value = symbol.value;
4979 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4981 })(), " if (cf.type == 'block' && cf.id == ", v555, ")", (function(){
4983 var value = symbol.value;
4984 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4986 })(), " return cf.value;", (function(){
4988 var value = symbol.value;
4989 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4991 })(), " else", (function(){
4993 var value = symbol.value;
4994 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4996 })(), " throw cf;", (function(){
4998 var value = symbol.value;
4999 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5001 })(), "}", (function(){
5003 var value = symbol.value;
5004 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5006 })()), "})()") : l124.fvalue(values, "(function(){", (function(){
5008 var value = symbol.value;
5009 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5011 })(), l135.fvalue(pv, l135.fvalue(pv, v557)), "})()"));
5018 })), cdr: (function(){
5020 var value = symbol.value;
5021 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5024 var l239 = {name: "RETURN-FROM"};
5025 ((l198).value = ({car: l42.fvalue(pv, l239, (function (values,v559,v560){
5026 checkArgsAtLeast(arguments, 2);
5027 checkArgsAtMost(arguments, 3);
5028 switch(arguments.length-1){
5034 return (function(v561){
5035 (l11.fvalue(pv, v561) !== l3.value ? (function(){
5036 throw l124.fvalue(pv, "Unknown block `", (v559).name, "'.");
5038 l171.fvalue(pv, l238, v561);
5039 return l124.fvalue(values, "(function(){", (function(){
5041 var value = symbol.value;
5042 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5044 })(), l135.fvalue(pv, "throw ({", "type: 'block', ", "id: ", l167.fvalue(pv, v561), ", ", "value: ", l137.fvalue(pv, v560), ", ", "message: 'Return from unknown block ", (v559).name, ".'", "})"), "})()");
5045 })(l178.fvalue(pv, v559, (function(){
5047 var value = symbol.value;
5048 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5052 })), cdr: (function(){
5054 var value = symbol.value;
5055 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5058 var l240 = {name: "CATCH"};
5059 ((l198).value = ({car: l42.fvalue(pv, l240, (function (values,v563){
5060 checkArgsAtLeast(arguments, 2);
5062 for (var i = arguments.length-1; i>=2; i--)
5063 v562 = {car: arguments[i], cdr:
5066 return l124.fvalue(values, "(function(){", (function(){
5068 var value = symbol.value;
5069 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5071 })(), l135.fvalue(pv, "var id = ", l137.fvalue(pv, v563), ";", (function(){
5073 var value = symbol.value;
5074 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5076 })(), "try {", (function(){
5078 var value = symbol.value;
5079 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5081 })(), l135.fvalue(pv, "return ", l137.fvalue(pv, l62.fvalue(pv, l42.fvalue(pv, l228), v562)), ";", (function(){
5083 var value = symbol.value;
5084 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5086 })()), "}", (function(){
5088 var value = symbol.value;
5089 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5091 })(), "catch (cf){", (function(){
5093 var value = symbol.value;
5094 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5096 })(), " if (cf.type == 'catch' && cf.id == id)", (function(){
5098 var value = symbol.value;
5099 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5101 })(), " return cf.value;", (function(){
5103 var value = symbol.value;
5104 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5106 })(), " else", (function(){
5108 var value = symbol.value;
5109 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5111 })(), " throw cf;", (function(){
5113 var value = symbol.value;
5114 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5116 })(), "}", (function(){
5118 var value = symbol.value;
5119 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5123 })), cdr: (function(){
5125 var value = symbol.value;
5126 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5129 var l241 = {name: "THROW"};
5130 ((l198).value = ({car: l42.fvalue(pv, l241, (function (values,v564,v565){
5131 checkArgs(arguments, 3);
5133 return l124.fvalue(values, "(function(){", (function(){
5135 var value = symbol.value;
5136 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5138 })(), l135.fvalue(pv, "throw ({", "type: 'catch', ", "id: ", l137.fvalue(pv, v564), ", ", "value: ", l137.fvalue(pv, v565), ", ", "message: 'Throw uncatched.'", "})"), "})()");
5140 })), cdr: (function(){
5142 var value = symbol.value;
5143 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5146 var l242 = {name: "*TAGBODY-COUNTER*"};
5148 (((l242.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l242).value = 0));
5151 var l243 = {name: "*GO-TAG-COUNTER*"};
5153 (((l243.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l243).value = 0));
5156 var l244 = {name: "GO-TAG-P"};
5158 (l244).fvalue = (function(v568){
5159 ((v568)["fname"] = "GO-TAG-P");
5161 })((function (values,v566){
5162 checkArgs(arguments, 2);
5164 return (function(v567){
5165 return (v567 !== l3.value ? v567 : ((function(){
5167 return (typeof tmp == 'object' && 'name' in tmp);
5168 })()?l4.value: l3.value));
5169 })(l75.fvalue(pv, v566));
5174 var l245 = {name: "DECLARE-TAGBODY-TAGS"};
5176 (l245).fvalue = (function(v574){
5177 ((v574)["fname"] = "DECLARE-TAGBODY-TAGS");
5179 })((function (values,v569,v570){
5180 checkArgs(arguments, 3);
5182 return (function(v573){
5183 return l177.fvalue(values, v573, (function(){
5185 var value = symbol.value;
5186 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5189 })(l69.fvalue(pv, (function (values,v571){
5190 checkArgs(arguments, 2);
5191 return (function(v572){
5192 return l164.fvalue(values, v571, l176, l42.fvalue(pv, v569, v572));
5193 })(l16.fvalue(pv, ((l243).value = (function(){
5194 var x1 = (function(){
5196 var value = symbol.value;
5197 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5200 if (typeof x1 !== 'number') throw 'Not a number!';
5202 if (typeof x2 !== 'number') throw 'Not a number!';
5205 }), l85.fvalue(pv, (function(){
5207 var func = symbol.fvalue;
5208 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5215 var l246 = {name: "TAGBODY"};
5216 ((l198).value = ({car: l42.fvalue(pv, l246, (function (values){
5218 for (var i = arguments.length-1; i>=1; i--)
5219 v575 = {car: arguments[i], cdr:
5223 (l89.fvalue(pv, (function(){
5225 var func = symbol.fvalue;
5226 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5228 })(), v575) !== l3.value ? l3.value : (function(){
5229 throw ({type: 'block', id: 206, value: l137.fvalue(pv, l62.fvalue(pv, l42.fvalue(pv, l228), v575, l42.fvalue(pv, l3))), message: 'Return from unknown block TAGBODY.'})
5231 (l244.fvalue(pv, (function(){
5233 return tmp === l3.value? l3.value: tmp.car;
5234 })()) !== l3.value ? l3.value : (v575 = ({car: l15.fvalue(pv, "START"), cdr: v575})));
5235 return (function(v576){
5236 return (function(v578,v577){
5243 return (v577 = l39.fvalue(pv, l167.fvalue(pv, v579)));
5244 })(l178.fvalue(pv, l38.fvalue(pv, v575), (function(){
5246 var value = symbol.value;
5247 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5250 return l124.fvalue(values, "(function(){", (function(){
5252 var value = symbol.value;
5253 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5255 })(), l135.fvalue(pv, "var tagbody_", v576, " = ", v577, ";", (function(){
5257 var value = symbol.value;
5258 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5260 })(), "tbloop:", (function(){
5262 var value = symbol.value;
5263 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5265 })(), "while (true) {", (function(){
5267 var value = symbol.value;
5268 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5270 })(), l135.fvalue(pv, "try {", (function(){
5272 var value = symbol.value;
5273 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5275 })(), l135.fvalue(pv, (function(v580){
5276 return l124.fvalue(pv, "switch(tagbody_", v576, "){", (function(){
5278 var value = symbol.value;
5279 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5281 })(), "case ", v577, ":", (function(){
5283 var value = symbol.value;
5284 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5287 return (function(v581,v582){
5289 while(v581 !== l3.value){
5290 (v582 = (function(){
5292 return tmp === l3.value? l3.value: tmp.car;
5295 (v580 = l124.fvalue(pv, v580, (l26.fvalue(pv, l244.fvalue(pv, v582)) !== l3.value ? l135.fvalue(pv, l137.fvalue(pv, v582), ";", (function(){
5297 var value = symbol.value;
5298 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5300 })()) : (function(v583){
5301 return l124.fvalue(pv, "case ", l39.fvalue(pv, l167.fvalue(pv, v583)), ":", (function(){
5303 var value = symbol.value;
5304 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5307 })(l178.fvalue(pv, v582, (function(){
5309 var value = symbol.value;
5310 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5315 (v581 = (function(){
5317 return tmp === l3.value? l3.value: tmp.cdr;
5324 return tmp === l3.value? l3.value: tmp.cdr;
5326 })(), "default:", (function(){
5328 var value = symbol.value;
5329 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5331 })(), " break tbloop;", (function(){
5333 var value = symbol.value;
5334 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5336 })(), "}", (function(){
5338 var value = symbol.value;
5339 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5342 })("")), "}", (function(){
5344 var value = symbol.value;
5345 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5347 })(), "catch (jump) {", (function(){
5349 var value = symbol.value;
5350 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5352 })(), " if (jump.type == 'tagbody' && jump.id == ", v576, ")", (function(){
5354 var value = symbol.value;
5355 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5357 })(), " tagbody_", v576, " = jump.label;", (function(){
5359 var value = symbol.value;
5360 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5362 })(), " else", (function(){
5364 var value = symbol.value;
5365 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5367 })(), " throw(jump);", (function(){
5369 var value = symbol.value;
5370 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5372 })(), "}", (function(){
5374 var value = symbol.value;
5375 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5377 })()), "}", (function(){
5379 var value = symbol.value;
5380 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5382 })(), "return ", l137.fvalue(pv, l3.value), ";", (function(){
5384 var value = symbol.value;
5385 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5392 })(l245.fvalue(pv, v576, v575),l3.value);
5393 })(l16.fvalue(pv, (function(){
5395 var value = symbol.value;
5396 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5401 if (cf.type == 'block' && cf.id == 206)
5407 })), cdr: (function(){
5409 var value = symbol.value;
5410 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5413 var l247 = {name: "GO"};
5414 ((l198).value = ({car: l42.fvalue(pv, l247, (function (values,v584){
5415 checkArgs(arguments, 2);
5417 return (function(v585,v586){
5418 return (v585 !== l3.value ? l124.fvalue(values, "(function(){", (function(){
5420 var value = symbol.value;
5421 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5423 })(), l135.fvalue(pv, "throw ({", "type: 'tagbody', ", "id: ", l38.fvalue(pv, l167.fvalue(pv, v585)), ", ", "label: ", l39.fvalue(pv, l167.fvalue(pv, v585)), ", ", "message: 'Attempt to GO to non-existing tag ", v586, "'", "})", (function(){
5425 var value = symbol.value;
5426 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5428 })()), "})()") : (function(){
5429 throw l124.fvalue(pv, "Unknown tag `", v586, "'.");
5431 })(l178.fvalue(pv, v584, (function(){
5433 var value = symbol.value;
5434 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5436 })(), l176),(((function(){
5438 return (typeof tmp == 'object' && 'name' in tmp);
5439 })()?l4.value: l3.value) !== l3.value ? (v584).name : (l75.fvalue(pv, v584) !== l3.value ? l16.fvalue(pv, v584) : l3.value)));
5441 })), cdr: (function(){
5443 var value = symbol.value;
5444 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5447 var l248 = {name: "UNWIND-PROTECT"};
5448 ((l198).value = ({car: l42.fvalue(pv, l248, (function (values,v588){
5449 checkArgsAtLeast(arguments, 2);
5451 for (var i = arguments.length-1; i>=2; i--)
5452 v587 = {car: arguments[i], cdr:
5455 return l124.fvalue(values, "(function(){", (function(){
5457 var value = symbol.value;
5458 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5460 })(), l135.fvalue(pv, "var ret = ", l137.fvalue(pv, l3.value), ";", (function(){
5462 var value = symbol.value;
5463 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5465 })(), "try {", (function(){
5467 var value = symbol.value;
5468 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5470 })(), l135.fvalue(pv, "ret = ", l137.fvalue(pv, v588), ";", (function(){
5472 var value = symbol.value;
5473 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5475 })()), "} finally {", (function(){
5477 var value = symbol.value;
5478 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5480 })(), l135.fvalue(pv, l214.fvalue(pv, v587)), "}", (function(){
5482 var value = symbol.value;
5483 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5485 })(), "return ret;", (function(){
5487 var value = symbol.value;
5488 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5492 })), cdr: (function(){
5494 var value = symbol.value;
5495 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5498 var l249 = {name: "MULTIPLE-VALUE-CALL"};
5499 ((l198).value = ({car: l42.fvalue(pv, l249, (function (values,v590){
5500 checkArgsAtLeast(arguments, 2);
5502 for (var i = arguments.length-1; i>=2; i--)
5503 v589 = {car: arguments[i], cdr:
5506 return l124.fvalue(values, "(function(){", (function(){
5508 var value = symbol.value;
5509 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5511 })(), l135.fvalue(pv, "var func = ", l137.fvalue(pv, v590), ";", (function(){
5513 var value = symbol.value;
5514 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5516 })(), "var args = [", ((function(){
5518 var value = symbol.value;
5519 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5521 })() !== l3.value ? "values" : "pv"), "];", (function(){
5523 var value = symbol.value;
5524 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5526 })(), "return ", l124.fvalue(pv, "(function(){", (function(){
5528 var value = symbol.value;
5529 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5531 })(), l135.fvalue(pv, "var values = mv;", (function(){
5533 var value = symbol.value;
5534 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5536 })(), "var vs;", (function(){
5538 var value = symbol.value;
5539 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5541 })(), l128.fvalue(pv, (function (values,v591){
5542 checkArgs(arguments, 2);
5543 return l124.fvalue(values, "vs = ", l137.fvalue(pv, v591, l4.value), ";", (function(){
5545 var value = symbol.value;
5546 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5548 })(), "if (typeof vs === 'object' && 'multiple-value' in vs)", (function(){
5550 var value = symbol.value;
5551 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5553 })(), l135.fvalue(pv, "args = args.concat(vs);", (function(){
5555 var value = symbol.value;
5556 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5558 })()), "else", (function(){
5560 var value = symbol.value;
5561 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5563 })(), l135.fvalue(pv, "args.push(vs);", (function(){
5565 var value = symbol.value;
5566 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5569 }), v589), "return func.apply(window, args);", (function(){
5571 var value = symbol.value;
5572 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5574 })()), "})()"), ";", (function(){
5576 var value = symbol.value;
5577 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5581 })), cdr: (function(){
5583 var value = symbol.value;
5584 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5587 var l250 = {name: "MULTIPLE-VALUE-PROG1"};
5588 ((l198).value = ({car: l42.fvalue(pv, l250, (function (values,v593){
5589 checkArgsAtLeast(arguments, 2);
5591 for (var i = arguments.length-1; i>=2; i--)
5592 v592 = {car: arguments[i], cdr:
5595 return l124.fvalue(values, "(function(){", (function(){
5597 var value = symbol.value;
5598 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5600 })(), l135.fvalue(pv, "var args = ", l137.fvalue(pv, v593, (function(){
5602 var value = symbol.value;
5603 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5605 })()), ";", (function(){
5607 var value = symbol.value;
5608 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5610 })(), l214.fvalue(pv, v592), "return args;", (function(){
5612 var value = symbol.value;
5613 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5617 })), cdr: (function(){
5619 var value = symbol.value;
5620 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5623 var l251 = {name: "BACKQUOTE-EXPAND-1"};
5625 (l251).fvalue = (function(v596){
5626 ((v596)["fname"] = "BACKQUOTE-EXPAND-1");
5628 })((function (values,v594){
5629 checkArgs(arguments, 2);
5631 return (((function(){
5633 return (typeof tmp == 'object' && 'name' in tmp);
5634 })()?l4.value: l3.value) !== l3.value ? l42.fvalue(values, l157, v594) : (l43.fvalue(pv, v594) !== l3.value ? v594 : ((((function(){
5636 return tmp === l3.value? l3.value: tmp.car;
5637 })() === l160)?l4.value: l3.value) !== l3.value ? (function(){
5639 return tmp === l3.value? l3.value: tmp.car;
5640 })() : ((((function(){
5642 return tmp === l3.value? l3.value: tmp.car;
5643 })() === l158)?l4.value: l3.value) !== l3.value ? l251.fvalue(values, l251.fvalue(pv, l32.fvalue(pv, v594))) : ({car: l62, cdr: l69.fvalue(pv, (function (values,v595){
5644 checkArgs(arguments, 2);
5645 return ((l57.fvalue(pv, v595) !== l3.value ? (((function(){
5647 return tmp === l3.value? l3.value: tmp.car;
5648 })() === l160)?l4.value: l3.value) : l3.value) !== l3.value ? l42.fvalue(values, l42, l32.fvalue(pv, v595)) : ((l57.fvalue(pv, v595) !== l3.value ? (((function(){
5650 return tmp === l3.value? l3.value: tmp.car;
5651 })() === l159)?l4.value: l3.value) : l3.value) !== l3.value ? l32.fvalue(values, v595) : l42.fvalue(values, l42, l251.fvalue(pv, v595))));
5657 var l252 = {name: "BACKQUOTE-EXPAND"};
5659 (l252).fvalue = (function(v598){
5660 ((v598)["fname"] = "BACKQUOTE-EXPAND");
5662 })((function (values,v597){
5663 checkArgs(arguments, 2);
5665 return ((l57.fvalue(pv, v597) !== l3.value ? (((function(){
5667 return tmp === l3.value? l3.value: tmp.car;
5668 })() === l158)?l4.value: l3.value) : l3.value) !== l3.value ? l251.fvalue(values, l32.fvalue(pv, v597)) : v597);
5674 ((l198).value = ({car: l42.fvalue(pv, l158, (function (values,v599){
5675 checkArgs(arguments, 2);
5677 return l137.fvalue(values, l251.fvalue(pv, v599));
5679 })), cdr: (function(){
5681 var value = symbol.value;
5682 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5685 var l253 = {name: "*BUILTINS*"};
5687 (((l253.value !== undefined)?l4.value: l3.value) !== l3.value ? l3.value : ((l253).value = l3.value));
5690 var l254 = {name: "DEFINE-RAW-BUILTIN"};
5692 var l255 = {name: "DEFINE-BUILTIN"};
5694 var l256 = {name: "TYPE-CHECK"};
5696 var l257 = {name: "VARIABLE-ARITY-CALL"};
5698 (l257).fvalue = (function(v608){
5699 ((v608)["fname"] = "VARIABLE-ARITY-CALL");
5701 })((function (values,v600,v601){
5702 checkArgs(arguments, 3);
5706 return (typeof tmp == 'object' && 'car' in tmp);
5707 })()?l4.value: l3.value) !== l3.value ? l3.value : (function(){
5708 throw "ARGS must be a non-empty list";
5710 return (function(v602,v603,v604){
5712 return (function(v605,v606){
5714 while(v605 !== l3.value){
5715 (v606 = (function(){
5717 return tmp === l3.value? l3.value: tmp.car;
5721 (v603 = ({car: v607, cdr: v603}));
5722 return (v604 = l124.fvalue(pv, v604, l124.fvalue(pv, "var ", v607, " = ", l137.fvalue(pv, v606), ";", (function(){
5724 var value = symbol.value;
5725 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5727 })(), "if (typeof ", v607, " !== 'number') throw 'Not a number!';", (function(){
5729 var value = symbol.value;
5730 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5733 })(l124.fvalue(pv, "x", l16.fvalue(pv, (v602 = (function(){
5735 if (typeof x1 !== 'number') throw 'Not a number!';
5737 if (typeof x2 !== 'number') throw 'Not a number!';
5742 (v605 = (function(){
5744 return tmp === l3.value? l3.value: tmp.cdr;
5751 return l124.fvalue(values, "(function(){", (function(){
5753 var value = symbol.value;
5754 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5756 })(), l135.fvalue(pv, v604, (v601)(pv, l64.fvalue(pv, v603))), "})()");
5762 var l258 = {name: "VARIABLE-ARITY"};
5764 var l259 = {name: "NUM-OP-NUM"};
5766 (l259).fvalue = (function(v612){
5767 ((v612)["fname"] = "NUM-OP-NUM");
5769 })((function (values,v609,v610,v611){
5770 checkArgs(arguments, 4);
5772 return l124.fvalue(values, "(function(){", (function(){
5774 var value = symbol.value;
5775 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5777 })(), l135.fvalue(pv, l124.fvalue(pv, "var ", "x", " = ", v609, ";", (function(){
5779 var value = symbol.value;
5780 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5782 })()), l124.fvalue(pv, "var ", "y", " = ", v611, ";", (function(){
5784 var value = symbol.value;
5785 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5787 })()), l124.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
5789 var value = symbol.value;
5790 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5792 })(), l135.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
5794 var value = symbol.value;
5795 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5797 })())), l124.fvalue(pv, "if (typeof ", "y", " != '", "number", "')", (function(){
5799 var value = symbol.value;
5800 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5802 })(), l135.fvalue(pv, "throw 'The value ' + ", "y", " + ' is not a type ", "number", ".';", (function(){
5804 var value = symbol.value;
5805 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5807 })())), l124.fvalue(pv, "return ", l124.fvalue(pv, "x", v610, "y"), ";", (function(){
5809 var value = symbol.value;
5810 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5817 ((l253).value = ({car: l42.fvalue(pv, l59, (function (values){
5819 for (var i = arguments.length-1; i>=1; i--)
5820 v613 = {car: arguments[i], cdr:
5823 return (l11.fvalue(pv, v613) !== l3.value ? "0" : l257.fvalue(values, v613, (function (values,v614){
5824 checkArgs(arguments, 2);
5825 return l124.fvalue(values, "return ", l126.fvalue(pv, v614, "+"), ";", (function(){
5827 var value = symbol.value;
5828 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5833 })), cdr: (function(){
5835 var value = symbol.value;
5836 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5839 ((l253).value = ({car: l42.fvalue(pv, l60, (function (values,v616){
5840 checkArgsAtLeast(arguments, 2);
5842 for (var i = arguments.length-1; i>=2; i--)
5843 v615 = {car: arguments[i], cdr:
5846 return (function(v617){
5847 return l257.fvalue(values, v617, (function (values,v618){
5848 checkArgs(arguments, 2);
5849 return l124.fvalue(values, "return ", (l11.fvalue(pv, v615) !== l3.value ? l124.fvalue(pv, "-", (function(){
5851 return tmp === l3.value? l3.value: tmp.car;
5852 })()) : l126.fvalue(pv, v618, "-")), ";", (function(){
5854 var value = symbol.value;
5855 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5859 })(({car: v616, cdr: v615}));
5861 })), cdr: (function(){
5863 var value = symbol.value;
5864 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5867 ((l253).value = ({car: l42.fvalue(pv, l19, (function (values){
5869 for (var i = arguments.length-1; i>=1; i--)
5870 v619 = {car: arguments[i], cdr:
5873 return (l11.fvalue(pv, v619) !== l3.value ? "1" : l257.fvalue(values, v619, (function (values,v620){
5874 checkArgs(arguments, 2);
5875 return l124.fvalue(values, "return ", l126.fvalue(pv, v620, "*"), ";", (function(){
5877 var value = symbol.value;
5878 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5883 })), cdr: (function(){
5885 var value = symbol.value;
5886 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5889 ((l253).value = ({car: l42.fvalue(pv, l20, (function (values,v622){
5890 checkArgsAtLeast(arguments, 2);
5892 for (var i = arguments.length-1; i>=2; i--)
5893 v621 = {car: arguments[i], cdr:
5896 return (function(v623){
5897 return l257.fvalue(values, v623, (function (values,v624){
5898 checkArgs(arguments, 2);
5899 return l124.fvalue(values, "return ", (l11.fvalue(pv, v621) !== l3.value ? l124.fvalue(pv, "1 /", (function(){
5901 return tmp === l3.value? l3.value: tmp.car;
5902 })()) : l126.fvalue(pv, v624, "/")), ";", (function(){
5904 var value = symbol.value;
5905 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5909 })(({car: v622, cdr: v621}));
5911 })), cdr: (function(){
5913 var value = symbol.value;
5914 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5917 var l260 = {name: "MOD"};
5918 ((l253).value = ({car: l42.fvalue(pv, l260, (function (values,v625,v626){
5919 checkArgs(arguments, 3);
5921 return (function(v627,v628){
5922 return l259.fvalue(values, v627, "%", v628);
5923 })(l137.fvalue(pv, v625),l137.fvalue(pv, v626));
5925 })), cdr: (function(){
5927 var value = symbol.value;
5928 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5931 var l261 = {name: "COMPARISON-CONJUNTION"};
5933 (l261).fvalue = (function(v631){
5934 ((v631)["fname"] = "COMPARISON-CONJUNTION");
5936 })((function (values,v629,v630){
5937 checkArgs(arguments, 3);
5939 return (l11.fvalue(pv, (function(){
5941 return tmp === l3.value? l3.value: tmp.cdr;
5942 })()) !== l3.value ? "true" : (l11.fvalue(pv, l34.fvalue(pv, v629)) !== l3.value ? l124.fvalue(values, (function(){
5944 return tmp === l3.value? l3.value: tmp.car;
5945 })(), v630, l32.fvalue(pv, v629)) : l124.fvalue(values, (function(){
5947 return tmp === l3.value? l3.value: tmp.car;
5948 })(), v630, l32.fvalue(pv, v629), " && ", l261.fvalue(pv, (function(){
5950 return tmp === l3.value? l3.value: tmp.cdr;
5956 var l262 = {name: "DEFINE-BUILTIN-COMPARISON"};
5958 var l263 = {name: ">"};
5959 ((l253).value = ({car: l42.fvalue(pv, l263, (function (values,v633){
5960 checkArgsAtLeast(arguments, 2);
5962 for (var i = arguments.length-1; i>=2; i--)
5963 v632 = {car: arguments[i], cdr:
5966 return (function(v634){
5967 return l257.fvalue(values, v634, (function (values,v635){
5968 checkArgs(arguments, 2);
5969 return l124.fvalue(values, "return ", l136.fvalue(pv, l261.fvalue(pv, v635, ">")), ";", (function(){
5971 var value = symbol.value;
5972 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5976 })(({car: v633, cdr: v632}));
5978 })), cdr: (function(){
5980 var value = symbol.value;
5981 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5984 var l264 = {name: "<"};
5985 ((l253).value = ({car: l42.fvalue(pv, l264, (function (values,v637){
5986 checkArgsAtLeast(arguments, 2);
5988 for (var i = arguments.length-1; i>=2; i--)
5989 v636 = {car: arguments[i], cdr:
5992 return (function(v638){
5993 return l257.fvalue(values, v638, (function (values,v639){
5994 checkArgs(arguments, 2);
5995 return l124.fvalue(values, "return ", l136.fvalue(pv, l261.fvalue(pv, v639, "<")), ";", (function(){
5997 var value = symbol.value;
5998 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6002 })(({car: v637, cdr: v636}));
6004 })), cdr: (function(){
6006 var value = symbol.value;
6007 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6010 var l265 = {name: ">="};
6011 ((l253).value = ({car: l42.fvalue(pv, l265, (function (values,v641){
6012 checkArgsAtLeast(arguments, 2);
6014 for (var i = arguments.length-1; i>=2; i--)
6015 v640 = {car: arguments[i], cdr:
6018 return (function(v642){
6019 return l257.fvalue(values, v642, (function (values,v643){
6020 checkArgs(arguments, 2);
6021 return l124.fvalue(values, "return ", l136.fvalue(pv, l261.fvalue(pv, v643, ">=")), ";", (function(){
6023 var value = symbol.value;
6024 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6028 })(({car: v641, cdr: v640}));
6030 })), cdr: (function(){
6032 var value = symbol.value;
6033 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6036 var l266 = {name: "<="};
6037 ((l253).value = ({car: l42.fvalue(pv, l266, (function (values,v645){
6038 checkArgsAtLeast(arguments, 2);
6040 for (var i = arguments.length-1; i>=2; i--)
6041 v644 = {car: arguments[i], cdr:
6044 return (function(v646){
6045 return l257.fvalue(values, v646, (function (values,v647){
6046 checkArgs(arguments, 2);
6047 return l124.fvalue(values, "return ", l136.fvalue(pv, l261.fvalue(pv, v647, "<=")), ";", (function(){
6049 var value = symbol.value;
6050 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6054 })(({car: v645, cdr: v644}));
6056 })), cdr: (function(){
6058 var value = symbol.value;
6059 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6062 ((l253).value = ({car: l42.fvalue(pv, l18, (function (values,v649){
6063 checkArgsAtLeast(arguments, 2);
6065 for (var i = arguments.length-1; i>=2; i--)
6066 v648 = {car: arguments[i], cdr:
6069 return (function(v650){
6070 return l257.fvalue(values, v650, (function (values,v651){
6071 checkArgs(arguments, 2);
6072 return l124.fvalue(values, "return ", l136.fvalue(pv, l261.fvalue(pv, v651, "==")), ";", (function(){
6074 var value = symbol.value;
6075 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6079 })(({car: v649, cdr: v648}));
6081 })), cdr: (function(){
6083 var value = symbol.value;
6084 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6087 var l267 = {name: "NUMBERP"};
6088 ((l253).value = ({car: l42.fvalue(pv, l267, (function (values,v652){
6089 checkArgs(arguments, 2);
6091 return (function(v653){
6092 return l136.fvalue(values, l124.fvalue(pv, "(typeof (", v653, ") == \"number\")"));
6093 })(l137.fvalue(pv, v652));
6095 })), cdr: (function(){
6097 var value = symbol.value;
6098 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6101 var l268 = {name: "FLOOR"};
6102 ((l253).value = ({car: l42.fvalue(pv, l268, (function (values,v654){
6103 checkArgs(arguments, 2);
6105 return (function(v655){
6106 return l124.fvalue(values, "(function(){", (function(){
6108 var value = symbol.value;
6109 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6111 })(), l135.fvalue(pv, l124.fvalue(pv, "var ", "x", " = ", v655, ";", (function(){
6113 var value = symbol.value;
6114 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6116 })()), l124.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
6118 var value = symbol.value;
6119 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6121 })(), l135.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
6123 var value = symbol.value;
6124 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6126 })())), l124.fvalue(pv, "return ", "Math.floor(x)", ";", (function(){
6128 var value = symbol.value;
6129 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6132 })(l137.fvalue(pv, v654));
6134 })), cdr: (function(){
6136 var value = symbol.value;
6137 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6140 ((l253).value = ({car: l42.fvalue(pv, l27, (function (values,v656,v657){
6141 checkArgs(arguments, 3);
6143 return (function(v658,v659){
6144 return l124.fvalue(values, "({car: ", v658, ", cdr: ", v659, "})");
6145 })(l137.fvalue(pv, v656),l137.fvalue(pv, v657));
6147 })), cdr: (function(){
6149 var value = symbol.value;
6150 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6153 ((l253).value = ({car: l42.fvalue(pv, l28, (function (values,v660){
6154 checkArgs(arguments, 2);
6156 return (function(v661){
6157 return l136.fvalue(values, l124.fvalue(pv, "(function(){", (function(){
6159 var value = symbol.value;
6160 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6162 })(), l135.fvalue(pv, "var tmp = ", v661, ";", (function(){
6164 var value = symbol.value;
6165 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6167 })(), "return (typeof tmp == 'object' && 'car' in tmp);", (function(){
6169 var value = symbol.value;
6170 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6173 })(l137.fvalue(pv, v660));
6175 })), cdr: (function(){
6177 var value = symbol.value;
6178 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6181 ((l253).value = ({car: l42.fvalue(pv, l29, (function (values,v662){
6182 checkArgs(arguments, 2);
6184 return (function(v663){
6185 return l124.fvalue(values, "(function(){", (function(){
6187 var value = symbol.value;
6188 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6190 })(), l135.fvalue(pv, "var tmp = ", v663, ";", (function(){
6192 var value = symbol.value;
6193 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6195 })(), "return tmp === ", l137.fvalue(pv, l3.value), "? ", l137.fvalue(pv, l3.value), ": tmp.car;", (function(){
6197 var value = symbol.value;
6198 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6201 })(l137.fvalue(pv, v662));
6203 })), cdr: (function(){
6205 var value = symbol.value;
6206 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6209 ((l253).value = ({car: l42.fvalue(pv, l30, (function (values,v664){
6210 checkArgs(arguments, 2);
6212 return (function(v665){
6213 return l124.fvalue(values, "(function(){", (function(){
6215 var value = symbol.value;
6216 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6218 })(), l135.fvalue(pv, "var tmp = ", v665, ";", (function(){
6220 var value = symbol.value;
6221 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6223 })(), "return tmp === ", l137.fvalue(pv, l3.value), "? ", l137.fvalue(pv, l3.value), ": tmp.cdr;", (function(){
6225 var value = symbol.value;
6226 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6229 })(l137.fvalue(pv, v664));
6231 })), cdr: (function(){
6233 var value = symbol.value;
6234 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6237 var l269 = {name: "SETCAR"};
6238 ((l253).value = ({car: l42.fvalue(pv, l269, (function (values,v666,v667){
6239 checkArgs(arguments, 3);
6241 return (function(v668,v669){
6242 return l124.fvalue(values, "(function(){", (function(){
6244 var value = symbol.value;
6245 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6247 })(), l135.fvalue(pv, l124.fvalue(pv, "var ", "x", " = ", v668, ";", (function(){
6249 var value = symbol.value;
6250 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6252 })()), l124.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){
6254 var value = symbol.value;
6255 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6257 })(), l135.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
6259 var value = symbol.value;
6260 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6262 })())), l124.fvalue(pv, "return ", l124.fvalue(pv, "(x.car = ", v669, ")"), ";", (function(){
6264 var value = symbol.value;
6265 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6268 })(l137.fvalue(pv, v666),l137.fvalue(pv, v667));
6270 })), cdr: (function(){
6272 var value = symbol.value;
6273 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6276 var l270 = {name: "SETCDR"};
6277 ((l253).value = ({car: l42.fvalue(pv, l270, (function (values,v670,v671){
6278 checkArgs(arguments, 3);
6280 return (function(v672,v673){
6281 return l124.fvalue(values, "(function(){", (function(){
6283 var value = symbol.value;
6284 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6286 })(), l135.fvalue(pv, l124.fvalue(pv, "var ", "x", " = ", v672, ";", (function(){
6288 var value = symbol.value;
6289 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6291 })()), l124.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){
6293 var value = symbol.value;
6294 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6296 })(), l135.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
6298 var value = symbol.value;
6299 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6301 })())), l124.fvalue(pv, "return ", l124.fvalue(pv, "(x.cdr = ", v673, ")"), ";", (function(){
6303 var value = symbol.value;
6304 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6307 })(l137.fvalue(pv, v670),l137.fvalue(pv, v671));
6309 })), cdr: (function(){
6311 var value = symbol.value;
6312 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6315 var l271 = {name: "SYMBOLP"};
6316 ((l253).value = ({car: l42.fvalue(pv, l271, (function (values,v674){
6317 checkArgs(arguments, 2);
6319 return (function(v675){
6320 return l136.fvalue(values, l124.fvalue(pv, "(function(){", (function(){
6322 var value = symbol.value;
6323 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6325 })(), l135.fvalue(pv, "var tmp = ", v675, ";", (function(){
6327 var value = symbol.value;
6328 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6330 })(), "return (typeof tmp == 'object' && 'name' in tmp);", (function(){
6332 var value = symbol.value;
6333 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6336 })(l137.fvalue(pv, v674));
6338 })), cdr: (function(){
6340 var value = symbol.value;
6341 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6344 var l272 = {name: "MAKE-SYMBOL"};
6345 ((l253).value = ({car: l42.fvalue(pv, l272, (function (values,v676){
6346 checkArgs(arguments, 2);
6348 return (function(v677){
6349 return l124.fvalue(values, "(function(){", (function(){
6351 var value = symbol.value;
6352 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6354 })(), l135.fvalue(pv, l124.fvalue(pv, "var ", "name", " = ", v677, ";", (function(){
6356 var value = symbol.value;
6357 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6359 })()), l124.fvalue(pv, "if (typeof ", "name", " != '", "string", "')", (function(){
6361 var value = symbol.value;
6362 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6364 })(), l135.fvalue(pv, "throw 'The value ' + ", "name", " + ' is not a type ", "string", ".';", (function(){
6366 var value = symbol.value;
6367 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6369 })())), l124.fvalue(pv, "return ", "({name: name})", ";", (function(){
6371 var value = symbol.value;
6372 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6375 })(l137.fvalue(pv, v676));
6377 })), cdr: (function(){
6379 var value = symbol.value;
6380 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6383 var l273 = {name: "SYMBOL-NAME"};
6384 ((l253).value = ({car: l42.fvalue(pv, l273, (function (values,v678){
6385 checkArgs(arguments, 2);
6387 return (function(v679){
6388 return l124.fvalue(values, "(", v679, ").name");
6389 })(l137.fvalue(pv, v678));
6391 })), cdr: (function(){
6393 var value = symbol.value;
6394 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6397 ((l253).value = ({car: l42.fvalue(pv, l216, (function (values,v680,v681){
6398 checkArgs(arguments, 3);
6400 return (function(v682,v683){
6401 return l124.fvalue(values, "(", v682, ").value = ", v683);
6402 })(l137.fvalue(pv, v680),l137.fvalue(pv, v681));
6404 })), cdr: (function(){
6406 var value = symbol.value;
6407 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6410 var l274 = {name: "FSET"};
6411 ((l253).value = ({car: l42.fvalue(pv, l274, (function (values,v684,v685){
6412 checkArgs(arguments, 3);
6414 return (function(v686,v687){
6415 return l124.fvalue(values, "(", v686, ").fvalue = ", v687);
6416 })(l137.fvalue(pv, v684),l137.fvalue(pv, v685));
6418 })), cdr: (function(){
6420 var value = symbol.value;
6421 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6424 ((l253).value = ({car: l42.fvalue(pv, l17, (function (values,v688){
6425 checkArgs(arguments, 2);
6427 return (function(v689){
6428 return l136.fvalue(values, l124.fvalue(pv, "(", v689, ".value !== undefined)"));
6429 })(l137.fvalue(pv, v688));
6431 })), cdr: (function(){
6433 var value = symbol.value;
6434 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6437 var l275 = {name: "SYMBOL-VALUE"};
6438 ((l253).value = ({car: l42.fvalue(pv, l275, (function (values,v690){
6439 checkArgs(arguments, 2);
6441 return (function(v691){
6442 return l124.fvalue(values, "(function(){", (function(){
6444 var value = symbol.value;
6445 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6447 })(), l135.fvalue(pv, "var symbol = ", v691, ";", (function(){
6449 var value = symbol.value;
6450 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6452 })(), "var value = symbol.value;", (function(){
6454 var value = symbol.value;
6455 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6457 })(), "if (value === undefined) throw \"Variable `\" + symbol.name + \"' is unbound.\";", (function(){
6459 var value = symbol.value;
6460 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6462 })(), "return value;", (function(){
6464 var value = symbol.value;
6465 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6468 })(l137.fvalue(pv, v690));
6470 })), cdr: (function(){
6472 var value = symbol.value;
6473 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6476 ((l253).value = ({car: l42.fvalue(pv, l225, (function (values,v692){
6477 checkArgs(arguments, 2);
6479 return (function(v693){
6480 return l124.fvalue(values, "(function(){", (function(){
6482 var value = symbol.value;
6483 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6485 })(), l135.fvalue(pv, "var symbol = ", v693, ";", (function(){
6487 var value = symbol.value;
6488 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6490 })(), "var func = symbol.fvalue;", (function(){
6492 var value = symbol.value;
6493 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6495 })(), "if (func === undefined) throw \"Function `\" + symbol.name + \"' is undefined.\";", (function(){
6497 var value = symbol.value;
6498 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6500 })(), "return func;", (function(){
6502 var value = symbol.value;
6503 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6506 })(l137.fvalue(pv, v692));
6508 })), cdr: (function(){
6510 var value = symbol.value;
6511 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6514 var l276 = {name: "SYMBOL-PLIST"};
6515 ((l253).value = ({car: l42.fvalue(pv, l276, (function (values,v694){
6516 checkArgs(arguments, 2);
6518 return (function(v695){
6519 return l124.fvalue(values, "((", v695, ").plist || ", l137.fvalue(pv, l3.value), ")");
6520 })(l137.fvalue(pv, v694));
6522 })), cdr: (function(){
6524 var value = symbol.value;
6525 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6528 var l277 = {name: "LAMBDA-CODE"};
6529 ((l253).value = ({car: l42.fvalue(pv, l277, (function (values,v696){
6530 checkArgs(arguments, 2);
6532 return (function(v697){
6533 return l124.fvalue(values, "(", v697, ").toString()");
6534 })(l137.fvalue(pv, v696));
6536 })), cdr: (function(){
6538 var value = symbol.value;
6539 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6542 var l278 = {name: "EQ"};
6543 ((l253).value = ({car: l42.fvalue(pv, l278, (function (values,v698,v699){
6544 checkArgs(arguments, 3);
6546 return (function(v700,v701){
6547 return l136.fvalue(values, l124.fvalue(pv, "(", v700, " === ", v701, ")"));
6548 })(l137.fvalue(pv, v698),l137.fvalue(pv, v699));
6550 })), cdr: (function(){
6552 var value = symbol.value;
6553 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6556 var l279 = {name: "EQUAL"};
6557 ((l253).value = ({car: l42.fvalue(pv, l279, (function (values,v702,v703){
6558 checkArgs(arguments, 3);
6560 return (function(v704,v705){
6561 return l136.fvalue(values, l124.fvalue(pv, "(", v704, " == ", v705, ")"));
6562 })(l137.fvalue(pv, v702),l137.fvalue(pv, v703));
6564 })), cdr: (function(){
6566 var value = symbol.value;
6567 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6570 var l280 = {name: "CHAR-TO-STRING"};
6571 ((l253).value = ({car: l42.fvalue(pv, l280, (function (values,v706){
6572 checkArgs(arguments, 2);
6574 return (function(v707){
6575 return l124.fvalue(values, "(function(){", (function(){
6577 var value = symbol.value;
6578 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6580 })(), l135.fvalue(pv, l124.fvalue(pv, "var ", "x", " = ", v707, ";", (function(){
6582 var value = symbol.value;
6583 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6585 })()), l124.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
6587 var value = symbol.value;
6588 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6590 })(), l135.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
6592 var value = symbol.value;
6593 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6595 })())), l124.fvalue(pv, "return ", "String.fromCharCode(x)", ";", (function(){
6597 var value = symbol.value;
6598 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6601 })(l137.fvalue(pv, v706));
6603 })), cdr: (function(){
6605 var value = symbol.value;
6606 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6609 var l281 = {name: "STRINGP"};
6610 ((l253).value = ({car: l42.fvalue(pv, l281, (function (values,v708){
6611 checkArgs(arguments, 2);
6613 return (function(v709){
6614 return l136.fvalue(values, l124.fvalue(pv, "(typeof(", v709, ") == \"string\")"));
6615 })(l137.fvalue(pv, v708));
6617 })), cdr: (function(){
6619 var value = symbol.value;
6620 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6623 var l282 = {name: "STRING-UPCASE"};
6624 ((l253).value = ({car: l42.fvalue(pv, l282, (function (values,v710){
6625 checkArgs(arguments, 2);
6627 return (function(v711){
6628 return l124.fvalue(values, "(function(){", (function(){
6630 var value = symbol.value;
6631 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6633 })(), l135.fvalue(pv, l124.fvalue(pv, "var ", "x", " = ", v711, ";", (function(){
6635 var value = symbol.value;
6636 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6638 })()), l124.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
6640 var value = symbol.value;
6641 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6643 })(), l135.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
6645 var value = symbol.value;
6646 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6648 })())), l124.fvalue(pv, "return ", "x.toUpperCase()", ";", (function(){
6650 var value = symbol.value;
6651 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6654 })(l137.fvalue(pv, v710));
6656 })), cdr: (function(){
6658 var value = symbol.value;
6659 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6662 var l283 = {name: "STRING-LENGTH"};
6663 ((l253).value = ({car: l42.fvalue(pv, l283, (function (values,v712){
6664 checkArgs(arguments, 2);
6666 return (function(v713){
6667 return l124.fvalue(values, "(function(){", (function(){
6669 var value = symbol.value;
6670 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6672 })(), l135.fvalue(pv, l124.fvalue(pv, "var ", "x", " = ", v713, ";", (function(){
6674 var value = symbol.value;
6675 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6677 })()), l124.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
6679 var value = symbol.value;
6680 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6682 })(), l135.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
6684 var value = symbol.value;
6685 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6687 })())), l124.fvalue(pv, "return ", "x.length", ";", (function(){
6689 var value = symbol.value;
6690 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6693 })(l137.fvalue(pv, v712));
6695 })), cdr: (function(){
6697 var value = symbol.value;
6698 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6701 var l284 = {name: "SLICE"};
6702 ((l253).value = ({car: l42.fvalue(pv, l284, (function (values,v714,v715,v716){
6703 checkArgsAtLeast(arguments, 3);
6704 checkArgsAtMost(arguments, 4);
6705 switch(arguments.length-1){
6711 return l124.fvalue(values, "(function(){", (function(){
6713 var value = symbol.value;
6714 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6716 })(), l135.fvalue(pv, "var str = ", l137.fvalue(pv, v714), ";", (function(){
6718 var value = symbol.value;
6719 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6721 })(), "var a = ", l137.fvalue(pv, v715), ";", (function(){
6723 var value = symbol.value;
6724 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6726 })(), "var b;", (function(){
6728 var value = symbol.value;
6729 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6731 })(), (v716 !== l3.value ? l124.fvalue(pv, "b = ", l137.fvalue(pv, v716), ";", (function(){
6733 var value = symbol.value;
6734 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6736 })()) : ""), "return str.slice(a,b);", (function(){
6738 var value = symbol.value;
6739 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6743 })), cdr: (function(){
6745 var value = symbol.value;
6746 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6749 var l285 = {name: "CHAR"};
6750 ((l253).value = ({car: l42.fvalue(pv, l285, (function (values,v717,v718){
6751 checkArgs(arguments, 3);
6753 return (function(v719,v720){
6754 return l124.fvalue(values, "(function(){", (function(){
6756 var value = symbol.value;
6757 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6759 })(), l135.fvalue(pv, l124.fvalue(pv, "var ", "string", " = ", v719, ";", (function(){
6761 var value = symbol.value;
6762 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6764 })()), l124.fvalue(pv, "var ", "index", " = ", v720, ";", (function(){
6766 var value = symbol.value;
6767 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6769 })()), l124.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){
6771 var value = symbol.value;
6772 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6774 })(), l135.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
6776 var value = symbol.value;
6777 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6779 })())), l124.fvalue(pv, "if (typeof ", "index", " != '", "number", "')", (function(){
6781 var value = symbol.value;
6782 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6784 })(), l135.fvalue(pv, "throw 'The value ' + ", "index", " + ' is not a type ", "number", ".';", (function(){
6786 var value = symbol.value;
6787 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6789 })())), l124.fvalue(pv, "return ", "string.charCodeAt(index)", ";", (function(){
6791 var value = symbol.value;
6792 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6795 })(l137.fvalue(pv, v717),l137.fvalue(pv, v718));
6797 })), cdr: (function(){
6799 var value = symbol.value;
6800 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6803 ((l253).value = ({car: l42.fvalue(pv, l68, (function (values,v721,v722){
6804 checkArgs(arguments, 3);
6806 return (function(v723,v724){
6807 return l124.fvalue(values, "(function(){", (function(){
6809 var value = symbol.value;
6810 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6812 })(), l135.fvalue(pv, l124.fvalue(pv, "var ", "string1", " = ", v723, ";", (function(){
6814 var value = symbol.value;
6815 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6817 })()), l124.fvalue(pv, "var ", "string2", " = ", v724, ";", (function(){
6819 var value = symbol.value;
6820 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6822 })()), l124.fvalue(pv, "if (typeof ", "string1", " != '", "string", "')", (function(){
6824 var value = symbol.value;
6825 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6827 })(), l135.fvalue(pv, "throw 'The value ' + ", "string1", " + ' is not a type ", "string", ".';", (function(){
6829 var value = symbol.value;
6830 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6832 })())), l124.fvalue(pv, "if (typeof ", "string2", " != '", "string", "')", (function(){
6834 var value = symbol.value;
6835 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6837 })(), l135.fvalue(pv, "throw 'The value ' + ", "string2", " + ' is not a type ", "string", ".';", (function(){
6839 var value = symbol.value;
6840 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6842 })())), l124.fvalue(pv, "return ", "string1.concat(string2)", ";", (function(){
6844 var value = symbol.value;
6845 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6848 })(l137.fvalue(pv, v721),l137.fvalue(pv, v722));
6850 })), cdr: (function(){
6852 var value = symbol.value;
6853 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6856 var l286 = {name: "FUNCALL"};
6857 ((l253).value = ({car: l42.fvalue(pv, l286, (function (values,v726){
6858 checkArgsAtLeast(arguments, 2);
6860 for (var i = arguments.length-1; i>=2; i--)
6861 v725 = {car: arguments[i], cdr:
6864 return l124.fvalue(values, "(", l137.fvalue(pv, v726), ")(", l126.fvalue(pv, ({car: ((function(){
6866 var value = symbol.value;
6867 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6869 })() !== l3.value ? "values" : "pv"), cdr: l69.fvalue(pv, (function(){
6871 var func = symbol.fvalue;
6872 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6874 })(), v725)}), ", "), ")");
6876 })), cdr: (function(){
6878 var value = symbol.value;
6879 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6882 var l287 = {name: "APPLY"};
6883 ((l253).value = ({car: l42.fvalue(pv, l287, (function (values,v728){
6884 checkArgsAtLeast(arguments, 2);
6886 for (var i = arguments.length-1; i>=2; i--)
6887 v727 = {car: arguments[i], cdr:
6890 return (l11.fvalue(pv, v727) !== l3.value ? l124.fvalue(values, "(", l137.fvalue(pv, v728), ")()") : (function(v729,v730){
6891 return l124.fvalue(values, "(function(){", (function(){
6893 var value = symbol.value;
6894 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6896 })(), l135.fvalue(pv, "var f = ", l137.fvalue(pv, v728), ";", (function(){
6898 var value = symbol.value;
6899 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6901 })(), "var args = [", l126.fvalue(pv, ({car: ((function(){
6903 var value = symbol.value;
6904 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6906 })() !== l3.value ? "values" : "pv"), cdr: l69.fvalue(pv, (function(){
6908 var func = symbol.fvalue;
6909 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6911 })(), v729)}), ", "), "];", (function(){
6913 var value = symbol.value;
6914 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6916 })(), "var tail = (", l137.fvalue(pv, v730), ");", (function(){
6918 var value = symbol.value;
6919 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6921 })(), "while (tail != ", l137.fvalue(pv, l3.value), "){", (function(){
6923 var value = symbol.value;
6924 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6926 })(), " args.push(tail.car);", (function(){
6928 var value = symbol.value;
6929 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6931 })(), " tail = tail.cdr;", (function(){
6933 var value = symbol.value;
6934 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6936 })(), "}", (function(){
6938 var value = symbol.value;
6939 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6941 })(), "return f.apply(this, args);", (function(){
6943 var value = symbol.value;
6944 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6947 })(l81.fvalue(pv, v727),(function(){
6948 var tmp = l80.fvalue(pv, v727);
6949 return tmp === l3.value? l3.value: tmp.car;
6952 })), cdr: (function(){
6954 var value = symbol.value;
6955 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6958 var l288 = {name: "JS-EVAL"};
6959 ((l253).value = ({car: l42.fvalue(pv, l288, (function (values,v731){
6960 checkArgs(arguments, 2);
6962 return (function(v732){
6963 return l124.fvalue(values, "(function(){", (function(){
6965 var value = symbol.value;
6966 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6968 })(), l135.fvalue(pv, l124.fvalue(pv, "var ", "string", " = ", v732, ";", (function(){
6970 var value = symbol.value;
6971 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6973 })()), l124.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){
6975 var value = symbol.value;
6976 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6978 })(), l135.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
6980 var value = symbol.value;
6981 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6983 })())), l124.fvalue(pv, "return ", ((function(){
6985 var value = symbol.value;
6986 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6988 })() !== l3.value ? l124.fvalue(pv, "(function(){", (function(){
6990 var value = symbol.value;
6991 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6993 })(), l135.fvalue(pv, "var v = eval.apply(window, [string]);", (function(){
6995 var value = symbol.value;
6996 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6998 })(), "if (typeof v !== 'object' || !('multiple-value' in v)){", (function(){
7000 var value = symbol.value;
7001 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7003 })(), l135.fvalue(pv, "v = [v];", (function(){
7005 var value = symbol.value;
7006 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7008 })(), "v['multiple-value'] = true;", (function(){
7010 var value = symbol.value;
7011 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7013 })()), "}", (function(){
7015 var value = symbol.value;
7016 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7018 })(), "return values.apply(this, v);", (function(){
7020 var value = symbol.value;
7021 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7023 })()), "})()") : "eval.apply(window, [string])"), ";", (function(){
7025 var value = symbol.value;
7026 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7029 })(l137.fvalue(pv, v731));
7031 })), cdr: (function(){
7033 var value = symbol.value;
7034 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7037 var l289 = {name: "ERROR"};
7038 ((l253).value = ({car: l42.fvalue(pv, l289, (function (values,v733){
7039 checkArgs(arguments, 2);
7041 return (function(v734){
7042 return l124.fvalue(values, "(function(){", (function(){
7044 var value = symbol.value;
7045 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7047 })(), l135.fvalue(pv, "throw ", v734, ";", (function(){
7049 var value = symbol.value;
7050 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7053 })(l137.fvalue(pv, v733));
7055 })), cdr: (function(){
7057 var value = symbol.value;
7058 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7061 var l290 = {name: "NEW"};
7062 ((l253).value = ({car: l42.fvalue(pv, l290, (function (values){
7063 checkArgsAtMost(arguments, 1);
7069 })), cdr: (function(){
7071 var value = symbol.value;
7072 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7075 var l291 = {name: "OBJECTP"};
7076 ((l253).value = ({car: l42.fvalue(pv, l291, (function (values,v735){
7077 checkArgs(arguments, 2);
7079 return (function(v736){
7080 return l136.fvalue(values, l124.fvalue(pv, "(typeof (", v736, ") === 'object')"));
7081 })(l137.fvalue(pv, v735));
7083 })), cdr: (function(){
7085 var value = symbol.value;
7086 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7089 var l292 = {name: "OGET"};
7090 ((l253).value = ({car: l42.fvalue(pv, l292, (function (values,v737,v738){
7091 checkArgs(arguments, 3);
7093 return (function(v739,v740){
7094 return l124.fvalue(values, "(function(){", (function(){
7096 var value = symbol.value;
7097 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7099 })(), l135.fvalue(pv, "var tmp = ", "(", v739, ")[", v740, "];", (function(){
7101 var value = symbol.value;
7102 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7104 })(), "return tmp == undefined? ", l137.fvalue(pv, l3.value), ": tmp ;", (function(){
7106 var value = symbol.value;
7107 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7110 })(l137.fvalue(pv, v737),l137.fvalue(pv, v738));
7112 })), cdr: (function(){
7114 var value = symbol.value;
7115 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7118 var l293 = {name: "OSET"};
7119 ((l253).value = ({car: l42.fvalue(pv, l293, (function (values,v741,v742,v743){
7120 checkArgs(arguments, 4);
7122 return (function(v744,v745,v746){
7123 return l124.fvalue(values, "((", v744, ")[", v745, "] = ", v746, ")");
7124 })(l137.fvalue(pv, v741),l137.fvalue(pv, v742),l137.fvalue(pv, v743));
7126 })), cdr: (function(){
7128 var value = symbol.value;
7129 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7132 var l294 = {name: "IN"};
7133 ((l253).value = ({car: l42.fvalue(pv, l294, (function (values,v747,v748){
7134 checkArgs(arguments, 3);
7136 return (function(v749,v750){
7137 return l136.fvalue(values, l124.fvalue(pv, "((", v749, ") in (", v750, "))"));
7138 })(l137.fvalue(pv, v747),l137.fvalue(pv, v748));
7140 })), cdr: (function(){
7142 var value = symbol.value;
7143 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7146 var l295 = {name: "FUNCTIONP"};
7147 ((l253).value = ({car: l42.fvalue(pv, l295, (function (values,v751){
7148 checkArgs(arguments, 2);
7150 return (function(v752){
7151 return l136.fvalue(values, l124.fvalue(pv, "(typeof ", v752, " == 'function')"));
7152 })(l137.fvalue(pv, v751));
7154 })), cdr: (function(){
7156 var value = symbol.value;
7157 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7160 var l296 = {name: "WRITE-STRING"};
7161 ((l253).value = ({car: l42.fvalue(pv, l296, (function (values,v753){
7162 checkArgs(arguments, 2);
7164 return (function(v754){
7165 return l124.fvalue(values, "(function(){", (function(){
7167 var value = symbol.value;
7168 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7170 })(), l135.fvalue(pv, l124.fvalue(pv, "var ", "x", " = ", v754, ";", (function(){
7172 var value = symbol.value;
7173 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7175 })()), l124.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
7177 var value = symbol.value;
7178 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7180 })(), l135.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
7182 var value = symbol.value;
7183 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7185 })())), l124.fvalue(pv, "return ", "lisp.write(x)", ";", (function(){
7187 var value = symbol.value;
7188 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7191 })(l137.fvalue(pv, v753));
7193 })), cdr: (function(){
7195 var value = symbol.value;
7196 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7199 var l297 = {name: "MAKE-ARRAY"};
7200 ((l253).value = ({car: l42.fvalue(pv, l297, (function (values,v755){
7201 checkArgs(arguments, 2);
7203 return (function(v756){
7204 return l124.fvalue(values, "(function(){", (function(){
7206 var value = symbol.value;
7207 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7209 })(), l135.fvalue(pv, "var r = [];", (function(){
7211 var value = symbol.value;
7212 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7214 })(), "for (var i = 0; i < ", v756, "; i++)", (function(){
7216 var value = symbol.value;
7217 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7219 })(), l135.fvalue(pv, "r.push(", l137.fvalue(pv, l3.value), ");", (function(){
7221 var value = symbol.value;
7222 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7224 })()), "return r;", (function(){
7226 var value = symbol.value;
7227 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7230 })(l137.fvalue(pv, v755));
7232 })), cdr: (function(){
7234 var value = symbol.value;
7235 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7238 var l298 = {name: "ARRAYP"};
7239 ((l253).value = ({car: l42.fvalue(pv, l298, (function (values,v757){
7240 checkArgs(arguments, 2);
7242 return (function(v758){
7243 return l136.fvalue(values, l124.fvalue(pv, "(function(){", (function(){
7245 var value = symbol.value;
7246 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7248 })(), l135.fvalue(pv, "var x = ", v758, ";", (function(){
7250 var value = symbol.value;
7251 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7253 })(), "return typeof x === 'object' && 'length' in x;"), "})()"));
7254 })(l137.fvalue(pv, v757));
7256 })), cdr: (function(){
7258 var value = symbol.value;
7259 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7262 var l299 = {name: "AREF"};
7263 ((l253).value = ({car: l42.fvalue(pv, l299, (function (values,v759,v760){
7264 checkArgs(arguments, 3);
7266 return (function(v761,v762){
7267 return l124.fvalue(values, "(function(){", (function(){
7269 var value = symbol.value;
7270 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7272 })(), l135.fvalue(pv, "var x = ", "(", v761, ")[", v762, "];", (function(){
7274 var value = symbol.value;
7275 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7277 })(), "if (x === undefined) throw 'Out of range';", (function(){
7279 var value = symbol.value;
7280 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7282 })(), "return x;", (function(){
7284 var value = symbol.value;
7285 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7288 })(l137.fvalue(pv, v759),l137.fvalue(pv, v760));
7290 })), cdr: (function(){
7292 var value = symbol.value;
7293 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7296 var l300 = {name: "ASET"};
7297 ((l253).value = ({car: l42.fvalue(pv, l300, (function (values,v763,v764,v765){
7298 checkArgs(arguments, 4);
7300 return (function(v766,v767,v768){
7301 return l124.fvalue(values, "(function(){", (function(){
7303 var value = symbol.value;
7304 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7306 })(), l135.fvalue(pv, "var x = ", v766, ";", (function(){
7308 var value = symbol.value;
7309 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7311 })(), "var i = ", v767, ";", (function(){
7313 var value = symbol.value;
7314 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7316 })(), "if (i < 0 || i >= x.length) throw 'Out of range';", (function(){
7318 var value = symbol.value;
7319 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7321 })(), "return x[i] = ", v768, ";", (function(){
7323 var value = symbol.value;
7324 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7327 })(l137.fvalue(pv, v763),l137.fvalue(pv, v764),l137.fvalue(pv, v765));
7329 })), cdr: (function(){
7331 var value = symbol.value;
7332 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7335 var l301 = {name: "GET-UNIX-TIME"};
7336 ((l253).value = ({car: l42.fvalue(pv, l301, (function (values){
7337 checkArgsAtMost(arguments, 1);
7340 return l124.fvalue(values, "(Math.round(new Date() / 1000))");
7343 })), cdr: (function(){
7345 var value = symbol.value;
7346 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7349 var l302 = {name: "VALUES-ARRAY"};
7350 ((l253).value = ({car: l42.fvalue(pv, l302, (function (values,v769){
7351 checkArgs(arguments, 2);
7353 return (function(v770){
7354 return ((function(){
7356 var value = symbol.value;
7357 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7359 })() !== l3.value ? l124.fvalue(values, "values.apply(this, ", v770, ")") : l124.fvalue(values, "pv.apply(this, ", v770, ")"));
7360 })(l137.fvalue(pv, v769));
7362 })), cdr: (function(){
7364 var value = symbol.value;
7365 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7368 ((l253).value = ({car: l42.fvalue(pv, l132, (function (values){
7370 for (var i = arguments.length-1; i>=1; i--)
7371 v771 = {car: arguments[i], cdr:
7374 return ((function(){
7376 var value = symbol.value;
7377 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7379 })() !== l3.value ? l124.fvalue(values, "values(", l126.fvalue(pv, l69.fvalue(pv, (function(){
7381 var func = symbol.fvalue;
7382 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7384 })(), v771), ", "), ")") : l124.fvalue(values, "pv(", l126.fvalue(pv, l69.fvalue(pv, (function(){
7386 var func = symbol.fvalue;
7387 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7389 })(), v771), ", "), ")"));
7391 })), cdr: (function(){
7393 var value = symbol.value;
7394 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7398 (l190).fvalue = (function(v774){
7399 ((v774)["fname"] = "MACRO");
7401 })((function (values,v772){
7402 checkArgs(arguments, 2);
7404 return (((function(){
7406 return (typeof tmp == 'object' && 'name' in tmp);
7407 })()?l4.value: l3.value) !== l3.value ? (function(v773){
7408 return (((l166.fvalue(pv, v773) === l190)?l4.value: l3.value) !== l3.value ? v773 : l3.value);
7409 })(l178.fvalue(pv, v772, (function(){
7411 var value = symbol.value;
7412 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7414 })(), l98)) : l3.value);
7419 var l303 = {name: "LS-MACROEXPAND-1"};
7421 (l303).fvalue = (function(v779){
7422 ((v779)["fname"] = "LS-MACROEXPAND-1");
7424 })((function (values,v775){
7425 checkArgs(arguments, 2);
7427 return (function(v776){
7428 return (v776 !== l3.value ? (function(v777){
7429 (l57.fvalue(pv, v777) !== l3.value ? (function(v778){
7430 l169.fvalue(pv, v776, v778);
7431 return (v777 = v778);
7432 })(l227.fvalue(pv, v777)) : l3.value);
7435 var args = [values];
7436 var tail = ((function(){
7438 return tmp === l3.value? l3.value: tmp.cdr;
7440 while (tail != l3.value){
7441 args.push(tail.car);
7444 return f.apply(this, args);
7446 })(l167.fvalue(pv, v776)) : v775);
7447 })(l190.fvalue(pv, (function(){
7449 return tmp === l3.value? l3.value: tmp.car;
7455 var l304 = {name: "COMPILE-FUNCALL"};
7456 var l305 = {name: "G764"};
7458 (l304).fvalue = (function(v783){
7459 ((v783)["fname"] = "COMPILE-FUNCALL");
7461 })((function (values,v780,v781){
7462 checkArgs(arguments, 3);
7464 return (function(v782){
7465 return ((((function(){
7467 return (typeof tmp == 'object' && 'name' in tmp);
7468 })()?l4.value: l3.value) !== l3.value ? (((l114.fvalue(pv, v780) === l105.fvalue(pv, "COMMON-LISP"))?l4.value: l3.value) !== l3.value ? (function(){
7470 var value = symbol.value;
7471 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7473 })() : l3.value) : l3.value) !== l3.value ? l124.fvalue(values, l137.fvalue(pv, l62.fvalue(pv, l42.fvalue(pv, l157), l42.fvalue(pv, v780))), ".fvalue(", l126.fvalue(pv, ({car: v782, cdr: l69.fvalue(pv, (function(){
7475 var func = symbol.fvalue;
7476 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7478 })(), v781)}), ", "), ")") : l124.fvalue(values, l137.fvalue(pv, l62.fvalue(pv, l42.fvalue(pv, l98), l42.fvalue(pv, v780))), "(", l126.fvalue(pv, ({car: v782, cdr: l69.fvalue(pv, (function(){
7480 var func = symbol.fvalue;
7481 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7483 })(), v781)}), ", "), ")"));
7486 var value = symbol.value;
7487 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7489 })() !== l3.value ? "values" : "pv"));
7495 (l214).fvalue = (function(v786){
7496 ((v786)["fname"] = "LS-COMPILE-BLOCK");
7498 })((function (values,v784,v785){
7499 checkArgsAtLeast(arguments, 2);
7500 checkArgsAtMost(arguments, 3);
7501 switch(arguments.length-1){
7507 return (v785 !== l3.value ? l124.fvalue(values, l214.fvalue(pv, l81.fvalue(pv, v784)), "return ", l137.fvalue(pv, (function(){
7508 var tmp = l80.fvalue(pv, v784);
7509 return tmp === l3.value? l3.value: tmp.car;
7512 var value = symbol.value;
7513 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7515 })()), ";") : l127.fvalue(values, l84.fvalue(pv, (function(){
7517 var func = symbol.fvalue;
7518 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7520 })(), l69.fvalue(pv, (function(){
7522 var func = symbol.fvalue;
7523 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7525 })(), v784)), l124.fvalue(pv, ";", (function(){
7527 var value = symbol.value;
7528 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7536 (l137).fvalue = (function(v796){
7537 ((v796)["fname"] = "LS-COMPILE");
7539 })((function (values,v787,v788){
7540 checkArgsAtLeast(arguments, 2);
7541 checkArgsAtMost(arguments, 3);
7542 switch(arguments.length-1){
7548 return (function(v789){
7554 return (((function(){
7556 return (typeof tmp == 'object' && 'name' in tmp);
7557 })()?l4.value: l3.value) !== l3.value ? (function(v790){
7558 return ((v790 !== l3.value ? l26.fvalue(pv, l82.fvalue(pv, l194, l168.fvalue(pv, v790))) : l3.value) !== l3.value ? l167.fvalue(values, v790) : ((function(v791){
7559 return (v791 !== l3.value ? v791 : l82.fvalue(pv, l196, l168.fvalue(pv, v790)));
7560 })(l113.fvalue(pv, v787)) !== l3.value ? l124.fvalue(values, l137.fvalue(pv, l62.fvalue(pv, l42.fvalue(pv, l157), l42.fvalue(pv, v787))), ".value") : l137.fvalue(values, l62.fvalue(pv, l42.fvalue(pv, l275), l42.fvalue(pv, l62.fvalue(pv, l42.fvalue(pv, l157), l42.fvalue(pv, v787)))))));
7561 })(l178.fvalue(pv, v787, (function(){
7563 var value = symbol.value;
7564 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7566 })(), l99)) : (l75.fvalue(pv, v787) !== l3.value ? l16.fvalue(values, v787) : (((typeof(v787) == "string")?l4.value: l3.value) !== l3.value ? l124.fvalue(values, "\"", l140.fvalue(pv, v787), "\"") : (((function(){
7568 return typeof x === 'object' && 'length' in x;
7569 })()?l4.value: l3.value) !== l3.value ? l223.fvalue(values, v787) : (l57.fvalue(pv, v787) !== l3.value ? (function(v792,v793){
7570 return (l91.fvalue(pv, v792, (function(){
7572 var value = symbol.value;
7573 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7575 })()) !== l3.value ? (function(v794){
7578 var args = [values];
7580 while (tail != l3.value){
7581 args.push(tail.car);
7584 return f.apply(this, args);
7586 })(l39.fvalue(pv, l91.fvalue(pv, v792, (function(){
7588 var value = symbol.value;
7589 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7591 })()))) : ((l91.fvalue(pv, v792, (function(){
7593 var value = symbol.value;
7594 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7596 })()) !== l3.value ? l26.fvalue(pv, l192.fvalue(pv, v792, l98, l195)) : l3.value) !== l3.value ? (function(v795){
7599 var args = [values];
7601 while (tail != l3.value){
7602 args.push(tail.car);
7605 return f.apply(this, args);
7607 })(l39.fvalue(pv, l91.fvalue(pv, v792, (function(){
7609 var value = symbol.value;
7610 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7612 })()))) : (l190.fvalue(pv, v792) !== l3.value ? l137.fvalue(values, l303.fvalue(pv, v787), v788) : l304.fvalue(values, v792, v793))));
7615 return tmp === l3.value? l3.value: tmp.car;
7618 return tmp === l3.value? l3.value: tmp.cdr;
7619 })()) : (function(){
7620 throw "How should I compile this?";
7631 var l306 = {name: "LS-COMPILE-TOPLEVEL"};
7633 (l306).fvalue = (function(v803){
7634 ((v803)["fname"] = "LS-COMPILE-TOPLEVEL");
7636 })((function (values,v797,v798){
7637 checkArgsAtLeast(arguments, 2);
7638 checkArgsAtMost(arguments, 3);
7639 switch(arguments.length-1){
7645 return (function(v799){
7651 return ((((function(){
7653 return (typeof tmp == 'object' && 'car' in tmp);
7654 })()?l4.value: l3.value) !== l3.value ? (((function(){
7656 return tmp === l3.value? l3.value: tmp.car;
7657 })() === l228)?l4.value: l3.value) : l3.value) !== l3.value ? (function(v801){
7658 return l126.fvalue(values, l84.fvalue(pv, (function(){
7660 var func = symbol.fvalue;
7661 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7664 })(l69.fvalue(pv, (function (values,v800){
7665 checkArgs(arguments, 2);
7666 return l306.fvalue(values, v800, l4.value);
7669 return tmp === l3.value? l3.value: tmp.cdr;
7670 })())) : (function(v802){
7671 return l124.fvalue(values, l127.fvalue(pv, l188.fvalue(pv), l124.fvalue(pv, ";", (function(){
7673 var value = symbol.value;
7674 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7676 })())), (v802 !== l3.value ? l124.fvalue(pv, v802, ";", (function(){
7678 var value = symbol.value;
7679 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7682 })(l137.fvalue(pv, v797, v798)));
7693 (l227).fvalue = (function(v805){
7694 ((v805)["fname"] = "EVAL");
7696 })((function (values,v804){
7697 checkArgs(arguments, 2);
7700 var string = l306.fvalue(pv, v804, l4.value);
7701 if (typeof string != 'string')
7702 throw 'The value ' + string + ' is not a type string.';
7704 var v = eval.apply(window, [string]);
7705 if (typeof v !== 'object' || !('multiple-value' in v)){
7707 v['multiple-value'] = true;
7709 return values.apply(this, v);
7716 var l307 = {name: "&BODY"};
7717 var l308 = {car: l203, cdr: {car: l202, cdr: {car: l307, cdr: {car: l19, cdr: {car: l14, cdr: {car: l115, cdr: {car: l59, cdr: {car: l60, cdr: {car: l20, cdr: {car: l21, cdr: {car: l22, cdr: {car: l264, cdr: {car: l266, cdr: {car: l18, cdr: {car: l18, cdr: {car: l263, cdr: {car: l265, cdr: {car: l52, cdr: {car: l62, cdr: {car: l287, cdr: {car: l299, cdr: {car: l298, cdr: {car: l300, cdr: {car: l91, cdr: {car: l43, cdr: {car: l175, cdr: {car: l17, cdr: {car: l17, cdr: {car: l81, cdr: {car: l31, cdr: {car: l37, cdr: {car: l35, cdr: {car: l32, cdr: {car: l29, cdr: {car: l29, cdr: {car: l50, cdr: {car: l240, cdr: {car: l33, cdr: {car: l36, cdr: {car: l34, cdr: {car: l30, cdr: {car: l30, cdr: {car: l285, cdr: {car: l73, cdr: {car: l74, cdr: {car: l72, cdr: {car: l49, cdr: {car: l27, cdr: {car: l28, cdr: {car: l71, cdr: {car: l45, cdr: {car: l2, cdr: {car: l8, cdr: {car: l10, cdr: {car: l1, cdr: {car: l7, cdr: {car: l86, cdr: {car: l95, cdr: {car: l97, cdr: {car: l47, cdr: {car: l48, cdr: {car: l51, cdr: {car: l278, cdr: {car: l25, cdr: {car: l279, cdr: {car: l289, cdr: {car: l227, cdr: {car: l90, cdr: {car: l121, cdr: {car: l94, cdr: {car: l105, cdr: {car: l119, cdr: {car: l38, cdr: {car: l41, cdr: {car: l274, cdr: {car: l286, cdr: {car: l98, cdr: {car: l295, cdr: {car: l15, cdr: {car: l122, cdr: {car: l247, cdr: {car: l70, cdr: {car: l200, cdr: {car: l116, cdr: {car: l44, cdr: {car: l75, cdr: {car: l75, cdr: {car: l120, cdr: {car: l113, cdr: {car: l213, cdr: {car: l80, cdr: {car: l67, cdr: {car: l232, cdr: {car: l236, cdr: {car: l101, cdr: {car: l42, cdr: {car: l57, cdr: {car: l297, cdr: {car: l102, cdr: {car: l272, cdr: {car: l69, cdr: {car: l82, cdr: {car: l77, cdr: {car: l260, cdr: {car: l133, cdr: {car: l249, cdr: {car: l134, cdr: {car: l250, cdr: {car: l3, cdr: {car: l26, cdr: {car: l79, cdr: {car: l78, cdr: {car: l11, cdr: {car: l267, cdr: {car: l53, cdr: {car: l106, cdr: {car: l108, cdr: {car: l104, cdr: {car: l76, cdr: {car: l139, cdr: {car: l142, cdr: {car: l197, cdr: {car: l54, cdr: {car: l55, cdr: {car: l228, cdr: {car: l65, cdr: {car: l46, cdr: {car: l157, cdr: {car: l83, cdr: {car: l84, cdr: {car: l85, cdr: {car: l12, cdr: {car: l239, cdr: {car: l63, cdr: {car: l64, cdr: {car: l39, cdr: {car: l216, cdr: {car: l217, cdr: {car: l89, cdr: {car: l282, cdr: {car: l92, cdr: {car: l93, cdr: {car: l281, cdr: {car: l87, cdr: {car: l225, cdr: {car: l273, cdr: {car: l114, cdr: {car: l276, cdr: {car: l275, cdr: {car: l271, cdr: {car: l4, cdr: {car: l246, cdr: {car: l40, cdr: {car: l241, cdr: {car: l24, cdr: {car: l6, cdr: {car: l248, cdr: {car: l132, cdr: {car: l131, cdr: {car: l99, cdr: {car: l141, cdr: {car: l5, cdr: {car: l96, cdr: {car: l296, cdr: {car: l23, cdr: l3}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}};
7718 l121.fvalue(values, l308);
7719 ((l115).value = (function(){
7721 var value = symbol.value;
7722 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7726 var string = "var lisp";
7727 if (typeof string != 'string')
7728 throw 'The value ' + string + ' is not a type string.';
7730 var v = eval.apply(window, [string]);
7731 if (typeof v !== 'object' || !('multiple-value' in v)){
7733 v['multiple-value'] = true;
7735 return values.apply(this, v);
7739 (lisp.read = (function(){
7741 var func = symbol.fvalue;
7742 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7745 (lisp.print = (function(){
7747 var func = symbol.fvalue;
7748 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7751 (lisp.eval = (function(){
7753 var func = symbol.fvalue;
7754 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7757 (lisp.compile = (function (values,v806){
7758 checkArgs(arguments, 2);
7759 return l306.fvalue(values, v806, l4.value);
7761 (lisp.evalString = (function (values,v807){
7762 checkArgs(arguments, 2);
7763 return l227.fvalue(values, l161.fvalue(pv, v807));
7765 (lisp.compileString = (function (values,v808){
7766 checkArgs(arguments, 2);
7767 return l306.fvalue(values, l161.fvalue(pv, v808), l4.value);
7769 var l309 = {car: {car: l307, cdr: "l307"}, cdr: {car: {car: l306, cdr: "l306"}, cdr: {car: {car: l305, cdr: "l305"}, cdr: {car: {car: l304, cdr: "l304"}, cdr: {car: {car: l303, cdr: "l303"}, cdr: {car: {car: l302, cdr: "l302"}, cdr: {car: {car: l301, cdr: "l301"}, cdr: {car: {car: l300, cdr: "l300"}, cdr: {car: {car: l299, cdr: "l299"}, cdr: {car: {car: l298, cdr: "l298"}, cdr: {car: {car: l297, cdr: "l297"}, cdr: {car: {car: l296, cdr: "l296"}, cdr: {car: {car: l295, cdr: "l295"}, cdr: {car: {car: l294, cdr: "l294"}, cdr: {car: {car: l293, cdr: "l293"}, cdr: {car: {car: l292, cdr: "l292"}, cdr: {car: {car: l291, cdr: "l291"}, cdr: {car: {car: l290, cdr: "l290"}, cdr: {car: {car: l289, cdr: "l289"}, cdr: {car: {car: l288, cdr: "l288"}, cdr: {car: {car: l287, cdr: "l287"}, cdr: {car: {car: l286, cdr: "l286"}, cdr: {car: {car: l285, cdr: "l285"}, cdr: {car: {car: l284, cdr: "l284"}, cdr: {car: {car: l283, cdr: "l283"}, cdr: {car: {car: l282, cdr: "l282"}, cdr: {car: {car: l281, cdr: "l281"}, cdr: {car: {car: l280, cdr: "l280"}, cdr: {car: {car: l279, cdr: "l279"}, cdr: {car: {car: l278, cdr: "l278"}, cdr: {car: {car: l277, cdr: "l277"}, cdr: {car: {car: l276, cdr: "l276"}, cdr: {car: {car: l275, cdr: "l275"}, cdr: {car: {car: l274, cdr: "l274"}, cdr: {car: {car: l273, cdr: "l273"}, cdr: {car: {car: l272, cdr: "l272"}, cdr: {car: {car: l271, cdr: "l271"}, cdr: {car: {car: l270, cdr: "l270"}, cdr: {car: {car: l269, cdr: "l269"}, cdr: {car: {car: l268, cdr: "l268"}, cdr: {car: {car: l267, cdr: "l267"}, cdr: {car: {car: l266, cdr: "l266"}, cdr: {car: {car: l265, cdr: "l265"}, cdr: {car: {car: l264, cdr: "l264"}, cdr: {car: {car: l263, cdr: "l263"}, cdr: {car: {car: l262, cdr: "l262"}, cdr: {car: {car: l261, cdr: "l261"}, cdr: {car: {car: l260, cdr: "l260"}, cdr: {car: {car: l259, cdr: "l259"}, cdr: {car: {car: l258, cdr: "l258"}, cdr: {car: {car: l257, cdr: "l257"}, cdr: {car: {car: l256, cdr: "l256"}, cdr: {car: {car: l255, cdr: "l255"}, cdr: {car: {car: l254, cdr: "l254"}, cdr: {car: {car: l253, cdr: "l253"}, cdr: {car: {car: l252, cdr: "l252"}, cdr: {car: {car: l251, cdr: "l251"}, cdr: {car: {car: l250, cdr: "l250"}, cdr: {car: {car: l249, cdr: "l249"}, cdr: {car: {car: l248, cdr: "l248"}, cdr: {car: {car: l247, cdr: "l247"}, cdr: {car: {car: l246, cdr: "l246"}, cdr: {car: {car: l245, cdr: "l245"}, cdr: {car: {car: l244, cdr: "l244"}, cdr: {car: {car: l243, cdr: "l243"}, cdr: {car: {car: l242, cdr: "l242"}, cdr: {car: {car: l241, cdr: "l241"}, cdr: {car: {car: l240, cdr: "l240"}, cdr: {car: {car: l239, cdr: "l239"}, cdr: {car: {car: l238, cdr: "l238"}, cdr: {car: {car: l237, cdr: "l237"}, cdr: {car: {car: l236, cdr: "l236"}, cdr: {car: {car: l235, cdr: "l235"}, cdr: {car: {car: l234, cdr: "l234"}, cdr: {car: {car: l233, cdr: "l233"}, cdr: {car: {car: l232, cdr: "l232"}, cdr: {car: {car: l231, cdr: "l231"}, cdr: {car: {car: l230, cdr: "l230"}, cdr: {car: {car: l229, cdr: "l229"}, cdr: {car: {car: l228, cdr: "l228"}, cdr: {car: {car: l227, cdr: "l227"}, cdr: {car: {car: l226, cdr: "l226"}, cdr: {car: {car: l225, cdr: "l225"}, cdr: {car: {car: l224, cdr: "l224"}, cdr: {car: {car: l223, cdr: "l223"}, cdr: {car: {car: l222, cdr: "l222"}, cdr: {car: {car: l221, cdr: "l221"}, cdr: {car: {car: l220, cdr: "l220"}, cdr: {car: {car: l219, cdr: "l219"}, cdr: {car: {car: l218, cdr: "l218"}, cdr: {car: {car: l217, cdr: "l217"}, cdr: {car: {car: l216, cdr: "l216"}, cdr: {car: {car: l215, cdr: "l215"}, cdr: {car: {car: l214, cdr: "l214"}, cdr: {car: {car: l213, cdr: "l213"}, cdr: {car: {car: l212, cdr: "l212"}, cdr: {car: {car: l211, cdr: "l211"}, cdr: {car: {car: l210, cdr: "l210"}, cdr: {car: {car: l209, cdr: "l209"}, cdr: {car: {car: l208, cdr: "l208"}, cdr: {car: {car: l207, cdr: "l207"}, cdr: {car: {car: l206, cdr: "l206"}, cdr: {car: {car: l205, cdr: "l205"}, cdr: {car: {car: l203, cdr: "l203"}, cdr: {car: {car: l202, cdr: "l202"}, cdr: {car: {car: l201, cdr: "l201"}, cdr: {car: {car: l200, cdr: "l200"}, cdr: {car: {car: l199, cdr: "l199"}, cdr: {car: {car: l198, cdr: "l198"}, cdr: {car: {car: l197, cdr: "l197"}, cdr: {car: {car: l196, cdr: "l196"}, cdr: {car: {car: l195, cdr: "l195"}, cdr: {car: {car: l194, cdr: "l194"}, cdr: {car: {car: l193, cdr: "l193"}, cdr: {car: {car: l192, cdr: "l192"}, cdr: {car: {car: l191, cdr: "l191"}, cdr: {car: {car: l190, cdr: "l190"}, cdr: {car: {car: l189, cdr: "l189"}, cdr: {car: {car: l188, cdr: "l188"}, cdr: {car: {car: l187, cdr: "l187"}, cdr: {car: {car: l186, cdr: "l186"}, cdr: {car: {car: l185, cdr: "l185"}, cdr: {car: {car: l184, cdr: "l184"}, cdr: {car: {car: l183, cdr: "l183"}, cdr: {car: {car: l182, cdr: "l182"}, cdr: {car: {car: l181, cdr: "l181"}, cdr: {car: {car: l180, cdr: "l180"}, cdr: {car: {car: l179, cdr: "l179"}, cdr: {car: {car: l178, cdr: "l178"}, cdr: {car: {car: l177, cdr: "l177"}, cdr: {car: {car: l176, cdr: "l176"}, cdr: {car: {car: l175, cdr: "l175"}, cdr: {car: {car: l174, cdr: "l174"}, cdr: {car: {car: l173, cdr: "l173"}, cdr: {car: {car: l172, cdr: "l172"}, cdr: {car: {car: l171, cdr: "l171"}, cdr: {car: {car: l170, cdr: "l170"}, cdr: {car: {car: l169, cdr: "l169"}, cdr: {car: {car: l168, cdr: "l168"}, cdr: {car: {car: l167, cdr: "l167"}, cdr: {car: {car: l166, cdr: "l166"}, cdr: {car: {car: l165, cdr: "l165"}, cdr: {car: {car: l164, cdr: "l164"}, cdr: {car: {car: l163, cdr: "l163"}, cdr: {car: {car: l162, cdr: "l162"}, cdr: {car: {car: l161, cdr: "l161"}, cdr: {car: {car: l160, cdr: "l160"}, cdr: {car: {car: l159, cdr: "l159"}, cdr: {car: {car: l158, cdr: "l158"}, cdr: {car: {car: l157, cdr: "l157"}, cdr: {car: {car: l156, cdr: "l156"}, cdr: {car: {car: l155, cdr: "l155"}, cdr: {car: {car: l154, cdr: "l154"}, cdr: {car: {car: l153, cdr: "l153"}, cdr: {car: {car: l152, cdr: "l152"}, cdr: {car: {car: l151, cdr: "l151"}, cdr: {car: {car: l150, cdr: "l150"}, cdr: {car: {car: l149, cdr: "l149"}, cdr: {car: {car: l148, cdr: "l148"}, cdr: {car: {car: l147, cdr: "l147"}, cdr: {car: {car: l146, cdr: "l146"}, cdr: {car: {car: l145, cdr: "l145"}, cdr: {car: {car: l144, cdr: "l144"}, cdr: {car: {car: l143, cdr: "l143"}, cdr: {car: {car: l142, cdr: "l142"}, cdr: {car: {car: l141, cdr: "l141"}, cdr: {car: {car: l140, cdr: "l140"}, cdr: {car: {car: l139, cdr: "l139"}, cdr: {car: {car: l138, cdr: "l138"}, cdr: {car: {car: l137, cdr: "l137"}, cdr: {car: {car: l136, cdr: "l136"}, cdr: {car: {car: l135, cdr: "l135"}, cdr: {car: {car: l134, cdr: "l134"}, cdr: {car: {car: l133, cdr: "l133"}, cdr: {car: {car: l132, cdr: "l132"}, cdr: {car: {car: l131, cdr: "l131"}, cdr: {car: {car: l130, cdr: "l130"}, cdr: {car: {car: l129, cdr: "l129"}, cdr: {car: {car: l128, cdr: "l128"}, cdr: {car: {car: l127, cdr: "l127"}, cdr: {car: {car: l126, cdr: "l126"}, cdr: {car: {car: l125, cdr: "l125"}, cdr: {car: {car: l124, cdr: "l124"}, cdr: {car: {car: l123, cdr: "l123"}, cdr: {car: {car: l122, cdr: "l122"}, cdr: {car: {car: l121, cdr: "l121"}, cdr: {car: {car: l120, cdr: "l120"}, cdr: {car: {car: l119, cdr: "l119"}, cdr: {car: {car: l118, cdr: "l118"}, cdr: {car: {car: l117, cdr: "l117"}, cdr: {car: {car: l116, cdr: "l116"}, cdr: {car: {car: l115, cdr: "l115"}, cdr: {car: {car: l114, cdr: "l114"}, cdr: {car: {car: l113, cdr: "l113"}, cdr: {car: {car: l112, cdr: "l112"}, cdr: {car: {car: l111, cdr: "l111"}, cdr: {car: {car: l110, cdr: "l110"}, cdr: {car: {car: l109, cdr: "l109"}, cdr: {car: {car: l108, cdr: "l108"}, cdr: {car: {car: l107, cdr: "l107"}, cdr: {car: {car: l106, cdr: "l106"}, cdr: {car: {car: l105, cdr: "l105"}, cdr: {car: {car: l104, cdr: "l104"}, cdr: {car: {car: l103, cdr: "l103"}, cdr: {car: {car: l102, cdr: "l102"}, cdr: {car: {car: l101, cdr: "l101"}, cdr: {car: {car: l100, cdr: "l100"}, cdr: {car: {car: l99, cdr: "l99"}, cdr: {car: {car: l98, cdr: "l98"}, cdr: {car: {car: l97, cdr: "l97"}, cdr: {car: {car: l96, cdr: "l96"}, cdr: {car: {car: l95, cdr: "l95"}, cdr: {car: {car: l94, cdr: "l94"}, cdr: {car: {car: l93, cdr: "l93"}, cdr: {car: {car: l92, cdr: "l92"}, cdr: {car: {car: l91, cdr: "l91"}, cdr: {car: {car: l90, cdr: "l90"}, cdr: {car: {car: l89, cdr: "l89"}, cdr: {car: {car: l88, cdr: "l88"}, cdr: {car: {car: l87, cdr: "l87"}, cdr: {car: {car: l86, cdr: "l86"}, cdr: {car: {car: l85, cdr: "l85"}, cdr: {car: {car: l84, cdr: "l84"}, cdr: {car: {car: l83, cdr: "l83"}, cdr: {car: {car: l82, cdr: "l82"}, cdr: {car: {car: l81, cdr: "l81"}, cdr: {car: {car: l80, cdr: "l80"}, cdr: {car: {car: l79, cdr: "l79"}, cdr: {car: {car: l78, cdr: "l78"}, cdr: {car: {car: l77, cdr: "l77"}, cdr: {car: {car: l76, cdr: "l76"}, cdr: {car: {car: l75, cdr: "l75"}, cdr: {car: {car: l74, cdr: "l74"}, cdr: {car: {car: l73, cdr: "l73"}, cdr: {car: {car: l72, cdr: "l72"}, cdr: {car: {car: l71, cdr: "l71"}, cdr: {car: {car: l70, cdr: "l70"}, cdr: {car: {car: l69, cdr: "l69"}, cdr: {car: {car: l68, cdr: "l68"}, cdr: {car: {car: l67, cdr: "l67"}, cdr: {car: {car: l66, cdr: "l66"}, cdr: {car: {car: l65, cdr: "l65"}, cdr: {car: {car: l64, cdr: "l64"}, cdr: {car: {car: l63, cdr: "l63"}, cdr: {car: {car: l62, cdr: "l62"}, cdr: {car: {car: l61, cdr: "l61"}, cdr: {car: {car: l60, cdr: "l60"}, cdr: {car: {car: l59, cdr: "l59"}, cdr: {car: {car: l58, cdr: "l58"}, cdr: {car: {car: l57, cdr: "l57"}, cdr: {car: {car: l56, cdr: "l56"}, cdr: {car: {car: l55, cdr: "l55"}, cdr: {car: {car: l54, cdr: "l54"}, cdr: {car: {car: l53, cdr: "l53"}, cdr: {car: {car: l52, cdr: "l52"}, cdr: {car: {car: l51, cdr: "l51"}, cdr: {car: {car: l50, cdr: "l50"}, cdr: {car: {car: l49, cdr: "l49"}, cdr: {car: {car: l48, cdr: "l48"}, cdr: {car: {car: l47, cdr: "l47"}, cdr: {car: {car: l46, cdr: "l46"}, cdr: {car: {car: l45, cdr: "l45"}, cdr: {car: {car: l44, cdr: "l44"}, cdr: {car: {car: l43, cdr: "l43"}, cdr: {car: {car: l42, cdr: "l42"}, cdr: {car: {car: l41, cdr: "l41"}, cdr: {car: {car: l40, cdr: "l40"}, cdr: {car: {car: l39, cdr: "l39"}, cdr: {car: {car: l38, cdr: "l38"}, cdr: {car: {car: l37, cdr: "l37"}, cdr: {car: {car: l36, cdr: "l36"}, cdr: {car: {car: l35, cdr: "l35"}, cdr: {car: {car: l34, cdr: "l34"}, cdr: {car: {car: l33, cdr: "l33"}, cdr: {car: {car: l32, cdr: "l32"}, cdr: {car: {car: l31, cdr: "l31"}, cdr: {car: {car: l30, cdr: "l30"}, cdr: {car: {car: l29, cdr: "l29"}, cdr: {car: {car: l28, cdr: "l28"}, cdr: {car: {car: l27, cdr: "l27"}, cdr: {car: {car: l26, cdr: "l26"}, cdr: {car: {car: l25, cdr: "l25"}, cdr: {car: {car: l24, cdr: "l24"}, cdr: {car: {car: l23, cdr: "l23"}, cdr: {car: {car: l22, cdr: "l22"}, cdr: {car: {car: l21, cdr: "l21"}, cdr: {car: {car: l20, cdr: "l20"}, cdr: {car: {car: l19, cdr: "l19"}, cdr: {car: {car: l18, cdr: "l18"}, cdr: {car: {car: l17, cdr: "l17"}, cdr: {car: {car: l16, cdr: "l16"}, cdr: {car: {car: l15, cdr: "l15"}, cdr: {car: {car: l14, cdr: "l14"}, cdr: {car: {car: l13, cdr: "l13"}, cdr: {car: {car: l12, cdr: "l12"}, cdr: {car: {car: l11, cdr: "l11"}, cdr: {car: {car: l10, cdr: "l10"}, cdr: {car: {car: l9, cdr: "l9"}, cdr: {car: {car: l8, cdr: "l8"}, cdr: {car: {car: l7, cdr: "l7"}, cdr: {car: {car: l6, cdr: "l6"}, cdr: {car: {car: l5, cdr: "l5"}, cdr: {car: {car: l4, cdr: "l4"}, cdr: {car: {car: l3, cdr: "l3"}, cdr: {car: {car: l2, cdr: "l2"}, cdr: {car: {car: l1, cdr: "l1"}, cdr: l3}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}};
7770 var l310 = {name: "OP"};
7771 var l311 = {name: "SYM"};
7772 var l312 = {name: "X"};
7773 var l313 = {name: "ARGS"};
7774 var l314 = {name: "BODY"};
7775 var l315 = {name: "DECLS"};
7776 var l316 = {name: "DECL"};
7777 var l317 = {name: "NAME"};
7778 var l318 = {name: "ARG"};
7779 var l319 = {name: "FORM"};
7780 var l320 = {name: "VALUE-FROM"};
7781 var l321 = {name: "VARIABLES"};
7782 var l322 = {name: "PACKAGE-DESIGNATOR"};
7783 var l323 = {name: "PAIRS"};
7784 var l324 = {name: "ASSIGNMENTS"};
7785 var l325 = {name: "VALUE"};
7786 var l326 = {name: "FORM1"};
7787 var l327 = {name: "RESULT"};
7788 var l328 = {name: "FORMS"};
7789 var l329 = {name: "G"};
7790 var l330 = {name: "CLAUSULES"};
7791 var l331 = {name: "!FORM"};
7792 var l332 = {name: "CLAUSULE"};
7793 var l333 = {name: "ITER"};
7794 var l334 = {name: "G!TO"};
7795 var l335 = {name: "VAR"};
7796 var l336 = {name: "TO"};
7797 var l337 = {name: "G!LIST"};
7798 var l338 = {name: "PLACE"};
7799 var l339 = {name: "DELTA"};
7800 var l340 = {name: "CONDITION"};
7801 var l341 = {name: "DOCSTRING"};
7802 var l342 = {car: {car: {car: l253, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l243, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l242, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l237, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l221, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l220, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l201, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l198, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l185, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l180, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l179, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l163, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l162, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l156, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l123, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l115, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l112, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l111, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l110, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l100, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l14, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l194, cdr: l3}, cdr: l3}}}}, cdr: {car: {car: l4, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l194, cdr: {car: l196, cdr: l3}}, cdr: l3}}}}, cdr: {car: {car: l3, cdr: {car: l99, cdr: {car: l3, cdr: {car: {car: l194, cdr: {car: l196, cdr: l3}}, cdr: l3}}}}, cdr: l3}}}}}}}}}}}}}}}}}}}}}}}, cdr: {car: {car: {car: l262, cdr: {car: l190, cdr: {car: {car: l213, cdr: {car: {car: l310, cdr: {car: l311, cdr: l3}}, cdr: {car: {car: l158, cdr: {car: {car: l254, cdr: {car: {car: l160, cdr: {car: l310, cdr: l3}}, cdr: {car: {car: l312, cdr: {car: l203, cdr: {car: l313, cdr: l3}}}, cdr: {car: {car: l232, cdr: {car: {car: {car: l313, cdr: {car: {car: l27, cdr: {car: l312, cdr: {car: l313, cdr: l3}}}, cdr: l3}}, cdr: l3}, cdr: {car: {car: l258, cdr: {car: l313, cdr: {car: {car: l136, cdr: {car: {car: l261, cdr: {car: l313, cdr: {car: {car: l160, cdr: {car: l311, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l258, cdr: {car: l190, cdr: {car: {car: l213, cdr: {car: {car: l313, cdr: {car: l203, cdr: {car: l314, cdr: l3}}}, cdr: {car: {car: l6, cdr: {car: {car: l271, cdr: {car: l313, cdr: l3}}, cdr: {car: {car: l289, cdr: {car: "Bad usage of VARIABLE-ARITY, you must pass a symbol", cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l158, cdr: {car: {car: l257, cdr: {car: {car: l160, cdr: {car: l313, cdr: l3}}, cdr: {car: {car: l213, cdr: {car: {car: {car: l160, cdr: {car: l313, cdr: l3}}, cdr: l3}, cdr: {car: {car: l124, cdr: {car: "return ", cdr: {car: {car: l159, cdr: {car: l314, cdr: l3}}, cdr: {car: ";", cdr: {car: l123, cdr: l3}}}}}, cdr: l3}}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l256, cdr: {car: l190, cdr: {car: {car: l213, cdr: {car: {car: l315, cdr: {car: l203, cdr: {car: l314, cdr: l3}}}, cdr: {car: {car: l158, cdr: {car: {car: l138, cdr: {car: {car: l159, cdr: {car: {car: l69, cdr: {car: {car: l213, cdr: {car: {car: l316, cdr: l3}, cdr: {car: {car: l158, cdr: {car: {car: l124, cdr: {car: "var ", cdr: {car: {car: l160, cdr: {car: {car: l38, cdr: {car: l316, cdr: l3}}, cdr: l3}}, cdr: {car: " = ", cdr: {car: {car: l160, cdr: {car: {car: l40, cdr: {car: l316, cdr: l3}}, cdr: l3}}, cdr: {car: ";", cdr: {car: l123, cdr: l3}}}}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l315, cdr: l3}}}, cdr: l3}}, cdr: {car: {car: l159, cdr: {car: {car: l69, cdr: {car: {car: l213, cdr: {car: {car: l316, cdr: l3}, cdr: {car: {car: l158, cdr: {car: {car: l124, cdr: {car: "if (typeof ", cdr: {car: {car: l160, cdr: {car: {car: l38, cdr: {car: l316, cdr: l3}}, cdr: l3}}, cdr: {car: " != '", cdr: {car: {car: l160, cdr: {car: {car: l39, cdr: {car: l316, cdr: l3}}, cdr: l3}}, cdr: {car: "')", cdr: {car: l123, cdr: {car: {car: l135, cdr: {car: "throw 'The value ' + ", cdr: {car: {car: l160, cdr: {car: {car: l38, cdr: {car: l316, cdr: l3}}, cdr: l3}}, cdr: {car: " + ' is not a type ", cdr: {car: {car: l160, cdr: {car: {car: l39, cdr: {car: l316, cdr: l3}}, cdr: l3}}, cdr: {car: ".';", cdr: {car: l123, cdr: l3}}}}}}}, cdr: l3}}}}}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l315, cdr: l3}}}, cdr: l3}}, cdr: {car: {car: l124, cdr: {car: "return ", cdr: {car: {car: l228, cdr: {car: {car: l159, cdr: {car: l314, cdr: l3}}, cdr: l3}}, cdr: {car: ";", cdr: {car: l123, cdr: l3}}}}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l255, cdr: {car: l190, cdr: {car: {car: l213, cdr: {car: {car: l317, cdr: {car: l313, cdr: {car: l203, cdr: {car: l314, cdr: l3}}}}, cdr: {car: {car: l158, cdr: {car: {car: l228, cdr: {car: {car: l254, cdr: {car: {car: l160, cdr: {car: l317, cdr: l3}}, cdr: {car: {car: l160, cdr: {car: l313, cdr: l3}}, cdr: {car: {car: l232, cdr: {car: {car: l160, cdr: {car: {car: l69, cdr: {car: {car: l213, cdr: {car: {car: l318, cdr: l3}, cdr: {car: {car: l158, cdr: {car: {car: {car: l160, cdr: {car: l318, cdr: l3}}, cdr: {car: {car: l137, cdr: {car: {car: l160, cdr: {car: l318, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l313, cdr: l3}}}, cdr: l3}}, cdr: {car: {car: l159, cdr: {car: l314, cdr: l3}}, cdr: l3}}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l254, cdr: {car: l190, cdr: {car: {car: l213, cdr: {car: {car: l317, cdr: {car: l313, cdr: {car: l203, cdr: {car: l314, cdr: l3}}}}, cdr: {car: {car: l158, cdr: {car: {car: l46, cdr: {car: {car: l42, cdr: {car: {car: l157, cdr: {car: {car: l160, cdr: {car: l317, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l213, cdr: {car: {car: l160, cdr: {car: l313, cdr: l3}}, cdr: {car: {car: l175, cdr: {car: {car: l160, cdr: {car: l317, cdr: l3}}, cdr: {car: {car: l159, cdr: {car: l314, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: l3}}}, cdr: {car: l253, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l158, cdr: {car: l190, cdr: {car: {car: l213, cdr: {car: {car: l319, cdr: l3}, cdr: {car: {car: l251, cdr: {car: l319, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l229, cdr: {car: l190, cdr: {car: {car: l213, cdr: {car: {car: l317, cdr: {car: l313, cdr: {car: l319, cdr: l3}}}, cdr: {car: {car: l158, cdr: {car: {car: l199, cdr: {car: {car: l160, cdr: {car: l317, cdr: l3}}, cdr: {car: {car: l160, cdr: {car: l313, cdr: l3}}, cdr: {car: {car: l137, cdr: {car: {car: l160, cdr: {car: l319, cdr: l3}}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l199, cdr: {car: l190, cdr: {car: {car: l213, cdr: {car: {car: l317, cdr: {car: l313, cdr: {car: l203, cdr: {car: l314, cdr: l3}}}}, cdr: {car: {car: l158, cdr: {car: {car: l46, cdr: {car: {car: l42, cdr: {car: {car: l157, cdr: {car: {car: l160, cdr: {car: l317, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l213, cdr: {car: {car: l160, cdr: {car: l313, cdr: l3}}, cdr: {car: {car: l175, cdr: {car: {car: l160, cdr: {car: l317, cdr: l3}}, cdr: {car: {car: l159, cdr: {car: l314, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: l3}}}, cdr: {car: l198, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l138, cdr: {car: l190, cdr: {car: {car: l213, cdr: {car: {car: l203, cdr: {car: l314, cdr: l3}}, cdr: {car: {car: l158, cdr: {car: {car: l124, cdr: {car: "(function(){", cdr: {car: l123, cdr: {car: {car: l135, cdr: {car: {car: l159, cdr: {car: l314, cdr: l3}}, cdr: l3}}, cdr: {car: "})()", cdr: l3}}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l134, cdr: {car: l190, cdr: {car: {car: l213, cdr: {car: {car: l320, cdr: l3}, cdr: {car: {car: l158, cdr: {car: {car: l249, cdr: {car: {car: l98, cdr: {car: l42, cdr: l3}}, cdr: {car: {car: l160, cdr: {car: l320, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l133, cdr: {car: l190, cdr: {car: {car: l213, cdr: {car: {car: l321, cdr: {car: l320, cdr: {car: l203, cdr: {car: l314, cdr: l3}}}}, cdr: {car: {car: l158, cdr: {car: {car: l249, cdr: {car: {car: l213, cdr: {car: {car: l202, cdr: {car: {car: l159, cdr: {car: l321, cdr: l3}}, cdr: {car: l203, cdr: {car: {car: l160, cdr: {car: {car: l15, cdr: l3}, cdr: l3}}, cdr: l3}}}}, cdr: {car: {car: l159, cdr: {car: l314, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l160, cdr: {car: l320, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l125, cdr: {car: l190, cdr: {car: {car: l213, cdr: {car: {car: l99, cdr: {car: l203, cdr: {car: l319, cdr: l3}}}, cdr: {car: {car: l158, cdr: {car: {car: l217, cdr: {car: {car: l160, cdr: {car: l99, cdr: l3}}, cdr: {car: {car: l124, cdr: {car: {car: l160, cdr: {car: l99, cdr: l3}}, cdr: {car: {car: l228, cdr: {car: {car: l159, cdr: {car: l319, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l116, cdr: {car: l190, cdr: {car: {car: l213, cdr: {car: {car: l322, cdr: l3}, cdr: {car: {car: l158, cdr: {car: {car: l226, cdr: {car: {car: l217, cdr: {car: l115, cdr: {car: {car: l103, cdr: {car: {car: l160, cdr: {car: l322, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l65, cdr: {car: l190, cdr: {car: {car: l213, cdr: {car: {car: l203, cdr: {car: l323, cdr: l3}}, cdr: {car: {car: l232, cdr: {car: {car: {car: l324, cdr: {car: {car: l157, cdr: {car: l3, cdr: l3}}, cdr: l3}}, cdr: l3}, cdr: {car: {car: l13, cdr: {car: l4, cdr: {car: {car: l49, cdr: {car: {car: {car: l11, cdr: {car: l323, cdr: l3}}, cdr: {car: {car: l12, cdr: l3}, cdr: l3}}, cdr: {car: {car: {car: l11, cdr: {car: {car: l30, cdr: {car: l323, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l289, cdr: {car: "Odd paris in PSETQ", cdr: l3}}, cdr: l3}}, cdr: {car: {car: l4, cdr: {car: {car: l232, cdr: {car: {car: {car: l99, cdr: {car: {car: l29, cdr: {car: l323, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l325, cdr: {car: {car: l32, cdr: {car: l323, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l46, cdr: {car: {car: l158, cdr: {car: {car: {car: l160, cdr: {car: l99, cdr: l3}}, cdr: {car: {car: l160, cdr: {car: {car: l15, cdr: l3}, cdr: l3}}, cdr: {car: {car: l160, cdr: {car: l325, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: {car: l324, cdr: l3}}}, cdr: {car: {car: l217, cdr: {car: l323, cdr: {car: {car: l34, cdr: {car: l323, cdr: l3}}, cdr: l3}}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}}, cdr: {car: {car: l217, cdr: {car: l324, cdr: {car: {car: l64, cdr: {car: l324, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l158, cdr: {car: {car: l232, cdr: {car: {car: l160, cdr: {car: {car: l69, cdr: {car: {car: l98, cdr: {car: l30, cdr: l3}}, cdr: {car: l324, cdr: l3}}}, cdr: l3}}, cdr: {car: {car: l217, cdr: {car: {car: l159, cdr: {car: {car: l58, cdr: {car: {car: l98, cdr: {car: l62, cdr: l3}}, cdr: {car: {car: l69, cdr: {car: {car: l98, cdr: {car: l81, cdr: l3}}, cdr: {car: l324, cdr: l3}}}, cdr: {car: {car: l157, cdr: {car: l3, cdr: l3}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l55, cdr: {car: l190, cdr: {car: {car: l213, cdr: {car: {car: l326, cdr: {car: l327, cdr: {car: l203, cdr: {car: l314, cdr: l3}}}}, cdr: {car: {car: l158, cdr: {car: {car: l54, cdr: {car: {car: l228, cdr: {car: {car: l160, cdr: {car: l326, cdr: l3}}, cdr: {car: {car: l160, cdr: {car: l327, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l159, cdr: {car: l314, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l54, cdr: {car: l190, cdr: {car: {car: l213, cdr: {car: {car: l319, cdr: {car: l203, cdr: {car: l314, cdr: l3}}}, cdr: {car: {car: l232, cdr: {car: {car: {car: l325, cdr: {car: {car: l15, cdr: l3}, cdr: l3}}, cdr: l3}, cdr: {car: {car: l158, cdr: {car: {car: l232, cdr: {car: {car: {car: {car: l160, cdr: {car: l325, cdr: l3}}, cdr: {car: {car: l160, cdr: {car: l319, cdr: l3}}, cdr: l3}}, cdr: l3}, cdr: {car: {car: l159, cdr: {car: l314, cdr: l3}}, cdr: {car: {car: l160, cdr: {car: l325, cdr: l3}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l53, cdr: {car: l190, cdr: {car: {car: l213, cdr: {car: {car: l203, cdr: {car: l328, cdr: l3}}, cdr: {car: {car: l49, cdr: {car: {car: {car: l11, cdr: {car: l328, cdr: l3}}, cdr: {car: l3, cdr: l3}}, cdr: {car: {car: {car: l11, cdr: {car: {car: l30, cdr: {car: l328, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l29, cdr: {car: l328, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l4, cdr: {car: {car: l232, cdr: {car: {car: {car: l329, cdr: {car: {car: l15, cdr: l3}, cdr: l3}}, cdr: l3}, cdr: {car: {car: l158, cdr: {car: {car: l232, cdr: {car: {car: {car: {car: l160, cdr: {car: l329, cdr: l3}}, cdr: {car: {car: l160, cdr: {car: {car: l29, cdr: {car: l328, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}, cdr: {car: {car: l200, cdr: {car: {car: l160, cdr: {car: l329, cdr: l3}}, cdr: {car: {car: l160, cdr: {car: l329, cdr: l3}}, cdr: {car: {car: l53, cdr: {car: {car: l159, cdr: {car: {car: l30, cdr: {car: l328, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l52, cdr: {car: l190, cdr: {car: {car: l213, cdr: {car: {car: l203, cdr: {car: l328, cdr: l3}}, cdr: {car: {car: l49, cdr: {car: {car: {car: l11, cdr: {car: l328, cdr: l3}}, cdr: {car: l4, cdr: l3}}, cdr: {car: {car: {car: l11, cdr: {car: {car: l30, cdr: {car: l328, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l29, cdr: {car: l328, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l4, cdr: {car: {car: l158, cdr: {car: {car: l200, cdr: {car: {car: l160, cdr: {car: {car: l29, cdr: {car: l328, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l52, cdr: {car: {car: l159, cdr: {car: {car: l30, cdr: {car: l328, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: {car: l3, cdr: l3}}}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l51, cdr: {car: l190, cdr: {car: {car: l213, cdr: {car: {car: l319, cdr: {car: l203, cdr: {car: l330, cdr: l3}}}, cdr: {car: {car: l158, cdr: {car: {car: l50, cdr: {car: {car: l160, cdr: {car: l319, cdr: l3}}, cdr: {car: {car: l159, cdr: {car: {car: l62, cdr: {car: l330, cdr: {car: {car: l158, cdr: {car: {car: {car: l4, cdr: {car: {car: l289, cdr: {car: "ECASE expression failed.", cdr: l3}}, cdr: l3}}, cdr: l3}, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l50, cdr: {car: l190, cdr: {car: {car: l213, cdr: {car: {car: l319, cdr: {car: l203, cdr: {car: l330, cdr: l3}}}, cdr: {car: {car: l232, cdr: {car: {car: {car: l331, cdr: {car: {car: l15, cdr: l3}, cdr: l3}}, cdr: l3}, cdr: {car: {car: l158, cdr: {car: {car: l232, cdr: {car: {car: {car: {car: l160, cdr: {car: l331, cdr: l3}}, cdr: {car: {car: l160, cdr: {car: l319, cdr: l3}}, cdr: l3}}, cdr: l3}, cdr: {car: {car: l49, cdr: {car: {car: l159, cdr: {car: {car: l69, cdr: {car: {car: l213, cdr: {car: {car: l332, cdr: l3}, cdr: {car: {car: l200, cdr: {car: {car: l278, cdr: {car: {car: l29, cdr: {car: l332, cdr: l3}}, cdr: {car: l4, cdr: l3}}}, cdr: {car: l332, cdr: {car: {car: l158, cdr: {car: {car: {car: l25, cdr: {car: {car: l160, cdr: {car: l331, cdr: l3}}, cdr: {car: {car: l157, cdr: {car: {car: l160, cdr: {car: {car: l29, cdr: {car: l332, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l159, cdr: {car: {car: l30, cdr: {car: l332, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}}, cdr: {car: l330, cdr: l3}}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l49, cdr: {car: l190, cdr: {car: {car: l213, cdr: {car: {car: l203, cdr: {car: l330, cdr: l3}}, cdr: {car: {car: l200, cdr: {car: {car: l11, cdr: {car: l330, cdr: l3}}, cdr: {car: l3, cdr: {car: {car: l200, cdr: {car: {car: l278, cdr: {car: {car: l31, cdr: {car: l330, cdr: l3}}, cdr: {car: l4, cdr: l3}}}, cdr: {car: {car: l158, cdr: {car: {car: l228, cdr: {car: {car: l159, cdr: {car: {car: l33, cdr: {car: l330, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l158, cdr: {car: {car: l200, cdr: {car: {car: l160, cdr: {car: {car: l31, cdr: {car: l330, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l228, cdr: {car: {car: l159, cdr: {car: {car: l33, cdr: {car: l330, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l49, cdr: {car: {car: l159, cdr: {car: {car: l30, cdr: {car: l330, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l48, cdr: {car: l190, cdr: {car: {car: l213, cdr: {car: {car: l333, cdr: {car: l203, cdr: {car: l314, cdr: l3}}}, cdr: {car: {car: l232, cdr: {car: {car: {car: l334, cdr: {car: {car: l15, cdr: l3}, cdr: l3}}, cdr: {car: {car: l335, cdr: {car: {car: l38, cdr: {car: l333, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l336, cdr: {car: {car: l39, cdr: {car: l333, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l327, cdr: {car: {car: l40, cdr: {car: l333, cdr: l3}}, cdr: l3}}, cdr: l3}}}}, cdr: {car: {car: l158, cdr: {car: {car: l175, cdr: {car: l3, cdr: {car: {car: l232, cdr: {car: {car: {car: {car: l160, cdr: {car: l335, cdr: l3}}, cdr: {car: 0, cdr: l3}}, cdr: {car: {car: {car: l160, cdr: {car: l334, cdr: l3}}, cdr: {car: {car: l160, cdr: {car: l336, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l224, cdr: {car: {car: l264, cdr: {car: {car: l160, cdr: {car: l335, cdr: l3}}, cdr: {car: {car: l160, cdr: {car: l334, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l246, cdr: {car: {car: l159, cdr: {car: l314, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l44, cdr: {car: {car: l160, cdr: {car: l335, cdr: l3}}, cdr: l3}}, cdr: l3}}}}, cdr: {car: {car: l160, cdr: {car: l327, cdr: l3}}, cdr: l3}}}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l47, cdr: {car: l190, cdr: {car: {car: l213, cdr: {car: {car: l333, cdr: {car: l203, cdr: {car: l314, cdr: l3}}}, cdr: {car: {car: l232, cdr: {car: {car: {car: l335, cdr: {car: {car: l38, cdr: {car: l333, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l337, cdr: {car: {car: l15, cdr: l3}, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l158, cdr: {car: {car: l175, cdr: {car: l3, cdr: {car: {car: l232, cdr: {car: {car: {car: {car: l160, cdr: {car: l337, cdr: l3}}, cdr: {car: {car: l160, cdr: {car: {car: l39, cdr: {car: l333, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: {car: {car: {car: l160, cdr: {car: l335, cdr: l3}}, cdr: {car: l3, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l224, cdr: {car: {car: l160, cdr: {car: l337, cdr: l3}}, cdr: {car: {car: l217, cdr: {car: {car: l160, cdr: {car: l335, cdr: l3}}, cdr: {car: {car: l29, cdr: {car: {car: l160, cdr: {car: l337, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l246, cdr: {car: {car: l159, cdr: {car: l314, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l217, cdr: {car: {car: l160, cdr: {car: l337, cdr: l3}}, cdr: {car: {car: l30, cdr: {car: {car: l160, cdr: {car: l337, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}}}}, cdr: {car: {car: l160, cdr: {car: {car: l40, cdr: {car: l333, cdr: l3}}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l46, cdr: {car: l190, cdr: {car: {car: l213, cdr: {car: {car: l312, cdr: {car: l338, cdr: l3}}, cdr: {car: {car: l158, cdr: {car: {car: l217, cdr: {car: {car: l160, cdr: {car: l338, cdr: l3}}, cdr: {car: {car: l27, cdr: {car: {car: l160, cdr: {car: l312, cdr: l3}}, cdr: {car: {car: l160, cdr: {car: l338, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l45, cdr: {car: l190, cdr: {car: {car: l213, cdr: {car: {car: l312, cdr: {car: l202, cdr: {car: {car: l339, cdr: {car: 1, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l158, cdr: {car: {car: l217, cdr: {car: {car: l160, cdr: {car: l312, cdr: l3}}, cdr: {car: {car: l60, cdr: {car: {car: l160, cdr: {car: l312, cdr: l3}}, cdr: {car: {car: l160, cdr: {car: l339, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l44, cdr: {car: l190, cdr: {car: {car: l213, cdr: {car: {car: l312, cdr: {car: l202, cdr: {car: {car: l339, cdr: {car: 1, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l158, cdr: {car: {car: l217, cdr: {car: {car: l160, cdr: {car: l312, cdr: l3}}, cdr: {car: {car: l59, cdr: {car: {car: l160, cdr: {car: l312, cdr: l3}}, cdr: {car: {car: l160, cdr: {car: l339, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l13, cdr: {car: l190, cdr: {car: {car: l213, cdr: {car: {car: l340, cdr: {car: l203, cdr: {car: l314, cdr: l3}}}, cdr: {car: {car: l158, cdr: {car: {car: l175, cdr: {car: l3, cdr: {car: {car: l224, cdr: {car: {car: l160, cdr: {car: l340, cdr: l3}}, cdr: {car: {car: l159, cdr: {car: l314, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l12, cdr: {car: l190, cdr: {car: {car: l213, cdr: {car: {car: l202, cdr: {car: l325, cdr: l3}}, cdr: {car: {car: l158, cdr: {car: {car: l239, cdr: {car: l3, cdr: {car: {car: l160, cdr: {car: l325, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l10, cdr: {car: l190, cdr: {car: {car: l213, cdr: {car: {car: l317, cdr: {car: l313, cdr: {car: l203, cdr: {car: l314, cdr: l3}}}}, cdr: {car: {car: l158, cdr: {car: {car: l228, cdr: {car: {car: l274, cdr: {car: {car: l157, cdr: {car: {car: l160, cdr: {car: l317, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l9, cdr: {car: {car: l160, cdr: {car: {car: l273, cdr: {car: l317, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l160, cdr: {car: l313, cdr: l3}}, cdr: {car: {car: l159, cdr: {car: {car: l200, cdr: {car: {car: l52, cdr: {car: {car: l281, cdr: {car: {car: l29, cdr: {car: l314, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l26, cdr: {car: {car: l11, cdr: {car: {car: l30, cdr: {car: l314, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l158, cdr: {car: {car: {car: l160, cdr: {car: {car: l29, cdr: {car: l314, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l175, cdr: {car: {car: l160, cdr: {car: l317, cdr: l3}}, cdr: {car: {car: l159, cdr: {car: {car: l30, cdr: {car: l314, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l158, cdr: {car: {car: {car: l175, cdr: {car: {car: l160, cdr: {car: l317, cdr: l3}}, cdr: {car: {car: l159, cdr: {car: l314, cdr: l3}}, cdr: l3}}}, cdr: l3}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}}, cdr: {car: {car: l157, cdr: {car: {car: l160, cdr: {car: l317, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l9, cdr: {car: l190, cdr: {car: {car: l213, cdr: {car: {car: l317, cdr: {car: l313, cdr: {car: l203, cdr: {car: l314, cdr: l3}}}}, cdr: {car: {car: l232, cdr: {car: {car: {car: l312, cdr: {car: {car: l15, cdr: {car: "FN", cdr: l3}}, cdr: l3}}, cdr: l3}, cdr: {car: {car: l158, cdr: {car: {car: l232, cdr: {car: {car: {car: {car: l160, cdr: {car: l312, cdr: l3}}, cdr: {car: {car: l213, cdr: {car: {car: l160, cdr: {car: l313, cdr: l3}}, cdr: {car: {car: l159, cdr: {car: l314, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: l3}, cdr: {car: {car: l293, cdr: {car: {car: l160, cdr: {car: l312, cdr: l3}}, cdr: {car: "fname", cdr: {car: {car: l160, cdr: {car: l317, cdr: l3}}, cdr: l3}}}}, cdr: {car: {car: l160, cdr: {car: l312, cdr: l3}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l8, cdr: {car: l190, cdr: {car: {car: l213, cdr: {car: {car: l317, cdr: {car: l325, cdr: {car: l202, cdr: {car: l341, cdr: l3}}}}, cdr: {car: {car: l158, cdr: {car: {car: l228, cdr: {car: {car: l217, cdr: {car: {car: l160, cdr: {car: l317, cdr: l3}}, cdr: {car: {car: l160, cdr: {car: l325, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l159, cdr: {car: {car: l5, cdr: {car: {car: l281, cdr: {car: l341, cdr: l3}}, cdr: {car: {car: l158, cdr: {car: {car: {car: l293, cdr: {car: {car: l157, cdr: {car: {car: l160, cdr: {car: l317, cdr: l3}}, cdr: l3}}, cdr: {car: "vardoc", cdr: {car: {car: l160, cdr: {car: l341, cdr: l3}}, cdr: l3}}}}, cdr: l3}, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: {car: {car: l157, cdr: {car: {car: l160, cdr: {car: l317, cdr: l3}}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l7, cdr: {car: l190, cdr: {car: {car: l213, cdr: {car: {car: l317, cdr: {car: l325, cdr: {car: l202, cdr: {car: l341, cdr: l3}}}}, cdr: {car: {car: l158, cdr: {car: {car: l228, cdr: {car: {car: l2, cdr: {car: {car: l194, cdr: {car: {car: l160, cdr: {car: l317, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l6, cdr: {car: {car: l17, cdr: {car: {car: l157, cdr: {car: {car: l160, cdr: {car: l317, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l217, cdr: {car: {car: l160, cdr: {car: l317, cdr: l3}}, cdr: {car: {car: l160, cdr: {car: l325, cdr: l3}}, cdr: l3}}}, cdr: l3}}}, cdr: {car: {car: l159, cdr: {car: {car: l5, cdr: {car: {car: l281, cdr: {car: l341, cdr: l3}}, cdr: {car: {car: l158, cdr: {car: {car: {car: l293, cdr: {car: {car: l157, cdr: {car: {car: l160, cdr: {car: l317, cdr: l3}}, cdr: l3}}, cdr: {car: "vardoc", cdr: {car: {car: l160, cdr: {car: l341, cdr: l3}}, cdr: l3}}}}, cdr: l3}, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: {car: {car: l157, cdr: {car: {car: l160, cdr: {car: l317, cdr: l3}}, cdr: l3}}, cdr: l3}}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l6, cdr: {car: l190, cdr: {car: {car: l213, cdr: {car: {car: l340, cdr: {car: l203, cdr: {car: l314, cdr: l3}}}, cdr: {car: {car: l158, cdr: {car: {car: l200, cdr: {car: {car: l160, cdr: {car: l340, cdr: l3}}, cdr: {car: l3, cdr: {car: {car: l228, cdr: {car: {car: l159, cdr: {car: l314, cdr: l3}}, cdr: l3}}, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l5, cdr: {car: l190, cdr: {car: {car: l213, cdr: {car: {car: l340, cdr: {car: l203, cdr: {car: l314, cdr: l3}}}, cdr: {car: {car: l158, cdr: {car: {car: l200, cdr: {car: {car: l160, cdr: {car: l340, cdr: l3}}, cdr: {car: {car: l228, cdr: {car: {car: l159, cdr: {car: l314, cdr: l3}}, cdr: l3}}, cdr: {car: l3, cdr: l3}}}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l2, cdr: {car: l190, cdr: {car: {car: l213, cdr: {car: {car: l203, cdr: {car: l315, cdr: l3}}, cdr: {car: {car: l158, cdr: {car: {car: l226, cdr: {car: {car: l159, cdr: {car: {car: l69, cdr: {car: {car: l213, cdr: {car: {car: l316, cdr: l3}, cdr: {car: {car: l158, cdr: {car: {car: l193, cdr: {car: {car: l157, cdr: {car: {car: l160, cdr: {car: l316, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l315, cdr: l3}}}, cdr: l3}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: {car: {car: l1, cdr: {car: l190, cdr: {car: {car: l213, cdr: {car: {car: l317, cdr: {car: l313, cdr: {car: l203, cdr: {car: l314, cdr: l3}}}}, cdr: {car: {car: l158, cdr: {car: {car: l226, cdr: {car: {car: l189, cdr: {car: {car: l157, cdr: {car: {car: l160, cdr: {car: l317, cdr: l3}}, cdr: l3}}, cdr: {car: {car: l157, cdr: {car: {car: l213, cdr: {car: {car: l160, cdr: {car: {car: l69, cdr: {car: {car: l213, cdr: {car: {car: l312, cdr: l3}, cdr: {car: {car: l200, cdr: {car: {car: l278, cdr: {car: l312, cdr: {car: {car: l157, cdr: {car: l307, cdr: l3}}, cdr: l3}}}, cdr: {car: {car: l157, cdr: {car: l203, cdr: l3}}, cdr: {car: l312, cdr: l3}}}}, cdr: l3}}}, cdr: {car: l313, cdr: l3}}}, cdr: l3}}, cdr: {car: {car: l159, cdr: {car: l314, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}}, cdr: l3}}, cdr: l3}}, cdr: l3}}}, cdr: {car: l3, cdr: l3}}}}, cdr: l3}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}, cdr: {car: l3, cdr: {car: l3, cdr: l3}}}};
7804 l117.fvalue(pv, l307);
7805 l117.fvalue(pv, l306);
7806 l117.fvalue(pv, l305);
7807 l117.fvalue(pv, l304);
7808 l117.fvalue(pv, l303);
7809 l117.fvalue(pv, l302);
7810 l117.fvalue(pv, l301);
7811 l117.fvalue(pv, l300);
7812 l117.fvalue(pv, l299);
7813 l117.fvalue(pv, l298);
7814 l117.fvalue(pv, l297);
7815 l117.fvalue(pv, l296);
7816 l117.fvalue(pv, l295);
7817 l117.fvalue(pv, l294);
7818 l117.fvalue(pv, l293);
7819 l117.fvalue(pv, l292);
7820 l117.fvalue(pv, l291);
7821 l117.fvalue(pv, l290);
7822 l117.fvalue(pv, l289);
7823 l117.fvalue(pv, l288);
7824 l117.fvalue(pv, l287);
7825 l117.fvalue(pv, l286);
7826 l117.fvalue(pv, l285);
7827 l117.fvalue(pv, l284);
7828 l117.fvalue(pv, l283);
7829 l117.fvalue(pv, l282);
7830 l117.fvalue(pv, l281);
7831 l117.fvalue(pv, l280);
7832 l117.fvalue(pv, l279);
7833 l117.fvalue(pv, l278);
7834 l117.fvalue(pv, l277);
7835 l117.fvalue(pv, l276);
7836 l117.fvalue(pv, l275);
7837 l117.fvalue(pv, l274);
7838 l117.fvalue(pv, l273);
7839 l117.fvalue(pv, l272);
7840 l117.fvalue(pv, l271);
7841 l117.fvalue(pv, l270);
7842 l117.fvalue(pv, l269);
7843 l117.fvalue(pv, l268);
7844 l117.fvalue(pv, l267);
7845 l117.fvalue(pv, l266);
7846 l117.fvalue(pv, l265);
7847 l117.fvalue(pv, l264);
7848 l117.fvalue(pv, l263);
7849 l117.fvalue(pv, l262);
7850 l117.fvalue(pv, l261);
7851 l117.fvalue(pv, l260);
7852 l117.fvalue(pv, l259);
7853 l117.fvalue(pv, l258);
7854 l117.fvalue(pv, l257);
7855 l117.fvalue(pv, l256);
7856 l117.fvalue(pv, l255);
7857 l117.fvalue(pv, l254);
7858 l117.fvalue(pv, l253);
7859 l117.fvalue(pv, l252);
7860 l117.fvalue(pv, l251);
7861 l117.fvalue(pv, l250);
7862 l117.fvalue(pv, l249);
7863 l117.fvalue(pv, l248);
7864 l117.fvalue(pv, l247);
7865 l117.fvalue(pv, l246);
7866 l117.fvalue(pv, l245);
7867 l117.fvalue(pv, l244);
7868 l117.fvalue(pv, l243);
7869 l117.fvalue(pv, l242);
7870 l117.fvalue(pv, l241);
7871 l117.fvalue(pv, l240);
7872 l117.fvalue(pv, l239);
7873 l117.fvalue(pv, l238);
7874 l117.fvalue(pv, l237);
7875 l117.fvalue(pv, l236);
7876 l117.fvalue(pv, l235);
7877 l117.fvalue(pv, l234);
7878 l117.fvalue(pv, l233);
7879 l117.fvalue(pv, l232);
7880 l117.fvalue(pv, l231);
7881 l117.fvalue(pv, l230);
7882 l117.fvalue(pv, l229);
7883 l117.fvalue(pv, l228);
7884 l117.fvalue(pv, l227);
7885 l117.fvalue(pv, l226);
7886 l117.fvalue(pv, l225);
7887 l117.fvalue(pv, l224);
7888 l117.fvalue(pv, l223);
7889 l117.fvalue(pv, l222);
7890 l117.fvalue(pv, l221);
7891 l117.fvalue(pv, l220);
7892 l117.fvalue(pv, l219);
7893 l117.fvalue(pv, l218);
7894 l117.fvalue(pv, l217);
7895 l117.fvalue(pv, l216);
7896 l117.fvalue(pv, l215);
7897 l117.fvalue(pv, l214);
7898 l117.fvalue(pv, l213);
7899 l117.fvalue(pv, l212);
7900 l117.fvalue(pv, l211);
7901 l117.fvalue(pv, l210);
7902 l117.fvalue(pv, l209);
7903 l117.fvalue(pv, l208);
7904 l117.fvalue(pv, l207);
7905 l117.fvalue(pv, l206);
7906 l117.fvalue(pv, l205);
7907 l117.fvalue(pv, l203);
7908 l117.fvalue(pv, l202);
7909 l117.fvalue(pv, l201);
7910 l117.fvalue(pv, l200);
7911 l117.fvalue(pv, l199);
7912 l117.fvalue(pv, l198);
7913 l117.fvalue(pv, l197);
7914 l117.fvalue(pv, l196);
7915 l117.fvalue(pv, l195);
7916 l117.fvalue(pv, l194);
7917 l117.fvalue(pv, l193);
7918 l117.fvalue(pv, l192);
7919 l117.fvalue(pv, l191);
7920 l117.fvalue(pv, l190);
7921 l117.fvalue(pv, l189);
7922 l117.fvalue(pv, l188);
7923 l117.fvalue(pv, l187);
7924 l117.fvalue(pv, l186);
7925 l117.fvalue(pv, l185);
7926 l117.fvalue(pv, l184);
7927 l117.fvalue(pv, l183);
7928 l117.fvalue(pv, l182);
7929 l117.fvalue(pv, l181);
7930 l117.fvalue(pv, l180);
7931 l117.fvalue(pv, l179);
7932 l117.fvalue(pv, l178);
7933 l117.fvalue(pv, l177);
7934 l117.fvalue(pv, l176);
7935 l117.fvalue(pv, l175);
7936 l117.fvalue(pv, l174);
7937 l117.fvalue(pv, l173);
7938 l117.fvalue(pv, l172);
7939 l117.fvalue(pv, l171);
7940 l117.fvalue(pv, l170);
7941 l117.fvalue(pv, l169);
7942 l117.fvalue(pv, l168);
7943 l117.fvalue(pv, l167);
7944 l117.fvalue(pv, l166);
7945 l117.fvalue(pv, l165);
7946 l117.fvalue(pv, l164);
7947 l117.fvalue(pv, l163);
7948 l117.fvalue(pv, l162);
7949 l117.fvalue(pv, l161);
7950 l117.fvalue(pv, l160);
7951 l117.fvalue(pv, l159);
7952 l117.fvalue(pv, l158);
7953 l117.fvalue(pv, l157);
7954 l117.fvalue(pv, l156);
7955 l117.fvalue(pv, l155);
7956 l117.fvalue(pv, l154);
7957 l117.fvalue(pv, l153);
7958 l117.fvalue(pv, l152);
7959 l117.fvalue(pv, l151);
7960 l117.fvalue(pv, l150);
7961 l117.fvalue(pv, l149);
7962 l117.fvalue(pv, l148);
7963 l117.fvalue(pv, l147);
7964 l117.fvalue(pv, l146);
7965 l117.fvalue(pv, l145);
7966 l117.fvalue(pv, l144);
7967 l117.fvalue(pv, l143);
7968 l117.fvalue(pv, l142);
7969 l117.fvalue(pv, l141);
7970 l117.fvalue(pv, l140);
7971 l117.fvalue(pv, l139);
7972 l117.fvalue(pv, l138);
7973 l117.fvalue(pv, l137);
7974 l117.fvalue(pv, l136);
7975 l117.fvalue(pv, l135);
7976 l117.fvalue(pv, l134);
7977 l117.fvalue(pv, l133);
7978 l117.fvalue(pv, l132);
7979 l117.fvalue(pv, l131);
7980 l117.fvalue(pv, l130);
7981 l117.fvalue(pv, l129);
7982 l117.fvalue(pv, l128);
7983 l117.fvalue(pv, l127);
7984 l117.fvalue(pv, l126);
7985 l117.fvalue(pv, l125);
7986 l117.fvalue(pv, l124);
7987 l117.fvalue(pv, l123);
7988 l117.fvalue(pv, l122);
7989 l117.fvalue(pv, l121);
7990 l117.fvalue(pv, l120);
7991 l117.fvalue(pv, l119);
7992 l117.fvalue(pv, l118);
7993 l117.fvalue(pv, l117);
7994 l117.fvalue(pv, l116);
7995 l117.fvalue(pv, l115);
7996 l117.fvalue(pv, l114);
7997 l117.fvalue(pv, l113);
7998 l117.fvalue(pv, l112);
7999 l117.fvalue(pv, l111);
8000 l117.fvalue(pv, l110);
8001 l117.fvalue(pv, l109);
8002 l117.fvalue(pv, l108);
8003 l117.fvalue(pv, l107);
8004 l117.fvalue(pv, l106);
8005 l117.fvalue(pv, l105);
8006 l117.fvalue(pv, l104);
8007 l117.fvalue(pv, l103);
8008 l117.fvalue(pv, l102);
8009 l117.fvalue(pv, l101);
8010 l117.fvalue(pv, l100);
8011 l117.fvalue(pv, l99);
8012 l117.fvalue(pv, l98);
8013 l117.fvalue(pv, l97);
8014 l117.fvalue(pv, l96);
8015 l117.fvalue(pv, l95);
8016 l117.fvalue(pv, l94);
8017 l117.fvalue(pv, l93);
8018 l117.fvalue(pv, l92);
8019 l117.fvalue(pv, l91);
8020 l117.fvalue(pv, l90);
8021 l117.fvalue(pv, l89);
8022 l117.fvalue(pv, l88);
8023 l117.fvalue(pv, l87);
8024 l117.fvalue(pv, l86);
8025 l117.fvalue(pv, l85);
8026 l117.fvalue(pv, l84);
8027 l117.fvalue(pv, l83);
8028 l117.fvalue(pv, l82);
8029 l117.fvalue(pv, l81);
8030 l117.fvalue(pv, l80);
8031 l117.fvalue(pv, l79);
8032 l117.fvalue(pv, l78);
8033 l117.fvalue(pv, l77);
8034 l117.fvalue(pv, l76);
8035 l117.fvalue(pv, l75);
8036 l117.fvalue(pv, l74);
8037 l117.fvalue(pv, l73);
8038 l117.fvalue(pv, l72);
8039 l117.fvalue(pv, l71);
8040 l117.fvalue(pv, l70);
8041 l117.fvalue(pv, l69);
8042 l117.fvalue(pv, l68);
8043 l117.fvalue(pv, l67);
8044 l117.fvalue(pv, l66);
8045 l117.fvalue(pv, l65);
8046 l117.fvalue(pv, l64);
8047 l117.fvalue(pv, l63);
8048 l117.fvalue(pv, l62);
8049 l117.fvalue(pv, l61);
8050 l117.fvalue(pv, l60);
8051 l117.fvalue(pv, l59);
8052 l117.fvalue(pv, l58);
8053 l117.fvalue(pv, l57);
8054 l117.fvalue(pv, l56);
8055 l117.fvalue(pv, l55);
8056 l117.fvalue(pv, l54);
8057 l117.fvalue(pv, l53);
8058 l117.fvalue(pv, l52);
8059 l117.fvalue(pv, l51);
8060 l117.fvalue(pv, l50);
8061 l117.fvalue(pv, l49);
8062 l117.fvalue(pv, l48);
8063 l117.fvalue(pv, l47);
8064 l117.fvalue(pv, l46);
8065 l117.fvalue(pv, l45);
8066 l117.fvalue(pv, l44);
8067 l117.fvalue(pv, l43);
8068 l117.fvalue(pv, l42);
8069 l117.fvalue(pv, l41);
8070 l117.fvalue(pv, l40);
8071 l117.fvalue(pv, l39);
8072 l117.fvalue(pv, l38);
8073 l117.fvalue(pv, l37);
8074 l117.fvalue(pv, l36);
8075 l117.fvalue(pv, l35);
8076 l117.fvalue(pv, l34);
8077 l117.fvalue(pv, l33);
8078 l117.fvalue(pv, l32);
8079 l117.fvalue(pv, l31);
8080 l117.fvalue(pv, l30);
8081 l117.fvalue(pv, l29);
8082 l117.fvalue(pv, l28);
8083 l117.fvalue(pv, l27);
8084 l117.fvalue(pv, l26);
8085 l117.fvalue(pv, l25);
8086 l117.fvalue(pv, l24);
8087 l117.fvalue(pv, l23);
8088 l117.fvalue(pv, l22);
8089 l117.fvalue(pv, l21);
8090 l117.fvalue(pv, l20);
8091 l117.fvalue(pv, l19);
8092 l117.fvalue(pv, l18);
8093 l117.fvalue(pv, l17);
8094 l117.fvalue(pv, l16);
8095 l117.fvalue(pv, l15);
8096 l117.fvalue(pv, l14);
8097 l117.fvalue(pv, l13);
8098 l117.fvalue(pv, l12);
8099 l117.fvalue(pv, l11);
8100 l117.fvalue(pv, l10);
8101 l117.fvalue(pv, l9);
8102 l117.fvalue(pv, l8);
8103 l117.fvalue(pv, l7);
8104 l117.fvalue(pv, l6);
8105 l117.fvalue(pv, l5);
8106 l117.fvalue(pv, l4);
8107 l117.fvalue(pv, l3);
8108 l117.fvalue(pv, l2);
8109 l117.fvalue(pv, l1);
8110 ((l220).value = l309);
8111 ((l179).value = l342);
8112 ((l180).value = 808);
8113 ((l14).value = 206);
8114 return ((l237).value = 280);
8116 ((l221).value = 342);