47b7e16d11404ecd501682f1fdaaaede9c8c5679
[jscl.git] / ecmalisp.js
1 var nil;
2
3 function pv (x) { return x==undefined? nil: x; }
4
5 function mv(){
6     var r = [];
7     r['multiple-value'] = true;
8     for (var i=0; i<arguments.length; i++)
9         r.push(arguments[i]);
10     return r;
11 }
12
13 function forcemv (x) {
14     return typeof x == 'object' && 'multiple-value' in x? x: mv(x);
15 }
16
17 // NOTE: Define VALUES to be MV for toplevel forms. It is because
18 // `eval' compiles the forms and execute the Javascript code at
19 // toplevel with `js-eval', so it is necessary to return multiple
20 // values from the eval function.
21 var values = mv;
22
23 function checkArgsAtLeast(args, n){
24     if (args.length < n) throw 'too few arguments';
25 }
26
27 function checkArgsAtMost(args, n){
28     if (args.length > n) throw 'too many arguments';
29 }
30
31 function checkArgs(args, n){
32     checkArgsAtLeast(args, n);
33     checkArgsAtMost(args, n);
34 }
35
36 // Improper list constructor (like LIST*)
37 function QIList(){
38     if (arguments.length == 1)
39         return arguments[0];
40     else {
41         var i = arguments.length-1;
42         var r = arguments[i--];
43         for (; i>=0; i--){
44             r = {car: arguments[i], cdr: r};
45         }
46         return r;
47     }
48 }
49 var l1 = {name: "DEFMACRO"};
50 l1;
51 var l2 = {name: "DECLAIM"};
52 l2;
53 var l3 = {name: "DEFCONSTANT"};
54 l3;
55 var l4 = {name: "T"};
56 (function(){
57     ((l4).value = l4);
58     return l4;
59 })();
60 var l5 = {name: "NIL"};
61 (function(){
62     ((l5).value = l5);
63     return l5;
64 })();
65 (nil = l5.value);
66 var l6 = {name: "LAMBDA"};
67 l6;
68 var l7 = {name: "WHEN"};
69 l7;
70 var l8 = {name: "UNLESS"};
71 l8;
72 var l9 = {name: "DEFVAR"};
73 l9;
74 var l10 = {name: "DEFPARAMETER"};
75 l10;
76 var l11 = {name: "NAMED-LAMBDA"};
77 l11;
78 var l12 = {name: "DEFUN"};
79 l12;
80 var l13 = {name: "NULL"};
81 (function(){
82     (l13).fvalue = (function(v2){
83         ((v2)["fname"] = "NULL");
84         return v2;
85     })((function (values,v1){
86         checkArgs(arguments, 2);
87         return (function(){
88             return ((v1 === l5.value)?l4.value: l5.value);
89         })();
90     }));
91     return l13;
92 })();
93 var l14 = {name: "RETURN"};
94 l14;
95 var l15 = {name: "WHILE"};
96 l15;
97 var l16 = {name: "*GENSYM-COUNTER*"};
98 (function(){
99     (((l16.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l16).value = 0));
100     return l16;
101 })();
102 var l17 = {name: "GENSYM"};
103 var l18 = {name: "INTEGER-TO-STRING"};
104 (function(){
105     (l17).fvalue = (function(v4){
106         ((v4)["fname"] = "GENSYM");
107         return v4;
108     })((function (values,v3){
109         checkArgsAtMost(arguments, 2);
110         var v3; 
111         switch(arguments.length-1){
112         case 0:
113             v3="G";
114         default: break;
115         }
116         return (function(){
117             ((l16).value = (function(){
118                 var x1 = (function(){
119                     var symbol = l16;
120                     var value = symbol.value;
121                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
122                     return value;
123                 })();
124                 if (typeof x1 !== 'number') throw 'Not a number!';
125                 return x1+1;
126             })());
127             return (function(){
128                 var name = (function(){
129                     var string1 = v3;
130                     var string2 = l18.fvalue(pv, (function(){
131                         var symbol = l16;
132                         var value = symbol.value;
133                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
134                         return value;
135                     })());
136                     if (typeof string1 != 'string')
137                         throw 'The value ' + string1 + ' is not a type string.';
138                     if (typeof string2 != 'string')
139                         throw 'The value ' + string2 + ' is not a type string.';
140                     return string1.concat(string2);
141                 })();
142                 if (typeof name != 'string')
143                     throw 'The value ' + name + ' is not a type string.';
144                 return ({name: name});
145             })();
146         })();
147     }));
148     return l17;
149 })();
150 var l19 = {name: "BOUNDP"};
151 (function(){
152     (l19).fvalue = (function(v6){
153         ((v6)["fname"] = "BOUNDP");
154         return v6;
155     })((function (values,v5){
156         checkArgs(arguments, 2);
157         return (function(){
158             return ((v5.value !== undefined)?l4.value: l5.value);
159         })();
160     }));
161     return l19;
162 })();
163 var l20 = {name: "="};
164 (function(){
165     (l20).fvalue = (function(v9){
166         ((v9)["fname"] = "=");
167         return v9;
168     })((function (values,v7,v8){
169         checkArgs(arguments, 3);
170         return (function(){
171             return (function(){
172                 var x1 = v7;
173                 if (typeof x1 !== 'number') throw 'Not a number!';
174                 var x2 = v8;
175                 if (typeof x2 !== 'number') throw 'Not a number!';
176                 return (x1==x2?l4.value: l5.value);
177             })();
178         })();
179     }));
180     return l20;
181 })();
182 var l21 = {name: "*"};
183 (function(){
184     (l21).fvalue = (function(v12){
185         ((v12)["fname"] = "*");
186         return v12;
187     })((function (values,v10,v11){
188         checkArgs(arguments, 3);
189         return (function(){
190             return (function(){
191                 var x1 = v10;
192                 if (typeof x1 !== 'number') throw 'Not a number!';
193                 var x2 = v11;
194                 if (typeof x2 !== 'number') throw 'Not a number!';
195                 return x1*x2;
196             })();
197         })();
198     }));
199     return l21;
200 })();
201 var l22 = {name: "/"};
202 (function(){
203     (l22).fvalue = (function(v15){
204         ((v15)["fname"] = "/");
205         return v15;
206     })((function (values,v13,v14){
207         checkArgs(arguments, 3);
208         return (function(){
209             return (function(){
210                 var x1 = v13;
211                 if (typeof x1 !== 'number') throw 'Not a number!';
212                 var x2 = v14;
213                 if (typeof x2 !== 'number') throw 'Not a number!';
214                 return x1/x2;
215             })();
216         })();
217     }));
218     return l22;
219 })();
220 var l23 = {name: "1+"};
221 (function(){
222     (l23).fvalue = (function(v17){
223         ((v17)["fname"] = "1+");
224         return v17;
225     })((function (values,v16){
226         checkArgs(arguments, 2);
227         return (function(){
228             return (function(){
229                 var x1 = v16;
230                 if (typeof x1 !== 'number') throw 'Not a number!';
231                 return x1+1;
232             })();
233         })();
234     }));
235     return l23;
236 })();
237 var l24 = {name: "1-"};
238 (function(){
239     (l24).fvalue = (function(v19){
240         ((v19)["fname"] = "1-");
241         return v19;
242     })((function (values,v18){
243         checkArgs(arguments, 2);
244         return (function(){
245             return (function(){
246                 var x1 = v18;
247                 if (typeof x1 !== 'number') throw 'Not a number!';
248                 return x1-1;
249             })();
250         })();
251     }));
252     return l24;
253 })();
254 var l25 = {name: "ZEROP"};
255 (function(){
256     (l25).fvalue = (function(v21){
257         ((v21)["fname"] = "ZEROP");
258         return v21;
259     })((function (values,v20){
260         checkArgs(arguments, 2);
261         return (function(){
262             return (function(){
263                 var x1 = v20;
264                 if (typeof x1 !== 'number') throw 'Not a number!';
265                 return (x1==0?l4.value: l5.value);
266             })();
267         })();
268     }));
269     return l25;
270 })();
271 var l26 = {name: "TRUNCATE"};
272 (function(){
273     (l26).fvalue = (function(v24){
274         ((v24)["fname"] = "TRUNCATE");
275         return v24;
276     })((function (values,v22,v23){
277         checkArgs(arguments, 3);
278         return (function(){
279             return (function(){
280                 var x = (function(){
281                     var x1 = v22;
282                     if (typeof x1 !== 'number') throw 'Not a number!';
283                     var x2 = v23;
284                     if (typeof x2 !== 'number') throw 'Not a number!';
285                     return x1/x2;
286                 })();
287                 if (typeof x != 'number')
288                     throw 'The value ' + x + ' is not a type number.';
289                 return Math.floor(x);
290             })();
291         })();
292     }));
293     return l26;
294 })();
295 var l27 = {name: "EQL"};
296 (function(){
297     (l27).fvalue = (function(v27){
298         ((v27)["fname"] = "EQL");
299         return v27;
300     })((function (values,v25,v26){
301         checkArgs(arguments, 3);
302         return (function(){
303             return ((v25 === v26)?l4.value: l5.value);
304         })();
305     }));
306     return l27;
307 })();
308 var l28 = {name: "NOT"};
309 (function(){
310     (l28).fvalue = (function(v29){
311         ((v29)["fname"] = "NOT");
312         return v29;
313     })((function (values,v28){
314         checkArgs(arguments, 2);
315         return (function(){
316             return (v28 !== l5.value ? l5.value : l4.value);
317         })();
318     }));
319     return l28;
320 })();
321 var l29 = {name: "CONS"};
322 (function(){
323     (l29).fvalue = (function(v32){
324         ((v32)["fname"] = "CONS");
325         return v32;
326     })((function (values,v30,v31){
327         checkArgs(arguments, 3);
328         return (function(){
329             return ({car: v30, cdr: v31});
330         })();
331     }));
332     return l29;
333 })();
334 var l30 = {name: "CONSP"};
335 (function(){
336     (l30).fvalue = (function(v34){
337         ((v34)["fname"] = "CONSP");
338         return v34;
339     })((function (values,v33){
340         checkArgs(arguments, 2);
341         return (function(){
342             return ((function(){
343                 var tmp = v33;
344                 return (typeof tmp == 'object' && 'car' in tmp);
345             })()?l4.value: l5.value);
346         })();
347     }));
348     return l30;
349 })();
350 var l31 = {name: "CAR"};
351 (function(){
352     (l31).fvalue = (function(v36){
353         ((v36)["fname"] = "CAR");
354         return v36;
355     })((function(){
356         var func = (function (values,v35){
357             checkArgs(arguments, 2);
358             return (function(){
359                 return (function(){
360                     var tmp = v35;
361                     return tmp === l5.value? l5.value: tmp.car;
362                 })();
363             })();
364         });
365         func.docstring = 'Return the CAR part of a cons, or NIL if X is null.';
366         return func;
367     })());
368     return l31;
369 })();
370 var l32 = {name: "CDR"};
371 (function(){
372     (l32).fvalue = (function(v38){
373         ((v38)["fname"] = "CDR");
374         return v38;
375     })((function (values,v37){
376         checkArgs(arguments, 2);
377         return (function(){
378             return (function(){
379                 var tmp = v37;
380                 return tmp === l5.value? l5.value: tmp.cdr;
381             })();
382         })();
383     }));
384     return l32;
385 })();
386 var l33 = {name: "CAAR"};
387 (function(){
388     (l33).fvalue = (function(v40){
389         ((v40)["fname"] = "CAAR");
390         return v40;
391     })((function (values,v39){
392         checkArgs(arguments, 2);
393         return (function(){
394             return (function(){
395                 var tmp = (function(){
396                     var tmp = v39;
397                     return tmp === l5.value? l5.value: tmp.car;
398                 })();
399                 return tmp === l5.value? l5.value: tmp.car;
400             })();
401         })();
402     }));
403     return l33;
404 })();
405 var l34 = {name: "CADR"};
406 (function(){
407     (l34).fvalue = (function(v42){
408         ((v42)["fname"] = "CADR");
409         return v42;
410     })((function (values,v41){
411         checkArgs(arguments, 2);
412         return (function(){
413             return (function(){
414                 var tmp = (function(){
415                     var tmp = v41;
416                     return tmp === l5.value? l5.value: tmp.cdr;
417                 })();
418                 return tmp === l5.value? l5.value: tmp.car;
419             })();
420         })();
421     }));
422     return l34;
423 })();
424 var l35 = {name: "CDAR"};
425 (function(){
426     (l35).fvalue = (function(v44){
427         ((v44)["fname"] = "CDAR");
428         return v44;
429     })((function (values,v43){
430         checkArgs(arguments, 2);
431         return (function(){
432             return (function(){
433                 var tmp = (function(){
434                     var tmp = v43;
435                     return tmp === l5.value? l5.value: tmp.car;
436                 })();
437                 return tmp === l5.value? l5.value: tmp.cdr;
438             })();
439         })();
440     }));
441     return l35;
442 })();
443 var l36 = {name: "CDDR"};
444 (function(){
445     (l36).fvalue = (function(v46){
446         ((v46)["fname"] = "CDDR");
447         return v46;
448     })((function (values,v45){
449         checkArgs(arguments, 2);
450         return (function(){
451             return (function(){
452                 var tmp = (function(){
453                     var tmp = v45;
454                     return tmp === l5.value? l5.value: tmp.cdr;
455                 })();
456                 return tmp === l5.value? l5.value: tmp.cdr;
457             })();
458         })();
459     }));
460     return l36;
461 })();
462 var l37 = {name: "CADDR"};
463 (function(){
464     (l37).fvalue = (function(v48){
465         ((v48)["fname"] = "CADDR");
466         return v48;
467     })((function (values,v47){
468         checkArgs(arguments, 2);
469         return (function(){
470             return (function(){
471                 var tmp = (function(){
472                     var tmp = (function(){
473                         var tmp = v47;
474                         return tmp === l5.value? l5.value: tmp.cdr;
475                     })();
476                     return tmp === l5.value? l5.value: tmp.cdr;
477                 })();
478                 return tmp === l5.value? l5.value: tmp.car;
479             })();
480         })();
481     }));
482     return l37;
483 })();
484 var l38 = {name: "CDDDR"};
485 (function(){
486     (l38).fvalue = (function(v50){
487         ((v50)["fname"] = "CDDDR");
488         return v50;
489     })((function (values,v49){
490         checkArgs(arguments, 2);
491         return (function(){
492             return (function(){
493                 var tmp = (function(){
494                     var tmp = (function(){
495                         var tmp = v49;
496                         return tmp === l5.value? l5.value: tmp.cdr;
497                     })();
498                     return tmp === l5.value? l5.value: tmp.cdr;
499                 })();
500                 return tmp === l5.value? l5.value: tmp.cdr;
501             })();
502         })();
503     }));
504     return l38;
505 })();
506 var l39 = {name: "CADDDR"};
507 (function(){
508     (l39).fvalue = (function(v52){
509         ((v52)["fname"] = "CADDDR");
510         return v52;
511     })((function (values,v51){
512         checkArgs(arguments, 2);
513         return (function(){
514             return (function(){
515                 var tmp = (function(){
516                     var tmp = (function(){
517                         var tmp = (function(){
518                             var tmp = v51;
519                             return tmp === l5.value? l5.value: tmp.cdr;
520                         })();
521                         return tmp === l5.value? l5.value: tmp.cdr;
522                     })();
523                     return tmp === l5.value? l5.value: tmp.cdr;
524                 })();
525                 return tmp === l5.value? l5.value: tmp.car;
526             })();
527         })();
528     }));
529     return l39;
530 })();
531 var l40 = {name: "FIRST"};
532 (function(){
533     (l40).fvalue = (function(v54){
534         ((v54)["fname"] = "FIRST");
535         return v54;
536     })((function (values,v53){
537         checkArgs(arguments, 2);
538         return (function(){
539             return (function(){
540                 var tmp = v53;
541                 return tmp === l5.value? l5.value: tmp.car;
542             })();
543         })();
544     }));
545     return l40;
546 })();
547 var l41 = {name: "SECOND"};
548 (function(){
549     (l41).fvalue = (function(v56){
550         ((v56)["fname"] = "SECOND");
551         return v56;
552     })((function (values,v55){
553         checkArgs(arguments, 2);
554         return (function(){
555             return l34.fvalue(values, v55);
556         })();
557     }));
558     return l41;
559 })();
560 var l42 = {name: "THIRD"};
561 (function(){
562     (l42).fvalue = (function(v58){
563         ((v58)["fname"] = "THIRD");
564         return v58;
565     })((function (values,v57){
566         checkArgs(arguments, 2);
567         return (function(){
568             return l37.fvalue(values, v57);
569         })();
570     }));
571     return l42;
572 })();
573 var l43 = {name: "FOURTH"};
574 (function(){
575     (l43).fvalue = (function(v60){
576         ((v60)["fname"] = "FOURTH");
577         return v60;
578     })((function (values,v59){
579         checkArgs(arguments, 2);
580         return (function(){
581             return l39.fvalue(values, v59);
582         })();
583     }));
584     return l43;
585 })();
586 var l44 = {name: "REST"};
587 (function(){
588     (l44).fvalue = (function(v62){
589         ((v62)["fname"] = "REST");
590         return v62;
591     })((function (values,v61){
592         checkArgs(arguments, 2);
593         return (function(){
594             return (function(){
595                 var tmp = v61;
596                 return tmp === l5.value? l5.value: tmp.cdr;
597             })();
598         })();
599     }));
600     return l44;
601 })();
602 var l45 = {name: "LIST"};
603 (function(){
604     (l45).fvalue = (function(v64){
605         ((v64)["fname"] = "LIST");
606         return v64;
607     })((function (values){
608         var v63= l5.value;
609         for (var i = arguments.length-1; i>=1; i--)
610             v63 = {car: arguments[i], cdr: 
611         v63};
612         return (function(){
613             return v63;
614         })();
615     }));
616     return l45;
617 })();
618 var l46 = {name: "ATOM"};
619 (function(){
620     (l46).fvalue = (function(v66){
621         ((v66)["fname"] = "ATOM");
622         return v66;
623     })((function (values,v65){
624         checkArgs(arguments, 2);
625         return (function(){
626             return l28.fvalue(values, ((function(){
627                 var tmp = v65;
628                 return (typeof tmp == 'object' && 'car' in tmp);
629             })()?l4.value: l5.value));
630         })();
631     }));
632     return l46;
633 })();
634 var l47 = {name: "INCF"};
635 l47;
636 var l48 = {name: "DECF"};
637 l48;
638 var l49 = {name: "PUSH"};
639 l49;
640 var l50 = {name: "DOLIST"};
641 l50;
642 var l51 = {name: "DOTIMES"};
643 l51;
644 var l52 = {name: "COND"};
645 l52;
646 var l53 = {name: "CASE"};
647 l53;
648 var l54 = {name: "ECASE"};
649 l54;
650 var l55 = {name: "AND"};
651 l55;
652 var l56 = {name: "OR"};
653 l56;
654 var l57 = {name: "PROG1"};
655 l57;
656 var l58 = {name: "PROG2"};
657 l58;
658 var l59 = {name: "ENSURE-LIST"};
659 var l60 = {name: "LISTP"};
660 (function(){
661     (l59).fvalue = (function(v68){
662         ((v68)["fname"] = "ENSURE-LIST");
663         return v68;
664     })((function (values,v67){
665         checkArgs(arguments, 2);
666         return (function(){
667             return (l60.fvalue(pv, v67) !== l5.value ? v67 : l45.fvalue(values, v67));
668         })();
669     }));
670     return l59;
671 })();
672 var l61 = {name: "!REDUCE"};
673 var l62 = {name: "INITIAL-VALUE", 'package': 'KEYWORD'};
674 (function(){
675     (l61).fvalue = (function(v72){
676         ((v72)["fname"] = "!REDUCE");
677         return v72;
678     })((function (values,v69,v70){
679         checkArgsAtLeast(arguments, 3);
680         var v71; 
681         var i;
682         for (i=3; i<arguments.length; i+=2){
683             if (arguments[i] === l62.value){
684                 v71 = arguments[i+1];
685                 break;
686             }
687         }
688         if (i == arguments.length){
689             v71 = l5.value;
690         }
691         for (i=3; i<arguments.length; i+=2){
692             if (arguments[i] !== l62.value)
693                 throw 'Unknown keyword argument ' + arguments[i].name;
694         }
695         return (function(){
696             return (l13.fvalue(pv, v70) !== l5.value ? v71 : l61.fvalue(values, v69, (function(){
697                 var tmp = v70;
698                 return tmp === l5.value? l5.value: tmp.cdr;
699             })(), l62.value, (v69)(pv, v71, (function(){
700                 var tmp = v70;
701                 return tmp === l5.value? l5.value: tmp.car;
702             })())));
703         })();
704     }));
705     return l61;
706 })();
707 var l63 = {name: "+"};
708 (function(){
709     (l63).fvalue = (function(v77){
710         ((v77)["fname"] = "+");
711         return v77;
712     })((function (values){
713         var v73= l5.value;
714         for (var i = arguments.length-1; i>=1; i--)
715             v73 = {car: arguments[i], cdr: 
716         v73};
717         return (function(){
718             return (function(v74){
719                 return (function(){
720                     return (function(v75,v76){
721                         (function(){
722                             while(v75 !== l5.value){
723                                 (v76 = (function(){
724                                     var tmp = v75;
725                                     return tmp === l5.value? l5.value: tmp.car;
726                                 })());
727                                 (function(){
728                                     (v74 = (function(){
729                                         var x1 = v74;
730                                         if (typeof x1 !== 'number') throw 'Not a number!';
731                                         var x2 = v76;
732                                         if (typeof x2 !== 'number') throw 'Not a number!';
733                                         return x1+x2;
734                                     })());
735                                     return l5.value;
736                                 })();
737                                 (v75 = (function(){
738                                     var tmp = v75;
739                                     return tmp === l5.value? l5.value: tmp.cdr;
740                                 })());
741                             }return l5.value;
742                         })();
743                         return v74;
744                     })(v73,l5.value);
745                 })();
746             })(0);
747         })();
748     }));
749     return l63;
750 })();
751 var l64 = {name: "-"};
752 (function(){
753     (l64).fvalue = (function(v83){
754         ((v83)["fname"] = "-");
755         return v83;
756     })((function (values,v79){
757         checkArgsAtLeast(arguments, 2);
758         var v78= l5.value;
759         for (var i = arguments.length-1; i>=2; i--)
760             v78 = {car: arguments[i], cdr: 
761         v78};
762         return (function(){
763             return (l13.fvalue(pv, v78) !== l5.value ? (function(){
764                 var x1 = v79;
765                 if (typeof x1 !== 'number') throw 'Not a number!';
766                 return -x1;
767             })() : (function(v80){
768                 return (function(){
769                     return (function(v81,v82){
770                         (function(){
771                             while(v81 !== l5.value){
772                                 (v82 = (function(){
773                                     var tmp = v81;
774                                     return tmp === l5.value? l5.value: tmp.car;
775                                 })());
776                                 (function(){
777                                     (v80 = (function(){
778                                         var x1 = v80;
779                                         if (typeof x1 !== 'number') throw 'Not a number!';
780                                         var x2 = v82;
781                                         if (typeof x2 !== 'number') throw 'Not a number!';
782                                         return x1-x2;
783                                     })());
784                                     return l5.value;
785                                 })();
786                                 (v81 = (function(){
787                                     var tmp = v81;
788                                     return tmp === l5.value? l5.value: tmp.cdr;
789                                 })());
790                             }return l5.value;
791                         })();
792                         return v80;
793                     })(v78,l5.value);
794                 })();
795             })(v79));
796         })();
797     }));
798     return l64;
799 })();
800 var l65 = {name: "APPEND-TWO"};
801 var l66 = {name: "APPEND"};
802 (function(){
803     (l65).fvalue = (function(v86){
804         ((v86)["fname"] = "APPEND-TWO");
805         return v86;
806     })((function (values,v84,v85){
807         checkArgs(arguments, 3);
808         return (function(){
809             return (l13.fvalue(pv, v84) !== l5.value ? v85 : ({car: (function(){
810                 var tmp = v84;
811                 return tmp === l5.value? l5.value: tmp.car;
812             })(), cdr: l66.fvalue(pv, (function(){
813                 var tmp = v84;
814                 return tmp === l5.value? l5.value: tmp.cdr;
815             })(), v85)}));
816         })();
817     }));
818     return l65;
819 })();
820 (function(){
821     (l66).fvalue = (function(v88){
822         ((v88)["fname"] = "APPEND");
823         return v88;
824     })((function (values){
825         var v87= l5.value;
826         for (var i = arguments.length-1; i>=1; i--)
827             v87 = {car: arguments[i], cdr: 
828         v87};
829         return (function(){
830             return l61.fvalue(values, (function(){
831                 var symbol = l65;
832                 var func = symbol.fvalue;
833                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
834                 return func;
835             })(), v87);
836         })();
837     }));
838     return l66;
839 })();
840 var l67 = {name: "REVAPPEND"};
841 (function(){
842     (l67).fvalue = (function(v91){
843         ((v91)["fname"] = "REVAPPEND");
844         return v91;
845     })((function (values,v89,v90){
846         checkArgs(arguments, 3);
847         return (function(){
848             (function(){
849                 return (function(){
850                     while(v89 !== l5.value){
851                         (v90 = ({car: (function(){
852                             var tmp = v89;
853                             return tmp === l5.value? l5.value: tmp.car;
854                         })(), cdr: v90}));
855                         (v89 = (function(){
856                             var tmp = v89;
857                             return tmp === l5.value? l5.value: tmp.cdr;
858                         })());
859                     }return l5.value;
860                 })();
861             })();
862             return v90;
863         })();
864     }));
865     return l67;
866 })();
867 var l68 = {name: "REVERSE"};
868 (function(){
869     (l68).fvalue = (function(v93){
870         ((v93)["fname"] = "REVERSE");
871         return v93;
872     })((function (values,v92){
873         checkArgs(arguments, 2);
874         return (function(){
875             return l67.fvalue(values, v92, l5);
876         })();
877     }));
878     return l68;
879 })();
880 var l69 = {name: "PSETQ"};
881 l69;
882 var l70 = {name: "DO"};
883 l70;
884 var l71 = {name: "DO*"};
885 l71;
886 var l72 = {name: "LIST-LENGTH"};
887 (function(){
888     (l72).fvalue = (function(v96){
889         ((v96)["fname"] = "LIST-LENGTH");
890         return v96;
891     })((function (values,v94){
892         checkArgs(arguments, 2);
893         return (function(){
894             return (function(v95){
895                 (function(){
896                     return (function(){
897                         while(l28.fvalue(pv, l13.fvalue(pv, v94)) !== l5.value){
898                             (v95 = (function(){
899                                 var x1 = v95;
900                                 if (typeof x1 !== 'number') throw 'Not a number!';
901                                 return x1+1;
902                             })());
903                             (v94 = (function(){
904                                 var tmp = v94;
905                                 return tmp === l5.value? l5.value: tmp.cdr;
906                             })());
907                         }return l5.value;
908                     })();
909                 })();
910                 return v95;
911             })(0);
912         })();
913     }));
914     return l72;
915 })();
916 var l73 = {name: "LENGTH"};
917 (function(){
918     (l73).fvalue = (function(v98){
919         ((v98)["fname"] = "LENGTH");
920         return v98;
921     })((function (values,v97){
922         checkArgs(arguments, 2);
923         return (function(){
924             return (((typeof(v97) == "string")?l4.value: l5.value) !== l5.value ? (function(){
925                 var x = v97;
926                 if (typeof x != 'string')
927                     throw 'The value ' + x + ' is not a type string.';
928                 return x.length;
929             })() : (((function(){
930                 var x = v97;
931                 return typeof x === 'object' && 'length' in x;
932             })()?l4.value: l5.value) !== l5.value ? (function(){
933                 var tmp = (v97)["length"];
934                 return tmp == undefined? l5.value: tmp ;
935             })() : (l60.fvalue(pv, v97) !== l5.value ? l72.fvalue(values, v97) : l5.value)));
936         })();
937     }));
938     return l73;
939 })();
940 var l74 = {name: "CONCAT-TWO"};
941 (function(){
942     (l74).fvalue = (function(v101){
943         ((v101)["fname"] = "CONCAT-TWO");
944         return v101;
945     })((function (values,v99,v100){
946         checkArgs(arguments, 3);
947         return (function(){
948             return (function(){
949                 var string1 = v99;
950                 var string2 = v100;
951                 if (typeof string1 != 'string')
952                     throw 'The value ' + string1 + ' is not a type string.';
953                 if (typeof string2 != 'string')
954                     throw 'The value ' + string2 + ' is not a type string.';
955                 return string1.concat(string2);
956             })();
957         })();
958     }));
959     return l74;
960 })();
961 var l75 = {name: "WITH-COLLECT"};
962 l75;
963 var l76 = {name: "MAP1"};
964 var l77 = {name: "SENTINEL"};
965 (function(){
966     (l76).fvalue = (function(v108){
967         ((v108)["fname"] = "MAP1");
968         return v108;
969     })((function (values,v102,v103){
970         checkArgs(arguments, 3);
971         return (function(){
972             return (function(){
973                 var v104 = ({car: l77, cdr: l5.value});
974                 var v105 = v104;
975                 (function(v107){
976                     return (function(){
977                         return (function(){
978                             while(v103 !== l5.value){
979                                 v107(pv, (v102)(pv, (function(){
980                                     var tmp = v103;
981                                     return tmp === l5.value? l5.value: tmp.car;
982                                 })()));
983                                 (v103 = (function(){
984                                     var tmp = v103;
985                                     return tmp === l5.value? l5.value: tmp.cdr;
986                                 })());
987                             }return l5.value;
988                         })();
989                     })();
990                 })((function (values,v106){
991                     checkArgs(arguments, 2);
992                     (function(){
993                         var x = v105;
994                         if (typeof x != 'object')
995                             throw 'The value ' + x + ' is not a type object.';
996                         return (x.cdr = ({car: v106, cdr: l5.value}), x);
997                     })();
998                     (v105 = (function(){
999                         var tmp = v105;
1000                         return tmp === l5.value? l5.value: tmp.cdr;
1001                     })());
1002                     return v106;
1003                 }));
1004                 return (function(){
1005                     var tmp = v104;
1006                     return tmp === l5.value? l5.value: tmp.cdr;
1007                 })();
1008             })();
1009         })();
1010     }));
1011     return l76;
1012 })();
1013 var l78 = {name: "LOOP"};
1014 l78;
1015 var l79 = {name: "MAPCAR"};
1016 (function(){
1017     (l79).fvalue = (function(v120){
1018         ((v120)["fname"] = "MAPCAR");
1019         return v120;
1020     })((function (values,v110,v111){
1021         checkArgsAtLeast(arguments, 3);
1022         var v109= l5.value;
1023         for (var i = arguments.length-1; i>=3; i--)
1024             v109 = {car: arguments[i], cdr: 
1025         v109};
1026         return (function(){
1027             return (function(v112){
1028                 return (function(){
1029                     var v113 = ({car: l77, cdr: l5.value});
1030                     var v114 = v113;
1031                     (function(v116){
1032                         return (function(){
1033                             try {
1034                                 return (function(){
1035                                     return (function(){
1036                                         while(l4.value !== l5.value){
1037                                             (function(v117){
1038                                                 (function(){
1039                                                     return (function(v118){
1040                                                         return (function(){
1041                                                             try {
1042                                                                 return (function(){
1043                                                                     while(l4.value !== l5.value){
1044                                                                         (l13.fvalue(pv, v118) !== l5.value ? (function(){
1045                                                                             throw ({type: 'block', id: 52, values: l5.value, message: 'Return from unknown block NIL.'})
1046                                                                         })() : l5.value);
1047                                                                         (function(){
1048                                                                             (l13.fvalue(pv, (function(){
1049                                                                                 var tmp = v118;
1050                                                                                 return tmp === l5.value? l5.value: tmp.car;
1051                                                                             })()) !== l5.value ? (function(){
1052                                                                                 throw ({type: 'block', id: 49, values: l5.value, message: 'Return from unknown block LOOP.'})
1053                                                                             })() : l5.value);
1054                                                                             (function(){
1055                                                                                 var x = v118;
1056                                                                                 if (typeof x != 'object')
1057                                                                                     throw 'The value ' + x + ' is not a type object.';
1058                                                                                 return (x.car = l35.fvalue(pv, v118), x);
1059                                                                             })();
1060                                                                             return l5.value;
1061                                                                         })();
1062                                                                         (function(v119){
1063                                                                             return (v118 = v119);
1064                                                                         })((function(){
1065                                                                             var tmp = v118;
1066                                                                             return tmp === l5.value? l5.value: tmp.cdr;
1067                                                                         })());
1068                                                                     }return l5.value;
1069                                                                 })();
1070                                                             }
1071                                                             catch (cf){
1072                                                                 if (cf.type == 'block' && cf.id == 52)
1073                                                                     return cf.values;
1074                                                                 else
1075                                                                     throw cf;
1076                                                             }
1077                                                         })();
1078                                                     })(v112);
1079                                                 })();
1080                                                 return v116(pv, (function(){
1081                                                     var f = v110;
1082                                                     var args = [pv];
1083                                                     var tail = (v117);
1084                                                     while (tail != l5.value){
1085                                                         args.push(tail.car);
1086                                                         tail = tail.cdr;
1087                                                     }
1088                                                     return f.apply(this, args);
1089                                                 })());
1090                                             })(l76.fvalue(pv, (function(){
1091                                                 var symbol = l31;
1092                                                 var func = symbol.fvalue;
1093                                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1094                                                 return func;
1095                                             })(), v112));
1096                                         }return l5.value;
1097                                     })();
1098                                 })();
1099                             }
1100                             catch (cf){
1101                                 if (cf.type == 'block' && cf.id == 49)
1102                                     return cf.values;
1103                                 else
1104                                     throw cf;
1105                             }
1106                         })();
1107                     })((function (values,v115){
1108                         checkArgs(arguments, 2);
1109                         (function(){
1110                             var x = v114;
1111                             if (typeof x != 'object')
1112                                 throw 'The value ' + x + ' is not a type object.';
1113                             return (x.cdr = ({car: v115, cdr: l5.value}), x);
1114                         })();
1115                         (v114 = (function(){
1116                             var tmp = v114;
1117                             return tmp === l5.value? l5.value: tmp.cdr;
1118                         })());
1119                         return v115;
1120                     }));
1121                     return (function(){
1122                         var tmp = v113;
1123                         return tmp === l5.value? l5.value: tmp.cdr;
1124                     })();
1125                 })();
1126             })(({car: v111, cdr: v109}));
1127         })();
1128     }));
1129     return l79;
1130 })();
1131 var l80 = {name: "IDENTITY"};
1132 (function(){
1133     (l80).fvalue = (function(v122){
1134         ((v122)["fname"] = "IDENTITY");
1135         return v122;
1136     })((function (values,v121){
1137         checkArgs(arguments, 2);
1138         return (function(){
1139             return v121;
1140         })();
1141     }));
1142     return l80;
1143 })();
1144 var l81 = {name: "CONSTANTLY"};
1145 (function(){
1146     (l81).fvalue = (function(v125){
1147         ((v125)["fname"] = "CONSTANTLY");
1148         return v125;
1149     })((function (values,v123){
1150         checkArgs(arguments, 2);
1151         return (function(){
1152             return (function (values){
1153                 var v124= l5.value;
1154                 for (var i = arguments.length-1; i>=1; i--)
1155                     v124 = {car: arguments[i], cdr: 
1156                 v124};
1157                 return v123;
1158             });
1159         })();
1160     }));
1161     return l81;
1162 })();
1163 var l82 = {name: "COPY-LIST"};
1164 (function(){
1165     (l82).fvalue = (function(v127){
1166         ((v127)["fname"] = "COPY-LIST");
1167         return v127;
1168     })((function (values,v126){
1169         checkArgs(arguments, 2);
1170         return (function(){
1171             return l79.fvalue(values, (function(){
1172                 var symbol = l80;
1173                 var func = symbol.fvalue;
1174                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1175                 return func;
1176             })(), v126);
1177         })();
1178     }));
1179     return l82;
1180 })();
1181 var l83 = {name: "CODE-CHAR"};
1182 (function(){
1183     (l83).fvalue = (function(v129){
1184         ((v129)["fname"] = "CODE-CHAR");
1185         return v129;
1186     })((function (values,v128){
1187         checkArgs(arguments, 2);
1188         return (function(){
1189             return v128;
1190         })();
1191     }));
1192     return l83;
1193 })();
1194 var l84 = {name: "CHAR-CODE"};
1195 (function(){
1196     (l84).fvalue = (function(v131){
1197         ((v131)["fname"] = "CHAR-CODE");
1198         return v131;
1199     })((function (values,v130){
1200         checkArgs(arguments, 2);
1201         return (function(){
1202             return v130;
1203         })();
1204     }));
1205     return l84;
1206 })();
1207 var l85 = {name: "CHAR="};
1208 (function(){
1209     (l85).fvalue = (function(v134){
1210         ((v134)["fname"] = "CHAR=");
1211         return v134;
1212     })((function (values,v132,v133){
1213         checkArgs(arguments, 3);
1214         return (function(){
1215             return (function(){
1216                 var x1 = v132;
1217                 if (typeof x1 !== 'number') throw 'Not a number!';
1218                 var x2 = v133;
1219                 if (typeof x2 !== 'number') throw 'Not a number!';
1220                 return (x1==x2?l4.value: l5.value);
1221             })();
1222         })();
1223     }));
1224     return l85;
1225 })();
1226 var l86 = {name: "INTEGERP"};
1227 (function(){
1228     (l86).fvalue = (function(v136){
1229         ((v136)["fname"] = "INTEGERP");
1230         return v136;
1231     })((function (values,v135){
1232         checkArgs(arguments, 2);
1233         return (function(){
1234             return (((typeof (v135) == "number")?l4.value: l5.value) !== l5.value ? (function(){
1235                 var x1 = (function(){
1236                     var x = v135;
1237                     if (typeof x != 'number')
1238                         throw 'The value ' + x + ' is not a type number.';
1239                     return Math.floor(x);
1240                 })();
1241                 if (typeof x1 !== 'number') throw 'Not a number!';
1242                 var x2 = v135;
1243                 if (typeof x2 !== 'number') throw 'Not a number!';
1244                 return (x1==x2?l4.value: l5.value);
1245             })() : l5.value);
1246         })();
1247     }));
1248     return l86;
1249 })();
1250 var l87 = {name: "PLUSP"};
1251 (function(){
1252     (l87).fvalue = (function(v138){
1253         ((v138)["fname"] = "PLUSP");
1254         return v138;
1255     })((function (values,v137){
1256         checkArgs(arguments, 2);
1257         return (function(){
1258             return (function(){
1259                 var x1 = v137;
1260                 if (typeof x1 !== 'number') throw 'Not a number!';
1261                 return (0<x1?l4.value: l5.value);
1262             })();
1263         })();
1264     }));
1265     return l87;
1266 })();
1267 var l88 = {name: "MINUSP"};
1268 (function(){
1269     (l88).fvalue = (function(v140){
1270         ((v140)["fname"] = "MINUSP");
1271         return v140;
1272     })((function (values,v139){
1273         checkArgs(arguments, 2);
1274         return (function(){
1275             return (function(){
1276                 var x1 = v139;
1277                 if (typeof x1 !== 'number') throw 'Not a number!';
1278                 return (x1<0?l4.value: l5.value);
1279             })();
1280         })();
1281     }));
1282     return l88;
1283 })();
1284 (function(){
1285     (l60).fvalue = (function(v143){
1286         ((v143)["fname"] = "LISTP");
1287         return v143;
1288     })((function (values,v141){
1289         checkArgs(arguments, 2);
1290         return (function(){
1291             return (function(v142){
1292                 return (v142 !== l5.value ? v142 : l13.fvalue(values, v141));
1293             })(((function(){
1294                 var tmp = v141;
1295                 return (typeof tmp == 'object' && 'car' in tmp);
1296             })()?l4.value: l5.value));
1297         })();
1298     }));
1299     return l60;
1300 })();
1301 var l89 = {name: "NTHCDR"};
1302 (function(){
1303     (l89).fvalue = (function(v146){
1304         ((v146)["fname"] = "NTHCDR");
1305         return v146;
1306     })((function (values,v144,v145){
1307         checkArgs(arguments, 3);
1308         return (function(){
1309             (function(){
1310                 return (function(){
1311                     while((l87.fvalue(pv, v144) !== l5.value ? v145 : l5.value) !== l5.value){
1312                         (v144 = l24.fvalue(pv, v144));
1313                         (v145 = (function(){
1314                             var tmp = v145;
1315                             return tmp === l5.value? l5.value: tmp.cdr;
1316                         })());
1317                     }return l5.value;
1318                 })();
1319             })();
1320             return v145;
1321         })();
1322     }));
1323     return l89;
1324 })();
1325 var l90 = {name: "NTH"};
1326 (function(){
1327     (l90).fvalue = (function(v149){
1328         ((v149)["fname"] = "NTH");
1329         return v149;
1330     })((function (values,v147,v148){
1331         checkArgs(arguments, 3);
1332         return (function(){
1333             return (function(){
1334                 var tmp = l89.fvalue(pv, v147, v148);
1335                 return tmp === l5.value? l5.value: tmp.car;
1336             })();
1337         })();
1338     }));
1339     return l90;
1340 })();
1341 var l91 = {name: "LAST"};
1342 (function(){
1343     (l91).fvalue = (function(v151){
1344         ((v151)["fname"] = "LAST");
1345         return v151;
1346     })((function (values,v150){
1347         checkArgs(arguments, 2);
1348         return (function(){
1349             (function(){
1350                 return (function(){
1351                     while(((function(){
1352                         var tmp = (function(){
1353                             var tmp = v150;
1354                             return tmp === l5.value? l5.value: tmp.cdr;
1355                         })();
1356                         return (typeof tmp == 'object' && 'car' in tmp);
1357                     })()?l4.value: l5.value) !== l5.value){
1358                         (v150 = (function(){
1359                             var tmp = v150;
1360                             return tmp === l5.value? l5.value: tmp.cdr;
1361                         })());
1362                     }return l5.value;
1363                 })();
1364             })();
1365             return v150;
1366         })();
1367     }));
1368     return l91;
1369 })();
1370 var l92 = {name: "BUTLAST"};
1371 (function(){
1372     (l92).fvalue = (function(v153){
1373         ((v153)["fname"] = "BUTLAST");
1374         return v153;
1375     })((function (values,v152){
1376         checkArgs(arguments, 2);
1377         return (function(){
1378             return (((function(){
1379                 var tmp = (function(){
1380                     var tmp = v152;
1381                     return tmp === l5.value? l5.value: tmp.cdr;
1382                 })();
1383                 return (typeof tmp == 'object' && 'car' in tmp);
1384             })()?l4.value: l5.value) !== l5.value ? ({car: (function(){
1385                 var tmp = v152;
1386                 return tmp === l5.value? l5.value: tmp.car;
1387             })(), cdr: l92.fvalue(pv, (function(){
1388                 var tmp = v152;
1389                 return tmp === l5.value? l5.value: tmp.cdr;
1390             })())}) : l5.value);
1391         })();
1392     }));
1393     return l92;
1394 })();
1395 var l93 = {name: "MEMBER"};
1396 (function(){
1397     (l93).fvalue = (function(v156){
1398         ((v156)["fname"] = "MEMBER");
1399         return v156;
1400     })((function (values,v154,v155){
1401         checkArgs(arguments, 3);
1402         return (function(){
1403             return (function(){
1404                 try {
1405                     return (function(){
1406                         while(v155 !== l5.value){
1407                             (l27.fvalue(pv, v154, (function(){
1408                                 var tmp = v155;
1409                                 return tmp === l5.value? l5.value: tmp.car;
1410                             })()) !== l5.value ? (function(){
1411                                 var values = mv;
1412                                 throw ({type: 'block', id: 70, values: v155, message: 'Return from unknown block NIL.'})
1413                             })() : l5.value);
1414                             (v155 = (function(){
1415                                 var tmp = v155;
1416                                 return tmp === l5.value? l5.value: tmp.cdr;
1417                             })());
1418                         }return l5.value;
1419                     })();
1420                 }
1421                 catch (cf){
1422                     if (cf.type == 'block' && cf.id == 70)
1423                         return values.apply(this, forcemv(cf.values));
1424                     else
1425                         throw cf;
1426                 }
1427             })();
1428         })();
1429     }));
1430     return l93;
1431 })();
1432 var l94 = {name: "REMOVE"};
1433 (function(){
1434     (l94).fvalue = (function(v159){
1435         ((v159)["fname"] = "REMOVE");
1436         return v159;
1437     })((function (values,v157,v158){
1438         checkArgs(arguments, 3);
1439         return (function(){
1440             return (l13.fvalue(pv, v158) !== l5.value ? l5.value : (l27.fvalue(pv, v157, (function(){
1441                 var tmp = v158;
1442                 return tmp === l5.value? l5.value: tmp.car;
1443             })()) !== l5.value ? l94.fvalue(values, v157, (function(){
1444                 var tmp = v158;
1445                 return tmp === l5.value? l5.value: tmp.cdr;
1446             })()) : ({car: (function(){
1447                 var tmp = v158;
1448                 return tmp === l5.value? l5.value: tmp.car;
1449             })(), cdr: l94.fvalue(pv, v157, (function(){
1450                 var tmp = v158;
1451                 return tmp === l5.value? l5.value: tmp.cdr;
1452             })())})));
1453         })();
1454     }));
1455     return l94;
1456 })();
1457 var l95 = {name: "REMOVE-IF"};
1458 (function(){
1459     (l95).fvalue = (function(v162){
1460         ((v162)["fname"] = "REMOVE-IF");
1461         return v162;
1462     })((function (values,v160,v161){
1463         checkArgs(arguments, 3);
1464         return (function(){
1465             return (l13.fvalue(pv, v161) !== l5.value ? l5.value : ((v160)(pv, (function(){
1466                 var tmp = v161;
1467                 return tmp === l5.value? l5.value: tmp.car;
1468             })()) !== l5.value ? l95.fvalue(values, v160, (function(){
1469                 var tmp = v161;
1470                 return tmp === l5.value? l5.value: tmp.cdr;
1471             })()) : ({car: (function(){
1472                 var tmp = v161;
1473                 return tmp === l5.value? l5.value: tmp.car;
1474             })(), cdr: l95.fvalue(pv, v160, (function(){
1475                 var tmp = v161;
1476                 return tmp === l5.value? l5.value: tmp.cdr;
1477             })())})));
1478         })();
1479     }));
1480     return l95;
1481 })();
1482 var l96 = {name: "REMOVE-IF-NOT"};
1483 (function(){
1484     (l96).fvalue = (function(v165){
1485         ((v165)["fname"] = "REMOVE-IF-NOT");
1486         return v165;
1487     })((function (values,v163,v164){
1488         checkArgs(arguments, 3);
1489         return (function(){
1490             return (l13.fvalue(pv, v164) !== l5.value ? l5.value : ((v163)(pv, (function(){
1491                 var tmp = v164;
1492                 return tmp === l5.value? l5.value: tmp.car;
1493             })()) !== l5.value ? ({car: (function(){
1494                 var tmp = v164;
1495                 return tmp === l5.value? l5.value: tmp.car;
1496             })(), cdr: l96.fvalue(pv, v163, (function(){
1497                 var tmp = v164;
1498                 return tmp === l5.value? l5.value: tmp.cdr;
1499             })())}) : l96.fvalue(values, v163, (function(){
1500                 var tmp = v164;
1501                 return tmp === l5.value? l5.value: tmp.cdr;
1502             })())));
1503         })();
1504     }));
1505     return l96;
1506 })();
1507 var l97 = {name: "DIGIT-CHAR-P"};
1508 (function(){
1509     (l97).fvalue = (function(v167){
1510         ((v167)["fname"] = "DIGIT-CHAR-P");
1511         return v167;
1512     })((function (values,v166){
1513         checkArgs(arguments, 2);
1514         return (function(){
1515             return (((function(){
1516                 var x1 = v166;
1517                 if (typeof x1 !== 'number') throw 'Not a number!';
1518                 return (48<=x1?l4.value: l5.value);
1519             })() !== l5.value ? (function(){
1520                 var x1 = v166;
1521                 if (typeof x1 !== 'number') throw 'Not a number!';
1522                 return (x1<=57?l4.value: l5.value);
1523             })() : l5.value) !== l5.value ? (function(){
1524                 var x1 = v166;
1525                 if (typeof x1 !== 'number') throw 'Not a number!';
1526                 return x1-48;
1527             })() : l5.value);
1528         })();
1529     }));
1530     return l97;
1531 })();
1532 var l98 = {name: "DIGIT-CHAR"};
1533 (function(){
1534     (l98).fvalue = (function(v169){
1535         ((v169)["fname"] = "DIGIT-CHAR");
1536         return v169;
1537     })((function (values,v168){
1538         checkArgs(arguments, 2);
1539         return (function(){
1540             return ((function(){
1541                 var x1 = v168;
1542                 if (typeof x1 !== 'number') throw 'Not a number!';
1543                 return (0<=x1 && x1<=9?l4.value: l5.value);
1544             })() !== l5.value ? (function(){
1545                 var string = "0123456789";
1546                 var index = v168;
1547                 if (typeof string != 'string')
1548                     throw 'The value ' + string + ' is not a type string.';
1549                 if (typeof index != 'number')
1550                     throw 'The value ' + index + ' is not a type number.';
1551                 return string.charCodeAt(index);
1552             })() : l5.value);
1553         })();
1554     }));
1555     return l98;
1556 })();
1557 var l99 = {name: "SUBSEQ"};
1558 (function(){
1559     (l99).fvalue = (function(v173){
1560         ((v173)["fname"] = "SUBSEQ");
1561         return v173;
1562     })((function (values,v170,v171,v172){
1563         checkArgsAtLeast(arguments, 3);
1564         checkArgsAtMost(arguments, 4);
1565         var v172; 
1566         switch(arguments.length-1){
1567         case 2:
1568             v172=l5.value;
1569         default: break;
1570         }
1571         return (function(){
1572             return (((typeof(v170) == "string")?l4.value: l5.value) !== l5.value ? (v172 !== l5.value ? (function(){
1573                 var str = v170;
1574                 var a = v171;
1575                 var b;
1576                 b = v172;
1577                 return str.slice(a,b);
1578             })() : (function(){
1579                 var str = v170;
1580                 var a = v171;
1581                 var b;
1582                 return str.slice(a,b);
1583             })()) : (function(){
1584                 throw "Unsupported argument.";
1585             })());
1586         })();
1587     }));
1588     return l99;
1589 })();
1590 var l100 = {name: "SOME"};
1591 (function(){
1592     (l100).fvalue = (function(v180){
1593         ((v180)["fname"] = "SOME");
1594         return v180;
1595     })((function (values,v174,v175){
1596         checkArgs(arguments, 3);
1597         return (function(){
1598             try {
1599                 return (((typeof(v175) == "string")?l4.value: l5.value) !== l5.value ? (function(v176,v177){
1600                     (function(){
1601                         return (function(){
1602                             while((function(){
1603                                 var x1 = v176;
1604                                 if (typeof x1 !== 'number') throw 'Not a number!';
1605                                 var x2 = v177;
1606                                 if (typeof x2 !== 'number') throw 'Not a number!';
1607                                 return (x1<x2?l4.value: l5.value);
1608                             })() !== l5.value){
1609                                 ((v174)(pv, (function(){
1610                                     var string = v175;
1611                                     var index = v176;
1612                                     if (typeof string != 'string')
1613                                         throw 'The value ' + string + ' is not a type string.';
1614                                     if (typeof index != 'number')
1615                                         throw 'The value ' + index + ' is not a type number.';
1616                                     return string.charCodeAt(index);
1617                                 })()) !== l5.value ? (function(){
1618                                     var values = mv;
1619                                     throw ({type: 'block', id: 77, values: l4.value, message: 'Return from unknown block SOME.'})
1620                                 })() : l5.value);
1621                                 (v176 = (function(){
1622                                     var x1 = v176;
1623                                     if (typeof x1 !== 'number') throw 'Not a number!';
1624                                     return x1+1;
1625                                 })());
1626                             }return l5.value;
1627                         })();
1628                     })();
1629                     return l5.value;
1630                 })(0,l73.fvalue(pv, v175)) : (l60.fvalue(pv, v175) !== l5.value ? (function(){
1631                     try {
1632                         return (function(v178,v179){
1633                             (function(){
1634                                 while(v178 !== l5.value){
1635                                     (v179 = (function(){
1636                                         var tmp = v178;
1637                                         return tmp === l5.value? l5.value: tmp.car;
1638                                     })());
1639                                     (function(){
1640                                         ((v174)(pv, v179) !== l5.value ? (function(){
1641                                             var values = mv;
1642                                             throw ({type: 'block', id: 79, values: l4.value, message: 'Return from unknown block NIL.'})
1643                                         })() : l5.value);
1644                                         return l5.value;
1645                                     })();
1646                                     (v178 = (function(){
1647                                         var tmp = v178;
1648                                         return tmp === l5.value? l5.value: tmp.cdr;
1649                                     })());
1650                                 }return l5.value;
1651                             })();
1652                             return l5.value;
1653                         })(v175,l5.value);
1654                     }
1655                     catch (cf){
1656                         if (cf.type == 'block' && cf.id == 79)
1657                             return values.apply(this, forcemv(cf.values));
1658                         else
1659                             throw cf;
1660                     }
1661                 })() : (function(){
1662                     throw "Unknown sequence.";
1663                 })()));
1664             }
1665             catch (cf){
1666                 if (cf.type == 'block' && cf.id == 77)
1667                     return values.apply(this, forcemv(cf.values));
1668                 else
1669                     throw cf;
1670             }
1671         })();
1672     }));
1673     return l100;
1674 })();
1675 var l101 = {name: "EVERY"};
1676 (function(){
1677     (l101).fvalue = (function(v187){
1678         ((v187)["fname"] = "EVERY");
1679         return v187;
1680     })((function (values,v181,v182){
1681         checkArgs(arguments, 3);
1682         return (function(){
1683             try {
1684                 return (((typeof(v182) == "string")?l4.value: l5.value) !== l5.value ? (function(v183,v184){
1685                     (function(){
1686                         return (function(){
1687                             while((function(){
1688                                 var x1 = v183;
1689                                 if (typeof x1 !== 'number') throw 'Not a number!';
1690                                 var x2 = v184;
1691                                 if (typeof x2 !== 'number') throw 'Not a number!';
1692                                 return (x1<x2?l4.value: l5.value);
1693                             })() !== l5.value){
1694                                 ((v181)(pv, (function(){
1695                                     var string = v182;
1696                                     var index = v183;
1697                                     if (typeof string != 'string')
1698                                         throw 'The value ' + string + ' is not a type string.';
1699                                     if (typeof index != 'number')
1700                                         throw 'The value ' + index + ' is not a type number.';
1701                                     return string.charCodeAt(index);
1702                                 })()) !== l5.value ? l5.value : (function(){
1703                                     var values = mv;
1704                                     throw ({type: 'block', id: 80, values: l5.value, message: 'Return from unknown block EVERY.'})
1705                                 })());
1706                                 (v183 = (function(){
1707                                     var x1 = v183;
1708                                     if (typeof x1 !== 'number') throw 'Not a number!';
1709                                     return x1+1;
1710                                 })());
1711                             }return l5.value;
1712                         })();
1713                     })();
1714                     return l4.value;
1715                 })(0,l73.fvalue(pv, v182)) : (l60.fvalue(pv, v182) !== l5.value ? (function(){
1716                     try {
1717                         return (function(v185,v186){
1718                             (function(){
1719                                 while(v185 !== l5.value){
1720                                     (v186 = (function(){
1721                                         var tmp = v185;
1722                                         return tmp === l5.value? l5.value: tmp.car;
1723                                     })());
1724                                     (function(){
1725                                         ((v181)(pv, v186) !== l5.value ? l5.value : (function(){
1726                                             var values = mv;
1727                                             throw ({type: 'block', id: 82, values: l5.value, message: 'Return from unknown block NIL.'})
1728                                         })());
1729                                         return l5.value;
1730                                     })();
1731                                     (v185 = (function(){
1732                                         var tmp = v185;
1733                                         return tmp === l5.value? l5.value: tmp.cdr;
1734                                     })());
1735                                 }return l5.value;
1736                             })();
1737                             return l4.value;
1738                         })(v182,l5.value);
1739                     }
1740                     catch (cf){
1741                         if (cf.type == 'block' && cf.id == 82)
1742                             return values.apply(this, forcemv(cf.values));
1743                         else
1744                             throw cf;
1745                     }
1746                 })() : (function(){
1747                     throw "Unknown sequence.";
1748                 })()));
1749             }
1750             catch (cf){
1751                 if (cf.type == 'block' && cf.id == 80)
1752                     return values.apply(this, forcemv(cf.values));
1753                 else
1754                     throw cf;
1755             }
1756         })();
1757     }));
1758     return l101;
1759 })();
1760 var l102 = {name: "ASSOC"};
1761 (function(){
1762     (l102).fvalue = (function(v190){
1763         ((v190)["fname"] = "ASSOC");
1764         return v190;
1765     })((function (values,v188,v189){
1766         checkArgs(arguments, 3);
1767         return (function(){
1768             (function(){
1769                 try {
1770                     return (function(){
1771                         while(v189 !== l5.value){
1772                             (l27.fvalue(pv, v188, l33.fvalue(pv, v189)) !== l5.value ? (function(){
1773                                 throw ({type: 'block', id: 84, values: l5.value, message: 'Return from unknown block NIL.'})
1774                             })() : (v189 = (function(){
1775                                 var tmp = v189;
1776                                 return tmp === l5.value? l5.value: tmp.cdr;
1777                             })()));
1778                         }return l5.value;
1779                     })();
1780                 }
1781                 catch (cf){
1782                     if (cf.type == 'block' && cf.id == 84)
1783                         return cf.values;
1784                     else
1785                         throw cf;
1786                 }
1787             })();
1788             return (function(){
1789                 var tmp = v189;
1790                 return tmp === l5.value? l5.value: tmp.car;
1791             })();
1792         })();
1793     }));
1794     return l102;
1795 })();
1796 var l103 = {name: "STRING"};
1797 (function(){
1798     (l103).fvalue = (function(v192){
1799         ((v192)["fname"] = "STRING");
1800         return v192;
1801     })((function (values,v191){
1802         checkArgs(arguments, 2);
1803         return (function(){
1804             return (((typeof(v191) == "string")?l4.value: l5.value) !== l5.value ? v191 : (((function(){
1805                 var tmp = v191;
1806                 return (typeof tmp == 'object' && 'name' in tmp);
1807             })()?l4.value: l5.value) !== l5.value ? (v191).name : (function(){
1808                 var x = v191;
1809                 if (typeof x != 'number')
1810                     throw 'The value ' + x + ' is not a type number.';
1811                 return String.fromCharCode(x);
1812             })()));
1813         })();
1814     }));
1815     return l103;
1816 })();
1817 var l104 = {name: "STRING="};
1818 (function(){
1819     (l104).fvalue = (function(v195){
1820         ((v195)["fname"] = "STRING=");
1821         return v195;
1822     })((function (values,v193,v194){
1823         checkArgs(arguments, 3);
1824         return (function(){
1825             return ((v193 == v194)?l4.value: l5.value);
1826         })();
1827     }));
1828     return l104;
1829 })();
1830 var l105 = {name: "FDEFINITION"};
1831 (function(){
1832     (l105).fvalue = (function(v197){
1833         ((v197)["fname"] = "FDEFINITION");
1834         return v197;
1835     })((function (values,v196){
1836         checkArgs(arguments, 2);
1837         return (function(){
1838             return (((typeof v196 == 'function')?l4.value: l5.value) !== l5.value ? v196 : (((function(){
1839                 var tmp = v196;
1840                 return (typeof tmp == 'object' && 'name' in tmp);
1841             })()?l4.value: l5.value) !== l5.value ? (function(){
1842                 var symbol = v196;
1843                 var func = symbol.fvalue;
1844                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1845                 return func;
1846             })() : (function(){
1847                 throw "Invalid function";
1848             })()));
1849         })();
1850     }));
1851     return l105;
1852 })();
1853 var l106 = {name: "DISASSEMBLE"};
1854 var l107 = {name: "WRITE-LINE"};
1855 (function(){
1856     (l106).fvalue = (function(v199){
1857         ((v199)["fname"] = "DISASSEMBLE");
1858         return v199;
1859     })((function (values,v198){
1860         checkArgs(arguments, 2);
1861         return (function(){
1862             l107.fvalue(pv, (l105.fvalue(pv, v198)).toString());
1863             return l5.value;
1864         })();
1865     }));
1866     return l106;
1867 })();
1868 var l108 = {name: "DOCUMENTATION"};
1869 var l109 = {name: "FUNCTION"};
1870 var l110 = {name: "VARIABLE"};
1871 (function(){
1872     (l108).fvalue = (function(v204){
1873         ((v204)["fname"] = "DOCUMENTATION");
1874         return v204;
1875     })((function(){
1876         var func = (function (values,v200,v201){
1877             checkArgs(arguments, 3);
1878             return (function(){
1879                 return (function(v202){
1880                     return (l27.fvalue(pv, v202, l109) !== l5.value ? (function(v203){
1881                         return (function(){
1882                             var tmp = (v203)["docstring"];
1883                             return tmp == undefined? l5.value: tmp ;
1884                         })();
1885                     })(l105.fvalue(pv, v200)) : (l27.fvalue(pv, v202, l110) !== l5.value ? (function(){
1886                         (((function(){
1887                             var tmp = v200;
1888                             return (typeof tmp == 'object' && 'name' in tmp);
1889                         })()?l4.value: l5.value) !== l5.value ? l5.value : (function(){
1890                             throw "Wrong argument type! it should be a symbol";
1891                         })());
1892                         return (function(){
1893                             var tmp = (v200)["vardoc"];
1894                             return tmp == undefined? l5.value: tmp ;
1895                         })();
1896                     })() : (function(){
1897                         throw "ECASE expression failed.";
1898                     })()));
1899                 })(v201);
1900             })();
1901         });
1902         func.docstring = 'Return the documentation of X. TYPE must be the symbol VARIABLE or FUNCTION.';
1903         return func;
1904     })());
1905     return l108;
1906 })();
1907 var l111 = {name: "MULTIPLE-VALUE-BIND"};
1908 l111;
1909 var l112 = {name: "MULTIPLE-VALUE-LIST"};
1910 l112;
1911 var l113 = {name: "*SETF-EXPANDERS*"};
1912 (function(){
1913     (((l113.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l113).value = l5.value));
1914     return l113;
1915 })();
1916 var l114 = {name: "GET-SETF-EXPANSION"};
1917 var l115 = {name: "SETQ"};
1918 (function(){
1919     (l114).fvalue = (function(v209){
1920         ((v209)["fname"] = "GET-SETF-EXPANSION");
1921         return v209;
1922     })((function (values,v205){
1923         checkArgs(arguments, 2);
1924         return (function(){
1925             return (((function(){
1926                 var tmp = v205;
1927                 return (typeof tmp == 'object' && 'name' in tmp);
1928             })()?l4.value: l5.value) !== l5.value ? (function(v206){
1929                 return values(l5.value, l5.value, l66.fvalue(pv, l45.fvalue(pv, v206)), l66.fvalue(pv, l45.fvalue(pv, l115), l45.fvalue(pv, v205), l45.fvalue(pv, v206)), v205);
1930             })(l17.fvalue(pv)) : (function(){
1931                 var v207 = (function(){
1932                     var tmp = v205;
1933                     return tmp === l5.value? l5.value: tmp.car;
1934                 })();
1935                 var v208 = (function(){
1936                     var tmp = l102.fvalue(pv, v207, (function(){
1937                         var symbol = l113;
1938                         var value = symbol.value;
1939                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
1940                         return value;
1941                     })());
1942                     return tmp === l5.value? l5.value: tmp.cdr;
1943                 })();
1944                 (l13.fvalue(pv, v208) !== l5.value ? (function(){
1945                     throw "Unknown generalized reference.";
1946                 })() : l5.value);
1947                 return (function(){
1948                     var f = v208;
1949                     var args = [values];
1950                     var tail = ((function(){
1951                         var tmp = v205;
1952                         return tmp === l5.value? l5.value: tmp.cdr;
1953                     })());
1954                     while (tail != l5.value){
1955                         args.push(tail.car);
1956                         tail = tail.cdr;
1957                     }
1958                     return f.apply(this, args);
1959                 })();
1960             })());
1961         })();
1962     }));
1963     return l114;
1964 })();
1965 var l116 = {name: "DEFINE-SETF-EXPANDER"};
1966 l116;
1967 var l117 = {name: "SETF"};
1968 l117;
1969 var l118 = {name: "PROGN"};
1970 var l119 = {name: "RPLACA"};
1971 (function(){
1972     ((l113).value = ({car: ({car: l31, cdr: (function (values,v210){
1973         checkArgs(arguments, 2);
1974         return (function(v211,v212){
1975             return values(l45.fvalue(pv, v211), l45.fvalue(pv, v210), l45.fvalue(pv, v212), l66.fvalue(pv, l45.fvalue(pv, l118), l45.fvalue(pv, l66.fvalue(pv, l45.fvalue(pv, l119), l45.fvalue(pv, v211), l45.fvalue(pv, v212))), l45.fvalue(pv, v212)), l66.fvalue(pv, l45.fvalue(pv, l31), l45.fvalue(pv, v211)));
1976         })(l17.fvalue(pv),l17.fvalue(pv));
1977     })}), cdr: (function(){
1978         var symbol = l113;
1979         var value = symbol.value;
1980         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
1981         return value;
1982     })()}));
1983     return l31;
1984 })();
1985 var l120 = {name: "RPLACD"};
1986 (function(){
1987     ((l113).value = ({car: ({car: l32, cdr: (function (values,v213){
1988         checkArgs(arguments, 2);
1989         return (function(v214,v215){
1990             return values(l45.fvalue(pv, v214), l45.fvalue(pv, v213), l45.fvalue(pv, v215), l66.fvalue(pv, l45.fvalue(pv, l118), l45.fvalue(pv, l66.fvalue(pv, l45.fvalue(pv, l120), l45.fvalue(pv, v214), l45.fvalue(pv, v215))), l45.fvalue(pv, v215)), l66.fvalue(pv, l45.fvalue(pv, l31), l45.fvalue(pv, v214)));
1991         })(l17.fvalue(pv),l17.fvalue(pv));
1992     })}), cdr: (function(){
1993         var symbol = l113;
1994         var value = symbol.value;
1995         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
1996         return value;
1997     })()}));
1998     return l32;
1999 })();
2000 var l121 = {name: "*PACKAGE-LIST*"};
2001 (function(){
2002     (((l121.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l121).value = l5.value));
2003     return l121;
2004 })();
2005 var l122 = {name: "LIST-ALL-PACKAGES"};
2006 (function(){
2007     (l122).fvalue = (function(v216){
2008         ((v216)["fname"] = "LIST-ALL-PACKAGES");
2009         return v216;
2010     })((function (values){
2011         checkArgsAtMost(arguments, 1);
2012         return (function(){
2013             return (function(){
2014                 var symbol = l121;
2015                 var value = symbol.value;
2016                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2017                 return value;
2018             })();
2019         })();
2020     }));
2021     return l122;
2022 })();
2023 var l123 = {name: "MAKE-PACKAGE"};
2024 var l124 = {name: "USE", 'package': 'KEYWORD'};
2025 var l125 = {name: "FIND-PACKAGE-OR-FAIL"};
2026 (function(){
2027     (l123).fvalue = (function(v221){
2028         ((v221)["fname"] = "MAKE-PACKAGE");
2029         return v221;
2030     })((function (values,v217){
2031         checkArgsAtLeast(arguments, 2);
2032         var v218; 
2033         var i;
2034         for (i=2; i<arguments.length; i+=2){
2035             if (arguments[i] === l124.value){
2036                 v218 = arguments[i+1];
2037                 break;
2038             }
2039         }
2040         if (i == arguments.length){
2041             v218 = l5.value;
2042         }
2043         for (i=2; i<arguments.length; i+=2){
2044             if (arguments[i] !== l124.value)
2045                 throw 'Unknown keyword argument ' + arguments[i].name;
2046         }
2047         return (function(){
2048             return (function(v219,v220){
2049                 ((v219)["packageName"] = v217);
2050                 ((v219)["symbols"] = {});
2051                 ((v219)["exports"] = {});
2052                 ((v219)["use"] = v220);
2053                 ((l121).value = ({car: v219, cdr: (function(){
2054                     var symbol = l121;
2055                     var value = symbol.value;
2056                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2057                     return value;
2058                 })()}));
2059                 return v219;
2060             })({},l79.fvalue(pv, (function(){
2061                 var symbol = l125;
2062                 var func = symbol.fvalue;
2063                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2064                 return func;
2065             })(), v218));
2066         })();
2067     }));
2068     return l123;
2069 })();
2070 var l126 = {name: "PACKAGEP"};
2071 (function(){
2072     (l126).fvalue = (function(v223){
2073         ((v223)["fname"] = "PACKAGEP");
2074         return v223;
2075     })((function (values,v222){
2076         checkArgs(arguments, 2);
2077         return (function(){
2078             return (((typeof (v222) === 'object')?l4.value: l5.value) !== l5.value ? ((("symbols") in (v222))?l4.value: l5.value) : l5.value);
2079         })();
2080     }));
2081     return l126;
2082 })();
2083 var l127 = {name: "FIND-PACKAGE"};
2084 var l128 = {name: "PACKAGE-NAME"};
2085 (function(){
2086     (l127).fvalue = (function(v228){
2087         ((v228)["fname"] = "FIND-PACKAGE");
2088         return v228;
2089     })((function (values,v224){
2090         checkArgs(arguments, 2);
2091         return (function(){
2092             try {
2093                 (l126.fvalue(pv, v224) !== l5.value ? (function(){
2094                     var values = mv;
2095                     throw ({type: 'block', id: 94, values: v224, message: 'Return from unknown block FIND-PACKAGE.'})
2096                 })() : l5.value);
2097                 return (function(v225){
2098                     return (function(){
2099                         try {
2100                             return (function(v226,v227){
2101                                 (function(){
2102                                     while(v226 !== l5.value){
2103                                         (v227 = (function(){
2104                                             var tmp = v226;
2105                                             return tmp === l5.value? l5.value: tmp.car;
2106                                         })());
2107                                         (function(){
2108                                             (l104.fvalue(pv, l128.fvalue(pv, v227), v225) !== l5.value ? (function(){
2109                                                 var values = mv;
2110                                                 throw ({type: 'block', id: 95, values: v227, message: 'Return from unknown block NIL.'})
2111                                             })() : l5.value);
2112                                             return l5.value;
2113                                         })();
2114                                         (v226 = (function(){
2115                                             var tmp = v226;
2116                                             return tmp === l5.value? l5.value: tmp.cdr;
2117                                         })());
2118                                     }return l5.value;
2119                                 })();
2120                                 return l5.value;
2121                             })((function(){
2122                                 var symbol = l121;
2123                                 var value = symbol.value;
2124                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2125                                 return value;
2126                             })(),l5.value);
2127                         }
2128                         catch (cf){
2129                             if (cf.type == 'block' && cf.id == 95)
2130                                 return values.apply(this, forcemv(cf.values));
2131                             else
2132                                 throw cf;
2133                         }
2134                     })();
2135                 })(l103.fvalue(pv, v224));
2136             }
2137             catch (cf){
2138                 if (cf.type == 'block' && cf.id == 94)
2139                     return values.apply(this, forcemv(cf.values));
2140                 else
2141                     throw cf;
2142             }
2143         })();
2144     }));
2145     return l127;
2146 })();
2147 (function(){
2148     (l125).fvalue = (function(v231){
2149         ((v231)["fname"] = "FIND-PACKAGE-OR-FAIL");
2150         return v231;
2151     })((function (values,v229){
2152         checkArgs(arguments, 2);
2153         return (function(){
2154             return (function(v230){
2155                 return (v230 !== l5.value ? v230 : (function(){
2156                     throw "Package unknown.";
2157                 })());
2158             })(l127.fvalue(pv, v229));
2159         })();
2160     }));
2161     return l125;
2162 })();
2163 (function(){
2164     (l128).fvalue = (function(v234){
2165         ((v234)["fname"] = "PACKAGE-NAME");
2166         return v234;
2167     })((function (values,v232){
2168         checkArgs(arguments, 2);
2169         return (function(){
2170             return (function(v233){
2171                 return (function(){
2172                     var tmp = (v233)["packageName"];
2173                     return tmp == undefined? l5.value: tmp ;
2174                 })();
2175             })(l125.fvalue(pv, v232));
2176         })();
2177     }));
2178     return l128;
2179 })();
2180 var l129 = {name: "%PACKAGE-SYMBOLS"};
2181 (function(){
2182     (l129).fvalue = (function(v237){
2183         ((v237)["fname"] = "%PACKAGE-SYMBOLS");
2184         return v237;
2185     })((function (values,v235){
2186         checkArgs(arguments, 2);
2187         return (function(){
2188             return (function(v236){
2189                 return (function(){
2190                     var tmp = (v236)["symbols"];
2191                     return tmp == undefined? l5.value: tmp ;
2192                 })();
2193             })(l125.fvalue(pv, v235));
2194         })();
2195     }));
2196     return l129;
2197 })();
2198 var l130 = {name: "PACKAGE-USE-LIST"};
2199 (function(){
2200     (l130).fvalue = (function(v240){
2201         ((v240)["fname"] = "PACKAGE-USE-LIST");
2202         return v240;
2203     })((function (values,v238){
2204         checkArgs(arguments, 2);
2205         return (function(){
2206             return (function(v239){
2207                 return (function(){
2208                     var tmp = (v239)["use"];
2209                     return tmp == undefined? l5.value: tmp ;
2210                 })();
2211             })(l125.fvalue(pv, v238));
2212         })();
2213     }));
2214     return l130;
2215 })();
2216 var l131 = {name: "%PACKAGE-EXTERNAL-SYMBOLS"};
2217 (function(){
2218     (l131).fvalue = (function(v243){
2219         ((v243)["fname"] = "%PACKAGE-EXTERNAL-SYMBOLS");
2220         return v243;
2221     })((function (values,v241){
2222         checkArgs(arguments, 2);
2223         return (function(){
2224             return (function(v242){
2225                 return (function(){
2226                     var tmp = (v242)["exports"];
2227                     return tmp == undefined? l5.value: tmp ;
2228                 })();
2229             })(l125.fvalue(pv, v241));
2230         })();
2231     }));
2232     return l131;
2233 })();
2234 var l132 = {name: "*COMMON-LISP-PACKAGE*"};
2235 (function(){
2236     (((l132.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l132).value = l123.fvalue(pv, "CL")));
2237     return l132;
2238 })();
2239 var l133 = {name: "*USER-PACKAGE*"};
2240 (function(){
2241     (((l133.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l133).value = l123.fvalue(pv, "CL-USER", l124.value, l45.fvalue(pv, (function(){
2242         var symbol = l132;
2243         var value = symbol.value;
2244         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2245         return value;
2246     })()))));
2247     return l133;
2248 })();
2249 var l134 = {name: "*KEYWORD-PACKAGE*"};
2250 (function(){
2251     (((l134.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l134).value = l123.fvalue(pv, "KEYWORD")));
2252     return l134;
2253 })();
2254 var l135 = {name: "KEYWORDP"};
2255 var l136 = {name: "SYMBOL-PACKAGE"};
2256 (function(){
2257     (l135).fvalue = (function(v245){
2258         ((v245)["fname"] = "KEYWORDP");
2259         return v245;
2260     })((function (values,v244){
2261         checkArgs(arguments, 2);
2262         return (function(){
2263             return (((function(){
2264                 var tmp = v244;
2265                 return (typeof tmp == 'object' && 'name' in tmp);
2266             })()?l4.value: l5.value) !== l5.value ? ((l136.fvalue(pv, v244) === (function(){
2267                 var symbol = l134;
2268                 var value = symbol.value;
2269                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2270                 return value;
2271             })())?l4.value: l5.value) : l5.value);
2272         })();
2273     }));
2274     return l135;
2275 })();
2276 var l137 = {name: "*PACKAGE*"};
2277 (function(){
2278     (((l137.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l137).value = (function(){
2279         var symbol = l132;
2280         var value = symbol.value;
2281         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2282         return value;
2283     })()));
2284     return l137;
2285 })();
2286 var l138 = {name: "IN-PACKAGE"};
2287 l138;
2288 var l139 = {name: "%INTERN-SYMBOL"};
2289 (function(){
2290     (l139).fvalue = (function(v249){
2291         ((v249)["fname"] = "%INTERN-SYMBOL");
2292         return v249;
2293     })((function (values,v246){
2294         checkArgs(arguments, 2);
2295         return (function(){
2296             return (function(){
2297                 var v247 = (((("package") in (v246))?l4.value: l5.value) !== l5.value ? l125.fvalue(pv, (function(){
2298                     var tmp = (v246)["package"];
2299                     return tmp == undefined? l5.value: tmp ;
2300                 })()) : (function(){
2301                     var symbol = l132;
2302                     var value = symbol.value;
2303                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2304                     return value;
2305                 })());
2306                 var v248 = l129.fvalue(pv, v247);
2307                 ((v246)["package"] = v247);
2308                 (((v247 === (function(){
2309                     var symbol = l134;
2310                     var value = symbol.value;
2311                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2312                     return value;
2313                 })())?l4.value: l5.value) !== l5.value ? ((v246)["value"] = v246) : l5.value);
2314                 return ((v248)[(v246).name] = v246);
2315             })();
2316         })();
2317     }));
2318     return l139;
2319 })();
2320 var l140 = {name: "FIND-SYMBOL"};
2321 var l141 = {name: "EXTERNAL", 'package': 'KEYWORD'};
2322 var l142 = {name: "INTERNAL", 'package': 'KEYWORD'};
2323 var l143 = {name: "INHERIT", 'package': 'KEYWORD'};
2324 (function(){
2325     (l140).fvalue = (function(v258){
2326         ((v258)["fname"] = "FIND-SYMBOL");
2327         return v258;
2328     })((function (values,v250,v251){
2329         checkArgsAtLeast(arguments, 2);
2330         checkArgsAtMost(arguments, 3);
2331         var v251; 
2332         switch(arguments.length-1){
2333         case 1:
2334             v251=(function(){
2335                 var symbol = l137;
2336                 var value = symbol.value;
2337                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2338                 return value;
2339             })();
2340         default: break;
2341         }
2342         return (function(){
2343             return (function(){
2344                 var v252 = l125.fvalue(pv, v251);
2345                 var v253 = l131.fvalue(pv, v252);
2346                 var v254 = l129.fvalue(pv, v252);
2347                 return ((((v250) in (v253))?l4.value: l5.value) !== l5.value ? values((function(){
2348                     var tmp = (v253)[v250];
2349                     return tmp == undefined? l5.value: tmp ;
2350                 })(), l141.value) : ((((v250) in (v254))?l4.value: l5.value) !== l5.value ? values((function(){
2351                     var tmp = (v254)[v250];
2352                     return tmp == undefined? l5.value: tmp ;
2353                 })(), l142.value) : (function(){
2354                     try {
2355                         return (function(v255,v256){
2356                             (function(){
2357                                 while(v255 !== l5.value){
2358                                     (v256 = (function(){
2359                                         var tmp = v255;
2360                                         return tmp === l5.value? l5.value: tmp.car;
2361                                     })());
2362                                     (function(){
2363                                         (function(v257){
2364                                             return ((((v250) in (v257))?l4.value: l5.value) !== l5.value ? (function(){
2365                                                 var values = mv;
2366                                                 throw ({type: 'block', id: 104, values: values((function(){
2367                                                     var tmp = (v257)[v250];
2368                                                     return tmp == undefined? l5.value: tmp ;
2369                                                 })(), l143.value), message: 'Return from unknown block NIL.'})
2370                                             })() : l5.value);
2371                                         })(l131.fvalue(pv, v256));
2372                                         return l5.value;
2373                                     })();
2374                                     (v255 = (function(){
2375                                         var tmp = v255;
2376                                         return tmp === l5.value? l5.value: tmp.cdr;
2377                                     })());
2378                                 }return l5.value;
2379                             })();
2380                             return values(l5.value, l5.value);
2381                         })(l130.fvalue(pv, v252),l5.value);
2382                     }
2383                     catch (cf){
2384                         if (cf.type == 'block' && cf.id == 104)
2385                             return values.apply(this, forcemv(cf.values));
2386                         else
2387                             throw cf;
2388                     }
2389                 })()));
2390             })();
2391         })();
2392     }));
2393     return l140;
2394 })();
2395 var l144 = {name: "INTERN"};
2396 var l145 = {name: "EXPORT"};
2397 (function(){
2398     (l144).fvalue = (function(v267){
2399         ((v267)["fname"] = "INTERN");
2400         return v267;
2401     })((function (values,v259,v260){
2402         checkArgsAtLeast(arguments, 2);
2403         checkArgsAtMost(arguments, 3);
2404         var v260; 
2405         switch(arguments.length-1){
2406         case 1:
2407             v260=(function(){
2408                 var symbol = l137;
2409                 var value = symbol.value;
2410                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2411                 return value;
2412             })();
2413         default: break;
2414         }
2415         return (function(){
2416             return (function(v261){
2417                 return (function(){
2418                     var func = (function (values,v263,v264){
2419                         var v263; 
2420                         var v264; 
2421                         switch(arguments.length-1){
2422                         case 0:
2423                             v263=l5.value;
2424                         case 1:
2425                             v264=l5.value;
2426                         default: break;
2427                         }
2428                         var v262= l5.value;
2429                         for (var i = arguments.length-1; i>=3; i--)
2430                             v262 = {car: arguments[i], cdr: 
2431                         v262};
2432                         return (v264 !== l5.value ? values(v263, v264) : (function(v265){
2433                             (function(){
2434                                 var tmp = (v265)[v259];
2435                                 return tmp == undefined? l5.value: tmp ;
2436                             })();
2437                             return (function(v266){
2438                                 ((v266)["package"] = v261);
2439                                 (((v261 === (function(){
2440                                     var symbol = l134;
2441                                     var value = symbol.value;
2442                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2443                                     return value;
2444                                 })())?l4.value: l5.value) !== l5.value ? (function(){
2445                                     ((v266)["value"] = v266);
2446                                     return l145.fvalue(pv, l45.fvalue(pv, v266), v261);
2447                                 })() : l5.value);
2448                                 ((v265)[v259] = v266);
2449                                 return values(v266, l5.value);
2450                             })((function(){
2451                                 var name = v259;
2452                                 if (typeof name != 'string')
2453                                     throw 'The value ' + name + ' is not a type string.';
2454                                 return ({name: name});
2455                             })());
2456                         })(l129.fvalue(pv, v261)));
2457                     });
2458                     var args = [values];
2459                     return (function(){
2460                         var values = mv;
2461                         var vs;
2462                         vs = l140.fvalue(values, v259, v261);
2463                         if (typeof vs === 'object' && 'multiple-value' in vs)
2464                             args = args.concat(vs);
2465                         else
2466                             args.push(vs);
2467                         return func.apply(window, args);
2468                     })();
2469                 })();
2470             })(l125.fvalue(pv, v260));
2471         })();
2472     }));
2473     return l144;
2474 })();
2475 (function(){
2476     (l136).fvalue = (function(v269){
2477         ((v269)["fname"] = "SYMBOL-PACKAGE");
2478         return v269;
2479     })((function (values,v268){
2480         checkArgs(arguments, 2);
2481         return (function(){
2482             (((function(){
2483                 var tmp = v268;
2484                 return (typeof tmp == 'object' && 'name' in tmp);
2485             })()?l4.value: l5.value) !== l5.value ? l5.value : (function(){
2486                 throw "it is not a symbol";
2487             })());
2488             return (function(){
2489                 var tmp = (v268)["package"];
2490                 return tmp == undefined? l5.value: tmp ;
2491             })();
2492         })();
2493     }));
2494     return l136;
2495 })();
2496 (function(){
2497     (l145).fvalue = (function(v275){
2498         ((v275)["fname"] = "EXPORT");
2499         return v275;
2500     })((function (values,v270,v271){
2501         checkArgsAtLeast(arguments, 2);
2502         checkArgsAtMost(arguments, 3);
2503         var v271; 
2504         switch(arguments.length-1){
2505         case 1:
2506             v271=(function(){
2507                 var symbol = l137;
2508                 var value = symbol.value;
2509                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2510                 return value;
2511             })();
2512         default: break;
2513         }
2514         return (function(){
2515             return (function(v272){
2516                 return (function(){
2517                     return (function(v273,v274){
2518                         (function(){
2519                             while(v273 !== l5.value){
2520                                 (v274 = (function(){
2521                                     var tmp = v273;
2522                                     return tmp === l5.value? l5.value: tmp.car;
2523                                 })());
2524                                 (function(){
2525                                     ((v272)[(v274).name] = v274);
2526                                     return l5.value;
2527                                 })();
2528                                 (v273 = (function(){
2529                                     var tmp = v273;
2530                                     return tmp === l5.value? l5.value: tmp.cdr;
2531                                 })());
2532                             }return l5.value;
2533                         })();
2534                         return l4.value;
2535                     })(v270,l5.value);
2536                 })();
2537             })(l131.fvalue(pv, v271));
2538         })();
2539     }));
2540     return l145;
2541 })();
2542 var l146 = {name: "GET-UNIVERSAL-TIME"};
2543 (function(){
2544     (l146).fvalue = (function(v276){
2545         ((v276)["fname"] = "GET-UNIVERSAL-TIME");
2546         return v276;
2547     })((function (values){
2548         checkArgsAtMost(arguments, 1);
2549         return (function(){
2550             return (function(){
2551                 var x1 = (Math.round(new Date() / 1000));
2552                 if (typeof x1 !== 'number') throw 'Not a number!';
2553                 return x1+2208988800;
2554             })();
2555         })();
2556     }));
2557     return l146;
2558 })();
2559 var l147 = {name: "*NEWLINE*"};
2560 (function(){
2561     (((l147.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l147).value = l103.fvalue(pv, l83.fvalue(pv, 10))));
2562     return l147;
2563 })();
2564 var l148 = {name: "CONCAT"};
2565 (function(){
2566     (l148).fvalue = (function(v278){
2567         ((v278)["fname"] = "CONCAT");
2568         return v278;
2569     })((function (values){
2570         var v277= l5.value;
2571         for (var i = arguments.length-1; i>=1; i--)
2572             v277 = {car: arguments[i], cdr: 
2573         v277};
2574         return (function(){
2575             return l61.fvalue(values, (function(){
2576                 var symbol = l74;
2577                 var func = symbol.fvalue;
2578                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2579                 return func;
2580             })(), v277, l62.value, "");
2581         })();
2582     }));
2583     return l148;
2584 })();
2585 var l149 = {name: "CONCATF"};
2586 l149;
2587 var l150 = {name: "JOIN"};
2588 (function(){
2589     (l150).fvalue = (function(v281){
2590         ((v281)["fname"] = "JOIN");
2591         return v281;
2592     })((function (values,v279,v280){
2593         checkArgsAtLeast(arguments, 2);
2594         checkArgsAtMost(arguments, 3);
2595         var v280; 
2596         switch(arguments.length-1){
2597         case 1:
2598             v280="";
2599         default: break;
2600         }
2601         return (function(){
2602             return (l13.fvalue(pv, v279) !== l5.value ? "" : (l13.fvalue(pv, (function(){
2603                 var tmp = v279;
2604                 return tmp === l5.value? l5.value: tmp.cdr;
2605             })()) !== l5.value ? (function(){
2606                 var tmp = v279;
2607                 return tmp === l5.value? l5.value: tmp.car;
2608             })() : l148.fvalue(values, (function(){
2609                 var tmp = v279;
2610                 return tmp === l5.value? l5.value: tmp.car;
2611             })(), v280, l150.fvalue(pv, (function(){
2612                 var tmp = v279;
2613                 return tmp === l5.value? l5.value: tmp.cdr;
2614             })(), v280))));
2615         })();
2616     }));
2617     return l150;
2618 })();
2619 var l151 = {name: "JOIN-TRAILING"};
2620 (function(){
2621     (l151).fvalue = (function(v284){
2622         ((v284)["fname"] = "JOIN-TRAILING");
2623         return v284;
2624     })((function (values,v282,v283){
2625         checkArgsAtLeast(arguments, 2);
2626         checkArgsAtMost(arguments, 3);
2627         var v283; 
2628         switch(arguments.length-1){
2629         case 1:
2630             v283="";
2631         default: break;
2632         }
2633         return (function(){
2634             return (l13.fvalue(pv, v282) !== l5.value ? "" : l148.fvalue(values, (function(){
2635                 var tmp = v282;
2636                 return tmp === l5.value? l5.value: tmp.car;
2637             })(), v283, l151.fvalue(pv, (function(){
2638                 var tmp = v282;
2639                 return tmp === l5.value? l5.value: tmp.cdr;
2640             })(), v283)));
2641         })();
2642     }));
2643     return l151;
2644 })();
2645 var l152 = {name: "MAPCONCAT"};
2646 (function(){
2647     (l152).fvalue = (function(v287){
2648         ((v287)["fname"] = "MAPCONCAT");
2649         return v287;
2650     })((function (values,v285,v286){
2651         checkArgs(arguments, 3);
2652         return (function(){
2653             return l150.fvalue(values, l79.fvalue(pv, v285, v286));
2654         })();
2655     }));
2656     return l152;
2657 })();
2658 var l153 = {name: "VECTOR-TO-LIST"};
2659 (function(){
2660     (l153).fvalue = (function(v293){
2661         ((v293)["fname"] = "VECTOR-TO-LIST");
2662         return v293;
2663     })((function (values,v288){
2664         checkArgs(arguments, 2);
2665         return (function(){
2666             return (function(v289,v290){
2667                 return (function(){
2668                     return (function(v291,v292){
2669                         (function(){
2670                             while((function(){
2671                                 var x1 = v291;
2672                                 if (typeof x1 !== 'number') throw 'Not a number!';
2673                                 var x2 = v292;
2674                                 if (typeof x2 !== 'number') throw 'Not a number!';
2675                                 return (x1<x2?l4.value: l5.value);
2676                             })() !== l5.value){
2677                                 (function(){
2678                                     (v289 = ({car: (function(){
2679                                         var x = (v288)[v291];
2680                                         if (x === undefined) throw 'Out of range';
2681                                         return x;
2682                                     })(), cdr: v289}));
2683                                     return l5.value;
2684                                 })();
2685                                 (v291 = (function(){
2686                                     var x1 = v291;
2687                                     if (typeof x1 !== 'number') throw 'Not a number!';
2688                                     return x1+1;
2689                                 })());
2690                             }return l5.value;
2691                         })();
2692                         return l68.fvalue(values, v289);
2693                     })(0,v290);
2694                 })();
2695             })(l5.value,l73.fvalue(pv, v288));
2696         })();
2697     }));
2698     return l153;
2699 })();
2700 var l154 = {name: "LIST-TO-VECTOR"};
2701 (function(){
2702     (l154).fvalue = (function(v299){
2703         ((v299)["fname"] = "LIST-TO-VECTOR");
2704         return v299;
2705     })((function (values,v294){
2706         checkArgs(arguments, 2);
2707         return (function(){
2708             return (function(v295,v296){
2709                 return (function(){
2710                     return (function(v297,v298){
2711                         (function(){
2712                             while(v297 !== l5.value){
2713                                 (v298 = (function(){
2714                                     var tmp = v297;
2715                                     return tmp === l5.value? l5.value: tmp.car;
2716                                 })());
2717                                 (function(){
2718                                     (function(){
2719                                         var x = v295;
2720                                         var i = v296;
2721                                         if (i < 0 || i >= x.length) throw 'Out of range';
2722                                         return x[i] = v298;
2723                                     })();
2724                                     (v296 = (function(){
2725                                         var x1 = v296;
2726                                         if (typeof x1 !== 'number') throw 'Not a number!';
2727                                         return x1+1;
2728                                     })());
2729                                     return l5.value;
2730                                 })();
2731                                 (v297 = (function(){
2732                                     var tmp = v297;
2733                                     return tmp === l5.value? l5.value: tmp.cdr;
2734                                 })());
2735                             }return l5.value;
2736                         })();
2737                         return v295;
2738                     })(v294,l5.value);
2739                 })();
2740             })((function(){
2741                 var r = [];
2742                 for (var i = 0; i < l73.fvalue(pv, v294); i++)
2743                     r.push(l5.value);
2744                 return r;
2745             })(),0);
2746         })();
2747     }));
2748     return l154;
2749 })();
2750 var l155 = {name: "VALUES-LIST"};
2751 (function(){
2752     (l155).fvalue = (function(v301){
2753         ((v301)["fname"] = "VALUES-LIST");
2754         return v301;
2755     })((function (values,v300){
2756         checkArgs(arguments, 2);
2757         return (function(){
2758             return values.apply(this, l154.fvalue(pv, v300));
2759         })();
2760     }));
2761     return l155;
2762 })();
2763 var l156 = {name: "VALUES"};
2764 (function(){
2765     (l156).fvalue = (function(v303){
2766         ((v303)["fname"] = "VALUES");
2767         return v303;
2768     })((function (values){
2769         var v302= l5.value;
2770         for (var i = arguments.length-1; i>=1; i--)
2771             v302 = {car: arguments[i], cdr: 
2772         v302};
2773         return (function(){
2774             return l155.fvalue(values, v302);
2775         })();
2776     }));
2777     return l156;
2778 })();
2779 (function(){
2780     (l18).fvalue = (function(v307){
2781         ((v307)["fname"] = "INTEGER-TO-STRING");
2782         return v307;
2783     })((function (values,v304){
2784         checkArgs(arguments, 2);
2785         return (function(){
2786             return (l25.fvalue(pv, v304) !== l5.value ? "0" : (l88.fvalue(pv, v304) !== l5.value ? l148.fvalue(values, "-", l18.fvalue(pv, (function(){
2787                 var x1 = v304;
2788                 if (typeof x1 !== 'number') throw 'Not a number!';
2789                 return 0-x1;
2790             })())) : (function(v305){
2791                 (function(){
2792                     return (function(){
2793                         while(l28.fvalue(pv, l25.fvalue(pv, v304)) !== l5.value){
2794                             (v305 = ({car: (function(){
2795                                 var x = v304;
2796                                 var y = 10;
2797                                 if (typeof x != 'number')
2798                                     throw 'The value ' + x + ' is not a type number.';
2799                                 if (typeof y != 'number')
2800                                     throw 'The value ' + y + ' is not a type number.';
2801                                 return x%y;
2802                             })(), cdr: v305}));
2803                             (v304 = l26.fvalue(pv, v304, 10));
2804                         }return l5.value;
2805                     })();
2806                 })();
2807                 return l152.fvalue(values, (function (values,v306){
2808                     checkArgs(arguments, 2);
2809                     return l103.fvalue(values, l98.fvalue(pv, v306));
2810                 }), v305);
2811             })(l5.value)));
2812         })();
2813     }));
2814     return l18;
2815 })();
2816 var l157 = {name: "PRIN1-TO-STRING"};
2817 var l158 = {name: "ESCAPE-STRING"};
2818 (function(){
2819     (l157).fvalue = (function(v316){
2820         ((v316)["fname"] = "PRIN1-TO-STRING");
2821         return v316;
2822     })((function (values,v308){
2823         checkArgs(arguments, 2);
2824         return (function(){
2825             return (((function(){
2826                 var tmp = v308;
2827                 return (typeof tmp == 'object' && 'name' in tmp);
2828             })()?l4.value: l5.value) !== l5.value ? (function(){
2829                 var func = (function (values,v310,v311){
2830                     var v310; 
2831                     var v311; 
2832                     switch(arguments.length-1){
2833                     case 0:
2834                         v310=l5.value;
2835                     case 1:
2836                         v311=l5.value;
2837                     default: break;
2838                     }
2839                     var v309= l5.value;
2840                     for (var i = arguments.length-1; i>=3; i--)
2841                         v309 = {car: arguments[i], cdr: 
2842                     v309};
2843                     return ((v311 !== l5.value ? ((v310 === v308)?l4.value: l5.value) : l5.value) !== l5.value ? (v308).name : (function(v312,v313){
2844                         return l148.fvalue(values, (l13.fvalue(pv, v312) !== l5.value ? "#" : (((v312 === l127.fvalue(pv, "KEYWORD"))?l4.value: l5.value) !== l5.value ? "" : l128.fvalue(pv, v312))), ":", v313);
2845                     })(l136.fvalue(pv, v308),(v308).name));
2846                 });
2847                 var args = [values];
2848                 return (function(){
2849                     var values = mv;
2850                     var vs;
2851                     vs = l140.fvalue(values, (v308).name, (function(){
2852                         var symbol = l137;
2853                         var value = symbol.value;
2854                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2855                         return value;
2856                     })());
2857                     if (typeof vs === 'object' && 'multiple-value' in vs)
2858                         args = args.concat(vs);
2859                     else
2860                         args.push(vs);
2861                     return func.apply(window, args);
2862                 })();
2863             })() : (l86.fvalue(pv, v308) !== l5.value ? l18.fvalue(values, v308) : (((typeof(v308) == "string")?l4.value: l5.value) !== l5.value ? l148.fvalue(values, "\"", l158.fvalue(pv, v308), "\"") : (((typeof v308 == 'function')?l4.value: l5.value) !== l5.value ? (function(v314){
2864                 return (v314 !== l5.value ? l148.fvalue(values, "#<FUNCTION ", v314, ">") : l148.fvalue(values, "#<FUNCTION>"));
2865             })((function(){
2866                 var tmp = (v308)["fname"];
2867                 return tmp == undefined? l5.value: tmp ;
2868             })()) : (l60.fvalue(pv, v308) !== l5.value ? l148.fvalue(values, "(", l151.fvalue(pv, l79.fvalue(pv, (function(){
2869                 var symbol = l157;
2870                 var func = symbol.fvalue;
2871                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2872                 return func;
2873             })(), l92.fvalue(pv, v308)), " "), (function(v315){
2874                 return (l13.fvalue(pv, (function(){
2875                     var tmp = v315;
2876                     return tmp === l5.value? l5.value: tmp.cdr;
2877                 })()) !== l5.value ? l157.fvalue(pv, (function(){
2878                     var tmp = v315;
2879                     return tmp === l5.value? l5.value: tmp.car;
2880                 })()) : l148.fvalue(pv, l157.fvalue(pv, (function(){
2881                     var tmp = v315;
2882                     return tmp === l5.value? l5.value: tmp.car;
2883                 })()), " . ", l157.fvalue(pv, (function(){
2884                     var tmp = v315;
2885                     return tmp === l5.value? l5.value: tmp.cdr;
2886                 })())));
2887             })(l91.fvalue(pv, v308)), ")") : (((function(){
2888                 var x = v308;
2889                 return typeof x === 'object' && 'length' in x;
2890             })()?l4.value: l5.value) !== l5.value ? l148.fvalue(values, "#", l157.fvalue(pv, l153.fvalue(pv, v308))) : (l126.fvalue(pv, v308) !== l5.value ? l148.fvalue(values, "#<PACKAGE ", l128.fvalue(pv, v308), ">") : l5.value)))))));
2891         })();
2892     }));
2893     return l157;
2894 })();
2895 (function(){
2896     (l107).fvalue = (function(v318){
2897         ((v318)["fname"] = "WRITE-LINE");
2898         return v318;
2899     })((function (values,v317){
2900         checkArgs(arguments, 2);
2901         return (function(){
2902             (function(){
2903                 var x = v317;
2904                 if (typeof x != 'string')
2905                     throw 'The value ' + x + ' is not a type string.';
2906                 return lisp.write(x);
2907             })();
2908             (function(){
2909                 var x = (function(){
2910                     var symbol = l147;
2911                     var value = symbol.value;
2912                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2913                     return value;
2914                 })();
2915                 if (typeof x != 'string')
2916                     throw 'The value ' + x + ' is not a type string.';
2917                 return lisp.write(x);
2918             })();
2919             return v317;
2920         })();
2921     }));
2922     return l107;
2923 })();
2924 var l159 = {name: "WARN"};
2925 (function(){
2926     (l159).fvalue = (function(v320){
2927         ((v320)["fname"] = "WARN");
2928         return v320;
2929     })((function (values,v319){
2930         checkArgs(arguments, 2);
2931         return (function(){
2932             (function(){
2933                 var x = "WARNING: ";
2934                 if (typeof x != 'string')
2935                     throw 'The value ' + x + ' is not a type string.';
2936                 return lisp.write(x);
2937             })();
2938             return l107.fvalue(values, v319);
2939         })();
2940     }));
2941     return l159;
2942 })();
2943 var l160 = {name: "PRINT"};
2944 (function(){
2945     (l160).fvalue = (function(v322){
2946         ((v322)["fname"] = "PRINT");
2947         return v322;
2948     })((function (values,v321){
2949         checkArgs(arguments, 2);
2950         return (function(){
2951             l107.fvalue(pv, l157.fvalue(pv, v321));
2952             return v321;
2953         })();
2954     }));
2955     return l160;
2956 })();
2957 var l161 = {name: "MAKE-STRING-STREAM"};
2958 (function(){
2959     (l161).fvalue = (function(v324){
2960         ((v324)["fname"] = "MAKE-STRING-STREAM");
2961         return v324;
2962     })((function (values,v323){
2963         checkArgs(arguments, 2);
2964         return (function(){
2965             return ({car: v323, cdr: 0});
2966         })();
2967     }));
2968     return l161;
2969 })();
2970 var l162 = {name: "%PEEK-CHAR"};
2971 (function(){
2972     (l162).fvalue = (function(v326){
2973         ((v326)["fname"] = "%PEEK-CHAR");
2974         return v326;
2975     })((function (values,v325){
2976         checkArgs(arguments, 2);
2977         return (function(){
2978             return ((function(){
2979                 var x1 = (function(){
2980                     var tmp = v325;
2981                     return tmp === l5.value? l5.value: tmp.cdr;
2982                 })();
2983                 if (typeof x1 !== 'number') throw 'Not a number!';
2984                 var x2 = l73.fvalue(pv, (function(){
2985                     var tmp = v325;
2986                     return tmp === l5.value? l5.value: tmp.car;
2987                 })());
2988                 if (typeof x2 !== 'number') throw 'Not a number!';
2989                 return (x1<x2?l4.value: l5.value);
2990             })() !== l5.value ? (function(){
2991                 var string = (function(){
2992                     var tmp = v325;
2993                     return tmp === l5.value? l5.value: tmp.car;
2994                 })();
2995                 var index = (function(){
2996                     var tmp = v325;
2997                     return tmp === l5.value? l5.value: tmp.cdr;
2998                 })();
2999                 if (typeof string != 'string')
3000                     throw 'The value ' + string + ' is not a type string.';
3001                 if (typeof index != 'number')
3002                     throw 'The value ' + index + ' is not a type number.';
3003                 return string.charCodeAt(index);
3004             })() : l5.value);
3005         })();
3006     }));
3007     return l162;
3008 })();
3009 var l163 = {name: "%READ-CHAR"};
3010 (function(){
3011     (l163).fvalue = (function(v329){
3012         ((v329)["fname"] = "%READ-CHAR");
3013         return v329;
3014     })((function (values,v327){
3015         checkArgs(arguments, 2);
3016         return (function(){
3017             return ((function(){
3018                 var x1 = (function(){
3019                     var tmp = v327;
3020                     return tmp === l5.value? l5.value: tmp.cdr;
3021                 })();
3022                 if (typeof x1 !== 'number') throw 'Not a number!';
3023                 var x2 = l73.fvalue(pv, (function(){
3024                     var tmp = v327;
3025                     return tmp === l5.value? l5.value: tmp.car;
3026                 })());
3027                 if (typeof x2 !== 'number') throw 'Not a number!';
3028                 return (x1<x2?l4.value: l5.value);
3029             })() !== l5.value ? (function(v328){
3030                 (function(){
3031                     var x = v327;
3032                     if (typeof x != 'object')
3033                         throw 'The value ' + x + ' is not a type object.';
3034                     return (x.cdr = l23.fvalue(pv, (function(){
3035                         var tmp = v327;
3036                         return tmp === l5.value? l5.value: tmp.cdr;
3037                     })()), x);
3038                 })();
3039                 return v328;
3040             })((function(){
3041                 var string = (function(){
3042                     var tmp = v327;
3043                     return tmp === l5.value? l5.value: tmp.car;
3044                 })();
3045                 var index = (function(){
3046                     var tmp = v327;
3047                     return tmp === l5.value? l5.value: tmp.cdr;
3048                 })();
3049                 if (typeof string != 'string')
3050                     throw 'The value ' + string + ' is not a type string.';
3051                 if (typeof index != 'number')
3052                     throw 'The value ' + index + ' is not a type number.';
3053                 return string.charCodeAt(index);
3054             })()) : l5.value);
3055         })();
3056     }));
3057     return l163;
3058 })();
3059 var l164 = {name: "WHITESPACEP"};
3060 (function(){
3061     (l164).fvalue = (function(v333){
3062         ((v333)["fname"] = "WHITESPACEP");
3063         return v333;
3064     })((function (values,v330){
3065         checkArgs(arguments, 2);
3066         return (function(){
3067             return (function(v331){
3068                 return (v331 !== l5.value ? v331 : (function(v332){
3069                     return (v332 !== l5.value ? v332 : l85.fvalue(values, v330, 9));
3070                 })(l85.fvalue(pv, v330, 10)));
3071             })(l85.fvalue(pv, v330, 32));
3072         })();
3073     }));
3074     return l164;
3075 })();
3076 var l165 = {name: "SKIP-WHITESPACES"};
3077 (function(){
3078     (l165).fvalue = (function(v336){
3079         ((v336)["fname"] = "SKIP-WHITESPACES");
3080         return v336;
3081     })((function (values,v334){
3082         checkArgs(arguments, 2);
3083         return (function(){
3084             return (function(v335){
3085                 (v335 = l162.fvalue(pv, v334));
3086                 return (function(){
3087                     return (function(){
3088                         while((v335 !== l5.value ? l164.fvalue(pv, v335) : l5.value) !== l5.value){
3089                             l163.fvalue(pv, v334);
3090                             (v335 = l162.fvalue(pv, v334));
3091                         }return l5.value;
3092                     })();
3093                 })();
3094             })(l5.value);
3095         })();
3096     }));
3097     return l165;
3098 })();
3099 var l166 = {name: "TERMINALP"};
3100 (function(){
3101     (l166).fvalue = (function(v341){
3102         ((v341)["fname"] = "TERMINALP");
3103         return v341;
3104     })((function (values,v337){
3105         checkArgs(arguments, 2);
3106         return (function(){
3107             return (function(v338){
3108                 return (v338 !== l5.value ? v338 : (function(v339){
3109                     return (v339 !== l5.value ? v339 : (function(v340){
3110                         return (v340 !== l5.value ? v340 : l85.fvalue(values, 40, v337));
3111                     })(l85.fvalue(pv, 41, v337)));
3112                 })(l164.fvalue(pv, v337)));
3113             })(l13.fvalue(pv, v337));
3114         })();
3115     }));
3116     return l166;
3117 })();
3118 var l167 = {name: "READ-UNTIL"};
3119 (function(){
3120     (l167).fvalue = (function(v346){
3121         ((v346)["fname"] = "READ-UNTIL");
3122         return v346;
3123     })((function (values,v342,v343){
3124         checkArgs(arguments, 3);
3125         return (function(){
3126             return (function(v344,v345){
3127                 (v345 = l162.fvalue(pv, v342));
3128                 (function(){
3129                     return (function(){
3130                         while((v345 !== l5.value ? l28.fvalue(pv, (v343)(pv, v345)) : l5.value) !== l5.value){
3131                             (v344 = l148.fvalue(pv, v344, l103.fvalue(pv, v345)));
3132                             l163.fvalue(pv, v342);
3133                             (v345 = l162.fvalue(pv, v342));
3134                         }return l5.value;
3135                     })();
3136                 })();
3137                 return v344;
3138             })("",l5.value);
3139         })();
3140     }));
3141     return l167;
3142 })();
3143 var l168 = {name: "SKIP-WHITESPACES-AND-COMMENTS"};
3144 (function(){
3145     (l168).fvalue = (function(v350){
3146         ((v350)["fname"] = "SKIP-WHITESPACES-AND-COMMENTS");
3147         return v350;
3148     })((function (values,v347){
3149         checkArgs(arguments, 2);
3150         return (function(){
3151             return (function(v348){
3152                 l165.fvalue(pv, v347);
3153                 (v348 = l162.fvalue(pv, v347));
3154                 return (function(){
3155                     return (function(){
3156                         while((v348 !== l5.value ? l85.fvalue(pv, v348, 59) : l5.value) !== l5.value){
3157                             l167.fvalue(pv, v347, (function (values,v349){
3158                                 checkArgs(arguments, 2);
3159                                 return l85.fvalue(values, v349, 10);
3160                             }));
3161                             l165.fvalue(pv, v347);
3162                             (v348 = l162.fvalue(pv, v347));
3163                         }return l5.value;
3164                     })();
3165                 })();
3166             })(l5.value);
3167         })();
3168     }));
3169     return l168;
3170 })();
3171 var l169 = {name: "%READ-LIST"};
3172 var l170 = {name: "LS-READ"};
3173 (function(){
3174     (l169).fvalue = (function(v354){
3175         ((v354)["fname"] = "%READ-LIST");
3176         return v354;
3177     })((function (values,v351){
3178         checkArgs(arguments, 2);
3179         return (function(){
3180             l168.fvalue(pv, v351);
3181             return (function(v352){
3182                 return (l13.fvalue(pv, v352) !== l5.value ? (function(){
3183                     throw "Unspected EOF";
3184                 })() : (l85.fvalue(pv, v352, 41) !== l5.value ? (function(){
3185                     l163.fvalue(pv, v351);
3186                     return l5.value;
3187                 })() : (l85.fvalue(pv, v352, 46) !== l5.value ? (function(){
3188                     l163.fvalue(pv, v351);
3189                     return (function(v353){
3190                         l168.fvalue(pv, v351);
3191                         (l85.fvalue(pv, l163.fvalue(pv, v351), 41) !== l5.value ? l5.value : (function(){
3192                             throw "')' was expected.";
3193                         })());
3194                         return v353;
3195                     })(l170.fvalue(pv, v351));
3196                 })() : ({car: l170.fvalue(pv, v351), cdr: l169.fvalue(pv, v351)}))));
3197             })(l162.fvalue(pv, v351));
3198         })();
3199     }));
3200     return l169;
3201 })();
3202 var l171 = {name: "READ-STRING"};
3203 (function(){
3204     (l171).fvalue = (function(v358){
3205         ((v358)["fname"] = "READ-STRING");
3206         return v358;
3207     })((function (values,v355){
3208         checkArgs(arguments, 2);
3209         return (function(){
3210             return (function(v356,v357){
3211                 (v357 = l163.fvalue(pv, v355));
3212                 (function(){
3213                     return (function(){
3214                         while(l28.fvalue(pv, l27.fvalue(pv, v357, 34)) !== l5.value){
3215                             (l13.fvalue(pv, v357) !== l5.value ? (function(){
3216                                 throw "Unexpected EOF";
3217                             })() : l5.value);
3218                             (l27.fvalue(pv, v357, 92) !== l5.value ? (v357 = l163.fvalue(pv, v355)) : l5.value);
3219                             (v356 = l148.fvalue(pv, v356, l103.fvalue(pv, v357)));
3220                             (v357 = l163.fvalue(pv, v355));
3221                         }return l5.value;
3222                     })();
3223                 })();
3224                 return v356;
3225             })("",l5.value);
3226         })();
3227     }));
3228     return l171;
3229 })();
3230 var l172 = {name: "READ-SHARP"};
3231 (function(){
3232     (l172).fvalue = (function(v363){
3233         ((v363)["fname"] = "READ-SHARP");
3234         return v363;
3235     })((function (values,v359){
3236         checkArgs(arguments, 2);
3237         return (function(){
3238             l163.fvalue(pv, v359);
3239             return (function(v360){
3240                 return (l27.fvalue(pv, v360, 39) !== l5.value ? l45.fvalue(values, l109, l170.fvalue(pv, v359)) : (l27.fvalue(pv, v360, 40) !== l5.value ? l154.fvalue(values, l169.fvalue(pv, v359)) : (l27.fvalue(pv, v360, 58) !== l5.value ? (function(){
3241                     var name = (function(){
3242                         var x = l167.fvalue(pv, v359, (function(){
3243                             var symbol = l166;
3244                             var func = symbol.fvalue;
3245                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3246                             return func;
3247                         })());
3248                         if (typeof x != 'string')
3249                             throw 'The value ' + x + ' is not a type string.';
3250                         return x.toUpperCase();
3251                     })();
3252                     if (typeof name != 'string')
3253                         throw 'The value ' + name + ' is not a type string.';
3254                     return ({name: name});
3255                 })() : (l27.fvalue(pv, v360, 92) !== l5.value ? (function(v361){
3256                     return (l104.fvalue(pv, v361, "space") !== l5.value ? l84.fvalue(values, 32) : (l104.fvalue(pv, v361, "tab") !== l5.value ? l84.fvalue(values, 9) : (l104.fvalue(pv, v361, "newline") !== l5.value ? l84.fvalue(values, 10) : l84.fvalue(values, (function(){
3257                         var string = v361;
3258                         var index = 0;
3259                         if (typeof string != 'string')
3260                             throw 'The value ' + string + ' is not a type string.';
3261                         if (typeof index != 'number')
3262                             throw 'The value ' + index + ' is not a type number.';
3263                         return string.charCodeAt(index);
3264                     })()))));
3265                 })(l148.fvalue(pv, l103.fvalue(pv, l163.fvalue(pv, v359)), l167.fvalue(pv, v359, (function(){
3266                     var symbol = l166;
3267                     var func = symbol.fvalue;
3268                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3269                     return func;
3270                 })()))) : (l27.fvalue(pv, v360, 43) !== l5.value ? (function(v362){
3271                     return (l104.fvalue(pv, v362, "common-lisp") !== l5.value ? (function(){
3272                         l170.fvalue(pv, v359);
3273                         return l170.fvalue(values, v359);
3274                     })() : (l104.fvalue(pv, v362, "ecmalisp") !== l5.value ? l170.fvalue(values, v359) : (function(){
3275                         throw "Unknown reader form.";
3276                     })()));
3277                 })(l167.fvalue(pv, v359, (function(){
3278                     var symbol = l166;
3279                     var func = symbol.fvalue;
3280                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3281                     return func;
3282                 })())) : (function(){
3283                     throw "ECASE expression failed.";
3284                 })())))));
3285             })(l163.fvalue(pv, v359));
3286         })();
3287     }));
3288     return l172;
3289 })();
3290 var l173 = {name: "READ-SYMBOL"};
3291 (function(){
3292     (l173).fvalue = (function(v371){
3293         ((v371)["fname"] = "READ-SYMBOL");
3294         return v371;
3295     })((function (values,v364){
3296         checkArgs(arguments, 2);
3297         return (function(){
3298             return (function(v365,v366,v367,v368,v369){
3299                 (v369 = 0);
3300                 (function(){
3301                     return (function(){
3302                         while(((function(){
3303                             var x1 = v369;
3304                             if (typeof x1 !== 'number') throw 'Not a number!';
3305                             var x2 = v365;
3306                             if (typeof x2 !== 'number') throw 'Not a number!';
3307                             return (x1<x2?l4.value: l5.value);
3308                         })() !== l5.value ? l28.fvalue(pv, l85.fvalue(pv, (function(){
3309                             var string = v364;
3310                             var index = v369;
3311                             if (typeof string != 'string')
3312                                 throw 'The value ' + string + ' is not a type string.';
3313                             if (typeof index != 'number')
3314                                 throw 'The value ' + index + ' is not a type number.';
3315                             return string.charCodeAt(index);
3316                         })(), 58)) : l5.value) !== l5.value){
3317                             (v369 = (function(){
3318                                 var x1 = v369;
3319                                 if (typeof x1 !== 'number') throw 'Not a number!';
3320                                 return x1+1;
3321                             })());
3322                         }return l5.value;
3323                     })();
3324                 })();
3325                 ((function(){
3326                     var x1 = v369;
3327                     if (typeof x1 !== 'number') throw 'Not a number!';
3328                     var x2 = v365;
3329                     if (typeof x2 !== 'number') throw 'Not a number!';
3330                     return (x1==x2?l4.value: l5.value);
3331                 })() !== l5.value ? (function(){
3332                     (v367 = v364);
3333                     (v366 = (function(){
3334                         var symbol = l137;
3335                         var value = symbol.value;
3336                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3337                         return value;
3338                     })());
3339                     return (v368 = l4.value);
3340                 })() : (function(){
3341                     (l25.fvalue(pv, v369) !== l5.value ? (v366 = "KEYWORD") : (v366 = (function(){
3342                         var x = l99.fvalue(pv, v364, 0, v369);
3343                         if (typeof x != 'string')
3344                             throw 'The value ' + x + ' is not a type string.';
3345                         return x.toUpperCase();
3346                     })()));
3347                     (v369 = (function(){
3348                         var x1 = v369;
3349                         if (typeof x1 !== 'number') throw 'Not a number!';
3350                         return x1+1;
3351                     })());
3352                     (l85.fvalue(pv, (function(){
3353                         var string = v364;
3354                         var index = v369;
3355                         if (typeof string != 'string')
3356                             throw 'The value ' + string + ' is not a type string.';
3357                         if (typeof index != 'number')
3358                             throw 'The value ' + index + ' is not a type number.';
3359                         return string.charCodeAt(index);
3360                     })(), 58) !== l5.value ? (function(){
3361                         (v368 = l4.value);
3362                         return (v369 = (function(){
3363                             var x1 = v369;
3364                             if (typeof x1 !== 'number') throw 'Not a number!';
3365                             return x1+1;
3366                         })());
3367                     })() : l5.value);
3368                     return (v367 = l99.fvalue(pv, v364, v369));
3369                 })());
3370                 (v367 = (function(){
3371                     var x = v367;
3372                     if (typeof x != 'string')
3373                         throw 'The value ' + x + ' is not a type string.';
3374                     return x.toUpperCase();
3375                 })());
3376                 (v366 = l127.fvalue(pv, v366));
3377                 return ((function(v370){
3378                     return (v370 !== l5.value ? v370 : ((v366 === l127.fvalue(pv, "KEYWORD"))?l4.value: l5.value));
3379                 })(v368) !== l5.value ? l144.fvalue(values, v367, v366) : l140.fvalue(values, v367, v366));
3380             })(l73.fvalue(pv, v364),l5.value,l5.value,l5.value,l5.value);
3381         })();
3382     }));
3383     return l173;
3384 })();
3385 var l174 = {name: "!PARSE-INTEGER"};
3386 (function(){
3387     (l174).fvalue = (function(v382){
3388         ((v382)["fname"] = "!PARSE-INTEGER");
3389         return v382;
3390     })((function (values,v372,v373){
3391         checkArgs(arguments, 3);
3392         return (function(){
3393             return (function(){
3394                 try {
3395                     return (function(v374,v375,v376,v377){
3396                         (l25.fvalue(pv, v376) !== l5.value ? (function(){
3397                             var values = mv;
3398                             throw ({type: 'block', id: 144, values: values(l5.value, 0), message: 'Return from unknown block NIL.'})
3399                         })() : l5.value);
3400                         (function(v378){
3401                             return (l27.fvalue(pv, v378, 43) !== l5.value ? (v375 = (function(){
3402                                 var x1 = v375;
3403                                 if (typeof x1 !== 'number') throw 'Not a number!';
3404                                 return x1+1;
3405                             })()) : (l27.fvalue(pv, v378, 45) !== l5.value ? (function(){
3406                                 (v377 = -1);
3407                                 return (v375 = (function(){
3408                                     var x1 = v375;
3409                                     if (typeof x1 !== 'number') throw 'Not a number!';
3410                                     return x1+1;
3411                                 })());
3412                             })() : l5.value));
3413                         })((function(){
3414                             var string = v372;
3415                             var index = 0;
3416                             if (typeof string != 'string')
3417                                 throw 'The value ' + string + ' is not a type string.';
3418                             if (typeof index != 'number')
3419                                 throw 'The value ' + index + ' is not a type number.';
3420                             return string.charCodeAt(index);
3421                         })());
3422                         (((function(){
3423                             var x1 = v375;
3424                             if (typeof x1 !== 'number') throw 'Not a number!';
3425                             var x2 = v376;
3426                             if (typeof x2 !== 'number') throw 'Not a number!';
3427                             return (x1<x2?l4.value: l5.value);
3428                         })() !== l5.value ? (v374 = l97.fvalue(pv, (function(){
3429                             var string = v372;
3430                             var index = v375;
3431                             if (typeof string != 'string')
3432                                 throw 'The value ' + string + ' is not a type string.';
3433                             if (typeof index != 'number')
3434                                 throw 'The value ' + index + ' is not a type number.';
3435                             return string.charCodeAt(index);
3436                         })())) : l5.value) !== l5.value ? l5.value : (function(){
3437                             var values = mv;
3438                             throw ({type: 'block', id: 144, values: values(l5.value, v375), message: 'Return from unknown block NIL.'})
3439                         })());
3440                         (v375 = (function(){
3441                             var x1 = v375;
3442                             if (typeof x1 !== 'number') throw 'Not a number!';
3443                             return x1+1;
3444                         })());
3445                         (function(){
3446                             try {
3447                                 return (function(){
3448                                     while((function(){
3449                                         var x1 = v375;
3450                                         if (typeof x1 !== 'number') throw 'Not a number!';
3451                                         var x2 = v376;
3452                                         if (typeof x2 !== 'number') throw 'Not a number!';
3453                                         return (x1<x2?l4.value: l5.value);
3454                                     })() !== l5.value){
3455                                         (function(v379){
3456                                             (v379 !== l5.value ? l5.value : (function(){
3457                                                 throw ({type: 'block', id: 145, values: l5.value, message: 'Return from unknown block NIL.'})
3458                                             })());
3459                                             (v374 = (function(){
3460                                                 var x1 = (function(){
3461                                                     var x1 = v374;
3462                                                     if (typeof x1 !== 'number') throw 'Not a number!';
3463                                                     return x1*10;
3464                                                 })();
3465                                                 if (typeof x1 !== 'number') throw 'Not a number!';
3466                                                 var x2 = v379;
3467                                                 if (typeof x2 !== 'number') throw 'Not a number!';
3468                                                 return x1+x2;
3469                                             })());
3470                                             return (v375 = (function(){
3471                                                 var x1 = v375;
3472                                                 if (typeof x1 !== 'number') throw 'Not a number!';
3473                                                 return x1+1;
3474                                             })());
3475                                         })(l97.fvalue(pv, (function(){
3476                                             var string = v372;
3477                                             var index = v375;
3478                                             if (typeof string != 'string')
3479                                                 throw 'The value ' + string + ' is not a type string.';
3480                                             if (typeof index != 'number')
3481                                                 throw 'The value ' + index + ' is not a type number.';
3482                                             return string.charCodeAt(index);
3483                                         })()));
3484                                     }return l5.value;
3485                                 })();
3486                             }
3487                             catch (cf){
3488                                 if (cf.type == 'block' && cf.id == 145)
3489                                     return cf.values;
3490                                 else
3491                                     throw cf;
3492                             }
3493                         })();
3494                         return ((function(v380){
3495                             return (v380 !== l5.value ? v380 : (function(v381){
3496                                 return (v381 !== l5.value ? v381 : l85.fvalue(pv, (function(){
3497                                     var string = v372;
3498                                     var index = v375;
3499                                     if (typeof string != 'string')
3500                                         throw 'The value ' + string + ' is not a type string.';
3501                                     if (typeof index != 'number')
3502                                         throw 'The value ' + index + ' is not a type number.';
3503                                     return string.charCodeAt(index);
3504                                 })(), 32));
3505                             })((function(){
3506                                 var x1 = v375;
3507                                 if (typeof x1 !== 'number') throw 'Not a number!';
3508                                 var x2 = v376;
3509                                 if (typeof x2 !== 'number') throw 'Not a number!';
3510                                 return (x1==x2?l4.value: l5.value);
3511                             })()));
3512                         })(v373) !== l5.value ? values((function(){
3513                             var x1 = v377;
3514                             if (typeof x1 !== 'number') throw 'Not a number!';
3515                             var x2 = v374;
3516                             if (typeof x2 !== 'number') throw 'Not a number!';
3517                             return x1*x2;
3518                         })(), v375) : values(l5.value, v375));
3519                     })(0,0,l73.fvalue(pv, v372),1);
3520                 }
3521                 catch (cf){
3522                     if (cf.type == 'block' && cf.id == 144)
3523                         return values.apply(this, forcemv(cf.values));
3524                     else
3525                         throw cf;
3526                 }
3527             })();
3528         })();
3529     }));
3530     return l174;
3531 })();
3532 var l175 = {name: "PARSE-INTEGER"};
3533 (function(){
3534     (l175).fvalue = (function(v384){
3535         ((v384)["fname"] = "PARSE-INTEGER");
3536         return v384;
3537     })((function (values,v383){
3538         checkArgs(arguments, 2);
3539         return (function(){
3540             return l174.fvalue(values, v383, l5.value);
3541         })();
3542     }));
3543     return l175;
3544 })();
3545 var l176 = {name: "*EOF*"};
3546 (function(){
3547     (((l176.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l176).value = l17.fvalue(pv)));
3548     return l176;
3549 })();
3550 var l177 = {name: "QUOTE"};
3551 var l178 = {name: "BACKQUOTE"};
3552 var l179 = {name: "UNQUOTE-SPLICING"};
3553 var l180 = {name: "UNQUOTE"};
3554 (function(){
3555     (l170).fvalue = (function(v390){
3556         ((v390)["fname"] = "LS-READ");
3557         return v390;
3558     })((function (values,v385){
3559         checkArgs(arguments, 2);
3560         return (function(){
3561             l168.fvalue(pv, v385);
3562             return (function(v386){
3563                 return ((function(v387){
3564                     return (v387 !== l5.value ? v387 : l85.fvalue(pv, v386, 41));
3565                 })(l13.fvalue(pv, v386)) !== l5.value ? (function(){
3566                     var symbol = l176;
3567                     var value = symbol.value;
3568                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3569                     return value;
3570                 })() : (l85.fvalue(pv, v386, 40) !== l5.value ? (function(){
3571                     l163.fvalue(pv, v385);
3572                     return l169.fvalue(values, v385);
3573                 })() : (l85.fvalue(pv, v386, 39) !== l5.value ? (function(){
3574                     l163.fvalue(pv, v385);
3575                     return l45.fvalue(values, l177, l170.fvalue(pv, v385));
3576                 })() : (l85.fvalue(pv, v386, 96) !== l5.value ? (function(){
3577                     l163.fvalue(pv, v385);
3578                     return l45.fvalue(values, l178, l170.fvalue(pv, v385));
3579                 })() : (l85.fvalue(pv, v386, 34) !== l5.value ? (function(){
3580                     l163.fvalue(pv, v385);
3581                     return l171.fvalue(values, v385);
3582                 })() : (l85.fvalue(pv, v386, 44) !== l5.value ? (function(){
3583                     l163.fvalue(pv, v385);
3584                     return (l27.fvalue(pv, l162.fvalue(pv, v385), 64) !== l5.value ? (function(){
3585                         l163.fvalue(pv, v385);
3586                         return l45.fvalue(values, l179, l170.fvalue(pv, v385));
3587                     })() : l45.fvalue(values, l180, l170.fvalue(pv, v385)));
3588                 })() : (l85.fvalue(pv, v386, 35) !== l5.value ? l172.fvalue(values, v385) : (function(v388){
3589                     return (function(v389){
3590                         return (v389 !== l5.value ? v389 : l173.fvalue(values, v388));
3591                     })(pv(l174.fvalue(pv, v388, l5.value)));
3592                 })(l167.fvalue(pv, v385, (function(){
3593                     var symbol = l166;
3594                     var func = symbol.fvalue;
3595                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3596                     return func;
3597                 })())))))))));
3598             })(l162.fvalue(pv, v385));
3599         })();
3600     }));
3601     return l170;
3602 })();
3603 var l181 = {name: "LS-READ-FROM-STRING"};
3604 (function(){
3605     (l181).fvalue = (function(v392){
3606         ((v392)["fname"] = "LS-READ-FROM-STRING");
3607         return v392;
3608     })((function (values,v391){
3609         checkArgs(arguments, 2);
3610         return (function(){
3611             return l170.fvalue(values, l161.fvalue(pv, v391));
3612         })();
3613     }));
3614     return l181;
3615 })();
3616 var l182 = {name: "CODE"};
3617 (function(){
3618     (l182).fvalue = (function(v395){
3619         ((v395)["fname"] = "CODE");
3620         return v395;
3621     })((function (values){
3622         var v393= l5.value;
3623         for (var i = arguments.length-1; i>=1; i--)
3624             v393 = {car: arguments[i], cdr: 
3625         v393};
3626         return (function(){
3627             return l152.fvalue(values, (function (values,v394){
3628                 checkArgs(arguments, 2);
3629                 return (l13.fvalue(pv, v394) !== l5.value ? "" : (l86.fvalue(pv, v394) !== l5.value ? l18.fvalue(values, v394) : (((typeof(v394) == "string")?l4.value: l5.value) !== l5.value ? v394 : (function(){
3630                     throw "Unknown argument.";
3631                 })())));
3632             }), v393);
3633         })();
3634     }));
3635     return l182;
3636 })();
3637 var l183 = {name: "JS!BOOL"};
3638 var l184 = {name: "LS-COMPILE"};
3639 (function(){
3640     (l183).fvalue = (function(v397){
3641         ((v397)["fname"] = "JS!BOOL");
3642         return v397;
3643     })((function (values,v396){
3644         checkArgs(arguments, 2);
3645         return (function(){
3646             return l182.fvalue(values, "(", v396, "?", l184.fvalue(pv, l4.value), ": ", l184.fvalue(pv, l5.value), ")");
3647         })();
3648     }));
3649     return l183;
3650 })();
3651 var l185 = {name: "JS!SELFCALL"};
3652 l185;
3653 var l186 = {name: "INDENT"};
3654 (function(){
3655     (l186).fvalue = (function(v404){
3656         ((v404)["fname"] = "INDENT");
3657         return v404;
3658     })((function (values){
3659         var v398= l5.value;
3660         for (var i = arguments.length-1; i>=1; i--)
3661             v398 = {car: arguments[i], cdr: 
3662         v398};
3663         return (function(){
3664             return (function(v399){
3665                 return (function(v400,v401,v402){
3666                     (l87.fvalue(pv, l73.fvalue(pv, v399)) !== l5.value ? (v400 = l148.fvalue(pv, v400, "    ")) : l5.value);
3667                     (function(){
3668                         return (function(){
3669                             while((function(){
3670                                 var x1 = v401;
3671                                 if (typeof x1 !== 'number') throw 'Not a number!';
3672                                 var x2 = v402;
3673                                 if (typeof x2 !== 'number') throw 'Not a number!';
3674                                 return (x1<x2?l4.value: l5.value);
3675                             })() !== l5.value){
3676                                 (function(v403){
3677                                     return (v400 = l148.fvalue(pv, v400, v403));
3678                                 })(((l85.fvalue(pv, (function(){
3679                                     var string = v399;
3680                                     var index = v401;
3681                                     if (typeof string != 'string')
3682                                         throw 'The value ' + string + ' is not a type string.';
3683                                     if (typeof index != 'number')
3684                                         throw 'The value ' + index + ' is not a type number.';
3685                                     return string.charCodeAt(index);
3686                                 })(), 10) !== l5.value ? ((function(){
3687                                     var x1 = v401;
3688                                     if (typeof x1 !== 'number') throw 'Not a number!';
3689                                     var x2 = l24.fvalue(pv, v402);
3690                                     if (typeof x2 !== 'number') throw 'Not a number!';
3691                                     return (x1<x2?l4.value: l5.value);
3692                                 })() !== l5.value ? l28.fvalue(pv, l85.fvalue(pv, (function(){
3693                                     var string = v399;
3694                                     var index = l23.fvalue(pv, v401);
3695                                     if (typeof string != 'string')
3696                                         throw 'The value ' + string + ' is not a type string.';
3697                                     if (typeof index != 'number')
3698                                         throw 'The value ' + index + ' is not a type number.';
3699                                     return string.charCodeAt(index);
3700                                 })(), 10)) : l5.value) : l5.value) !== l5.value ? l148.fvalue(pv, l103.fvalue(pv, 10), "    ") : l103.fvalue(pv, (function(){
3701                                     var string = v399;
3702                                     var index = v401;
3703                                     if (typeof string != 'string')
3704                                         throw 'The value ' + string + ' is not a type string.';
3705                                     if (typeof index != 'number')
3706                                         throw 'The value ' + index + ' is not a type number.';
3707                                     return string.charCodeAt(index);
3708                                 })())));
3709                                 (v401 = (function(){
3710                                     var x1 = v401;
3711                                     if (typeof x1 !== 'number') throw 'Not a number!';
3712                                     return x1+1;
3713                                 })());
3714                             }return l5.value;
3715                         })();
3716                     })();
3717                     return v400;
3718                 })("",0,l73.fvalue(pv, v399));
3719             })((function(){
3720                 var f = (function(){
3721                     var symbol = l182;
3722                     var func = symbol.fvalue;
3723                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3724                     return func;
3725                 })();
3726                 var args = [pv];
3727                 var tail = (v398);
3728                 while (tail != l5.value){
3729                     args.push(tail.car);
3730                     tail = tail.cdr;
3731                 }
3732                 return f.apply(this, args);
3733             })());
3734         })();
3735     }));
3736     return l186;
3737 })();
3738 var l187 = {name: "*MULTIPLE-VALUE-P*"};
3739 (function(){
3740     (((l187.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l187).value = l5.value));
3741     return l187;
3742 })();
3743 var l188 = {name: "MAKE-BINDING"};
3744 (function(){
3745     (l188).fvalue = (function(v409){
3746         ((v409)["fname"] = "MAKE-BINDING");
3747         return v409;
3748     })((function (values,v405,v406,v407,v408){
3749         checkArgsAtLeast(arguments, 4);
3750         checkArgsAtMost(arguments, 5);
3751         var v408; 
3752         switch(arguments.length-1){
3753         case 3:
3754             v408=l5.value;
3755         default: break;
3756         }
3757         return (function(){
3758             return l45.fvalue(values, v405, v406, v407, v408);
3759         })();
3760     }));
3761     return l188;
3762 })();
3763 var l189 = {name: "BINDING-NAME"};
3764 (function(){
3765     (l189).fvalue = (function(v411){
3766         ((v411)["fname"] = "BINDING-NAME");
3767         return v411;
3768     })((function (values,v410){
3769         checkArgs(arguments, 2);
3770         return (function(){
3771             return l40.fvalue(values, v410);
3772         })();
3773     }));
3774     return l189;
3775 })();
3776 var l190 = {name: "BINDING-TYPE"};
3777 (function(){
3778     (l190).fvalue = (function(v413){
3779         ((v413)["fname"] = "BINDING-TYPE");
3780         return v413;
3781     })((function (values,v412){
3782         checkArgs(arguments, 2);
3783         return (function(){
3784             return l41.fvalue(values, v412);
3785         })();
3786     }));
3787     return l190;
3788 })();
3789 var l191 = {name: "BINDING-VALUE"};
3790 (function(){
3791     (l191).fvalue = (function(v415){
3792         ((v415)["fname"] = "BINDING-VALUE");
3793         return v415;
3794     })((function (values,v414){
3795         checkArgs(arguments, 2);
3796         return (function(){
3797             return l42.fvalue(values, v414);
3798         })();
3799     }));
3800     return l191;
3801 })();
3802 var l192 = {name: "BINDING-DECLARATIONS"};
3803 (function(){
3804     (l192).fvalue = (function(v417){
3805         ((v417)["fname"] = "BINDING-DECLARATIONS");
3806         return v417;
3807     })((function (values,v416){
3808         checkArgs(arguments, 2);
3809         return (function(){
3810             return l43.fvalue(values, v416);
3811         })();
3812     }));
3813     return l192;
3814 })();
3815 var l193 = {name: "SET-BINDING-VALUE"};
3816 (function(){
3817     (l193).fvalue = (function(v420){
3818         ((v420)["fname"] = "SET-BINDING-VALUE");
3819         return v420;
3820     })((function (values,v418,v419){
3821         checkArgs(arguments, 3);
3822         return (function(){
3823             return (function(){
3824                 var x = l36.fvalue(pv, v418);
3825                 if (typeof x != 'object')
3826                     throw 'The value ' + x + ' is not a type object.';
3827                 return (x.car = v419, x);
3828             })();
3829         })();
3830     }));
3831     return l193;
3832 })();
3833 var l194 = {name: "SET-BINDING-DECLARATIONS"};
3834 (function(){
3835     (l194).fvalue = (function(v423){
3836         ((v423)["fname"] = "SET-BINDING-DECLARATIONS");
3837         return v423;
3838     })((function (values,v421,v422){
3839         checkArgs(arguments, 3);
3840         return (function(){
3841             return (function(){
3842                 var x = l38.fvalue(pv, v421);
3843                 if (typeof x != 'object')
3844                     throw 'The value ' + x + ' is not a type object.';
3845                 return (x.car = v422, x);
3846             })();
3847         })();
3848     }));
3849     return l194;
3850 })();
3851 var l195 = {name: "PUSH-BINDING-DECLARATION"};
3852 (function(){
3853     (l195).fvalue = (function(v426){
3854         ((v426)["fname"] = "PUSH-BINDING-DECLARATION");
3855         return v426;
3856     })((function (values,v424,v425){
3857         checkArgs(arguments, 3);
3858         return (function(){
3859             return l194.fvalue(values, v425, ({car: v424, cdr: l192.fvalue(pv, v425)}));
3860         })();
3861     }));
3862     return l195;
3863 })();
3864 var l196 = {name: "MAKE-LEXENV"};
3865 (function(){
3866     (l196).fvalue = (function(v427){
3867         ((v427)["fname"] = "MAKE-LEXENV");
3868         return v427;
3869     })((function (values){
3870         checkArgsAtMost(arguments, 1);
3871         return (function(){
3872             return l45.fvalue(values, l5.value, l5.value, l5.value, l5.value);
3873         })();
3874     }));
3875     return l196;
3876 })();
3877 var l197 = {name: "COPY-LEXENV"};
3878 (function(){
3879     (l197).fvalue = (function(v429){
3880         ((v429)["fname"] = "COPY-LEXENV");
3881         return v429;
3882     })((function (values,v428){
3883         checkArgs(arguments, 2);
3884         return (function(){
3885             return l82.fvalue(values, v428);
3886         })();
3887     }));
3888     return l197;
3889 })();
3890 var l198 = {name: "PUSH-TO-LEXENV"};
3891 var l199 = {name: "BLOCK"};
3892 var l200 = {name: "GOTAG"};
3893 (function(){
3894     (l198).fvalue = (function(v434){
3895         ((v434)["fname"] = "PUSH-TO-LEXENV");
3896         return v434;
3897     })((function (values,v430,v431,v432){
3898         checkArgs(arguments, 4);
3899         return (function(){
3900             return (function(v433){
3901                 return (l27.fvalue(pv, v433, l110) !== l5.value ? (function(){
3902                     var x = v431;
3903                     if (typeof x != 'object')
3904                         throw 'The value ' + x + ' is not a type object.';
3905                     return (x.car = ({car: v430, cdr: (function(){
3906                         var tmp = v431;
3907                         return tmp === l5.value? l5.value: tmp.car;
3908                     })()}), x);
3909                 })() : (l27.fvalue(pv, v433, l109) !== l5.value ? (function(){
3910                     var x = (function(){
3911                         var tmp = v431;
3912                         return tmp === l5.value? l5.value: tmp.cdr;
3913                     })();
3914                     if (typeof x != 'object')
3915                         throw 'The value ' + x + ' is not a type object.';
3916                     return (x.car = ({car: v430, cdr: l34.fvalue(pv, v431)}), x);
3917                 })() : (l27.fvalue(pv, v433, l199) !== l5.value ? (function(){
3918                     var x = l36.fvalue(pv, v431);
3919                     if (typeof x != 'object')
3920                         throw 'The value ' + x + ' is not a type object.';
3921                     return (x.car = ({car: v430, cdr: l37.fvalue(pv, v431)}), x);
3922                 })() : (l27.fvalue(pv, v433, l200) !== l5.value ? (function(){
3923                     var x = l38.fvalue(pv, v431);
3924                     if (typeof x != 'object')
3925                         throw 'The value ' + x + ' is not a type object.';
3926                     return (x.car = ({car: v430, cdr: l39.fvalue(pv, v431)}), x);
3927                 })() : (function(){
3928                     throw "ECASE expression failed.";
3929                 })()))));
3930             })(v432);
3931         })();
3932     }));
3933     return l198;
3934 })();
3935 var l201 = {name: "EXTEND-LEXENV"};
3936 (function(){
3937     (l201).fvalue = (function(v441){
3938         ((v441)["fname"] = "EXTEND-LEXENV");
3939         return v441;
3940     })((function (values,v435,v436,v437){
3941         checkArgs(arguments, 4);
3942         return (function(){
3943             return (function(v438){
3944                 return (function(){
3945                     return (function(v439,v440){
3946                         (function(){
3947                             while(v439 !== l5.value){
3948                                 (v440 = (function(){
3949                                     var tmp = v439;
3950                                     return tmp === l5.value? l5.value: tmp.car;
3951                                 })());
3952                                 (function(){
3953                                     l198.fvalue(pv, v440, v438, v437);
3954                                     return l5.value;
3955                                 })();
3956                                 (v439 = (function(){
3957                                     var tmp = v439;
3958                                     return tmp === l5.value? l5.value: tmp.cdr;
3959                                 })());
3960                             }return l5.value;
3961                         })();
3962                         return v438;
3963                     })(l68.fvalue(pv, v435),l5.value);
3964                 })();
3965             })(l197.fvalue(pv, v436));
3966         })();
3967     }));
3968     return l201;
3969 })();
3970 var l202 = {name: "LOOKUP-IN-LEXENV"};
3971 (function(){
3972     (l202).fvalue = (function(v446){
3973         ((v446)["fname"] = "LOOKUP-IN-LEXENV");
3974         return v446;
3975     })((function (values,v442,v443,v444){
3976         checkArgs(arguments, 4);
3977         return (function(){
3978             return l102.fvalue(values, v442, (function(v445){
3979                 return (l27.fvalue(pv, v445, l110) !== l5.value ? l40.fvalue(pv, v443) : (l27.fvalue(pv, v445, l109) !== l5.value ? l41.fvalue(pv, v443) : (l27.fvalue(pv, v445, l199) !== l5.value ? l42.fvalue(pv, v443) : (l27.fvalue(pv, v445, l200) !== l5.value ? l43.fvalue(pv, v443) : (function(){
3980                     throw "ECASE expression failed.";
3981                 })()))));
3982             })(v444));
3983         })();
3984     }));
3985     return l202;
3986 })();
3987 var l203 = {name: "*ENVIRONMENT*"};
3988 (function(){
3989     (((l203.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l203).value = l196.fvalue(pv)));
3990     return l203;
3991 })();
3992 var l204 = {name: "*VARIABLE-COUNTER*"};
3993 (function(){
3994     (((l204.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l204).value = 0));
3995     return l204;
3996 })();
3997 var l205 = {name: "GVARNAME"};
3998 (function(){
3999     (l205).fvalue = (function(v448){
4000         ((v448)["fname"] = "GVARNAME");
4001         return v448;
4002     })((function (values,v447){
4003         checkArgs(arguments, 2);
4004         return (function(){
4005             return l182.fvalue(values, "v", ((l204).value = (function(){
4006                 var x1 = (function(){
4007                     var symbol = l204;
4008                     var value = symbol.value;
4009                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4010                     return value;
4011                 })();
4012                 if (typeof x1 !== 'number') throw 'Not a number!';
4013                 return x1+1;
4014             })()));
4015         })();
4016     }));
4017     return l205;
4018 })();
4019 var l206 = {name: "TRANSLATE-VARIABLE"};
4020 (function(){
4021     (l206).fvalue = (function(v450){
4022         ((v450)["fname"] = "TRANSLATE-VARIABLE");
4023         return v450;
4024     })((function (values,v449){
4025         checkArgs(arguments, 2);
4026         return (function(){
4027             return l191.fvalue(values, l202.fvalue(pv, v449, (function(){
4028                 var symbol = l203;
4029                 var value = symbol.value;
4030                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4031                 return value;
4032             })(), l110));
4033         })();
4034     }));
4035     return l206;
4036 })();
4037 var l207 = {name: "EXTEND-LOCAL-ENV"};
4038 (function(){
4039     (l207).fvalue = (function(v456){
4040         ((v456)["fname"] = "EXTEND-LOCAL-ENV");
4041         return v456;
4042     })((function (values,v451){
4043         checkArgs(arguments, 2);
4044         return (function(){
4045             return (function(v452){
4046                 return (function(){
4047                     return (function(v453,v454){
4048                         (function(){
4049                             while(v453 !== l5.value){
4050                                 (v454 = (function(){
4051                                     var tmp = v453;
4052                                     return tmp === l5.value? l5.value: tmp.car;
4053                                 })());
4054                                 (function(){
4055                                     (function(v455){
4056                                         return l198.fvalue(pv, v455, v452, l110);
4057                                     })(l188.fvalue(pv, v454, l110, l205.fvalue(pv, v454)));
4058                                     return l5.value;
4059                                 })();
4060                                 (v453 = (function(){
4061                                     var tmp = v453;
4062                                     return tmp === l5.value? l5.value: tmp.cdr;
4063                                 })());
4064                             }return l5.value;
4065                         })();
4066                         return v452;
4067                     })(v451,l5.value);
4068                 })();
4069             })(l197.fvalue(pv, (function(){
4070                 var symbol = l203;
4071                 var value = symbol.value;
4072                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4073                 return value;
4074             })()));
4075         })();
4076     }));
4077     return l207;
4078 })();
4079 var l208 = {name: "*TOPLEVEL-COMPILATIONS*"};
4080 (function(){
4081     (((l208.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l208).value = l5.value));
4082     return l208;
4083 })();
4084 var l209 = {name: "TOPLEVEL-COMPILATION"};
4085 (function(){
4086     (l209).fvalue = (function(v458){
4087         ((v458)["fname"] = "TOPLEVEL-COMPILATION");
4088         return v458;
4089     })((function (values,v457){
4090         checkArgs(arguments, 2);
4091         return (function(){
4092             return ((l208).value = ({car: v457, cdr: (function(){
4093                 var symbol = l208;
4094                 var value = symbol.value;
4095                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4096                 return value;
4097             })()}));
4098         })();
4099     }));
4100     return l209;
4101 })();
4102 var l210 = {name: "NULL-OR-EMPTY-P"};
4103 (function(){
4104     (l210).fvalue = (function(v460){
4105         ((v460)["fname"] = "NULL-OR-EMPTY-P");
4106         return v460;
4107     })((function (values,v459){
4108         checkArgs(arguments, 2);
4109         return (function(){
4110             return l25.fvalue(values, l73.fvalue(pv, v459));
4111         })();
4112     }));
4113     return l210;
4114 })();
4115 var l211 = {name: "GET-TOPLEVEL-COMPILATIONS"};
4116 (function(){
4117     (l211).fvalue = (function(v461){
4118         ((v461)["fname"] = "GET-TOPLEVEL-COMPILATIONS");
4119         return v461;
4120     })((function (values){
4121         checkArgsAtMost(arguments, 1);
4122         return (function(){
4123             return l68.fvalue(values, l95.fvalue(pv, (function(){
4124                 var symbol = l210;
4125                 var func = symbol.fvalue;
4126                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4127                 return func;
4128             })(), (function(){
4129                 var symbol = l208;
4130                 var value = symbol.value;
4131                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4132                 return value;
4133             })()));
4134         })();
4135     }));
4136     return l211;
4137 })();
4138 var l212 = {name: "%COMPILE-DEFMACRO"};
4139 var l213 = {name: "MACRO"};
4140 (function(){
4141     (l212).fvalue = (function(v464){
4142         ((v464)["fname"] = "%COMPILE-DEFMACRO");
4143         return v464;
4144     })((function (values,v462,v463){
4145         checkArgs(arguments, 3);
4146         return (function(){
4147             l209.fvalue(pv, l184.fvalue(pv, l66.fvalue(pv, l45.fvalue(pv, l177), l45.fvalue(pv, v462))));
4148             l198.fvalue(pv, l188.fvalue(pv, v462, l213, v463), (function(){
4149                 var symbol = l203;
4150                 var value = symbol.value;
4151                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4152                 return value;
4153             })(), l109);
4154             return v462;
4155         })();
4156     }));
4157     return l212;
4158 })();
4159 var l214 = {name: "GLOBAL-BINDING"};
4160 (function(){
4161     (l214).fvalue = (function(v470){
4162         ((v470)["fname"] = "GLOBAL-BINDING");
4163         return v470;
4164     })((function (values,v465,v466,v467){
4165         checkArgs(arguments, 4);
4166         return (function(){
4167             return (function(v468){
4168                 return (v468 !== l5.value ? v468 : (function(v469){
4169                     l198.fvalue(pv, v469, (function(){
4170                         var symbol = l203;
4171                         var value = symbol.value;
4172                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4173                         return value;
4174                     })(), v467);
4175                     return v469;
4176                 })(l188.fvalue(pv, v465, v466, l5.value)));
4177             })(l202.fvalue(pv, v465, (function(){
4178                 var symbol = l203;
4179                 var value = symbol.value;
4180                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4181                 return value;
4182             })(), v467));
4183         })();
4184     }));
4185     return l214;
4186 })();
4187 var l215 = {name: "CLAIMP"};
4188 (function(){
4189     (l215).fvalue = (function(v475){
4190         ((v475)["fname"] = "CLAIMP");
4191         return v475;
4192     })((function (values,v471,v472,v473){
4193         checkArgs(arguments, 4);
4194         return (function(){
4195             return (function(v474){
4196                 return (v474 !== l5.value ? l93.fvalue(values, v473, l192.fvalue(pv, v474)) : l5.value);
4197             })(l202.fvalue(pv, v471, (function(){
4198                 var symbol = l203;
4199                 var value = symbol.value;
4200                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4201                 return value;
4202             })(), v472));
4203         })();
4204     }));
4205     return l215;
4206 })();
4207 var l216 = {name: "!PROCLAIM"};
4208 var l217 = {name: "SPECIAL"};
4209 var l218 = {name: "NOTINLINE"};
4210 var l219 = {name: "CONSTANT"};
4211 (function(){
4212     (l216).fvalue = (function(v487){
4213         ((v487)["fname"] = "!PROCLAIM");
4214         return v487;
4215     })((function (values,v476){
4216         checkArgs(arguments, 2);
4217         return (function(){
4218             return (function(v477){
4219                 return (l27.fvalue(pv, v477, l217) !== l5.value ? (function(){
4220                     return (function(v478,v479){
4221                         (function(){
4222                             while(v478 !== l5.value){
4223                                 (v479 = (function(){
4224                                     var tmp = v478;
4225                                     return tmp === l5.value? l5.value: tmp.car;
4226                                 })());
4227                                 (function(){
4228                                     (function(v480){
4229                                         return l195.fvalue(pv, l217, v480);
4230                                     })(l214.fvalue(pv, v479, l110, l110));
4231                                     return l5.value;
4232                                 })();
4233                                 (v478 = (function(){
4234                                     var tmp = v478;
4235                                     return tmp === l5.value? l5.value: tmp.cdr;
4236                                 })());
4237                             }return l5.value;
4238                         })();
4239                         return l5.value;
4240                     })((function(){
4241                         var tmp = v476;
4242                         return tmp === l5.value? l5.value: tmp.cdr;
4243                     })(),l5.value);
4244                 })() : (l27.fvalue(pv, v477, l218) !== l5.value ? (function(){
4245                     return (function(v481,v482){
4246                         (function(){
4247                             while(v481 !== l5.value){
4248                                 (v482 = (function(){
4249                                     var tmp = v481;
4250                                     return tmp === l5.value? l5.value: tmp.car;
4251                                 })());
4252                                 (function(){
4253                                     (function(v483){
4254                                         return l195.fvalue(pv, l218, v483);
4255                                     })(l214.fvalue(pv, v482, l109, l109));
4256                                     return l5.value;
4257                                 })();
4258                                 (v481 = (function(){
4259                                     var tmp = v481;
4260                                     return tmp === l5.value? l5.value: tmp.cdr;
4261                                 })());
4262                             }return l5.value;
4263                         })();
4264                         return l5.value;
4265                     })((function(){
4266                         var tmp = v476;
4267                         return tmp === l5.value? l5.value: tmp.cdr;
4268                     })(),l5.value);
4269                 })() : (l27.fvalue(pv, v477, l219) !== l5.value ? (function(){
4270                     return (function(v484,v485){
4271                         (function(){
4272                             while(v484 !== l5.value){
4273                                 (v485 = (function(){
4274                                     var tmp = v484;
4275                                     return tmp === l5.value? l5.value: tmp.car;
4276                                 })());
4277                                 (function(){
4278                                     (function(v486){
4279                                         return l195.fvalue(pv, l219, v486);
4280                                     })(l214.fvalue(pv, v485, l110, l110));
4281                                     return l5.value;
4282                                 })();
4283                                 (v484 = (function(){
4284                                     var tmp = v484;
4285                                     return tmp === l5.value? l5.value: tmp.cdr;
4286                                 })());
4287                             }return l5.value;
4288                         })();
4289                         return l5.value;
4290                     })((function(){
4291                         var tmp = v476;
4292                         return tmp === l5.value? l5.value: tmp.cdr;
4293                     })(),l5.value);
4294                 })() : l5.value)));
4295             })((function(){
4296                 var tmp = v476;
4297                 return tmp === l5.value? l5.value: tmp.car;
4298             })());
4299         })();
4300     }));
4301     return l216;
4302 })();
4303 var l220 = {name: "PROCLAIM"};
4304 (l220).fvalue = (function(){
4305     var symbol = l216;
4306     var func = symbol.fvalue;
4307     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4308     return func;
4309 })();
4310 var l221 = {name: "*COMPILATIONS*"};
4311 (function(){
4312     (((l221.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l221).value = l5.value));
4313     return l221;
4314 })();
4315 var l222 = {name: "DEFINE-COMPILATION"};
4316 l222;
4317 var l223 = {name: "IF"};
4318 ((l221).value = ({car: l45.fvalue(pv, l223, (function (values,v488,v489,v490){
4319     checkArgs(arguments, 4);
4320     return (function(){
4321         return l182.fvalue(values, "(", l184.fvalue(pv, v488), " !== ", l184.fvalue(pv, l5.value), " ? ", l184.fvalue(pv, v489, (function(){
4322             var symbol = l187;
4323             var value = symbol.value;
4324             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4325             return value;
4326         })()), " : ", l184.fvalue(pv, v490, (function(){
4327             var symbol = l187;
4328             var value = symbol.value;
4329             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4330             return value;
4331         })()), ")");
4332     })();
4333 })), cdr: (function(){
4334     var symbol = l221;
4335     var value = symbol.value;
4336     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4337     return value;
4338 })()}));
4339 var l224 = {name: "*LL-KEYWORDS*"};
4340 var l225 = {name: "&OPTIONAL"};
4341 var l226 = {name: "&REST"};
4342 var l227 = {name: "&KEY"};
4343 var l228 = QIList(l225,l226,l227,l5);
4344 (function(){
4345     (((l224.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l224).value = l228));
4346     return l224;
4347 })();
4348 var l229 = {name: "LIST-UNTIL-KEYWORD"};
4349 (function(){
4350     (l229).fvalue = (function(v493){
4351         ((v493)["fname"] = "LIST-UNTIL-KEYWORD");
4352         return v493;
4353     })((function (values,v491){
4354         checkArgs(arguments, 2);
4355         return (function(){
4356             return ((function(v492){
4357                 return (v492 !== l5.value ? v492 : l93.fvalue(pv, (function(){
4358                     var tmp = v491;
4359                     return tmp === l5.value? l5.value: tmp.car;
4360                 })(), (function(){
4361                     var symbol = l224;
4362                     var value = symbol.value;
4363                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4364                     return value;
4365                 })()));
4366             })(l13.fvalue(pv, v491)) !== l5.value ? l5.value : ({car: (function(){
4367                 var tmp = v491;
4368                 return tmp === l5.value? l5.value: tmp.car;
4369             })(), cdr: l229.fvalue(pv, (function(){
4370                 var tmp = v491;
4371                 return tmp === l5.value? l5.value: tmp.cdr;
4372             })())}));
4373         })();
4374     }));
4375     return l229;
4376 })();
4377 var l230 = {name: "LL-SECTION"};
4378 (function(){
4379     (l230).fvalue = (function(v496){
4380         ((v496)["fname"] = "LL-SECTION");
4381         return v496;
4382     })((function (values,v494,v495){
4383         checkArgs(arguments, 3);
4384         return (function(){
4385             return l229.fvalue(values, (function(){
4386                 var tmp = l93.fvalue(pv, v494, v495);
4387                 return tmp === l5.value? l5.value: tmp.cdr;
4388             })());
4389         })();
4390     }));
4391     return l230;
4392 })();
4393 var l231 = {name: "LL-REQUIRED-ARGUMENTS"};
4394 (function(){
4395     (l231).fvalue = (function(v498){
4396         ((v498)["fname"] = "LL-REQUIRED-ARGUMENTS");
4397         return v498;
4398     })((function (values,v497){
4399         checkArgs(arguments, 2);
4400         return (function(){
4401             return l229.fvalue(values, v497);
4402         })();
4403     }));
4404     return l231;
4405 })();
4406 var l232 = {name: "LL-OPTIONAL-ARGUMENTS-CANONICAL"};
4407 (function(){
4408     (l232).fvalue = (function(v500){
4409         ((v500)["fname"] = "LL-OPTIONAL-ARGUMENTS-CANONICAL");
4410         return v500;
4411     })((function (values,v499){
4412         checkArgs(arguments, 2);
4413         return (function(){
4414             return l79.fvalue(values, (function(){
4415                 var symbol = l59;
4416                 var func = symbol.fvalue;
4417                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4418                 return func;
4419             })(), l230.fvalue(pv, l225, v499));
4420         })();
4421     }));
4422     return l232;
4423 })();
4424 var l233 = {name: "LL-OPTIONAL-ARGUMENTS"};
4425 (function(){
4426     (l233).fvalue = (function(v502){
4427         ((v502)["fname"] = "LL-OPTIONAL-ARGUMENTS");
4428         return v502;
4429     })((function (values,v501){
4430         checkArgs(arguments, 2);
4431         return (function(){
4432             return l79.fvalue(values, (function(){
4433                 var symbol = l31;
4434                 var func = symbol.fvalue;
4435                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4436                 return func;
4437             })(), l232.fvalue(pv, v501));
4438         })();
4439     }));
4440     return l233;
4441 })();
4442 var l234 = {name: "LL-REST-ARGUMENT"};
4443 (function(){
4444     (l234).fvalue = (function(v505){
4445         ((v505)["fname"] = "LL-REST-ARGUMENT");
4446         return v505;
4447     })((function (values,v503){
4448         checkArgs(arguments, 2);
4449         return (function(){
4450             return (function(v504){
4451                 ((function(){
4452                     var tmp = v504;
4453                     return tmp === l5.value? l5.value: tmp.cdr;
4454                 })() !== l5.value ? (function(){
4455                     throw "Bad lambda-list";
4456                 })() : l5.value);
4457                 return (function(){
4458                     var tmp = v504;
4459                     return tmp === l5.value? l5.value: tmp.car;
4460                 })();
4461             })(l230.fvalue(pv, l226, v503));
4462         })();
4463     }));
4464     return l234;
4465 })();
4466 var l235 = {name: "LL-KEYWORD-ARGUMENTS-CANONICAL"};
4467 (function(){
4468     (l235).fvalue = (function(v510){
4469         ((v510)["fname"] = "LL-KEYWORD-ARGUMENTS-CANONICAL");
4470         return v510;
4471     })((function (values,v506){
4472         checkArgs(arguments, 2);
4473         return (function(){
4474             return (function(v509){
4475                 return l79.fvalue(values, v509, l230.fvalue(pv, l227, v506));
4476             })((function (values,v507){
4477                 checkArgs(arguments, 2);
4478                 return (function(v508){
4479                     return ({car: (l60.fvalue(pv, (function(){
4480                         var tmp = v508;
4481                         return tmp === l5.value? l5.value: tmp.car;
4482                     })()) !== l5.value ? (function(){
4483                         var tmp = v508;
4484                         return tmp === l5.value? l5.value: tmp.car;
4485                     })() : l45.fvalue(pv, l144.fvalue(pv, ((function(){
4486                         var tmp = v508;
4487                         return tmp === l5.value? l5.value: tmp.car;
4488                     })()).name, "KEYWORD"), (function(){
4489                         var tmp = v508;
4490                         return tmp === l5.value? l5.value: tmp.car;
4491                     })())), cdr: (function(){
4492                         var tmp = v508;
4493                         return tmp === l5.value? l5.value: tmp.cdr;
4494                     })()});
4495                 })(l59.fvalue(pv, v507));
4496             }));
4497         })();
4498     }));
4499     return l235;
4500 })();
4501 var l236 = {name: "LL-KEYWORD-ARGUMENTS"};
4502 (function(){
4503     (l236).fvalue = (function(v513){
4504         ((v513)["fname"] = "LL-KEYWORD-ARGUMENTS");
4505         return v513;
4506     })((function (values,v511){
4507         checkArgs(arguments, 2);
4508         return (function(){
4509             return l79.fvalue(values, (function (values,v512){
4510                 checkArgs(arguments, 2);
4511                 return l41.fvalue(values, l40.fvalue(pv, v512));
4512             }), l235.fvalue(pv, v511));
4513         })();
4514     }));
4515     return l236;
4516 })();
4517 var l237 = {name: "LL-SVARS"};
4518 (function(){
4519     (l237).fvalue = (function(v516){
4520         ((v516)["fname"] = "LL-SVARS");
4521         return v516;
4522     })((function (values,v514){
4523         checkArgs(arguments, 2);
4524         return (function(){
4525             return (function(v515){
4526                 return l94.fvalue(values, l5.value, l79.fvalue(pv, (function(){
4527                     var symbol = l42;
4528                     var func = symbol.fvalue;
4529                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4530                     return func;
4531                 })(), v515));
4532             })(l66.fvalue(pv, l235.fvalue(pv, v514), l232.fvalue(pv, v514)));
4533         })();
4534     }));
4535     return l237;
4536 })();
4537 var l238 = {name: "LAMBDA-DOCSTRING-WRAPPER"};
4538 (function(){
4539     (l238).fvalue = (function(v519){
4540         ((v519)["fname"] = "LAMBDA-DOCSTRING-WRAPPER");
4541         return v519;
4542     })((function (values,v518){
4543         checkArgsAtLeast(arguments, 2);
4544         var v517= l5.value;
4545         for (var i = arguments.length-1; i>=2; i--)
4546             v517 = {car: arguments[i], cdr: 
4547         v517};
4548         return (function(){
4549             return (v518 !== l5.value ? l182.fvalue(values, "(function(){", (function(){
4550                 var symbol = l147;
4551                 var value = symbol.value;
4552                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4553                 return value;
4554             })(), l186.fvalue(pv, "var func = ", l150.fvalue(pv, v517), ";", (function(){
4555                 var symbol = l147;
4556                 var value = symbol.value;
4557                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4558                 return value;
4559             })(), "func.docstring = '", v518, "';", (function(){
4560                 var symbol = l147;
4561                 var value = symbol.value;
4562                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4563                 return value;
4564             })(), "return func;", (function(){
4565                 var symbol = l147;
4566                 var value = symbol.value;
4567                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4568                 return value;
4569             })()), "})()") : (function(){
4570                 var f = (function(){
4571                     var symbol = l182;
4572                     var func = symbol.fvalue;
4573                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4574                     return func;
4575                 })();
4576                 var args = [values];
4577                 var tail = (v517);
4578                 while (tail != l5.value){
4579                     args.push(tail.car);
4580                     tail = tail.cdr;
4581                 }
4582                 return f.apply(this, args);
4583             })());
4584         })();
4585     }));
4586     return l238;
4587 })();
4588 var l239 = {name: "LAMBDA-CHECK-ARGUMENT-COUNT"};
4589 var l240 = {name: "N/A"};
4590 (function(){
4591     (l239).fvalue = (function(v525){
4592         ((v525)["fname"] = "LAMBDA-CHECK-ARGUMENT-COUNT");
4593         return v525;
4594     })((function (values,v520,v521,v522){
4595         checkArgs(arguments, 4);
4596         return (function(){
4597             return (function(v523,v524){
4598                 return (function(){
4599                     try {
4600                         (((function(){
4601                             var x1 = v523;
4602                             if (typeof x1 !== 'number') throw 'Not a number!';
4603                             return (1<x1?l4.value: l5.value);
4604                         })() !== l5.value ? l27.fvalue(pv, v523, v524) : l5.value) !== l5.value ? (function(){
4605                             var values = mv;
4606                             throw ({type: 'block', id: 193, values: l182.fvalue(values, "checkArgs(arguments, ", v523, ");", (function(){
4607                                 var symbol = l147;
4608                                 var value = symbol.value;
4609                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4610                                 return value;
4611                             })()), message: 'Return from unknown block NIL.'})
4612                         })() : l5.value);
4613                         return l182.fvalue(values, ((function(){
4614                             var x1 = v523;
4615                             if (typeof x1 !== 'number') throw 'Not a number!';
4616                             return (1<x1?l4.value: l5.value);
4617                         })() !== l5.value ? l182.fvalue(pv, "checkArgsAtLeast(arguments, ", v523, ");", (function(){
4618                             var symbol = l147;
4619                             var value = symbol.value;
4620                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4621                             return value;
4622                         })()) : l5.value), (((typeof (v524) == "number")?l4.value: l5.value) !== l5.value ? l182.fvalue(pv, "checkArgsAtMost(arguments, ", v524, ");", (function(){
4623                             var symbol = l147;
4624                             var value = symbol.value;
4625                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4626                             return value;
4627                         })()) : l5.value));
4628                     }
4629                     catch (cf){
4630                         if (cf.type == 'block' && cf.id == 193)
4631                             return values.apply(this, forcemv(cf.values));
4632                         else
4633                             throw cf;
4634                     }
4635                 })();
4636             })(l23.fvalue(pv, v520),(v522 !== l5.value ? l240 : (function(){
4637                 var x1 = v520;
4638                 if (typeof x1 !== 'number') throw 'Not a number!';
4639                 var x2 = v521;
4640                 if (typeof x2 !== 'number') throw 'Not a number!';
4641                 return 1+x1+x2;
4642             })()));
4643         })();
4644     }));
4645     return l239;
4646 })();
4647 var l241 = {name: "COMPILE-LAMBDA-OPTIONAL"};
4648 (function(){
4649     (l241).fvalue = (function(v534){
4650         ((v534)["fname"] = "COMPILE-LAMBDA-OPTIONAL");
4651         return v534;
4652     })((function (values,v526){
4653         checkArgs(arguments, 2);
4654         return (function(){
4655             return (function(){
4656                 var v527 = l232.fvalue(pv, v526);
4657                 var v528 = l73.fvalue(pv, l231.fvalue(pv, v526));
4658                 var v529 = l73.fvalue(pv, v527);
4659                 return (v527 !== l5.value ? l182.fvalue(values, l152.fvalue(pv, (function (values,v530){
4660                     checkArgs(arguments, 2);
4661                     return l182.fvalue(values, "var ", l206.fvalue(pv, l40.fvalue(pv, v530)), "; ", (function(){
4662                         var symbol = l147;
4663                         var value = symbol.value;
4664                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4665                         return value;
4666                     })(), (l42.fvalue(pv, v530) !== l5.value ? l182.fvalue(pv, "var ", l206.fvalue(pv, l42.fvalue(pv, v530)), " = ", l184.fvalue(pv, l4.value), "; ", (function(){
4667                         var symbol = l147;
4668                         var value = symbol.value;
4669                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4670                         return value;
4671                     })()) : l5.value));
4672                 }), v527), "switch(arguments.length-1){", (function(){
4673                     var symbol = l147;
4674                     var value = symbol.value;
4675                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4676                     return value;
4677                 })(), (function(v531,v532){
4678                     return (function(){
4679                         (function(){
4680                             return (function(){
4681                                 while((function(){
4682                                     var x1 = v532;
4683                                     if (typeof x1 !== 'number') throw 'Not a number!';
4684                                     var x2 = v529;
4685                                     if (typeof x2 !== 'number') throw 'Not a number!';
4686                                     return (x1<x2?l4.value: l5.value);
4687                                 })() !== l5.value){
4688                                     (function(v533){
4689                                         (v531 = ({car: l182.fvalue(pv, "case ", (function(){
4690                                             var x1 = v532;
4691                                             if (typeof x1 !== 'number') throw 'Not a number!';
4692                                             var x2 = v528;
4693                                             if (typeof x2 !== 'number') throw 'Not a number!';
4694                                             return x1+x2;
4695                                         })(), ":", (function(){
4696                                             var symbol = l147;
4697                                             var value = symbol.value;
4698                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4699                                             return value;
4700                                         })(), l186.fvalue(pv, l206.fvalue(pv, (function(){
4701                                             var tmp = v533;
4702                                             return tmp === l5.value? l5.value: tmp.car;
4703                                         })()), "=", l184.fvalue(pv, l34.fvalue(pv, v533)), ";", (function(){
4704                                             var symbol = l147;
4705                                             var value = symbol.value;
4706                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4707                                             return value;
4708                                         })()), (l42.fvalue(pv, v533) !== l5.value ? l186.fvalue(pv, l206.fvalue(pv, l42.fvalue(pv, v533)), "=", l184.fvalue(pv, l5.value), ";", (function(){
4709                                             var symbol = l147;
4710                                             var value = symbol.value;
4711                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4712                                             return value;
4713                                         })()) : l5.value)), cdr: v531}));
4714                                         return (v532 = (function(){
4715                                             var x1 = v532;
4716                                             if (typeof x1 !== 'number') throw 'Not a number!';
4717                                             return x1+1;
4718                                         })());
4719                                     })(l90.fvalue(pv, v532, v527));
4720                                 }return l5.value;
4721                             })();
4722                         })();
4723                         (v531 = ({car: l182.fvalue(pv, "default: break;", (function(){
4724                             var symbol = l147;
4725                             var value = symbol.value;
4726                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4727                             return value;
4728                         })()), cdr: v531}));
4729                         return l150.fvalue(pv, l68.fvalue(pv, v531));
4730                     })();
4731                 })(l5.value,0), "}", (function(){
4732                     var symbol = l147;
4733                     var value = symbol.value;
4734                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4735                     return value;
4736                 })()) : l5.value);
4737             })();
4738         })();
4739     }));
4740     return l241;
4741 })();
4742 var l242 = {name: "COMPILE-LAMBDA-REST"};
4743 (function(){
4744     (l242).fvalue = (function(v540){
4745         ((v540)["fname"] = "COMPILE-LAMBDA-REST");
4746         return v540;
4747     })((function (values,v535){
4748         checkArgs(arguments, 2);
4749         return (function(){
4750             return (function(v536,v537,v538){
4751                 return (v538 !== l5.value ? (function(v539){
4752                     return l182.fvalue(values, "var ", v539, "= ", l184.fvalue(pv, l5.value), ";", (function(){
4753                         var symbol = l147;
4754                         var value = symbol.value;
4755                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4756                         return value;
4757                     })(), "for (var i = arguments.length-1; i>=", (function(){
4758                         var x1 = v536;
4759                         if (typeof x1 !== 'number') throw 'Not a number!';
4760                         var x2 = v537;
4761                         if (typeof x2 !== 'number') throw 'Not a number!';
4762                         return 1+x1+x2;
4763                     })(), "; i--)", (function(){
4764                         var symbol = l147;
4765                         var value = symbol.value;
4766                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4767                         return value;
4768                     })(), l186.fvalue(pv, v539, " = {car: arguments[i], cdr: "), v539, "};", (function(){
4769                         var symbol = l147;
4770                         var value = symbol.value;
4771                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4772                         return value;
4773                     })());
4774                 })(l206.fvalue(pv, v538)) : l5.value);
4775             })(l73.fvalue(pv, l231.fvalue(pv, v535)),l73.fvalue(pv, l233.fvalue(pv, v535)),l234.fvalue(pv, v535));
4776         })();
4777     }));
4778     return l242;
4779 })();
4780 var l243 = {name: "COMPILE-LAMBDA-PARSE-KEYWORDS"};
4781 (function(){
4782     (l243).fvalue = (function(v551){
4783         ((v551)["fname"] = "COMPILE-LAMBDA-PARSE-KEYWORDS");
4784         return v551;
4785     })((function (values,v541){
4786         checkArgs(arguments, 2);
4787         return (function(){
4788             return (function(v542,v543,v544){
4789                 return l182.fvalue(values, l152.fvalue(pv, (function (values,v545){
4790                     checkArgs(arguments, 2);
4791                     return (function(v546){
4792                         return l182.fvalue(values, "var ", l206.fvalue(pv, v546), "; ", (function(){
4793                             var symbol = l147;
4794                             var value = symbol.value;
4795                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4796                             return value;
4797                         })(), (l42.fvalue(pv, v545) !== l5.value ? l182.fvalue(pv, "var ", l206.fvalue(pv, l42.fvalue(pv, v545)), " = ", l184.fvalue(pv, l5.value), ";", (function(){
4798                             var symbol = l147;
4799                             var value = symbol.value;
4800                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4801                             return value;
4802                         })()) : l5.value));
4803                     })(l41.fvalue(pv, (function(){
4804                         var tmp = v545;
4805                         return tmp === l5.value? l5.value: tmp.car;
4806                     })()));
4807                 }), v544), (function(v549){
4808                     return (v544 !== l5.value ? l182.fvalue(pv, "var i;", (function(){
4809                         var symbol = l147;
4810                         var value = symbol.value;
4811                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4812                         return value;
4813                     })(), l152.fvalue(pv, v549, v544)) : l5.value);
4814                 })((function (values,v547){
4815                     checkArgs(arguments, 2);
4816                     return l182.fvalue(values, "for (i=", (function(){
4817                         var x1 = v542;
4818                         if (typeof x1 !== 'number') throw 'Not a number!';
4819                         var x2 = v543;
4820                         if (typeof x2 !== 'number') throw 'Not a number!';
4821                         return 1+x1+x2;
4822                     })(), "; i<arguments.length; i+=2){", (function(){
4823                         var symbol = l147;
4824                         var value = symbol.value;
4825                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4826                         return value;
4827                     })(), l186.fvalue(pv, "if (arguments[i] === ", l184.fvalue(pv, l33.fvalue(pv, v547)), "){", (function(){
4828                         var symbol = l147;
4829                         var value = symbol.value;
4830                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4831                         return value;
4832                     })(), l186.fvalue(pv, l206.fvalue(pv, l34.fvalue(pv, (function(){
4833                         var tmp = v547;
4834                         return tmp === l5.value? l5.value: tmp.car;
4835                     })())), " = arguments[i+1];", (function(){
4836                         var symbol = l147;
4837                         var value = symbol.value;
4838                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4839                         return value;
4840                     })(), (function(v548){
4841                         return (v548 !== l5.value ? l182.fvalue(pv, l206.fvalue(pv, v548), " = ", l184.fvalue(pv, l4.value), ";", (function(){
4842                             var symbol = l147;
4843                             var value = symbol.value;
4844                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4845                             return value;
4846                         })()) : l5.value);
4847                     })(l42.fvalue(pv, v547)), "break;", (function(){
4848                         var symbol = l147;
4849                         var value = symbol.value;
4850                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4851                         return value;
4852                     })()), "}", (function(){
4853                         var symbol = l147;
4854                         var value = symbol.value;
4855                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4856                         return value;
4857                     })()), "}", (function(){
4858                         var symbol = l147;
4859                         var value = symbol.value;
4860                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4861                         return value;
4862                     })(), "if (i == arguments.length){", (function(){
4863                         var symbol = l147;
4864                         var value = symbol.value;
4865                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4866                         return value;
4867                     })(), l186.fvalue(pv, l206.fvalue(pv, l34.fvalue(pv, (function(){
4868                         var tmp = v547;
4869                         return tmp === l5.value? l5.value: tmp.car;
4870                     })())), " = ", l184.fvalue(pv, l34.fvalue(pv, v547)), ";", (function(){
4871                         var symbol = l147;
4872                         var value = symbol.value;
4873                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4874                         return value;
4875                     })()), "}", (function(){
4876                         var symbol = l147;
4877                         var value = symbol.value;
4878                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4879                         return value;
4880                     })());
4881                 })), (v544 !== l5.value ? l182.fvalue(pv, "for (i=", (function(){
4882                     var x1 = v542;
4883                     if (typeof x1 !== 'number') throw 'Not a number!';
4884                     var x2 = v543;
4885                     if (typeof x2 !== 'number') throw 'Not a number!';
4886                     return 1+x1+x2;
4887                 })(), "; i<arguments.length; i+=2){", (function(){
4888                     var symbol = l147;
4889                     var value = symbol.value;
4890                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4891                     return value;
4892                 })(), l186.fvalue(pv, "if (", l150.fvalue(pv, l79.fvalue(pv, (function (values,v550){
4893                     checkArgs(arguments, 2);
4894                     return l148.fvalue(values, "arguments[i] !== ", l184.fvalue(pv, l33.fvalue(pv, v550)));
4895                 }), v544), " && "), ")", (function(){
4896                     var symbol = l147;
4897                     var value = symbol.value;
4898                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4899                     return value;
4900                 })(), l186.fvalue(pv, "throw 'Unknown keyword argument ' + arguments[i].name;", (function(){
4901                     var symbol = l147;
4902                     var value = symbol.value;
4903                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4904                     return value;
4905                 })())), "}", (function(){
4906                     var symbol = l147;
4907                     var value = symbol.value;
4908                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4909                     return value;
4910                 })()) : l5.value));
4911             })(l73.fvalue(pv, l231.fvalue(pv, v541)),l73.fvalue(pv, l233.fvalue(pv, v541)),l235.fvalue(pv, v541));
4912         })();
4913     }));
4914     return l243;
4915 })();
4916 var l244 = {name: "COMPILE-LAMBDA"};
4917 var l245 = {name: "LS-COMPILE-BLOCK"};
4918 (function(){
4919     (l244).fvalue = (function(v564){
4920         ((v564)["fname"] = "COMPILE-LAMBDA");
4921         return v564;
4922     })((function (values,v552,v553){
4923         checkArgs(arguments, 3);
4924         return (function(){
4925             return (function(v554,v555,v556,v557,v558){
4926                 ((((typeof((function(){
4927                     var tmp = v553;
4928                     return tmp === l5.value? l5.value: tmp.car;
4929                 })()) == "string")?l4.value: l5.value) !== l5.value ? l28.fvalue(pv, l13.fvalue(pv, (function(){
4930                     var tmp = v553;
4931                     return tmp === l5.value? l5.value: tmp.cdr;
4932                 })())) : l5.value) !== l5.value ? (function(){
4933                     (v558 = (function(){
4934                         var tmp = v553;
4935                         return tmp === l5.value? l5.value: tmp.car;
4936                     })());
4937                     return (v553 = (function(){
4938                         var tmp = v553;
4939                         return tmp === l5.value? l5.value: tmp.cdr;
4940                     })());
4941                 })() : l5.value);
4942                 return (function(v559,v560,v561){
4943                     try {
4944                         var tmp;
4945                         tmp = l203.value;
4946                         l203.value = v561;
4947                         v561 = tmp;
4948                         return l238.fvalue(values, v558, "(function (", l150.fvalue(pv, ({car: "values", cdr: l79.fvalue(pv, (function(){
4949                             var symbol = l206;
4950                             var func = symbol.fvalue;
4951                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4952                             return func;
4953                         })(), l66.fvalue(pv, v554, v555))}), ","), "){", (function(){
4954                             var symbol = l147;
4955                             var value = symbol.value;
4956                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4957                             return value;
4958                         })(), l186.fvalue(pv, l239.fvalue(pv, v559, v560, (function(v562){
4959                             return (v562 !== l5.value ? v562 : v556);
4960                         })(v557)), l241.fvalue(pv, v552), l242.fvalue(pv, v552), l243.fvalue(pv, v552), (function(v563){
4961                             try {
4962                                 var tmp;
4963                                 tmp = l187.value;
4964                                 l187.value = v563;
4965                                 v563 = tmp;
4966                                 return l245.fvalue(pv, v553, l4.value);
4967                             }
4968                             finally {
4969                                 l187.value = v563;
4970                             }
4971                         })(l4.value)), "})");
4972                     }
4973                     finally {
4974                         l203.value = v561;
4975                     }
4976                 })(l73.fvalue(pv, v554),l73.fvalue(pv, v555),l207.fvalue(pv, l66.fvalue(pv, l59.fvalue(pv, v557), v554, v555, v556, l237.fvalue(pv, v552))));
4977             })(l231.fvalue(pv, v552),l233.fvalue(pv, v552),l236.fvalue(pv, v552),l234.fvalue(pv, v552),l5.value);
4978         })();
4979     }));
4980     return l244;
4981 })();
4982 var l246 = {name: "SETQ-PAIR"};
4983 var l247 = {name: "SET"};
4984 (function(){
4985     (l246).fvalue = (function(v568){
4986         ((v568)["fname"] = "SETQ-PAIR");
4987         return v568;
4988     })((function (values,v565,v566){
4989         checkArgs(arguments, 3);
4990         return (function(){
4991             return (function(v567){
4992                 return ((((l190.fvalue(pv, v567) === l110)?l4.value: l5.value) !== l5.value ? (l28.fvalue(pv, l93.fvalue(pv, l217, l192.fvalue(pv, v567))) !== l5.value ? l28.fvalue(pv, l93.fvalue(pv, l219, l192.fvalue(pv, v567))) : l5.value) : l5.value) !== l5.value ? l182.fvalue(values, l191.fvalue(pv, v567), " = ", l184.fvalue(pv, v566)) : l184.fvalue(values, l66.fvalue(pv, l45.fvalue(pv, l247), l45.fvalue(pv, l66.fvalue(pv, l45.fvalue(pv, l177), l45.fvalue(pv, v565))), l45.fvalue(pv, v566))));
4993             })(l202.fvalue(pv, v565, (function(){
4994                 var symbol = l203;
4995                 var value = symbol.value;
4996                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4997                 return value;
4998             })(), l110));
4999         })();
5000     }));
5001     return l246;
5002 })();
5003 ((l221).value = ({car: l45.fvalue(pv, l115, (function (values){
5004     var v569= l5.value;
5005     for (var i = arguments.length-1; i>=1; i--)
5006         v569 = {car: arguments[i], cdr: 
5007     v569};
5008     return (function(){
5009         return (function(v570){
5010             (function(){
5011                 try {
5012                     return (function(){
5013                         while(l4.value !== l5.value){
5014                             (l13.fvalue(pv, v569) !== l5.value ? (function(){
5015                                 throw ({type: 'block', id: 201, values: l5.value, message: 'Return from unknown block NIL.'})
5016                             })() : (l13.fvalue(pv, (function(){
5017                                 var tmp = v569;
5018                                 return tmp === l5.value? l5.value: tmp.cdr;
5019                             })()) !== l5.value ? (function(){
5020                                 throw "Odd paris in SETQ";
5021                             })() : (function(){
5022                                 (v570 = l148.fvalue(pv, v570, l148.fvalue(pv, l246.fvalue(pv, (function(){
5023                                     var tmp = v569;
5024                                     return tmp === l5.value? l5.value: tmp.car;
5025                                 })(), l34.fvalue(pv, v569)), (l13.fvalue(pv, l36.fvalue(pv, v569)) !== l5.value ? "" : ", "))));
5026                                 return (v569 = l36.fvalue(pv, v569));
5027                             })()));
5028                         }return l5.value;
5029                     })();
5030                 }
5031                 catch (cf){
5032                     if (cf.type == 'block' && cf.id == 201)
5033                         return cf.values;
5034                     else
5035                         throw cf;
5036                 }
5037             })();
5038             return l182.fvalue(values, "(", v570, ")");
5039         })("");
5040     })();
5041 })), cdr: (function(){
5042     var symbol = l221;
5043     var value = symbol.value;
5044     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5045     return value;
5046 })()}));
5047 var l248 = {name: "JS-VREF"};
5048 ((l221).value = ({car: l45.fvalue(pv, l248, (function (values,v571){
5049     checkArgs(arguments, 2);
5050     return (function(){
5051         return v571;
5052     })();
5053 })), cdr: (function(){
5054     var symbol = l221;
5055     var value = symbol.value;
5056     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5057     return value;
5058 })()}));
5059 var l249 = {name: "JS-VSET"};
5060 ((l221).value = ({car: l45.fvalue(pv, l249, (function (values,v572,v573){
5061     checkArgs(arguments, 3);
5062     return (function(){
5063         return l182.fvalue(values, "(", v572, " = ", l184.fvalue(pv, v573), ")");
5064     })();
5065 })), cdr: (function(){
5066     var symbol = l221;
5067     var value = symbol.value;
5068     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5069     return value;
5070 })()}));
5071 (function(){
5072     (l158).fvalue = (function(v580){
5073         ((v580)["fname"] = "ESCAPE-STRING");
5074         return v580;
5075     })((function (values,v574){
5076         checkArgs(arguments, 2);
5077         return (function(){
5078             return (function(v575,v576,v577){
5079                 (function(){
5080                     return (function(){
5081                         while((function(){
5082                             var x1 = v576;
5083                             if (typeof x1 !== 'number') throw 'Not a number!';
5084                             var x2 = v577;
5085                             if (typeof x2 !== 'number') throw 'Not a number!';
5086                             return (x1<x2?l4.value: l5.value);
5087                         })() !== l5.value){
5088                             (function(v578){
5089                                 ((function(v579){
5090                                     return (v579 !== l5.value ? v579 : l85.fvalue(pv, v578, 92));
5091                                 })(l85.fvalue(pv, v578, 34)) !== l5.value ? (v575 = l148.fvalue(pv, v575, "\\")) : l5.value);
5092                                 (l85.fvalue(pv, v578, 10) !== l5.value ? (function(){
5093                                     (v575 = l148.fvalue(pv, v575, "\\"));
5094                                     return (v578 = 110);
5095                                 })() : l5.value);
5096                                 return (v575 = l148.fvalue(pv, v575, l103.fvalue(pv, v578)));
5097                             })((function(){
5098                                 var string = v574;
5099                                 var index = v576;
5100                                 if (typeof string != 'string')
5101                                     throw 'The value ' + string + ' is not a type string.';
5102                                 if (typeof index != 'number')
5103                                     throw 'The value ' + index + ' is not a type number.';
5104                                 return string.charCodeAt(index);
5105                             })());
5106                             (v576 = (function(){
5107                                 var x1 = v576;
5108                                 if (typeof x1 !== 'number') throw 'Not a number!';
5109                                 return x1+1;
5110                             })());
5111                         }return l5.value;
5112                     })();
5113                 })();
5114                 return v575;
5115             })("",0,l73.fvalue(pv, v574));
5116         })();
5117     }));
5118     return l158;
5119 })();
5120 var l250 = {name: "*LITERAL-SYMBOLS*"};
5121 (function(){
5122     (((l250.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l250).value = l5.value));
5123     return l250;
5124 })();
5125 var l251 = {name: "*LITERAL-COUNTER*"};
5126 (function(){
5127     (((l251.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l251).value = 0));
5128     return l251;
5129 })();
5130 var l252 = {name: "GENLIT"};
5131 (function(){
5132     (l252).fvalue = (function(v581){
5133         ((v581)["fname"] = "GENLIT");
5134         return v581;
5135     })((function (values){
5136         checkArgsAtMost(arguments, 1);
5137         return (function(){
5138             return l182.fvalue(values, "l", ((l251).value = (function(){
5139                 var x1 = (function(){
5140                     var symbol = l251;
5141                     var value = symbol.value;
5142                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5143                     return value;
5144                 })();
5145                 if (typeof x1 !== 'number') throw 'Not a number!';
5146                 return x1+1;
5147             })()));
5148         })();
5149     }));
5150     return l252;
5151 })();
5152 var l253 = {name: "LITERAL"};
5153 (function(){
5154     (l253).fvalue = (function(v596){
5155         ((v596)["fname"] = "LITERAL");
5156         return v596;
5157     })((function (values,v582,v583){
5158         checkArgsAtLeast(arguments, 2);
5159         checkArgsAtMost(arguments, 3);
5160         var v583; 
5161         switch(arguments.length-1){
5162         case 1:
5163             v583=l5.value;
5164         default: break;
5165         }
5166         return (function(){
5167             return (l86.fvalue(pv, v582) !== l5.value ? l18.fvalue(values, v582) : (((typeof(v582) == "string")?l4.value: l5.value) !== l5.value ? l182.fvalue(values, "\"", l158.fvalue(pv, v582), "\"") : (((function(){
5168                 var tmp = v582;
5169                 return (typeof tmp == 'object' && 'name' in tmp);
5170             })()?l4.value: l5.value) !== l5.value ? (function(v584){
5171                 return (v584 !== l5.value ? v584 : (function(v586,v587){
5172                     ((l250).value = ({car: ({car: v582, cdr: v586}), cdr: (function(){
5173                         var symbol = l250;
5174                         var value = symbol.value;
5175                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5176                         return value;
5177                     })()}));
5178                     l209.fvalue(pv, l182.fvalue(pv, "var ", v586, " = ", v587));
5179                     return v586;
5180                 })(l252.fvalue(pv),(function(v585){
5181                     return (l13.fvalue(pv, v585) !== l5.value ? l182.fvalue(pv, "{name: \"", l158.fvalue(pv, (v582).name), "\"}") : l184.fvalue(pv, l66.fvalue(pv, l45.fvalue(pv, l144), l45.fvalue(pv, (v582).name), l45.fvalue(pv, l128.fvalue(pv, v585)))));
5182                 })(l136.fvalue(pv, v582))));
5183             })((function(){
5184                 var tmp = l102.fvalue(pv, v582, (function(){
5185                     var symbol = l250;
5186                     var value = symbol.value;
5187                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5188                     return value;
5189                 })());
5190                 return tmp === l5.value? l5.value: tmp.cdr;
5191             })()) : (((function(){
5192                 var tmp = v582;
5193                 return (typeof tmp == 'object' && 'car' in tmp);
5194             })()?l4.value: l5.value) !== l5.value ? (function(){
5195                 var v588 = l92.fvalue(pv, v582);
5196                 var v589 = l91.fvalue(pv, v582);
5197                 var v590 = l182.fvalue(pv, "QIList(", l151.fvalue(pv, l79.fvalue(pv, (function (values,v591){
5198                     checkArgs(arguments, 2);
5199                     return l253.fvalue(values, v591, l4.value);
5200                 }), v588), ","), l253.fvalue(pv, (function(){
5201                     var tmp = v589;
5202                     return tmp === l5.value? l5.value: tmp.car;
5203                 })(), l4.value), ",", l253.fvalue(pv, (function(){
5204                     var tmp = v589;
5205                     return tmp === l5.value? l5.value: tmp.cdr;
5206                 })(), l4.value), ")");
5207                 return (v583 !== l5.value ? v590 : (function(v592){
5208                     l209.fvalue(pv, l182.fvalue(pv, "var ", v592, " = ", v590));
5209                     return v592;
5210                 })(l252.fvalue(pv)));
5211             })() : (((function(){
5212                 var x = v582;
5213                 return typeof x === 'object' && 'length' in x;
5214             })()?l4.value: l5.value) !== l5.value ? (function(v593){
5215                 return (function(v594){
5216                     return (v583 !== l5.value ? v594 : (function(v595){
5217                         l209.fvalue(pv, l182.fvalue(pv, "var ", v595, " = ", v594));
5218                         return v595;
5219                     })(l252.fvalue(pv)));
5220                 })(l148.fvalue(pv, "[", l150.fvalue(pv, l79.fvalue(pv, (function(){
5221                     var symbol = l253;
5222                     var func = symbol.fvalue;
5223                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5224                     return func;
5225                 })(), v593), ", "), "]"));
5226             })(l153.fvalue(pv, v582)) : l5.value)))));
5227         })();
5228     }));
5229     return l253;
5230 })();
5231 ((l221).value = ({car: l45.fvalue(pv, l177, (function (values,v597){
5232     checkArgs(arguments, 2);
5233     return (function(){
5234         return l253.fvalue(values, v597);
5235     })();
5236 })), cdr: (function(){
5237     var symbol = l221;
5238     var value = symbol.value;
5239     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5240     return value;
5241 })()}));
5242 var l254 = {name: "%WHILE"};
5243 ((l221).value = ({car: l45.fvalue(pv, l254, (function (values,v599){
5244     checkArgsAtLeast(arguments, 2);
5245     var v598= l5.value;
5246     for (var i = arguments.length-1; i>=2; i--)
5247         v598 = {car: arguments[i], cdr: 
5248     v598};
5249     return (function(){
5250         return l182.fvalue(values, "(function(){", (function(){
5251             var symbol = l147;
5252             var value = symbol.value;
5253             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5254             return value;
5255         })(), l186.fvalue(pv, "while(", l184.fvalue(pv, v599), " !== ", l184.fvalue(pv, l5.value), "){", (function(){
5256             var symbol = l147;
5257             var value = symbol.value;
5258             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5259             return value;
5260         })(), l186.fvalue(pv, l245.fvalue(pv, v598)), "}", "return ", l184.fvalue(pv, l5.value), ";", (function(){
5261             var symbol = l147;
5262             var value = symbol.value;
5263             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5264             return value;
5265         })()), "})()");
5266     })();
5267 })), cdr: (function(){
5268     var symbol = l221;
5269     var value = symbol.value;
5270     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5271     return value;
5272 })()}));
5273 var l255 = {name: "SYMBOL-FUNCTION"};
5274 ((l221).value = ({car: l45.fvalue(pv, l109, (function (values,v600){
5275     checkArgs(arguments, 2);
5276     return (function(){
5277         return ((l60.fvalue(pv, v600) !== l5.value ? (((function(){
5278             var tmp = v600;
5279             return tmp === l5.value? l5.value: tmp.car;
5280         })() === l6)?l4.value: l5.value) : l5.value) !== l5.value ? l244.fvalue(values, l34.fvalue(pv, v600), l36.fvalue(pv, v600)) : (((function(){
5281             var tmp = v600;
5282             return (typeof tmp == 'object' && 'name' in tmp);
5283         })()?l4.value: l5.value) !== l5.value ? (function(v601){
5284             return (v601 !== l5.value ? l191.fvalue(values, v601) : l184.fvalue(values, l66.fvalue(pv, l45.fvalue(pv, l255), l45.fvalue(pv, l66.fvalue(pv, l45.fvalue(pv, l177), l45.fvalue(pv, v600))))));
5285         })(l202.fvalue(pv, v600, (function(){
5286             var symbol = l203;
5287             var value = symbol.value;
5288             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5289             return value;
5290         })(), l109)) : l5.value));
5291     })();
5292 })), cdr: (function(){
5293     var symbol = l221;
5294     var value = symbol.value;
5295     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5296     return value;
5297 })()}));
5298 var l256 = {name: "MAKE-FUNCTION-BINDING"};
5299 (function(){
5300     (l256).fvalue = (function(v603){
5301         ((v603)["fname"] = "MAKE-FUNCTION-BINDING");
5302         return v603;
5303     })((function (values,v602){
5304         checkArgs(arguments, 2);
5305         return (function(){
5306             return l188.fvalue(values, v602, l109, l205.fvalue(pv, v602));
5307         })();
5308     }));
5309     return l256;
5310 })();
5311 var l257 = {name: "COMPILE-FUNCTION-DEFINITION"};
5312 (function(){
5313     (l257).fvalue = (function(v605){
5314         ((v605)["fname"] = "COMPILE-FUNCTION-DEFINITION");
5315         return v605;
5316     })((function (values,v604){
5317         checkArgs(arguments, 2);
5318         return (function(){
5319             return l244.fvalue(values, (function(){
5320                 var tmp = v604;
5321                 return tmp === l5.value? l5.value: tmp.car;
5322             })(), (function(){
5323                 var tmp = v604;
5324                 return tmp === l5.value? l5.value: tmp.cdr;
5325             })());
5326         })();
5327     }));
5328     return l257;
5329 })();
5330 var l258 = {name: "TRANSLATE-FUNCTION"};
5331 (function(){
5332     (l258).fvalue = (function(v608){
5333         ((v608)["fname"] = "TRANSLATE-FUNCTION");
5334         return v608;
5335     })((function (values,v606){
5336         checkArgs(arguments, 2);
5337         return (function(){
5338             return (function(v607){
5339                 return l191.fvalue(values, v607);
5340             })(l202.fvalue(pv, v606, (function(){
5341                 var symbol = l203;
5342                 var value = symbol.value;
5343                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5344                 return value;
5345             })(), l109));
5346         })();
5347     }));
5348     return l258;
5349 })();
5350 var l259 = {name: "FLET"};
5351 ((l221).value = ({car: l45.fvalue(pv, l259, (function (values,v610){
5352     checkArgsAtLeast(arguments, 2);
5353     var v609= l5.value;
5354     for (var i = arguments.length-1; i>=2; i--)
5355         v609 = {car: arguments[i], cdr: 
5356     v609};
5357     return (function(){
5358         return (function(){
5359             try {
5360                 var v615 = l203.value;
5361                 var v611 = l79.fvalue(pv, (function(){
5362                     var symbol = l31;
5363                     var func = symbol.fvalue;
5364                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5365                     return func;
5366                 })(), v610);
5367                 var v612 = l79.fvalue(pv, (function(){
5368                     var symbol = l32;
5369                     var func = symbol.fvalue;
5370                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5371                     return func;
5372                 })(), v610);
5373                 var v613 = l79.fvalue(pv, (function(){
5374                     var symbol = l257;
5375                     var func = symbol.fvalue;
5376                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5377                     return func;
5378                 })(), v612);
5379                 ((l203).value = l201.fvalue(pv, l79.fvalue(pv, (function(){
5380                     var symbol = l256;
5381                     var func = symbol.fvalue;
5382                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5383                     return func;
5384                 })(), v611), (function(){
5385                     var symbol = l203;
5386                     var value = symbol.value;
5387                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5388                     return value;
5389                 })(), l109));
5390                 return l182.fvalue(values, "(function(", l150.fvalue(pv, l79.fvalue(pv, (function(){
5391                     var symbol = l258;
5392                     var func = symbol.fvalue;
5393                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5394                     return func;
5395                 })(), v611), ","), "){", (function(){
5396                     var symbol = l147;
5397                     var value = symbol.value;
5398                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5399                     return value;
5400                 })(), (function(v614){
5401                     return l186.fvalue(pv, v614);
5402                 })(l245.fvalue(pv, v609, l4.value)), "})(", l150.fvalue(pv, v613, ","), ")");
5403             }
5404             finally {
5405                 l203.value = v615;
5406             }
5407         })();
5408     })();
5409 })), cdr: (function(){
5410     var symbol = l221;
5411     var value = symbol.value;
5412     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5413     return value;
5414 })()}));
5415 var l260 = {name: "LABELS"};
5416 ((l221).value = ({car: l45.fvalue(pv, l260, (function (values,v617){
5417     checkArgsAtLeast(arguments, 2);
5418     var v616= l5.value;
5419     for (var i = arguments.length-1; i>=2; i--)
5420         v616 = {car: arguments[i], cdr: 
5421     v616};
5422     return (function(){
5423         return (function(){
5424             try {
5425                 var v620 = l203.value;
5426                 var v618 = l79.fvalue(pv, (function(){
5427                     var symbol = l31;
5428                     var func = symbol.fvalue;
5429                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5430                     return func;
5431                 })(), v617);
5432                 ((l203).value = l201.fvalue(pv, l79.fvalue(pv, (function(){
5433                     var symbol = l256;
5434                     var func = symbol.fvalue;
5435                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5436                     return func;
5437                 })(), v618), (function(){
5438                     var symbol = l203;
5439                     var value = symbol.value;
5440                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5441                     return value;
5442                 })(), l109));
5443                 return l182.fvalue(values, "(function(){", (function(){
5444                     var symbol = l147;
5445                     var value = symbol.value;
5446                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5447                     return value;
5448                 })(), l186.fvalue(pv, l152.fvalue(pv, (function (values,v619){
5449                     checkArgs(arguments, 2);
5450                     return l182.fvalue(values, "var ", l258.fvalue(pv, (function(){
5451                         var tmp = v619;
5452                         return tmp === l5.value? l5.value: tmp.car;
5453                     })()), " = ", l244.fvalue(pv, l34.fvalue(pv, v619), l36.fvalue(pv, v619)), ";", (function(){
5454                         var symbol = l147;
5455                         var value = symbol.value;
5456                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5457                         return value;
5458                     })());
5459                 }), v617), l245.fvalue(pv, v616, l4.value)), "})()");
5460             }
5461             finally {
5462                 l203.value = v620;
5463             }
5464         })();
5465     })();
5466 })), cdr: (function(){
5467     var symbol = l221;
5468     var value = symbol.value;
5469     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5470     return value;
5471 })()}));
5472 var l261 = {name: "*COMPILING-FILE*"};
5473 (function(){
5474     (((l261.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l261).value = l5.value));
5475     return l261;
5476 })();
5477 var l262 = {name: "EVAL-WHEN-COMPILE"};
5478 var l263 = {name: "EVAL"};
5479 ((l221).value = ({car: l45.fvalue(pv, l262, (function (values){
5480     var v621= l5.value;
5481     for (var i = arguments.length-1; i>=1; i--)
5482         v621 = {car: arguments[i], cdr: 
5483     v621};
5484     return (function(){
5485         return ((function(){
5486             var symbol = l261;
5487             var value = symbol.value;
5488             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5489             return value;
5490         })() !== l5.value ? (function(){
5491             l263.fvalue(pv, ({car: l118, cdr: v621}));
5492             return l5.value;
5493         })() : l184.fvalue(values, l66.fvalue(pv, l45.fvalue(pv, l118), v621)));
5494     })();
5495 })), cdr: (function(){
5496     var symbol = l221;
5497     var value = symbol.value;
5498     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5499     return value;
5500 })()}));
5501 var l264 = {name: "DEFINE-TRANSFORMATION"};
5502 l264;
5503 ((l221).value = ({car: l45.fvalue(pv, l118, (function (values){
5504     var v622= l5.value;
5505     for (var i = arguments.length-1; i>=1; i--)
5506         v622 = {car: arguments[i], cdr: 
5507     v622};
5508     return (function(){
5509         return (l13.fvalue(pv, (function(){
5510             var tmp = v622;
5511             return tmp === l5.value? l5.value: tmp.cdr;
5512         })()) !== l5.value ? l184.fvalue(values, (function(){
5513             var tmp = v622;
5514             return tmp === l5.value? l5.value: tmp.car;
5515         })(), (function(){
5516             var symbol = l187;
5517             var value = symbol.value;
5518             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5519             return value;
5520         })()) : l182.fvalue(values, "(function(){", (function(){
5521             var symbol = l147;
5522             var value = symbol.value;
5523             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5524             return value;
5525         })(), l186.fvalue(pv, l245.fvalue(pv, v622, l4.value)), "})()"));
5526     })();
5527 })), cdr: (function(){
5528     var symbol = l221;
5529     var value = symbol.value;
5530     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5531     return value;
5532 })()}));
5533 var l265 = {name: "SPECIAL-VARIABLE-P"};
5534 (function(){
5535     (l265).fvalue = (function(v624){
5536         ((v624)["fname"] = "SPECIAL-VARIABLE-P");
5537         return v624;
5538     })((function (values,v623){
5539         checkArgs(arguments, 2);
5540         return (function(){
5541             return (l215.fvalue(pv, v623, l110, l217) !== l5.value ? l4.value : l5.value);
5542         })();
5543     }));
5544     return l265;
5545 })();
5546 var l266 = {name: "LET-BINDING-WRAPPER"};
5547 (function(){
5548     (l266).fvalue = (function(v631){
5549         ((v631)["fname"] = "LET-BINDING-WRAPPER");
5550         return v631;
5551     })((function (values,v625,v626){
5552         checkArgs(arguments, 3);
5553         return (function(){
5554             try {
5555                 (l13.fvalue(pv, v625) !== l5.value ? (function(){
5556                     var values = mv;
5557                     throw ({type: 'block', id: 219, values: v626, message: 'Return from unknown block LET-BINDING-WRAPPER.'})
5558                 })() : l5.value);
5559                 return l182.fvalue(values, "try {", (function(){
5560                     var symbol = l147;
5561                     var value = symbol.value;
5562                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5563                     return value;
5564                 })(), l186.fvalue(pv, "var tmp;", (function(){
5565                     var symbol = l147;
5566                     var value = symbol.value;
5567                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5568                     return value;
5569                 })(), l152.fvalue(pv, (function (values,v627){
5570                     checkArgs(arguments, 2);
5571                     return (function(v628){
5572                         return l182.fvalue(values, "tmp = ", v628, ".value;", (function(){
5573                             var symbol = l147;
5574                             var value = symbol.value;
5575                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5576                             return value;
5577                         })(), v628, ".value = ", (function(){
5578                             var tmp = v627;
5579                             return tmp === l5.value? l5.value: tmp.cdr;
5580                         })(), ";", (function(){
5581                             var symbol = l147;
5582                             var value = symbol.value;
5583                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5584                             return value;
5585                         })(), (function(){
5586                             var tmp = v627;
5587                             return tmp === l5.value? l5.value: tmp.cdr;
5588                         })(), " = tmp;", (function(){
5589                             var symbol = l147;
5590                             var value = symbol.value;
5591                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5592                             return value;
5593                         })());
5594                     })(l184.fvalue(pv, l66.fvalue(pv, l45.fvalue(pv, l177), l45.fvalue(pv, (function(){
5595                         var tmp = v627;
5596                         return tmp === l5.value? l5.value: tmp.car;
5597                     })()))));
5598                 }), v625), v626, (function(){
5599                     var symbol = l147;
5600                     var value = symbol.value;
5601                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5602                     return value;
5603                 })()), "}", (function(){
5604                     var symbol = l147;
5605                     var value = symbol.value;
5606                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5607                     return value;
5608                 })(), "finally {", (function(){
5609                     var symbol = l147;
5610                     var value = symbol.value;
5611                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5612                     return value;
5613                 })(), l186.fvalue(pv, l152.fvalue(pv, (function (values,v629){
5614                     checkArgs(arguments, 2);
5615                     return (function(v630){
5616                         return l182.fvalue(values, v630, ".value", " = ", (function(){
5617                             var tmp = v629;
5618                             return tmp === l5.value? l5.value: tmp.cdr;
5619                         })(), ";", (function(){
5620                             var symbol = l147;
5621                             var value = symbol.value;
5622                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5623                             return value;
5624                         })());
5625                     })(l184.fvalue(pv, l66.fvalue(pv, l45.fvalue(pv, l177), l45.fvalue(pv, (function(){
5626                         var tmp = v629;
5627                         return tmp === l5.value? l5.value: tmp.car;
5628                     })()))));
5629                 }), v625)), "}", (function(){
5630                     var symbol = l147;
5631                     var value = symbol.value;
5632                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5633                     return value;
5634                 })());
5635             }
5636             catch (cf){
5637                 if (cf.type == 'block' && cf.id == 219)
5638                     return values.apply(this, forcemv(cf.values));
5639                 else
5640                     throw cf;
5641             }
5642         })();
5643     }));
5644     return l266;
5645 })();
5646 var l267 = {name: "LET"};
5647 ((l221).value = ({car: l45.fvalue(pv, l267, (function (values,v633){
5648     checkArgsAtLeast(arguments, 2);
5649     var v632= l5.value;
5650     for (var i = arguments.length-1; i>=2; i--)
5651         v632 = {car: arguments[i], cdr: 
5652     v632};
5653     return (function(){
5654         return (function(){
5655             try {
5656                 var v641 = l203.value;
5657                 var v634 = l79.fvalue(pv, (function(){
5658                     var symbol = l59;
5659                     var func = symbol.fvalue;
5660                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5661                     return func;
5662                 })(), v633);
5663                 var v635 = l79.fvalue(pv, (function(){
5664                     var symbol = l40;
5665                     var func = symbol.fvalue;
5666                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5667                     return func;
5668                 })(), v634);
5669                 var v636 = l79.fvalue(pv, (function(){
5670                     var symbol = l184;
5671                     var func = symbol.fvalue;
5672                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5673                     return func;
5674                 })(), l79.fvalue(pv, (function(){
5675                     var symbol = l41;
5676                     var func = symbol.fvalue;
5677                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5678                     return func;
5679                 })(), v634));
5680                 ((l203).value = l207.fvalue(pv, l95.fvalue(pv, (function(){
5681                     var symbol = l265;
5682                     var func = symbol.fvalue;
5683                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5684                     return func;
5685                 })(), v635)));
5686                 var v637 = l5.value;
5687                 return l182.fvalue(values, "(function(", l150.fvalue(pv, l79.fvalue(pv, (function (values,v638){
5688                     checkArgs(arguments, 2);
5689                     return (l265.fvalue(pv, v638) !== l5.value ? (function(v639){
5690                         (v637 = ({car: ({car: v638, cdr: v639}), cdr: v637}));
5691                         return v639;
5692                     })(l205.fvalue(pv, v638)) : l206.fvalue(values, v638));
5693                 }), v635), ","), "){", (function(){
5694                     var symbol = l147;
5695                     var value = symbol.value;
5696                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5697                     return value;
5698                 })(), (function(v640){
5699                     return l186.fvalue(pv, l266.fvalue(pv, v637, v640));
5700                 })(l245.fvalue(pv, v632, l4.value)), "})(", l150.fvalue(pv, v636, ","), ")");
5701             }
5702             finally {
5703                 l203.value = v641;
5704             }
5705         })();
5706     })();
5707 })), cdr: (function(){
5708     var symbol = l221;
5709     var value = symbol.value;
5710     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5711     return value;
5712 })()}));
5713 var l268 = {name: "LET*-INITIALIZE-VALUE"};
5714 (function(){
5715     (l268).fvalue = (function(v648){
5716         ((v648)["fname"] = "LET*-INITIALIZE-VALUE");
5717         return v648;
5718     })((function (values,v642){
5719         checkArgs(arguments, 2);
5720         return (function(){
5721             return (function(v643,v644){
5722                 return (l265.fvalue(pv, v643) !== l5.value ? l182.fvalue(values, l184.fvalue(pv, l66.fvalue(pv, l45.fvalue(pv, l115), l45.fvalue(pv, v643), l45.fvalue(pv, v644))), ";", (function(){
5723                     var symbol = l147;
5724                     var value = symbol.value;
5725                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5726                     return value;
5727                 })()) : (function(){
5728                     var v645 = l205.fvalue(pv, v643);
5729                     var v646 = l188.fvalue(pv, v643, l110, v645);
5730                     return (function(v647){
5731                         l198.fvalue(pv, v646, (function(){
5732                             var symbol = l203;
5733                             var value = symbol.value;
5734                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5735                             return value;
5736                         })(), l110);
5737                         return v647;
5738                     })(l182.fvalue(pv, "var ", v645, " = ", l184.fvalue(pv, v644), ";", (function(){
5739                         var symbol = l147;
5740                         var value = symbol.value;
5741                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5742                         return value;
5743                     })()));
5744                 })());
5745             })(l40.fvalue(pv, v642),l41.fvalue(pv, v642));
5746         })();
5747     }));
5748     return l268;
5749 })();
5750 var l269 = {name: "LET*-BINDING-WRAPPER"};
5751 (function(){
5752     (l269).fvalue = (function(v657){
5753         ((v657)["fname"] = "LET*-BINDING-WRAPPER");
5754         return v657;
5755     })((function (values,v649,v650){
5756         checkArgs(arguments, 3);
5757         return (function(){
5758             try {
5759                 (l13.fvalue(pv, v649) !== l5.value ? (function(){
5760                     var values = mv;
5761                     throw ({type: 'block', id: 222, values: v650, message: 'Return from unknown block LET*-BINDING-WRAPPER.'})
5762                 })() : l5.value);
5763                 return (function(v652){
5764                     return l182.fvalue(values, "try {", (function(){
5765                         var symbol = l147;
5766                         var value = symbol.value;
5767                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5768                         return value;
5769                     })(), l186.fvalue(pv, l152.fvalue(pv, (function (values,v653){
5770                         checkArgs(arguments, 2);
5771                         return (function(v654){
5772                             return l182.fvalue(values, "var ", (function(){
5773                                 var tmp = v653;
5774                                 return tmp === l5.value? l5.value: tmp.cdr;
5775                             })(), " = ", v654, ".value;", (function(){
5776                                 var symbol = l147;
5777                                 var value = symbol.value;
5778                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5779                                 return value;
5780                             })());
5781                         })(l184.fvalue(pv, l66.fvalue(pv, l45.fvalue(pv, l177), l45.fvalue(pv, (function(){
5782                             var tmp = v653;
5783                             return tmp === l5.value? l5.value: tmp.car;
5784                         })()))));
5785                     }), v652), v650), "}", (function(){
5786                         var symbol = l147;
5787                         var value = symbol.value;
5788                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5789                         return value;
5790                     })(), "finally {", (function(){
5791                         var symbol = l147;
5792                         var value = symbol.value;
5793                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5794                         return value;
5795                     })(), l186.fvalue(pv, l152.fvalue(pv, (function (values,v655){
5796                         checkArgs(arguments, 2);
5797                         return (function(v656){
5798                             return l182.fvalue(values, v656, ".value", " = ", (function(){
5799                                 var tmp = v655;
5800                                 return tmp === l5.value? l5.value: tmp.cdr;
5801                             })(), ";", (function(){
5802                                 var symbol = l147;
5803                                 var value = symbol.value;
5804                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5805                                 return value;
5806                             })());
5807                         })(l184.fvalue(pv, l66.fvalue(pv, l45.fvalue(pv, l177), l45.fvalue(pv, (function(){
5808                             var tmp = v655;
5809                             return tmp === l5.value? l5.value: tmp.car;
5810                         })()))));
5811                     }), v652)), "}", (function(){
5812                         var symbol = l147;
5813                         var value = symbol.value;
5814                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5815                         return value;
5816                     })());
5817                 })(l79.fvalue(pv, (function (values,v651){
5818                     checkArgs(arguments, 2);
5819                     return ({car: v651, cdr: l205.fvalue(pv, v651)});
5820                 }), l96.fvalue(pv, (function(){
5821                     var symbol = l265;
5822                     var func = symbol.fvalue;
5823                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5824                     return func;
5825                 })(), v649)));
5826             }
5827             catch (cf){
5828                 if (cf.type == 'block' && cf.id == 222)
5829                     return values.apply(this, forcemv(cf.values));
5830                 else
5831                     throw cf;
5832             }
5833         })();
5834     }));
5835     return l269;
5836 })();
5837 var l270 = {name: "LET*"};
5838 ((l221).value = ({car: l45.fvalue(pv, l270, (function (values,v659){
5839     checkArgsAtLeast(arguments, 2);
5840     var v658= l5.value;
5841     for (var i = arguments.length-1; i>=2; i--)
5842         v658 = {car: arguments[i], cdr: 
5843     v658};
5844     return (function(){
5845         return (function(v660,v661){
5846             try {
5847                 var tmp;
5848                 tmp = l203.value;
5849                 l203.value = v661;
5850                 v661 = tmp;
5851                 return l182.fvalue(values, "(function(){", (function(){
5852                     var symbol = l147;
5853                     var value = symbol.value;
5854                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5855                     return value;
5856                 })(), l186.fvalue(pv, (function(v662,v663){
5857                     return l269.fvalue(pv, v662, v663);
5858                 })(l96.fvalue(pv, (function(){
5859                     var symbol = l265;
5860                     var func = symbol.fvalue;
5861                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5862                     return func;
5863                 })(), l79.fvalue(pv, (function(){
5864                     var symbol = l40;
5865                     var func = symbol.fvalue;
5866                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5867                     return func;
5868                 })(), v660)),l148.fvalue(pv, l152.fvalue(pv, (function(){
5869                     var symbol = l268;
5870                     var func = symbol.fvalue;
5871                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5872                     return func;
5873                 })(), v660), l245.fvalue(pv, v658, l4.value)))), "})()");
5874             }
5875             finally {
5876                 l203.value = v661;
5877             }
5878         })(l79.fvalue(pv, (function(){
5879             var symbol = l59;
5880             var func = symbol.fvalue;
5881             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5882             return func;
5883         })(), v659),l197.fvalue(pv, (function(){
5884             var symbol = l203;
5885             var value = symbol.value;
5886             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5887             return value;
5888         })()));
5889     })();
5890 })), cdr: (function(){
5891     var symbol = l221;
5892     var value = symbol.value;
5893     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5894     return value;
5895 })()}));
5896 var l271 = {name: "*BLOCK-COUNTER*"};
5897 (function(){
5898     (((l271.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l271).value = 0));
5899     return l271;
5900 })();
5901 var l272 = {name: "MULTIPLE-VALUE"};
5902 var l273 = {name: "USED"};
5903 ((l221).value = ({car: l45.fvalue(pv, l199, (function (values,v665){
5904     checkArgsAtLeast(arguments, 2);
5905     var v664= l5.value;
5906     for (var i = arguments.length-1; i>=2; i--)
5907         v664 = {car: arguments[i], cdr: 
5908     v664};
5909     return (function(){
5910         return (function(){
5911             var v666 = ((l271).value = (function(){
5912                 var x1 = (function(){
5913                     var symbol = l271;
5914                     var value = symbol.value;
5915                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5916                     return value;
5917                 })();
5918                 if (typeof x1 !== 'number') throw 'Not a number!';
5919                 return x1+1;
5920             })());
5921             var v667 = l188.fvalue(pv, v665, l199, v666);
5922             ((function(){
5923                 var symbol = l187;
5924                 var value = symbol.value;
5925                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5926                 return value;
5927             })() !== l5.value ? l195.fvalue(pv, l272, v667) : l5.value);
5928             return (function(){
5929                 try {
5930                     var v669 = l203.value;
5931                     ((l203).value = l201.fvalue(pv, l45.fvalue(pv, v667), (function(){
5932                         var symbol = l203;
5933                         var value = symbol.value;
5934                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5935                         return value;
5936                     })(), l199));
5937                     var v668 = l245.fvalue(pv, v664, l4.value);
5938                     return (l93.fvalue(pv, l273, l192.fvalue(pv, v667)) !== l5.value ? l182.fvalue(values, "(function(){", (function(){
5939                         var symbol = l147;
5940                         var value = symbol.value;
5941                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5942                         return value;
5943                     })(), l186.fvalue(pv, "try {", (function(){
5944                         var symbol = l147;
5945                         var value = symbol.value;
5946                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5947                         return value;
5948                     })(), l186.fvalue(pv, v668), "}", (function(){
5949                         var symbol = l147;
5950                         var value = symbol.value;
5951                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5952                         return value;
5953                     })(), "catch (cf){", (function(){
5954                         var symbol = l147;
5955                         var value = symbol.value;
5956                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5957                         return value;
5958                     })(), "    if (cf.type == 'block' && cf.id == ", v666, ")", (function(){
5959                         var symbol = l147;
5960                         var value = symbol.value;
5961                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5962                         return value;
5963                     })(), ((function(){
5964                         var symbol = l187;
5965                         var value = symbol.value;
5966                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5967                         return value;
5968                     })() !== l5.value ? "        return values.apply(this, forcemv(cf.values));" : "        return cf.values;"), (function(){
5969                         var symbol = l147;
5970                         var value = symbol.value;
5971                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5972                         return value;
5973                     })(), "    else", (function(){
5974                         var symbol = l147;
5975                         var value = symbol.value;
5976                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5977                         return value;
5978                     })(), "        throw cf;", (function(){
5979                         var symbol = l147;
5980                         var value = symbol.value;
5981                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5982                         return value;
5983                     })(), "}", (function(){
5984                         var symbol = l147;
5985                         var value = symbol.value;
5986                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5987                         return value;
5988                     })()), "})()") : l182.fvalue(values, "(function(){", (function(){
5989                         var symbol = l147;
5990                         var value = symbol.value;
5991                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5992                         return value;
5993                     })(), l186.fvalue(pv, v668), "})()"));
5994                 }
5995                 finally {
5996                     l203.value = v669;
5997                 }
5998             })();
5999         })();
6000     })();
6001 })), cdr: (function(){
6002     var symbol = l221;
6003     var value = symbol.value;
6004     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6005     return value;
6006 })()}));
6007 var l274 = {name: "RETURN-FROM"};
6008 ((l221).value = ({car: l45.fvalue(pv, l274, (function (values,v670,v671){
6009     checkArgsAtLeast(arguments, 2);
6010     checkArgsAtMost(arguments, 3);
6011     var v671; 
6012     switch(arguments.length-1){
6013     case 1:
6014         v671=l5.value;
6015     default: break;
6016     }
6017     return (function(){
6018         return (function(){
6019             var v672 = l202.fvalue(pv, v670, (function(){
6020                 var symbol = l203;
6021                 var value = symbol.value;
6022                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6023                 return value;
6024             })(), l199);
6025             var v673 = l93.fvalue(pv, l272, l192.fvalue(pv, v672));
6026             (l13.fvalue(pv, v672) !== l5.value ? (function(){
6027                 throw l148.fvalue(pv, "Unknown block `", (v670).name, "'.");
6028             })() : l5.value);
6029             l195.fvalue(pv, l273, v672);
6030             return l182.fvalue(values, "(function(){", (function(){
6031                 var symbol = l147;
6032                 var value = symbol.value;
6033                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6034                 return value;
6035             })(), l186.fvalue(pv, (v673 !== l5.value ? l182.fvalue(pv, "var values = mv;", (function(){
6036                 var symbol = l147;
6037                 var value = symbol.value;
6038                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6039                 return value;
6040             })()) : l5.value), "throw ({", "type: 'block', ", "id: ", l191.fvalue(pv, v672), ", ", "values: ", l184.fvalue(pv, v671, v673), ", ", "message: 'Return from unknown block ", (v670).name, ".'", "})"), "})()");
6041         })();
6042     })();
6043 })), cdr: (function(){
6044     var symbol = l221;
6045     var value = symbol.value;
6046     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6047     return value;
6048 })()}));
6049 var l275 = {name: "CATCH"};
6050 ((l221).value = ({car: l45.fvalue(pv, l275, (function (values,v675){
6051     checkArgsAtLeast(arguments, 2);
6052     var v674= l5.value;
6053     for (var i = arguments.length-1; i>=2; i--)
6054         v674 = {car: arguments[i], cdr: 
6055     v674};
6056     return (function(){
6057         return l182.fvalue(values, "(function(){", (function(){
6058             var symbol = l147;
6059             var value = symbol.value;
6060             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6061             return value;
6062         })(), l186.fvalue(pv, "var id = ", l184.fvalue(pv, v675), ";", (function(){
6063             var symbol = l147;
6064             var value = symbol.value;
6065             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6066             return value;
6067         })(), "try {", (function(){
6068             var symbol = l147;
6069             var value = symbol.value;
6070             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6071             return value;
6072         })(), l186.fvalue(pv, l245.fvalue(pv, v674, l4.value)), (function(){
6073             var symbol = l147;
6074             var value = symbol.value;
6075             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6076             return value;
6077         })(), "}", (function(){
6078             var symbol = l147;
6079             var value = symbol.value;
6080             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6081             return value;
6082         })(), "catch (cf){", (function(){
6083             var symbol = l147;
6084             var value = symbol.value;
6085             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6086             return value;
6087         })(), "    if (cf.type == 'catch' && cf.id == id)", (function(){
6088             var symbol = l147;
6089             var value = symbol.value;
6090             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6091             return value;
6092         })(), ((function(){
6093             var symbol = l187;
6094             var value = symbol.value;
6095             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6096             return value;
6097         })() !== l5.value ? "        return values.apply(this, forcemv(cf.values));" : "        return pv.apply(this, forcemv(cf.values));"), (function(){
6098             var symbol = l147;
6099             var value = symbol.value;
6100             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6101             return value;
6102         })(), "    else", (function(){
6103             var symbol = l147;
6104             var value = symbol.value;
6105             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6106             return value;
6107         })(), "        throw cf;", (function(){
6108             var symbol = l147;
6109             var value = symbol.value;
6110             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6111             return value;
6112         })(), "}", (function(){
6113             var symbol = l147;
6114             var value = symbol.value;
6115             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6116             return value;
6117         })()), "})()");
6118     })();
6119 })), cdr: (function(){
6120     var symbol = l221;
6121     var value = symbol.value;
6122     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6123     return value;
6124 })()}));
6125 var l276 = {name: "THROW"};
6126 ((l221).value = ({car: l45.fvalue(pv, l276, (function (values,v676,v677){
6127     checkArgs(arguments, 3);
6128     return (function(){
6129         return l182.fvalue(values, "(function(){", (function(){
6130             var symbol = l147;
6131             var value = symbol.value;
6132             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6133             return value;
6134         })(), l186.fvalue(pv, "var values = mv;", (function(){
6135             var symbol = l147;
6136             var value = symbol.value;
6137             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6138             return value;
6139         })(), "throw ({", "type: 'catch', ", "id: ", l184.fvalue(pv, v676), ", ", "values: ", l184.fvalue(pv, v677, l4.value), ", ", "message: 'Throw uncatched.'", "})"), "})()");
6140     })();
6141 })), cdr: (function(){
6142     var symbol = l221;
6143     var value = symbol.value;
6144     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6145     return value;
6146 })()}));
6147 var l277 = {name: "*TAGBODY-COUNTER*"};
6148 (function(){
6149     (((l277.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l277).value = 0));
6150     return l277;
6151 })();
6152 var l278 = {name: "*GO-TAG-COUNTER*"};
6153 (function(){
6154     (((l278.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l278).value = 0));
6155     return l278;
6156 })();
6157 var l279 = {name: "GO-TAG-P"};
6158 (function(){
6159     (l279).fvalue = (function(v680){
6160         ((v680)["fname"] = "GO-TAG-P");
6161         return v680;
6162     })((function (values,v678){
6163         checkArgs(arguments, 2);
6164         return (function(){
6165             return (function(v679){
6166                 return (v679 !== l5.value ? v679 : ((function(){
6167                     var tmp = v678;
6168                     return (typeof tmp == 'object' && 'name' in tmp);
6169                 })()?l4.value: l5.value));
6170             })(l86.fvalue(pv, v678));
6171         })();
6172     }));
6173     return l279;
6174 })();
6175 var l280 = {name: "DECLARE-TAGBODY-TAGS"};
6176 (function(){
6177     (l280).fvalue = (function(v686){
6178         ((v686)["fname"] = "DECLARE-TAGBODY-TAGS");
6179         return v686;
6180     })((function (values,v681,v682){
6181         checkArgs(arguments, 3);
6182         return (function(){
6183             return (function(v685){
6184                 return l201.fvalue(values, v685, (function(){
6185                     var symbol = l203;
6186                     var value = symbol.value;
6187                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6188                     return value;
6189                 })(), l200);
6190             })(l79.fvalue(pv, (function (values,v683){
6191                 checkArgs(arguments, 2);
6192                 return (function(v684){
6193                     return l188.fvalue(values, v683, l200, l45.fvalue(pv, v681, v684));
6194                 })(l18.fvalue(pv, ((l278).value = (function(){
6195                     var x1 = (function(){
6196                         var symbol = l278;
6197                         var value = symbol.value;
6198                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6199                         return value;
6200                     })();
6201                     if (typeof x1 !== 'number') throw 'Not a number!';
6202                     return x1+1;
6203                 })())));
6204             }), l96.fvalue(pv, (function(){
6205                 var symbol = l279;
6206                 var func = symbol.fvalue;
6207                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6208                 return func;
6209             })(), v682)));
6210         })();
6211     }));
6212     return l280;
6213 })();
6214 var l281 = {name: "TAGBODY"};
6215 ((l221).value = ({car: l45.fvalue(pv, l281, (function (values){
6216     var v687= l5.value;
6217     for (var i = arguments.length-1; i>=1; i--)
6218         v687 = {car: arguments[i], cdr: 
6219     v687};
6220     return (function(){
6221         try {
6222             (l100.fvalue(pv, (function(){
6223                 var symbol = l279;
6224                 var func = symbol.fvalue;
6225                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6226                 return func;
6227             })(), v687) !== l5.value ? l5.value : (function(){
6228                 var values = mv;
6229                 throw ({type: 'block', id: 230, values: l184.fvalue(values, l66.fvalue(pv, l45.fvalue(pv, l118), v687, l45.fvalue(pv, l5))), message: 'Return from unknown block TAGBODY.'})
6230             })());
6231             (l279.fvalue(pv, (function(){
6232                 var tmp = v687;
6233                 return tmp === l5.value? l5.value: tmp.car;
6234             })()) !== l5.value ? l5.value : (v687 = ({car: l17.fvalue(pv, "START"), cdr: v687})));
6235             return (function(v688){
6236                 return (function(v690,v689){
6237                     try {
6238                         var tmp;
6239                         tmp = l203.value;
6240                         l203.value = v690;
6241                         v690 = tmp;
6242                         (function(v691){
6243                             return (v689 = l41.fvalue(pv, l191.fvalue(pv, v691)));
6244                         })(l202.fvalue(pv, l40.fvalue(pv, v687), (function(){
6245                             var symbol = l203;
6246                             var value = symbol.value;
6247                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6248                             return value;
6249                         })(), l200));
6250                         return l182.fvalue(values, "(function(){", (function(){
6251                             var symbol = l147;
6252                             var value = symbol.value;
6253                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6254                             return value;
6255                         })(), l186.fvalue(pv, "var tagbody_", v688, " = ", v689, ";", (function(){
6256                             var symbol = l147;
6257                             var value = symbol.value;
6258                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6259                             return value;
6260                         })(), "tbloop:", (function(){
6261                             var symbol = l147;
6262                             var value = symbol.value;
6263                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6264                             return value;
6265                         })(), "while (true) {", (function(){
6266                             var symbol = l147;
6267                             var value = symbol.value;
6268                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6269                             return value;
6270                         })(), l186.fvalue(pv, "try {", (function(){
6271                             var symbol = l147;
6272                             var value = symbol.value;
6273                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6274                             return value;
6275                         })(), l186.fvalue(pv, (function(v692){
6276                             return l182.fvalue(pv, "switch(tagbody_", v688, "){", (function(){
6277                                 var symbol = l147;
6278                                 var value = symbol.value;
6279                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6280                                 return value;
6281                             })(), "case ", v689, ":", (function(){
6282                                 var symbol = l147;
6283                                 var value = symbol.value;
6284                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6285                                 return value;
6286                             })(), (function(){
6287                                 return (function(v693,v694){
6288                                     (function(){
6289                                         while(v693 !== l5.value){
6290                                             (v694 = (function(){
6291                                                 var tmp = v693;
6292                                                 return tmp === l5.value? l5.value: tmp.car;
6293                                             })());
6294                                             (function(){
6295                                                 (v692 = l148.fvalue(pv, v692, (l28.fvalue(pv, l279.fvalue(pv, v694)) !== l5.value ? l186.fvalue(pv, l184.fvalue(pv, v694), ";", (function(){
6296                                                     var symbol = l147;
6297                                                     var value = symbol.value;
6298                                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6299                                                     return value;
6300                                                 })()) : (function(v695){
6301                                                     return l182.fvalue(pv, "case ", l41.fvalue(pv, l191.fvalue(pv, v695)), ":", (function(){
6302                                                         var symbol = l147;
6303                                                         var value = symbol.value;
6304                                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6305                                                         return value;
6306                                                     })());
6307                                                 })(l202.fvalue(pv, v694, (function(){
6308                                                     var symbol = l203;
6309                                                     var value = symbol.value;
6310                                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6311                                                     return value;
6312                                                 })(), l200)))));
6313                                                 return l5.value;
6314                                             })();
6315                                             (v693 = (function(){
6316                                                 var tmp = v693;
6317                                                 return tmp === l5.value? l5.value: tmp.cdr;
6318                                             })());
6319                                         }return l5.value;
6320                                     })();
6321                                     return v692;
6322                                 })((function(){
6323                                     var tmp = v687;
6324                                     return tmp === l5.value? l5.value: tmp.cdr;
6325                                 })(),l5.value);
6326                             })(), "default:", (function(){
6327                                 var symbol = l147;
6328                                 var value = symbol.value;
6329                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6330                                 return value;
6331                             })(), "    break tbloop;", (function(){
6332                                 var symbol = l147;
6333                                 var value = symbol.value;
6334                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6335                                 return value;
6336                             })(), "}", (function(){
6337                                 var symbol = l147;
6338                                 var value = symbol.value;
6339                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6340                                 return value;
6341                             })());
6342                         })("")), "}", (function(){
6343                             var symbol = l147;
6344                             var value = symbol.value;
6345                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6346                             return value;
6347                         })(), "catch (jump) {", (function(){
6348                             var symbol = l147;
6349                             var value = symbol.value;
6350                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6351                             return value;
6352                         })(), "    if (jump.type == 'tagbody' && jump.id == ", v688, ")", (function(){
6353                             var symbol = l147;
6354                             var value = symbol.value;
6355                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6356                             return value;
6357                         })(), "        tagbody_", v688, " = jump.label;", (function(){
6358                             var symbol = l147;
6359                             var value = symbol.value;
6360                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6361                             return value;
6362                         })(), "    else", (function(){
6363                             var symbol = l147;
6364                             var value = symbol.value;
6365                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6366                             return value;
6367                         })(), "        throw(jump);", (function(){
6368                             var symbol = l147;
6369                             var value = symbol.value;
6370                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6371                             return value;
6372                         })(), "}", (function(){
6373                             var symbol = l147;
6374                             var value = symbol.value;
6375                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6376                             return value;
6377                         })()), "}", (function(){
6378                             var symbol = l147;
6379                             var value = symbol.value;
6380                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6381                             return value;
6382                         })(), "return ", l184.fvalue(pv, l5.value), ";", (function(){
6383                             var symbol = l147;
6384                             var value = symbol.value;
6385                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6386                             return value;
6387                         })()), "})()");
6388                     }
6389                     finally {
6390                         l203.value = v690;
6391                     }
6392                 })(l280.fvalue(pv, v688, v687),l5.value);
6393             })((function(){
6394                 var symbol = l277;
6395                 var value = symbol.value;
6396                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6397                 return value;
6398             })());
6399         }
6400         catch (cf){
6401             if (cf.type == 'block' && cf.id == 230)
6402                 return values.apply(this, forcemv(cf.values));
6403             else
6404                 throw cf;
6405         }
6406     })();
6407 })), cdr: (function(){
6408     var symbol = l221;
6409     var value = symbol.value;
6410     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6411     return value;
6412 })()}));
6413 var l282 = {name: "GO"};
6414 ((l221).value = ({car: l45.fvalue(pv, l282, (function (values,v696){
6415     checkArgs(arguments, 2);
6416     return (function(){
6417         return (function(v697,v698){
6418             (l13.fvalue(pv, v697) !== l5.value ? (function(){
6419                 throw l148.fvalue(pv, "Unknown tag `", v698, "'.");
6420             })() : l5.value);
6421             return l182.fvalue(values, "(function(){", (function(){
6422                 var symbol = l147;
6423                 var value = symbol.value;
6424                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6425                 return value;
6426             })(), l186.fvalue(pv, "throw ({", "type: 'tagbody', ", "id: ", l40.fvalue(pv, l191.fvalue(pv, v697)), ", ", "label: ", l41.fvalue(pv, l191.fvalue(pv, v697)), ", ", "message: 'Attempt to GO to non-existing tag ", v698, "'", "})", (function(){
6427                 var symbol = l147;
6428                 var value = symbol.value;
6429                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6430                 return value;
6431             })()), "})()");
6432         })(l202.fvalue(pv, v696, (function(){
6433             var symbol = l203;
6434             var value = symbol.value;
6435             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6436             return value;
6437         })(), l200),(((function(){
6438             var tmp = v696;
6439             return (typeof tmp == 'object' && 'name' in tmp);
6440         })()?l4.value: l5.value) !== l5.value ? (v696).name : (l86.fvalue(pv, v696) !== l5.value ? l18.fvalue(pv, v696) : l5.value)));
6441     })();
6442 })), cdr: (function(){
6443     var symbol = l221;
6444     var value = symbol.value;
6445     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6446     return value;
6447 })()}));
6448 var l283 = {name: "UNWIND-PROTECT"};
6449 ((l221).value = ({car: l45.fvalue(pv, l283, (function (values,v700){
6450     checkArgsAtLeast(arguments, 2);
6451     var v699= l5.value;
6452     for (var i = arguments.length-1; i>=2; i--)
6453         v699 = {car: arguments[i], cdr: 
6454     v699};
6455     return (function(){
6456         return l182.fvalue(values, "(function(){", (function(){
6457             var symbol = l147;
6458             var value = symbol.value;
6459             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6460             return value;
6461         })(), l186.fvalue(pv, "var ret = ", l184.fvalue(pv, l5.value), ";", (function(){
6462             var symbol = l147;
6463             var value = symbol.value;
6464             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6465             return value;
6466         })(), "try {", (function(){
6467             var symbol = l147;
6468             var value = symbol.value;
6469             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6470             return value;
6471         })(), l186.fvalue(pv, "ret = ", l184.fvalue(pv, v700), ";", (function(){
6472             var symbol = l147;
6473             var value = symbol.value;
6474             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6475             return value;
6476         })()), "} finally {", (function(){
6477             var symbol = l147;
6478             var value = symbol.value;
6479             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6480             return value;
6481         })(), l186.fvalue(pv, l245.fvalue(pv, v699)), "}", (function(){
6482             var symbol = l147;
6483             var value = symbol.value;
6484             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6485             return value;
6486         })(), "return ret;", (function(){
6487             var symbol = l147;
6488             var value = symbol.value;
6489             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6490             return value;
6491         })()), "})()");
6492     })();
6493 })), cdr: (function(){
6494     var symbol = l221;
6495     var value = symbol.value;
6496     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6497     return value;
6498 })()}));
6499 var l284 = {name: "MULTIPLE-VALUE-CALL"};
6500 ((l221).value = ({car: l45.fvalue(pv, l284, (function (values,v702){
6501     checkArgsAtLeast(arguments, 2);
6502     var v701= l5.value;
6503     for (var i = arguments.length-1; i>=2; i--)
6504         v701 = {car: arguments[i], cdr: 
6505     v701};
6506     return (function(){
6507         return l182.fvalue(values, "(function(){", (function(){
6508             var symbol = l147;
6509             var value = symbol.value;
6510             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6511             return value;
6512         })(), l186.fvalue(pv, "var func = ", l184.fvalue(pv, v702), ";", (function(){
6513             var symbol = l147;
6514             var value = symbol.value;
6515             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6516             return value;
6517         })(), "var args = [", ((function(){
6518             var symbol = l187;
6519             var value = symbol.value;
6520             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6521             return value;
6522         })() !== l5.value ? "values" : "pv"), "];", (function(){
6523             var symbol = l147;
6524             var value = symbol.value;
6525             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6526             return value;
6527         })(), "return ", l182.fvalue(pv, "(function(){", (function(){
6528             var symbol = l147;
6529             var value = symbol.value;
6530             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6531             return value;
6532         })(), l186.fvalue(pv, "var values = mv;", (function(){
6533             var symbol = l147;
6534             var value = symbol.value;
6535             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6536             return value;
6537         })(), "var vs;", (function(){
6538             var symbol = l147;
6539             var value = symbol.value;
6540             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6541             return value;
6542         })(), l152.fvalue(pv, (function (values,v703){
6543             checkArgs(arguments, 2);
6544             return l182.fvalue(values, "vs = ", l184.fvalue(pv, v703, l4.value), ";", (function(){
6545                 var symbol = l147;
6546                 var value = symbol.value;
6547                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6548                 return value;
6549             })(), "if (typeof vs === 'object' && 'multiple-value' in vs)", (function(){
6550                 var symbol = l147;
6551                 var value = symbol.value;
6552                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6553                 return value;
6554             })(), l186.fvalue(pv, "args = args.concat(vs);", (function(){
6555                 var symbol = l147;
6556                 var value = symbol.value;
6557                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6558                 return value;
6559             })()), "else", (function(){
6560                 var symbol = l147;
6561                 var value = symbol.value;
6562                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6563                 return value;
6564             })(), l186.fvalue(pv, "args.push(vs);", (function(){
6565                 var symbol = l147;
6566                 var value = symbol.value;
6567                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6568                 return value;
6569             })()));
6570         }), v701), "return func.apply(window, args);", (function(){
6571             var symbol = l147;
6572             var value = symbol.value;
6573             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6574             return value;
6575         })()), "})()"), ";", (function(){
6576             var symbol = l147;
6577             var value = symbol.value;
6578             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6579             return value;
6580         })()), "})()");
6581     })();
6582 })), cdr: (function(){
6583     var symbol = l221;
6584     var value = symbol.value;
6585     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6586     return value;
6587 })()}));
6588 var l285 = {name: "MULTIPLE-VALUE-PROG1"};
6589 ((l221).value = ({car: l45.fvalue(pv, l285, (function (values,v705){
6590     checkArgsAtLeast(arguments, 2);
6591     var v704= l5.value;
6592     for (var i = arguments.length-1; i>=2; i--)
6593         v704 = {car: arguments[i], cdr: 
6594     v704};
6595     return (function(){
6596         return l182.fvalue(values, "(function(){", (function(){
6597             var symbol = l147;
6598             var value = symbol.value;
6599             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6600             return value;
6601         })(), l186.fvalue(pv, "var args = ", l184.fvalue(pv, v705, (function(){
6602             var symbol = l187;
6603             var value = symbol.value;
6604             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6605             return value;
6606         })()), ";", (function(){
6607             var symbol = l147;
6608             var value = symbol.value;
6609             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6610             return value;
6611         })(), l245.fvalue(pv, v704), "return args;", (function(){
6612             var symbol = l147;
6613             var value = symbol.value;
6614             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6615             return value;
6616         })()), "})()");
6617     })();
6618 })), cdr: (function(){
6619     var symbol = l221;
6620     var value = symbol.value;
6621     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6622     return value;
6623 })()}));
6624 var l286 = {name: "BACKQUOTE-EXPAND-1"};
6625 (function(){
6626     (l286).fvalue = (function(v708){
6627         ((v708)["fname"] = "BACKQUOTE-EXPAND-1");
6628         return v708;
6629     })((function (values,v706){
6630         checkArgs(arguments, 2);
6631         return (function(){
6632             return (((function(){
6633                 var tmp = v706;
6634                 return (typeof tmp == 'object' && 'name' in tmp);
6635             })()?l4.value: l5.value) !== l5.value ? l45.fvalue(values, l177, v706) : (l46.fvalue(pv, v706) !== l5.value ? v706 : ((((function(){
6636                 var tmp = v706;
6637                 return tmp === l5.value? l5.value: tmp.car;
6638             })() === l180)?l4.value: l5.value) !== l5.value ? (function(){
6639                 var tmp = v706;
6640                 return tmp === l5.value? l5.value: tmp.car;
6641             })() : ((((function(){
6642                 var tmp = v706;
6643                 return tmp === l5.value? l5.value: tmp.car;
6644             })() === l178)?l4.value: l5.value) !== l5.value ? l286.fvalue(values, l286.fvalue(pv, l34.fvalue(pv, v706))) : ({car: l66, cdr: l79.fvalue(pv, (function (values,v707){
6645                 checkArgs(arguments, 2);
6646                 return ((l60.fvalue(pv, v707) !== l5.value ? (((function(){
6647                     var tmp = v707;
6648                     return tmp === l5.value? l5.value: tmp.car;
6649                 })() === l180)?l4.value: l5.value) : l5.value) !== l5.value ? l45.fvalue(values, l45, l34.fvalue(pv, v707)) : ((l60.fvalue(pv, v707) !== l5.value ? (((function(){
6650                     var tmp = v707;
6651                     return tmp === l5.value? l5.value: tmp.car;
6652                 })() === l179)?l4.value: l5.value) : l5.value) !== l5.value ? l34.fvalue(values, v707) : l45.fvalue(values, l45, l286.fvalue(pv, v707))));
6653             }), v706)})))));
6654         })();
6655     }));
6656     return l286;
6657 })();
6658 var l287 = {name: "BACKQUOTE-EXPAND"};
6659 (function(){
6660     (l287).fvalue = (function(v710){
6661         ((v710)["fname"] = "BACKQUOTE-EXPAND");
6662         return v710;
6663     })((function (values,v709){
6664         checkArgs(arguments, 2);
6665         return (function(){
6666             return ((l60.fvalue(pv, v709) !== l5.value ? (((function(){
6667                 var tmp = v709;
6668                 return tmp === l5.value? l5.value: tmp.car;
6669             })() === l178)?l4.value: l5.value) : l5.value) !== l5.value ? l286.fvalue(values, l34.fvalue(pv, v709)) : v709);
6670         })();
6671     }));
6672     return l287;
6673 })();
6674 l178;
6675 ((l221).value = ({car: l45.fvalue(pv, l178, (function (values,v711){
6676     checkArgs(arguments, 2);
6677     return (function(){
6678         return l184.fvalue(values, l286.fvalue(pv, v711));
6679     })();
6680 })), cdr: (function(){
6681     var symbol = l221;
6682     var value = symbol.value;
6683     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6684     return value;
6685 })()}));
6686 var l288 = {name: "*BUILTINS*"};
6687 (function(){
6688     (((l288.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l288).value = l5.value));
6689     return l288;
6690 })();
6691 var l289 = {name: "DEFINE-RAW-BUILTIN"};
6692 l289;
6693 var l290 = {name: "DEFINE-BUILTIN"};
6694 l290;
6695 var l291 = {name: "TYPE-CHECK"};
6696 l291;
6697 var l292 = {name: "VARIABLE-ARITY-CALL"};
6698 (function(){
6699     (l292).fvalue = (function(v720){
6700         ((v720)["fname"] = "VARIABLE-ARITY-CALL");
6701         return v720;
6702     })((function (values,v712,v713){
6703         checkArgs(arguments, 3);
6704         return (function(){
6705             (((function(){
6706                 var tmp = v712;
6707                 return (typeof tmp == 'object' && 'car' in tmp);
6708             })()?l4.value: l5.value) !== l5.value ? l5.value : (function(){
6709                 throw "ARGS must be a non-empty list";
6710             })());
6711             return (function(v714,v715,v716){
6712                 (function(){
6713                     return (function(v717,v718){
6714                         (function(){
6715                             while(v717 !== l5.value){
6716                                 (v718 = (function(){
6717                                     var tmp = v717;
6718                                     return tmp === l5.value? l5.value: tmp.car;
6719                                 })());
6720                                 (function(){
6721                                     (((typeof (v718) == "number")?l4.value: l5.value) !== l5.value ? (v715 = ({car: l18.fvalue(pv, v718), cdr: v715})) : (function(v719){
6722                                         (v715 = ({car: v719, cdr: v715}));
6723                                         return (v716 = l148.fvalue(pv, v716, l182.fvalue(pv, "var ", v719, " = ", l184.fvalue(pv, v718), ";", (function(){
6724                                             var symbol = l147;
6725                                             var value = symbol.value;
6726                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6727                                             return value;
6728                                         })(), "if (typeof ", v719, " !== 'number') throw 'Not a number!';", (function(){
6729                                             var symbol = l147;
6730                                             var value = symbol.value;
6731                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6732                                             return value;
6733                                         })())));
6734                                     })(l182.fvalue(pv, "x", (v714 = (function(){
6735                                         var x1 = v714;
6736                                         if (typeof x1 !== 'number') throw 'Not a number!';
6737                                         return x1+1;
6738                                     })()))));
6739                                     return l5.value;
6740                                 })();
6741                                 (v717 = (function(){
6742                                     var tmp = v717;
6743                                     return tmp === l5.value? l5.value: tmp.cdr;
6744                                 })());
6745                             }return l5.value;
6746                         })();
6747                         return l5.value;
6748                     })(v712,l5.value);
6749                 })();
6750                 return l182.fvalue(values, "(function(){", (function(){
6751                     var symbol = l147;
6752                     var value = symbol.value;
6753                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6754                     return value;
6755                 })(), l186.fvalue(pv, v716, (v713)(pv, l68.fvalue(pv, v715))), "})()");
6756             })(0,l5,"");
6757         })();
6758     }));
6759     return l292;
6760 })();
6761 var l293 = {name: "VARIABLE-ARITY"};
6762 l293;
6763 var l294 = {name: "NUM-OP-NUM"};
6764 (function(){
6765     (l294).fvalue = (function(v724){
6766         ((v724)["fname"] = "NUM-OP-NUM");
6767         return v724;
6768     })((function (values,v721,v722,v723){
6769         checkArgs(arguments, 4);
6770         return (function(){
6771             return l182.fvalue(values, "(function(){", (function(){
6772                 var symbol = l147;
6773                 var value = symbol.value;
6774                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6775                 return value;
6776             })(), l186.fvalue(pv, l182.fvalue(pv, "var ", "x", " = ", v721, ";", (function(){
6777                 var symbol = l147;
6778                 var value = symbol.value;
6779                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6780                 return value;
6781             })()), l182.fvalue(pv, "var ", "y", " = ", v723, ";", (function(){
6782                 var symbol = l147;
6783                 var value = symbol.value;
6784                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6785                 return value;
6786             })()), l182.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
6787                 var symbol = l147;
6788                 var value = symbol.value;
6789                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6790                 return value;
6791             })(), l186.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
6792                 var symbol = l147;
6793                 var value = symbol.value;
6794                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6795                 return value;
6796             })())), l182.fvalue(pv, "if (typeof ", "y", " != '", "number", "')", (function(){
6797                 var symbol = l147;
6798                 var value = symbol.value;
6799                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6800                 return value;
6801             })(), l186.fvalue(pv, "throw 'The value ' + ", "y", " + ' is not a type ", "number", ".';", (function(){
6802                 var symbol = l147;
6803                 var value = symbol.value;
6804                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6805                 return value;
6806             })())), l182.fvalue(pv, "return ", l182.fvalue(pv, "x", v722, "y"), ";", (function(){
6807                 var symbol = l147;
6808                 var value = symbol.value;
6809                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6810                 return value;
6811             })())), "})()");
6812         })();
6813     }));
6814     return l294;
6815 })();
6816 ((l288).value = ({car: l45.fvalue(pv, l63, (function (values){
6817     var v725= l5.value;
6818     for (var i = arguments.length-1; i>=1; i--)
6819         v725 = {car: arguments[i], cdr: 
6820     v725};
6821     return (function(){
6822         return (l13.fvalue(pv, v725) !== l5.value ? "0" : l292.fvalue(values, v725, (function (values,v726){
6823             checkArgs(arguments, 2);
6824             return l182.fvalue(values, "return ", l150.fvalue(pv, v726, "+"), ";", (function(){
6825                 var symbol = l147;
6826                 var value = symbol.value;
6827                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6828                 return value;
6829             })());
6830         })));
6831     })();
6832 })), cdr: (function(){
6833     var symbol = l288;
6834     var value = symbol.value;
6835     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6836     return value;
6837 })()}));
6838 ((l288).value = ({car: l45.fvalue(pv, l64, (function (values,v728){
6839     checkArgsAtLeast(arguments, 2);
6840     var v727= l5.value;
6841     for (var i = arguments.length-1; i>=2; i--)
6842         v727 = {car: arguments[i], cdr: 
6843     v727};
6844     return (function(){
6845         return (function(v729){
6846             return l292.fvalue(values, v729, (function (values,v730){
6847                 checkArgs(arguments, 2);
6848                 return l182.fvalue(values, "return ", (l13.fvalue(pv, v727) !== l5.value ? l148.fvalue(pv, "-", (function(){
6849                     var tmp = v730;
6850                     return tmp === l5.value? l5.value: tmp.car;
6851                 })()) : l150.fvalue(pv, v730, "-")), ";", (function(){
6852                     var symbol = l147;
6853                     var value = symbol.value;
6854                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6855                     return value;
6856                 })());
6857             }));
6858         })(({car: v728, cdr: v727}));
6859     })();
6860 })), cdr: (function(){
6861     var symbol = l288;
6862     var value = symbol.value;
6863     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6864     return value;
6865 })()}));
6866 ((l288).value = ({car: l45.fvalue(pv, l21, (function (values){
6867     var v731= l5.value;
6868     for (var i = arguments.length-1; i>=1; i--)
6869         v731 = {car: arguments[i], cdr: 
6870     v731};
6871     return (function(){
6872         return (l13.fvalue(pv, v731) !== l5.value ? "1" : l292.fvalue(values, v731, (function (values,v732){
6873             checkArgs(arguments, 2);
6874             return l182.fvalue(values, "return ", l150.fvalue(pv, v732, "*"), ";", (function(){
6875                 var symbol = l147;
6876                 var value = symbol.value;
6877                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6878                 return value;
6879             })());
6880         })));
6881     })();
6882 })), cdr: (function(){
6883     var symbol = l288;
6884     var value = symbol.value;
6885     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6886     return value;
6887 })()}));
6888 ((l288).value = ({car: l45.fvalue(pv, l22, (function (values,v734){
6889     checkArgsAtLeast(arguments, 2);
6890     var v733= l5.value;
6891     for (var i = arguments.length-1; i>=2; i--)
6892         v733 = {car: arguments[i], cdr: 
6893     v733};
6894     return (function(){
6895         return (function(v735){
6896             return l292.fvalue(values, v735, (function (values,v736){
6897                 checkArgs(arguments, 2);
6898                 return l182.fvalue(values, "return ", (l13.fvalue(pv, v733) !== l5.value ? l148.fvalue(pv, "1 /", (function(){
6899                     var tmp = v736;
6900                     return tmp === l5.value? l5.value: tmp.car;
6901                 })()) : l150.fvalue(pv, v736, "/")), ";", (function(){
6902                     var symbol = l147;
6903                     var value = symbol.value;
6904                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6905                     return value;
6906                 })());
6907             }));
6908         })(({car: v734, cdr: v733}));
6909     })();
6910 })), cdr: (function(){
6911     var symbol = l288;
6912     var value = symbol.value;
6913     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6914     return value;
6915 })()}));
6916 var l295 = {name: "MOD"};
6917 ((l288).value = ({car: l45.fvalue(pv, l295, (function (values,v737,v738){
6918     checkArgs(arguments, 3);
6919     return (function(){
6920         return (function(v739,v740){
6921             return l294.fvalue(values, v739, "%", v740);
6922         })(l184.fvalue(pv, v737),l184.fvalue(pv, v738));
6923     })();
6924 })), cdr: (function(){
6925     var symbol = l288;
6926     var value = symbol.value;
6927     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6928     return value;
6929 })()}));
6930 var l296 = {name: "COMPARISON-CONJUNTION"};
6931 (function(){
6932     (l296).fvalue = (function(v743){
6933         ((v743)["fname"] = "COMPARISON-CONJUNTION");
6934         return v743;
6935     })((function (values,v741,v742){
6936         checkArgs(arguments, 3);
6937         return (function(){
6938             return (l13.fvalue(pv, (function(){
6939                 var tmp = v741;
6940                 return tmp === l5.value? l5.value: tmp.cdr;
6941             })()) !== l5.value ? "true" : (l13.fvalue(pv, l36.fvalue(pv, v741)) !== l5.value ? l148.fvalue(values, (function(){
6942                 var tmp = v741;
6943                 return tmp === l5.value? l5.value: tmp.car;
6944             })(), v742, l34.fvalue(pv, v741)) : l148.fvalue(values, (function(){
6945                 var tmp = v741;
6946                 return tmp === l5.value? l5.value: tmp.car;
6947             })(), v742, l34.fvalue(pv, v741), " && ", l296.fvalue(pv, (function(){
6948                 var tmp = v741;
6949                 return tmp === l5.value? l5.value: tmp.cdr;
6950             })(), v742))));
6951         })();
6952     }));
6953     return l296;
6954 })();
6955 var l297 = {name: "DEFINE-BUILTIN-COMPARISON"};
6956 l297;
6957 var l298 = {name: ">"};
6958 ((l288).value = ({car: l45.fvalue(pv, l298, (function (values,v745){
6959     checkArgsAtLeast(arguments, 2);
6960     var v744= l5.value;
6961     for (var i = arguments.length-1; i>=2; i--)
6962         v744 = {car: arguments[i], cdr: 
6963     v744};
6964     return (function(){
6965         return (function(v746){
6966             return l292.fvalue(values, v746, (function (values,v747){
6967                 checkArgs(arguments, 2);
6968                 return l182.fvalue(values, "return ", l183.fvalue(pv, l296.fvalue(pv, v747, ">")), ";", (function(){
6969                     var symbol = l147;
6970                     var value = symbol.value;
6971                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6972                     return value;
6973                 })());
6974             }));
6975         })(({car: v745, cdr: v744}));
6976     })();
6977 })), cdr: (function(){
6978     var symbol = l288;
6979     var value = symbol.value;
6980     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6981     return value;
6982 })()}));
6983 var l299 = {name: "<"};
6984 ((l288).value = ({car: l45.fvalue(pv, l299, (function (values,v749){
6985     checkArgsAtLeast(arguments, 2);
6986     var v748= l5.value;
6987     for (var i = arguments.length-1; i>=2; i--)
6988         v748 = {car: arguments[i], cdr: 
6989     v748};
6990     return (function(){
6991         return (function(v750){
6992             return l292.fvalue(values, v750, (function (values,v751){
6993                 checkArgs(arguments, 2);
6994                 return l182.fvalue(values, "return ", l183.fvalue(pv, l296.fvalue(pv, v751, "<")), ";", (function(){
6995                     var symbol = l147;
6996                     var value = symbol.value;
6997                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6998                     return value;
6999                 })());
7000             }));
7001         })(({car: v749, cdr: v748}));
7002     })();
7003 })), cdr: (function(){
7004     var symbol = l288;
7005     var value = symbol.value;
7006     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7007     return value;
7008 })()}));
7009 var l300 = {name: ">="};
7010 ((l288).value = ({car: l45.fvalue(pv, l300, (function (values,v753){
7011     checkArgsAtLeast(arguments, 2);
7012     var v752= l5.value;
7013     for (var i = arguments.length-1; i>=2; i--)
7014         v752 = {car: arguments[i], cdr: 
7015     v752};
7016     return (function(){
7017         return (function(v754){
7018             return l292.fvalue(values, v754, (function (values,v755){
7019                 checkArgs(arguments, 2);
7020                 return l182.fvalue(values, "return ", l183.fvalue(pv, l296.fvalue(pv, v755, ">=")), ";", (function(){
7021                     var symbol = l147;
7022                     var value = symbol.value;
7023                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7024                     return value;
7025                 })());
7026             }));
7027         })(({car: v753, cdr: v752}));
7028     })();
7029 })), cdr: (function(){
7030     var symbol = l288;
7031     var value = symbol.value;
7032     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7033     return value;
7034 })()}));
7035 var l301 = {name: "<="};
7036 ((l288).value = ({car: l45.fvalue(pv, l301, (function (values,v757){
7037     checkArgsAtLeast(arguments, 2);
7038     var v756= l5.value;
7039     for (var i = arguments.length-1; i>=2; i--)
7040         v756 = {car: arguments[i], cdr: 
7041     v756};
7042     return (function(){
7043         return (function(v758){
7044             return l292.fvalue(values, v758, (function (values,v759){
7045                 checkArgs(arguments, 2);
7046                 return l182.fvalue(values, "return ", l183.fvalue(pv, l296.fvalue(pv, v759, "<=")), ";", (function(){
7047                     var symbol = l147;
7048                     var value = symbol.value;
7049                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7050                     return value;
7051                 })());
7052             }));
7053         })(({car: v757, cdr: v756}));
7054     })();
7055 })), cdr: (function(){
7056     var symbol = l288;
7057     var value = symbol.value;
7058     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7059     return value;
7060 })()}));
7061 ((l288).value = ({car: l45.fvalue(pv, l20, (function (values,v761){
7062     checkArgsAtLeast(arguments, 2);
7063     var v760= l5.value;
7064     for (var i = arguments.length-1; i>=2; i--)
7065         v760 = {car: arguments[i], cdr: 
7066     v760};
7067     return (function(){
7068         return (function(v762){
7069             return l292.fvalue(values, v762, (function (values,v763){
7070                 checkArgs(arguments, 2);
7071                 return l182.fvalue(values, "return ", l183.fvalue(pv, l296.fvalue(pv, v763, "==")), ";", (function(){
7072                     var symbol = l147;
7073                     var value = symbol.value;
7074                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7075                     return value;
7076                 })());
7077             }));
7078         })(({car: v761, cdr: v760}));
7079     })();
7080 })), cdr: (function(){
7081     var symbol = l288;
7082     var value = symbol.value;
7083     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7084     return value;
7085 })()}));
7086 var l302 = {name: "NUMBERP"};
7087 ((l288).value = ({car: l45.fvalue(pv, l302, (function (values,v764){
7088     checkArgs(arguments, 2);
7089     return (function(){
7090         return (function(v765){
7091             return l183.fvalue(values, l182.fvalue(pv, "(typeof (", v765, ") == \"number\")"));
7092         })(l184.fvalue(pv, v764));
7093     })();
7094 })), cdr: (function(){
7095     var symbol = l288;
7096     var value = symbol.value;
7097     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7098     return value;
7099 })()}));
7100 var l303 = {name: "FLOOR"};
7101 ((l288).value = ({car: l45.fvalue(pv, l303, (function (values,v766){
7102     checkArgs(arguments, 2);
7103     return (function(){
7104         return (function(v767){
7105             return l182.fvalue(values, "(function(){", (function(){
7106                 var symbol = l147;
7107                 var value = symbol.value;
7108                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7109                 return value;
7110             })(), l186.fvalue(pv, l182.fvalue(pv, "var ", "x", " = ", v767, ";", (function(){
7111                 var symbol = l147;
7112                 var value = symbol.value;
7113                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7114                 return value;
7115             })()), l182.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
7116                 var symbol = l147;
7117                 var value = symbol.value;
7118                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7119                 return value;
7120             })(), l186.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
7121                 var symbol = l147;
7122                 var value = symbol.value;
7123                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7124                 return value;
7125             })())), l182.fvalue(pv, "return ", "Math.floor(x)", ";", (function(){
7126                 var symbol = l147;
7127                 var value = symbol.value;
7128                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7129                 return value;
7130             })())), "})()");
7131         })(l184.fvalue(pv, v766));
7132     })();
7133 })), cdr: (function(){
7134     var symbol = l288;
7135     var value = symbol.value;
7136     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7137     return value;
7138 })()}));
7139 ((l288).value = ({car: l45.fvalue(pv, l29, (function (values,v768,v769){
7140     checkArgs(arguments, 3);
7141     return (function(){
7142         return (function(v770,v771){
7143             return l182.fvalue(values, "({car: ", v770, ", cdr: ", v771, "})");
7144         })(l184.fvalue(pv, v768),l184.fvalue(pv, v769));
7145     })();
7146 })), cdr: (function(){
7147     var symbol = l288;
7148     var value = symbol.value;
7149     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7150     return value;
7151 })()}));
7152 ((l288).value = ({car: l45.fvalue(pv, l30, (function (values,v772){
7153     checkArgs(arguments, 2);
7154     return (function(){
7155         return (function(v773){
7156             return l183.fvalue(values, l182.fvalue(pv, "(function(){", (function(){
7157                 var symbol = l147;
7158                 var value = symbol.value;
7159                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7160                 return value;
7161             })(), l186.fvalue(pv, "var tmp = ", v773, ";", (function(){
7162                 var symbol = l147;
7163                 var value = symbol.value;
7164                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7165                 return value;
7166             })(), "return (typeof tmp == 'object' && 'car' in tmp);", (function(){
7167                 var symbol = l147;
7168                 var value = symbol.value;
7169                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7170                 return value;
7171             })()), "})()"));
7172         })(l184.fvalue(pv, v772));
7173     })();
7174 })), cdr: (function(){
7175     var symbol = l288;
7176     var value = symbol.value;
7177     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7178     return value;
7179 })()}));
7180 ((l288).value = ({car: l45.fvalue(pv, l31, (function (values,v774){
7181     checkArgs(arguments, 2);
7182     return (function(){
7183         return (function(v775){
7184             return l182.fvalue(values, "(function(){", (function(){
7185                 var symbol = l147;
7186                 var value = symbol.value;
7187                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7188                 return value;
7189             })(), l186.fvalue(pv, "var tmp = ", v775, ";", (function(){
7190                 var symbol = l147;
7191                 var value = symbol.value;
7192                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7193                 return value;
7194             })(), "return tmp === ", l184.fvalue(pv, l5.value), "? ", l184.fvalue(pv, l5.value), ": tmp.car;", (function(){
7195                 var symbol = l147;
7196                 var value = symbol.value;
7197                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7198                 return value;
7199             })()), "})()");
7200         })(l184.fvalue(pv, v774));
7201     })();
7202 })), cdr: (function(){
7203     var symbol = l288;
7204     var value = symbol.value;
7205     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7206     return value;
7207 })()}));
7208 ((l288).value = ({car: l45.fvalue(pv, l32, (function (values,v776){
7209     checkArgs(arguments, 2);
7210     return (function(){
7211         return (function(v777){
7212             return l182.fvalue(values, "(function(){", (function(){
7213                 var symbol = l147;
7214                 var value = symbol.value;
7215                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7216                 return value;
7217             })(), l186.fvalue(pv, "var tmp = ", v777, ";", (function(){
7218                 var symbol = l147;
7219                 var value = symbol.value;
7220                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7221                 return value;
7222             })(), "return tmp === ", l184.fvalue(pv, l5.value), "? ", l184.fvalue(pv, l5.value), ": tmp.cdr;", (function(){
7223                 var symbol = l147;
7224                 var value = symbol.value;
7225                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7226                 return value;
7227             })()), "})()");
7228         })(l184.fvalue(pv, v776));
7229     })();
7230 })), cdr: (function(){
7231     var symbol = l288;
7232     var value = symbol.value;
7233     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7234     return value;
7235 })()}));
7236 ((l288).value = ({car: l45.fvalue(pv, l119, (function (values,v778,v779){
7237     checkArgs(arguments, 3);
7238     return (function(){
7239         return (function(v780,v781){
7240             return l182.fvalue(values, "(function(){", (function(){
7241                 var symbol = l147;
7242                 var value = symbol.value;
7243                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7244                 return value;
7245             })(), l186.fvalue(pv, l182.fvalue(pv, "var ", "x", " = ", v780, ";", (function(){
7246                 var symbol = l147;
7247                 var value = symbol.value;
7248                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7249                 return value;
7250             })()), l182.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){
7251                 var symbol = l147;
7252                 var value = symbol.value;
7253                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7254                 return value;
7255             })(), l186.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
7256                 var symbol = l147;
7257                 var value = symbol.value;
7258                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7259                 return value;
7260             })())), l182.fvalue(pv, "return ", l182.fvalue(pv, "(x.car = ", v781, ", x)"), ";", (function(){
7261                 var symbol = l147;
7262                 var value = symbol.value;
7263                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7264                 return value;
7265             })())), "})()");
7266         })(l184.fvalue(pv, v778),l184.fvalue(pv, v779));
7267     })();
7268 })), cdr: (function(){
7269     var symbol = l288;
7270     var value = symbol.value;
7271     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7272     return value;
7273 })()}));
7274 ((l288).value = ({car: l45.fvalue(pv, l120, (function (values,v782,v783){
7275     checkArgs(arguments, 3);
7276     return (function(){
7277         return (function(v784,v785){
7278             return l182.fvalue(values, "(function(){", (function(){
7279                 var symbol = l147;
7280                 var value = symbol.value;
7281                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7282                 return value;
7283             })(), l186.fvalue(pv, l182.fvalue(pv, "var ", "x", " = ", v784, ";", (function(){
7284                 var symbol = l147;
7285                 var value = symbol.value;
7286                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7287                 return value;
7288             })()), l182.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){
7289                 var symbol = l147;
7290                 var value = symbol.value;
7291                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7292                 return value;
7293             })(), l186.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
7294                 var symbol = l147;
7295                 var value = symbol.value;
7296                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7297                 return value;
7298             })())), l182.fvalue(pv, "return ", l182.fvalue(pv, "(x.cdr = ", v785, ", x)"), ";", (function(){
7299                 var symbol = l147;
7300                 var value = symbol.value;
7301                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7302                 return value;
7303             })())), "})()");
7304         })(l184.fvalue(pv, v782),l184.fvalue(pv, v783));
7305     })();
7306 })), cdr: (function(){
7307     var symbol = l288;
7308     var value = symbol.value;
7309     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7310     return value;
7311 })()}));
7312 var l304 = {name: "SYMBOLP"};
7313 ((l288).value = ({car: l45.fvalue(pv, l304, (function (values,v786){
7314     checkArgs(arguments, 2);
7315     return (function(){
7316         return (function(v787){
7317             return l183.fvalue(values, l182.fvalue(pv, "(function(){", (function(){
7318                 var symbol = l147;
7319                 var value = symbol.value;
7320                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7321                 return value;
7322             })(), l186.fvalue(pv, "var tmp = ", v787, ";", (function(){
7323                 var symbol = l147;
7324                 var value = symbol.value;
7325                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7326                 return value;
7327             })(), "return (typeof tmp == 'object' && 'name' in tmp);", (function(){
7328                 var symbol = l147;
7329                 var value = symbol.value;
7330                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7331                 return value;
7332             })()), "})()"));
7333         })(l184.fvalue(pv, v786));
7334     })();
7335 })), cdr: (function(){
7336     var symbol = l288;
7337     var value = symbol.value;
7338     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7339     return value;
7340 })()}));
7341 var l305 = {name: "MAKE-SYMBOL"};
7342 ((l288).value = ({car: l45.fvalue(pv, l305, (function (values,v788){
7343     checkArgs(arguments, 2);
7344     return (function(){
7345         return (function(v789){
7346             return l182.fvalue(values, "(function(){", (function(){
7347                 var symbol = l147;
7348                 var value = symbol.value;
7349                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7350                 return value;
7351             })(), l186.fvalue(pv, l182.fvalue(pv, "var ", "name", " = ", v789, ";", (function(){
7352                 var symbol = l147;
7353                 var value = symbol.value;
7354                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7355                 return value;
7356             })()), l182.fvalue(pv, "if (typeof ", "name", " != '", "string", "')", (function(){
7357                 var symbol = l147;
7358                 var value = symbol.value;
7359                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7360                 return value;
7361             })(), l186.fvalue(pv, "throw 'The value ' + ", "name", " + ' is not a type ", "string", ".';", (function(){
7362                 var symbol = l147;
7363                 var value = symbol.value;
7364                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7365                 return value;
7366             })())), l182.fvalue(pv, "return ", "({name: name})", ";", (function(){
7367                 var symbol = l147;
7368                 var value = symbol.value;
7369                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7370                 return value;
7371             })())), "})()");
7372         })(l184.fvalue(pv, v788));
7373     })();
7374 })), cdr: (function(){
7375     var symbol = l288;
7376     var value = symbol.value;
7377     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7378     return value;
7379 })()}));
7380 var l306 = {name: "SYMBOL-NAME"};
7381 ((l288).value = ({car: l45.fvalue(pv, l306, (function (values,v790){
7382     checkArgs(arguments, 2);
7383     return (function(){
7384         return (function(v791){
7385             return l182.fvalue(values, "(", v791, ").name");
7386         })(l184.fvalue(pv, v790));
7387     })();
7388 })), cdr: (function(){
7389     var symbol = l288;
7390     var value = symbol.value;
7391     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7392     return value;
7393 })()}));
7394 ((l288).value = ({car: l45.fvalue(pv, l247, (function (values,v792,v793){
7395     checkArgs(arguments, 3);
7396     return (function(){
7397         return (function(v794,v795){
7398             return l182.fvalue(values, "(", v794, ").value = ", v795);
7399         })(l184.fvalue(pv, v792),l184.fvalue(pv, v793));
7400     })();
7401 })), cdr: (function(){
7402     var symbol = l288;
7403     var value = symbol.value;
7404     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7405     return value;
7406 })()}));
7407 var l307 = {name: "FSET"};
7408 ((l288).value = ({car: l45.fvalue(pv, l307, (function (values,v796,v797){
7409     checkArgs(arguments, 3);
7410     return (function(){
7411         return (function(v798,v799){
7412             return l182.fvalue(values, "(", v798, ").fvalue = ", v799);
7413         })(l184.fvalue(pv, v796),l184.fvalue(pv, v797));
7414     })();
7415 })), cdr: (function(){
7416     var symbol = l288;
7417     var value = symbol.value;
7418     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7419     return value;
7420 })()}));
7421 ((l288).value = ({car: l45.fvalue(pv, l19, (function (values,v800){
7422     checkArgs(arguments, 2);
7423     return (function(){
7424         return (function(v801){
7425             return l183.fvalue(values, l182.fvalue(pv, "(", v801, ".value !== undefined)"));
7426         })(l184.fvalue(pv, v800));
7427     })();
7428 })), cdr: (function(){
7429     var symbol = l288;
7430     var value = symbol.value;
7431     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7432     return value;
7433 })()}));
7434 var l308 = {name: "SYMBOL-VALUE"};
7435 ((l288).value = ({car: l45.fvalue(pv, l308, (function (values,v802){
7436     checkArgs(arguments, 2);
7437     return (function(){
7438         return (function(v803){
7439             return l182.fvalue(values, "(function(){", (function(){
7440                 var symbol = l147;
7441                 var value = symbol.value;
7442                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7443                 return value;
7444             })(), l186.fvalue(pv, "var symbol = ", v803, ";", (function(){
7445                 var symbol = l147;
7446                 var value = symbol.value;
7447                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7448                 return value;
7449             })(), "var value = symbol.value;", (function(){
7450                 var symbol = l147;
7451                 var value = symbol.value;
7452                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7453                 return value;
7454             })(), "if (value === undefined) throw \"Variable `\" + symbol.name + \"' is unbound.\";", (function(){
7455                 var symbol = l147;
7456                 var value = symbol.value;
7457                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7458                 return value;
7459             })(), "return value;", (function(){
7460                 var symbol = l147;
7461                 var value = symbol.value;
7462                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7463                 return value;
7464             })()), "})()");
7465         })(l184.fvalue(pv, v802));
7466     })();
7467 })), cdr: (function(){
7468     var symbol = l288;
7469     var value = symbol.value;
7470     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7471     return value;
7472 })()}));
7473 ((l288).value = ({car: l45.fvalue(pv, l255, (function (values,v804){
7474     checkArgs(arguments, 2);
7475     return (function(){
7476         return (function(v805){
7477             return l182.fvalue(values, "(function(){", (function(){
7478                 var symbol = l147;
7479                 var value = symbol.value;
7480                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7481                 return value;
7482             })(), l186.fvalue(pv, "var symbol = ", v805, ";", (function(){
7483                 var symbol = l147;
7484                 var value = symbol.value;
7485                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7486                 return value;
7487             })(), "var func = symbol.fvalue;", (function(){
7488                 var symbol = l147;
7489                 var value = symbol.value;
7490                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7491                 return value;
7492             })(), "if (func === undefined) throw \"Function `\" + symbol.name + \"' is undefined.\";", (function(){
7493                 var symbol = l147;
7494                 var value = symbol.value;
7495                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7496                 return value;
7497             })(), "return func;", (function(){
7498                 var symbol = l147;
7499                 var value = symbol.value;
7500                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7501                 return value;
7502             })()), "})()");
7503         })(l184.fvalue(pv, v804));
7504     })();
7505 })), cdr: (function(){
7506     var symbol = l288;
7507     var value = symbol.value;
7508     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7509     return value;
7510 })()}));
7511 var l309 = {name: "SYMBOL-PLIST"};
7512 ((l288).value = ({car: l45.fvalue(pv, l309, (function (values,v806){
7513     checkArgs(arguments, 2);
7514     return (function(){
7515         return (function(v807){
7516             return l182.fvalue(values, "((", v807, ").plist || ", l184.fvalue(pv, l5.value), ")");
7517         })(l184.fvalue(pv, v806));
7518     })();
7519 })), cdr: (function(){
7520     var symbol = l288;
7521     var value = symbol.value;
7522     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7523     return value;
7524 })()}));
7525 var l310 = {name: "LAMBDA-CODE"};
7526 ((l288).value = ({car: l45.fvalue(pv, l310, (function (values,v808){
7527     checkArgs(arguments, 2);
7528     return (function(){
7529         return (function(v809){
7530             return l182.fvalue(values, "(", v809, ").toString()");
7531         })(l184.fvalue(pv, v808));
7532     })();
7533 })), cdr: (function(){
7534     var symbol = l288;
7535     var value = symbol.value;
7536     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7537     return value;
7538 })()}));
7539 var l311 = {name: "EQ"};
7540 ((l288).value = ({car: l45.fvalue(pv, l311, (function (values,v810,v811){
7541     checkArgs(arguments, 3);
7542     return (function(){
7543         return (function(v812,v813){
7544             return l183.fvalue(values, l182.fvalue(pv, "(", v812, " === ", v813, ")"));
7545         })(l184.fvalue(pv, v810),l184.fvalue(pv, v811));
7546     })();
7547 })), cdr: (function(){
7548     var symbol = l288;
7549     var value = symbol.value;
7550     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7551     return value;
7552 })()}));
7553 var l312 = {name: "EQUAL"};
7554 ((l288).value = ({car: l45.fvalue(pv, l312, (function (values,v814,v815){
7555     checkArgs(arguments, 3);
7556     return (function(){
7557         return (function(v816,v817){
7558             return l183.fvalue(values, l182.fvalue(pv, "(", v816, " == ", v817, ")"));
7559         })(l184.fvalue(pv, v814),l184.fvalue(pv, v815));
7560     })();
7561 })), cdr: (function(){
7562     var symbol = l288;
7563     var value = symbol.value;
7564     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7565     return value;
7566 })()}));
7567 var l313 = {name: "CHAR-TO-STRING"};
7568 ((l288).value = ({car: l45.fvalue(pv, l313, (function (values,v818){
7569     checkArgs(arguments, 2);
7570     return (function(){
7571         return (function(v819){
7572             return l182.fvalue(values, "(function(){", (function(){
7573                 var symbol = l147;
7574                 var value = symbol.value;
7575                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7576                 return value;
7577             })(), l186.fvalue(pv, l182.fvalue(pv, "var ", "x", " = ", v819, ";", (function(){
7578                 var symbol = l147;
7579                 var value = symbol.value;
7580                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7581                 return value;
7582             })()), l182.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
7583                 var symbol = l147;
7584                 var value = symbol.value;
7585                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7586                 return value;
7587             })(), l186.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
7588                 var symbol = l147;
7589                 var value = symbol.value;
7590                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7591                 return value;
7592             })())), l182.fvalue(pv, "return ", "String.fromCharCode(x)", ";", (function(){
7593                 var symbol = l147;
7594                 var value = symbol.value;
7595                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7596                 return value;
7597             })())), "})()");
7598         })(l184.fvalue(pv, v818));
7599     })();
7600 })), cdr: (function(){
7601     var symbol = l288;
7602     var value = symbol.value;
7603     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7604     return value;
7605 })()}));
7606 var l314 = {name: "STRINGP"};
7607 ((l288).value = ({car: l45.fvalue(pv, l314, (function (values,v820){
7608     checkArgs(arguments, 2);
7609     return (function(){
7610         return (function(v821){
7611             return l183.fvalue(values, l182.fvalue(pv, "(typeof(", v821, ") == \"string\")"));
7612         })(l184.fvalue(pv, v820));
7613     })();
7614 })), cdr: (function(){
7615     var symbol = l288;
7616     var value = symbol.value;
7617     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7618     return value;
7619 })()}));
7620 var l315 = {name: "STRING-UPCASE"};
7621 ((l288).value = ({car: l45.fvalue(pv, l315, (function (values,v822){
7622     checkArgs(arguments, 2);
7623     return (function(){
7624         return (function(v823){
7625             return l182.fvalue(values, "(function(){", (function(){
7626                 var symbol = l147;
7627                 var value = symbol.value;
7628                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7629                 return value;
7630             })(), l186.fvalue(pv, l182.fvalue(pv, "var ", "x", " = ", v823, ";", (function(){
7631                 var symbol = l147;
7632                 var value = symbol.value;
7633                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7634                 return value;
7635             })()), l182.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
7636                 var symbol = l147;
7637                 var value = symbol.value;
7638                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7639                 return value;
7640             })(), l186.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
7641                 var symbol = l147;
7642                 var value = symbol.value;
7643                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7644                 return value;
7645             })())), l182.fvalue(pv, "return ", "x.toUpperCase()", ";", (function(){
7646                 var symbol = l147;
7647                 var value = symbol.value;
7648                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7649                 return value;
7650             })())), "})()");
7651         })(l184.fvalue(pv, v822));
7652     })();
7653 })), cdr: (function(){
7654     var symbol = l288;
7655     var value = symbol.value;
7656     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7657     return value;
7658 })()}));
7659 var l316 = {name: "STRING-LENGTH"};
7660 ((l288).value = ({car: l45.fvalue(pv, l316, (function (values,v824){
7661     checkArgs(arguments, 2);
7662     return (function(){
7663         return (function(v825){
7664             return l182.fvalue(values, "(function(){", (function(){
7665                 var symbol = l147;
7666                 var value = symbol.value;
7667                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7668                 return value;
7669             })(), l186.fvalue(pv, l182.fvalue(pv, "var ", "x", " = ", v825, ";", (function(){
7670                 var symbol = l147;
7671                 var value = symbol.value;
7672                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7673                 return value;
7674             })()), l182.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
7675                 var symbol = l147;
7676                 var value = symbol.value;
7677                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7678                 return value;
7679             })(), l186.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
7680                 var symbol = l147;
7681                 var value = symbol.value;
7682                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7683                 return value;
7684             })())), l182.fvalue(pv, "return ", "x.length", ";", (function(){
7685                 var symbol = l147;
7686                 var value = symbol.value;
7687                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7688                 return value;
7689             })())), "})()");
7690         })(l184.fvalue(pv, v824));
7691     })();
7692 })), cdr: (function(){
7693     var symbol = l288;
7694     var value = symbol.value;
7695     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7696     return value;
7697 })()}));
7698 var l317 = {name: "SLICE"};
7699 ((l288).value = ({car: l45.fvalue(pv, l317, (function (values,v826,v827,v828){
7700     checkArgsAtLeast(arguments, 3);
7701     checkArgsAtMost(arguments, 4);
7702     var v828; 
7703     switch(arguments.length-1){
7704     case 2:
7705         v828=l5.value;
7706     default: break;
7707     }
7708     return (function(){
7709         return l182.fvalue(values, "(function(){", (function(){
7710             var symbol = l147;
7711             var value = symbol.value;
7712             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7713             return value;
7714         })(), l186.fvalue(pv, "var str = ", l184.fvalue(pv, v826), ";", (function(){
7715             var symbol = l147;
7716             var value = symbol.value;
7717             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7718             return value;
7719         })(), "var a = ", l184.fvalue(pv, v827), ";", (function(){
7720             var symbol = l147;
7721             var value = symbol.value;
7722             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7723             return value;
7724         })(), "var b;", (function(){
7725             var symbol = l147;
7726             var value = symbol.value;
7727             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7728             return value;
7729         })(), (v828 !== l5.value ? l182.fvalue(pv, "b = ", l184.fvalue(pv, v828), ";", (function(){
7730             var symbol = l147;
7731             var value = symbol.value;
7732             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7733             return value;
7734         })()) : l5.value), "return str.slice(a,b);", (function(){
7735             var symbol = l147;
7736             var value = symbol.value;
7737             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7738             return value;
7739         })()), "})()");
7740     })();
7741 })), cdr: (function(){
7742     var symbol = l288;
7743     var value = symbol.value;
7744     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7745     return value;
7746 })()}));
7747 var l318 = {name: "CHAR"};
7748 ((l288).value = ({car: l45.fvalue(pv, l318, (function (values,v829,v830){
7749     checkArgs(arguments, 3);
7750     return (function(){
7751         return (function(v831,v832){
7752             return l182.fvalue(values, "(function(){", (function(){
7753                 var symbol = l147;
7754                 var value = symbol.value;
7755                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7756                 return value;
7757             })(), l186.fvalue(pv, l182.fvalue(pv, "var ", "string", " = ", v831, ";", (function(){
7758                 var symbol = l147;
7759                 var value = symbol.value;
7760                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7761                 return value;
7762             })()), l182.fvalue(pv, "var ", "index", " = ", v832, ";", (function(){
7763                 var symbol = l147;
7764                 var value = symbol.value;
7765                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7766                 return value;
7767             })()), l182.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){
7768                 var symbol = l147;
7769                 var value = symbol.value;
7770                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7771                 return value;
7772             })(), l186.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
7773                 var symbol = l147;
7774                 var value = symbol.value;
7775                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7776                 return value;
7777             })())), l182.fvalue(pv, "if (typeof ", "index", " != '", "number", "')", (function(){
7778                 var symbol = l147;
7779                 var value = symbol.value;
7780                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7781                 return value;
7782             })(), l186.fvalue(pv, "throw 'The value ' + ", "index", " + ' is not a type ", "number", ".';", (function(){
7783                 var symbol = l147;
7784                 var value = symbol.value;
7785                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7786                 return value;
7787             })())), l182.fvalue(pv, "return ", "string.charCodeAt(index)", ";", (function(){
7788                 var symbol = l147;
7789                 var value = symbol.value;
7790                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7791                 return value;
7792             })())), "})()");
7793         })(l184.fvalue(pv, v829),l184.fvalue(pv, v830));
7794     })();
7795 })), cdr: (function(){
7796     var symbol = l288;
7797     var value = symbol.value;
7798     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7799     return value;
7800 })()}));
7801 ((l288).value = ({car: l45.fvalue(pv, l74, (function (values,v833,v834){
7802     checkArgs(arguments, 3);
7803     return (function(){
7804         return (function(v835,v836){
7805             return l182.fvalue(values, "(function(){", (function(){
7806                 var symbol = l147;
7807                 var value = symbol.value;
7808                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7809                 return value;
7810             })(), l186.fvalue(pv, l182.fvalue(pv, "var ", "string1", " = ", v835, ";", (function(){
7811                 var symbol = l147;
7812                 var value = symbol.value;
7813                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7814                 return value;
7815             })()), l182.fvalue(pv, "var ", "string2", " = ", v836, ";", (function(){
7816                 var symbol = l147;
7817                 var value = symbol.value;
7818                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7819                 return value;
7820             })()), l182.fvalue(pv, "if (typeof ", "string1", " != '", "string", "')", (function(){
7821                 var symbol = l147;
7822                 var value = symbol.value;
7823                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7824                 return value;
7825             })(), l186.fvalue(pv, "throw 'The value ' + ", "string1", " + ' is not a type ", "string", ".';", (function(){
7826                 var symbol = l147;
7827                 var value = symbol.value;
7828                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7829                 return value;
7830             })())), l182.fvalue(pv, "if (typeof ", "string2", " != '", "string", "')", (function(){
7831                 var symbol = l147;
7832                 var value = symbol.value;
7833                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7834                 return value;
7835             })(), l186.fvalue(pv, "throw 'The value ' + ", "string2", " + ' is not a type ", "string", ".';", (function(){
7836                 var symbol = l147;
7837                 var value = symbol.value;
7838                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7839                 return value;
7840             })())), l182.fvalue(pv, "return ", "string1.concat(string2)", ";", (function(){
7841                 var symbol = l147;
7842                 var value = symbol.value;
7843                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7844                 return value;
7845             })())), "})()");
7846         })(l184.fvalue(pv, v833),l184.fvalue(pv, v834));
7847     })();
7848 })), cdr: (function(){
7849     var symbol = l288;
7850     var value = symbol.value;
7851     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7852     return value;
7853 })()}));
7854 var l319 = {name: "FUNCALL"};
7855 ((l288).value = ({car: l45.fvalue(pv, l319, (function (values,v838){
7856     checkArgsAtLeast(arguments, 2);
7857     var v837= l5.value;
7858     for (var i = arguments.length-1; i>=2; i--)
7859         v837 = {car: arguments[i], cdr: 
7860     v837};
7861     return (function(){
7862         return l182.fvalue(values, "(", l184.fvalue(pv, v838), ")(", l150.fvalue(pv, ({car: ((function(){
7863             var symbol = l187;
7864             var value = symbol.value;
7865             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7866             return value;
7867         })() !== l5.value ? "values" : "pv"), cdr: l79.fvalue(pv, (function(){
7868             var symbol = l184;
7869             var func = symbol.fvalue;
7870             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7871             return func;
7872         })(), v837)}), ", "), ")");
7873     })();
7874 })), cdr: (function(){
7875     var symbol = l288;
7876     var value = symbol.value;
7877     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7878     return value;
7879 })()}));
7880 var l320 = {name: "APPLY"};
7881 ((l288).value = ({car: l45.fvalue(pv, l320, (function (values,v840){
7882     checkArgsAtLeast(arguments, 2);
7883     var v839= l5.value;
7884     for (var i = arguments.length-1; i>=2; i--)
7885         v839 = {car: arguments[i], cdr: 
7886     v839};
7887     return (function(){
7888         return (l13.fvalue(pv, v839) !== l5.value ? l182.fvalue(values, "(", l184.fvalue(pv, v840), ")()") : (function(v841,v842){
7889             return l182.fvalue(values, "(function(){", (function(){
7890                 var symbol = l147;
7891                 var value = symbol.value;
7892                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7893                 return value;
7894             })(), l186.fvalue(pv, "var f = ", l184.fvalue(pv, v840), ";", (function(){
7895                 var symbol = l147;
7896                 var value = symbol.value;
7897                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7898                 return value;
7899             })(), "var args = [", l150.fvalue(pv, ({car: ((function(){
7900                 var symbol = l187;
7901                 var value = symbol.value;
7902                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7903                 return value;
7904             })() !== l5.value ? "values" : "pv"), cdr: l79.fvalue(pv, (function(){
7905                 var symbol = l184;
7906                 var func = symbol.fvalue;
7907                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7908                 return func;
7909             })(), v841)}), ", "), "];", (function(){
7910                 var symbol = l147;
7911                 var value = symbol.value;
7912                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7913                 return value;
7914             })(), "var tail = (", l184.fvalue(pv, v842), ");", (function(){
7915                 var symbol = l147;
7916                 var value = symbol.value;
7917                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7918                 return value;
7919             })(), "while (tail != ", l184.fvalue(pv, l5.value), "){", (function(){
7920                 var symbol = l147;
7921                 var value = symbol.value;
7922                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7923                 return value;
7924             })(), "    args.push(tail.car);", (function(){
7925                 var symbol = l147;
7926                 var value = symbol.value;
7927                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7928                 return value;
7929             })(), "    tail = tail.cdr;", (function(){
7930                 var symbol = l147;
7931                 var value = symbol.value;
7932                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7933                 return value;
7934             })(), "}", (function(){
7935                 var symbol = l147;
7936                 var value = symbol.value;
7937                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7938                 return value;
7939             })(), "return f.apply(this, args);", (function(){
7940                 var symbol = l147;
7941                 var value = symbol.value;
7942                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7943                 return value;
7944             })()), "})()");
7945         })(l92.fvalue(pv, v839),(function(){
7946             var tmp = l91.fvalue(pv, v839);
7947             return tmp === l5.value? l5.value: tmp.car;
7948         })()));
7949     })();
7950 })), cdr: (function(){
7951     var symbol = l288;
7952     var value = symbol.value;
7953     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7954     return value;
7955 })()}));
7956 var l321 = {name: "JS-EVAL"};
7957 ((l288).value = ({car: l45.fvalue(pv, l321, (function (values,v843){
7958     checkArgs(arguments, 2);
7959     return (function(){
7960         return (function(v844){
7961             return l182.fvalue(values, "(function(){", (function(){
7962                 var symbol = l147;
7963                 var value = symbol.value;
7964                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7965                 return value;
7966             })(), l186.fvalue(pv, l182.fvalue(pv, "var ", "string", " = ", v844, ";", (function(){
7967                 var symbol = l147;
7968                 var value = symbol.value;
7969                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7970                 return value;
7971             })()), l182.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){
7972                 var symbol = l147;
7973                 var value = symbol.value;
7974                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7975                 return value;
7976             })(), l186.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
7977                 var symbol = l147;
7978                 var value = symbol.value;
7979                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7980                 return value;
7981             })())), l182.fvalue(pv, "return ", ((function(){
7982                 var symbol = l187;
7983                 var value = symbol.value;
7984                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7985                 return value;
7986             })() !== l5.value ? l182.fvalue(pv, "(function(){", (function(){
7987                 var symbol = l147;
7988                 var value = symbol.value;
7989                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7990                 return value;
7991             })(), l186.fvalue(pv, "var v = eval.apply(window, [string]);", (function(){
7992                 var symbol = l147;
7993                 var value = symbol.value;
7994                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7995                 return value;
7996             })(), "if (typeof v !== 'object' || !('multiple-value' in v)){", (function(){
7997                 var symbol = l147;
7998                 var value = symbol.value;
7999                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8000                 return value;
8001             })(), l186.fvalue(pv, "v = [v];", (function(){
8002                 var symbol = l147;
8003                 var value = symbol.value;
8004                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8005                 return value;
8006             })(), "v['multiple-value'] = true;", (function(){
8007                 var symbol = l147;
8008                 var value = symbol.value;
8009                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8010                 return value;
8011             })()), "}", (function(){
8012                 var symbol = l147;
8013                 var value = symbol.value;
8014                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8015                 return value;
8016             })(), "return values.apply(this, v);", (function(){
8017                 var symbol = l147;
8018                 var value = symbol.value;
8019                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8020                 return value;
8021             })()), "})()") : "eval.apply(window, [string])"), ";", (function(){
8022                 var symbol = l147;
8023                 var value = symbol.value;
8024                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8025                 return value;
8026             })())), "})()");
8027         })(l184.fvalue(pv, v843));
8028     })();
8029 })), cdr: (function(){
8030     var symbol = l288;
8031     var value = symbol.value;
8032     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8033     return value;
8034 })()}));
8035 var l322 = {name: "ERROR"};
8036 ((l288).value = ({car: l45.fvalue(pv, l322, (function (values,v845){
8037     checkArgs(arguments, 2);
8038     return (function(){
8039         return (function(v846){
8040             return l182.fvalue(values, "(function(){", (function(){
8041                 var symbol = l147;
8042                 var value = symbol.value;
8043                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8044                 return value;
8045             })(), l186.fvalue(pv, "throw ", v846, ";", (function(){
8046                 var symbol = l147;
8047                 var value = symbol.value;
8048                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8049                 return value;
8050             })()), "})()");
8051         })(l184.fvalue(pv, v845));
8052     })();
8053 })), cdr: (function(){
8054     var symbol = l288;
8055     var value = symbol.value;
8056     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8057     return value;
8058 })()}));
8059 var l323 = {name: "NEW"};
8060 ((l288).value = ({car: l45.fvalue(pv, l323, (function (values){
8061     checkArgsAtMost(arguments, 1);
8062     return (function(){
8063         return (function(){
8064             return "{}";
8065         })();
8066     })();
8067 })), cdr: (function(){
8068     var symbol = l288;
8069     var value = symbol.value;
8070     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8071     return value;
8072 })()}));
8073 var l324 = {name: "OBJECTP"};
8074 ((l288).value = ({car: l45.fvalue(pv, l324, (function (values,v847){
8075     checkArgs(arguments, 2);
8076     return (function(){
8077         return (function(v848){
8078             return l183.fvalue(values, l182.fvalue(pv, "(typeof (", v848, ") === 'object')"));
8079         })(l184.fvalue(pv, v847));
8080     })();
8081 })), cdr: (function(){
8082     var symbol = l288;
8083     var value = symbol.value;
8084     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8085     return value;
8086 })()}));
8087 var l325 = {name: "OGET"};
8088 ((l288).value = ({car: l45.fvalue(pv, l325, (function (values,v849,v850){
8089     checkArgs(arguments, 3);
8090     return (function(){
8091         return (function(v851,v852){
8092             return l182.fvalue(values, "(function(){", (function(){
8093                 var symbol = l147;
8094                 var value = symbol.value;
8095                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8096                 return value;
8097             })(), l186.fvalue(pv, "var tmp = ", "(", v851, ")[", v852, "];", (function(){
8098                 var symbol = l147;
8099                 var value = symbol.value;
8100                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8101                 return value;
8102             })(), "return tmp == undefined? ", l184.fvalue(pv, l5.value), ": tmp ;", (function(){
8103                 var symbol = l147;
8104                 var value = symbol.value;
8105                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8106                 return value;
8107             })()), "})()");
8108         })(l184.fvalue(pv, v849),l184.fvalue(pv, v850));
8109     })();
8110 })), cdr: (function(){
8111     var symbol = l288;
8112     var value = symbol.value;
8113     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8114     return value;
8115 })()}));
8116 var l326 = {name: "OSET"};
8117 ((l288).value = ({car: l45.fvalue(pv, l326, (function (values,v853,v854,v855){
8118     checkArgs(arguments, 4);
8119     return (function(){
8120         return (function(v856,v857,v858){
8121             return l182.fvalue(values, "((", v856, ")[", v857, "] = ", v858, ")");
8122         })(l184.fvalue(pv, v853),l184.fvalue(pv, v854),l184.fvalue(pv, v855));
8123     })();
8124 })), cdr: (function(){
8125     var symbol = l288;
8126     var value = symbol.value;
8127     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8128     return value;
8129 })()}));
8130 var l327 = {name: "IN"};
8131 ((l288).value = ({car: l45.fvalue(pv, l327, (function (values,v859,v860){
8132     checkArgs(arguments, 3);
8133     return (function(){
8134         return (function(v861,v862){
8135             return l183.fvalue(values, l182.fvalue(pv, "((", v861, ") in (", v862, "))"));
8136         })(l184.fvalue(pv, v859),l184.fvalue(pv, v860));
8137     })();
8138 })), cdr: (function(){
8139     var symbol = l288;
8140     var value = symbol.value;
8141     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8142     return value;
8143 })()}));
8144 var l328 = {name: "FUNCTIONP"};
8145 ((l288).value = ({car: l45.fvalue(pv, l328, (function (values,v863){
8146     checkArgs(arguments, 2);
8147     return (function(){
8148         return (function(v864){
8149             return l183.fvalue(values, l182.fvalue(pv, "(typeof ", v864, " == 'function')"));
8150         })(l184.fvalue(pv, v863));
8151     })();
8152 })), cdr: (function(){
8153     var symbol = l288;
8154     var value = symbol.value;
8155     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8156     return value;
8157 })()}));
8158 var l329 = {name: "WRITE-STRING"};
8159 ((l288).value = ({car: l45.fvalue(pv, l329, (function (values,v865){
8160     checkArgs(arguments, 2);
8161     return (function(){
8162         return (function(v866){
8163             return l182.fvalue(values, "(function(){", (function(){
8164                 var symbol = l147;
8165                 var value = symbol.value;
8166                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8167                 return value;
8168             })(), l186.fvalue(pv, l182.fvalue(pv, "var ", "x", " = ", v866, ";", (function(){
8169                 var symbol = l147;
8170                 var value = symbol.value;
8171                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8172                 return value;
8173             })()), l182.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
8174                 var symbol = l147;
8175                 var value = symbol.value;
8176                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8177                 return value;
8178             })(), l186.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
8179                 var symbol = l147;
8180                 var value = symbol.value;
8181                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8182                 return value;
8183             })())), l182.fvalue(pv, "return ", "lisp.write(x)", ";", (function(){
8184                 var symbol = l147;
8185                 var value = symbol.value;
8186                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8187                 return value;
8188             })())), "})()");
8189         })(l184.fvalue(pv, v865));
8190     })();
8191 })), cdr: (function(){
8192     var symbol = l288;
8193     var value = symbol.value;
8194     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8195     return value;
8196 })()}));
8197 var l330 = {name: "MAKE-ARRAY"};
8198 ((l288).value = ({car: l45.fvalue(pv, l330, (function (values,v867){
8199     checkArgs(arguments, 2);
8200     return (function(){
8201         return (function(v868){
8202             return l182.fvalue(values, "(function(){", (function(){
8203                 var symbol = l147;
8204                 var value = symbol.value;
8205                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8206                 return value;
8207             })(), l186.fvalue(pv, "var r = [];", (function(){
8208                 var symbol = l147;
8209                 var value = symbol.value;
8210                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8211                 return value;
8212             })(), "for (var i = 0; i < ", v868, "; i++)", (function(){
8213                 var symbol = l147;
8214                 var value = symbol.value;
8215                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8216                 return value;
8217             })(), l186.fvalue(pv, "r.push(", l184.fvalue(pv, l5.value), ");", (function(){
8218                 var symbol = l147;
8219                 var value = symbol.value;
8220                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8221                 return value;
8222             })()), "return r;", (function(){
8223                 var symbol = l147;
8224                 var value = symbol.value;
8225                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8226                 return value;
8227             })()), "})()");
8228         })(l184.fvalue(pv, v867));
8229     })();
8230 })), cdr: (function(){
8231     var symbol = l288;
8232     var value = symbol.value;
8233     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8234     return value;
8235 })()}));
8236 var l331 = {name: "ARRAYP"};
8237 ((l288).value = ({car: l45.fvalue(pv, l331, (function (values,v869){
8238     checkArgs(arguments, 2);
8239     return (function(){
8240         return (function(v870){
8241             return l183.fvalue(values, l182.fvalue(pv, "(function(){", (function(){
8242                 var symbol = l147;
8243                 var value = symbol.value;
8244                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8245                 return value;
8246             })(), l186.fvalue(pv, "var x = ", v870, ";", (function(){
8247                 var symbol = l147;
8248                 var value = symbol.value;
8249                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8250                 return value;
8251             })(), "return typeof x === 'object' && 'length' in x;"), "})()"));
8252         })(l184.fvalue(pv, v869));
8253     })();
8254 })), cdr: (function(){
8255     var symbol = l288;
8256     var value = symbol.value;
8257     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8258     return value;
8259 })()}));
8260 var l332 = {name: "AREF"};
8261 ((l288).value = ({car: l45.fvalue(pv, l332, (function (values,v871,v872){
8262     checkArgs(arguments, 3);
8263     return (function(){
8264         return (function(v873,v874){
8265             return l182.fvalue(values, "(function(){", (function(){
8266                 var symbol = l147;
8267                 var value = symbol.value;
8268                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8269                 return value;
8270             })(), l186.fvalue(pv, "var x = ", "(", v873, ")[", v874, "];", (function(){
8271                 var symbol = l147;
8272                 var value = symbol.value;
8273                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8274                 return value;
8275             })(), "if (x === undefined) throw 'Out of range';", (function(){
8276                 var symbol = l147;
8277                 var value = symbol.value;
8278                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8279                 return value;
8280             })(), "return x;", (function(){
8281                 var symbol = l147;
8282                 var value = symbol.value;
8283                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8284                 return value;
8285             })()), "})()");
8286         })(l184.fvalue(pv, v871),l184.fvalue(pv, v872));
8287     })();
8288 })), cdr: (function(){
8289     var symbol = l288;
8290     var value = symbol.value;
8291     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8292     return value;
8293 })()}));
8294 var l333 = {name: "ASET"};
8295 ((l288).value = ({car: l45.fvalue(pv, l333, (function (values,v875,v876,v877){
8296     checkArgs(arguments, 4);
8297     return (function(){
8298         return (function(v878,v879,v880){
8299             return l182.fvalue(values, "(function(){", (function(){
8300                 var symbol = l147;
8301                 var value = symbol.value;
8302                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8303                 return value;
8304             })(), l186.fvalue(pv, "var x = ", v878, ";", (function(){
8305                 var symbol = l147;
8306                 var value = symbol.value;
8307                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8308                 return value;
8309             })(), "var i = ", v879, ";", (function(){
8310                 var symbol = l147;
8311                 var value = symbol.value;
8312                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8313                 return value;
8314             })(), "if (i < 0 || i >= x.length) throw 'Out of range';", (function(){
8315                 var symbol = l147;
8316                 var value = symbol.value;
8317                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8318                 return value;
8319             })(), "return x[i] = ", v880, ";", (function(){
8320                 var symbol = l147;
8321                 var value = symbol.value;
8322                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8323                 return value;
8324             })()), "})()");
8325         })(l184.fvalue(pv, v875),l184.fvalue(pv, v876),l184.fvalue(pv, v877));
8326     })();
8327 })), cdr: (function(){
8328     var symbol = l288;
8329     var value = symbol.value;
8330     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8331     return value;
8332 })()}));
8333 var l334 = {name: "GET-UNIX-TIME"};
8334 ((l288).value = ({car: l45.fvalue(pv, l334, (function (values){
8335     checkArgsAtMost(arguments, 1);
8336     return (function(){
8337         return (function(){
8338             return l182.fvalue(values, "(Math.round(new Date() / 1000))");
8339         })();
8340     })();
8341 })), cdr: (function(){
8342     var symbol = l288;
8343     var value = symbol.value;
8344     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8345     return value;
8346 })()}));
8347 var l335 = {name: "VALUES-ARRAY"};
8348 ((l288).value = ({car: l45.fvalue(pv, l335, (function (values,v881){
8349     checkArgs(arguments, 2);
8350     return (function(){
8351         return (function(v882){
8352             return ((function(){
8353                 var symbol = l187;
8354                 var value = symbol.value;
8355                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8356                 return value;
8357             })() !== l5.value ? l182.fvalue(values, "values.apply(this, ", v882, ")") : l182.fvalue(values, "pv.apply(this, ", v882, ")"));
8358         })(l184.fvalue(pv, v881));
8359     })();
8360 })), cdr: (function(){
8361     var symbol = l288;
8362     var value = symbol.value;
8363     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8364     return value;
8365 })()}));
8366 ((l288).value = ({car: l45.fvalue(pv, l156, (function (values){
8367     var v883= l5.value;
8368     for (var i = arguments.length-1; i>=1; i--)
8369         v883 = {car: arguments[i], cdr: 
8370     v883};
8371     return (function(){
8372         return ((function(){
8373             var symbol = l187;
8374             var value = symbol.value;
8375             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8376             return value;
8377         })() !== l5.value ? l182.fvalue(values, "values(", l150.fvalue(pv, l79.fvalue(pv, (function(){
8378             var symbol = l184;
8379             var func = symbol.fvalue;
8380             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8381             return func;
8382         })(), v883), ", "), ")") : l182.fvalue(values, "pv(", l150.fvalue(pv, l79.fvalue(pv, (function(){
8383             var symbol = l184;
8384             var func = symbol.fvalue;
8385             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8386             return func;
8387         })(), v883), ", "), ")"));
8388     })();
8389 })), cdr: (function(){
8390     var symbol = l288;
8391     var value = symbol.value;
8392     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8393     return value;
8394 })()}));
8395 (function(){
8396     (l213).fvalue = (function(v886){
8397         ((v886)["fname"] = "MACRO");
8398         return v886;
8399     })((function (values,v884){
8400         checkArgs(arguments, 2);
8401         return (function(){
8402             return (((function(){
8403                 var tmp = v884;
8404                 return (typeof tmp == 'object' && 'name' in tmp);
8405             })()?l4.value: l5.value) !== l5.value ? (function(v885){
8406                 return (((l190.fvalue(pv, v885) === l213)?l4.value: l5.value) !== l5.value ? v885 : l5.value);
8407             })(l202.fvalue(pv, v884, (function(){
8408                 var symbol = l203;
8409                 var value = symbol.value;
8410                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8411                 return value;
8412             })(), l109)) : l5.value);
8413         })();
8414     }));
8415     return l213;
8416 })();
8417 var l336 = {name: "LS-MACROEXPAND-1"};
8418 (function(){
8419     (l336).fvalue = (function(v891){
8420         ((v891)["fname"] = "LS-MACROEXPAND-1");
8421         return v891;
8422     })((function (values,v887){
8423         checkArgs(arguments, 2);
8424         return (function(){
8425             return (function(v888){
8426                 return (v888 !== l5.value ? (function(v889){
8427                     (l60.fvalue(pv, v889) !== l5.value ? (function(v890){
8428                         l193.fvalue(pv, v888, v890);
8429                         return (v889 = v890);
8430                     })(l263.fvalue(pv, v889)) : l5.value);
8431                     return (function(){
8432                         var f = v889;
8433                         var args = [values];
8434                         var tail = ((function(){
8435                             var tmp = v887;
8436                             return tmp === l5.value? l5.value: tmp.cdr;
8437                         })());
8438                         while (tail != l5.value){
8439                             args.push(tail.car);
8440                             tail = tail.cdr;
8441                         }
8442                         return f.apply(this, args);
8443                     })();
8444                 })(l191.fvalue(pv, v888)) : v887);
8445             })(l213.fvalue(pv, (function(){
8446                 var tmp = v887;
8447                 return tmp === l5.value? l5.value: tmp.car;
8448             })()));
8449         })();
8450     }));
8451     return l336;
8452 })();
8453 var l337 = {name: "COMPILE-FUNCALL"};
8454 var l338 = {name: "G764"};
8455 (function(){
8456     (l337).fvalue = (function(v896){
8457         ((v896)["fname"] = "COMPILE-FUNCALL");
8458         return v896;
8459     })((function (values,v892,v893){
8460         checkArgs(arguments, 3);
8461         return (function(){
8462             return (function(){
8463                 var v894 = ((function(){
8464                     var symbol = l187;
8465                     var value = symbol.value;
8466                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8467                     return value;
8468                 })() !== l5.value ? "values" : "pv");
8469                 var v895 = l148.fvalue(pv, "(", l150.fvalue(pv, ({car: v894, cdr: l79.fvalue(pv, (function(){
8470                     var symbol = l184;
8471                     var func = symbol.fvalue;
8472                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8473                     return func;
8474                 })(), v893)}), ", "), ")");
8475                 return (l258.fvalue(pv, v892) !== l5.value ? l148.fvalue(values, l258.fvalue(pv, v892), v895) : ((((function(){
8476                     var tmp = v892;
8477                     return (typeof tmp == 'object' && 'name' in tmp);
8478                 })()?l4.value: l5.value) !== l5.value ? (((l136.fvalue(pv, v892) === l127.fvalue(pv, "COMMON-LISP"))?l4.value: l5.value) !== l5.value ? (function(){
8479                     var symbol = l338;
8480                     var value = symbol.value;
8481                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8482                     return value;
8483                 })() : l5.value) : l5.value) !== l5.value ? l182.fvalue(values, l184.fvalue(pv, l66.fvalue(pv, l45.fvalue(pv, l177), l45.fvalue(pv, v892))), ".fvalue", v895) : l182.fvalue(values, l184.fvalue(pv, l66.fvalue(pv, l45.fvalue(pv, l109), l45.fvalue(pv, v892))), v895)));
8484             })();
8485         })();
8486     }));
8487     return l337;
8488 })();
8489 (function(){
8490     (l245).fvalue = (function(v899){
8491         ((v899)["fname"] = "LS-COMPILE-BLOCK");
8492         return v899;
8493     })((function (values,v897,v898){
8494         checkArgsAtLeast(arguments, 2);
8495         checkArgsAtMost(arguments, 3);
8496         var v898; 
8497         switch(arguments.length-1){
8498         case 1:
8499             v898=l5.value;
8500         default: break;
8501         }
8502         return (function(){
8503             return (v898 !== l5.value ? l182.fvalue(values, l245.fvalue(pv, l92.fvalue(pv, v897)), "return ", l184.fvalue(pv, (function(){
8504                 var tmp = l91.fvalue(pv, v897);
8505                 return tmp === l5.value? l5.value: tmp.car;
8506             })(), (function(){
8507                 var symbol = l187;
8508                 var value = symbol.value;
8509                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8510                 return value;
8511             })()), ";") : l151.fvalue(values, l95.fvalue(pv, (function(){
8512                 var symbol = l210;
8513                 var func = symbol.fvalue;
8514                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8515                 return func;
8516             })(), l79.fvalue(pv, (function(){
8517                 var symbol = l184;
8518                 var func = symbol.fvalue;
8519                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8520                 return func;
8521             })(), v897)), l148.fvalue(pv, ";", (function(){
8522                 var symbol = l147;
8523                 var value = symbol.value;
8524                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8525                 return value;
8526             })())));
8527         })();
8528     }));
8529     return l245;
8530 })();
8531 (function(){
8532     (l184).fvalue = (function(v909){
8533         ((v909)["fname"] = "LS-COMPILE");
8534         return v909;
8535     })((function (values,v900,v901){
8536         checkArgsAtLeast(arguments, 2);
8537         checkArgsAtMost(arguments, 3);
8538         var v901; 
8539         switch(arguments.length-1){
8540         case 1:
8541             v901=l5.value;
8542         default: break;
8543         }
8544         return (function(){
8545             return (function(v902){
8546                 try {
8547                     var tmp;
8548                     tmp = l187.value;
8549                     l187.value = v902;
8550                     v902 = tmp;
8551                     return (((function(){
8552                         var tmp = v900;
8553                         return (typeof tmp == 'object' && 'name' in tmp);
8554                     })()?l4.value: l5.value) !== l5.value ? (function(v903){
8555                         return ((v903 !== l5.value ? l28.fvalue(pv, l93.fvalue(pv, l217, l192.fvalue(pv, v903))) : l5.value) !== l5.value ? l191.fvalue(values, v903) : ((function(v904){
8556                             return (v904 !== l5.value ? v904 : l93.fvalue(pv, l219, l192.fvalue(pv, v903)));
8557                         })(l135.fvalue(pv, v900)) !== l5.value ? l182.fvalue(values, l184.fvalue(pv, l66.fvalue(pv, l45.fvalue(pv, l177), l45.fvalue(pv, v900))), ".value") : l184.fvalue(values, l66.fvalue(pv, l45.fvalue(pv, l308), l45.fvalue(pv, l66.fvalue(pv, l45.fvalue(pv, l177), l45.fvalue(pv, v900)))))));
8558                     })(l202.fvalue(pv, v900, (function(){
8559                         var symbol = l203;
8560                         var value = symbol.value;
8561                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8562                         return value;
8563                     })(), l110)) : (l86.fvalue(pv, v900) !== l5.value ? l18.fvalue(values, v900) : (((typeof(v900) == "string")?l4.value: l5.value) !== l5.value ? l182.fvalue(values, "\"", l158.fvalue(pv, v900), "\"") : (((function(){
8564                         var x = v900;
8565                         return typeof x === 'object' && 'length' in x;
8566                     })()?l4.value: l5.value) !== l5.value ? l253.fvalue(values, v900) : (l60.fvalue(pv, v900) !== l5.value ? (function(v905,v906){
8567                         return (l102.fvalue(pv, v905, (function(){
8568                             var symbol = l221;
8569                             var value = symbol.value;
8570                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8571                             return value;
8572                         })()) !== l5.value ? (function(v907){
8573                             return (function(){
8574                                 var f = v907;
8575                                 var args = [values];
8576                                 var tail = (v906);
8577                                 while (tail != l5.value){
8578                                     args.push(tail.car);
8579                                     tail = tail.cdr;
8580                                 }
8581                                 return f.apply(this, args);
8582                             })();
8583                         })(l41.fvalue(pv, l102.fvalue(pv, v905, (function(){
8584                             var symbol = l221;
8585                             var value = symbol.value;
8586                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8587                             return value;
8588                         })()))) : ((l102.fvalue(pv, v905, (function(){
8589                             var symbol = l288;
8590                             var value = symbol.value;
8591                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8592                             return value;
8593                         })()) !== l5.value ? l28.fvalue(pv, l215.fvalue(pv, v905, l109, l218)) : l5.value) !== l5.value ? (function(v908){
8594                             return (function(){
8595                                 var f = v908;
8596                                 var args = [values];
8597                                 var tail = (v906);
8598                                 while (tail != l5.value){
8599                                     args.push(tail.car);
8600                                     tail = tail.cdr;
8601                                 }
8602                                 return f.apply(this, args);
8603                             })();
8604                         })(l41.fvalue(pv, l102.fvalue(pv, v905, (function(){
8605                             var symbol = l288;
8606                             var value = symbol.value;
8607                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8608                             return value;
8609                         })()))) : (l213.fvalue(pv, v905) !== l5.value ? l184.fvalue(values, l336.fvalue(pv, v900), v901) : l337.fvalue(values, v905, v906))));
8610                     })((function(){
8611                         var tmp = v900;
8612                         return tmp === l5.value? l5.value: tmp.car;
8613                     })(),(function(){
8614                         var tmp = v900;
8615                         return tmp === l5.value? l5.value: tmp.cdr;
8616                     })()) : (function(){
8617                         throw "How should I compile this?";
8618                     })())))));
8619                 }
8620                 finally {
8621                     l187.value = v902;
8622                 }
8623             })(v901);
8624         })();
8625     }));
8626     return l184;
8627 })();
8628 var l339 = {name: "LS-COMPILE-TOPLEVEL"};
8629 (function(){
8630     (l339).fvalue = (function(v916){
8631         ((v916)["fname"] = "LS-COMPILE-TOPLEVEL");
8632         return v916;
8633     })((function (values,v910,v911){
8634         checkArgsAtLeast(arguments, 2);
8635         checkArgsAtMost(arguments, 3);
8636         var v911; 
8637         switch(arguments.length-1){
8638         case 1:
8639             v911=l5.value;
8640         default: break;
8641         }
8642         return (function(){
8643             return (function(v912){
8644                 try {
8645                     var tmp;
8646                     tmp = l208.value;
8647                     l208.value = v912;
8648                     v912 = tmp;
8649                     return ((((function(){
8650                         var tmp = v910;
8651                         return (typeof tmp == 'object' && 'car' in tmp);
8652                     })()?l4.value: l5.value) !== l5.value ? (((function(){
8653                         var tmp = v910;
8654                         return tmp === l5.value? l5.value: tmp.car;
8655                     })() === l118)?l4.value: l5.value) : l5.value) !== l5.value ? (function(v914){
8656                         return l150.fvalue(values, l95.fvalue(pv, (function(){
8657                             var symbol = l210;
8658                             var func = symbol.fvalue;
8659                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8660                             return func;
8661                         })(), v914));
8662                     })(l79.fvalue(pv, (function (values,v913){
8663                         checkArgs(arguments, 2);
8664                         return l339.fvalue(values, v913, l4.value);
8665                     }), (function(){
8666                         var tmp = v910;
8667                         return tmp === l5.value? l5.value: tmp.cdr;
8668                     })())) : (function(v915){
8669                         return l182.fvalue(values, l151.fvalue(pv, l211.fvalue(pv), l182.fvalue(pv, ";", (function(){
8670                             var symbol = l147;
8671                             var value = symbol.value;
8672                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8673                             return value;
8674                         })())), (v915 !== l5.value ? l182.fvalue(pv, v915, ";", (function(){
8675                             var symbol = l147;
8676                             var value = symbol.value;
8677                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8678                             return value;
8679                         })()) : l5.value));
8680                     })(l184.fvalue(pv, v910, v911)));
8681                 }
8682                 finally {
8683                     l208.value = v912;
8684                 }
8685             })(l5.value);
8686         })();
8687     }));
8688     return l339;
8689 })();
8690 (function(){
8691     (l263).fvalue = (function(v918){
8692         ((v918)["fname"] = "EVAL");
8693         return v918;
8694     })((function (values,v917){
8695         checkArgs(arguments, 2);
8696         return (function(){
8697             return (function(){
8698                 var string = l339.fvalue(pv, v917, l4.value);
8699                 if (typeof string != 'string')
8700                     throw 'The value ' + string + ' is not a type string.';
8701                 return (function(){
8702                     var v = eval.apply(window, [string]);
8703                     if (typeof v !== 'object' || !('multiple-value' in v)){
8704                         v = [v];
8705                         v['multiple-value'] = true;
8706                     }
8707                     return values.apply(this, v);
8708                 })();
8709             })();
8710         })();
8711     }));
8712     return l263;
8713 })();
8714 var l340 = {name: "&BODY"};
8715 var l341 = QIList(l226,l227,l225,l340,l21,l16,l137,l63,l64,l22,l23,l24,l299,l301,l20,l20,l298,l300,l55,l66,l320,l332,l331,l102,l46,l199,l19,l19,l92,l33,l39,l37,l34,l31,l31,l53,l275,l35,l38,l36,l32,l32,l318,l84,l85,l83,l52,l29,l30,l81,l82,l48,l2,l3,l10,l12,l1,l9,l98,l97,l106,l70,l71,l108,l50,l51,l54,l311,l27,l312,l322,l263,l101,l145,l105,l127,l140,l40,l259,l43,l307,l319,l109,l328,l17,l146,l282,l80,l223,l138,l47,l86,l86,l144,l135,l260,l6,l91,l73,l267,l270,l122,l45,l60,l330,l123,l305,l79,l93,l88,l295,l111,l284,l112,l285,l5,l28,l90,l89,l13,l302,l56,l128,l130,l126,l175,l87,l157,l160,l220,l57,l58,l118,l69,l49,l177,l94,l95,l96,l14,l274,l67,l68,l119,l120,l41,l247,l117,l115,l100,l315,l103,l104,l314,l99,l255,l306,l136,l309,l308,l304,l4,l281,l42,l276,l26,l8,l283,l156,l155,l110,l159,l7,l107,l329,l25,l5);
8716 l145.fvalue(values, l341);
8717 ((l137).value = (function(){
8718     var symbol = l133;
8719     var value = symbol.value;
8720     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8721     return value;
8722 })());
8723 (function(){
8724     var string = "var lisp";
8725     if (typeof string != 'string')
8726         throw 'The value ' + string + ' is not a type string.';
8727     return (function(){
8728         var v = eval.apply(window, [string]);
8729         if (typeof v !== 'object' || !('multiple-value' in v)){
8730             v = [v];
8731             v['multiple-value'] = true;
8732         }
8733         return values.apply(this, v);
8734     })();
8735 })();
8736 (lisp = {});
8737 (lisp.read = (function(){
8738     var symbol = l181;
8739     var func = symbol.fvalue;
8740     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8741     return func;
8742 })());
8743 (lisp.print = (function(){
8744     var symbol = l157;
8745     var func = symbol.fvalue;
8746     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8747     return func;
8748 })());
8749 (lisp.eval = (function(){
8750     var symbol = l263;
8751     var func = symbol.fvalue;
8752     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8753     return func;
8754 })());
8755 (lisp.compile = (function (values,v919){
8756     checkArgs(arguments, 2);
8757     return l339.fvalue(values, v919, l4.value);
8758 }));
8759 (lisp.evalString = (function (values,v920){
8760     checkArgs(arguments, 2);
8761     return l263.fvalue(values, l181.fvalue(pv, v920));
8762 }));
8763 (lisp.compileString = (function (values,v921){
8764     checkArgs(arguments, 2);
8765     return l339.fvalue(values, l181.fvalue(pv, v921), l4.value);
8766 }));
8767 var l342 = {name: "OP"};
8768 var l343 = {name: "SYM"};
8769 var l344 = {name: "X"};
8770 var l345 = {name: "ARGS"};
8771 var l346 = {name: "BODY"};
8772 var l347 = {name: "DECLS"};
8773 var l348 = {name: "DECL"};
8774 var l349 = {name: "NAME"};
8775 var l350 = {name: "ARG"};
8776 var l351 = {name: "FORM"};
8777 var l352 = {name: "PACKAGE-DESIGNATOR"};
8778 var l353 = {name: "PAIRS"};
8779 var l354 = {name: "PLACE"};
8780 var l355 = {name: "VALUE"};
8781 var l356 = {name: "VARS"};
8782 var l357 = {name: "VALS"};
8783 var l358 = {name: "STORE-VARS"};
8784 var l359 = {name: "WRITER-FORM"};
8785 var l360 = {name: "READER-FORM"};
8786 var l361 = {name: "RESULT"};
8787 var l362 = {name: "ACCESS-FN"};
8788 var l363 = {name: "LAMBDA-LIST"};
8789 var l364 = {name: "VALUE-FROM"};
8790 var l365 = {name: "VARIABLES"};
8791 var l366 = {name: "HEAD"};
8792 var l367 = {name: "TAIL"};
8793 var l368 = {name: "COLLECT"};
8794 var l369 = {name: "VARLIST"};
8795 var l370 = {name: "ENDLIST"};
8796 var l371 = {name: "V"};
8797 var l372 = {name: "ASSIGNMENTS"};
8798 var l373 = {name: "FORM1"};
8799 var l374 = {name: "FORMS"};
8800 var l375 = {name: "G"};
8801 var l376 = {name: "CLAUSULES"};
8802 var l377 = {name: "!FORM"};
8803 var l378 = {name: "CLAUSULE"};
8804 var l379 = {name: "ITER"};
8805 var l380 = {name: "G!TO"};
8806 var l381 = {name: "VAR"};
8807 var l382 = {name: "TO"};
8808 var l383 = {name: "G!LIST"};
8809 var l384 = {name: "DELTA"};
8810 var l385 = {name: "CONDITION"};
8811 var l386 = {name: "DOCSTRING"};
8812 var l387 = QIList(QIList(QIList(l288,l110,l5,QIList(l217,l5),l5),QIList(l278,l110,l5,QIList(l217,l5),l5),QIList(l277,l110,l5,QIList(l217,l5),l5),QIList(l271,l110,l5,QIList(l217,l5),l5),QIList(l261,l110,l5,QIList(l217,l5),l5),QIList(l251,l110,l5,QIList(l217,l5),l5),QIList(l250,l110,l5,QIList(l217,l5),l5),QIList(l224,l110,l5,QIList(l217,l5),l5),QIList(l221,l110,l5,QIList(l217,l5),l5),QIList(l208,l110,l5,QIList(l217,l5),l5),QIList(l204,l110,l5,QIList(l217,l5),l5),QIList(l203,l110,l5,QIList(l217,l5),l5),QIList(l187,l110,l5,QIList(l217,l5),l5),QIList(l176,l110,l5,QIList(l217,l5),l5),QIList(l147,l110,l5,QIList(l217,l5),l5),QIList(l137,l110,l5,QIList(l217,l5),l5),QIList(l134,l110,l5,QIList(l217,l5),l5),QIList(l133,l110,l5,QIList(l217,l5),l5),QIList(l132,l110,l5,QIList(l217,l5),l5),QIList(l121,l110,l5,QIList(l217,l5),l5),QIList(l113,l110,l5,QIList(l217,l5),l5),QIList(l16,l110,l5,QIList(l217,l5),l5),QIList(l5,l110,l5,QIList(l219,l217,l5),l5),QIList(l4,l110,l5,QIList(l219,l217,l5),l5),l5),QIList(QIList(l297,l213,QIList(l109,QIList(l6,QIList(l342,l343,l5),QIList(l178,QIList(l289,QIList(l180,l342,l5),QIList(l344,l226,l345,l5),QIList(l267,QIList(QIList(l345,QIList(l29,l344,l345,l5),l5),l5),QIList(l293,l345,QIList(l183,QIList(l296,l345,QIList(l180,l343,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l293,l213,QIList(l109,QIList(l6,QIList(l345,l226,l346,l5),QIList(l8,QIList(l304,l345,l5),QIList(l322,"Bad usage of VARIABLE-ARITY, you must pass a symbol",l5),l5),QIList(l178,QIList(l292,QIList(l180,l345,l5),QIList(l6,QIList(QIList(l180,l345,l5),l5),QIList(l182,"return ",QIList(l179,l346,l5),";",l147,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l291,l213,QIList(l109,QIList(l6,QIList(l347,l226,l346,l5),QIList(l178,QIList(l185,QIList(l179,QIList(l79,QIList(l6,QIList(l348,l5),QIList(l178,QIList(l182,"var ",QIList(l180,QIList(l40,l348,l5),l5)," = ",QIList(l180,QIList(l42,l348,l5),l5),";",l147,l5),l5),l5),l347,l5),l5),QIList(l179,QIList(l79,QIList(l6,QIList(l348,l5),QIList(l178,QIList(l182,"if (typeof ",QIList(l180,QIList(l40,l348,l5),l5)," != '",QIList(l180,QIList(l41,l348,l5),l5),"')",l147,QIList(l186,"throw 'The value ' + ",QIList(l180,QIList(l40,l348,l5),l5)," + ' is not a type ",QIList(l180,QIList(l41,l348,l5),l5),".';",l147,l5),l5),l5),l5),l347,l5),l5),QIList(l182,"return ",QIList(l118,QIList(l179,l346,l5),l5),";",l147,l5),l5),l5),l5),l5),l5,l5),QIList(l290,l213,QIList(l109,QIList(l6,QIList(l349,l345,l226,l346,l5),QIList(l178,QIList(l118,QIList(l289,QIList(l180,l349,l5),QIList(l180,l345,l5),QIList(l267,QIList(l180,QIList(l79,QIList(l6,QIList(l350,l5),QIList(l178,QIList(QIList(l180,l350,l5),QIList(l184,QIList(l180,l350,l5),l5),l5),l5),l5),l345,l5),l5),QIList(l179,l346,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l289,l213,QIList(l109,QIList(l6,QIList(l349,l345,l226,l346,l5),QIList(l178,QIList(l49,QIList(l45,QIList(l177,QIList(l180,l349,l5),l5),QIList(l6,QIList(l180,l345,l5),QIList(l199,QIList(l180,l349,l5),QIList(l179,l346,l5),l5),l5),l5),l288,l5),l5),l5),l5),l5,l5),QIList(l178,l213,QIList(l109,QIList(l6,QIList(l351,l5),QIList(l286,l351,l5),l5),l5),l5,l5),QIList(l264,l213,QIList(l109,QIList(l6,QIList(l349,l345,l351,l5),QIList(l178,QIList(l222,QIList(l180,l349,l5),QIList(l180,l345,l5),QIList(l184,QIList(l180,l351,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l222,l213,QIList(l109,QIList(l6,QIList(l349,l345,l226,l346,l5),QIList(l178,QIList(l49,QIList(l45,QIList(l177,QIList(l180,l349,l5),l5),QIList(l6,QIList(l180,l345,l5),QIList(l199,QIList(l180,l349,l5),QIList(l179,l346,l5),l5),l5),l5),l221,l5),l5),l5),l5),l5,l5),QIList(l185,l213,QIList(l109,QIList(l6,QIList(l226,l346,l5),QIList(l178,QIList(l182,"(function(){",l147,QIList(l186,QIList(l179,l346,l5),l5),"})()",l5),l5),l5),l5),l5,l5),QIList(l149,l213,QIList(l109,QIList(l6,QIList(l110,l226,l351,l5),QIList(l178,QIList(l115,QIList(l180,l110,l5),QIList(l148,QIList(l180,l110,l5),QIList(l118,QIList(l179,l351,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l138,l213,QIList(l109,QIList(l6,QIList(l352,l5),QIList(l178,QIList(l262,QIList(l115,l137,QIList(l125,QIList(l180,l352,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l117,l213,QIList(l109,QIList(l6,QIList(l226,l353,l5),QIList(l52,QIList(QIList(l13,l353,l5),l5,l5),QIList(QIList(l13,QIList(l32,l353,l5),l5),QIList(l322,"Odd number of arguments to setf.",l5),l5),QIList(QIList(l13,QIList(l36,l353,l5),l5),QIList(l267,QIList(QIList(l354,QIList(l40,l353,l5),l5),QIList(l355,QIList(l41,l353,l5),l5),l5),QIList(l111,QIList(l356,l357,l358,l359,l360,l5),QIList(l114,l354,l5),QIList(l178,QIList(l270,QIList(l180,QIList(l79,QIList(l109,l45,l5),l356,l357,l5),l5),QIList(l111,QIList(l180,l358,l5),QIList(l180,l355,l5),QIList(l180,l359,l5),l5),l5),l5),l5),l5),l5),QIList(l4,QIList(l178,QIList(l118,QIList(l179,QIList(l70,QIList(QIList(l353,l353,QIList(l36,l353,l5),l5),QIList(l361,QIList(l177,l5,l5),QIList(l29,QIList(l178,QIList(l117,QIList(l180,QIList(l31,l353,l5),l5),QIList(l180,QIList(l34,l353,l5),l5),l5),l5),l361,l5),l5),l5),QIList(QIList(l13,l353,l5),QIList(l68,l361,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l116,l213,QIList(l109,QIList(l6,QIList(l362,l363,l226,l346,l5),QIList(l8,QIList(l304,l362,l5),QIList(l322,"ACCESS-FN must be a symbol.",l5),l5),QIList(l178,QIList(l118,QIList(l49,QIList(l29,QIList(l177,QIList(l180,l362,l5),l5),QIList(l6,QIList(l180,l363,l5),QIList(l179,l346,l5),l5),l5),l113,l5),QIList(l177,QIList(l180,l362,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l112,l213,QIList(l109,QIList(l6,QIList(l364,l5),QIList(l178,QIList(l284,QIList(l109,l45,l5),QIList(l180,l364,l5),l5),l5),l5),l5),l5,l5),QIList(l111,l213,QIList(l109,QIList(l6,QIList(l365,l364,l226,l346,l5),QIList(l178,QIList(l284,QIList(l6,QIList(l225,QIList(l179,l365,l5),l226,QIList(l180,QIList(l17,l5),l5),l5),QIList(l179,l346,l5),l5),QIList(l180,l364,l5),l5),l5),l5),l5),l5,l5),QIList(l78,l213,QIList(l109,QIList(l6,QIList(l226,l346,l5),QIList(l178,QIList(l15,l4,QIList(l179,l346,l5),l5),l5),l5),l5),l5,l5),QIList(l75,l213,QIList(l109,QIList(l6,QIList(l226,l346,l5),QIList(l267,QIList(QIList(l366,QIList(l17,l5),l5),QIList(l367,QIList(l17,l5),l5),l5),QIList(l178,QIList(l270,QIList(QIList(QIList(l180,l366,l5),QIList(l29,QIList(l177,l77,l5),l5,l5),l5),QIList(QIList(l180,l367,l5),QIList(l180,l366,l5),l5),l5),QIList(l259,QIList(QIList(l368,QIList(l344,l5),QIList(l120,QIList(l180,l367,l5),QIList(l29,l344,l5,l5),l5),QIList(l115,QIList(l180,l367,l5),QIList(l32,QIList(l180,l367,l5),l5),l5),l344,l5),l5),QIList(l179,l346,l5),l5),QIList(l32,QIList(l180,l366,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l71,l213,QIList(l109,QIList(l6,QIList(l369,l370,l226,l346,l5),QIList(l178,QIList(l199,l5,QIList(l270,QIList(l180,QIList(l79,QIList(l6,QIList(l344,l5),QIList(l45,QIList(l40,l344,l5),QIList(l41,l344,l5),l5),l5),l369,l5),l5),QIList(l15,l4,QIList(l7,QIList(l180,QIList(l31,l370,l5),l5),QIList(l14,QIList(l118,QIList(l180,QIList(l32,l370,l5),l5),l5),l5),l5),QIList(l281,QIList(l179,l346,l5),l5),QIList(l115,QIList(l179,QIList(l320,QIList(l109,l66,l5),QIList(l79,QIList(l6,QIList(l371,l5),QIList(l55,QIList(l30,QIList(l36,l371,l5),l5),QIList(l45,QIList(l40,l371,l5),QIList(l42,l371,l5),l5),l5),l5),l369,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l70,l213,QIList(l109,QIList(l6,QIList(l369,l370,l226,l346,l5),QIList(l178,QIList(l199,l5,QIList(l267,QIList(l180,QIList(l79,QIList(l6,QIList(l344,l5),QIList(l45,QIList(l40,l344,l5),QIList(l41,l344,l5),l5),l5),l369,l5),l5),QIList(l15,l4,QIList(l7,QIList(l180,QIList(l31,l370,l5),l5),QIList(l14,QIList(l118,QIList(l180,QIList(l32,l370,l5),l5),l5),l5),l5),QIList(l281,QIList(l179,l346,l5),l5),QIList(l69,QIList(l179,QIList(l320,QIList(l109,l66,l5),QIList(l79,QIList(l6,QIList(l371,l5),QIList(l55,QIList(l30,QIList(l36,l371,l5),l5),QIList(l45,QIList(l40,l371,l5),QIList(l42,l371,l5),l5),l5),l5),l369,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l69,l213,QIList(l109,QIList(l6,QIList(l226,l353,l5),QIList(l267,QIList(QIList(l372,QIList(l177,l5,l5),l5),l5),QIList(l15,l4,QIList(l52,QIList(QIList(l13,l353,l5),QIList(l14,l5),l5),QIList(QIList(l13,QIList(l32,l353,l5),l5),QIList(l322,"Odd paris in PSETQ",l5),l5),QIList(l4,QIList(l267,QIList(QIList(l110,QIList(l31,l353,l5),l5),QIList(l355,QIList(l34,l353,l5),l5),l5),QIList(l49,QIList(l178,QIList(QIList(l180,l110,l5),QIList(l180,QIList(l17,l5),l5),QIList(l180,l355,l5),l5),l5),l372,l5),QIList(l115,l353,QIList(l36,l353,l5),l5),l5),l5),l5),l5),QIList(l115,l372,QIList(l68,l372,l5),l5),QIList(l178,QIList(l267,QIList(l180,QIList(l79,QIList(l109,l32,l5),l372,l5),l5),QIList(l115,QIList(l179,QIList(l61,QIList(l109,l66,l5),QIList(l79,QIList(l109,l92,l5),l372,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l58,l213,QIList(l109,QIList(l6,QIList(l373,l361,l226,l346,l5),QIList(l178,QIList(l57,QIList(l118,QIList(l180,l373,l5),QIList(l180,l361,l5),l5),QIList(l179,l346,l5),l5),l5),l5),l5),l5,l5),QIList(l57,l213,QIList(l109,QIList(l6,QIList(l351,l226,l346,l5),QIList(l267,QIList(QIList(l355,QIList(l17,l5),l5),l5),QIList(l178,QIList(l267,QIList(QIList(QIList(l180,l355,l5),QIList(l180,l351,l5),l5),l5),QIList(l179,l346,l5),QIList(l180,l355,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l56,l213,QIList(l109,QIList(l6,QIList(l226,l374,l5),QIList(l52,QIList(QIList(l13,l374,l5),l5,l5),QIList(QIList(l13,QIList(l32,l374,l5),l5),QIList(l31,l374,l5),l5),QIList(l4,QIList(l267,QIList(QIList(l375,QIList(l17,l5),l5),l5),QIList(l178,QIList(l267,QIList(QIList(QIList(l180,l375,l5),QIList(l180,QIList(l31,l374,l5),l5),l5),l5),QIList(l223,QIList(l180,l375,l5),QIList(l180,l375,l5),QIList(l56,QIList(l179,QIList(l32,l374,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l55,l213,QIList(l109,QIList(l6,QIList(l226,l374,l5),QIList(l52,QIList(QIList(l13,l374,l5),l4,l5),QIList(QIList(l13,QIList(l32,l374,l5),l5),QIList(l31,l374,l5),l5),QIList(l4,QIList(l178,QIList(l223,QIList(l180,QIList(l31,l374,l5),l5),QIList(l55,QIList(l179,QIList(l32,l374,l5),l5),l5),l5,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l54,l213,QIList(l109,QIList(l6,QIList(l351,l226,l376,l5),QIList(l178,QIList(l53,QIList(l180,l351,l5),QIList(l179,QIList(l66,l376,QIList(l178,QIList(QIList(l4,QIList(l322,"ECASE expression failed.",l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l53,l213,QIList(l109,QIList(l6,QIList(l351,l226,l376,l5),QIList(l267,QIList(QIList(l377,QIList(l17,l5),l5),l5),QIList(l178,QIList(l267,QIList(QIList(QIList(l180,l377,l5),QIList(l180,l351,l5),l5),l5),QIList(l52,QIList(l179,QIList(l79,QIList(l6,QIList(l378,l5),QIList(l223,QIList(l311,QIList(l31,l378,l5),l4,l5),l378,QIList(l178,QIList(QIList(l27,QIList(l180,l377,l5),QIList(l177,QIList(l180,QIList(l31,l378,l5),l5),l5),l5),QIList(l179,QIList(l32,l378,l5),l5),l5),l5),l5),l5),l376,l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l52,l213,QIList(l109,QIList(l6,QIList(l226,l376,l5),QIList(l223,QIList(l13,l376,l5),l5,QIList(l223,QIList(l311,QIList(l33,l376,l5),l4,l5),QIList(l178,QIList(l118,QIList(l179,QIList(l35,l376,l5),l5),l5),l5),QIList(l178,QIList(l223,QIList(l180,QIList(l33,l376,l5),l5),QIList(l118,QIList(l179,QIList(l35,l376,l5),l5),l5),QIList(l52,QIList(l179,QIList(l32,l376,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l51,l213,QIList(l109,QIList(l6,QIList(l379,l226,l346,l5),QIList(l267,QIList(QIList(l380,QIList(l17,l5),l5),QIList(l381,QIList(l40,l379,l5),l5),QIList(l382,QIList(l41,l379,l5),l5),QIList(l361,QIList(l42,l379,l5),l5),l5),QIList(l178,QIList(l199,l5,QIList(l267,QIList(QIList(QIList(l180,l381,l5),0,l5),QIList(QIList(l180,l380,l5),QIList(l180,l382,l5),l5),l5),QIList(l254,QIList(l299,QIList(l180,l381,l5),QIList(l180,l380,l5),l5),QIList(l281,QIList(l179,l346,l5),l5),QIList(l47,QIList(l180,l381,l5),l5),l5),QIList(l180,l361,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l50,l213,QIList(l109,QIList(l6,QIList(l379,l226,l346,l5),QIList(l267,QIList(QIList(l381,QIList(l40,l379,l5),l5),QIList(l383,QIList(l17,l5),l5),l5),QIList(l178,QIList(l199,l5,QIList(l267,QIList(QIList(QIList(l180,l383,l5),QIList(l180,QIList(l41,l379,l5),l5),l5),QIList(QIList(l180,l381,l5),l5,l5),l5),QIList(l254,QIList(l180,l383,l5),QIList(l115,QIList(l180,l381,l5),QIList(l31,QIList(l180,l383,l5),l5),l5),QIList(l281,QIList(l179,l346,l5),l5),QIList(l115,QIList(l180,l383,l5),QIList(l32,QIList(l180,l383,l5),l5),l5),l5),QIList(l180,QIList(l42,l379,l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l49,l213,QIList(l109,QIList(l6,QIList(l344,l354,l5),QIList(l178,QIList(l115,QIList(l180,l354,l5),QIList(l29,QIList(l180,l344,l5),QIList(l180,l354,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l48,l213,QIList(l109,QIList(l6,QIList(l344,l225,QIList(l384,1,l5),l5),QIList(l178,QIList(l115,QIList(l180,l344,l5),QIList(l64,QIList(l180,l344,l5),QIList(l180,l384,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l47,l213,QIList(l109,QIList(l6,QIList(l344,l225,QIList(l384,1,l5),l5),QIList(l178,QIList(l115,QIList(l180,l344,l5),QIList(l63,QIList(l180,l344,l5),QIList(l180,l384,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l15,l213,QIList(l109,QIList(l6,QIList(l385,l226,l346,l5),QIList(l178,QIList(l199,l5,QIList(l254,QIList(l180,l385,l5),QIList(l179,l346,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l14,l213,QIList(l109,QIList(l6,QIList(l225,l355,l5),QIList(l178,QIList(l274,l5,QIList(l180,l355,l5),l5),l5),l5),l5),l5,l5),QIList(l12,l213,QIList(l109,QIList(l6,QIList(l349,l345,l226,l346,l5),QIList(l178,QIList(l118,QIList(l307,QIList(l177,QIList(l180,l349,l5),l5),QIList(l11,QIList(l180,QIList(l306,l349,l5),l5),QIList(l180,l345,l5),QIList(l179,QIList(l223,QIList(l55,QIList(l314,QIList(l31,l346,l5),l5),QIList(l28,QIList(l13,QIList(l32,l346,l5),l5),l5),l5),QIList(l178,QIList(QIList(l180,QIList(l31,l346,l5),l5),QIList(l199,QIList(l180,l349,l5),QIList(l179,QIList(l32,l346,l5),l5),l5),l5),l5),QIList(l178,QIList(QIList(l199,QIList(l180,l349,l5),QIList(l179,l346,l5),l5),l5),l5),l5),l5),l5),l5),QIList(l177,QIList(l180,l349,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l11,l213,QIList(l109,QIList(l6,QIList(l349,l345,l226,l346,l5),QIList(l267,QIList(QIList(l344,QIList(l17,"FN",l5),l5),l5),QIList(l178,QIList(l267,QIList(QIList(QIList(l180,l344,l5),QIList(l6,QIList(l180,l345,l5),QIList(l179,l346,l5),l5),l5),l5),QIList(l326,QIList(l180,l344,l5),"fname",QIList(l180,l349,l5),l5),QIList(l180,l344,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l10,l213,QIList(l109,QIList(l6,QIList(l349,l355,l225,l386,l5),QIList(l178,QIList(l118,QIList(l115,QIList(l180,l349,l5),QIList(l180,l355,l5),l5),QIList(l179,QIList(l7,QIList(l314,l386,l5),QIList(l178,QIList(QIList(l326,QIList(l177,QIList(l180,l349,l5),l5),"vardoc",QIList(l180,l386,l5),l5),l5),l5),l5),l5),QIList(l177,QIList(l180,l349,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l9,l213,QIList(l109,QIList(l6,QIList(l349,l355,l225,l386,l5),QIList(l178,QIList(l118,QIList(l2,QIList(l217,QIList(l180,l349,l5),l5),l5),QIList(l8,QIList(l19,QIList(l177,QIList(l180,l349,l5),l5),l5),QIList(l115,QIList(l180,l349,l5),QIList(l180,l355,l5),l5),l5),QIList(l179,QIList(l7,QIList(l314,l386,l5),QIList(l178,QIList(QIList(l326,QIList(l177,QIList(l180,l349,l5),l5),"vardoc",QIList(l180,l386,l5),l5),l5),l5),l5),l5),QIList(l177,QIList(l180,l349,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l8,l213,QIList(l109,QIList(l6,QIList(l385,l226,l346,l5),QIList(l178,QIList(l223,QIList(l180,l385,l5),l5,QIList(l118,QIList(l179,l346,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l7,l213,QIList(l109,QIList(l6,QIList(l385,l226,l346,l5),QIList(l178,QIList(l223,QIList(l180,l385,l5),QIList(l118,QIList(l179,l346,l5),l5),l5,l5),l5),l5),l5),l5,l5),QIList(l6,l213,QIList(l109,QIList(l6,QIList(l345,l226,l346,l5),QIList(l178,QIList(l109,QIList(l6,QIList(l180,l345,l5),QIList(l179,l346,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l3,l213,QIList(l109,QIList(l6,QIList(l349,l355,l225,l386,l5),QIList(l178,QIList(l118,QIList(l2,QIList(l217,QIList(l180,l349,l5),l5),l5),QIList(l2,QIList(l219,QIList(l180,l349,l5),l5),l5),QIList(l115,QIList(l180,l349,l5),QIList(l180,l355,l5),l5),QIList(l179,QIList(l7,QIList(l314,l386,l5),QIList(l178,QIList(QIList(l326,QIList(l177,QIList(l180,l349,l5),l5),"vardoc",QIList(l180,l386,l5),l5),l5),l5),l5),l5),QIList(l177,QIList(l180,l349,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l2,l213,QIList(l109,QIList(l6,QIList(l226,l347,l5),QIList(l178,QIList(l262,QIList(l179,QIList(l79,QIList(l6,QIList(l348,l5),QIList(l178,QIList(l216,QIList(l177,QIList(l180,l348,l5),l5),l5),l5),l5),l347,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l1,l213,QIList(l109,QIList(l6,QIList(l349,l345,l226,l346,l5),QIList(l178,QIList(l262,QIList(l212,QIList(l177,QIList(l180,l349,l5),l5),QIList(l177,QIList(l109,QIList(l6,QIList(l180,QIList(l79,QIList(l109,QIList(l6,QIList(l344,l5),QIList(l223,QIList(l311,l344,QIList(l177,l340,l5),l5),QIList(l177,l226,l5),l344,l5),l5),l5),l345,l5),l5),QIList(l179,l346,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),l5),l5,l5,l5);
8813 ((l203).value = l387);
8814 var l388 = QIList(QIList(l386,"l386"),QIList(l385,"l385"),QIList(l384,"l384"),QIList(l383,"l383"),QIList(l382,"l382"),QIList(l381,"l381"),QIList(l380,"l380"),QIList(l379,"l379"),QIList(l378,"l378"),QIList(l377,"l377"),QIList(l376,"l376"),QIList(l375,"l375"),QIList(l374,"l374"),QIList(l373,"l373"),QIList(l372,"l372"),QIList(l371,"l371"),QIList(l370,"l370"),QIList(l369,"l369"),QIList(l368,"l368"),QIList(l367,"l367"),QIList(l366,"l366"),QIList(l365,"l365"),QIList(l364,"l364"),QIList(l363,"l363"),QIList(l362,"l362"),QIList(l361,"l361"),QIList(l360,"l360"),QIList(l359,"l359"),QIList(l358,"l358"),QIList(l357,"l357"),QIList(l356,"l356"),QIList(l355,"l355"),QIList(l354,"l354"),QIList(l353,"l353"),QIList(l352,"l352"),QIList(l351,"l351"),QIList(l350,"l350"),QIList(l349,"l349"),QIList(l348,"l348"),QIList(l347,"l347"),QIList(l346,"l346"),QIList(l345,"l345"),QIList(l344,"l344"),QIList(l343,"l343"),QIList(l342,"l342"),QIList(l340,"l340"),QIList(l339,"l339"),QIList(l338,"l338"),QIList(l337,"l337"),QIList(l336,"l336"),QIList(l335,"l335"),QIList(l334,"l334"),QIList(l333,"l333"),QIList(l332,"l332"),QIList(l331,"l331"),QIList(l330,"l330"),QIList(l329,"l329"),QIList(l328,"l328"),QIList(l327,"l327"),QIList(l326,"l326"),QIList(l325,"l325"),QIList(l324,"l324"),QIList(l323,"l323"),QIList(l322,"l322"),QIList(l321,"l321"),QIList(l320,"l320"),QIList(l319,"l319"),QIList(l318,"l318"),QIList(l317,"l317"),QIList(l316,"l316"),QIList(l315,"l315"),QIList(l314,"l314"),QIList(l313,"l313"),QIList(l312,"l312"),QIList(l311,"l311"),QIList(l310,"l310"),QIList(l309,"l309"),QIList(l308,"l308"),QIList(l307,"l307"),QIList(l306,"l306"),QIList(l305,"l305"),QIList(l304,"l304"),QIList(l303,"l303"),QIList(l302,"l302"),QIList(l301,"l301"),QIList(l300,"l300"),QIList(l299,"l299"),QIList(l298,"l298"),QIList(l297,"l297"),QIList(l296,"l296"),QIList(l295,"l295"),QIList(l294,"l294"),QIList(l293,"l293"),QIList(l292,"l292"),QIList(l291,"l291"),QIList(l290,"l290"),QIList(l289,"l289"),QIList(l288,"l288"),QIList(l287,"l287"),QIList(l286,"l286"),QIList(l285,"l285"),QIList(l284,"l284"),QIList(l283,"l283"),QIList(l282,"l282"),QIList(l281,"l281"),QIList(l280,"l280"),QIList(l279,"l279"),QIList(l278,"l278"),QIList(l277,"l277"),QIList(l276,"l276"),QIList(l275,"l275"),QIList(l274,"l274"),QIList(l273,"l273"),QIList(l272,"l272"),QIList(l271,"l271"),QIList(l270,"l270"),QIList(l269,"l269"),QIList(l268,"l268"),QIList(l267,"l267"),QIList(l266,"l266"),QIList(l265,"l265"),QIList(l264,"l264"),QIList(l263,"l263"),QIList(l262,"l262"),QIList(l261,"l261"),QIList(l260,"l260"),QIList(l259,"l259"),QIList(l258,"l258"),QIList(l257,"l257"),QIList(l256,"l256"),QIList(l255,"l255"),QIList(l254,"l254"),QIList(l253,"l253"),QIList(l252,"l252"),QIList(l251,"l251"),QIList(l250,"l250"),QIList(l249,"l249"),QIList(l248,"l248"),QIList(l247,"l247"),QIList(l246,"l246"),QIList(l245,"l245"),QIList(l244,"l244"),QIList(l243,"l243"),QIList(l242,"l242"),QIList(l241,"l241"),QIList(l240,"l240"),QIList(l239,"l239"),QIList(l238,"l238"),QIList(l237,"l237"),QIList(l236,"l236"),QIList(l235,"l235"),QIList(l234,"l234"),QIList(l233,"l233"),QIList(l232,"l232"),QIList(l231,"l231"),QIList(l230,"l230"),QIList(l229,"l229"),QIList(l227,"l227"),QIList(l226,"l226"),QIList(l225,"l225"),QIList(l224,"l224"),QIList(l223,"l223"),QIList(l222,"l222"),QIList(l221,"l221"),QIList(l220,"l220"),QIList(l219,"l219"),QIList(l218,"l218"),QIList(l217,"l217"),QIList(l216,"l216"),QIList(l215,"l215"),QIList(l214,"l214"),QIList(l213,"l213"),QIList(l212,"l212"),QIList(l211,"l211"),QIList(l210,"l210"),QIList(l209,"l209"),QIList(l208,"l208"),QIList(l207,"l207"),QIList(l206,"l206"),QIList(l205,"l205"),QIList(l204,"l204"),QIList(l203,"l203"),QIList(l202,"l202"),QIList(l201,"l201"),QIList(l200,"l200"),QIList(l199,"l199"),QIList(l198,"l198"),QIList(l197,"l197"),QIList(l196,"l196"),QIList(l195,"l195"),QIList(l194,"l194"),QIList(l193,"l193"),QIList(l192,"l192"),QIList(l191,"l191"),QIList(l190,"l190"),QIList(l189,"l189"),QIList(l188,"l188"),QIList(l187,"l187"),QIList(l186,"l186"),QIList(l185,"l185"),QIList(l184,"l184"),QIList(l183,"l183"),QIList(l182,"l182"),QIList(l181,"l181"),QIList(l180,"l180"),QIList(l179,"l179"),QIList(l178,"l178"),QIList(l177,"l177"),QIList(l176,"l176"),QIList(l175,"l175"),QIList(l174,"l174"),QIList(l173,"l173"),QIList(l172,"l172"),QIList(l171,"l171"),QIList(l170,"l170"),QIList(l169,"l169"),QIList(l168,"l168"),QIList(l167,"l167"),QIList(l166,"l166"),QIList(l165,"l165"),QIList(l164,"l164"),QIList(l163,"l163"),QIList(l162,"l162"),QIList(l161,"l161"),QIList(l160,"l160"),QIList(l159,"l159"),QIList(l158,"l158"),QIList(l157,"l157"),QIList(l156,"l156"),QIList(l155,"l155"),QIList(l154,"l154"),QIList(l153,"l153"),QIList(l152,"l152"),QIList(l151,"l151"),QIList(l150,"l150"),QIList(l149,"l149"),QIList(l148,"l148"),QIList(l147,"l147"),QIList(l146,"l146"),QIList(l145,"l145"),QIList(l144,"l144"),QIList(l143,"l143"),QIList(l142,"l142"),QIList(l141,"l141"),QIList(l140,"l140"),QIList(l139,"l139"),QIList(l138,"l138"),QIList(l137,"l137"),QIList(l136,"l136"),QIList(l135,"l135"),QIList(l134,"l134"),QIList(l133,"l133"),QIList(l132,"l132"),QIList(l131,"l131"),QIList(l130,"l130"),QIList(l129,"l129"),QIList(l128,"l128"),QIList(l127,"l127"),QIList(l126,"l126"),QIList(l125,"l125"),QIList(l124,"l124"),QIList(l123,"l123"),QIList(l122,"l122"),QIList(l121,"l121"),QIList(l120,"l120"),QIList(l119,"l119"),QIList(l118,"l118"),QIList(l117,"l117"),QIList(l116,"l116"),QIList(l115,"l115"),QIList(l114,"l114"),QIList(l113,"l113"),QIList(l112,"l112"),QIList(l111,"l111"),QIList(l110,"l110"),QIList(l109,"l109"),QIList(l108,"l108"),QIList(l107,"l107"),QIList(l106,"l106"),QIList(l105,"l105"),QIList(l104,"l104"),QIList(l103,"l103"),QIList(l102,"l102"),QIList(l101,"l101"),QIList(l100,"l100"),QIList(l99,"l99"),QIList(l98,"l98"),QIList(l97,"l97"),QIList(l96,"l96"),QIList(l95,"l95"),QIList(l94,"l94"),QIList(l93,"l93"),QIList(l92,"l92"),QIList(l91,"l91"),QIList(l90,"l90"),QIList(l89,"l89"),QIList(l88,"l88"),QIList(l87,"l87"),QIList(l86,"l86"),QIList(l85,"l85"),QIList(l84,"l84"),QIList(l83,"l83"),QIList(l82,"l82"),QIList(l81,"l81"),QIList(l80,"l80"),QIList(l79,"l79"),QIList(l78,"l78"),QIList(l77,"l77"),QIList(l76,"l76"),QIList(l75,"l75"),QIList(l74,"l74"),QIList(l73,"l73"),QIList(l72,"l72"),QIList(l71,"l71"),QIList(l70,"l70"),QIList(l69,"l69"),QIList(l68,"l68"),QIList(l67,"l67"),QIList(l66,"l66"),QIList(l65,"l65"),QIList(l64,"l64"),QIList(l63,"l63"),QIList(l62,"l62"),QIList(l61,"l61"),QIList(l60,"l60"),QIList(l59,"l59"),QIList(l58,"l58"),QIList(l57,"l57"),QIList(l56,"l56"),QIList(l55,"l55"),QIList(l54,"l54"),QIList(l53,"l53"),QIList(l52,"l52"),QIList(l51,"l51"),QIList(l50,"l50"),QIList(l49,"l49"),QIList(l48,"l48"),QIList(l47,"l47"),QIList(l46,"l46"),QIList(l45,"l45"),QIList(l44,"l44"),QIList(l43,"l43"),QIList(l42,"l42"),QIList(l41,"l41"),QIList(l40,"l40"),QIList(l39,"l39"),QIList(l38,"l38"),QIList(l37,"l37"),QIList(l36,"l36"),QIList(l35,"l35"),QIList(l34,"l34"),QIList(l33,"l33"),QIList(l32,"l32"),QIList(l31,"l31"),QIList(l30,"l30"),QIList(l29,"l29"),QIList(l28,"l28"),QIList(l27,"l27"),QIList(l26,"l26"),QIList(l25,"l25"),QIList(l24,"l24"),QIList(l23,"l23"),QIList(l22,"l22"),QIList(l21,"l21"),QIList(l20,"l20"),QIList(l19,"l19"),QIList(l18,"l18"),QIList(l17,"l17"),QIList(l16,"l16"),QIList(l15,"l15"),QIList(l14,"l14"),QIList(l13,"l13"),QIList(l12,"l12"),QIList(l11,"l11"),QIList(l10,"l10"),QIList(l9,"l9"),QIList(l8,"l8"),QIList(l7,"l7"),QIList(l6,"l6"),QIList(l5,"l5"),QIList(l4,"l4"),QIList(l3,"l3"),QIList(l2,"l2"),QIList(l1,"l1"),l5);
8815 (function(){
8816     l139.fvalue(pv, l386);
8817     l139.fvalue(pv, l385);
8818     l139.fvalue(pv, l384);
8819     l139.fvalue(pv, l383);
8820     l139.fvalue(pv, l382);
8821     l139.fvalue(pv, l381);
8822     l139.fvalue(pv, l380);
8823     l139.fvalue(pv, l379);
8824     l139.fvalue(pv, l378);
8825     l139.fvalue(pv, l377);
8826     l139.fvalue(pv, l376);
8827     l139.fvalue(pv, l375);
8828     l139.fvalue(pv, l374);
8829     l139.fvalue(pv, l373);
8830     l139.fvalue(pv, l372);
8831     l139.fvalue(pv, l371);
8832     l139.fvalue(pv, l370);
8833     l139.fvalue(pv, l369);
8834     l139.fvalue(pv, l368);
8835     l139.fvalue(pv, l367);
8836     l139.fvalue(pv, l366);
8837     l139.fvalue(pv, l365);
8838     l139.fvalue(pv, l364);
8839     l139.fvalue(pv, l363);
8840     l139.fvalue(pv, l362);
8841     l139.fvalue(pv, l361);
8842     l139.fvalue(pv, l360);
8843     l139.fvalue(pv, l359);
8844     l139.fvalue(pv, l358);
8845     l139.fvalue(pv, l357);
8846     l139.fvalue(pv, l356);
8847     l139.fvalue(pv, l355);
8848     l139.fvalue(pv, l354);
8849     l139.fvalue(pv, l353);
8850     l139.fvalue(pv, l352);
8851     l139.fvalue(pv, l351);
8852     l139.fvalue(pv, l350);
8853     l139.fvalue(pv, l349);
8854     l139.fvalue(pv, l348);
8855     l139.fvalue(pv, l347);
8856     l139.fvalue(pv, l346);
8857     l139.fvalue(pv, l345);
8858     l139.fvalue(pv, l344);
8859     l139.fvalue(pv, l343);
8860     l139.fvalue(pv, l342);
8861     l139.fvalue(pv, l340);
8862     l139.fvalue(pv, l339);
8863     l139.fvalue(pv, l338);
8864     l139.fvalue(pv, l337);
8865     l139.fvalue(pv, l336);
8866     l139.fvalue(pv, l335);
8867     l139.fvalue(pv, l334);
8868     l139.fvalue(pv, l333);
8869     l139.fvalue(pv, l332);
8870     l139.fvalue(pv, l331);
8871     l139.fvalue(pv, l330);
8872     l139.fvalue(pv, l329);
8873     l139.fvalue(pv, l328);
8874     l139.fvalue(pv, l327);
8875     l139.fvalue(pv, l326);
8876     l139.fvalue(pv, l325);
8877     l139.fvalue(pv, l324);
8878     l139.fvalue(pv, l323);
8879     l139.fvalue(pv, l322);
8880     l139.fvalue(pv, l321);
8881     l139.fvalue(pv, l320);
8882     l139.fvalue(pv, l319);
8883     l139.fvalue(pv, l318);
8884     l139.fvalue(pv, l317);
8885     l139.fvalue(pv, l316);
8886     l139.fvalue(pv, l315);
8887     l139.fvalue(pv, l314);
8888     l139.fvalue(pv, l313);
8889     l139.fvalue(pv, l312);
8890     l139.fvalue(pv, l311);
8891     l139.fvalue(pv, l310);
8892     l139.fvalue(pv, l309);
8893     l139.fvalue(pv, l308);
8894     l139.fvalue(pv, l307);
8895     l139.fvalue(pv, l306);
8896     l139.fvalue(pv, l305);
8897     l139.fvalue(pv, l304);
8898     l139.fvalue(pv, l303);
8899     l139.fvalue(pv, l302);
8900     l139.fvalue(pv, l301);
8901     l139.fvalue(pv, l300);
8902     l139.fvalue(pv, l299);
8903     l139.fvalue(pv, l298);
8904     l139.fvalue(pv, l297);
8905     l139.fvalue(pv, l296);
8906     l139.fvalue(pv, l295);
8907     l139.fvalue(pv, l294);
8908     l139.fvalue(pv, l293);
8909     l139.fvalue(pv, l292);
8910     l139.fvalue(pv, l291);
8911     l139.fvalue(pv, l290);
8912     l139.fvalue(pv, l289);
8913     l139.fvalue(pv, l288);
8914     l139.fvalue(pv, l287);
8915     l139.fvalue(pv, l286);
8916     l139.fvalue(pv, l285);
8917     l139.fvalue(pv, l284);
8918     l139.fvalue(pv, l283);
8919     l139.fvalue(pv, l282);
8920     l139.fvalue(pv, l281);
8921     l139.fvalue(pv, l280);
8922     l139.fvalue(pv, l279);
8923     l139.fvalue(pv, l278);
8924     l139.fvalue(pv, l277);
8925     l139.fvalue(pv, l276);
8926     l139.fvalue(pv, l275);
8927     l139.fvalue(pv, l274);
8928     l139.fvalue(pv, l273);
8929     l139.fvalue(pv, l272);
8930     l139.fvalue(pv, l271);
8931     l139.fvalue(pv, l270);
8932     l139.fvalue(pv, l269);
8933     l139.fvalue(pv, l268);
8934     l139.fvalue(pv, l267);
8935     l139.fvalue(pv, l266);
8936     l139.fvalue(pv, l265);
8937     l139.fvalue(pv, l264);
8938     l139.fvalue(pv, l263);
8939     l139.fvalue(pv, l262);
8940     l139.fvalue(pv, l261);
8941     l139.fvalue(pv, l260);
8942     l139.fvalue(pv, l259);
8943     l139.fvalue(pv, l258);
8944     l139.fvalue(pv, l257);
8945     l139.fvalue(pv, l256);
8946     l139.fvalue(pv, l255);
8947     l139.fvalue(pv, l254);
8948     l139.fvalue(pv, l253);
8949     l139.fvalue(pv, l252);
8950     l139.fvalue(pv, l251);
8951     l139.fvalue(pv, l250);
8952     l139.fvalue(pv, l249);
8953     l139.fvalue(pv, l248);
8954     l139.fvalue(pv, l247);
8955     l139.fvalue(pv, l246);
8956     l139.fvalue(pv, l245);
8957     l139.fvalue(pv, l244);
8958     l139.fvalue(pv, l243);
8959     l139.fvalue(pv, l242);
8960     l139.fvalue(pv, l241);
8961     l139.fvalue(pv, l240);
8962     l139.fvalue(pv, l239);
8963     l139.fvalue(pv, l238);
8964     l139.fvalue(pv, l237);
8965     l139.fvalue(pv, l236);
8966     l139.fvalue(pv, l235);
8967     l139.fvalue(pv, l234);
8968     l139.fvalue(pv, l233);
8969     l139.fvalue(pv, l232);
8970     l139.fvalue(pv, l231);
8971     l139.fvalue(pv, l230);
8972     l139.fvalue(pv, l229);
8973     l139.fvalue(pv, l227);
8974     l139.fvalue(pv, l226);
8975     l139.fvalue(pv, l225);
8976     l139.fvalue(pv, l224);
8977     l139.fvalue(pv, l223);
8978     l139.fvalue(pv, l222);
8979     l139.fvalue(pv, l221);
8980     l139.fvalue(pv, l220);
8981     l139.fvalue(pv, l219);
8982     l139.fvalue(pv, l218);
8983     l139.fvalue(pv, l217);
8984     l139.fvalue(pv, l216);
8985     l139.fvalue(pv, l215);
8986     l139.fvalue(pv, l214);
8987     l139.fvalue(pv, l213);
8988     l139.fvalue(pv, l212);
8989     l139.fvalue(pv, l211);
8990     l139.fvalue(pv, l210);
8991     l139.fvalue(pv, l209);
8992     l139.fvalue(pv, l208);
8993     l139.fvalue(pv, l207);
8994     l139.fvalue(pv, l206);
8995     l139.fvalue(pv, l205);
8996     l139.fvalue(pv, l204);
8997     l139.fvalue(pv, l203);
8998     l139.fvalue(pv, l202);
8999     l139.fvalue(pv, l201);
9000     l139.fvalue(pv, l200);
9001     l139.fvalue(pv, l199);
9002     l139.fvalue(pv, l198);
9003     l139.fvalue(pv, l197);
9004     l139.fvalue(pv, l196);
9005     l139.fvalue(pv, l195);
9006     l139.fvalue(pv, l194);
9007     l139.fvalue(pv, l193);
9008     l139.fvalue(pv, l192);
9009     l139.fvalue(pv, l191);
9010     l139.fvalue(pv, l190);
9011     l139.fvalue(pv, l189);
9012     l139.fvalue(pv, l188);
9013     l139.fvalue(pv, l187);
9014     l139.fvalue(pv, l186);
9015     l139.fvalue(pv, l185);
9016     l139.fvalue(pv, l184);
9017     l139.fvalue(pv, l183);
9018     l139.fvalue(pv, l182);
9019     l139.fvalue(pv, l181);
9020     l139.fvalue(pv, l180);
9021     l139.fvalue(pv, l179);
9022     l139.fvalue(pv, l178);
9023     l139.fvalue(pv, l177);
9024     l139.fvalue(pv, l176);
9025     l139.fvalue(pv, l175);
9026     l139.fvalue(pv, l174);
9027     l139.fvalue(pv, l173);
9028     l139.fvalue(pv, l172);
9029     l139.fvalue(pv, l171);
9030     l139.fvalue(pv, l170);
9031     l139.fvalue(pv, l169);
9032     l139.fvalue(pv, l168);
9033     l139.fvalue(pv, l167);
9034     l139.fvalue(pv, l166);
9035     l139.fvalue(pv, l165);
9036     l139.fvalue(pv, l164);
9037     l139.fvalue(pv, l163);
9038     l139.fvalue(pv, l162);
9039     l139.fvalue(pv, l161);
9040     l139.fvalue(pv, l160);
9041     l139.fvalue(pv, l159);
9042     l139.fvalue(pv, l158);
9043     l139.fvalue(pv, l157);
9044     l139.fvalue(pv, l156);
9045     l139.fvalue(pv, l155);
9046     l139.fvalue(pv, l154);
9047     l139.fvalue(pv, l153);
9048     l139.fvalue(pv, l152);
9049     l139.fvalue(pv, l151);
9050     l139.fvalue(pv, l150);
9051     l139.fvalue(pv, l149);
9052     l139.fvalue(pv, l148);
9053     l139.fvalue(pv, l147);
9054     l139.fvalue(pv, l146);
9055     l139.fvalue(pv, l145);
9056     l139.fvalue(pv, l144);
9057     l139.fvalue(pv, l143);
9058     l139.fvalue(pv, l142);
9059     l139.fvalue(pv, l141);
9060     l139.fvalue(pv, l140);
9061     l139.fvalue(pv, l139);
9062     l139.fvalue(pv, l138);
9063     l139.fvalue(pv, l137);
9064     l139.fvalue(pv, l136);
9065     l139.fvalue(pv, l135);
9066     l139.fvalue(pv, l134);
9067     l139.fvalue(pv, l133);
9068     l139.fvalue(pv, l132);
9069     l139.fvalue(pv, l131);
9070     l139.fvalue(pv, l130);
9071     l139.fvalue(pv, l129);
9072     l139.fvalue(pv, l128);
9073     l139.fvalue(pv, l127);
9074     l139.fvalue(pv, l126);
9075     l139.fvalue(pv, l125);
9076     l139.fvalue(pv, l124);
9077     l139.fvalue(pv, l123);
9078     l139.fvalue(pv, l122);
9079     l139.fvalue(pv, l121);
9080     l139.fvalue(pv, l120);
9081     l139.fvalue(pv, l119);
9082     l139.fvalue(pv, l118);
9083     l139.fvalue(pv, l117);
9084     l139.fvalue(pv, l116);
9085     l139.fvalue(pv, l115);
9086     l139.fvalue(pv, l114);
9087     l139.fvalue(pv, l113);
9088     l139.fvalue(pv, l112);
9089     l139.fvalue(pv, l111);
9090     l139.fvalue(pv, l110);
9091     l139.fvalue(pv, l109);
9092     l139.fvalue(pv, l108);
9093     l139.fvalue(pv, l107);
9094     l139.fvalue(pv, l106);
9095     l139.fvalue(pv, l105);
9096     l139.fvalue(pv, l104);
9097     l139.fvalue(pv, l103);
9098     l139.fvalue(pv, l102);
9099     l139.fvalue(pv, l101);
9100     l139.fvalue(pv, l100);
9101     l139.fvalue(pv, l99);
9102     l139.fvalue(pv, l98);
9103     l139.fvalue(pv, l97);
9104     l139.fvalue(pv, l96);
9105     l139.fvalue(pv, l95);
9106     l139.fvalue(pv, l94);
9107     l139.fvalue(pv, l93);
9108     l139.fvalue(pv, l92);
9109     l139.fvalue(pv, l91);
9110     l139.fvalue(pv, l90);
9111     l139.fvalue(pv, l89);
9112     l139.fvalue(pv, l88);
9113     l139.fvalue(pv, l87);
9114     l139.fvalue(pv, l86);
9115     l139.fvalue(pv, l85);
9116     l139.fvalue(pv, l84);
9117     l139.fvalue(pv, l83);
9118     l139.fvalue(pv, l82);
9119     l139.fvalue(pv, l81);
9120     l139.fvalue(pv, l80);
9121     l139.fvalue(pv, l79);
9122     l139.fvalue(pv, l78);
9123     l139.fvalue(pv, l77);
9124     l139.fvalue(pv, l76);
9125     l139.fvalue(pv, l75);
9126     l139.fvalue(pv, l74);
9127     l139.fvalue(pv, l73);
9128     l139.fvalue(pv, l72);
9129     l139.fvalue(pv, l71);
9130     l139.fvalue(pv, l70);
9131     l139.fvalue(pv, l69);
9132     l139.fvalue(pv, l68);
9133     l139.fvalue(pv, l67);
9134     l139.fvalue(pv, l66);
9135     l139.fvalue(pv, l65);
9136     l139.fvalue(pv, l64);
9137     l139.fvalue(pv, l63);
9138     l139.fvalue(pv, l62);
9139     l139.fvalue(pv, l61);
9140     l139.fvalue(pv, l60);
9141     l139.fvalue(pv, l59);
9142     l139.fvalue(pv, l58);
9143     l139.fvalue(pv, l57);
9144     l139.fvalue(pv, l56);
9145     l139.fvalue(pv, l55);
9146     l139.fvalue(pv, l54);
9147     l139.fvalue(pv, l53);
9148     l139.fvalue(pv, l52);
9149     l139.fvalue(pv, l51);
9150     l139.fvalue(pv, l50);
9151     l139.fvalue(pv, l49);
9152     l139.fvalue(pv, l48);
9153     l139.fvalue(pv, l47);
9154     l139.fvalue(pv, l46);
9155     l139.fvalue(pv, l45);
9156     l139.fvalue(pv, l44);
9157     l139.fvalue(pv, l43);
9158     l139.fvalue(pv, l42);
9159     l139.fvalue(pv, l41);
9160     l139.fvalue(pv, l40);
9161     l139.fvalue(pv, l39);
9162     l139.fvalue(pv, l38);
9163     l139.fvalue(pv, l37);
9164     l139.fvalue(pv, l36);
9165     l139.fvalue(pv, l35);
9166     l139.fvalue(pv, l34);
9167     l139.fvalue(pv, l33);
9168     l139.fvalue(pv, l32);
9169     l139.fvalue(pv, l31);
9170     l139.fvalue(pv, l30);
9171     l139.fvalue(pv, l29);
9172     l139.fvalue(pv, l28);
9173     l139.fvalue(pv, l27);
9174     l139.fvalue(pv, l26);
9175     l139.fvalue(pv, l25);
9176     l139.fvalue(pv, l24);
9177     l139.fvalue(pv, l23);
9178     l139.fvalue(pv, l22);
9179     l139.fvalue(pv, l21);
9180     l139.fvalue(pv, l20);
9181     l139.fvalue(pv, l19);
9182     l139.fvalue(pv, l18);
9183     l139.fvalue(pv, l17);
9184     l139.fvalue(pv, l16);
9185     l139.fvalue(pv, l15);
9186     l139.fvalue(pv, l14);
9187     l139.fvalue(pv, l13);
9188     l139.fvalue(pv, l12);
9189     l139.fvalue(pv, l11);
9190     l139.fvalue(pv, l10);
9191     l139.fvalue(pv, l9);
9192     l139.fvalue(pv, l8);
9193     l139.fvalue(pv, l7);
9194     l139.fvalue(pv, l6);
9195     l139.fvalue(pv, l5);
9196     l139.fvalue(pv, l4);
9197     l139.fvalue(pv, l3);
9198     l139.fvalue(pv, l2);
9199     l139.fvalue(pv, l1);
9200     ((l250).value = l388);
9201     ((l204).value = 921);
9202     ((l16).value = 235);
9203     return ((l271).value = 304);
9204 })();
9205 ((l251).value = 388);