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         switch(arguments.length-1){
 111         case 0:
 112         v3="G";
 113         default: break;
 114         }
 115         return (function(){
 116             ((l16).value = (function(){
 117                 var x1 = (function(){
 118                     var symbol = l16;
 119                     var value = symbol.value;
 120                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
 121                     return value;
 122                 })();
 123                 if (typeof x1 !== 'number') throw 'Not a number!';
 124                 return x1+1;
 125             })());
 126             return (function(){
 127                 var name = (function(){
 128                     var string1 = v3;
 129                     var string2 = l18.fvalue(pv, (function(){
 130                         var symbol = l16;
 131                         var value = symbol.value;
 132                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
 133                         return value;
 134                     })());
 135                     if (typeof string1 != 'string')
 136                         throw 'The value ' + string1 + ' is not a type string.';
 137                     if (typeof string2 != 'string')
 138                         throw 'The value ' + string2 + ' is not a type string.';
 139                     return string1.concat(string2);
 140                 })();
 141                 if (typeof name != 'string')
 142                     throw 'The value ' + name + ' is not a type string.';
 143                 return ({name: name});
 144             })();
 145         })();
 146     }));
 147     return l17;
 148 })();
 149 var l19 = {name: "BOUNDP"};
 150 (function(){
 151     (l19).fvalue = (function(v6){
 152         ((v6)["fname"] = "BOUNDP");
 153         return v6;
 154     })((function (values,v5){
 155         checkArgs(arguments, 2);
 156         return (function(){
 157             return ((v5.value !== undefined)?l4.value: l5.value);
 158         })();
 159     }));
 160     return l19;
 161 })();
 162 var l20 = {name: "="};
 163 (function(){
 164     (l20).fvalue = (function(v9){
 165         ((v9)["fname"] = "=");
 166         return v9;
 167     })((function (values,v7,v8){
 168         checkArgs(arguments, 3);
 169         return (function(){
 170             return (function(){
 171                 var x1 = v7;
 172                 if (typeof x1 !== 'number') throw 'Not a number!';
 173                 var x2 = v8;
 174                 if (typeof x2 !== 'number') throw 'Not a number!';
 175                 return (x1==x2?l4.value: l5.value);
 176             })();
 177         })();
 178     }));
 179     return l20;
 180 })();
 181 var l21 = {name: "*"};
 182 (function(){
 183     (l21).fvalue = (function(v12){
 184         ((v12)["fname"] = "*");
 185         return v12;
 186     })((function (values,v10,v11){
 187         checkArgs(arguments, 3);
 188         return (function(){
 189             return (function(){
 190                 var x1 = v10;
 191                 if (typeof x1 !== 'number') throw 'Not a number!';
 192                 var x2 = v11;
 193                 if (typeof x2 !== 'number') throw 'Not a number!';
 194                 return x1*x2;
 195             })();
 196         })();
 197     }));
 198     return l21;
 199 })();
 200 var l22 = {name: "/"};
 201 (function(){
 202     (l22).fvalue = (function(v15){
 203         ((v15)["fname"] = "/");
 204         return v15;
 205     })((function (values,v13,v14){
 206         checkArgs(arguments, 3);
 207         return (function(){
 208             return (function(){
 209                 var x1 = v13;
 210                 if (typeof x1 !== 'number') throw 'Not a number!';
 211                 var x2 = v14;
 212                 if (typeof x2 !== 'number') throw 'Not a number!';
 213                 return x1/x2;
 214             })();
 215         })();
 216     }));
 217     return l22;
 218 })();
 219 var l23 = {name: "1+"};
 220 (function(){
 221     (l23).fvalue = (function(v17){
 222         ((v17)["fname"] = "1+");
 223         return v17;
 224     })((function (values,v16){
 225         checkArgs(arguments, 2);
 226         return (function(){
 227             return (function(){
 228                 var x1 = v16;
 229                 if (typeof x1 !== 'number') throw 'Not a number!';
 230                 return x1+1;
 231             })();
 232         })();
 233     }));
 234     return l23;
 235 })();
 236 var l24 = {name: "1-"};
 237 (function(){
 238     (l24).fvalue = (function(v19){
 239         ((v19)["fname"] = "1-");
 240         return v19;
 241     })((function (values,v18){
 242         checkArgs(arguments, 2);
 243         return (function(){
 244             return (function(){
 245                 var x1 = v18;
 246                 if (typeof x1 !== 'number') throw 'Not a number!';
 247                 return x1-1;
 248             })();
 249         })();
 250     }));
 251     return l24;
 252 })();
 253 var l25 = {name: "ZEROP"};
 254 (function(){
 255     (l25).fvalue = (function(v21){
 256         ((v21)["fname"] = "ZEROP");
 257         return v21;
 258     })((function (values,v20){
 259         checkArgs(arguments, 2);
 260         return (function(){
 261             return (function(){
 262                 var x1 = v20;
 263                 if (typeof x1 !== 'number') throw 'Not a number!';
 264                 return (x1==0?l4.value: l5.value);
 265             })();
 266         })();
 267     }));
 268     return l25;
 269 })();
 270 var l26 = {name: "TRUNCATE"};
 271 (function(){
 272     (l26).fvalue = (function(v24){
 273         ((v24)["fname"] = "TRUNCATE");
 274         return v24;
 275     })((function (values,v22,v23){
 276         checkArgs(arguments, 3);
 277         return (function(){
 278             return (function(){
 279                 var x = (function(){
 280                     var x1 = v22;
 281                     if (typeof x1 !== 'number') throw 'Not a number!';
 282                     var x2 = v23;
 283                     if (typeof x2 !== 'number') throw 'Not a number!';
 284                     return x1/x2;
 285                 })();
 286                 if (typeof x != 'number')
 287                     throw 'The value ' + x + ' is not a type number.';
 288                 return Math.floor(x);
 289             })();
 290         })();
 291     }));
 292     return l26;
 293 })();
 294 var l27 = {name: "EQL"};
 295 (function(){
 296     (l27).fvalue = (function(v27){
 297         ((v27)["fname"] = "EQL");
 298         return v27;
 299     })((function (values,v25,v26){
 300         checkArgs(arguments, 3);
 301         return (function(){
 302             return ((v25 === v26)?l4.value: l5.value);
 303         })();
 304     }));
 305     return l27;
 306 })();
 307 var l28 = {name: "NOT"};
 308 (function(){
 309     (l28).fvalue = (function(v29){
 310         ((v29)["fname"] = "NOT");
 311         return v29;
 312     })((function (values,v28){
 313         checkArgs(arguments, 2);
 314         return (function(){
 315             return (v28 !== l5.value ? l5.value : l4.value);
 316         })();
 317     }));
 318     return l28;
 319 })();
 320 var l29 = {name: "CONS"};
 321 (function(){
 322     (l29).fvalue = (function(v32){
 323         ((v32)["fname"] = "CONS");
 324         return v32;
 325     })((function (values,v30,v31){
 326         checkArgs(arguments, 3);
 327         return (function(){
 328             return ({car: v30, cdr: v31});
 329         })();
 330     }));
 331     return l29;
 332 })();
 333 var l30 = {name: "CONSP"};
 334 (function(){
 335     (l30).fvalue = (function(v34){
 336         ((v34)["fname"] = "CONSP");
 337         return v34;
 338     })((function (values,v33){
 339         checkArgs(arguments, 2);
 340         return (function(){
 341             return ((function(){
 342                 var tmp = v33;
 343                 return (typeof tmp == 'object' && 'car' in tmp);
 344             })()?l4.value: l5.value);
 345         })();
 346     }));
 347     return l30;
 348 })();
 349 var l31 = {name: "CAR"};
 350 (function(){
 351     (l31).fvalue = (function(v36){
 352         ((v36)["fname"] = "CAR");
 353         return v36;
 354     })((function(){
 355         var func = (function (values,v35){
 356             checkArgs(arguments, 2);
 357             return (function(){
 358                 return (function(){
 359                     var tmp = v35;
 360                     return tmp === l5.value? l5.value: tmp.car;
 361                 })();
 362             })();
 363         });
 364         func.docstring = 'Return the CAR part of a cons, or NIL if X is null.';
 365         return func;
 366     })());
 367     return l31;
 368 })();
 369 var l32 = {name: "CDR"};
 370 (function(){
 371     (l32).fvalue = (function(v38){
 372         ((v38)["fname"] = "CDR");
 373         return v38;
 374     })((function (values,v37){
 375         checkArgs(arguments, 2);
 376         return (function(){
 377             return (function(){
 378                 var tmp = v37;
 379                 return tmp === l5.value? l5.value: tmp.cdr;
 380             })();
 381         })();
 382     }));
 383     return l32;
 384 })();
 385 var l33 = {name: "CAAR"};
 386 (function(){
 387     (l33).fvalue = (function(v40){
 388         ((v40)["fname"] = "CAAR");
 389         return v40;
 390     })((function (values,v39){
 391         checkArgs(arguments, 2);
 392         return (function(){
 393             return (function(){
 394                 var tmp = (function(){
 395                     var tmp = v39;
 396                     return tmp === l5.value? l5.value: tmp.car;
 397                 })();
 398                 return tmp === l5.value? l5.value: tmp.car;
 399             })();
 400         })();
 401     }));
 402     return l33;
 403 })();
 404 var l34 = {name: "CADR"};
 405 (function(){
 406     (l34).fvalue = (function(v42){
 407         ((v42)["fname"] = "CADR");
 408         return v42;
 409     })((function (values,v41){
 410         checkArgs(arguments, 2);
 411         return (function(){
 412             return (function(){
 413                 var tmp = (function(){
 414                     var tmp = v41;
 415                     return tmp === l5.value? l5.value: tmp.cdr;
 416                 })();
 417                 return tmp === l5.value? l5.value: tmp.car;
 418             })();
 419         })();
 420     }));
 421     return l34;
 422 })();
 423 var l35 = {name: "CDAR"};
 424 (function(){
 425     (l35).fvalue = (function(v44){
 426         ((v44)["fname"] = "CDAR");
 427         return v44;
 428     })((function (values,v43){
 429         checkArgs(arguments, 2);
 430         return (function(){
 431             return (function(){
 432                 var tmp = (function(){
 433                     var tmp = v43;
 434                     return tmp === l5.value? l5.value: tmp.car;
 435                 })();
 436                 return tmp === l5.value? l5.value: tmp.cdr;
 437             })();
 438         })();
 439     }));
 440     return l35;
 441 })();
 442 var l36 = {name: "CDDR"};
 443 (function(){
 444     (l36).fvalue = (function(v46){
 445         ((v46)["fname"] = "CDDR");
 446         return v46;
 447     })((function (values,v45){
 448         checkArgs(arguments, 2);
 449         return (function(){
 450             return (function(){
 451                 var tmp = (function(){
 452                     var tmp = v45;
 453                     return tmp === l5.value? l5.value: tmp.cdr;
 454                 })();
 455                 return tmp === l5.value? l5.value: tmp.cdr;
 456             })();
 457         })();
 458     }));
 459     return l36;
 460 })();
 461 var l37 = {name: "CADDR"};
 462 (function(){
 463     (l37).fvalue = (function(v48){
 464         ((v48)["fname"] = "CADDR");
 465         return v48;
 466     })((function (values,v47){
 467         checkArgs(arguments, 2);
 468         return (function(){
 469             return (function(){
 470                 var tmp = (function(){
 471                     var tmp = (function(){
 472                         var tmp = v47;
 473                         return tmp === l5.value? l5.value: tmp.cdr;
 474                     })();
 475                     return tmp === l5.value? l5.value: tmp.cdr;
 476                 })();
 477                 return tmp === l5.value? l5.value: tmp.car;
 478             })();
 479         })();
 480     }));
 481     return l37;
 482 })();
 483 var l38 = {name: "CDDDR"};
 484 (function(){
 485     (l38).fvalue = (function(v50){
 486         ((v50)["fname"] = "CDDDR");
 487         return v50;
 488     })((function (values,v49){
 489         checkArgs(arguments, 2);
 490         return (function(){
 491             return (function(){
 492                 var tmp = (function(){
 493                     var tmp = (function(){
 494                         var tmp = v49;
 495                         return tmp === l5.value? l5.value: tmp.cdr;
 496                     })();
 497                     return tmp === l5.value? l5.value: tmp.cdr;
 498                 })();
 499                 return tmp === l5.value? l5.value: tmp.cdr;
 500             })();
 501         })();
 502     }));
 503     return l38;
 504 })();
 505 var l39 = {name: "CADDDR"};
 506 (function(){
 507     (l39).fvalue = (function(v52){
 508         ((v52)["fname"] = "CADDDR");
 509         return v52;
 510     })((function (values,v51){
 511         checkArgs(arguments, 2);
 512         return (function(){
 513             return (function(){
 514                 var tmp = (function(){
 515                     var tmp = (function(){
 516                         var tmp = (function(){
 517                             var tmp = v51;
 518                             return tmp === l5.value? l5.value: tmp.cdr;
 519                         })();
 520                         return tmp === l5.value? l5.value: tmp.cdr;
 521                     })();
 522                     return tmp === l5.value? l5.value: tmp.cdr;
 523                 })();
 524                 return tmp === l5.value? l5.value: tmp.car;
 525             })();
 526         })();
 527     }));
 528     return l39;
 529 })();
 530 var l40 = {name: "FIRST"};
 531 (function(){
 532     (l40).fvalue = (function(v54){
 533         ((v54)["fname"] = "FIRST");
 534         return v54;
 535     })((function (values,v53){
 536         checkArgs(arguments, 2);
 537         return (function(){
 538             return (function(){
 539                 var tmp = v53;
 540                 return tmp === l5.value? l5.value: tmp.car;
 541             })();
 542         })();
 543     }));
 544     return l40;
 545 })();
 546 var l41 = {name: "SECOND"};
 547 (function(){
 548     (l41).fvalue = (function(v56){
 549         ((v56)["fname"] = "SECOND");
 550         return v56;
 551     })((function (values,v55){
 552         checkArgs(arguments, 2);
 553         return (function(){
 554             return l34.fvalue(values, v55);
 555         })();
 556     }));
 557     return l41;
 558 })();
 559 var l42 = {name: "THIRD"};
 560 (function(){
 561     (l42).fvalue = (function(v58){
 562         ((v58)["fname"] = "THIRD");
 563         return v58;
 564     })((function (values,v57){
 565         checkArgs(arguments, 2);
 566         return (function(){
 567             return l37.fvalue(values, v57);
 568         })();
 569     }));
 570     return l42;
 571 })();
 572 var l43 = {name: "FOURTH"};
 573 (function(){
 574     (l43).fvalue = (function(v60){
 575         ((v60)["fname"] = "FOURTH");
 576         return v60;
 577     })((function (values,v59){
 578         checkArgs(arguments, 2);
 579         return (function(){
 580             return l39.fvalue(values, v59);
 581         })();
 582     }));
 583     return l43;
 584 })();
 585 var l44 = {name: "REST"};
 586 (function(){
 587     (l44).fvalue = (function(v62){
 588         ((v62)["fname"] = "REST");
 589         return v62;
 590     })((function (values,v61){
 591         checkArgs(arguments, 2);
 592         return (function(){
 593             return (function(){
 594                 var tmp = v61;
 595                 return tmp === l5.value? l5.value: tmp.cdr;
 596             })();
 597         })();
 598     }));
 599     return l44;
 600 })();
 601 var l45 = {name: "LIST"};
 602 (function(){
 603     (l45).fvalue = (function(v64){
 604         ((v64)["fname"] = "LIST");
 605         return v64;
 606     })((function (values){
 607         var v63= l5.value;
 608         for (var i = arguments.length-1; i>=1; i--)
 609             v63 = {car: arguments[i], cdr:
 610         v63};
 611         return (function(){
 612             return v63;
 613         })();
 614     }));
 615     return l45;
 616 })();
 617 var l46 = {name: "ATOM"};
 618 (function(){
 619     (l46).fvalue = (function(v66){
 620         ((v66)["fname"] = "ATOM");
 621         return v66;
 622     })((function (values,v65){
 623         checkArgs(arguments, 2);
 624         return (function(){
 625             return l28.fvalue(values, ((function(){
 626                 var tmp = v65;
 627                 return (typeof tmp == 'object' && 'car' in tmp);
 628             })()?l4.value: l5.value));
 629         })();
 630     }));
 631     return l46;
 632 })();
 633 var l47 = {name: "INCF"};
 634 l47;
 635 var l48 = {name: "DECF"};
 636 l48;
 637 var l49 = {name: "PUSH"};
 638 l49;
 639 var l50 = {name: "DOLIST"};
 640 l50;
 641 var l51 = {name: "DOTIMES"};
 642 l51;
 643 var l52 = {name: "COND"};
 644 l52;
 645 var l53 = {name: "CASE"};
 646 l53;
 647 var l54 = {name: "ECASE"};
 648 l54;
 649 var l55 = {name: "AND"};
 650 l55;
 651 var l56 = {name: "OR"};
 652 l56;
 653 var l57 = {name: "PROG1"};
 654 l57;
 655 var l58 = {name: "PROG2"};
 656 l58;
 657 var l59 = {name: "ENSURE-LIST"};
 658 var l60 = {name: "LISTP"};
 659 (function(){
 660     (l59).fvalue = (function(v68){
 661         ((v68)["fname"] = "ENSURE-LIST");
 662         return v68;
 663     })((function (values,v67){
 664         checkArgs(arguments, 2);
 665         return (function(){
 666             return (l60.fvalue(pv, v67) !== l5.value ? v67 : l45.fvalue(values, v67));
 667         })();
 668     }));
 669     return l59;
 670 })();
 671 var l61 = {name: "!REDUCE"};
 672 (function(){
 673     (l61).fvalue = (function(v72){
 674         ((v72)["fname"] = "!REDUCE");
 675         return v72;
 676     })((function (values,v69,v70,v71){
 677         checkArgs(arguments, 4);
 678         return (function(){
 679             return (l13.fvalue(pv, v70) !== l5.value ? v71 : l61.fvalue(values, v69, (function(){
 680                 var tmp = v70;
 681                 return tmp === l5.value? l5.value: tmp.cdr;
 682             })(), (v69)(pv, v71, (function(){
 683                 var tmp = v70;
 684                 return tmp === l5.value? l5.value: tmp.car;
 685             })())));
 686         })();
 687     }));
 688     return l61;
 689 })();
 690 var l62 = {name: "+"};
 691 (function(){
 692     (l62).fvalue = (function(v77){
 693         ((v77)["fname"] = "+");
 694         return v77;
 695     })((function (values){
 696         var v73= l5.value;
 697         for (var i = arguments.length-1; i>=1; i--)
 698             v73 = {car: arguments[i], cdr:
 699         v73};
 700         return (function(){
 701             return (function(v74){
 702                 return (function(){
 703                     return (function(v75,v76){
 704                         (function(){
 705                             while(v75 !== l5.value){
 706                                 (v76 = (function(){
 707                                     var tmp = v75;
 708                                     return tmp === l5.value? l5.value: tmp.car;
 709                                 })());
 710                                 (function(){
 711                                     (v74 = (function(){
 712                                         var x1 = v74;
 713                                         if (typeof x1 !== 'number') throw 'Not a number!';
 714                                         var x2 = v76;
 715                                         if (typeof x2 !== 'number') throw 'Not a number!';
 716                                         return x1+x2;
 717                                     })());
 718                                     return l5.value;
 719                                 })();
 720                                 (v75 = (function(){
 721                                     var tmp = v75;
 722                                     return tmp === l5.value? l5.value: tmp.cdr;
 723                                 })());
 724                             }return l5.value;
 725                         })();
 726                         return v74;
 727                     })(v73,l5.value);
 728                 })();
 729             })(0);
 730         })();
 731     }));
 732     return l62;
 733 })();
 734 var l63 = {name: "-"};
 735 (function(){
 736     (l63).fvalue = (function(v83){
 737         ((v83)["fname"] = "-");
 738         return v83;
 739     })((function (values,v79){
 740         checkArgsAtLeast(arguments, 2);
 741         var v78= l5.value;
 742         for (var i = arguments.length-1; i>=2; i--)
 743             v78 = {car: arguments[i], cdr:
 744         v78};
 745         return (function(){
 746             return (l13.fvalue(pv, v78) !== l5.value ? (function(){
 747                 var x1 = v79;
 748                 if (typeof x1 !== 'number') throw 'Not a number!';
 749                 return -x1;
 750             })() : (function(v80){
 751                 return (function(){
 752                     return (function(v81,v82){
 753                         (function(){
 754                             while(v81 !== l5.value){
 755                                 (v82 = (function(){
 756                                     var tmp = v81;
 757                                     return tmp === l5.value? l5.value: tmp.car;
 758                                 })());
 759                                 (function(){
 760                                     (v80 = (function(){
 761                                         var x1 = v80;
 762                                         if (typeof x1 !== 'number') throw 'Not a number!';
 763                                         var x2 = v82;
 764                                         if (typeof x2 !== 'number') throw 'Not a number!';
 765                                         return x1-x2;
 766                                     })());
 767                                     return l5.value;
 768                                 })();
 769                                 (v81 = (function(){
 770                                     var tmp = v81;
 771                                     return tmp === l5.value? l5.value: tmp.cdr;
 772                                 })());
 773                             }return l5.value;
 774                         })();
 775                         return v80;
 776                     })(v78,l5.value);
 777                 })();
 778             })(v79));
 779         })();
 780     }));
 781     return l63;
 782 })();
 783 var l64 = {name: "APPEND-TWO"};
 784 var l65 = {name: "APPEND"};
 785 (function(){
 786     (l64).fvalue = (function(v86){
 787         ((v86)["fname"] = "APPEND-TWO");
 788         return v86;
 789     })((function (values,v84,v85){
 790         checkArgs(arguments, 3);
 791         return (function(){
 792             return (l13.fvalue(pv, v84) !== l5.value ? v85 : ({car: (function(){
 793                 var tmp = v84;
 794                 return tmp === l5.value? l5.value: tmp.car;
 795             })(), cdr: l65.fvalue(pv, (function(){
 796                 var tmp = v84;
 797                 return tmp === l5.value? l5.value: tmp.cdr;
 798             })(), v85)}));
 799         })();
 800     }));
 801     return l64;
 802 })();
 803 (function(){
 804     (l65).fvalue = (function(v88){
 805         ((v88)["fname"] = "APPEND");
 806         return v88;
 807     })((function (values){
 808         var v87= l5.value;
 809         for (var i = arguments.length-1; i>=1; i--)
 810             v87 = {car: arguments[i], cdr:
 811         v87};
 812         return (function(){
 813             return l61.fvalue(values, (function(){
 814                 var symbol = l64;
 815                 var func = symbol.fvalue;
 816                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
 817                 return func;
 818             })(), v87, l5);
 819         })();
 820     }));
 821     return l65;
 822 })();
 823 var l66 = {name: "REVAPPEND"};
 824 (function(){
 825     (l66).fvalue = (function(v91){
 826         ((v91)["fname"] = "REVAPPEND");
 827         return v91;
 828     })((function (values,v89,v90){
 829         checkArgs(arguments, 3);
 830         return (function(){
 831             (function(){
 832                 return (function(){
 833                     while(v89 !== l5.value){
 834                         (v90 = ({car: (function(){
 835                             var tmp = v89;
 836                             return tmp === l5.value? l5.value: tmp.car;
 837                         })(), cdr: v90}));
 838                         (v89 = (function(){
 839                             var tmp = v89;
 840                             return tmp === l5.value? l5.value: tmp.cdr;
 841                         })());
 842                     }return l5.value;
 843                 })();
 844             })();
 845             return v90;
 846         })();
 847     }));
 848     return l66;
 849 })();
 850 var l67 = {name: "REVERSE"};
 851 (function(){
 852     (l67).fvalue = (function(v93){
 853         ((v93)["fname"] = "REVERSE");
 854         return v93;
 855     })((function (values,v92){
 856         checkArgs(arguments, 2);
 857         return (function(){
 858             return l66.fvalue(values, v92, l5);
 859         })();
 860     }));
 861     return l67;
 862 })();
 863 var l68 = {name: "PSETQ"};
 864 l68;
 865 var l69 = {name: "DO"};
 866 l69;
 867 var l70 = {name: "DO*"};
 868 l70;
 869 var l71 = {name: "LIST-LENGTH"};
 870 (function(){
 871     (l71).fvalue = (function(v96){
 872         ((v96)["fname"] = "LIST-LENGTH");
 873         return v96;
 874     })((function (values,v94){
 875         checkArgs(arguments, 2);
 876         return (function(){
 877             return (function(v95){
 878                 (function(){
 879                     return (function(){
 880                         while(l28.fvalue(pv, l13.fvalue(pv, v94)) !== l5.value){
 881                             (v95 = (function(){
 882                                 var x1 = v95;
 883                                 if (typeof x1 !== 'number') throw 'Not a number!';
 884                                 return x1+1;
 885                             })());
 886                             (v94 = (function(){
 887                                 var tmp = v94;
 888                                 return tmp === l5.value? l5.value: tmp.cdr;
 889                             })());
 890                         }return l5.value;
 891                     })();
 892                 })();
 893                 return v95;
 894             })(0);
 895         })();
 896     }));
 897     return l71;
 898 })();
 899 var l72 = {name: "LENGTH"};
 900 (function(){
 901     (l72).fvalue = (function(v98){
 902         ((v98)["fname"] = "LENGTH");
 903         return v98;
 904     })((function (values,v97){
 905         checkArgs(arguments, 2);
 906         return (function(){
 907             return (((typeof(v97) == "string")?l4.value: l5.value) !== l5.value ? (function(){
 908                 var x = v97;
 909                 if (typeof x != 'string')
 910                     throw 'The value ' + x + ' is not a type string.';
 911                 return x.length;
 912             })() : (((function(){
 913                 var x = v97;
 914                 return typeof x === 'object' && 'length' in x;
 915             })()?l4.value: l5.value) !== l5.value ? (function(){
 916                 var tmp = (v97)["length"];
 917                 return tmp == undefined? l5.value: tmp ;
 918             })() : (l60.fvalue(pv, v97) !== l5.value ? l71.fvalue(values, v97) : l5.value)));
 919         })();
 920     }));
 921     return l72;
 922 })();
 923 var l73 = {name: "CONCAT-TWO"};
 924 (function(){
 925     (l73).fvalue = (function(v101){
 926         ((v101)["fname"] = "CONCAT-TWO");
 927         return v101;
 928     })((function (values,v99,v100){
 929         checkArgs(arguments, 3);
 930         return (function(){
 931             return (function(){
 932                 var string1 = v99;
 933                 var string2 = v100;
 934                 if (typeof string1 != 'string')
 935                     throw 'The value ' + string1 + ' is not a type string.';
 936                 if (typeof string2 != 'string')
 937                     throw 'The value ' + string2 + ' is not a type string.';
 938                 return string1.concat(string2);
 939             })();
 940         })();
 941     }));
 942     return l73;
 943 })();
 944 var l74 = {name: "WITH-COLLECT"};
 945 l74;
 946 var l75 = {name: "MAP1"};
 947 var l76 = {name: "SENTINEL"};
 948 (function(){
 949     (l75).fvalue = (function(v108){
 950         ((v108)["fname"] = "MAP1");
 951         return v108;
 952     })((function (values,v102,v103){
 953         checkArgs(arguments, 3);
 954         return (function(){
 955             return (function(){
 956                 var v104 = ({car: l76, cdr: l5.value});
 957                 var v105 = v104;
 958                 (function(v107){
 959                     return (function(){
 960                         return (function(){
 961                             while(v103 !== l5.value){
 962                                 v107(pv, (v102)(pv, (function(){
 963                                     var tmp = v103;
 964                                     return tmp === l5.value? l5.value: tmp.car;
 965                                 })()));
 966                                 (v103 = (function(){
 967                                     var tmp = v103;
 968                                     return tmp === l5.value? l5.value: tmp.cdr;
 969                                 })());
 970                             }return l5.value;
 971                         })();
 972                     })();
 973                 })((function (values,v106){
 974                     checkArgs(arguments, 2);
 975                     (function(){
 976                         var x = v105;
 977                         if (typeof x != 'object')
 978                             throw 'The value ' + x + ' is not a type object.';
 979                         return (x.cdr = ({car: v106, cdr: l5.value}), x);
 980                     })();
 981                     (v105 = (function(){
 982                         var tmp = v105;
 983                         return tmp === l5.value? l5.value: tmp.cdr;
 984                     })());
 985                     return v106;
 986                 }));
 987                 return (function(){
 988                     var tmp = v104;
 989                     return tmp === l5.value? l5.value: tmp.cdr;
 990                 })();
 991             })();
 992         })();
 993     }));
 994     return l75;
 995 })();
 996 var l77 = {name: "LOOP"};
 997 l77;
 998 var l78 = {name: "MAPCAR"};
 999 (function(){
1000     (l78).fvalue = (function(v120){
1001         ((v120)["fname"] = "MAPCAR");
1002         return v120;
1003     })((function (values,v110,v111){
1004         checkArgsAtLeast(arguments, 3);
1005         var v109= l5.value;
1006         for (var i = arguments.length-1; i>=3; i--)
1007             v109 = {car: arguments[i], cdr:
1008         v109};
1009         return (function(){
1010             return (function(v112){
1011                 return (function(){
1012                     var v113 = ({car: l76, cdr: l5.value});
1013                     var v114 = v113;
1014                     (function(v116){
1015                         return (function(){
1016                             try {
1017                                 return (function(){
1018                                     return (function(){
1019                                         while(l4.value !== l5.value){
1020                                             (function(v117){
1021                                                 (function(){
1022                                                     return (function(v118){
1023                                                         return (function(){
1024                                                             try {
1025                                                                 return (function(){
1026                                                                     while(l4.value !== l5.value){
1027                                                                         (l13.fvalue(pv, v118) !== l5.value ? (function(){
1028                                                                             throw ({type: 'block', id: 52, values: l5.value, message: 'Return from unknown block NIL.'})
1029                                                                         })() : l5.value);
1030                                                                         (function(){
1031                                                                             (l13.fvalue(pv, (function(){
1032                                                                                 var tmp = v118;
1033                                                                                 return tmp === l5.value? l5.value: tmp.car;
1034                                                                             })()) !== l5.value ? (function(){
1035                                                                                 throw ({type: 'block', id: 49, values: l5.value, message: 'Return from unknown block LOOP.'})
1036                                                                             })() : l5.value);
1037                                                                             (function(){
1038                                                                                 var x = v118;
1039                                                                                 if (typeof x != 'object')
1040                                                                                     throw 'The value ' + x + ' is not a type object.';
1041                                                                                 return (x.car = l35.fvalue(pv, v118), x);
1042                                                                             })();
1043                                                                             return l5.value;
1044                                                                         })();
1045                                                                         (function(v119){
1046                                                                             return (v118 = v119);
1047                                                                         })((function(){
1048                                                                             var tmp = v118;
1049                                                                             return tmp === l5.value? l5.value: tmp.cdr;
1050                                                                         })());
1051                                                                     }return l5.value;
1052                                                                 })();
1053                                                             }
1054                                                             catch (cf){
1055                                                                 if (cf.type == 'block' && cf.id == 52)
1056                                                                     return cf.values;
1057                                                                 else
1058                                                                     throw cf;
1059                                                             }
1060                                                         })();
1061                                                     })(v112);
1062                                                 })();
1063                                                 return v116(pv, (function(){
1064                                                     var f = v110;
1065                                                     var args = [pv];
1066                                                     var tail = (v117);
1067                                                     while (tail != l5.value){
1068                                                         args.push(tail.car);
1069                                                         tail = tail.cdr;
1070                                                     }
1071                                                     return f.apply(this, args);
1072                                                 })());
1073                                             })(l75.fvalue(pv, (function(){
1074                                                 var symbol = l31;
1075                                                 var func = symbol.fvalue;
1076                                                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1077                                                 return func;
1078                                             })(), v112));
1079                                         }return l5.value;
1080                                     })();
1081                                 })();
1082                             }
1083                             catch (cf){
1084                                 if (cf.type == 'block' && cf.id == 49)
1085                                     return cf.values;
1086                                 else
1087                                     throw cf;
1088                             }
1089                         })();
1090                     })((function (values,v115){
1091                         checkArgs(arguments, 2);
1092                         (function(){
1093                             var x = v114;
1094                             if (typeof x != 'object')
1095                                 throw 'The value ' + x + ' is not a type object.';
1096                             return (x.cdr = ({car: v115, cdr: l5.value}), x);
1097                         })();
1098                         (v114 = (function(){
1099                             var tmp = v114;
1100                             return tmp === l5.value? l5.value: tmp.cdr;
1101                         })());
1102                         return v115;
1103                     }));
1104                     return (function(){
1105                         var tmp = v113;
1106                         return tmp === l5.value? l5.value: tmp.cdr;
1107                     })();
1108                 })();
1109             })(({car: v111, cdr: v109}));
1110         })();
1111     }));
1112     return l78;
1113 })();
1114 var l79 = {name: "IDENTITY"};
1115 (function(){
1116     (l79).fvalue = (function(v122){
1117         ((v122)["fname"] = "IDENTITY");
1118         return v122;
1119     })((function (values,v121){
1120         checkArgs(arguments, 2);
1121         return (function(){
1122             return v121;
1123         })();
1124     }));
1125     return l79;
1126 })();
1127 var l80 = {name: "CONSTANTLY"};
1128 (function(){
1129     (l80).fvalue = (function(v125){
1130         ((v125)["fname"] = "CONSTANTLY");
1131         return v125;
1132     })((function (values,v123){
1133         checkArgs(arguments, 2);
1134         return (function(){
1135             return (function (values){
1136                 var v124= l5.value;
1137                 for (var i = arguments.length-1; i>=1; i--)
1138                     v124 = {car: arguments[i], cdr:
1139                 v124};
1140                 return v123;
1141             });
1142         })();
1143     }));
1144     return l80;
1145 })();
1146 var l81 = {name: "COPY-LIST"};
1147 (function(){
1148     (l81).fvalue = (function(v127){
1149         ((v127)["fname"] = "COPY-LIST");
1150         return v127;
1151     })((function (values,v126){
1152         checkArgs(arguments, 2);
1153         return (function(){
1154             return l78.fvalue(values, (function(){
1155                 var symbol = l79;
1156                 var func = symbol.fvalue;
1157                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1158                 return func;
1159             })(), v126);
1160         })();
1161     }));
1162     return l81;
1163 })();
1164 var l82 = {name: "CODE-CHAR"};
1165 (function(){
1166     (l82).fvalue = (function(v129){
1167         ((v129)["fname"] = "CODE-CHAR");
1168         return v129;
1169     })((function (values,v128){
1170         checkArgs(arguments, 2);
1171         return (function(){
1172             return v128;
1173         })();
1174     }));
1175     return l82;
1176 })();
1177 var l83 = {name: "CHAR-CODE"};
1178 (function(){
1179     (l83).fvalue = (function(v131){
1180         ((v131)["fname"] = "CHAR-CODE");
1181         return v131;
1182     })((function (values,v130){
1183         checkArgs(arguments, 2);
1184         return (function(){
1185             return v130;
1186         })();
1187     }));
1188     return l83;
1189 })();
1190 var l84 = {name: "CHAR="};
1191 (function(){
1192     (l84).fvalue = (function(v134){
1193         ((v134)["fname"] = "CHAR=");
1194         return v134;
1195     })((function (values,v132,v133){
1196         checkArgs(arguments, 3);
1197         return (function(){
1198             return (function(){
1199                 var x1 = v132;
1200                 if (typeof x1 !== 'number') throw 'Not a number!';
1201                 var x2 = v133;
1202                 if (typeof x2 !== 'number') throw 'Not a number!';
1203                 return (x1==x2?l4.value: l5.value);
1204             })();
1205         })();
1206     }));
1207     return l84;
1208 })();
1209 var l85 = {name: "INTEGERP"};
1210 (function(){
1211     (l85).fvalue = (function(v136){
1212         ((v136)["fname"] = "INTEGERP");
1213         return v136;
1214     })((function (values,v135){
1215         checkArgs(arguments, 2);
1216         return (function(){
1217             return (((typeof (v135) == "number")?l4.value: l5.value) !== l5.value ? (function(){
1218                 var x1 = (function(){
1219                     var x = v135;
1220                     if (typeof x != 'number')
1221                         throw 'The value ' + x + ' is not a type number.';
1222                     return Math.floor(x);
1223                 })();
1224                 if (typeof x1 !== 'number') throw 'Not a number!';
1225                 var x2 = v135;
1226                 if (typeof x2 !== 'number') throw 'Not a number!';
1227                 return (x1==x2?l4.value: l5.value);
1228             })() : l5.value);
1229         })();
1230     }));
1231     return l85;
1232 })();
1233 var l86 = {name: "PLUSP"};
1234 (function(){
1235     (l86).fvalue = (function(v138){
1236         ((v138)["fname"] = "PLUSP");
1237         return v138;
1238     })((function (values,v137){
1239         checkArgs(arguments, 2);
1240         return (function(){
1241             return (function(){
1242                 var x1 = v137;
1243                 if (typeof x1 !== 'number') throw 'Not a number!';
1244                 return (0<x1?l4.value: l5.value);
1245             })();
1246         })();
1247     }));
1248     return l86;
1249 })();
1250 var l87 = {name: "MINUSP"};
1251 (function(){
1252     (l87).fvalue = (function(v140){
1253         ((v140)["fname"] = "MINUSP");
1254         return v140;
1255     })((function (values,v139){
1256         checkArgs(arguments, 2);
1257         return (function(){
1258             return (function(){
1259                 var x1 = v139;
1260                 if (typeof x1 !== 'number') throw 'Not a number!';
1261                 return (x1<0?l4.value: l5.value);
1262             })();
1263         })();
1264     }));
1265     return l87;
1266 })();
1267 (function(){
1268     (l60).fvalue = (function(v143){
1269         ((v143)["fname"] = "LISTP");
1270         return v143;
1271     })((function (values,v141){
1272         checkArgs(arguments, 2);
1273         return (function(){
1274             return (function(v142){
1275                 return (v142 !== l5.value ? v142 : l13.fvalue(values, v141));
1276             })(((function(){
1277                 var tmp = v141;
1278                 return (typeof tmp == 'object' && 'car' in tmp);
1279             })()?l4.value: l5.value));
1280         })();
1281     }));
1282     return l60;
1283 })();
1284 var l88 = {name: "NTHCDR"};
1285 (function(){
1286     (l88).fvalue = (function(v146){
1287         ((v146)["fname"] = "NTHCDR");
1288         return v146;
1289     })((function (values,v144,v145){
1290         checkArgs(arguments, 3);
1291         return (function(){
1292             (function(){
1293                 return (function(){
1294                     while((l86.fvalue(pv, v144) !== l5.value ? v145 : l5.value) !== l5.value){
1295                         (v144 = l24.fvalue(pv, v144));
1296                         (v145 = (function(){
1297                             var tmp = v145;
1298                             return tmp === l5.value? l5.value: tmp.cdr;
1299                         })());
1300                     }return l5.value;
1301                 })();
1302             })();
1303             return v145;
1304         })();
1305     }));
1306     return l88;
1307 })();
1308 var l89 = {name: "NTH"};
1309 (function(){
1310     (l89).fvalue = (function(v149){
1311         ((v149)["fname"] = "NTH");
1312         return v149;
1313     })((function (values,v147,v148){
1314         checkArgs(arguments, 3);
1315         return (function(){
1316             return (function(){
1317                 var tmp = l88.fvalue(pv, v147, v148);
1318                 return tmp === l5.value? l5.value: tmp.car;
1319             })();
1320         })();
1321     }));
1322     return l89;
1323 })();
1324 var l90 = {name: "LAST"};
1325 (function(){
1326     (l90).fvalue = (function(v151){
1327         ((v151)["fname"] = "LAST");
1328         return v151;
1329     })((function (values,v150){
1330         checkArgs(arguments, 2);
1331         return (function(){
1332             (function(){
1333                 return (function(){
1334                     while(((function(){
1335                         var tmp = (function(){
1336                             var tmp = v150;
1337                             return tmp === l5.value? l5.value: tmp.cdr;
1338                         })();
1339                         return (typeof tmp == 'object' && 'car' in tmp);
1340                     })()?l4.value: l5.value) !== l5.value){
1341                         (v150 = (function(){
1342                             var tmp = v150;
1343                             return tmp === l5.value? l5.value: tmp.cdr;
1344                         })());
1345                     }return l5.value;
1346                 })();
1347             })();
1348             return v150;
1349         })();
1350     }));
1351     return l90;
1352 })();
1353 var l91 = {name: "BUTLAST"};
1354 (function(){
1355     (l91).fvalue = (function(v153){
1356         ((v153)["fname"] = "BUTLAST");
1357         return v153;
1358     })((function (values,v152){
1359         checkArgs(arguments, 2);
1360         return (function(){
1361             return (((function(){
1362                 var tmp = (function(){
1363                     var tmp = v152;
1364                     return tmp === l5.value? l5.value: tmp.cdr;
1365                 })();
1366                 return (typeof tmp == 'object' && 'car' in tmp);
1367             })()?l4.value: l5.value) !== l5.value ? ({car: (function(){
1368                 var tmp = v152;
1369                 return tmp === l5.value? l5.value: tmp.car;
1370             })(), cdr: l91.fvalue(pv, (function(){
1371                 var tmp = v152;
1372                 return tmp === l5.value? l5.value: tmp.cdr;
1373             })())}) : l5.value);
1374         })();
1375     }));
1376     return l91;
1377 })();
1378 var l92 = {name: "MEMBER"};
1379 (function(){
1380     (l92).fvalue = (function(v156){
1381         ((v156)["fname"] = "MEMBER");
1382         return v156;
1383     })((function (values,v154,v155){
1384         checkArgs(arguments, 3);
1385         return (function(){
1386             return (function(){
1387                 try {
1388                     return (function(){
1389                         while(v155 !== l5.value){
1390                             (l27.fvalue(pv, v154, (function(){
1391                                 var tmp = v155;
1392                                 return tmp === l5.value? l5.value: tmp.car;
1393                             })()) !== l5.value ? (function(){
1394                                 var values = mv;
1395                                 throw ({type: 'block', id: 70, values: v155, message: 'Return from unknown block NIL.'})
1396                             })() : l5.value);
1397                             (v155 = (function(){
1398                                 var tmp = v155;
1399                                 return tmp === l5.value? l5.value: tmp.cdr;
1400                             })());
1401                         }return l5.value;
1402                     })();
1403                 }
1404                 catch (cf){
1405                     if (cf.type == 'block' && cf.id == 70)
1406                         return values.apply(this, forcemv(cf.values));
1407                     else
1408                         throw cf;
1409                 }
1410             })();
1411         })();
1412     }));
1413     return l92;
1414 })();
1415 var l93 = {name: "REMOVE"};
1416 (function(){
1417     (l93).fvalue = (function(v159){
1418         ((v159)["fname"] = "REMOVE");
1419         return v159;
1420     })((function (values,v157,v158){
1421         checkArgs(arguments, 3);
1422         return (function(){
1423             return (l13.fvalue(pv, v158) !== l5.value ? l5.value : (l27.fvalue(pv, v157, (function(){
1424                 var tmp = v158;
1425                 return tmp === l5.value? l5.value: tmp.car;
1426             })()) !== l5.value ? l93.fvalue(values, v157, (function(){
1427                 var tmp = v158;
1428                 return tmp === l5.value? l5.value: tmp.cdr;
1429             })()) : ({car: (function(){
1430                 var tmp = v158;
1431                 return tmp === l5.value? l5.value: tmp.car;
1432             })(), cdr: l93.fvalue(pv, v157, (function(){
1433                 var tmp = v158;
1434                 return tmp === l5.value? l5.value: tmp.cdr;
1435             })())})));
1436         })();
1437     }));
1438     return l93;
1439 })();
1440 var l94 = {name: "REMOVE-IF"};
1441 (function(){
1442     (l94).fvalue = (function(v162){
1443         ((v162)["fname"] = "REMOVE-IF");
1444         return v162;
1445     })((function (values,v160,v161){
1446         checkArgs(arguments, 3);
1447         return (function(){
1448             return (l13.fvalue(pv, v161) !== l5.value ? l5.value : ((v160)(pv, (function(){
1449                 var tmp = v161;
1450                 return tmp === l5.value? l5.value: tmp.car;
1451             })()) !== l5.value ? l94.fvalue(values, v160, (function(){
1452                 var tmp = v161;
1453                 return tmp === l5.value? l5.value: tmp.cdr;
1454             })()) : ({car: (function(){
1455                 var tmp = v161;
1456                 return tmp === l5.value? l5.value: tmp.car;
1457             })(), cdr: l94.fvalue(pv, v160, (function(){
1458                 var tmp = v161;
1459                 return tmp === l5.value? l5.value: tmp.cdr;
1460             })())})));
1461         })();
1462     }));
1463     return l94;
1464 })();
1465 var l95 = {name: "REMOVE-IF-NOT"};
1466 (function(){
1467     (l95).fvalue = (function(v165){
1468         ((v165)["fname"] = "REMOVE-IF-NOT");
1469         return v165;
1470     })((function (values,v163,v164){
1471         checkArgs(arguments, 3);
1472         return (function(){
1473             return (l13.fvalue(pv, v164) !== l5.value ? l5.value : ((v163)(pv, (function(){
1474                 var tmp = v164;
1475                 return tmp === l5.value? l5.value: tmp.car;
1476             })()) !== l5.value ? ({car: (function(){
1477                 var tmp = v164;
1478                 return tmp === l5.value? l5.value: tmp.car;
1479             })(), cdr: l95.fvalue(pv, v163, (function(){
1480                 var tmp = v164;
1481                 return tmp === l5.value? l5.value: tmp.cdr;
1482             })())}) : l95.fvalue(values, v163, (function(){
1483                 var tmp = v164;
1484                 return tmp === l5.value? l5.value: tmp.cdr;
1485             })())));
1486         })();
1487     }));
1488     return l95;
1489 })();
1490 var l96 = {name: "DIGIT-CHAR-P"};
1491 (function(){
1492     (l96).fvalue = (function(v167){
1493         ((v167)["fname"] = "DIGIT-CHAR-P");
1494         return v167;
1495     })((function (values,v166){
1496         checkArgs(arguments, 2);
1497         return (function(){
1498             return (((function(){
1499                 var x1 = v166;
1500                 if (typeof x1 !== 'number') throw 'Not a number!';
1501                 return (48<=x1?l4.value: l5.value);
1502             })() !== l5.value ? (function(){
1503                 var x1 = v166;
1504                 if (typeof x1 !== 'number') throw 'Not a number!';
1505                 return (x1<=57?l4.value: l5.value);
1506             })() : l5.value) !== l5.value ? (function(){
1507                 var x1 = v166;
1508                 if (typeof x1 !== 'number') throw 'Not a number!';
1509                 return x1-48;
1510             })() : l5.value);
1511         })();
1512     }));
1513     return l96;
1514 })();
1515 var l97 = {name: "DIGIT-CHAR"};
1516 (function(){
1517     (l97).fvalue = (function(v169){
1518         ((v169)["fname"] = "DIGIT-CHAR");
1519         return v169;
1520     })((function (values,v168){
1521         checkArgs(arguments, 2);
1522         return (function(){
1523             return ((function(){
1524                 var x1 = v168;
1525                 if (typeof x1 !== 'number') throw 'Not a number!';
1526                 return (0<=x1 && x1<=9?l4.value: l5.value);
1527             })() !== l5.value ? (function(){
1528                 var string = "0123456789";
1529                 var index = v168;
1530                 if (typeof string != 'string')
1531                     throw 'The value ' + string + ' is not a type string.';
1532                 if (typeof index != 'number')
1533                     throw 'The value ' + index + ' is not a type number.';
1534                 return string.charCodeAt(index);
1535             })() : l5.value);
1536         })();
1537     }));
1538     return l97;
1539 })();
1540 var l98 = {name: "SUBSEQ"};
1541 (function(){
1542     (l98).fvalue = (function(v173){
1543         ((v173)["fname"] = "SUBSEQ");
1544         return v173;
1545     })((function (values,v170,v171,v172){
1546         checkArgsAtLeast(arguments, 3);
1547         checkArgsAtMost(arguments, 4);
1548         switch(arguments.length-1){
1549         case 2:
1550         v172=l5.value;
1551         default: break;
1552         }
1553         return (function(){
1554             return (((typeof(v170) == "string")?l4.value: l5.value) !== l5.value ? (v172 !== l5.value ? (function(){
1555                 var str = v170;
1556                 var a = v171;
1557                 var b;
1558                 b = v172;
1559                 return str.slice(a,b);
1560             })() : (function(){
1561                 var str = v170;
1562                 var a = v171;
1563                 var b;
1564                 return str.slice(a,b);
1565             })()) : (function(){
1566                 throw "Unsupported argument.";
1567             })());
1568         })();
1569     }));
1570     return l98;
1571 })();
1572 var l99 = {name: "SOME"};
1573 (function(){
1574     (l99).fvalue = (function(v180){
1575         ((v180)["fname"] = "SOME");
1576         return v180;
1577     })((function (values,v174,v175){
1578         checkArgs(arguments, 3);
1579         return (function(){
1580             try {
1581                 return (((typeof(v175) == "string")?l4.value: l5.value) !== l5.value ? (function(v176,v177){
1582                     (function(){
1583                         return (function(){
1584                             while((function(){
1585                                 var x1 = v176;
1586                                 if (typeof x1 !== 'number') throw 'Not a number!';
1587                                 var x2 = v177;
1588                                 if (typeof x2 !== 'number') throw 'Not a number!';
1589                                 return (x1<x2?l4.value: l5.value);
1590                             })() !== l5.value){
1591                                 ((v174)(pv, (function(){
1592                                     var string = v175;
1593                                     var index = v176;
1594                                     if (typeof string != 'string')
1595                                         throw 'The value ' + string + ' is not a type string.';
1596                                     if (typeof index != 'number')
1597                                         throw 'The value ' + index + ' is not a type number.';
1598                                     return string.charCodeAt(index);
1599                                 })()) !== l5.value ? (function(){
1600                                     var values = mv;
1601                                     throw ({type: 'block', id: 77, values: l4.value, message: 'Return from unknown block SOME.'})
1602                                 })() : l5.value);
1603                                 (v176 = (function(){
1604                                     var x1 = v176;
1605                                     if (typeof x1 !== 'number') throw 'Not a number!';
1606                                     return x1+1;
1607                                 })());
1608                             }return l5.value;
1609                         })();
1610                     })();
1611                     return l5.value;
1612                 })(0,l72.fvalue(pv, v175)) : (l60.fvalue(pv, v175) !== l5.value ? (function(){
1613                     try {
1614                         return (function(v178,v179){
1615                             (function(){
1616                                 while(v178 !== l5.value){
1617                                     (v179 = (function(){
1618                                         var tmp = v178;
1619                                         return tmp === l5.value? l5.value: tmp.car;
1620                                     })());
1621                                     (function(){
1622                                         ((v174)(pv, v179) !== l5.value ? (function(){
1623                                             var values = mv;
1624                                             throw ({type: 'block', id: 79, values: l4.value, message: 'Return from unknown block NIL.'})
1625                                         })() : l5.value);
1626                                         return l5.value;
1627                                     })();
1628                                     (v178 = (function(){
1629                                         var tmp = v178;
1630                                         return tmp === l5.value? l5.value: tmp.cdr;
1631                                     })());
1632                                 }return l5.value;
1633                             })();
1634                             return l5.value;
1635                         })(v175,l5.value);
1636                     }
1637                     catch (cf){
1638                         if (cf.type == 'block' && cf.id == 79)
1639                             return values.apply(this, forcemv(cf.values));
1640                         else
1641                             throw cf;
1642                     }
1643                 })() : (function(){
1644                     throw "Unknown sequence.";
1645                 })()));
1646             }
1647             catch (cf){
1648                 if (cf.type == 'block' && cf.id == 77)
1649                     return values.apply(this, forcemv(cf.values));
1650                 else
1651                     throw cf;
1652             }
1653         })();
1654     }));
1655     return l99;
1656 })();
1657 var l100 = {name: "EVERY"};
1658 (function(){
1659     (l100).fvalue = (function(v187){
1660         ((v187)["fname"] = "EVERY");
1661         return v187;
1662     })((function (values,v181,v182){
1663         checkArgs(arguments, 3);
1664         return (function(){
1665             try {
1666                 return (((typeof(v182) == "string")?l4.value: l5.value) !== l5.value ? (function(v183,v184){
1667                     (function(){
1668                         return (function(){
1669                             while((function(){
1670                                 var x1 = v183;
1671                                 if (typeof x1 !== 'number') throw 'Not a number!';
1672                                 var x2 = v184;
1673                                 if (typeof x2 !== 'number') throw 'Not a number!';
1674                                 return (x1<x2?l4.value: l5.value);
1675                             })() !== l5.value){
1676                                 ((v181)(pv, (function(){
1677                                     var string = v182;
1678                                     var index = v183;
1679                                     if (typeof string != 'string')
1680                                         throw 'The value ' + string + ' is not a type string.';
1681                                     if (typeof index != 'number')
1682                                         throw 'The value ' + index + ' is not a type number.';
1683                                     return string.charCodeAt(index);
1684                                 })()) !== l5.value ? l5.value : (function(){
1685                                     var values = mv;
1686                                     throw ({type: 'block', id: 80, values: l5.value, message: 'Return from unknown block EVERY.'})
1687                                 })());
1688                                 (v183 = (function(){
1689                                     var x1 = v183;
1690                                     if (typeof x1 !== 'number') throw 'Not a number!';
1691                                     return x1+1;
1692                                 })());
1693                             }return l5.value;
1694                         })();
1695                     })();
1696                     return l4.value;
1697                 })(0,l72.fvalue(pv, v182)) : (l60.fvalue(pv, v182) !== l5.value ? (function(){
1698                     try {
1699                         return (function(v185,v186){
1700                             (function(){
1701                                 while(v185 !== l5.value){
1702                                     (v186 = (function(){
1703                                         var tmp = v185;
1704                                         return tmp === l5.value? l5.value: tmp.car;
1705                                     })());
1706                                     (function(){
1707                                         ((v181)(pv, v186) !== l5.value ? l5.value : (function(){
1708                                             var values = mv;
1709                                             throw ({type: 'block', id: 82, values: l5.value, message: 'Return from unknown block NIL.'})
1710                                         })());
1711                                         return l5.value;
1712                                     })();
1713                                     (v185 = (function(){
1714                                         var tmp = v185;
1715                                         return tmp === l5.value? l5.value: tmp.cdr;
1716                                     })());
1717                                 }return l5.value;
1718                             })();
1719                             return l4.value;
1720                         })(v182,l5.value);
1721                     }
1722                     catch (cf){
1723                         if (cf.type == 'block' && cf.id == 82)
1724                             return values.apply(this, forcemv(cf.values));
1725                         else
1726                             throw cf;
1727                     }
1728                 })() : (function(){
1729                     throw "Unknown sequence.";
1730                 })()));
1731             }
1732             catch (cf){
1733                 if (cf.type == 'block' && cf.id == 80)
1734                     return values.apply(this, forcemv(cf.values));
1735                 else
1736                     throw cf;
1737             }
1738         })();
1739     }));
1740     return l100;
1741 })();
1742 var l101 = {name: "ASSOC"};
1743 (function(){
1744     (l101).fvalue = (function(v190){
1745         ((v190)["fname"] = "ASSOC");
1746         return v190;
1747     })((function (values,v188,v189){
1748         checkArgs(arguments, 3);
1749         return (function(){
1750             (function(){
1751                 try {
1752                     return (function(){
1753                         while(v189 !== l5.value){
1754                             (l27.fvalue(pv, v188, l33.fvalue(pv, v189)) !== l5.value ? (function(){
1755                                 throw ({type: 'block', id: 84, values: l5.value, message: 'Return from unknown block NIL.'})
1756                             })() : (v189 = (function(){
1757                                 var tmp = v189;
1758                                 return tmp === l5.value? l5.value: tmp.cdr;
1759                             })()));
1760                         }return l5.value;
1761                     })();
1762                 }
1763                 catch (cf){
1764                     if (cf.type == 'block' && cf.id == 84)
1765                         return cf.values;
1766                     else
1767                         throw cf;
1768                 }
1769             })();
1770             return (function(){
1771                 var tmp = v189;
1772                 return tmp === l5.value? l5.value: tmp.car;
1773             })();
1774         })();
1775     }));
1776     return l101;
1777 })();
1778 var l102 = {name: "STRING"};
1779 (function(){
1780     (l102).fvalue = (function(v192){
1781         ((v192)["fname"] = "STRING");
1782         return v192;
1783     })((function (values,v191){
1784         checkArgs(arguments, 2);
1785         return (function(){
1786             return (((typeof(v191) == "string")?l4.value: l5.value) !== l5.value ? v191 : (((function(){
1787                 var tmp = v191;
1788                 return (typeof tmp == 'object' && 'name' in tmp);
1789             })()?l4.value: l5.value) !== l5.value ? (v191).name : (function(){
1790                 var x = v191;
1791                 if (typeof x != 'number')
1792                     throw 'The value ' + x + ' is not a type number.';
1793                 return String.fromCharCode(x);
1794             })()));
1795         })();
1796     }));
1797     return l102;
1798 })();
1799 var l103 = {name: "STRING="};
1800 (function(){
1801     (l103).fvalue = (function(v195){
1802         ((v195)["fname"] = "STRING=");
1803         return v195;
1804     })((function (values,v193,v194){
1805         checkArgs(arguments, 3);
1806         return (function(){
1807             return ((v193 == v194)?l4.value: l5.value);
1808         })();
1809     }));
1810     return l103;
1811 })();
1812 var l104 = {name: "FDEFINITION"};
1813 (function(){
1814     (l104).fvalue = (function(v197){
1815         ((v197)["fname"] = "FDEFINITION");
1816         return v197;
1817     })((function (values,v196){
1818         checkArgs(arguments, 2);
1819         return (function(){
1820             return (((typeof v196 == 'function')?l4.value: l5.value) !== l5.value ? v196 : (((function(){
1821                 var tmp = v196;
1822                 return (typeof tmp == 'object' && 'name' in tmp);
1823             })()?l4.value: l5.value) !== l5.value ? (function(){
1824                 var symbol = v196;
1825                 var func = symbol.fvalue;
1826                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1827                 return func;
1828             })() : (function(){
1829                 throw "Invalid function";
1830             })()));
1831         })();
1832     }));
1833     return l104;
1834 })();
1835 var l105 = {name: "DISASSEMBLE"};
1836 var l106 = {name: "WRITE-LINE"};
1837 (function(){
1838     (l105).fvalue = (function(v199){
1839         ((v199)["fname"] = "DISASSEMBLE");
1840         return v199;
1841     })((function (values,v198){
1842         checkArgs(arguments, 2);
1843         return (function(){
1844             l106.fvalue(pv, (l104.fvalue(pv, v198)).toString());
1845             return l5.value;
1846         })();
1847     }));
1848     return l105;
1849 })();
1850 var l107 = {name: "DOCUMENTATION"};
1851 var l108 = {name: "FUNCTION"};
1852 var l109 = {name: "VARIABLE"};
1853 (function(){
1854     (l107).fvalue = (function(v204){
1855         ((v204)["fname"] = "DOCUMENTATION");
1856         return v204;
1857     })((function(){
1858         var func = (function (values,v200,v201){
1859             checkArgs(arguments, 3);
1860             return (function(){
1861                 return (function(v202){
1862                     return (l27.fvalue(pv, v202, l108) !== l5.value ? (function(v203){
1863                         return (function(){
1864                             var tmp = (v203)["docstring"];
1865                             return tmp == undefined? l5.value: tmp ;
1866                         })();
1867                     })(l104.fvalue(pv, v200)) : (l27.fvalue(pv, v202, l109) !== l5.value ? (function(){
1868                         (((function(){
1869                             var tmp = v200;
1870                             return (typeof tmp == 'object' && 'name' in tmp);
1871                         })()?l4.value: l5.value) !== l5.value ? l5.value : (function(){
1872                             throw "Wrong argument type! it should be a symbol";
1873                         })());
1874                         return (function(){
1875                             var tmp = (v200)["vardoc"];
1876                             return tmp == undefined? l5.value: tmp ;
1877                         })();
1878                     })() : (function(){
1879                         throw "ECASE expression failed.";
1880                     })()));
1881                 })(v201);
1882             })();
1883         });
1884         func.docstring = 'Return the documentation of X. TYPE must be the symbol VARIABLE or FUNCTION.';
1885         return func;
1886     })());
1887     return l107;
1888 })();
1889 var l110 = {name: "MULTIPLE-VALUE-BIND"};
1890 l110;
1891 var l111 = {name: "MULTIPLE-VALUE-LIST"};
1892 l111;
1893 var l112 = {name: "*SETF-EXPANDERS*"};
1894 (function(){
1895     (((l112.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l112).value = l5.value));
1896     return l112;
1897 })();
1898 var l113 = {name: "GET-SETF-EXPANSION"};
1899 var l114 = {name: "SETQ"};
1900 (function(){
1901     (l113).fvalue = (function(v209){
1902         ((v209)["fname"] = "GET-SETF-EXPANSION");
1903         return v209;
1904     })((function (values,v205){
1905         checkArgs(arguments, 2);
1906         return (function(){
1907             return (((function(){
1908                 var tmp = v205;
1909                 return (typeof tmp == 'object' && 'name' in tmp);
1910             })()?l4.value: l5.value) !== l5.value ? (function(v206){
1911                 return values(l5.value, l5.value, l65.fvalue(pv, l45.fvalue(pv, v206)), l65.fvalue(pv, l45.fvalue(pv, l114), l45.fvalue(pv, v205), l45.fvalue(pv, v206)), v205);
1912             })(l17.fvalue(pv)) : (function(){
1913                 var v207 = (function(){
1914                     var tmp = v205;
1915                     return tmp === l5.value? l5.value: tmp.car;
1916                 })();
1917                 var v208 = (function(){
1918                     var tmp = l101.fvalue(pv, v207, (function(){
1919                         var symbol = l112;
1920                         var value = symbol.value;
1921                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
1922                         return value;
1923                     })());
1924                     return tmp === l5.value? l5.value: tmp.cdr;
1925                 })();
1926                 (l13.fvalue(pv, v208) !== l5.value ? (function(){
1927                     throw "Unknown generalized reference.";
1928                 })() : l5.value);
1929                 return (function(){
1930                     var f = v208;
1931                     var args = [values];
1932                     var tail = ((function(){
1933                         var tmp = v205;
1934                         return tmp === l5.value? l5.value: tmp.cdr;
1935                     })());
1936                     while (tail != l5.value){
1937                         args.push(tail.car);
1938                         tail = tail.cdr;
1939                     }
1940                     return f.apply(this, args);
1941                 })();
1942             })());
1943         })();
1944     }));
1945     return l113;
1946 })();
1947 var l115 = {name: "DEFINE-SETF-EXPANDER"};
1948 l115;
1949 var l116 = {name: "SETF"};
1950 l116;
1951 var l117 = {name: "PROGN"};
1952 var l118 = {name: "RPLACA"};
1953 (function(){
1954     ((l112).value = ({car: ({car: l31, cdr: (function (values,v210){
1955         checkArgs(arguments, 2);
1956         return (function(v211,v212){
1957             return values(l45.fvalue(pv, v211), l45.fvalue(pv, v210), l45.fvalue(pv, v212), l65.fvalue(pv, l45.fvalue(pv, l117), l45.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l118), l45.fvalue(pv, v211), l45.fvalue(pv, v212))), l45.fvalue(pv, v212)), l65.fvalue(pv, l45.fvalue(pv, l31), l45.fvalue(pv, v211)));
1958         })(l17.fvalue(pv),l17.fvalue(pv));
1959     })}), cdr: (function(){
1960         var symbol = l112;
1961         var value = symbol.value;
1962         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
1963         return value;
1964     })()}));
1965     return l31;
1966 })();
1967 var l119 = {name: "RPLACD"};
1968 (function(){
1969     ((l112).value = ({car: ({car: l32, cdr: (function (values,v213){
1970         checkArgs(arguments, 2);
1971         return (function(v214,v215){
1972             return values(l45.fvalue(pv, v214), l45.fvalue(pv, v213), l45.fvalue(pv, v215), l65.fvalue(pv, l45.fvalue(pv, l117), l45.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l119), l45.fvalue(pv, v214), l45.fvalue(pv, v215))), l45.fvalue(pv, v215)), l65.fvalue(pv, l45.fvalue(pv, l31), l45.fvalue(pv, v214)));
1973         })(l17.fvalue(pv),l17.fvalue(pv));
1974     })}), cdr: (function(){
1975         var symbol = l112;
1976         var value = symbol.value;
1977         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
1978         return value;
1979     })()}));
1980     return l32;
1981 })();
1982 var l120 = {name: "*PACKAGE-LIST*"};
1983 (function(){
1984     (((l120.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l120).value = l5.value));
1985     return l120;
1986 })();
1987 var l121 = {name: "LIST-ALL-PACKAGES"};
1988 (function(){
1989     (l121).fvalue = (function(v216){
1990         ((v216)["fname"] = "LIST-ALL-PACKAGES");
1991         return v216;
1992     })((function (values){
1993         checkArgsAtMost(arguments, 1);
1994         return (function(){
1995             return (function(){
1996                 var symbol = l120;
1997                 var value = symbol.value;
1998                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
1999                 return value;
2000             })();
2001         })();
2002     }));
2003     return l121;
2004 })();
2005 var l122 = {name: "MAKE-PACKAGE"};
2006 var l123 = {name: "USE", 'package': 'KEYWORD'};
2007 var l124 = {name: "FIND-PACKAGE-OR-FAIL"};
2008 (function(){
2009     (l122).fvalue = (function(v221){
2010         ((v221)["fname"] = "MAKE-PACKAGE");
2011         return v221;
2012     })((function (values,v217){
2013         checkArgsAtLeast(arguments, 2);
2014         var v218;
2015         var i;
2016         for (i=2; i<arguments.length; i+=2){
2017             if (arguments[i] === l123.value){
2018                 v218 = arguments[i+1];
2019                 break;
2020             }
2021         }
2022         if (i == arguments.length){
2023             v218 = l5.value;
2024         }
2025         for (i=2; i<arguments.length; i+=2){
2026             if (arguments[i] !== l123.value)
2027                 throw 'Unknown keyword argument ' + arguments[i].name;
2028         }
2029         return (function(){
2030             return (function(v219,v220){
2031                 ((v219)["packageName"] = v217);
2032                 ((v219)["symbols"] = {});
2033                 ((v219)["exports"] = {});
2034                 ((v219)["use"] = v220);
2035                 ((l120).value = ({car: v219, cdr: (function(){
2036                     var symbol = l120;
2037                     var value = symbol.value;
2038                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2039                     return value;
2040                 })()}));
2041                 return v219;
2042             })({},l78.fvalue(pv, (function(){
2043                 var symbol = l124;
2044                 var func = symbol.fvalue;
2045                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2046                 return func;
2047             })(), v218));
2048         })();
2049     }));
2050     return l122;
2051 })();
2052 var l125 = {name: "PACKAGEP"};
2053 (function(){
2054     (l125).fvalue = (function(v223){
2055         ((v223)["fname"] = "PACKAGEP");
2056         return v223;
2057     })((function (values,v222){
2058         checkArgs(arguments, 2);
2059         return (function(){
2060             return (((typeof (v222) === 'object')?l4.value: l5.value) !== l5.value ? ((("symbols") in (v222))?l4.value: l5.value) : l5.value);
2061         })();
2062     }));
2063     return l125;
2064 })();
2065 var l126 = {name: "FIND-PACKAGE"};
2066 var l127 = {name: "PACKAGE-NAME"};
2067 (function(){
2068     (l126).fvalue = (function(v228){
2069         ((v228)["fname"] = "FIND-PACKAGE");
2070         return v228;
2071     })((function (values,v224){
2072         checkArgs(arguments, 2);
2073         return (function(){
2074             try {
2075                 (l125.fvalue(pv, v224) !== l5.value ? (function(){
2076                     var values = mv;
2077                     throw ({type: 'block', id: 94, values: v224, message: 'Return from unknown block FIND-PACKAGE.'})
2078                 })() : l5.value);
2079                 return (function(v225){
2080                     return (function(){
2081                         try {
2082                             return (function(v226,v227){
2083                                 (function(){
2084                                     while(v226 !== l5.value){
2085                                         (v227 = (function(){
2086                                             var tmp = v226;
2087                                             return tmp === l5.value? l5.value: tmp.car;
2088                                         })());
2089                                         (function(){
2090                                             (l103.fvalue(pv, l127.fvalue(pv, v227), v225) !== l5.value ? (function(){
2091                                                 var values = mv;
2092                                                 throw ({type: 'block', id: 95, values: v227, message: 'Return from unknown block NIL.'})
2093                                             })() : l5.value);
2094                                             return l5.value;
2095                                         })();
2096                                         (v226 = (function(){
2097                                             var tmp = v226;
2098                                             return tmp === l5.value? l5.value: tmp.cdr;
2099                                         })());
2100                                     }return l5.value;
2101                                 })();
2102                                 return l5.value;
2103                             })((function(){
2104                                 var symbol = l120;
2105                                 var value = symbol.value;
2106                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2107                                 return value;
2108                             })(),l5.value);
2109                         }
2110                         catch (cf){
2111                             if (cf.type == 'block' && cf.id == 95)
2112                                 return values.apply(this, forcemv(cf.values));
2113                             else
2114                                 throw cf;
2115                         }
2116                     })();
2117                 })(l102.fvalue(pv, v224));
2118             }
2119             catch (cf){
2120                 if (cf.type == 'block' && cf.id == 94)
2121                     return values.apply(this, forcemv(cf.values));
2122                 else
2123                     throw cf;
2124             }
2125         })();
2126     }));
2127     return l126;
2128 })();
2129 (function(){
2130     (l124).fvalue = (function(v231){
2131         ((v231)["fname"] = "FIND-PACKAGE-OR-FAIL");
2132         return v231;
2133     })((function (values,v229){
2134         checkArgs(arguments, 2);
2135         return (function(){
2136             return (function(v230){
2137                 return (v230 !== l5.value ? v230 : (function(){
2138                     throw "Package unknown.";
2139                 })());
2140             })(l126.fvalue(pv, v229));
2141         })();
2142     }));
2143     return l124;
2144 })();
2145 (function(){
2146     (l127).fvalue = (function(v234){
2147         ((v234)["fname"] = "PACKAGE-NAME");
2148         return v234;
2149     })((function (values,v232){
2150         checkArgs(arguments, 2);
2151         return (function(){
2152             return (function(v233){
2153                 return (function(){
2154                     var tmp = (v233)["packageName"];
2155                     return tmp == undefined? l5.value: tmp ;
2156                 })();
2157             })(l124.fvalue(pv, v232));
2158         })();
2159     }));
2160     return l127;
2161 })();
2162 var l128 = {name: "%PACKAGE-SYMBOLS"};
2163 (function(){
2164     (l128).fvalue = (function(v237){
2165         ((v237)["fname"] = "%PACKAGE-SYMBOLS");
2166         return v237;
2167     })((function (values,v235){
2168         checkArgs(arguments, 2);
2169         return (function(){
2170             return (function(v236){
2171                 return (function(){
2172                     var tmp = (v236)["symbols"];
2173                     return tmp == undefined? l5.value: tmp ;
2174                 })();
2175             })(l124.fvalue(pv, v235));
2176         })();
2177     }));
2178     return l128;
2179 })();
2180 var l129 = {name: "PACKAGE-USE-LIST"};
2181 (function(){
2182     (l129).fvalue = (function(v240){
2183         ((v240)["fname"] = "PACKAGE-USE-LIST");
2184         return v240;
2185     })((function (values,v238){
2186         checkArgs(arguments, 2);
2187         return (function(){
2188             return (function(v239){
2189                 return (function(){
2190                     var tmp = (v239)["use"];
2191                     return tmp == undefined? l5.value: tmp ;
2192                 })();
2193             })(l124.fvalue(pv, v238));
2194         })();
2195     }));
2196     return l129;
2197 })();
2198 var l130 = {name: "%PACKAGE-EXTERNAL-SYMBOLS"};
2199 (function(){
2200     (l130).fvalue = (function(v243){
2201         ((v243)["fname"] = "%PACKAGE-EXTERNAL-SYMBOLS");
2202         return v243;
2203     })((function (values,v241){
2204         checkArgs(arguments, 2);
2205         return (function(){
2206             return (function(v242){
2207                 return (function(){
2208                     var tmp = (v242)["exports"];
2209                     return tmp == undefined? l5.value: tmp ;
2210                 })();
2211             })(l124.fvalue(pv, v241));
2212         })();
2213     }));
2214     return l130;
2215 })();
2216 var l131 = {name: "*COMMON-LISP-PACKAGE*"};
2217 (function(){
2218     (((l131.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l131).value = l122.fvalue(pv, "CL")));
2219     return l131;
2220 })();
2221 var l132 = {name: "*USER-PACKAGE*"};
2222 (function(){
2223     (((l132.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l132).value = l122.fvalue(pv, "CL-USER", l123.value, l45.fvalue(pv, (function(){
2224         var symbol = l131;
2225         var value = symbol.value;
2226         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2227         return value;
2228     })()))));
2229     return l132;
2230 })();
2231 var l133 = {name: "*KEYWORD-PACKAGE*"};
2232 (function(){
2233     (((l133.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l133).value = l122.fvalue(pv, "KEYWORD")));
2234     return l133;
2235 })();
2236 var l134 = {name: "KEYWORDP"};
2237 var l135 = {name: "SYMBOL-PACKAGE"};
2238 (function(){
2239     (l134).fvalue = (function(v245){
2240         ((v245)["fname"] = "KEYWORDP");
2241         return v245;
2242     })((function (values,v244){
2243         checkArgs(arguments, 2);
2244         return (function(){
2245             return (((function(){
2246                 var tmp = v244;
2247                 return (typeof tmp == 'object' && 'name' in tmp);
2248             })()?l4.value: l5.value) !== l5.value ? ((l135.fvalue(pv, v244) === (function(){
2249                 var symbol = l133;
2250                 var value = symbol.value;
2251                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2252                 return value;
2253             })())?l4.value: l5.value) : l5.value);
2254         })();
2255     }));
2256     return l134;
2257 })();
2258 var l136 = {name: "*PACKAGE*"};
2259 (function(){
2260     (((l136.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l136).value = (function(){
2261         var symbol = l131;
2262         var value = symbol.value;
2263         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2264         return value;
2265     })()));
2266     return l136;
2267 })();
2268 var l137 = {name: "IN-PACKAGE"};
2269 l137;
2270 var l138 = {name: "%INTERN-SYMBOL"};
2271 (function(){
2272     (l138).fvalue = (function(v249){
2273         ((v249)["fname"] = "%INTERN-SYMBOL");
2274         return v249;
2275     })((function (values,v246){
2276         checkArgs(arguments, 2);
2277         return (function(){
2278             return (function(){
2279                 var v247 = (((("package") in (v246))?l4.value: l5.value) !== l5.value ? l124.fvalue(pv, (function(){
2280                     var tmp = (v246)["package"];
2281                     return tmp == undefined? l5.value: tmp ;
2282                 })()) : (function(){
2283                     var symbol = l131;
2284                     var value = symbol.value;
2285                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2286                     return value;
2287                 })());
2288                 var v248 = l128.fvalue(pv, v247);
2289                 ((v246)["package"] = v247);
2290                 (((v247 === (function(){
2291                     var symbol = l133;
2292                     var value = symbol.value;
2293                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2294                     return value;
2295                 })())?l4.value: l5.value) !== l5.value ? ((v246)["value"] = v246) : l5.value);
2296                 return ((v248)[(v246).name] = v246);
2297             })();
2298         })();
2299     }));
2300     return l138;
2301 })();
2302 var l139 = {name: "FIND-SYMBOL"};
2303 var l140 = {name: "EXTERNAL", 'package': 'KEYWORD'};
2304 var l141 = {name: "INTERNAL", 'package': 'KEYWORD'};
2305 var l142 = {name: "INHERIT", 'package': 'KEYWORD'};
2306 (function(){
2307     (l139).fvalue = (function(v258){
2308         ((v258)["fname"] = "FIND-SYMBOL");
2309         return v258;
2310     })((function (values,v250,v251){
2311         checkArgsAtLeast(arguments, 2);
2312         checkArgsAtMost(arguments, 3);
2313         switch(arguments.length-1){
2314         case 1:
2315         v251=(function(){
2316             var symbol = l136;
2317             var value = symbol.value;
2318             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2319             return value;
2320         })();
2321         default: break;
2322         }
2323         return (function(){
2324             return (function(){
2325                 var v252 = l124.fvalue(pv, v251);
2326                 var v253 = l130.fvalue(pv, v252);
2327                 var v254 = l128.fvalue(pv, v252);
2328                 return ((((v250) in (v253))?l4.value: l5.value) !== l5.value ? values((function(){
2329                     var tmp = (v253)[v250];
2330                     return tmp == undefined? l5.value: tmp ;
2331                 })(), l140.value) : ((((v250) in (v254))?l4.value: l5.value) !== l5.value ? values((function(){
2332                     var tmp = (v254)[v250];
2333                     return tmp == undefined? l5.value: tmp ;
2334                 })(), l141.value) : (function(){
2335                     try {
2336                         return (function(v255,v256){
2337                             (function(){
2338                                 while(v255 !== l5.value){
2339                                     (v256 = (function(){
2340                                         var tmp = v255;
2341                                         return tmp === l5.value? l5.value: tmp.car;
2342                                     })());
2343                                     (function(){
2344                                         (function(v257){
2345                                             return ((((v250) in (v257))?l4.value: l5.value) !== l5.value ? (function(){
2346                                                 var values = mv;
2347                                                 throw ({type: 'block', id: 104, values: values((function(){
2348                                                     var tmp = (v257)[v250];
2349                                                     return tmp == undefined? l5.value: tmp ;
2350                                                 })(), l142.value), message: 'Return from unknown block NIL.'})
2351                                             })() : l5.value);
2352                                         })(l130.fvalue(pv, v256));
2353                                         return l5.value;
2354                                     })();
2355                                     (v255 = (function(){
2356                                         var tmp = v255;
2357                                         return tmp === l5.value? l5.value: tmp.cdr;
2358                                     })());
2359                                 }return l5.value;
2360                             })();
2361                             return values(l5.value, l5.value);
2362                         })(l129.fvalue(pv, v252),l5.value);
2363                     }
2364                     catch (cf){
2365                         if (cf.type == 'block' && cf.id == 104)
2366                             return values.apply(this, forcemv(cf.values));
2367                         else
2368                             throw cf;
2369                     }
2370                 })()));
2371             })();
2372         })();
2373     }));
2374     return l139;
2375 })();
2376 var l143 = {name: "INTERN"};
2377 var l144 = {name: "EXPORT"};
2378 (function(){
2379     (l143).fvalue = (function(v267){
2380         ((v267)["fname"] = "INTERN");
2381         return v267;
2382     })((function (values,v259,v260){
2383         checkArgsAtLeast(arguments, 2);
2384         checkArgsAtMost(arguments, 3);
2385         switch(arguments.length-1){
2386         case 1:
2387         v260=(function(){
2388             var symbol = l136;
2389             var value = symbol.value;
2390             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2391             return value;
2392         })();
2393         default: break;
2394         }
2395         return (function(){
2396             return (function(v261){
2397                 return (function(){
2398                     var func = (function (values,v263,v264){
2399                         switch(arguments.length-1){
2400                         case 0:
2401                         v263=l5.value;
2402                         case 1:
2403                         v264=l5.value;
2404                         default: break;
2405                         }
2406                         var v262= l5.value;
2407                         for (var i = arguments.length-1; i>=3; i--)
2408                             v262 = {car: arguments[i], cdr:
2409                         v262};
2410                         return (v264 !== l5.value ? values(v263, v264) : (function(v265){
2411                             (function(){
2412                                 var tmp = (v265)[v259];
2413                                 return tmp == undefined? l5.value: tmp ;
2414                             })();
2415                             return (function(v266){
2416                                 ((v266)["package"] = v261);
2417                                 (((v261 === (function(){
2418                                     var symbol = l133;
2419                                     var value = symbol.value;
2420                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2421                                     return value;
2422                                 })())?l4.value: l5.value) !== l5.value ? (function(){
2423                                     ((v266)["value"] = v266);
2424                                     return l144.fvalue(pv, l45.fvalue(pv, v266), v261);
2425                                 })() : l5.value);
2426                                 ((v265)[v259] = v266);
2427                                 return values(v266, l5.value);
2428                             })((function(){
2429                                 var name = v259;
2430                                 if (typeof name != 'string')
2431                                     throw 'The value ' + name + ' is not a type string.';
2432                                 return ({name: name});
2433                             })());
2434                         })(l128.fvalue(pv, v261)));
2435                     });
2436                     var args = [values];
2437                     return (function(){
2438                         var values = mv;
2439                         var vs;
2440                         vs = l139.fvalue(values, v259, v261);
2441                         if (typeof vs === 'object' && 'multiple-value' in vs)
2442                             args = args.concat(vs);
2443                         else
2444                             args.push(vs);
2445                         return func.apply(window, args);
2446                     })();
2447                 })();
2448             })(l124.fvalue(pv, v260));
2449         })();
2450     }));
2451     return l143;
2452 })();
2453 (function(){
2454     (l135).fvalue = (function(v269){
2455         ((v269)["fname"] = "SYMBOL-PACKAGE");
2456         return v269;
2457     })((function (values,v268){
2458         checkArgs(arguments, 2);
2459         return (function(){
2460             (((function(){
2461                 var tmp = v268;
2462                 return (typeof tmp == 'object' && 'name' in tmp);
2463             })()?l4.value: l5.value) !== l5.value ? l5.value : (function(){
2464                 throw "it is not a symbol";
2465             })());
2466             return (function(){
2467                 var tmp = (v268)["package"];
2468                 return tmp == undefined? l5.value: tmp ;
2469             })();
2470         })();
2471     }));
2472     return l135;
2473 })();
2474 (function(){
2475     (l144).fvalue = (function(v275){
2476         ((v275)["fname"] = "EXPORT");
2477         return v275;
2478     })((function (values,v270,v271){
2479         checkArgsAtLeast(arguments, 2);
2480         checkArgsAtMost(arguments, 3);
2481         switch(arguments.length-1){
2482         case 1:
2483         v271=(function(){
2484             var symbol = l136;
2485             var value = symbol.value;
2486             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2487             return value;
2488         })();
2489         default: break;
2490         }
2491         return (function(){
2492             return (function(v272){
2493                 return (function(){
2494                     return (function(v273,v274){
2495                         (function(){
2496                             while(v273 !== l5.value){
2497                                 (v274 = (function(){
2498                                     var tmp = v273;
2499                                     return tmp === l5.value? l5.value: tmp.car;
2500                                 })());
2501                                 (function(){
2502                                     ((v272)[(v274).name] = v274);
2503                                     return l5.value;
2504                                 })();
2505                                 (v273 = (function(){
2506                                     var tmp = v273;
2507                                     return tmp === l5.value? l5.value: tmp.cdr;
2508                                 })());
2509                             }return l5.value;
2510                         })();
2511                         return l4.value;
2512                     })(v270,l5.value);
2513                 })();
2514             })(l130.fvalue(pv, v271));
2515         })();
2516     }));
2517     return l144;
2518 })();
2519 var l145 = {name: "GET-UNIVERSAL-TIME"};
2520 (function(){
2521     (l145).fvalue = (function(v276){
2522         ((v276)["fname"] = "GET-UNIVERSAL-TIME");
2523         return v276;
2524     })((function (values){
2525         checkArgsAtMost(arguments, 1);
2526         return (function(){
2527             return (function(){
2528                 var x1 = (Math.round(new Date() / 1000));
2529                 if (typeof x1 !== 'number') throw 'Not a number!';
2530                 return x1+2208988800;
2531             })();
2532         })();
2533     }));
2534     return l145;
2535 })();
2536 var l146 = {name: "*NEWLINE*"};
2537 (function(){
2538     (((l146.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l146).value = l102.fvalue(pv, l82.fvalue(pv, 10))));
2539     return l146;
2540 })();
2541 var l147 = {name: "CONCAT"};
2542 (function(){
2543     (l147).fvalue = (function(v278){
2544         ((v278)["fname"] = "CONCAT");
2545         return v278;
2546     })((function (values){
2547         var v277= l5.value;
2548         for (var i = arguments.length-1; i>=1; i--)
2549             v277 = {car: arguments[i], cdr:
2550         v277};
2551         return (function(){
2552             return l61.fvalue(values, (function(){
2553                 var symbol = l73;
2554                 var func = symbol.fvalue;
2555                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2556                 return func;
2557             })(), v277, "");
2558         })();
2559     }));
2560     return l147;
2561 })();
2562 var l148 = {name: "CONCATF"};
2563 l148;
2564 var l149 = {name: "JOIN"};
2565 (function(){
2566     (l149).fvalue = (function(v281){
2567         ((v281)["fname"] = "JOIN");
2568         return v281;
2569     })((function (values,v279,v280){
2570         checkArgsAtLeast(arguments, 2);
2571         checkArgsAtMost(arguments, 3);
2572         switch(arguments.length-1){
2573         case 1:
2574         v280="";
2575         default: break;
2576         }
2577         return (function(){
2578             return (l13.fvalue(pv, v279) !== l5.value ? "" : (l13.fvalue(pv, (function(){
2579                 var tmp = v279;
2580                 return tmp === l5.value? l5.value: tmp.cdr;
2581             })()) !== l5.value ? (function(){
2582                 var tmp = v279;
2583                 return tmp === l5.value? l5.value: tmp.car;
2584             })() : l147.fvalue(values, (function(){
2585                 var tmp = v279;
2586                 return tmp === l5.value? l5.value: tmp.car;
2587             })(), v280, l149.fvalue(pv, (function(){
2588                 var tmp = v279;
2589                 return tmp === l5.value? l5.value: tmp.cdr;
2590             })(), v280))));
2591         })();
2592     }));
2593     return l149;
2594 })();
2595 var l150 = {name: "JOIN-TRAILING"};
2596 (function(){
2597     (l150).fvalue = (function(v284){
2598         ((v284)["fname"] = "JOIN-TRAILING");
2599         return v284;
2600     })((function (values,v282,v283){
2601         checkArgsAtLeast(arguments, 2);
2602         checkArgsAtMost(arguments, 3);
2603         switch(arguments.length-1){
2604         case 1:
2605         v283="";
2606         default: break;
2607         }
2608         return (function(){
2609             return (l13.fvalue(pv, v282) !== l5.value ? "" : l147.fvalue(values, (function(){
2610                 var tmp = v282;
2611                 return tmp === l5.value? l5.value: tmp.car;
2612             })(), v283, l150.fvalue(pv, (function(){
2613                 var tmp = v282;
2614                 return tmp === l5.value? l5.value: tmp.cdr;
2615             })(), v283)));
2616         })();
2617     }));
2618     return l150;
2619 })();
2620 var l151 = {name: "MAPCONCAT"};
2621 (function(){
2622     (l151).fvalue = (function(v287){
2623         ((v287)["fname"] = "MAPCONCAT");
2624         return v287;
2625     })((function (values,v285,v286){
2626         checkArgs(arguments, 3);
2627         return (function(){
2628             return l149.fvalue(values, l78.fvalue(pv, v285, v286));
2629         })();
2630     }));
2631     return l151;
2632 })();
2633 var l152 = {name: "VECTOR-TO-LIST"};
2634 (function(){
2635     (l152).fvalue = (function(v293){
2636         ((v293)["fname"] = "VECTOR-TO-LIST");
2637         return v293;
2638     })((function (values,v288){
2639         checkArgs(arguments, 2);
2640         return (function(){
2641             return (function(v289,v290){
2642                 return (function(){
2643                     return (function(v291,v292){
2644                         (function(){
2645                             while((function(){
2646                                 var x1 = v291;
2647                                 if (typeof x1 !== 'number') throw 'Not a number!';
2648                                 var x2 = v292;
2649                                 if (typeof x2 !== 'number') throw 'Not a number!';
2650                                 return (x1<x2?l4.value: l5.value);
2651                             })() !== l5.value){
2652                                 (function(){
2653                                     (v289 = ({car: (function(){
2654                                         var x = (v288)[v291];
2655                                         if (x === undefined) throw 'Out of range';
2656                                         return x;
2657                                     })(), cdr: v289}));
2658                                     return l5.value;
2659                                 })();
2660                                 (v291 = (function(){
2661                                     var x1 = v291;
2662                                     if (typeof x1 !== 'number') throw 'Not a number!';
2663                                     return x1+1;
2664                                 })());
2665                             }return l5.value;
2666                         })();
2667                         return l67.fvalue(values, v289);
2668                     })(0,v290);
2669                 })();
2670             })(l5.value,l72.fvalue(pv, v288));
2671         })();
2672     }));
2673     return l152;
2674 })();
2675 var l153 = {name: "LIST-TO-VECTOR"};
2676 (function(){
2677     (l153).fvalue = (function(v299){
2678         ((v299)["fname"] = "LIST-TO-VECTOR");
2679         return v299;
2680     })((function (values,v294){
2681         checkArgs(arguments, 2);
2682         return (function(){
2683             return (function(v295,v296){
2684                 return (function(){
2685                     return (function(v297,v298){
2686                         (function(){
2687                             while(v297 !== l5.value){
2688                                 (v298 = (function(){
2689                                     var tmp = v297;
2690                                     return tmp === l5.value? l5.value: tmp.car;
2691                                 })());
2692                                 (function(){
2693                                     (function(){
2694                                         var x = v295;
2695                                         var i = v296;
2696                                         if (i < 0 || i >= x.length) throw 'Out of range';
2697                                         return x[i] = v298;
2698                                     })();
2699                                     (v296 = (function(){
2700                                         var x1 = v296;
2701                                         if (typeof x1 !== 'number') throw 'Not a number!';
2702                                         return x1+1;
2703                                     })());
2704                                     return l5.value;
2705                                 })();
2706                                 (v297 = (function(){
2707                                     var tmp = v297;
2708                                     return tmp === l5.value? l5.value: tmp.cdr;
2709                                 })());
2710                             }return l5.value;
2711                         })();
2712                         return v295;
2713                     })(v294,l5.value);
2714                 })();
2715             })((function(){
2716                 var r = [];
2717                 for (var i = 0; i < l72.fvalue(pv, v294); i++)
2718                     r.push(l5.value);
2719                 return r;
2720             })(),0);
2721         })();
2722     }));
2723     return l153;
2724 })();
2725 var l154 = {name: "VALUES-LIST"};
2726 (function(){
2727     (l154).fvalue = (function(v301){
2728         ((v301)["fname"] = "VALUES-LIST");
2729         return v301;
2730     })((function (values,v300){
2731         checkArgs(arguments, 2);
2732         return (function(){
2733             return values.apply(this, l153.fvalue(pv, v300));
2734         })();
2735     }));
2736     return l154;
2737 })();
2738 var l155 = {name: "VALUES"};
2739 (function(){
2740     (l155).fvalue = (function(v303){
2741         ((v303)["fname"] = "VALUES");
2742         return v303;
2743     })((function (values){
2744         var v302= l5.value;
2745         for (var i = arguments.length-1; i>=1; i--)
2746             v302 = {car: arguments[i], cdr:
2747         v302};
2748         return (function(){
2749             return l154.fvalue(values, v302);
2750         })();
2751     }));
2752     return l155;
2753 })();
2754 (function(){
2755     (l18).fvalue = (function(v307){
2756         ((v307)["fname"] = "INTEGER-TO-STRING");
2757         return v307;
2758     })((function (values,v304){
2759         checkArgs(arguments, 2);
2760         return (function(){
2761             return (l25.fvalue(pv, v304) !== l5.value ? "0" : (l87.fvalue(pv, v304) !== l5.value ? l147.fvalue(values, "-", l18.fvalue(pv, (function(){
2762                 var x1 = v304;
2763                 if (typeof x1 !== 'number') throw 'Not a number!';
2764                 return 0-x1;
2765             })())) : (function(v305){
2766                 (function(){
2767                     return (function(){
2768                         while(l28.fvalue(pv, l25.fvalue(pv, v304)) !== l5.value){
2769                             (v305 = ({car: (function(){
2770                                 var x = v304;
2771                                 var y = 10;
2772                                 if (typeof x != 'number')
2773                                     throw 'The value ' + x + ' is not a type number.';
2774                                 if (typeof y != 'number')
2775                                     throw 'The value ' + y + ' is not a type number.';
2776                                 return x%y;
2777                             })(), cdr: v305}));
2778                             (v304 = l26.fvalue(pv, v304, 10));
2779                         }return l5.value;
2780                     })();
2781                 })();
2782                 return l151.fvalue(values, (function (values,v306){
2783                     checkArgs(arguments, 2);
2784                     return l102.fvalue(values, l97.fvalue(pv, v306));
2785                 }), v305);
2786             })(l5.value)));
2787         })();
2788     }));
2789     return l18;
2790 })();
2791 var l156 = {name: "PRIN1-TO-STRING"};
2792 var l157 = {name: "ESCAPE-STRING"};
2793 (function(){
2794     (l156).fvalue = (function(v316){
2795         ((v316)["fname"] = "PRIN1-TO-STRING");
2796         return v316;
2797     })((function (values,v308){
2798         checkArgs(arguments, 2);
2799         return (function(){
2800             return (((function(){
2801                 var tmp = v308;
2802                 return (typeof tmp == 'object' && 'name' in tmp);
2803             })()?l4.value: l5.value) !== l5.value ? (function(){
2804                 var func = (function (values,v310,v311){
2805                     switch(arguments.length-1){
2806                     case 0:
2807                     v310=l5.value;
2808                     case 1:
2809                     v311=l5.value;
2810                     default: break;
2811                     }
2812                     var v309= l5.value;
2813                     for (var i = arguments.length-1; i>=3; i--)
2814                         v309 = {car: arguments[i], cdr:
2815                     v309};
2816                     return ((v311 !== l5.value ? ((v310 === v308)?l4.value: l5.value) : l5.value) !== l5.value ? (v308).name : (function(v312,v313){
2817                         return l147.fvalue(values, (l13.fvalue(pv, v312) !== l5.value ? "#" : (((v312 === l126.fvalue(pv, "KEYWORD"))?l4.value: l5.value) !== l5.value ? "" : l127.fvalue(pv, v312))), ":", v313);
2818                     })(l135.fvalue(pv, v308),(v308).name));
2819                 });
2820                 var args = [values];
2821                 return (function(){
2822                     var values = mv;
2823                     var vs;
2824                     vs = l139.fvalue(values, (v308).name, (function(){
2825                         var symbol = l136;
2826                         var value = symbol.value;
2827                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2828                         return value;
2829                     })());
2830                     if (typeof vs === 'object' && 'multiple-value' in vs)
2831                         args = args.concat(vs);
2832                     else
2833                         args.push(vs);
2834                     return func.apply(window, args);
2835                 })();
2836             })() : (l85.fvalue(pv, v308) !== l5.value ? l18.fvalue(values, v308) : (((typeof(v308) == "string")?l4.value: l5.value) !== l5.value ? l147.fvalue(values, "\"", l157.fvalue(pv, v308), "\"") : (((typeof v308 == 'function')?l4.value: l5.value) !== l5.value ? (function(v314){
2837                 return (v314 !== l5.value ? l147.fvalue(values, "#<FUNCTION ", v314, ">") : l147.fvalue(values, "#<FUNCTION>"));
2838             })((function(){
2839                 var tmp = (v308)["fname"];
2840                 return tmp == undefined? l5.value: tmp ;
2841             })()) : (l60.fvalue(pv, v308) !== l5.value ? l147.fvalue(values, "(", l150.fvalue(pv, l78.fvalue(pv, (function(){
2842                 var symbol = l156;
2843                 var func = symbol.fvalue;
2844                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2845                 return func;
2846             })(), l91.fvalue(pv, v308)), " "), (function(v315){
2847                 return (l13.fvalue(pv, (function(){
2848                     var tmp = v315;
2849                     return tmp === l5.value? l5.value: tmp.cdr;
2850                 })()) !== l5.value ? l156.fvalue(pv, (function(){
2851                     var tmp = v315;
2852                     return tmp === l5.value? l5.value: tmp.car;
2853                 })()) : l147.fvalue(pv, l156.fvalue(pv, (function(){
2854                     var tmp = v315;
2855                     return tmp === l5.value? l5.value: tmp.car;
2856                 })()), " . ", l156.fvalue(pv, (function(){
2857                     var tmp = v315;
2858                     return tmp === l5.value? l5.value: tmp.cdr;
2859                 })())));
2860             })(l90.fvalue(pv, v308)), ")") : (((function(){
2861                 var x = v308;
2862                 return typeof x === 'object' && 'length' in x;
2863             })()?l4.value: l5.value) !== l5.value ? l147.fvalue(values, "#", l156.fvalue(pv, l152.fvalue(pv, v308))) : (l125.fvalue(pv, v308) !== l5.value ? l147.fvalue(values, "#<PACKAGE ", l127.fvalue(pv, v308), ">") : l5.value)))))));
2864         })();
2865     }));
2866     return l156;
2867 })();
2868 (function(){
2869     (l106).fvalue = (function(v318){
2870         ((v318)["fname"] = "WRITE-LINE");
2871         return v318;
2872     })((function (values,v317){
2873         checkArgs(arguments, 2);
2874         return (function(){
2875             (function(){
2876                 var x = v317;
2877                 if (typeof x != 'string')
2878                     throw 'The value ' + x + ' is not a type string.';
2879                 return lisp.write(x);
2880             })();
2881             (function(){
2882                 var x = (function(){
2883                     var symbol = l146;
2884                     var value = symbol.value;
2885                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2886                     return value;
2887                 })();
2888                 if (typeof x != 'string')
2889                     throw 'The value ' + x + ' is not a type string.';
2890                 return lisp.write(x);
2891             })();
2892             return v317;
2893         })();
2894     }));
2895     return l106;
2896 })();
2897 var l158 = {name: "WARN"};
2898 (function(){
2899     (l158).fvalue = (function(v320){
2900         ((v320)["fname"] = "WARN");
2901         return v320;
2902     })((function (values,v319){
2903         checkArgs(arguments, 2);
2904         return (function(){
2905             (function(){
2906                 var x = "WARNING: ";
2907                 if (typeof x != 'string')
2908                     throw 'The value ' + x + ' is not a type string.';
2909                 return lisp.write(x);
2910             })();
2911             return l106.fvalue(values, v319);
2912         })();
2913     }));
2914     return l158;
2915 })();
2916 var l159 = {name: "PRINT"};
2917 (function(){
2918     (l159).fvalue = (function(v322){
2919         ((v322)["fname"] = "PRINT");
2920         return v322;
2921     })((function (values,v321){
2922         checkArgs(arguments, 2);
2923         return (function(){
2924             l106.fvalue(pv, l156.fvalue(pv, v321));
2925             return v321;
2926         })();
2927     }));
2928     return l159;
2929 })();
2930 var l160 = {name: "MAKE-STRING-STREAM"};
2931 (function(){
2932     (l160).fvalue = (function(v324){
2933         ((v324)["fname"] = "MAKE-STRING-STREAM");
2934         return v324;
2935     })((function (values,v323){
2936         checkArgs(arguments, 2);
2937         return (function(){
2938             return ({car: v323, cdr: 0});
2939         })();
2940     }));
2941     return l160;
2942 })();
2943 var l161 = {name: "%PEEK-CHAR"};
2944 (function(){
2945     (l161).fvalue = (function(v326){
2946         ((v326)["fname"] = "%PEEK-CHAR");
2947         return v326;
2948     })((function (values,v325){
2949         checkArgs(arguments, 2);
2950         return (function(){
2951             return ((function(){
2952                 var x1 = (function(){
2953                     var tmp = v325;
2954                     return tmp === l5.value? l5.value: tmp.cdr;
2955                 })();
2956                 if (typeof x1 !== 'number') throw 'Not a number!';
2957                 var x2 = l72.fvalue(pv, (function(){
2958                     var tmp = v325;
2959                     return tmp === l5.value? l5.value: tmp.car;
2960                 })());
2961                 if (typeof x2 !== 'number') throw 'Not a number!';
2962                 return (x1<x2?l4.value: l5.value);
2963             })() !== l5.value ? (function(){
2964                 var string = (function(){
2965                     var tmp = v325;
2966                     return tmp === l5.value? l5.value: tmp.car;
2967                 })();
2968                 var index = (function(){
2969                     var tmp = v325;
2970                     return tmp === l5.value? l5.value: tmp.cdr;
2971                 })();
2972                 if (typeof string != 'string')
2973                     throw 'The value ' + string + ' is not a type string.';
2974                 if (typeof index != 'number')
2975                     throw 'The value ' + index + ' is not a type number.';
2976                 return string.charCodeAt(index);
2977             })() : l5.value);
2978         })();
2979     }));
2980     return l161;
2981 })();
2982 var l162 = {name: "%READ-CHAR"};
2983 (function(){
2984     (l162).fvalue = (function(v329){
2985         ((v329)["fname"] = "%READ-CHAR");
2986         return v329;
2987     })((function (values,v327){
2988         checkArgs(arguments, 2);
2989         return (function(){
2990             return ((function(){
2991                 var x1 = (function(){
2992                     var tmp = v327;
2993                     return tmp === l5.value? l5.value: tmp.cdr;
2994                 })();
2995                 if (typeof x1 !== 'number') throw 'Not a number!';
2996                 var x2 = l72.fvalue(pv, (function(){
2997                     var tmp = v327;
2998                     return tmp === l5.value? l5.value: tmp.car;
2999                 })());
3000                 if (typeof x2 !== 'number') throw 'Not a number!';
3001                 return (x1<x2?l4.value: l5.value);
3002             })() !== l5.value ? (function(v328){
3003                 (function(){
3004                     var x = v327;
3005                     if (typeof x != 'object')
3006                         throw 'The value ' + x + ' is not a type object.';
3007                     return (x.cdr = l23.fvalue(pv, (function(){
3008                         var tmp = v327;
3009                         return tmp === l5.value? l5.value: tmp.cdr;
3010                     })()), x);
3011                 })();
3012                 return v328;
3013             })((function(){
3014                 var string = (function(){
3015                     var tmp = v327;
3016                     return tmp === l5.value? l5.value: tmp.car;
3017                 })();
3018                 var index = (function(){
3019                     var tmp = v327;
3020                     return tmp === l5.value? l5.value: tmp.cdr;
3021                 })();
3022                 if (typeof string != 'string')
3023                     throw 'The value ' + string + ' is not a type string.';
3024                 if (typeof index != 'number')
3025                     throw 'The value ' + index + ' is not a type number.';
3026                 return string.charCodeAt(index);
3027             })()) : l5.value);
3028         })();
3029     }));
3030     return l162;
3031 })();
3032 var l163 = {name: "WHITESPACEP"};
3033 (function(){
3034     (l163).fvalue = (function(v333){
3035         ((v333)["fname"] = "WHITESPACEP");
3036         return v333;
3037     })((function (values,v330){
3038         checkArgs(arguments, 2);
3039         return (function(){
3040             return (function(v331){
3041                 return (v331 !== l5.value ? v331 : (function(v332){
3042                     return (v332 !== l5.value ? v332 : l84.fvalue(values, v330, 9));
3043                 })(l84.fvalue(pv, v330, 10)));
3044             })(l84.fvalue(pv, v330, 32));
3045         })();
3046     }));
3047     return l163;
3048 })();
3049 var l164 = {name: "SKIP-WHITESPACES"};
3050 (function(){
3051     (l164).fvalue = (function(v336){
3052         ((v336)["fname"] = "SKIP-WHITESPACES");
3053         return v336;
3054     })((function (values,v334){
3055         checkArgs(arguments, 2);
3056         return (function(){
3057             return (function(v335){
3058                 (v335 = l161.fvalue(pv, v334));
3059                 return (function(){
3060                     return (function(){
3061                         while((v335 !== l5.value ? l163.fvalue(pv, v335) : l5.value) !== l5.value){
3062                             l162.fvalue(pv, v334);
3063                             (v335 = l161.fvalue(pv, v334));
3064                         }return l5.value;
3065                     })();
3066                 })();
3067             })(l5.value);
3068         })();
3069     }));
3070     return l164;
3071 })();
3072 var l165 = {name: "TERMINALP"};
3073 (function(){
3074     (l165).fvalue = (function(v341){
3075         ((v341)["fname"] = "TERMINALP");
3076         return v341;
3077     })((function (values,v337){
3078         checkArgs(arguments, 2);
3079         return (function(){
3080             return (function(v338){
3081                 return (v338 !== l5.value ? v338 : (function(v339){
3082                     return (v339 !== l5.value ? v339 : (function(v340){
3083                         return (v340 !== l5.value ? v340 : l84.fvalue(values, 40, v337));
3084                     })(l84.fvalue(pv, 41, v337)));
3085                 })(l163.fvalue(pv, v337)));
3086             })(l13.fvalue(pv, v337));
3087         })();
3088     }));
3089     return l165;
3090 })();
3091 var l166 = {name: "READ-UNTIL"};
3092 (function(){
3093     (l166).fvalue = (function(v346){
3094         ((v346)["fname"] = "READ-UNTIL");
3095         return v346;
3096     })((function (values,v342,v343){
3097         checkArgs(arguments, 3);
3098         return (function(){
3099             return (function(v344,v345){
3100                 (v345 = l161.fvalue(pv, v342));
3101                 (function(){
3102                     return (function(){
3103                         while((v345 !== l5.value ? l28.fvalue(pv, (v343)(pv, v345)) : l5.value) !== l5.value){
3104                             (v344 = l147.fvalue(pv, v344, l102.fvalue(pv, v345)));
3105                             l162.fvalue(pv, v342);
3106                             (v345 = l161.fvalue(pv, v342));
3107                         }return l5.value;
3108                     })();
3109                 })();
3110                 return v344;
3111             })("",l5.value);
3112         })();
3113     }));
3114     return l166;
3115 })();
3116 var l167 = {name: "SKIP-WHITESPACES-AND-COMMENTS"};
3117 (function(){
3118     (l167).fvalue = (function(v350){
3119         ((v350)["fname"] = "SKIP-WHITESPACES-AND-COMMENTS");
3120         return v350;
3121     })((function (values,v347){
3122         checkArgs(arguments, 2);
3123         return (function(){
3124             return (function(v348){
3125                 l164.fvalue(pv, v347);
3126                 (v348 = l161.fvalue(pv, v347));
3127                 return (function(){
3128                     return (function(){
3129                         while((v348 !== l5.value ? l84.fvalue(pv, v348, 59) : l5.value) !== l5.value){
3130                             l166.fvalue(pv, v347, (function (values,v349){
3131                                 checkArgs(arguments, 2);
3132                                 return l84.fvalue(values, v349, 10);
3133                             }));
3134                             l164.fvalue(pv, v347);
3135                             (v348 = l161.fvalue(pv, v347));
3136                         }return l5.value;
3137                     })();
3138                 })();
3139             })(l5.value);
3140         })();
3141     }));
3142     return l167;
3143 })();
3144 var l168 = {name: "%READ-LIST"};
3145 var l169 = {name: "LS-READ"};
3146 (function(){
3147     (l168).fvalue = (function(v354){
3148         ((v354)["fname"] = "%READ-LIST");
3149         return v354;
3150     })((function (values,v351){
3151         checkArgs(arguments, 2);
3152         return (function(){
3153             l167.fvalue(pv, v351);
3154             return (function(v352){
3155                 return (l13.fvalue(pv, v352) !== l5.value ? (function(){
3156                     throw "Unspected EOF";
3157                 })() : (l84.fvalue(pv, v352, 41) !== l5.value ? (function(){
3158                     l162.fvalue(pv, v351);
3159                     return l5.value;
3160                 })() : (l84.fvalue(pv, v352, 46) !== l5.value ? (function(){
3161                     l162.fvalue(pv, v351);
3162                     return (function(v353){
3163                         l167.fvalue(pv, v351);
3164                         (l84.fvalue(pv, l162.fvalue(pv, v351), 41) !== l5.value ? l5.value : (function(){
3165                             throw "')' was expected.";
3166                         })());
3167                         return v353;
3168                     })(l169.fvalue(pv, v351));
3169                 })() : ({car: l169.fvalue(pv, v351), cdr: l168.fvalue(pv, v351)}))));
3170             })(l161.fvalue(pv, v351));
3171         })();
3172     }));
3173     return l168;
3174 })();
3175 var l170 = {name: "READ-STRING"};
3176 (function(){
3177     (l170).fvalue = (function(v358){
3178         ((v358)["fname"] = "READ-STRING");
3179         return v358;
3180     })((function (values,v355){
3181         checkArgs(arguments, 2);
3182         return (function(){
3183             return (function(v356,v357){
3184                 (v357 = l162.fvalue(pv, v355));
3185                 (function(){
3186                     return (function(){
3187                         while(l28.fvalue(pv, l27.fvalue(pv, v357, 34)) !== l5.value){
3188                             (l13.fvalue(pv, v357) !== l5.value ? (function(){
3189                                 throw "Unexpected EOF";
3190                             })() : l5.value);
3191                             (l27.fvalue(pv, v357, 92) !== l5.value ? (v357 = l162.fvalue(pv, v355)) : l5.value);
3192                             (v356 = l147.fvalue(pv, v356, l102.fvalue(pv, v357)));
3193                             (v357 = l162.fvalue(pv, v355));
3194                         }return l5.value;
3195                     })();
3196                 })();
3197                 return v356;
3198             })("",l5.value);
3199         })();
3200     }));
3201     return l170;
3202 })();
3203 var l171 = {name: "READ-SHARP"};
3204 (function(){
3205     (l171).fvalue = (function(v363){
3206         ((v363)["fname"] = "READ-SHARP");
3207         return v363;
3208     })((function (values,v359){
3209         checkArgs(arguments, 2);
3210         return (function(){
3211             l162.fvalue(pv, v359);
3212             return (function(v360){
3213                 return (l27.fvalue(pv, v360, 39) !== l5.value ? l45.fvalue(values, l108, l169.fvalue(pv, v359)) : (l27.fvalue(pv, v360, 40) !== l5.value ? l153.fvalue(values, l168.fvalue(pv, v359)) : (l27.fvalue(pv, v360, 58) !== l5.value ? (function(){
3214                     var name = (function(){
3215                         var x = l166.fvalue(pv, v359, (function(){
3216                             var symbol = l165;
3217                             var func = symbol.fvalue;
3218                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3219                             return func;
3220                         })());
3221                         if (typeof x != 'string')
3222                             throw 'The value ' + x + ' is not a type string.';
3223                         return x.toUpperCase();
3224                     })();
3225                     if (typeof name != 'string')
3226                         throw 'The value ' + name + ' is not a type string.';
3227                     return ({name: name});
3228                 })() : (l27.fvalue(pv, v360, 92) !== l5.value ? (function(v361){
3229                     return (l103.fvalue(pv, v361, "space") !== l5.value ? l83.fvalue(values, 32) : (l103.fvalue(pv, v361, "tab") !== l5.value ? l83.fvalue(values, 9) : (l103.fvalue(pv, v361, "newline") !== l5.value ? l83.fvalue(values, 10) : l83.fvalue(values, (function(){
3230                         var string = v361;
3231                         var index = 0;
3232                         if (typeof string != 'string')
3233                             throw 'The value ' + string + ' is not a type string.';
3234                         if (typeof index != 'number')
3235                             throw 'The value ' + index + ' is not a type number.';
3236                         return string.charCodeAt(index);
3237                     })()))));
3238                 })(l147.fvalue(pv, l102.fvalue(pv, l162.fvalue(pv, v359)), l166.fvalue(pv, v359, (function(){
3239                     var symbol = l165;
3240                     var func = symbol.fvalue;
3241                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3242                     return func;
3243                 })()))) : (l27.fvalue(pv, v360, 43) !== l5.value ? (function(v362){
3244                     return (l103.fvalue(pv, v362, "common-lisp") !== l5.value ? (function(){
3245                         l169.fvalue(pv, v359);
3246                         return l169.fvalue(values, v359);
3247                     })() : (l103.fvalue(pv, v362, "ecmalisp") !== l5.value ? l169.fvalue(values, v359) : (function(){
3248                         throw "Unknown reader form.";
3249                     })()));
3250                 })(l166.fvalue(pv, v359, (function(){
3251                     var symbol = l165;
3252                     var func = symbol.fvalue;
3253                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3254                     return func;
3255                 })())) : (function(){
3256                     throw "ECASE expression failed.";
3257                 })())))));
3258             })(l162.fvalue(pv, v359));
3259         })();
3260     }));
3261     return l171;
3262 })();
3263 var l172 = {name: "READ-SYMBOL"};
3264 (function(){
3265     (l172).fvalue = (function(v371){
3266         ((v371)["fname"] = "READ-SYMBOL");
3267         return v371;
3268     })((function (values,v364){
3269         checkArgs(arguments, 2);
3270         return (function(){
3271             return (function(v365,v366,v367,v368,v369){
3272                 (v369 = 0);
3273                 (function(){
3274                     return (function(){
3275                         while(((function(){
3276                             var x1 = v369;
3277                             if (typeof x1 !== 'number') throw 'Not a number!';
3278                             var x2 = v365;
3279                             if (typeof x2 !== 'number') throw 'Not a number!';
3280                             return (x1<x2?l4.value: l5.value);
3281                         })() !== l5.value ? l28.fvalue(pv, l84.fvalue(pv, (function(){
3282                             var string = v364;
3283                             var index = v369;
3284                             if (typeof string != 'string')
3285                                 throw 'The value ' + string + ' is not a type string.';
3286                             if (typeof index != 'number')
3287                                 throw 'The value ' + index + ' is not a type number.';
3288                             return string.charCodeAt(index);
3289                         })(), 58)) : l5.value) !== l5.value){
3290                             (v369 = (function(){
3291                                 var x1 = v369;
3292                                 if (typeof x1 !== 'number') throw 'Not a number!';
3293                                 return x1+1;
3294                             })());
3295                         }return l5.value;
3296                     })();
3297                 })();
3298                 ((function(){
3299                     var x1 = v369;
3300                     if (typeof x1 !== 'number') throw 'Not a number!';
3301                     var x2 = v365;
3302                     if (typeof x2 !== 'number') throw 'Not a number!';
3303                     return (x1==x2?l4.value: l5.value);
3304                 })() !== l5.value ? (function(){
3305                     (v367 = v364);
3306                     (v366 = (function(){
3307                         var symbol = l136;
3308                         var value = symbol.value;
3309                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3310                         return value;
3311                     })());
3312                     return (v368 = l4.value);
3313                 })() : (function(){
3314                     (l25.fvalue(pv, v369) !== l5.value ? (v366 = "KEYWORD") : (v366 = (function(){
3315                         var x = l98.fvalue(pv, v364, 0, v369);
3316                         if (typeof x != 'string')
3317                             throw 'The value ' + x + ' is not a type string.';
3318                         return x.toUpperCase();
3319                     })()));
3320                     (v369 = (function(){
3321                         var x1 = v369;
3322                         if (typeof x1 !== 'number') throw 'Not a number!';
3323                         return x1+1;
3324                     })());
3325                     (l84.fvalue(pv, (function(){
3326                         var string = v364;
3327                         var index = v369;
3328                         if (typeof string != 'string')
3329                             throw 'The value ' + string + ' is not a type string.';
3330                         if (typeof index != 'number')
3331                             throw 'The value ' + index + ' is not a type number.';
3332                         return string.charCodeAt(index);
3333                     })(), 58) !== l5.value ? (function(){
3334                         (v368 = l4.value);
3335                         return (v369 = (function(){
3336                             var x1 = v369;
3337                             if (typeof x1 !== 'number') throw 'Not a number!';
3338                             return x1+1;
3339                         })());
3340                     })() : l5.value);
3341                     return (v367 = l98.fvalue(pv, v364, v369));
3342                 })());
3343                 (v367 = (function(){
3344                     var x = v367;
3345                     if (typeof x != 'string')
3346                         throw 'The value ' + x + ' is not a type string.';
3347                     return x.toUpperCase();
3348                 })());
3349                 (v366 = l126.fvalue(pv, v366));
3350                 return ((function(v370){
3351                     return (v370 !== l5.value ? v370 : ((v366 === l126.fvalue(pv, "KEYWORD"))?l4.value: l5.value));
3352                 })(v368) !== l5.value ? l143.fvalue(values, v367, v366) : l139.fvalue(values, v367, v366));
3353             })(l72.fvalue(pv, v364),l5.value,l5.value,l5.value,l5.value);
3354         })();
3355     }));
3356     return l172;
3357 })();
3358 var l173 = {name: "!PARSE-INTEGER"};
3359 (function(){
3360     (l173).fvalue = (function(v382){
3361         ((v382)["fname"] = "!PARSE-INTEGER");
3362         return v382;
3363     })((function (values,v372,v373){
3364         checkArgs(arguments, 3);
3365         return (function(){
3366             return (function(){
3367                 try {
3368                     return (function(v374,v375,v376,v377){
3369                         (l25.fvalue(pv, v376) !== l5.value ? (function(){
3370                             var values = mv;
3371                             throw ({type: 'block', id: 144, values: values(l5.value, 0), message: 'Return from unknown block NIL.'})
3372                         })() : l5.value);
3373                         (function(v378){
3374                             return (l27.fvalue(pv, v378, 43) !== l5.value ? (v375 = (function(){
3375                                 var x1 = v375;
3376                                 if (typeof x1 !== 'number') throw 'Not a number!';
3377                                 return x1+1;
3378                             })()) : (l27.fvalue(pv, v378, 45) !== l5.value ? (function(){
3379                                 (v377 = -1);
3380                                 return (v375 = (function(){
3381                                     var x1 = v375;
3382                                     if (typeof x1 !== 'number') throw 'Not a number!';
3383                                     return x1+1;
3384                                 })());
3385                             })() : l5.value));
3386                         })((function(){
3387                             var string = v372;
3388                             var index = 0;
3389                             if (typeof string != 'string')
3390                                 throw 'The value ' + string + ' is not a type string.';
3391                             if (typeof index != 'number')
3392                                 throw 'The value ' + index + ' is not a type number.';
3393                             return string.charCodeAt(index);
3394                         })());
3395                         (((function(){
3396                             var x1 = v375;
3397                             if (typeof x1 !== 'number') throw 'Not a number!';
3398                             var x2 = v376;
3399                             if (typeof x2 !== 'number') throw 'Not a number!';
3400                             return (x1<x2?l4.value: l5.value);
3401                         })() !== l5.value ? (v374 = l96.fvalue(pv, (function(){
3402                             var string = v372;
3403                             var index = v375;
3404                             if (typeof string != 'string')
3405                                 throw 'The value ' + string + ' is not a type string.';
3406                             if (typeof index != 'number')
3407                                 throw 'The value ' + index + ' is not a type number.';
3408                             return string.charCodeAt(index);
3409                         })())) : l5.value) !== l5.value ? l5.value : (function(){
3410                             var values = mv;
3411                             throw ({type: 'block', id: 144, values: values(l5.value, v375), message: 'Return from unknown block NIL.'})
3412                         })());
3413                         (v375 = (function(){
3414                             var x1 = v375;
3415                             if (typeof x1 !== 'number') throw 'Not a number!';
3416                             return x1+1;
3417                         })());
3418                         (function(){
3419                             try {
3420                                 return (function(){
3421                                     while((function(){
3422                                         var x1 = v375;
3423                                         if (typeof x1 !== 'number') throw 'Not a number!';
3424                                         var x2 = v376;
3425                                         if (typeof x2 !== 'number') throw 'Not a number!';
3426                                         return (x1<x2?l4.value: l5.value);
3427                                     })() !== l5.value){
3428                                         (function(v379){
3429                                             (v379 !== l5.value ? l5.value : (function(){
3430                                                 throw ({type: 'block', id: 145, values: l5.value, message: 'Return from unknown block NIL.'})
3431                                             })());
3432                                             (v374 = (function(){
3433                                                 var x1 = (function(){
3434                                                     var x1 = v374;
3435                                                     if (typeof x1 !== 'number') throw 'Not a number!';
3436                                                     return x1*10;
3437                                                 })();
3438                                                 if (typeof x1 !== 'number') throw 'Not a number!';
3439                                                 var x2 = v379;
3440                                                 if (typeof x2 !== 'number') throw 'Not a number!';
3441                                                 return x1+x2;
3442                                             })());
3443                                             return (v375 = (function(){
3444                                                 var x1 = v375;
3445                                                 if (typeof x1 !== 'number') throw 'Not a number!';
3446                                                 return x1+1;
3447                                             })());
3448                                         })(l96.fvalue(pv, (function(){
3449                                             var string = v372;
3450                                             var index = v375;
3451                                             if (typeof string != 'string')
3452                                                 throw 'The value ' + string + ' is not a type string.';
3453                                             if (typeof index != 'number')
3454                                                 throw 'The value ' + index + ' is not a type number.';
3455                                             return string.charCodeAt(index);
3456                                         })()));
3457                                     }return l5.value;
3458                                 })();
3459                             }
3460                             catch (cf){
3461                                 if (cf.type == 'block' && cf.id == 145)
3462                                     return cf.values;
3463                                 else
3464                                     throw cf;
3465                             }
3466                         })();
3467                         return ((function(v380){
3468                             return (v380 !== l5.value ? v380 : (function(v381){
3469                                 return (v381 !== l5.value ? v381 : l84.fvalue(pv, (function(){
3470                                     var string = v372;
3471                                     var index = v375;
3472                                     if (typeof string != 'string')
3473                                         throw 'The value ' + string + ' is not a type string.';
3474                                     if (typeof index != 'number')
3475                                         throw 'The value ' + index + ' is not a type number.';
3476                                     return string.charCodeAt(index);
3477                                 })(), 32));
3478                             })((function(){
3479                                 var x1 = v375;
3480                                 if (typeof x1 !== 'number') throw 'Not a number!';
3481                                 var x2 = v376;
3482                                 if (typeof x2 !== 'number') throw 'Not a number!';
3483                                 return (x1==x2?l4.value: l5.value);
3484                             })()));
3485                         })(v373) !== l5.value ? values((function(){
3486                             var x1 = v377;
3487                             if (typeof x1 !== 'number') throw 'Not a number!';
3488                             var x2 = v374;
3489                             if (typeof x2 !== 'number') throw 'Not a number!';
3490                             return x1*x2;
3491                         })(), v375) : values(l5.value, v375));
3492                     })(0,0,l72.fvalue(pv, v372),1);
3493                 }
3494                 catch (cf){
3495                     if (cf.type == 'block' && cf.id == 144)
3496                         return values.apply(this, forcemv(cf.values));
3497                     else
3498                         throw cf;
3499                 }
3500             })();
3501         })();
3502     }));
3503     return l173;
3504 })();
3505 var l174 = {name: "PARSE-INTEGER"};
3506 (function(){
3507     (l174).fvalue = (function(v384){
3508         ((v384)["fname"] = "PARSE-INTEGER");
3509         return v384;
3510     })((function (values,v383){
3511         checkArgs(arguments, 2);
3512         return (function(){
3513             return l173.fvalue(values, v383, l5.value);
3514         })();
3515     }));
3516     return l174;
3517 })();
3518 var l175 = {name: "*EOF*"};
3519 (function(){
3520     (((l175.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l175).value = l17.fvalue(pv)));
3521     return l175;
3522 })();
3523 var l176 = {name: "QUOTE"};
3524 var l177 = {name: "BACKQUOTE"};
3525 var l178 = {name: "UNQUOTE-SPLICING"};
3526 var l179 = {name: "UNQUOTE"};
3527 (function(){
3528     (l169).fvalue = (function(v390){
3529         ((v390)["fname"] = "LS-READ");
3530         return v390;
3531     })((function (values,v385){
3532         checkArgs(arguments, 2);
3533         return (function(){
3534             l167.fvalue(pv, v385);
3535             return (function(v386){
3536                 return ((function(v387){
3537                     return (v387 !== l5.value ? v387 : l84.fvalue(pv, v386, 41));
3538                 })(l13.fvalue(pv, v386)) !== l5.value ? (function(){
3539                     var symbol = l175;
3540                     var value = symbol.value;
3541                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3542                     return value;
3543                 })() : (l84.fvalue(pv, v386, 40) !== l5.value ? (function(){
3544                     l162.fvalue(pv, v385);
3545                     return l168.fvalue(values, v385);
3546                 })() : (l84.fvalue(pv, v386, 39) !== l5.value ? (function(){
3547                     l162.fvalue(pv, v385);
3548                     return l45.fvalue(values, l176, l169.fvalue(pv, v385));
3549                 })() : (l84.fvalue(pv, v386, 96) !== l5.value ? (function(){
3550                     l162.fvalue(pv, v385);
3551                     return l45.fvalue(values, l177, l169.fvalue(pv, v385));
3552                 })() : (l84.fvalue(pv, v386, 34) !== l5.value ? (function(){
3553                     l162.fvalue(pv, v385);
3554                     return l170.fvalue(values, v385);
3555                 })() : (l84.fvalue(pv, v386, 44) !== l5.value ? (function(){
3556                     l162.fvalue(pv, v385);
3557                     return (l27.fvalue(pv, l161.fvalue(pv, v385), 64) !== l5.value ? (function(){
3558                         l162.fvalue(pv, v385);
3559                         return l45.fvalue(values, l178, l169.fvalue(pv, v385));
3560                     })() : l45.fvalue(values, l179, l169.fvalue(pv, v385)));
3561                 })() : (l84.fvalue(pv, v386, 35) !== l5.value ? l171.fvalue(values, v385) : (function(v388){
3562                     return (function(v389){
3563                         return (v389 !== l5.value ? v389 : l172.fvalue(values, v388));
3564                     })(pv(l173.fvalue(pv, v388, l5.value)));
3565                 })(l166.fvalue(pv, v385, (function(){
3566                     var symbol = l165;
3567                     var func = symbol.fvalue;
3568                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3569                     return func;
3570                 })())))))))));
3571             })(l161.fvalue(pv, v385));
3572         })();
3573     }));
3574     return l169;
3575 })();
3576 var l180 = {name: "LS-READ-FROM-STRING"};
3577 (function(){
3578     (l180).fvalue = (function(v392){
3579         ((v392)["fname"] = "LS-READ-FROM-STRING");
3580         return v392;
3581     })((function (values,v391){
3582         checkArgs(arguments, 2);
3583         return (function(){
3584             return l169.fvalue(values, l160.fvalue(pv, v391));
3585         })();
3586     }));
3587     return l180;
3588 })();
3589 var l181 = {name: "CODE"};
3590 (function(){
3591     (l181).fvalue = (function(v395){
3592         ((v395)["fname"] = "CODE");
3593         return v395;
3594     })((function (values){
3595         var v393= l5.value;
3596         for (var i = arguments.length-1; i>=1; i--)
3597             v393 = {car: arguments[i], cdr:
3598         v393};
3599         return (function(){
3600             return l151.fvalue(values, (function (values,v394){
3601                 checkArgs(arguments, 2);
3602                 return (l13.fvalue(pv, v394) !== l5.value ? "" : (l85.fvalue(pv, v394) !== l5.value ? l18.fvalue(values, v394) : (((typeof(v394) == "string")?l4.value: l5.value) !== l5.value ? v394 : (function(){
3603                     throw "Unknown argument.";
3604                 })())));
3605             }), v393);
3606         })();
3607     }));
3608     return l181;
3609 })();
3610 var l182 = {name: "JS!BOOL"};
3611 var l183 = {name: "LS-COMPILE"};
3612 (function(){
3613     (l182).fvalue = (function(v397){
3614         ((v397)["fname"] = "JS!BOOL");
3615         return v397;
3616     })((function (values,v396){
3617         checkArgs(arguments, 2);
3618         return (function(){
3619             return l181.fvalue(values, "(", v396, "?", l183.fvalue(pv, l4.value), ": ", l183.fvalue(pv, l5.value), ")");
3620         })();
3621     }));
3622     return l182;
3623 })();
3624 var l184 = {name: "JS!SELFCALL"};
3625 l184;
3626 var l185 = {name: "INDENT"};
3627 (function(){
3628     (l185).fvalue = (function(v404){
3629         ((v404)["fname"] = "INDENT");
3630         return v404;
3631     })((function (values){
3632         var v398= l5.value;
3633         for (var i = arguments.length-1; i>=1; i--)
3634             v398 = {car: arguments[i], cdr:
3635         v398};
3636         return (function(){
3637             return (function(v399){
3638                 return (function(v400,v401,v402){
3639                     (l86.fvalue(pv, l72.fvalue(pv, v399)) !== l5.value ? (v400 = l147.fvalue(pv, v400, "    ")) : l5.value);
3640                     (function(){
3641                         return (function(){
3642                             while((function(){
3643                                 var x1 = v401;
3644                                 if (typeof x1 !== 'number') throw 'Not a number!';
3645                                 var x2 = v402;
3646                                 if (typeof x2 !== 'number') throw 'Not a number!';
3647                                 return (x1<x2?l4.value: l5.value);
3648                             })() !== l5.value){
3649                                 (function(v403){
3650                                     return (v400 = l147.fvalue(pv, v400, v403));
3651                                 })(((l84.fvalue(pv, (function(){
3652                                     var string = v399;
3653                                     var index = v401;
3654                                     if (typeof string != 'string')
3655                                         throw 'The value ' + string + ' is not a type string.';
3656                                     if (typeof index != 'number')
3657                                         throw 'The value ' + index + ' is not a type number.';
3658                                     return string.charCodeAt(index);
3659                                 })(), 10) !== l5.value ? ((function(){
3660                                     var x1 = v401;
3661                                     if (typeof x1 !== 'number') throw 'Not a number!';
3662                                     var x2 = l24.fvalue(pv, v402);
3663                                     if (typeof x2 !== 'number') throw 'Not a number!';
3664                                     return (x1<x2?l4.value: l5.value);
3665                                 })() !== l5.value ? l28.fvalue(pv, l84.fvalue(pv, (function(){
3666                                     var string = v399;
3667                                     var index = l23.fvalue(pv, v401);
3668                                     if (typeof string != 'string')
3669                                         throw 'The value ' + string + ' is not a type string.';
3670                                     if (typeof index != 'number')
3671                                         throw 'The value ' + index + ' is not a type number.';
3672                                     return string.charCodeAt(index);
3673                                 })(), 10)) : l5.value) : l5.value) !== l5.value ? l147.fvalue(pv, l102.fvalue(pv, 10), "    ") : l102.fvalue(pv, (function(){
3674                                     var string = v399;
3675                                     var index = v401;
3676                                     if (typeof string != 'string')
3677                                         throw 'The value ' + string + ' is not a type string.';
3678                                     if (typeof index != 'number')
3679                                         throw 'The value ' + index + ' is not a type number.';
3680                                     return string.charCodeAt(index);
3681                                 })())));
3682                                 (v401 = (function(){
3683                                     var x1 = v401;
3684                                     if (typeof x1 !== 'number') throw 'Not a number!';
3685                                     return x1+1;
3686                                 })());
3687                             }return l5.value;
3688                         })();
3689                     })();
3690                     return v400;
3691                 })("",0,l72.fvalue(pv, v399));
3692             })((function(){
3693                 var f = (function(){
3694                     var symbol = l181;
3695                     var func = symbol.fvalue;
3696                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3697                     return func;
3698                 })();
3699                 var args = [pv];
3700                 var tail = (v398);
3701                 while (tail != l5.value){
3702                     args.push(tail.car);
3703                     tail = tail.cdr;
3704                 }
3705                 return f.apply(this, args);
3706             })());
3707         })();
3708     }));
3709     return l185;
3710 })();
3711 var l186 = {name: "*MULTIPLE-VALUE-P*"};
3712 (function(){
3713     (((l186.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l186).value = l5.value));
3714     return l186;
3715 })();
3716 var l187 = {name: "MAKE-BINDING"};
3717 (function(){
3718     (l187).fvalue = (function(v409){
3719         ((v409)["fname"] = "MAKE-BINDING");
3720         return v409;
3721     })((function (values,v405,v406,v407,v408){
3722         checkArgsAtLeast(arguments, 4);
3723         checkArgsAtMost(arguments, 5);
3724         switch(arguments.length-1){
3725         case 3:
3726         v408=l5.value;
3727         default: break;
3728         }
3729         return (function(){
3730             return l45.fvalue(values, v405, v406, v407, v408);
3731         })();
3732     }));
3733     return l187;
3734 })();
3735 var l188 = {name: "BINDING-NAME"};
3736 (function(){
3737     (l188).fvalue = (function(v411){
3738         ((v411)["fname"] = "BINDING-NAME");
3739         return v411;
3740     })((function (values,v410){
3741         checkArgs(arguments, 2);
3742         return (function(){
3743             return l40.fvalue(values, v410);
3744         })();
3745     }));
3746     return l188;
3747 })();
3748 var l189 = {name: "BINDING-TYPE"};
3749 (function(){
3750     (l189).fvalue = (function(v413){
3751         ((v413)["fname"] = "BINDING-TYPE");
3752         return v413;
3753     })((function (values,v412){
3754         checkArgs(arguments, 2);
3755         return (function(){
3756             return l41.fvalue(values, v412);
3757         })();
3758     }));
3759     return l189;
3760 })();
3761 var l190 = {name: "BINDING-VALUE"};
3762 (function(){
3763     (l190).fvalue = (function(v415){
3764         ((v415)["fname"] = "BINDING-VALUE");
3765         return v415;
3766     })((function (values,v414){
3767         checkArgs(arguments, 2);
3768         return (function(){
3769             return l42.fvalue(values, v414);
3770         })();
3771     }));
3772     return l190;
3773 })();
3774 var l191 = {name: "BINDING-DECLARATIONS"};
3775 (function(){
3776     (l191).fvalue = (function(v417){
3777         ((v417)["fname"] = "BINDING-DECLARATIONS");
3778         return v417;
3779     })((function (values,v416){
3780         checkArgs(arguments, 2);
3781         return (function(){
3782             return l43.fvalue(values, v416);
3783         })();
3784     }));
3785     return l191;
3786 })();
3787 var l192 = {name: "SET-BINDING-VALUE"};
3788 (function(){
3789     (l192).fvalue = (function(v420){
3790         ((v420)["fname"] = "SET-BINDING-VALUE");
3791         return v420;
3792     })((function (values,v418,v419){
3793         checkArgs(arguments, 3);
3794         return (function(){
3795             return (function(){
3796                 var x = l36.fvalue(pv, v418);
3797                 if (typeof x != 'object')
3798                     throw 'The value ' + x + ' is not a type object.';
3799                 return (x.car = v419, x);
3800             })();
3801         })();
3802     }));
3803     return l192;
3804 })();
3805 var l193 = {name: "SET-BINDING-DECLARATIONS"};
3806 (function(){
3807     (l193).fvalue = (function(v423){
3808         ((v423)["fname"] = "SET-BINDING-DECLARATIONS");
3809         return v423;
3810     })((function (values,v421,v422){
3811         checkArgs(arguments, 3);
3812         return (function(){
3813             return (function(){
3814                 var x = l38.fvalue(pv, v421);
3815                 if (typeof x != 'object')
3816                     throw 'The value ' + x + ' is not a type object.';
3817                 return (x.car = v422, x);
3818             })();
3819         })();
3820     }));
3821     return l193;
3822 })();
3823 var l194 = {name: "PUSH-BINDING-DECLARATION"};
3824 (function(){
3825     (l194).fvalue = (function(v426){
3826         ((v426)["fname"] = "PUSH-BINDING-DECLARATION");
3827         return v426;
3828     })((function (values,v424,v425){
3829         checkArgs(arguments, 3);
3830         return (function(){
3831             return l193.fvalue(values, v425, ({car: v424, cdr: l191.fvalue(pv, v425)}));
3832         })();
3833     }));
3834     return l194;
3835 })();
3836 var l195 = {name: "MAKE-LEXENV"};
3837 (function(){
3838     (l195).fvalue = (function(v427){
3839         ((v427)["fname"] = "MAKE-LEXENV");
3840         return v427;
3841     })((function (values){
3842         checkArgsAtMost(arguments, 1);
3843         return (function(){
3844             return l45.fvalue(values, l5.value, l5.value, l5.value, l5.value);
3845         })();
3846     }));
3847     return l195;
3848 })();
3849 var l196 = {name: "COPY-LEXENV"};
3850 (function(){
3851     (l196).fvalue = (function(v429){
3852         ((v429)["fname"] = "COPY-LEXENV");
3853         return v429;
3854     })((function (values,v428){
3855         checkArgs(arguments, 2);
3856         return (function(){
3857             return l81.fvalue(values, v428);
3858         })();
3859     }));
3860     return l196;
3861 })();
3862 var l197 = {name: "PUSH-TO-LEXENV"};
3863 var l198 = {name: "BLOCK"};
3864 var l199 = {name: "GOTAG"};
3865 (function(){
3866     (l197).fvalue = (function(v434){
3867         ((v434)["fname"] = "PUSH-TO-LEXENV");
3868         return v434;
3869     })((function (values,v430,v431,v432){
3870         checkArgs(arguments, 4);
3871         return (function(){
3872             return (function(v433){
3873                 return (l27.fvalue(pv, v433, l109) !== l5.value ? (function(){
3874                     var x = v431;
3875                     if (typeof x != 'object')
3876                         throw 'The value ' + x + ' is not a type object.';
3877                     return (x.car = ({car: v430, cdr: (function(){
3878                         var tmp = v431;
3879                         return tmp === l5.value? l5.value: tmp.car;
3880                     })()}), x);
3881                 })() : (l27.fvalue(pv, v433, l108) !== l5.value ? (function(){
3882                     var x = (function(){
3883                         var tmp = v431;
3884                         return tmp === l5.value? l5.value: tmp.cdr;
3885                     })();
3886                     if (typeof x != 'object')
3887                         throw 'The value ' + x + ' is not a type object.';
3888                     return (x.car = ({car: v430, cdr: l34.fvalue(pv, v431)}), x);
3889                 })() : (l27.fvalue(pv, v433, l198) !== l5.value ? (function(){
3890                     var x = l36.fvalue(pv, v431);
3891                     if (typeof x != 'object')
3892                         throw 'The value ' + x + ' is not a type object.';
3893                     return (x.car = ({car: v430, cdr: l37.fvalue(pv, v431)}), x);
3894                 })() : (l27.fvalue(pv, v433, l199) !== l5.value ? (function(){
3895                     var x = l38.fvalue(pv, v431);
3896                     if (typeof x != 'object')
3897                         throw 'The value ' + x + ' is not a type object.';
3898                     return (x.car = ({car: v430, cdr: l39.fvalue(pv, v431)}), x);
3899                 })() : (function(){
3900                     throw "ECASE expression failed.";
3901                 })()))));
3902             })(v432);
3903         })();
3904     }));
3905     return l197;
3906 })();
3907 var l200 = {name: "EXTEND-LEXENV"};
3908 (function(){
3909     (l200).fvalue = (function(v441){
3910         ((v441)["fname"] = "EXTEND-LEXENV");
3911         return v441;
3912     })((function (values,v435,v436,v437){
3913         checkArgs(arguments, 4);
3914         return (function(){
3915             return (function(v438){
3916                 return (function(){
3917                     return (function(v439,v440){
3918                         (function(){
3919                             while(v439 !== l5.value){
3920                                 (v440 = (function(){
3921                                     var tmp = v439;
3922                                     return tmp === l5.value? l5.value: tmp.car;
3923                                 })());
3924                                 (function(){
3925                                     l197.fvalue(pv, v440, v438, v437);
3926                                     return l5.value;
3927                                 })();
3928                                 (v439 = (function(){
3929                                     var tmp = v439;
3930                                     return tmp === l5.value? l5.value: tmp.cdr;
3931                                 })());
3932                             }return l5.value;
3933                         })();
3934                         return v438;
3935                     })(l67.fvalue(pv, v435),l5.value);
3936                 })();
3937             })(l196.fvalue(pv, v436));
3938         })();
3939     }));
3940     return l200;
3941 })();
3942 var l201 = {name: "LOOKUP-IN-LEXENV"};
3943 (function(){
3944     (l201).fvalue = (function(v446){
3945         ((v446)["fname"] = "LOOKUP-IN-LEXENV");
3946         return v446;
3947     })((function (values,v442,v443,v444){
3948         checkArgs(arguments, 4);
3949         return (function(){
3950             return l101.fvalue(values, v442, (function(v445){
3951                 return (l27.fvalue(pv, v445, l109) !== l5.value ? l40.fvalue(pv, v443) : (l27.fvalue(pv, v445, l108) !== l5.value ? l41.fvalue(pv, v443) : (l27.fvalue(pv, v445, l198) !== l5.value ? l42.fvalue(pv, v443) : (l27.fvalue(pv, v445, l199) !== l5.value ? l43.fvalue(pv, v443) : (function(){
3952                     throw "ECASE expression failed.";
3953                 })()))));
3954             })(v444));
3955         })();
3956     }));
3957     return l201;
3958 })();
3959 var l202 = {name: "*ENVIRONMENT*"};
3960 (function(){
3961     (((l202.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l202).value = l195.fvalue(pv)));
3962     return l202;
3963 })();
3964 var l203 = {name: "*VARIABLE-COUNTER*"};
3965 (function(){
3966     (((l203.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l203).value = 0));
3967     return l203;
3968 })();
3969 var l204 = {name: "GVARNAME"};
3970 (function(){
3971     (l204).fvalue = (function(v448){
3972         ((v448)["fname"] = "GVARNAME");
3973         return v448;
3974     })((function (values,v447){
3975         checkArgs(arguments, 2);
3976         return (function(){
3977             return l181.fvalue(values, "v", ((l203).value = (function(){
3978                 var x1 = (function(){
3979                     var symbol = l203;
3980                     var value = symbol.value;
3981                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3982                     return value;
3983                 })();
3984                 if (typeof x1 !== 'number') throw 'Not a number!';
3985                 return x1+1;
3986             })()));
3987         })();
3988     }));
3989     return l204;
3990 })();
3991 var l205 = {name: "TRANSLATE-VARIABLE"};
3992 (function(){
3993     (l205).fvalue = (function(v450){
3994         ((v450)["fname"] = "TRANSLATE-VARIABLE");
3995         return v450;
3996     })((function (values,v449){
3997         checkArgs(arguments, 2);
3998         return (function(){
3999             return l190.fvalue(values, l201.fvalue(pv, v449, (function(){
4000                 var symbol = l202;
4001                 var value = symbol.value;
4002                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4003                 return value;
4004             })(), l109));
4005         })();
4006     }));
4007     return l205;
4008 })();
4009 var l206 = {name: "EXTEND-LOCAL-ENV"};
4010 (function(){
4011     (l206).fvalue = (function(v456){
4012         ((v456)["fname"] = "EXTEND-LOCAL-ENV");
4013         return v456;
4014     })((function (values,v451){
4015         checkArgs(arguments, 2);
4016         return (function(){
4017             return (function(v452){
4018                 return (function(){
4019                     return (function(v453,v454){
4020                         (function(){
4021                             while(v453 !== l5.value){
4022                                 (v454 = (function(){
4023                                     var tmp = v453;
4024                                     return tmp === l5.value? l5.value: tmp.car;
4025                                 })());
4026                                 (function(){
4027                                     (function(v455){
4028                                         return l197.fvalue(pv, v455, v452, l109);
4029                                     })(l187.fvalue(pv, v454, l109, l204.fvalue(pv, v454)));
4030                                     return l5.value;
4031                                 })();
4032                                 (v453 = (function(){
4033                                     var tmp = v453;
4034                                     return tmp === l5.value? l5.value: tmp.cdr;
4035                                 })());
4036                             }return l5.value;
4037                         })();
4038                         return v452;
4039                     })(v451,l5.value);
4040                 })();
4041             })(l196.fvalue(pv, (function(){
4042                 var symbol = l202;
4043                 var value = symbol.value;
4044                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4045                 return value;
4046             })()));
4047         })();
4048     }));
4049     return l206;
4050 })();
4051 var l207 = {name: "*TOPLEVEL-COMPILATIONS*"};
4052 (function(){
4053     (((l207.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l207).value = l5.value));
4054     return l207;
4055 })();
4056 var l208 = {name: "TOPLEVEL-COMPILATION"};
4057 (function(){
4058     (l208).fvalue = (function(v458){
4059         ((v458)["fname"] = "TOPLEVEL-COMPILATION");
4060         return v458;
4061     })((function (values,v457){
4062         checkArgs(arguments, 2);
4063         return (function(){
4064             return ((l207).value = ({car: v457, cdr: (function(){
4065                 var symbol = l207;
4066                 var value = symbol.value;
4067                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4068                 return value;
4069             })()}));
4070         })();
4071     }));
4072     return l208;
4073 })();
4074 var l209 = {name: "NULL-OR-EMPTY-P"};
4075 (function(){
4076     (l209).fvalue = (function(v460){
4077         ((v460)["fname"] = "NULL-OR-EMPTY-P");
4078         return v460;
4079     })((function (values,v459){
4080         checkArgs(arguments, 2);
4081         return (function(){
4082             return l25.fvalue(values, l72.fvalue(pv, v459));
4083         })();
4084     }));
4085     return l209;
4086 })();
4087 var l210 = {name: "GET-TOPLEVEL-COMPILATIONS"};
4088 (function(){
4089     (l210).fvalue = (function(v461){
4090         ((v461)["fname"] = "GET-TOPLEVEL-COMPILATIONS");
4091         return v461;
4092     })((function (values){
4093         checkArgsAtMost(arguments, 1);
4094         return (function(){
4095             return l67.fvalue(values, l94.fvalue(pv, (function(){
4096                 var symbol = l209;
4097                 var func = symbol.fvalue;
4098                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4099                 return func;
4100             })(), (function(){
4101                 var symbol = l207;
4102                 var value = symbol.value;
4103                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4104                 return value;
4105             })()));
4106         })();
4107     }));
4108     return l210;
4109 })();
4110 var l211 = {name: "%COMPILE-DEFMACRO"};
4111 var l212 = {name: "MACRO"};
4112 (function(){
4113     (l211).fvalue = (function(v464){
4114         ((v464)["fname"] = "%COMPILE-DEFMACRO");
4115         return v464;
4116     })((function (values,v462,v463){
4117         checkArgs(arguments, 3);
4118         return (function(){
4119             l208.fvalue(pv, l183.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l176), l45.fvalue(pv, v462))));
4120             l197.fvalue(pv, l187.fvalue(pv, v462, l212, v463), (function(){
4121                 var symbol = l202;
4122                 var value = symbol.value;
4123                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4124                 return value;
4125             })(), l108);
4126             return v462;
4127         })();
4128     }));
4129     return l211;
4130 })();
4131 var l213 = {name: "GLOBAL-BINDING"};
4132 (function(){
4133     (l213).fvalue = (function(v470){
4134         ((v470)["fname"] = "GLOBAL-BINDING");
4135         return v470;
4136     })((function (values,v465,v466,v467){
4137         checkArgs(arguments, 4);
4138         return (function(){
4139             return (function(v468){
4140                 return (v468 !== l5.value ? v468 : (function(v469){
4141                     l197.fvalue(pv, v469, (function(){
4142                         var symbol = l202;
4143                         var value = symbol.value;
4144                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4145                         return value;
4146                     })(), v467);
4147                     return v469;
4148                 })(l187.fvalue(pv, v465, v466, l5.value)));
4149             })(l201.fvalue(pv, v465, (function(){
4150                 var symbol = l202;
4151                 var value = symbol.value;
4152                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4153                 return value;
4154             })(), v467));
4155         })();
4156     }));
4157     return l213;
4158 })();
4159 var l214 = {name: "CLAIMP"};
4160 (function(){
4161     (l214).fvalue = (function(v475){
4162         ((v475)["fname"] = "CLAIMP");
4163         return v475;
4164     })((function (values,v471,v472,v473){
4165         checkArgs(arguments, 4);
4166         return (function(){
4167             return (function(v474){
4168                 return (v474 !== l5.value ? l92.fvalue(values, v473, l191.fvalue(pv, v474)) : l5.value);
4169             })(l201.fvalue(pv, v471, (function(){
4170                 var symbol = l202;
4171                 var value = symbol.value;
4172                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4173                 return value;
4174             })(), v472));
4175         })();
4176     }));
4177     return l214;
4178 })();
4179 var l215 = {name: "!PROCLAIM"};
4180 var l216 = {name: "SPECIAL"};
4181 var l217 = {name: "NOTINLINE"};
4182 var l218 = {name: "CONSTANT"};
4183 (function(){
4184     (l215).fvalue = (function(v487){
4185         ((v487)["fname"] = "!PROCLAIM");
4186         return v487;
4187     })((function (values,v476){
4188         checkArgs(arguments, 2);
4189         return (function(){
4190             return (function(v477){
4191                 return (l27.fvalue(pv, v477, l216) !== l5.value ? (function(){
4192                     return (function(v478,v479){
4193                         (function(){
4194                             while(v478 !== l5.value){
4195                                 (v479 = (function(){
4196                                     var tmp = v478;
4197                                     return tmp === l5.value? l5.value: tmp.car;
4198                                 })());
4199                                 (function(){
4200                                     (function(v480){
4201                                         return l194.fvalue(pv, l216, v480);
4202                                     })(l213.fvalue(pv, v479, l109, l109));
4203                                     return l5.value;
4204                                 })();
4205                                 (v478 = (function(){
4206                                     var tmp = v478;
4207                                     return tmp === l5.value? l5.value: tmp.cdr;
4208                                 })());
4209                             }return l5.value;
4210                         })();
4211                         return l5.value;
4212                     })((function(){
4213                         var tmp = v476;
4214                         return tmp === l5.value? l5.value: tmp.cdr;
4215                     })(),l5.value);
4216                 })() : (l27.fvalue(pv, v477, l217) !== l5.value ? (function(){
4217                     return (function(v481,v482){
4218                         (function(){
4219                             while(v481 !== l5.value){
4220                                 (v482 = (function(){
4221                                     var tmp = v481;
4222                                     return tmp === l5.value? l5.value: tmp.car;
4223                                 })());
4224                                 (function(){
4225                                     (function(v483){
4226                                         return l194.fvalue(pv, l217, v483);
4227                                     })(l213.fvalue(pv, v482, l108, l108));
4228                                     return l5.value;
4229                                 })();
4230                                 (v481 = (function(){
4231                                     var tmp = v481;
4232                                     return tmp === l5.value? l5.value: tmp.cdr;
4233                                 })());
4234                             }return l5.value;
4235                         })();
4236                         return l5.value;
4237                     })((function(){
4238                         var tmp = v476;
4239                         return tmp === l5.value? l5.value: tmp.cdr;
4240                     })(),l5.value);
4241                 })() : (l27.fvalue(pv, v477, l218) !== l5.value ? (function(){
4242                     return (function(v484,v485){
4243                         (function(){
4244                             while(v484 !== l5.value){
4245                                 (v485 = (function(){
4246                                     var tmp = v484;
4247                                     return tmp === l5.value? l5.value: tmp.car;
4248                                 })());
4249                                 (function(){
4250                                     (function(v486){
4251                                         return l194.fvalue(pv, l218, v486);
4252                                     })(l213.fvalue(pv, v485, l109, l109));
4253                                     return l5.value;
4254                                 })();
4255                                 (v484 = (function(){
4256                                     var tmp = v484;
4257                                     return tmp === l5.value? l5.value: tmp.cdr;
4258                                 })());
4259                             }return l5.value;
4260                         })();
4261                         return l5.value;
4262                     })((function(){
4263                         var tmp = v476;
4264                         return tmp === l5.value? l5.value: tmp.cdr;
4265                     })(),l5.value);
4266                 })() : l5.value)));
4267             })((function(){
4268                 var tmp = v476;
4269                 return tmp === l5.value? l5.value: tmp.car;
4270             })());
4271         })();
4272     }));
4273     return l215;
4274 })();
4275 var l219 = {name: "PROCLAIM"};
4276 (l219).fvalue = (function(){
4277     var symbol = l215;
4278     var func = symbol.fvalue;
4279     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4280     return func;
4281 })();
4282 var l220 = {name: "*COMPILATIONS*"};
4283 (function(){
4284     (((l220.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l220).value = l5.value));
4285     return l220;
4286 })();
4287 var l221 = {name: "DEFINE-COMPILATION"};
4288 l221;
4289 var l222 = {name: "IF"};
4290 ((l220).value = ({car: l45.fvalue(pv, l222, (function (values,v488,v489,v490){
4291     checkArgs(arguments, 4);
4292     return (function(){
4293         return l181.fvalue(values, "(", l183.fvalue(pv, v488), " !== ", l183.fvalue(pv, l5.value), " ? ", l183.fvalue(pv, v489, (function(){
4294             var symbol = l186;
4295             var value = symbol.value;
4296             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4297             return value;
4298         })()), " : ", l183.fvalue(pv, v490, (function(){
4299             var symbol = l186;
4300             var value = symbol.value;
4301             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4302             return value;
4303         })()), ")");
4304     })();
4305 })), cdr: (function(){
4306     var symbol = l220;
4307     var value = symbol.value;
4308     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4309     return value;
4310 })()}));
4311 var l223 = {name: "*LAMBDA-LIST-KEYWORDS*"};
4312 var l224 = {name: "&OPTIONAL"};
4313 var l225 = {name: "&REST"};
4314 var l226 = {name: "&KEY"};
4315 var l227 = QIList(l224,l225,l226,l5);
4316 (function(){
4317     (((l223.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l223).value = l227));
4318     return l223;
4319 })();
4320 var l228 = {name: "LIST-UNTIL-KEYWORD"};
4321 (function(){
4322     (l228).fvalue = (function(v493){
4323         ((v493)["fname"] = "LIST-UNTIL-KEYWORD");
4324         return v493;
4325     })((function (values,v491){
4326         checkArgs(arguments, 2);
4327         return (function(){
4328             return ((function(v492){
4329                 return (v492 !== l5.value ? v492 : l92.fvalue(pv, (function(){
4330                     var tmp = v491;
4331                     return tmp === l5.value? l5.value: tmp.car;
4332                 })(), (function(){
4333                     var symbol = l223;
4334                     var value = symbol.value;
4335                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4336                     return value;
4337                 })()));
4338             })(l13.fvalue(pv, v491)) !== l5.value ? l5.value : ({car: (function(){
4339                 var tmp = v491;
4340                 return tmp === l5.value? l5.value: tmp.car;
4341             })(), cdr: l228.fvalue(pv, (function(){
4342                 var tmp = v491;
4343                 return tmp === l5.value? l5.value: tmp.cdr;
4344             })())}));
4345         })();
4346     }));
4347     return l228;
4348 })();
4349 var l229 = {name: "LAMBDA-LIST-SECTION"};
4350 (function(){
4351     (l229).fvalue = (function(v496){
4352         ((v496)["fname"] = "LAMBDA-LIST-SECTION");
4353         return v496;
4354     })((function (values,v494,v495){
4355         checkArgs(arguments, 3);
4356         return (function(){
4357             return l228.fvalue(values, (function(){
4358                 var tmp = l92.fvalue(pv, v494, v495);
4359                 return tmp === l5.value? l5.value: tmp.cdr;
4360             })());
4361         })();
4362     }));
4363     return l229;
4364 })();
4365 var l230 = {name: "LAMBDA-LIST-REQUIRED-ARGUMENTS"};
4366 (function(){
4367     (l230).fvalue = (function(v498){
4368         ((v498)["fname"] = "LAMBDA-LIST-REQUIRED-ARGUMENTS");
4369         return v498;
4370     })((function (values,v497){
4371         checkArgs(arguments, 2);
4372         return (function(){
4373             return l228.fvalue(values, v497);
4374         })();
4375     }));
4376     return l230;
4377 })();
4378 var l231 = {name: "LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT"};
4379 (function(){
4380     (l231).fvalue = (function(v500){
4381         ((v500)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT");
4382         return v500;
4383     })((function (values,v499){
4384         checkArgs(arguments, 2);
4385         return (function(){
4386             return l78.fvalue(values, (function(){
4387                 var symbol = l59;
4388                 var func = symbol.fvalue;
4389                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4390                 return func;
4391             })(), l229.fvalue(pv, l224, v499));
4392         })();
4393     }));
4394     return l231;
4395 })();
4396 var l232 = {name: "LAMBDA-LIST-OPTIONAL-ARGUMENTS"};
4397 (function(){
4398     (l232).fvalue = (function(v502){
4399         ((v502)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS");
4400         return v502;
4401     })((function (values,v501){
4402         checkArgs(arguments, 2);
4403         return (function(){
4404             return l78.fvalue(values, (function(){
4405                 var symbol = l31;
4406                 var func = symbol.fvalue;
4407                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4408                 return func;
4409             })(), l231.fvalue(pv, v501));
4410         })();
4411     }));
4412     return l232;
4413 })();
4414 var l233 = {name: "LAMBDA-LIST-REST-ARGUMENT"};
4415 (function(){
4416     (l233).fvalue = (function(v505){
4417         ((v505)["fname"] = "LAMBDA-LIST-REST-ARGUMENT");
4418         return v505;
4419     })((function (values,v503){
4420         checkArgs(arguments, 2);
4421         return (function(){
4422             return (function(v504){
4423                 ((function(){
4424                     var tmp = v504;
4425                     return tmp === l5.value? l5.value: tmp.cdr;
4426                 })() !== l5.value ? (function(){
4427                     throw "Bad lambda-list";
4428                 })() : l5.value);
4429                 return (function(){
4430                     var tmp = v504;
4431                     return tmp === l5.value? l5.value: tmp.car;
4432                 })();
4433             })(l229.fvalue(pv, l225, v503));
4434         })();
4435     }));
4436     return l233;
4437 })();
4438 var l234 = {name: "LAMBDA-LIST-KEYWORD-ARGUMENTS-CANONICAL"};
4439 (function(){
4440     (l234).fvalue = (function(v513){
4441         ((v513)["fname"] = "LAMBDA-LIST-KEYWORD-ARGUMENTS-CANONICAL");
4442         return v513;
4443     })((function (values,v506){
4444         checkArgs(arguments, 2);
4445         return (function(){
4446             return (function(v512){
4447                 return l78.fvalue(values, v512, l229.fvalue(pv, l226, v506));
4448             })((function (values,v507){
4449                 checkArgs(arguments, 2);
4450                 return (function(){
4451                     var v508 = l59.fvalue(pv, v507);
4452                     var v509 = l34.fvalue(pv, v508);
4453                     var v510 = l5.value;
4454                     var v511 = l5.value;
4455                     (l60.fvalue(pv, (function(){
4456                         var tmp = v508;
4457                         return tmp === l5.value? l5.value: tmp.car;
4458                     })()) !== l5.value ? (v510 = l34.fvalue(pv, (function(){
4459                         var tmp = v508;
4460                         return tmp === l5.value? l5.value: tmp.car;
4461                     })()), v511 = (function(){
4462                         var tmp = (function(){
4463                             var tmp = v508;
4464                             return tmp === l5.value? l5.value: tmp.car;
4465                         })();
4466                         return tmp === l5.value? l5.value: tmp.car;
4467                     })()) : (v510 = (function(){
4468                         var tmp = v508;
4469                         return tmp === l5.value? l5.value: tmp.car;
4470                     })(), v511 = l143.fvalue(pv, ((function(){
4471                         var tmp = v508;
4472                         return tmp === l5.value? l5.value: tmp.car;
4473                     })()).name, "KEYWORD")));
4474                     return l65.fvalue(pv, l45.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, v511), l45.fvalue(pv, v510))), l45.fvalue(pv, v509));
4475                 })();
4476             }));
4477         })();
4478     }));
4479     return l234;
4480 })();
4481 var l235 = {name: "LAMBDA-LIST-KEYWORD-ARGUMENTS"};
4482 (function(){
4483     (l235).fvalue = (function(v516){
4484         ((v516)["fname"] = "LAMBDA-LIST-KEYWORD-ARGUMENTS");
4485         return v516;
4486     })((function (values,v514){
4487         checkArgs(arguments, 2);
4488         return (function(){
4489             return l78.fvalue(values, (function (values,v515){
4490                 checkArgs(arguments, 2);
4491                 return l41.fvalue(values, l40.fvalue(pv, v515));
4492             }), l234.fvalue(pv, v514));
4493         })();
4494     }));
4495     return l235;
4496 })();
4497 var l236 = {name: "LAMBDA-DOCSTRING-WRAPPER"};
4498 (function(){
4499     (l236).fvalue = (function(v519){
4500         ((v519)["fname"] = "LAMBDA-DOCSTRING-WRAPPER");
4501         return v519;
4502     })((function (values,v518){
4503         checkArgsAtLeast(arguments, 2);
4504         var v517= l5.value;
4505         for (var i = arguments.length-1; i>=2; i--)
4506             v517 = {car: arguments[i], cdr:
4507         v517};
4508         return (function(){
4509             return (v518 !== l5.value ? l181.fvalue(values, "(function(){", (function(){
4510                 var symbol = l146;
4511                 var value = symbol.value;
4512                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4513                 return value;
4514             })(), l185.fvalue(pv, "var func = ", l149.fvalue(pv, v517), ";", (function(){
4515                 var symbol = l146;
4516                 var value = symbol.value;
4517                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4518                 return value;
4519             })(), "func.docstring = '", v518, "';", (function(){
4520                 var symbol = l146;
4521                 var value = symbol.value;
4522                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4523                 return value;
4524             })(), "return func;", (function(){
4525                 var symbol = l146;
4526                 var value = symbol.value;
4527                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4528                 return value;
4529             })()), "})()") : (function(){
4530                 var f = (function(){
4531                     var symbol = l181;
4532                     var func = symbol.fvalue;
4533                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4534                     return func;
4535                 })();
4536                 var args = [values];
4537                 var tail = (v517);
4538                 while (tail != l5.value){
4539                     args.push(tail.car);
4540                     tail = tail.cdr;
4541                 }
4542                 return f.apply(this, args);
4543             })());
4544         })();
4545     }));
4546     return l236;
4547 })();
4548 var l237 = {name: "LAMBDA-CHECK-ARGUMENT-COUNT"};
4549 var l238 = {name: "N/A"};
4550 (function(){
4551     (l237).fvalue = (function(v525){
4552         ((v525)["fname"] = "LAMBDA-CHECK-ARGUMENT-COUNT");
4553         return v525;
4554     })((function (values,v520,v521,v522){
4555         checkArgs(arguments, 4);
4556         return (function(){
4557             return (function(v523,v524){
4558                 return (function(){
4559                     try {
4560                         (((function(){
4561                             var x1 = v523;
4562                             if (typeof x1 !== 'number') throw 'Not a number!';
4563                             return (1<x1?l4.value: l5.value);
4564                         })() !== l5.value ? l27.fvalue(pv, v523, v524) : l5.value) !== l5.value ? (function(){
4565                             var values = mv;
4566                             throw ({type: 'block', id: 192, values: l181.fvalue(values, "checkArgs(arguments, ", v523, ");", (function(){
4567                                 var symbol = l146;
4568                                 var value = symbol.value;
4569                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4570                                 return value;
4571                             })()), message: 'Return from unknown block NIL.'})
4572                         })() : l5.value);
4573                         return l181.fvalue(values, ((function(){
4574                             var x1 = v523;
4575                             if (typeof x1 !== 'number') throw 'Not a number!';
4576                             return (1<x1?l4.value: l5.value);
4577                         })() !== l5.value ? l181.fvalue(pv, "checkArgsAtLeast(arguments, ", v523, ");", (function(){
4578                             var symbol = l146;
4579                             var value = symbol.value;
4580                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4581                             return value;
4582                         })()) : l5.value), (((typeof (v524) == "number")?l4.value: l5.value) !== l5.value ? l181.fvalue(pv, "checkArgsAtMost(arguments, ", v524, ");", (function(){
4583                             var symbol = l146;
4584                             var value = symbol.value;
4585                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4586                             return value;
4587                         })()) : l5.value));
4588                     }
4589                     catch (cf){
4590                         if (cf.type == 'block' && cf.id == 192)
4591                             return values.apply(this, forcemv(cf.values));
4592                         else
4593                             throw cf;
4594                     }
4595                 })();
4596             })(l23.fvalue(pv, v520),(v522 !== l5.value ? l238 : (function(){
4597                 var x1 = v520;
4598                 if (typeof x1 !== 'number') throw 'Not a number!';
4599                 var x2 = v521;
4600                 if (typeof x2 !== 'number') throw 'Not a number!';
4601                 return 1+x1+x2;
4602             })()));
4603         })();
4604     }));
4605     return l237;
4606 })();
4607 var l239 = {name: "COMPILE-LAMBDA-OPTIONAL"};
4608 (function(){
4609     (l239).fvalue = (function(v534){
4610         ((v534)["fname"] = "COMPILE-LAMBDA-OPTIONAL");
4611         return v534;
4612     })((function (values,v526){
4613         checkArgs(arguments, 2);
4614         return (function(){
4615             return (function(){
4616                 var v527 = l232.fvalue(pv, v526);
4617                 var v528 = l72.fvalue(pv, l230.fvalue(pv, v526));
4618                 var v529 = l72.fvalue(pv, v527);
4619                 return (v527 !== l5.value ? l181.fvalue(values, "switch(arguments.length-1){", (function(){
4620                     var symbol = l146;
4621                     var value = symbol.value;
4622                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4623                     return value;
4624                 })(), (function(v530,v531,v532){
4625                     return (function(){
4626                         (function(){
4627                             return (function(){
4628                                 while((function(){
4629                                     var x1 = v532;
4630                                     if (typeof x1 !== 'number') throw 'Not a number!';
4631                                     var x2 = v529;
4632                                     if (typeof x2 !== 'number') throw 'Not a number!';
4633                                     return (x1<x2?l4.value: l5.value);
4634                                 })() !== l5.value){
4635                                     (function(v533){
4636                                         (v531 = ({car: l181.fvalue(pv, "case ", (function(){
4637                                             var x1 = v532;
4638                                             if (typeof x1 !== 'number') throw 'Not a number!';
4639                                             var x2 = v528;
4640                                             if (typeof x2 !== 'number') throw 'Not a number!';
4641                                             return x1+x2;
4642                                         })(), ":", (function(){
4643                                             var symbol = l146;
4644                                             var value = symbol.value;
4645                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4646                                             return value;
4647                                         })(), l205.fvalue(pv, (function(){
4648                                             var tmp = v533;
4649                                             return tmp === l5.value? l5.value: tmp.car;
4650                                         })()), "=", l183.fvalue(pv, l34.fvalue(pv, v533)), ";", (function(){
4651                                             var symbol = l146;
4652                                             var value = symbol.value;
4653                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4654                                             return value;
4655                                         })()), cdr: v531}));
4656                                         return (v532 = (function(){
4657                                             var x1 = v532;
4658                                             if (typeof x1 !== 'number') throw 'Not a number!';
4659                                             return x1+1;
4660                                         })());
4661                                     })(l89.fvalue(pv, v532, v530));
4662                                 }return l5.value;
4663                             })();
4664                         })();
4665                         (v531 = ({car: l181.fvalue(pv, "default: break;", (function(){
4666                             var symbol = l146;
4667                             var value = symbol.value;
4668                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4669                             return value;
4670                         })()), cdr: v531}));
4671                         return l149.fvalue(pv, l67.fvalue(pv, v531));
4672                     })();
4673                 })(l231.fvalue(pv, v526),l5.value,0), "}", (function(){
4674                     var symbol = l146;
4675                     var value = symbol.value;
4676                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4677                     return value;
4678                 })()) : l5.value);
4679             })();
4680         })();
4681     }));
4682     return l239;
4683 })();
4684 var l240 = {name: "COMPILE-LAMBDA-REST"};
4685 (function(){
4686     (l240).fvalue = (function(v540){
4687         ((v540)["fname"] = "COMPILE-LAMBDA-REST");
4688         return v540;
4689     })((function (values,v535){
4690         checkArgs(arguments, 2);
4691         return (function(){
4692             return (function(v536,v537,v538){
4693                 return (v538 !== l5.value ? (function(v539){
4694                     return l181.fvalue(values, "var ", v539, "= ", l183.fvalue(pv, l5.value), ";", (function(){
4695                         var symbol = l146;
4696                         var value = symbol.value;
4697                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4698                         return value;
4699                     })(), "for (var i = arguments.length-1; i>=", (function(){
4700                         var x1 = v536;
4701                         if (typeof x1 !== 'number') throw 'Not a number!';
4702                         var x2 = v537;
4703                         if (typeof x2 !== 'number') throw 'Not a number!';
4704                         return 1+x1+x2;
4705                     })(), "; i--)", (function(){
4706                         var symbol = l146;
4707                         var value = symbol.value;
4708                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4709                         return value;
4710                     })(), l185.fvalue(pv, v539, " = {car: arguments[i], cdr: "), v539, "};", (function(){
4711                         var symbol = l146;
4712                         var value = symbol.value;
4713                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4714                         return value;
4715                     })());
4716                 })(l205.fvalue(pv, v538)) : l5.value);
4717             })(l72.fvalue(pv, l230.fvalue(pv, v535)),l72.fvalue(pv, l232.fvalue(pv, v535)),l233.fvalue(pv, v535));
4718         })();
4719     }));
4720     return l240;
4721 })();
4722 var l241 = {name: "COMPILE-LAMBDA-PARSE-KEYWORDS"};
4723 (function(){
4724     (l241).fvalue = (function(v550){
4725         ((v550)["fname"] = "COMPILE-LAMBDA-PARSE-KEYWORDS");
4726         return v550;
4727     })((function (values,v541){
4728         checkArgs(arguments, 2);
4729         return (function(){
4730             return (function(v542,v543,v544){
4731                 return l181.fvalue(values, l151.fvalue(pv, (function (values,v545){
4732                     checkArgs(arguments, 2);
4733                     return (function(v546){
4734                         return l181.fvalue(values, "var ", l205.fvalue(pv, v546), "; ", (function(){
4735                             var symbol = l146;
4736                             var value = symbol.value;
4737                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4738                             return value;
4739                         })());
4740                     })(l41.fvalue(pv, (function(){
4741                         var tmp = v545;
4742                         return tmp === l5.value? l5.value: tmp.car;
4743                     })()));
4744                 }), v544), (function(v548){
4745                     return (v544 !== l5.value ? l181.fvalue(pv, "var i;", (function(){
4746                         var symbol = l146;
4747                         var value = symbol.value;
4748                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4749                         return value;
4750                     })(), l151.fvalue(pv, v548, v544)) : l5.value);
4751                 })((function (values,v547){
4752                     checkArgs(arguments, 2);
4753                     return l181.fvalue(values, "for (i=", (function(){
4754                         var x1 = v542;
4755                         if (typeof x1 !== 'number') throw 'Not a number!';
4756                         var x2 = v543;
4757                         if (typeof x2 !== 'number') throw 'Not a number!';
4758                         return 1+x1+x2;
4759                     })(), "; i<arguments.length; i+=2){", (function(){
4760                         var symbol = l146;
4761                         var value = symbol.value;
4762                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4763                         return value;
4764                     })(), l185.fvalue(pv, "if (arguments[i] === ", l183.fvalue(pv, l33.fvalue(pv, v547)), "){", (function(){
4765                         var symbol = l146;
4766                         var value = symbol.value;
4767                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4768                         return value;
4769                     })(), l185.fvalue(pv, l205.fvalue(pv, l34.fvalue(pv, (function(){
4770                         var tmp = v547;
4771                         return tmp === l5.value? l5.value: tmp.car;
4772                     })())), " = arguments[i+1];", (function(){
4773                         var symbol = l146;
4774                         var value = symbol.value;
4775                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4776                         return value;
4777                     })(), "break;", (function(){
4778                         var symbol = l146;
4779                         var value = symbol.value;
4780                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4781                         return value;
4782                     })()), "}", (function(){
4783                         var symbol = l146;
4784                         var value = symbol.value;
4785                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4786                         return value;
4787                     })()), "}", (function(){
4788                         var symbol = l146;
4789                         var value = symbol.value;
4790                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4791                         return value;
4792                     })(), "if (i == arguments.length){", (function(){
4793                         var symbol = l146;
4794                         var value = symbol.value;
4795                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4796                         return value;
4797                     })(), l185.fvalue(pv, l205.fvalue(pv, l34.fvalue(pv, (function(){
4798                         var tmp = v547;
4799                         return tmp === l5.value? l5.value: tmp.car;
4800                     })())), " = ", l183.fvalue(pv, l34.fvalue(pv, v547)), ";", (function(){
4801                         var symbol = l146;
4802                         var value = symbol.value;
4803                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4804                         return value;
4805                     })()), "}", (function(){
4806                         var symbol = l146;
4807                         var value = symbol.value;
4808                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4809                         return value;
4810                     })());
4811                 })), (v544 !== l5.value ? l181.fvalue(pv, "for (i=", (function(){
4812                     var x1 = v542;
4813                     if (typeof x1 !== 'number') throw 'Not a number!';
4814                     var x2 = v543;
4815                     if (typeof x2 !== 'number') throw 'Not a number!';
4816                     return 1+x1+x2;
4817                 })(), "; i<arguments.length; i+=2){", (function(){
4818                     var symbol = l146;
4819                     var value = symbol.value;
4820                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4821                     return value;
4822                 })(), l185.fvalue(pv, "if (", l149.fvalue(pv, l78.fvalue(pv, (function (values,v549){
4823                     checkArgs(arguments, 2);
4824                     return l147.fvalue(values, "arguments[i] !== ", l183.fvalue(pv, l33.fvalue(pv, v549)));
4825                 }), v544), " && "), ")", (function(){
4826                     var symbol = l146;
4827                     var value = symbol.value;
4828                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4829                     return value;
4830                 })(), l185.fvalue(pv, "throw 'Unknown keyword argument ' + arguments[i].name;", (function(){
4831                     var symbol = l146;
4832                     var value = symbol.value;
4833                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4834                     return value;
4835                 })())), "}", (function(){
4836                     var symbol = l146;
4837                     var value = symbol.value;
4838                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4839                     return value;
4840                 })()) : l5.value));
4841             })(l72.fvalue(pv, l230.fvalue(pv, v541)),l72.fvalue(pv, l232.fvalue(pv, v541)),l234.fvalue(pv, v541));
4842         })();
4843     }));
4844     return l241;
4845 })();
4846 var l242 = {name: "COMPILE-LAMBDA"};
4847 var l243 = {name: "LS-COMPILE-BLOCK"};
4848 (function(){
4849     (l242).fvalue = (function(v563){
4850         ((v563)["fname"] = "COMPILE-LAMBDA");
4851         return v563;
4852     })((function (values,v551,v552){
4853         checkArgs(arguments, 3);
4854         return (function(){
4855             return (function(v553,v554,v555,v556,v557){
4856                 ((((typeof((function(){
4857                     var tmp = v552;
4858                     return tmp === l5.value? l5.value: tmp.car;
4859                 })()) == "string")?l4.value: l5.value) !== l5.value ? l28.fvalue(pv, l13.fvalue(pv, (function(){
4860                     var tmp = v552;
4861                     return tmp === l5.value? l5.value: tmp.cdr;
4862                 })())) : l5.value) !== l5.value ? (function(){
4863                     (v557 = (function(){
4864                         var tmp = v552;
4865                         return tmp === l5.value? l5.value: tmp.car;
4866                     })());
4867                     return (v552 = (function(){
4868                         var tmp = v552;
4869                         return tmp === l5.value? l5.value: tmp.cdr;
4870                     })());
4871                 })() : l5.value);
4872                 return (function(v558,v559,v560){
4873                     try {
4874                         var tmp;
4875                         tmp = l202.value;
4876                         l202.value = v560;
4877                         v560 = tmp;
4878                         return l236.fvalue(values, v557, "(function (", l149.fvalue(pv, ({car: "values", cdr: l78.fvalue(pv, (function(){
4879                             var symbol = l205;
4880                             var func = symbol.fvalue;
4881                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4882                             return func;
4883                         })(), l65.fvalue(pv, v553, v554))}), ","), "){", (function(){
4884                             var symbol = l146;
4885                             var value = symbol.value;
4886                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4887                             return value;
4888                         })(), l185.fvalue(pv, l237.fvalue(pv, v558, v559, (function(v561){
4889                             return (v561 !== l5.value ? v561 : v555);
4890                         })(v556)), l239.fvalue(pv, v551), l240.fvalue(pv, v551), l241.fvalue(pv, v551), (function(v562){
4891                             try {
4892                                 var tmp;
4893                                 tmp = l186.value;
4894                                 l186.value = v562;
4895                                 v562 = tmp;
4896                                 return l243.fvalue(pv, v552, l4.value);
4897                             }
4898                             finally {
4899                                 l186.value = v562;
4900                             }
4901                         })(l4.value)), "})");
4902                     }
4903                     finally {
4904                         l202.value = v560;
4905                     }
4906                 })(l72.fvalue(pv, v553),l72.fvalue(pv, v554),l206.fvalue(pv, l65.fvalue(pv, l59.fvalue(pv, v556), v553, v554, v555)));
4907             })(l230.fvalue(pv, v551),l232.fvalue(pv, v551),l235.fvalue(pv, v551),l233.fvalue(pv, v551),l5.value);
4908         })();
4909     }));
4910     return l242;
4911 })();
4912 var l244 = {name: "SETQ-PAIR"};
4913 var l245 = {name: "SET"};
4914 (function(){
4915     (l244).fvalue = (function(v567){
4916         ((v567)["fname"] = "SETQ-PAIR");
4917         return v567;
4918     })((function (values,v564,v565){
4919         checkArgs(arguments, 3);
4920         return (function(){
4921             return (function(v566){
4922                 return ((((l189.fvalue(pv, v566) === l109)?l4.value: l5.value) !== l5.value ? (l28.fvalue(pv, l92.fvalue(pv, l216, l191.fvalue(pv, v566))) !== l5.value ? l28.fvalue(pv, l92.fvalue(pv, l218, l191.fvalue(pv, v566))) : l5.value) : l5.value) !== l5.value ? l181.fvalue(values, l190.fvalue(pv, v566), " = ", l183.fvalue(pv, v565)) : l183.fvalue(values, l65.fvalue(pv, l45.fvalue(pv, l245), l45.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l176), l45.fvalue(pv, v564))), l45.fvalue(pv, v565))));
4923             })(l201.fvalue(pv, v564, (function(){
4924                 var symbol = l202;
4925                 var value = symbol.value;
4926                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4927                 return value;
4928             })(), l109));
4929         })();
4930     }));
4931     return l244;
4932 })();
4933 ((l220).value = ({car: l45.fvalue(pv, l114, (function (values){
4934     var v568= l5.value;
4935     for (var i = arguments.length-1; i>=1; i--)
4936         v568 = {car: arguments[i], cdr:
4937     v568};
4938     return (function(){
4939         return (function(v569){
4940             (function(){
4941                 try {
4942                     return (function(){
4943                         while(l4.value !== l5.value){
4944                             (l13.fvalue(pv, v568) !== l5.value ? (function(){
4945                                 throw ({type: 'block', id: 200, values: l5.value, message: 'Return from unknown block NIL.'})
4946                             })() : (l13.fvalue(pv, (function(){
4947                                 var tmp = v568;
4948                                 return tmp === l5.value? l5.value: tmp.cdr;
4949                             })()) !== l5.value ? (function(){
4950                                 throw "Odd paris in SETQ";
4951                             })() : (function(){
4952                                 (v569 = l147.fvalue(pv, v569, l147.fvalue(pv, l244.fvalue(pv, (function(){
4953                                     var tmp = v568;
4954                                     return tmp === l5.value? l5.value: tmp.car;
4955                                 })(), l34.fvalue(pv, v568)), (l13.fvalue(pv, l36.fvalue(pv, v568)) !== l5.value ? "" : ", "))));
4956                                 return (v568 = l36.fvalue(pv, v568));
4957                             })()));
4958                         }return l5.value;
4959                     })();
4960                 }
4961                 catch (cf){
4962                     if (cf.type == 'block' && cf.id == 200)
4963                         return cf.values;
4964                     else
4965                         throw cf;
4966                 }
4967             })();
4968             return l181.fvalue(values, "(", v569, ")");
4969         })("");
4970     })();
4971 })), cdr: (function(){
4972     var symbol = l220;
4973     var value = symbol.value;
4974     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4975     return value;
4976 })()}));
4977 var l246 = {name: "JS-VREF"};
4978 ((l220).value = ({car: l45.fvalue(pv, l246, (function (values,v570){
4979     checkArgs(arguments, 2);
4980     return (function(){
4981         return v570;
4982     })();
4983 })), cdr: (function(){
4984     var symbol = l220;
4985     var value = symbol.value;
4986     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4987     return value;
4988 })()}));
4989 var l247 = {name: "JS-VSET"};
4990 ((l220).value = ({car: l45.fvalue(pv, l247, (function (values,v571,v572){
4991     checkArgs(arguments, 3);
4992     return (function(){
4993         return l181.fvalue(values, "(", v571, " = ", l183.fvalue(pv, v572), ")");
4994     })();
4995 })), cdr: (function(){
4996     var symbol = l220;
4997     var value = symbol.value;
4998     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4999     return value;
5000 })()}));
5001 (function(){
5002     (l157).fvalue = (function(v579){
5003         ((v579)["fname"] = "ESCAPE-STRING");
5004         return v579;
5005     })((function (values,v573){
5006         checkArgs(arguments, 2);
5007         return (function(){
5008             return (function(v574,v575,v576){
5009                 (function(){
5010                     return (function(){
5011                         while((function(){
5012                             var x1 = v575;
5013                             if (typeof x1 !== 'number') throw 'Not a number!';
5014                             var x2 = v576;
5015                             if (typeof x2 !== 'number') throw 'Not a number!';
5016                             return (x1<x2?l4.value: l5.value);
5017                         })() !== l5.value){
5018                             (function(v577){
5019                                 ((function(v578){
5020                                     return (v578 !== l5.value ? v578 : l84.fvalue(pv, v577, 92));
5021                                 })(l84.fvalue(pv, v577, 34)) !== l5.value ? (v574 = l147.fvalue(pv, v574, "\\")) : l5.value);
5022                                 (l84.fvalue(pv, v577, 10) !== l5.value ? (function(){
5023                                     (v574 = l147.fvalue(pv, v574, "\\"));
5024                                     return (v577 = 110);
5025                                 })() : l5.value);
5026                                 return (v574 = l147.fvalue(pv, v574, l102.fvalue(pv, v577)));
5027                             })((function(){
5028                                 var string = v573;
5029                                 var index = v575;
5030                                 if (typeof string != 'string')
5031                                     throw 'The value ' + string + ' is not a type string.';
5032                                 if (typeof index != 'number')
5033                                     throw 'The value ' + index + ' is not a type number.';
5034                                 return string.charCodeAt(index);
5035                             })());
5036                             (v575 = (function(){
5037                                 var x1 = v575;
5038                                 if (typeof x1 !== 'number') throw 'Not a number!';
5039                                 return x1+1;
5040                             })());
5041                         }return l5.value;
5042                     })();
5043                 })();
5044                 return v574;
5045             })("",0,l72.fvalue(pv, v573));
5046         })();
5047     }));
5048     return l157;
5049 })();
5050 var l248 = {name: "*LITERAL-SYMBOLS*"};
5051 (function(){
5052     (((l248.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l248).value = l5.value));
5053     return l248;
5054 })();
5055 var l249 = {name: "*LITERAL-COUNTER*"};
5056 (function(){
5057     (((l249.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l249).value = 0));
5058     return l249;
5059 })();
5060 var l250 = {name: "GENLIT"};
5061 (function(){
5062     (l250).fvalue = (function(v580){
5063         ((v580)["fname"] = "GENLIT");
5064         return v580;
5065     })((function (values){
5066         checkArgsAtMost(arguments, 1);
5067         return (function(){
5068             return l181.fvalue(values, "l", ((l249).value = (function(){
5069                 var x1 = (function(){
5070                     var symbol = l249;
5071                     var value = symbol.value;
5072                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5073                     return value;
5074                 })();
5075                 if (typeof x1 !== 'number') throw 'Not a number!';
5076                 return x1+1;
5077             })()));
5078         })();
5079     }));
5080     return l250;
5081 })();
5082 var l251 = {name: "LITERAL"};
5083 (function(){
5084     (l251).fvalue = (function(v595){
5085         ((v595)["fname"] = "LITERAL");
5086         return v595;
5087     })((function (values,v581,v582){
5088         checkArgsAtLeast(arguments, 2);
5089         checkArgsAtMost(arguments, 3);
5090         switch(arguments.length-1){
5091         case 1:
5092         v582=l5.value;
5093         default: break;
5094         }
5095         return (function(){
5096             return (l85.fvalue(pv, v581) !== l5.value ? l18.fvalue(values, v581) : (((typeof(v581) == "string")?l4.value: l5.value) !== l5.value ? l181.fvalue(values, "\"", l157.fvalue(pv, v581), "\"") : (((function(){
5097                 var tmp = v581;
5098                 return (typeof tmp == 'object' && 'name' in tmp);
5099             })()?l4.value: l5.value) !== l5.value ? (function(v583){
5100                 return (v583 !== l5.value ? v583 : (function(v585,v586){
5101                     ((l248).value = ({car: ({car: v581, cdr: v585}), cdr: (function(){
5102                         var symbol = l248;
5103                         var value = symbol.value;
5104                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5105                         return value;
5106                     })()}));
5107                     l208.fvalue(pv, l181.fvalue(pv, "var ", v585, " = ", v586));
5108                     return v585;
5109                 })(l250.fvalue(pv),(function(v584){
5110                     return (l13.fvalue(pv, v584) !== l5.value ? l181.fvalue(pv, "{name: \"", l157.fvalue(pv, (v581).name), "\"}") : l183.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l143), l45.fvalue(pv, (v581).name), l45.fvalue(pv, l127.fvalue(pv, v584)))));
5111                 })(l135.fvalue(pv, v581))));
5112             })((function(){
5113                 var tmp = l101.fvalue(pv, v581, (function(){
5114                     var symbol = l248;
5115                     var value = symbol.value;
5116                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5117                     return value;
5118                 })());
5119                 return tmp === l5.value? l5.value: tmp.cdr;
5120             })()) : (((function(){
5121                 var tmp = v581;
5122                 return (typeof tmp == 'object' && 'car' in tmp);
5123             })()?l4.value: l5.value) !== l5.value ? (function(){
5124                 var v587 = l91.fvalue(pv, v581);
5125                 var v588 = l90.fvalue(pv, v581);
5126                 var v589 = l181.fvalue(pv, "QIList(", l150.fvalue(pv, l78.fvalue(pv, (function (values,v590){
5127                     checkArgs(arguments, 2);
5128                     return l251.fvalue(values, v590, l4.value);
5129                 }), v587), ","), l251.fvalue(pv, (function(){
5130                     var tmp = v588;
5131                     return tmp === l5.value? l5.value: tmp.car;
5132                 })(), l4.value), ",", l251.fvalue(pv, (function(){
5133                     var tmp = v588;
5134                     return tmp === l5.value? l5.value: tmp.cdr;
5135                 })(), l4.value), ")");
5136                 return (v582 !== l5.value ? v589 : (function(v591){
5137                     l208.fvalue(pv, l181.fvalue(pv, "var ", v591, " = ", v589));
5138                     return v591;
5139                 })(l250.fvalue(pv)));
5140             })() : (((function(){
5141                 var x = v581;
5142                 return typeof x === 'object' && 'length' in x;
5143             })()?l4.value: l5.value) !== l5.value ? (function(v592){
5144                 return (function(v593){
5145                     return (v582 !== l5.value ? v593 : (function(v594){
5146                         l208.fvalue(pv, l181.fvalue(pv, "var ", v594, " = ", v593));
5147                         return v594;
5148                     })(l250.fvalue(pv)));
5149                 })(l147.fvalue(pv, "[", l149.fvalue(pv, l78.fvalue(pv, (function(){
5150                     var symbol = l251;
5151                     var func = symbol.fvalue;
5152                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5153                     return func;
5154                 })(), v592), ", "), "]"));
5155             })(l152.fvalue(pv, v581)) : l5.value)))));
5156         })();
5157     }));
5158     return l251;
5159 })();
5160 ((l220).value = ({car: l45.fvalue(pv, l176, (function (values,v596){
5161     checkArgs(arguments, 2);
5162     return (function(){
5163         return l251.fvalue(values, v596);
5164     })();
5165 })), cdr: (function(){
5166     var symbol = l220;
5167     var value = symbol.value;
5168     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5169     return value;
5170 })()}));
5171 var l252 = {name: "%WHILE"};
5172 ((l220).value = ({car: l45.fvalue(pv, l252, (function (values,v598){
5173     checkArgsAtLeast(arguments, 2);
5174     var v597= l5.value;
5175     for (var i = arguments.length-1; i>=2; i--)
5176         v597 = {car: arguments[i], cdr:
5177     v597};
5178     return (function(){
5179         return l181.fvalue(values, "(function(){", (function(){
5180             var symbol = l146;
5181             var value = symbol.value;
5182             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5183             return value;
5184         })(), l185.fvalue(pv, "while(", l183.fvalue(pv, v598), " !== ", l183.fvalue(pv, l5.value), "){", (function(){
5185             var symbol = l146;
5186             var value = symbol.value;
5187             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5188             return value;
5189         })(), l185.fvalue(pv, l243.fvalue(pv, v597)), "}", "return ", l183.fvalue(pv, l5.value), ";", (function(){
5190             var symbol = l146;
5191             var value = symbol.value;
5192             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5193             return value;
5194         })()), "})()");
5195     })();
5196 })), cdr: (function(){
5197     var symbol = l220;
5198     var value = symbol.value;
5199     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5200     return value;
5201 })()}));
5202 var l253 = {name: "SYMBOL-FUNCTION"};
5203 ((l220).value = ({car: l45.fvalue(pv, l108, (function (values,v599){
5204     checkArgs(arguments, 2);
5205     return (function(){
5206         return ((l60.fvalue(pv, v599) !== l5.value ? (((function(){
5207             var tmp = v599;
5208             return tmp === l5.value? l5.value: tmp.car;
5209         })() === l6)?l4.value: l5.value) : l5.value) !== l5.value ? l242.fvalue(values, l34.fvalue(pv, v599), l36.fvalue(pv, v599)) : (((function(){
5210             var tmp = v599;
5211             return (typeof tmp == 'object' && 'name' in tmp);
5212         })()?l4.value: l5.value) !== l5.value ? (function(v600){
5213             return (v600 !== l5.value ? l190.fvalue(values, v600) : l183.fvalue(values, l65.fvalue(pv, l45.fvalue(pv, l253), l45.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l176), l45.fvalue(pv, v599))))));
5214         })(l201.fvalue(pv, v599, (function(){
5215             var symbol = l202;
5216             var value = symbol.value;
5217             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5218             return value;
5219         })(), l108)) : l5.value));
5220     })();
5221 })), cdr: (function(){
5222     var symbol = l220;
5223     var value = symbol.value;
5224     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5225     return value;
5226 })()}));
5227 var l254 = {name: "MAKE-FUNCTION-BINDING"};
5228 (function(){
5229     (l254).fvalue = (function(v602){
5230         ((v602)["fname"] = "MAKE-FUNCTION-BINDING");
5231         return v602;
5232     })((function (values,v601){
5233         checkArgs(arguments, 2);
5234         return (function(){
5235             return l187.fvalue(values, v601, l108, l204.fvalue(pv, v601));
5236         })();
5237     }));
5238     return l254;
5239 })();
5240 var l255 = {name: "COMPILE-FUNCTION-DEFINITION"};
5241 (function(){
5242     (l255).fvalue = (function(v604){
5243         ((v604)["fname"] = "COMPILE-FUNCTION-DEFINITION");
5244         return v604;
5245     })((function (values,v603){
5246         checkArgs(arguments, 2);
5247         return (function(){
5248             return l242.fvalue(values, (function(){
5249                 var tmp = v603;
5250                 return tmp === l5.value? l5.value: tmp.car;
5251             })(), (function(){
5252                 var tmp = v603;
5253                 return tmp === l5.value? l5.value: tmp.cdr;
5254             })());
5255         })();
5256     }));
5257     return l255;
5258 })();
5259 var l256 = {name: "TRANSLATE-FUNCTION"};
5260 (function(){
5261     (l256).fvalue = (function(v607){
5262         ((v607)["fname"] = "TRANSLATE-FUNCTION");
5263         return v607;
5264     })((function (values,v605){
5265         checkArgs(arguments, 2);
5266         return (function(){
5267             return (function(v606){
5268                 return l190.fvalue(values, v606);
5269             })(l201.fvalue(pv, v605, (function(){
5270                 var symbol = l202;
5271                 var value = symbol.value;
5272                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5273                 return value;
5274             })(), l108));
5275         })();
5276     }));
5277     return l256;
5278 })();
5279 var l257 = {name: "FLET"};
5280 ((l220).value = ({car: l45.fvalue(pv, l257, (function (values,v609){
5281     checkArgsAtLeast(arguments, 2);
5282     var v608= l5.value;
5283     for (var i = arguments.length-1; i>=2; i--)
5284         v608 = {car: arguments[i], cdr:
5285     v608};
5286     return (function(){
5287         return (function(){
5288             try {
5289                 var v614 = l202.value;
5290                 var v610 = l78.fvalue(pv, (function(){
5291                     var symbol = l31;
5292                     var func = symbol.fvalue;
5293                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5294                     return func;
5295                 })(), v609);
5296                 var v611 = l78.fvalue(pv, (function(){
5297                     var symbol = l32;
5298                     var func = symbol.fvalue;
5299                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5300                     return func;
5301                 })(), v609);
5302                 var v612 = l78.fvalue(pv, (function(){
5303                     var symbol = l255;
5304                     var func = symbol.fvalue;
5305                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5306                     return func;
5307                 })(), v611);
5308                 ((l202).value = l200.fvalue(pv, l78.fvalue(pv, (function(){
5309                     var symbol = l254;
5310                     var func = symbol.fvalue;
5311                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5312                     return func;
5313                 })(), v610), (function(){
5314                     var symbol = l202;
5315                     var value = symbol.value;
5316                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5317                     return value;
5318                 })(), l108));
5319                 return l181.fvalue(values, "(function(", l149.fvalue(pv, l78.fvalue(pv, (function(){
5320                     var symbol = l256;
5321                     var func = symbol.fvalue;
5322                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5323                     return func;
5324                 })(), v610), ","), "){", (function(){
5325                     var symbol = l146;
5326                     var value = symbol.value;
5327                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5328                     return value;
5329                 })(), (function(v613){
5330                     return l185.fvalue(pv, v613);
5331                 })(l243.fvalue(pv, v608, l4.value)), "})(", l149.fvalue(pv, v612, ","), ")");
5332             }
5333             finally {
5334                 l202.value = v614;
5335             }
5336         })();
5337     })();
5338 })), cdr: (function(){
5339     var symbol = l220;
5340     var value = symbol.value;
5341     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5342     return value;
5343 })()}));
5344 var l258 = {name: "LABELS"};
5345 ((l220).value = ({car: l45.fvalue(pv, l258, (function (values,v616){
5346     checkArgsAtLeast(arguments, 2);
5347     var v615= l5.value;
5348     for (var i = arguments.length-1; i>=2; i--)
5349         v615 = {car: arguments[i], cdr:
5350     v615};
5351     return (function(){
5352         return (function(){
5353             try {
5354                 var v619 = l202.value;
5355                 var v617 = l78.fvalue(pv, (function(){
5356                     var symbol = l31;
5357                     var func = symbol.fvalue;
5358                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5359                     return func;
5360                 })(), v616);
5361                 ((l202).value = l200.fvalue(pv, l78.fvalue(pv, (function(){
5362                     var symbol = l254;
5363                     var func = symbol.fvalue;
5364                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5365                     return func;
5366                 })(), v617), (function(){
5367                     var symbol = l202;
5368                     var value = symbol.value;
5369                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5370                     return value;
5371                 })(), l108));
5372                 return l181.fvalue(values, "(function(){", (function(){
5373                     var symbol = l146;
5374                     var value = symbol.value;
5375                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5376                     return value;
5377                 })(), l185.fvalue(pv, l151.fvalue(pv, (function (values,v618){
5378                     checkArgs(arguments, 2);
5379                     return l181.fvalue(values, "var ", l256.fvalue(pv, (function(){
5380                         var tmp = v618;
5381                         return tmp === l5.value? l5.value: tmp.car;
5382                     })()), " = ", l242.fvalue(pv, l34.fvalue(pv, v618), l36.fvalue(pv, v618)), ";", (function(){
5383                         var symbol = l146;
5384                         var value = symbol.value;
5385                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5386                         return value;
5387                     })());
5388                 }), v616), l243.fvalue(pv, v615, l4.value)), "})()");
5389             }
5390             finally {
5391                 l202.value = v619;
5392             }
5393         })();
5394     })();
5395 })), cdr: (function(){
5396     var symbol = l220;
5397     var value = symbol.value;
5398     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5399     return value;
5400 })()}));
5401 var l259 = {name: "*COMPILING-FILE*"};
5402 (function(){
5403     (((l259.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l259).value = l5.value));
5404     return l259;
5405 })();
5406 var l260 = {name: "EVAL-WHEN-COMPILE"};
5407 var l261 = {name: "EVAL"};
5408 ((l220).value = ({car: l45.fvalue(pv, l260, (function (values){
5409     var v620= l5.value;
5410     for (var i = arguments.length-1; i>=1; i--)
5411         v620 = {car: arguments[i], cdr:
5412     v620};
5413     return (function(){
5414         return ((function(){
5415             var symbol = l259;
5416             var value = symbol.value;
5417             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5418             return value;
5419         })() !== l5.value ? (function(){
5420             l261.fvalue(pv, ({car: l117, cdr: v620}));
5421             return l5.value;
5422         })() : l183.fvalue(values, l65.fvalue(pv, l45.fvalue(pv, l117), v620)));
5423     })();
5424 })), cdr: (function(){
5425     var symbol = l220;
5426     var value = symbol.value;
5427     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5428     return value;
5429 })()}));
5430 var l262 = {name: "DEFINE-TRANSFORMATION"};
5431 l262;
5432 ((l220).value = ({car: l45.fvalue(pv, l117, (function (values){
5433     var v621= l5.value;
5434     for (var i = arguments.length-1; i>=1; i--)
5435         v621 = {car: arguments[i], cdr:
5436     v621};
5437     return (function(){
5438         return (l13.fvalue(pv, (function(){
5439             var tmp = v621;
5440             return tmp === l5.value? l5.value: tmp.cdr;
5441         })()) !== l5.value ? l183.fvalue(values, (function(){
5442             var tmp = v621;
5443             return tmp === l5.value? l5.value: tmp.car;
5444         })(), (function(){
5445             var symbol = l186;
5446             var value = symbol.value;
5447             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5448             return value;
5449         })()) : l181.fvalue(values, "(function(){", (function(){
5450             var symbol = l146;
5451             var value = symbol.value;
5452             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5453             return value;
5454         })(), l185.fvalue(pv, l243.fvalue(pv, v621, l4.value)), "})()"));
5455     })();
5456 })), cdr: (function(){
5457     var symbol = l220;
5458     var value = symbol.value;
5459     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5460     return value;
5461 })()}));
5462 var l263 = {name: "SPECIAL-VARIABLE-P"};
5463 (function(){
5464     (l263).fvalue = (function(v623){
5465         ((v623)["fname"] = "SPECIAL-VARIABLE-P");
5466         return v623;
5467     })((function (values,v622){
5468         checkArgs(arguments, 2);
5469         return (function(){
5470             return (l214.fvalue(pv, v622, l109, l216) !== l5.value ? l4.value : l5.value);
5471         })();
5472     }));
5473     return l263;
5474 })();
5475 var l264 = {name: "LET-BINDING-WRAPPER"};
5476 (function(){
5477     (l264).fvalue = (function(v630){
5478         ((v630)["fname"] = "LET-BINDING-WRAPPER");
5479         return v630;
5480     })((function (values,v624,v625){
5481         checkArgs(arguments, 3);
5482         return (function(){
5483             try {
5484                 (l13.fvalue(pv, v624) !== l5.value ? (function(){
5485                     var values = mv;
5486                     throw ({type: 'block', id: 218, values: v625, message: 'Return from unknown block LET-BINDING-WRAPPER.'})
5487                 })() : l5.value);
5488                 return l181.fvalue(values, "try {", (function(){
5489                     var symbol = l146;
5490                     var value = symbol.value;
5491                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5492                     return value;
5493                 })(), l185.fvalue(pv, "var tmp;", (function(){
5494                     var symbol = l146;
5495                     var value = symbol.value;
5496                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5497                     return value;
5498                 })(), l151.fvalue(pv, (function (values,v626){
5499                     checkArgs(arguments, 2);
5500                     return (function(v627){
5501                         return l181.fvalue(values, "tmp = ", v627, ".value;", (function(){
5502                             var symbol = l146;
5503                             var value = symbol.value;
5504                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5505                             return value;
5506                         })(), v627, ".value = ", (function(){
5507                             var tmp = v626;
5508                             return tmp === l5.value? l5.value: tmp.cdr;
5509                         })(), ";", (function(){
5510                             var symbol = l146;
5511                             var value = symbol.value;
5512                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5513                             return value;
5514                         })(), (function(){
5515                             var tmp = v626;
5516                             return tmp === l5.value? l5.value: tmp.cdr;
5517                         })(), " = tmp;", (function(){
5518                             var symbol = l146;
5519                             var value = symbol.value;
5520                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5521                             return value;
5522                         })());
5523                     })(l183.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l176), l45.fvalue(pv, (function(){
5524                         var tmp = v626;
5525                         return tmp === l5.value? l5.value: tmp.car;
5526                     })()))));
5527                 }), v624), v625, (function(){
5528                     var symbol = l146;
5529                     var value = symbol.value;
5530                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5531                     return value;
5532                 })()), "}", (function(){
5533                     var symbol = l146;
5534                     var value = symbol.value;
5535                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5536                     return value;
5537                 })(), "finally {", (function(){
5538                     var symbol = l146;
5539                     var value = symbol.value;
5540                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5541                     return value;
5542                 })(), l185.fvalue(pv, l151.fvalue(pv, (function (values,v628){
5543                     checkArgs(arguments, 2);
5544                     return (function(v629){
5545                         return l181.fvalue(values, v629, ".value", " = ", (function(){
5546                             var tmp = v628;
5547                             return tmp === l5.value? l5.value: tmp.cdr;
5548                         })(), ";", (function(){
5549                             var symbol = l146;
5550                             var value = symbol.value;
5551                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5552                             return value;
5553                         })());
5554                     })(l183.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l176), l45.fvalue(pv, (function(){
5555                         var tmp = v628;
5556                         return tmp === l5.value? l5.value: tmp.car;
5557                     })()))));
5558                 }), v624)), "}", (function(){
5559                     var symbol = l146;
5560                     var value = symbol.value;
5561                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5562                     return value;
5563                 })());
5564             }
5565             catch (cf){
5566                 if (cf.type == 'block' && cf.id == 218)
5567                     return values.apply(this, forcemv(cf.values));
5568                 else
5569                     throw cf;
5570             }
5571         })();
5572     }));
5573     return l264;
5574 })();
5575 var l265 = {name: "LET"};
5576 ((l220).value = ({car: l45.fvalue(pv, l265, (function (values,v632){
5577     checkArgsAtLeast(arguments, 2);
5578     var v631= l5.value;
5579     for (var i = arguments.length-1; i>=2; i--)
5580         v631 = {car: arguments[i], cdr:
5581     v631};
5582     return (function(){
5583         return (function(){
5584             try {
5585                 var v640 = l202.value;
5586                 var v633 = l78.fvalue(pv, (function(){
5587                     var symbol = l59;
5588                     var func = symbol.fvalue;
5589                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5590                     return func;
5591                 })(), v632);
5592                 var v634 = l78.fvalue(pv, (function(){
5593                     var symbol = l40;
5594                     var func = symbol.fvalue;
5595                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5596                     return func;
5597                 })(), v633);
5598                 var v635 = l78.fvalue(pv, (function(){
5599                     var symbol = l183;
5600                     var func = symbol.fvalue;
5601                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5602                     return func;
5603                 })(), l78.fvalue(pv, (function(){
5604                     var symbol = l41;
5605                     var func = symbol.fvalue;
5606                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5607                     return func;
5608                 })(), v633));
5609                 ((l202).value = l206.fvalue(pv, l94.fvalue(pv, (function(){
5610                     var symbol = l263;
5611                     var func = symbol.fvalue;
5612                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5613                     return func;
5614                 })(), v634)));
5615                 var v636 = l5.value;
5616                 return l181.fvalue(values, "(function(", l149.fvalue(pv, l78.fvalue(pv, (function (values,v637){
5617                     checkArgs(arguments, 2);
5618                     return (l263.fvalue(pv, v637) !== l5.value ? (function(v638){
5619                         (v636 = ({car: ({car: v637, cdr: v638}), cdr: v636}));
5620                         return v638;
5621                     })(l204.fvalue(pv, v637)) : l205.fvalue(values, v637));
5622                 }), v634), ","), "){", (function(){
5623                     var symbol = l146;
5624                     var value = symbol.value;
5625                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5626                     return value;
5627                 })(), (function(v639){
5628                     return l185.fvalue(pv, l264.fvalue(pv, v636, v639));
5629                 })(l243.fvalue(pv, v631, l4.value)), "})(", l149.fvalue(pv, v635, ","), ")");
5630             }
5631             finally {
5632                 l202.value = v640;
5633             }
5634         })();
5635     })();
5636 })), cdr: (function(){
5637     var symbol = l220;
5638     var value = symbol.value;
5639     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5640     return value;
5641 })()}));
5642 var l266 = {name: "LET*-INITIALIZE-VALUE"};
5643 (function(){
5644     (l266).fvalue = (function(v647){
5645         ((v647)["fname"] = "LET*-INITIALIZE-VALUE");
5646         return v647;
5647     })((function (values,v641){
5648         checkArgs(arguments, 2);
5649         return (function(){
5650             return (function(v642,v643){
5651                 return (l263.fvalue(pv, v642) !== l5.value ? l181.fvalue(values, l183.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l114), l45.fvalue(pv, v642), l45.fvalue(pv, v643))), ";", (function(){
5652                     var symbol = l146;
5653                     var value = symbol.value;
5654                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5655                     return value;
5656                 })()) : (function(){
5657                     var v644 = l204.fvalue(pv, v642);
5658                     var v645 = l187.fvalue(pv, v642, l109, v644);
5659                     return (function(v646){
5660                         l197.fvalue(pv, v645, (function(){
5661                             var symbol = l202;
5662                             var value = symbol.value;
5663                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5664                             return value;
5665                         })(), l109);
5666                         return v646;
5667                     })(l181.fvalue(pv, "var ", v644, " = ", l183.fvalue(pv, v643), ";", (function(){
5668                         var symbol = l146;
5669                         var value = symbol.value;
5670                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5671                         return value;
5672                     })()));
5673                 })());
5674             })(l40.fvalue(pv, v641),l41.fvalue(pv, v641));
5675         })();
5676     }));
5677     return l266;
5678 })();
5679 var l267 = {name: "LET*-BINDING-WRAPPER"};
5680 (function(){
5681     (l267).fvalue = (function(v656){
5682         ((v656)["fname"] = "LET*-BINDING-WRAPPER");
5683         return v656;
5684     })((function (values,v648,v649){
5685         checkArgs(arguments, 3);
5686         return (function(){
5687             try {
5688                 (l13.fvalue(pv, v648) !== l5.value ? (function(){
5689                     var values = mv;
5690                     throw ({type: 'block', id: 221, values: v649, message: 'Return from unknown block LET*-BINDING-WRAPPER.'})
5691                 })() : l5.value);
5692                 return (function(v651){
5693                     return l181.fvalue(values, "try {", (function(){
5694                         var symbol = l146;
5695                         var value = symbol.value;
5696                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5697                         return value;
5698                     })(), l185.fvalue(pv, l151.fvalue(pv, (function (values,v652){
5699                         checkArgs(arguments, 2);
5700                         return (function(v653){
5701                             return l181.fvalue(values, "var ", (function(){
5702                                 var tmp = v652;
5703                                 return tmp === l5.value? l5.value: tmp.cdr;
5704                             })(), " = ", v653, ".value;", (function(){
5705                                 var symbol = l146;
5706                                 var value = symbol.value;
5707                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5708                                 return value;
5709                             })());
5710                         })(l183.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l176), l45.fvalue(pv, (function(){
5711                             var tmp = v652;
5712                             return tmp === l5.value? l5.value: tmp.car;
5713                         })()))));
5714                     }), v651), v649), "}", (function(){
5715                         var symbol = l146;
5716                         var value = symbol.value;
5717                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5718                         return value;
5719                     })(), "finally {", (function(){
5720                         var symbol = l146;
5721                         var value = symbol.value;
5722                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5723                         return value;
5724                     })(), l185.fvalue(pv, l151.fvalue(pv, (function (values,v654){
5725                         checkArgs(arguments, 2);
5726                         return (function(v655){
5727                             return l181.fvalue(values, v655, ".value", " = ", (function(){
5728                                 var tmp = v654;
5729                                 return tmp === l5.value? l5.value: tmp.cdr;
5730                             })(), ";", (function(){
5731                                 var symbol = l146;
5732                                 var value = symbol.value;
5733                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5734                                 return value;
5735                             })());
5736                         })(l183.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l176), l45.fvalue(pv, (function(){
5737                             var tmp = v654;
5738                             return tmp === l5.value? l5.value: tmp.car;
5739                         })()))));
5740                     }), v651)), "}", (function(){
5741                         var symbol = l146;
5742                         var value = symbol.value;
5743                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5744                         return value;
5745                     })());
5746                 })(l78.fvalue(pv, (function (values,v650){
5747                     checkArgs(arguments, 2);
5748                     return ({car: v650, cdr: l204.fvalue(pv, v650)});
5749                 }), l95.fvalue(pv, (function(){
5750                     var symbol = l263;
5751                     var func = symbol.fvalue;
5752                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5753                     return func;
5754                 })(), v648)));
5755             }
5756             catch (cf){
5757                 if (cf.type == 'block' && cf.id == 221)
5758                     return values.apply(this, forcemv(cf.values));
5759                 else
5760                     throw cf;
5761             }
5762         })();
5763     }));
5764     return l267;
5765 })();
5766 var l268 = {name: "LET*"};
5767 ((l220).value = ({car: l45.fvalue(pv, l268, (function (values,v658){
5768     checkArgsAtLeast(arguments, 2);
5769     var v657= l5.value;
5770     for (var i = arguments.length-1; i>=2; i--)
5771         v657 = {car: arguments[i], cdr:
5772     v657};
5773     return (function(){
5774         return (function(v659,v660){
5775             try {
5776                 var tmp;
5777                 tmp = l202.value;
5778                 l202.value = v660;
5779                 v660 = tmp;
5780                 return l181.fvalue(values, "(function(){", (function(){
5781                     var symbol = l146;
5782                     var value = symbol.value;
5783                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5784                     return value;
5785                 })(), l185.fvalue(pv, (function(v661,v662){
5786                     return l267.fvalue(pv, v661, v662);
5787                 })(l95.fvalue(pv, (function(){
5788                     var symbol = l263;
5789                     var func = symbol.fvalue;
5790                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5791                     return func;
5792                 })(), l78.fvalue(pv, (function(){
5793                     var symbol = l40;
5794                     var func = symbol.fvalue;
5795                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5796                     return func;
5797                 })(), v659)),l147.fvalue(pv, l151.fvalue(pv, (function(){
5798                     var symbol = l266;
5799                     var func = symbol.fvalue;
5800                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5801                     return func;
5802                 })(), v659), l243.fvalue(pv, v657, l4.value)))), "})()");
5803             }
5804             finally {
5805                 l202.value = v660;
5806             }
5807         })(l78.fvalue(pv, (function(){
5808             var symbol = l59;
5809             var func = symbol.fvalue;
5810             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5811             return func;
5812         })(), v658),l196.fvalue(pv, (function(){
5813             var symbol = l202;
5814             var value = symbol.value;
5815             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5816             return value;
5817         })()));
5818     })();
5819 })), cdr: (function(){
5820     var symbol = l220;
5821     var value = symbol.value;
5822     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5823     return value;
5824 })()}));
5825 var l269 = {name: "*BLOCK-COUNTER*"};
5826 (function(){
5827     (((l269.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l269).value = 0));
5828     return l269;
5829 })();
5830 var l270 = {name: "MULTIPLE-VALUE"};
5831 var l271 = {name: "USED"};
5832 ((l220).value = ({car: l45.fvalue(pv, l198, (function (values,v664){
5833     checkArgsAtLeast(arguments, 2);
5834     var v663= l5.value;
5835     for (var i = arguments.length-1; i>=2; i--)
5836         v663 = {car: arguments[i], cdr:
5837     v663};
5838     return (function(){
5839         return (function(){
5840             var v665 = ((l269).value = (function(){
5841                 var x1 = (function(){
5842                     var symbol = l269;
5843                     var value = symbol.value;
5844                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5845                     return value;
5846                 })();
5847                 if (typeof x1 !== 'number') throw 'Not a number!';
5848                 return x1+1;
5849             })());
5850             var v666 = l187.fvalue(pv, v664, l198, v665);
5851             ((function(){
5852                 var symbol = l186;
5853                 var value = symbol.value;
5854                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5855                 return value;
5856             })() !== l5.value ? l194.fvalue(pv, l270, v666) : l5.value);
5857             return (function(){
5858                 try {
5859                     var v668 = l202.value;
5860                     ((l202).value = l200.fvalue(pv, l45.fvalue(pv, v666), (function(){
5861                         var symbol = l202;
5862                         var value = symbol.value;
5863                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5864                         return value;
5865                     })(), l198));
5866                     var v667 = l243.fvalue(pv, v663, l4.value);
5867                     return (l92.fvalue(pv, l271, l191.fvalue(pv, v666)) !== l5.value ? l181.fvalue(values, "(function(){", (function(){
5868                         var symbol = l146;
5869                         var value = symbol.value;
5870                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5871                         return value;
5872                     })(), l185.fvalue(pv, "try {", (function(){
5873                         var symbol = l146;
5874                         var value = symbol.value;
5875                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5876                         return value;
5877                     })(), l185.fvalue(pv, v667), "}", (function(){
5878                         var symbol = l146;
5879                         var value = symbol.value;
5880                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5881                         return value;
5882                     })(), "catch (cf){", (function(){
5883                         var symbol = l146;
5884                         var value = symbol.value;
5885                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5886                         return value;
5887                     })(), "    if (cf.type == 'block' && cf.id == ", v665, ")", (function(){
5888                         var symbol = l146;
5889                         var value = symbol.value;
5890                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5891                         return value;
5892                     })(), ((function(){
5893                         var symbol = l186;
5894                         var value = symbol.value;
5895                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5896                         return value;
5897                     })() !== l5.value ? "        return values.apply(this, forcemv(cf.values));" : "        return cf.values;"), (function(){
5898                         var symbol = l146;
5899                         var value = symbol.value;
5900                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5901                         return value;
5902                     })(), "    else", (function(){
5903                         var symbol = l146;
5904                         var value = symbol.value;
5905                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5906                         return value;
5907                     })(), "        throw cf;", (function(){
5908                         var symbol = l146;
5909                         var value = symbol.value;
5910                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5911                         return value;
5912                     })(), "}", (function(){
5913                         var symbol = l146;
5914                         var value = symbol.value;
5915                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5916                         return value;
5917                     })()), "})()") : l181.fvalue(values, "(function(){", (function(){
5918                         var symbol = l146;
5919                         var value = symbol.value;
5920                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5921                         return value;
5922                     })(), l185.fvalue(pv, v667), "})()"));
5923                 }
5924                 finally {
5925                     l202.value = v668;
5926                 }
5927             })();
5928         })();
5929     })();
5930 })), cdr: (function(){
5931     var symbol = l220;
5932     var value = symbol.value;
5933     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5934     return value;
5935 })()}));
5936 var l272 = {name: "RETURN-FROM"};
5937 ((l220).value = ({car: l45.fvalue(pv, l272, (function (values,v669,v670){
5938     checkArgsAtLeast(arguments, 2);
5939     checkArgsAtMost(arguments, 3);
5940     switch(arguments.length-1){
5941     case 1:
5942     v670=l5.value;
5943     default: break;
5944     }
5945     return (function(){
5946         return (function(){
5947             var v671 = l201.fvalue(pv, v669, (function(){
5948                 var symbol = l202;
5949                 var value = symbol.value;
5950                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5951                 return value;
5952             })(), l198);
5953             var v672 = l92.fvalue(pv, l270, l191.fvalue(pv, v671));
5954             (l13.fvalue(pv, v671) !== l5.value ? (function(){
5955                 throw l147.fvalue(pv, "Unknown block `", (v669).name, "'.");
5956             })() : l5.value);
5957             l194.fvalue(pv, l271, v671);
5958             return l181.fvalue(values, "(function(){", (function(){
5959                 var symbol = l146;
5960                 var value = symbol.value;
5961                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5962                 return value;
5963             })(), l185.fvalue(pv, (v672 !== l5.value ? l181.fvalue(pv, "var values = mv;", (function(){
5964                 var symbol = l146;
5965                 var value = symbol.value;
5966                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5967                 return value;
5968             })()) : l5.value), "throw ({", "type: 'block', ", "id: ", l190.fvalue(pv, v671), ", ", "values: ", l183.fvalue(pv, v670, v672), ", ", "message: 'Return from unknown block ", (v669).name, ".'", "})"), "})()");
5969         })();
5970     })();
5971 })), cdr: (function(){
5972     var symbol = l220;
5973     var value = symbol.value;
5974     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5975     return value;
5976 })()}));
5977 var l273 = {name: "CATCH"};
5978 ((l220).value = ({car: l45.fvalue(pv, l273, (function (values,v674){
5979     checkArgsAtLeast(arguments, 2);
5980     var v673= l5.value;
5981     for (var i = arguments.length-1; i>=2; i--)
5982         v673 = {car: arguments[i], cdr:
5983     v673};
5984     return (function(){
5985         return l181.fvalue(values, "(function(){", (function(){
5986             var symbol = l146;
5987             var value = symbol.value;
5988             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5989             return value;
5990         })(), l185.fvalue(pv, "var id = ", l183.fvalue(pv, v674), ";", (function(){
5991             var symbol = l146;
5992             var value = symbol.value;
5993             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5994             return value;
5995         })(), "try {", (function(){
5996             var symbol = l146;
5997             var value = symbol.value;
5998             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5999             return value;
6000         })(), l185.fvalue(pv, l243.fvalue(pv, v673, l4.value)), (function(){
6001             var symbol = l146;
6002             var value = symbol.value;
6003             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6004             return value;
6005         })(), "}", (function(){
6006             var symbol = l146;
6007             var value = symbol.value;
6008             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6009             return value;
6010         })(), "catch (cf){", (function(){
6011             var symbol = l146;
6012             var value = symbol.value;
6013             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6014             return value;
6015         })(), "    if (cf.type == 'catch' && cf.id == id)", (function(){
6016             var symbol = l146;
6017             var value = symbol.value;
6018             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6019             return value;
6020         })(), ((function(){
6021             var symbol = l186;
6022             var value = symbol.value;
6023             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6024             return value;
6025         })() !== l5.value ? "        return values.apply(this, forcemv(cf.values));" : "        return pv.apply(this, forcemv(cf.values));"), (function(){
6026             var symbol = l146;
6027             var value = symbol.value;
6028             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6029             return value;
6030         })(), "    else", (function(){
6031             var symbol = l146;
6032             var value = symbol.value;
6033             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6034             return value;
6035         })(), "        throw cf;", (function(){
6036             var symbol = l146;
6037             var value = symbol.value;
6038             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6039             return value;
6040         })(), "}", (function(){
6041             var symbol = l146;
6042             var value = symbol.value;
6043             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6044             return value;
6045         })()), "})()");
6046     })();
6047 })), cdr: (function(){
6048     var symbol = l220;
6049     var value = symbol.value;
6050     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6051     return value;
6052 })()}));
6053 var l274 = {name: "THROW"};
6054 ((l220).value = ({car: l45.fvalue(pv, l274, (function (values,v675,v676){
6055     checkArgs(arguments, 3);
6056     return (function(){
6057         return l181.fvalue(values, "(function(){", (function(){
6058             var symbol = l146;
6059             var value = symbol.value;
6060             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6061             return value;
6062         })(), l185.fvalue(pv, "var values = mv;", (function(){
6063             var symbol = l146;
6064             var value = symbol.value;
6065             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6066             return value;
6067         })(), "throw ({", "type: 'catch', ", "id: ", l183.fvalue(pv, v675), ", ", "values: ", l183.fvalue(pv, v676, l4.value), ", ", "message: 'Throw uncatched.'", "})"), "})()");
6068     })();
6069 })), cdr: (function(){
6070     var symbol = l220;
6071     var value = symbol.value;
6072     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6073     return value;
6074 })()}));
6075 var l275 = {name: "*TAGBODY-COUNTER*"};
6076 (function(){
6077     (((l275.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l275).value = 0));
6078     return l275;
6079 })();
6080 var l276 = {name: "*GO-TAG-COUNTER*"};
6081 (function(){
6082     (((l276.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l276).value = 0));
6083     return l276;
6084 })();
6085 var l277 = {name: "GO-TAG-P"};
6086 (function(){
6087     (l277).fvalue = (function(v679){
6088         ((v679)["fname"] = "GO-TAG-P");
6089         return v679;
6090     })((function (values,v677){
6091         checkArgs(arguments, 2);
6092         return (function(){
6093             return (function(v678){
6094                 return (v678 !== l5.value ? v678 : ((function(){
6095                     var tmp = v677;
6096                     return (typeof tmp == 'object' && 'name' in tmp);
6097                 })()?l4.value: l5.value));
6098             })(l85.fvalue(pv, v677));
6099         })();
6100     }));
6101     return l277;
6102 })();
6103 var l278 = {name: "DECLARE-TAGBODY-TAGS"};
6104 (function(){
6105     (l278).fvalue = (function(v685){
6106         ((v685)["fname"] = "DECLARE-TAGBODY-TAGS");
6107         return v685;
6108     })((function (values,v680,v681){
6109         checkArgs(arguments, 3);
6110         return (function(){
6111             return (function(v684){
6112                 return l200.fvalue(values, v684, (function(){
6113                     var symbol = l202;
6114                     var value = symbol.value;
6115                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6116                     return value;
6117                 })(), l199);
6118             })(l78.fvalue(pv, (function (values,v682){
6119                 checkArgs(arguments, 2);
6120                 return (function(v683){
6121                     return l187.fvalue(values, v682, l199, l45.fvalue(pv, v680, v683));
6122                 })(l18.fvalue(pv, ((l276).value = (function(){
6123                     var x1 = (function(){
6124                         var symbol = l276;
6125                         var value = symbol.value;
6126                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6127                         return value;
6128                     })();
6129                     if (typeof x1 !== 'number') throw 'Not a number!';
6130                     return x1+1;
6131                 })())));
6132             }), l95.fvalue(pv, (function(){
6133                 var symbol = l277;
6134                 var func = symbol.fvalue;
6135                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6136                 return func;
6137             })(), v681)));
6138         })();
6139     }));
6140     return l278;
6141 })();
6142 var l279 = {name: "TAGBODY"};
6143 ((l220).value = ({car: l45.fvalue(pv, l279, (function (values){
6144     var v686= l5.value;
6145     for (var i = arguments.length-1; i>=1; i--)
6146         v686 = {car: arguments[i], cdr:
6147     v686};
6148     return (function(){
6149         try {
6150             (l99.fvalue(pv, (function(){
6151                 var symbol = l277;
6152                 var func = symbol.fvalue;
6153                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6154                 return func;
6155             })(), v686) !== l5.value ? l5.value : (function(){
6156                 var values = mv;
6157                 throw ({type: 'block', id: 229, values: l183.fvalue(values, l65.fvalue(pv, l45.fvalue(pv, l117), v686, l45.fvalue(pv, l5))), message: 'Return from unknown block TAGBODY.'})
6158             })());
6159             (l277.fvalue(pv, (function(){
6160                 var tmp = v686;
6161                 return tmp === l5.value? l5.value: tmp.car;
6162             })()) !== l5.value ? l5.value : (v686 = ({car: l17.fvalue(pv, "START"), cdr: v686})));
6163             return (function(v687){
6164                 return (function(v689,v688){
6165                     try {
6166                         var tmp;
6167                         tmp = l202.value;
6168                         l202.value = v689;
6169                         v689 = tmp;
6170                         (function(v690){
6171                             return (v688 = l41.fvalue(pv, l190.fvalue(pv, v690)));
6172                         })(l201.fvalue(pv, l40.fvalue(pv, v686), (function(){
6173                             var symbol = l202;
6174                             var value = symbol.value;
6175                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6176                             return value;
6177                         })(), l199));
6178                         return l181.fvalue(values, "(function(){", (function(){
6179                             var symbol = l146;
6180                             var value = symbol.value;
6181                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6182                             return value;
6183                         })(), l185.fvalue(pv, "var tagbody_", v687, " = ", v688, ";", (function(){
6184                             var symbol = l146;
6185                             var value = symbol.value;
6186                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6187                             return value;
6188                         })(), "tbloop:", (function(){
6189                             var symbol = l146;
6190                             var value = symbol.value;
6191                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6192                             return value;
6193                         })(), "while (true) {", (function(){
6194                             var symbol = l146;
6195                             var value = symbol.value;
6196                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6197                             return value;
6198                         })(), l185.fvalue(pv, "try {", (function(){
6199                             var symbol = l146;
6200                             var value = symbol.value;
6201                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6202                             return value;
6203                         })(), l185.fvalue(pv, (function(v691){
6204                             return l181.fvalue(pv, "switch(tagbody_", v687, "){", (function(){
6205                                 var symbol = l146;
6206                                 var value = symbol.value;
6207                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6208                                 return value;
6209                             })(), "case ", v688, ":", (function(){
6210                                 var symbol = l146;
6211                                 var value = symbol.value;
6212                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6213                                 return value;
6214                             })(), (function(){
6215                                 return (function(v692,v693){
6216                                     (function(){
6217                                         while(v692 !== l5.value){
6218                                             (v693 = (function(){
6219                                                 var tmp = v692;
6220                                                 return tmp === l5.value? l5.value: tmp.car;
6221                                             })());
6222                                             (function(){
6223                                                 (v691 = l147.fvalue(pv, v691, (l28.fvalue(pv, l277.fvalue(pv, v693)) !== l5.value ? l185.fvalue(pv, l183.fvalue(pv, v693), ";", (function(){
6224                                                     var symbol = l146;
6225                                                     var value = symbol.value;
6226                                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6227                                                     return value;
6228                                                 })()) : (function(v694){
6229                                                     return l181.fvalue(pv, "case ", l41.fvalue(pv, l190.fvalue(pv, v694)), ":", (function(){
6230                                                         var symbol = l146;
6231                                                         var value = symbol.value;
6232                                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6233                                                         return value;
6234                                                     })());
6235                                                 })(l201.fvalue(pv, v693, (function(){
6236                                                     var symbol = l202;
6237                                                     var value = symbol.value;
6238                                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6239                                                     return value;
6240                                                 })(), l199)))));
6241                                                 return l5.value;
6242                                             })();
6243                                             (v692 = (function(){
6244                                                 var tmp = v692;
6245                                                 return tmp === l5.value? l5.value: tmp.cdr;
6246                                             })());
6247                                         }return l5.value;
6248                                     })();
6249                                     return v691;
6250                                 })((function(){
6251                                     var tmp = v686;
6252                                     return tmp === l5.value? l5.value: tmp.cdr;
6253                                 })(),l5.value);
6254                             })(), "default:", (function(){
6255                                 var symbol = l146;
6256                                 var value = symbol.value;
6257                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6258                                 return value;
6259                             })(), "    break tbloop;", (function(){
6260                                 var symbol = l146;
6261                                 var value = symbol.value;
6262                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6263                                 return value;
6264                             })(), "}", (function(){
6265                                 var symbol = l146;
6266                                 var value = symbol.value;
6267                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6268                                 return value;
6269                             })());
6270                         })("")), "}", (function(){
6271                             var symbol = l146;
6272                             var value = symbol.value;
6273                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6274                             return value;
6275                         })(), "catch (jump) {", (function(){
6276                             var symbol = l146;
6277                             var value = symbol.value;
6278                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6279                             return value;
6280                         })(), "    if (jump.type == 'tagbody' && jump.id == ", v687, ")", (function(){
6281                             var symbol = l146;
6282                             var value = symbol.value;
6283                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6284                             return value;
6285                         })(), "        tagbody_", v687, " = jump.label;", (function(){
6286                             var symbol = l146;
6287                             var value = symbol.value;
6288                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6289                             return value;
6290                         })(), "    else", (function(){
6291                             var symbol = l146;
6292                             var value = symbol.value;
6293                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6294                             return value;
6295                         })(), "        throw(jump);", (function(){
6296                             var symbol = l146;
6297                             var value = symbol.value;
6298                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6299                             return value;
6300                         })(), "}", (function(){
6301                             var symbol = l146;
6302                             var value = symbol.value;
6303                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6304                             return value;
6305                         })()), "}", (function(){
6306                             var symbol = l146;
6307                             var value = symbol.value;
6308                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6309                             return value;
6310                         })(), "return ", l183.fvalue(pv, l5.value), ";", (function(){
6311                             var symbol = l146;
6312                             var value = symbol.value;
6313                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6314                             return value;
6315                         })()), "})()");
6316                     }
6317                     finally {
6318                         l202.value = v689;
6319                     }
6320                 })(l278.fvalue(pv, v687, v686),l5.value);
6321             })((function(){
6322                 var symbol = l275;
6323                 var value = symbol.value;
6324                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6325                 return value;
6326             })());
6327         }
6328         catch (cf){
6329             if (cf.type == 'block' && cf.id == 229)
6330                 return values.apply(this, forcemv(cf.values));
6331             else
6332                 throw cf;
6333         }
6334     })();
6335 })), cdr: (function(){
6336     var symbol = l220;
6337     var value = symbol.value;
6338     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6339     return value;
6340 })()}));
6341 var l280 = {name: "GO"};
6342 ((l220).value = ({car: l45.fvalue(pv, l280, (function (values,v695){
6343     checkArgs(arguments, 2);
6344     return (function(){
6345         return (function(v696,v697){
6346             (l13.fvalue(pv, v696) !== l5.value ? (function(){
6347                 throw l147.fvalue(pv, "Unknown tag `", v697, "'.");
6348             })() : l5.value);
6349             return l181.fvalue(values, "(function(){", (function(){
6350                 var symbol = l146;
6351                 var value = symbol.value;
6352                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6353                 return value;
6354             })(), l185.fvalue(pv, "throw ({", "type: 'tagbody', ", "id: ", l40.fvalue(pv, l190.fvalue(pv, v696)), ", ", "label: ", l41.fvalue(pv, l190.fvalue(pv, v696)), ", ", "message: 'Attempt to GO to non-existing tag ", v697, "'", "})", (function(){
6355                 var symbol = l146;
6356                 var value = symbol.value;
6357                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6358                 return value;
6359             })()), "})()");
6360         })(l201.fvalue(pv, v695, (function(){
6361             var symbol = l202;
6362             var value = symbol.value;
6363             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6364             return value;
6365         })(), l199),(((function(){
6366             var tmp = v695;
6367             return (typeof tmp == 'object' && 'name' in tmp);
6368         })()?l4.value: l5.value) !== l5.value ? (v695).name : (l85.fvalue(pv, v695) !== l5.value ? l18.fvalue(pv, v695) : l5.value)));
6369     })();
6370 })), cdr: (function(){
6371     var symbol = l220;
6372     var value = symbol.value;
6373     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6374     return value;
6375 })()}));
6376 var l281 = {name: "UNWIND-PROTECT"};
6377 ((l220).value = ({car: l45.fvalue(pv, l281, (function (values,v699){
6378     checkArgsAtLeast(arguments, 2);
6379     var v698= l5.value;
6380     for (var i = arguments.length-1; i>=2; i--)
6381         v698 = {car: arguments[i], cdr:
6382     v698};
6383     return (function(){
6384         return l181.fvalue(values, "(function(){", (function(){
6385             var symbol = l146;
6386             var value = symbol.value;
6387             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6388             return value;
6389         })(), l185.fvalue(pv, "var ret = ", l183.fvalue(pv, l5.value), ";", (function(){
6390             var symbol = l146;
6391             var value = symbol.value;
6392             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6393             return value;
6394         })(), "try {", (function(){
6395             var symbol = l146;
6396             var value = symbol.value;
6397             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6398             return value;
6399         })(), l185.fvalue(pv, "ret = ", l183.fvalue(pv, v699), ";", (function(){
6400             var symbol = l146;
6401             var value = symbol.value;
6402             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6403             return value;
6404         })()), "} finally {", (function(){
6405             var symbol = l146;
6406             var value = symbol.value;
6407             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6408             return value;
6409         })(), l185.fvalue(pv, l243.fvalue(pv, v698)), "}", (function(){
6410             var symbol = l146;
6411             var value = symbol.value;
6412             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6413             return value;
6414         })(), "return ret;", (function(){
6415             var symbol = l146;
6416             var value = symbol.value;
6417             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6418             return value;
6419         })()), "})()");
6420     })();
6421 })), cdr: (function(){
6422     var symbol = l220;
6423     var value = symbol.value;
6424     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6425     return value;
6426 })()}));
6427 var l282 = {name: "MULTIPLE-VALUE-CALL"};
6428 ((l220).value = ({car: l45.fvalue(pv, l282, (function (values,v701){
6429     checkArgsAtLeast(arguments, 2);
6430     var v700= l5.value;
6431     for (var i = arguments.length-1; i>=2; i--)
6432         v700 = {car: arguments[i], cdr:
6433     v700};
6434     return (function(){
6435         return l181.fvalue(values, "(function(){", (function(){
6436             var symbol = l146;
6437             var value = symbol.value;
6438             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6439             return value;
6440         })(), l185.fvalue(pv, "var func = ", l183.fvalue(pv, v701), ";", (function(){
6441             var symbol = l146;
6442             var value = symbol.value;
6443             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6444             return value;
6445         })(), "var args = [", ((function(){
6446             var symbol = l186;
6447             var value = symbol.value;
6448             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6449             return value;
6450         })() !== l5.value ? "values" : "pv"), "];", (function(){
6451             var symbol = l146;
6452             var value = symbol.value;
6453             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6454             return value;
6455         })(), "return ", l181.fvalue(pv, "(function(){", (function(){
6456             var symbol = l146;
6457             var value = symbol.value;
6458             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6459             return value;
6460         })(), l185.fvalue(pv, "var values = mv;", (function(){
6461             var symbol = l146;
6462             var value = symbol.value;
6463             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6464             return value;
6465         })(), "var vs;", (function(){
6466             var symbol = l146;
6467             var value = symbol.value;
6468             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6469             return value;
6470         })(), l151.fvalue(pv, (function (values,v702){
6471             checkArgs(arguments, 2);
6472             return l181.fvalue(values, "vs = ", l183.fvalue(pv, v702, l4.value), ";", (function(){
6473                 var symbol = l146;
6474                 var value = symbol.value;
6475                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6476                 return value;
6477             })(), "if (typeof vs === 'object' && 'multiple-value' in vs)", (function(){
6478                 var symbol = l146;
6479                 var value = symbol.value;
6480                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6481                 return value;
6482             })(), l185.fvalue(pv, "args = args.concat(vs);", (function(){
6483                 var symbol = l146;
6484                 var value = symbol.value;
6485                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6486                 return value;
6487             })()), "else", (function(){
6488                 var symbol = l146;
6489                 var value = symbol.value;
6490                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6491                 return value;
6492             })(), l185.fvalue(pv, "args.push(vs);", (function(){
6493                 var symbol = l146;
6494                 var value = symbol.value;
6495                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6496                 return value;
6497             })()));
6498         }), v700), "return func.apply(window, args);", (function(){
6499             var symbol = l146;
6500             var value = symbol.value;
6501             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6502             return value;
6503         })()), "})()"), ";", (function(){
6504             var symbol = l146;
6505             var value = symbol.value;
6506             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6507             return value;
6508         })()), "})()");
6509     })();
6510 })), cdr: (function(){
6511     var symbol = l220;
6512     var value = symbol.value;
6513     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6514     return value;
6515 })()}));
6516 var l283 = {name: "MULTIPLE-VALUE-PROG1"};
6517 ((l220).value = ({car: l45.fvalue(pv, l283, (function (values,v704){
6518     checkArgsAtLeast(arguments, 2);
6519     var v703= l5.value;
6520     for (var i = arguments.length-1; i>=2; i--)
6521         v703 = {car: arguments[i], cdr:
6522     v703};
6523     return (function(){
6524         return l181.fvalue(values, "(function(){", (function(){
6525             var symbol = l146;
6526             var value = symbol.value;
6527             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6528             return value;
6529         })(), l185.fvalue(pv, "var args = ", l183.fvalue(pv, v704, (function(){
6530             var symbol = l186;
6531             var value = symbol.value;
6532             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6533             return value;
6534         })()), ";", (function(){
6535             var symbol = l146;
6536             var value = symbol.value;
6537             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6538             return value;
6539         })(), l243.fvalue(pv, v703), "return args;", (function(){
6540             var symbol = l146;
6541             var value = symbol.value;
6542             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6543             return value;
6544         })()), "})()");
6545     })();
6546 })), cdr: (function(){
6547     var symbol = l220;
6548     var value = symbol.value;
6549     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6550     return value;
6551 })()}));
6552 var l284 = {name: "BACKQUOTE-EXPAND-1"};
6553 (function(){
6554     (l284).fvalue = (function(v707){
6555         ((v707)["fname"] = "BACKQUOTE-EXPAND-1");
6556         return v707;
6557     })((function (values,v705){
6558         checkArgs(arguments, 2);
6559         return (function(){
6560             return (((function(){
6561                 var tmp = v705;
6562                 return (typeof tmp == 'object' && 'name' in tmp);
6563             })()?l4.value: l5.value) !== l5.value ? l45.fvalue(values, l176, v705) : (l46.fvalue(pv, v705) !== l5.value ? v705 : ((((function(){
6564                 var tmp = v705;
6565                 return tmp === l5.value? l5.value: tmp.car;
6566             })() === l179)?l4.value: l5.value) !== l5.value ? (function(){
6567                 var tmp = v705;
6568                 return tmp === l5.value? l5.value: tmp.car;
6569             })() : ((((function(){
6570                 var tmp = v705;
6571                 return tmp === l5.value? l5.value: tmp.car;
6572             })() === l177)?l4.value: l5.value) !== l5.value ? l284.fvalue(values, l284.fvalue(pv, l34.fvalue(pv, v705))) : ({car: l65, cdr: l78.fvalue(pv, (function (values,v706){
6573                 checkArgs(arguments, 2);
6574                 return ((l60.fvalue(pv, v706) !== l5.value ? (((function(){
6575                     var tmp = v706;
6576                     return tmp === l5.value? l5.value: tmp.car;
6577                 })() === l179)?l4.value: l5.value) : l5.value) !== l5.value ? l45.fvalue(values, l45, l34.fvalue(pv, v706)) : ((l60.fvalue(pv, v706) !== l5.value ? (((function(){
6578                     var tmp = v706;
6579                     return tmp === l5.value? l5.value: tmp.car;
6580                 })() === l178)?l4.value: l5.value) : l5.value) !== l5.value ? l34.fvalue(values, v706) : l45.fvalue(values, l45, l284.fvalue(pv, v706))));
6581             }), v705)})))));
6582         })();
6583     }));
6584     return l284;
6585 })();
6586 var l285 = {name: "BACKQUOTE-EXPAND"};
6587 (function(){
6588     (l285).fvalue = (function(v709){
6589         ((v709)["fname"] = "BACKQUOTE-EXPAND");
6590         return v709;
6591     })((function (values,v708){
6592         checkArgs(arguments, 2);
6593         return (function(){
6594             return ((l60.fvalue(pv, v708) !== l5.value ? (((function(){
6595                 var tmp = v708;
6596                 return tmp === l5.value? l5.value: tmp.car;
6597             })() === l177)?l4.value: l5.value) : l5.value) !== l5.value ? l284.fvalue(values, l34.fvalue(pv, v708)) : v708);
6598         })();
6599     }));
6600     return l285;
6601 })();
6602 l177;
6603 ((l220).value = ({car: l45.fvalue(pv, l177, (function (values,v710){
6604     checkArgs(arguments, 2);
6605     return (function(){
6606         return l183.fvalue(values, l284.fvalue(pv, v710));
6607     })();
6608 })), cdr: (function(){
6609     var symbol = l220;
6610     var value = symbol.value;
6611     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6612     return value;
6613 })()}));
6614 var l286 = {name: "*BUILTINS*"};
6615 (function(){
6616     (((l286.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l286).value = l5.value));
6617     return l286;
6618 })();
6619 var l287 = {name: "DEFINE-RAW-BUILTIN"};
6620 l287;
6621 var l288 = {name: "DEFINE-BUILTIN"};
6622 l288;
6623 var l289 = {name: "TYPE-CHECK"};
6624 l289;
6625 var l290 = {name: "VARIABLE-ARITY-CALL"};
6626 (function(){
6627     (l290).fvalue = (function(v719){
6628         ((v719)["fname"] = "VARIABLE-ARITY-CALL");
6629         return v719;
6630     })((function (values,v711,v712){
6631         checkArgs(arguments, 3);
6632         return (function(){
6633             (((function(){
6634                 var tmp = v711;
6635                 return (typeof tmp == 'object' && 'car' in tmp);
6636             })()?l4.value: l5.value) !== l5.value ? l5.value : (function(){
6637                 throw "ARGS must be a non-empty list";
6638             })());
6639             return (function(v713,v714,v715){
6640                 (function(){
6641                     return (function(v716,v717){
6642                         (function(){
6643                             while(v716 !== l5.value){
6644                                 (v717 = (function(){
6645                                     var tmp = v716;
6646                                     return tmp === l5.value? l5.value: tmp.car;
6647                                 })());
6648                                 (function(){
6649                                     (((typeof (v717) == "number")?l4.value: l5.value) !== l5.value ? (v714 = ({car: l18.fvalue(pv, v717), cdr: v714})) : (function(v718){
6650                                         (v714 = ({car: v718, cdr: v714}));
6651                                         return (v715 = l147.fvalue(pv, v715, l181.fvalue(pv, "var ", v718, " = ", l183.fvalue(pv, v717), ";", (function(){
6652                                             var symbol = l146;
6653                                             var value = symbol.value;
6654                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6655                                             return value;
6656                                         })(), "if (typeof ", v718, " !== 'number') throw 'Not a number!';", (function(){
6657                                             var symbol = l146;
6658                                             var value = symbol.value;
6659                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6660                                             return value;
6661                                         })())));
6662                                     })(l181.fvalue(pv, "x", (v713 = (function(){
6663                                         var x1 = v713;
6664                                         if (typeof x1 !== 'number') throw 'Not a number!';
6665                                         return x1+1;
6666                                     })()))));
6667                                     return l5.value;
6668                                 })();
6669                                 (v716 = (function(){
6670                                     var tmp = v716;
6671                                     return tmp === l5.value? l5.value: tmp.cdr;
6672                                 })());
6673                             }return l5.value;
6674                         })();
6675                         return l5.value;
6676                     })(v711,l5.value);
6677                 })();
6678                 return l181.fvalue(values, "(function(){", (function(){
6679                     var symbol = l146;
6680                     var value = symbol.value;
6681                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6682                     return value;
6683                 })(), l185.fvalue(pv, v715, (v712)(pv, l67.fvalue(pv, v714))), "})()");
6684             })(0,l5,"");
6685         })();
6686     }));
6687     return l290;
6688 })();
6689 var l291 = {name: "VARIABLE-ARITY"};
6690 l291;
6691 var l292 = {name: "NUM-OP-NUM"};
6692 (function(){
6693     (l292).fvalue = (function(v723){
6694         ((v723)["fname"] = "NUM-OP-NUM");
6695         return v723;
6696     })((function (values,v720,v721,v722){
6697         checkArgs(arguments, 4);
6698         return (function(){
6699             return l181.fvalue(values, "(function(){", (function(){
6700                 var symbol = l146;
6701                 var value = symbol.value;
6702                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6703                 return value;
6704             })(), l185.fvalue(pv, l181.fvalue(pv, "var ", "x", " = ", v720, ";", (function(){
6705                 var symbol = l146;
6706                 var value = symbol.value;
6707                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6708                 return value;
6709             })()), l181.fvalue(pv, "var ", "y", " = ", v722, ";", (function(){
6710                 var symbol = l146;
6711                 var value = symbol.value;
6712                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6713                 return value;
6714             })()), l181.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
6715                 var symbol = l146;
6716                 var value = symbol.value;
6717                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6718                 return value;
6719             })(), l185.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
6720                 var symbol = l146;
6721                 var value = symbol.value;
6722                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6723                 return value;
6724             })())), l181.fvalue(pv, "if (typeof ", "y", " != '", "number", "')", (function(){
6725                 var symbol = l146;
6726                 var value = symbol.value;
6727                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6728                 return value;
6729             })(), l185.fvalue(pv, "throw 'The value ' + ", "y", " + ' is not a type ", "number", ".';", (function(){
6730                 var symbol = l146;
6731                 var value = symbol.value;
6732                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6733                 return value;
6734             })())), l181.fvalue(pv, "return ", l181.fvalue(pv, "x", v721, "y"), ";", (function(){
6735                 var symbol = l146;
6736                 var value = symbol.value;
6737                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6738                 return value;
6739             })())), "})()");
6740         })();
6741     }));
6742     return l292;
6743 })();
6744 ((l286).value = ({car: l45.fvalue(pv, l62, (function (values){
6745     var v724= l5.value;
6746     for (var i = arguments.length-1; i>=1; i--)
6747         v724 = {car: arguments[i], cdr:
6748     v724};
6749     return (function(){
6750         return (l13.fvalue(pv, v724) !== l5.value ? "0" : l290.fvalue(values, v724, (function (values,v725){
6751             checkArgs(arguments, 2);
6752             return l181.fvalue(values, "return ", l149.fvalue(pv, v725, "+"), ";", (function(){
6753                 var symbol = l146;
6754                 var value = symbol.value;
6755                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6756                 return value;
6757             })());
6758         })));
6759     })();
6760 })), cdr: (function(){
6761     var symbol = l286;
6762     var value = symbol.value;
6763     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6764     return value;
6765 })()}));
6766 ((l286).value = ({car: l45.fvalue(pv, l63, (function (values,v727){
6767     checkArgsAtLeast(arguments, 2);
6768     var v726= l5.value;
6769     for (var i = arguments.length-1; i>=2; i--)
6770         v726 = {car: arguments[i], cdr:
6771     v726};
6772     return (function(){
6773         return (function(v728){
6774             return l290.fvalue(values, v728, (function (values,v729){
6775                 checkArgs(arguments, 2);
6776                 return l181.fvalue(values, "return ", (l13.fvalue(pv, v726) !== l5.value ? l147.fvalue(pv, "-", (function(){
6777                     var tmp = v729;
6778                     return tmp === l5.value? l5.value: tmp.car;
6779                 })()) : l149.fvalue(pv, v729, "-")), ";", (function(){
6780                     var symbol = l146;
6781                     var value = symbol.value;
6782                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6783                     return value;
6784                 })());
6785             }));
6786         })(({car: v727, cdr: v726}));
6787     })();
6788 })), cdr: (function(){
6789     var symbol = l286;
6790     var value = symbol.value;
6791     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6792     return value;
6793 })()}));
6794 ((l286).value = ({car: l45.fvalue(pv, l21, (function (values){
6795     var v730= l5.value;
6796     for (var i = arguments.length-1; i>=1; i--)
6797         v730 = {car: arguments[i], cdr:
6798     v730};
6799     return (function(){
6800         return (l13.fvalue(pv, v730) !== l5.value ? "1" : l290.fvalue(values, v730, (function (values,v731){
6801             checkArgs(arguments, 2);
6802             return l181.fvalue(values, "return ", l149.fvalue(pv, v731, "*"), ";", (function(){
6803                 var symbol = l146;
6804                 var value = symbol.value;
6805                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6806                 return value;
6807             })());
6808         })));
6809     })();
6810 })), cdr: (function(){
6811     var symbol = l286;
6812     var value = symbol.value;
6813     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6814     return value;
6815 })()}));
6816 ((l286).value = ({car: l45.fvalue(pv, l22, (function (values,v733){
6817     checkArgsAtLeast(arguments, 2);
6818     var v732= l5.value;
6819     for (var i = arguments.length-1; i>=2; i--)
6820         v732 = {car: arguments[i], cdr:
6821     v732};
6822     return (function(){
6823         return (function(v734){
6824             return l290.fvalue(values, v734, (function (values,v735){
6825                 checkArgs(arguments, 2);
6826                 return l181.fvalue(values, "return ", (l13.fvalue(pv, v732) !== l5.value ? l147.fvalue(pv, "1 /", (function(){
6827                     var tmp = v735;
6828                     return tmp === l5.value? l5.value: tmp.car;
6829                 })()) : l149.fvalue(pv, v735, "/")), ";", (function(){
6830                     var symbol = l146;
6831                     var value = symbol.value;
6832                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6833                     return value;
6834                 })());
6835             }));
6836         })(({car: v733, cdr: v732}));
6837     })();
6838 })), cdr: (function(){
6839     var symbol = l286;
6840     var value = symbol.value;
6841     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6842     return value;
6843 })()}));
6844 var l293 = {name: "MOD"};
6845 ((l286).value = ({car: l45.fvalue(pv, l293, (function (values,v736,v737){
6846     checkArgs(arguments, 3);
6847     return (function(){
6848         return (function(v738,v739){
6849             return l292.fvalue(values, v738, "%", v739);
6850         })(l183.fvalue(pv, v736),l183.fvalue(pv, v737));
6851     })();
6852 })), cdr: (function(){
6853     var symbol = l286;
6854     var value = symbol.value;
6855     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6856     return value;
6857 })()}));
6858 var l294 = {name: "COMPARISON-CONJUNTION"};
6859 (function(){
6860     (l294).fvalue = (function(v742){
6861         ((v742)["fname"] = "COMPARISON-CONJUNTION");
6862         return v742;
6863     })((function (values,v740,v741){
6864         checkArgs(arguments, 3);
6865         return (function(){
6866             return (l13.fvalue(pv, (function(){
6867                 var tmp = v740;
6868                 return tmp === l5.value? l5.value: tmp.cdr;
6869             })()) !== l5.value ? "true" : (l13.fvalue(pv, l36.fvalue(pv, v740)) !== l5.value ? l147.fvalue(values, (function(){
6870                 var tmp = v740;
6871                 return tmp === l5.value? l5.value: tmp.car;
6872             })(), v741, l34.fvalue(pv, v740)) : l147.fvalue(values, (function(){
6873                 var tmp = v740;
6874                 return tmp === l5.value? l5.value: tmp.car;
6875             })(), v741, l34.fvalue(pv, v740), " && ", l294.fvalue(pv, (function(){
6876                 var tmp = v740;
6877                 return tmp === l5.value? l5.value: tmp.cdr;
6878             })(), v741))));
6879         })();
6880     }));
6881     return l294;
6882 })();
6883 var l295 = {name: "DEFINE-BUILTIN-COMPARISON"};
6884 l295;
6885 var l296 = {name: ">"};
6886 ((l286).value = ({car: l45.fvalue(pv, l296, (function (values,v744){
6887     checkArgsAtLeast(arguments, 2);
6888     var v743= l5.value;
6889     for (var i = arguments.length-1; i>=2; i--)
6890         v743 = {car: arguments[i], cdr:
6891     v743};
6892     return (function(){
6893         return (function(v745){
6894             return l290.fvalue(values, v745, (function (values,v746){
6895                 checkArgs(arguments, 2);
6896                 return l181.fvalue(values, "return ", l182.fvalue(pv, l294.fvalue(pv, v746, ">")), ";", (function(){
6897                     var symbol = l146;
6898                     var value = symbol.value;
6899                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6900                     return value;
6901                 })());
6902             }));
6903         })(({car: v744, cdr: v743}));
6904     })();
6905 })), cdr: (function(){
6906     var symbol = l286;
6907     var value = symbol.value;
6908     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6909     return value;
6910 })()}));
6911 var l297 = {name: "<"};
6912 ((l286).value = ({car: l45.fvalue(pv, l297, (function (values,v748){
6913     checkArgsAtLeast(arguments, 2);
6914     var v747= l5.value;
6915     for (var i = arguments.length-1; i>=2; i--)
6916         v747 = {car: arguments[i], cdr:
6917     v747};
6918     return (function(){
6919         return (function(v749){
6920             return l290.fvalue(values, v749, (function (values,v750){
6921                 checkArgs(arguments, 2);
6922                 return l181.fvalue(values, "return ", l182.fvalue(pv, l294.fvalue(pv, v750, "<")), ";", (function(){
6923                     var symbol = l146;
6924                     var value = symbol.value;
6925                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6926                     return value;
6927                 })());
6928             }));
6929         })(({car: v748, cdr: v747}));
6930     })();
6931 })), cdr: (function(){
6932     var symbol = l286;
6933     var value = symbol.value;
6934     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6935     return value;
6936 })()}));
6937 var l298 = {name: ">="};
6938 ((l286).value = ({car: l45.fvalue(pv, l298, (function (values,v752){
6939     checkArgsAtLeast(arguments, 2);
6940     var v751= l5.value;
6941     for (var i = arguments.length-1; i>=2; i--)
6942         v751 = {car: arguments[i], cdr:
6943     v751};
6944     return (function(){
6945         return (function(v753){
6946             return l290.fvalue(values, v753, (function (values,v754){
6947                 checkArgs(arguments, 2);
6948                 return l181.fvalue(values, "return ", l182.fvalue(pv, l294.fvalue(pv, v754, ">=")), ";", (function(){
6949                     var symbol = l146;
6950                     var value = symbol.value;
6951                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6952                     return value;
6953                 })());
6954             }));
6955         })(({car: v752, cdr: v751}));
6956     })();
6957 })), cdr: (function(){
6958     var symbol = l286;
6959     var value = symbol.value;
6960     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6961     return value;
6962 })()}));
6963 var l299 = {name: "<="};
6964 ((l286).value = ({car: l45.fvalue(pv, l299, (function (values,v756){
6965     checkArgsAtLeast(arguments, 2);
6966     var v755= l5.value;
6967     for (var i = arguments.length-1; i>=2; i--)
6968         v755 = {car: arguments[i], cdr:
6969     v755};
6970     return (function(){
6971         return (function(v757){
6972             return l290.fvalue(values, v757, (function (values,v758){
6973                 checkArgs(arguments, 2);
6974                 return l181.fvalue(values, "return ", l182.fvalue(pv, l294.fvalue(pv, v758, "<=")), ";", (function(){
6975                     var symbol = l146;
6976                     var value = symbol.value;
6977                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6978                     return value;
6979                 })());
6980             }));
6981         })(({car: v756, cdr: v755}));
6982     })();
6983 })), cdr: (function(){
6984     var symbol = l286;
6985     var value = symbol.value;
6986     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6987     return value;
6988 })()}));
6989 ((l286).value = ({car: l45.fvalue(pv, l20, (function (values,v760){
6990     checkArgsAtLeast(arguments, 2);
6991     var v759= l5.value;
6992     for (var i = arguments.length-1; i>=2; i--)
6993         v759 = {car: arguments[i], cdr:
6994     v759};
6995     return (function(){
6996         return (function(v761){
6997             return l290.fvalue(values, v761, (function (values,v762){
6998                 checkArgs(arguments, 2);
6999                 return l181.fvalue(values, "return ", l182.fvalue(pv, l294.fvalue(pv, v762, "==")), ";", (function(){
7000                     var symbol = l146;
7001                     var value = symbol.value;
7002                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7003                     return value;
7004                 })());
7005             }));
7006         })(({car: v760, cdr: v759}));
7007     })();
7008 })), cdr: (function(){
7009     var symbol = l286;
7010     var value = symbol.value;
7011     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7012     return value;
7013 })()}));
7014 var l300 = {name: "NUMBERP"};
7015 ((l286).value = ({car: l45.fvalue(pv, l300, (function (values,v763){
7016     checkArgs(arguments, 2);
7017     return (function(){
7018         return (function(v764){
7019             return l182.fvalue(values, l181.fvalue(pv, "(typeof (", v764, ") == \"number\")"));
7020         })(l183.fvalue(pv, v763));
7021     })();
7022 })), cdr: (function(){
7023     var symbol = l286;
7024     var value = symbol.value;
7025     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7026     return value;
7027 })()}));
7028 var l301 = {name: "FLOOR"};
7029 ((l286).value = ({car: l45.fvalue(pv, l301, (function (values,v765){
7030     checkArgs(arguments, 2);
7031     return (function(){
7032         return (function(v766){
7033             return l181.fvalue(values, "(function(){", (function(){
7034                 var symbol = l146;
7035                 var value = symbol.value;
7036                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7037                 return value;
7038             })(), l185.fvalue(pv, l181.fvalue(pv, "var ", "x", " = ", v766, ";", (function(){
7039                 var symbol = l146;
7040                 var value = symbol.value;
7041                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7042                 return value;
7043             })()), l181.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
7044                 var symbol = l146;
7045                 var value = symbol.value;
7046                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7047                 return value;
7048             })(), l185.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
7049                 var symbol = l146;
7050                 var value = symbol.value;
7051                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7052                 return value;
7053             })())), l181.fvalue(pv, "return ", "Math.floor(x)", ";", (function(){
7054                 var symbol = l146;
7055                 var value = symbol.value;
7056                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7057                 return value;
7058             })())), "})()");
7059         })(l183.fvalue(pv, v765));
7060     })();
7061 })), cdr: (function(){
7062     var symbol = l286;
7063     var value = symbol.value;
7064     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7065     return value;
7066 })()}));
7067 ((l286).value = ({car: l45.fvalue(pv, l29, (function (values,v767,v768){
7068     checkArgs(arguments, 3);
7069     return (function(){
7070         return (function(v769,v770){
7071             return l181.fvalue(values, "({car: ", v769, ", cdr: ", v770, "})");
7072         })(l183.fvalue(pv, v767),l183.fvalue(pv, v768));
7073     })();
7074 })), cdr: (function(){
7075     var symbol = l286;
7076     var value = symbol.value;
7077     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7078     return value;
7079 })()}));
7080 ((l286).value = ({car: l45.fvalue(pv, l30, (function (values,v771){
7081     checkArgs(arguments, 2);
7082     return (function(){
7083         return (function(v772){
7084             return l182.fvalue(values, l181.fvalue(pv, "(function(){", (function(){
7085                 var symbol = l146;
7086                 var value = symbol.value;
7087                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7088                 return value;
7089             })(), l185.fvalue(pv, "var tmp = ", v772, ";", (function(){
7090                 var symbol = l146;
7091                 var value = symbol.value;
7092                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7093                 return value;
7094             })(), "return (typeof tmp == 'object' && 'car' in tmp);", (function(){
7095                 var symbol = l146;
7096                 var value = symbol.value;
7097                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7098                 return value;
7099             })()), "})()"));
7100         })(l183.fvalue(pv, v771));
7101     })();
7102 })), cdr: (function(){
7103     var symbol = l286;
7104     var value = symbol.value;
7105     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7106     return value;
7107 })()}));
7108 ((l286).value = ({car: l45.fvalue(pv, l31, (function (values,v773){
7109     checkArgs(arguments, 2);
7110     return (function(){
7111         return (function(v774){
7112             return l181.fvalue(values, "(function(){", (function(){
7113                 var symbol = l146;
7114                 var value = symbol.value;
7115                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7116                 return value;
7117             })(), l185.fvalue(pv, "var tmp = ", v774, ";", (function(){
7118                 var symbol = l146;
7119                 var value = symbol.value;
7120                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7121                 return value;
7122             })(), "return tmp === ", l183.fvalue(pv, l5.value), "? ", l183.fvalue(pv, l5.value), ": tmp.car;", (function(){
7123                 var symbol = l146;
7124                 var value = symbol.value;
7125                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7126                 return value;
7127             })()), "})()");
7128         })(l183.fvalue(pv, v773));
7129     })();
7130 })), cdr: (function(){
7131     var symbol = l286;
7132     var value = symbol.value;
7133     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7134     return value;
7135 })()}));
7136 ((l286).value = ({car: l45.fvalue(pv, l32, (function (values,v775){
7137     checkArgs(arguments, 2);
7138     return (function(){
7139         return (function(v776){
7140             return l181.fvalue(values, "(function(){", (function(){
7141                 var symbol = l146;
7142                 var value = symbol.value;
7143                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7144                 return value;
7145             })(), l185.fvalue(pv, "var tmp = ", v776, ";", (function(){
7146                 var symbol = l146;
7147                 var value = symbol.value;
7148                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7149                 return value;
7150             })(), "return tmp === ", l183.fvalue(pv, l5.value), "? ", l183.fvalue(pv, l5.value), ": tmp.cdr;", (function(){
7151                 var symbol = l146;
7152                 var value = symbol.value;
7153                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7154                 return value;
7155             })()), "})()");
7156         })(l183.fvalue(pv, v775));
7157     })();
7158 })), cdr: (function(){
7159     var symbol = l286;
7160     var value = symbol.value;
7161     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7162     return value;
7163 })()}));
7164 ((l286).value = ({car: l45.fvalue(pv, l118, (function (values,v777,v778){
7165     checkArgs(arguments, 3);
7166     return (function(){
7167         return (function(v779,v780){
7168             return l181.fvalue(values, "(function(){", (function(){
7169                 var symbol = l146;
7170                 var value = symbol.value;
7171                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7172                 return value;
7173             })(), l185.fvalue(pv, l181.fvalue(pv, "var ", "x", " = ", v779, ";", (function(){
7174                 var symbol = l146;
7175                 var value = symbol.value;
7176                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7177                 return value;
7178             })()), l181.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){
7179                 var symbol = l146;
7180                 var value = symbol.value;
7181                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7182                 return value;
7183             })(), l185.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
7184                 var symbol = l146;
7185                 var value = symbol.value;
7186                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7187                 return value;
7188             })())), l181.fvalue(pv, "return ", l181.fvalue(pv, "(x.car = ", v780, ", x)"), ";", (function(){
7189                 var symbol = l146;
7190                 var value = symbol.value;
7191                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7192                 return value;
7193             })())), "})()");
7194         })(l183.fvalue(pv, v777),l183.fvalue(pv, v778));
7195     })();
7196 })), cdr: (function(){
7197     var symbol = l286;
7198     var value = symbol.value;
7199     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7200     return value;
7201 })()}));
7202 ((l286).value = ({car: l45.fvalue(pv, l119, (function (values,v781,v782){
7203     checkArgs(arguments, 3);
7204     return (function(){
7205         return (function(v783,v784){
7206             return l181.fvalue(values, "(function(){", (function(){
7207                 var symbol = l146;
7208                 var value = symbol.value;
7209                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7210                 return value;
7211             })(), l185.fvalue(pv, l181.fvalue(pv, "var ", "x", " = ", v783, ";", (function(){
7212                 var symbol = l146;
7213                 var value = symbol.value;
7214                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7215                 return value;
7216             })()), l181.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){
7217                 var symbol = l146;
7218                 var value = symbol.value;
7219                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7220                 return value;
7221             })(), l185.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
7222                 var symbol = l146;
7223                 var value = symbol.value;
7224                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7225                 return value;
7226             })())), l181.fvalue(pv, "return ", l181.fvalue(pv, "(x.cdr = ", v784, ", x)"), ";", (function(){
7227                 var symbol = l146;
7228                 var value = symbol.value;
7229                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7230                 return value;
7231             })())), "})()");
7232         })(l183.fvalue(pv, v781),l183.fvalue(pv, v782));
7233     })();
7234 })), cdr: (function(){
7235     var symbol = l286;
7236     var value = symbol.value;
7237     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7238     return value;
7239 })()}));
7240 var l302 = {name: "SYMBOLP"};
7241 ((l286).value = ({car: l45.fvalue(pv, l302, (function (values,v785){
7242     checkArgs(arguments, 2);
7243     return (function(){
7244         return (function(v786){
7245             return l182.fvalue(values, l181.fvalue(pv, "(function(){", (function(){
7246                 var symbol = l146;
7247                 var value = symbol.value;
7248                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7249                 return value;
7250             })(), l185.fvalue(pv, "var tmp = ", v786, ";", (function(){
7251                 var symbol = l146;
7252                 var value = symbol.value;
7253                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7254                 return value;
7255             })(), "return (typeof tmp == 'object' && 'name' in tmp);", (function(){
7256                 var symbol = l146;
7257                 var value = symbol.value;
7258                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7259                 return value;
7260             })()), "})()"));
7261         })(l183.fvalue(pv, v785));
7262     })();
7263 })), cdr: (function(){
7264     var symbol = l286;
7265     var value = symbol.value;
7266     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7267     return value;
7268 })()}));
7269 var l303 = {name: "MAKE-SYMBOL"};
7270 ((l286).value = ({car: l45.fvalue(pv, l303, (function (values,v787){
7271     checkArgs(arguments, 2);
7272     return (function(){
7273         return (function(v788){
7274             return l181.fvalue(values, "(function(){", (function(){
7275                 var symbol = l146;
7276                 var value = symbol.value;
7277                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7278                 return value;
7279             })(), l185.fvalue(pv, l181.fvalue(pv, "var ", "name", " = ", v788, ";", (function(){
7280                 var symbol = l146;
7281                 var value = symbol.value;
7282                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7283                 return value;
7284             })()), l181.fvalue(pv, "if (typeof ", "name", " != '", "string", "')", (function(){
7285                 var symbol = l146;
7286                 var value = symbol.value;
7287                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7288                 return value;
7289             })(), l185.fvalue(pv, "throw 'The value ' + ", "name", " + ' is not a type ", "string", ".';", (function(){
7290                 var symbol = l146;
7291                 var value = symbol.value;
7292                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7293                 return value;
7294             })())), l181.fvalue(pv, "return ", "({name: name})", ";", (function(){
7295                 var symbol = l146;
7296                 var value = symbol.value;
7297                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7298                 return value;
7299             })())), "})()");
7300         })(l183.fvalue(pv, v787));
7301     })();
7302 })), cdr: (function(){
7303     var symbol = l286;
7304     var value = symbol.value;
7305     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7306     return value;
7307 })()}));
7308 var l304 = {name: "SYMBOL-NAME"};
7309 ((l286).value = ({car: l45.fvalue(pv, l304, (function (values,v789){
7310     checkArgs(arguments, 2);
7311     return (function(){
7312         return (function(v790){
7313             return l181.fvalue(values, "(", v790, ").name");
7314         })(l183.fvalue(pv, v789));
7315     })();
7316 })), cdr: (function(){
7317     var symbol = l286;
7318     var value = symbol.value;
7319     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7320     return value;
7321 })()}));
7322 ((l286).value = ({car: l45.fvalue(pv, l245, (function (values,v791,v792){
7323     checkArgs(arguments, 3);
7324     return (function(){
7325         return (function(v793,v794){
7326             return l181.fvalue(values, "(", v793, ").value = ", v794);
7327         })(l183.fvalue(pv, v791),l183.fvalue(pv, v792));
7328     })();
7329 })), cdr: (function(){
7330     var symbol = l286;
7331     var value = symbol.value;
7332     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7333     return value;
7334 })()}));
7335 var l305 = {name: "FSET"};
7336 ((l286).value = ({car: l45.fvalue(pv, l305, (function (values,v795,v796){
7337     checkArgs(arguments, 3);
7338     return (function(){
7339         return (function(v797,v798){
7340             return l181.fvalue(values, "(", v797, ").fvalue = ", v798);
7341         })(l183.fvalue(pv, v795),l183.fvalue(pv, v796));
7342     })();
7343 })), cdr: (function(){
7344     var symbol = l286;
7345     var value = symbol.value;
7346     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7347     return value;
7348 })()}));
7349 ((l286).value = ({car: l45.fvalue(pv, l19, (function (values,v799){
7350     checkArgs(arguments, 2);
7351     return (function(){
7352         return (function(v800){
7353             return l182.fvalue(values, l181.fvalue(pv, "(", v800, ".value !== undefined)"));
7354         })(l183.fvalue(pv, v799));
7355     })();
7356 })), cdr: (function(){
7357     var symbol = l286;
7358     var value = symbol.value;
7359     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7360     return value;
7361 })()}));
7362 var l306 = {name: "SYMBOL-VALUE"};
7363 ((l286).value = ({car: l45.fvalue(pv, l306, (function (values,v801){
7364     checkArgs(arguments, 2);
7365     return (function(){
7366         return (function(v802){
7367             return l181.fvalue(values, "(function(){", (function(){
7368                 var symbol = l146;
7369                 var value = symbol.value;
7370                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7371                 return value;
7372             })(), l185.fvalue(pv, "var symbol = ", v802, ";", (function(){
7373                 var symbol = l146;
7374                 var value = symbol.value;
7375                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7376                 return value;
7377             })(), "var value = symbol.value;", (function(){
7378                 var symbol = l146;
7379                 var value = symbol.value;
7380                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7381                 return value;
7382             })(), "if (value === undefined) throw \"Variable `\" + symbol.name + \"' is unbound.\";", (function(){
7383                 var symbol = l146;
7384                 var value = symbol.value;
7385                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7386                 return value;
7387             })(), "return value;", (function(){
7388                 var symbol = l146;
7389                 var value = symbol.value;
7390                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7391                 return value;
7392             })()), "})()");
7393         })(l183.fvalue(pv, v801));
7394     })();
7395 })), cdr: (function(){
7396     var symbol = l286;
7397     var value = symbol.value;
7398     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7399     return value;
7400 })()}));
7401 ((l286).value = ({car: l45.fvalue(pv, l253, (function (values,v803){
7402     checkArgs(arguments, 2);
7403     return (function(){
7404         return (function(v804){
7405             return l181.fvalue(values, "(function(){", (function(){
7406                 var symbol = l146;
7407                 var value = symbol.value;
7408                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7409                 return value;
7410             })(), l185.fvalue(pv, "var symbol = ", v804, ";", (function(){
7411                 var symbol = l146;
7412                 var value = symbol.value;
7413                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7414                 return value;
7415             })(), "var func = symbol.fvalue;", (function(){
7416                 var symbol = l146;
7417                 var value = symbol.value;
7418                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7419                 return value;
7420             })(), "if (func === undefined) throw \"Function `\" + symbol.name + \"' is undefined.\";", (function(){
7421                 var symbol = l146;
7422                 var value = symbol.value;
7423                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7424                 return value;
7425             })(), "return func;", (function(){
7426                 var symbol = l146;
7427                 var value = symbol.value;
7428                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7429                 return value;
7430             })()), "})()");
7431         })(l183.fvalue(pv, v803));
7432     })();
7433 })), cdr: (function(){
7434     var symbol = l286;
7435     var value = symbol.value;
7436     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7437     return value;
7438 })()}));
7439 var l307 = {name: "SYMBOL-PLIST"};
7440 ((l286).value = ({car: l45.fvalue(pv, l307, (function (values,v805){
7441     checkArgs(arguments, 2);
7442     return (function(){
7443         return (function(v806){
7444             return l181.fvalue(values, "((", v806, ").plist || ", l183.fvalue(pv, l5.value), ")");
7445         })(l183.fvalue(pv, v805));
7446     })();
7447 })), cdr: (function(){
7448     var symbol = l286;
7449     var value = symbol.value;
7450     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7451     return value;
7452 })()}));
7453 var l308 = {name: "LAMBDA-CODE"};
7454 ((l286).value = ({car: l45.fvalue(pv, l308, (function (values,v807){
7455     checkArgs(arguments, 2);
7456     return (function(){
7457         return (function(v808){
7458             return l181.fvalue(values, "(", v808, ").toString()");
7459         })(l183.fvalue(pv, v807));
7460     })();
7461 })), cdr: (function(){
7462     var symbol = l286;
7463     var value = symbol.value;
7464     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7465     return value;
7466 })()}));
7467 var l309 = {name: "EQ"};
7468 ((l286).value = ({car: l45.fvalue(pv, l309, (function (values,v809,v810){
7469     checkArgs(arguments, 3);
7470     return (function(){
7471         return (function(v811,v812){
7472             return l182.fvalue(values, l181.fvalue(pv, "(", v811, " === ", v812, ")"));
7473         })(l183.fvalue(pv, v809),l183.fvalue(pv, v810));
7474     })();
7475 })), cdr: (function(){
7476     var symbol = l286;
7477     var value = symbol.value;
7478     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7479     return value;
7480 })()}));
7481 var l310 = {name: "EQUAL"};
7482 ((l286).value = ({car: l45.fvalue(pv, l310, (function (values,v813,v814){
7483     checkArgs(arguments, 3);
7484     return (function(){
7485         return (function(v815,v816){
7486             return l182.fvalue(values, l181.fvalue(pv, "(", v815, " == ", v816, ")"));
7487         })(l183.fvalue(pv, v813),l183.fvalue(pv, v814));
7488     })();
7489 })), cdr: (function(){
7490     var symbol = l286;
7491     var value = symbol.value;
7492     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7493     return value;
7494 })()}));
7495 var l311 = {name: "CHAR-TO-STRING"};
7496 ((l286).value = ({car: l45.fvalue(pv, l311, (function (values,v817){
7497     checkArgs(arguments, 2);
7498     return (function(){
7499         return (function(v818){
7500             return l181.fvalue(values, "(function(){", (function(){
7501                 var symbol = l146;
7502                 var value = symbol.value;
7503                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7504                 return value;
7505             })(), l185.fvalue(pv, l181.fvalue(pv, "var ", "x", " = ", v818, ";", (function(){
7506                 var symbol = l146;
7507                 var value = symbol.value;
7508                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7509                 return value;
7510             })()), l181.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
7511                 var symbol = l146;
7512                 var value = symbol.value;
7513                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7514                 return value;
7515             })(), l185.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
7516                 var symbol = l146;
7517                 var value = symbol.value;
7518                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7519                 return value;
7520             })())), l181.fvalue(pv, "return ", "String.fromCharCode(x)", ";", (function(){
7521                 var symbol = l146;
7522                 var value = symbol.value;
7523                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7524                 return value;
7525             })())), "})()");
7526         })(l183.fvalue(pv, v817));
7527     })();
7528 })), cdr: (function(){
7529     var symbol = l286;
7530     var value = symbol.value;
7531     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7532     return value;
7533 })()}));
7534 var l312 = {name: "STRINGP"};
7535 ((l286).value = ({car: l45.fvalue(pv, l312, (function (values,v819){
7536     checkArgs(arguments, 2);
7537     return (function(){
7538         return (function(v820){
7539             return l182.fvalue(values, l181.fvalue(pv, "(typeof(", v820, ") == \"string\")"));
7540         })(l183.fvalue(pv, v819));
7541     })();
7542 })), cdr: (function(){
7543     var symbol = l286;
7544     var value = symbol.value;
7545     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7546     return value;
7547 })()}));
7548 var l313 = {name: "STRING-UPCASE"};
7549 ((l286).value = ({car: l45.fvalue(pv, l313, (function (values,v821){
7550     checkArgs(arguments, 2);
7551     return (function(){
7552         return (function(v822){
7553             return l181.fvalue(values, "(function(){", (function(){
7554                 var symbol = l146;
7555                 var value = symbol.value;
7556                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7557                 return value;
7558             })(), l185.fvalue(pv, l181.fvalue(pv, "var ", "x", " = ", v822, ";", (function(){
7559                 var symbol = l146;
7560                 var value = symbol.value;
7561                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7562                 return value;
7563             })()), l181.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
7564                 var symbol = l146;
7565                 var value = symbol.value;
7566                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7567                 return value;
7568             })(), l185.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
7569                 var symbol = l146;
7570                 var value = symbol.value;
7571                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7572                 return value;
7573             })())), l181.fvalue(pv, "return ", "x.toUpperCase()", ";", (function(){
7574                 var symbol = l146;
7575                 var value = symbol.value;
7576                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7577                 return value;
7578             })())), "})()");
7579         })(l183.fvalue(pv, v821));
7580     })();
7581 })), cdr: (function(){
7582     var symbol = l286;
7583     var value = symbol.value;
7584     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7585     return value;
7586 })()}));
7587 var l314 = {name: "STRING-LENGTH"};
7588 ((l286).value = ({car: l45.fvalue(pv, l314, (function (values,v823){
7589     checkArgs(arguments, 2);
7590     return (function(){
7591         return (function(v824){
7592             return l181.fvalue(values, "(function(){", (function(){
7593                 var symbol = l146;
7594                 var value = symbol.value;
7595                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7596                 return value;
7597             })(), l185.fvalue(pv, l181.fvalue(pv, "var ", "x", " = ", v824, ";", (function(){
7598                 var symbol = l146;
7599                 var value = symbol.value;
7600                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7601                 return value;
7602             })()), l181.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
7603                 var symbol = l146;
7604                 var value = symbol.value;
7605                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7606                 return value;
7607             })(), l185.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
7608                 var symbol = l146;
7609                 var value = symbol.value;
7610                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7611                 return value;
7612             })())), l181.fvalue(pv, "return ", "x.length", ";", (function(){
7613                 var symbol = l146;
7614                 var value = symbol.value;
7615                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7616                 return value;
7617             })())), "})()");
7618         })(l183.fvalue(pv, v823));
7619     })();
7620 })), cdr: (function(){
7621     var symbol = l286;
7622     var value = symbol.value;
7623     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7624     return value;
7625 })()}));
7626 var l315 = {name: "SLICE"};
7627 ((l286).value = ({car: l45.fvalue(pv, l315, (function (values,v825,v826,v827){
7628     checkArgsAtLeast(arguments, 3);
7629     checkArgsAtMost(arguments, 4);
7630     switch(arguments.length-1){
7631     case 2:
7632     v827=l5.value;
7633     default: break;
7634     }
7635     return (function(){
7636         return l181.fvalue(values, "(function(){", (function(){
7637             var symbol = l146;
7638             var value = symbol.value;
7639             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7640             return value;
7641         })(), l185.fvalue(pv, "var str = ", l183.fvalue(pv, v825), ";", (function(){
7642             var symbol = l146;
7643             var value = symbol.value;
7644             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7645             return value;
7646         })(), "var a = ", l183.fvalue(pv, v826), ";", (function(){
7647             var symbol = l146;
7648             var value = symbol.value;
7649             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7650             return value;
7651         })(), "var b;", (function(){
7652             var symbol = l146;
7653             var value = symbol.value;
7654             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7655             return value;
7656         })(), (v827 !== l5.value ? l181.fvalue(pv, "b = ", l183.fvalue(pv, v827), ";", (function(){
7657             var symbol = l146;
7658             var value = symbol.value;
7659             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7660             return value;
7661         })()) : l5.value), "return str.slice(a,b);", (function(){
7662             var symbol = l146;
7663             var value = symbol.value;
7664             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7665             return value;
7666         })()), "})()");
7667     })();
7668 })), cdr: (function(){
7669     var symbol = l286;
7670     var value = symbol.value;
7671     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7672     return value;
7673 })()}));
7674 var l316 = {name: "CHAR"};
7675 ((l286).value = ({car: l45.fvalue(pv, l316, (function (values,v828,v829){
7676     checkArgs(arguments, 3);
7677     return (function(){
7678         return (function(v830,v831){
7679             return l181.fvalue(values, "(function(){", (function(){
7680                 var symbol = l146;
7681                 var value = symbol.value;
7682                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7683                 return value;
7684             })(), l185.fvalue(pv, l181.fvalue(pv, "var ", "string", " = ", v830, ";", (function(){
7685                 var symbol = l146;
7686                 var value = symbol.value;
7687                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7688                 return value;
7689             })()), l181.fvalue(pv, "var ", "index", " = ", v831, ";", (function(){
7690                 var symbol = l146;
7691                 var value = symbol.value;
7692                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7693                 return value;
7694             })()), l181.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){
7695                 var symbol = l146;
7696                 var value = symbol.value;
7697                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7698                 return value;
7699             })(), l185.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
7700                 var symbol = l146;
7701                 var value = symbol.value;
7702                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7703                 return value;
7704             })())), l181.fvalue(pv, "if (typeof ", "index", " != '", "number", "')", (function(){
7705                 var symbol = l146;
7706                 var value = symbol.value;
7707                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7708                 return value;
7709             })(), l185.fvalue(pv, "throw 'The value ' + ", "index", " + ' is not a type ", "number", ".';", (function(){
7710                 var symbol = l146;
7711                 var value = symbol.value;
7712                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7713                 return value;
7714             })())), l181.fvalue(pv, "return ", "string.charCodeAt(index)", ";", (function(){
7715                 var symbol = l146;
7716                 var value = symbol.value;
7717                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7718                 return value;
7719             })())), "})()");
7720         })(l183.fvalue(pv, v828),l183.fvalue(pv, v829));
7721     })();
7722 })), cdr: (function(){
7723     var symbol = l286;
7724     var value = symbol.value;
7725     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7726     return value;
7727 })()}));
7728 ((l286).value = ({car: l45.fvalue(pv, l73, (function (values,v832,v833){
7729     checkArgs(arguments, 3);
7730     return (function(){
7731         return (function(v834,v835){
7732             return l181.fvalue(values, "(function(){", (function(){
7733                 var symbol = l146;
7734                 var value = symbol.value;
7735                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7736                 return value;
7737             })(), l185.fvalue(pv, l181.fvalue(pv, "var ", "string1", " = ", v834, ";", (function(){
7738                 var symbol = l146;
7739                 var value = symbol.value;
7740                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7741                 return value;
7742             })()), l181.fvalue(pv, "var ", "string2", " = ", v835, ";", (function(){
7743                 var symbol = l146;
7744                 var value = symbol.value;
7745                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7746                 return value;
7747             })()), l181.fvalue(pv, "if (typeof ", "string1", " != '", "string", "')", (function(){
7748                 var symbol = l146;
7749                 var value = symbol.value;
7750                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7751                 return value;
7752             })(), l185.fvalue(pv, "throw 'The value ' + ", "string1", " + ' is not a type ", "string", ".';", (function(){
7753                 var symbol = l146;
7754                 var value = symbol.value;
7755                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7756                 return value;
7757             })())), l181.fvalue(pv, "if (typeof ", "string2", " != '", "string", "')", (function(){
7758                 var symbol = l146;
7759                 var value = symbol.value;
7760                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7761                 return value;
7762             })(), l185.fvalue(pv, "throw 'The value ' + ", "string2", " + ' is not a type ", "string", ".';", (function(){
7763                 var symbol = l146;
7764                 var value = symbol.value;
7765                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7766                 return value;
7767             })())), l181.fvalue(pv, "return ", "string1.concat(string2)", ";", (function(){
7768                 var symbol = l146;
7769                 var value = symbol.value;
7770                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7771                 return value;
7772             })())), "})()");
7773         })(l183.fvalue(pv, v832),l183.fvalue(pv, v833));
7774     })();
7775 })), cdr: (function(){
7776     var symbol = l286;
7777     var value = symbol.value;
7778     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7779     return value;
7780 })()}));
7781 var l317 = {name: "FUNCALL"};
7782 ((l286).value = ({car: l45.fvalue(pv, l317, (function (values,v837){
7783     checkArgsAtLeast(arguments, 2);
7784     var v836= l5.value;
7785     for (var i = arguments.length-1; i>=2; i--)
7786         v836 = {car: arguments[i], cdr:
7787     v836};
7788     return (function(){
7789         return l181.fvalue(values, "(", l183.fvalue(pv, v837), ")(", l149.fvalue(pv, ({car: ((function(){
7790             var symbol = l186;
7791             var value = symbol.value;
7792             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7793             return value;
7794         })() !== l5.value ? "values" : "pv"), cdr: l78.fvalue(pv, (function(){
7795             var symbol = l183;
7796             var func = symbol.fvalue;
7797             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7798             return func;
7799         })(), v836)}), ", "), ")");
7800     })();
7801 })), cdr: (function(){
7802     var symbol = l286;
7803     var value = symbol.value;
7804     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7805     return value;
7806 })()}));
7807 var l318 = {name: "APPLY"};
7808 ((l286).value = ({car: l45.fvalue(pv, l318, (function (values,v839){
7809     checkArgsAtLeast(arguments, 2);
7810     var v838= l5.value;
7811     for (var i = arguments.length-1; i>=2; i--)
7812         v838 = {car: arguments[i], cdr:
7813     v838};
7814     return (function(){
7815         return (l13.fvalue(pv, v838) !== l5.value ? l181.fvalue(values, "(", l183.fvalue(pv, v839), ")()") : (function(v840,v841){
7816             return l181.fvalue(values, "(function(){", (function(){
7817                 var symbol = l146;
7818                 var value = symbol.value;
7819                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7820                 return value;
7821             })(), l185.fvalue(pv, "var f = ", l183.fvalue(pv, v839), ";", (function(){
7822                 var symbol = l146;
7823                 var value = symbol.value;
7824                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7825                 return value;
7826             })(), "var args = [", l149.fvalue(pv, ({car: ((function(){
7827                 var symbol = l186;
7828                 var value = symbol.value;
7829                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7830                 return value;
7831             })() !== l5.value ? "values" : "pv"), cdr: l78.fvalue(pv, (function(){
7832                 var symbol = l183;
7833                 var func = symbol.fvalue;
7834                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7835                 return func;
7836             })(), v840)}), ", "), "];", (function(){
7837                 var symbol = l146;
7838                 var value = symbol.value;
7839                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7840                 return value;
7841             })(), "var tail = (", l183.fvalue(pv, v841), ");", (function(){
7842                 var symbol = l146;
7843                 var value = symbol.value;
7844                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7845                 return value;
7846             })(), "while (tail != ", l183.fvalue(pv, l5.value), "){", (function(){
7847                 var symbol = l146;
7848                 var value = symbol.value;
7849                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7850                 return value;
7851             })(), "    args.push(tail.car);", (function(){
7852                 var symbol = l146;
7853                 var value = symbol.value;
7854                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7855                 return value;
7856             })(), "    tail = tail.cdr;", (function(){
7857                 var symbol = l146;
7858                 var value = symbol.value;
7859                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7860                 return value;
7861             })(), "}", (function(){
7862                 var symbol = l146;
7863                 var value = symbol.value;
7864                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7865                 return value;
7866             })(), "return f.apply(this, args);", (function(){
7867                 var symbol = l146;
7868                 var value = symbol.value;
7869                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7870                 return value;
7871             })()), "})()");
7872         })(l91.fvalue(pv, v838),(function(){
7873             var tmp = l90.fvalue(pv, v838);
7874             return tmp === l5.value? l5.value: tmp.car;
7875         })()));
7876     })();
7877 })), cdr: (function(){
7878     var symbol = l286;
7879     var value = symbol.value;
7880     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7881     return value;
7882 })()}));
7883 var l319 = {name: "JS-EVAL"};
7884 ((l286).value = ({car: l45.fvalue(pv, l319, (function (values,v842){
7885     checkArgs(arguments, 2);
7886     return (function(){
7887         return (function(v843){
7888             return l181.fvalue(values, "(function(){", (function(){
7889                 var symbol = l146;
7890                 var value = symbol.value;
7891                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7892                 return value;
7893             })(), l185.fvalue(pv, l181.fvalue(pv, "var ", "string", " = ", v843, ";", (function(){
7894                 var symbol = l146;
7895                 var value = symbol.value;
7896                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7897                 return value;
7898             })()), l181.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){
7899                 var symbol = l146;
7900                 var value = symbol.value;
7901                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7902                 return value;
7903             })(), l185.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
7904                 var symbol = l146;
7905                 var value = symbol.value;
7906                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7907                 return value;
7908             })())), l181.fvalue(pv, "return ", ((function(){
7909                 var symbol = l186;
7910                 var value = symbol.value;
7911                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7912                 return value;
7913             })() !== l5.value ? l181.fvalue(pv, "(function(){", (function(){
7914                 var symbol = l146;
7915                 var value = symbol.value;
7916                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7917                 return value;
7918             })(), l185.fvalue(pv, "var v = eval.apply(window, [string]);", (function(){
7919                 var symbol = l146;
7920                 var value = symbol.value;
7921                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7922                 return value;
7923             })(), "if (typeof v !== 'object' || !('multiple-value' in v)){", (function(){
7924                 var symbol = l146;
7925                 var value = symbol.value;
7926                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7927                 return value;
7928             })(), l185.fvalue(pv, "v = [v];", (function(){
7929                 var symbol = l146;
7930                 var value = symbol.value;
7931                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7932                 return value;
7933             })(), "v['multiple-value'] = true;", (function(){
7934                 var symbol = l146;
7935                 var value = symbol.value;
7936                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7937                 return value;
7938             })()), "}", (function(){
7939                 var symbol = l146;
7940                 var value = symbol.value;
7941                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7942                 return value;
7943             })(), "return values.apply(this, v);", (function(){
7944                 var symbol = l146;
7945                 var value = symbol.value;
7946                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7947                 return value;
7948             })()), "})()") : "eval.apply(window, [string])"), ";", (function(){
7949                 var symbol = l146;
7950                 var value = symbol.value;
7951                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7952                 return value;
7953             })())), "})()");
7954         })(l183.fvalue(pv, v842));
7955     })();
7956 })), cdr: (function(){
7957     var symbol = l286;
7958     var value = symbol.value;
7959     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7960     return value;
7961 })()}));
7962 var l320 = {name: "ERROR"};
7963 ((l286).value = ({car: l45.fvalue(pv, l320, (function (values,v844){
7964     checkArgs(arguments, 2);
7965     return (function(){
7966         return (function(v845){
7967             return l181.fvalue(values, "(function(){", (function(){
7968                 var symbol = l146;
7969                 var value = symbol.value;
7970                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7971                 return value;
7972             })(), l185.fvalue(pv, "throw ", v845, ";", (function(){
7973                 var symbol = l146;
7974                 var value = symbol.value;
7975                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7976                 return value;
7977             })()), "})()");
7978         })(l183.fvalue(pv, v844));
7979     })();
7980 })), cdr: (function(){
7981     var symbol = l286;
7982     var value = symbol.value;
7983     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7984     return value;
7985 })()}));
7986 var l321 = {name: "NEW"};
7987 ((l286).value = ({car: l45.fvalue(pv, l321, (function (values){
7988     checkArgsAtMost(arguments, 1);
7989     return (function(){
7990         return (function(){
7991             return "{}";
7992         })();
7993     })();
7994 })), cdr: (function(){
7995     var symbol = l286;
7996     var value = symbol.value;
7997     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7998     return value;
7999 })()}));
8000 var l322 = {name: "OBJECTP"};
8001 ((l286).value = ({car: l45.fvalue(pv, l322, (function (values,v846){
8002     checkArgs(arguments, 2);
8003     return (function(){
8004         return (function(v847){
8005             return l182.fvalue(values, l181.fvalue(pv, "(typeof (", v847, ") === 'object')"));
8006         })(l183.fvalue(pv, v846));
8007     })();
8008 })), cdr: (function(){
8009     var symbol = l286;
8010     var value = symbol.value;
8011     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8012     return value;
8013 })()}));
8014 var l323 = {name: "OGET"};
8015 ((l286).value = ({car: l45.fvalue(pv, l323, (function (values,v848,v849){
8016     checkArgs(arguments, 3);
8017     return (function(){
8018         return (function(v850,v851){
8019             return l181.fvalue(values, "(function(){", (function(){
8020                 var symbol = l146;
8021                 var value = symbol.value;
8022                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8023                 return value;
8024             })(), l185.fvalue(pv, "var tmp = ", "(", v850, ")[", v851, "];", (function(){
8025                 var symbol = l146;
8026                 var value = symbol.value;
8027                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8028                 return value;
8029             })(), "return tmp == undefined? ", l183.fvalue(pv, l5.value), ": tmp ;", (function(){
8030                 var symbol = l146;
8031                 var value = symbol.value;
8032                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8033                 return value;
8034             })()), "})()");
8035         })(l183.fvalue(pv, v848),l183.fvalue(pv, v849));
8036     })();
8037 })), cdr: (function(){
8038     var symbol = l286;
8039     var value = symbol.value;
8040     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8041     return value;
8042 })()}));
8043 var l324 = {name: "OSET"};
8044 ((l286).value = ({car: l45.fvalue(pv, l324, (function (values,v852,v853,v854){
8045     checkArgs(arguments, 4);
8046     return (function(){
8047         return (function(v855,v856,v857){
8048             return l181.fvalue(values, "((", v855, ")[", v856, "] = ", v857, ")");
8049         })(l183.fvalue(pv, v852),l183.fvalue(pv, v853),l183.fvalue(pv, v854));
8050     })();
8051 })), cdr: (function(){
8052     var symbol = l286;
8053     var value = symbol.value;
8054     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8055     return value;
8056 })()}));
8057 var l325 = {name: "IN"};
8058 ((l286).value = ({car: l45.fvalue(pv, l325, (function (values,v858,v859){
8059     checkArgs(arguments, 3);
8060     return (function(){
8061         return (function(v860,v861){
8062             return l182.fvalue(values, l181.fvalue(pv, "((", v860, ") in (", v861, "))"));
8063         })(l183.fvalue(pv, v858),l183.fvalue(pv, v859));
8064     })();
8065 })), cdr: (function(){
8066     var symbol = l286;
8067     var value = symbol.value;
8068     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8069     return value;
8070 })()}));
8071 var l326 = {name: "FUNCTIONP"};
8072 ((l286).value = ({car: l45.fvalue(pv, l326, (function (values,v862){
8073     checkArgs(arguments, 2);
8074     return (function(){
8075         return (function(v863){
8076             return l182.fvalue(values, l181.fvalue(pv, "(typeof ", v863, " == 'function')"));
8077         })(l183.fvalue(pv, v862));
8078     })();
8079 })), cdr: (function(){
8080     var symbol = l286;
8081     var value = symbol.value;
8082     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8083     return value;
8084 })()}));
8085 var l327 = {name: "WRITE-STRING"};
8086 ((l286).value = ({car: l45.fvalue(pv, l327, (function (values,v864){
8087     checkArgs(arguments, 2);
8088     return (function(){
8089         return (function(v865){
8090             return l181.fvalue(values, "(function(){", (function(){
8091                 var symbol = l146;
8092                 var value = symbol.value;
8093                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8094                 return value;
8095             })(), l185.fvalue(pv, l181.fvalue(pv, "var ", "x", " = ", v865, ";", (function(){
8096                 var symbol = l146;
8097                 var value = symbol.value;
8098                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8099                 return value;
8100             })()), l181.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
8101                 var symbol = l146;
8102                 var value = symbol.value;
8103                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8104                 return value;
8105             })(), l185.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
8106                 var symbol = l146;
8107                 var value = symbol.value;
8108                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8109                 return value;
8110             })())), l181.fvalue(pv, "return ", "lisp.write(x)", ";", (function(){
8111                 var symbol = l146;
8112                 var value = symbol.value;
8113                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8114                 return value;
8115             })())), "})()");
8116         })(l183.fvalue(pv, v864));
8117     })();
8118 })), cdr: (function(){
8119     var symbol = l286;
8120     var value = symbol.value;
8121     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8122     return value;
8123 })()}));
8124 var l328 = {name: "MAKE-ARRAY"};
8125 ((l286).value = ({car: l45.fvalue(pv, l328, (function (values,v866){
8126     checkArgs(arguments, 2);
8127     return (function(){
8128         return (function(v867){
8129             return l181.fvalue(values, "(function(){", (function(){
8130                 var symbol = l146;
8131                 var value = symbol.value;
8132                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8133                 return value;
8134             })(), l185.fvalue(pv, "var r = [];", (function(){
8135                 var symbol = l146;
8136                 var value = symbol.value;
8137                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8138                 return value;
8139             })(), "for (var i = 0; i < ", v867, "; i++)", (function(){
8140                 var symbol = l146;
8141                 var value = symbol.value;
8142                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8143                 return value;
8144             })(), l185.fvalue(pv, "r.push(", l183.fvalue(pv, l5.value), ");", (function(){
8145                 var symbol = l146;
8146                 var value = symbol.value;
8147                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8148                 return value;
8149             })()), "return r;", (function(){
8150                 var symbol = l146;
8151                 var value = symbol.value;
8152                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8153                 return value;
8154             })()), "})()");
8155         })(l183.fvalue(pv, v866));
8156     })();
8157 })), cdr: (function(){
8158     var symbol = l286;
8159     var value = symbol.value;
8160     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8161     return value;
8162 })()}));
8163 var l329 = {name: "ARRAYP"};
8164 ((l286).value = ({car: l45.fvalue(pv, l329, (function (values,v868){
8165     checkArgs(arguments, 2);
8166     return (function(){
8167         return (function(v869){
8168             return l182.fvalue(values, l181.fvalue(pv, "(function(){", (function(){
8169                 var symbol = l146;
8170                 var value = symbol.value;
8171                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8172                 return value;
8173             })(), l185.fvalue(pv, "var x = ", v869, ";", (function(){
8174                 var symbol = l146;
8175                 var value = symbol.value;
8176                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8177                 return value;
8178             })(), "return typeof x === 'object' && 'length' in x;"), "})()"));
8179         })(l183.fvalue(pv, v868));
8180     })();
8181 })), cdr: (function(){
8182     var symbol = l286;
8183     var value = symbol.value;
8184     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8185     return value;
8186 })()}));
8187 var l330 = {name: "AREF"};
8188 ((l286).value = ({car: l45.fvalue(pv, l330, (function (values,v870,v871){
8189     checkArgs(arguments, 3);
8190     return (function(){
8191         return (function(v872,v873){
8192             return l181.fvalue(values, "(function(){", (function(){
8193                 var symbol = l146;
8194                 var value = symbol.value;
8195                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8196                 return value;
8197             })(), l185.fvalue(pv, "var x = ", "(", v872, ")[", v873, "];", (function(){
8198                 var symbol = l146;
8199                 var value = symbol.value;
8200                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8201                 return value;
8202             })(), "if (x === undefined) throw 'Out of range';", (function(){
8203                 var symbol = l146;
8204                 var value = symbol.value;
8205                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8206                 return value;
8207             })(), "return x;", (function(){
8208                 var symbol = l146;
8209                 var value = symbol.value;
8210                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8211                 return value;
8212             })()), "})()");
8213         })(l183.fvalue(pv, v870),l183.fvalue(pv, v871));
8214     })();
8215 })), cdr: (function(){
8216     var symbol = l286;
8217     var value = symbol.value;
8218     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8219     return value;
8220 })()}));
8221 var l331 = {name: "ASET"};
8222 ((l286).value = ({car: l45.fvalue(pv, l331, (function (values,v874,v875,v876){
8223     checkArgs(arguments, 4);
8224     return (function(){
8225         return (function(v877,v878,v879){
8226             return l181.fvalue(values, "(function(){", (function(){
8227                 var symbol = l146;
8228                 var value = symbol.value;
8229                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8230                 return value;
8231             })(), l185.fvalue(pv, "var x = ", v877, ";", (function(){
8232                 var symbol = l146;
8233                 var value = symbol.value;
8234                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8235                 return value;
8236             })(), "var i = ", v878, ";", (function(){
8237                 var symbol = l146;
8238                 var value = symbol.value;
8239                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8240                 return value;
8241             })(), "if (i < 0 || i >= x.length) throw 'Out of range';", (function(){
8242                 var symbol = l146;
8243                 var value = symbol.value;
8244                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8245                 return value;
8246             })(), "return x[i] = ", v879, ";", (function(){
8247                 var symbol = l146;
8248                 var value = symbol.value;
8249                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8250                 return value;
8251             })()), "})()");
8252         })(l183.fvalue(pv, v874),l183.fvalue(pv, v875),l183.fvalue(pv, v876));
8253     })();
8254 })), cdr: (function(){
8255     var symbol = l286;
8256     var value = symbol.value;
8257     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8258     return value;
8259 })()}));
8260 var l332 = {name: "GET-UNIX-TIME"};
8261 ((l286).value = ({car: l45.fvalue(pv, l332, (function (values){
8262     checkArgsAtMost(arguments, 1);
8263     return (function(){
8264         return (function(){
8265             return l181.fvalue(values, "(Math.round(new Date() / 1000))");
8266         })();
8267     })();
8268 })), cdr: (function(){
8269     var symbol = l286;
8270     var value = symbol.value;
8271     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8272     return value;
8273 })()}));
8274 var l333 = {name: "VALUES-ARRAY"};
8275 ((l286).value = ({car: l45.fvalue(pv, l333, (function (values,v880){
8276     checkArgs(arguments, 2);
8277     return (function(){
8278         return (function(v881){
8279             return ((function(){
8280                 var symbol = l186;
8281                 var value = symbol.value;
8282                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8283                 return value;
8284             })() !== l5.value ? l181.fvalue(values, "values.apply(this, ", v881, ")") : l181.fvalue(values, "pv.apply(this, ", v881, ")"));
8285         })(l183.fvalue(pv, v880));
8286     })();
8287 })), cdr: (function(){
8288     var symbol = l286;
8289     var value = symbol.value;
8290     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8291     return value;
8292 })()}));
8293 ((l286).value = ({car: l45.fvalue(pv, l155, (function (values){
8294     var v882= l5.value;
8295     for (var i = arguments.length-1; i>=1; i--)
8296         v882 = {car: arguments[i], cdr:
8297     v882};
8298     return (function(){
8299         return ((function(){
8300             var symbol = l186;
8301             var value = symbol.value;
8302             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8303             return value;
8304         })() !== l5.value ? l181.fvalue(values, "values(", l149.fvalue(pv, l78.fvalue(pv, (function(){
8305             var symbol = l183;
8306             var func = symbol.fvalue;
8307             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8308             return func;
8309         })(), v882), ", "), ")") : l181.fvalue(values, "pv(", l149.fvalue(pv, l78.fvalue(pv, (function(){
8310             var symbol = l183;
8311             var func = symbol.fvalue;
8312             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8313             return func;
8314         })(), v882), ", "), ")"));
8315     })();
8316 })), cdr: (function(){
8317     var symbol = l286;
8318     var value = symbol.value;
8319     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8320     return value;
8321 })()}));
8322 (function(){
8323     (l212).fvalue = (function(v885){
8324         ((v885)["fname"] = "MACRO");
8325         return v885;
8326     })((function (values,v883){
8327         checkArgs(arguments, 2);
8328         return (function(){
8329             return (((function(){
8330                 var tmp = v883;
8331                 return (typeof tmp == 'object' && 'name' in tmp);
8332             })()?l4.value: l5.value) !== l5.value ? (function(v884){
8333                 return (((l189.fvalue(pv, v884) === l212)?l4.value: l5.value) !== l5.value ? v884 : l5.value);
8334             })(l201.fvalue(pv, v883, (function(){
8335                 var symbol = l202;
8336                 var value = symbol.value;
8337                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8338                 return value;
8339             })(), l108)) : l5.value);
8340         })();
8341     }));
8342     return l212;
8343 })();
8344 var l334 = {name: "LS-MACROEXPAND-1"};
8345 (function(){
8346     (l334).fvalue = (function(v890){
8347         ((v890)["fname"] = "LS-MACROEXPAND-1");
8348         return v890;
8349     })((function (values,v886){
8350         checkArgs(arguments, 2);
8351         return (function(){
8352             return (function(v887){
8353                 return (v887 !== l5.value ? (function(v888){
8354                     (l60.fvalue(pv, v888) !== l5.value ? (function(v889){
8355                         l192.fvalue(pv, v887, v889);
8356                         return (v888 = v889);
8357                     })(l261.fvalue(pv, v888)) : l5.value);
8358                     return (function(){
8359                         var f = v888;
8360                         var args = [values];
8361                         var tail = ((function(){
8362                             var tmp = v886;
8363                             return tmp === l5.value? l5.value: tmp.cdr;
8364                         })());
8365                         while (tail != l5.value){
8366                             args.push(tail.car);
8367                             tail = tail.cdr;
8368                         }
8369                         return f.apply(this, args);
8370                     })();
8371                 })(l190.fvalue(pv, v887)) : v886);
8372             })(l212.fvalue(pv, (function(){
8373                 var tmp = v886;
8374                 return tmp === l5.value? l5.value: tmp.car;
8375             })()));
8376         })();
8377     }));
8378     return l334;
8379 })();
8380 var l335 = {name: "COMPILE-FUNCALL"};
8381 var l336 = {name: "G870"};
8382 (function(){
8383     (l335).fvalue = (function(v895){
8384         ((v895)["fname"] = "COMPILE-FUNCALL");
8385         return v895;
8386     })((function (values,v891,v892){
8387         checkArgs(arguments, 3);
8388         return (function(){
8389             return (function(){
8390                 var v893 = ((function(){
8391                     var symbol = l186;
8392                     var value = symbol.value;
8393                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8394                     return value;
8395                 })() !== l5.value ? "values" : "pv");
8396                 var v894 = l147.fvalue(pv, "(", l149.fvalue(pv, ({car: v893, cdr: l78.fvalue(pv, (function(){
8397                     var symbol = l183;
8398                     var func = symbol.fvalue;
8399                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8400                     return func;
8401                 })(), v892)}), ", "), ")");
8402                 return (l256.fvalue(pv, v891) !== l5.value ? l147.fvalue(values, l256.fvalue(pv, v891), v894) : ((((function(){
8403                     var tmp = v891;
8404                     return (typeof tmp == 'object' && 'name' in tmp);
8405                 })()?l4.value: l5.value) !== l5.value ? (((l135.fvalue(pv, v891) === l126.fvalue(pv, "COMMON-LISP"))?l4.value: l5.value) !== l5.value ? (function(){
8406                     var symbol = l336;
8407                     var value = symbol.value;
8408                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8409                     return value;
8410                 })() : l5.value) : l5.value) !== l5.value ? l181.fvalue(values, l183.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l176), l45.fvalue(pv, v891))), ".fvalue", v894) : l181.fvalue(values, l183.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l108), l45.fvalue(pv, v891))), v894)));
8411             })();
8412         })();
8413     }));
8414     return l335;
8415 })();
8416 (function(){
8417     (l243).fvalue = (function(v898){
8418         ((v898)["fname"] = "LS-COMPILE-BLOCK");
8419         return v898;
8420     })((function (values,v896,v897){
8421         checkArgsAtLeast(arguments, 2);
8422         checkArgsAtMost(arguments, 3);
8423         switch(arguments.length-1){
8424         case 1:
8425         v897=l5.value;
8426         default: break;
8427         }
8428         return (function(){
8429             return (v897 !== l5.value ? l181.fvalue(values, l243.fvalue(pv, l91.fvalue(pv, v896)), "return ", l183.fvalue(pv, (function(){
8430                 var tmp = l90.fvalue(pv, v896);
8431                 return tmp === l5.value? l5.value: tmp.car;
8432             })(), (function(){
8433                 var symbol = l186;
8434                 var value = symbol.value;
8435                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8436                 return value;
8437             })()), ";") : l150.fvalue(values, l94.fvalue(pv, (function(){
8438                 var symbol = l209;
8439                 var func = symbol.fvalue;
8440                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8441                 return func;
8442             })(), l78.fvalue(pv, (function(){
8443                 var symbol = l183;
8444                 var func = symbol.fvalue;
8445                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8446                 return func;
8447             })(), v896)), l147.fvalue(pv, ";", (function(){
8448                 var symbol = l146;
8449                 var value = symbol.value;
8450                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8451                 return value;
8452             })())));
8453         })();
8454     }));
8455     return l243;
8456 })();
8457 (function(){
8458     (l183).fvalue = (function(v908){
8459         ((v908)["fname"] = "LS-COMPILE");
8460         return v908;
8461     })((function (values,v899,v900){
8462         checkArgsAtLeast(arguments, 2);
8463         checkArgsAtMost(arguments, 3);
8464         switch(arguments.length-1){
8465         case 1:
8466         v900=l5.value;
8467         default: break;
8468         }
8469         return (function(){
8470             return (function(v901){
8471                 try {
8472                     var tmp;
8473                     tmp = l186.value;
8474                     l186.value = v901;
8475                     v901 = tmp;
8476                     return (((function(){
8477                         var tmp = v899;
8478                         return (typeof tmp == 'object' && 'name' in tmp);
8479                     })()?l4.value: l5.value) !== l5.value ? (function(v902){
8480                         return ((v902 !== l5.value ? l28.fvalue(pv, l92.fvalue(pv, l216, l191.fvalue(pv, v902))) : l5.value) !== l5.value ? l190.fvalue(values, v902) : ((function(v903){
8481                             return (v903 !== l5.value ? v903 : l92.fvalue(pv, l218, l191.fvalue(pv, v902)));
8482                         })(l134.fvalue(pv, v899)) !== l5.value ? l181.fvalue(values, l183.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l176), l45.fvalue(pv, v899))), ".value") : l183.fvalue(values, l65.fvalue(pv, l45.fvalue(pv, l306), l45.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l176), l45.fvalue(pv, v899)))))));
8483                     })(l201.fvalue(pv, v899, (function(){
8484                         var symbol = l202;
8485                         var value = symbol.value;
8486                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8487                         return value;
8488                     })(), l109)) : (l85.fvalue(pv, v899) !== l5.value ? l18.fvalue(values, v899) : (((typeof(v899) == "string")?l4.value: l5.value) !== l5.value ? l181.fvalue(values, "\"", l157.fvalue(pv, v899), "\"") : (((function(){
8489                         var x = v899;
8490                         return typeof x === 'object' && 'length' in x;
8491                     })()?l4.value: l5.value) !== l5.value ? l251.fvalue(values, v899) : (l60.fvalue(pv, v899) !== l5.value ? (function(v904,v905){
8492                         return (l101.fvalue(pv, v904, (function(){
8493                             var symbol = l220;
8494                             var value = symbol.value;
8495                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8496                             return value;
8497                         })()) !== l5.value ? (function(v906){
8498                             return (function(){
8499                                 var f = v906;
8500                                 var args = [values];
8501                                 var tail = (v905);
8502                                 while (tail != l5.value){
8503                                     args.push(tail.car);
8504                                     tail = tail.cdr;
8505                                 }
8506                                 return f.apply(this, args);
8507                             })();
8508                         })(l41.fvalue(pv, l101.fvalue(pv, v904, (function(){
8509                             var symbol = l220;
8510                             var value = symbol.value;
8511                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8512                             return value;
8513                         })()))) : ((l101.fvalue(pv, v904, (function(){
8514                             var symbol = l286;
8515                             var value = symbol.value;
8516                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8517                             return value;
8518                         })()) !== l5.value ? l28.fvalue(pv, l214.fvalue(pv, v904, l108, l217)) : l5.value) !== l5.value ? (function(v907){
8519                             return (function(){
8520                                 var f = v907;
8521                                 var args = [values];
8522                                 var tail = (v905);
8523                                 while (tail != l5.value){
8524                                     args.push(tail.car);
8525                                     tail = tail.cdr;
8526                                 }
8527                                 return f.apply(this, args);
8528                             })();
8529                         })(l41.fvalue(pv, l101.fvalue(pv, v904, (function(){
8530                             var symbol = l286;
8531                             var value = symbol.value;
8532                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8533                             return value;
8534                         })()))) : (l212.fvalue(pv, v904) !== l5.value ? l183.fvalue(values, l334.fvalue(pv, v899), v900) : l335.fvalue(values, v904, v905))));
8535                     })((function(){
8536                         var tmp = v899;
8537                         return tmp === l5.value? l5.value: tmp.car;
8538                     })(),(function(){
8539                         var tmp = v899;
8540                         return tmp === l5.value? l5.value: tmp.cdr;
8541                     })()) : (function(){
8542                         throw "How should I compile this?";
8543                     })())))));
8544                 }
8545                 finally {
8546                     l186.value = v901;
8547                 }
8548             })(v900);
8549         })();
8550     }));
8551     return l183;
8552 })();
8553 var l337 = {name: "LS-COMPILE-TOPLEVEL"};
8554 (function(){
8555     (l337).fvalue = (function(v915){
8556         ((v915)["fname"] = "LS-COMPILE-TOPLEVEL");
8557         return v915;
8558     })((function (values,v909,v910){
8559         checkArgsAtLeast(arguments, 2);
8560         checkArgsAtMost(arguments, 3);
8561         switch(arguments.length-1){
8562         case 1:
8563         v910=l5.value;
8564         default: break;
8565         }
8566         return (function(){
8567             return (function(v911){
8568                 try {
8569                     var tmp;
8570                     tmp = l207.value;
8571                     l207.value = v911;
8572                     v911 = tmp;
8573                     return ((((function(){
8574                         var tmp = v909;
8575                         return (typeof tmp == 'object' && 'car' in tmp);
8576                     })()?l4.value: l5.value) !== l5.value ? (((function(){
8577                         var tmp = v909;
8578                         return tmp === l5.value? l5.value: tmp.car;
8579                     })() === l117)?l4.value: l5.value) : l5.value) !== l5.value ? (function(v913){
8580                         return l149.fvalue(values, l94.fvalue(pv, (function(){
8581                             var symbol = l209;
8582                             var func = symbol.fvalue;
8583                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8584                             return func;
8585                         })(), v913));
8586                     })(l78.fvalue(pv, (function (values,v912){
8587                         checkArgs(arguments, 2);
8588                         return l337.fvalue(values, v912, l4.value);
8589                     }), (function(){
8590                         var tmp = v909;
8591                         return tmp === l5.value? l5.value: tmp.cdr;
8592                     })())) : (function(v914){
8593                         return l181.fvalue(values, l150.fvalue(pv, l210.fvalue(pv), l181.fvalue(pv, ";", (function(){
8594                             var symbol = l146;
8595                             var value = symbol.value;
8596                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8597                             return value;
8598                         })())), (v914 !== l5.value ? l181.fvalue(pv, v914, ";", (function(){
8599                             var symbol = l146;
8600                             var value = symbol.value;
8601                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8602                             return value;
8603                         })()) : l5.value));
8604                     })(l183.fvalue(pv, v909, v910)));
8605                 }
8606                 finally {
8607                     l207.value = v911;
8608                 }
8609             })(l5.value);
8610         })();
8611     }));
8612     return l337;
8613 })();
8614 (function(){
8615     (l261).fvalue = (function(v917){
8616         ((v917)["fname"] = "EVAL");
8617         return v917;
8618     })((function (values,v916){
8619         checkArgs(arguments, 2);
8620         return (function(){
8621             return (function(){
8622                 var string = l337.fvalue(pv, v916, l4.value);
8623                 if (typeof string != 'string')
8624                     throw 'The value ' + string + ' is not a type string.';
8625                 return (function(){
8626                     var v = eval.apply(window, [string]);
8627                     if (typeof v !== 'object' || !('multiple-value' in v)){
8628                         v = [v];
8629                         v['multiple-value'] = true;
8630                     }
8631                     return values.apply(this, v);
8632                 })();
8633             })();
8634         })();
8635     }));
8636     return l261;
8637 })();
8638 var l338 = {name: "&BODY"};
8639 var l339 = QIList(l225,l226,l224,l338,l21,l16,l136,l62,l63,l22,l23,l24,l297,l299,l20,l20,l296,l298,l55,l65,l318,l330,l329,l101,l46,l198,l19,l19,l91,l33,l39,l37,l34,l31,l31,l53,l273,l35,l38,l36,l32,l32,l316,l83,l84,l82,l52,l29,l30,l80,l81,l48,l2,l3,l10,l12,l1,l9,l97,l96,l105,l69,l70,l107,l50,l51,l54,l309,l27,l310,l320,l261,l100,l144,l104,l126,l139,l40,l257,l43,l305,l317,l108,l326,l17,l145,l280,l79,l222,l137,l47,l85,l85,l143,l134,l258,l6,l90,l72,l265,l268,l121,l45,l60,l328,l122,l303,l78,l92,l87,l293,l110,l282,l111,l283,l5,l28,l89,l88,l13,l300,l56,l127,l129,l125,l174,l86,l156,l159,l219,l57,l58,l117,l68,l49,l176,l93,l94,l95,l14,l272,l66,l67,l118,l119,l41,l245,l116,l114,l99,l313,l102,l103,l312,l98,l253,l304,l135,l307,l306,l302,l4,l279,l42,l274,l26,l8,l281,l155,l154,l109,l158,l7,l106,l327,l25,l5);
8640 l144.fvalue(values, l339);
8641 ((l136).value = (function(){
8642     var symbol = l132;
8643     var value = symbol.value;
8644     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8645     return value;
8646 })());
8647 (function(){
8648     var string = "var lisp";
8649     if (typeof string != 'string')
8650         throw 'The value ' + string + ' is not a type string.';
8651     return (function(){
8652         var v = eval.apply(window, [string]);
8653         if (typeof v !== 'object' || !('multiple-value' in v)){
8654             v = [v];
8655             v['multiple-value'] = true;
8656         }
8657         return values.apply(this, v);
8658     })();
8659 })();
8660 (lisp = {});
8661 (lisp.read = (function(){
8662     var symbol = l180;
8663     var func = symbol.fvalue;
8664     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8665     return func;
8666 })());
8667 (lisp.print = (function(){
8668     var symbol = l156;
8669     var func = symbol.fvalue;
8670     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8671     return func;
8672 })());
8673 (lisp.eval = (function(){
8674     var symbol = l261;
8675     var func = symbol.fvalue;
8676     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8677     return func;
8678 })());
8679 (lisp.compile = (function (values,v918){
8680     checkArgs(arguments, 2);
8681     return l337.fvalue(values, v918, l4.value);
8682 }));
8683 (lisp.evalString = (function (values,v919){
8684     checkArgs(arguments, 2);
8685     return l261.fvalue(values, l180.fvalue(pv, v919));
8686 }));
8687 (lisp.compileString = (function (values,v920){
8688     checkArgs(arguments, 2);
8689     return l337.fvalue(values, l180.fvalue(pv, v920), l4.value);
8690 }));
8691 var l340 = {name: "OP"};
8692 var l341 = {name: "SYM"};
8693 var l342 = {name: "X"};
8694 var l343 = {name: "ARGS"};
8695 var l344 = {name: "BODY"};
8696 var l345 = {name: "DECLS"};
8697 var l346 = {name: "DECL"};
8698 var l347 = {name: "NAME"};
8699 var l348 = {name: "ARG"};
8700 var l349 = {name: "FORM"};
8701 var l350 = {name: "PACKAGE-DESIGNATOR"};
8702 var l351 = {name: "PAIRS"};
8703 var l352 = {name: "PLACE"};
8704 var l353 = {name: "VALUE"};
8705 var l354 = {name: "VARS"};
8706 var l355 = {name: "VALS"};
8707 var l356 = {name: "STORE-VARS"};
8708 var l357 = {name: "WRITER-FORM"};
8709 var l358 = {name: "READER-FORM"};
8710 var l359 = {name: "RESULT"};
8711 var l360 = {name: "ACCESS-FN"};
8712 var l361 = {name: "LAMBDA-LIST"};
8713 var l362 = {name: "VALUE-FROM"};
8714 var l363 = {name: "VARIABLES"};
8715 var l364 = {name: "HEAD"};
8716 var l365 = {name: "TAIL"};
8717 var l366 = {name: "COLLECT"};
8718 var l367 = {name: "VARLIST"};
8719 var l368 = {name: "ENDLIST"};
8720 var l369 = {name: "V"};
8721 var l370 = {name: "ASSIGNMENTS"};
8722 var l371 = {name: "FORM1"};
8723 var l372 = {name: "FORMS"};
8724 var l373 = {name: "G"};
8725 var l374 = {name: "CLAUSULES"};
8726 var l375 = {name: "!FORM"};
8727 var l376 = {name: "CLAUSULE"};
8728 var l377 = {name: "ITER"};
8729 var l378 = {name: "G!TO"};
8730 var l379 = {name: "VAR"};
8731 var l380 = {name: "TO"};
8732 var l381 = {name: "G!LIST"};
8733 var l382 = {name: "DELTA"};
8734 var l383 = {name: "CONDITION"};
8735 var l384 = {name: "DOCSTRING"};
8736 var l385 = QIList(QIList(QIList(l286,l109,l5,QIList(l216,l5),l5),QIList(l276,l109,l5,QIList(l216,l5),l5),QIList(l275,l109,l5,QIList(l216,l5),l5),QIList(l269,l109,l5,QIList(l216,l5),l5),QIList(l259,l109,l5,QIList(l216,l5),l5),QIList(l249,l109,l5,QIList(l216,l5),l5),QIList(l248,l109,l5,QIList(l216,l5),l5),QIList(l223,l109,l5,QIList(l216,l5),l5),QIList(l220,l109,l5,QIList(l216,l5),l5),QIList(l207,l109,l5,QIList(l216,l5),l5),QIList(l203,l109,l5,QIList(l216,l5),l5),QIList(l202,l109,l5,QIList(l216,l5),l5),QIList(l186,l109,l5,QIList(l216,l5),l5),QIList(l175,l109,l5,QIList(l216,l5),l5),QIList(l146,l109,l5,QIList(l216,l5),l5),QIList(l136,l109,l5,QIList(l216,l5),l5),QIList(l133,l109,l5,QIList(l216,l5),l5),QIList(l132,l109,l5,QIList(l216,l5),l5),QIList(l131,l109,l5,QIList(l216,l5),l5),QIList(l120,l109,l5,QIList(l216,l5),l5),QIList(l112,l109,l5,QIList(l216,l5),l5),QIList(l16,l109,l5,QIList(l216,l5),l5),QIList(l5,l109,l5,QIList(l218,l216,l5),l5),QIList(l4,l109,l5,QIList(l218,l216,l5),l5),l5),QIList(QIList(l295,l212,QIList(l108,QIList(l6,QIList(l340,l341,l5),QIList(l177,QIList(l287,QIList(l179,l340,l5),QIList(l342,l225,l343,l5),QIList(l265,QIList(QIList(l343,QIList(l29,l342,l343,l5),l5),l5),QIList(l291,l343,QIList(l182,QIList(l294,l343,QIList(l179,l341,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l291,l212,QIList(l108,QIList(l6,QIList(l343,l225,l344,l5),QIList(l8,QIList(l302,l343,l5),QIList(l320,"Bad usage of VARIABLE-ARITY, you must pass a symbol",l5),l5),QIList(l177,QIList(l290,QIList(l179,l343,l5),QIList(l6,QIList(QIList(l179,l343,l5),l5),QIList(l181,"return ",QIList(l178,l344,l5),";",l146,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l289,l212,QIList(l108,QIList(l6,QIList(l345,l225,l344,l5),QIList(l177,QIList(l184,QIList(l178,QIList(l78,QIList(l6,QIList(l346,l5),QIList(l177,QIList(l181,"var ",QIList(l179,QIList(l40,l346,l5),l5)," = ",QIList(l179,QIList(l42,l346,l5),l5),";",l146,l5),l5),l5),l345,l5),l5),QIList(l178,QIList(l78,QIList(l6,QIList(l346,l5),QIList(l177,QIList(l181,"if (typeof ",QIList(l179,QIList(l40,l346,l5),l5)," != '",QIList(l179,QIList(l41,l346,l5),l5),"')",l146,QIList(l185,"throw 'The value ' + ",QIList(l179,QIList(l40,l346,l5),l5)," + ' is not a type ",QIList(l179,QIList(l41,l346,l5),l5),".';",l146,l5),l5),l5),l5),l345,l5),l5),QIList(l181,"return ",QIList(l117,QIList(l178,l344,l5),l5),";",l146,l5),l5),l5),l5),l5),l5,l5),QIList(l288,l212,QIList(l108,QIList(l6,QIList(l347,l343,l225,l344,l5),QIList(l177,QIList(l117,QIList(l287,QIList(l179,l347,l5),QIList(l179,l343,l5),QIList(l265,QIList(l179,QIList(l78,QIList(l6,QIList(l348,l5),QIList(l177,QIList(QIList(l179,l348,l5),QIList(l183,QIList(l179,l348,l5),l5),l5),l5),l5),l343,l5),l5),QIList(l178,l344,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l287,l212,QIList(l108,QIList(l6,QIList(l347,l343,l225,l344,l5),QIList(l177,QIList(l49,QIList(l45,QIList(l176,QIList(l179,l347,l5),l5),QIList(l6,QIList(l179,l343,l5),QIList(l198,QIList(l179,l347,l5),QIList(l178,l344,l5),l5),l5),l5),l286,l5),l5),l5),l5),l5,l5),QIList(l177,l212,QIList(l108,QIList(l6,QIList(l349,l5),QIList(l284,l349,l5),l5),l5),l5,l5),QIList(l262,l212,QIList(l108,QIList(l6,QIList(l347,l343,l349,l5),QIList(l177,QIList(l221,QIList(l179,l347,l5),QIList(l179,l343,l5),QIList(l183,QIList(l179,l349,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l221,l212,QIList(l108,QIList(l6,QIList(l347,l343,l225,l344,l5),QIList(l177,QIList(l49,QIList(l45,QIList(l176,QIList(l179,l347,l5),l5),QIList(l6,QIList(l179,l343,l5),QIList(l198,QIList(l179,l347,l5),QIList(l178,l344,l5),l5),l5),l5),l220,l5),l5),l5),l5),l5,l5),QIList(l184,l212,QIList(l108,QIList(l6,QIList(l225,l344,l5),QIList(l177,QIList(l181,"(function(){",l146,QIList(l185,QIList(l178,l344,l5),l5),"})()",l5),l5),l5),l5),l5,l5),QIList(l148,l212,QIList(l108,QIList(l6,QIList(l109,l225,l349,l5),QIList(l177,QIList(l114,QIList(l179,l109,l5),QIList(l147,QIList(l179,l109,l5),QIList(l117,QIList(l178,l349,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l137,l212,QIList(l108,QIList(l6,QIList(l350,l5),QIList(l177,QIList(l260,QIList(l114,l136,QIList(l124,QIList(l179,l350,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l116,l212,QIList(l108,QIList(l6,QIList(l225,l351,l5),QIList(l52,QIList(QIList(l13,l351,l5),l5,l5),QIList(QIList(l13,QIList(l32,l351,l5),l5),QIList(l320,"Odd number of arguments to setf.",l5),l5),QIList(QIList(l13,QIList(l36,l351,l5),l5),QIList(l265,QIList(QIList(l352,QIList(l40,l351,l5),l5),QIList(l353,QIList(l41,l351,l5),l5),l5),QIList(l110,QIList(l354,l355,l356,l357,l358,l5),QIList(l113,l352,l5),QIList(l177,QIList(l268,QIList(l179,QIList(l78,QIList(l108,l45,l5),l354,l355,l5),l5),QIList(l110,QIList(l179,l356,l5),QIList(l179,l353,l5),QIList(l179,l357,l5),l5),l5),l5),l5),l5),l5),QIList(l4,QIList(l177,QIList(l117,QIList(l178,QIList(l69,QIList(QIList(l351,l351,QIList(l36,l351,l5),l5),QIList(l359,QIList(l176,l5,l5),QIList(l29,QIList(l177,QIList(l116,QIList(l179,QIList(l31,l351,l5),l5),QIList(l179,QIList(l34,l351,l5),l5),l5),l5),l359,l5),l5),l5),QIList(QIList(l13,l351,l5),QIList(l67,l359,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l115,l212,QIList(l108,QIList(l6,QIList(l360,l361,l225,l344,l5),QIList(l8,QIList(l302,l360,l5),QIList(l320,"ACCESS-FN must be a symbol.",l5),l5),QIList(l177,QIList(l117,QIList(l49,QIList(l29,QIList(l176,QIList(l179,l360,l5),l5),QIList(l6,QIList(l179,l361,l5),QIList(l178,l344,l5),l5),l5),l112,l5),QIList(l176,QIList(l179,l360,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l111,l212,QIList(l108,QIList(l6,QIList(l362,l5),QIList(l177,QIList(l282,QIList(l108,l45,l5),QIList(l179,l362,l5),l5),l5),l5),l5),l5,l5),QIList(l110,l212,QIList(l108,QIList(l6,QIList(l363,l362,l225,l344,l5),QIList(l177,QIList(l282,QIList(l6,QIList(l224,QIList(l178,l363,l5),l225,QIList(l179,QIList(l17,l5),l5),l5),QIList(l178,l344,l5),l5),QIList(l179,l362,l5),l5),l5),l5),l5),l5,l5),QIList(l77,l212,QIList(l108,QIList(l6,QIList(l225,l344,l5),QIList(l177,QIList(l15,l4,QIList(l178,l344,l5),l5),l5),l5),l5),l5,l5),QIList(l74,l212,QIList(l108,QIList(l6,QIList(l225,l344,l5),QIList(l265,QIList(QIList(l364,QIList(l17,l5),l5),QIList(l365,QIList(l17,l5),l5),l5),QIList(l177,QIList(l268,QIList(QIList(QIList(l179,l364,l5),QIList(l29,QIList(l176,l76,l5),l5,l5),l5),QIList(QIList(l179,l365,l5),QIList(l179,l364,l5),l5),l5),QIList(l257,QIList(QIList(l366,QIList(l342,l5),QIList(l119,QIList(l179,l365,l5),QIList(l29,l342,l5,l5),l5),QIList(l114,QIList(l179,l365,l5),QIList(l32,QIList(l179,l365,l5),l5),l5),l342,l5),l5),QIList(l178,l344,l5),l5),QIList(l32,QIList(l179,l364,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l70,l212,QIList(l108,QIList(l6,QIList(l367,l368,l225,l344,l5),QIList(l177,QIList(l198,l5,QIList(l268,QIList(l179,QIList(l78,QIList(l6,QIList(l342,l5),QIList(l45,QIList(l40,l342,l5),QIList(l41,l342,l5),l5),l5),l367,l5),l5),QIList(l15,l4,QIList(l7,QIList(l179,QIList(l31,l368,l5),l5),QIList(l14,QIList(l117,QIList(l179,QIList(l32,l368,l5),l5),l5),l5),l5),QIList(l279,QIList(l178,l344,l5),l5),QIList(l114,QIList(l178,QIList(l318,QIList(l108,l65,l5),QIList(l78,QIList(l6,QIList(l369,l5),QIList(l55,QIList(l30,QIList(l36,l369,l5),l5),QIList(l45,QIList(l40,l369,l5),QIList(l42,l369,l5),l5),l5),l5),l367,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l69,l212,QIList(l108,QIList(l6,QIList(l367,l368,l225,l344,l5),QIList(l177,QIList(l198,l5,QIList(l265,QIList(l179,QIList(l78,QIList(l6,QIList(l342,l5),QIList(l45,QIList(l40,l342,l5),QIList(l41,l342,l5),l5),l5),l367,l5),l5),QIList(l15,l4,QIList(l7,QIList(l179,QIList(l31,l368,l5),l5),QIList(l14,QIList(l117,QIList(l179,QIList(l32,l368,l5),l5),l5),l5),l5),QIList(l279,QIList(l178,l344,l5),l5),QIList(l68,QIList(l178,QIList(l318,QIList(l108,l65,l5),QIList(l78,QIList(l6,QIList(l369,l5),QIList(l55,QIList(l30,QIList(l36,l369,l5),l5),QIList(l45,QIList(l40,l369,l5),QIList(l42,l369,l5),l5),l5),l5),l367,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l68,l212,QIList(l108,QIList(l6,QIList(l225,l351,l5),QIList(l265,QIList(QIList(l370,QIList(l176,l5,l5),l5),l5),QIList(l15,l4,QIList(l52,QIList(QIList(l13,l351,l5),QIList(l14,l5),l5),QIList(QIList(l13,QIList(l32,l351,l5),l5),QIList(l320,"Odd paris in PSETQ",l5),l5),QIList(l4,QIList(l265,QIList(QIList(l109,QIList(l31,l351,l5),l5),QIList(l353,QIList(l34,l351,l5),l5),l5),QIList(l49,QIList(l177,QIList(QIList(l179,l109,l5),QIList(l179,QIList(l17,l5),l5),QIList(l179,l353,l5),l5),l5),l370,l5),QIList(l114,l351,QIList(l36,l351,l5),l5),l5),l5),l5),l5),QIList(l114,l370,QIList(l67,l370,l5),l5),QIList(l177,QIList(l265,QIList(l179,QIList(l78,QIList(l108,l32,l5),l370,l5),l5),QIList(l114,QIList(l178,QIList(l61,QIList(l108,l65,l5),QIList(l78,QIList(l108,l91,l5),l370,l5),QIList(l176,l5,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l58,l212,QIList(l108,QIList(l6,QIList(l371,l359,l225,l344,l5),QIList(l177,QIList(l57,QIList(l117,QIList(l179,l371,l5),QIList(l179,l359,l5),l5),QIList(l178,l344,l5),l5),l5),l5),l5),l5,l5),QIList(l57,l212,QIList(l108,QIList(l6,QIList(l349,l225,l344,l5),QIList(l265,QIList(QIList(l353,QIList(l17,l5),l5),l5),QIList(l177,QIList(l265,QIList(QIList(QIList(l179,l353,l5),QIList(l179,l349,l5),l5),l5),QIList(l178,l344,l5),QIList(l179,l353,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l56,l212,QIList(l108,QIList(l6,QIList(l225,l372,l5),QIList(l52,QIList(QIList(l13,l372,l5),l5,l5),QIList(QIList(l13,QIList(l32,l372,l5),l5),QIList(l31,l372,l5),l5),QIList(l4,QIList(l265,QIList(QIList(l373,QIList(l17,l5),l5),l5),QIList(l177,QIList(l265,QIList(QIList(QIList(l179,l373,l5),QIList(l179,QIList(l31,l372,l5),l5),l5),l5),QIList(l222,QIList(l179,l373,l5),QIList(l179,l373,l5),QIList(l56,QIList(l178,QIList(l32,l372,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l55,l212,QIList(l108,QIList(l6,QIList(l225,l372,l5),QIList(l52,QIList(QIList(l13,l372,l5),l4,l5),QIList(QIList(l13,QIList(l32,l372,l5),l5),QIList(l31,l372,l5),l5),QIList(l4,QIList(l177,QIList(l222,QIList(l179,QIList(l31,l372,l5),l5),QIList(l55,QIList(l178,QIList(l32,l372,l5),l5),l5),l5,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l54,l212,QIList(l108,QIList(l6,QIList(l349,l225,l374,l5),QIList(l177,QIList(l53,QIList(l179,l349,l5),QIList(l178,QIList(l65,l374,QIList(l177,QIList(QIList(l4,QIList(l320,"ECASE expression failed.",l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l53,l212,QIList(l108,QIList(l6,QIList(l349,l225,l374,l5),QIList(l265,QIList(QIList(l375,QIList(l17,l5),l5),l5),QIList(l177,QIList(l265,QIList(QIList(QIList(l179,l375,l5),QIList(l179,l349,l5),l5),l5),QIList(l52,QIList(l178,QIList(l78,QIList(l6,QIList(l376,l5),QIList(l222,QIList(l309,QIList(l31,l376,l5),l4,l5),l376,QIList(l177,QIList(QIList(l27,QIList(l179,l375,l5),QIList(l176,QIList(l179,QIList(l31,l376,l5),l5),l5),l5),QIList(l178,QIList(l32,l376,l5),l5),l5),l5),l5),l5),l374,l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l52,l212,QIList(l108,QIList(l6,QIList(l225,l374,l5),QIList(l222,QIList(l13,l374,l5),l5,QIList(l222,QIList(l309,QIList(l33,l374,l5),l4,l5),QIList(l177,QIList(l117,QIList(l178,QIList(l35,l374,l5),l5),l5),l5),QIList(l177,QIList(l222,QIList(l179,QIList(l33,l374,l5),l5),QIList(l117,QIList(l178,QIList(l35,l374,l5),l5),l5),QIList(l52,QIList(l178,QIList(l32,l374,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l51,l212,QIList(l108,QIList(l6,QIList(l377,l225,l344,l5),QIList(l265,QIList(QIList(l378,QIList(l17,l5),l5),QIList(l379,QIList(l40,l377,l5),l5),QIList(l380,QIList(l41,l377,l5),l5),QIList(l359,QIList(l42,l377,l5),l5),l5),QIList(l177,QIList(l198,l5,QIList(l265,QIList(QIList(QIList(l179,l379,l5),0,l5),QIList(QIList(l179,l378,l5),QIList(l179,l380,l5),l5),l5),QIList(l252,QIList(l297,QIList(l179,l379,l5),QIList(l179,l378,l5),l5),QIList(l279,QIList(l178,l344,l5),l5),QIList(l47,QIList(l179,l379,l5),l5),l5),QIList(l179,l359,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l50,l212,QIList(l108,QIList(l6,QIList(l377,l225,l344,l5),QIList(l265,QIList(QIList(l379,QIList(l40,l377,l5),l5),QIList(l381,QIList(l17,l5),l5),l5),QIList(l177,QIList(l198,l5,QIList(l265,QIList(QIList(QIList(l179,l381,l5),QIList(l179,QIList(l41,l377,l5),l5),l5),QIList(QIList(l179,l379,l5),l5,l5),l5),QIList(l252,QIList(l179,l381,l5),QIList(l114,QIList(l179,l379,l5),QIList(l31,QIList(l179,l381,l5),l5),l5),QIList(l279,QIList(l178,l344,l5),l5),QIList(l114,QIList(l179,l381,l5),QIList(l32,QIList(l179,l381,l5),l5),l5),l5),QIList(l179,QIList(l42,l377,l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l49,l212,QIList(l108,QIList(l6,QIList(l342,l352,l5),QIList(l177,QIList(l114,QIList(l179,l352,l5),QIList(l29,QIList(l179,l342,l5),QIList(l179,l352,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l48,l212,QIList(l108,QIList(l6,QIList(l342,l224,QIList(l382,1,l5),l5),QIList(l177,QIList(l114,QIList(l179,l342,l5),QIList(l63,QIList(l179,l342,l5),QIList(l179,l382,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l47,l212,QIList(l108,QIList(l6,QIList(l342,l224,QIList(l382,1,l5),l5),QIList(l177,QIList(l114,QIList(l179,l342,l5),QIList(l62,QIList(l179,l342,l5),QIList(l179,l382,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l15,l212,QIList(l108,QIList(l6,QIList(l383,l225,l344,l5),QIList(l177,QIList(l198,l5,QIList(l252,QIList(l179,l383,l5),QIList(l178,l344,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l14,l212,QIList(l108,QIList(l6,QIList(l224,l353,l5),QIList(l177,QIList(l272,l5,QIList(l179,l353,l5),l5),l5),l5),l5),l5,l5),QIList(l12,l212,QIList(l108,QIList(l6,QIList(l347,l343,l225,l344,l5),QIList(l177,QIList(l117,QIList(l305,QIList(l176,QIList(l179,l347,l5),l5),QIList(l11,QIList(l179,QIList(l304,l347,l5),l5),QIList(l179,l343,l5),QIList(l178,QIList(l222,QIList(l55,QIList(l312,QIList(l31,l344,l5),l5),QIList(l28,QIList(l13,QIList(l32,l344,l5),l5),l5),l5),QIList(l177,QIList(QIList(l179,QIList(l31,l344,l5),l5),QIList(l198,QIList(l179,l347,l5),QIList(l178,QIList(l32,l344,l5),l5),l5),l5),l5),QIList(l177,QIList(QIList(l198,QIList(l179,l347,l5),QIList(l178,l344,l5),l5),l5),l5),l5),l5),l5),l5),QIList(l176,QIList(l179,l347,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l11,l212,QIList(l108,QIList(l6,QIList(l347,l343,l225,l344,l5),QIList(l265,QIList(QIList(l342,QIList(l17,"FN",l5),l5),l5),QIList(l177,QIList(l265,QIList(QIList(QIList(l179,l342,l5),QIList(l6,QIList(l179,l343,l5),QIList(l178,l344,l5),l5),l5),l5),QIList(l324,QIList(l179,l342,l5),"fname",QIList(l179,l347,l5),l5),QIList(l179,l342,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l10,l212,QIList(l108,QIList(l6,QIList(l347,l353,l224,l384,l5),QIList(l177,QIList(l117,QIList(l114,QIList(l179,l347,l5),QIList(l179,l353,l5),l5),QIList(l178,QIList(l7,QIList(l312,l384,l5),QIList(l177,QIList(QIList(l324,QIList(l176,QIList(l179,l347,l5),l5),"vardoc",QIList(l179,l384,l5),l5),l5),l5),l5),l5),QIList(l176,QIList(l179,l347,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l9,l212,QIList(l108,QIList(l6,QIList(l347,l353,l224,l384,l5),QIList(l177,QIList(l117,QIList(l2,QIList(l216,QIList(l179,l347,l5),l5),l5),QIList(l8,QIList(l19,QIList(l176,QIList(l179,l347,l5),l5),l5),QIList(l114,QIList(l179,l347,l5),QIList(l179,l353,l5),l5),l5),QIList(l178,QIList(l7,QIList(l312,l384,l5),QIList(l177,QIList(QIList(l324,QIList(l176,QIList(l179,l347,l5),l5),"vardoc",QIList(l179,l384,l5),l5),l5),l5),l5),l5),QIList(l176,QIList(l179,l347,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l8,l212,QIList(l108,QIList(l6,QIList(l383,l225,l344,l5),QIList(l177,QIList(l222,QIList(l179,l383,l5),l5,QIList(l117,QIList(l178,l344,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l7,l212,QIList(l108,QIList(l6,QIList(l383,l225,l344,l5),QIList(l177,QIList(l222,QIList(l179,l383,l5),QIList(l117,QIList(l178,l344,l5),l5),l5,l5),l5),l5),l5),l5,l5),QIList(l6,l212,QIList(l108,QIList(l6,QIList(l343,l225,l344,l5),QIList(l177,QIList(l108,QIList(l6,QIList(l179,l343,l5),QIList(l178,l344,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l3,l212,QIList(l108,QIList(l6,QIList(l347,l353,l224,l384,l5),QIList(l177,QIList(l117,QIList(l2,QIList(l216,QIList(l179,l347,l5),l5),l5),QIList(l2,QIList(l218,QIList(l179,l347,l5),l5),l5),QIList(l114,QIList(l179,l347,l5),QIList(l179,l353,l5),l5),QIList(l178,QIList(l7,QIList(l312,l384,l5),QIList(l177,QIList(QIList(l324,QIList(l176,QIList(l179,l347,l5),l5),"vardoc",QIList(l179,l384,l5),l5),l5),l5),l5),l5),QIList(l176,QIList(l179,l347,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l2,l212,QIList(l108,QIList(l6,QIList(l225,l345,l5),QIList(l177,QIList(l260,QIList(l178,QIList(l78,QIList(l6,QIList(l346,l5),QIList(l177,QIList(l215,QIList(l176,QIList(l179,l346,l5),l5),l5),l5),l5),l345,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l1,l212,QIList(l108,QIList(l6,QIList(l347,l343,l225,l344,l5),QIList(l177,QIList(l260,QIList(l211,QIList(l176,QIList(l179,l347,l5),l5),QIList(l176,QIList(l108,QIList(l6,QIList(l179,QIList(l78,QIList(l108,QIList(l6,QIList(l342,l5),QIList(l222,QIList(l309,l342,QIList(l176,l338,l5),l5),QIList(l176,l225,l5),l342,l5),l5),l5),l343,l5),l5),QIList(l178,l344,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),l5),l5,l5,l5);
8737 ((l202).value = l385);
8738 var l386 = QIList(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(l341,"l341"),QIList(l340,"l340"),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(l228,"l228"),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);
8739 (function(){
8740     l138.fvalue(pv, l384);
8741     l138.fvalue(pv, l383);
8742     l138.fvalue(pv, l382);
8743     l138.fvalue(pv, l381);
8744     l138.fvalue(pv, l380);
8745     l138.fvalue(pv, l379);
8746     l138.fvalue(pv, l378);
8747     l138.fvalue(pv, l377);
8748     l138.fvalue(pv, l376);
8749     l138.fvalue(pv, l375);
8750     l138.fvalue(pv, l374);
8751     l138.fvalue(pv, l373);
8752     l138.fvalue(pv, l372);
8753     l138.fvalue(pv, l371);
8754     l138.fvalue(pv, l370);
8755     l138.fvalue(pv, l369);
8756     l138.fvalue(pv, l368);
8757     l138.fvalue(pv, l367);
8758     l138.fvalue(pv, l366);
8759     l138.fvalue(pv, l365);
8760     l138.fvalue(pv, l364);
8761     l138.fvalue(pv, l363);
8762     l138.fvalue(pv, l362);
8763     l138.fvalue(pv, l361);
8764     l138.fvalue(pv, l360);
8765     l138.fvalue(pv, l359);
8766     l138.fvalue(pv, l358);
8767     l138.fvalue(pv, l357);
8768     l138.fvalue(pv, l356);
8769     l138.fvalue(pv, l355);
8770     l138.fvalue(pv, l354);
8771     l138.fvalue(pv, l353);
8772     l138.fvalue(pv, l352);
8773     l138.fvalue(pv, l351);
8774     l138.fvalue(pv, l350);
8775     l138.fvalue(pv, l349);
8776     l138.fvalue(pv, l348);
8777     l138.fvalue(pv, l347);
8778     l138.fvalue(pv, l346);
8779     l138.fvalue(pv, l345);
8780     l138.fvalue(pv, l344);
8781     l138.fvalue(pv, l343);
8782     l138.fvalue(pv, l342);
8783     l138.fvalue(pv, l341);
8784     l138.fvalue(pv, l340);
8785     l138.fvalue(pv, l338);
8786     l138.fvalue(pv, l337);
8787     l138.fvalue(pv, l336);
8788     l138.fvalue(pv, l335);
8789     l138.fvalue(pv, l334);
8790     l138.fvalue(pv, l333);
8791     l138.fvalue(pv, l332);
8792     l138.fvalue(pv, l331);
8793     l138.fvalue(pv, l330);
8794     l138.fvalue(pv, l329);
8795     l138.fvalue(pv, l328);
8796     l138.fvalue(pv, l327);
8797     l138.fvalue(pv, l326);
8798     l138.fvalue(pv, l325);
8799     l138.fvalue(pv, l324);
8800     l138.fvalue(pv, l323);
8801     l138.fvalue(pv, l322);
8802     l138.fvalue(pv, l321);
8803     l138.fvalue(pv, l320);
8804     l138.fvalue(pv, l319);
8805     l138.fvalue(pv, l318);
8806     l138.fvalue(pv, l317);
8807     l138.fvalue(pv, l316);
8808     l138.fvalue(pv, l315);
8809     l138.fvalue(pv, l314);
8810     l138.fvalue(pv, l313);
8811     l138.fvalue(pv, l312);
8812     l138.fvalue(pv, l311);
8813     l138.fvalue(pv, l310);
8814     l138.fvalue(pv, l309);
8815     l138.fvalue(pv, l308);
8816     l138.fvalue(pv, l307);
8817     l138.fvalue(pv, l306);
8818     l138.fvalue(pv, l305);
8819     l138.fvalue(pv, l304);
8820     l138.fvalue(pv, l303);
8821     l138.fvalue(pv, l302);
8822     l138.fvalue(pv, l301);
8823     l138.fvalue(pv, l300);
8824     l138.fvalue(pv, l299);
8825     l138.fvalue(pv, l298);
8826     l138.fvalue(pv, l297);
8827     l138.fvalue(pv, l296);
8828     l138.fvalue(pv, l295);
8829     l138.fvalue(pv, l294);
8830     l138.fvalue(pv, l293);
8831     l138.fvalue(pv, l292);
8832     l138.fvalue(pv, l291);
8833     l138.fvalue(pv, l290);
8834     l138.fvalue(pv, l289);
8835     l138.fvalue(pv, l288);
8836     l138.fvalue(pv, l287);
8837     l138.fvalue(pv, l286);
8838     l138.fvalue(pv, l285);
8839     l138.fvalue(pv, l284);
8840     l138.fvalue(pv, l283);
8841     l138.fvalue(pv, l282);
8842     l138.fvalue(pv, l281);
8843     l138.fvalue(pv, l280);
8844     l138.fvalue(pv, l279);
8845     l138.fvalue(pv, l278);
8846     l138.fvalue(pv, l277);
8847     l138.fvalue(pv, l276);
8848     l138.fvalue(pv, l275);
8849     l138.fvalue(pv, l274);
8850     l138.fvalue(pv, l273);
8851     l138.fvalue(pv, l272);
8852     l138.fvalue(pv, l271);
8853     l138.fvalue(pv, l270);
8854     l138.fvalue(pv, l269);
8855     l138.fvalue(pv, l268);
8856     l138.fvalue(pv, l267);
8857     l138.fvalue(pv, l266);
8858     l138.fvalue(pv, l265);
8859     l138.fvalue(pv, l264);
8860     l138.fvalue(pv, l263);
8861     l138.fvalue(pv, l262);
8862     l138.fvalue(pv, l261);
8863     l138.fvalue(pv, l260);
8864     l138.fvalue(pv, l259);
8865     l138.fvalue(pv, l258);
8866     l138.fvalue(pv, l257);
8867     l138.fvalue(pv, l256);
8868     l138.fvalue(pv, l255);
8869     l138.fvalue(pv, l254);
8870     l138.fvalue(pv, l253);
8871     l138.fvalue(pv, l252);
8872     l138.fvalue(pv, l251);
8873     l138.fvalue(pv, l250);
8874     l138.fvalue(pv, l249);
8875     l138.fvalue(pv, l248);
8876     l138.fvalue(pv, l247);
8877     l138.fvalue(pv, l246);
8878     l138.fvalue(pv, l245);
8879     l138.fvalue(pv, l244);
8880     l138.fvalue(pv, l243);
8881     l138.fvalue(pv, l242);
8882     l138.fvalue(pv, l241);
8883     l138.fvalue(pv, l240);
8884     l138.fvalue(pv, l239);
8885     l138.fvalue(pv, l238);
8886     l138.fvalue(pv, l237);
8887     l138.fvalue(pv, l236);
8888     l138.fvalue(pv, l235);
8889     l138.fvalue(pv, l234);
8890     l138.fvalue(pv, l233);
8891     l138.fvalue(pv, l232);
8892     l138.fvalue(pv, l231);
8893     l138.fvalue(pv, l230);
8894     l138.fvalue(pv, l229);
8895     l138.fvalue(pv, l228);
8896     l138.fvalue(pv, l226);
8897     l138.fvalue(pv, l225);
8898     l138.fvalue(pv, l224);
8899     l138.fvalue(pv, l223);
8900     l138.fvalue(pv, l222);
8901     l138.fvalue(pv, l221);
8902     l138.fvalue(pv, l220);
8903     l138.fvalue(pv, l219);
8904     l138.fvalue(pv, l218);
8905     l138.fvalue(pv, l217);
8906     l138.fvalue(pv, l216);
8907     l138.fvalue(pv, l215);
8908     l138.fvalue(pv, l214);
8909     l138.fvalue(pv, l213);
8910     l138.fvalue(pv, l212);
8911     l138.fvalue(pv, l211);
8912     l138.fvalue(pv, l210);
8913     l138.fvalue(pv, l209);
8914     l138.fvalue(pv, l208);
8915     l138.fvalue(pv, l207);
8916     l138.fvalue(pv, l206);
8917     l138.fvalue(pv, l205);
8918     l138.fvalue(pv, l204);
8919     l138.fvalue(pv, l203);
8920     l138.fvalue(pv, l202);
8921     l138.fvalue(pv, l201);
8922     l138.fvalue(pv, l200);
8923     l138.fvalue(pv, l199);
8924     l138.fvalue(pv, l198);
8925     l138.fvalue(pv, l197);
8926     l138.fvalue(pv, l196);
8927     l138.fvalue(pv, l195);
8928     l138.fvalue(pv, l194);
8929     l138.fvalue(pv, l193);
8930     l138.fvalue(pv, l192);
8931     l138.fvalue(pv, l191);
8932     l138.fvalue(pv, l190);
8933     l138.fvalue(pv, l189);
8934     l138.fvalue(pv, l188);
8935     l138.fvalue(pv, l187);
8936     l138.fvalue(pv, l186);
8937     l138.fvalue(pv, l185);
8938     l138.fvalue(pv, l184);
8939     l138.fvalue(pv, l183);
8940     l138.fvalue(pv, l182);
8941     l138.fvalue(pv, l181);
8942     l138.fvalue(pv, l180);
8943     l138.fvalue(pv, l179);
8944     l138.fvalue(pv, l178);
8945     l138.fvalue(pv, l177);
8946     l138.fvalue(pv, l176);
8947     l138.fvalue(pv, l175);
8948     l138.fvalue(pv, l174);
8949     l138.fvalue(pv, l173);
8950     l138.fvalue(pv, l172);
8951     l138.fvalue(pv, l171);
8952     l138.fvalue(pv, l170);
8953     l138.fvalue(pv, l169);
8954     l138.fvalue(pv, l168);
8955     l138.fvalue(pv, l167);
8956     l138.fvalue(pv, l166);
8957     l138.fvalue(pv, l165);
8958     l138.fvalue(pv, l164);
8959     l138.fvalue(pv, l163);
8960     l138.fvalue(pv, l162);
8961     l138.fvalue(pv, l161);
8962     l138.fvalue(pv, l160);
8963     l138.fvalue(pv, l159);
8964     l138.fvalue(pv, l158);
8965     l138.fvalue(pv, l157);
8966     l138.fvalue(pv, l156);
8967     l138.fvalue(pv, l155);
8968     l138.fvalue(pv, l154);
8969     l138.fvalue(pv, l153);
8970     l138.fvalue(pv, l152);
8971     l138.fvalue(pv, l151);
8972     l138.fvalue(pv, l150);
8973     l138.fvalue(pv, l149);
8974     l138.fvalue(pv, l148);
8975     l138.fvalue(pv, l147);
8976     l138.fvalue(pv, l146);
8977     l138.fvalue(pv, l145);
8978     l138.fvalue(pv, l144);
8979     l138.fvalue(pv, l143);
8980     l138.fvalue(pv, l142);
8981     l138.fvalue(pv, l141);
8982     l138.fvalue(pv, l140);
8983     l138.fvalue(pv, l139);
8984     l138.fvalue(pv, l138);
8985     l138.fvalue(pv, l137);
8986     l138.fvalue(pv, l136);
8987     l138.fvalue(pv, l135);
8988     l138.fvalue(pv, l134);
8989     l138.fvalue(pv, l133);
8990     l138.fvalue(pv, l132);
8991     l138.fvalue(pv, l131);
8992     l138.fvalue(pv, l130);
8993     l138.fvalue(pv, l129);
8994     l138.fvalue(pv, l128);
8995     l138.fvalue(pv, l127);
8996     l138.fvalue(pv, l126);
8997     l138.fvalue(pv, l125);
8998     l138.fvalue(pv, l124);
8999     l138.fvalue(pv, l123);
9000     l138.fvalue(pv, l122);
9001     l138.fvalue(pv, l121);
9002     l138.fvalue(pv, l120);
9003     l138.fvalue(pv, l119);
9004     l138.fvalue(pv, l118);
9005     l138.fvalue(pv, l117);
9006     l138.fvalue(pv, l116);
9007     l138.fvalue(pv, l115);
9008     l138.fvalue(pv, l114);
9009     l138.fvalue(pv, l113);
9010     l138.fvalue(pv, l112);
9011     l138.fvalue(pv, l111);
9012     l138.fvalue(pv, l110);
9013     l138.fvalue(pv, l109);
9014     l138.fvalue(pv, l108);
9015     l138.fvalue(pv, l107);
9016     l138.fvalue(pv, l106);
9017     l138.fvalue(pv, l105);
9018     l138.fvalue(pv, l104);
9019     l138.fvalue(pv, l103);
9020     l138.fvalue(pv, l102);
9021     l138.fvalue(pv, l101);
9022     l138.fvalue(pv, l100);
9023     l138.fvalue(pv, l99);
9024     l138.fvalue(pv, l98);
9025     l138.fvalue(pv, l97);
9026     l138.fvalue(pv, l96);
9027     l138.fvalue(pv, l95);
9028     l138.fvalue(pv, l94);
9029     l138.fvalue(pv, l93);
9030     l138.fvalue(pv, l92);
9031     l138.fvalue(pv, l91);
9032     l138.fvalue(pv, l90);
9033     l138.fvalue(pv, l89);
9034     l138.fvalue(pv, l88);
9035     l138.fvalue(pv, l87);
9036     l138.fvalue(pv, l86);
9037     l138.fvalue(pv, l85);
9038     l138.fvalue(pv, l84);
9039     l138.fvalue(pv, l83);
9040     l138.fvalue(pv, l82);
9041     l138.fvalue(pv, l81);
9042     l138.fvalue(pv, l80);
9043     l138.fvalue(pv, l79);
9044     l138.fvalue(pv, l78);
9045     l138.fvalue(pv, l77);
9046     l138.fvalue(pv, l76);
9047     l138.fvalue(pv, l75);
9048     l138.fvalue(pv, l74);
9049     l138.fvalue(pv, l73);
9050     l138.fvalue(pv, l72);
9051     l138.fvalue(pv, l71);
9052     l138.fvalue(pv, l70);
9053     l138.fvalue(pv, l69);
9054     l138.fvalue(pv, l68);
9055     l138.fvalue(pv, l67);
9056     l138.fvalue(pv, l66);
9057     l138.fvalue(pv, l65);
9058     l138.fvalue(pv, l64);
9059     l138.fvalue(pv, l63);
9060     l138.fvalue(pv, l62);
9061     l138.fvalue(pv, l61);
9062     l138.fvalue(pv, l60);
9063     l138.fvalue(pv, l59);
9064     l138.fvalue(pv, l58);
9065     l138.fvalue(pv, l57);
9066     l138.fvalue(pv, l56);
9067     l138.fvalue(pv, l55);
9068     l138.fvalue(pv, l54);
9069     l138.fvalue(pv, l53);
9070     l138.fvalue(pv, l52);
9071     l138.fvalue(pv, l51);
9072     l138.fvalue(pv, l50);
9073     l138.fvalue(pv, l49);
9074     l138.fvalue(pv, l48);
9075     l138.fvalue(pv, l47);
9076     l138.fvalue(pv, l46);
9077     l138.fvalue(pv, l45);
9078     l138.fvalue(pv, l44);
9079     l138.fvalue(pv, l43);
9080     l138.fvalue(pv, l42);
9081     l138.fvalue(pv, l41);
9082     l138.fvalue(pv, l40);
9083     l138.fvalue(pv, l39);
9084     l138.fvalue(pv, l38);
9085     l138.fvalue(pv, l37);
9086     l138.fvalue(pv, l36);
9087     l138.fvalue(pv, l35);
9088     l138.fvalue(pv, l34);
9089     l138.fvalue(pv, l33);
9090     l138.fvalue(pv, l32);
9091     l138.fvalue(pv, l31);
9092     l138.fvalue(pv, l30);
9093     l138.fvalue(pv, l29);
9094     l138.fvalue(pv, l28);
9095     l138.fvalue(pv, l27);
9096     l138.fvalue(pv, l26);
9097     l138.fvalue(pv, l25);
9098     l138.fvalue(pv, l24);
9099     l138.fvalue(pv, l23);
9100     l138.fvalue(pv, l22);
9101     l138.fvalue(pv, l21);
9102     l138.fvalue(pv, l20);
9103     l138.fvalue(pv, l19);
9104     l138.fvalue(pv, l18);
9105     l138.fvalue(pv, l17);
9106     l138.fvalue(pv, l16);
9107     l138.fvalue(pv, l15);
9108     l138.fvalue(pv, l14);
9109     l138.fvalue(pv, l13);
9110     l138.fvalue(pv, l12);
9111     l138.fvalue(pv, l11);
9112     l138.fvalue(pv, l10);
9113     l138.fvalue(pv, l9);
9114     l138.fvalue(pv, l8);
9115     l138.fvalue(pv, l7);
9116     l138.fvalue(pv, l6);
9117     l138.fvalue(pv, l5);
9118     l138.fvalue(pv, l4);
9119     l138.fvalue(pv, l3);
9120     l138.fvalue(pv, l2);
9121     l138.fvalue(pv, l1);
9122     ((l248).value = l386);
9123     ((l203).value = 920);
9124     ((l16).value = 234);
9125     return ((l269).value = 303);
9126 })();
9127 ((l249).value = 386);