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         var i;
  88         return (function(){
  89             return ((v1 === l5.value)?l4.value: l5.value);
  90         })();
  91     }));
  92     return l13;
  93 })();
  94 var l14 = {name: "RETURN"};
  95 l14;
  96 var l15 = {name: "WHILE"};
  97 l15;
  98 var l16 = {name: "*GENSYM-COUNTER*"};
  99 (function(){
 100     (((l16.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l16).value = 0));
 101     return l16;
 102 })();
 103 var l17 = {name: "GENSYM"};
 104 var l18 = {name: "INTEGER-TO-STRING"};
 105 (function(){
 106     (l17).fvalue = (function(v4){
 107         ((v4)["fname"] = "GENSYM");
 108         return v4;
 109     })((function (values,v3){
 110         checkArgsAtMost(arguments, 2);
 111         switch(arguments.length-1){
 112         case 0:
 113         v3="G";
 114         default: break;
 115         }
 116         var i;
 117         return (function(){
 118             ((l16).value = (function(){
 119                 var x1 = (function(){
 120                     var symbol = l16;
 121                     var value = symbol.value;
 122                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
 123                     return value;
 124                 })();
 125                 if (typeof x1 !== 'number') throw 'Not a number!';
 126                 var x2 = 1;
 127                 if (typeof x2 !== 'number') throw 'Not a number!';
 128                 return x1+x2;
 129             })());
 130             return (function(){
 131                 var name = (function(){
 132                     var string1 = v3;
 133                     var string2 = l18.fvalue(pv, (function(){
 134                         var symbol = l16;
 135                         var value = symbol.value;
 136                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
 137                         return value;
 138                     })());
 139                     if (typeof string1 != 'string')
 140                         throw 'The value ' + string1 + ' is not a type string.';
 141                     if (typeof string2 != 'string')
 142                         throw 'The value ' + string2 + ' is not a type string.';
 143                     return string1.concat(string2);
 144                 })();
 145                 if (typeof name != 'string')
 146                     throw 'The value ' + name + ' is not a type string.';
 147                 return ({name: name});
 148             })();
 149         })();
 150     }));
 151     return l17;
 152 })();
 153 var l19 = {name: "BOUNDP"};
 154 (function(){
 155     (l19).fvalue = (function(v6){
 156         ((v6)["fname"] = "BOUNDP");
 157         return v6;
 158     })((function (values,v5){
 159         checkArgs(arguments, 2);
 160         var i;
 161         return (function(){
 162             return ((v5.value !== undefined)?l4.value: l5.value);
 163         })();
 164     }));
 165     return l19;
 166 })();
 167 var l20 = {name: "="};
 168 (function(){
 169     (l20).fvalue = (function(v9){
 170         ((v9)["fname"] = "=");
 171         return v9;
 172     })((function (values,v7,v8){
 173         checkArgs(arguments, 3);
 174         var i;
 175         return (function(){
 176             return (function(){
 177                 var x1 = v7;
 178                 if (typeof x1 !== 'number') throw 'Not a number!';
 179                 var x2 = v8;
 180                 if (typeof x2 !== 'number') throw 'Not a number!';
 181                 return (x1==x2?l4.value: l5.value);
 182             })();
 183         })();
 184     }));
 185     return l20;
 186 })();
 187 var l21 = {name: "*"};
 188 (function(){
 189     (l21).fvalue = (function(v12){
 190         ((v12)["fname"] = "*");
 191         return v12;
 192     })((function (values,v10,v11){
 193         checkArgs(arguments, 3);
 194         var i;
 195         return (function(){
 196             return (function(){
 197                 var x1 = v10;
 198                 if (typeof x1 !== 'number') throw 'Not a number!';
 199                 var x2 = v11;
 200                 if (typeof x2 !== 'number') throw 'Not a number!';
 201                 return x1*x2;
 202             })();
 203         })();
 204     }));
 205     return l21;
 206 })();
 207 var l22 = {name: "/"};
 208 (function(){
 209     (l22).fvalue = (function(v15){
 210         ((v15)["fname"] = "/");
 211         return v15;
 212     })((function (values,v13,v14){
 213         checkArgs(arguments, 3);
 214         var i;
 215         return (function(){
 216             return (function(){
 217                 var x1 = v13;
 218                 if (typeof x1 !== 'number') throw 'Not a number!';
 219                 var x2 = v14;
 220                 if (typeof x2 !== 'number') throw 'Not a number!';
 221                 return x1/x2;
 222             })();
 223         })();
 224     }));
 225     return l22;
 226 })();
 227 var l23 = {name: "1+"};
 228 (function(){
 229     (l23).fvalue = (function(v17){
 230         ((v17)["fname"] = "1+");
 231         return v17;
 232     })((function (values,v16){
 233         checkArgs(arguments, 2);
 234         var i;
 235         return (function(){
 236             return (function(){
 237                 var x1 = v16;
 238                 if (typeof x1 !== 'number') throw 'Not a number!';
 239                 var x2 = 1;
 240                 if (typeof x2 !== 'number') throw 'Not a number!';
 241                 return x1+x2;
 242             })();
 243         })();
 244     }));
 245     return l23;
 246 })();
 247 var l24 = {name: "1-"};
 248 (function(){
 249     (l24).fvalue = (function(v19){
 250         ((v19)["fname"] = "1-");
 251         return v19;
 252     })((function (values,v18){
 253         checkArgs(arguments, 2);
 254         var i;
 255         return (function(){
 256             return (function(){
 257                 var x1 = v18;
 258                 if (typeof x1 !== 'number') throw 'Not a number!';
 259                 var x2 = 1;
 260                 if (typeof x2 !== 'number') throw 'Not a number!';
 261                 return x1-x2;
 262             })();
 263         })();
 264     }));
 265     return l24;
 266 })();
 267 var l25 = {name: "ZEROP"};
 268 (function(){
 269     (l25).fvalue = (function(v21){
 270         ((v21)["fname"] = "ZEROP");
 271         return v21;
 272     })((function (values,v20){
 273         checkArgs(arguments, 2);
 274         var i;
 275         return (function(){
 276             return (function(){
 277                 var x1 = v20;
 278                 if (typeof x1 !== 'number') throw 'Not a number!';
 279                 var x2 = 0;
 280                 if (typeof x2 !== 'number') throw 'Not a number!';
 281                 return (x1==x2?l4.value: l5.value);
 282             })();
 283         })();
 284     }));
 285     return l25;
 286 })();
 287 var l26 = {name: "TRUNCATE"};
 288 (function(){
 289     (l26).fvalue = (function(v24){
 290         ((v24)["fname"] = "TRUNCATE");
 291         return v24;
 292     })((function (values,v22,v23){
 293         checkArgs(arguments, 3);
 294         var i;
 295         return (function(){
 296             return (function(){
 297                 var x = (function(){
 298                     var x1 = v22;
 299                     if (typeof x1 !== 'number') throw 'Not a number!';
 300                     var x2 = v23;
 301                     if (typeof x2 !== 'number') throw 'Not a number!';
 302                     return x1/x2;
 303                 })();
 304                 if (typeof x != 'number')
 305                     throw 'The value ' + x + ' is not a type number.';
 306                 return Math.floor(x);
 307             })();
 308         })();
 309     }));
 310     return l26;
 311 })();
 312 var l27 = {name: "EQL"};
 313 (function(){
 314     (l27).fvalue = (function(v27){
 315         ((v27)["fname"] = "EQL");
 316         return v27;
 317     })((function (values,v25,v26){
 318         checkArgs(arguments, 3);
 319         var i;
 320         return (function(){
 321             return ((v25 === v26)?l4.value: l5.value);
 322         })();
 323     }));
 324     return l27;
 325 })();
 326 var l28 = {name: "NOT"};
 327 (function(){
 328     (l28).fvalue = (function(v29){
 329         ((v29)["fname"] = "NOT");
 330         return v29;
 331     })((function (values,v28){
 332         checkArgs(arguments, 2);
 333         var i;
 334         return (function(){
 335             return (v28 !== l5.value ? l5.value : l4.value);
 336         })();
 337     }));
 338     return l28;
 339 })();
 340 var l29 = {name: "CONS"};
 341 (function(){
 342     (l29).fvalue = (function(v32){
 343         ((v32)["fname"] = "CONS");
 344         return v32;
 345     })((function (values,v30,v31){
 346         checkArgs(arguments, 3);
 347         var i;
 348         return (function(){
 349             return ({car: v30, cdr: v31});
 350         })();
 351     }));
 352     return l29;
 353 })();
 354 var l30 = {name: "CONSP"};
 355 (function(){
 356     (l30).fvalue = (function(v34){
 357         ((v34)["fname"] = "CONSP");
 358         return v34;
 359     })((function (values,v33){
 360         checkArgs(arguments, 2);
 361         var i;
 362         return (function(){
 363             return ((function(){
 364                 var tmp = v33;
 365                 return (typeof tmp == 'object' && 'car' in tmp);
 366             })()?l4.value: l5.value);
 367         })();
 368     }));
 369     return l30;
 370 })();
 371 var l31 = {name: "CAR"};
 372 (function(){
 373     (l31).fvalue = (function(v36){
 374         ((v36)["fname"] = "CAR");
 375         return v36;
 376     })((function(){
 377         var func = (function (values,v35){
 378             checkArgs(arguments, 2);
 379             var i;
 380             return (function(){
 381                 return (function(){
 382                     var tmp = v35;
 383                     return tmp === l5.value? l5.value: tmp.car;
 384                 })();
 385             })();
 386         });
 387         func.docstring = 'Return the CAR part of a cons, or NIL if X is null.';
 388         return func;
 389     })());
 390     return l31;
 391 })();
 392 var l32 = {name: "CDR"};
 393 (function(){
 394     (l32).fvalue = (function(v38){
 395         ((v38)["fname"] = "CDR");
 396         return v38;
 397     })((function (values,v37){
 398         checkArgs(arguments, 2);
 399         var i;
 400         return (function(){
 401             return (function(){
 402                 var tmp = v37;
 403                 return tmp === l5.value? l5.value: tmp.cdr;
 404             })();
 405         })();
 406     }));
 407     return l32;
 408 })();
 409 var l33 = {name: "CAAR"};
 410 (function(){
 411     (l33).fvalue = (function(v40){
 412         ((v40)["fname"] = "CAAR");
 413         return v40;
 414     })((function (values,v39){
 415         checkArgs(arguments, 2);
 416         var i;
 417         return (function(){
 418             return (function(){
 419                 var tmp = (function(){
 420                     var tmp = v39;
 421                     return tmp === l5.value? l5.value: tmp.car;
 422                 })();
 423                 return tmp === l5.value? l5.value: tmp.car;
 424             })();
 425         })();
 426     }));
 427     return l33;
 428 })();
 429 var l34 = {name: "CADR"};
 430 (function(){
 431     (l34).fvalue = (function(v42){
 432         ((v42)["fname"] = "CADR");
 433         return v42;
 434     })((function (values,v41){
 435         checkArgs(arguments, 2);
 436         var i;
 437         return (function(){
 438             return (function(){
 439                 var tmp = (function(){
 440                     var tmp = v41;
 441                     return tmp === l5.value? l5.value: tmp.cdr;
 442                 })();
 443                 return tmp === l5.value? l5.value: tmp.car;
 444             })();
 445         })();
 446     }));
 447     return l34;
 448 })();
 449 var l35 = {name: "CDAR"};
 450 (function(){
 451     (l35).fvalue = (function(v44){
 452         ((v44)["fname"] = "CDAR");
 453         return v44;
 454     })((function (values,v43){
 455         checkArgs(arguments, 2);
 456         var i;
 457         return (function(){
 458             return (function(){
 459                 var tmp = (function(){
 460                     var tmp = v43;
 461                     return tmp === l5.value? l5.value: tmp.car;
 462                 })();
 463                 return tmp === l5.value? l5.value: tmp.cdr;
 464             })();
 465         })();
 466     }));
 467     return l35;
 468 })();
 469 var l36 = {name: "CDDR"};
 470 (function(){
 471     (l36).fvalue = (function(v46){
 472         ((v46)["fname"] = "CDDR");
 473         return v46;
 474     })((function (values,v45){
 475         checkArgs(arguments, 2);
 476         var i;
 477         return (function(){
 478             return (function(){
 479                 var tmp = (function(){
 480                     var tmp = v45;
 481                     return tmp === l5.value? l5.value: tmp.cdr;
 482                 })();
 483                 return tmp === l5.value? l5.value: tmp.cdr;
 484             })();
 485         })();
 486     }));
 487     return l36;
 488 })();
 489 var l37 = {name: "CADDR"};
 490 (function(){
 491     (l37).fvalue = (function(v48){
 492         ((v48)["fname"] = "CADDR");
 493         return v48;
 494     })((function (values,v47){
 495         checkArgs(arguments, 2);
 496         var i;
 497         return (function(){
 498             return (function(){
 499                 var tmp = (function(){
 500                     var tmp = (function(){
 501                         var tmp = v47;
 502                         return tmp === l5.value? l5.value: tmp.cdr;
 503                     })();
 504                     return tmp === l5.value? l5.value: tmp.cdr;
 505                 })();
 506                 return tmp === l5.value? l5.value: tmp.car;
 507             })();
 508         })();
 509     }));
 510     return l37;
 511 })();
 512 var l38 = {name: "CDDDR"};
 513 (function(){
 514     (l38).fvalue = (function(v50){
 515         ((v50)["fname"] = "CDDDR");
 516         return v50;
 517     })((function (values,v49){
 518         checkArgs(arguments, 2);
 519         var i;
 520         return (function(){
 521             return (function(){
 522                 var tmp = (function(){
 523                     var tmp = (function(){
 524                         var tmp = v49;
 525                         return tmp === l5.value? l5.value: tmp.cdr;
 526                     })();
 527                     return tmp === l5.value? l5.value: tmp.cdr;
 528                 })();
 529                 return tmp === l5.value? l5.value: tmp.cdr;
 530             })();
 531         })();
 532     }));
 533     return l38;
 534 })();
 535 var l39 = {name: "CADDDR"};
 536 (function(){
 537     (l39).fvalue = (function(v52){
 538         ((v52)["fname"] = "CADDDR");
 539         return v52;
 540     })((function (values,v51){
 541         checkArgs(arguments, 2);
 542         var i;
 543         return (function(){
 544             return (function(){
 545                 var tmp = (function(){
 546                     var tmp = (function(){
 547                         var tmp = (function(){
 548                             var tmp = v51;
 549                             return tmp === l5.value? l5.value: tmp.cdr;
 550                         })();
 551                         return tmp === l5.value? l5.value: tmp.cdr;
 552                     })();
 553                     return tmp === l5.value? l5.value: tmp.cdr;
 554                 })();
 555                 return tmp === l5.value? l5.value: tmp.car;
 556             })();
 557         })();
 558     }));
 559     return l39;
 560 })();
 561 var l40 = {name: "FIRST"};
 562 (function(){
 563     (l40).fvalue = (function(v54){
 564         ((v54)["fname"] = "FIRST");
 565         return v54;
 566     })((function (values,v53){
 567         checkArgs(arguments, 2);
 568         var i;
 569         return (function(){
 570             return (function(){
 571                 var tmp = v53;
 572                 return tmp === l5.value? l5.value: tmp.car;
 573             })();
 574         })();
 575     }));
 576     return l40;
 577 })();
 578 var l41 = {name: "SECOND"};
 579 (function(){
 580     (l41).fvalue = (function(v56){
 581         ((v56)["fname"] = "SECOND");
 582         return v56;
 583     })((function (values,v55){
 584         checkArgs(arguments, 2);
 585         var i;
 586         return (function(){
 587             return l34.fvalue(values, v55);
 588         })();
 589     }));
 590     return l41;
 591 })();
 592 var l42 = {name: "THIRD"};
 593 (function(){
 594     (l42).fvalue = (function(v58){
 595         ((v58)["fname"] = "THIRD");
 596         return v58;
 597     })((function (values,v57){
 598         checkArgs(arguments, 2);
 599         var i;
 600         return (function(){
 601             return l37.fvalue(values, v57);
 602         })();
 603     }));
 604     return l42;
 605 })();
 606 var l43 = {name: "FOURTH"};
 607 (function(){
 608     (l43).fvalue = (function(v60){
 609         ((v60)["fname"] = "FOURTH");
 610         return v60;
 611     })((function (values,v59){
 612         checkArgs(arguments, 2);
 613         var i;
 614         return (function(){
 615             return l39.fvalue(values, v59);
 616         })();
 617     }));
 618     return l43;
 619 })();
 620 var l44 = {name: "REST"};
 621 (function(){
 622     (l44).fvalue = (function(v62){
 623         ((v62)["fname"] = "REST");
 624         return v62;
 625     })((function (values,v61){
 626         checkArgs(arguments, 2);
 627         var i;
 628         return (function(){
 629             return (function(){
 630                 var tmp = v61;
 631                 return tmp === l5.value? l5.value: tmp.cdr;
 632             })();
 633         })();
 634     }));
 635     return l44;
 636 })();
 637 var l45 = {name: "LIST"};
 638 (function(){
 639     (l45).fvalue = (function(v64){
 640         ((v64)["fname"] = "LIST");
 641         return v64;
 642     })((function (values){
 643         var v63= l5.value;
 644         for (var i = arguments.length-1; i>=1; i--)
 645             v63 = {car: arguments[i], cdr:
 646         v63};
 647         var i;
 648         return (function(){
 649             return v63;
 650         })();
 651     }));
 652     return l45;
 653 })();
 654 var l46 = {name: "ATOM"};
 655 (function(){
 656     (l46).fvalue = (function(v66){
 657         ((v66)["fname"] = "ATOM");
 658         return v66;
 659     })((function (values,v65){
 660         checkArgs(arguments, 2);
 661         var i;
 662         return (function(){
 663             return l28.fvalue(values, ((function(){
 664                 var tmp = v65;
 665                 return (typeof tmp == 'object' && 'car' in tmp);
 666             })()?l4.value: l5.value));
 667         })();
 668     }));
 669     return l46;
 670 })();
 671 var l47 = {name: "INCF"};
 672 l47;
 673 var l48 = {name: "DECF"};
 674 l48;
 675 var l49 = {name: "PUSH"};
 676 l49;
 677 var l50 = {name: "DOLIST"};
 678 l50;
 679 var l51 = {name: "DOTIMES"};
 680 l51;
 681 var l52 = {name: "COND"};
 682 l52;
 683 var l53 = {name: "CASE"};
 684 l53;
 685 var l54 = {name: "ECASE"};
 686 l54;
 687 var l55 = {name: "AND"};
 688 l55;
 689 var l56 = {name: "OR"};
 690 l56;
 691 var l57 = {name: "PROG1"};
 692 l57;
 693 var l58 = {name: "PROG2"};
 694 l58;
 695 var l59 = {name: "ENSURE-LIST"};
 696 var l60 = {name: "LISTP"};
 697 (function(){
 698     (l59).fvalue = (function(v68){
 699         ((v68)["fname"] = "ENSURE-LIST");
 700         return v68;
 701     })((function (values,v67){
 702         checkArgs(arguments, 2);
 703         var i;
 704         return (function(){
 705             return (l60.fvalue(pv, v67) !== l5.value ? v67 : l45.fvalue(values, v67));
 706         })();
 707     }));
 708     return l59;
 709 })();
 710 var l61 = {name: "!REDUCE"};
 711 (function(){
 712     (l61).fvalue = (function(v72){
 713         ((v72)["fname"] = "!REDUCE");
 714         return v72;
 715     })((function (values,v69,v70,v71){
 716         checkArgs(arguments, 4);
 717         var i;
 718         return (function(){
 719             return (l13.fvalue(pv, v70) !== l5.value ? v71 : l61.fvalue(values, v69, (function(){
 720                 var tmp = v70;
 721                 return tmp === l5.value? l5.value: tmp.cdr;
 722             })(), (v69)(pv, v71, (function(){
 723                 var tmp = v70;
 724                 return tmp === l5.value? l5.value: tmp.car;
 725             })())));
 726         })();
 727     }));
 728     return l61;
 729 })();
 730 var l62 = {name: "+"};
 731 (function(){
 732     (l62).fvalue = (function(v77){
 733         ((v77)["fname"] = "+");
 734         return v77;
 735     })((function (values){
 736         var v73= l5.value;
 737         for (var i = arguments.length-1; i>=1; i--)
 738             v73 = {car: arguments[i], cdr:
 739         v73};
 740         var i;
 741         return (function(){
 742             return (function(v74){
 743                 return (function(){
 744                     return (function(v75,v76){
 745                         (function(){
 746                             while(v75 !== l5.value){
 747                                 (v76 = (function(){
 748                                     var tmp = v75;
 749                                     return tmp === l5.value? l5.value: tmp.car;
 750                                 })());
 751                                 (function(){
 752                                     (v74 = (function(){
 753                                         var x1 = v74;
 754                                         if (typeof x1 !== 'number') throw 'Not a number!';
 755                                         var x2 = v76;
 756                                         if (typeof x2 !== 'number') throw 'Not a number!';
 757                                         return x1+x2;
 758                                     })());
 759                                     return l5.value;
 760                                 })();
 761                                 (v75 = (function(){
 762                                     var tmp = v75;
 763                                     return tmp === l5.value? l5.value: tmp.cdr;
 764                                 })());
 765                             }return l5.value;
 766                         })();
 767                         return v74;
 768                     })(v73,l5.value);
 769                 })();
 770             })(0);
 771         })();
 772     }));
 773     return l62;
 774 })();
 775 var l63 = {name: "-"};
 776 (function(){
 777     (l63).fvalue = (function(v83){
 778         ((v83)["fname"] = "-");
 779         return v83;
 780     })((function (values,v79){
 781         checkArgsAtLeast(arguments, 2);
 782         var v78= l5.value;
 783         for (var i = arguments.length-1; i>=2; i--)
 784             v78 = {car: arguments[i], cdr:
 785         v78};
 786         var i;
 787         return (function(){
 788             return (l13.fvalue(pv, v78) !== l5.value ? (function(){
 789                 var x1 = v79;
 790                 if (typeof x1 !== 'number') throw 'Not a number!';
 791                 return -x1;
 792             })() : (function(v80){
 793                 return (function(){
 794                     return (function(v81,v82){
 795                         (function(){
 796                             while(v81 !== l5.value){
 797                                 (v82 = (function(){
 798                                     var tmp = v81;
 799                                     return tmp === l5.value? l5.value: tmp.car;
 800                                 })());
 801                                 (function(){
 802                                     (v80 = (function(){
 803                                         var x1 = v80;
 804                                         if (typeof x1 !== 'number') throw 'Not a number!';
 805                                         var x2 = v82;
 806                                         if (typeof x2 !== 'number') throw 'Not a number!';
 807                                         return x1-x2;
 808                                     })());
 809                                     return l5.value;
 810                                 })();
 811                                 (v81 = (function(){
 812                                     var tmp = v81;
 813                                     return tmp === l5.value? l5.value: tmp.cdr;
 814                                 })());
 815                             }return l5.value;
 816                         })();
 817                         return v80;
 818                     })(v78,l5.value);
 819                 })();
 820             })(v79));
 821         })();
 822     }));
 823     return l63;
 824 })();
 825 var l64 = {name: "APPEND-TWO"};
 826 var l65 = {name: "APPEND"};
 827 (function(){
 828     (l64).fvalue = (function(v86){
 829         ((v86)["fname"] = "APPEND-TWO");
 830         return v86;
 831     })((function (values,v84,v85){
 832         checkArgs(arguments, 3);
 833         var i;
 834         return (function(){
 835             return (l13.fvalue(pv, v84) !== l5.value ? v85 : ({car: (function(){
 836                 var tmp = v84;
 837                 return tmp === l5.value? l5.value: tmp.car;
 838             })(), cdr: l65.fvalue(pv, (function(){
 839                 var tmp = v84;
 840                 return tmp === l5.value? l5.value: tmp.cdr;
 841             })(), v85)}));
 842         })();
 843     }));
 844     return l64;
 845 })();
 846 (function(){
 847     (l65).fvalue = (function(v88){
 848         ((v88)["fname"] = "APPEND");
 849         return v88;
 850     })((function (values){
 851         var v87= l5.value;
 852         for (var i = arguments.length-1; i>=1; i--)
 853             v87 = {car: arguments[i], cdr:
 854         v87};
 855         var i;
 856         return (function(){
 857             return l61.fvalue(values, (function(){
 858                 var symbol = l64;
 859                 var func = symbol.fvalue;
 860                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
 861                 return func;
 862             })(), v87, l5);
 863         })();
 864     }));
 865     return l65;
 866 })();
 867 var l66 = {name: "REVAPPEND"};
 868 (function(){
 869     (l66).fvalue = (function(v91){
 870         ((v91)["fname"] = "REVAPPEND");
 871         return v91;
 872     })((function (values,v89,v90){
 873         checkArgs(arguments, 3);
 874         var i;
 875         return (function(){
 876             (function(){
 877                 return (function(){
 878                     while(v89 !== l5.value){
 879                         (v90 = ({car: (function(){
 880                             var tmp = v89;
 881                             return tmp === l5.value? l5.value: tmp.car;
 882                         })(), cdr: v90}));
 883                         (v89 = (function(){
 884                             var tmp = v89;
 885                             return tmp === l5.value? l5.value: tmp.cdr;
 886                         })());
 887                     }return l5.value;
 888                 })();
 889             })();
 890             return v90;
 891         })();
 892     }));
 893     return l66;
 894 })();
 895 var l67 = {name: "REVERSE"};
 896 (function(){
 897     (l67).fvalue = (function(v93){
 898         ((v93)["fname"] = "REVERSE");
 899         return v93;
 900     })((function (values,v92){
 901         checkArgs(arguments, 2);
 902         var i;
 903         return (function(){
 904             return l66.fvalue(values, v92, l5);
 905         })();
 906     }));
 907     return l67;
 908 })();
 909 var l68 = {name: "PSETQ"};
 910 l68;
 911 var l69 = {name: "DO"};
 912 l69;
 913 var l70 = {name: "DO*"};
 914 l70;
 915 var l71 = {name: "LIST-LENGTH"};
 916 (function(){
 917     (l71).fvalue = (function(v96){
 918         ((v96)["fname"] = "LIST-LENGTH");
 919         return v96;
 920     })((function (values,v94){
 921         checkArgs(arguments, 2);
 922         var i;
 923         return (function(){
 924             return (function(v95){
 925                 (function(){
 926                     return (function(){
 927                         while(l28.fvalue(pv, l13.fvalue(pv, v94)) !== l5.value){
 928                             (v95 = (function(){
 929                                 var x1 = v95;
 930                                 if (typeof x1 !== 'number') throw 'Not a number!';
 931                                 var x2 = 1;
 932                                 if (typeof x2 !== 'number') throw 'Not a number!';
 933                                 return x1+x2;
 934                             })());
 935                             (v94 = (function(){
 936                                 var tmp = v94;
 937                                 return tmp === l5.value? l5.value: tmp.cdr;
 938                             })());
 939                         }return l5.value;
 940                     })();
 941                 })();
 942                 return v95;
 943             })(0);
 944         })();
 945     }));
 946     return l71;
 947 })();
 948 var l72 = {name: "LENGTH"};
 949 (function(){
 950     (l72).fvalue = (function(v98){
 951         ((v98)["fname"] = "LENGTH");
 952         return v98;
 953     })((function (values,v97){
 954         checkArgs(arguments, 2);
 955         var i;
 956         return (function(){
 957             return (((typeof(v97) == "string")?l4.value: l5.value) !== l5.value ? (function(){
 958                 var x = v97;
 959                 if (typeof x != 'string')
 960                     throw 'The value ' + x + ' is not a type string.';
 961                 return x.length;
 962             })() : (((function(){
 963                 var x = v97;
 964                 return typeof x === 'object' && 'length' in x;
 965             })()?l4.value: l5.value) !== l5.value ? (function(){
 966                 var tmp = (v97)["length"];
 967                 return tmp == undefined? l5.value: tmp ;
 968             })() : (l60.fvalue(pv, v97) !== l5.value ? l71.fvalue(values, v97) : l5.value)));
 969         })();
 970     }));
 971     return l72;
 972 })();
 973 var l73 = {name: "CONCAT-TWO"};
 974 (function(){
 975     (l73).fvalue = (function(v101){
 976         ((v101)["fname"] = "CONCAT-TWO");
 977         return v101;
 978     })((function (values,v99,v100){
 979         checkArgs(arguments, 3);
 980         var i;
 981         return (function(){
 982             return (function(){
 983                 var string1 = v99;
 984                 var string2 = v100;
 985                 if (typeof string1 != 'string')
 986                     throw 'The value ' + string1 + ' is not a type string.';
 987                 if (typeof string2 != 'string')
 988                     throw 'The value ' + string2 + ' is not a type string.';
 989                 return string1.concat(string2);
 990             })();
 991         })();
 992     }));
 993     return l73;
 994 })();
 995 var l74 = {name: "MAPCAR"};
 996 var l75 = {name: "SENTINEL"};
 997 (function(){
 998     (l74).fvalue = (function(v107){
 999         ((v107)["fname"] = "MAPCAR");
1000         return v107;
1001     })((function (values,v102,v103){
1002         checkArgs(arguments, 3);
1003         var i;
1004         return (function(){
1005             return (function(){
1006                 var v104 = ({car: l75, cdr: l5.value});
1007                 var v105 = v104;
1008                 (function(){
1009                     return (function(){
1010                         while(l28.fvalue(pv, l13.fvalue(pv, v103)) !== l5.value){
1011                             (function(v106){
1012                                 (function(){
1013                                     var x = v105;
1014                                     if (typeof x != 'object')
1015                                         throw 'The value ' + x + ' is not a type object.';
1016                                     return (x.cdr = v106, x);
1017                                 })();
1018                                 return (v105 = v106, v103 = (function(){
1019                                     var tmp = v103;
1020                                     return tmp === l5.value? l5.value: tmp.cdr;
1021                                 })());
1022                             })(({car: (v102)(pv, (function(){
1023                                 var tmp = v103;
1024                                 return tmp === l5.value? l5.value: tmp.car;
1025                             })()), cdr: l5.value}));
1026                         }return l5.value;
1027                     })();
1028                 })();
1029                 return (function(){
1030                     var tmp = v104;
1031                     return tmp === l5.value? l5.value: tmp.cdr;
1032                 })();
1033             })();
1034         })();
1035     }));
1036     return l74;
1037 })();
1038 var l76 = {name: "IDENTITY"};
1039 (function(){
1040     (l76).fvalue = (function(v109){
1041         ((v109)["fname"] = "IDENTITY");
1042         return v109;
1043     })((function (values,v108){
1044         checkArgs(arguments, 2);
1045         var i;
1046         return (function(){
1047             return v108;
1048         })();
1049     }));
1050     return l76;
1051 })();
1052 var l77 = {name: "CONSTANTLY"};
1053 (function(){
1054     (l77).fvalue = (function(v112){
1055         ((v112)["fname"] = "CONSTANTLY");
1056         return v112;
1057     })((function (values,v110){
1058         checkArgs(arguments, 2);
1059         var i;
1060         return (function(){
1061             return (function (values){
1062                 var v111= l5.value;
1063                 for (var i = arguments.length-1; i>=1; i--)
1064                     v111 = {car: arguments[i], cdr:
1065                 v111};
1066                 var i;
1067                 return v110;
1068             });
1069         })();
1070     }));
1071     return l77;
1072 })();
1073 var l78 = {name: "COPY-LIST"};
1074 (function(){
1075     (l78).fvalue = (function(v114){
1076         ((v114)["fname"] = "COPY-LIST");
1077         return v114;
1078     })((function (values,v113){
1079         checkArgs(arguments, 2);
1080         var i;
1081         return (function(){
1082             return l74.fvalue(values, (function(){
1083                 var symbol = l76;
1084                 var func = symbol.fvalue;
1085                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1086                 return func;
1087             })(), v113);
1088         })();
1089     }));
1090     return l78;
1091 })();
1092 var l79 = {name: "CODE-CHAR"};
1093 (function(){
1094     (l79).fvalue = (function(v116){
1095         ((v116)["fname"] = "CODE-CHAR");
1096         return v116;
1097     })((function (values,v115){
1098         checkArgs(arguments, 2);
1099         var i;
1100         return (function(){
1101             return v115;
1102         })();
1103     }));
1104     return l79;
1105 })();
1106 var l80 = {name: "CHAR-CODE"};
1107 (function(){
1108     (l80).fvalue = (function(v118){
1109         ((v118)["fname"] = "CHAR-CODE");
1110         return v118;
1111     })((function (values,v117){
1112         checkArgs(arguments, 2);
1113         var i;
1114         return (function(){
1115             return v117;
1116         })();
1117     }));
1118     return l80;
1119 })();
1120 var l81 = {name: "CHAR="};
1121 (function(){
1122     (l81).fvalue = (function(v121){
1123         ((v121)["fname"] = "CHAR=");
1124         return v121;
1125     })((function (values,v119,v120){
1126         checkArgs(arguments, 3);
1127         var i;
1128         return (function(){
1129             return (function(){
1130                 var x1 = v119;
1131                 if (typeof x1 !== 'number') throw 'Not a number!';
1132                 var x2 = v120;
1133                 if (typeof x2 !== 'number') throw 'Not a number!';
1134                 return (x1==x2?l4.value: l5.value);
1135             })();
1136         })();
1137     }));
1138     return l81;
1139 })();
1140 var l82 = {name: "INTEGERP"};
1141 (function(){
1142     (l82).fvalue = (function(v123){
1143         ((v123)["fname"] = "INTEGERP");
1144         return v123;
1145     })((function (values,v122){
1146         checkArgs(arguments, 2);
1147         var i;
1148         return (function(){
1149             return (((typeof (v122) == "number")?l4.value: l5.value) !== l5.value ? (function(){
1150                 var x1 = (function(){
1151                     var x = v122;
1152                     if (typeof x != 'number')
1153                         throw 'The value ' + x + ' is not a type number.';
1154                     return Math.floor(x);
1155                 })();
1156                 if (typeof x1 !== 'number') throw 'Not a number!';
1157                 var x2 = v122;
1158                 if (typeof x2 !== 'number') throw 'Not a number!';
1159                 return (x1==x2?l4.value: l5.value);
1160             })() : l5.value);
1161         })();
1162     }));
1163     return l82;
1164 })();
1165 var l83 = {name: "PLUSP"};
1166 (function(){
1167     (l83).fvalue = (function(v125){
1168         ((v125)["fname"] = "PLUSP");
1169         return v125;
1170     })((function (values,v124){
1171         checkArgs(arguments, 2);
1172         var i;
1173         return (function(){
1174             return (function(){
1175                 var x1 = 0;
1176                 if (typeof x1 !== 'number') throw 'Not a number!';
1177                 var x2 = v124;
1178                 if (typeof x2 !== 'number') throw 'Not a number!';
1179                 return (x1<x2?l4.value: l5.value);
1180             })();
1181         })();
1182     }));
1183     return l83;
1184 })();
1185 var l84 = {name: "MINUSP"};
1186 (function(){
1187     (l84).fvalue = (function(v127){
1188         ((v127)["fname"] = "MINUSP");
1189         return v127;
1190     })((function (values,v126){
1191         checkArgs(arguments, 2);
1192         var i;
1193         return (function(){
1194             return (function(){
1195                 var x1 = v126;
1196                 if (typeof x1 !== 'number') throw 'Not a number!';
1197                 var x2 = 0;
1198                 if (typeof x2 !== 'number') throw 'Not a number!';
1199                 return (x1<x2?l4.value: l5.value);
1200             })();
1201         })();
1202     }));
1203     return l84;
1204 })();
1205 (function(){
1206     (l60).fvalue = (function(v130){
1207         ((v130)["fname"] = "LISTP");
1208         return v130;
1209     })((function (values,v128){
1210         checkArgs(arguments, 2);
1211         var i;
1212         return (function(){
1213             return (function(v129){
1214                 return (v129 !== l5.value ? v129 : l13.fvalue(values, v128));
1215             })(((function(){
1216                 var tmp = v128;
1217                 return (typeof tmp == 'object' && 'car' in tmp);
1218             })()?l4.value: l5.value));
1219         })();
1220     }));
1221     return l60;
1222 })();
1223 var l85 = {name: "NTHCDR"};
1224 (function(){
1225     (l85).fvalue = (function(v133){
1226         ((v133)["fname"] = "NTHCDR");
1227         return v133;
1228     })((function (values,v131,v132){
1229         checkArgs(arguments, 3);
1230         var i;
1231         return (function(){
1232             (function(){
1233                 return (function(){
1234                     while((l83.fvalue(pv, v131) !== l5.value ? v132 : l5.value) !== l5.value){
1235                         (v131 = l24.fvalue(pv, v131));
1236                         (v132 = (function(){
1237                             var tmp = v132;
1238                             return tmp === l5.value? l5.value: tmp.cdr;
1239                         })());
1240                     }return l5.value;
1241                 })();
1242             })();
1243             return v132;
1244         })();
1245     }));
1246     return l85;
1247 })();
1248 var l86 = {name: "NTH"};
1249 (function(){
1250     (l86).fvalue = (function(v136){
1251         ((v136)["fname"] = "NTH");
1252         return v136;
1253     })((function (values,v134,v135){
1254         checkArgs(arguments, 3);
1255         var i;
1256         return (function(){
1257             return (function(){
1258                 var tmp = l85.fvalue(pv, v134, v135);
1259                 return tmp === l5.value? l5.value: tmp.car;
1260             })();
1261         })();
1262     }));
1263     return l86;
1264 })();
1265 var l87 = {name: "LAST"};
1266 (function(){
1267     (l87).fvalue = (function(v138){
1268         ((v138)["fname"] = "LAST");
1269         return v138;
1270     })((function (values,v137){
1271         checkArgs(arguments, 2);
1272         var i;
1273         return (function(){
1274             (function(){
1275                 return (function(){
1276                     while(((function(){
1277                         var tmp = (function(){
1278                             var tmp = v137;
1279                             return tmp === l5.value? l5.value: tmp.cdr;
1280                         })();
1281                         return (typeof tmp == 'object' && 'car' in tmp);
1282                     })()?l4.value: l5.value) !== l5.value){
1283                         (v137 = (function(){
1284                             var tmp = v137;
1285                             return tmp === l5.value? l5.value: tmp.cdr;
1286                         })());
1287                     }return l5.value;
1288                 })();
1289             })();
1290             return v137;
1291         })();
1292     }));
1293     return l87;
1294 })();
1295 var l88 = {name: "BUTLAST"};
1296 (function(){
1297     (l88).fvalue = (function(v140){
1298         ((v140)["fname"] = "BUTLAST");
1299         return v140;
1300     })((function (values,v139){
1301         checkArgs(arguments, 2);
1302         var i;
1303         return (function(){
1304             return (((function(){
1305                 var tmp = (function(){
1306                     var tmp = v139;
1307                     return tmp === l5.value? l5.value: tmp.cdr;
1308                 })();
1309                 return (typeof tmp == 'object' && 'car' in tmp);
1310             })()?l4.value: l5.value) !== l5.value ? ({car: (function(){
1311                 var tmp = v139;
1312                 return tmp === l5.value? l5.value: tmp.car;
1313             })(), cdr: l88.fvalue(pv, (function(){
1314                 var tmp = v139;
1315                 return tmp === l5.value? l5.value: tmp.cdr;
1316             })())}) : l5.value);
1317         })();
1318     }));
1319     return l88;
1320 })();
1321 var l89 = {name: "MEMBER"};
1322 (function(){
1323     (l89).fvalue = (function(v143){
1324         ((v143)["fname"] = "MEMBER");
1325         return v143;
1326     })((function (values,v141,v142){
1327         checkArgs(arguments, 3);
1328         var i;
1329         return (function(){
1330             return (function(){
1331                 try {
1332                     return (function(){
1333                         while(v142 !== l5.value){
1334                             (l27.fvalue(pv, v141, (function(){
1335                                 var tmp = v142;
1336                                 return tmp === l5.value? l5.value: tmp.car;
1337                             })()) !== l5.value ? (function(){
1338                                 var values = mv;
1339                                 throw ({type: 'block', id: 65, values: v142, message: 'Return from unknown block NIL.'})
1340                             })() : l5.value);
1341                             (v142 = (function(){
1342                                 var tmp = v142;
1343                                 return tmp === l5.value? l5.value: tmp.cdr;
1344                             })());
1345                         }return l5.value;
1346                     })();
1347                 }
1348                 catch (cf){
1349                     if (cf.type == 'block' && cf.id == 65)
1350                         return values.apply(this, forcemv(cf.values));
1351                     else
1352                         throw cf;
1353                 }
1354             })();
1355         })();
1356     }));
1357     return l89;
1358 })();
1359 var l90 = {name: "REMOVE"};
1360 (function(){
1361     (l90).fvalue = (function(v146){
1362         ((v146)["fname"] = "REMOVE");
1363         return v146;
1364     })((function (values,v144,v145){
1365         checkArgs(arguments, 3);
1366         var i;
1367         return (function(){
1368             return (l13.fvalue(pv, v145) !== l5.value ? l5.value : (l27.fvalue(pv, v144, (function(){
1369                 var tmp = v145;
1370                 return tmp === l5.value? l5.value: tmp.car;
1371             })()) !== l5.value ? l90.fvalue(values, v144, (function(){
1372                 var tmp = v145;
1373                 return tmp === l5.value? l5.value: tmp.cdr;
1374             })()) : ({car: (function(){
1375                 var tmp = v145;
1376                 return tmp === l5.value? l5.value: tmp.car;
1377             })(), cdr: l90.fvalue(pv, v144, (function(){
1378                 var tmp = v145;
1379                 return tmp === l5.value? l5.value: tmp.cdr;
1380             })())})));
1381         })();
1382     }));
1383     return l90;
1384 })();
1385 var l91 = {name: "REMOVE-IF"};
1386 (function(){
1387     (l91).fvalue = (function(v149){
1388         ((v149)["fname"] = "REMOVE-IF");
1389         return v149;
1390     })((function (values,v147,v148){
1391         checkArgs(arguments, 3);
1392         var i;
1393         return (function(){
1394             return (l13.fvalue(pv, v148) !== l5.value ? l5.value : ((v147)(pv, (function(){
1395                 var tmp = v148;
1396                 return tmp === l5.value? l5.value: tmp.car;
1397             })()) !== l5.value ? l91.fvalue(values, v147, (function(){
1398                 var tmp = v148;
1399                 return tmp === l5.value? l5.value: tmp.cdr;
1400             })()) : ({car: (function(){
1401                 var tmp = v148;
1402                 return tmp === l5.value? l5.value: tmp.car;
1403             })(), cdr: l91.fvalue(pv, v147, (function(){
1404                 var tmp = v148;
1405                 return tmp === l5.value? l5.value: tmp.cdr;
1406             })())})));
1407         })();
1408     }));
1409     return l91;
1410 })();
1411 var l92 = {name: "REMOVE-IF-NOT"};
1412 (function(){
1413     (l92).fvalue = (function(v152){
1414         ((v152)["fname"] = "REMOVE-IF-NOT");
1415         return v152;
1416     })((function (values,v150,v151){
1417         checkArgs(arguments, 3);
1418         var i;
1419         return (function(){
1420             return (l13.fvalue(pv, v151) !== l5.value ? l5.value : ((v150)(pv, (function(){
1421                 var tmp = v151;
1422                 return tmp === l5.value? l5.value: tmp.car;
1423             })()) !== l5.value ? ({car: (function(){
1424                 var tmp = v151;
1425                 return tmp === l5.value? l5.value: tmp.car;
1426             })(), cdr: l92.fvalue(pv, v150, (function(){
1427                 var tmp = v151;
1428                 return tmp === l5.value? l5.value: tmp.cdr;
1429             })())}) : l92.fvalue(values, v150, (function(){
1430                 var tmp = v151;
1431                 return tmp === l5.value? l5.value: tmp.cdr;
1432             })())));
1433         })();
1434     }));
1435     return l92;
1436 })();
1437 var l93 = {name: "DIGIT-CHAR-P"};
1438 (function(){
1439     (l93).fvalue = (function(v154){
1440         ((v154)["fname"] = "DIGIT-CHAR-P");
1441         return v154;
1442     })((function (values,v153){
1443         checkArgs(arguments, 2);
1444         var i;
1445         return (function(){
1446             return (((function(){
1447                 var x1 = 48;
1448                 if (typeof x1 !== 'number') throw 'Not a number!';
1449                 var x2 = v153;
1450                 if (typeof x2 !== 'number') throw 'Not a number!';
1451                 return (x1<=x2?l4.value: l5.value);
1452             })() !== l5.value ? (function(){
1453                 var x1 = v153;
1454                 if (typeof x1 !== 'number') throw 'Not a number!';
1455                 var x2 = 57;
1456                 if (typeof x2 !== 'number') throw 'Not a number!';
1457                 return (x1<=x2?l4.value: l5.value);
1458             })() : l5.value) !== l5.value ? (function(){
1459                 var x1 = v153;
1460                 if (typeof x1 !== 'number') throw 'Not a number!';
1461                 var x2 = 48;
1462                 if (typeof x2 !== 'number') throw 'Not a number!';
1463                 return x1-x2;
1464             })() : l5.value);
1465         })();
1466     }));
1467     return l93;
1468 })();
1469 var l94 = {name: "DIGIT-CHAR"};
1470 (function(){
1471     (l94).fvalue = (function(v156){
1472         ((v156)["fname"] = "DIGIT-CHAR");
1473         return v156;
1474     })((function (values,v155){
1475         checkArgs(arguments, 2);
1476         var i;
1477         return (function(){
1478             return ((function(){
1479                 var x1 = 0;
1480                 if (typeof x1 !== 'number') throw 'Not a number!';
1481                 var x2 = v155;
1482                 if (typeof x2 !== 'number') throw 'Not a number!';
1483                 var x3 = 9;
1484                 if (typeof x3 !== 'number') throw 'Not a number!';
1485                 return (x1<=x2 && x2<=x3?l4.value: l5.value);
1486             })() !== l5.value ? (function(){
1487                 var string = "0123456789";
1488                 var index = v155;
1489                 if (typeof string != 'string')
1490                     throw 'The value ' + string + ' is not a type string.';
1491                 if (typeof index != 'number')
1492                     throw 'The value ' + index + ' is not a type number.';
1493                 return string.charCodeAt(index);
1494             })() : l5.value);
1495         })();
1496     }));
1497     return l94;
1498 })();
1499 var l95 = {name: "SUBSEQ"};
1500 (function(){
1501     (l95).fvalue = (function(v160){
1502         ((v160)["fname"] = "SUBSEQ");
1503         return v160;
1504     })((function (values,v157,v158,v159){
1505         checkArgsAtLeast(arguments, 3);
1506         checkArgsAtMost(arguments, 4);
1507         switch(arguments.length-1){
1508         case 2:
1509         v159=l5.value;
1510         default: break;
1511         }
1512         var i;
1513         return (function(){
1514             return (((typeof(v157) == "string")?l4.value: l5.value) !== l5.value ? (v159 !== l5.value ? (function(){
1515                 var str = v157;
1516                 var a = v158;
1517                 var b;
1518                 b = v159;
1519                 return str.slice(a,b);
1520             })() : (function(){
1521                 var str = v157;
1522                 var a = v158;
1523                 var b;
1524                 return str.slice(a,b);
1525             })()) : (function(){
1526                 throw "Unsupported argument.";
1527             })());
1528         })();
1529     }));
1530     return l95;
1531 })();
1532 var l96 = {name: "SOME"};
1533 (function(){
1534     (l96).fvalue = (function(v167){
1535         ((v167)["fname"] = "SOME");
1536         return v167;
1537     })((function (values,v161,v162){
1538         checkArgs(arguments, 3);
1539         var i;
1540         return (function(){
1541             try {
1542                 return (((typeof(v162) == "string")?l4.value: l5.value) !== l5.value ? (function(v163,v164){
1543                     (function(){
1544                         return (function(){
1545                             while((function(){
1546                                 var x1 = v163;
1547                                 if (typeof x1 !== 'number') throw 'Not a number!';
1548                                 var x2 = v164;
1549                                 if (typeof x2 !== 'number') throw 'Not a number!';
1550                                 return (x1<x2?l4.value: l5.value);
1551                             })() !== l5.value){
1552                                 ((v161)(pv, (function(){
1553                                     var string = v162;
1554                                     var index = v163;
1555                                     if (typeof string != 'string')
1556                                         throw 'The value ' + string + ' is not a type string.';
1557                                     if (typeof index != 'number')
1558                                         throw 'The value ' + index + ' is not a type number.';
1559                                     return string.charCodeAt(index);
1560                                 })()) !== l5.value ? (function(){
1561                                     var values = mv;
1562                                     throw ({type: 'block', id: 72, values: l4.value, message: 'Return from unknown block SOME.'})
1563                                 })() : l5.value);
1564                                 (v163 = (function(){
1565                                     var x1 = v163;
1566                                     if (typeof x1 !== 'number') throw 'Not a number!';
1567                                     var x2 = 1;
1568                                     if (typeof x2 !== 'number') throw 'Not a number!';
1569                                     return x1+x2;
1570                                 })());
1571                             }return l5.value;
1572                         })();
1573                     })();
1574                     return l5.value;
1575                 })(0,l72.fvalue(pv, v162)) : (l60.fvalue(pv, v162) !== l5.value ? (function(){
1576                     try {
1577                         return (function(v165,v166){
1578                             (function(){
1579                                 while(v165 !== l5.value){
1580                                     (v166 = (function(){
1581                                         var tmp = v165;
1582                                         return tmp === l5.value? l5.value: tmp.car;
1583                                     })());
1584                                     (function(){
1585                                         ((v161)(pv, v166) !== l5.value ? (function(){
1586                                             var values = mv;
1587                                             throw ({type: 'block', id: 74, values: l4.value, message: 'Return from unknown block NIL.'})
1588                                         })() : l5.value);
1589                                         return l5.value;
1590                                     })();
1591                                     (v165 = (function(){
1592                                         var tmp = v165;
1593                                         return tmp === l5.value? l5.value: tmp.cdr;
1594                                     })());
1595                                 }return l5.value;
1596                             })();
1597                             return l5.value;
1598                         })(v162,l5.value);
1599                     }
1600                     catch (cf){
1601                         if (cf.type == 'block' && cf.id == 74)
1602                             return values.apply(this, forcemv(cf.values));
1603                         else
1604                             throw cf;
1605                     }
1606                 })() : (function(){
1607                     throw "Unknown sequence.";
1608                 })()));
1609             }
1610             catch (cf){
1611                 if (cf.type == 'block' && cf.id == 72)
1612                     return values.apply(this, forcemv(cf.values));
1613                 else
1614                     throw cf;
1615             }
1616         })();
1617     }));
1618     return l96;
1619 })();
1620 var l97 = {name: "EVERY"};
1621 (function(){
1622     (l97).fvalue = (function(v174){
1623         ((v174)["fname"] = "EVERY");
1624         return v174;
1625     })((function (values,v168,v169){
1626         checkArgs(arguments, 3);
1627         var i;
1628         return (function(){
1629             try {
1630                 return (((typeof(v169) == "string")?l4.value: l5.value) !== l5.value ? (function(v170,v171){
1631                     (function(){
1632                         return (function(){
1633                             while((function(){
1634                                 var x1 = v170;
1635                                 if (typeof x1 !== 'number') throw 'Not a number!';
1636                                 var x2 = v171;
1637                                 if (typeof x2 !== 'number') throw 'Not a number!';
1638                                 return (x1<x2?l4.value: l5.value);
1639                             })() !== l5.value){
1640                                 ((v168)(pv, (function(){
1641                                     var string = v169;
1642                                     var index = v170;
1643                                     if (typeof string != 'string')
1644                                         throw 'The value ' + string + ' is not a type string.';
1645                                     if (typeof index != 'number')
1646                                         throw 'The value ' + index + ' is not a type number.';
1647                                     return string.charCodeAt(index);
1648                                 })()) !== l5.value ? l5.value : (function(){
1649                                     var values = mv;
1650                                     throw ({type: 'block', id: 75, values: l5.value, message: 'Return from unknown block EVERY.'})
1651                                 })());
1652                                 (v170 = (function(){
1653                                     var x1 = v170;
1654                                     if (typeof x1 !== 'number') throw 'Not a number!';
1655                                     var x2 = 1;
1656                                     if (typeof x2 !== 'number') throw 'Not a number!';
1657                                     return x1+x2;
1658                                 })());
1659                             }return l5.value;
1660                         })();
1661                     })();
1662                     return l4.value;
1663                 })(0,l72.fvalue(pv, v169)) : (l60.fvalue(pv, v169) !== l5.value ? (function(){
1664                     try {
1665                         return (function(v172,v173){
1666                             (function(){
1667                                 while(v172 !== l5.value){
1668                                     (v173 = (function(){
1669                                         var tmp = v172;
1670                                         return tmp === l5.value? l5.value: tmp.car;
1671                                     })());
1672                                     (function(){
1673                                         ((v168)(pv, v173) !== l5.value ? l5.value : (function(){
1674                                             var values = mv;
1675                                             throw ({type: 'block', id: 77, values: l5.value, message: 'Return from unknown block NIL.'})
1676                                         })());
1677                                         return l5.value;
1678                                     })();
1679                                     (v172 = (function(){
1680                                         var tmp = v172;
1681                                         return tmp === l5.value? l5.value: tmp.cdr;
1682                                     })());
1683                                 }return l5.value;
1684                             })();
1685                             return l4.value;
1686                         })(v169,l5.value);
1687                     }
1688                     catch (cf){
1689                         if (cf.type == 'block' && cf.id == 77)
1690                             return values.apply(this, forcemv(cf.values));
1691                         else
1692                             throw cf;
1693                     }
1694                 })() : (function(){
1695                     throw "Unknown sequence.";
1696                 })()));
1697             }
1698             catch (cf){
1699                 if (cf.type == 'block' && cf.id == 75)
1700                     return values.apply(this, forcemv(cf.values));
1701                 else
1702                     throw cf;
1703             }
1704         })();
1705     }));
1706     return l97;
1707 })();
1708 var l98 = {name: "ASSOC"};
1709 (function(){
1710     (l98).fvalue = (function(v177){
1711         ((v177)["fname"] = "ASSOC");
1712         return v177;
1713     })((function (values,v175,v176){
1714         checkArgs(arguments, 3);
1715         var i;
1716         return (function(){
1717             (function(){
1718                 try {
1719                     return (function(){
1720                         while(v176 !== l5.value){
1721                             (l27.fvalue(pv, v175, l33.fvalue(pv, v176)) !== l5.value ? (function(){
1722                                 throw ({type: 'block', id: 79, values: l5.value, message: 'Return from unknown block NIL.'})
1723                             })() : (v176 = (function(){
1724                                 var tmp = v176;
1725                                 return tmp === l5.value? l5.value: tmp.cdr;
1726                             })()));
1727                         }return l5.value;
1728                     })();
1729                 }
1730                 catch (cf){
1731                     if (cf.type == 'block' && cf.id == 79)
1732                         return cf.values;
1733                     else
1734                         throw cf;
1735                 }
1736             })();
1737             return (function(){
1738                 var tmp = v176;
1739                 return tmp === l5.value? l5.value: tmp.car;
1740             })();
1741         })();
1742     }));
1743     return l98;
1744 })();
1745 var l99 = {name: "STRING"};
1746 (function(){
1747     (l99).fvalue = (function(v179){
1748         ((v179)["fname"] = "STRING");
1749         return v179;
1750     })((function (values,v178){
1751         checkArgs(arguments, 2);
1752         var i;
1753         return (function(){
1754             return (((typeof(v178) == "string")?l4.value: l5.value) !== l5.value ? v178 : (((function(){
1755                 var tmp = v178;
1756                 return (typeof tmp == 'object' && 'name' in tmp);
1757             })()?l4.value: l5.value) !== l5.value ? (v178).name : (function(){
1758                 var x = v178;
1759                 if (typeof x != 'number')
1760                     throw 'The value ' + x + ' is not a type number.';
1761                 return String.fromCharCode(x);
1762             })()));
1763         })();
1764     }));
1765     return l99;
1766 })();
1767 var l100 = {name: "STRING="};
1768 (function(){
1769     (l100).fvalue = (function(v182){
1770         ((v182)["fname"] = "STRING=");
1771         return v182;
1772     })((function (values,v180,v181){
1773         checkArgs(arguments, 3);
1774         var i;
1775         return (function(){
1776             return ((v180 == v181)?l4.value: l5.value);
1777         })();
1778     }));
1779     return l100;
1780 })();
1781 var l101 = {name: "FDEFINITION"};
1782 (function(){
1783     (l101).fvalue = (function(v184){
1784         ((v184)["fname"] = "FDEFINITION");
1785         return v184;
1786     })((function (values,v183){
1787         checkArgs(arguments, 2);
1788         var i;
1789         return (function(){
1790             return (((typeof v183 == 'function')?l4.value: l5.value) !== l5.value ? v183 : (((function(){
1791                 var tmp = v183;
1792                 return (typeof tmp == 'object' && 'name' in tmp);
1793             })()?l4.value: l5.value) !== l5.value ? (function(){
1794                 var symbol = v183;
1795                 var func = symbol.fvalue;
1796                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1797                 return func;
1798             })() : (function(){
1799                 throw "Invalid function";
1800             })()));
1801         })();
1802     }));
1803     return l101;
1804 })();
1805 var l102 = {name: "DISASSEMBLE"};
1806 var l103 = {name: "WRITE-LINE"};
1807 (function(){
1808     (l102).fvalue = (function(v186){
1809         ((v186)["fname"] = "DISASSEMBLE");
1810         return v186;
1811     })((function (values,v185){
1812         checkArgs(arguments, 2);
1813         var i;
1814         return (function(){
1815             l103.fvalue(pv, (l101.fvalue(pv, v185)).toString());
1816             return l5.value;
1817         })();
1818     }));
1819     return l102;
1820 })();
1821 var l104 = {name: "DOCUMENTATION"};
1822 var l105 = {name: "FUNCTION"};
1823 var l106 = {name: "VARIABLE"};
1824 (function(){
1825     (l104).fvalue = (function(v191){
1826         ((v191)["fname"] = "DOCUMENTATION");
1827         return v191;
1828     })((function(){
1829         var func = (function (values,v187,v188){
1830             checkArgs(arguments, 3);
1831             var i;
1832             return (function(){
1833                 return (function(v189){
1834                     return (l27.fvalue(pv, v189, l105) !== l5.value ? (function(v190){
1835                         return (function(){
1836                             var tmp = (v190)["docstring"];
1837                             return tmp == undefined? l5.value: tmp ;
1838                         })();
1839                     })(l101.fvalue(pv, v187)) : (l27.fvalue(pv, v189, l106) !== l5.value ? (function(){
1840                         (((function(){
1841                             var tmp = v187;
1842                             return (typeof tmp == 'object' && 'name' in tmp);
1843                         })()?l4.value: l5.value) !== l5.value ? l5.value : (function(){
1844                             throw "Wrong argument type! it should be a symbol";
1845                         })());
1846                         return (function(){
1847                             var tmp = (v187)["vardoc"];
1848                             return tmp == undefined? l5.value: tmp ;
1849                         })();
1850                     })() : (function(){
1851                         throw "ECASE expression failed.";
1852                     })()));
1853                 })(v188);
1854             })();
1855         });
1856         func.docstring = 'Return the documentation of X. TYPE must be the symbol VARIABLE or FUNCTION.';
1857         return func;
1858     })());
1859     return l104;
1860 })();
1861 var l107 = {name: "MULTIPLE-VALUE-BIND"};
1862 l107;
1863 var l108 = {name: "MULTIPLE-VALUE-LIST"};
1864 l108;
1865 var l109 = {name: "*PACKAGE-LIST*"};
1866 (function(){
1867     (((l109.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l109).value = l5.value));
1868     return l109;
1869 })();
1870 var l110 = {name: "LIST-ALL-PACKAGES"};
1871 (function(){
1872     (l110).fvalue = (function(v192){
1873         ((v192)["fname"] = "LIST-ALL-PACKAGES");
1874         return v192;
1875     })((function (values){
1876         checkArgsAtMost(arguments, 1);
1877         var i;
1878         return (function(){
1879             return (function(){
1880                 var symbol = l109;
1881                 var value = symbol.value;
1882                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
1883                 return value;
1884             })();
1885         })();
1886     }));
1887     return l110;
1888 })();
1889 var l111 = {name: "MAKE-PACKAGE"};
1890 var l112 = {name: "FIND-PACKAGE-OR-FAIL"};
1891 (function(){
1892     (l111).fvalue = (function(v197){
1893         ((v197)["fname"] = "MAKE-PACKAGE");
1894         return v197;
1895     })((function (values,v193,v194){
1896         checkArgsAtLeast(arguments, 2);
1897         checkArgsAtMost(arguments, 3);
1898         switch(arguments.length-1){
1899         case 1:
1900         v194=l5.value;
1901         default: break;
1902         }
1903         var i;
1904         return (function(){
1905             return (function(v195,v196){
1906                 ((v195)["packageName"] = v193);
1907                 ((v195)["symbols"] = {});
1908                 ((v195)["exports"] = {});
1909                 ((v195)["use"] = v196);
1910                 ((l109).value = ({car: v195, cdr: (function(){
1911                     var symbol = l109;
1912                     var value = symbol.value;
1913                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
1914                     return value;
1915                 })()}));
1916                 return v195;
1917             })({},l74.fvalue(pv, (function(){
1918                 var symbol = l112;
1919                 var func = symbol.fvalue;
1920                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
1921                 return func;
1922             })(), v194));
1923         })();
1924     }));
1925     return l111;
1926 })();
1927 var l113 = {name: "PACKAGEP"};
1928 (function(){
1929     (l113).fvalue = (function(v199){
1930         ((v199)["fname"] = "PACKAGEP");
1931         return v199;
1932     })((function (values,v198){
1933         checkArgs(arguments, 2);
1934         var i;
1935         return (function(){
1936             return (((typeof (v198) === 'object')?l4.value: l5.value) !== l5.value ? ((("symbols") in (v198))?l4.value: l5.value) : l5.value);
1937         })();
1938     }));
1939     return l113;
1940 })();
1941 var l114 = {name: "FIND-PACKAGE"};
1942 var l115 = {name: "PACKAGE-NAME"};
1943 (function(){
1944     (l114).fvalue = (function(v204){
1945         ((v204)["fname"] = "FIND-PACKAGE");
1946         return v204;
1947     })((function (values,v200){
1948         checkArgs(arguments, 2);
1949         var i;
1950         return (function(){
1951             try {
1952                 (l113.fvalue(pv, v200) !== l5.value ? (function(){
1953                     var values = mv;
1954                     throw ({type: 'block', id: 88, values: v200, message: 'Return from unknown block FIND-PACKAGE.'})
1955                 })() : l5.value);
1956                 return (function(v201){
1957                     return (function(){
1958                         try {
1959                             return (function(v202,v203){
1960                                 (function(){
1961                                     while(v202 !== l5.value){
1962                                         (v203 = (function(){
1963                                             var tmp = v202;
1964                                             return tmp === l5.value? l5.value: tmp.car;
1965                                         })());
1966                                         (function(){
1967                                             (l100.fvalue(pv, l115.fvalue(pv, v203), v201) !== l5.value ? (function(){
1968                                                 var values = mv;
1969                                                 throw ({type: 'block', id: 89, values: v203, message: 'Return from unknown block NIL.'})
1970                                             })() : l5.value);
1971                                             return l5.value;
1972                                         })();
1973                                         (v202 = (function(){
1974                                             var tmp = v202;
1975                                             return tmp === l5.value? l5.value: tmp.cdr;
1976                                         })());
1977                                     }return l5.value;
1978                                 })();
1979                                 return l5.value;
1980                             })((function(){
1981                                 var symbol = l109;
1982                                 var value = symbol.value;
1983                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
1984                                 return value;
1985                             })(),l5.value);
1986                         }
1987                         catch (cf){
1988                             if (cf.type == 'block' && cf.id == 89)
1989                                 return values.apply(this, forcemv(cf.values));
1990                             else
1991                                 throw cf;
1992                         }
1993                     })();
1994                 })(l99.fvalue(pv, v200));
1995             }
1996             catch (cf){
1997                 if (cf.type == 'block' && cf.id == 88)
1998                     return values.apply(this, forcemv(cf.values));
1999                 else
2000                     throw cf;
2001             }
2002         })();
2003     }));
2004     return l114;
2005 })();
2006 (function(){
2007     (l112).fvalue = (function(v207){
2008         ((v207)["fname"] = "FIND-PACKAGE-OR-FAIL");
2009         return v207;
2010     })((function (values,v205){
2011         checkArgs(arguments, 2);
2012         var i;
2013         return (function(){
2014             return (function(v206){
2015                 return (v206 !== l5.value ? v206 : (function(){
2016                     throw "Package unknown.";
2017                 })());
2018             })(l114.fvalue(pv, v205));
2019         })();
2020     }));
2021     return l112;
2022 })();
2023 (function(){
2024     (l115).fvalue = (function(v210){
2025         ((v210)["fname"] = "PACKAGE-NAME");
2026         return v210;
2027     })((function (values,v208){
2028         checkArgs(arguments, 2);
2029         var i;
2030         return (function(){
2031             return (function(v209){
2032                 return (function(){
2033                     var tmp = (v209)["packageName"];
2034                     return tmp == undefined? l5.value: tmp ;
2035                 })();
2036             })(l112.fvalue(pv, v208));
2037         })();
2038     }));
2039     return l115;
2040 })();
2041 var l116 = {name: "%PACKAGE-SYMBOLS"};
2042 (function(){
2043     (l116).fvalue = (function(v213){
2044         ((v213)["fname"] = "%PACKAGE-SYMBOLS");
2045         return v213;
2046     })((function (values,v211){
2047         checkArgs(arguments, 2);
2048         var i;
2049         return (function(){
2050             return (function(v212){
2051                 return (function(){
2052                     var tmp = (v212)["symbols"];
2053                     return tmp == undefined? l5.value: tmp ;
2054                 })();
2055             })(l112.fvalue(pv, v211));
2056         })();
2057     }));
2058     return l116;
2059 })();
2060 var l117 = {name: "PACKAGE-USE-LIST"};
2061 (function(){
2062     (l117).fvalue = (function(v216){
2063         ((v216)["fname"] = "PACKAGE-USE-LIST");
2064         return v216;
2065     })((function (values,v214){
2066         checkArgs(arguments, 2);
2067         var i;
2068         return (function(){
2069             return (function(v215){
2070                 return (function(){
2071                     var tmp = (v215)["use"];
2072                     return tmp == undefined? l5.value: tmp ;
2073                 })();
2074             })(l112.fvalue(pv, v214));
2075         })();
2076     }));
2077     return l117;
2078 })();
2079 var l118 = {name: "%PACKAGE-EXTERNAL-SYMBOLS"};
2080 (function(){
2081     (l118).fvalue = (function(v219){
2082         ((v219)["fname"] = "%PACKAGE-EXTERNAL-SYMBOLS");
2083         return v219;
2084     })((function (values,v217){
2085         checkArgs(arguments, 2);
2086         var i;
2087         return (function(){
2088             return (function(v218){
2089                 return (function(){
2090                     var tmp = (v218)["exports"];
2091                     return tmp == undefined? l5.value: tmp ;
2092                 })();
2093             })(l112.fvalue(pv, v217));
2094         })();
2095     }));
2096     return l118;
2097 })();
2098 var l119 = {name: "*COMMON-LISP-PACKAGE*"};
2099 (function(){
2100     (((l119.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l119).value = l111.fvalue(pv, "CL")));
2101     return l119;
2102 })();
2103 var l120 = {name: "*USER-PACKAGE*"};
2104 (function(){
2105     (((l120.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l120).value = l111.fvalue(pv, "CL-USER", l45.fvalue(pv, (function(){
2106         var symbol = l119;
2107         var value = symbol.value;
2108         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2109         return value;
2110     })()))));
2111     return l120;
2112 })();
2113 var l121 = {name: "*KEYWORD-PACKAGE*"};
2114 (function(){
2115     (((l121.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l121).value = l111.fvalue(pv, "KEYWORD")));
2116     return l121;
2117 })();
2118 var l122 = {name: "KEYWORDP"};
2119 var l123 = {name: "SYMBOL-PACKAGE"};
2120 (function(){
2121     (l122).fvalue = (function(v221){
2122         ((v221)["fname"] = "KEYWORDP");
2123         return v221;
2124     })((function (values,v220){
2125         checkArgs(arguments, 2);
2126         var i;
2127         return (function(){
2128             return (((function(){
2129                 var tmp = v220;
2130                 return (typeof tmp == 'object' && 'name' in tmp);
2131             })()?l4.value: l5.value) !== l5.value ? ((l123.fvalue(pv, v220) === (function(){
2132                 var symbol = l121;
2133                 var value = symbol.value;
2134                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2135                 return value;
2136             })())?l4.value: l5.value) : l5.value);
2137         })();
2138     }));
2139     return l122;
2140 })();
2141 var l124 = {name: "*PACKAGE*"};
2142 (function(){
2143     (((l124.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l124).value = (function(){
2144         var symbol = l119;
2145         var value = symbol.value;
2146         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2147         return value;
2148     })()));
2149     return l124;
2150 })();
2151 var l125 = {name: "IN-PACKAGE"};
2152 l125;
2153 var l126 = {name: "%INTERN-SYMBOL"};
2154 (function(){
2155     (l126).fvalue = (function(v225){
2156         ((v225)["fname"] = "%INTERN-SYMBOL");
2157         return v225;
2158     })((function (values,v222){
2159         checkArgs(arguments, 2);
2160         var i;
2161         return (function(){
2162             return (function(){
2163                 var v223 = (((("package") in (v222))?l4.value: l5.value) !== l5.value ? l112.fvalue(pv, (function(){
2164                     var tmp = (v222)["package"];
2165                     return tmp == undefined? l5.value: tmp ;
2166                 })()) : (function(){
2167                     var symbol = l119;
2168                     var value = symbol.value;
2169                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2170                     return value;
2171                 })());
2172                 var v224 = l116.fvalue(pv, v223);
2173                 ((v222)["package"] = v223);
2174                 (((v223 === (function(){
2175                     var symbol = l121;
2176                     var value = symbol.value;
2177                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2178                     return value;
2179                 })())?l4.value: l5.value) !== l5.value ? ((v222)["value"] = v222) : l5.value);
2180                 return ((v224)[(v222).name] = v222);
2181             })();
2182         })();
2183     }));
2184     return l126;
2185 })();
2186 var l127 = {name: "FIND-SYMBOL"};
2187 var l128 = {name: "EXTERNAL", 'package': 'KEYWORD'};
2188 var l129 = {name: "INTERNAL", 'package': 'KEYWORD'};
2189 var l130 = {name: "INHERIT", 'package': 'KEYWORD'};
2190 (function(){
2191     (l127).fvalue = (function(v234){
2192         ((v234)["fname"] = "FIND-SYMBOL");
2193         return v234;
2194     })((function (values,v226,v227){
2195         checkArgsAtLeast(arguments, 2);
2196         checkArgsAtMost(arguments, 3);
2197         switch(arguments.length-1){
2198         case 1:
2199         v227=(function(){
2200             var symbol = l124;
2201             var value = symbol.value;
2202             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2203             return value;
2204         })();
2205         default: break;
2206         }
2207         var i;
2208         return (function(){
2209             return (function(){
2210                 var v228 = l112.fvalue(pv, v227);
2211                 var v229 = l118.fvalue(pv, v228);
2212                 var v230 = l116.fvalue(pv, v228);
2213                 return ((((v226) in (v229))?l4.value: l5.value) !== l5.value ? values((function(){
2214                     var tmp = (v229)[v226];
2215                     return tmp == undefined? l5.value: tmp ;
2216                 })(), l128.value) : ((((v226) in (v230))?l4.value: l5.value) !== l5.value ? values((function(){
2217                     var tmp = (v230)[v226];
2218                     return tmp == undefined? l5.value: tmp ;
2219                 })(), l129.value) : (function(){
2220                     try {
2221                         return (function(v231,v232){
2222                             (function(){
2223                                 while(v231 !== l5.value){
2224                                     (v232 = (function(){
2225                                         var tmp = v231;
2226                                         return tmp === l5.value? l5.value: tmp.car;
2227                                     })());
2228                                     (function(){
2229                                         (function(v233){
2230                                             return ((((v226) in (v233))?l4.value: l5.value) !== l5.value ? (function(){
2231                                                 var values = mv;
2232                                                 throw ({type: 'block', id: 98, values: values((function(){
2233                                                     var tmp = (v233)[v226];
2234                                                     return tmp == undefined? l5.value: tmp ;
2235                                                 })(), l130.value), message: 'Return from unknown block NIL.'})
2236                                             })() : l5.value);
2237                                         })(l118.fvalue(pv, v232));
2238                                         return l5.value;
2239                                     })();
2240                                     (v231 = (function(){
2241                                         var tmp = v231;
2242                                         return tmp === l5.value? l5.value: tmp.cdr;
2243                                     })());
2244                                 }return l5.value;
2245                             })();
2246                             return values(l5.value, l5.value);
2247                         })(l117.fvalue(pv, v228),l5.value);
2248                     }
2249                     catch (cf){
2250                         if (cf.type == 'block' && cf.id == 98)
2251                             return values.apply(this, forcemv(cf.values));
2252                         else
2253                             throw cf;
2254                     }
2255                 })()));
2256             })();
2257         })();
2258     }));
2259     return l127;
2260 })();
2261 var l131 = {name: "INTERN"};
2262 var l132 = {name: "EXPORT"};
2263 (function(){
2264     (l131).fvalue = (function(v243){
2265         ((v243)["fname"] = "INTERN");
2266         return v243;
2267     })((function (values,v235,v236){
2268         checkArgsAtLeast(arguments, 2);
2269         checkArgsAtMost(arguments, 3);
2270         switch(arguments.length-1){
2271         case 1:
2272         v236=(function(){
2273             var symbol = l124;
2274             var value = symbol.value;
2275             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2276             return value;
2277         })();
2278         default: break;
2279         }
2280         var i;
2281         return (function(){
2282             return (function(v237){
2283                 return (function(){
2284                     var func = (function (values,v239,v240){
2285                         switch(arguments.length-1){
2286                         case 0:
2287                         v239=l5.value;
2288                         case 1:
2289                         v240=l5.value;
2290                         default: break;
2291                         }
2292                         var v238= l5.value;
2293                         for (var i = arguments.length-1; i>=3; i--)
2294                             v238 = {car: arguments[i], cdr:
2295                         v238};
2296                         var i;
2297                         return (v240 !== l5.value ? values(v239, v240) : (function(v241){
2298                             (function(){
2299                                 var tmp = (v241)[v235];
2300                                 return tmp == undefined? l5.value: tmp ;
2301                             })();
2302                             return (function(v242){
2303                                 ((v242)["package"] = v237);
2304                                 (((v237 === (function(){
2305                                     var symbol = l121;
2306                                     var value = symbol.value;
2307                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2308                                     return value;
2309                                 })())?l4.value: l5.value) !== l5.value ? (function(){
2310                                     ((v242)["value"] = v242);
2311                                     return l132.fvalue(pv, l45.fvalue(pv, v242), v237);
2312                                 })() : l5.value);
2313                                 ((v241)[v235] = v242);
2314                                 return values(v242, l5.value);
2315                             })((function(){
2316                                 var name = v235;
2317                                 if (typeof name != 'string')
2318                                     throw 'The value ' + name + ' is not a type string.';
2319                                 return ({name: name});
2320                             })());
2321                         })(l116.fvalue(pv, v237)));
2322                     });
2323                     var args = [values];
2324                     return (function(){
2325                         var values = mv;
2326                         var vs;
2327                         vs = l127.fvalue(values, v235, v237);
2328                         if (typeof vs === 'object' && 'multiple-value' in vs)
2329                             args = args.concat(vs);
2330                         else
2331                             args.push(vs);
2332                         return func.apply(window, args);
2333                     })();
2334                 })();
2335             })(l112.fvalue(pv, v236));
2336         })();
2337     }));
2338     return l131;
2339 })();
2340 (function(){
2341     (l123).fvalue = (function(v245){
2342         ((v245)["fname"] = "SYMBOL-PACKAGE");
2343         return v245;
2344     })((function (values,v244){
2345         checkArgs(arguments, 2);
2346         var i;
2347         return (function(){
2348             (((function(){
2349                 var tmp = v244;
2350                 return (typeof tmp == 'object' && 'name' in tmp);
2351             })()?l4.value: l5.value) !== l5.value ? l5.value : (function(){
2352                 throw "it is not a symbol";
2353             })());
2354             return (function(){
2355                 var tmp = (v244)["package"];
2356                 return tmp == undefined? l5.value: tmp ;
2357             })();
2358         })();
2359     }));
2360     return l123;
2361 })();
2362 (function(){
2363     (l132).fvalue = (function(v251){
2364         ((v251)["fname"] = "EXPORT");
2365         return v251;
2366     })((function (values,v246,v247){
2367         checkArgsAtLeast(arguments, 2);
2368         checkArgsAtMost(arguments, 3);
2369         switch(arguments.length-1){
2370         case 1:
2371         v247=(function(){
2372             var symbol = l124;
2373             var value = symbol.value;
2374             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2375             return value;
2376         })();
2377         default: break;
2378         }
2379         var i;
2380         return (function(){
2381             return (function(v248){
2382                 return (function(){
2383                     return (function(v249,v250){
2384                         (function(){
2385                             while(v249 !== l5.value){
2386                                 (v250 = (function(){
2387                                     var tmp = v249;
2388                                     return tmp === l5.value? l5.value: tmp.car;
2389                                 })());
2390                                 (function(){
2391                                     ((v248)[(v250).name] = v250);
2392                                     return l5.value;
2393                                 })();
2394                                 (v249 = (function(){
2395                                     var tmp = v249;
2396                                     return tmp === l5.value? l5.value: tmp.cdr;
2397                                 })());
2398                             }return l5.value;
2399                         })();
2400                         return l4.value;
2401                     })(v246,l5.value);
2402                 })();
2403             })(l118.fvalue(pv, v247));
2404         })();
2405     }));
2406     return l132;
2407 })();
2408 var l133 = {name: "GET-UNIVERSAL-TIME"};
2409 (function(){
2410     (l133).fvalue = (function(v252){
2411         ((v252)["fname"] = "GET-UNIVERSAL-TIME");
2412         return v252;
2413     })((function (values){
2414         checkArgsAtMost(arguments, 1);
2415         var i;
2416         return (function(){
2417             return (function(){
2418                 var x1 = (Math.round(new Date() / 1000));
2419                 if (typeof x1 !== 'number') throw 'Not a number!';
2420                 var x2 = 2208988800;
2421                 if (typeof x2 !== 'number') throw 'Not a number!';
2422                 return x1+x2;
2423             })();
2424         })();
2425     }));
2426     return l133;
2427 })();
2428 var l134 = {name: "*NEWLINE*"};
2429 (function(){
2430     (((l134.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l134).value = l99.fvalue(pv, l79.fvalue(pv, 10))));
2431     return l134;
2432 })();
2433 var l135 = {name: "CONCAT"};
2434 (function(){
2435     (l135).fvalue = (function(v254){
2436         ((v254)["fname"] = "CONCAT");
2437         return v254;
2438     })((function (values){
2439         var v253= l5.value;
2440         for (var i = arguments.length-1; i>=1; i--)
2441             v253 = {car: arguments[i], cdr:
2442         v253};
2443         var i;
2444         return (function(){
2445             return l61.fvalue(values, (function(){
2446                 var symbol = l73;
2447                 var func = symbol.fvalue;
2448                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2449                 return func;
2450             })(), v253, "");
2451         })();
2452     }));
2453     return l135;
2454 })();
2455 var l136 = {name: "CONCATF"};
2456 l136;
2457 var l137 = {name: "JOIN"};
2458 (function(){
2459     (l137).fvalue = (function(v257){
2460         ((v257)["fname"] = "JOIN");
2461         return v257;
2462     })((function (values,v255,v256){
2463         checkArgsAtLeast(arguments, 2);
2464         checkArgsAtMost(arguments, 3);
2465         switch(arguments.length-1){
2466         case 1:
2467         v256="";
2468         default: break;
2469         }
2470         var i;
2471         return (function(){
2472             return (l13.fvalue(pv, v255) !== l5.value ? "" : (l13.fvalue(pv, (function(){
2473                 var tmp = v255;
2474                 return tmp === l5.value? l5.value: tmp.cdr;
2475             })()) !== l5.value ? (function(){
2476                 var tmp = v255;
2477                 return tmp === l5.value? l5.value: tmp.car;
2478             })() : l135.fvalue(values, (function(){
2479                 var tmp = v255;
2480                 return tmp === l5.value? l5.value: tmp.car;
2481             })(), v256, l137.fvalue(pv, (function(){
2482                 var tmp = v255;
2483                 return tmp === l5.value? l5.value: tmp.cdr;
2484             })(), v256))));
2485         })();
2486     }));
2487     return l137;
2488 })();
2489 var l138 = {name: "JOIN-TRAILING"};
2490 (function(){
2491     (l138).fvalue = (function(v260){
2492         ((v260)["fname"] = "JOIN-TRAILING");
2493         return v260;
2494     })((function (values,v258,v259){
2495         checkArgsAtLeast(arguments, 2);
2496         checkArgsAtMost(arguments, 3);
2497         switch(arguments.length-1){
2498         case 1:
2499         v259="";
2500         default: break;
2501         }
2502         var i;
2503         return (function(){
2504             return (l13.fvalue(pv, v258) !== l5.value ? "" : l135.fvalue(values, (function(){
2505                 var tmp = v258;
2506                 return tmp === l5.value? l5.value: tmp.car;
2507             })(), v259, l138.fvalue(pv, (function(){
2508                 var tmp = v258;
2509                 return tmp === l5.value? l5.value: tmp.cdr;
2510             })(), v259)));
2511         })();
2512     }));
2513     return l138;
2514 })();
2515 var l139 = {name: "MAPCONCAT"};
2516 (function(){
2517     (l139).fvalue = (function(v263){
2518         ((v263)["fname"] = "MAPCONCAT");
2519         return v263;
2520     })((function (values,v261,v262){
2521         checkArgs(arguments, 3);
2522         var i;
2523         return (function(){
2524             return l137.fvalue(values, l74.fvalue(pv, v261, v262));
2525         })();
2526     }));
2527     return l139;
2528 })();
2529 var l140 = {name: "VECTOR-TO-LIST"};
2530 (function(){
2531     (l140).fvalue = (function(v269){
2532         ((v269)["fname"] = "VECTOR-TO-LIST");
2533         return v269;
2534     })((function (values,v264){
2535         checkArgs(arguments, 2);
2536         var i;
2537         return (function(){
2538             return (function(v265,v266){
2539                 return (function(){
2540                     return (function(v267,v268){
2541                         (function(){
2542                             while((function(){
2543                                 var x1 = v267;
2544                                 if (typeof x1 !== 'number') throw 'Not a number!';
2545                                 var x2 = v268;
2546                                 if (typeof x2 !== 'number') throw 'Not a number!';
2547                                 return (x1<x2?l4.value: l5.value);
2548                             })() !== l5.value){
2549                                 (function(){
2550                                     (v265 = ({car: (function(){
2551                                         var x = (v264)[v267];
2552                                         if (x === undefined) throw 'Out of range';
2553                                         return x;
2554                                     })(), cdr: v265}));
2555                                     return l5.value;
2556                                 })();
2557                                 (v267 = (function(){
2558                                     var x1 = v267;
2559                                     if (typeof x1 !== 'number') throw 'Not a number!';
2560                                     var x2 = 1;
2561                                     if (typeof x2 !== 'number') throw 'Not a number!';
2562                                     return x1+x2;
2563                                 })());
2564                             }return l5.value;
2565                         })();
2566                         return l67.fvalue(values, v265);
2567                     })(0,v266);
2568                 })();
2569             })(l5.value,l72.fvalue(pv, v264));
2570         })();
2571     }));
2572     return l140;
2573 })();
2574 var l141 = {name: "LIST-TO-VECTOR"};
2575 (function(){
2576     (l141).fvalue = (function(v275){
2577         ((v275)["fname"] = "LIST-TO-VECTOR");
2578         return v275;
2579     })((function (values,v270){
2580         checkArgs(arguments, 2);
2581         var i;
2582         return (function(){
2583             return (function(v271,v272){
2584                 return (function(){
2585                     return (function(v273,v274){
2586                         (function(){
2587                             while(v273 !== l5.value){
2588                                 (v274 = (function(){
2589                                     var tmp = v273;
2590                                     return tmp === l5.value? l5.value: tmp.car;
2591                                 })());
2592                                 (function(){
2593                                     (function(){
2594                                         var x = v271;
2595                                         var i = v272;
2596                                         if (i < 0 || i >= x.length) throw 'Out of range';
2597                                         return x[i] = v274;
2598                                     })();
2599                                     (v272 = (function(){
2600                                         var x1 = v272;
2601                                         if (typeof x1 !== 'number') throw 'Not a number!';
2602                                         var x2 = 1;
2603                                         if (typeof x2 !== 'number') throw 'Not a number!';
2604                                         return x1+x2;
2605                                     })());
2606                                     return l5.value;
2607                                 })();
2608                                 (v273 = (function(){
2609                                     var tmp = v273;
2610                                     return tmp === l5.value? l5.value: tmp.cdr;
2611                                 })());
2612                             }return l5.value;
2613                         })();
2614                         return v271;
2615                     })(v270,l5.value);
2616                 })();
2617             })((function(){
2618                 var r = [];
2619                 for (var i = 0; i < l72.fvalue(pv, v270); i++)
2620                     r.push(l5.value);
2621                 return r;
2622             })(),0);
2623         })();
2624     }));
2625     return l141;
2626 })();
2627 var l142 = {name: "VALUES-LIST"};
2628 (function(){
2629     (l142).fvalue = (function(v277){
2630         ((v277)["fname"] = "VALUES-LIST");
2631         return v277;
2632     })((function (values,v276){
2633         checkArgs(arguments, 2);
2634         var i;
2635         return (function(){
2636             return values.apply(this, l141.fvalue(pv, v276));
2637         })();
2638     }));
2639     return l142;
2640 })();
2641 var l143 = {name: "VALUES"};
2642 (function(){
2643     (l143).fvalue = (function(v279){
2644         ((v279)["fname"] = "VALUES");
2645         return v279;
2646     })((function (values){
2647         var v278= l5.value;
2648         for (var i = arguments.length-1; i>=1; i--)
2649             v278 = {car: arguments[i], cdr:
2650         v278};
2651         var i;
2652         return (function(){
2653             return l142.fvalue(values, v278);
2654         })();
2655     }));
2656     return l143;
2657 })();
2658 (function(){
2659     (l18).fvalue = (function(v283){
2660         ((v283)["fname"] = "INTEGER-TO-STRING");
2661         return v283;
2662     })((function (values,v280){
2663         checkArgs(arguments, 2);
2664         var i;
2665         return (function(){
2666             return (l25.fvalue(pv, v280) !== l5.value ? "0" : (l84.fvalue(pv, v280) !== l5.value ? l135.fvalue(values, "-", l18.fvalue(pv, (function(){
2667                 var x1 = 0;
2668                 if (typeof x1 !== 'number') throw 'Not a number!';
2669                 var x2 = v280;
2670                 if (typeof x2 !== 'number') throw 'Not a number!';
2671                 return x1-x2;
2672             })())) : (function(v281){
2673                 (function(){
2674                     return (function(){
2675                         while(l28.fvalue(pv, l25.fvalue(pv, v280)) !== l5.value){
2676                             (v281 = ({car: (function(){
2677                                 var x = v280;
2678                                 var y = 10;
2679                                 if (typeof x != 'number')
2680                                     throw 'The value ' + x + ' is not a type number.';
2681                                 if (typeof y != 'number')
2682                                     throw 'The value ' + y + ' is not a type number.';
2683                                 return x%y;
2684                             })(), cdr: v281}));
2685                             (v280 = l26.fvalue(pv, v280, 10));
2686                         }return l5.value;
2687                     })();
2688                 })();
2689                 return l139.fvalue(values, (function (values,v282){
2690                     checkArgs(arguments, 2);
2691                     var i;
2692                     return l99.fvalue(values, l94.fvalue(pv, v282));
2693                 }), v281);
2694             })(l5.value)));
2695         })();
2696     }));
2697     return l18;
2698 })();
2699 var l144 = {name: "PRIN1-TO-STRING"};
2700 var l145 = {name: "ESCAPE-STRING"};
2701 (function(){
2702     (l144).fvalue = (function(v292){
2703         ((v292)["fname"] = "PRIN1-TO-STRING");
2704         return v292;
2705     })((function (values,v284){
2706         checkArgs(arguments, 2);
2707         var i;
2708         return (function(){
2709             return (((function(){
2710                 var tmp = v284;
2711                 return (typeof tmp == 'object' && 'name' in tmp);
2712             })()?l4.value: l5.value) !== l5.value ? (function(){
2713                 var func = (function (values,v286,v287){
2714                     switch(arguments.length-1){
2715                     case 0:
2716                     v286=l5.value;
2717                     case 1:
2718                     v287=l5.value;
2719                     default: break;
2720                     }
2721                     var v285= l5.value;
2722                     for (var i = arguments.length-1; i>=3; i--)
2723                         v285 = {car: arguments[i], cdr:
2724                     v285};
2725                     var i;
2726                     return ((v287 !== l5.value ? ((v286 === v284)?l4.value: l5.value) : l5.value) !== l5.value ? (v284).name : (function(v288,v289){
2727                         return l135.fvalue(values, (l13.fvalue(pv, v288) !== l5.value ? "#" : (((v288 === l114.fvalue(pv, "KEYWORD"))?l4.value: l5.value) !== l5.value ? "" : l115.fvalue(pv, v288))), ":", v289);
2728                     })(l123.fvalue(pv, v284),(v284).name));
2729                 });
2730                 var args = [values];
2731                 return (function(){
2732                     var values = mv;
2733                     var vs;
2734                     vs = l127.fvalue(values, (v284).name, (function(){
2735                         var symbol = l124;
2736                         var value = symbol.value;
2737                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2738                         return value;
2739                     })());
2740                     if (typeof vs === 'object' && 'multiple-value' in vs)
2741                         args = args.concat(vs);
2742                     else
2743                         args.push(vs);
2744                     return func.apply(window, args);
2745                 })();
2746             })() : (l82.fvalue(pv, v284) !== l5.value ? l18.fvalue(values, v284) : (((typeof(v284) == "string")?l4.value: l5.value) !== l5.value ? l135.fvalue(values, "\"", l145.fvalue(pv, v284), "\"") : (((typeof v284 == 'function')?l4.value: l5.value) !== l5.value ? (function(v290){
2747                 return (v290 !== l5.value ? l135.fvalue(values, "#<FUNCTION ", v290, ">") : l135.fvalue(values, "#<FUNCTION>"));
2748             })((function(){
2749                 var tmp = (v284)["fname"];
2750                 return tmp == undefined? l5.value: tmp ;
2751             })()) : (l60.fvalue(pv, v284) !== l5.value ? l135.fvalue(values, "(", l138.fvalue(pv, l74.fvalue(pv, (function(){
2752                 var symbol = l144;
2753                 var func = symbol.fvalue;
2754                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
2755                 return func;
2756             })(), l88.fvalue(pv, v284)), " "), (function(v291){
2757                 return (l13.fvalue(pv, (function(){
2758                     var tmp = v291;
2759                     return tmp === l5.value? l5.value: tmp.cdr;
2760                 })()) !== l5.value ? l144.fvalue(pv, (function(){
2761                     var tmp = v291;
2762                     return tmp === l5.value? l5.value: tmp.car;
2763                 })()) : l135.fvalue(pv, l144.fvalue(pv, (function(){
2764                     var tmp = v291;
2765                     return tmp === l5.value? l5.value: tmp.car;
2766                 })()), " . ", l144.fvalue(pv, (function(){
2767                     var tmp = v291;
2768                     return tmp === l5.value? l5.value: tmp.cdr;
2769                 })())));
2770             })(l87.fvalue(pv, v284)), ")") : (((function(){
2771                 var x = v284;
2772                 return typeof x === 'object' && 'length' in x;
2773             })()?l4.value: l5.value) !== l5.value ? l135.fvalue(values, "#", l144.fvalue(pv, l140.fvalue(pv, v284))) : (l113.fvalue(pv, v284) !== l5.value ? l135.fvalue(values, "#<PACKAGE ", l115.fvalue(pv, v284), ">") : l5.value)))))));
2774         })();
2775     }));
2776     return l144;
2777 })();
2778 (function(){
2779     (l103).fvalue = (function(v294){
2780         ((v294)["fname"] = "WRITE-LINE");
2781         return v294;
2782     })((function (values,v293){
2783         checkArgs(arguments, 2);
2784         var i;
2785         return (function(){
2786             (function(){
2787                 var x = v293;
2788                 if (typeof x != 'string')
2789                     throw 'The value ' + x + ' is not a type string.';
2790                 return lisp.write(x);
2791             })();
2792             (function(){
2793                 var x = (function(){
2794                     var symbol = l134;
2795                     var value = symbol.value;
2796                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
2797                     return value;
2798                 })();
2799                 if (typeof x != 'string')
2800                     throw 'The value ' + x + ' is not a type string.';
2801                 return lisp.write(x);
2802             })();
2803             return v293;
2804         })();
2805     }));
2806     return l103;
2807 })();
2808 var l146 = {name: "WARN"};
2809 (function(){
2810     (l146).fvalue = (function(v296){
2811         ((v296)["fname"] = "WARN");
2812         return v296;
2813     })((function (values,v295){
2814         checkArgs(arguments, 2);
2815         var i;
2816         return (function(){
2817             (function(){
2818                 var x = "WARNING: ";
2819                 if (typeof x != 'string')
2820                     throw 'The value ' + x + ' is not a type string.';
2821                 return lisp.write(x);
2822             })();
2823             return l103.fvalue(values, v295);
2824         })();
2825     }));
2826     return l146;
2827 })();
2828 var l147 = {name: "PRINT"};
2829 (function(){
2830     (l147).fvalue = (function(v298){
2831         ((v298)["fname"] = "PRINT");
2832         return v298;
2833     })((function (values,v297){
2834         checkArgs(arguments, 2);
2835         var i;
2836         return (function(){
2837             l103.fvalue(pv, l144.fvalue(pv, v297));
2838             return v297;
2839         })();
2840     }));
2841     return l147;
2842 })();
2843 var l148 = {name: "MAKE-STRING-STREAM"};
2844 (function(){
2845     (l148).fvalue = (function(v300){
2846         ((v300)["fname"] = "MAKE-STRING-STREAM");
2847         return v300;
2848     })((function (values,v299){
2849         checkArgs(arguments, 2);
2850         var i;
2851         return (function(){
2852             return ({car: v299, cdr: 0});
2853         })();
2854     }));
2855     return l148;
2856 })();
2857 var l149 = {name: "%PEEK-CHAR"};
2858 (function(){
2859     (l149).fvalue = (function(v302){
2860         ((v302)["fname"] = "%PEEK-CHAR");
2861         return v302;
2862     })((function (values,v301){
2863         checkArgs(arguments, 2);
2864         var i;
2865         return (function(){
2866             return ((function(){
2867                 var x1 = (function(){
2868                     var tmp = v301;
2869                     return tmp === l5.value? l5.value: tmp.cdr;
2870                 })();
2871                 if (typeof x1 !== 'number') throw 'Not a number!';
2872                 var x2 = l72.fvalue(pv, (function(){
2873                     var tmp = v301;
2874                     return tmp === l5.value? l5.value: tmp.car;
2875                 })());
2876                 if (typeof x2 !== 'number') throw 'Not a number!';
2877                 return (x1<x2?l4.value: l5.value);
2878             })() !== l5.value ? (function(){
2879                 var string = (function(){
2880                     var tmp = v301;
2881                     return tmp === l5.value? l5.value: tmp.car;
2882                 })();
2883                 var index = (function(){
2884                     var tmp = v301;
2885                     return tmp === l5.value? l5.value: tmp.cdr;
2886                 })();
2887                 if (typeof string != 'string')
2888                     throw 'The value ' + string + ' is not a type string.';
2889                 if (typeof index != 'number')
2890                     throw 'The value ' + index + ' is not a type number.';
2891                 return string.charCodeAt(index);
2892             })() : l5.value);
2893         })();
2894     }));
2895     return l149;
2896 })();
2897 var l150 = {name: "%READ-CHAR"};
2898 (function(){
2899     (l150).fvalue = (function(v305){
2900         ((v305)["fname"] = "%READ-CHAR");
2901         return v305;
2902     })((function (values,v303){
2903         checkArgs(arguments, 2);
2904         var i;
2905         return (function(){
2906             return ((function(){
2907                 var x1 = (function(){
2908                     var tmp = v303;
2909                     return tmp === l5.value? l5.value: tmp.cdr;
2910                 })();
2911                 if (typeof x1 !== 'number') throw 'Not a number!';
2912                 var x2 = l72.fvalue(pv, (function(){
2913                     var tmp = v303;
2914                     return tmp === l5.value? l5.value: tmp.car;
2915                 })());
2916                 if (typeof x2 !== 'number') throw 'Not a number!';
2917                 return (x1<x2?l4.value: l5.value);
2918             })() !== l5.value ? (function(v304){
2919                 (function(){
2920                     var x = v303;
2921                     if (typeof x != 'object')
2922                         throw 'The value ' + x + ' is not a type object.';
2923                     return (x.cdr = l23.fvalue(pv, (function(){
2924                         var tmp = v303;
2925                         return tmp === l5.value? l5.value: tmp.cdr;
2926                     })()), x);
2927                 })();
2928                 return v304;
2929             })((function(){
2930                 var string = (function(){
2931                     var tmp = v303;
2932                     return tmp === l5.value? l5.value: tmp.car;
2933                 })();
2934                 var index = (function(){
2935                     var tmp = v303;
2936                     return tmp === l5.value? l5.value: tmp.cdr;
2937                 })();
2938                 if (typeof string != 'string')
2939                     throw 'The value ' + string + ' is not a type string.';
2940                 if (typeof index != 'number')
2941                     throw 'The value ' + index + ' is not a type number.';
2942                 return string.charCodeAt(index);
2943             })()) : l5.value);
2944         })();
2945     }));
2946     return l150;
2947 })();
2948 var l151 = {name: "WHITESPACEP"};
2949 (function(){
2950     (l151).fvalue = (function(v309){
2951         ((v309)["fname"] = "WHITESPACEP");
2952         return v309;
2953     })((function (values,v306){
2954         checkArgs(arguments, 2);
2955         var i;
2956         return (function(){
2957             return (function(v307){
2958                 return (v307 !== l5.value ? v307 : (function(v308){
2959                     return (v308 !== l5.value ? v308 : l81.fvalue(values, v306, 9));
2960                 })(l81.fvalue(pv, v306, 10)));
2961             })(l81.fvalue(pv, v306, 32));
2962         })();
2963     }));
2964     return l151;
2965 })();
2966 var l152 = {name: "SKIP-WHITESPACES"};
2967 (function(){
2968     (l152).fvalue = (function(v312){
2969         ((v312)["fname"] = "SKIP-WHITESPACES");
2970         return v312;
2971     })((function (values,v310){
2972         checkArgs(arguments, 2);
2973         var i;
2974         return (function(){
2975             return (function(v311){
2976                 (v311 = l149.fvalue(pv, v310));
2977                 return (function(){
2978                     return (function(){
2979                         while((v311 !== l5.value ? l151.fvalue(pv, v311) : l5.value) !== l5.value){
2980                             l150.fvalue(pv, v310);
2981                             (v311 = l149.fvalue(pv, v310));
2982                         }return l5.value;
2983                     })();
2984                 })();
2985             })(l5.value);
2986         })();
2987     }));
2988     return l152;
2989 })();
2990 var l153 = {name: "TERMINALP"};
2991 (function(){
2992     (l153).fvalue = (function(v317){
2993         ((v317)["fname"] = "TERMINALP");
2994         return v317;
2995     })((function (values,v313){
2996         checkArgs(arguments, 2);
2997         var i;
2998         return (function(){
2999             return (function(v314){
3000                 return (v314 !== l5.value ? v314 : (function(v315){
3001                     return (v315 !== l5.value ? v315 : (function(v316){
3002                         return (v316 !== l5.value ? v316 : l81.fvalue(values, 40, v313));
3003                     })(l81.fvalue(pv, 41, v313)));
3004                 })(l151.fvalue(pv, v313)));
3005             })(l13.fvalue(pv, v313));
3006         })();
3007     }));
3008     return l153;
3009 })();
3010 var l154 = {name: "READ-UNTIL"};
3011 (function(){
3012     (l154).fvalue = (function(v322){
3013         ((v322)["fname"] = "READ-UNTIL");
3014         return v322;
3015     })((function (values,v318,v319){
3016         checkArgs(arguments, 3);
3017         var i;
3018         return (function(){
3019             return (function(v320,v321){
3020                 (v321 = l149.fvalue(pv, v318));
3021                 (function(){
3022                     return (function(){
3023                         while((v321 !== l5.value ? l28.fvalue(pv, (v319)(pv, v321)) : l5.value) !== l5.value){
3024                             (v320 = l135.fvalue(pv, v320, l99.fvalue(pv, v321)));
3025                             l150.fvalue(pv, v318);
3026                             (v321 = l149.fvalue(pv, v318));
3027                         }return l5.value;
3028                     })();
3029                 })();
3030                 return v320;
3031             })("",l5.value);
3032         })();
3033     }));
3034     return l154;
3035 })();
3036 var l155 = {name: "SKIP-WHITESPACES-AND-COMMENTS"};
3037 (function(){
3038     (l155).fvalue = (function(v326){
3039         ((v326)["fname"] = "SKIP-WHITESPACES-AND-COMMENTS");
3040         return v326;
3041     })((function (values,v323){
3042         checkArgs(arguments, 2);
3043         var i;
3044         return (function(){
3045             return (function(v324){
3046                 l152.fvalue(pv, v323);
3047                 (v324 = l149.fvalue(pv, v323));
3048                 return (function(){
3049                     return (function(){
3050                         while((v324 !== l5.value ? l81.fvalue(pv, v324, 59) : l5.value) !== l5.value){
3051                             l154.fvalue(pv, v323, (function (values,v325){
3052                                 checkArgs(arguments, 2);
3053                                 var i;
3054                                 return l81.fvalue(values, v325, 10);
3055                             }));
3056                             l152.fvalue(pv, v323);
3057                             (v324 = l149.fvalue(pv, v323));
3058                         }return l5.value;
3059                     })();
3060                 })();
3061             })(l5.value);
3062         })();
3063     }));
3064     return l155;
3065 })();
3066 var l156 = {name: "%READ-LIST"};
3067 var l157 = {name: "LS-READ"};
3068 (function(){
3069     (l156).fvalue = (function(v330){
3070         ((v330)["fname"] = "%READ-LIST");
3071         return v330;
3072     })((function (values,v327){
3073         checkArgs(arguments, 2);
3074         var i;
3075         return (function(){
3076             l155.fvalue(pv, v327);
3077             return (function(v328){
3078                 return (l13.fvalue(pv, v328) !== l5.value ? (function(){
3079                     throw "Unspected EOF";
3080                 })() : (l81.fvalue(pv, v328, 41) !== l5.value ? (function(){
3081                     l150.fvalue(pv, v327);
3082                     return l5.value;
3083                 })() : (l81.fvalue(pv, v328, 46) !== l5.value ? (function(){
3084                     l150.fvalue(pv, v327);
3085                     return (function(v329){
3086                         l155.fvalue(pv, v327);
3087                         (l81.fvalue(pv, l150.fvalue(pv, v327), 41) !== l5.value ? l5.value : (function(){
3088                             throw "')' was expected.";
3089                         })());
3090                         return v329;
3091                     })(l157.fvalue(pv, v327));
3092                 })() : ({car: l157.fvalue(pv, v327), cdr: l156.fvalue(pv, v327)}))));
3093             })(l149.fvalue(pv, v327));
3094         })();
3095     }));
3096     return l156;
3097 })();
3098 var l158 = {name: "READ-STRING"};
3099 (function(){
3100     (l158).fvalue = (function(v334){
3101         ((v334)["fname"] = "READ-STRING");
3102         return v334;
3103     })((function (values,v331){
3104         checkArgs(arguments, 2);
3105         var i;
3106         return (function(){
3107             return (function(v332,v333){
3108                 (v333 = l150.fvalue(pv, v331));
3109                 (function(){
3110                     return (function(){
3111                         while(l28.fvalue(pv, l27.fvalue(pv, v333, 34)) !== l5.value){
3112                             (l13.fvalue(pv, v333) !== l5.value ? (function(){
3113                                 throw "Unexpected EOF";
3114                             })() : l5.value);
3115                             (l27.fvalue(pv, v333, 92) !== l5.value ? (v333 = l150.fvalue(pv, v331)) : l5.value);
3116                             (v332 = l135.fvalue(pv, v332, l99.fvalue(pv, v333)));
3117                             (v333 = l150.fvalue(pv, v331));
3118                         }return l5.value;
3119                     })();
3120                 })();
3121                 return v332;
3122             })("",l5.value);
3123         })();
3124     }));
3125     return l158;
3126 })();
3127 var l159 = {name: "READ-SHARP"};
3128 (function(){
3129     (l159).fvalue = (function(v339){
3130         ((v339)["fname"] = "READ-SHARP");
3131         return v339;
3132     })((function (values,v335){
3133         checkArgs(arguments, 2);
3134         var i;
3135         return (function(){
3136             l150.fvalue(pv, v335);
3137             return (function(v336){
3138                 return (l27.fvalue(pv, v336, 39) !== l5.value ? l45.fvalue(values, l105, l157.fvalue(pv, v335)) : (l27.fvalue(pv, v336, 40) !== l5.value ? l141.fvalue(values, l156.fvalue(pv, v335)) : (l27.fvalue(pv, v336, 58) !== l5.value ? (function(){
3139                     var name = (function(){
3140                         var x = l154.fvalue(pv, v335, (function(){
3141                             var symbol = l153;
3142                             var func = symbol.fvalue;
3143                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3144                             return func;
3145                         })());
3146                         if (typeof x != 'string')
3147                             throw 'The value ' + x + ' is not a type string.';
3148                         return x.toUpperCase();
3149                     })();
3150                     if (typeof name != 'string')
3151                         throw 'The value ' + name + ' is not a type string.';
3152                     return ({name: name});
3153                 })() : (l27.fvalue(pv, v336, 92) !== l5.value ? (function(v337){
3154                     return (l100.fvalue(pv, v337, "space") !== l5.value ? l80.fvalue(values, 32) : (l100.fvalue(pv, v337, "tab") !== l5.value ? l80.fvalue(values, 9) : (l100.fvalue(pv, v337, "newline") !== l5.value ? l80.fvalue(values, 10) : l80.fvalue(values, (function(){
3155                         var string = v337;
3156                         var index = 0;
3157                         if (typeof string != 'string')
3158                             throw 'The value ' + string + ' is not a type string.';
3159                         if (typeof index != 'number')
3160                             throw 'The value ' + index + ' is not a type number.';
3161                         return string.charCodeAt(index);
3162                     })()))));
3163                 })(l135.fvalue(pv, l99.fvalue(pv, l150.fvalue(pv, v335)), l154.fvalue(pv, v335, (function(){
3164                     var symbol = l153;
3165                     var func = symbol.fvalue;
3166                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3167                     return func;
3168                 })()))) : (l27.fvalue(pv, v336, 43) !== l5.value ? (function(v338){
3169                     return (l100.fvalue(pv, v338, "common-lisp") !== l5.value ? (function(){
3170                         l157.fvalue(pv, v335);
3171                         return l157.fvalue(values, v335);
3172                     })() : (l100.fvalue(pv, v338, "ecmalisp") !== l5.value ? l157.fvalue(values, v335) : (function(){
3173                         throw "Unknown reader form.";
3174                     })()));
3175                 })(l154.fvalue(pv, v335, (function(){
3176                     var symbol = l153;
3177                     var func = symbol.fvalue;
3178                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3179                     return func;
3180                 })())) : (function(){
3181                     throw "ECASE expression failed.";
3182                 })())))));
3183             })(l150.fvalue(pv, v335));
3184         })();
3185     }));
3186     return l159;
3187 })();
3188 var l160 = {name: "READ-SYMBOL"};
3189 (function(){
3190     (l160).fvalue = (function(v347){
3191         ((v347)["fname"] = "READ-SYMBOL");
3192         return v347;
3193     })((function (values,v340){
3194         checkArgs(arguments, 2);
3195         var i;
3196         return (function(){
3197             return (function(v341,v342,v343,v344,v345){
3198                 (v345 = 0);
3199                 (function(){
3200                     return (function(){
3201                         while(((function(){
3202                             var x1 = v345;
3203                             if (typeof x1 !== 'number') throw 'Not a number!';
3204                             var x2 = v341;
3205                             if (typeof x2 !== 'number') throw 'Not a number!';
3206                             return (x1<x2?l4.value: l5.value);
3207                         })() !== l5.value ? l28.fvalue(pv, l81.fvalue(pv, (function(){
3208                             var string = v340;
3209                             var index = v345;
3210                             if (typeof string != 'string')
3211                                 throw 'The value ' + string + ' is not a type string.';
3212                             if (typeof index != 'number')
3213                                 throw 'The value ' + index + ' is not a type number.';
3214                             return string.charCodeAt(index);
3215                         })(), 58)) : l5.value) !== l5.value){
3216                             (v345 = (function(){
3217                                 var x1 = v345;
3218                                 if (typeof x1 !== 'number') throw 'Not a number!';
3219                                 var x2 = 1;
3220                                 if (typeof x2 !== 'number') throw 'Not a number!';
3221                                 return x1+x2;
3222                             })());
3223                         }return l5.value;
3224                     })();
3225                 })();
3226                 ((function(){
3227                     var x1 = v345;
3228                     if (typeof x1 !== 'number') throw 'Not a number!';
3229                     var x2 = v341;
3230                     if (typeof x2 !== 'number') throw 'Not a number!';
3231                     return (x1==x2?l4.value: l5.value);
3232                 })() !== l5.value ? (function(){
3233                     (v343 = v340);
3234                     (v342 = (function(){
3235                         var symbol = l124;
3236                         var value = symbol.value;
3237                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3238                         return value;
3239                     })());
3240                     return (v344 = l4.value);
3241                 })() : (function(){
3242                     (l25.fvalue(pv, v345) !== l5.value ? (v342 = "KEYWORD") : (v342 = (function(){
3243                         var x = l95.fvalue(pv, v340, 0, v345);
3244                         if (typeof x != 'string')
3245                             throw 'The value ' + x + ' is not a type string.';
3246                         return x.toUpperCase();
3247                     })()));
3248                     (v345 = (function(){
3249                         var x1 = v345;
3250                         if (typeof x1 !== 'number') throw 'Not a number!';
3251                         var x2 = 1;
3252                         if (typeof x2 !== 'number') throw 'Not a number!';
3253                         return x1+x2;
3254                     })());
3255                     (l81.fvalue(pv, (function(){
3256                         var string = v340;
3257                         var index = v345;
3258                         if (typeof string != 'string')
3259                             throw 'The value ' + string + ' is not a type string.';
3260                         if (typeof index != 'number')
3261                             throw 'The value ' + index + ' is not a type number.';
3262                         return string.charCodeAt(index);
3263                     })(), 58) !== l5.value ? (function(){
3264                         (v344 = l4.value);
3265                         return (v345 = (function(){
3266                             var x1 = v345;
3267                             if (typeof x1 !== 'number') throw 'Not a number!';
3268                             var x2 = 1;
3269                             if (typeof x2 !== 'number') throw 'Not a number!';
3270                             return x1+x2;
3271                         })());
3272                     })() : l5.value);
3273                     return (v343 = l95.fvalue(pv, v340, v345));
3274                 })());
3275                 (v343 = (function(){
3276                     var x = v343;
3277                     if (typeof x != 'string')
3278                         throw 'The value ' + x + ' is not a type string.';
3279                     return x.toUpperCase();
3280                 })());
3281                 (v342 = l114.fvalue(pv, v342));
3282                 return ((function(v346){
3283                     return (v346 !== l5.value ? v346 : ((v342 === l114.fvalue(pv, "KEYWORD"))?l4.value: l5.value));
3284                 })(v344) !== l5.value ? l131.fvalue(values, v343, v342) : l127.fvalue(values, v343, v342));
3285             })(l72.fvalue(pv, v340),l5.value,l5.value,l5.value,l5.value);
3286         })();
3287     }));
3288     return l160;
3289 })();
3290 var l161 = {name: "!PARSE-INTEGER"};
3291 (function(){
3292     (l161).fvalue = (function(v358){
3293         ((v358)["fname"] = "!PARSE-INTEGER");
3294         return v358;
3295     })((function (values,v348,v349){
3296         checkArgs(arguments, 3);
3297         var i;
3298         return (function(){
3299             return (function(){
3300                 try {
3301                     return (function(v350,v351,v352,v353){
3302                         (l25.fvalue(pv, v352) !== l5.value ? (function(){
3303                             var values = mv;
3304                             throw ({type: 'block', id: 138, values: values(l5.value, 0), message: 'Return from unknown block NIL.'})
3305                         })() : l5.value);
3306                         (function(v354){
3307                             return (l27.fvalue(pv, v354, 43) !== l5.value ? (v351 = (function(){
3308                                 var x1 = v351;
3309                                 if (typeof x1 !== 'number') throw 'Not a number!';
3310                                 var x2 = 1;
3311                                 if (typeof x2 !== 'number') throw 'Not a number!';
3312                                 return x1+x2;
3313                             })()) : (l27.fvalue(pv, v354, 45) !== l5.value ? (function(){
3314                                 (v353 = -1);
3315                                 return (v351 = (function(){
3316                                     var x1 = v351;
3317                                     if (typeof x1 !== 'number') throw 'Not a number!';
3318                                     var x2 = 1;
3319                                     if (typeof x2 !== 'number') throw 'Not a number!';
3320                                     return x1+x2;
3321                                 })());
3322                             })() : l5.value));
3323                         })((function(){
3324                             var string = v348;
3325                             var index = 0;
3326                             if (typeof string != 'string')
3327                                 throw 'The value ' + string + ' is not a type string.';
3328                             if (typeof index != 'number')
3329                                 throw 'The value ' + index + ' is not a type number.';
3330                             return string.charCodeAt(index);
3331                         })());
3332                         (((function(){
3333                             var x1 = v351;
3334                             if (typeof x1 !== 'number') throw 'Not a number!';
3335                             var x2 = v352;
3336                             if (typeof x2 !== 'number') throw 'Not a number!';
3337                             return (x1<x2?l4.value: l5.value);
3338                         })() !== l5.value ? (v350 = l93.fvalue(pv, (function(){
3339                             var string = v348;
3340                             var index = v351;
3341                             if (typeof string != 'string')
3342                                 throw 'The value ' + string + ' is not a type string.';
3343                             if (typeof index != 'number')
3344                                 throw 'The value ' + index + ' is not a type number.';
3345                             return string.charCodeAt(index);
3346                         })())) : l5.value) !== l5.value ? l5.value : (function(){
3347                             var values = mv;
3348                             throw ({type: 'block', id: 138, values: values(l5.value, v351), message: 'Return from unknown block NIL.'})
3349                         })());
3350                         (v351 = (function(){
3351                             var x1 = v351;
3352                             if (typeof x1 !== 'number') throw 'Not a number!';
3353                             var x2 = 1;
3354                             if (typeof x2 !== 'number') throw 'Not a number!';
3355                             return x1+x2;
3356                         })());
3357                         (function(){
3358                             try {
3359                                 return (function(){
3360                                     while((function(){
3361                                         var x1 = v351;
3362                                         if (typeof x1 !== 'number') throw 'Not a number!';
3363                                         var x2 = v352;
3364                                         if (typeof x2 !== 'number') throw 'Not a number!';
3365                                         return (x1<x2?l4.value: l5.value);
3366                                     })() !== l5.value){
3367                                         (function(v355){
3368                                             (v355 !== l5.value ? l5.value : (function(){
3369                                                 throw ({type: 'block', id: 139, values: l5.value, message: 'Return from unknown block NIL.'})
3370                                             })());
3371                                             (v350 = (function(){
3372                                                 var x1 = (function(){
3373                                                     var x1 = v350;
3374                                                     if (typeof x1 !== 'number') throw 'Not a number!';
3375                                                     var x2 = 10;
3376                                                     if (typeof x2 !== 'number') throw 'Not a number!';
3377                                                     return x1*x2;
3378                                                 })();
3379                                                 if (typeof x1 !== 'number') throw 'Not a number!';
3380                                                 var x2 = v355;
3381                                                 if (typeof x2 !== 'number') throw 'Not a number!';
3382                                                 return x1+x2;
3383                                             })());
3384                                             return (v351 = (function(){
3385                                                 var x1 = v351;
3386                                                 if (typeof x1 !== 'number') throw 'Not a number!';
3387                                                 var x2 = 1;
3388                                                 if (typeof x2 !== 'number') throw 'Not a number!';
3389                                                 return x1+x2;
3390                                             })());
3391                                         })(l93.fvalue(pv, (function(){
3392                                             var string = v348;
3393                                             var index = v351;
3394                                             if (typeof string != 'string')
3395                                                 throw 'The value ' + string + ' is not a type string.';
3396                                             if (typeof index != 'number')
3397                                                 throw 'The value ' + index + ' is not a type number.';
3398                                             return string.charCodeAt(index);
3399                                         })()));
3400                                     }return l5.value;
3401                                 })();
3402                             }
3403                             catch (cf){
3404                                 if (cf.type == 'block' && cf.id == 139)
3405                                     return cf.values;
3406                                 else
3407                                     throw cf;
3408                             }
3409                         })();
3410                         return ((function(v356){
3411                             return (v356 !== l5.value ? v356 : (function(v357){
3412                                 return (v357 !== l5.value ? v357 : l81.fvalue(pv, (function(){
3413                                     var string = v348;
3414                                     var index = v351;
3415                                     if (typeof string != 'string')
3416                                         throw 'The value ' + string + ' is not a type string.';
3417                                     if (typeof index != 'number')
3418                                         throw 'The value ' + index + ' is not a type number.';
3419                                     return string.charCodeAt(index);
3420                                 })(), 32));
3421                             })((function(){
3422                                 var x1 = v351;
3423                                 if (typeof x1 !== 'number') throw 'Not a number!';
3424                                 var x2 = v352;
3425                                 if (typeof x2 !== 'number') throw 'Not a number!';
3426                                 return (x1==x2?l4.value: l5.value);
3427                             })()));
3428                         })(v349) !== l5.value ? values((function(){
3429                             var x1 = v353;
3430                             if (typeof x1 !== 'number') throw 'Not a number!';
3431                             var x2 = v350;
3432                             if (typeof x2 !== 'number') throw 'Not a number!';
3433                             return x1*x2;
3434                         })(), v351) : values(l5.value, v351));
3435                     })(0,0,l72.fvalue(pv, v348),1);
3436                 }
3437                 catch (cf){
3438                     if (cf.type == 'block' && cf.id == 138)
3439                         return values.apply(this, forcemv(cf.values));
3440                     else
3441                         throw cf;
3442                 }
3443             })();
3444         })();
3445     }));
3446     return l161;
3447 })();
3448 var l162 = {name: "PARSE-INTEGER"};
3449 (function(){
3450     (l162).fvalue = (function(v360){
3451         ((v360)["fname"] = "PARSE-INTEGER");
3452         return v360;
3453     })((function (values,v359){
3454         checkArgs(arguments, 2);
3455         var i;
3456         return (function(){
3457             return l161.fvalue(values, v359, l5.value);
3458         })();
3459     }));
3460     return l162;
3461 })();
3462 var l163 = {name: "*EOF*"};
3463 (function(){
3464     (((l163.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l163).value = l17.fvalue(pv)));
3465     return l163;
3466 })();
3467 var l164 = {name: "QUOTE"};
3468 var l165 = {name: "BACKQUOTE"};
3469 var l166 = {name: "UNQUOTE-SPLICING"};
3470 var l167 = {name: "UNQUOTE"};
3471 (function(){
3472     (l157).fvalue = (function(v366){
3473         ((v366)["fname"] = "LS-READ");
3474         return v366;
3475     })((function (values,v361){
3476         checkArgs(arguments, 2);
3477         var i;
3478         return (function(){
3479             l155.fvalue(pv, v361);
3480             return (function(v362){
3481                 return ((function(v363){
3482                     return (v363 !== l5.value ? v363 : l81.fvalue(pv, v362, 41));
3483                 })(l13.fvalue(pv, v362)) !== l5.value ? (function(){
3484                     var symbol = l163;
3485                     var value = symbol.value;
3486                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3487                     return value;
3488                 })() : (l81.fvalue(pv, v362, 40) !== l5.value ? (function(){
3489                     l150.fvalue(pv, v361);
3490                     return l156.fvalue(values, v361);
3491                 })() : (l81.fvalue(pv, v362, 39) !== l5.value ? (function(){
3492                     l150.fvalue(pv, v361);
3493                     return l45.fvalue(values, l164, l157.fvalue(pv, v361));
3494                 })() : (l81.fvalue(pv, v362, 96) !== l5.value ? (function(){
3495                     l150.fvalue(pv, v361);
3496                     return l45.fvalue(values, l165, l157.fvalue(pv, v361));
3497                 })() : (l81.fvalue(pv, v362, 34) !== l5.value ? (function(){
3498                     l150.fvalue(pv, v361);
3499                     return l158.fvalue(values, v361);
3500                 })() : (l81.fvalue(pv, v362, 44) !== l5.value ? (function(){
3501                     l150.fvalue(pv, v361);
3502                     return (l27.fvalue(pv, l149.fvalue(pv, v361), 64) !== l5.value ? (function(){
3503                         l150.fvalue(pv, v361);
3504                         return l45.fvalue(values, l166, l157.fvalue(pv, v361));
3505                     })() : l45.fvalue(values, l167, l157.fvalue(pv, v361)));
3506                 })() : (l81.fvalue(pv, v362, 35) !== l5.value ? l159.fvalue(values, v361) : (function(v364){
3507                     return (function(v365){
3508                         return (v365 !== l5.value ? v365 : l160.fvalue(values, v364));
3509                     })(pv(l161.fvalue(pv, v364, l5.value)));
3510                 })(l154.fvalue(pv, v361, (function(){
3511                     var symbol = l153;
3512                     var func = symbol.fvalue;
3513                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3514                     return func;
3515                 })())))))))));
3516             })(l149.fvalue(pv, v361));
3517         })();
3518     }));
3519     return l157;
3520 })();
3521 var l168 = {name: "LS-READ-FROM-STRING"};
3522 (function(){
3523     (l168).fvalue = (function(v368){
3524         ((v368)["fname"] = "LS-READ-FROM-STRING");
3525         return v368;
3526     })((function (values,v367){
3527         checkArgs(arguments, 2);
3528         var i;
3529         return (function(){
3530             return l157.fvalue(values, l148.fvalue(pv, v367));
3531         })();
3532     }));
3533     return l168;
3534 })();
3535 var l169 = {name: "CODE"};
3536 (function(){
3537     (l169).fvalue = (function(v371){
3538         ((v371)["fname"] = "CODE");
3539         return v371;
3540     })((function (values){
3541         var v369= l5.value;
3542         for (var i = arguments.length-1; i>=1; i--)
3543             v369 = {car: arguments[i], cdr:
3544         v369};
3545         var i;
3546         return (function(){
3547             return l139.fvalue(values, (function (values,v370){
3548                 checkArgs(arguments, 2);
3549                 var i;
3550                 return (l13.fvalue(pv, v370) !== l5.value ? "" : (l82.fvalue(pv, v370) !== l5.value ? l18.fvalue(values, v370) : (((typeof(v370) == "string")?l4.value: l5.value) !== l5.value ? v370 : (function(){
3551                     throw "Unknown argument.";
3552                 })())));
3553             }), v369);
3554         })();
3555     }));
3556     return l169;
3557 })();
3558 var l170 = {name: "JS!BOOL"};
3559 var l171 = {name: "LS-COMPILE"};
3560 (function(){
3561     (l170).fvalue = (function(v373){
3562         ((v373)["fname"] = "JS!BOOL");
3563         return v373;
3564     })((function (values,v372){
3565         checkArgs(arguments, 2);
3566         var i;
3567         return (function(){
3568             return l169.fvalue(values, "(", v372, "?", l171.fvalue(pv, l4.value), ": ", l171.fvalue(pv, l5.value), ")");
3569         })();
3570     }));
3571     return l170;
3572 })();
3573 var l172 = {name: "JS!SELFCALL"};
3574 l172;
3575 var l173 = {name: "INDENT"};
3576 (function(){
3577     (l173).fvalue = (function(v380){
3578         ((v380)["fname"] = "INDENT");
3579         return v380;
3580     })((function (values){
3581         var v374= l5.value;
3582         for (var i = arguments.length-1; i>=1; i--)
3583             v374 = {car: arguments[i], cdr:
3584         v374};
3585         var i;
3586         return (function(){
3587             return (function(v375){
3588                 return (function(v376,v377,v378){
3589                     (l83.fvalue(pv, l72.fvalue(pv, v375)) !== l5.value ? (v376 = l135.fvalue(pv, v376, "    ")) : l5.value);
3590                     (function(){
3591                         return (function(){
3592                             while((function(){
3593                                 var x1 = v377;
3594                                 if (typeof x1 !== 'number') throw 'Not a number!';
3595                                 var x2 = v378;
3596                                 if (typeof x2 !== 'number') throw 'Not a number!';
3597                                 return (x1<x2?l4.value: l5.value);
3598                             })() !== l5.value){
3599                                 (function(v379){
3600                                     return (v376 = l135.fvalue(pv, v376, v379));
3601                                 })(((l81.fvalue(pv, (function(){
3602                                     var string = v375;
3603                                     var index = v377;
3604                                     if (typeof string != 'string')
3605                                         throw 'The value ' + string + ' is not a type string.';
3606                                     if (typeof index != 'number')
3607                                         throw 'The value ' + index + ' is not a type number.';
3608                                     return string.charCodeAt(index);
3609                                 })(), 10) !== l5.value ? ((function(){
3610                                     var x1 = v377;
3611                                     if (typeof x1 !== 'number') throw 'Not a number!';
3612                                     var x2 = l24.fvalue(pv, v378);
3613                                     if (typeof x2 !== 'number') throw 'Not a number!';
3614                                     return (x1<x2?l4.value: l5.value);
3615                                 })() !== l5.value ? l28.fvalue(pv, l81.fvalue(pv, (function(){
3616                                     var string = v375;
3617                                     var index = l23.fvalue(pv, v377);
3618                                     if (typeof string != 'string')
3619                                         throw 'The value ' + string + ' is not a type string.';
3620                                     if (typeof index != 'number')
3621                                         throw 'The value ' + index + ' is not a type number.';
3622                                     return string.charCodeAt(index);
3623                                 })(), 10)) : l5.value) : l5.value) !== l5.value ? l135.fvalue(pv, l99.fvalue(pv, 10), "    ") : l99.fvalue(pv, (function(){
3624                                     var string = v375;
3625                                     var index = v377;
3626                                     if (typeof string != 'string')
3627                                         throw 'The value ' + string + ' is not a type string.';
3628                                     if (typeof index != 'number')
3629                                         throw 'The value ' + index + ' is not a type number.';
3630                                     return string.charCodeAt(index);
3631                                 })())));
3632                                 (v377 = (function(){
3633                                     var x1 = v377;
3634                                     if (typeof x1 !== 'number') throw 'Not a number!';
3635                                     var x2 = 1;
3636                                     if (typeof x2 !== 'number') throw 'Not a number!';
3637                                     return x1+x2;
3638                                 })());
3639                             }return l5.value;
3640                         })();
3641                     })();
3642                     return v376;
3643                 })("",0,l72.fvalue(pv, v375));
3644             })((function(){
3645                 var f = (function(){
3646                     var symbol = l169;
3647                     var func = symbol.fvalue;
3648                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
3649                     return func;
3650                 })();
3651                 var args = [pv];
3652                 var tail = (v374);
3653                 while (tail != l5.value){
3654                     args.push(tail.car);
3655                     tail = tail.cdr;
3656                 }
3657                 return f.apply(this, args);
3658             })());
3659         })();
3660     }));
3661     return l173;
3662 })();
3663 var l174 = {name: "*MULTIPLE-VALUE-P*"};
3664 (function(){
3665     (((l174.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l174).value = l5.value));
3666     return l174;
3667 })();
3668 var l175 = {name: "MAKE-BINDING"};
3669 (function(){
3670     (l175).fvalue = (function(v385){
3671         ((v385)["fname"] = "MAKE-BINDING");
3672         return v385;
3673     })((function (values,v381,v382,v383,v384){
3674         checkArgsAtLeast(arguments, 4);
3675         checkArgsAtMost(arguments, 5);
3676         switch(arguments.length-1){
3677         case 3:
3678         v384=l5.value;
3679         default: break;
3680         }
3681         var i;
3682         return (function(){
3683             return l45.fvalue(values, v381, v382, v383, v384);
3684         })();
3685     }));
3686     return l175;
3687 })();
3688 var l176 = {name: "BINDING-NAME"};
3689 (function(){
3690     (l176).fvalue = (function(v387){
3691         ((v387)["fname"] = "BINDING-NAME");
3692         return v387;
3693     })((function (values,v386){
3694         checkArgs(arguments, 2);
3695         var i;
3696         return (function(){
3697             return l40.fvalue(values, v386);
3698         })();
3699     }));
3700     return l176;
3701 })();
3702 var l177 = {name: "BINDING-TYPE"};
3703 (function(){
3704     (l177).fvalue = (function(v389){
3705         ((v389)["fname"] = "BINDING-TYPE");
3706         return v389;
3707     })((function (values,v388){
3708         checkArgs(arguments, 2);
3709         var i;
3710         return (function(){
3711             return l41.fvalue(values, v388);
3712         })();
3713     }));
3714     return l177;
3715 })();
3716 var l178 = {name: "BINDING-VALUE"};
3717 (function(){
3718     (l178).fvalue = (function(v391){
3719         ((v391)["fname"] = "BINDING-VALUE");
3720         return v391;
3721     })((function (values,v390){
3722         checkArgs(arguments, 2);
3723         var i;
3724         return (function(){
3725             return l42.fvalue(values, v390);
3726         })();
3727     }));
3728     return l178;
3729 })();
3730 var l179 = {name: "BINDING-DECLARATIONS"};
3731 (function(){
3732     (l179).fvalue = (function(v393){
3733         ((v393)["fname"] = "BINDING-DECLARATIONS");
3734         return v393;
3735     })((function (values,v392){
3736         checkArgs(arguments, 2);
3737         var i;
3738         return (function(){
3739             return l43.fvalue(values, v392);
3740         })();
3741     }));
3742     return l179;
3743 })();
3744 var l180 = {name: "SET-BINDING-VALUE"};
3745 (function(){
3746     (l180).fvalue = (function(v396){
3747         ((v396)["fname"] = "SET-BINDING-VALUE");
3748         return v396;
3749     })((function (values,v394,v395){
3750         checkArgs(arguments, 3);
3751         var i;
3752         return (function(){
3753             return (function(){
3754                 var x = l36.fvalue(pv, v394);
3755                 if (typeof x != 'object')
3756                     throw 'The value ' + x + ' is not a type object.';
3757                 return (x.car = v395, x);
3758             })();
3759         })();
3760     }));
3761     return l180;
3762 })();
3763 var l181 = {name: "SET-BINDING-DECLARATIONS"};
3764 (function(){
3765     (l181).fvalue = (function(v399){
3766         ((v399)["fname"] = "SET-BINDING-DECLARATIONS");
3767         return v399;
3768     })((function (values,v397,v398){
3769         checkArgs(arguments, 3);
3770         var i;
3771         return (function(){
3772             return (function(){
3773                 var x = l38.fvalue(pv, v397);
3774                 if (typeof x != 'object')
3775                     throw 'The value ' + x + ' is not a type object.';
3776                 return (x.car = v398, x);
3777             })();
3778         })();
3779     }));
3780     return l181;
3781 })();
3782 var l182 = {name: "PUSH-BINDING-DECLARATION"};
3783 (function(){
3784     (l182).fvalue = (function(v402){
3785         ((v402)["fname"] = "PUSH-BINDING-DECLARATION");
3786         return v402;
3787     })((function (values,v400,v401){
3788         checkArgs(arguments, 3);
3789         var i;
3790         return (function(){
3791             return l181.fvalue(values, v401, ({car: v400, cdr: l179.fvalue(pv, v401)}));
3792         })();
3793     }));
3794     return l182;
3795 })();
3796 var l183 = {name: "MAKE-LEXENV"};
3797 (function(){
3798     (l183).fvalue = (function(v403){
3799         ((v403)["fname"] = "MAKE-LEXENV");
3800         return v403;
3801     })((function (values){
3802         checkArgsAtMost(arguments, 1);
3803         var i;
3804         return (function(){
3805             return l45.fvalue(values, l5.value, l5.value, l5.value, l5.value);
3806         })();
3807     }));
3808     return l183;
3809 })();
3810 var l184 = {name: "COPY-LEXENV"};
3811 (function(){
3812     (l184).fvalue = (function(v405){
3813         ((v405)["fname"] = "COPY-LEXENV");
3814         return v405;
3815     })((function (values,v404){
3816         checkArgs(arguments, 2);
3817         var i;
3818         return (function(){
3819             return l78.fvalue(values, v404);
3820         })();
3821     }));
3822     return l184;
3823 })();
3824 var l185 = {name: "PUSH-TO-LEXENV"};
3825 var l186 = {name: "BLOCK"};
3826 var l187 = {name: "GOTAG"};
3827 (function(){
3828     (l185).fvalue = (function(v410){
3829         ((v410)["fname"] = "PUSH-TO-LEXENV");
3830         return v410;
3831     })((function (values,v406,v407,v408){
3832         checkArgs(arguments, 4);
3833         var i;
3834         return (function(){
3835             return (function(v409){
3836                 return (l27.fvalue(pv, v409, l106) !== l5.value ? (function(){
3837                     var x = v407;
3838                     if (typeof x != 'object')
3839                         throw 'The value ' + x + ' is not a type object.';
3840                     return (x.car = ({car: v406, cdr: (function(){
3841                         var tmp = v407;
3842                         return tmp === l5.value? l5.value: tmp.car;
3843                     })()}), x);
3844                 })() : (l27.fvalue(pv, v409, l105) !== l5.value ? (function(){
3845                     var x = (function(){
3846                         var tmp = v407;
3847                         return tmp === l5.value? l5.value: tmp.cdr;
3848                     })();
3849                     if (typeof x != 'object')
3850                         throw 'The value ' + x + ' is not a type object.';
3851                     return (x.car = ({car: v406, cdr: l34.fvalue(pv, v407)}), x);
3852                 })() : (l27.fvalue(pv, v409, l186) !== l5.value ? (function(){
3853                     var x = l36.fvalue(pv, v407);
3854                     if (typeof x != 'object')
3855                         throw 'The value ' + x + ' is not a type object.';
3856                     return (x.car = ({car: v406, cdr: l37.fvalue(pv, v407)}), x);
3857                 })() : (l27.fvalue(pv, v409, l187) !== l5.value ? (function(){
3858                     var x = l38.fvalue(pv, v407);
3859                     if (typeof x != 'object')
3860                         throw 'The value ' + x + ' is not a type object.';
3861                     return (x.car = ({car: v406, cdr: l39.fvalue(pv, v407)}), x);
3862                 })() : (function(){
3863                     throw "ECASE expression failed.";
3864                 })()))));
3865             })(v408);
3866         })();
3867     }));
3868     return l185;
3869 })();
3870 var l188 = {name: "EXTEND-LEXENV"};
3871 (function(){
3872     (l188).fvalue = (function(v417){
3873         ((v417)["fname"] = "EXTEND-LEXENV");
3874         return v417;
3875     })((function (values,v411,v412,v413){
3876         checkArgs(arguments, 4);
3877         var i;
3878         return (function(){
3879             return (function(v414){
3880                 return (function(){
3881                     return (function(v415,v416){
3882                         (function(){
3883                             while(v415 !== l5.value){
3884                                 (v416 = (function(){
3885                                     var tmp = v415;
3886                                     return tmp === l5.value? l5.value: tmp.car;
3887                                 })());
3888                                 (function(){
3889                                     l185.fvalue(pv, v416, v414, v413);
3890                                     return l5.value;
3891                                 })();
3892                                 (v415 = (function(){
3893                                     var tmp = v415;
3894                                     return tmp === l5.value? l5.value: tmp.cdr;
3895                                 })());
3896                             }return l5.value;
3897                         })();
3898                         return v414;
3899                     })(l67.fvalue(pv, v411),l5.value);
3900                 })();
3901             })(l184.fvalue(pv, v412));
3902         })();
3903     }));
3904     return l188;
3905 })();
3906 var l189 = {name: "LOOKUP-IN-LEXENV"};
3907 (function(){
3908     (l189).fvalue = (function(v422){
3909         ((v422)["fname"] = "LOOKUP-IN-LEXENV");
3910         return v422;
3911     })((function (values,v418,v419,v420){
3912         checkArgs(arguments, 4);
3913         var i;
3914         return (function(){
3915             return l98.fvalue(values, v418, (function(v421){
3916                 return (l27.fvalue(pv, v421, l106) !== l5.value ? l40.fvalue(pv, v419) : (l27.fvalue(pv, v421, l105) !== l5.value ? l41.fvalue(pv, v419) : (l27.fvalue(pv, v421, l186) !== l5.value ? l42.fvalue(pv, v419) : (l27.fvalue(pv, v421, l187) !== l5.value ? l43.fvalue(pv, v419) : (function(){
3917                     throw "ECASE expression failed.";
3918                 })()))));
3919             })(v420));
3920         })();
3921     }));
3922     return l189;
3923 })();
3924 var l190 = {name: "*ENVIRONMENT*"};
3925 (function(){
3926     (((l190.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l190).value = l183.fvalue(pv)));
3927     return l190;
3928 })();
3929 var l191 = {name: "*VARIABLE-COUNTER*"};
3930 (function(){
3931     (((l191.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l191).value = 0));
3932     return l191;
3933 })();
3934 var l192 = {name: "GVARNAME"};
3935 (function(){
3936     (l192).fvalue = (function(v424){
3937         ((v424)["fname"] = "GVARNAME");
3938         return v424;
3939     })((function (values,v423){
3940         checkArgs(arguments, 2);
3941         var i;
3942         return (function(){
3943             return l169.fvalue(values, "v", ((l191).value = (function(){
3944                 var x1 = (function(){
3945                     var symbol = l191;
3946                     var value = symbol.value;
3947                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3948                     return value;
3949                 })();
3950                 if (typeof x1 !== 'number') throw 'Not a number!';
3951                 var x2 = 1;
3952                 if (typeof x2 !== 'number') throw 'Not a number!';
3953                 return x1+x2;
3954             })()));
3955         })();
3956     }));
3957     return l192;
3958 })();
3959 var l193 = {name: "TRANSLATE-VARIABLE"};
3960 (function(){
3961     (l193).fvalue = (function(v426){
3962         ((v426)["fname"] = "TRANSLATE-VARIABLE");
3963         return v426;
3964     })((function (values,v425){
3965         checkArgs(arguments, 2);
3966         var i;
3967         return (function(){
3968             return l178.fvalue(values, l189.fvalue(pv, v425, (function(){
3969                 var symbol = l190;
3970                 var value = symbol.value;
3971                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
3972                 return value;
3973             })(), l106));
3974         })();
3975     }));
3976     return l193;
3977 })();
3978 var l194 = {name: "EXTEND-LOCAL-ENV"};
3979 (function(){
3980     (l194).fvalue = (function(v432){
3981         ((v432)["fname"] = "EXTEND-LOCAL-ENV");
3982         return v432;
3983     })((function (values,v427){
3984         checkArgs(arguments, 2);
3985         var i;
3986         return (function(){
3987             return (function(v428){
3988                 return (function(){
3989                     return (function(v429,v430){
3990                         (function(){
3991                             while(v429 !== l5.value){
3992                                 (v430 = (function(){
3993                                     var tmp = v429;
3994                                     return tmp === l5.value? l5.value: tmp.car;
3995                                 })());
3996                                 (function(){
3997                                     (function(v431){
3998                                         return l185.fvalue(pv, v431, v428, l106);
3999                                     })(l175.fvalue(pv, v430, l106, l192.fvalue(pv, v430)));
4000                                     return l5.value;
4001                                 })();
4002                                 (v429 = (function(){
4003                                     var tmp = v429;
4004                                     return tmp === l5.value? l5.value: tmp.cdr;
4005                                 })());
4006                             }return l5.value;
4007                         })();
4008                         return v428;
4009                     })(v427,l5.value);
4010                 })();
4011             })(l184.fvalue(pv, (function(){
4012                 var symbol = l190;
4013                 var value = symbol.value;
4014                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4015                 return value;
4016             })()));
4017         })();
4018     }));
4019     return l194;
4020 })();
4021 var l195 = {name: "*TOPLEVEL-COMPILATIONS*"};
4022 (function(){
4023     (((l195.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l195).value = l5.value));
4024     return l195;
4025 })();
4026 var l196 = {name: "TOPLEVEL-COMPILATION"};
4027 (function(){
4028     (l196).fvalue = (function(v434){
4029         ((v434)["fname"] = "TOPLEVEL-COMPILATION");
4030         return v434;
4031     })((function (values,v433){
4032         checkArgs(arguments, 2);
4033         var i;
4034         return (function(){
4035             return ((l195).value = ({car: v433, cdr: (function(){
4036                 var symbol = l195;
4037                 var value = symbol.value;
4038                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4039                 return value;
4040             })()}));
4041         })();
4042     }));
4043     return l196;
4044 })();
4045 var l197 = {name: "NULL-OR-EMPTY-P"};
4046 (function(){
4047     (l197).fvalue = (function(v436){
4048         ((v436)["fname"] = "NULL-OR-EMPTY-P");
4049         return v436;
4050     })((function (values,v435){
4051         checkArgs(arguments, 2);
4052         var i;
4053         return (function(){
4054             return l25.fvalue(values, l72.fvalue(pv, v435));
4055         })();
4056     }));
4057     return l197;
4058 })();
4059 var l198 = {name: "GET-TOPLEVEL-COMPILATIONS"};
4060 (function(){
4061     (l198).fvalue = (function(v437){
4062         ((v437)["fname"] = "GET-TOPLEVEL-COMPILATIONS");
4063         return v437;
4064     })((function (values){
4065         checkArgsAtMost(arguments, 1);
4066         var i;
4067         return (function(){
4068             return l67.fvalue(values, l91.fvalue(pv, (function(){
4069                 var symbol = l197;
4070                 var func = symbol.fvalue;
4071                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4072                 return func;
4073             })(), (function(){
4074                 var symbol = l195;
4075                 var value = symbol.value;
4076                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4077                 return value;
4078             })()));
4079         })();
4080     }));
4081     return l198;
4082 })();
4083 var l199 = {name: "%COMPILE-DEFMACRO"};
4084 var l200 = {name: "MACRO"};
4085 (function(){
4086     (l199).fvalue = (function(v440){
4087         ((v440)["fname"] = "%COMPILE-DEFMACRO");
4088         return v440;
4089     })((function (values,v438,v439){
4090         checkArgs(arguments, 3);
4091         var i;
4092         return (function(){
4093             l196.fvalue(pv, l171.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l164), l45.fvalue(pv, v438))));
4094             l185.fvalue(pv, l175.fvalue(pv, v438, l200, v439), (function(){
4095                 var symbol = l190;
4096                 var value = symbol.value;
4097                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4098                 return value;
4099             })(), l105);
4100             return v438;
4101         })();
4102     }));
4103     return l199;
4104 })();
4105 var l201 = {name: "GLOBAL-BINDING"};
4106 (function(){
4107     (l201).fvalue = (function(v446){
4108         ((v446)["fname"] = "GLOBAL-BINDING");
4109         return v446;
4110     })((function (values,v441,v442,v443){
4111         checkArgs(arguments, 4);
4112         var i;
4113         return (function(){
4114             return (function(v444){
4115                 return (v444 !== l5.value ? v444 : (function(v445){
4116                     l185.fvalue(pv, v445, (function(){
4117                         var symbol = l190;
4118                         var value = symbol.value;
4119                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4120                         return value;
4121                     })(), v443);
4122                     return v445;
4123                 })(l175.fvalue(pv, v441, v442, l5.value)));
4124             })(l189.fvalue(pv, v441, (function(){
4125                 var symbol = l190;
4126                 var value = symbol.value;
4127                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4128                 return value;
4129             })(), v443));
4130         })();
4131     }));
4132     return l201;
4133 })();
4134 var l202 = {name: "CLAIMP"};
4135 (function(){
4136     (l202).fvalue = (function(v451){
4137         ((v451)["fname"] = "CLAIMP");
4138         return v451;
4139     })((function (values,v447,v448,v449){
4140         checkArgs(arguments, 4);
4141         var i;
4142         return (function(){
4143             return (function(v450){
4144                 return (v450 !== l5.value ? l89.fvalue(values, v449, l179.fvalue(pv, v450)) : l5.value);
4145             })(l189.fvalue(pv, v447, (function(){
4146                 var symbol = l190;
4147                 var value = symbol.value;
4148                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4149                 return value;
4150             })(), v448));
4151         })();
4152     }));
4153     return l202;
4154 })();
4155 var l203 = {name: "!PROCLAIM"};
4156 var l204 = {name: "SPECIAL"};
4157 var l205 = {name: "NOTINLINE"};
4158 var l206 = {name: "CONSTANT"};
4159 (function(){
4160     (l203).fvalue = (function(v463){
4161         ((v463)["fname"] = "!PROCLAIM");
4162         return v463;
4163     })((function (values,v452){
4164         checkArgs(arguments, 2);
4165         var i;
4166         return (function(){
4167             return (function(v453){
4168                 return (l27.fvalue(pv, v453, l204) !== l5.value ? (function(){
4169                     return (function(v454,v455){
4170                         (function(){
4171                             while(v454 !== l5.value){
4172                                 (v455 = (function(){
4173                                     var tmp = v454;
4174                                     return tmp === l5.value? l5.value: tmp.car;
4175                                 })());
4176                                 (function(){
4177                                     (function(v456){
4178                                         return l182.fvalue(pv, l204, v456);
4179                                     })(l201.fvalue(pv, v455, l106, l106));
4180                                     return l5.value;
4181                                 })();
4182                                 (v454 = (function(){
4183                                     var tmp = v454;
4184                                     return tmp === l5.value? l5.value: tmp.cdr;
4185                                 })());
4186                             }return l5.value;
4187                         })();
4188                         return l5.value;
4189                     })((function(){
4190                         var tmp = v452;
4191                         return tmp === l5.value? l5.value: tmp.cdr;
4192                     })(),l5.value);
4193                 })() : (l27.fvalue(pv, v453, l205) !== l5.value ? (function(){
4194                     return (function(v457,v458){
4195                         (function(){
4196                             while(v457 !== l5.value){
4197                                 (v458 = (function(){
4198                                     var tmp = v457;
4199                                     return tmp === l5.value? l5.value: tmp.car;
4200                                 })());
4201                                 (function(){
4202                                     (function(v459){
4203                                         return l182.fvalue(pv, l205, v459);
4204                                     })(l201.fvalue(pv, v458, l105, l105));
4205                                     return l5.value;
4206                                 })();
4207                                 (v457 = (function(){
4208                                     var tmp = v457;
4209                                     return tmp === l5.value? l5.value: tmp.cdr;
4210                                 })());
4211                             }return l5.value;
4212                         })();
4213                         return l5.value;
4214                     })((function(){
4215                         var tmp = v452;
4216                         return tmp === l5.value? l5.value: tmp.cdr;
4217                     })(),l5.value);
4218                 })() : (l27.fvalue(pv, v453, l206) !== l5.value ? (function(){
4219                     return (function(v460,v461){
4220                         (function(){
4221                             while(v460 !== l5.value){
4222                                 (v461 = (function(){
4223                                     var tmp = v460;
4224                                     return tmp === l5.value? l5.value: tmp.car;
4225                                 })());
4226                                 (function(){
4227                                     (function(v462){
4228                                         return l182.fvalue(pv, l206, v462);
4229                                     })(l201.fvalue(pv, v461, l106, l106));
4230                                     return l5.value;
4231                                 })();
4232                                 (v460 = (function(){
4233                                     var tmp = v460;
4234                                     return tmp === l5.value? l5.value: tmp.cdr;
4235                                 })());
4236                             }return l5.value;
4237                         })();
4238                         return l5.value;
4239                     })((function(){
4240                         var tmp = v452;
4241                         return tmp === l5.value? l5.value: tmp.cdr;
4242                     })(),l5.value);
4243                 })() : l5.value)));
4244             })((function(){
4245                 var tmp = v452;
4246                 return tmp === l5.value? l5.value: tmp.car;
4247             })());
4248         })();
4249     }));
4250     return l203;
4251 })();
4252 var l207 = {name: "PROCLAIM"};
4253 (l207).fvalue = (function(){
4254     var symbol = l203;
4255     var func = symbol.fvalue;
4256     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4257     return func;
4258 })();
4259 var l208 = {name: "*COMPILATIONS*"};
4260 (function(){
4261     (((l208.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l208).value = l5.value));
4262     return l208;
4263 })();
4264 var l209 = {name: "DEFINE-COMPILATION"};
4265 l209;
4266 var l210 = {name: "IF"};
4267 ((l208).value = ({car: l45.fvalue(pv, l210, (function (values,v464,v465,v466){
4268     checkArgs(arguments, 4);
4269     var i;
4270     return (function(){
4271         return l169.fvalue(values, "(", l171.fvalue(pv, v464), " !== ", l171.fvalue(pv, l5.value), " ? ", l171.fvalue(pv, v465, (function(){
4272             var symbol = l174;
4273             var value = symbol.value;
4274             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4275             return value;
4276         })()), " : ", l171.fvalue(pv, v466, (function(){
4277             var symbol = l174;
4278             var value = symbol.value;
4279             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4280             return value;
4281         })()), ")");
4282     })();
4283 })), cdr: (function(){
4284     var symbol = l208;
4285     var value = symbol.value;
4286     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4287     return value;
4288 })()}));
4289 var l211 = {name: "*LAMBDA-LIST-KEYWORDS*"};
4290 var l212 = {name: "&OPTIONAL"};
4291 var l213 = {name: "&REST"};
4292 var l214 = {name: "&KEY"};
4293 var l215 = QIList(l212,l213,l214,l5);
4294 (function(){
4295     (((l211.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l211).value = l215));
4296     return l211;
4297 })();
4298 var l216 = {name: "LIST-UNTIL-KEYWORD"};
4299 (function(){
4300     (l216).fvalue = (function(v469){
4301         ((v469)["fname"] = "LIST-UNTIL-KEYWORD");
4302         return v469;
4303     })((function (values,v467){
4304         checkArgs(arguments, 2);
4305         var i;
4306         return (function(){
4307             return ((function(v468){
4308                 return (v468 !== l5.value ? v468 : l89.fvalue(pv, (function(){
4309                     var tmp = v467;
4310                     return tmp === l5.value? l5.value: tmp.car;
4311                 })(), (function(){
4312                     var symbol = l211;
4313                     var value = symbol.value;
4314                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4315                     return value;
4316                 })()));
4317             })(l13.fvalue(pv, v467)) !== l5.value ? l5.value : ({car: (function(){
4318                 var tmp = v467;
4319                 return tmp === l5.value? l5.value: tmp.car;
4320             })(), cdr: l216.fvalue(pv, (function(){
4321                 var tmp = v467;
4322                 return tmp === l5.value? l5.value: tmp.cdr;
4323             })())}));
4324         })();
4325     }));
4326     return l216;
4327 })();
4328 var l217 = {name: "LAMBDA-LIST-SECTION"};
4329 (function(){
4330     (l217).fvalue = (function(v472){
4331         ((v472)["fname"] = "LAMBDA-LIST-SECTION");
4332         return v472;
4333     })((function (values,v470,v471){
4334         checkArgs(arguments, 3);
4335         var i;
4336         return (function(){
4337             return l216.fvalue(values, (function(){
4338                 var tmp = l89.fvalue(pv, v470, v471);
4339                 return tmp === l5.value? l5.value: tmp.cdr;
4340             })());
4341         })();
4342     }));
4343     return l217;
4344 })();
4345 var l218 = {name: "LAMBDA-LIST-REQUIRED-ARGUMENTS"};
4346 (function(){
4347     (l218).fvalue = (function(v474){
4348         ((v474)["fname"] = "LAMBDA-LIST-REQUIRED-ARGUMENTS");
4349         return v474;
4350     })((function (values,v473){
4351         checkArgs(arguments, 2);
4352         var i;
4353         return (function(){
4354             return l216.fvalue(values, v473);
4355         })();
4356     }));
4357     return l218;
4358 })();
4359 var l219 = {name: "LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT"};
4360 (function(){
4361     (l219).fvalue = (function(v476){
4362         ((v476)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS-WITH-DEFAULT");
4363         return v476;
4364     })((function (values,v475){
4365         checkArgs(arguments, 2);
4366         var i;
4367         return (function(){
4368             return l74.fvalue(values, (function(){
4369                 var symbol = l59;
4370                 var func = symbol.fvalue;
4371                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4372                 return func;
4373             })(), l217.fvalue(pv, l212, v475));
4374         })();
4375     }));
4376     return l219;
4377 })();
4378 var l220 = {name: "LAMBDA-LIST-OPTIONAL-ARGUMENTS"};
4379 (function(){
4380     (l220).fvalue = (function(v478){
4381         ((v478)["fname"] = "LAMBDA-LIST-OPTIONAL-ARGUMENTS");
4382         return v478;
4383     })((function (values,v477){
4384         checkArgs(arguments, 2);
4385         var i;
4386         return (function(){
4387             return l74.fvalue(values, (function(){
4388                 var symbol = l31;
4389                 var func = symbol.fvalue;
4390                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4391                 return func;
4392             })(), l219.fvalue(pv, v477));
4393         })();
4394     }));
4395     return l220;
4396 })();
4397 var l221 = {name: "LAMBDA-LIST-REST-ARGUMENT"};
4398 (function(){
4399     (l221).fvalue = (function(v481){
4400         ((v481)["fname"] = "LAMBDA-LIST-REST-ARGUMENT");
4401         return v481;
4402     })((function (values,v479){
4403         checkArgs(arguments, 2);
4404         var i;
4405         return (function(){
4406             return (function(v480){
4407                 ((function(){
4408                     var tmp = v480;
4409                     return tmp === l5.value? l5.value: tmp.cdr;
4410                 })() !== l5.value ? (function(){
4411                     throw "Bad lambda-list";
4412                 })() : l5.value);
4413                 return (function(){
4414                     var tmp = v480;
4415                     return tmp === l5.value? l5.value: tmp.car;
4416                 })();
4417             })(l217.fvalue(pv, l213, v479));
4418         })();
4419     }));
4420     return l221;
4421 })();
4422 var l222 = {name: "LAMBDA-LIST-KEYWORD-ARGUMENTS-CANONICAL"};
4423 (function(){
4424     (l222).fvalue = (function(v489){
4425         ((v489)["fname"] = "LAMBDA-LIST-KEYWORD-ARGUMENTS-CANONICAL");
4426         return v489;
4427     })((function (values,v482){
4428         checkArgs(arguments, 2);
4429         var i;
4430         return (function(){
4431             return (function(v488){
4432                 return l74.fvalue(values, v488, l217.fvalue(pv, l214, v482));
4433             })((function (values,v483){
4434                 checkArgs(arguments, 2);
4435                 var i;
4436                 return (function(){
4437                     var v484 = l59.fvalue(pv, v483);
4438                     var v485 = l34.fvalue(pv, v484);
4439                     var v486 = l5.value;
4440                     var v487 = l5.value;
4441                     (l60.fvalue(pv, (function(){
4442                         var tmp = v484;
4443                         return tmp === l5.value? l5.value: tmp.car;
4444                     })()) !== l5.value ? (v486 = l34.fvalue(pv, (function(){
4445                         var tmp = v484;
4446                         return tmp === l5.value? l5.value: tmp.car;
4447                     })()), v487 = (function(){
4448                         var tmp = (function(){
4449                             var tmp = v484;
4450                             return tmp === l5.value? l5.value: tmp.car;
4451                         })();
4452                         return tmp === l5.value? l5.value: tmp.car;
4453                     })()) : (v486 = (function(){
4454                         var tmp = v484;
4455                         return tmp === l5.value? l5.value: tmp.car;
4456                     })(), v487 = l131.fvalue(pv, ((function(){
4457                         var tmp = v484;
4458                         return tmp === l5.value? l5.value: tmp.car;
4459                     })()).name, "KEYWORD")));
4460                     return l65.fvalue(pv, l45.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, v487), l45.fvalue(pv, v486))), l45.fvalue(pv, v485));
4461                 })();
4462             }));
4463         })();
4464     }));
4465     return l222;
4466 })();
4467 var l223 = {name: "LAMBDA-LIST-KEYWORD-ARGUMENTS"};
4468 (function(){
4469     (l223).fvalue = (function(v492){
4470         ((v492)["fname"] = "LAMBDA-LIST-KEYWORD-ARGUMENTS");
4471         return v492;
4472     })((function (values,v490){
4473         checkArgs(arguments, 2);
4474         var i;
4475         return (function(){
4476             return l74.fvalue(values, (function (values,v491){
4477                 checkArgs(arguments, 2);
4478                 var i;
4479                 return l41.fvalue(values, l40.fvalue(pv, v491));
4480             }), l222.fvalue(pv, v490));
4481         })();
4482     }));
4483     return l223;
4484 })();
4485 var l224 = {name: "LAMBDA-DOCSTRING-WRAPPER"};
4486 (function(){
4487     (l224).fvalue = (function(v495){
4488         ((v495)["fname"] = "LAMBDA-DOCSTRING-WRAPPER");
4489         return v495;
4490     })((function (values,v494){
4491         checkArgsAtLeast(arguments, 2);
4492         var v493= l5.value;
4493         for (var i = arguments.length-1; i>=2; i--)
4494             v493 = {car: arguments[i], cdr:
4495         v493};
4496         var i;
4497         return (function(){
4498             return (v494 !== l5.value ? l169.fvalue(values, "(function(){", (function(){
4499                 var symbol = l134;
4500                 var value = symbol.value;
4501                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4502                 return value;
4503             })(), l173.fvalue(pv, "var func = ", l137.fvalue(pv, v493), ";", (function(){
4504                 var symbol = l134;
4505                 var value = symbol.value;
4506                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4507                 return value;
4508             })(), "func.docstring = '", v494, "';", (function(){
4509                 var symbol = l134;
4510                 var value = symbol.value;
4511                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4512                 return value;
4513             })(), "return func;", (function(){
4514                 var symbol = l134;
4515                 var value = symbol.value;
4516                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4517                 return value;
4518             })()), "})()") : (function(){
4519                 var f = (function(){
4520                     var symbol = l169;
4521                     var func = symbol.fvalue;
4522                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4523                     return func;
4524                 })();
4525                 var args = [values];
4526                 var tail = (v493);
4527                 while (tail != l5.value){
4528                     args.push(tail.car);
4529                     tail = tail.cdr;
4530                 }
4531                 return f.apply(this, args);
4532             })());
4533         })();
4534     }));
4535     return l224;
4536 })();
4537 var l225 = {name: "LAMBDA-CHECK-ARGUMENT-COUNT"};
4538 var l226 = {name: "N/A"};
4539 (function(){
4540     (l225).fvalue = (function(v501){
4541         ((v501)["fname"] = "LAMBDA-CHECK-ARGUMENT-COUNT");
4542         return v501;
4543     })((function (values,v496,v497,v498){
4544         checkArgs(arguments, 4);
4545         var i;
4546         return (function(){
4547             return (function(v499,v500){
4548                 return (function(){
4549                     try {
4550                         (((function(){
4551                             var x1 = 1;
4552                             if (typeof x1 !== 'number') throw 'Not a number!';
4553                             var x2 = v499;
4554                             if (typeof x2 !== 'number') throw 'Not a number!';
4555                             return (x1<x2?l4.value: l5.value);
4556                         })() !== l5.value ? l27.fvalue(pv, v499, v500) : l5.value) !== l5.value ? (function(){
4557                             var values = mv;
4558                             throw ({type: 'block', id: 186, values: l169.fvalue(values, "checkArgs(arguments, ", v499, ");", (function(){
4559                                 var symbol = l134;
4560                                 var value = symbol.value;
4561                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4562                                 return value;
4563                             })()), message: 'Return from unknown block NIL.'})
4564                         })() : l5.value);
4565                         return l169.fvalue(values, ((function(){
4566                             var x1 = 1;
4567                             if (typeof x1 !== 'number') throw 'Not a number!';
4568                             var x2 = v499;
4569                             if (typeof x2 !== 'number') throw 'Not a number!';
4570                             return (x1<x2?l4.value: l5.value);
4571                         })() !== l5.value ? l169.fvalue(pv, "checkArgsAtLeast(arguments, ", v499, ");", (function(){
4572                             var symbol = l134;
4573                             var value = symbol.value;
4574                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4575                             return value;
4576                         })()) : l5.value), (((typeof (v500) == "number")?l4.value: l5.value) !== l5.value ? l169.fvalue(pv, "checkArgsAtMost(arguments, ", v500, ");", (function(){
4577                             var symbol = l134;
4578                             var value = symbol.value;
4579                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4580                             return value;
4581                         })()) : l5.value));
4582                     }
4583                     catch (cf){
4584                         if (cf.type == 'block' && cf.id == 186)
4585                             return values.apply(this, forcemv(cf.values));
4586                         else
4587                             throw cf;
4588                     }
4589                 })();
4590             })(l23.fvalue(pv, v496),(v498 !== l5.value ? l226 : (function(){
4591                 var x1 = 1;
4592                 if (typeof x1 !== 'number') throw 'Not a number!';
4593                 var x2 = v496;
4594                 if (typeof x2 !== 'number') throw 'Not a number!';
4595                 var x3 = v497;
4596                 if (typeof x3 !== 'number') throw 'Not a number!';
4597                 return x1+x2+x3;
4598             })()));
4599         })();
4600     }));
4601     return l225;
4602 })();
4603 var l227 = {name: "COMPILE-LAMBDA-OPTIONAL"};
4604 (function(){
4605     (l227).fvalue = (function(v510){
4606         ((v510)["fname"] = "COMPILE-LAMBDA-OPTIONAL");
4607         return v510;
4608     })((function (values,v502){
4609         checkArgs(arguments, 2);
4610         var i;
4611         return (function(){
4612             return (function(){
4613                 var v503 = l220.fvalue(pv, v502);
4614                 var v504 = l72.fvalue(pv, l218.fvalue(pv, v502));
4615                 var v505 = l72.fvalue(pv, v503);
4616                 return (v503 !== l5.value ? l169.fvalue(values, "switch(arguments.length-1){", (function(){
4617                     var symbol = l134;
4618                     var value = symbol.value;
4619                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4620                     return value;
4621                 })(), (function(v506,v507,v508){
4622                     return (function(){
4623                         (function(){
4624                             return (function(){
4625                                 while((function(){
4626                                     var x1 = v508;
4627                                     if (typeof x1 !== 'number') throw 'Not a number!';
4628                                     var x2 = v505;
4629                                     if (typeof x2 !== 'number') throw 'Not a number!';
4630                                     return (x1<x2?l4.value: l5.value);
4631                                 })() !== l5.value){
4632                                     (function(v509){
4633                                         (v507 = ({car: l169.fvalue(pv, "case ", (function(){
4634                                             var x1 = v508;
4635                                             if (typeof x1 !== 'number') throw 'Not a number!';
4636                                             var x2 = v504;
4637                                             if (typeof x2 !== 'number') throw 'Not a number!';
4638                                             return x1+x2;
4639                                         })(), ":", (function(){
4640                                             var symbol = l134;
4641                                             var value = symbol.value;
4642                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4643                                             return value;
4644                                         })(), l193.fvalue(pv, (function(){
4645                                             var tmp = v509;
4646                                             return tmp === l5.value? l5.value: tmp.car;
4647                                         })()), "=", l171.fvalue(pv, l34.fvalue(pv, v509)), ";", (function(){
4648                                             var symbol = l134;
4649                                             var value = symbol.value;
4650                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4651                                             return value;
4652                                         })()), cdr: v507}));
4653                                         return (v508 = (function(){
4654                                             var x1 = v508;
4655                                             if (typeof x1 !== 'number') throw 'Not a number!';
4656                                             var x2 = 1;
4657                                             if (typeof x2 !== 'number') throw 'Not a number!';
4658                                             return x1+x2;
4659                                         })());
4660                                     })(l86.fvalue(pv, v508, v506));
4661                                 }return l5.value;
4662                             })();
4663                         })();
4664                         (v507 = ({car: l169.fvalue(pv, "default: break;", (function(){
4665                             var symbol = l134;
4666                             var value = symbol.value;
4667                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4668                             return value;
4669                         })()), cdr: v507}));
4670                         return l137.fvalue(pv, l67.fvalue(pv, v507));
4671                     })();
4672                 })(l219.fvalue(pv, v502),l5.value,0), "}", (function(){
4673                     var symbol = l134;
4674                     var value = symbol.value;
4675                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4676                     return value;
4677                 })()) : l5.value);
4678             })();
4679         })();
4680     }));
4681     return l227;
4682 })();
4683 var l228 = {name: "COMPILE-LAMBDA-REST"};
4684 (function(){
4685     (l228).fvalue = (function(v516){
4686         ((v516)["fname"] = "COMPILE-LAMBDA-REST");
4687         return v516;
4688     })((function (values,v511){
4689         checkArgs(arguments, 2);
4690         var i;
4691         return (function(){
4692             return (function(v512,v513,v514){
4693                 return (v514 !== l5.value ? (function(v515){
4694                     return l169.fvalue(values, "var ", v515, "= ", l171.fvalue(pv, l5.value), ";", (function(){
4695                         var symbol = l134;
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 = 1;
4701                         if (typeof x1 !== 'number') throw 'Not a number!';
4702                         var x2 = v512;
4703                         if (typeof x2 !== 'number') throw 'Not a number!';
4704                         var x3 = v513;
4705                         if (typeof x3 !== 'number') throw 'Not a number!';
4706                         return x1+x2+x3;
4707                     })(), "; i--)", (function(){
4708                         var symbol = l134;
4709                         var value = symbol.value;
4710                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4711                         return value;
4712                     })(), l173.fvalue(pv, v515, " = {car: arguments[i], cdr: "), v515, "};", (function(){
4713                         var symbol = l134;
4714                         var value = symbol.value;
4715                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4716                         return value;
4717                     })());
4718                 })(l193.fvalue(pv, v514)) : l5.value);
4719             })(l72.fvalue(pv, l218.fvalue(pv, v511)),l72.fvalue(pv, l220.fvalue(pv, v511)),l221.fvalue(pv, v511));
4720         })();
4721     }));
4722     return l228;
4723 })();
4724 var l229 = {name: "COMPILE-LAMBDA-PARSE-KEYWORDS"};
4725 (function(){
4726     (l229).fvalue = (function(v526){
4727         ((v526)["fname"] = "COMPILE-LAMBDA-PARSE-KEYWORDS");
4728         return v526;
4729     })((function (values,v517){
4730         checkArgs(arguments, 2);
4731         var i;
4732         return (function(){
4733             return (function(v518,v519,v520){
4734                 return l169.fvalue(values, "var i;", (function(){
4735                     var symbol = l134;
4736                     var value = symbol.value;
4737                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4738                     return value;
4739                 })(), l139.fvalue(pv, (function (values,v521){
4740                     checkArgs(arguments, 2);
4741                     var i;
4742                     return (function(v522){
4743                         return l169.fvalue(values, "var ", l193.fvalue(pv, v522), "; ", (function(){
4744                             var symbol = l134;
4745                             var value = symbol.value;
4746                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4747                             return value;
4748                         })());
4749                     })(l41.fvalue(pv, (function(){
4750                         var tmp = v521;
4751                         return tmp === l5.value? l5.value: tmp.car;
4752                     })()));
4753                 }), v520), (function(v524){
4754                     return l139.fvalue(pv, v524, v520);
4755                 })((function (values,v523){
4756                     checkArgs(arguments, 2);
4757                     var i;
4758                     return l169.fvalue(values, "for (i=", (function(){
4759                         var x1 = 1;
4760                         if (typeof x1 !== 'number') throw 'Not a number!';
4761                         var x2 = v518;
4762                         if (typeof x2 !== 'number') throw 'Not a number!';
4763                         var x3 = v519;
4764                         if (typeof x3 !== 'number') throw 'Not a number!';
4765                         return x1+x2+x3;
4766                     })(), "; i<arguments.length; i+=2){", (function(){
4767                         var symbol = l134;
4768                         var value = symbol.value;
4769                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4770                         return value;
4771                     })(), l173.fvalue(pv, "if (arguments[i] === ", l171.fvalue(pv, l33.fvalue(pv, v523)), "){", (function(){
4772                         var symbol = l134;
4773                         var value = symbol.value;
4774                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4775                         return value;
4776                     })(), l173.fvalue(pv, l193.fvalue(pv, l34.fvalue(pv, (function(){
4777                         var tmp = v523;
4778                         return tmp === l5.value? l5.value: tmp.car;
4779                     })())), " = arguments[i+1];", (function(){
4780                         var symbol = l134;
4781                         var value = symbol.value;
4782                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4783                         return value;
4784                     })(), "break;", (function(){
4785                         var symbol = l134;
4786                         var value = symbol.value;
4787                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4788                         return value;
4789                     })()), "}", (function(){
4790                         var symbol = l134;
4791                         var value = symbol.value;
4792                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4793                         return value;
4794                     })()), "}", (function(){
4795                         var symbol = l134;
4796                         var value = symbol.value;
4797                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4798                         return value;
4799                     })(), "if (i == arguments.length){", (function(){
4800                         var symbol = l134;
4801                         var value = symbol.value;
4802                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4803                         return value;
4804                     })(), l173.fvalue(pv, l193.fvalue(pv, l34.fvalue(pv, (function(){
4805                         var tmp = v523;
4806                         return tmp === l5.value? l5.value: tmp.car;
4807                     })())), " = ", l171.fvalue(pv, l34.fvalue(pv, v523)), ";", (function(){
4808                         var symbol = l134;
4809                         var value = symbol.value;
4810                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4811                         return value;
4812                     })()), "}", (function(){
4813                         var symbol = l134;
4814                         var value = symbol.value;
4815                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4816                         return value;
4817                     })());
4818                 })), (v520 !== l5.value ? l169.fvalue(pv, "for (i=", (function(){
4819                     var x1 = 1;
4820                     if (typeof x1 !== 'number') throw 'Not a number!';
4821                     var x2 = v518;
4822                     if (typeof x2 !== 'number') throw 'Not a number!';
4823                     var x3 = v519;
4824                     if (typeof x3 !== 'number') throw 'Not a number!';
4825                     return x1+x2+x3;
4826                 })(), "; i<arguments.length; i+=2){", (function(){
4827                     var symbol = l134;
4828                     var value = symbol.value;
4829                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4830                     return value;
4831                 })(), l173.fvalue(pv, "if (", l137.fvalue(pv, l74.fvalue(pv, (function (values,v525){
4832                     checkArgs(arguments, 2);
4833                     var i;
4834                     return l135.fvalue(values, "arguments[i] !== ", l171.fvalue(pv, l33.fvalue(pv, v525)));
4835                 }), v520), " && "), ")", (function(){
4836                     var symbol = l134;
4837                     var value = symbol.value;
4838                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4839                     return value;
4840                 })(), l173.fvalue(pv, "throw 'Unknown keyword argument ' + arguments[i].name;", (function(){
4841                     var symbol = l134;
4842                     var value = symbol.value;
4843                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4844                     return value;
4845                 })())), "}", (function(){
4846                     var symbol = l134;
4847                     var value = symbol.value;
4848                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4849                     return value;
4850                 })()) : l5.value));
4851             })(l72.fvalue(pv, l218.fvalue(pv, v517)),l72.fvalue(pv, l220.fvalue(pv, v517)),l222.fvalue(pv, v517));
4852         })();
4853     }));
4854     return l229;
4855 })();
4856 var l230 = {name: "COMPILE-LAMBDA"};
4857 var l231 = {name: "LS-COMPILE-BLOCK"};
4858 (function(){
4859     (l230).fvalue = (function(v539){
4860         ((v539)["fname"] = "COMPILE-LAMBDA");
4861         return v539;
4862     })((function (values,v527,v528){
4863         checkArgs(arguments, 3);
4864         var i;
4865         return (function(){
4866             return (function(v529,v530,v531,v532,v533){
4867                 ((((typeof((function(){
4868                     var tmp = v528;
4869                     return tmp === l5.value? l5.value: tmp.car;
4870                 })()) == "string")?l4.value: l5.value) !== l5.value ? l28.fvalue(pv, l13.fvalue(pv, (function(){
4871                     var tmp = v528;
4872                     return tmp === l5.value? l5.value: tmp.cdr;
4873                 })())) : l5.value) !== l5.value ? (function(){
4874                     (v533 = (function(){
4875                         var tmp = v528;
4876                         return tmp === l5.value? l5.value: tmp.car;
4877                     })());
4878                     return (v528 = (function(){
4879                         var tmp = v528;
4880                         return tmp === l5.value? l5.value: tmp.cdr;
4881                     })());
4882                 })() : l5.value);
4883                 return (function(v534,v535,v536){
4884                     try {
4885                         var tmp;
4886                         tmp = l190.value;
4887                         l190.value = v536;
4888                         v536 = tmp;
4889                         return l224.fvalue(values, v533, "(function (", l137.fvalue(pv, ({car: "values", cdr: l74.fvalue(pv, (function(){
4890                             var symbol = l193;
4891                             var func = symbol.fvalue;
4892                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
4893                             return func;
4894                         })(), l65.fvalue(pv, v529, v530))}), ","), "){", (function(){
4895                             var symbol = l134;
4896                             var value = symbol.value;
4897                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4898                             return value;
4899                         })(), l173.fvalue(pv, l225.fvalue(pv, v534, v535, (function(v537){
4900                             return (v537 !== l5.value ? v537 : v531);
4901                         })(v532)), l227.fvalue(pv, v527), l228.fvalue(pv, v527), l229.fvalue(pv, v527), (function(v538){
4902                             try {
4903                                 var tmp;
4904                                 tmp = l174.value;
4905                                 l174.value = v538;
4906                                 v538 = tmp;
4907                                 return l231.fvalue(pv, v528, l4.value);
4908                             }
4909                             finally {
4910                                 l174.value = v538;
4911                             }
4912                         })(l4.value)), "})");
4913                     }
4914                     finally {
4915                         l190.value = v536;
4916                     }
4917                 })(l72.fvalue(pv, v529),l72.fvalue(pv, v530),l194.fvalue(pv, l65.fvalue(pv, l59.fvalue(pv, v532), v529, v530, v531)));
4918             })(l218.fvalue(pv, v527),l220.fvalue(pv, v527),l223.fvalue(pv, v527),l221.fvalue(pv, v527),l5.value);
4919         })();
4920     }));
4921     return l230;
4922 })();
4923 var l232 = {name: "SETQ-PAIR"};
4924 var l233 = {name: "SET"};
4925 (function(){
4926     (l232).fvalue = (function(v543){
4927         ((v543)["fname"] = "SETQ-PAIR");
4928         return v543;
4929     })((function (values,v540,v541){
4930         checkArgs(arguments, 3);
4931         var i;
4932         return (function(){
4933             return (function(v542){
4934                 return ((((l177.fvalue(pv, v542) === l106)?l4.value: l5.value) !== l5.value ? (l28.fvalue(pv, l89.fvalue(pv, l204, l179.fvalue(pv, v542))) !== l5.value ? l28.fvalue(pv, l89.fvalue(pv, l206, l179.fvalue(pv, v542))) : l5.value) : l5.value) !== l5.value ? l169.fvalue(values, l178.fvalue(pv, v542), " = ", l171.fvalue(pv, v541)) : l171.fvalue(values, l65.fvalue(pv, l45.fvalue(pv, l233), l45.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l164), l45.fvalue(pv, v540))), l45.fvalue(pv, v541))));
4935             })(l189.fvalue(pv, v540, (function(){
4936                 var symbol = l190;
4937                 var value = symbol.value;
4938                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4939                 return value;
4940             })(), l106));
4941         })();
4942     }));
4943     return l232;
4944 })();
4945 var l234 = {name: "SETQ"};
4946 ((l208).value = ({car: l45.fvalue(pv, l234, (function (values){
4947     var v544= l5.value;
4948     for (var i = arguments.length-1; i>=1; i--)
4949         v544 = {car: arguments[i], cdr:
4950     v544};
4951     var i;
4952     return (function(){
4953         return (function(v545){
4954             (function(){
4955                 try {
4956                     return (function(){
4957                         while(l4.value !== l5.value){
4958                             (l13.fvalue(pv, v544) !== l5.value ? (function(){
4959                                 throw ({type: 'block', id: 194, values: l5.value, message: 'Return from unknown block NIL.'})
4960                             })() : (l13.fvalue(pv, (function(){
4961                                 var tmp = v544;
4962                                 return tmp === l5.value? l5.value: tmp.cdr;
4963                             })()) !== l5.value ? (function(){
4964                                 throw "Odd paris in SETQ";
4965                             })() : (function(){
4966                                 (v545 = l135.fvalue(pv, v545, l135.fvalue(pv, l232.fvalue(pv, (function(){
4967                                     var tmp = v544;
4968                                     return tmp === l5.value? l5.value: tmp.car;
4969                                 })(), l34.fvalue(pv, v544)), (l13.fvalue(pv, l36.fvalue(pv, v544)) !== l5.value ? "" : ", "))));
4970                                 return (v544 = l36.fvalue(pv, v544));
4971                             })()));
4972                         }return l5.value;
4973                     })();
4974                 }
4975                 catch (cf){
4976                     if (cf.type == 'block' && cf.id == 194)
4977                         return cf.values;
4978                     else
4979                         throw cf;
4980                 }
4981             })();
4982             return l169.fvalue(values, "(", v545, ")");
4983         })("");
4984     })();
4985 })), cdr: (function(){
4986     var symbol = l208;
4987     var value = symbol.value;
4988     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
4989     return value;
4990 })()}));
4991 var l235 = {name: "JS-VREF"};
4992 ((l208).value = ({car: l45.fvalue(pv, l235, (function (values,v546){
4993     checkArgs(arguments, 2);
4994     var i;
4995     return (function(){
4996         return v546;
4997     })();
4998 })), cdr: (function(){
4999     var symbol = l208;
5000     var value = symbol.value;
5001     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5002     return value;
5003 })()}));
5004 var l236 = {name: "JS-VSET"};
5005 ((l208).value = ({car: l45.fvalue(pv, l236, (function (values,v547,v548){
5006     checkArgs(arguments, 3);
5007     var i;
5008     return (function(){
5009         return l169.fvalue(values, "(", v547, " = ", l171.fvalue(pv, v548), ")");
5010     })();
5011 })), cdr: (function(){
5012     var symbol = l208;
5013     var value = symbol.value;
5014     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5015     return value;
5016 })()}));
5017 (function(){
5018     (l145).fvalue = (function(v555){
5019         ((v555)["fname"] = "ESCAPE-STRING");
5020         return v555;
5021     })((function (values,v549){
5022         checkArgs(arguments, 2);
5023         var i;
5024         return (function(){
5025             return (function(v550,v551,v552){
5026                 (function(){
5027                     return (function(){
5028                         while((function(){
5029                             var x1 = v551;
5030                             if (typeof x1 !== 'number') throw 'Not a number!';
5031                             var x2 = v552;
5032                             if (typeof x2 !== 'number') throw 'Not a number!';
5033                             return (x1<x2?l4.value: l5.value);
5034                         })() !== l5.value){
5035                             (function(v553){
5036                                 ((function(v554){
5037                                     return (v554 !== l5.value ? v554 : l81.fvalue(pv, v553, 92));
5038                                 })(l81.fvalue(pv, v553, 34)) !== l5.value ? (v550 = l135.fvalue(pv, v550, "\\")) : l5.value);
5039                                 (l81.fvalue(pv, v553, 10) !== l5.value ? (function(){
5040                                     (v550 = l135.fvalue(pv, v550, "\\"));
5041                                     return (v553 = 110);
5042                                 })() : l5.value);
5043                                 return (v550 = l135.fvalue(pv, v550, l99.fvalue(pv, v553)));
5044                             })((function(){
5045                                 var string = v549;
5046                                 var index = v551;
5047                                 if (typeof string != 'string')
5048                                     throw 'The value ' + string + ' is not a type string.';
5049                                 if (typeof index != 'number')
5050                                     throw 'The value ' + index + ' is not a type number.';
5051                                 return string.charCodeAt(index);
5052                             })());
5053                             (v551 = (function(){
5054                                 var x1 = v551;
5055                                 if (typeof x1 !== 'number') throw 'Not a number!';
5056                                 var x2 = 1;
5057                                 if (typeof x2 !== 'number') throw 'Not a number!';
5058                                 return x1+x2;
5059                             })());
5060                         }return l5.value;
5061                     })();
5062                 })();
5063                 return v550;
5064             })("",0,l72.fvalue(pv, v549));
5065         })();
5066     }));
5067     return l145;
5068 })();
5069 var l237 = {name: "*LITERAL-SYMBOLS*"};
5070 (function(){
5071     (((l237.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l237).value = l5.value));
5072     return l237;
5073 })();
5074 var l238 = {name: "*LITERAL-COUNTER*"};
5075 (function(){
5076     (((l238.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l238).value = 0));
5077     return l238;
5078 })();
5079 var l239 = {name: "GENLIT"};
5080 (function(){
5081     (l239).fvalue = (function(v556){
5082         ((v556)["fname"] = "GENLIT");
5083         return v556;
5084     })((function (values){
5085         checkArgsAtMost(arguments, 1);
5086         var i;
5087         return (function(){
5088             return l169.fvalue(values, "l", ((l238).value = (function(){
5089                 var x1 = (function(){
5090                     var symbol = l238;
5091                     var value = symbol.value;
5092                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5093                     return value;
5094                 })();
5095                 if (typeof x1 !== 'number') throw 'Not a number!';
5096                 var x2 = 1;
5097                 if (typeof x2 !== 'number') throw 'Not a number!';
5098                 return x1+x2;
5099             })()));
5100         })();
5101     }));
5102     return l239;
5103 })();
5104 var l240 = {name: "LITERAL"};
5105 (function(){
5106     (l240).fvalue = (function(v571){
5107         ((v571)["fname"] = "LITERAL");
5108         return v571;
5109     })((function (values,v557,v558){
5110         checkArgsAtLeast(arguments, 2);
5111         checkArgsAtMost(arguments, 3);
5112         switch(arguments.length-1){
5113         case 1:
5114         v558=l5.value;
5115         default: break;
5116         }
5117         var i;
5118         return (function(){
5119             return (l82.fvalue(pv, v557) !== l5.value ? l18.fvalue(values, v557) : (((typeof(v557) == "string")?l4.value: l5.value) !== l5.value ? l169.fvalue(values, "\"", l145.fvalue(pv, v557), "\"") : (((function(){
5120                 var tmp = v557;
5121                 return (typeof tmp == 'object' && 'name' in tmp);
5122             })()?l4.value: l5.value) !== l5.value ? (function(v559){
5123                 return (v559 !== l5.value ? v559 : (function(v561,v562){
5124                     ((l237).value = ({car: ({car: v557, cdr: v561}), cdr: (function(){
5125                         var symbol = l237;
5126                         var value = symbol.value;
5127                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5128                         return value;
5129                     })()}));
5130                     l196.fvalue(pv, l169.fvalue(pv, "var ", v561, " = ", v562));
5131                     return v561;
5132                 })(l239.fvalue(pv),(function(v560){
5133                     return (l13.fvalue(pv, v560) !== l5.value ? l169.fvalue(pv, "{name: \"", l145.fvalue(pv, (v557).name), "\"}") : l171.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l131), l45.fvalue(pv, (v557).name), l45.fvalue(pv, l115.fvalue(pv, v560)))));
5134                 })(l123.fvalue(pv, v557))));
5135             })((function(){
5136                 var tmp = l98.fvalue(pv, v557, (function(){
5137                     var symbol = l237;
5138                     var value = symbol.value;
5139                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5140                     return value;
5141                 })());
5142                 return tmp === l5.value? l5.value: tmp.cdr;
5143             })()) : (((function(){
5144                 var tmp = v557;
5145                 return (typeof tmp == 'object' && 'car' in tmp);
5146             })()?l4.value: l5.value) !== l5.value ? (function(){
5147                 var v563 = l88.fvalue(pv, v557);
5148                 var v564 = l87.fvalue(pv, v557);
5149                 var v565 = l169.fvalue(pv, "QIList(", l138.fvalue(pv, l74.fvalue(pv, (function (values,v566){
5150                     checkArgs(arguments, 2);
5151                     var i;
5152                     return l240.fvalue(values, v566, l4.value);
5153                 }), v563), ","), l240.fvalue(pv, (function(){
5154                     var tmp = v564;
5155                     return tmp === l5.value? l5.value: tmp.car;
5156                 })(), l4.value), ",", l240.fvalue(pv, (function(){
5157                     var tmp = v564;
5158                     return tmp === l5.value? l5.value: tmp.cdr;
5159                 })(), l4.value), ")");
5160                 return (v558 !== l5.value ? v565 : (function(v567){
5161                     l196.fvalue(pv, l169.fvalue(pv, "var ", v567, " = ", v565));
5162                     return v567;
5163                 })(l239.fvalue(pv)));
5164             })() : (((function(){
5165                 var x = v557;
5166                 return typeof x === 'object' && 'length' in x;
5167             })()?l4.value: l5.value) !== l5.value ? (function(v568){
5168                 return (function(v569){
5169                     return (v558 !== l5.value ? v569 : (function(v570){
5170                         l196.fvalue(pv, l169.fvalue(pv, "var ", v570, " = ", v569));
5171                         return v570;
5172                     })(l239.fvalue(pv)));
5173                 })(l135.fvalue(pv, "[", l137.fvalue(pv, l74.fvalue(pv, (function(){
5174                     var symbol = l240;
5175                     var func = symbol.fvalue;
5176                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5177                     return func;
5178                 })(), v568), ", "), "]"));
5179             })(l140.fvalue(pv, v557)) : l5.value)))));
5180         })();
5181     }));
5182     return l240;
5183 })();
5184 ((l208).value = ({car: l45.fvalue(pv, l164, (function (values,v572){
5185     checkArgs(arguments, 2);
5186     var i;
5187     return (function(){
5188         return l240.fvalue(values, v572);
5189     })();
5190 })), cdr: (function(){
5191     var symbol = l208;
5192     var value = symbol.value;
5193     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5194     return value;
5195 })()}));
5196 var l241 = {name: "%WHILE"};
5197 ((l208).value = ({car: l45.fvalue(pv, l241, (function (values,v574){
5198     checkArgsAtLeast(arguments, 2);
5199     var v573= l5.value;
5200     for (var i = arguments.length-1; i>=2; i--)
5201         v573 = {car: arguments[i], cdr:
5202     v573};
5203     var i;
5204     return (function(){
5205         return l169.fvalue(values, "(function(){", (function(){
5206             var symbol = l134;
5207             var value = symbol.value;
5208             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5209             return value;
5210         })(), l173.fvalue(pv, "while(", l171.fvalue(pv, v574), " !== ", l171.fvalue(pv, l5.value), "){", (function(){
5211             var symbol = l134;
5212             var value = symbol.value;
5213             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5214             return value;
5215         })(), l173.fvalue(pv, l231.fvalue(pv, v573)), "}", "return ", l171.fvalue(pv, l5.value), ";", (function(){
5216             var symbol = l134;
5217             var value = symbol.value;
5218             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5219             return value;
5220         })()), "})()");
5221     })();
5222 })), cdr: (function(){
5223     var symbol = l208;
5224     var value = symbol.value;
5225     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5226     return value;
5227 })()}));
5228 var l242 = {name: "SYMBOL-FUNCTION"};
5229 ((l208).value = ({car: l45.fvalue(pv, l105, (function (values,v575){
5230     checkArgs(arguments, 2);
5231     var i;
5232     return (function(){
5233         return ((l60.fvalue(pv, v575) !== l5.value ? (((function(){
5234             var tmp = v575;
5235             return tmp === l5.value? l5.value: tmp.car;
5236         })() === l6)?l4.value: l5.value) : l5.value) !== l5.value ? l230.fvalue(values, l34.fvalue(pv, v575), l36.fvalue(pv, v575)) : (((function(){
5237             var tmp = v575;
5238             return (typeof tmp == 'object' && 'name' in tmp);
5239         })()?l4.value: l5.value) !== l5.value ? (function(v576){
5240             return (v576 !== l5.value ? l178.fvalue(values, v576) : l171.fvalue(values, l65.fvalue(pv, l45.fvalue(pv, l242), l45.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l164), l45.fvalue(pv, v575))))));
5241         })(l189.fvalue(pv, v575, (function(){
5242             var symbol = l190;
5243             var value = symbol.value;
5244             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5245             return value;
5246         })(), l105)) : l5.value));
5247     })();
5248 })), cdr: (function(){
5249     var symbol = l208;
5250     var value = symbol.value;
5251     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5252     return value;
5253 })()}));
5254 var l243 = {name: "MAKE-FUNCTION-BINDING"};
5255 (function(){
5256     (l243).fvalue = (function(v578){
5257         ((v578)["fname"] = "MAKE-FUNCTION-BINDING");
5258         return v578;
5259     })((function (values,v577){
5260         checkArgs(arguments, 2);
5261         var i;
5262         return (function(){
5263             return l175.fvalue(values, v577, l105, l192.fvalue(pv, v577));
5264         })();
5265     }));
5266     return l243;
5267 })();
5268 var l244 = {name: "COMPILE-FUNCTION-DEFINITION"};
5269 (function(){
5270     (l244).fvalue = (function(v580){
5271         ((v580)["fname"] = "COMPILE-FUNCTION-DEFINITION");
5272         return v580;
5273     })((function (values,v579){
5274         checkArgs(arguments, 2);
5275         var i;
5276         return (function(){
5277             return l230.fvalue(values, (function(){
5278                 var tmp = v579;
5279                 return tmp === l5.value? l5.value: tmp.car;
5280             })(), (function(){
5281                 var tmp = v579;
5282                 return tmp === l5.value? l5.value: tmp.cdr;
5283             })());
5284         })();
5285     }));
5286     return l244;
5287 })();
5288 var l245 = {name: "TRANSLATE-FUNCTION"};
5289 (function(){
5290     (l245).fvalue = (function(v583){
5291         ((v583)["fname"] = "TRANSLATE-FUNCTION");
5292         return v583;
5293     })((function (values,v581){
5294         checkArgs(arguments, 2);
5295         var i;
5296         return (function(){
5297             return (function(v582){
5298                 return l178.fvalue(values, v582);
5299             })(l189.fvalue(pv, v581, (function(){
5300                 var symbol = l190;
5301                 var value = symbol.value;
5302                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5303                 return value;
5304             })(), l105));
5305         })();
5306     }));
5307     return l245;
5308 })();
5309 var l246 = {name: "FLET"};
5310 ((l208).value = ({car: l45.fvalue(pv, l246, (function (values,v585){
5311     checkArgsAtLeast(arguments, 2);
5312     var v584= l5.value;
5313     for (var i = arguments.length-1; i>=2; i--)
5314         v584 = {car: arguments[i], cdr:
5315     v584};
5316     var i;
5317     return (function(){
5318         return (function(){
5319             try {
5320                 var v590 = l190.value;
5321                 var v586 = l74.fvalue(pv, (function(){
5322                     var symbol = l31;
5323                     var func = symbol.fvalue;
5324                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5325                     return func;
5326                 })(), v585);
5327                 var v587 = l74.fvalue(pv, (function(){
5328                     var symbol = l32;
5329                     var func = symbol.fvalue;
5330                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5331                     return func;
5332                 })(), v585);
5333                 var v588 = l74.fvalue(pv, (function(){
5334                     var symbol = l244;
5335                     var func = symbol.fvalue;
5336                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5337                     return func;
5338                 })(), v587);
5339                 ((l190).value = l188.fvalue(pv, l74.fvalue(pv, (function(){
5340                     var symbol = l243;
5341                     var func = symbol.fvalue;
5342                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5343                     return func;
5344                 })(), v586), (function(){
5345                     var symbol = l190;
5346                     var value = symbol.value;
5347                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5348                     return value;
5349                 })(), l105));
5350                 return l169.fvalue(values, "(function(", l137.fvalue(pv, l74.fvalue(pv, (function(){
5351                     var symbol = l245;
5352                     var func = symbol.fvalue;
5353                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5354                     return func;
5355                 })(), v586), ","), "){", (function(){
5356                     var symbol = l134;
5357                     var value = symbol.value;
5358                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5359                     return value;
5360                 })(), (function(v589){
5361                     return l173.fvalue(pv, v589);
5362                 })(l231.fvalue(pv, v584, l4.value)), "})(", l137.fvalue(pv, v588, ","), ")");
5363             }
5364             finally {
5365                 l190.value = v590;
5366             }
5367         })();
5368     })();
5369 })), cdr: (function(){
5370     var symbol = l208;
5371     var value = symbol.value;
5372     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5373     return value;
5374 })()}));
5375 var l247 = {name: "LABELS"};
5376 ((l208).value = ({car: l45.fvalue(pv, l247, (function (values,v592){
5377     checkArgsAtLeast(arguments, 2);
5378     var v591= l5.value;
5379     for (var i = arguments.length-1; i>=2; i--)
5380         v591 = {car: arguments[i], cdr:
5381     v591};
5382     var i;
5383     return (function(){
5384         return (function(){
5385             try {
5386                 var v595 = l190.value;
5387                 var v593 = l74.fvalue(pv, (function(){
5388                     var symbol = l31;
5389                     var func = symbol.fvalue;
5390                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5391                     return func;
5392                 })(), v592);
5393                 ((l190).value = l188.fvalue(pv, l74.fvalue(pv, (function(){
5394                     var symbol = l243;
5395                     var func = symbol.fvalue;
5396                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5397                     return func;
5398                 })(), v593), (function(){
5399                     var symbol = l190;
5400                     var value = symbol.value;
5401                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5402                     return value;
5403                 })(), l105));
5404                 return l169.fvalue(values, "(function(){", (function(){
5405                     var symbol = l134;
5406                     var value = symbol.value;
5407                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5408                     return value;
5409                 })(), l173.fvalue(pv, l139.fvalue(pv, (function (values,v594){
5410                     checkArgs(arguments, 2);
5411                     var i;
5412                     return l169.fvalue(values, "var ", l245.fvalue(pv, (function(){
5413                         var tmp = v594;
5414                         return tmp === l5.value? l5.value: tmp.car;
5415                     })()), " = ", l230.fvalue(pv, l34.fvalue(pv, v594), l36.fvalue(pv, v594)), ";", (function(){
5416                         var symbol = l134;
5417                         var value = symbol.value;
5418                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5419                         return value;
5420                     })());
5421                 }), v592), l231.fvalue(pv, v591, l4.value)), "})()");
5422             }
5423             finally {
5424                 l190.value = v595;
5425             }
5426         })();
5427     })();
5428 })), cdr: (function(){
5429     var symbol = l208;
5430     var value = symbol.value;
5431     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5432     return value;
5433 })()}));
5434 var l248 = {name: "*COMPILING-FILE*"};
5435 (function(){
5436     (((l248.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l248).value = l5.value));
5437     return l248;
5438 })();
5439 var l249 = {name: "EVAL-WHEN-COMPILE"};
5440 var l250 = {name: "PROGN"};
5441 var l251 = {name: "EVAL"};
5442 ((l208).value = ({car: l45.fvalue(pv, l249, (function (values){
5443     var v596= l5.value;
5444     for (var i = arguments.length-1; i>=1; i--)
5445         v596 = {car: arguments[i], cdr:
5446     v596};
5447     var i;
5448     return (function(){
5449         return ((function(){
5450             var symbol = l248;
5451             var value = symbol.value;
5452             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5453             return value;
5454         })() !== l5.value ? (function(){
5455             l251.fvalue(pv, ({car: l250, cdr: v596}));
5456             return l5.value;
5457         })() : l171.fvalue(values, l65.fvalue(pv, l45.fvalue(pv, l250), v596)));
5458     })();
5459 })), cdr: (function(){
5460     var symbol = l208;
5461     var value = symbol.value;
5462     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5463     return value;
5464 })()}));
5465 var l252 = {name: "DEFINE-TRANSFORMATION"};
5466 l252;
5467 ((l208).value = ({car: l45.fvalue(pv, l250, (function (values){
5468     var v597= l5.value;
5469     for (var i = arguments.length-1; i>=1; i--)
5470         v597 = {car: arguments[i], cdr:
5471     v597};
5472     var i;
5473     return (function(){
5474         return (l13.fvalue(pv, (function(){
5475             var tmp = v597;
5476             return tmp === l5.value? l5.value: tmp.cdr;
5477         })()) !== l5.value ? l171.fvalue(values, (function(){
5478             var tmp = v597;
5479             return tmp === l5.value? l5.value: tmp.car;
5480         })(), (function(){
5481             var symbol = l174;
5482             var value = symbol.value;
5483             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5484             return value;
5485         })()) : l169.fvalue(values, "(function(){", (function(){
5486             var symbol = l134;
5487             var value = symbol.value;
5488             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5489             return value;
5490         })(), l173.fvalue(pv, l231.fvalue(pv, v597, l4.value)), "})()"));
5491     })();
5492 })), cdr: (function(){
5493     var symbol = l208;
5494     var value = symbol.value;
5495     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5496     return value;
5497 })()}));
5498 var l253 = {name: "SPECIAL-VARIABLE-P"};
5499 (function(){
5500     (l253).fvalue = (function(v599){
5501         ((v599)["fname"] = "SPECIAL-VARIABLE-P");
5502         return v599;
5503     })((function (values,v598){
5504         checkArgs(arguments, 2);
5505         var i;
5506         return (function(){
5507             return (l202.fvalue(pv, v598, l106, l204) !== l5.value ? l4.value : l5.value);
5508         })();
5509     }));
5510     return l253;
5511 })();
5512 var l254 = {name: "LET-BINDING-WRAPPER"};
5513 (function(){
5514     (l254).fvalue = (function(v606){
5515         ((v606)["fname"] = "LET-BINDING-WRAPPER");
5516         return v606;
5517     })((function (values,v600,v601){
5518         checkArgs(arguments, 3);
5519         var i;
5520         return (function(){
5521             try {
5522                 (l13.fvalue(pv, v600) !== l5.value ? (function(){
5523                     var values = mv;
5524                     throw ({type: 'block', id: 212, values: v601, message: 'Return from unknown block LET-BINDING-WRAPPER.'})
5525                 })() : l5.value);
5526                 return l169.fvalue(values, "try {", (function(){
5527                     var symbol = l134;
5528                     var value = symbol.value;
5529                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5530                     return value;
5531                 })(), l173.fvalue(pv, "var tmp;", (function(){
5532                     var symbol = l134;
5533                     var value = symbol.value;
5534                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5535                     return value;
5536                 })(), l139.fvalue(pv, (function (values,v602){
5537                     checkArgs(arguments, 2);
5538                     var i;
5539                     return (function(v603){
5540                         return l169.fvalue(values, "tmp = ", v603, ".value;", (function(){
5541                             var symbol = l134;
5542                             var value = symbol.value;
5543                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5544                             return value;
5545                         })(), v603, ".value = ", (function(){
5546                             var tmp = v602;
5547                             return tmp === l5.value? l5.value: tmp.cdr;
5548                         })(), ";", (function(){
5549                             var symbol = l134;
5550                             var value = symbol.value;
5551                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5552                             return value;
5553                         })(), (function(){
5554                             var tmp = v602;
5555                             return tmp === l5.value? l5.value: tmp.cdr;
5556                         })(), " = tmp;", (function(){
5557                             var symbol = l134;
5558                             var value = symbol.value;
5559                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5560                             return value;
5561                         })());
5562                     })(l171.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l164), l45.fvalue(pv, (function(){
5563                         var tmp = v602;
5564                         return tmp === l5.value? l5.value: tmp.car;
5565                     })()))));
5566                 }), v600), v601, (function(){
5567                     var symbol = l134;
5568                     var value = symbol.value;
5569                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5570                     return value;
5571                 })()), "}", (function(){
5572                     var symbol = l134;
5573                     var value = symbol.value;
5574                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5575                     return value;
5576                 })(), "finally {", (function(){
5577                     var symbol = l134;
5578                     var value = symbol.value;
5579                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5580                     return value;
5581                 })(), l173.fvalue(pv, l139.fvalue(pv, (function (values,v604){
5582                     checkArgs(arguments, 2);
5583                     var i;
5584                     return (function(v605){
5585                         return l169.fvalue(values, v605, ".value", " = ", (function(){
5586                             var tmp = v604;
5587                             return tmp === l5.value? l5.value: tmp.cdr;
5588                         })(), ";", (function(){
5589                             var symbol = l134;
5590                             var value = symbol.value;
5591                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5592                             return value;
5593                         })());
5594                     })(l171.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l164), l45.fvalue(pv, (function(){
5595                         var tmp = v604;
5596                         return tmp === l5.value? l5.value: tmp.car;
5597                     })()))));
5598                 }), v600)), "}", (function(){
5599                     var symbol = l134;
5600                     var value = symbol.value;
5601                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5602                     return value;
5603                 })());
5604             }
5605             catch (cf){
5606                 if (cf.type == 'block' && cf.id == 212)
5607                     return values.apply(this, forcemv(cf.values));
5608                 else
5609                     throw cf;
5610             }
5611         })();
5612     }));
5613     return l254;
5614 })();
5615 var l255 = {name: "LET"};
5616 ((l208).value = ({car: l45.fvalue(pv, l255, (function (values,v608){
5617     checkArgsAtLeast(arguments, 2);
5618     var v607= l5.value;
5619     for (var i = arguments.length-1; i>=2; i--)
5620         v607 = {car: arguments[i], cdr:
5621     v607};
5622     var i;
5623     return (function(){
5624         return (function(){
5625             try {
5626                 var v616 = l190.value;
5627                 var v609 = l74.fvalue(pv, (function(){
5628                     var symbol = l59;
5629                     var func = symbol.fvalue;
5630                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5631                     return func;
5632                 })(), v608);
5633                 var v610 = l74.fvalue(pv, (function(){
5634                     var symbol = l40;
5635                     var func = symbol.fvalue;
5636                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5637                     return func;
5638                 })(), v609);
5639                 var v611 = l74.fvalue(pv, (function(){
5640                     var symbol = l171;
5641                     var func = symbol.fvalue;
5642                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5643                     return func;
5644                 })(), l74.fvalue(pv, (function(){
5645                     var symbol = l41;
5646                     var func = symbol.fvalue;
5647                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5648                     return func;
5649                 })(), v609));
5650                 ((l190).value = l194.fvalue(pv, l91.fvalue(pv, (function(){
5651                     var symbol = l253;
5652                     var func = symbol.fvalue;
5653                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5654                     return func;
5655                 })(), v610)));
5656                 var v612 = l5.value;
5657                 return l169.fvalue(values, "(function(", l137.fvalue(pv, l74.fvalue(pv, (function (values,v613){
5658                     checkArgs(arguments, 2);
5659                     var i;
5660                     return (l253.fvalue(pv, v613) !== l5.value ? (function(v614){
5661                         (v612 = ({car: ({car: v613, cdr: v614}), cdr: v612}));
5662                         return v614;
5663                     })(l192.fvalue(pv, v613)) : l193.fvalue(values, v613));
5664                 }), v610), ","), "){", (function(){
5665                     var symbol = l134;
5666                     var value = symbol.value;
5667                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5668                     return value;
5669                 })(), (function(v615){
5670                     return l173.fvalue(pv, l254.fvalue(pv, v612, v615));
5671                 })(l231.fvalue(pv, v607, l4.value)), "})(", l137.fvalue(pv, v611, ","), ")");
5672             }
5673             finally {
5674                 l190.value = v616;
5675             }
5676         })();
5677     })();
5678 })), cdr: (function(){
5679     var symbol = l208;
5680     var value = symbol.value;
5681     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5682     return value;
5683 })()}));
5684 var l256 = {name: "LET*-INITIALIZE-VALUE"};
5685 (function(){
5686     (l256).fvalue = (function(v623){
5687         ((v623)["fname"] = "LET*-INITIALIZE-VALUE");
5688         return v623;
5689     })((function (values,v617){
5690         checkArgs(arguments, 2);
5691         var i;
5692         return (function(){
5693             return (function(v618,v619){
5694                 return (l253.fvalue(pv, v618) !== l5.value ? l169.fvalue(values, l171.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l234), l45.fvalue(pv, v618), l45.fvalue(pv, v619))), ";", (function(){
5695                     var symbol = l134;
5696                     var value = symbol.value;
5697                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5698                     return value;
5699                 })()) : (function(){
5700                     var v620 = l192.fvalue(pv, v618);
5701                     var v621 = l175.fvalue(pv, v618, l106, v620);
5702                     return (function(v622){
5703                         l185.fvalue(pv, v621, (function(){
5704                             var symbol = l190;
5705                             var value = symbol.value;
5706                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5707                             return value;
5708                         })(), l106);
5709                         return v622;
5710                     })(l169.fvalue(pv, "var ", v620, " = ", l171.fvalue(pv, v619), ";", (function(){
5711                         var symbol = l134;
5712                         var value = symbol.value;
5713                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5714                         return value;
5715                     })()));
5716                 })());
5717             })(l40.fvalue(pv, v617),l41.fvalue(pv, v617));
5718         })();
5719     }));
5720     return l256;
5721 })();
5722 var l257 = {name: "LET*-BINDING-WRAPPER"};
5723 (function(){
5724     (l257).fvalue = (function(v632){
5725         ((v632)["fname"] = "LET*-BINDING-WRAPPER");
5726         return v632;
5727     })((function (values,v624,v625){
5728         checkArgs(arguments, 3);
5729         var i;
5730         return (function(){
5731             try {
5732                 (l13.fvalue(pv, v624) !== l5.value ? (function(){
5733                     var values = mv;
5734                     throw ({type: 'block', id: 215, values: v625, message: 'Return from unknown block LET*-BINDING-WRAPPER.'})
5735                 })() : l5.value);
5736                 return (function(v627){
5737                     return l169.fvalue(values, "try {", (function(){
5738                         var symbol = l134;
5739                         var value = symbol.value;
5740                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5741                         return value;
5742                     })(), l173.fvalue(pv, l139.fvalue(pv, (function (values,v628){
5743                         checkArgs(arguments, 2);
5744                         var i;
5745                         return (function(v629){
5746                             return l169.fvalue(values, "var ", (function(){
5747                                 var tmp = v628;
5748                                 return tmp === l5.value? l5.value: tmp.cdr;
5749                             })(), " = ", v629, ".value;", (function(){
5750                                 var symbol = l134;
5751                                 var value = symbol.value;
5752                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5753                                 return value;
5754                             })());
5755                         })(l171.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l164), l45.fvalue(pv, (function(){
5756                             var tmp = v628;
5757                             return tmp === l5.value? l5.value: tmp.car;
5758                         })()))));
5759                     }), v627), v625), "}", (function(){
5760                         var symbol = l134;
5761                         var value = symbol.value;
5762                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5763                         return value;
5764                     })(), "finally {", (function(){
5765                         var symbol = l134;
5766                         var value = symbol.value;
5767                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5768                         return value;
5769                     })(), l173.fvalue(pv, l139.fvalue(pv, (function (values,v630){
5770                         checkArgs(arguments, 2);
5771                         var i;
5772                         return (function(v631){
5773                             return l169.fvalue(values, v631, ".value", " = ", (function(){
5774                                 var tmp = v630;
5775                                 return tmp === l5.value? l5.value: tmp.cdr;
5776                             })(), ";", (function(){
5777                                 var symbol = l134;
5778                                 var value = symbol.value;
5779                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5780                                 return value;
5781                             })());
5782                         })(l171.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l164), l45.fvalue(pv, (function(){
5783                             var tmp = v630;
5784                             return tmp === l5.value? l5.value: tmp.car;
5785                         })()))));
5786                     }), v627)), "}", (function(){
5787                         var symbol = l134;
5788                         var value = symbol.value;
5789                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5790                         return value;
5791                     })());
5792                 })(l74.fvalue(pv, (function (values,v626){
5793                     checkArgs(arguments, 2);
5794                     var i;
5795                     return ({car: v626, cdr: l192.fvalue(pv, v626)});
5796                 }), l92.fvalue(pv, (function(){
5797                     var symbol = l253;
5798                     var func = symbol.fvalue;
5799                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5800                     return func;
5801                 })(), v624)));
5802             }
5803             catch (cf){
5804                 if (cf.type == 'block' && cf.id == 215)
5805                     return values.apply(this, forcemv(cf.values));
5806                 else
5807                     throw cf;
5808             }
5809         })();
5810     }));
5811     return l257;
5812 })();
5813 var l258 = {name: "LET*"};
5814 ((l208).value = ({car: l45.fvalue(pv, l258, (function (values,v634){
5815     checkArgsAtLeast(arguments, 2);
5816     var v633= l5.value;
5817     for (var i = arguments.length-1; i>=2; i--)
5818         v633 = {car: arguments[i], cdr:
5819     v633};
5820     var i;
5821     return (function(){
5822         return (function(v635,v636){
5823             try {
5824                 var tmp;
5825                 tmp = l190.value;
5826                 l190.value = v636;
5827                 v636 = tmp;
5828                 return l169.fvalue(values, "(function(){", (function(){
5829                     var symbol = l134;
5830                     var value = symbol.value;
5831                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5832                     return value;
5833                 })(), l173.fvalue(pv, (function(v637,v638){
5834                     return l257.fvalue(pv, v637, v638);
5835                 })(l92.fvalue(pv, (function(){
5836                     var symbol = l253;
5837                     var func = symbol.fvalue;
5838                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5839                     return func;
5840                 })(), l74.fvalue(pv, (function(){
5841                     var symbol = l40;
5842                     var func = symbol.fvalue;
5843                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5844                     return func;
5845                 })(), v635)),l135.fvalue(pv, l139.fvalue(pv, (function(){
5846                     var symbol = l256;
5847                     var func = symbol.fvalue;
5848                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5849                     return func;
5850                 })(), v635), l231.fvalue(pv, v633, l4.value)))), "})()");
5851             }
5852             finally {
5853                 l190.value = v636;
5854             }
5855         })(l74.fvalue(pv, (function(){
5856             var symbol = l59;
5857             var func = symbol.fvalue;
5858             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
5859             return func;
5860         })(), v634),l184.fvalue(pv, (function(){
5861             var symbol = l190;
5862             var value = symbol.value;
5863             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5864             return value;
5865         })()));
5866     })();
5867 })), cdr: (function(){
5868     var symbol = l208;
5869     var value = symbol.value;
5870     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5871     return value;
5872 })()}));
5873 var l259 = {name: "*BLOCK-COUNTER*"};
5874 (function(){
5875     (((l259.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l259).value = 0));
5876     return l259;
5877 })();
5878 var l260 = {name: "MULTIPLE-VALUE"};
5879 var l261 = {name: "USED"};
5880 ((l208).value = ({car: l45.fvalue(pv, l186, (function (values,v640){
5881     checkArgsAtLeast(arguments, 2);
5882     var v639= l5.value;
5883     for (var i = arguments.length-1; i>=2; i--)
5884         v639 = {car: arguments[i], cdr:
5885     v639};
5886     var i;
5887     return (function(){
5888         return (function(){
5889             var v641 = ((l259).value = (function(){
5890                 var x1 = (function(){
5891                     var symbol = l259;
5892                     var value = symbol.value;
5893                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5894                     return value;
5895                 })();
5896                 if (typeof x1 !== 'number') throw 'Not a number!';
5897                 var x2 = 1;
5898                 if (typeof x2 !== 'number') throw 'Not a number!';
5899                 return x1+x2;
5900             })());
5901             var v642 = l175.fvalue(pv, v640, l186, v641);
5902             ((function(){
5903                 var symbol = l174;
5904                 var value = symbol.value;
5905                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5906                 return value;
5907             })() !== l5.value ? l182.fvalue(pv, l260, v642) : l5.value);
5908             return (function(){
5909                 try {
5910                     var v644 = l190.value;
5911                     ((l190).value = l188.fvalue(pv, l45.fvalue(pv, v642), (function(){
5912                         var symbol = l190;
5913                         var value = symbol.value;
5914                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5915                         return value;
5916                     })(), l186));
5917                     var v643 = l231.fvalue(pv, v639, l4.value);
5918                     return (l89.fvalue(pv, l261, l179.fvalue(pv, v642)) !== l5.value ? l169.fvalue(values, "(function(){", (function(){
5919                         var symbol = l134;
5920                         var value = symbol.value;
5921                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5922                         return value;
5923                     })(), l173.fvalue(pv, "try {", (function(){
5924                         var symbol = l134;
5925                         var value = symbol.value;
5926                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5927                         return value;
5928                     })(), l173.fvalue(pv, v643), "}", (function(){
5929                         var symbol = l134;
5930                         var value = symbol.value;
5931                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5932                         return value;
5933                     })(), "catch (cf){", (function(){
5934                         var symbol = l134;
5935                         var value = symbol.value;
5936                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5937                         return value;
5938                     })(), "    if (cf.type == 'block' && cf.id == ", v641, ")", (function(){
5939                         var symbol = l134;
5940                         var value = symbol.value;
5941                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5942                         return value;
5943                     })(), ((function(){
5944                         var symbol = l174;
5945                         var value = symbol.value;
5946                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5947                         return value;
5948                     })() !== l5.value ? "        return values.apply(this, forcemv(cf.values));" : "        return cf.values;"), (function(){
5949                         var symbol = l134;
5950                         var value = symbol.value;
5951                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5952                         return value;
5953                     })(), "    else", (function(){
5954                         var symbol = l134;
5955                         var value = symbol.value;
5956                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5957                         return value;
5958                     })(), "        throw cf;", (function(){
5959                         var symbol = l134;
5960                         var value = symbol.value;
5961                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5962                         return value;
5963                     })(), "}", (function(){
5964                         var symbol = l134;
5965                         var value = symbol.value;
5966                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5967                         return value;
5968                     })()), "})()") : l169.fvalue(values, "(function(){", (function(){
5969                         var symbol = l134;
5970                         var value = symbol.value;
5971                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5972                         return value;
5973                     })(), l173.fvalue(pv, v643), "})()"));
5974                 }
5975                 finally {
5976                     l190.value = v644;
5977                 }
5978             })();
5979         })();
5980     })();
5981 })), cdr: (function(){
5982     var symbol = l208;
5983     var value = symbol.value;
5984     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
5985     return value;
5986 })()}));
5987 var l262 = {name: "RETURN-FROM"};
5988 ((l208).value = ({car: l45.fvalue(pv, l262, (function (values,v645,v646){
5989     checkArgsAtLeast(arguments, 2);
5990     checkArgsAtMost(arguments, 3);
5991     switch(arguments.length-1){
5992     case 1:
5993     v646=l5.value;
5994     default: break;
5995     }
5996     var i;
5997     return (function(){
5998         return (function(){
5999             var v647 = l189.fvalue(pv, v645, (function(){
6000                 var symbol = l190;
6001                 var value = symbol.value;
6002                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6003                 return value;
6004             })(), l186);
6005             var v648 = l89.fvalue(pv, l260, l179.fvalue(pv, v647));
6006             (l13.fvalue(pv, v647) !== l5.value ? (function(){
6007                 throw l135.fvalue(pv, "Unknown block `", (v645).name, "'.");
6008             })() : l5.value);
6009             l182.fvalue(pv, l261, v647);
6010             return l169.fvalue(values, "(function(){", (function(){
6011                 var symbol = l134;
6012                 var value = symbol.value;
6013                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6014                 return value;
6015             })(), l173.fvalue(pv, (v648 !== l5.value ? l169.fvalue(pv, "var values = mv;", (function(){
6016                 var symbol = l134;
6017                 var value = symbol.value;
6018                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6019                 return value;
6020             })()) : l5.value), "throw ({", "type: 'block', ", "id: ", l178.fvalue(pv, v647), ", ", "values: ", l171.fvalue(pv, v646, v648), ", ", "message: 'Return from unknown block ", (v645).name, ".'", "})"), "})()");
6021         })();
6022     })();
6023 })), cdr: (function(){
6024     var symbol = l208;
6025     var value = symbol.value;
6026     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6027     return value;
6028 })()}));
6029 var l263 = {name: "CATCH"};
6030 ((l208).value = ({car: l45.fvalue(pv, l263, (function (values,v650){
6031     checkArgsAtLeast(arguments, 2);
6032     var v649= l5.value;
6033     for (var i = arguments.length-1; i>=2; i--)
6034         v649 = {car: arguments[i], cdr:
6035     v649};
6036     var i;
6037     return (function(){
6038         return l169.fvalue(values, "(function(){", (function(){
6039             var symbol = l134;
6040             var value = symbol.value;
6041             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6042             return value;
6043         })(), l173.fvalue(pv, "var id = ", l171.fvalue(pv, v650), ";", (function(){
6044             var symbol = l134;
6045             var value = symbol.value;
6046             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6047             return value;
6048         })(), "try {", (function(){
6049             var symbol = l134;
6050             var value = symbol.value;
6051             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6052             return value;
6053         })(), l173.fvalue(pv, l231.fvalue(pv, v649, l4.value)), (function(){
6054             var symbol = l134;
6055             var value = symbol.value;
6056             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6057             return value;
6058         })(), "}", (function(){
6059             var symbol = l134;
6060             var value = symbol.value;
6061             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6062             return value;
6063         })(), "catch (cf){", (function(){
6064             var symbol = l134;
6065             var value = symbol.value;
6066             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6067             return value;
6068         })(), "    if (cf.type == 'catch' && cf.id == id)", (function(){
6069             var symbol = l134;
6070             var value = symbol.value;
6071             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6072             return value;
6073         })(), ((function(){
6074             var symbol = l174;
6075             var value = symbol.value;
6076             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6077             return value;
6078         })() !== l5.value ? "        return values.apply(this, forcemv(cf.values));" : "        return pv.apply(this, forcemv(cf.values));"), (function(){
6079             var symbol = l134;
6080             var value = symbol.value;
6081             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6082             return value;
6083         })(), "    else", (function(){
6084             var symbol = l134;
6085             var value = symbol.value;
6086             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6087             return value;
6088         })(), "        throw cf;", (function(){
6089             var symbol = l134;
6090             var value = symbol.value;
6091             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6092             return value;
6093         })(), "}", (function(){
6094             var symbol = l134;
6095             var value = symbol.value;
6096             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6097             return value;
6098         })()), "})()");
6099     })();
6100 })), cdr: (function(){
6101     var symbol = l208;
6102     var value = symbol.value;
6103     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6104     return value;
6105 })()}));
6106 var l264 = {name: "THROW"};
6107 ((l208).value = ({car: l45.fvalue(pv, l264, (function (values,v651,v652){
6108     checkArgs(arguments, 3);
6109     var i;
6110     return (function(){
6111         return l169.fvalue(values, "(function(){", (function(){
6112             var symbol = l134;
6113             var value = symbol.value;
6114             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6115             return value;
6116         })(), l173.fvalue(pv, "var values = mv;", (function(){
6117             var symbol = l134;
6118             var value = symbol.value;
6119             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6120             return value;
6121         })(), "throw ({", "type: 'catch', ", "id: ", l171.fvalue(pv, v651), ", ", "values: ", l171.fvalue(pv, v652, l4.value), ", ", "message: 'Throw uncatched.'", "})"), "})()");
6122     })();
6123 })), cdr: (function(){
6124     var symbol = l208;
6125     var value = symbol.value;
6126     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6127     return value;
6128 })()}));
6129 var l265 = {name: "*TAGBODY-COUNTER*"};
6130 (function(){
6131     (((l265.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l265).value = 0));
6132     return l265;
6133 })();
6134 var l266 = {name: "*GO-TAG-COUNTER*"};
6135 (function(){
6136     (((l266.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l266).value = 0));
6137     return l266;
6138 })();
6139 var l267 = {name: "GO-TAG-P"};
6140 (function(){
6141     (l267).fvalue = (function(v655){
6142         ((v655)["fname"] = "GO-TAG-P");
6143         return v655;
6144     })((function (values,v653){
6145         checkArgs(arguments, 2);
6146         var i;
6147         return (function(){
6148             return (function(v654){
6149                 return (v654 !== l5.value ? v654 : ((function(){
6150                     var tmp = v653;
6151                     return (typeof tmp == 'object' && 'name' in tmp);
6152                 })()?l4.value: l5.value));
6153             })(l82.fvalue(pv, v653));
6154         })();
6155     }));
6156     return l267;
6157 })();
6158 var l268 = {name: "DECLARE-TAGBODY-TAGS"};
6159 (function(){
6160     (l268).fvalue = (function(v661){
6161         ((v661)["fname"] = "DECLARE-TAGBODY-TAGS");
6162         return v661;
6163     })((function (values,v656,v657){
6164         checkArgs(arguments, 3);
6165         var i;
6166         return (function(){
6167             return (function(v660){
6168                 return l188.fvalue(values, v660, (function(){
6169                     var symbol = l190;
6170                     var value = symbol.value;
6171                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6172                     return value;
6173                 })(), l187);
6174             })(l74.fvalue(pv, (function (values,v658){
6175                 checkArgs(arguments, 2);
6176                 var i;
6177                 return (function(v659){
6178                     return l175.fvalue(values, v658, l187, l45.fvalue(pv, v656, v659));
6179                 })(l18.fvalue(pv, ((l266).value = (function(){
6180                     var x1 = (function(){
6181                         var symbol = l266;
6182                         var value = symbol.value;
6183                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6184                         return value;
6185                     })();
6186                     if (typeof x1 !== 'number') throw 'Not a number!';
6187                     var x2 = 1;
6188                     if (typeof x2 !== 'number') throw 'Not a number!';
6189                     return x1+x2;
6190                 })())));
6191             }), l92.fvalue(pv, (function(){
6192                 var symbol = l267;
6193                 var func = symbol.fvalue;
6194                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6195                 return func;
6196             })(), v657)));
6197         })();
6198     }));
6199     return l268;
6200 })();
6201 var l269 = {name: "TAGBODY"};
6202 ((l208).value = ({car: l45.fvalue(pv, l269, (function (values){
6203     var v662= l5.value;
6204     for (var i = arguments.length-1; i>=1; i--)
6205         v662 = {car: arguments[i], cdr:
6206     v662};
6207     var i;
6208     return (function(){
6209         try {
6210             (l96.fvalue(pv, (function(){
6211                 var symbol = l267;
6212                 var func = symbol.fvalue;
6213                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
6214                 return func;
6215             })(), v662) !== l5.value ? l5.value : (function(){
6216                 var values = mv;
6217                 throw ({type: 'block', id: 223, values: l171.fvalue(values, l65.fvalue(pv, l45.fvalue(pv, l250), v662, l45.fvalue(pv, l5))), message: 'Return from unknown block TAGBODY.'})
6218             })());
6219             (l267.fvalue(pv, (function(){
6220                 var tmp = v662;
6221                 return tmp === l5.value? l5.value: tmp.car;
6222             })()) !== l5.value ? l5.value : (v662 = ({car: l17.fvalue(pv, "START"), cdr: v662})));
6223             return (function(v663){
6224                 return (function(v665,v664){
6225                     try {
6226                         var tmp;
6227                         tmp = l190.value;
6228                         l190.value = v665;
6229                         v665 = tmp;
6230                         (function(v666){
6231                             return (v664 = l41.fvalue(pv, l178.fvalue(pv, v666)));
6232                         })(l189.fvalue(pv, l40.fvalue(pv, v662), (function(){
6233                             var symbol = l190;
6234                             var value = symbol.value;
6235                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6236                             return value;
6237                         })(), l187));
6238                         return l169.fvalue(values, "(function(){", (function(){
6239                             var symbol = l134;
6240                             var value = symbol.value;
6241                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6242                             return value;
6243                         })(), l173.fvalue(pv, "var tagbody_", v663, " = ", v664, ";", (function(){
6244                             var symbol = l134;
6245                             var value = symbol.value;
6246                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6247                             return value;
6248                         })(), "tbloop:", (function(){
6249                             var symbol = l134;
6250                             var value = symbol.value;
6251                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6252                             return value;
6253                         })(), "while (true) {", (function(){
6254                             var symbol = l134;
6255                             var value = symbol.value;
6256                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6257                             return value;
6258                         })(), l173.fvalue(pv, "try {", (function(){
6259                             var symbol = l134;
6260                             var value = symbol.value;
6261                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6262                             return value;
6263                         })(), l173.fvalue(pv, (function(v667){
6264                             return l169.fvalue(pv, "switch(tagbody_", v663, "){", (function(){
6265                                 var symbol = l134;
6266                                 var value = symbol.value;
6267                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6268                                 return value;
6269                             })(), "case ", v664, ":", (function(){
6270                                 var symbol = l134;
6271                                 var value = symbol.value;
6272                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6273                                 return value;
6274                             })(), (function(){
6275                                 return (function(v668,v669){
6276                                     (function(){
6277                                         while(v668 !== l5.value){
6278                                             (v669 = (function(){
6279                                                 var tmp = v668;
6280                                                 return tmp === l5.value? l5.value: tmp.car;
6281                                             })());
6282                                             (function(){
6283                                                 (v667 = l135.fvalue(pv, v667, (l28.fvalue(pv, l267.fvalue(pv, v669)) !== l5.value ? l173.fvalue(pv, l171.fvalue(pv, v669), ";", (function(){
6284                                                     var symbol = l134;
6285                                                     var value = symbol.value;
6286                                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6287                                                     return value;
6288                                                 })()) : (function(v670){
6289                                                     return l169.fvalue(pv, "case ", l41.fvalue(pv, l178.fvalue(pv, v670)), ":", (function(){
6290                                                         var symbol = l134;
6291                                                         var value = symbol.value;
6292                                                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6293                                                         return value;
6294                                                     })());
6295                                                 })(l189.fvalue(pv, v669, (function(){
6296                                                     var symbol = l190;
6297                                                     var value = symbol.value;
6298                                                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6299                                                     return value;
6300                                                 })(), l187)))));
6301                                                 return l5.value;
6302                                             })();
6303                                             (v668 = (function(){
6304                                                 var tmp = v668;
6305                                                 return tmp === l5.value? l5.value: tmp.cdr;
6306                                             })());
6307                                         }return l5.value;
6308                                     })();
6309                                     return v667;
6310                                 })((function(){
6311                                     var tmp = v662;
6312                                     return tmp === l5.value? l5.value: tmp.cdr;
6313                                 })(),l5.value);
6314                             })(), "default:", (function(){
6315                                 var symbol = l134;
6316                                 var value = symbol.value;
6317                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6318                                 return value;
6319                             })(), "    break tbloop;", (function(){
6320                                 var symbol = l134;
6321                                 var value = symbol.value;
6322                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6323                                 return value;
6324                             })(), "}", (function(){
6325                                 var symbol = l134;
6326                                 var value = symbol.value;
6327                                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6328                                 return value;
6329                             })());
6330                         })("")), "}", (function(){
6331                             var symbol = l134;
6332                             var value = symbol.value;
6333                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6334                             return value;
6335                         })(), "catch (jump) {", (function(){
6336                             var symbol = l134;
6337                             var value = symbol.value;
6338                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6339                             return value;
6340                         })(), "    if (jump.type == 'tagbody' && jump.id == ", v663, ")", (function(){
6341                             var symbol = l134;
6342                             var value = symbol.value;
6343                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6344                             return value;
6345                         })(), "        tagbody_", v663, " = jump.label;", (function(){
6346                             var symbol = l134;
6347                             var value = symbol.value;
6348                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6349                             return value;
6350                         })(), "    else", (function(){
6351                             var symbol = l134;
6352                             var value = symbol.value;
6353                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6354                             return value;
6355                         })(), "        throw(jump);", (function(){
6356                             var symbol = l134;
6357                             var value = symbol.value;
6358                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6359                             return value;
6360                         })(), "}", (function(){
6361                             var symbol = l134;
6362                             var value = symbol.value;
6363                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6364                             return value;
6365                         })()), "}", (function(){
6366                             var symbol = l134;
6367                             var value = symbol.value;
6368                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6369                             return value;
6370                         })(), "return ", l171.fvalue(pv, l5.value), ";", (function(){
6371                             var symbol = l134;
6372                             var value = symbol.value;
6373                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6374                             return value;
6375                         })()), "})()");
6376                     }
6377                     finally {
6378                         l190.value = v665;
6379                     }
6380                 })(l268.fvalue(pv, v663, v662),l5.value);
6381             })((function(){
6382                 var symbol = l265;
6383                 var value = symbol.value;
6384                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6385                 return value;
6386             })());
6387         }
6388         catch (cf){
6389             if (cf.type == 'block' && cf.id == 223)
6390                 return values.apply(this, forcemv(cf.values));
6391             else
6392                 throw cf;
6393         }
6394     })();
6395 })), cdr: (function(){
6396     var symbol = l208;
6397     var value = symbol.value;
6398     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6399     return value;
6400 })()}));
6401 var l270 = {name: "GO"};
6402 ((l208).value = ({car: l45.fvalue(pv, l270, (function (values,v671){
6403     checkArgs(arguments, 2);
6404     var i;
6405     return (function(){
6406         return (function(v672,v673){
6407             (l13.fvalue(pv, v672) !== l5.value ? (function(){
6408                 throw l135.fvalue(pv, "Unknown tag `", v673, "'.");
6409             })() : l5.value);
6410             return l169.fvalue(values, "(function(){", (function(){
6411                 var symbol = l134;
6412                 var value = symbol.value;
6413                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6414                 return value;
6415             })(), l173.fvalue(pv, "throw ({", "type: 'tagbody', ", "id: ", l40.fvalue(pv, l178.fvalue(pv, v672)), ", ", "label: ", l41.fvalue(pv, l178.fvalue(pv, v672)), ", ", "message: 'Attempt to GO to non-existing tag ", v673, "'", "})", (function(){
6416                 var symbol = l134;
6417                 var value = symbol.value;
6418                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6419                 return value;
6420             })()), "})()");
6421         })(l189.fvalue(pv, v671, (function(){
6422             var symbol = l190;
6423             var value = symbol.value;
6424             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6425             return value;
6426         })(), l187),(((function(){
6427             var tmp = v671;
6428             return (typeof tmp == 'object' && 'name' in tmp);
6429         })()?l4.value: l5.value) !== l5.value ? (v671).name : (l82.fvalue(pv, v671) !== l5.value ? l18.fvalue(pv, v671) : l5.value)));
6430     })();
6431 })), cdr: (function(){
6432     var symbol = l208;
6433     var value = symbol.value;
6434     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6435     return value;
6436 })()}));
6437 var l271 = {name: "UNWIND-PROTECT"};
6438 ((l208).value = ({car: l45.fvalue(pv, l271, (function (values,v675){
6439     checkArgsAtLeast(arguments, 2);
6440     var v674= l5.value;
6441     for (var i = arguments.length-1; i>=2; i--)
6442         v674 = {car: arguments[i], cdr:
6443     v674};
6444     var i;
6445     return (function(){
6446         return l169.fvalue(values, "(function(){", (function(){
6447             var symbol = l134;
6448             var value = symbol.value;
6449             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6450             return value;
6451         })(), l173.fvalue(pv, "var ret = ", l171.fvalue(pv, l5.value), ";", (function(){
6452             var symbol = l134;
6453             var value = symbol.value;
6454             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6455             return value;
6456         })(), "try {", (function(){
6457             var symbol = l134;
6458             var value = symbol.value;
6459             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6460             return value;
6461         })(), l173.fvalue(pv, "ret = ", l171.fvalue(pv, v675), ";", (function(){
6462             var symbol = l134;
6463             var value = symbol.value;
6464             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6465             return value;
6466         })()), "} finally {", (function(){
6467             var symbol = l134;
6468             var value = symbol.value;
6469             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6470             return value;
6471         })(), l173.fvalue(pv, l231.fvalue(pv, v674)), "}", (function(){
6472             var symbol = l134;
6473             var value = symbol.value;
6474             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6475             return value;
6476         })(), "return ret;", (function(){
6477             var symbol = l134;
6478             var value = symbol.value;
6479             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6480             return value;
6481         })()), "})()");
6482     })();
6483 })), cdr: (function(){
6484     var symbol = l208;
6485     var value = symbol.value;
6486     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6487     return value;
6488 })()}));
6489 var l272 = {name: "MULTIPLE-VALUE-CALL"};
6490 ((l208).value = ({car: l45.fvalue(pv, l272, (function (values,v677){
6491     checkArgsAtLeast(arguments, 2);
6492     var v676= l5.value;
6493     for (var i = arguments.length-1; i>=2; i--)
6494         v676 = {car: arguments[i], cdr:
6495     v676};
6496     var i;
6497     return (function(){
6498         return l169.fvalue(values, "(function(){", (function(){
6499             var symbol = l134;
6500             var value = symbol.value;
6501             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6502             return value;
6503         })(), l173.fvalue(pv, "var func = ", l171.fvalue(pv, v677), ";", (function(){
6504             var symbol = l134;
6505             var value = symbol.value;
6506             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6507             return value;
6508         })(), "var args = [", ((function(){
6509             var symbol = l174;
6510             var value = symbol.value;
6511             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6512             return value;
6513         })() !== l5.value ? "values" : "pv"), "];", (function(){
6514             var symbol = l134;
6515             var value = symbol.value;
6516             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6517             return value;
6518         })(), "return ", l169.fvalue(pv, "(function(){", (function(){
6519             var symbol = l134;
6520             var value = symbol.value;
6521             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6522             return value;
6523         })(), l173.fvalue(pv, "var values = mv;", (function(){
6524             var symbol = l134;
6525             var value = symbol.value;
6526             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6527             return value;
6528         })(), "var vs;", (function(){
6529             var symbol = l134;
6530             var value = symbol.value;
6531             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6532             return value;
6533         })(), l139.fvalue(pv, (function (values,v678){
6534             checkArgs(arguments, 2);
6535             var i;
6536             return l169.fvalue(values, "vs = ", l171.fvalue(pv, v678, l4.value), ";", (function(){
6537                 var symbol = l134;
6538                 var value = symbol.value;
6539                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6540                 return value;
6541             })(), "if (typeof vs === 'object' && 'multiple-value' in vs)", (function(){
6542                 var symbol = l134;
6543                 var value = symbol.value;
6544                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6545                 return value;
6546             })(), l173.fvalue(pv, "args = args.concat(vs);", (function(){
6547                 var symbol = l134;
6548                 var value = symbol.value;
6549                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6550                 return value;
6551             })()), "else", (function(){
6552                 var symbol = l134;
6553                 var value = symbol.value;
6554                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6555                 return value;
6556             })(), l173.fvalue(pv, "args.push(vs);", (function(){
6557                 var symbol = l134;
6558                 var value = symbol.value;
6559                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6560                 return value;
6561             })()));
6562         }), v676), "return func.apply(window, args);", (function(){
6563             var symbol = l134;
6564             var value = symbol.value;
6565             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6566             return value;
6567         })()), "})()"), ";", (function(){
6568             var symbol = l134;
6569             var value = symbol.value;
6570             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6571             return value;
6572         })()), "})()");
6573     })();
6574 })), cdr: (function(){
6575     var symbol = l208;
6576     var value = symbol.value;
6577     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6578     return value;
6579 })()}));
6580 var l273 = {name: "MULTIPLE-VALUE-PROG1"};
6581 ((l208).value = ({car: l45.fvalue(pv, l273, (function (values,v680){
6582     checkArgsAtLeast(arguments, 2);
6583     var v679= l5.value;
6584     for (var i = arguments.length-1; i>=2; i--)
6585         v679 = {car: arguments[i], cdr:
6586     v679};
6587     var i;
6588     return (function(){
6589         return l169.fvalue(values, "(function(){", (function(){
6590             var symbol = l134;
6591             var value = symbol.value;
6592             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6593             return value;
6594         })(), l173.fvalue(pv, "var args = ", l171.fvalue(pv, v680, (function(){
6595             var symbol = l174;
6596             var value = symbol.value;
6597             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6598             return value;
6599         })()), ";", (function(){
6600             var symbol = l134;
6601             var value = symbol.value;
6602             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6603             return value;
6604         })(), l231.fvalue(pv, v679), "return args;", (function(){
6605             var symbol = l134;
6606             var value = symbol.value;
6607             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6608             return value;
6609         })()), "})()");
6610     })();
6611 })), cdr: (function(){
6612     var symbol = l208;
6613     var value = symbol.value;
6614     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6615     return value;
6616 })()}));
6617 var l274 = {name: "BACKQUOTE-EXPAND-1"};
6618 (function(){
6619     (l274).fvalue = (function(v683){
6620         ((v683)["fname"] = "BACKQUOTE-EXPAND-1");
6621         return v683;
6622     })((function (values,v681){
6623         checkArgs(arguments, 2);
6624         var i;
6625         return (function(){
6626             return (((function(){
6627                 var tmp = v681;
6628                 return (typeof tmp == 'object' && 'name' in tmp);
6629             })()?l4.value: l5.value) !== l5.value ? l45.fvalue(values, l164, v681) : (l46.fvalue(pv, v681) !== l5.value ? v681 : ((((function(){
6630                 var tmp = v681;
6631                 return tmp === l5.value? l5.value: tmp.car;
6632             })() === l167)?l4.value: l5.value) !== l5.value ? (function(){
6633                 var tmp = v681;
6634                 return tmp === l5.value? l5.value: tmp.car;
6635             })() : ((((function(){
6636                 var tmp = v681;
6637                 return tmp === l5.value? l5.value: tmp.car;
6638             })() === l165)?l4.value: l5.value) !== l5.value ? l274.fvalue(values, l274.fvalue(pv, l34.fvalue(pv, v681))) : ({car: l65, cdr: l74.fvalue(pv, (function (values,v682){
6639                 checkArgs(arguments, 2);
6640                 var i;
6641                 return ((l60.fvalue(pv, v682) !== l5.value ? (((function(){
6642                     var tmp = v682;
6643                     return tmp === l5.value? l5.value: tmp.car;
6644                 })() === l167)?l4.value: l5.value) : l5.value) !== l5.value ? l45.fvalue(values, l45, l34.fvalue(pv, v682)) : ((l60.fvalue(pv, v682) !== l5.value ? (((function(){
6645                     var tmp = v682;
6646                     return tmp === l5.value? l5.value: tmp.car;
6647                 })() === l166)?l4.value: l5.value) : l5.value) !== l5.value ? l34.fvalue(values, v682) : l45.fvalue(values, l45, l274.fvalue(pv, v682))));
6648             }), v681)})))));
6649         })();
6650     }));
6651     return l274;
6652 })();
6653 var l275 = {name: "BACKQUOTE-EXPAND"};
6654 (function(){
6655     (l275).fvalue = (function(v685){
6656         ((v685)["fname"] = "BACKQUOTE-EXPAND");
6657         return v685;
6658     })((function (values,v684){
6659         checkArgs(arguments, 2);
6660         var i;
6661         return (function(){
6662             return ((l60.fvalue(pv, v684) !== l5.value ? (((function(){
6663                 var tmp = v684;
6664                 return tmp === l5.value? l5.value: tmp.car;
6665             })() === l165)?l4.value: l5.value) : l5.value) !== l5.value ? l274.fvalue(values, l34.fvalue(pv, v684)) : v684);
6666         })();
6667     }));
6668     return l275;
6669 })();
6670 l165;
6671 ((l208).value = ({car: l45.fvalue(pv, l165, (function (values,v686){
6672     checkArgs(arguments, 2);
6673     var i;
6674     return (function(){
6675         return l171.fvalue(values, l274.fvalue(pv, v686));
6676     })();
6677 })), cdr: (function(){
6678     var symbol = l208;
6679     var value = symbol.value;
6680     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6681     return value;
6682 })()}));
6683 var l276 = {name: "*BUILTINS*"};
6684 (function(){
6685     (((l276.value !== undefined)?l4.value: l5.value) !== l5.value ? l5.value : ((l276).value = l5.value));
6686     return l276;
6687 })();
6688 var l277 = {name: "DEFINE-RAW-BUILTIN"};
6689 l277;
6690 var l278 = {name: "DEFINE-BUILTIN"};
6691 l278;
6692 var l279 = {name: "TYPE-CHECK"};
6693 l279;
6694 var l280 = {name: "VARIABLE-ARITY-CALL"};
6695 (function(){
6696     (l280).fvalue = (function(v695){
6697         ((v695)["fname"] = "VARIABLE-ARITY-CALL");
6698         return v695;
6699     })((function (values,v687,v688){
6700         checkArgs(arguments, 3);
6701         var i;
6702         return (function(){
6703             (((function(){
6704                 var tmp = v687;
6705                 return (typeof tmp == 'object' && 'car' in tmp);
6706             })()?l4.value: l5.value) !== l5.value ? l5.value : (function(){
6707                 throw "ARGS must be a non-empty list";
6708             })());
6709             return (function(v689,v690,v691){
6710                 (function(){
6711                     return (function(v692,v693){
6712                         (function(){
6713                             while(v692 !== l5.value){
6714                                 (v693 = (function(){
6715                                     var tmp = v692;
6716                                     return tmp === l5.value? l5.value: tmp.car;
6717                                 })());
6718                                 (function(){
6719                                     (function(v694){
6720                                         (v690 = ({car: v694, cdr: v690}));
6721                                         return (v691 = l135.fvalue(pv, v691, l169.fvalue(pv, "var ", v694, " = ", l171.fvalue(pv, v693), ";", (function(){
6722                                             var symbol = l134;
6723                                             var value = symbol.value;
6724                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6725                                             return value;
6726                                         })(), "if (typeof ", v694, " !== 'number') throw 'Not a number!';", (function(){
6727                                             var symbol = l134;
6728                                             var value = symbol.value;
6729                                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6730                                             return value;
6731                                         })())));
6732                                     })(l169.fvalue(pv, "x", (v689 = (function(){
6733                                         var x1 = v689;
6734                                         if (typeof x1 !== 'number') throw 'Not a number!';
6735                                         var x2 = 1;
6736                                         if (typeof x2 !== 'number') throw 'Not a number!';
6737                                         return x1+x2;
6738                                     })())));
6739                                     return l5.value;
6740                                 })();
6741                                 (v692 = (function(){
6742                                     var tmp = v692;
6743                                     return tmp === l5.value? l5.value: tmp.cdr;
6744                                 })());
6745                             }return l5.value;
6746                         })();
6747                         return l5.value;
6748                     })(v687,l5.value);
6749                 })();
6750                 return l169.fvalue(values, "(function(){", (function(){
6751                     var symbol = l134;
6752                     var value = symbol.value;
6753                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6754                     return value;
6755                 })(), l173.fvalue(pv, v691, (v688)(pv, l67.fvalue(pv, v690))), "})()");
6756             })(0,l5,"");
6757         })();
6758     }));
6759     return l280;
6760 })();
6761 var l281 = {name: "VARIABLE-ARITY"};
6762 l281;
6763 var l282 = {name: "NUM-OP-NUM"};
6764 (function(){
6765     (l282).fvalue = (function(v699){
6766         ((v699)["fname"] = "NUM-OP-NUM");
6767         return v699;
6768     })((function (values,v696,v697,v698){
6769         checkArgs(arguments, 4);
6770         var i;
6771         return (function(){
6772             return l169.fvalue(values, "(function(){", (function(){
6773                 var symbol = l134;
6774                 var value = symbol.value;
6775                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6776                 return value;
6777             })(), l173.fvalue(pv, l169.fvalue(pv, "var ", "x", " = ", v696, ";", (function(){
6778                 var symbol = l134;
6779                 var value = symbol.value;
6780                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6781                 return value;
6782             })()), l169.fvalue(pv, "var ", "y", " = ", v698, ";", (function(){
6783                 var symbol = l134;
6784                 var value = symbol.value;
6785                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6786                 return value;
6787             })()), l169.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
6788                 var symbol = l134;
6789                 var value = symbol.value;
6790                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6791                 return value;
6792             })(), l173.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
6793                 var symbol = l134;
6794                 var value = symbol.value;
6795                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6796                 return value;
6797             })())), l169.fvalue(pv, "if (typeof ", "y", " != '", "number", "')", (function(){
6798                 var symbol = l134;
6799                 var value = symbol.value;
6800                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6801                 return value;
6802             })(), l173.fvalue(pv, "throw 'The value ' + ", "y", " + ' is not a type ", "number", ".';", (function(){
6803                 var symbol = l134;
6804                 var value = symbol.value;
6805                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6806                 return value;
6807             })())), l169.fvalue(pv, "return ", l169.fvalue(pv, "x", v697, "y"), ";", (function(){
6808                 var symbol = l134;
6809                 var value = symbol.value;
6810                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6811                 return value;
6812             })())), "})()");
6813         })();
6814     }));
6815     return l282;
6816 })();
6817 ((l276).value = ({car: l45.fvalue(pv, l62, (function (values){
6818     var v700= l5.value;
6819     for (var i = arguments.length-1; i>=1; i--)
6820         v700 = {car: arguments[i], cdr:
6821     v700};
6822     var i;
6823     return (function(){
6824         return (l13.fvalue(pv, v700) !== l5.value ? "0" : l280.fvalue(values, v700, (function (values,v701){
6825             checkArgs(arguments, 2);
6826             var i;
6827             return l135.fvalue(values, "return ", l137.fvalue(pv, v701, "+"), ";", (function(){
6828                 var symbol = l134;
6829                 var value = symbol.value;
6830                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6831                 return value;
6832             })());
6833         })));
6834     })();
6835 })), cdr: (function(){
6836     var symbol = l276;
6837     var value = symbol.value;
6838     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6839     return value;
6840 })()}));
6841 ((l276).value = ({car: l45.fvalue(pv, l63, (function (values,v703){
6842     checkArgsAtLeast(arguments, 2);
6843     var v702= l5.value;
6844     for (var i = arguments.length-1; i>=2; i--)
6845         v702 = {car: arguments[i], cdr:
6846     v702};
6847     var i;
6848     return (function(){
6849         return (function(v704){
6850             return l280.fvalue(values, v704, (function (values,v705){
6851                 checkArgs(arguments, 2);
6852                 var i;
6853                 return l135.fvalue(values, "return ", (l13.fvalue(pv, v702) !== l5.value ? l135.fvalue(pv, "-", (function(){
6854                     var tmp = v705;
6855                     return tmp === l5.value? l5.value: tmp.car;
6856                 })()) : l137.fvalue(pv, v705, "-")), ";", (function(){
6857                     var symbol = l134;
6858                     var value = symbol.value;
6859                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6860                     return value;
6861                 })());
6862             }));
6863         })(({car: v703, cdr: v702}));
6864     })();
6865 })), cdr: (function(){
6866     var symbol = l276;
6867     var value = symbol.value;
6868     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6869     return value;
6870 })()}));
6871 ((l276).value = ({car: l45.fvalue(pv, l21, (function (values){
6872     var v706= l5.value;
6873     for (var i = arguments.length-1; i>=1; i--)
6874         v706 = {car: arguments[i], cdr:
6875     v706};
6876     var i;
6877     return (function(){
6878         return (l13.fvalue(pv, v706) !== l5.value ? "1" : l280.fvalue(values, v706, (function (values,v707){
6879             checkArgs(arguments, 2);
6880             var i;
6881             return l135.fvalue(values, "return ", l137.fvalue(pv, v707, "*"), ";", (function(){
6882                 var symbol = l134;
6883                 var value = symbol.value;
6884                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6885                 return value;
6886             })());
6887         })));
6888     })();
6889 })), cdr: (function(){
6890     var symbol = l276;
6891     var value = symbol.value;
6892     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6893     return value;
6894 })()}));
6895 ((l276).value = ({car: l45.fvalue(pv, l22, (function (values,v709){
6896     checkArgsAtLeast(arguments, 2);
6897     var v708= l5.value;
6898     for (var i = arguments.length-1; i>=2; i--)
6899         v708 = {car: arguments[i], cdr:
6900     v708};
6901     var i;
6902     return (function(){
6903         return (function(v710){
6904             return l280.fvalue(values, v710, (function (values,v711){
6905                 checkArgs(arguments, 2);
6906                 var i;
6907                 return l135.fvalue(values, "return ", (l13.fvalue(pv, v708) !== l5.value ? l135.fvalue(pv, "1 /", (function(){
6908                     var tmp = v711;
6909                     return tmp === l5.value? l5.value: tmp.car;
6910                 })()) : l137.fvalue(pv, v711, "/")), ";", (function(){
6911                     var symbol = l134;
6912                     var value = symbol.value;
6913                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6914                     return value;
6915                 })());
6916             }));
6917         })(({car: v709, cdr: v708}));
6918     })();
6919 })), cdr: (function(){
6920     var symbol = l276;
6921     var value = symbol.value;
6922     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6923     return value;
6924 })()}));
6925 var l283 = {name: "MOD"};
6926 ((l276).value = ({car: l45.fvalue(pv, l283, (function (values,v712,v713){
6927     checkArgs(arguments, 3);
6928     var i;
6929     return (function(){
6930         return (function(v714,v715){
6931             return l282.fvalue(values, v714, "%", v715);
6932         })(l171.fvalue(pv, v712),l171.fvalue(pv, v713));
6933     })();
6934 })), cdr: (function(){
6935     var symbol = l276;
6936     var value = symbol.value;
6937     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6938     return value;
6939 })()}));
6940 var l284 = {name: "COMPARISON-CONJUNTION"};
6941 (function(){
6942     (l284).fvalue = (function(v718){
6943         ((v718)["fname"] = "COMPARISON-CONJUNTION");
6944         return v718;
6945     })((function (values,v716,v717){
6946         checkArgs(arguments, 3);
6947         var i;
6948         return (function(){
6949             return (l13.fvalue(pv, (function(){
6950                 var tmp = v716;
6951                 return tmp === l5.value? l5.value: tmp.cdr;
6952             })()) !== l5.value ? "true" : (l13.fvalue(pv, l36.fvalue(pv, v716)) !== l5.value ? l135.fvalue(values, (function(){
6953                 var tmp = v716;
6954                 return tmp === l5.value? l5.value: tmp.car;
6955             })(), v717, l34.fvalue(pv, v716)) : l135.fvalue(values, (function(){
6956                 var tmp = v716;
6957                 return tmp === l5.value? l5.value: tmp.car;
6958             })(), v717, l34.fvalue(pv, v716), " && ", l284.fvalue(pv, (function(){
6959                 var tmp = v716;
6960                 return tmp === l5.value? l5.value: tmp.cdr;
6961             })(), v717))));
6962         })();
6963     }));
6964     return l284;
6965 })();
6966 var l285 = {name: "DEFINE-BUILTIN-COMPARISON"};
6967 l285;
6968 var l286 = {name: ">"};
6969 ((l276).value = ({car: l45.fvalue(pv, l286, (function (values,v720){
6970     checkArgsAtLeast(arguments, 2);
6971     var v719= l5.value;
6972     for (var i = arguments.length-1; i>=2; i--)
6973         v719 = {car: arguments[i], cdr:
6974     v719};
6975     var i;
6976     return (function(){
6977         return (function(v721){
6978             return l280.fvalue(values, v721, (function (values,v722){
6979                 checkArgs(arguments, 2);
6980                 var i;
6981                 return l135.fvalue(values, "return ", l170.fvalue(pv, l284.fvalue(pv, v722, ">")), ";", (function(){
6982                     var symbol = l134;
6983                     var value = symbol.value;
6984                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6985                     return value;
6986                 })());
6987             }));
6988         })(({car: v720, cdr: v719}));
6989     })();
6990 })), cdr: (function(){
6991     var symbol = l276;
6992     var value = symbol.value;
6993     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
6994     return value;
6995 })()}));
6996 var l287 = {name: "<"};
6997 ((l276).value = ({car: l45.fvalue(pv, l287, (function (values,v724){
6998     checkArgsAtLeast(arguments, 2);
6999     var v723= l5.value;
7000     for (var i = arguments.length-1; i>=2; i--)
7001         v723 = {car: arguments[i], cdr:
7002     v723};
7003     var i;
7004     return (function(){
7005         return (function(v725){
7006             return l280.fvalue(values, v725, (function (values,v726){
7007                 checkArgs(arguments, 2);
7008                 var i;
7009                 return l135.fvalue(values, "return ", l170.fvalue(pv, l284.fvalue(pv, v726, "<")), ";", (function(){
7010                     var symbol = l134;
7011                     var value = symbol.value;
7012                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7013                     return value;
7014                 })());
7015             }));
7016         })(({car: v724, cdr: v723}));
7017     })();
7018 })), cdr: (function(){
7019     var symbol = l276;
7020     var value = symbol.value;
7021     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7022     return value;
7023 })()}));
7024 var l288 = {name: ">="};
7025 ((l276).value = ({car: l45.fvalue(pv, l288, (function (values,v728){
7026     checkArgsAtLeast(arguments, 2);
7027     var v727= l5.value;
7028     for (var i = arguments.length-1; i>=2; i--)
7029         v727 = {car: arguments[i], cdr:
7030     v727};
7031     var i;
7032     return (function(){
7033         return (function(v729){
7034             return l280.fvalue(values, v729, (function (values,v730){
7035                 checkArgs(arguments, 2);
7036                 var i;
7037                 return l135.fvalue(values, "return ", l170.fvalue(pv, l284.fvalue(pv, v730, ">=")), ";", (function(){
7038                     var symbol = l134;
7039                     var value = symbol.value;
7040                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7041                     return value;
7042                 })());
7043             }));
7044         })(({car: v728, cdr: v727}));
7045     })();
7046 })), cdr: (function(){
7047     var symbol = l276;
7048     var value = symbol.value;
7049     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7050     return value;
7051 })()}));
7052 var l289 = {name: "<="};
7053 ((l276).value = ({car: l45.fvalue(pv, l289, (function (values,v732){
7054     checkArgsAtLeast(arguments, 2);
7055     var v731= l5.value;
7056     for (var i = arguments.length-1; i>=2; i--)
7057         v731 = {car: arguments[i], cdr:
7058     v731};
7059     var i;
7060     return (function(){
7061         return (function(v733){
7062             return l280.fvalue(values, v733, (function (values,v734){
7063                 checkArgs(arguments, 2);
7064                 var i;
7065                 return l135.fvalue(values, "return ", l170.fvalue(pv, l284.fvalue(pv, v734, "<=")), ";", (function(){
7066                     var symbol = l134;
7067                     var value = symbol.value;
7068                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7069                     return value;
7070                 })());
7071             }));
7072         })(({car: v732, cdr: v731}));
7073     })();
7074 })), cdr: (function(){
7075     var symbol = l276;
7076     var value = symbol.value;
7077     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7078     return value;
7079 })()}));
7080 ((l276).value = ({car: l45.fvalue(pv, l20, (function (values,v736){
7081     checkArgsAtLeast(arguments, 2);
7082     var v735= l5.value;
7083     for (var i = arguments.length-1; i>=2; i--)
7084         v735 = {car: arguments[i], cdr:
7085     v735};
7086     var i;
7087     return (function(){
7088         return (function(v737){
7089             return l280.fvalue(values, v737, (function (values,v738){
7090                 checkArgs(arguments, 2);
7091                 var i;
7092                 return l135.fvalue(values, "return ", l170.fvalue(pv, l284.fvalue(pv, v738, "==")), ";", (function(){
7093                     var symbol = l134;
7094                     var value = symbol.value;
7095                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7096                     return value;
7097                 })());
7098             }));
7099         })(({car: v736, cdr: v735}));
7100     })();
7101 })), cdr: (function(){
7102     var symbol = l276;
7103     var value = symbol.value;
7104     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7105     return value;
7106 })()}));
7107 var l290 = {name: "NUMBERP"};
7108 ((l276).value = ({car: l45.fvalue(pv, l290, (function (values,v739){
7109     checkArgs(arguments, 2);
7110     var i;
7111     return (function(){
7112         return (function(v740){
7113             return l170.fvalue(values, l169.fvalue(pv, "(typeof (", v740, ") == \"number\")"));
7114         })(l171.fvalue(pv, v739));
7115     })();
7116 })), cdr: (function(){
7117     var symbol = l276;
7118     var value = symbol.value;
7119     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7120     return value;
7121 })()}));
7122 var l291 = {name: "FLOOR"};
7123 ((l276).value = ({car: l45.fvalue(pv, l291, (function (values,v741){
7124     checkArgs(arguments, 2);
7125     var i;
7126     return (function(){
7127         return (function(v742){
7128             return l169.fvalue(values, "(function(){", (function(){
7129                 var symbol = l134;
7130                 var value = symbol.value;
7131                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7132                 return value;
7133             })(), l173.fvalue(pv, l169.fvalue(pv, "var ", "x", " = ", v742, ";", (function(){
7134                 var symbol = l134;
7135                 var value = symbol.value;
7136                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7137                 return value;
7138             })()), l169.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
7139                 var symbol = l134;
7140                 var value = symbol.value;
7141                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7142                 return value;
7143             })(), l173.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
7144                 var symbol = l134;
7145                 var value = symbol.value;
7146                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7147                 return value;
7148             })())), l169.fvalue(pv, "return ", "Math.floor(x)", ";", (function(){
7149                 var symbol = l134;
7150                 var value = symbol.value;
7151                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7152                 return value;
7153             })())), "})()");
7154         })(l171.fvalue(pv, v741));
7155     })();
7156 })), cdr: (function(){
7157     var symbol = l276;
7158     var value = symbol.value;
7159     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7160     return value;
7161 })()}));
7162 ((l276).value = ({car: l45.fvalue(pv, l29, (function (values,v743,v744){
7163     checkArgs(arguments, 3);
7164     var i;
7165     return (function(){
7166         return (function(v745,v746){
7167             return l169.fvalue(values, "({car: ", v745, ", cdr: ", v746, "})");
7168         })(l171.fvalue(pv, v743),l171.fvalue(pv, v744));
7169     })();
7170 })), cdr: (function(){
7171     var symbol = l276;
7172     var value = symbol.value;
7173     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7174     return value;
7175 })()}));
7176 ((l276).value = ({car: l45.fvalue(pv, l30, (function (values,v747){
7177     checkArgs(arguments, 2);
7178     var i;
7179     return (function(){
7180         return (function(v748){
7181             return l170.fvalue(values, l169.fvalue(pv, "(function(){", (function(){
7182                 var symbol = l134;
7183                 var value = symbol.value;
7184                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7185                 return value;
7186             })(), l173.fvalue(pv, "var tmp = ", v748, ";", (function(){
7187                 var symbol = l134;
7188                 var value = symbol.value;
7189                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7190                 return value;
7191             })(), "return (typeof tmp == 'object' && 'car' in tmp);", (function(){
7192                 var symbol = l134;
7193                 var value = symbol.value;
7194                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7195                 return value;
7196             })()), "})()"));
7197         })(l171.fvalue(pv, v747));
7198     })();
7199 })), cdr: (function(){
7200     var symbol = l276;
7201     var value = symbol.value;
7202     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7203     return value;
7204 })()}));
7205 ((l276).value = ({car: l45.fvalue(pv, l31, (function (values,v749){
7206     checkArgs(arguments, 2);
7207     var i;
7208     return (function(){
7209         return (function(v750){
7210             return l169.fvalue(values, "(function(){", (function(){
7211                 var symbol = l134;
7212                 var value = symbol.value;
7213                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7214                 return value;
7215             })(), l173.fvalue(pv, "var tmp = ", v750, ";", (function(){
7216                 var symbol = l134;
7217                 var value = symbol.value;
7218                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7219                 return value;
7220             })(), "return tmp === ", l171.fvalue(pv, l5.value), "? ", l171.fvalue(pv, l5.value), ": tmp.car;", (function(){
7221                 var symbol = l134;
7222                 var value = symbol.value;
7223                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7224                 return value;
7225             })()), "})()");
7226         })(l171.fvalue(pv, v749));
7227     })();
7228 })), cdr: (function(){
7229     var symbol = l276;
7230     var value = symbol.value;
7231     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7232     return value;
7233 })()}));
7234 ((l276).value = ({car: l45.fvalue(pv, l32, (function (values,v751){
7235     checkArgs(arguments, 2);
7236     var i;
7237     return (function(){
7238         return (function(v752){
7239             return l169.fvalue(values, "(function(){", (function(){
7240                 var symbol = l134;
7241                 var value = symbol.value;
7242                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7243                 return value;
7244             })(), l173.fvalue(pv, "var tmp = ", v752, ";", (function(){
7245                 var symbol = l134;
7246                 var value = symbol.value;
7247                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7248                 return value;
7249             })(), "return tmp === ", l171.fvalue(pv, l5.value), "? ", l171.fvalue(pv, l5.value), ": tmp.cdr;", (function(){
7250                 var symbol = l134;
7251                 var value = symbol.value;
7252                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7253                 return value;
7254             })()), "})()");
7255         })(l171.fvalue(pv, v751));
7256     })();
7257 })), cdr: (function(){
7258     var symbol = l276;
7259     var value = symbol.value;
7260     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7261     return value;
7262 })()}));
7263 var l292 = {name: "RPLACA"};
7264 ((l276).value = ({car: l45.fvalue(pv, l292, (function (values,v753,v754){
7265     checkArgs(arguments, 3);
7266     var i;
7267     return (function(){
7268         return (function(v755,v756){
7269             return l169.fvalue(values, "(function(){", (function(){
7270                 var symbol = l134;
7271                 var value = symbol.value;
7272                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7273                 return value;
7274             })(), l173.fvalue(pv, l169.fvalue(pv, "var ", "x", " = ", v755, ";", (function(){
7275                 var symbol = l134;
7276                 var value = symbol.value;
7277                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7278                 return value;
7279             })()), l169.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){
7280                 var symbol = l134;
7281                 var value = symbol.value;
7282                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7283                 return value;
7284             })(), l173.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
7285                 var symbol = l134;
7286                 var value = symbol.value;
7287                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7288                 return value;
7289             })())), l169.fvalue(pv, "return ", l169.fvalue(pv, "(x.car = ", v756, ", x)"), ";", (function(){
7290                 var symbol = l134;
7291                 var value = symbol.value;
7292                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7293                 return value;
7294             })())), "})()");
7295         })(l171.fvalue(pv, v753),l171.fvalue(pv, v754));
7296     })();
7297 })), cdr: (function(){
7298     var symbol = l276;
7299     var value = symbol.value;
7300     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7301     return value;
7302 })()}));
7303 var l293 = {name: "RPLACD"};
7304 ((l276).value = ({car: l45.fvalue(pv, l293, (function (values,v757,v758){
7305     checkArgs(arguments, 3);
7306     var i;
7307     return (function(){
7308         return (function(v759,v760){
7309             return l169.fvalue(values, "(function(){", (function(){
7310                 var symbol = l134;
7311                 var value = symbol.value;
7312                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7313                 return value;
7314             })(), l173.fvalue(pv, l169.fvalue(pv, "var ", "x", " = ", v759, ";", (function(){
7315                 var symbol = l134;
7316                 var value = symbol.value;
7317                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7318                 return value;
7319             })()), l169.fvalue(pv, "if (typeof ", "x", " != '", "object", "')", (function(){
7320                 var symbol = l134;
7321                 var value = symbol.value;
7322                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7323                 return value;
7324             })(), l173.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "object", ".';", (function(){
7325                 var symbol = l134;
7326                 var value = symbol.value;
7327                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7328                 return value;
7329             })())), l169.fvalue(pv, "return ", l169.fvalue(pv, "(x.cdr = ", v760, ", x)"), ";", (function(){
7330                 var symbol = l134;
7331                 var value = symbol.value;
7332                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7333                 return value;
7334             })())), "})()");
7335         })(l171.fvalue(pv, v757),l171.fvalue(pv, v758));
7336     })();
7337 })), cdr: (function(){
7338     var symbol = l276;
7339     var value = symbol.value;
7340     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7341     return value;
7342 })()}));
7343 var l294 = {name: "SYMBOLP"};
7344 ((l276).value = ({car: l45.fvalue(pv, l294, (function (values,v761){
7345     checkArgs(arguments, 2);
7346     var i;
7347     return (function(){
7348         return (function(v762){
7349             return l170.fvalue(values, l169.fvalue(pv, "(function(){", (function(){
7350                 var symbol = l134;
7351                 var value = symbol.value;
7352                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7353                 return value;
7354             })(), l173.fvalue(pv, "var tmp = ", v762, ";", (function(){
7355                 var symbol = l134;
7356                 var value = symbol.value;
7357                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7358                 return value;
7359             })(), "return (typeof tmp == 'object' && 'name' in tmp);", (function(){
7360                 var symbol = l134;
7361                 var value = symbol.value;
7362                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7363                 return value;
7364             })()), "})()"));
7365         })(l171.fvalue(pv, v761));
7366     })();
7367 })), cdr: (function(){
7368     var symbol = l276;
7369     var value = symbol.value;
7370     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7371     return value;
7372 })()}));
7373 var l295 = {name: "MAKE-SYMBOL"};
7374 ((l276).value = ({car: l45.fvalue(pv, l295, (function (values,v763){
7375     checkArgs(arguments, 2);
7376     var i;
7377     return (function(){
7378         return (function(v764){
7379             return l169.fvalue(values, "(function(){", (function(){
7380                 var symbol = l134;
7381                 var value = symbol.value;
7382                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7383                 return value;
7384             })(), l173.fvalue(pv, l169.fvalue(pv, "var ", "name", " = ", v764, ";", (function(){
7385                 var symbol = l134;
7386                 var value = symbol.value;
7387                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7388                 return value;
7389             })()), l169.fvalue(pv, "if (typeof ", "name", " != '", "string", "')", (function(){
7390                 var symbol = l134;
7391                 var value = symbol.value;
7392                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7393                 return value;
7394             })(), l173.fvalue(pv, "throw 'The value ' + ", "name", " + ' is not a type ", "string", ".';", (function(){
7395                 var symbol = l134;
7396                 var value = symbol.value;
7397                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7398                 return value;
7399             })())), l169.fvalue(pv, "return ", "({name: name})", ";", (function(){
7400                 var symbol = l134;
7401                 var value = symbol.value;
7402                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7403                 return value;
7404             })())), "})()");
7405         })(l171.fvalue(pv, v763));
7406     })();
7407 })), cdr: (function(){
7408     var symbol = l276;
7409     var value = symbol.value;
7410     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7411     return value;
7412 })()}));
7413 var l296 = {name: "SYMBOL-NAME"};
7414 ((l276).value = ({car: l45.fvalue(pv, l296, (function (values,v765){
7415     checkArgs(arguments, 2);
7416     var i;
7417     return (function(){
7418         return (function(v766){
7419             return l169.fvalue(values, "(", v766, ").name");
7420         })(l171.fvalue(pv, v765));
7421     })();
7422 })), cdr: (function(){
7423     var symbol = l276;
7424     var value = symbol.value;
7425     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7426     return value;
7427 })()}));
7428 ((l276).value = ({car: l45.fvalue(pv, l233, (function (values,v767,v768){
7429     checkArgs(arguments, 3);
7430     var i;
7431     return (function(){
7432         return (function(v769,v770){
7433             return l169.fvalue(values, "(", v769, ").value = ", v770);
7434         })(l171.fvalue(pv, v767),l171.fvalue(pv, v768));
7435     })();
7436 })), cdr: (function(){
7437     var symbol = l276;
7438     var value = symbol.value;
7439     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7440     return value;
7441 })()}));
7442 var l297 = {name: "FSET"};
7443 ((l276).value = ({car: l45.fvalue(pv, l297, (function (values,v771,v772){
7444     checkArgs(arguments, 3);
7445     var i;
7446     return (function(){
7447         return (function(v773,v774){
7448             return l169.fvalue(values, "(", v773, ").fvalue = ", v774);
7449         })(l171.fvalue(pv, v771),l171.fvalue(pv, v772));
7450     })();
7451 })), cdr: (function(){
7452     var symbol = l276;
7453     var value = symbol.value;
7454     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7455     return value;
7456 })()}));
7457 ((l276).value = ({car: l45.fvalue(pv, l19, (function (values,v775){
7458     checkArgs(arguments, 2);
7459     var i;
7460     return (function(){
7461         return (function(v776){
7462             return l170.fvalue(values, l169.fvalue(pv, "(", v776, ".value !== undefined)"));
7463         })(l171.fvalue(pv, v775));
7464     })();
7465 })), cdr: (function(){
7466     var symbol = l276;
7467     var value = symbol.value;
7468     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7469     return value;
7470 })()}));
7471 var l298 = {name: "SYMBOL-VALUE"};
7472 ((l276).value = ({car: l45.fvalue(pv, l298, (function (values,v777){
7473     checkArgs(arguments, 2);
7474     var i;
7475     return (function(){
7476         return (function(v778){
7477             return l169.fvalue(values, "(function(){", (function(){
7478                 var symbol = l134;
7479                 var value = symbol.value;
7480                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7481                 return value;
7482             })(), l173.fvalue(pv, "var symbol = ", v778, ";", (function(){
7483                 var symbol = l134;
7484                 var value = symbol.value;
7485                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7486                 return value;
7487             })(), "var value = symbol.value;", (function(){
7488                 var symbol = l134;
7489                 var value = symbol.value;
7490                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7491                 return value;
7492             })(), "if (value === undefined) throw \"Variable `\" + symbol.name + \"' is unbound.\";", (function(){
7493                 var symbol = l134;
7494                 var value = symbol.value;
7495                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7496                 return value;
7497             })(), "return value;", (function(){
7498                 var symbol = l134;
7499                 var value = symbol.value;
7500                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7501                 return value;
7502             })()), "})()");
7503         })(l171.fvalue(pv, v777));
7504     })();
7505 })), cdr: (function(){
7506     var symbol = l276;
7507     var value = symbol.value;
7508     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7509     return value;
7510 })()}));
7511 ((l276).value = ({car: l45.fvalue(pv, l242, (function (values,v779){
7512     checkArgs(arguments, 2);
7513     var i;
7514     return (function(){
7515         return (function(v780){
7516             return l169.fvalue(values, "(function(){", (function(){
7517                 var symbol = l134;
7518                 var value = symbol.value;
7519                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7520                 return value;
7521             })(), l173.fvalue(pv, "var symbol = ", v780, ";", (function(){
7522                 var symbol = l134;
7523                 var value = symbol.value;
7524                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7525                 return value;
7526             })(), "var func = symbol.fvalue;", (function(){
7527                 var symbol = l134;
7528                 var value = symbol.value;
7529                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7530                 return value;
7531             })(), "if (func === undefined) throw \"Function `\" + symbol.name + \"' is undefined.\";", (function(){
7532                 var symbol = l134;
7533                 var value = symbol.value;
7534                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7535                 return value;
7536             })(), "return func;", (function(){
7537                 var symbol = l134;
7538                 var value = symbol.value;
7539                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7540                 return value;
7541             })()), "})()");
7542         })(l171.fvalue(pv, v779));
7543     })();
7544 })), cdr: (function(){
7545     var symbol = l276;
7546     var value = symbol.value;
7547     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7548     return value;
7549 })()}));
7550 var l299 = {name: "SYMBOL-PLIST"};
7551 ((l276).value = ({car: l45.fvalue(pv, l299, (function (values,v781){
7552     checkArgs(arguments, 2);
7553     var i;
7554     return (function(){
7555         return (function(v782){
7556             return l169.fvalue(values, "((", v782, ").plist || ", l171.fvalue(pv, l5.value), ")");
7557         })(l171.fvalue(pv, v781));
7558     })();
7559 })), cdr: (function(){
7560     var symbol = l276;
7561     var value = symbol.value;
7562     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7563     return value;
7564 })()}));
7565 var l300 = {name: "LAMBDA-CODE"};
7566 ((l276).value = ({car: l45.fvalue(pv, l300, (function (values,v783){
7567     checkArgs(arguments, 2);
7568     var i;
7569     return (function(){
7570         return (function(v784){
7571             return l169.fvalue(values, "(", v784, ").toString()");
7572         })(l171.fvalue(pv, v783));
7573     })();
7574 })), cdr: (function(){
7575     var symbol = l276;
7576     var value = symbol.value;
7577     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7578     return value;
7579 })()}));
7580 var l301 = {name: "EQ"};
7581 ((l276).value = ({car: l45.fvalue(pv, l301, (function (values,v785,v786){
7582     checkArgs(arguments, 3);
7583     var i;
7584     return (function(){
7585         return (function(v787,v788){
7586             return l170.fvalue(values, l169.fvalue(pv, "(", v787, " === ", v788, ")"));
7587         })(l171.fvalue(pv, v785),l171.fvalue(pv, v786));
7588     })();
7589 })), cdr: (function(){
7590     var symbol = l276;
7591     var value = symbol.value;
7592     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7593     return value;
7594 })()}));
7595 var l302 = {name: "EQUAL"};
7596 ((l276).value = ({car: l45.fvalue(pv, l302, (function (values,v789,v790){
7597     checkArgs(arguments, 3);
7598     var i;
7599     return (function(){
7600         return (function(v791,v792){
7601             return l170.fvalue(values, l169.fvalue(pv, "(", v791, " == ", v792, ")"));
7602         })(l171.fvalue(pv, v789),l171.fvalue(pv, v790));
7603     })();
7604 })), cdr: (function(){
7605     var symbol = l276;
7606     var value = symbol.value;
7607     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7608     return value;
7609 })()}));
7610 var l303 = {name: "CHAR-TO-STRING"};
7611 ((l276).value = ({car: l45.fvalue(pv, l303, (function (values,v793){
7612     checkArgs(arguments, 2);
7613     var i;
7614     return (function(){
7615         return (function(v794){
7616             return l169.fvalue(values, "(function(){", (function(){
7617                 var symbol = l134;
7618                 var value = symbol.value;
7619                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7620                 return value;
7621             })(), l173.fvalue(pv, l169.fvalue(pv, "var ", "x", " = ", v794, ";", (function(){
7622                 var symbol = l134;
7623                 var value = symbol.value;
7624                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7625                 return value;
7626             })()), l169.fvalue(pv, "if (typeof ", "x", " != '", "number", "')", (function(){
7627                 var symbol = l134;
7628                 var value = symbol.value;
7629                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7630                 return value;
7631             })(), l173.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "number", ".';", (function(){
7632                 var symbol = l134;
7633                 var value = symbol.value;
7634                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7635                 return value;
7636             })())), l169.fvalue(pv, "return ", "String.fromCharCode(x)", ";", (function(){
7637                 var symbol = l134;
7638                 var value = symbol.value;
7639                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7640                 return value;
7641             })())), "})()");
7642         })(l171.fvalue(pv, v793));
7643     })();
7644 })), cdr: (function(){
7645     var symbol = l276;
7646     var value = symbol.value;
7647     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7648     return value;
7649 })()}));
7650 var l304 = {name: "STRINGP"};
7651 ((l276).value = ({car: l45.fvalue(pv, l304, (function (values,v795){
7652     checkArgs(arguments, 2);
7653     var i;
7654     return (function(){
7655         return (function(v796){
7656             return l170.fvalue(values, l169.fvalue(pv, "(typeof(", v796, ") == \"string\")"));
7657         })(l171.fvalue(pv, v795));
7658     })();
7659 })), cdr: (function(){
7660     var symbol = l276;
7661     var value = symbol.value;
7662     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7663     return value;
7664 })()}));
7665 var l305 = {name: "STRING-UPCASE"};
7666 ((l276).value = ({car: l45.fvalue(pv, l305, (function (values,v797){
7667     checkArgs(arguments, 2);
7668     var i;
7669     return (function(){
7670         return (function(v798){
7671             return l169.fvalue(values, "(function(){", (function(){
7672                 var symbol = l134;
7673                 var value = symbol.value;
7674                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7675                 return value;
7676             })(), l173.fvalue(pv, l169.fvalue(pv, "var ", "x", " = ", v798, ";", (function(){
7677                 var symbol = l134;
7678                 var value = symbol.value;
7679                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7680                 return value;
7681             })()), l169.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
7682                 var symbol = l134;
7683                 var value = symbol.value;
7684                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7685                 return value;
7686             })(), l173.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
7687                 var symbol = l134;
7688                 var value = symbol.value;
7689                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7690                 return value;
7691             })())), l169.fvalue(pv, "return ", "x.toUpperCase()", ";", (function(){
7692                 var symbol = l134;
7693                 var value = symbol.value;
7694                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7695                 return value;
7696             })())), "})()");
7697         })(l171.fvalue(pv, v797));
7698     })();
7699 })), cdr: (function(){
7700     var symbol = l276;
7701     var value = symbol.value;
7702     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7703     return value;
7704 })()}));
7705 var l306 = {name: "STRING-LENGTH"};
7706 ((l276).value = ({car: l45.fvalue(pv, l306, (function (values,v799){
7707     checkArgs(arguments, 2);
7708     var i;
7709     return (function(){
7710         return (function(v800){
7711             return l169.fvalue(values, "(function(){", (function(){
7712                 var symbol = l134;
7713                 var value = symbol.value;
7714                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7715                 return value;
7716             })(), l173.fvalue(pv, l169.fvalue(pv, "var ", "x", " = ", v800, ";", (function(){
7717                 var symbol = l134;
7718                 var value = symbol.value;
7719                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7720                 return value;
7721             })()), l169.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
7722                 var symbol = l134;
7723                 var value = symbol.value;
7724                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7725                 return value;
7726             })(), l173.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
7727                 var symbol = l134;
7728                 var value = symbol.value;
7729                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7730                 return value;
7731             })())), l169.fvalue(pv, "return ", "x.length", ";", (function(){
7732                 var symbol = l134;
7733                 var value = symbol.value;
7734                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7735                 return value;
7736             })())), "})()");
7737         })(l171.fvalue(pv, v799));
7738     })();
7739 })), cdr: (function(){
7740     var symbol = l276;
7741     var value = symbol.value;
7742     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7743     return value;
7744 })()}));
7745 var l307 = {name: "SLICE"};
7746 ((l276).value = ({car: l45.fvalue(pv, l307, (function (values,v801,v802,v803){
7747     checkArgsAtLeast(arguments, 3);
7748     checkArgsAtMost(arguments, 4);
7749     switch(arguments.length-1){
7750     case 2:
7751     v803=l5.value;
7752     default: break;
7753     }
7754     var i;
7755     return (function(){
7756         return l169.fvalue(values, "(function(){", (function(){
7757             var symbol = l134;
7758             var value = symbol.value;
7759             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7760             return value;
7761         })(), l173.fvalue(pv, "var str = ", l171.fvalue(pv, v801), ";", (function(){
7762             var symbol = l134;
7763             var value = symbol.value;
7764             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7765             return value;
7766         })(), "var a = ", l171.fvalue(pv, v802), ";", (function(){
7767             var symbol = l134;
7768             var value = symbol.value;
7769             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7770             return value;
7771         })(), "var b;", (function(){
7772             var symbol = l134;
7773             var value = symbol.value;
7774             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7775             return value;
7776         })(), (v803 !== l5.value ? l169.fvalue(pv, "b = ", l171.fvalue(pv, v803), ";", (function(){
7777             var symbol = l134;
7778             var value = symbol.value;
7779             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7780             return value;
7781         })()) : l5.value), "return str.slice(a,b);", (function(){
7782             var symbol = l134;
7783             var value = symbol.value;
7784             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7785             return value;
7786         })()), "})()");
7787     })();
7788 })), cdr: (function(){
7789     var symbol = l276;
7790     var value = symbol.value;
7791     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7792     return value;
7793 })()}));
7794 var l308 = {name: "CHAR"};
7795 ((l276).value = ({car: l45.fvalue(pv, l308, (function (values,v804,v805){
7796     checkArgs(arguments, 3);
7797     var i;
7798     return (function(){
7799         return (function(v806,v807){
7800             return l169.fvalue(values, "(function(){", (function(){
7801                 var symbol = l134;
7802                 var value = symbol.value;
7803                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7804                 return value;
7805             })(), l173.fvalue(pv, l169.fvalue(pv, "var ", "string", " = ", v806, ";", (function(){
7806                 var symbol = l134;
7807                 var value = symbol.value;
7808                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7809                 return value;
7810             })()), l169.fvalue(pv, "var ", "index", " = ", v807, ";", (function(){
7811                 var symbol = l134;
7812                 var value = symbol.value;
7813                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7814                 return value;
7815             })()), l169.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){
7816                 var symbol = l134;
7817                 var value = symbol.value;
7818                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7819                 return value;
7820             })(), l173.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
7821                 var symbol = l134;
7822                 var value = symbol.value;
7823                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7824                 return value;
7825             })())), l169.fvalue(pv, "if (typeof ", "index", " != '", "number", "')", (function(){
7826                 var symbol = l134;
7827                 var value = symbol.value;
7828                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7829                 return value;
7830             })(), l173.fvalue(pv, "throw 'The value ' + ", "index", " + ' is not a type ", "number", ".';", (function(){
7831                 var symbol = l134;
7832                 var value = symbol.value;
7833                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7834                 return value;
7835             })())), l169.fvalue(pv, "return ", "string.charCodeAt(index)", ";", (function(){
7836                 var symbol = l134;
7837                 var value = symbol.value;
7838                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7839                 return value;
7840             })())), "})()");
7841         })(l171.fvalue(pv, v804),l171.fvalue(pv, v805));
7842     })();
7843 })), cdr: (function(){
7844     var symbol = l276;
7845     var value = symbol.value;
7846     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7847     return value;
7848 })()}));
7849 ((l276).value = ({car: l45.fvalue(pv, l73, (function (values,v808,v809){
7850     checkArgs(arguments, 3);
7851     var i;
7852     return (function(){
7853         return (function(v810,v811){
7854             return l169.fvalue(values, "(function(){", (function(){
7855                 var symbol = l134;
7856                 var value = symbol.value;
7857                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7858                 return value;
7859             })(), l173.fvalue(pv, l169.fvalue(pv, "var ", "string1", " = ", v810, ";", (function(){
7860                 var symbol = l134;
7861                 var value = symbol.value;
7862                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7863                 return value;
7864             })()), l169.fvalue(pv, "var ", "string2", " = ", v811, ";", (function(){
7865                 var symbol = l134;
7866                 var value = symbol.value;
7867                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7868                 return value;
7869             })()), l169.fvalue(pv, "if (typeof ", "string1", " != '", "string", "')", (function(){
7870                 var symbol = l134;
7871                 var value = symbol.value;
7872                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7873                 return value;
7874             })(), l173.fvalue(pv, "throw 'The value ' + ", "string1", " + ' is not a type ", "string", ".';", (function(){
7875                 var symbol = l134;
7876                 var value = symbol.value;
7877                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7878                 return value;
7879             })())), l169.fvalue(pv, "if (typeof ", "string2", " != '", "string", "')", (function(){
7880                 var symbol = l134;
7881                 var value = symbol.value;
7882                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7883                 return value;
7884             })(), l173.fvalue(pv, "throw 'The value ' + ", "string2", " + ' is not a type ", "string", ".';", (function(){
7885                 var symbol = l134;
7886                 var value = symbol.value;
7887                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7888                 return value;
7889             })())), l169.fvalue(pv, "return ", "string1.concat(string2)", ";", (function(){
7890                 var symbol = l134;
7891                 var value = symbol.value;
7892                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7893                 return value;
7894             })())), "})()");
7895         })(l171.fvalue(pv, v808),l171.fvalue(pv, v809));
7896     })();
7897 })), cdr: (function(){
7898     var symbol = l276;
7899     var value = symbol.value;
7900     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7901     return value;
7902 })()}));
7903 var l309 = {name: "FUNCALL"};
7904 ((l276).value = ({car: l45.fvalue(pv, l309, (function (values,v813){
7905     checkArgsAtLeast(arguments, 2);
7906     var v812= l5.value;
7907     for (var i = arguments.length-1; i>=2; i--)
7908         v812 = {car: arguments[i], cdr:
7909     v812};
7910     var i;
7911     return (function(){
7912         return l169.fvalue(values, "(", l171.fvalue(pv, v813), ")(", l137.fvalue(pv, ({car: ((function(){
7913             var symbol = l174;
7914             var value = symbol.value;
7915             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7916             return value;
7917         })() !== l5.value ? "values" : "pv"), cdr: l74.fvalue(pv, (function(){
7918             var symbol = l171;
7919             var func = symbol.fvalue;
7920             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7921             return func;
7922         })(), v812)}), ", "), ")");
7923     })();
7924 })), cdr: (function(){
7925     var symbol = l276;
7926     var value = symbol.value;
7927     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7928     return value;
7929 })()}));
7930 var l310 = {name: "APPLY"};
7931 ((l276).value = ({car: l45.fvalue(pv, l310, (function (values,v815){
7932     checkArgsAtLeast(arguments, 2);
7933     var v814= l5.value;
7934     for (var i = arguments.length-1; i>=2; i--)
7935         v814 = {car: arguments[i], cdr:
7936     v814};
7937     var i;
7938     return (function(){
7939         return (l13.fvalue(pv, v814) !== l5.value ? l169.fvalue(values, "(", l171.fvalue(pv, v815), ")()") : (function(v816,v817){
7940             return l169.fvalue(values, "(function(){", (function(){
7941                 var symbol = l134;
7942                 var value = symbol.value;
7943                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7944                 return value;
7945             })(), l173.fvalue(pv, "var f = ", l171.fvalue(pv, v815), ";", (function(){
7946                 var symbol = l134;
7947                 var value = symbol.value;
7948                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7949                 return value;
7950             })(), "var args = [", l137.fvalue(pv, ({car: ((function(){
7951                 var symbol = l174;
7952                 var value = symbol.value;
7953                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7954                 return value;
7955             })() !== l5.value ? "values" : "pv"), cdr: l74.fvalue(pv, (function(){
7956                 var symbol = l171;
7957                 var func = symbol.fvalue;
7958                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
7959                 return func;
7960             })(), v816)}), ", "), "];", (function(){
7961                 var symbol = l134;
7962                 var value = symbol.value;
7963                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7964                 return value;
7965             })(), "var tail = (", l171.fvalue(pv, v817), ");", (function(){
7966                 var symbol = l134;
7967                 var value = symbol.value;
7968                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7969                 return value;
7970             })(), "while (tail != ", l171.fvalue(pv, l5.value), "){", (function(){
7971                 var symbol = l134;
7972                 var value = symbol.value;
7973                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7974                 return value;
7975             })(), "    args.push(tail.car);", (function(){
7976                 var symbol = l134;
7977                 var value = symbol.value;
7978                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7979                 return value;
7980             })(), "    tail = tail.cdr;", (function(){
7981                 var symbol = l134;
7982                 var value = symbol.value;
7983                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7984                 return value;
7985             })(), "}", (function(){
7986                 var symbol = l134;
7987                 var value = symbol.value;
7988                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7989                 return value;
7990             })(), "return f.apply(this, args);", (function(){
7991                 var symbol = l134;
7992                 var value = symbol.value;
7993                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
7994                 return value;
7995             })()), "})()");
7996         })(l88.fvalue(pv, v814),(function(){
7997             var tmp = l87.fvalue(pv, v814);
7998             return tmp === l5.value? l5.value: tmp.car;
7999         })()));
8000     })();
8001 })), cdr: (function(){
8002     var symbol = l276;
8003     var value = symbol.value;
8004     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8005     return value;
8006 })()}));
8007 var l311 = {name: "JS-EVAL"};
8008 ((l276).value = ({car: l45.fvalue(pv, l311, (function (values,v818){
8009     checkArgs(arguments, 2);
8010     var i;
8011     return (function(){
8012         return (function(v819){
8013             return l169.fvalue(values, "(function(){", (function(){
8014                 var symbol = l134;
8015                 var value = symbol.value;
8016                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8017                 return value;
8018             })(), l173.fvalue(pv, l169.fvalue(pv, "var ", "string", " = ", v819, ";", (function(){
8019                 var symbol = l134;
8020                 var value = symbol.value;
8021                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8022                 return value;
8023             })()), l169.fvalue(pv, "if (typeof ", "string", " != '", "string", "')", (function(){
8024                 var symbol = l134;
8025                 var value = symbol.value;
8026                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8027                 return value;
8028             })(), l173.fvalue(pv, "throw 'The value ' + ", "string", " + ' is not a type ", "string", ".';", (function(){
8029                 var symbol = l134;
8030                 var value = symbol.value;
8031                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8032                 return value;
8033             })())), l169.fvalue(pv, "return ", ((function(){
8034                 var symbol = l174;
8035                 var value = symbol.value;
8036                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8037                 return value;
8038             })() !== l5.value ? l169.fvalue(pv, "(function(){", (function(){
8039                 var symbol = l134;
8040                 var value = symbol.value;
8041                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8042                 return value;
8043             })(), l173.fvalue(pv, "var v = eval.apply(window, [string]);", (function(){
8044                 var symbol = l134;
8045                 var value = symbol.value;
8046                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8047                 return value;
8048             })(), "if (typeof v !== 'object' || !('multiple-value' in v)){", (function(){
8049                 var symbol = l134;
8050                 var value = symbol.value;
8051                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8052                 return value;
8053             })(), l173.fvalue(pv, "v = [v];", (function(){
8054                 var symbol = l134;
8055                 var value = symbol.value;
8056                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8057                 return value;
8058             })(), "v['multiple-value'] = true;", (function(){
8059                 var symbol = l134;
8060                 var value = symbol.value;
8061                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8062                 return value;
8063             })()), "}", (function(){
8064                 var symbol = l134;
8065                 var value = symbol.value;
8066                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8067                 return value;
8068             })(), "return values.apply(this, v);", (function(){
8069                 var symbol = l134;
8070                 var value = symbol.value;
8071                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8072                 return value;
8073             })()), "})()") : "eval.apply(window, [string])"), ";", (function(){
8074                 var symbol = l134;
8075                 var value = symbol.value;
8076                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8077                 return value;
8078             })())), "})()");
8079         })(l171.fvalue(pv, v818));
8080     })();
8081 })), cdr: (function(){
8082     var symbol = l276;
8083     var value = symbol.value;
8084     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8085     return value;
8086 })()}));
8087 var l312 = {name: "ERROR"};
8088 ((l276).value = ({car: l45.fvalue(pv, l312, (function (values,v820){
8089     checkArgs(arguments, 2);
8090     var i;
8091     return (function(){
8092         return (function(v821){
8093             return l169.fvalue(values, "(function(){", (function(){
8094                 var symbol = l134;
8095                 var value = symbol.value;
8096                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8097                 return value;
8098             })(), l173.fvalue(pv, "throw ", v821, ";", (function(){
8099                 var symbol = l134;
8100                 var value = symbol.value;
8101                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8102                 return value;
8103             })()), "})()");
8104         })(l171.fvalue(pv, v820));
8105     })();
8106 })), cdr: (function(){
8107     var symbol = l276;
8108     var value = symbol.value;
8109     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8110     return value;
8111 })()}));
8112 var l313 = {name: "NEW"};
8113 ((l276).value = ({car: l45.fvalue(pv, l313, (function (values){
8114     checkArgsAtMost(arguments, 1);
8115     var i;
8116     return (function(){
8117         return (function(){
8118             return "{}";
8119         })();
8120     })();
8121 })), cdr: (function(){
8122     var symbol = l276;
8123     var value = symbol.value;
8124     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8125     return value;
8126 })()}));
8127 var l314 = {name: "OBJECTP"};
8128 ((l276).value = ({car: l45.fvalue(pv, l314, (function (values,v822){
8129     checkArgs(arguments, 2);
8130     var i;
8131     return (function(){
8132         return (function(v823){
8133             return l170.fvalue(values, l169.fvalue(pv, "(typeof (", v823, ") === 'object')"));
8134         })(l171.fvalue(pv, v822));
8135     })();
8136 })), cdr: (function(){
8137     var symbol = l276;
8138     var value = symbol.value;
8139     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8140     return value;
8141 })()}));
8142 var l315 = {name: "OGET"};
8143 ((l276).value = ({car: l45.fvalue(pv, l315, (function (values,v824,v825){
8144     checkArgs(arguments, 3);
8145     var i;
8146     return (function(){
8147         return (function(v826,v827){
8148             return l169.fvalue(values, "(function(){", (function(){
8149                 var symbol = l134;
8150                 var value = symbol.value;
8151                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8152                 return value;
8153             })(), l173.fvalue(pv, "var tmp = ", "(", v826, ")[", v827, "];", (function(){
8154                 var symbol = l134;
8155                 var value = symbol.value;
8156                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8157                 return value;
8158             })(), "return tmp == undefined? ", l171.fvalue(pv, l5.value), ": tmp ;", (function(){
8159                 var symbol = l134;
8160                 var value = symbol.value;
8161                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8162                 return value;
8163             })()), "})()");
8164         })(l171.fvalue(pv, v824),l171.fvalue(pv, v825));
8165     })();
8166 })), cdr: (function(){
8167     var symbol = l276;
8168     var value = symbol.value;
8169     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8170     return value;
8171 })()}));
8172 var l316 = {name: "OSET"};
8173 ((l276).value = ({car: l45.fvalue(pv, l316, (function (values,v828,v829,v830){
8174     checkArgs(arguments, 4);
8175     var i;
8176     return (function(){
8177         return (function(v831,v832,v833){
8178             return l169.fvalue(values, "((", v831, ")[", v832, "] = ", v833, ")");
8179         })(l171.fvalue(pv, v828),l171.fvalue(pv, v829),l171.fvalue(pv, v830));
8180     })();
8181 })), cdr: (function(){
8182     var symbol = l276;
8183     var value = symbol.value;
8184     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8185     return value;
8186 })()}));
8187 var l317 = {name: "IN"};
8188 ((l276).value = ({car: l45.fvalue(pv, l317, (function (values,v834,v835){
8189     checkArgs(arguments, 3);
8190     var i;
8191     return (function(){
8192         return (function(v836,v837){
8193             return l170.fvalue(values, l169.fvalue(pv, "((", v836, ") in (", v837, "))"));
8194         })(l171.fvalue(pv, v834),l171.fvalue(pv, v835));
8195     })();
8196 })), cdr: (function(){
8197     var symbol = l276;
8198     var value = symbol.value;
8199     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8200     return value;
8201 })()}));
8202 var l318 = {name: "FUNCTIONP"};
8203 ((l276).value = ({car: l45.fvalue(pv, l318, (function (values,v838){
8204     checkArgs(arguments, 2);
8205     var i;
8206     return (function(){
8207         return (function(v839){
8208             return l170.fvalue(values, l169.fvalue(pv, "(typeof ", v839, " == 'function')"));
8209         })(l171.fvalue(pv, v838));
8210     })();
8211 })), cdr: (function(){
8212     var symbol = l276;
8213     var value = symbol.value;
8214     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8215     return value;
8216 })()}));
8217 var l319 = {name: "WRITE-STRING"};
8218 ((l276).value = ({car: l45.fvalue(pv, l319, (function (values,v840){
8219     checkArgs(arguments, 2);
8220     var i;
8221     return (function(){
8222         return (function(v841){
8223             return l169.fvalue(values, "(function(){", (function(){
8224                 var symbol = l134;
8225                 var value = symbol.value;
8226                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8227                 return value;
8228             })(), l173.fvalue(pv, l169.fvalue(pv, "var ", "x", " = ", v841, ";", (function(){
8229                 var symbol = l134;
8230                 var value = symbol.value;
8231                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8232                 return value;
8233             })()), l169.fvalue(pv, "if (typeof ", "x", " != '", "string", "')", (function(){
8234                 var symbol = l134;
8235                 var value = symbol.value;
8236                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8237                 return value;
8238             })(), l173.fvalue(pv, "throw 'The value ' + ", "x", " + ' is not a type ", "string", ".';", (function(){
8239                 var symbol = l134;
8240                 var value = symbol.value;
8241                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8242                 return value;
8243             })())), l169.fvalue(pv, "return ", "lisp.write(x)", ";", (function(){
8244                 var symbol = l134;
8245                 var value = symbol.value;
8246                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8247                 return value;
8248             })())), "})()");
8249         })(l171.fvalue(pv, v840));
8250     })();
8251 })), cdr: (function(){
8252     var symbol = l276;
8253     var value = symbol.value;
8254     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8255     return value;
8256 })()}));
8257 var l320 = {name: "MAKE-ARRAY"};
8258 ((l276).value = ({car: l45.fvalue(pv, l320, (function (values,v842){
8259     checkArgs(arguments, 2);
8260     var i;
8261     return (function(){
8262         return (function(v843){
8263             return l169.fvalue(values, "(function(){", (function(){
8264                 var symbol = l134;
8265                 var value = symbol.value;
8266                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8267                 return value;
8268             })(), l173.fvalue(pv, "var r = [];", (function(){
8269                 var symbol = l134;
8270                 var value = symbol.value;
8271                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8272                 return value;
8273             })(), "for (var i = 0; i < ", v843, "; i++)", (function(){
8274                 var symbol = l134;
8275                 var value = symbol.value;
8276                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8277                 return value;
8278             })(), l173.fvalue(pv, "r.push(", l171.fvalue(pv, l5.value), ");", (function(){
8279                 var symbol = l134;
8280                 var value = symbol.value;
8281                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8282                 return value;
8283             })()), "return r;", (function(){
8284                 var symbol = l134;
8285                 var value = symbol.value;
8286                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8287                 return value;
8288             })()), "})()");
8289         })(l171.fvalue(pv, v842));
8290     })();
8291 })), cdr: (function(){
8292     var symbol = l276;
8293     var value = symbol.value;
8294     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8295     return value;
8296 })()}));
8297 var l321 = {name: "ARRAYP"};
8298 ((l276).value = ({car: l45.fvalue(pv, l321, (function (values,v844){
8299     checkArgs(arguments, 2);
8300     var i;
8301     return (function(){
8302         return (function(v845){
8303             return l170.fvalue(values, l169.fvalue(pv, "(function(){", (function(){
8304                 var symbol = l134;
8305                 var value = symbol.value;
8306                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8307                 return value;
8308             })(), l173.fvalue(pv, "var x = ", v845, ";", (function(){
8309                 var symbol = l134;
8310                 var value = symbol.value;
8311                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8312                 return value;
8313             })(), "return typeof x === 'object' && 'length' in x;"), "})()"));
8314         })(l171.fvalue(pv, v844));
8315     })();
8316 })), cdr: (function(){
8317     var symbol = l276;
8318     var value = symbol.value;
8319     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8320     return value;
8321 })()}));
8322 var l322 = {name: "AREF"};
8323 ((l276).value = ({car: l45.fvalue(pv, l322, (function (values,v846,v847){
8324     checkArgs(arguments, 3);
8325     var i;
8326     return (function(){
8327         return (function(v848,v849){
8328             return l169.fvalue(values, "(function(){", (function(){
8329                 var symbol = l134;
8330                 var value = symbol.value;
8331                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8332                 return value;
8333             })(), l173.fvalue(pv, "var x = ", "(", v848, ")[", v849, "];", (function(){
8334                 var symbol = l134;
8335                 var value = symbol.value;
8336                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8337                 return value;
8338             })(), "if (x === undefined) throw 'Out of range';", (function(){
8339                 var symbol = l134;
8340                 var value = symbol.value;
8341                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8342                 return value;
8343             })(), "return x;", (function(){
8344                 var symbol = l134;
8345                 var value = symbol.value;
8346                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8347                 return value;
8348             })()), "})()");
8349         })(l171.fvalue(pv, v846),l171.fvalue(pv, v847));
8350     })();
8351 })), cdr: (function(){
8352     var symbol = l276;
8353     var value = symbol.value;
8354     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8355     return value;
8356 })()}));
8357 var l323 = {name: "ASET"};
8358 ((l276).value = ({car: l45.fvalue(pv, l323, (function (values,v850,v851,v852){
8359     checkArgs(arguments, 4);
8360     var i;
8361     return (function(){
8362         return (function(v853,v854,v855){
8363             return l169.fvalue(values, "(function(){", (function(){
8364                 var symbol = l134;
8365                 var value = symbol.value;
8366                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8367                 return value;
8368             })(), l173.fvalue(pv, "var x = ", v853, ";", (function(){
8369                 var symbol = l134;
8370                 var value = symbol.value;
8371                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8372                 return value;
8373             })(), "var i = ", v854, ";", (function(){
8374                 var symbol = l134;
8375                 var value = symbol.value;
8376                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8377                 return value;
8378             })(), "if (i < 0 || i >= x.length) throw 'Out of range';", (function(){
8379                 var symbol = l134;
8380                 var value = symbol.value;
8381                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8382                 return value;
8383             })(), "return x[i] = ", v855, ";", (function(){
8384                 var symbol = l134;
8385                 var value = symbol.value;
8386                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8387                 return value;
8388             })()), "})()");
8389         })(l171.fvalue(pv, v850),l171.fvalue(pv, v851),l171.fvalue(pv, v852));
8390     })();
8391 })), cdr: (function(){
8392     var symbol = l276;
8393     var value = symbol.value;
8394     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8395     return value;
8396 })()}));
8397 var l324 = {name: "GET-UNIX-TIME"};
8398 ((l276).value = ({car: l45.fvalue(pv, l324, (function (values){
8399     checkArgsAtMost(arguments, 1);
8400     var i;
8401     return (function(){
8402         return (function(){
8403             return l169.fvalue(values, "(Math.round(new Date() / 1000))");
8404         })();
8405     })();
8406 })), cdr: (function(){
8407     var symbol = l276;
8408     var value = symbol.value;
8409     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8410     return value;
8411 })()}));
8412 var l325 = {name: "VALUES-ARRAY"};
8413 ((l276).value = ({car: l45.fvalue(pv, l325, (function (values,v856){
8414     checkArgs(arguments, 2);
8415     var i;
8416     return (function(){
8417         return (function(v857){
8418             return ((function(){
8419                 var symbol = l174;
8420                 var value = symbol.value;
8421                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8422                 return value;
8423             })() !== l5.value ? l169.fvalue(values, "values.apply(this, ", v857, ")") : l169.fvalue(values, "pv.apply(this, ", v857, ")"));
8424         })(l171.fvalue(pv, v856));
8425     })();
8426 })), cdr: (function(){
8427     var symbol = l276;
8428     var value = symbol.value;
8429     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8430     return value;
8431 })()}));
8432 ((l276).value = ({car: l45.fvalue(pv, l143, (function (values){
8433     var v858= l5.value;
8434     for (var i = arguments.length-1; i>=1; i--)
8435         v858 = {car: arguments[i], cdr:
8436     v858};
8437     var i;
8438     return (function(){
8439         return ((function(){
8440             var symbol = l174;
8441             var value = symbol.value;
8442             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8443             return value;
8444         })() !== l5.value ? l169.fvalue(values, "values(", l137.fvalue(pv, l74.fvalue(pv, (function(){
8445             var symbol = l171;
8446             var func = symbol.fvalue;
8447             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8448             return func;
8449         })(), v858), ", "), ")") : l169.fvalue(values, "pv(", l137.fvalue(pv, l74.fvalue(pv, (function(){
8450             var symbol = l171;
8451             var func = symbol.fvalue;
8452             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8453             return func;
8454         })(), v858), ", "), ")"));
8455     })();
8456 })), cdr: (function(){
8457     var symbol = l276;
8458     var value = symbol.value;
8459     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8460     return value;
8461 })()}));
8462 (function(){
8463     (l200).fvalue = (function(v861){
8464         ((v861)["fname"] = "MACRO");
8465         return v861;
8466     })((function (values,v859){
8467         checkArgs(arguments, 2);
8468         var i;
8469         return (function(){
8470             return (((function(){
8471                 var tmp = v859;
8472                 return (typeof tmp == 'object' && 'name' in tmp);
8473             })()?l4.value: l5.value) !== l5.value ? (function(v860){
8474                 return (((l177.fvalue(pv, v860) === l200)?l4.value: l5.value) !== l5.value ? v860 : l5.value);
8475             })(l189.fvalue(pv, v859, (function(){
8476                 var symbol = l190;
8477                 var value = symbol.value;
8478                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8479                 return value;
8480             })(), l105)) : l5.value);
8481         })();
8482     }));
8483     return l200;
8484 })();
8485 var l326 = {name: "LS-MACROEXPAND-1"};
8486 (function(){
8487     (l326).fvalue = (function(v866){
8488         ((v866)["fname"] = "LS-MACROEXPAND-1");
8489         return v866;
8490     })((function (values,v862){
8491         checkArgs(arguments, 2);
8492         var i;
8493         return (function(){
8494             return (function(v863){
8495                 return (v863 !== l5.value ? (function(v864){
8496                     (l60.fvalue(pv, v864) !== l5.value ? (function(v865){
8497                         l180.fvalue(pv, v863, v865);
8498                         return (v864 = v865);
8499                     })(l251.fvalue(pv, v864)) : l5.value);
8500                     return (function(){
8501                         var f = v864;
8502                         var args = [values];
8503                         var tail = ((function(){
8504                             var tmp = v862;
8505                             return tmp === l5.value? l5.value: tmp.cdr;
8506                         })());
8507                         while (tail != l5.value){
8508                             args.push(tail.car);
8509                             tail = tail.cdr;
8510                         }
8511                         return f.apply(this, args);
8512                     })();
8513                 })(l178.fvalue(pv, v863)) : v862);
8514             })(l200.fvalue(pv, (function(){
8515                 var tmp = v862;
8516                 return tmp === l5.value? l5.value: tmp.car;
8517             })()));
8518         })();
8519     }));
8520     return l326;
8521 })();
8522 var l327 = {name: "COMPILE-FUNCALL"};
8523 var l328 = {name: "G764"};
8524 (function(){
8525     (l327).fvalue = (function(v871){
8526         ((v871)["fname"] = "COMPILE-FUNCALL");
8527         return v871;
8528     })((function (values,v867,v868){
8529         checkArgs(arguments, 3);
8530         var i;
8531         return (function(){
8532             return (function(){
8533                 var v869 = ((function(){
8534                     var symbol = l174;
8535                     var value = symbol.value;
8536                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8537                     return value;
8538                 })() !== l5.value ? "values" : "pv");
8539                 var v870 = l135.fvalue(pv, "(", l137.fvalue(pv, ({car: v869, cdr: l74.fvalue(pv, (function(){
8540                     var symbol = l171;
8541                     var func = symbol.fvalue;
8542                     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8543                     return func;
8544                 })(), v868)}), ", "), ")");
8545                 return (l245.fvalue(pv, v867) !== l5.value ? l135.fvalue(values, l245.fvalue(pv, v867), v870) : ((((function(){
8546                     var tmp = v867;
8547                     return (typeof tmp == 'object' && 'name' in tmp);
8548                 })()?l4.value: l5.value) !== l5.value ? (((l123.fvalue(pv, v867) === l114.fvalue(pv, "COMMON-LISP"))?l4.value: l5.value) !== l5.value ? (function(){
8549                     var symbol = l328;
8550                     var value = symbol.value;
8551                     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8552                     return value;
8553                 })() : l5.value) : l5.value) !== l5.value ? l169.fvalue(values, l171.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l164), l45.fvalue(pv, v867))), ".fvalue", v870) : l169.fvalue(values, l171.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l105), l45.fvalue(pv, v867))), v870)));
8554             })();
8555         })();
8556     }));
8557     return l327;
8558 })();
8559 (function(){
8560     (l231).fvalue = (function(v874){
8561         ((v874)["fname"] = "LS-COMPILE-BLOCK");
8562         return v874;
8563     })((function (values,v872,v873){
8564         checkArgsAtLeast(arguments, 2);
8565         checkArgsAtMost(arguments, 3);
8566         switch(arguments.length-1){
8567         case 1:
8568         v873=l5.value;
8569         default: break;
8570         }
8571         var i;
8572         return (function(){
8573             return (v873 !== l5.value ? l169.fvalue(values, l231.fvalue(pv, l88.fvalue(pv, v872)), "return ", l171.fvalue(pv, (function(){
8574                 var tmp = l87.fvalue(pv, v872);
8575                 return tmp === l5.value? l5.value: tmp.car;
8576             })(), (function(){
8577                 var symbol = l174;
8578                 var value = symbol.value;
8579                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8580                 return value;
8581             })()), ";") : l138.fvalue(values, l91.fvalue(pv, (function(){
8582                 var symbol = l197;
8583                 var func = symbol.fvalue;
8584                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8585                 return func;
8586             })(), l74.fvalue(pv, (function(){
8587                 var symbol = l171;
8588                 var func = symbol.fvalue;
8589                 if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8590                 return func;
8591             })(), v872)), l135.fvalue(pv, ";", (function(){
8592                 var symbol = l134;
8593                 var value = symbol.value;
8594                 if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8595                 return value;
8596             })())));
8597         })();
8598     }));
8599     return l231;
8600 })();
8601 (function(){
8602     (l171).fvalue = (function(v884){
8603         ((v884)["fname"] = "LS-COMPILE");
8604         return v884;
8605     })((function (values,v875,v876){
8606         checkArgsAtLeast(arguments, 2);
8607         checkArgsAtMost(arguments, 3);
8608         switch(arguments.length-1){
8609         case 1:
8610         v876=l5.value;
8611         default: break;
8612         }
8613         var i;
8614         return (function(){
8615             return (function(v877){
8616                 try {
8617                     var tmp;
8618                     tmp = l174.value;
8619                     l174.value = v877;
8620                     v877 = tmp;
8621                     return (((function(){
8622                         var tmp = v875;
8623                         return (typeof tmp == 'object' && 'name' in tmp);
8624                     })()?l4.value: l5.value) !== l5.value ? (function(v878){
8625                         return ((v878 !== l5.value ? l28.fvalue(pv, l89.fvalue(pv, l204, l179.fvalue(pv, v878))) : l5.value) !== l5.value ? l178.fvalue(values, v878) : ((function(v879){
8626                             return (v879 !== l5.value ? v879 : l89.fvalue(pv, l206, l179.fvalue(pv, v878)));
8627                         })(l122.fvalue(pv, v875)) !== l5.value ? l169.fvalue(values, l171.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l164), l45.fvalue(pv, v875))), ".value") : l171.fvalue(values, l65.fvalue(pv, l45.fvalue(pv, l298), l45.fvalue(pv, l65.fvalue(pv, l45.fvalue(pv, l164), l45.fvalue(pv, v875)))))));
8628                     })(l189.fvalue(pv, v875, (function(){
8629                         var symbol = l190;
8630                         var value = symbol.value;
8631                         if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8632                         return value;
8633                     })(), l106)) : (l82.fvalue(pv, v875) !== l5.value ? l18.fvalue(values, v875) : (((typeof(v875) == "string")?l4.value: l5.value) !== l5.value ? l169.fvalue(values, "\"", l145.fvalue(pv, v875), "\"") : (((function(){
8634                         var x = v875;
8635                         return typeof x === 'object' && 'length' in x;
8636                     })()?l4.value: l5.value) !== l5.value ? l240.fvalue(values, v875) : (l60.fvalue(pv, v875) !== l5.value ? (function(v880,v881){
8637                         return (l98.fvalue(pv, v880, (function(){
8638                             var symbol = l208;
8639                             var value = symbol.value;
8640                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8641                             return value;
8642                         })()) !== l5.value ? (function(v882){
8643                             return (function(){
8644                                 var f = v882;
8645                                 var args = [values];
8646                                 var tail = (v881);
8647                                 while (tail != l5.value){
8648                                     args.push(tail.car);
8649                                     tail = tail.cdr;
8650                                 }
8651                                 return f.apply(this, args);
8652                             })();
8653                         })(l41.fvalue(pv, l98.fvalue(pv, v880, (function(){
8654                             var symbol = l208;
8655                             var value = symbol.value;
8656                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8657                             return value;
8658                         })()))) : ((l98.fvalue(pv, v880, (function(){
8659                             var symbol = l276;
8660                             var value = symbol.value;
8661                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8662                             return value;
8663                         })()) !== l5.value ? l28.fvalue(pv, l202.fvalue(pv, v880, l105, l205)) : l5.value) !== l5.value ? (function(v883){
8664                             return (function(){
8665                                 var f = v883;
8666                                 var args = [values];
8667                                 var tail = (v881);
8668                                 while (tail != l5.value){
8669                                     args.push(tail.car);
8670                                     tail = tail.cdr;
8671                                 }
8672                                 return f.apply(this, args);
8673                             })();
8674                         })(l41.fvalue(pv, l98.fvalue(pv, v880, (function(){
8675                             var symbol = l276;
8676                             var value = symbol.value;
8677                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8678                             return value;
8679                         })()))) : (l200.fvalue(pv, v880) !== l5.value ? l171.fvalue(values, l326.fvalue(pv, v875), v876) : l327.fvalue(values, v880, v881))));
8680                     })((function(){
8681                         var tmp = v875;
8682                         return tmp === l5.value? l5.value: tmp.car;
8683                     })(),(function(){
8684                         var tmp = v875;
8685                         return tmp === l5.value? l5.value: tmp.cdr;
8686                     })()) : (function(){
8687                         throw "How should I compile this?";
8688                     })())))));
8689                 }
8690                 finally {
8691                     l174.value = v877;
8692                 }
8693             })(v876);
8694         })();
8695     }));
8696     return l171;
8697 })();
8698 var l329 = {name: "LS-COMPILE-TOPLEVEL"};
8699 (function(){
8700     (l329).fvalue = (function(v891){
8701         ((v891)["fname"] = "LS-COMPILE-TOPLEVEL");
8702         return v891;
8703     })((function (values,v885,v886){
8704         checkArgsAtLeast(arguments, 2);
8705         checkArgsAtMost(arguments, 3);
8706         switch(arguments.length-1){
8707         case 1:
8708         v886=l5.value;
8709         default: break;
8710         }
8711         var i;
8712         return (function(){
8713             return (function(v887){
8714                 try {
8715                     var tmp;
8716                     tmp = l195.value;
8717                     l195.value = v887;
8718                     v887 = tmp;
8719                     return ((((function(){
8720                         var tmp = v885;
8721                         return (typeof tmp == 'object' && 'car' in tmp);
8722                     })()?l4.value: l5.value) !== l5.value ? (((function(){
8723                         var tmp = v885;
8724                         return tmp === l5.value? l5.value: tmp.car;
8725                     })() === l250)?l4.value: l5.value) : l5.value) !== l5.value ? (function(v889){
8726                         return l137.fvalue(values, l91.fvalue(pv, (function(){
8727                             var symbol = l197;
8728                             var func = symbol.fvalue;
8729                             if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8730                             return func;
8731                         })(), v889));
8732                     })(l74.fvalue(pv, (function (values,v888){
8733                         checkArgs(arguments, 2);
8734                         var i;
8735                         return l329.fvalue(values, v888, l4.value);
8736                     }), (function(){
8737                         var tmp = v885;
8738                         return tmp === l5.value? l5.value: tmp.cdr;
8739                     })())) : (function(v890){
8740                         return l169.fvalue(values, l138.fvalue(pv, l198.fvalue(pv), l169.fvalue(pv, ";", (function(){
8741                             var symbol = l134;
8742                             var value = symbol.value;
8743                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8744                             return value;
8745                         })())), (v890 !== l5.value ? l169.fvalue(pv, v890, ";", (function(){
8746                             var symbol = l134;
8747                             var value = symbol.value;
8748                             if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8749                             return value;
8750                         })()) : l5.value));
8751                     })(l171.fvalue(pv, v885, v886)));
8752                 }
8753                 finally {
8754                     l195.value = v887;
8755                 }
8756             })(l5.value);
8757         })();
8758     }));
8759     return l329;
8760 })();
8761 (function(){
8762     (l251).fvalue = (function(v893){
8763         ((v893)["fname"] = "EVAL");
8764         return v893;
8765     })((function (values,v892){
8766         checkArgs(arguments, 2);
8767         var i;
8768         return (function(){
8769             return (function(){
8770                 var string = l329.fvalue(pv, v892, l4.value);
8771                 if (typeof string != 'string')
8772                     throw 'The value ' + string + ' is not a type string.';
8773                 return (function(){
8774                     var v = eval.apply(window, [string]);
8775                     if (typeof v !== 'object' || !('multiple-value' in v)){
8776                         v = [v];
8777                         v['multiple-value'] = true;
8778                     }
8779                     return values.apply(this, v);
8780                 })();
8781             })();
8782         })();
8783     }));
8784     return l251;
8785 })();
8786 var l330 = {name: "&BODY"};
8787 var l331 = QIList(l213,l214,l212,l330,l21,l16,l124,l62,l63,l22,l23,l24,l287,l289,l20,l20,l286,l288,l55,l65,l310,l322,l321,l98,l46,l186,l19,l19,l88,l33,l39,l37,l34,l31,l31,l53,l263,l35,l38,l36,l32,l32,l308,l80,l81,l79,l52,l29,l30,l77,l78,l48,l2,l3,l10,l12,l1,l9,l94,l93,l102,l69,l70,l104,l50,l51,l54,l301,l27,l302,l312,l251,l97,l132,l101,l114,l127,l40,l246,l43,l297,l309,l105,l318,l17,l133,l270,l76,l210,l125,l47,l82,l82,l131,l122,l247,l6,l87,l72,l255,l258,l110,l45,l60,l320,l111,l295,l74,l89,l84,l283,l107,l272,l108,l273,l5,l28,l86,l85,l13,l290,l56,l115,l117,l113,l162,l83,l144,l147,l207,l57,l58,l250,l68,l49,l164,l90,l91,l92,l14,l262,l66,l67,l292,l293,l41,l233,l234,l96,l305,l99,l100,l304,l95,l242,l296,l123,l299,l298,l294,l4,l269,l42,l264,l26,l8,l271,l143,l142,l106,l146,l7,l103,l319,l25,l5);
8788 l132.fvalue(values, l331);
8789 ((l124).value = (function(){
8790     var symbol = l120;
8791     var value = symbol.value;
8792     if (value === undefined) throw "Variable `" + symbol.name + "' is unbound.";
8793     return value;
8794 })());
8795 (function(){
8796     var string = "var lisp";
8797     if (typeof string != 'string')
8798         throw 'The value ' + string + ' is not a type string.';
8799     return (function(){
8800         var v = eval.apply(window, [string]);
8801         if (typeof v !== 'object' || !('multiple-value' in v)){
8802             v = [v];
8803             v['multiple-value'] = true;
8804         }
8805         return values.apply(this, v);
8806     })();
8807 })();
8808 (lisp = {});
8809 (lisp.read = (function(){
8810     var symbol = l168;
8811     var func = symbol.fvalue;
8812     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8813     return func;
8814 })());
8815 (lisp.print = (function(){
8816     var symbol = l144;
8817     var func = symbol.fvalue;
8818     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8819     return func;
8820 })());
8821 (lisp.eval = (function(){
8822     var symbol = l251;
8823     var func = symbol.fvalue;
8824     if (func === undefined) throw "Function `" + symbol.name + "' is undefined.";
8825     return func;
8826 })());
8827 (lisp.compile = (function (values,v894){
8828     checkArgs(arguments, 2);
8829     var i;
8830     return l329.fvalue(values, v894, l4.value);
8831 }));
8832 (lisp.evalString = (function (values,v895){
8833     checkArgs(arguments, 2);
8834     var i;
8835     return l251.fvalue(values, l168.fvalue(pv, v895));
8836 }));
8837 (lisp.compileString = (function (values,v896){
8838     checkArgs(arguments, 2);
8839     var i;
8840     return l329.fvalue(values, l168.fvalue(pv, v896), l4.value);
8841 }));
8842 var l332 = QIList(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(l227,"l227"),QIList(l226,"l226"),QIList(l225,"l225"),QIList(l224,"l224"),QIList(l223,"l223"),QIList(l222,"l222"),QIList(l221,"l221"),QIList(l220,"l220"),QIList(l219,"l219"),QIList(l218,"l218"),QIList(l217,"l217"),QIList(l216,"l216"),QIList(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);
8843 var l333 = {name: "OP"};
8844 var l334 = {name: "SYM"};
8845 var l335 = {name: "X"};
8846 var l336 = {name: "ARGS"};
8847 var l337 = {name: "BODY"};
8848 var l338 = {name: "DECLS"};
8849 var l339 = {name: "DECL"};
8850 var l340 = {name: "NAME"};
8851 var l341 = {name: "ARG"};
8852 var l342 = {name: "FORM"};
8853 var l343 = {name: "PACKAGE-DESIGNATOR"};
8854 var l344 = {name: "VALUE-FROM"};
8855 var l345 = {name: "VARIABLES"};
8856 var l346 = {name: "VARLIST"};
8857 var l347 = {name: "ENDLIST"};
8858 var l348 = {name: "V"};
8859 var l349 = {name: "PAIRS"};
8860 var l350 = {name: "ASSIGNMENTS"};
8861 var l351 = {name: "VALUE"};
8862 var l352 = {name: "FORM1"};
8863 var l353 = {name: "RESULT"};
8864 var l354 = {name: "FORMS"};
8865 var l355 = {name: "G"};
8866 var l356 = {name: "CLAUSULES"};
8867 var l357 = {name: "!FORM"};
8868 var l358 = {name: "CLAUSULE"};
8869 var l359 = {name: "ITER"};
8870 var l360 = {name: "G!TO"};
8871 var l361 = {name: "VAR"};
8872 var l362 = {name: "TO"};
8873 var l363 = {name: "G!LIST"};
8874 var l364 = {name: "PLACE"};
8875 var l365 = {name: "DELTA"};
8876 var l366 = {name: "CONDITION"};
8877 var l367 = {name: "DOCSTRING"};
8878 var l368 = QIList(QIList(QIList(l276,l106,l5,QIList(l204,l5),l5),QIList(l266,l106,l5,QIList(l204,l5),l5),QIList(l265,l106,l5,QIList(l204,l5),l5),QIList(l259,l106,l5,QIList(l204,l5),l5),QIList(l248,l106,l5,QIList(l204,l5),l5),QIList(l238,l106,l5,QIList(l204,l5),l5),QIList(l237,l106,l5,QIList(l204,l5),l5),QIList(l211,l106,l5,QIList(l204,l5),l5),QIList(l208,l106,l5,QIList(l204,l5),l5),QIList(l195,l106,l5,QIList(l204,l5),l5),QIList(l191,l106,l5,QIList(l204,l5),l5),QIList(l190,l106,l5,QIList(l204,l5),l5),QIList(l174,l106,l5,QIList(l204,l5),l5),QIList(l163,l106,l5,QIList(l204,l5),l5),QIList(l134,l106,l5,QIList(l204,l5),l5),QIList(l124,l106,l5,QIList(l204,l5),l5),QIList(l121,l106,l5,QIList(l204,l5),l5),QIList(l120,l106,l5,QIList(l204,l5),l5),QIList(l119,l106,l5,QIList(l204,l5),l5),QIList(l109,l106,l5,QIList(l204,l5),l5),QIList(l16,l106,l5,QIList(l204,l5),l5),QIList(l5,l106,l5,QIList(l206,l204,l5),l5),QIList(l4,l106,l5,QIList(l206,l204,l5),l5),l5),QIList(QIList(l285,l200,QIList(l105,QIList(l6,QIList(l333,l334,l5),QIList(l165,QIList(l277,QIList(l167,l333,l5),QIList(l335,l213,l336,l5),QIList(l255,QIList(QIList(l336,QIList(l29,l335,l336,l5),l5),l5),QIList(l281,l336,QIList(l170,QIList(l284,l336,QIList(l167,l334,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l281,l200,QIList(l105,QIList(l6,QIList(l336,l213,l337,l5),QIList(l8,QIList(l294,l336,l5),QIList(l312,"Bad usage of VARIABLE-ARITY, you must pass a symbol",l5),l5),QIList(l165,QIList(l280,QIList(l167,l336,l5),QIList(l6,QIList(QIList(l167,l336,l5),l5),QIList(l135,"return ",QIList(l166,l337,l5),";",l134,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l279,l200,QIList(l105,QIList(l6,QIList(l338,l213,l337,l5),QIList(l165,QIList(l172,QIList(l166,QIList(l74,QIList(l6,QIList(l339,l5),QIList(l165,QIList(l169,"var ",QIList(l167,QIList(l40,l339,l5),l5)," = ",QIList(l167,QIList(l42,l339,l5),l5),";",l134,l5),l5),l5),l338,l5),l5),QIList(l166,QIList(l74,QIList(l6,QIList(l339,l5),QIList(l165,QIList(l169,"if (typeof ",QIList(l167,QIList(l40,l339,l5),l5)," != '",QIList(l167,QIList(l41,l339,l5),l5),"')",l134,QIList(l173,"throw 'The value ' + ",QIList(l167,QIList(l40,l339,l5),l5)," + ' is not a type ",QIList(l167,QIList(l41,l339,l5),l5),".';",l134,l5),l5),l5),l5),l338,l5),l5),QIList(l169,"return ",QIList(l250,QIList(l166,l337,l5),l5),";",l134,l5),l5),l5),l5),l5),l5,l5),QIList(l278,l200,QIList(l105,QIList(l6,QIList(l340,l336,l213,l337,l5),QIList(l165,QIList(l250,QIList(l277,QIList(l167,l340,l5),QIList(l167,l336,l5),QIList(l255,QIList(l167,QIList(l74,QIList(l6,QIList(l341,l5),QIList(l165,QIList(QIList(l167,l341,l5),QIList(l171,QIList(l167,l341,l5),l5),l5),l5),l5),l336,l5),l5),QIList(l166,l337,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l277,l200,QIList(l105,QIList(l6,QIList(l340,l336,l213,l337,l5),QIList(l165,QIList(l49,QIList(l45,QIList(l164,QIList(l167,l340,l5),l5),QIList(l6,QIList(l167,l336,l5),QIList(l186,QIList(l167,l340,l5),QIList(l166,l337,l5),l5),l5),l5),l276,l5),l5),l5),l5),l5,l5),QIList(l165,l200,QIList(l105,QIList(l6,QIList(l342,l5),QIList(l274,l342,l5),l5),l5),l5,l5),QIList(l252,l200,QIList(l105,QIList(l6,QIList(l340,l336,l342,l5),QIList(l165,QIList(l209,QIList(l167,l340,l5),QIList(l167,l336,l5),QIList(l171,QIList(l167,l342,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l209,l200,QIList(l105,QIList(l6,QIList(l340,l336,l213,l337,l5),QIList(l165,QIList(l49,QIList(l45,QIList(l164,QIList(l167,l340,l5),l5),QIList(l6,QIList(l167,l336,l5),QIList(l186,QIList(l167,l340,l5),QIList(l166,l337,l5),l5),l5),l5),l208,l5),l5),l5),l5),l5,l5),QIList(l172,l200,QIList(l105,QIList(l6,QIList(l213,l337,l5),QIList(l165,QIList(l169,"(function(){",l134,QIList(l173,QIList(l166,l337,l5),l5),"})()",l5),l5),l5),l5),l5,l5),QIList(l136,l200,QIList(l105,QIList(l6,QIList(l106,l213,l342,l5),QIList(l165,QIList(l234,QIList(l167,l106,l5),QIList(l135,QIList(l167,l106,l5),QIList(l250,QIList(l166,l342,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l125,l200,QIList(l105,QIList(l6,QIList(l343,l5),QIList(l165,QIList(l249,QIList(l234,l124,QIList(l112,QIList(l167,l343,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l108,l200,QIList(l105,QIList(l6,QIList(l344,l5),QIList(l165,QIList(l272,QIList(l105,l45,l5),QIList(l167,l344,l5),l5),l5),l5),l5),l5,l5),QIList(l107,l200,QIList(l105,QIList(l6,QIList(l345,l344,l213,l337,l5),QIList(l165,QIList(l272,QIList(l6,QIList(l212,QIList(l166,l345,l5),l213,QIList(l167,QIList(l17,l5),l5),l5),QIList(l166,l337,l5),l5),QIList(l167,l344,l5),l5),l5),l5),l5),l5,l5),QIList(l70,l200,QIList(l105,QIList(l6,QIList(l346,l347,l213,l337,l5),QIList(l165,QIList(l186,l5,QIList(l258,QIList(l167,QIList(l74,QIList(l6,QIList(l335,l5),QIList(l45,QIList(l40,l335,l5),QIList(l41,l335,l5),l5),l5),l346,l5),l5),QIList(l15,l4,QIList(l7,QIList(l167,QIList(l31,l347,l5),l5),QIList(l14,QIList(l250,QIList(l167,QIList(l32,l347,l5),l5),l5),l5),l5),QIList(l269,QIList(l166,l337,l5),l5),QIList(l234,QIList(l166,QIList(l310,QIList(l105,l65,l5),QIList(l74,QIList(l6,QIList(l348,l5),QIList(l55,QIList(l30,QIList(l36,l348,l5),l5),QIList(l45,QIList(l40,l348,l5),QIList(l42,l348,l5),l5),l5),l5),l346,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l69,l200,QIList(l105,QIList(l6,QIList(l346,l347,l213,l337,l5),QIList(l165,QIList(l186,l5,QIList(l255,QIList(l167,QIList(l74,QIList(l6,QIList(l335,l5),QIList(l45,QIList(l40,l335,l5),QIList(l41,l335,l5),l5),l5),l346,l5),l5),QIList(l15,l4,QIList(l7,QIList(l167,QIList(l31,l347,l5),l5),QIList(l14,QIList(l250,QIList(l167,QIList(l32,l347,l5),l5),l5),l5),l5),QIList(l269,QIList(l166,l337,l5),l5),QIList(l68,QIList(l166,QIList(l310,QIList(l105,l65,l5),QIList(l74,QIList(l6,QIList(l348,l5),QIList(l55,QIList(l30,QIList(l36,l348,l5),l5),QIList(l45,QIList(l40,l348,l5),QIList(l42,l348,l5),l5),l5),l5),l346,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l68,l200,QIList(l105,QIList(l6,QIList(l213,l349,l5),QIList(l255,QIList(QIList(l350,QIList(l164,l5,l5),l5),l5),QIList(l15,l4,QIList(l52,QIList(QIList(l13,l349,l5),QIList(l14,l5),l5),QIList(QIList(l13,QIList(l32,l349,l5),l5),QIList(l312,"Odd paris in PSETQ",l5),l5),QIList(l4,QIList(l255,QIList(QIList(l106,QIList(l31,l349,l5),l5),QIList(l351,QIList(l34,l349,l5),l5),l5),QIList(l49,QIList(l165,QIList(QIList(l167,l106,l5),QIList(l167,QIList(l17,l5),l5),QIList(l167,l351,l5),l5),l5),l350,l5),QIList(l234,l349,QIList(l36,l349,l5),l5),l5),l5),l5),l5),QIList(l234,l350,QIList(l67,l350,l5),l5),QIList(l165,QIList(l255,QIList(l167,QIList(l74,QIList(l105,l32,l5),l350,l5),l5),QIList(l234,QIList(l166,QIList(l61,QIList(l105,l65,l5),QIList(l74,QIList(l105,l88,l5),l350,l5),QIList(l164,l5,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l58,l200,QIList(l105,QIList(l6,QIList(l352,l353,l213,l337,l5),QIList(l165,QIList(l57,QIList(l250,QIList(l167,l352,l5),QIList(l167,l353,l5),l5),QIList(l166,l337,l5),l5),l5),l5),l5),l5,l5),QIList(l57,l200,QIList(l105,QIList(l6,QIList(l342,l213,l337,l5),QIList(l255,QIList(QIList(l351,QIList(l17,l5),l5),l5),QIList(l165,QIList(l255,QIList(QIList(QIList(l167,l351,l5),QIList(l167,l342,l5),l5),l5),QIList(l166,l337,l5),QIList(l167,l351,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l56,l200,QIList(l105,QIList(l6,QIList(l213,l354,l5),QIList(l52,QIList(QIList(l13,l354,l5),l5,l5),QIList(QIList(l13,QIList(l32,l354,l5),l5),QIList(l31,l354,l5),l5),QIList(l4,QIList(l255,QIList(QIList(l355,QIList(l17,l5),l5),l5),QIList(l165,QIList(l255,QIList(QIList(QIList(l167,l355,l5),QIList(l167,QIList(l31,l354,l5),l5),l5),l5),QIList(l210,QIList(l167,l355,l5),QIList(l167,l355,l5),QIList(l56,QIList(l166,QIList(l32,l354,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l55,l200,QIList(l105,QIList(l6,QIList(l213,l354,l5),QIList(l52,QIList(QIList(l13,l354,l5),l4,l5),QIList(QIList(l13,QIList(l32,l354,l5),l5),QIList(l31,l354,l5),l5),QIList(l4,QIList(l165,QIList(l210,QIList(l167,QIList(l31,l354,l5),l5),QIList(l55,QIList(l166,QIList(l32,l354,l5),l5),l5),l5,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l54,l200,QIList(l105,QIList(l6,QIList(l342,l213,l356,l5),QIList(l165,QIList(l53,QIList(l167,l342,l5),QIList(l166,QIList(l65,l356,QIList(l165,QIList(QIList(l4,QIList(l312,"ECASE expression failed.",l5),l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l53,l200,QIList(l105,QIList(l6,QIList(l342,l213,l356,l5),QIList(l255,QIList(QIList(l357,QIList(l17,l5),l5),l5),QIList(l165,QIList(l255,QIList(QIList(QIList(l167,l357,l5),QIList(l167,l342,l5),l5),l5),QIList(l52,QIList(l166,QIList(l74,QIList(l6,QIList(l358,l5),QIList(l210,QIList(l301,QIList(l31,l358,l5),l4,l5),l358,QIList(l165,QIList(QIList(l27,QIList(l167,l357,l5),QIList(l164,QIList(l167,QIList(l31,l358,l5),l5),l5),l5),QIList(l166,QIList(l32,l358,l5),l5),l5),l5),l5),l5),l356,l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l52,l200,QIList(l105,QIList(l6,QIList(l213,l356,l5),QIList(l210,QIList(l13,l356,l5),l5,QIList(l210,QIList(l301,QIList(l33,l356,l5),l4,l5),QIList(l165,QIList(l250,QIList(l166,QIList(l35,l356,l5),l5),l5),l5),QIList(l165,QIList(l210,QIList(l167,QIList(l33,l356,l5),l5),QIList(l250,QIList(l166,QIList(l35,l356,l5),l5),l5),QIList(l52,QIList(l166,QIList(l32,l356,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l51,l200,QIList(l105,QIList(l6,QIList(l359,l213,l337,l5),QIList(l255,QIList(QIList(l360,QIList(l17,l5),l5),QIList(l361,QIList(l40,l359,l5),l5),QIList(l362,QIList(l41,l359,l5),l5),QIList(l353,QIList(l42,l359,l5),l5),l5),QIList(l165,QIList(l186,l5,QIList(l255,QIList(QIList(QIList(l167,l361,l5),0,l5),QIList(QIList(l167,l360,l5),QIList(l167,l362,l5),l5),l5),QIList(l241,QIList(l287,QIList(l167,l361,l5),QIList(l167,l360,l5),l5),QIList(l269,QIList(l166,l337,l5),l5),QIList(l47,QIList(l167,l361,l5),l5),l5),QIList(l167,l353,l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l50,l200,QIList(l105,QIList(l6,QIList(l359,l213,l337,l5),QIList(l255,QIList(QIList(l361,QIList(l40,l359,l5),l5),QIList(l363,QIList(l17,l5),l5),l5),QIList(l165,QIList(l186,l5,QIList(l255,QIList(QIList(QIList(l167,l363,l5),QIList(l167,QIList(l41,l359,l5),l5),l5),QIList(QIList(l167,l361,l5),l5,l5),l5),QIList(l241,QIList(l167,l363,l5),QIList(l234,QIList(l167,l361,l5),QIList(l31,QIList(l167,l363,l5),l5),l5),QIList(l269,QIList(l166,l337,l5),l5),QIList(l234,QIList(l167,l363,l5),QIList(l32,QIList(l167,l363,l5),l5),l5),l5),QIList(l167,QIList(l42,l359,l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),QIList(l49,l200,QIList(l105,QIList(l6,QIList(l335,l364,l5),QIList(l165,QIList(l234,QIList(l167,l364,l5),QIList(l29,QIList(l167,l335,l5),QIList(l167,l364,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l48,l200,QIList(l105,QIList(l6,QIList(l335,l212,QIList(l365,1,l5),l5),QIList(l165,QIList(l234,QIList(l167,l335,l5),QIList(l63,QIList(l167,l335,l5),QIList(l167,l365,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l47,l200,QIList(l105,QIList(l6,QIList(l335,l212,QIList(l365,1,l5),l5),QIList(l165,QIList(l234,QIList(l167,l335,l5),QIList(l62,QIList(l167,l335,l5),QIList(l167,l365,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l15,l200,QIList(l105,QIList(l6,QIList(l366,l213,l337,l5),QIList(l165,QIList(l186,l5,QIList(l241,QIList(l167,l366,l5),QIList(l166,l337,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l14,l200,QIList(l105,QIList(l6,QIList(l212,l351,l5),QIList(l165,QIList(l262,l5,QIList(l167,l351,l5),l5),l5),l5),l5),l5,l5),QIList(l12,l200,QIList(l105,QIList(l6,QIList(l340,l336,l213,l337,l5),QIList(l165,QIList(l250,QIList(l297,QIList(l164,QIList(l167,l340,l5),l5),QIList(l11,QIList(l167,QIList(l296,l340,l5),l5),QIList(l167,l336,l5),QIList(l166,QIList(l210,QIList(l55,QIList(l304,QIList(l31,l337,l5),l5),QIList(l28,QIList(l13,QIList(l32,l337,l5),l5),l5),l5),QIList(l165,QIList(QIList(l167,QIList(l31,l337,l5),l5),QIList(l186,QIList(l167,l340,l5),QIList(l166,QIList(l32,l337,l5),l5),l5),l5),l5),QIList(l165,QIList(QIList(l186,QIList(l167,l340,l5),QIList(l166,l337,l5),l5),l5),l5),l5),l5),l5),l5),QIList(l164,QIList(l167,l340,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l11,l200,QIList(l105,QIList(l6,QIList(l340,l336,l213,l337,l5),QIList(l255,QIList(QIList(l335,QIList(l17,"FN",l5),l5),l5),QIList(l165,QIList(l255,QIList(QIList(QIList(l167,l335,l5),QIList(l6,QIList(l167,l336,l5),QIList(l166,l337,l5),l5),l5),l5),QIList(l316,QIList(l167,l335,l5),"fname",QIList(l167,l340,l5),l5),QIList(l167,l335,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l10,l200,QIList(l105,QIList(l6,QIList(l340,l351,l212,l367,l5),QIList(l165,QIList(l250,QIList(l234,QIList(l167,l340,l5),QIList(l167,l351,l5),l5),QIList(l166,QIList(l7,QIList(l304,l367,l5),QIList(l165,QIList(QIList(l316,QIList(l164,QIList(l167,l340,l5),l5),"vardoc",QIList(l167,l367,l5),l5),l5),l5),l5),l5),QIList(l164,QIList(l167,l340,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l9,l200,QIList(l105,QIList(l6,QIList(l340,l351,l212,l367,l5),QIList(l165,QIList(l250,QIList(l2,QIList(l204,QIList(l167,l340,l5),l5),l5),QIList(l8,QIList(l19,QIList(l164,QIList(l167,l340,l5),l5),l5),QIList(l234,QIList(l167,l340,l5),QIList(l167,l351,l5),l5),l5),QIList(l166,QIList(l7,QIList(l304,l367,l5),QIList(l165,QIList(QIList(l316,QIList(l164,QIList(l167,l340,l5),l5),"vardoc",QIList(l167,l367,l5),l5),l5),l5),l5),l5),QIList(l164,QIList(l167,l340,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l8,l200,QIList(l105,QIList(l6,QIList(l366,l213,l337,l5),QIList(l165,QIList(l210,QIList(l167,l366,l5),l5,QIList(l250,QIList(l166,l337,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l7,l200,QIList(l105,QIList(l6,QIList(l366,l213,l337,l5),QIList(l165,QIList(l210,QIList(l167,l366,l5),QIList(l250,QIList(l166,l337,l5),l5),l5,l5),l5),l5),l5),l5,l5),QIList(l6,l200,QIList(l105,QIList(l6,QIList(l336,l213,l337,l5),QIList(l165,QIList(l105,QIList(l6,QIList(l167,l336,l5),QIList(l166,l337,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l3,l200,QIList(l105,QIList(l6,QIList(l340,l351,l212,l367,l5),QIList(l165,QIList(l250,QIList(l2,QIList(l204,QIList(l167,l340,l5),l5),l5),QIList(l2,QIList(l206,QIList(l167,l340,l5),l5),l5),QIList(l234,QIList(l167,l340,l5),QIList(l167,l351,l5),l5),QIList(l166,QIList(l7,QIList(l304,l367,l5),QIList(l165,QIList(QIList(l316,QIList(l164,QIList(l167,l340,l5),l5),"vardoc",QIList(l167,l367,l5),l5),l5),l5),l5),l5),QIList(l164,QIList(l167,l340,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l2,l200,QIList(l105,QIList(l6,QIList(l213,l338,l5),QIList(l165,QIList(l249,QIList(l166,QIList(l74,QIList(l6,QIList(l339,l5),QIList(l165,QIList(l203,QIList(l164,QIList(l167,l339,l5),l5),l5),l5),l5),l338,l5),l5),l5),l5),l5),l5),l5,l5),QIList(l1,l200,QIList(l105,QIList(l6,QIList(l340,l336,l213,l337,l5),QIList(l165,QIList(l249,QIList(l199,QIList(l164,QIList(l167,l340,l5),l5),QIList(l164,QIList(l105,QIList(l6,QIList(l167,QIList(l74,QIList(l105,QIList(l6,QIList(l335,l5),QIList(l210,QIList(l301,l335,QIList(l164,l330,l5),l5),QIList(l164,l213,l5),l335,l5),l5),l5),l336,l5),l5),QIList(l166,l337,l5),l5),l5),l5),l5),l5),l5),l5),l5),l5,l5),l5),l5,l5,l5);
8879 (function(){
8880     l126.fvalue(pv, l330);
8881     l126.fvalue(pv, l329);
8882     l126.fvalue(pv, l328);
8883     l126.fvalue(pv, l327);
8884     l126.fvalue(pv, l326);
8885     l126.fvalue(pv, l325);
8886     l126.fvalue(pv, l324);
8887     l126.fvalue(pv, l323);
8888     l126.fvalue(pv, l322);
8889     l126.fvalue(pv, l321);
8890     l126.fvalue(pv, l320);
8891     l126.fvalue(pv, l319);
8892     l126.fvalue(pv, l318);
8893     l126.fvalue(pv, l317);
8894     l126.fvalue(pv, l316);
8895     l126.fvalue(pv, l315);
8896     l126.fvalue(pv, l314);
8897     l126.fvalue(pv, l313);
8898     l126.fvalue(pv, l312);
8899     l126.fvalue(pv, l311);
8900     l126.fvalue(pv, l310);
8901     l126.fvalue(pv, l309);
8902     l126.fvalue(pv, l308);
8903     l126.fvalue(pv, l307);
8904     l126.fvalue(pv, l306);
8905     l126.fvalue(pv, l305);
8906     l126.fvalue(pv, l304);
8907     l126.fvalue(pv, l303);
8908     l126.fvalue(pv, l302);
8909     l126.fvalue(pv, l301);
8910     l126.fvalue(pv, l300);
8911     l126.fvalue(pv, l299);
8912     l126.fvalue(pv, l298);
8913     l126.fvalue(pv, l297);
8914     l126.fvalue(pv, l296);
8915     l126.fvalue(pv, l295);
8916     l126.fvalue(pv, l294);
8917     l126.fvalue(pv, l293);
8918     l126.fvalue(pv, l292);
8919     l126.fvalue(pv, l291);
8920     l126.fvalue(pv, l290);
8921     l126.fvalue(pv, l289);
8922     l126.fvalue(pv, l288);
8923     l126.fvalue(pv, l287);
8924     l126.fvalue(pv, l286);
8925     l126.fvalue(pv, l285);
8926     l126.fvalue(pv, l284);
8927     l126.fvalue(pv, l283);
8928     l126.fvalue(pv, l282);
8929     l126.fvalue(pv, l281);
8930     l126.fvalue(pv, l280);
8931     l126.fvalue(pv, l279);
8932     l126.fvalue(pv, l278);
8933     l126.fvalue(pv, l277);
8934     l126.fvalue(pv, l276);
8935     l126.fvalue(pv, l275);
8936     l126.fvalue(pv, l274);
8937     l126.fvalue(pv, l273);
8938     l126.fvalue(pv, l272);
8939     l126.fvalue(pv, l271);
8940     l126.fvalue(pv, l270);
8941     l126.fvalue(pv, l269);
8942     l126.fvalue(pv, l268);
8943     l126.fvalue(pv, l267);
8944     l126.fvalue(pv, l266);
8945     l126.fvalue(pv, l265);
8946     l126.fvalue(pv, l264);
8947     l126.fvalue(pv, l263);
8948     l126.fvalue(pv, l262);
8949     l126.fvalue(pv, l261);
8950     l126.fvalue(pv, l260);
8951     l126.fvalue(pv, l259);
8952     l126.fvalue(pv, l258);
8953     l126.fvalue(pv, l257);
8954     l126.fvalue(pv, l256);
8955     l126.fvalue(pv, l255);
8956     l126.fvalue(pv, l254);
8957     l126.fvalue(pv, l253);
8958     l126.fvalue(pv, l252);
8959     l126.fvalue(pv, l251);
8960     l126.fvalue(pv, l250);
8961     l126.fvalue(pv, l249);
8962     l126.fvalue(pv, l248);
8963     l126.fvalue(pv, l247);
8964     l126.fvalue(pv, l246);
8965     l126.fvalue(pv, l245);
8966     l126.fvalue(pv, l244);
8967     l126.fvalue(pv, l243);
8968     l126.fvalue(pv, l242);
8969     l126.fvalue(pv, l241);
8970     l126.fvalue(pv, l240);
8971     l126.fvalue(pv, l239);
8972     l126.fvalue(pv, l238);
8973     l126.fvalue(pv, l237);
8974     l126.fvalue(pv, l236);
8975     l126.fvalue(pv, l235);
8976     l126.fvalue(pv, l234);
8977     l126.fvalue(pv, l233);
8978     l126.fvalue(pv, l232);
8979     l126.fvalue(pv, l231);
8980     l126.fvalue(pv, l230);
8981     l126.fvalue(pv, l229);
8982     l126.fvalue(pv, l228);
8983     l126.fvalue(pv, l227);
8984     l126.fvalue(pv, l226);
8985     l126.fvalue(pv, l225);
8986     l126.fvalue(pv, l224);
8987     l126.fvalue(pv, l223);
8988     l126.fvalue(pv, l222);
8989     l126.fvalue(pv, l221);
8990     l126.fvalue(pv, l220);
8991     l126.fvalue(pv, l219);
8992     l126.fvalue(pv, l218);
8993     l126.fvalue(pv, l217);
8994     l126.fvalue(pv, l216);
8995     l126.fvalue(pv, l214);
8996     l126.fvalue(pv, l213);
8997     l126.fvalue(pv, l212);
8998     l126.fvalue(pv, l211);
8999     l126.fvalue(pv, l210);
9000     l126.fvalue(pv, l209);
9001     l126.fvalue(pv, l208);
9002     l126.fvalue(pv, l207);
9003     l126.fvalue(pv, l206);
9004     l126.fvalue(pv, l205);
9005     l126.fvalue(pv, l204);
9006     l126.fvalue(pv, l203);
9007     l126.fvalue(pv, l202);
9008     l126.fvalue(pv, l201);
9009     l126.fvalue(pv, l200);
9010     l126.fvalue(pv, l199);
9011     l126.fvalue(pv, l198);
9012     l126.fvalue(pv, l197);
9013     l126.fvalue(pv, l196);
9014     l126.fvalue(pv, l195);
9015     l126.fvalue(pv, l194);
9016     l126.fvalue(pv, l193);
9017     l126.fvalue(pv, l192);
9018     l126.fvalue(pv, l191);
9019     l126.fvalue(pv, l190);
9020     l126.fvalue(pv, l189);
9021     l126.fvalue(pv, l188);
9022     l126.fvalue(pv, l187);
9023     l126.fvalue(pv, l186);
9024     l126.fvalue(pv, l185);
9025     l126.fvalue(pv, l184);
9026     l126.fvalue(pv, l183);
9027     l126.fvalue(pv, l182);
9028     l126.fvalue(pv, l181);
9029     l126.fvalue(pv, l180);
9030     l126.fvalue(pv, l179);
9031     l126.fvalue(pv, l178);
9032     l126.fvalue(pv, l177);
9033     l126.fvalue(pv, l176);
9034     l126.fvalue(pv, l175);
9035     l126.fvalue(pv, l174);
9036     l126.fvalue(pv, l173);
9037     l126.fvalue(pv, l172);
9038     l126.fvalue(pv, l171);
9039     l126.fvalue(pv, l170);
9040     l126.fvalue(pv, l169);
9041     l126.fvalue(pv, l168);
9042     l126.fvalue(pv, l167);
9043     l126.fvalue(pv, l166);
9044     l126.fvalue(pv, l165);
9045     l126.fvalue(pv, l164);
9046     l126.fvalue(pv, l163);
9047     l126.fvalue(pv, l162);
9048     l126.fvalue(pv, l161);
9049     l126.fvalue(pv, l160);
9050     l126.fvalue(pv, l159);
9051     l126.fvalue(pv, l158);
9052     l126.fvalue(pv, l157);
9053     l126.fvalue(pv, l156);
9054     l126.fvalue(pv, l155);
9055     l126.fvalue(pv, l154);
9056     l126.fvalue(pv, l153);
9057     l126.fvalue(pv, l152);
9058     l126.fvalue(pv, l151);
9059     l126.fvalue(pv, l150);
9060     l126.fvalue(pv, l149);
9061     l126.fvalue(pv, l148);
9062     l126.fvalue(pv, l147);
9063     l126.fvalue(pv, l146);
9064     l126.fvalue(pv, l145);
9065     l126.fvalue(pv, l144);
9066     l126.fvalue(pv, l143);
9067     l126.fvalue(pv, l142);
9068     l126.fvalue(pv, l141);
9069     l126.fvalue(pv, l140);
9070     l126.fvalue(pv, l139);
9071     l126.fvalue(pv, l138);
9072     l126.fvalue(pv, l137);
9073     l126.fvalue(pv, l136);
9074     l126.fvalue(pv, l135);
9075     l126.fvalue(pv, l134);
9076     l126.fvalue(pv, l133);
9077     l126.fvalue(pv, l132);
9078     l126.fvalue(pv, l131);
9079     l126.fvalue(pv, l130);
9080     l126.fvalue(pv, l129);
9081     l126.fvalue(pv, l128);
9082     l126.fvalue(pv, l127);
9083     l126.fvalue(pv, l126);
9084     l126.fvalue(pv, l125);
9085     l126.fvalue(pv, l124);
9086     l126.fvalue(pv, l123);
9087     l126.fvalue(pv, l122);
9088     l126.fvalue(pv, l121);
9089     l126.fvalue(pv, l120);
9090     l126.fvalue(pv, l119);
9091     l126.fvalue(pv, l118);
9092     l126.fvalue(pv, l117);
9093     l126.fvalue(pv, l116);
9094     l126.fvalue(pv, l115);
9095     l126.fvalue(pv, l114);
9096     l126.fvalue(pv, l113);
9097     l126.fvalue(pv, l112);
9098     l126.fvalue(pv, l111);
9099     l126.fvalue(pv, l110);
9100     l126.fvalue(pv, l109);
9101     l126.fvalue(pv, l108);
9102     l126.fvalue(pv, l107);
9103     l126.fvalue(pv, l106);
9104     l126.fvalue(pv, l105);
9105     l126.fvalue(pv, l104);
9106     l126.fvalue(pv, l103);
9107     l126.fvalue(pv, l102);
9108     l126.fvalue(pv, l101);
9109     l126.fvalue(pv, l100);
9110     l126.fvalue(pv, l99);
9111     l126.fvalue(pv, l98);
9112     l126.fvalue(pv, l97);
9113     l126.fvalue(pv, l96);
9114     l126.fvalue(pv, l95);
9115     l126.fvalue(pv, l94);
9116     l126.fvalue(pv, l93);
9117     l126.fvalue(pv, l92);
9118     l126.fvalue(pv, l91);
9119     l126.fvalue(pv, l90);
9120     l126.fvalue(pv, l89);
9121     l126.fvalue(pv, l88);
9122     l126.fvalue(pv, l87);
9123     l126.fvalue(pv, l86);
9124     l126.fvalue(pv, l85);
9125     l126.fvalue(pv, l84);
9126     l126.fvalue(pv, l83);
9127     l126.fvalue(pv, l82);
9128     l126.fvalue(pv, l81);
9129     l126.fvalue(pv, l80);
9130     l126.fvalue(pv, l79);
9131     l126.fvalue(pv, l78);
9132     l126.fvalue(pv, l77);
9133     l126.fvalue(pv, l76);
9134     l126.fvalue(pv, l75);
9135     l126.fvalue(pv, l74);
9136     l126.fvalue(pv, l73);
9137     l126.fvalue(pv, l72);
9138     l126.fvalue(pv, l71);
9139     l126.fvalue(pv, l70);
9140     l126.fvalue(pv, l69);
9141     l126.fvalue(pv, l68);
9142     l126.fvalue(pv, l67);
9143     l126.fvalue(pv, l66);
9144     l126.fvalue(pv, l65);
9145     l126.fvalue(pv, l64);
9146     l126.fvalue(pv, l63);
9147     l126.fvalue(pv, l62);
9148     l126.fvalue(pv, l61);
9149     l126.fvalue(pv, l60);
9150     l126.fvalue(pv, l59);
9151     l126.fvalue(pv, l58);
9152     l126.fvalue(pv, l57);
9153     l126.fvalue(pv, l56);
9154     l126.fvalue(pv, l55);
9155     l126.fvalue(pv, l54);
9156     l126.fvalue(pv, l53);
9157     l126.fvalue(pv, l52);
9158     l126.fvalue(pv, l51);
9159     l126.fvalue(pv, l50);
9160     l126.fvalue(pv, l49);
9161     l126.fvalue(pv, l48);
9162     l126.fvalue(pv, l47);
9163     l126.fvalue(pv, l46);
9164     l126.fvalue(pv, l45);
9165     l126.fvalue(pv, l44);
9166     l126.fvalue(pv, l43);
9167     l126.fvalue(pv, l42);
9168     l126.fvalue(pv, l41);
9169     l126.fvalue(pv, l40);
9170     l126.fvalue(pv, l39);
9171     l126.fvalue(pv, l38);
9172     l126.fvalue(pv, l37);
9173     l126.fvalue(pv, l36);
9174     l126.fvalue(pv, l35);
9175     l126.fvalue(pv, l34);
9176     l126.fvalue(pv, l33);
9177     l126.fvalue(pv, l32);
9178     l126.fvalue(pv, l31);
9179     l126.fvalue(pv, l30);
9180     l126.fvalue(pv, l29);
9181     l126.fvalue(pv, l28);
9182     l126.fvalue(pv, l27);
9183     l126.fvalue(pv, l26);
9184     l126.fvalue(pv, l25);
9185     l126.fvalue(pv, l24);
9186     l126.fvalue(pv, l23);
9187     l126.fvalue(pv, l22);
9188     l126.fvalue(pv, l21);
9189     l126.fvalue(pv, l20);
9190     l126.fvalue(pv, l19);
9191     l126.fvalue(pv, l18);
9192     l126.fvalue(pv, l17);
9193     l126.fvalue(pv, l16);
9194     l126.fvalue(pv, l15);
9195     l126.fvalue(pv, l14);
9196     l126.fvalue(pv, l13);
9197     l126.fvalue(pv, l12);
9198     l126.fvalue(pv, l11);
9199     l126.fvalue(pv, l10);
9200     l126.fvalue(pv, l9);
9201     l126.fvalue(pv, l8);
9202     l126.fvalue(pv, l7);
9203     l126.fvalue(pv, l6);
9204     l126.fvalue(pv, l5);
9205     l126.fvalue(pv, l4);
9206     l126.fvalue(pv, l3);
9207     l126.fvalue(pv, l2);
9208     l126.fvalue(pv, l1);
9209     ((l237).value = l332);
9210     ((l190).value = l368);
9211     ((l191).value = 896);
9212     ((l16).value = 227);
9213     return ((l259).value = 297);
9214 })();
9215 ((l238).value = 368);